X-Git-Url: https://git.saurik.com/apple/xnu.git/blobdiff_plain/21362eb3e66fd2c787aee132bce100a44d71a99c..a991bd8d3e7fe02dbca0644054bab73c5b75324a:/bsd/kern/netboot.c?ds=sidebyside diff --git a/bsd/kern/netboot.c b/bsd/kern/netboot.c index 97ca556cf..63307089f 100644 --- a/bsd/kern/netboot.c +++ b/bsd/kern/netboot.c @@ -1,8 +1,8 @@ /* - * Copyright (c) 2001-2004 Apple Computer, Inc. All rights reserved. + * Copyright (c) 2001-2019 Apple Inc. All rights reserved. * * @APPLE_OSREFERENCE_LICENSE_HEADER_START@ - * + * * This file contains Original Code and/or Modifications of Original Code * as defined in and that are subject to the Apple Public Source License * Version 2.0 (the 'License'). You may not use this file except in @@ -11,10 +11,10 @@ * unlawful or unlicensed copies of an Apple operating system, or to * circumvent, violate, or enable the circumvention or violation of, any * terms of an Apple operating system software license agreement. - * + * * Please obtain a copy of the License at * http://www.opensource.apple.com/apsl/ and read it before using this file. - * + * * The Original Code and all software distributed under the License are * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, @@ -22,7 +22,7 @@ * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT. * Please see the License for the specific language governing rights and * limitations under the License. - * + * * @APPLE_OSREFERENCE_LICENSE_HEADER_END@ */ @@ -45,6 +45,7 @@ #include #include #include +#include #include #include #include @@ -52,25 +53,20 @@ #include #include #include -#include #include #include +#include +#include +#include -//#include -extern struct filedesc filedesc0; - -extern int strncmp(const char *,const char *, size_t); -extern unsigned long strtoul(const char *, char **, int); -extern char * strchr(const char *str, int ch); - -extern int nfs_mountroot(void); /* nfs_vfsops.c */ +extern int nfs_mountroot(void); /* nfs_vfsops.c */ extern int (*mountroot)(void); -extern unsigned char rootdevice[]; +extern unsigned char rootdevice[]; -static int S_netboot = 0; -static struct netboot_info * S_netboot_info_p; +static int S_netboot = 0; +static struct netboot_info * S_netboot_info_p; void * IOBSDRegistryEntryForDeviceTree(const char * path); @@ -79,82 +75,40 @@ void IOBSDRegistryEntryRelease(void * entry); const void * -IOBSDRegistryEntryGetData(void * entry, const char * property_name, - int * packet_length); +IOBSDRegistryEntryGetData(void * entry, const char * property_name, + int * packet_length); -extern int vndevice_root_image(const char * path, char devname[], - dev_t * dev_p); -extern int di_root_image(const char *path, char devname[], dev_t *dev_p); +#define BOOTP_RESPONSE "bootp-response" +#define BSDP_RESPONSE "bsdp-response" +#define DHCP_RESPONSE "dhcp-response" -#define BOOTP_RESPONSE "bootp-response" -#define BSDP_RESPONSE "bsdp-response" -#define DHCP_RESPONSE "dhcp-response" +#define IP_FORMAT "%d.%d.%d.%d" +#define IP_CH(ip) ((u_char *)ip) +#define IP_LIST(ip) IP_CH(ip)[0],IP_CH(ip)[1],IP_CH(ip)[2],IP_CH(ip)[3] -extern int -bootp(struct ifnet * ifp, struct in_addr * iaddr_p, int max_retry, - struct in_addr * netmask_p, struct in_addr * router_p, - struct proc * procp); - - -/* forward declarations */ -int inet_aton(char * cp, struct in_addr * pin); - -boolean_t netboot_iaddr(struct in_addr * iaddr_p); -boolean_t netboot_rootpath(struct in_addr * server_ip, - char * name, int name_len, - char * path, int path_len); -int netboot_setup(struct proc * p); -int netboot_mountroot(void); -int netboot_root(void); - - - -#define IP_FORMAT "%d.%d.%d.%d" -#define IP_CH(ip) ((u_char *)ip) -#define IP_LIST(ip) IP_CH(ip)[0],IP_CH(ip)[1],IP_CH(ip)[2],IP_CH(ip)[3] - -#define kNetBootRootPathPrefixNFS "nfs:" -#define kNetBootRootPathPrefixHTTP "http:" +#define kNetBootRootPathPrefixNFS "nfs:" +#define kNetBootRootPathPrefixHTTP "http:" typedef enum { - kNetBootImageTypeUnknown = 0, - kNetBootImageTypeNFS = 1, - kNetBootImageTypeHTTP = 2, + kNetBootImageTypeUnknown = 0, + kNetBootImageTypeNFS = 1, + kNetBootImageTypeHTTP = 2, } NetBootImageType; struct netboot_info { - struct in_addr client_ip; - struct in_addr server_ip; - char * server_name; - int server_name_length; - char * mount_point; - int mount_point_length; - char * image_path; - int image_path_length; - NetBootImageType image_type; - boolean_t use_hdix; + struct in_addr client_ip; + struct in_addr server_ip; + char * server_name; + size_t server_name_length; + char * mount_point; + size_t mount_point_length; + char * image_path; + size_t image_path_length; + NetBootImageType image_type; + char * second_image_path; + size_t second_image_path_length; }; -int -inet_aton(char * cp, struct in_addr * pin) -{ - u_char * b = (char *)pin; - int i; - char * p; - - for (p = cp, i = 0; i < 4; i++) { - u_long l = strtoul(p, 0, 0); - if (l > 255) - return (FALSE); - b[i] = l; - p = strchr(p, '.'); - if (i < 3 && p == NULL) - return (FALSE); - p++; - } - return (TRUE); -} - /* * Function: parse_booter_path * Purpose: @@ -164,50 +118,49 @@ inet_aton(char * cp, struct in_addr * pin) * * Note: * The passed in string is modified i.e. ':' is replaced by '\0'. - * Example: + * Example: * "17.202.16.17:seaport:/release/.images/Image9/CurrentHera" */ static __inline__ boolean_t -parse_booter_path(char * path, struct in_addr * iaddr_p, char * * host, - char * * mount_dir, char * * image_path) +parse_booter_path(char * path, struct in_addr * iaddr_p, char const * * host, + char * * mount_dir, char * * image_path) { - char * start; - char * colon; - - /* IP address */ - start = path; - colon = strchr(start, ':'); - if (colon == NULL) { - return (FALSE); - } - *colon = '\0'; - if (inet_aton(start, iaddr_p) != 1) { - return (FALSE); - } - - /* host */ - start = colon + 1; - colon = strchr(start, ':'); - if (colon == NULL) { - return (FALSE); - } - *colon = '\0'; - *host = start; - - /* mount */ - start = colon + 1; - colon = strchr(start, ':'); - *mount_dir = start; - if (colon == NULL) { - *image_path = NULL; - } - else { - /* image path */ + char * start; + char * colon; + + /* IP address */ + start = path; + colon = strchr(start, ':'); + if (colon == NULL) { + return FALSE; + } + *colon = '\0'; + if (inet_aton(start, iaddr_p) != 1) { + return FALSE; + } + + /* host */ + start = colon + 1; + colon = strchr(start, ':'); + if (colon == NULL) { + return FALSE; + } *colon = '\0'; + *host = start; + + /* mount */ start = colon + 1; - *image_path = start; - } - return (TRUE); + colon = strchr(start, ':'); + *mount_dir = start; + if (colon == NULL) { + *image_path = NULL; + } else { + /* image path */ + *colon = '\0'; + start = colon + 1; + *image_path = start; + } + return TRUE; } /* @@ -220,24 +173,25 @@ parse_booter_path(char * path, struct in_addr * iaddr_p, char * * host, static __inline__ char * find_colon(char * str) { - char * start = str; - char * colon; - - while ((colon = strchr(start, ':')) != NULL) { - char * dst; - char * src; - - if (colon == start) { - break; - } - if (colon[-1] != '\\') - break; - for (dst = colon - 1, src = colon; *dst != '\0'; dst++, src++) { - *dst = *src; - } - start = colon; - } - return (colon); + char * start = str; + char * colon; + + while ((colon = strchr(start, ':')) != NULL) { + char * dst; + char * src; + + if (colon == start) { + break; + } + if (colon[-1] != '\\') { + break; + } + for (dst = colon - 1, src = colon; *dst != '\0'; dst++, src++) { + *dst = *src; + } + start = colon; + } + return colon; } /* @@ -255,587 +209,585 @@ find_colon(char * str) * nfs:17.202.42.112:/Volumes/Foo\:/Library/NetBoot/NetBootSP0:Jaguar/Jaguar.dmg */ static __inline__ boolean_t -parse_netboot_path(char * path, struct in_addr * iaddr_p, char * * host, - char * * mount_dir, char * * image_path) +parse_netboot_path(char * path, struct in_addr * iaddr_p, char const * * host, + char * * mount_dir, char * * image_path) { - static char tmp[MAX_IPv4_STR_LEN]; /* Danger - not thread safe */ - char * start; - char * colon; - - if (strncmp(path, kNetBootRootPathPrefixNFS, - strlen(kNetBootRootPathPrefixNFS)) != 0) { - return (FALSE); - } - - /* IP address */ - start = path + strlen(kNetBootRootPathPrefixNFS); - colon = strchr(start, ':'); - if (colon == NULL) { - return (FALSE); - } - *colon = '\0'; - if (inet_aton(start, iaddr_p) != 1) { - return (FALSE); - } - - /* mount point */ - start = colon + 1; - colon = find_colon(start); - *mount_dir = start; - if (colon == NULL) { - *image_path = NULL; - } - else { - /* image path */ + static char tmp[MAX_IPv4_STR_LEN]; /* Danger - not thread safe */ + char * start; + char * colon; + + if (strncmp(path, kNetBootRootPathPrefixNFS, + strlen(kNetBootRootPathPrefixNFS)) != 0) { + return FALSE; + } + + /* IP address */ + start = path + strlen(kNetBootRootPathPrefixNFS); + colon = strchr(start, ':'); + if (colon == NULL) { + return FALSE; + } *colon = '\0'; + if (inet_aton(start, iaddr_p) != 1) { + return FALSE; + } + + /* mount point */ start = colon + 1; - (void)find_colon(start); - *image_path = start; - } - *host = inet_ntop(AF_INET, iaddr_p, tmp, sizeof(tmp)); - return (TRUE); + colon = find_colon(start); + *mount_dir = start; + if (colon == NULL) { + *image_path = NULL; + } else { + /* image path */ + *colon = '\0'; + start = colon + 1; + (void)find_colon(start); + *image_path = start; + } + *host = inet_ntop(AF_INET, iaddr_p, tmp, sizeof(tmp)); + return TRUE; } static boolean_t -parse_image_path(char * path, struct in_addr * iaddr_p, char * * host, - char * * mount_dir, char * * image_path) +parse_image_path(char * path, struct in_addr * iaddr_p, char const * * host, + char * * mount_dir, char * * image_path) { - if (path[0] >= '0' && path[0] <= '9') { - return (parse_booter_path(path, iaddr_p, host, mount_dir, - image_path)); - } - return (parse_netboot_path(path, iaddr_p, host, mount_dir, - image_path)); + if (path[0] >= '0' && path[0] <= '9') { + return parse_booter_path(path, iaddr_p, host, mount_dir, + image_path); + } + return parse_netboot_path(path, iaddr_p, host, mount_dir, + image_path); } static boolean_t get_root_path(char * root_path) { - void * entry; - boolean_t found = FALSE; - const void * pkt; - int pkt_len; - - entry = IOBSDRegistryEntryForDeviceTree("/chosen"); - if (entry == NULL) { - return (FALSE); - } - pkt = IOBSDRegistryEntryGetData(entry, BSDP_RESPONSE, &pkt_len); - if (pkt != NULL && pkt_len >= (int)sizeof(struct dhcp)) { - printf("netboot: retrieving root path from BSDP response\n"); - } - else { - pkt = IOBSDRegistryEntryGetData(entry, BOOTP_RESPONSE, - &pkt_len); + void * entry; + boolean_t found = FALSE; + const void * pkt; + int pkt_len; + + entry = IOBSDRegistryEntryForDeviceTree("/chosen"); + if (entry == NULL) { + return FALSE; + } + pkt = IOBSDRegistryEntryGetData(entry, BSDP_RESPONSE, &pkt_len); if (pkt != NULL && pkt_len >= (int)sizeof(struct dhcp)) { - printf("netboot: retrieving root path from BOOTP response\n"); + printf("netboot: retrieving root path from BSDP response\n"); + } else { + pkt = IOBSDRegistryEntryGetData(entry, BOOTP_RESPONSE, + &pkt_len); + if (pkt != NULL && pkt_len >= (int)sizeof(struct dhcp)) { + printf("netboot: retrieving root path from BOOTP response\n"); + } } - } - if (pkt != NULL) { - int len; - dhcpol_t options; - char * path; - struct dhcp * reply; - - reply = (struct dhcp *)pkt; - (void)dhcpol_parse_packet(&options, reply, pkt_len, NULL); - - path = (char *)dhcpol_find(&options, - dhcptag_root_path_e, &len, NULL); - if (path) { - bcopy(path, root_path, len); - root_path[len] = '\0'; - found = TRUE; + if (pkt != NULL) { + int len; + dhcpol_t options; + const char * path; + const struct dhcp * reply; + + reply = (const struct dhcp *)pkt; + (void)dhcpol_parse_packet(&options, reply, pkt_len); + + path = (const char *)dhcpol_find(&options, + dhcptag_root_path_e, &len, NULL); + if (path) { + memcpy(root_path, path, len); + root_path[len] = '\0'; + found = TRUE; + } } - } - IOBSDRegistryEntryRelease(entry); - return (found); + IOBSDRegistryEntryRelease(entry); + return found; +} +static void +save_path(char * * str_p, size_t * length_p, char * path) +{ + *length_p = strlen(path) + 1; + *str_p = (char *)kheap_alloc(KHEAP_DATA_BUFFERS, *length_p, Z_WAITOK); + strlcpy(*str_p, path, *length_p); + return; } static struct netboot_info * netboot_info_init(struct in_addr iaddr) { - struct netboot_info * info; - char * root_path = NULL; - boolean_t use_hdix = TRUE; - char * vndevice = NULL; - - MALLOC_ZONE(vndevice, caddr_t, MAXPATHLEN, M_NAMEI, M_WAITOK); - if (vndevice == NULL) - panic("netboot_info_init: M_NAMEI zone exhausted"); - if (PE_parse_boot_arg("vndevice", vndevice) == TRUE) { - use_hdix = FALSE; - } - FREE_ZONE(vndevice, MAXPATHLEN, M_NAMEI); - - info = (struct netboot_info *)kalloc(sizeof(*info)); - bzero(info, sizeof(*info)); - info->client_ip = iaddr; - info->image_type = kNetBootImageTypeUnknown; - info->use_hdix = use_hdix; - - /* check for a booter-specified path then a NetBoot path */ - MALLOC_ZONE(root_path, caddr_t, MAXPATHLEN, M_NAMEI, M_WAITOK); - if (root_path == NULL) - panic("netboot_info_init: M_NAMEI zone exhausted"); - if (PE_parse_boot_arg("rp", root_path) == TRUE - || PE_parse_boot_arg("rootpath", root_path) == TRUE - || get_root_path(root_path) == TRUE) { - char * server_name = NULL; - char * mount_point = NULL; - char * image_path = NULL; - struct in_addr server_ip; - - if (parse_image_path(root_path, &server_ip, &server_name, - &mount_point, &image_path)) { - info->image_type = kNetBootImageTypeNFS; - info->server_ip = server_ip; - info->server_name_length = strlen(server_name) + 1; - info->server_name = (char *)kalloc(info->server_name_length); - info->mount_point_length = strlen(mount_point) + 1; - info->mount_point = (char *)kalloc(info->mount_point_length); - strcpy(info->server_name, server_name); - strcpy(info->mount_point, mount_point); - - printf("Server %s Mount %s", - server_name, info->mount_point); - if (image_path != NULL) { - boolean_t needs_slash = FALSE; - - info->image_path_length = strlen(image_path) + 1; - if (image_path[0] != '/') { - needs_slash = TRUE; - info->image_path_length++; + boolean_t have_root_path = FALSE; + struct netboot_info * info = NULL; + char * root_path = NULL; + + info = (struct netboot_info *)kalloc(sizeof(*info)); + bzero(info, sizeof(*info)); + info->client_ip = iaddr; + info->image_type = kNetBootImageTypeUnknown; + + /* check for a booter-specified path then a NetBoot path */ + root_path = zalloc(ZV_NAMEI); + + if (PE_parse_boot_argn("rp0", root_path, MAXPATHLEN) == TRUE + || PE_parse_boot_argn("rp", root_path, MAXPATHLEN) == TRUE + || PE_parse_boot_argn("rootpath", root_path, MAXPATHLEN) == TRUE) { + if (imageboot_format_is_valid(root_path)) { + printf("netboot_info_init: rp0='%s' isn't a network path," + " ignoring\n", root_path); + } else { + have_root_path = TRUE; } - info->image_path = (char *)kalloc(info->image_path_length); - if (needs_slash) { - info->image_path[0] = '/'; - strcpy(info->image_path + 1, image_path); + } + if (have_root_path == FALSE) { + have_root_path = get_root_path(root_path); + } + if (have_root_path) { + const char * server_name = NULL; + char * mount_point = NULL; + char * image_path = NULL; + struct in_addr server_ip; + + if (parse_image_path(root_path, &server_ip, &server_name, + &mount_point, &image_path)) { + info->image_type = kNetBootImageTypeNFS; + info->server_ip = server_ip; + info->server_name_length = strlen(server_name) + 1; + info->server_name = kheap_alloc(KHEAP_DATA_BUFFERS, + info->server_name_length, Z_WAITOK); + info->mount_point_length = strlen(mount_point) + 1; + info->mount_point = kheap_alloc(KHEAP_DATA_BUFFERS, + info->mount_point_length, Z_WAITOK); + strlcpy(info->server_name, server_name, info->server_name_length); + strlcpy(info->mount_point, mount_point, info->mount_point_length); + + printf("netboot: NFS Server %s Mount %s", + server_name, info->mount_point); + if (image_path != NULL) { + boolean_t needs_slash = FALSE; + + info->image_path_length = strlen(image_path) + 1; + if (image_path[0] != '/') { + needs_slash = TRUE; + info->image_path_length++; + } + info->image_path = kheap_alloc(KHEAP_DATA_BUFFERS, + info->image_path_length, Z_WAITOK); + if (needs_slash) { + info->image_path[0] = '/'; + strlcpy(info->image_path + 1, image_path, + info->image_path_length - 1); + } else { + strlcpy(info->image_path, image_path, + info->image_path_length); + } + printf(" Image %s", info->image_path); + } + printf("\n"); + } else if (strncmp(root_path, kNetBootRootPathPrefixHTTP, + strlen(kNetBootRootPathPrefixHTTP)) == 0) { + info->image_type = kNetBootImageTypeHTTP; + save_path(&info->image_path, &info->image_path_length, + root_path); + printf("netboot: HTTP URL %s\n", info->image_path); + } else { + printf("netboot: root path uses unrecognized format\n"); + } + + /* check for image-within-image */ + if (info->image_path != NULL) { + if (PE_parse_boot_argn(IMAGEBOOT_ROOT_ARG, root_path, MAXPATHLEN) + || PE_parse_boot_argn("rp1", root_path, MAXPATHLEN)) { + /* rp1/root-dmg is the second-level image */ + save_path(&info->second_image_path, &info->second_image_path_length, + root_path); + } } - else { - strcpy(info->image_path, image_path); + if (info->second_image_path != NULL) { + printf("netboot: nested image %s\n", info->second_image_path); } - printf(" Image %s", info->image_path); - } - printf("\n"); - } - else if (strncmp(root_path, kNetBootRootPathPrefixHTTP, - strlen(kNetBootRootPathPrefixHTTP)) == 0) { - /* only HDIX supports HTTP */ - info->image_type = kNetBootImageTypeHTTP; - info->use_hdix = TRUE; - info->image_path_length = strlen(root_path) + 1; - info->image_path = (char *)kalloc(info->image_path_length); - strcpy(info->image_path, root_path); - } - else { - printf("netboot: root path uses unrecognized format\n"); - } - } - FREE_ZONE(root_path, MAXPATHLEN, M_NAMEI); - return (info); + } + zfree(ZV_NAMEI, root_path); + return info; } -static void +static void netboot_info_free(struct netboot_info * * info_p) { - struct netboot_info * info = *info_p; + struct netboot_info * info = *info_p; - if (info) { - if (info->mount_point) { - kfree(info->mount_point, info->mount_point_length); - } - if (info->server_name) { - kfree(info->server_name, info->server_name_length); - } - if (info->image_path) { - kfree(info->image_path, info->image_path_length); + if (info) { + if (info->mount_point) { + kheap_free(KHEAP_DATA_BUFFERS, info->mount_point, + info->mount_point_length); + } + if (info->server_name) { + kheap_free(KHEAP_DATA_BUFFERS, info->server_name, + info->server_name_length); + } + if (info->image_path) { + kheap_free(KHEAP_DATA_BUFFERS, info->image_path, + info->image_path_length); + } + if (info->second_image_path) { + kheap_free(KHEAP_DATA_BUFFERS, info->second_image_path, + info->second_image_path_length); + } + kfree(info, sizeof(*info)); } - kfree(info, sizeof(*info)); - } - *info_p = NULL; - return; + *info_p = NULL; } boolean_t netboot_iaddr(struct in_addr * iaddr_p) { - if (S_netboot_info_p == NULL) - return (FALSE); + if (S_netboot_info_p == NULL) { + return FALSE; + } - *iaddr_p = S_netboot_info_p->client_ip; - return (TRUE); + *iaddr_p = S_netboot_info_p->client_ip; + return TRUE; } boolean_t netboot_rootpath(struct in_addr * server_ip, - char * name, int name_len, - char * path, int path_len) + char * name, size_t name_len, + char * path, size_t path_len) { - if (S_netboot_info_p == NULL) - return (FALSE); - - name[0] = '\0'; - path[0] = '\0'; - - if (S_netboot_info_p->mount_point_length == 0) { - return (FALSE); - } - if (path_len < S_netboot_info_p->mount_point_length) { - printf("netboot: path too small %d < %d\n", - path_len, S_netboot_info_p->mount_point_length); - return (FALSE); - } - strcpy(path, S_netboot_info_p->mount_point); - strncpy(name, S_netboot_info_p->server_name, name_len); - *server_ip = S_netboot_info_p->server_ip; - return (TRUE); + if (S_netboot_info_p == NULL) { + return FALSE; + } + + name[0] = '\0'; + path[0] = '\0'; + + if (S_netboot_info_p->mount_point_length == 0) { + return FALSE; + } + if (path_len < S_netboot_info_p->mount_point_length) { + printf("netboot: path too small %zu < %zu\n", + path_len, S_netboot_info_p->mount_point_length); + return FALSE; + } + strlcpy(path, S_netboot_info_p->mount_point, path_len); + strlcpy(name, S_netboot_info_p->server_name, name_len); + *server_ip = S_netboot_info_p->server_ip; + return TRUE; } static boolean_t -get_ip_parameters(struct in_addr * iaddr_p, struct in_addr * netmask_p, - struct in_addr * router_p) +get_ip_parameters(struct in_addr * iaddr_p, struct in_addr * netmask_p, + struct in_addr * router_p) { - void * entry; - const void * pkt; - int pkt_len; - - - entry = IOBSDRegistryEntryForDeviceTree("/chosen"); - if (entry == NULL) { - return (FALSE); - } - pkt = IOBSDRegistryEntryGetData(entry, DHCP_RESPONSE, &pkt_len); - if (pkt != NULL && pkt_len >= (int)sizeof(struct dhcp)) { - printf("netboot: retrieving IP information from DHCP response\n"); - } - else { - pkt = IOBSDRegistryEntryGetData(entry, BOOTP_RESPONSE, &pkt_len); - if (pkt != NULL && pkt_len >= (int)sizeof(struct dhcp)) { - printf("netboot: retrieving IP information from BOOTP response\n"); - } - } - if (pkt != NULL) { - struct in_addr * ip; - int len; - dhcpol_t options; - struct dhcp * reply; - - reply = (struct dhcp *)pkt; - (void)dhcpol_parse_packet(&options, reply, pkt_len, NULL); - *iaddr_p = reply->dp_yiaddr; - ip = (struct in_addr *) - dhcpol_find(&options, - dhcptag_subnet_mask_e, &len, NULL); - if (ip) { - *netmask_p = *ip; - } - ip = (struct in_addr *) - dhcpol_find(&options, dhcptag_router_e, &len, NULL); - if (ip) { - *router_p = *ip; - } - } - IOBSDRegistryEntryRelease(entry); - return (pkt != NULL); -} + void * entry; + const void * pkt; + int pkt_len; -static int -inet_aifaddr(struct socket * so, char * name, const struct in_addr * addr, - const struct in_addr * mask, - const struct in_addr * broadcast) -{ - struct sockaddr blank_sin; - struct ifaliasreq ifra; - - bzero(&blank_sin, sizeof(blank_sin)); - blank_sin.sa_len = sizeof(blank_sin); - blank_sin.sa_family = AF_INET; - - bzero(&ifra, sizeof(ifra)); - strncpy(ifra.ifra_name, name, sizeof(ifra.ifra_name)); - if (addr) { - ifra.ifra_addr = blank_sin; - ((struct sockaddr_in *)&ifra.ifra_addr)->sin_addr = *addr; - } - if (mask) { - ifra.ifra_mask = blank_sin; - ((struct sockaddr_in *)&ifra.ifra_mask)->sin_addr = *mask; - } - if (broadcast) { - ifra.ifra_broadaddr = blank_sin; - ((struct sockaddr_in *)&ifra.ifra_broadaddr)->sin_addr = *broadcast; - } - return (ifioctl(so, SIOCAIFADDR, (caddr_t)&ifra, current_proc())); + + entry = IOBSDRegistryEntryForDeviceTree("/chosen"); + if (entry == NULL) { + return FALSE; + } + pkt = IOBSDRegistryEntryGetData(entry, DHCP_RESPONSE, &pkt_len); + if (pkt != NULL && pkt_len >= (int)sizeof(struct dhcp)) { + printf("netboot: retrieving IP information from DHCP response\n"); + } else { + pkt = IOBSDRegistryEntryGetData(entry, BOOTP_RESPONSE, &pkt_len); + if (pkt != NULL && pkt_len >= (int)sizeof(struct dhcp)) { + printf("netboot: retrieving IP information from BOOTP response\n"); + } + } + if (pkt != NULL) { + const struct in_addr * ip; + int len; + dhcpol_t options; + const struct dhcp * reply; + + reply = (const struct dhcp *)pkt; + (void)dhcpol_parse_packet(&options, reply, pkt_len); + *iaddr_p = reply->dp_yiaddr; + ip = (const struct in_addr *) + dhcpol_find(&options, + dhcptag_subnet_mask_e, &len, NULL); + if (ip) { + *netmask_p = *ip; + } + ip = (const struct in_addr *) + dhcpol_find(&options, dhcptag_router_e, &len, NULL); + if (ip) { + *router_p = *ip; + } + } + IOBSDRegistryEntryRelease(entry); + return pkt != NULL; } static int -route_cmd(int cmd, struct in_addr d, struct in_addr g, - struct in_addr m, u_long more_flags) +route_cmd(int cmd, struct in_addr d, struct in_addr g, + struct in_addr m, uint32_t more_flags, unsigned int ifscope) { - struct sockaddr_in dst; - u_long flags = RTF_UP | RTF_STATIC; - struct sockaddr_in gw; - struct sockaddr_in mask; - - flags |= more_flags; - - /* destination */ - bzero((caddr_t)&dst, sizeof(dst)); - dst.sin_len = sizeof(dst); - dst.sin_family = AF_INET; - dst.sin_addr = d; - - /* gateway */ - bzero((caddr_t)&gw, sizeof(gw)); - gw.sin_len = sizeof(gw); - gw.sin_family = AF_INET; - gw.sin_addr = g; - - /* mask */ - bzero(&mask, sizeof(mask)); - mask.sin_len = sizeof(mask); - mask.sin_family = AF_INET; - mask.sin_addr = m; - - return (rtrequest(cmd, (struct sockaddr *)&dst, (struct sockaddr *)&gw, - (struct sockaddr *)&mask, flags, NULL)); + struct sockaddr_in dst; + int error; + uint32_t flags = RTF_UP | RTF_STATIC; + struct sockaddr_in gw; + struct sockaddr_in mask; + + flags |= more_flags; + + /* destination */ + bzero((caddr_t)&dst, sizeof(dst)); + dst.sin_len = sizeof(dst); + dst.sin_family = AF_INET; + dst.sin_addr = d; + + /* gateway */ + bzero((caddr_t)&gw, sizeof(gw)); + gw.sin_len = sizeof(gw); + gw.sin_family = AF_INET; + gw.sin_addr = g; + + /* mask */ + bzero(&mask, sizeof(mask)); + mask.sin_len = sizeof(mask); + mask.sin_family = AF_INET; + mask.sin_addr = m; + + error = rtrequest_scoped(cmd, (struct sockaddr *)&dst, + (struct sockaddr *)&gw, (struct sockaddr *)&mask, flags, NULL, ifscope); + + return error; } static int default_route_add(struct in_addr router, boolean_t proxy_arp) { - u_long flags = 0; - struct in_addr zeroes = { 0 }; - - if (proxy_arp == FALSE) { - flags |= RTF_GATEWAY; - } - return (route_cmd(RTM_ADD, zeroes, router, zeroes, flags)); + uint32_t flags = 0; + struct in_addr zeroes = { .s_addr = 0 }; + + if (proxy_arp == FALSE) { + flags |= RTF_GATEWAY; + } + return route_cmd(RTM_ADD, zeroes, router, zeroes, flags, IFSCOPE_NONE); } static int -host_route_delete(struct in_addr host) +host_route_delete(struct in_addr host, unsigned int ifscope) { - struct in_addr zeroes = { 0 }; - - return (route_cmd(RTM_DELETE, host, zeroes, zeroes, RTF_HOST)); + struct in_addr zeroes = { .s_addr = 0 }; + + return route_cmd(RTM_DELETE, host, zeroes, zeroes, RTF_HOST, ifscope); } static struct ifnet * find_interface(void) { - struct ifnet * ifp = NULL; + struct ifnet * ifp = NULL; - if (rootdevice[0]) { - ifp = ifunit(rootdevice); - } - if (ifp == NULL) { + dlil_if_lock(); + if (rootdevice[0]) { + ifp = ifunit((char *)rootdevice); + } + if (ifp == NULL) { ifnet_head_lock_shared(); TAILQ_FOREACH(ifp, &ifnet_head, if_link) - if ((ifp->if_flags & (IFF_LOOPBACK|IFF_POINTOPOINT)) == 0) - break; + if ((ifp->if_flags & (IFF_LOOPBACK | IFF_POINTOPOINT)) == 0) { + break; + } ifnet_head_done(); - } - return (ifp); + } + dlil_if_unlock(); + return ifp; +} + +static const struct sockaddr_in blank_sin = { + .sin_len = sizeof(struct sockaddr_in), + .sin_family = AF_INET, + .sin_port = 0, + .sin_addr = { .s_addr = 0 }, + .sin_zero = { 0, 0, 0, 0, 0, 0, 0, 0 } +}; + +static int +inet_aifaddr(struct socket * so, const char * name, + const struct in_addr * addr, + const struct in_addr * mask, + const struct in_addr * broadcast) +{ + struct ifaliasreq ifra; + + bzero(&ifra, sizeof(ifra)); + strlcpy(ifra.ifra_name, name, sizeof(ifra.ifra_name)); + if (addr) { + *((struct sockaddr_in *)(void *)&ifra.ifra_addr) = blank_sin; + ((struct sockaddr_in *)(void *)&ifra.ifra_addr)->sin_addr = *addr; + } + if (mask) { + *((struct sockaddr_in *)(void *)&ifra.ifra_mask) = blank_sin; + ((struct sockaddr_in *)(void *)&ifra.ifra_mask)->sin_addr = *mask; + } + if (broadcast) { + *((struct sockaddr_in *)(void *)&ifra.ifra_broadaddr) = blank_sin; + ((struct sockaddr_in *)(void *)&ifra.ifra_broadaddr)->sin_addr = *broadcast; + } + return ifioctl(so, SIOCAIFADDR, (caddr_t)&ifra, current_proc()); } + int netboot_mountroot(void) { - int error = 0; - struct in_addr iaddr = { 0 }; - struct ifreq ifr; - struct ifnet * ifp; - struct in_addr netmask = { 0 }; - struct proc * procp = current_proc(); - struct in_addr router = { 0 }; - struct socket * so = NULL; - unsigned int try; - - bzero(&ifr, sizeof(ifr)); - - - /* find the interface */ - ifp = find_interface(); - if (ifp == NULL) { - printf("netboot: no suitable interface\n"); - error = ENXIO; - goto failed; - } - sprintf(ifr.ifr_name, "%s%d", ifp->if_name, ifp->if_unit); - printf("netboot: using network interface '%s'\n", ifr.ifr_name); - - /* bring it up */ - if ((error = socreate(AF_INET, &so, SOCK_DGRAM, 0)) != 0) { - printf("netboot: socreate, error=%d\n", error); - goto failed; - } - ifr.ifr_flags = ifp->if_flags | IFF_UP; - error = ifioctl(so, SIOCSIFFLAGS, (caddr_t)&ifr, procp); - if (error) { - printf("netboot: SIFFLAGS, error=%d\n", error); - goto failed; - } - - /* grab information from the registry */ - if (get_ip_parameters(&iaddr, &netmask, &router) == FALSE) { - /* use BOOTP to retrieve IP address, netmask and router */ - error = bootp(ifp, &iaddr, 32, &netmask, &router, procp); + int error = 0; + struct in_addr iaddr = { .s_addr = 0 }; + struct ifreq ifr; + struct ifnet * ifp; + struct in_addr netmask = { .s_addr = 0 }; + proc_t procp = current_proc(); + struct in_addr router = { .s_addr = 0 }; + struct socket * so = NULL; + unsigned int try; + + bzero(&ifr, sizeof(ifr)); + + /* find the interface */ + ifp = find_interface(); + if (ifp == NULL) { + printf("netboot: no suitable interface\n"); + error = ENXIO; + goto failed; + } + snprintf(ifr.ifr_name, sizeof(ifr.ifr_name), "%s", if_name(ifp)); + printf("netboot: using network interface '%s'\n", ifr.ifr_name); + + /* bring it up */ + if ((error = socreate(AF_INET, &so, SOCK_DGRAM, 0)) != 0) { + printf("netboot: socreate, error=%d\n", error); + goto failed; + } + ifr.ifr_flags = ifp->if_flags | IFF_UP; + error = ifioctl(so, SIOCSIFFLAGS, (caddr_t)&ifr, procp); if (error) { - printf("netboot: BOOTP failed %d\n", error); - goto failed; - } - } - printf("netboot: IP address " IP_FORMAT, IP_LIST(&iaddr)); - if (netmask.s_addr) { - printf(" netmask " IP_FORMAT, IP_LIST(&netmask)); - } - if (router.s_addr) { - printf(" router " IP_FORMAT, IP_LIST(&router)); - } - printf("\n"); - error = inet_aifaddr(so, ifr.ifr_name, &iaddr, &netmask, NULL); - if (error) { - printf("netboot: inet_aifaddr failed, %d\n", error); - goto failed; - } - if (router.s_addr == 0) { - /* enable proxy arp if we don't have a router */ - router.s_addr = iaddr.s_addr; - } - printf("netboot: adding default route " IP_FORMAT "\n", - IP_LIST(&router)); - error = default_route_add(router, router.s_addr == iaddr.s_addr); - if (error) { - printf("netboot: default_route_add failed %d\n", error); - } - - soclose(so); - - S_netboot_info_p = netboot_info_init(iaddr); - switch (S_netboot_info_p->image_type) { - default: - case kNetBootImageTypeNFS: - for (try = 1; TRUE; try++) { - error = nfs_mountroot(); - if (error == 0) { - break; - } - printf("netboot: nfs_mountroot() attempt %u failed; " - "clearing ARP entry and trying again\n", try); - /* - * error is either EHOSTDOWN or EHOSTUNREACH, which likely means - * that the port we're plugged into has spanning tree enabled, - * and either the router or the server can't answer our ARP - * requests. Clear the incomplete ARP entry by removing the - * appropriate route, depending on the error code: - * EHOSTDOWN NFS server's route - * EHOSTUNREACH router's route - */ - switch (error) { - default: - /* NOT REACHED */ - case EHOSTDOWN: - /* remove the server's arp entry */ - error = host_route_delete(S_netboot_info_p->server_ip); - if (error) { - printf("netboot: host_route_delete(" IP_FORMAT - ") failed %d\n", - IP_LIST(&S_netboot_info_p->server_ip), error); + printf("netboot: SIFFLAGS, error=%d\n", error); + goto failed; + } + + /* grab information from the registry */ + if (get_ip_parameters(&iaddr, &netmask, &router) == FALSE) { + printf("netboot: can't retrieve IP parameters\n"); + goto failed; + } + printf("netboot: IP address " IP_FORMAT, IP_LIST(&iaddr)); + if (netmask.s_addr) { + printf(" netmask " IP_FORMAT, IP_LIST(&netmask)); + } + if (router.s_addr) { + printf(" router " IP_FORMAT, IP_LIST(&router)); + } + printf("\n"); + error = inet_aifaddr(so, ifr.ifr_name, &iaddr, &netmask, NULL); + if (error) { + printf("netboot: inet_aifaddr failed, %d\n", error); + goto failed; + } + if (router.s_addr == 0) { + /* enable proxy arp if we don't have a router */ + router.s_addr = iaddr.s_addr; + } + printf("netboot: adding default route " IP_FORMAT "\n", + IP_LIST(&router)); + error = default_route_add(router, router.s_addr == iaddr.s_addr); + if (error) { + printf("netboot: default_route_add failed %d\n", error); + } + + soclose(so); + + S_netboot_info_p = netboot_info_init(iaddr); + switch (S_netboot_info_p->image_type) { + default: + case kNetBootImageTypeNFS: + for (try = 1; TRUE; try++) { + error = nfs_mountroot(); + if (error == 0) { + break; + } + printf("netboot: nfs_mountroot() attempt %u failed; " + "clearing ARP entry and trying again\n", try); + /* + * error is either EHOSTDOWN or EHOSTUNREACH, which likely means + * that the port we're plugged into has spanning tree enabled, + * and either the router or the server can't answer our ARP + * requests. Clear the incomplete ARP entry by removing the + * appropriate route, depending on the error code: + * EHOSTDOWN NFS server's route + * EHOSTUNREACH router's route + */ + switch (error) { + default: + /* NOT REACHED */ + case EHOSTDOWN: + /* remove the server's arp entry */ + error = host_route_delete(S_netboot_info_p->server_ip, + ifp->if_index); + if (error) { + printf("netboot: host_route_delete(" IP_FORMAT + ") failed %d\n", + IP_LIST(&S_netboot_info_p->server_ip), error); + } + break; + case EHOSTUNREACH: + error = host_route_delete(router, ifp->if_index); + if (error) { + printf("netboot: host_route_delete(" IP_FORMAT + ") failed %d\n", IP_LIST(&router), error); + } + break; + } } break; - case EHOSTUNREACH: - error = host_route_delete(router); - if (error) { - printf("netboot: host_route_delete(" IP_FORMAT - ") failed %d\n", IP_LIST(&router), error); - } + case kNetBootImageTypeHTTP: + error = netboot_setup(); break; - } - } - break; - case kNetBootImageTypeHTTP: - error = netboot_setup(procp); - break; - } - if (error == 0) { - S_netboot = 1; - } - else { - S_netboot = 0; - } - return (error); + } + if (error == 0) { + S_netboot = 1; + } else { + S_netboot = 0; + } + return error; failed: - if (so != NULL) { - soclose(so); - } - return (error); + if (so != NULL) { + soclose(so); + } + return error; } int -netboot_setup(struct proc * p) +netboot_setup(void) { - dev_t dev; - int error = 0; - - if (S_netboot_info_p == NULL - || S_netboot_info_p->image_path == NULL) { - goto done; - } - if (S_netboot_info_p->use_hdix) { - printf("netboot_setup: calling di_root_image\n"); - error = di_root_image(S_netboot_info_p->image_path, - rootdevice, &dev); - if (error) { - printf("netboot_setup: di_root_image: failed %d\n", error); - goto done; - } - } - else { - printf("netboot_setup: calling vndevice_root_image\n"); - error = vndevice_root_image(S_netboot_info_p->image_path, - rootdevice, &dev); - if (error) { - printf("netboot_setup: vndevice_root_image: failed %d\n", error); - goto done; - } - } - rootdev = dev; - mountroot = NULL; - printf("netboot: root device 0x%x\n", rootdev); - error = vfs_mountroot(); - if (error == 0 && rootvnode != NULL) { - struct vnode *tvp; - struct vnode *newdp; - struct vfs_context context; - - context.vc_proc = p; - context.vc_ucred = proc_ucred(p); /* XXX kauth_cred_get() ??? proxy */ - - /* Get the vnode for '/'. Set fdp->fd_fd.fd_cdir to reference it. */ - if (VFS_ROOT(mountlist.tqh_last, &newdp, &context)) - panic("netboot_setup: cannot find root vnode"); - vnode_ref(newdp); - vnode_put(newdp); - tvp = rootvnode; - vnode_rele(tvp); - filedesc0.fd_cdir = newdp; - rootvnode = newdp; - mount_list_lock(); - TAILQ_REMOVE(&mountlist, TAILQ_FIRST(&mountlist), mnt_list); - mount_list_unlock(); - mountlist.tqh_first->mnt_flag |= MNT_ROOTFS; - } - done: - netboot_info_free(&S_netboot_info_p); - return (error); + int error = 0; + + if (S_netboot_info_p == NULL + || S_netboot_info_p->image_path == NULL) { + goto done; + } + printf("netboot_setup: calling imageboot_mount_image\n"); + error = imageboot_mount_image(S_netboot_info_p->image_path, -1, IMAGEBOOT_DMG); + if (error != 0) { + printf("netboot: failed to mount root image, %d\n", error); + } else if (S_netboot_info_p->second_image_path != NULL) { + error = imageboot_mount_image(S_netboot_info_p->second_image_path, 0, IMAGEBOOT_DMG); + if (error != 0) { + printf("netboot: failed to mount second root image, %d\n", error); + } + } + +done: + netboot_info_free(&S_netboot_info_p); + return error; } int netboot_root(void) { - return (S_netboot); + return S_netboot; }