tcpip.c revision 46550
1/*
2 * $Id: tcpip.c,v 1.76 1999/05/06 11:03:18 jkh Exp $
3 *
4 * Copyright (c) 1995
5 *      Gary J Palmer. All rights reserved.
6 * Copyright (c) 1996
7 *      Jordan K. Hubbard. All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer,
14 *    verbatim and that no modifications are made prior to this
15 *    point in the file.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 *    notice, this list of conditions and the following disclaimer in the
18 *    documentation and/or other materials provided with the distribution.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
21 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
22 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
23 * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
24 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
25 * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS
26 * OF USE, DATA, LIFE OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
27 * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
28 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
29 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30 *
31 */
32
33/*
34 * All kinds of hacking also performed by jkh on this code.  Don't
35 * blame Gary for every bogosity you see here.. :-)
36 *
37 * -jkh
38 */
39
40#include "sysinstall.h"
41#include <sys/param.h>
42
43/* The help file for the TCP/IP setup screen */
44#define TCP_HELPFILE		"tcp"
45
46/* These are nasty, but they make the layout structure a lot easier ... */
47
48static char	hostname[HOSTNAME_FIELD_LEN], domainname[HOSTNAME_FIELD_LEN],
49		gateway[IPADDR_FIELD_LEN], nameserver[IPADDR_FIELD_LEN];
50static int	okbutton, cancelbutton;
51static char	ipaddr[IPADDR_FIELD_LEN], netmask[IPADDR_FIELD_LEN], extras[EXTRAS_FIELD_LEN];
52
53/* What the screen size is meant to be */
54#define TCP_DIALOG_Y		0
55#define TCP_DIALOG_X		8
56#define TCP_DIALOG_WIDTH	COLS - 16
57#define TCP_DIALOG_HEIGHT	LINES - 2
58
59static Layout layout[] = {
60#define LAYOUT_HOSTNAME		0
61    { 1, 2, 25, HOSTNAME_FIELD_LEN - 1,
62      "Host:", "Your fully-qualified hostname, e.g. foo.bar.com",
63      hostname, STRINGOBJ, NULL },
64#define LAYOUT_DOMAINNAME	1
65    { 1, 35, 20, HOSTNAME_FIELD_LEN - 1,
66      "Domain:",
67      "The name of the domain that your machine is in, e.g. bar.com",
68      domainname, STRINGOBJ, NULL },
69#define LAYOUT_GATEWAY		2
70    { 5, 2, 18, IPADDR_FIELD_LEN - 1,
71      "Gateway:",
72      "IP address of host forwarding packets to non-local destinations",
73      gateway, STRINGOBJ, NULL },
74#define LAYOUT_NAMESERVER	3
75    { 5, 35, 18, IPADDR_FIELD_LEN - 1,
76      "Name server:", "IP address of your local DNS server",
77      nameserver, STRINGOBJ, NULL },
78#define LAYOUT_IPADDR		4
79    { 10, 10, 18, IPADDR_FIELD_LEN - 1,
80      "IP Address:",
81      "The IP address to be used for this interface",
82      ipaddr, STRINGOBJ, NULL },
83#define LAYOUT_NETMASK		5
84    { 10, 35, 18, IPADDR_FIELD_LEN - 1,
85      "Netmask:",
86      "The netmask for this interface, e.g. 0xffffff00 for a class C network",
87      netmask, STRINGOBJ, NULL },
88#define LAYOUT_EXTRAS		6
89    { 14, 10, 37, HOSTNAME_FIELD_LEN - 1,
90      "Extra options to ifconfig:",
91      "Any interface-specific options to ifconfig you would like to add",
92      extras, STRINGOBJ, NULL },
93#define LAYOUT_OKBUTTON		7
94    { 19, 15, 0, 0,
95      "OK", "Select this if you are happy with these settings",
96      &okbutton, BUTTONOBJ, NULL },
97#define LAYOUT_CANCELBUTTON	8
98    { 19, 35, 0, 0,
99      "CANCEL", "Select this if you wish to cancel this screen",
100      &cancelbutton, BUTTONOBJ, NULL },
101    { NULL },
102};
103
104#define _validByte(b) ((b) >= 0 && (b) <= 255)
105
106/* whine */
107static void
108feepout(char *msg)
109{
110    beep();
111    msgConfirm(msg);
112}
113
114/* Very basic IP address integrity check - could be drastically improved */
115static int
116verifyIP(char *ip)
117{
118    int a, b, c, d;
119
120    if (ip && sscanf(ip, "%d.%d.%d.%d", &a, &b, &c, &d) == 4 &&
121	_validByte(a) && _validByte(b) && _validByte(c) &&
122	_validByte(d) && (d != 255))
123	return 1;
124    else
125	return 0;
126}
127
128/* Check for the settings on the screen - the per-interface stuff is
129   moved to the main handling code now to do it on the fly - sigh */
130static int
131verifySettings(void)
132{
133    if (!hostname[0])
134	feepout("Must specify a host name of some sort!");
135    else if (gateway[0] && strcmp(gateway, "NO") && !verifyIP(gateway))
136	feepout("Invalid gateway IP address specified");
137    else if (nameserver[0] && !verifyIP(nameserver))
138	feepout("Invalid name server IP address specified");
139    else if (netmask[0] && (netmask[0] < '0' && netmask[0] > '3'))
140	feepout("Invalid netmask value");
141    else if (ipaddr[0] && !verifyIP(ipaddr))
142	feepout("Invalid IP address");
143    else
144	return 1;
145    return 0;
146}
147
148/* This is it - how to get TCP setup values */
149int
150tcpOpenDialog(Device *devp)
151{
152    WINDOW              *ds_win, *save = NULL;
153    ComposeObj          *obj = NULL;
154    int                 n = 0, cancel = FALSE;
155    int			max, ret = DITEM_SUCCESS;
156    char                *tmp;
157    char		title[80];
158
159    /* Initialise vars from previous device values */
160    if (devp->private) {
161	DevInfo *di = (DevInfo *)devp->private;
162
163	SAFE_STRCPY(ipaddr, di->ipaddr);
164	SAFE_STRCPY(netmask, di->netmask);
165	SAFE_STRCPY(extras, di->extras);
166    }
167    else { /* See if there are any defaults */
168	char *cp;
169
170#ifdef notdef	/* This is just a test stub which doesn't work yet either */
171	/* First try a DHCP scan */
172	msgNotify("Scanning for DHCP servers...");
173	Mkdir("/var/db");
174	vsystem("ifconfig %s inet 0.0.0.0 netmask 0.0.0.0 broadcast 255.255.255.255 up", devp->name);
175	if (!vsystem("dhclient")) {
176	    msgConfirm("Successful return from dhclient");
177	}
178	else
179	    msgConfirm("Unsuccessful return from dhclient");
180#endif
181
182	/* Get old IP address from variable space, if available */
183	if (!ipaddr[0]) {
184	    if ((cp = variable_get(VAR_IPADDR)) != NULL)
185		SAFE_STRCPY(ipaddr, cp);
186	    else if ((cp = variable_get(string_concat3(devp->name, "_", VAR_IPADDR))) != NULL)
187		SAFE_STRCPY(ipaddr, cp);
188	}
189
190	/* Get old netmask from variable space, if available */
191	if (!netmask[0]) {
192	    if ((cp = variable_get(VAR_NETMASK)) != NULL)
193		SAFE_STRCPY(netmask, cp);
194	    else if ((cp = variable_get(string_concat3(devp->name, "_", VAR_NETMASK))) != NULL)
195		SAFE_STRCPY(netmask, cp);
196	}
197
198	/* Get old extras string from variable space, if available */
199	if (!extras[0]) {
200	    if ((cp = variable_get(VAR_EXTRAS)) != NULL)
201		SAFE_STRCPY(extras, cp);
202	    else if ((cp = variable_get(string_concat3(devp->name, "_", VAR_EXTRAS))) != NULL)
203		SAFE_STRCPY(extras, cp);
204	}
205    }
206
207    /* Look up values already recorded with the system, or blank the string variables ready to accept some new data */
208    tmp = variable_get(VAR_HOSTNAME);
209    if (tmp)
210	SAFE_STRCPY(hostname, tmp);
211    else
212	bzero(hostname, sizeof(hostname));
213    tmp = variable_get(VAR_DOMAINNAME);
214    if (tmp)
215	SAFE_STRCPY(domainname, tmp);
216    else
217	bzero(domainname, sizeof(domainname));
218    tmp = variable_get(VAR_GATEWAY);
219    if (tmp)
220	SAFE_STRCPY(gateway, tmp);
221    else
222	bzero(gateway, sizeof(gateway));
223    tmp = variable_get(VAR_NAMESERVER);
224    if (tmp)
225	SAFE_STRCPY(nameserver, tmp);
226    else
227	bzero(nameserver, sizeof(nameserver));
228
229    save = savescr();
230    /* If non-interactive, jump straight over the dialog crap and into config section */
231    if (variable_get(VAR_NONINTERACTIVE) &&
232	!variable_get(VAR_NETINTERACTIVE)) {
233	if (!hostname[0])
234	    msgConfirm("WARNING: hostname variable not set and is a non-optional\n"
235		       "parameter.  Please add this to your installation script\n"
236		       "or set the netInteractive variable (see sysinstall man page)");
237	else
238	    goto netconfig;
239    }
240
241    /* Now do all the screen I/O */
242    dialog_clear_norefresh();
243
244    /* We need a curses window */
245    if (!(ds_win = openLayoutDialog(TCP_HELPFILE, " Network Configuration ",
246				    TCP_DIALOG_X, TCP_DIALOG_Y, TCP_DIALOG_WIDTH, TCP_DIALOG_HEIGHT))) {
247	beep();
248	msgConfirm("Cannot open TCP/IP dialog window!!");
249	restorescr(save);
250	return DITEM_FAILURE;
251    }
252
253    /* Draw interface configuration box */
254    draw_box(ds_win, TCP_DIALOG_Y + 9, TCP_DIALOG_X + 8, TCP_DIALOG_HEIGHT - 13, TCP_DIALOG_WIDTH - 17,
255	     dialog_attr, border_attr);
256    wattrset(ds_win, dialog_attr);
257    sprintf(title, " Configuration for Interface %s ", devp->name);
258    mvwaddstr(ds_win, TCP_DIALOG_Y + 9, TCP_DIALOG_X + 14, title);
259
260    /* Some more initialisation before we go into the main input loop */
261    obj = initLayoutDialog(ds_win, layout, TCP_DIALOG_X, TCP_DIALOG_Y, &max);
262
263reenter:
264    cancelbutton = okbutton = 0;
265    while (layoutDialogLoop(ds_win, layout, &obj, &n, max, &cancelbutton, &cancel)) {
266	/* Insert a default value for the netmask, 0xffffff00 is
267	   the most appropriate one (entire class C, or subnetted
268	   class A/B network). */
269	if (netmask[0] == '\0') {
270	    strcpy(netmask, "255.255.255.0");
271	    RefreshStringObj(layout[LAYOUT_NETMASK].obj);
272	}
273	if (!index(hostname, '.') && domainname[0]) {
274	    strcat(hostname, ".");
275	    strcat(hostname, domainname);
276	    RefreshStringObj(layout[LAYOUT_HOSTNAME].obj);
277	}
278	else if (((tmp = index(hostname, '.')) != NULL) && !domainname[0]) {
279	    SAFE_STRCPY(domainname, tmp + 1);
280	    RefreshStringObj(layout[LAYOUT_DOMAINNAME].obj);
281	}
282    }
283
284    if (!cancel && !verifySettings())
285	goto reenter;
286
287    /* Clear this crap off the screen */
288    delwin(ds_win);
289    dialog_clear_norefresh();
290    use_helpfile(NULL);
291
292    /* We actually need to inform the rest of sysinstall about this
293       data now if the user hasn't selected cancel.  Save the stuff
294       out to the environment via the variable_set() mechanism */
295
296netconfig:
297    if (!cancel) {
298	DevInfo *di;
299	char temp[512], ifn[255];
300	char *ifaces;
301
302	variable_set2(VAR_HOSTNAME, hostname, 1);
303	sethostname(hostname, strlen(hostname));
304	if (domainname[0])
305	    variable_set2(VAR_DOMAINNAME, domainname, 0);
306	if (gateway[0])
307	    variable_set2(VAR_GATEWAY, gateway, 1);
308	if (nameserver[0])
309	    variable_set2(VAR_NAMESERVER, nameserver, 0);
310
311	if (!devp->private)
312	    devp->private = (DevInfo *)safe_malloc(sizeof(DevInfo));
313	di = devp->private;
314	SAFE_STRCPY(di->ipaddr, ipaddr);
315	SAFE_STRCPY(di->netmask, netmask);
316	SAFE_STRCPY(di->extras, extras);
317
318	sprintf(temp, "inet %s %s netmask %s", ipaddr, extras, netmask);
319	sprintf(ifn, "%s%s", VAR_IFCONFIG, devp->name);
320	variable_set2(ifn, temp, 1);
321	ifaces = variable_get(VAR_INTERFACES);
322	if (!ifaces)
323	    variable_set2(VAR_INTERFACES, ifaces = "lo0", 1);
324	/* Only add it if it's not there already */
325	if (!strstr(ifaces, devp->name)) {
326	    sprintf(ifn, "%s %s", devp->name, ifaces);
327	    variable_set2(VAR_INTERFACES, ifn, 1);
328	}
329	if (ipaddr[0])
330	    variable_set2(VAR_IPADDR, ipaddr, 0);
331	configResolv(NULL);	/* XXX this will do it on the MFS copy XXX */
332	ret = DITEM_SUCCESS;
333    }
334    else
335	ret = DITEM_FAILURE;
336    restorescr(save);
337    return ret;
338}
339
340static Device *NetDev;
341
342static int
343netHook(dialogMenuItem *self)
344{
345    Device **devs;
346
347    devs = deviceFindDescr(self->prompt, self->title, DEVICE_TYPE_NETWORK);
348    if (devs) {
349	if (DITEM_STATUS(tcpOpenDialog(devs[0])) != DITEM_FAILURE)
350	    NetDev = devs[0];
351	else
352	    NetDev = NULL;
353    }
354    return devs ? DITEM_LEAVE_MENU : DITEM_FAILURE;
355}
356
357/* Get a network device */
358Device *
359tcpDeviceSelect(void)
360{
361    DMenu *menu;
362    Device **devs, *rval;
363    int cnt;
364
365    devs = deviceFind(NULL, DEVICE_TYPE_NETWORK);
366    cnt = deviceCount(devs);
367    rval = NULL;
368
369    if (!cnt) {
370	msgConfirm("No network devices available!");
371	return NULL;
372    }
373    else if (!RunningAsInit) {
374	if (!msgYesNo("Running multi-user, assume that the network is already configured?"))
375	    return devs[0];
376    }
377    if (cnt == 1) {
378	if (DITEM_STATUS(tcpOpenDialog(devs[0]) == DITEM_SUCCESS))
379	    rval = devs[0];
380    }
381    else if (variable_get(VAR_NONINTERACTIVE) && variable_get(VAR_NETWORK_DEVICE)) {
382	devs = deviceFind(variable_get(VAR_NETWORK_DEVICE), DEVICE_TYPE_NETWORK);
383	cnt = deviceCount(devs);
384	if (cnt) {
385	    if (DITEM_STATUS(tcpOpenDialog(devs[0]) == DITEM_SUCCESS))
386		rval = devs[0];
387	}
388    }
389    else {
390	int status;
391
392	menu = deviceCreateMenu(&MenuNetworkDevice, DEVICE_TYPE_NETWORK, netHook, NULL);
393	if (!menu)
394	    msgFatal("Unable to create network device menu!  Argh!");
395	status = dmenuOpenSimple(menu, FALSE);
396	free(menu);
397	if (status)
398	    rval = NetDev;
399    }
400    return rval;
401}
402
403/* Do it from a menu that doesn't care about status */
404int
405tcpMenuSelect(dialogMenuItem *self)
406{
407    Device *tmp;
408
409    tmp = tcpDeviceSelect();
410    if (tmp && !msgYesNo("Would you like to bring the %s interface up right now?", tmp->name))
411	if (!tmp->init(tmp))
412	    msgConfirm("Initialization of %s device failed.", tmp->name);
413    return DITEM_SUCCESS | DITEM_RESTORE;
414}
415