/* $NetBSD: net.c,v 1.110 2006/08/19 21:18:40 martin Exp $ */ /* * Copyright 1997 Piermont Information Systems Inc. * All rights reserved. * * Written by Philip A. Nelson for Piermont Information Systems Inc. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed for the NetBSD Project by * Piermont Information Systems Inc. * 4. The name of Piermont Information Systems Inc. may not be used to endorse * or promote products derived from this software without specific prior * written permission. * * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS'' * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF * THE POSSIBILITY OF SUCH DAMAGE. * */ /* net.c -- routines to fetch files off the network. */ #include #include #include #include #include #include #include #include #ifdef INET6 #include #endif #include #include #include #include #include #include #include "defs.h" #include "md.h" #include "msg_defs.h" #include "menu_defs.h" #include "txtwalk.h" #include #include int network_up = 0; /* Access to network information */ static char *net_devices; static char *net_up; static char net_dev[STRSIZE]; static char net_domain[STRSIZE]; static char net_host[STRSIZE]; static char net_ip[SSTRSIZE]; static char net_srv_ip[SSTRSIZE]; static char net_mask[SSTRSIZE]; static char net_namesvr[STRSIZE]; static char net_defroute[STRSIZE]; static char net_media[STRSIZE]; static char sl_flags[STRSIZE]; static int net_dhcpconf; #define DHCPCONF_IPADDR 0x01 #define DHCPCONF_NAMESVR 0x02 #define DHCPCONF_HOST 0x04 #define DHCPCONF_DOMAIN 0x08 #ifdef INET6 static char net_ip6[STRSIZE]; char net_namesvr6[STRSIZE]; static int net_ip6conf; #define IP6CONF_AUTOHOST 0x01 #endif /* URL encode unsafe characters. */ static char *url_encode (char *dst, const char *src, const char *ep, const char *safe_chars, int encode_leading_slash); static void write_etc_hosts(FILE *f); #define DHCLIENT_EX "/sbin/dhclient" #include static int config_dhcp(char *); static void get_dhcp_value(char *, size_t, const char *); #ifdef INET6 static int is_v6kernel (void); static void init_v6kernel (int); static int get_v6wait (void); #endif /* * URL encode unsafe characters. See RFC 1738. * * Copies src string to dst, encoding unsafe or reserved characters * in %hex form as it goes, and returning a pointer to the result. * The result is always a nul-terminated string even if it had to be * truncated to avoid overflowing the available space. * * This url_encode() function does not operate on complete URLs, it * operates on strings that make up parts of URLs. For example, in a * URL like "ftp://username:password@host/path", the username, password, * host and path should each be encoded separately before they are * joined together with the punctuation characters. * * In most ordinary use, the path portion of a URL does not start with * a slash; the slash is a separator between the host portion and the * path portion, and is dealt with by software outside the url_encode() * function. However, it is valid for url_encode() to be passed a * string that does begin with a slash. For example, the string might * represent a password, or a path part of a URL that the user really * does want to begin with a slash. * * len is the length of the destination buffer. The result will be * truncated if necessary to fit in the destination buffer. * * safe_chars is a string of characters that should not be encoded. If * safe_chars is non-NULL, any characters in safe_chars as well as any * alphanumeric characters will be copied from src to dst without * encoding. Some potentially useful settings for this parameter are: * * NULL Everything is encoded (even alphanumerics) * "" Everything except alphanumerics are encoded * "/" Alphanumerics and '/' remain unencoded * "$-_.+!*'()," Consistent with a strict reading of RFC 1738 * "$-_.+!*'(),/" As above, except '/' is not encoded * "-_.+!,/" As above, except shell special characters are encoded * * encode_leading_slash is a flag that determines whether or not to * encode a leading slash in a string. If this flag is set, and if the * first character in the src string is '/', then the leading slash will * be encoded (as "%2F"), even if '/' is one of the characters in the * safe_chars string. Note that only the first character of the src * string is affected by this flag, and that leading slashes are never * deleted, but either retained unchanged or encoded. * * Unsafe and reserved characters are defined in RFC 1738 section 2.2. * The most important parts are: * * The characters ";", "/", "?", ":", "@", "=" and "&" are the * characters which may be reserved for special meaning within a * scheme. No other characters may be reserved within a scheme. * [...] * * Thus, only alphanumerics, the special characters "$-_.+!*'(),", * and reserved characters used for their reserved purposes may be * used unencoded within a URL. * */ #define RFC1738_SAFE "$-_.+!*'()," #define RFC1738_SAFE_LESS_SHELL "-_.+!," #define RFC1738_SAFE_LESS_SHELL_PLUS_SLASH "-_.+!,/" static char * url_encode(char *dst, const char *src, const char *ep, const char *safe_chars, int encode_leading_slash) { int ch; ep--; for (; dst < ep; src++) { ch = *src & 0xff; if (ch == 0) break; if (safe_chars != NULL && (ch != '/' || !encode_leading_slash) && (isalnum(ch) || strchr(safe_chars, ch))) { *dst++ = ch; } else { /* encode this char */ if (ep - dst < 3) break; snprintf(dst, ep - dst, "%%%02X", ch); dst += 3; } encode_leading_slash = 0; } *dst = '\0'; return dst; } static const char *ignored_if_names[] = { "eon", /* netiso */ "gre", /* net */ "ipip", /* netinet */ "gif", /* netinet6 */ "faith", /* netinet6 */ "lo", /* net */ #if 0 "mdecap", /* netinet -- never in IF list (?) XXX */ #endif "nsip", /* netns */ "ppp", /* net */ #if 0 "sl", /* net */ #endif "strip", /* net */ "tun", /* net */ /* XXX others? */ NULL, }; static void get_ifconfig_info(void) { char *textbuf; char *t, *nt; const char **ignore; int textsize; ulong fl; char *cp; free(net_devices); net_devices = NULL; free(net_up); net_up = NULL; /* Get ifconfig information */ textsize = collect(T_OUTPUT, &textbuf, "/sbin/ifconfig -a 2>/dev/null"); if (textsize < 0) { if (logging) (void)fprintf(logfp, "Aborting: Could not run ifconfig.\n"); (void)fprintf(stderr, "Could not run ifconfig."); exit(1); } for (t = textbuf; t != NULL && *t != 0; t = nt) { /* find entry for next interface */ for (nt = t; (nt = strchr(nt, '\n')); ) { if (*++nt != '\t') break; } if (memcmp(t, "lo0:", 4) == 0) /* completely ignore loopback interface */ continue; cp = strchr(t, '='); if (cp == NULL) break; /* get interface flags */ fl = strtoul(cp + 1, &cp, 16); if (*cp != '<') break; if (fl & IFF_UP) { /* This interface might be connected to the server */ cp = strchr(t, ':'); if (cp == NULL) break; asprintf(&cp, "%s%.*s ", net_up ? net_up : "", (int)(cp - t), t); free(net_up); net_up = cp; } for (ignore = ignored_if_names; *ignore != NULL; ignore++) { size_t len = strlen(*ignore); if (strncmp(t, *ignore, len) == 0 && isdigit((unsigned char)t[len])) break; } if (*ignore != NULL) continue; cp = strchr(t, ':'); if (cp == NULL) break; asprintf(&cp, "%s%.*s ", net_devices ? net_devices : "", (int)(cp - t), t); free(net_devices); net_devices = cp; } free(textbuf); } static int do_ifreq(struct ifmediareq *ifmr, unsigned long cmd) { int sock; int rval; sock = socket(PF_INET, SOCK_DGRAM, 0); if (sock == -1) return -1; memset(ifmr, 0, sizeof *ifmr); strncpy(ifmr->ifm_name, net_dev, sizeof ifmr->ifm_name); rval = ioctl(sock, cmd, ifmr); close(sock); return rval; } /* Fill in defaults network values for the selected interface */ static void get_ifinterface_info(void) { struct ifmediareq ifmr; struct sockaddr_in *sa_in = (void *)&((struct ifreq *)&ifmr)->ifr_addr; int modew; const char *media_opt; const char *sep; if (do_ifreq(&ifmr, SIOCGIFADDR) == 0 && sa_in->sin_addr.s_addr != 0) strlcpy(net_ip, inet_ntoa(sa_in->sin_addr), sizeof net_ip); if (do_ifreq(&ifmr, SIOCGIFNETMASK) == 0 && sa_in->sin_addr.s_addr != 0) strlcpy(net_mask, inet_ntoa(sa_in->sin_addr), sizeof net_mask); if (do_ifreq(&ifmr, SIOCGIFMEDIA) == 0) { /* Get the name of the media word */ modew = ifmr.ifm_current; strlcpy(net_media, get_media_mode_string(modew), sizeof net_media); /* and add any media options */ sep = " mediaopt "; while ((media_opt = get_media_option_string(&modew)) != NULL) { strlcat(net_media, sep, sizeof net_media); strlcat(net_media, media_opt, sizeof net_media); sep = ","; } } } #ifndef INET6 #define get_if6interface_info() #else static void get_if6interface_info(void) { char *textbuf, *t; int textsize; textsize = collect(T_OUTPUT, &textbuf, "/sbin/ifconfig %s inet6 2>/dev/null", net_dev); if (textsize >= 0) { char *p; (void)strtok(textbuf, "\n"); /* ignore first line */ while ((t = strtok(NULL, "\n")) != NULL) { if (strncmp(t, "\tinet6 ", 7) != 0) continue; t += 7; if (strstr(t, "tentative") || strstr(t, "duplicated")) continue; if (strncmp(t, "fe80:", 5) == 0) continue; p = t; while (*p && *p != ' ' && *p != '\n') p++; *p = '\0'; strlcpy(net_ip6, t, sizeof(net_ip6)); break; } } free(textbuf); } #endif static void get_host_info(void) { char hostname[MAXHOSTNAMELEN + 1]; char *dot; /* Check host (and domain?) name */ if (gethostname(hostname, sizeof(hostname)) == 0 && hostname[0] != 0) { hostname[sizeof(hostname) - 1] = 0; /* check for a . */ dot = strchr(hostname, '.'); if (dot == NULL) { /* if not found its just a host, punt on domain */ strlcpy(net_host, hostname, sizeof net_host); } else { /* split hostname into host/domain parts */ *dot++ = 0; strlcpy(net_host, hostname, sizeof net_host); strlcpy(net_domain, dot, sizeof net_domain); } } } /* * recombine name parts split in get_host_info and config_network * (common code moved here from write_etc_hosts) */ static char * recombine_host_domain(void) { static char recombined[MAXHOSTNAMELEN + 1]; int l = strlen(net_host) - strlen(net_domain); strlcpy(recombined, net_host, sizeof(recombined)); if (l <= 0 || net_host[l - 1] != '.' || strcasecmp(net_domain, net_host + l) != 0) { /* net_host isn't an FQDN. */ strlcat(recombined, ".", sizeof(recombined)); strlcat(recombined, net_domain, sizeof(recombined)); } return recombined; } #ifdef INET6 static int is_v6kernel(void) { int s; s = socket(PF_INET6, SOCK_DGRAM, 0); if (s < 0) return 0; close(s); return 1; } /* * initialize as v6 client. * we are sure that we will never become router with boot floppy :-) * (include and use sysctl(8) if you are willing to) */ static void init_v6kernel(int autoconf) { int v; int mib[4] = {CTL_NET, PF_INET6, IPPROTO_IPV6, 0}; mib[3] = IPV6CTL_FORWARDING; v = 0; if (sysctl(mib, 4, NULL, NULL, (void *)&v, sizeof(v)) < 0) ; /* warn("sysctl(net.inet6.ip6.fowarding"); */ mib[3] = IPV6CTL_ACCEPT_RTADV; v = autoconf ? 1 : 0; if (sysctl(mib, 4, NULL, NULL, (void *)&v, sizeof(v)) < 0) ; /* warn("sysctl(net.inet6.ip6.accept_rtadv"); */ } static int get_v6wait(void) { size_t len = sizeof(int); int v; int mib[4] = {CTL_NET, PF_INET6, IPPROTO_IPV6, IPV6CTL_DAD_COUNT}; len = sizeof(v); if (sysctl(mib, 4, (void *)&v, &len, NULL, 0) < 0) { /* warn("sysctl(net.inet6.ip6.dadcount)"); */ return 1; /* guess */ } return v; } #endif /* * Get the information to configure the network, configure it and * make sure both the gateway and the name server are up. */ int config_network(void) { char *tp; char *defname; const char *prompt; char *textbuf; int octet0; int dhcp_config; int slip; int pid, status; char **ap, *slcmd[10], *in_buf; char buffer[STRSIZE]; int l; char dhcp_host[STRSIZE]; #ifdef INET6 int v6config = 1; #endif FILE *f; time_t now; if (network_up) return (1); get_ifconfig_info(); if (net_up != NULL) { /* XXX: some retry loops come here... */ /* active interfaces found */ msg_display(MSG_netup, net_up); process_menu(MENU_yesno, NULL); if (yesno) return 1; } if (net_devices == NULL) { /* No network interfaces found! */ msg_display(MSG_nonet); process_menu(MENU_ok, NULL); return (-1); } network_up = 1; again: tp = strchr(net_devices, ' '); asprintf(&defname, "%.*s", (int)(tp - net_devices), net_devices); for (prompt = MSG_asknetdev;; prompt = MSG_badnet) { msg_prompt(prompt, defname, net_dev, sizeof net_dev - 1, net_devices); l = strlen(net_dev); net_dev[l] = ' '; net_dev[l + 1] = 0; tp = strstr(net_devices, net_dev); if (tp == NULL) continue; if (tp != net_devices && tp[-1] != ' ') continue; net_dev[l] = 0; break; } free(defname); slip = net_dev[0] == 's' && net_dev[1] == 'l' && isdigit((unsigned char)net_dev[2]); if (slip) dhcp_config = 0; else { /* Preload any defaults we can find */ get_ifinterface_info(); get_if6interface_info(); get_host_info(); /* domain and host */ msg_display(MSG_netinfo); /* ethernet medium */ for (;;) { msg_prompt_add(MSG_net_media, net_media, net_media, sizeof net_media); /* * ifconfig does not allow media specifiers on * IFM_MANUAL interfaces. Our UI gives no way * to set an option back * to null-string if it gets accidentally set. * Check for plausible alternatives. */ if (strcmp(net_media, "") == 0 || strcmp(net_media, "default") == 0 || strcmp(net_media, "") == 0 || strcmp(net_media, "manual") == 0 || strcmp(net_media, "") == 0 || strcmp(net_media, "none") == 0 || strcmp(net_media, " ") == 0) { *net_media = '\0'; } if (*net_media == '\0') break; /* * We must set the media type here - to give dhcp * a chance */ if (run_program(0, "/sbin/ifconfig %s media %s", net_dev, net_media) == 0) break; /* Failed to set - output the supported values */ if (collect(T_OUTPUT, &textbuf, "/sbin/ifconfig -m %s |" "while IFS=; read line;" " do [ \"$line\" = \"${line#*media}\" ] || " "echo $line;" " done", net_dev ) > 0) msg_display(textbuf); free(textbuf); } /* try a dhcp configuration */ dhcp_config = config_dhcp(net_dev); if (dhcp_config) { /* Get newly configured data off interface. */ get_ifinterface_info(); get_if6interface_info(); get_host_info(); net_dhcpconf |= DHCPCONF_IPADDR; /* * Extract default route from output of * 'route -n show' */ if (collect(T_OUTPUT, &textbuf, "/sbin/route -n show | " "while read dest gateway flags;" " do [ \"$dest\" = default ] && {" " echo $gateway; break; };" " done" ) > 0) strlcpy(net_defroute, textbuf, sizeof net_defroute); free(textbuf); /* pull nameserver info out of /etc/resolv.conf */ if (collect(T_OUTPUT, &textbuf, "cat /etc/resolv.conf 2>/dev/null |" " while read keyword address rest;" " do [ \"$keyword\" = nameserver " " -a \"${address#*:}\" = " "\"${address}\" ] && {" " echo $address; break; };" " done" ) > 0) strlcpy(net_namesvr, textbuf, sizeof net_namesvr); free(textbuf); if (net_namesvr[0] != '\0') net_dhcpconf |= DHCPCONF_NAMESVR; /* pull domainname out of leases file */ get_dhcp_value(net_domain, sizeof(net_domain), "domain-name"); if (net_domain[0] != '\0') net_dhcpconf |= DHCPCONF_DOMAIN; /* pull hostname out of leases file */ dhcp_host[0] = 0; get_dhcp_value(dhcp_host, sizeof(dhcp_host), "hostname"); if (dhcp_host[0] != '\0') { net_dhcpconf |= DHCPCONF_HOST; strlcpy(net_host, dhcp_host, sizeof net_host); } } } msg_prompt_add(MSG_net_domain, net_domain, net_domain, sizeof net_domain); msg_prompt_add(MSG_net_host, net_host, net_host, sizeof net_host); if (!dhcp_config) { /* Manually configure IPv4 */ msg_prompt_add(MSG_net_ip, net_ip, net_ip, sizeof net_ip); if (slip) msg_prompt_add(MSG_net_srv_ip, net_srv_ip, net_srv_ip, sizeof net_srv_ip); else { /* We don't want netmasks for SLIP */ octet0 = atoi(net_ip); if (!net_mask[0]) { if (0 <= octet0 && octet0 <= 127) strlcpy(net_mask, "0xff000000", sizeof(net_mask)); else if (128 <= octet0 && octet0 <= 191) strlcpy(net_mask, "0xffff0000", sizeof(net_mask)); else if (192 <= octet0 && octet0 <= 223) strlcpy(net_mask, "0xffffff00", sizeof(net_mask)); } msg_prompt_add(MSG_net_mask, net_mask, net_mask, sizeof net_mask); } msg_prompt_add(MSG_net_defroute, net_defroute, net_defroute, sizeof net_defroute); } if (!dhcp_config || net_namesvr[0] == 0) msg_prompt_add(MSG_net_namesrv, net_namesvr, net_namesvr, sizeof net_namesvr); #ifdef INET6 /* IPv6 autoconfiguration */ if (!is_v6kernel()) v6config = 0; else if (v6config) { process_menu(MENU_noyes, deconst(MSG_Perform_IPv6_autoconfiguration)); v6config = yesno ? 1 : 0; net_ip6conf |= yesno ? IP6CONF_AUTOHOST : 0; } if (v6config) { process_menu(MENU_namesrv6, NULL); if (!yesno) msg_prompt_add(MSG_net_namesrv6, net_namesvr6, net_namesvr6, sizeof net_namesvr6); } #endif /* confirm the setting */ if (slip) msg_display(MSG_netok_slip, net_domain, net_host, net_dev, *net_ip == '\0' ? "" : net_ip, *net_srv_ip == '\0' ? "" : net_srv_ip, *net_mask == '\0' ? "" : net_mask, *net_namesvr == '\0' ? "" : net_namesvr, *net_defroute == '\0' ? "" : net_defroute, *net_media == '\0' ? "" : net_media); else msg_display(MSG_netok, net_domain, net_host, net_dev, *net_ip == '\0' ? "" : net_ip, *net_mask == '\0' ? "" : net_mask, *net_namesvr == '\0' ? "" : net_namesvr, *net_defroute == '\0' ? "" : net_defroute, *net_media == '\0' ? "" : net_media); #ifdef INET6 msg_display_add(MSG_netokv6, !is_v6kernel() ? "" : (v6config ? "yes" : "no"), *net_namesvr6 == '\0' ? "" : net_namesvr6); #endif process_menu(MENU_yesno, deconst(MSG_netok_ok)); if (!yesno) msg_display(MSG_netagain); if (!yesno) goto again; /* * we may want to perform checks against inconsistent configuration, * like IPv4 DNS server without IPv4 configuration. */ /* Create /etc/resolv.conf if a nameserver was given */ if (net_namesvr[0] != '\0' #ifdef INET6 || net_namesvr6[0] != '\0' #endif ) { f = fopen("/etc/resolv.conf", "w"); if (f == NULL) { if (logging) (void)fprintf(logfp, "%s", msg_string(MSG_resolv)); (void)fprintf(stderr, "%s", msg_string(MSG_resolv)); exit(1); } scripting_fprintf(NULL, "cat </etc/resolv.conf\n"); time(&now); /* NB: ctime() returns a string ending in '\n' */ scripting_fprintf(f, ";\n; BIND data file\n; %s %s;\n", "Created by NetBSD sysinst on", ctime(&now)); if (net_domain[0] != '\0') scripting_fprintf(f, "search %s\n", net_domain); if (net_namesvr[0] != '\0') scripting_fprintf(f, "nameserver %s\n", net_namesvr); #ifdef INET6 if (net_namesvr6[0] != '\0') scripting_fprintf(f, "nameserver %s\n", net_namesvr6); #endif scripting_fprintf(NULL, "EOF\n"); fflush(NULL); fclose(f); } run_program(0, "/sbin/ifconfig lo0 127.0.0.1"); #ifdef INET6 if (v6config) { init_v6kernel(1); run_program(0, "/sbin/ifconfig %s up", net_dev); sleep(get_v6wait() + 1); run_program(RUN_DISPLAY, "/sbin/rtsol -D %s", net_dev); sleep(get_v6wait() + 1); } #endif if (net_ip[0] != '\0') { if (slip) { /* XXX: needs 'ifconfig sl0 create' much earlier */ /* Set SLIP interface UP */ run_program(0, "/sbin/ifconfig %s inet %s %s up", net_dev, net_ip, net_srv_ip); strcpy(sl_flags, "-s 115200 -l /dev/tty00"); msg_prompt_win(MSG_slattach, -1, 12, 70, 0, sl_flags, sl_flags, 255); /* XXX: wtf isn't run_program() used here? */ pid = fork(); if (pid == 0) { strcpy(buffer, "/sbin/slattach "); strcat(buffer, sl_flags); in_buf = buffer; for (ap = slcmd; (*ap = strsep(&in_buf, " ")) != NULL;) if (**ap != '\0') ++ap; execvp(slcmd[0], slcmd); } else wait4(pid, &status, WNOHANG, 0); } else { if (net_mask[0] != '\0') { run_program(0, "/sbin/ifconfig %s inet %s netmask %s", net_dev, net_ip, net_mask); } else { run_program(0, "/sbin/ifconfig %s inet %s", net_dev, net_ip); } } } /* Set host name */ if (net_host[0] != '\0') sethostname(net_host, strlen(net_host)); /* Set a default route if one was given */ if (net_defroute[0] != '\0') { run_program(RUN_DISPLAY | RUN_PROGRESS, "/sbin/route -n flush -inet"); run_program(RUN_DISPLAY | RUN_PROGRESS, "/sbin/route -n add default %s", net_defroute); } /* * wait a couple of seconds for the interface to go live. */ msg_display_add(MSG_wait_network); sleep(5); /* * ping should be verbose, so users can see the cause * of a network failure. */ #ifdef INET6 if (v6config && network_up) { network_up = !run_program(RUN_DISPLAY | RUN_PROGRESS, "/sbin/ping6 -v -c 3 -n -I %s ff02::2", net_dev); if (net_namesvr6[0] != '\0') network_up = !run_program(RUN_DISPLAY | RUN_PROGRESS, "/sbin/ping6 -v -c 3 -n %s", net_namesvr6); } #endif if (net_namesvr[0] != '\0' && network_up) network_up = !run_program(RUN_DISPLAY | RUN_PROGRESS, "/sbin/ping -v -c 5 -w 5 -o -n %s", net_namesvr); if (net_defroute[0] != '\0' && network_up) network_up = !run_program(RUN_DISPLAY | RUN_PROGRESS, "/sbin/ping -v -c 5 -w 5 -o -n %s", net_defroute); fflush(NULL); return network_up; } static int ftp_fetch(const char *set_name) { const char *ftp_opt; char ftp_user_encoded[STRSIZE]; char ftp_dir_encoded[STRSIZE]; char *cp; int rval; /* * Invoke ftp to fetch the file. * * ftp.pass is quite likely to contain unsafe characters * that need to be encoded in the URL (for example, * "@", ":" and "/" need quoting). Let's be * paranoid and also encode ftp.user and ftp.dir. (For * example, ftp.dir could easily contain '~', which is * unsafe by a strict reading of RFC 1738). */ if (strcmp("ftp", ftp.user) == 0 && ftp.pass[0] == 0) { /* do anon ftp */ ftp_opt = "-a "; ftp_user_encoded[0] = 0; } else { ftp_opt = ""; cp = url_encode(ftp_user_encoded, ftp.user, ftp_user_encoded + sizeof ftp_user_encoded - 1, RFC1738_SAFE_LESS_SHELL, 0); *cp++ = ':'; cp = url_encode(cp, ftp.pass, ftp_user_encoded + sizeof ftp_user_encoded - 1, NULL, 0); *cp++ = '@'; *cp = 0; } cp = url_encode(ftp_dir_encoded, ftp.dir, ftp_dir_encoded + sizeof ftp_dir_encoded - 1, RFC1738_SAFE_LESS_SHELL_PLUS_SLASH, 1); if (set_dir[0] != '/') *cp++ = '/'; url_encode(cp, set_dir, ftp_dir_encoded + sizeof ftp_dir_encoded, RFC1738_SAFE_LESS_SHELL_PLUS_SLASH, 0); rval = run_program(RUN_DISPLAY | RUN_PROGRESS | RUN_XFER_DIR, "/usr/bin/ftp %s%s://%s%s/%s/%s%s", ftp_opt, ftp.xfer_type, ftp_user_encoded, ftp.host, ftp_dir_encoded, set_name, dist_postfix); return rval ? SET_RETRY : SET_OK; } static int do_config_network(void) { int ret; while ((ret = config_network()) <= 0) { if (ret < 0) return (-1); msg_display(MSG_netnotup); process_menu(MENU_yesno, NULL); if (!yesno) { msg_display(MSG_netnotup_continueanyway); process_menu(MENU_yesno, NULL); if (!yesno) return -1; network_up = 1; break; } } return 0; } int get_via_ftp(const char *xfer_type) { if (do_config_network() != 0) return SET_RETRY; process_menu(MENU_ftpsource, deconst(xfer_type)); /* We'll fetch each file just before installing it */ fetch_fn = ftp_fetch; ftp.xfer_type = xfer_type; snprintf(ext_dir, sizeof ext_dir, "%s/%s", target_prefix(), xfer_dir + (*xfer_dir == '/')); return SET_OK; } int get_via_nfs(void) { if (do_config_network() != 0) return SET_RETRY; /* Get server and filepath */ process_menu(MENU_nfssource, NULL); /* Mount it */ if (run_program(0, "/sbin/mount -r -o -2,-i,-r=1024 -t nfs %s:%s /mnt2", nfs_host, nfs_dir)) return SET_RETRY; mnt2_mounted = 1; snprintf(ext_dir, sizeof ext_dir, "/mnt2/%s", set_dir); /* return location, don't clean... */ return SET_OK; } /* * write the new contents of /etc/hosts to the specified file */ static void write_etc_hosts(FILE *f) { scripting_fprintf(f, "#\n"); scripting_fprintf(f, "# Added by NetBSD sysinst\n"); scripting_fprintf(f, "#\n"); if (net_domain[0] != '\0') scripting_fprintf(f, "127.0.0.1 localhost.%s\n", net_domain); scripting_fprintf(f, "%s\t", net_ip); if (net_domain[0] != '\0') scripting_fprintf(f, "%s ", recombine_host_domain()); scripting_fprintf(f, "%s\n", net_host); } /* * Write the network config info the user entered via menus into the * config files in the target disk. Be careful not to lose any * information we don't immediately add back, in case the install * target is the currently-active root. */ void mnt_net_config(void) { char ifconfig_fn[STRSIZE]; FILE *ifconf = NULL; if (!network_up) return; process_menu(MENU_yesno, deconst(MSG_mntnetconfig)); if (!yesno) return; /* Write hostname to /etc/rc.conf */ if ((net_dhcpconf & DHCPCONF_HOST) == 0) add_rc_conf("hostname=%s\n", recombine_host_domain()); /* If not running in target, copy resolv.conf there. */ if ((net_dhcpconf & DHCPCONF_NAMESVR) == 0) { #ifndef INET6 if (net_namesvr[0] != '\0') dup_file_into_target("/etc/resolv.conf"); #else /* * not sure if it is a good idea, to allow dhcp config to * override IPv6 configuration */ if (net_namesvr[0] != '\0' || net_namesvr6[0] != '\0') dup_file_into_target("/etc/resolv.conf"); #endif } /* * bring the interface up, it will be necessary for IPv6, and * it won't make trouble with IPv4 case either */ snprintf(ifconfig_fn, sizeof ifconfig_fn, "/etc/ifconfig.%s", net_dev); ifconf = target_fopen(ifconfig_fn, "w"); if (ifconf != NULL) { scripting_fprintf(NULL, "cat <>%s%s\n", target_prefix(), ifconfig_fn); scripting_fprintf(ifconf, "up\n"); scripting_fprintf(NULL, "EOF\n"); } if ((net_dhcpconf & DHCPCONF_IPADDR) == 0) { FILE *hosts; /* Write IPaddr and netmask to /etc/ifconfig.if[0-9] */ if (ifconf != NULL) { scripting_fprintf(NULL, "cat <>%s%s\n", target_prefix(), ifconfig_fn); if (*net_media != '\0') scripting_fprintf(ifconf, "%s netmask %s media %s\n", net_ip, net_mask, net_media); else scripting_fprintf(ifconf, "%s netmask %s\n", net_ip, net_mask); scripting_fprintf(NULL, "EOF\n"); } /* * Add IPaddr/hostname to /etc/hosts. * Be careful not to clobber any existing contents. * Relies on ordered search of /etc/hosts. XXX YP? */ hosts = target_fopen("/etc/hosts", "a"); if (hosts != 0) { scripting_fprintf(NULL, "cat <>%s/etc/hosts\n", target_prefix()); write_etc_hosts(hosts); (void)fclose(hosts); scripting_fprintf(NULL, "EOF\n"); fclose(hosts); } add_rc_conf("defaultroute=\"%s\"\n", net_defroute); } else { add_rc_conf("dhclient=YES\n"); add_rc_conf("dhclient_flags=\"%s\"\n", net_dev); } #ifdef INET6 if ((net_ip6conf & IP6CONF_AUTOHOST) != 0) { add_rc_conf("ip6mode=autohost\n"); if (ifconf != NULL) { scripting_fprintf(NULL, "cat <>%s%s\n", target_prefix(), ifconfig_fn); scripting_fprintf(ifconf, "!rtsol $int\n"); scripting_fprintf(NULL, "EOF\n"); } } #endif if (ifconf) fclose(ifconf); fflush(NULL); } int config_dhcp(char *inter) { int dhcpautoconf; int result; char *textbuf; int pid; /* check if dhclient is running, if so, kill it */ result = collect(T_FILE, &textbuf, "/tmp/dhclient.pid"); if (result >= 0) { pid = atoi(textbuf); if (pid > 0) { kill(pid, 15); sleep(1); kill(pid, 9); } } free(textbuf); if (!file_mode_match(DHCLIENT_EX, S_IFREG)) return 0; process_menu(MENU_yesno, deconst(MSG_Perform_DHCP_autoconfiguration)); if (yesno) { /* spawn off dhclient and wait for parent to exit */ dhcpautoconf = run_program(RUN_DISPLAY | RUN_PROGRESS, "%s -q -pf /tmp/dhclnt.pid -lf /tmp/dhclient.leases %s", DHCLIENT_EX, inter); return dhcpautoconf ? 0 : 1; } return 0; } static void get_dhcp_value(char *targ, size_t l, const char *line) { int textsize; char *textbuf; char *t; char *walkp; textsize = collect(T_FILE, &textbuf, "/tmp/dhclient.leases"); if (textsize < 0) { if (logging) (void)fprintf(logfp, "Could not open file /tmp/dhclient.leases.\n"); (void)fprintf(stderr, "Could not open /tmp/dhclient.leases\n"); /* not fatal, just assume value not found */ } if (textsize >= 0) { (void)strtok(textbuf, " \t\n"); /* jump past 'lease' */ while ((t = strtok(NULL, " \t\n")) != NULL) { if (strcmp(t, line) == 0) { t = strtok(NULL, " \t\n"); /* found the tag, extract the value */ /* last char should be a ';' */ walkp = strrchr(t, ';'); if (walkp != NULL) { *walkp = '\0'; } /* strip any " from the string */ walkp = strrchr(t, '"'); if (walkp != NULL) { *walkp = '\0'; t++; } strlcpy(targ, t, l); break; } } } free(textbuf); return; }