Home | History | Annotate | Line # | Download | only in ofwboot
boot.c revision 1.23.4.1
      1 /*	$NetBSD: boot.c,v 1.23.4.1 2010/04/30 14:39:35 uebayasi 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 char bootfile[MAXBOOTPATHLEN];
     97 int boothowto;
     98 bool floppyboot;
     99 
    100 static int ofw_version = 0;
    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 	freeall();
    185 
    186 	/*
    187 	 * Stash pointer to end of symbol table after the argument
    188 	 * strings.
    189 	 */
    190 	l = strlen(args) + 1;
    191 	memcpy(args + l, &ssym, sizeof(ssym));
    192 	l += sizeof(ssym);
    193 	memcpy(args + l, &esym, sizeof(esym));
    194 	l += sizeof(esym);
    195 	l += sizeof(int);	/* XXX */
    196 
    197 	OF_chain((void *) RELOC, end - (char *) RELOC, entry, args, l);
    198 	panic("chain");
    199 }
    200 
    201 __dead void
    202 _rtt(void)
    203 {
    204 
    205 	OF_exit();
    206 }
    207 
    208 void
    209 main(void)
    210 {
    211 	extern char bootprog_name[], bootprog_rev[],
    212 		    bootprog_maker[], bootprog_date[];
    213 	int chosen, options, openprom;
    214 	char bootline[512];		/* Should check size? */
    215 	char *cp;
    216 	u_long marks[MARK_MAX];
    217 	u_int32_t entry;
    218 	void *ssym, *esym;
    219 
    220 	printf("\n");
    221 	printf(">> %s, Revision %s\n", bootprog_name, bootprog_rev);
    222 	printf(">> (%s, %s)\n", bootprog_maker, bootprog_date);
    223 
    224 	/*
    225 	 * Figure out what version of Open Firmware...
    226 	 */
    227 	if ((openprom = OF_finddevice("/openprom")) != -1) {
    228 		char model[32];
    229 
    230 		memset(model, 0, sizeof model);
    231 		OF_getprop(openprom, "model", model, sizeof model);
    232 		for (cp = model; *cp; cp++)
    233 			if (*cp >= '0' && *cp <= '9') {
    234 				ofw_version = *cp - '0';
    235 				break;
    236 			}
    237 		DPRINTF(">> Open Firmware version %d.x\n", ofw_version);
    238 	}
    239 
    240 	/*
    241 	 * Get the boot arguments from Openfirmware
    242 	 */
    243 	if ((chosen = OF_finddevice("/chosen")) == -1 ||
    244 	    OF_getprop(chosen, "bootpath", bootdev, sizeof bootdev) < 0 ||
    245 	    OF_getprop(chosen, "bootargs", bootline, sizeof bootline) < 0) {
    246 		printf("Invalid Openfirmware environment\n");
    247 		OF_exit();
    248 	}
    249 
    250 	/*
    251 	 * Some versions of Openfirmware sets bootpath to "".
    252 	 * We use boot-device instead if it occurs.
    253 	 */
    254 	if (bootdev[0] == 0) {
    255 		printf("Cannot use bootpath\n");
    256 		if ((options = OF_finddevice("/options")) == -1 ||
    257 		    OF_getprop(options, "boot-device", bootdev,
    258 			       sizeof bootdev) < 0) {
    259 			printf("Invalid Openfirmware environment\n");
    260 			OF_exit();
    261 		}
    262 		printf("Using boot-device instead\n");
    263 	}
    264 
    265 	prom2boot(bootdev);
    266 	parseargs(bootline, &boothowto);
    267 	DPRINTF("bootline=%s\n", bootline);
    268 
    269 	for (;;) {
    270 		int i, loadflag;
    271 
    272 		if (boothowto & RB_ASKNAME) {
    273 			printf("Boot: ");
    274 			gets(bootline);
    275 			parseargs(bootline, &boothowto);
    276 		}
    277 
    278 		if (bootline[0]) {
    279 			kernels[0] = bootline;
    280 			kernels[1] = NULL;
    281 		}
    282 
    283 		for (i = 0; kernels[i]; i++) {
    284 			floppyboot = is_floppyboot(kernels[i], bootdev);
    285 
    286 			DPRINTF("Trying %s%s\n", kernels[i],
    287 			    floppyboot ? " (floppyboot)" : "");
    288 
    289 			loadflag = LOAD_KERNEL;
    290 			if (floppyboot)
    291 				loadflag &= ~LOAD_NOTE;
    292 
    293 			marks[MARK_START] = 0;
    294 			if (loadfile(kernels[i], marks, loadflag) >= 0)
    295 				goto loaded;
    296 		}
    297 		boothowto |= RB_ASKNAME;
    298 	}
    299 loaded:
    300 
    301 #ifdef	__notyet__
    302 	OF_setprop(chosen, "bootpath", opened_name, 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(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);
    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);
    357 	OF_call_method("open", op->handle, 0, 0);
    358 }
    359 #endif
    360