1 /* $NetBSD: net.c,v 1.17 2014/10/14 16:35:20 christos Exp $ */ 2 3 /* 4 * Copyright 1997 Piermont Information Systems Inc. 5 * All rights reserved. 6 * 7 * Written by Philip A. Nelson for Piermont Information Systems Inc. 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 * 2. Redistributions in binary form must reproduce the above copyright 15 * notice, this list of conditions and the following disclaimer in the 16 * documentation and/or other materials provided with the distribution. 17 * 3. The name of Piermont Information Systems Inc. may not be used to endorse 18 * or promote products derived from this software without specific prior 19 * written permission. 20 * 21 * THIS SOFTWARE IS PROVIDED BY PIERMONT INFORMATION SYSTEMS INC. ``AS IS'' 22 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 24 * ARE DISCLAIMED. IN NO EVENT SHALL PIERMONT INFORMATION SYSTEMS INC. BE 25 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 26 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 27 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 28 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 29 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 30 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF 31 * THE POSSIBILITY OF SUCH DAMAGE. 32 * 33 */ 34 35 /* net.c -- routines to fetch files off the network. */ 36 37 #include <sys/ioctl.h> 38 #include <sys/param.h> 39 #include <sys/resource.h> 40 #include <sys/socket.h> 41 #include <sys/stat.h> 42 #include <sys/statvfs.h> 43 #include <sys/statvfs.h> 44 #include <sys/sysctl.h> 45 #include <sys/wait.h> 46 #include <arpa/inet.h> 47 #include <net/if.h> 48 #include <net/if_media.h> 49 #include <netinet/in.h> 50 51 #include <err.h> 52 #include <stdio.h> 53 #include <stdlib.h> 54 #include <string.h> 55 #include <curses.h> 56 #include <time.h> 57 #include <unistd.h> 58 59 #include "defs.h" 60 #include "md.h" 61 #include "msg_defs.h" 62 #include "menu_defs.h" 63 #include "txtwalk.h" 64 65 int network_up = 0; 66 /* Access to network information */ 67 #define MAX_NETS 15 68 struct net_desc { 69 char if_dev[STRSIZE]; 70 char name[STRSIZE]; // TODO 71 }; 72 73 static char net_dev[STRSIZE]; 74 static char net_domain[STRSIZE]; 75 static char net_host[STRSIZE]; 76 static char net_ip[SSTRSIZE]; 77 static char net_srv_ip[SSTRSIZE]; 78 static char net_mask[SSTRSIZE]; 79 char net_namesvr[STRSIZE]; 80 static char net_defroute[STRSIZE]; 81 static char net_media[STRSIZE]; 82 static char sl_flags[STRSIZE]; 83 static int net_dhcpconf; 84 #define DHCPCONF_IPADDR 0x01 85 #define DHCPCONF_NAMESVR 0x02 86 #define DHCPCONF_HOST 0x04 87 #define DHCPCONF_DOMAIN 0x08 88 #ifdef INET6 89 static char net_ip6[STRSIZE]; 90 #define IP6CONF_AUTOHOST 0x01 91 #endif 92 93 94 /* URL encode unsafe characters. */ 95 96 static char *url_encode (char *dst, const char *src, const char *ep, 97 const char *safe_chars, 98 int encode_leading_slash); 99 100 static void write_etc_hosts(FILE *f); 101 102 #define DHCPCD "/sbin/dhcpcd" 103 #include <signal.h> 104 static int config_dhcp(char *); 105 106 #ifdef INET6 107 static int is_v6kernel (void); 108 #endif 109 110 /* 111 * URL encode unsafe characters. See RFC 1738. 112 * 113 * Copies src string to dst, encoding unsafe or reserved characters 114 * in %hex form as it goes, and returning a pointer to the result. 115 * The result is always a nul-terminated string even if it had to be 116 * truncated to avoid overflowing the available space. 117 * 118 * This url_encode() function does not operate on complete URLs, it 119 * operates on strings that make up parts of URLs. For example, in a 120 * URL like "ftp://username:password@host/path", the username, password, 121 * host and path should each be encoded separately before they are 122 * joined together with the punctuation characters. 123 * 124 * In most ordinary use, the path portion of a URL does not start with 125 * a slash; the slash is a separator between the host portion and the 126 * path portion, and is dealt with by software outside the url_encode() 127 * function. However, it is valid for url_encode() to be passed a 128 * string that does begin with a slash. For example, the string might 129 * represent a password, or a path part of a URL that the user really 130 * does want to begin with a slash. 131 * 132 * len is the length of the destination buffer. The result will be 133 * truncated if necessary to fit in the destination buffer. 134 * 135 * safe_chars is a string of characters that should not be encoded. If 136 * safe_chars is non-NULL, any characters in safe_chars as well as any 137 * alphanumeric characters will be copied from src to dst without 138 * encoding. Some potentially useful settings for this parameter are: 139 * 140 * NULL Everything is encoded (even alphanumerics) 141 * "" Everything except alphanumerics are encoded 142 * "/" Alphanumerics and '/' remain unencoded 143 * "$-_.+!*'()," Consistent with a strict reading of RFC 1738 144 * "$-_.+!*'(),/" As above, except '/' is not encoded 145 * "-_.+!,/" As above, except shell special characters are encoded 146 * 147 * encode_leading_slash is a flag that determines whether or not to 148 * encode a leading slash in a string. If this flag is set, and if the 149 * first character in the src string is '/', then the leading slash will 150 * be encoded (as "%2F"), even if '/' is one of the characters in the 151 * safe_chars string. Note that only the first character of the src 152 * string is affected by this flag, and that leading slashes are never 153 * deleted, but either retained unchanged or encoded. 154 * 155 * Unsafe and reserved characters are defined in RFC 1738 section 2.2. 156 * The most important parts are: 157 * 158 * The characters ";", "/", "?", ":", "@", "=" and "&" are the 159 * characters which may be reserved for special meaning within a 160 * scheme. No other characters may be reserved within a scheme. 161 * [...] 162 * 163 * Thus, only alphanumerics, the special characters "$-_.+!*'(),", 164 * and reserved characters used for their reserved purposes may be 165 * used unencoded within a URL. 166 * 167 */ 168 169 #define RFC1738_SAFE "$-_.+!*'()," 170 #define RFC1738_SAFE_LESS_SHELL "-_.+!," 171 #define RFC1738_SAFE_LESS_SHELL_PLUS_SLASH "-_.+!,/" 172 173 static char * 174 url_encode(char *dst, const char *src, const char *ep, 175 const char *safe_chars, int encode_leading_slash) 176 { 177 int ch; 178 179 ep--; 180 181 for (; dst < ep; src++) { 182 ch = *src & 0xff; 183 if (ch == 0) 184 break; 185 if (safe_chars != NULL && 186 (ch != '/' || !encode_leading_slash) && 187 (isalnum(ch) || strchr(safe_chars, ch))) { 188 *dst++ = ch; 189 } else { 190 /* encode this char */ 191 if (ep - dst < 3) 192 break; 193 snprintf(dst, ep - dst, "%%%02X", ch); 194 dst += 3; 195 } 196 encode_leading_slash = 0; 197 } 198 *dst = '\0'; 199 return dst; 200 } 201 202 static const char *ignored_if_names[] = { 203 "eon", /* netiso */ 204 "gre", /* net */ 205 "ipip", /* netinet */ 206 "gif", /* netinet6 */ 207 "faith", /* netinet6 */ 208 "lo", /* net */ 209 "lo0", /* net */ 210 #if 0 211 "mdecap", /* netinet -- never in IF list (?) XXX */ 212 #endif 213 "nsip", /* netns */ 214 "ppp", /* net */ 215 #if 0 216 "sl", /* net */ 217 #endif 218 "strip", /* net */ 219 "tun", /* net */ 220 /* XXX others? */ 221 NULL, 222 }; 223 224 static int 225 get_ifconfig_info(struct net_desc *devs) 226 { 227 char *buf_in; 228 char *buf_tmp; 229 const char **ignore; 230 char *buf; 231 char *tmp; 232 int textsize; 233 int i; 234 235 /* Get ifconfig information */ 236 textsize = collect(T_OUTPUT, &buf_in, "/sbin/ifconfig -l 2>/dev/null"); 237 if (textsize < 0) { 238 if (logfp) 239 (void)fprintf(logfp, 240 "Aborting: Could not run ifconfig.\n"); 241 (void)fprintf(stderr, "Could not run ifconfig."); 242 exit(1); 243 } 244 245 buf = malloc (STRSIZE * sizeof(char)); 246 for (i = 0, buf_tmp = buf_in; strlen(buf_tmp) > 0 && buf_tmp < buf_in + 247 strlen(buf_in);) { 248 tmp = stpncpy(buf, buf_tmp, strcspn(buf_tmp," \n")); 249 *tmp='\0'; 250 buf_tmp += (strcspn(buf_tmp, " \n") + 1) * sizeof(char); 251 252 /* Skip ignored interfaces */ 253 for (ignore = ignored_if_names; *ignore != NULL; ignore++) { 254 size_t len = strlen(*ignore); 255 if (strncmp(buf, *ignore, len) == 0 && 256 isdigit((unsigned char)buf[len])) 257 break; 258 } 259 if (*ignore != NULL) 260 continue; 261 262 strlcpy (devs[i].if_dev, buf, STRSIZE); 263 i++; 264 } 265 strcpy(devs[i].if_dev, "\0"); 266 267 free(buf); 268 free(buf_in); 269 return i; 270 } 271 272 static int 273 do_ifreq(struct ifreq *ifr, unsigned long cmd) 274 { 275 int sock; 276 int rval; 277 278 sock = socket(PF_INET, SOCK_DGRAM, 0); 279 if (sock == -1) 280 return -1; 281 282 memset(ifr, 0, sizeof *ifr); 283 strncpy(ifr->ifr_name, net_dev, sizeof ifr->ifr_name); 284 rval = ioctl(sock, cmd, ifr); 285 close(sock); 286 287 return rval; 288 } 289 290 static int 291 do_ifmreq(struct ifmediareq *ifmr, unsigned long cmd) 292 { 293 int sock; 294 int rval; 295 296 sock = socket(PF_INET, SOCK_DGRAM, 0); 297 if (sock == -1) 298 return -1; 299 300 memset(ifmr, 0, sizeof *ifmr); 301 strncpy(ifmr->ifm_name, net_dev, sizeof ifmr->ifm_name); 302 rval = ioctl(sock, cmd, ifmr); 303 close(sock); 304 305 return rval; 306 } 307 308 /* Fill in defaults network values for the selected interface */ 309 static void 310 get_ifinterface_info(void) 311 { 312 struct ifreq ifr; 313 struct ifmediareq ifmr; 314 struct sockaddr_in *sa_in = (void*)&ifr.ifr_addr; 315 int modew; 316 const char *media_opt; 317 const char *sep; 318 319 if (do_ifreq(&ifr, SIOCGIFADDR) == 0 && sa_in->sin_addr.s_addr != 0) 320 strlcpy(net_ip, inet_ntoa(sa_in->sin_addr), sizeof net_ip); 321 322 if (do_ifreq(&ifr, SIOCGIFNETMASK) == 0 && sa_in->sin_addr.s_addr != 0) 323 strlcpy(net_mask, inet_ntoa(sa_in->sin_addr), sizeof net_mask); 324 325 if (do_ifmreq(&ifmr, SIOCGIFMEDIA) == 0) { 326 /* Get the name of the media word */ 327 modew = ifmr.ifm_current; 328 strlcpy(net_media, get_media_subtype_string(modew), 329 sizeof net_media); 330 /* and add any media options */ 331 sep = " mediaopt "; 332 while ((media_opt = get_media_option_string(&modew)) != NULL) { 333 strlcat(net_media, sep, sizeof net_media); 334 strlcat(net_media, media_opt, sizeof net_media); 335 sep = ","; 336 } 337 } 338 } 339 340 #ifndef INET6 341 #define get_if6interface_info() 342 #else 343 static void 344 get_if6interface_info(void) 345 { 346 char *textbuf, *t; 347 int textsize; 348 349 textsize = collect(T_OUTPUT, &textbuf, 350 "/sbin/ifconfig %s inet6 2>/dev/null", net_dev); 351 if (textsize >= 0) { 352 char *p; 353 354 (void)strtok(textbuf, "\n"); /* ignore first line */ 355 while ((t = strtok(NULL, "\n")) != NULL) { 356 if (strncmp(t, "\tinet6 ", 7) != 0) 357 continue; 358 t += 7; 359 if (strstr(t, "tentative") || strstr(t, "duplicated")) 360 continue; 361 if (strncmp(t, "fe80:", 5) == 0) 362 continue; 363 364 p = t; 365 while (*p && *p != ' ' && *p != '\n') 366 p++; 367 *p = '\0'; 368 strlcpy(net_ip6, t, sizeof(net_ip6)); 369 break; 370 } 371 } 372 free(textbuf); 373 } 374 #endif 375 376 static void 377 get_host_info(void) 378 { 379 char hostname[MAXHOSTNAMELEN + 1]; 380 char *dot; 381 382 /* Check host (and domain?) name */ 383 if (gethostname(hostname, sizeof(hostname)) == 0 && hostname[0] != 0) { 384 hostname[sizeof(hostname) - 1] = 0; 385 /* check for a . */ 386 dot = strchr(hostname, '.'); 387 if (dot == NULL) { 388 /* if not found its just a host, punt on domain */ 389 strlcpy(net_host, hostname, sizeof net_host); 390 } else { 391 /* split hostname into host/domain parts */ 392 *dot++ = 0; 393 strlcpy(net_host, hostname, sizeof net_host); 394 strlcpy(net_domain, dot, sizeof net_domain); 395 } 396 } 397 } 398 399 /* 400 * recombine name parts split in get_host_info and config_network 401 * (common code moved here from write_etc_hosts) 402 */ 403 static char * 404 recombine_host_domain(void) 405 { 406 static char recombined[MAXHOSTNAMELEN + 1]; 407 int l = strlen(net_host) - strlen(net_domain); 408 409 strlcpy(recombined, net_host, sizeof(recombined)); 410 411 if (strlen(net_domain) != 0 && (l <= 0 || 412 net_host[l - 1] != '.' || 413 strcasecmp(net_domain, net_host + l) != 0)) { 414 /* net_host isn't an FQDN. */ 415 strlcat(recombined, ".", sizeof(recombined)); 416 strlcat(recombined, net_domain, sizeof(recombined)); 417 } 418 return recombined; 419 } 420 421 #ifdef INET6 422 static int 423 is_v6kernel(void) 424 { 425 int s; 426 427 s = socket(PF_INET6, SOCK_DGRAM, 0); 428 if (s < 0) 429 return 0; 430 close(s); 431 return 1; 432 } 433 #endif 434 435 static int 436 handle_license(const char *dev) 437 { 438 static struct { 439 const char *dev; 440 const char *lic; 441 } licdev[] = { 442 { "iwi", "/libdata/firmware/if_iwi/LICENSE.ipw2200-fw" }, 443 { "ipw", "/libdata/firmware/if_ipw/LICENSE" }, 444 }; 445 446 size_t i; 447 448 for (i = 0; i < __arraycount(licdev); i++) 449 if (strncmp(dev, licdev[i].dev, 3) == 0) { 450 char buf[64]; 451 int val; 452 size_t len = sizeof(int); 453 (void)snprintf(buf, sizeof(buf), "hw.%s.accept_eula", 454 licdev[i].dev); 455 if (sysctlbyname(buf, &val, &len, NULL, 0) != -1 456 && val != 0) 457 return 1; 458 msg_display(MSG_license, dev, licdev[i].lic); 459 process_menu(MENU_yesno, NULL); 460 if (yesno) { 461 val = 1; 462 if (sysctlbyname(buf, NULL, NULL, &val, 463 0) == -1) 464 return 0; 465 add_sysctl_conf("%s=1", buf); 466 return 1; 467 } else 468 return 0; 469 } 470 return 1; 471 } 472 473 /* 474 * Get the information to configure the network, configure it and 475 * make sure both the gateway and the name server are up. 476 */ 477 int 478 config_network(void) 479 { 480 char *textbuf; 481 int octet0; 482 int dhcp_config; 483 int nfs_root = 0; 484 int slip = 0; 485 int pid, status; 486 char **ap, *slcmd[10], *in_buf; 487 char buffer[STRSIZE]; 488 struct statvfs sb; 489 struct net_desc net_devs[MAX_NETS]; 490 menu_ent net_menu[5]; 491 int menu_no; 492 int num_devs; 493 int selected_net; 494 495 int i; 496 #ifdef INET6 497 int v6config = 1; 498 #endif 499 500 FILE *f; 501 time_t now; 502 503 if (network_up) 504 return (1); 505 506 num_devs = get_ifconfig_info(net_devs); 507 508 if (num_devs < 1) { 509 /* No network interfaces found! */ 510 msg_display(MSG_nonet); 511 process_menu(MENU_ok, NULL); 512 return (-1); 513 } 514 515 for (i = 0; i < num_devs; i++) { 516 net_menu[i].opt_name = net_devs[i].if_dev; 517 net_menu[i].opt_menu = OPT_NOMENU; 518 net_menu[i].opt_flags = OPT_EXIT; 519 net_menu[i].opt_action = set_menu_select; 520 } 521 again: 522 selected_net = -1; 523 menu_no = new_menu(MSG_netdevs, 524 net_menu, num_devs, -1, 4, 0, 0, 525 MC_SCROLL, 526 NULL, NULL, NULL, NULL, NULL); 527 msg_display(MSG_asknetdev, ""); 528 process_menu(menu_no, &selected_net); 529 free_menu(menu_no); 530 531 if (selected_net == -1) 532 return 0; 533 534 network_up = 1; 535 dhcp_config = 0; 536 537 strncpy(net_dev, net_devs[selected_net].if_dev, STRSIZE); 538 539 if (!handle_license(net_dev)) 540 goto done; 541 542 slip = net_dev[0] == 's' && net_dev[1] == 'l' && 543 isdigit((unsigned char)net_dev[2]); 544 545 /* If root is on NFS do not reconfigure the interface. */ 546 if (statvfs("/", &sb) == 0 && strcmp(sb.f_fstypename, "nfs") == 0) { 547 nfs_root = 1; 548 get_ifinterface_info(); 549 get_if6interface_info(); 550 get_host_info(); 551 } else if (!slip) { 552 /* Preload any defaults we can find */ 553 get_ifinterface_info(); 554 get_if6interface_info(); 555 get_host_info(); 556 557 /* domain and host */ 558 msg_display(MSG_netinfo); 559 560 /* ethernet medium */ 561 for (;;) { 562 msg_prompt_add(MSG_net_media, net_media, net_media, 563 sizeof net_media); 564 565 /* 566 * ifconfig does not allow media specifiers on 567 * IFM_MANUAL interfaces. Our UI gives no way 568 * to set an option back 569 * to null-string if it gets accidentally set. 570 * Check for plausible alternatives. 571 */ 572 if (strcmp(net_media, "<default>") == 0 || 573 strcmp(net_media, "default") == 0 || 574 strcmp(net_media, "<manual>") == 0 || 575 strcmp(net_media, "manual") == 0 || 576 strcmp(net_media, "<none>") == 0 || 577 strcmp(net_media, "none") == 0 || 578 strcmp(net_media, " ") == 0) { 579 *net_media = '\0'; 580 } 581 582 if (*net_media == '\0') 583 break; 584 /* 585 * We must set the media type here - to give dhcp 586 * a chance 587 */ 588 if (run_program(0, "/sbin/ifconfig %s media %s", 589 net_dev, net_media) == 0) 590 break; 591 /* Failed to set - output the supported values */ 592 if (collect(T_OUTPUT, &textbuf, "/sbin/ifconfig -m %s |" 593 "while IFS=; read line;" 594 " do [ \"$line\" = \"${line#*media}\" ] || " 595 "echo $line;" 596 " done", net_dev ) > 0) 597 msg_display(textbuf); 598 free(textbuf); 599 } 600 601 net_dhcpconf = 0; 602 /* try a dhcp configuration */ 603 dhcp_config = config_dhcp(net_dev); 604 if (dhcp_config) { 605 char *nline; 606 607 /* Get newly configured data off interface. */ 608 get_ifinterface_info(); 609 get_if6interface_info(); 610 get_host_info(); 611 612 net_dhcpconf |= DHCPCONF_IPADDR; 613 614 /* 615 * Extract default route from output of 616 * 'route -n show' 617 */ 618 if (collect(T_OUTPUT, &textbuf, 619 "/sbin/route -n show | " 620 "while read dest gateway flags;" 621 " do [ \"$dest\" = default ] && {" 622 " echo \"$gateway\"; break; };" 623 " done" ) > 0) 624 strlcpy(net_defroute, textbuf, 625 sizeof net_defroute); 626 free(textbuf); 627 if ((nline = strchr(net_defroute, '\n'))) 628 *nline = '\0'; 629 630 /* pull nameserver info out of /etc/resolv.conf */ 631 if (collect(T_OUTPUT, &textbuf, 632 "cat /etc/resolv.conf 2>/dev/null |" 633 " while read keyword address rest;" 634 " do [ \"$keyword\" = nameserver ] &&" 635 " { echo \"$address\"; break; };" 636 " done" ) > 0) 637 strlcpy(net_namesvr, textbuf, 638 sizeof net_namesvr); 639 free(textbuf); 640 if ((nline = strchr(net_namesvr, '\n'))) 641 *nline = '\0'; 642 if (net_namesvr[0] != '\0') 643 net_dhcpconf |= DHCPCONF_NAMESVR; 644 645 /* pull domain info out of /etc/resolv.conf */ 646 if (collect(T_OUTPUT, &textbuf, 647 "cat /etc/resolv.conf 2>/dev/null |" 648 " while read keyword domain rest;" 649 " do [ \"$keyword\" = domain ] &&" 650 " { echo \"$domain\"; break; };" 651 " done" ) > 0) 652 strlcpy(net_domain, textbuf, 653 sizeof net_domain); 654 free(textbuf); 655 if (net_domain[0] == '\0') { 656 /* pull domain info out of /etc/resolv.conf */ 657 if (collect(T_OUTPUT, &textbuf, 658 "cat /etc/resolv.conf 2>/dev/null |" 659 " while read keyword search rest;" 660 " do [ \"$keyword\" = search ] &&" 661 " { echo \"$search\"; break; };" 662 " done" ) > 0) 663 strlcpy(net_domain, textbuf, 664 sizeof net_domain); 665 free(textbuf); 666 } 667 if ((nline = strchr(net_domain, '\n'))) 668 *nline = '\0'; 669 if (net_domain[0] != '\0') 670 net_dhcpconf |= DHCPCONF_DOMAIN; 671 672 if (gethostname(net_host, sizeof(net_host)) == 0 && 673 net_host[0] != 0) 674 net_dhcpconf |= DHCPCONF_HOST; 675 } 676 } 677 678 if (!(net_dhcpconf & DHCPCONF_HOST)) 679 msg_prompt_add(MSG_net_host, net_host, net_host, 680 sizeof net_host); 681 682 if (!(net_dhcpconf & DHCPCONF_DOMAIN)) 683 msg_prompt_add(MSG_net_domain, net_domain, net_domain, 684 sizeof net_domain); 685 686 if (!dhcp_config) { 687 /* Manually configure IPv4 */ 688 if (!nfs_root) 689 msg_prompt_add(MSG_net_ip, net_ip, net_ip, 690 sizeof net_ip); 691 if (slip) 692 msg_prompt_add(MSG_net_srv_ip, net_srv_ip, net_srv_ip, 693 sizeof net_srv_ip); 694 else if (!nfs_root) { 695 /* We don't want netmasks for SLIP */ 696 octet0 = atoi(net_ip); 697 if (!net_mask[0]) { 698 if (0 <= octet0 && octet0 <= 127) 699 strlcpy(net_mask, "0xff000000", 700 sizeof(net_mask)); 701 else if (128 <= octet0 && octet0 <= 191) 702 strlcpy(net_mask, "0xffff0000", 703 sizeof(net_mask)); 704 else if (192 <= octet0 && octet0 <= 223) 705 strlcpy(net_mask, "0xffffff00", 706 sizeof(net_mask)); 707 } 708 msg_prompt_add(MSG_net_mask, net_mask, net_mask, 709 sizeof net_mask); 710 } 711 msg_prompt_add(MSG_net_defroute, net_defroute, net_defroute, 712 sizeof net_defroute); 713 } 714 715 if (!(net_dhcpconf & DHCPCONF_NAMESVR)) { 716 #ifdef INET6 717 if (v6config) { 718 process_menu(MENU_namesrv6, NULL); 719 if (!yesno) 720 msg_prompt_add(MSG_net_namesrv, net_namesvr, 721 net_namesvr, sizeof net_namesvr); 722 } else 723 #endif 724 msg_prompt_add(MSG_net_namesrv, net_namesvr, net_namesvr, 725 sizeof net_namesvr); 726 } 727 728 /* confirm the setting */ 729 if (slip) 730 msg_display(MSG_netok_slip, net_domain, net_host, 731 *net_namesvr == '\0' ? "<none>" : net_namesvr, 732 net_dev, 733 *net_media == '\0' ? "<default>" : net_media, 734 *net_ip == '\0' ? "<none>" : net_ip, 735 *net_srv_ip == '\0' ? "<none>" : net_srv_ip, 736 *net_mask == '\0' ? "<none>" : net_mask, 737 *net_defroute == '\0' ? "<none>" : net_defroute); 738 else 739 msg_display(MSG_netok, net_domain, net_host, 740 *net_namesvr == '\0' ? "<none>" : net_namesvr, 741 net_dev, 742 *net_media == '\0' ? "<default>" : net_media, 743 *net_ip == '\0' ? "<none>" : net_ip, 744 *net_mask == '\0' ? "<none>" : net_mask, 745 *net_defroute == '\0' ? "<none>" : net_defroute); 746 #ifdef INET6 747 msg_display_add(MSG_netokv6, 748 !is_v6kernel() ? "<not supported>" : net_ip6); 749 #endif 750 done: 751 process_menu(MENU_yesno, deconst(MSG_netok_ok)); 752 753 if (!yesno) 754 goto again; 755 756 run_program(0, "/sbin/ifconfig lo0 127.0.0.1"); 757 758 /* dhcpcd will have configured it all for us */ 759 if (dhcp_config) { 760 fflush(NULL); 761 network_up = 1; 762 return network_up; 763 } 764 765 /* 766 * we may want to perform checks against inconsistent configuration, 767 * like IPv4 DNS server without IPv4 configuration. 768 */ 769 770 /* Create /etc/resolv.conf if a nameserver was given */ 771 if (net_namesvr[0] != '\0') { 772 f = fopen("/etc/resolv.conf", "w"); 773 if (f == NULL) { 774 if (logfp) 775 (void)fprintf(logfp, 776 "%s", msg_string(MSG_resolv)); 777 (void)fprintf(stderr, "%s", msg_string(MSG_resolv)); 778 exit(1); 779 } 780 scripting_fprintf(NULL, "cat <<EOF >/etc/resolv.conf\n"); 781 time(&now); 782 scripting_fprintf(f, ";\n; BIND data file\n; %s %s;\n", 783 "Created by NetBSD sysinst on", safectime(&now)); 784 if (net_domain[0] != '\0') 785 scripting_fprintf(f, "search %s\n", net_domain); 786 if (net_namesvr[0] != '\0') 787 scripting_fprintf(f, "nameserver %s\n", net_namesvr); 788 scripting_fprintf(NULL, "EOF\n"); 789 fflush(NULL); 790 fclose(f); 791 } 792 793 if (net_ip[0] != '\0') { 794 if (slip) { 795 /* XXX: needs 'ifconfig sl0 create' much earlier */ 796 /* Set SLIP interface UP */ 797 run_program(0, "/sbin/ifconfig %s inet %s %s up", 798 net_dev, net_ip, net_srv_ip); 799 strcpy(sl_flags, "-s 115200 -l /dev/tty00"); 800 msg_prompt_win(MSG_slattach, -1, 12, 70, 0, 801 sl_flags, sl_flags, 255); 802 803 /* XXX: wtf isn't run_program() used here? */ 804 pid = fork(); 805 if (pid == 0) { 806 strcpy(buffer, "/sbin/slattach "); 807 strcat(buffer, sl_flags); 808 in_buf = buffer; 809 810 for (ap = slcmd; (*ap = strsep(&in_buf, " ")) != NULL;) 811 if (**ap != '\0') 812 ++ap; 813 814 execvp(slcmd[0], slcmd); 815 } else 816 wait4(pid, &status, WNOHANG, 0); 817 } else if (!nfs_root) { 818 if (net_mask[0] != '\0') { 819 run_program(0, "/sbin/ifconfig %s inet %s netmask %s", 820 net_dev, net_ip, net_mask); 821 } else { 822 run_program(0, "/sbin/ifconfig %s inet %s", 823 net_dev, net_ip); 824 } 825 } 826 } 827 828 /* Set host name */ 829 if (net_host[0] != '\0') 830 sethostname(net_host, strlen(net_host)); 831 832 /* Set a default route if one was given */ 833 if (!nfs_root && net_defroute[0] != '\0') { 834 run_program(RUN_DISPLAY | RUN_PROGRESS, 835 "/sbin/route -n flush -inet"); 836 run_program(RUN_DISPLAY | RUN_PROGRESS, 837 "/sbin/route -n add default %s", net_defroute); 838 } 839 840 /* 841 * wait a couple of seconds for the interface to go live. 842 */ 843 if (!nfs_root) { 844 msg_display_add(MSG_wait_network); 845 sleep(5); 846 } 847 848 /* 849 * ping should be verbose, so users can see the cause 850 * of a network failure. 851 */ 852 if (net_defroute[0] != '\0' && network_up) 853 network_up = !run_program(RUN_DISPLAY | RUN_PROGRESS, 854 "/sbin/ping -v -c 5 -w 5 -o -n %s", net_defroute); 855 if (net_namesvr[0] != '\0' && network_up) { 856 #ifdef INET6 857 if (strchr(net_namesvr, ':')) 858 network_up = !run_program(RUN_DISPLAY | RUN_PROGRESS, 859 "/sbin/ping6 -v -c 3 -n %s", net_namesvr); 860 else 861 #endif 862 network_up = !run_program(RUN_DISPLAY | RUN_PROGRESS, 863 "/sbin/ping -v -c 5 -w 5 -o -n %s", net_namesvr); 864 } 865 fflush(NULL); 866 867 return network_up; 868 } 869 870 void 871 make_url(char *urlbuffer, struct ftpinfo *f, const char *dir) 872 { 873 char ftp_user_encoded[STRSIZE]; 874 char ftp_dir_encoded[STRSIZE]; 875 char *cp; 876 const char *dir2; 877 878 /* 879 * f->pass is quite likely to contain unsafe characters 880 * that need to be encoded in the URL (for example, 881 * "@", ":" and "/" need quoting). Let's be 882 * paranoid and also encode f->user and f->dir. (For 883 * example, f->dir could easily contain '~', which is 884 * unsafe by a strict reading of RFC 1738). 885 */ 886 if (strcmp("ftp", f->user) == 0 && f->pass[0] == 0) { 887 ftp_user_encoded[0] = 0; 888 } else { 889 cp = url_encode(ftp_user_encoded, f->user, 890 ftp_user_encoded + sizeof ftp_user_encoded - 1, 891 RFC1738_SAFE_LESS_SHELL, 0); 892 *cp++ = ':'; 893 cp = url_encode(cp, f->pass, 894 ftp_user_encoded + sizeof ftp_user_encoded - 1, 895 NULL, 0); 896 *cp++ = '@'; 897 *cp = 0; 898 } 899 cp = url_encode(ftp_dir_encoded, f->dir, 900 ftp_dir_encoded + sizeof ftp_dir_encoded - 1, 901 RFC1738_SAFE_LESS_SHELL_PLUS_SLASH, 1); 902 if (cp != ftp_dir_encoded && cp[-1] != '/') 903 *cp++ = '/'; 904 905 dir2 = dir; 906 while (*dir2 == '/') 907 ++dir2; 908 909 url_encode(cp, dir2, 910 ftp_dir_encoded + sizeof ftp_dir_encoded, 911 RFC1738_SAFE_LESS_SHELL_PLUS_SLASH, 0); 912 913 snprintf(urlbuffer, STRSIZE, "%s://%s%s/%s", f->xfer_type, 914 ftp_user_encoded, f->host, ftp_dir_encoded); 915 } 916 917 918 /* ftp_fetch() and pkgsrc_fetch() are essentially the same, with a different 919 * ftpinfo var. */ 920 static int do_ftp_fetch(const char *, struct ftpinfo *); 921 922 static int 923 ftp_fetch(const char *set_name) 924 { 925 return do_ftp_fetch(set_name, &ftp); 926 } 927 928 static int 929 pkgsrc_fetch(const char *set_name) 930 { 931 return do_ftp_fetch(set_name, &pkgsrc); 932 } 933 934 static int 935 do_ftp_fetch(const char *set_name, struct ftpinfo *f) 936 { 937 const char *ftp_opt; 938 char url[STRSIZE]; 939 int rval; 940 941 /* 942 * Invoke ftp to fetch the file. 943 */ 944 if (strcmp("ftp", f->user) == 0 && f->pass[0] == 0) { 945 /* do anon ftp */ 946 ftp_opt = "-a "; 947 } else { 948 ftp_opt = ""; 949 } 950 951 make_url(url, f, set_dir_for_set(set_name)); 952 rval = run_program(RUN_DISPLAY | RUN_PROGRESS | RUN_XFER_DIR, 953 "/usr/bin/ftp %s%s/%s%s", 954 ftp_opt, url, set_name, dist_postfix); 955 956 return rval ? SET_RETRY : SET_OK; 957 } 958 959 960 // XXX: check MSG_netnotup_continueanyway and MSG_netnotup 961 962 int 963 get_pkgsrc(void) 964 { 965 yesno = -1; 966 process_menu(MENU_pkgsrc, NULL); 967 968 if (yesno == SET_SKIP) 969 return SET_SKIP; 970 971 fetch_fn = pkgsrc_fetch; 972 snprintf(ext_dir_pkgsrc, sizeof ext_dir_pkgsrc, "%s/%s", 973 target_prefix(), xfer_dir + (*xfer_dir == '/')); 974 975 return SET_OK; 976 } 977 978 int 979 get_via_ftp(const char *xfer_type) 980 { 981 yesno = -1; 982 process_menu(MENU_ftpsource, deconst(xfer_type)); 983 984 if (yesno == SET_RETRY) 985 return SET_RETRY; 986 987 /* We'll fetch each file just before installing it */ 988 fetch_fn = ftp_fetch; 989 ftp.xfer_type = xfer_type; 990 snprintf(ext_dir_bin, sizeof ext_dir_bin, "%s/%s", target_prefix(), 991 xfer_dir + (*xfer_dir == '/')); 992 snprintf(ext_dir_src, sizeof ext_dir_src, "%s/%s", target_prefix(), 993 xfer_dir + (*xfer_dir == '/')); 994 995 return SET_OK; 996 } 997 998 int 999 get_via_nfs(void) 1000 { 1001 struct statvfs sb; 1002 1003 /* If root is on NFS and we have sets, skip this step. */ 1004 if (statvfs(set_dir_bin, &sb) == 0 && 1005 strcmp(sb.f_fstypename, "nfs") == 0) { 1006 strlcpy(ext_dir_bin, set_dir_bin, sizeof ext_dir_bin); 1007 strlcpy(ext_dir_src, set_dir_src, sizeof ext_dir_src); 1008 return SET_OK; 1009 } 1010 1011 /* Get server and filepath */ 1012 yesno = -1; 1013 process_menu(MENU_nfssource, NULL); 1014 1015 if (yesno == SET_RETRY) 1016 return SET_RETRY; 1017 1018 /* Mount it */ 1019 if (run_program(0, "/sbin/mount -r -o -2,-i,-r=1024 -t nfs %s:%s /mnt2", 1020 nfs_host, nfs_dir)) 1021 return SET_RETRY; 1022 1023 mnt2_mounted = 1; 1024 1025 snprintf(ext_dir_bin, sizeof ext_dir_bin, "/mnt2/%s", set_dir_bin); 1026 snprintf(ext_dir_src, sizeof ext_dir_src, "/mnt2/%s", set_dir_src); 1027 1028 /* return location, don't clean... */ 1029 return SET_OK; 1030 } 1031 1032 /* 1033 * write the new contents of /etc/hosts to the specified file 1034 */ 1035 static void 1036 write_etc_hosts(FILE *f) 1037 { 1038 scripting_fprintf(f, "#\n"); 1039 scripting_fprintf(f, "# Added by NetBSD sysinst\n"); 1040 scripting_fprintf(f, "#\n"); 1041 1042 if (net_domain[0] != '\0') 1043 scripting_fprintf(f, "127.0.0.1 localhost.%s\n", net_domain); 1044 1045 scripting_fprintf(f, "%s\t", net_ip); 1046 if (net_domain[0] != '\0') 1047 scripting_fprintf(f, "%s ", recombine_host_domain()); 1048 scripting_fprintf(f, "%s\n", net_host); 1049 } 1050 1051 /* 1052 * Write the network config info the user entered via menus into the 1053 * config files in the target disk. Be careful not to lose any 1054 * information we don't immediately add back, in case the install 1055 * target is the currently-active root. 1056 */ 1057 void 1058 mnt_net_config(void) 1059 { 1060 char ifconfig_fn[STRSIZE]; 1061 FILE *ifconf = NULL; 1062 1063 if (!network_up) 1064 return; 1065 process_menu(MENU_yesno, deconst(MSG_mntnetconfig)); 1066 if (!yesno) 1067 return; 1068 1069 /* Write hostname to /etc/rc.conf */ 1070 if ((net_dhcpconf & DHCPCONF_HOST) == 0) 1071 if (del_rc_conf("hostname") == 0) 1072 add_rc_conf("hostname=%s\n", recombine_host_domain()); 1073 1074 /* Copy resolv.conf to target. If DHCP was used to create it, 1075 * it will be replaced on next boot anyway. */ 1076 if (net_namesvr[0] != '\0') 1077 dup_file_into_target("/etc/resolv.conf"); 1078 1079 /* 1080 * bring the interface up, it will be necessary for IPv6, and 1081 * it won't make trouble with IPv4 case either 1082 */ 1083 snprintf(ifconfig_fn, sizeof ifconfig_fn, "/etc/ifconfig.%s", net_dev); 1084 ifconf = target_fopen(ifconfig_fn, "w"); 1085 if (ifconf != NULL) { 1086 scripting_fprintf(NULL, "cat <<EOF >>%s%s\n", 1087 target_prefix(), ifconfig_fn); 1088 scripting_fprintf(ifconf, "up\n"); 1089 if (*net_media != '\0') 1090 scripting_fprintf(ifconf, "media %s\n", net_media); 1091 scripting_fprintf(NULL, "EOF\n"); 1092 } 1093 1094 if ((net_dhcpconf & DHCPCONF_IPADDR) == 0) { 1095 FILE *hosts; 1096 1097 /* Write IPaddr and netmask to /etc/ifconfig.if[0-9] */ 1098 if (ifconf != NULL) { 1099 scripting_fprintf(NULL, "cat <<EOF >>%s%s\n", 1100 target_prefix(), ifconfig_fn); 1101 if (*net_media != '\0') 1102 scripting_fprintf(ifconf, 1103 "%s netmask %s media %s\n", 1104 net_ip, net_mask, net_media); 1105 else 1106 scripting_fprintf(ifconf, "%s netmask %s\n", 1107 net_ip, net_mask); 1108 scripting_fprintf(NULL, "EOF\n"); 1109 } 1110 1111 /* 1112 * Add IPaddr/hostname to /etc/hosts. 1113 * Be careful not to clobber any existing contents. 1114 * Relies on ordered search of /etc/hosts. XXX YP? 1115 */ 1116 hosts = target_fopen("/etc/hosts", "a"); 1117 if (hosts != 0) { 1118 scripting_fprintf(NULL, "cat <<EOF >>%s/etc/hosts\n", 1119 target_prefix()); 1120 write_etc_hosts(hosts); 1121 (void)fclose(hosts); 1122 scripting_fprintf(NULL, "EOF\n"); 1123 } 1124 1125 if (del_rc_conf("defaultroute") == 0) 1126 add_rc_conf("defaultroute=\"%s\"\n", net_defroute); 1127 } else { 1128 /* 1129 * Start dhcpcd quietly and in master mode, but restrict 1130 * it to our interface 1131 */ 1132 add_rc_conf("dhcpcd=YES\n"); 1133 add_rc_conf("dhcpcd_flags=\"-qM %s\"\n", net_dev); 1134 } 1135 1136 if (ifconf) 1137 fclose(ifconf); 1138 1139 fflush(NULL); 1140 } 1141 1142 int 1143 config_dhcp(char *inter) 1144 { 1145 int dhcpautoconf; 1146 1147 /* 1148 * Don't bother checking for an existing instance of dhcpcd, just 1149 * ask it to renew the lease. It will fork and daemonize if there 1150 * wasn't already an instance. 1151 */ 1152 1153 if (!file_mode_match(DHCPCD, S_IFREG)) 1154 return 0; 1155 process_menu(MENU_yesno, deconst(MSG_Perform_autoconfiguration)); 1156 if (yesno) { 1157 /* spawn off dhcpcd and wait for parent to exit */ 1158 dhcpautoconf = run_program(RUN_DISPLAY | RUN_PROGRESS, 1159 "%s -d -n %s", DHCPCD, inter); 1160 return dhcpautoconf ? 0 : 1; 1161 } 1162 return 0; 1163 } 1164