Home | History | Annotate | Line # | Download | only in efiboot
      1 /*	$NetBSD: devopen.c,v 1.14 2023/06/20 07:46:03 rin Exp $	 */
      2 
      3 /*-
      4  * Copyright (c) 2005 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Bang Jun-Young.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 /*
     33  * Copyright (c) 1996, 1997
     34  *	Matthias Drochner.  All rights reserved.
     35  *
     36  * Redistribution and use in source and binary forms, with or without
     37  * modification, are permitted provided that the following conditions
     38  * are met:
     39  * 1. Redistributions of source code must retain the above copyright
     40  *    notice, this list of conditions and the following disclaimer.
     41  * 2. Redistributions in binary form must reproduce the above copyright
     42  *    notice, this list of conditions and the following disclaimer in the
     43  *    documentation and/or other materials provided with the distribution.
     44  *
     45  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     46  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     47  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     48  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     49  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     50  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     51  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     52  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     53  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     54  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     55  */
     56 
     57 #include "efiboot.h"
     58 
     59 #include <lib/libsa/dev_net.h>
     60 #include <lib/libsa/net.h>
     61 
     62 #include <biosdisk.h>
     63 #include "devopen.h"
     64 #include <bootinfo.h>
     65 #include "efidisk.h"
     66 
     67 static int
     68 dev2bios(char *devname, int unit, int *biosdev)
     69 {
     70 
     71 	if (strcmp(devname, "hd") == 0)
     72 		*biosdev = 0x80 + unit;
     73 	else if (strcmp(devname, "cd") == 0)
     74 		*biosdev = 0x80 + get_harddrives() + unit;
     75 	else
     76 		return ENXIO;
     77 
     78 	return 0;
     79 }
     80 
     81 void
     82 bios2dev(int biosdev, daddr_t sector, char **devname, int *unit,
     83 	 int *partition, const char **part_name)
     84 {
     85 	static char savedevname[MAXDEVNAME+1];
     86 
     87 	*unit = biosdev & 0x7f;
     88 
     89 	if (efi_bootdp_type == BOOT_DEVICE_TYPE_NET) {
     90 		*devname = "net";
     91 		*unit = efi_net_get_booted_interface_unit();
     92 		if (*unit < 0)
     93 			*unit = 0;
     94 		*partition = 0;
     95 		return;
     96 	} else if (biosdev >= 0x80 + get_harddrives()) {
     97 		*devname = "cd";
     98 		*unit -= get_harddrives();
     99 	} else
    100 		*devname = "hd";
    101 
    102 	(void)biosdisk_findpartition(biosdev, sector, partition, part_name);
    103 	if (part_name != NULL && *part_name != NULL) {
    104 		snprintf(savedevname, sizeof(savedevname),
    105 		    "NAME=%s", *part_name);
    106 		*devname = savedevname;
    107 	}
    108 }
    109 
    110 #if defined(SUPPORT_NFS) || defined(SUPPORT_TFTP)
    111 const struct netboot_fstab *
    112 netboot_fstab_find(const char *name)
    113 {
    114 	int i;
    115 
    116 	if (strcmp(name, "net") == 0)
    117 		return &netboot_fstab[0];
    118 
    119 	for (i = 0; i < nnetboot_fstab; i++) {
    120 		if (strcmp(name, netboot_fstab[i].name) == 0)
    121 			return &netboot_fstab[i];
    122 	}
    123 
    124 	return NULL;
    125 }
    126 
    127 static const struct netboot_fstab *
    128 netboot_fstab_findn(const char *name, size_t len)
    129 {
    130 	int i;
    131 
    132 	if (strncmp(name, "net", len) == 0)
    133 		return &netboot_fstab[0];
    134 
    135 	for (i = 0; i < nnetboot_fstab; i++) {
    136 		if (strncmp(name, netboot_fstab[i].name, len) == 0)
    137 			return &netboot_fstab[i];
    138 	}
    139 
    140 	return NULL;
    141 }
    142 #endif
    143 
    144 struct btinfo_bootpath bibp;
    145 extern bool kernel_loaded;
    146 
    147 /*
    148  * Open the EFI disk device
    149  */
    150 int
    151 devopen(struct open_file *f, const char *fname, char **file)
    152 {
    153 	char *fsname, *devname;
    154 	const char *xname = NULL;
    155 	int unit, partition;
    156 	int biosdev;
    157 	int error;
    158 #if defined(SUPPORT_NFS) || defined(SUPPORT_TFTP)
    159 	struct devdesc desc;
    160 	const struct netboot_fstab *nf;
    161 	char *filename;
    162 	size_t fsnamelen;
    163 	int i, n;
    164 #endif
    165 
    166 	error = parsebootfile(fname, &fsname, &devname, &unit, &partition,
    167 	    (const char **) file);
    168 	if (error)
    169 		return error;
    170 
    171 	memcpy(file_system, file_system_disk,
    172 	    sizeof(struct fs_ops) * nfsys_disk);
    173 	nfsys = nfsys_disk;
    174 
    175 	/* Search by GPT label or raidframe name */
    176 	if (strstr(devname, "NAME=") == devname)
    177 		xname = devname;
    178 	if (strstr(devname, "raid") == devname)
    179 		xname = fname;
    180 
    181 	if (xname != NULL) {
    182 		f->f_dev = &devsw[0];		/* must be biosdisk */
    183 
    184 		if (!kernel_loaded) {
    185 			strncpy(bibp.bootpath, *file, sizeof(bibp.bootpath));
    186 			BI_ADD(&bibp, BTINFO_BOOTPATH, sizeof(bibp));
    187 		}
    188 
    189 		error = biosdisk_open_name(f, xname);
    190 		return error;
    191 	}
    192 
    193 	/*
    194 	 * Network
    195 	 */
    196 #if defined(SUPPORT_NFS) || defined(SUPPORT_TFTP)
    197 	nf = netboot_fstab_find(devname);
    198 	if (nf != NULL) {
    199 		n = 0;
    200 		if (strcmp(devname, "net") == 0) {
    201 			for (i = 0; i < nnetboot_fstab; i++) {
    202 				memcpy(&file_system[n++], netboot_fstab[i].ops,
    203 				    sizeof(struct fs_ops));
    204 			}
    205 		} else {
    206 			memcpy(&file_system[n++], nf->ops,
    207 			    sizeof(struct fs_ops));
    208 		}
    209 		nfsys = n;
    210 
    211 #ifdef SUPPORT_BOOTP
    212 		try_bootp = 1;
    213 #endif
    214 
    215 		/* If we got passed a filename, pass it to the BOOTP server. */
    216 		if (fname) {
    217 			filename = strchr(fname, ':');
    218 			if (filename != NULL)
    219 				filename++;
    220 			else
    221 				filename = (char *)fname;
    222 			strlcpy(bootfile, filename, sizeof(bootfile));
    223 		}
    224 
    225 		memset(&desc, 0, sizeof(desc));
    226 		strlcpy(desc.d_name, "net", sizeof(desc.d_name));
    227 		desc.d_unit = unit;
    228 
    229 		f->f_dev = &devsw[1];		/* must be net */
    230 		if (!kernel_loaded) {
    231 			strncpy(bibp.bootpath, *file, sizeof(bibp.bootpath));
    232 			BI_ADD(&bibp, BTINFO_BOOTPATH, sizeof(bibp));
    233 		}
    234 		error = DEV_OPEN(f->f_dev)(f, &desc);
    235 		if (error)
    236 			return error;
    237 
    238 		/*
    239 		 * If the DHCP server provided a file name:
    240 		 * - If it contains a ":", assume it points to a NetBSD kernel.
    241 		 * - If not, assume that the DHCP server was not able to pass
    242 		 *   a separate filename for the kernel. (The name probably was
    243 		 *   the same as used to load "efiboot".) Ignore it and use
    244 		 *   the default in this case.
    245 		 * So we cater to simple DHCP servers while being able to use
    246 		 * the power of conditional behaviour in modern ones.
    247 		 */
    248 		filename = strchr(bootfile, ':');
    249 		if (filename != NULL) {
    250 			fname = bootfile;
    251 
    252 			fsnamelen = filename - fname;
    253 			nf = netboot_fstab_findn(fname, fsnamelen);
    254 			if (nf == NULL ||
    255 			    strncmp(fname, "net", fsnamelen) == 0) {
    256 				printf("Invalid file system type specified in "
    257 				    "%s\n", fname);
    258 				error = EINVAL;
    259 				goto neterr;
    260 			}
    261 
    262 			memcpy(file_system, nf->ops, sizeof(struct fs_ops));
    263 			nfsys = 1;
    264 		}
    265 
    266 		filename = fname ? strchr(fname, ':') : NULL;
    267 		if (filename != NULL) {
    268 			filename++;
    269 			if (*filename == '\0') {
    270 				printf("No file specified in %s\n", fname);
    271 				error = EINVAL;
    272 				goto neterr;
    273 			}
    274 		} else
    275 			filename = (char *)fname;
    276 
    277 		*file = filename;
    278 		return 0;
    279 
    280 neterr:
    281 		DEV_CLOSE(f->f_dev)(f);
    282 		f->f_dev = NULL;
    283 		return error;
    284 	}
    285 #endif
    286 
    287 	/*
    288 	 * biosdisk
    289 	 */
    290 	if (strcmp(devname, "esp") == 0) {
    291 		bios2dev(boot_biosdev, boot_biossector, &devname, &unit,
    292 		    &partition, NULL);
    293 		if (efidisk_get_efi_system_partition(boot_biosdev, &partition))
    294 			return ENXIO;
    295 	}
    296 
    297 	error = dev2bios(devname, unit, &biosdev);
    298 	if (error)
    299 		return error;
    300 
    301 	f->f_dev = &devsw[0];		/* must be biosdisk */
    302 
    303 	if (!kernel_loaded) {
    304 		strncpy(bibp.bootpath, *file, sizeof(bibp.bootpath));
    305 		BI_ADD(&bibp, BTINFO_BOOTPATH, sizeof(bibp));
    306 	}
    307 
    308 	return biosdisk_open(f, biosdev, partition);
    309 }
    310