Home | History | Annotate | Line # | Download | only in ofwboot
boot.c revision 1.30.2.1
      1 /*	$NetBSD: boot.c,v 1.30.2.1 2021/04/03 22:28:30 thorpej Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1997 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Jason R. Thorpe.
      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) 1995, 1996 Wolfgang Solfrank.
     34  * Copyright (C) 1995, 1996 TooLs GmbH.
     35  * All rights reserved.
     36  *
     37  * ELF support derived from NetBSD/alpha's boot loader, written
     38  * by Christopher G. Demetriou.
     39  *
     40  * Redistribution and use in source and binary forms, with or without
     41  * modification, are permitted provided that the following conditions
     42  * are met:
     43  * 1. Redistributions of source code must retain the above copyright
     44  *    notice, this list of conditions and the following disclaimer.
     45  * 2. Redistributions in binary form must reproduce the above copyright
     46  *    notice, this list of conditions and the following disclaimer in the
     47  *    documentation and/or other materials provided with the distribution.
     48  * 3. All advertising materials mentioning features or use of this software
     49  *    must display the following acknowledgement:
     50  *	This product includes software developed by TooLs GmbH.
     51  * 4. The name of TooLs GmbH may not be used to endorse or promote products
     52  *    derived from this software without specific prior written permission.
     53  *
     54  * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
     55  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     56  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     57  * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
     58  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
     59  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
     60  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
     61  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
     62  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
     63  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     64  */
     65 
     66 /*
     67  * First try for the boot code
     68  *
     69  * Input syntax is:
     70  *	[promdev[{:|,}partition]]/[filename] [flags]
     71  */
     72 
     73 #include "boot.h"
     74 
     75 #include <sys/param.h>
     76 #include <sys/boot_flag.h>
     77 #include <sys/disklabel.h>
     78 
     79 #include <lib/libsa/stand.h>
     80 #include <lib/libsa/loadfile.h>
     81 #include <lib/libkern/libkern.h>
     82 
     83 #include "ofdev.h"
     84 #include "openfirm.h"
     85 
     86 extern void __syncicache(void *, size_t); /* in libkern */
     87 
     88 
     89 #ifdef DEBUG
     90 # define DPRINTF printf
     91 #else
     92 # define DPRINTF while (0) printf
     93 #endif
     94 
     95 char bootdev[MAXBOOTPATHLEN];
     96 extern char bootfile[MAXBOOTPATHLEN];
     97 int boothowto;
     98 bool floppyboot;
     99 int ofw_version = 0;
    100 
    101 static const char *kernels[] = { "/netbsd", "/netbsd.gz", "/netbsd.macppc", NULL };
    102 
    103 static void
    104 prom2boot(char *dev)
    105 {
    106 	char *cp;
    107 
    108 	cp = dev + strlen(dev) - 1;
    109 	for (; *cp; cp--) {
    110 		if (*cp == ':') {
    111 			if (ofw_version < 3) {
    112 				/* sd@0:0 -> sd@0 */
    113 				*cp = 0;
    114 				break;
    115 			} else {
    116 				/* disk@0:5,boot -> disk@0:0 */
    117 				strcpy(cp, ":0");
    118 				break;
    119 			}
    120 		}
    121 	}
    122 }
    123 
    124 static void
    125 parseargs(char *str, int *howtop)
    126 {
    127 	char *cp;
    128 
    129 	/* Allow user to drop back to the PROM. */
    130 	if (strcmp(str, "exit") == 0)
    131 		OF_exit();
    132 
    133 	*howtop = 0;
    134 
    135 	cp = str;
    136 	if (*cp == '-')
    137 		goto found;
    138 	for (cp = str; *cp; cp++)
    139 		if (*cp == ' ')
    140 			goto found;
    141 	return;
    142 
    143 found:
    144 	*cp++ = 0;
    145 	while (*cp)
    146 		BOOT_FLAG(*cp++, *howtop);
    147 }
    148 
    149 static bool
    150 is_floppyboot(const char *path, const char *defaultdev)
    151 {
    152 	char dev[MAXBOOTPATHLEN];
    153 	char nam[16];
    154 	int handle, rv;
    155 
    156 	if (parsefilepath(path, dev, NULL, NULL)) {
    157 		if (dev[0] == '\0' && defaultdev != NULL)
    158 			strlcpy(dev, defaultdev, sizeof(dev));
    159 
    160 		/* check properties */
    161 		handle = OF_finddevice(dev);
    162 		if (handle != -1) {
    163 			rv = OF_getprop(handle, "name", nam, sizeof(nam));
    164 			if (rv >= 0 &&
    165 			    (strcmp(nam, "swim3") == 0 ||
    166 			     strcmp(nam, "floppy") == 0))
    167 				return true;
    168 		}
    169 
    170 		/* also check devalias */
    171 		if (strcmp(dev, "fd") == 0)
    172 			return true;
    173 	}
    174 
    175 	return false;
    176 }
    177 
    178 static void
    179 chain(boot_entry_t entry, char *args, void *ssym, void *esym)
    180 {
    181 	extern char end[];
    182 	int l;
    183 
    184 #if !defined(HEAP_VARIABLE)
    185 	freeall();
    186 #endif
    187 
    188 	/*
    189 	 * Stash pointer to end of symbol table after the argument
    190 	 * strings.
    191 	 */
    192 	l = strlen(args) + 1;
    193 	memcpy(args + l, &ssym, sizeof(ssym));
    194 	l += sizeof(ssym);
    195 	memcpy(args + l, &esym, sizeof(esym));
    196 	l += sizeof(esym);
    197 	l += sizeof(int);	/* XXX */
    198 
    199 	OF_chain((void *) RELOC, end - (char *) RELOC, entry, args, l);
    200 	panic("chain");
    201 }
    202 
    203 __dead void
    204 _rtt(void)
    205 {
    206 
    207 	OF_exit();
    208 }
    209 
    210 void
    211 main(void)
    212 {
    213 	extern char bootprog_name[], bootprog_rev[];
    214 	char bootline[512];		/* Should check size? */
    215 	char prop[32];
    216 	char *cp;
    217 	u_long marks[MARK_MAX];
    218 	u_int32_t entry;
    219 	void *ssym, *esym;
    220 
    221 	printf("\n");
    222 	printf(">> %s, Revision %s\n", bootprog_name, bootprog_rev);
    223 
    224 	/*
    225 	 * Figure out what version of Open Firmware...
    226 	 */
    227 	if (ofw_openprom != -1) {
    228 		memset(prop, 0, sizeof prop);
    229 		OF_getprop(ofw_openprom, "model", prop, sizeof prop);
    230 		for (cp = prop; *cp; cp++)
    231 			if (*cp >= '0' && *cp <= '9') {
    232 				ofw_version = *cp - '0';
    233 				break;
    234 			}
    235 		printf(">> Open Firmware version %d.x\n", ofw_version);
    236 	}
    237 	printf(">> Open Firmware running in %s-mode.\n",
    238 	    ofw_real_mode ? "real" : "virtual");
    239 
    240 	/*
    241 	 * Get the boot arguments from Openfirmware
    242 	 */
    243 	if (OF_getprop(ofw_chosen, "bootpath", bootdev, sizeof bootdev) < 0 ||
    244 	    OF_getprop(ofw_chosen, "bootargs", bootline, sizeof bootline) < 0) {
    245 		printf("Invalid Openfirmware environment\n");
    246 		OF_exit();
    247 	}
    248 
    249 	/*
    250 	 * Some versions of Openfirmware sets bootpath to "".
    251 	 * We use boot-device instead if it occurs.
    252 	 */
    253 	if (bootdev[0] == 0) {
    254 		printf("Cannot use bootpath\n");
    255 		if (ofw_options == -1 ||
    256 		    OF_getprop(ofw_options, "boot-device", bootdev,
    257 			       sizeof bootdev) < 0) {
    258 			printf("Invalid Openfirmware environment\n");
    259 			OF_exit();
    260 		}
    261 		printf("Using boot-device instead\n");
    262 	}
    263 
    264 	prom2boot(bootdev);
    265 	parseargs(bootline, &boothowto);
    266 	DPRINTF("bootline=%s\n", bootline);
    267 
    268 	for (;;) {
    269 		int i, loadflag;
    270 
    271 		if (boothowto & RB_ASKNAME) {
    272 			printf("Boot: ");
    273 			kgets(bootline, sizeof(bootline));
    274 			parseargs(bootline, &boothowto);
    275 		}
    276 
    277 		if (bootline[0]) {
    278 			kernels[0] = bootline;
    279 			kernels[1] = NULL;
    280 		}
    281 
    282 		for (i = 0; kernels[i]; i++) {
    283 			floppyboot = is_floppyboot(kernels[i], bootdev);
    284 
    285 			DPRINTF("Trying %s%s\n", kernels[i],
    286 			    floppyboot ? " (floppyboot)" : "");
    287 
    288 			loadflag = LOAD_KERNEL;
    289 			if (floppyboot)
    290 				loadflag &= ~LOAD_BACKWARDS;
    291 
    292 			marks[MARK_START] = 0;
    293 			if (loadfile(kernels[i], marks, loadflag) >= 0)
    294 				goto loaded;
    295 		}
    296 		boothowto |= RB_ASKNAME;
    297 	}
    298 loaded:
    299 
    300 #ifdef	__notyet__
    301 	OF_setprop(ofw_chosen, "bootpath", opened_name,
    302 		   strlen(opened_name) + 1);
    303 	cp = bootline;
    304 #else
    305 	strcpy(bootline, opened_name);
    306 	cp = bootline + strlen(bootline);
    307 	*cp++ = ' ';
    308 #endif
    309 	*cp = '-';
    310 	if (boothowto & RB_ASKNAME)
    311 		*++cp = 'a';
    312 	if (boothowto & RB_USERCONF)
    313 		*++cp = 'c';
    314 	if (boothowto & RB_SINGLE)
    315 		*++cp = 's';
    316 	if (boothowto & RB_KDB)
    317 		*++cp = 'd';
    318 	if (*cp == '-')
    319 #ifdef	__notyet__
    320 		*cp = 0;
    321 #else
    322 		*--cp = 0;
    323 #endif
    324 	else
    325 		*++cp = 0;
    326 #ifdef	__notyet__
    327 	OF_setprop(ofw_chosen, "bootargs", bootline, strlen(bootline) + 1);
    328 #endif
    329 
    330 	entry = marks[MARK_ENTRY];
    331 	ssym = (void *)marks[MARK_SYM];
    332 	esym = (void *)marks[MARK_END];
    333 
    334 	printf(" start=0x%x\n", entry);
    335 	__syncicache((void *)(uintptr_t)entry, (size_t)ssym - entry);
    336 	chain((boot_entry_t)(uintptr_t)entry, bootline, ssym, esym);
    337 
    338 	OF_exit();
    339 }
    340 
    341 #ifdef HAVE_CHANGEDISK_HOOK
    342 void
    343 changedisk_hook(struct open_file *of)
    344 {
    345 	struct of_dev *op = of->f_devdata;
    346 	int c;
    347 
    348 	OF_call_method("eject", op->handle, 0, 0, NULL);
    349 
    350 	c = getchar();
    351 	if (c == 'q') {
    352 		printf("quit\n");
    353 		OF_exit();
    354 	}
    355 
    356 	OF_call_method("close", op->handle, 0, 0, NULL);
    357 	OF_call_method("open", op->handle, 0, 0, NULL);
    358 }
    359 #endif
    360