Home | History | Annotate | Line # | Download | only in boot
boot.c revision 1.4
      1 /*	$NetBSD: boot.c,v 1.4 2004/04/10 12:30:26 tsutsui Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2003 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Jonathan Stone, Michael Hitch, Simon Burge and Wayne Knowles.
      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  * 3. All advertising materials mentioning features or use of this software
     19  *    must display the following acknowledgement:
     20  *        This product includes software developed by the NetBSD
     21  *        Foundation, Inc. and its contributors.
     22  * 4. Neither the name of The NetBSD Foundation nor the names of its
     23  *    contributors may be used to endorse or promote products derived
     24  *    from this software without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     36  * POSSIBILITY OF SUCH DAMAGE.
     37  */
     38 
     39 /*
     40  * Copyright (c) 1992, 1993
     41  *	The Regents of the University of California.  All rights reserved.
     42  *
     43  * This code is derived from software contributed to Berkeley by
     44  * Ralph Campbell.
     45  *
     46  * Redistribution and use in source and binary forms, with or without
     47  * modification, are permitted provided that the following conditions
     48  * are met:
     49  * 1. Redistributions of source code must retain the above copyright
     50  *    notice, this list of conditions and the following disclaimer.
     51  * 2. Redistributions in binary form must reproduce the above copyright
     52  *    notice, this list of conditions and the following disclaimer in the
     53  *    documentation and/or other materials provided with the distribution.
     54  * 3. Neither the name of the University nor the names of its contributors
     55  *    may be used to endorse or promote products derived from this software
     56  *    without specific prior written permission.
     57  *
     58  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     59  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     60  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     61  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     62  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     63  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     64  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     65  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     66  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     67  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     68  * SUCH DAMAGE.
     69  *
     70  *	@(#)boot.c	8.1 (Berkeley) 6/10/93
     71  */
     72 
     73 #include <machine/cpu.h>
     74 #include <machine/leds.h>
     75 #include <machine/vmparam.h>
     76 
     77 #include <lib/libsa/stand.h>
     78 #include <lib/libsa/loadfile.h>
     79 #include <lib/libkern/libkern.h>
     80 
     81 #include <sys/param.h>
     82 #include <sys/boot_flag.h>
     83 #include <sys/exec.h>
     84 #include <sys/exec_elf.h>
     85 
     86 #include "boot.h"
     87 #include "cons.h"
     88 #include "common.h"
     89 #include "bootinfo.h"
     90 
     91 char *kernelnames[] = {
     92 	"netbsd",
     93 	"netbsd.gz",
     94 	"onetbsd",
     95 	"onetbsd.gz",
     96 	"netbsd.bak",
     97 	"netbsd.bak.gz",
     98 	"netbsd.old",
     99 	"netbsd.old.gz",
    100 	"netbsd.cobalt",
    101 	"netbsd.cobalt.gz",
    102 	"netbsd.elf",
    103 	"netbsd.elf.gz",
    104 	NULL
    105 };
    106 
    107 extern u_long end;		/* Boot loader code end address */
    108 void start(void);
    109 
    110 static char *bootstring;
    111 
    112 static int patch_bootstring	(char *bootspec);
    113 static int get_bsdbootname(char **, char **);
    114 static int parse_bootname(char *, int, char **, char **);
    115 static int prominit		(unsigned int memsize);
    116 static int print_banner		(unsigned int memsize);
    117 
    118 int cpu_reboot(void);
    119 
    120 int main(unsigned int memsize);
    121 
    122 /*
    123  * Perform CPU reboot.
    124  */
    125 int
    126 cpu_reboot()
    127 {
    128 	printf("rebooting...\n\n");
    129 
    130 	*(volatile char *)MIPS_PHYS_TO_KSEG1(LED_ADDR) = LED_RESET;
    131 	printf("WARNING: reboot failed!\n");
    132 
    133 	for (;;);
    134 }
    135 
    136 /*
    137  * Substitute root value with NetBSD root partition name.
    138  */
    139 int
    140 patch_bootstring(bootspec)
    141 	char *bootspec;
    142 {
    143 	char *sp = bootstring;
    144 	u_int8_t unit, part;
    145 	int dev, error;
    146 	char *file;
    147 
    148 	DPRINTF(("patch_bootstring: %s\n", bootspec));
    149 
    150 	/* get boot parameters */
    151 	if (devparse(bootspec, &dev, &unit, &part, (const char **)&file) != 0)
    152 		unit = part = 0;
    153 
    154 	DPRINTF(("patch_bootstring: %d, %d\n", unit, part));
    155 
    156 	/* take out the 'root=xxx' parameter */
    157 	if ( (sp = strstr(bootstring, "root=")) != NULL) {
    158 		const char *end;
    159 
    160 		end = strchr(sp, ' ');
    161 
    162 		/* strip off leading spaces */
    163 		for (--sp; (sp > bootstring) && (*sp == ' '); --sp)
    164 			;
    165 
    166 		if (end != NULL)
    167 			strcpy(++sp, end);
    168 		else
    169 			*++sp = '\0';
    170 	}
    171 
    172 	DPRINTF(("patch_bootstring: [%s]\n", bootstring));
    173 
    174 #define DEVNAMESIZE	(MAXDEVNAME + sizeof(" root=/dev/hd") + sizeof("0a"))
    175 	/* bsd notation -> linux notation (wd0a -> hda1) */
    176 	if (strlen(bootstring) <= (511 - DEVNAMESIZE)) {
    177 		int len;
    178 
    179 		strcat(bootstring, " root=/dev/hd");
    180 
    181 		len = strlen(bootstring);
    182 		bootstring[len++] = unit + 'a';
    183 		bootstring[len++] = part + '1';
    184 		bootstring[len++] = '\0';
    185 	}
    186 
    187 	DPRINTF(("patch_bootstring: -> %s\n", bootstring));
    188 	return (0);
    189 }
    190 
    191 /*
    192  * Extract NetBSD boot specification
    193  */
    194 static int
    195 get_bsdbootname(dev, kname)
    196 	char **dev;
    197 	char **kname;
    198 {
    199 	int len, error;
    200 	char *bootstr_dev, *bootstr_kname;
    201 	char *prompt_dev, *prompt_kname;
    202 	char *ptr, *spec;
    203 	char c, namebuf[PATH_MAX];
    204 
    205 	bootstr_dev = prompt_dev = NULL;
    206 	bootstr_kname = prompt_kname = NULL;
    207 
    208 	/* first, get bootname from bootstrings */
    209 	if ((spec = strstr(bootstring, "nbsd=")) != NULL) {
    210 		ptr = strchr(spec, ' ');
    211 		spec += 5; 	/* skip 'nbsd=' */
    212 		len = (ptr == NULL) ? strlen(spec) : ptr - spec;
    213 		if (len > 0) {
    214 			if (parse_bootname(spec, len,
    215 			    &bootstr_dev, &bootstr_kname))
    216 				return 1;
    217 		}
    218 	}
    219 
    220 	DPRINTF(("bootstr_dev = %s, bootstr_kname = %s\n",
    221 	    bootstr_dev ? bootstr_dev : "<NULL>",
    222 	    bootstr_kname ? bootstr_kname : "<NULL>"));
    223 
    224 	spec = NULL;
    225 	len = 0;
    226 
    227 	memset(namebuf, 0, sizeof namebuf);
    228 	printf("Boot [%s:%s]: ",
    229 	    bootstr_dev ? bootstr_dev : DEFBOOTDEV,
    230 	    bootstr_kname ? bootstr_kname : DEFKERNELNAME);
    231 
    232 	if (tgets(namebuf) == -1)
    233 		printf("\n");
    234 
    235 	ptr = namebuf;
    236 	while ((c = *ptr) != '\0') {
    237 		while (c == ' ')
    238 			c = *++ptr;
    239 		if (c == '\0')
    240 			break;
    241 		if (c == '-') {
    242 			while ((c = *++ptr) && c != ' ')
    243 				;
    244 #if notyet
    245 			BOOT_FLAG(c, boothowto);
    246 #endif
    247 		} else {
    248 			spec = ptr;
    249 			while ((c = *++ptr) && c != ' ')
    250 				;
    251 			if (c)
    252 				*ptr++ = '\0';
    253 			len = strlen(spec);
    254 		}
    255 	}
    256 
    257 	if (len > 0) {
    258 		if (parse_bootname(spec, len, &prompt_dev, &prompt_kname))
    259 			return 1;
    260 	}
    261 
    262 	DPRINTF(("prompt_dev = %s, prompt_kname = %s\n",
    263 	    prompt_dev ? prompt_dev : "<NULL>",
    264 	    prompt_kname ? prompt_kname : "<NULL>"));
    265 
    266 	if (prompt_dev)
    267 		*dev = prompt_dev;
    268 	else
    269 		*dev = bootstr_dev;
    270 
    271 	if (prompt_kname)
    272 		*kname = prompt_kname;
    273 	else
    274 		*kname = bootstr_kname;
    275 
    276 	DPRINTF(("dev = %s, kname = %s\n",
    277 	    *dev ? *dev : "<NULL>",
    278 	    *kname ? *kname : "<NULL>"));
    279 
    280 	return 0;
    281 }
    282 
    283 static int
    284 parse_bootname(spec, len, dev, kname)
    285 	char *spec;
    286 	int len;
    287 	char **dev;
    288 	char **kname;
    289 {
    290 	char *bootname, *ptr;
    291 
    292 	bootname = alloc(len + 1);
    293 	if (bootname == NULL)
    294 		return 1;
    295 	memcpy(bootname, spec, len);
    296 	bootname[len] = '\0';
    297 
    298 	if ((ptr = memchr(bootname, ':', len)) != NULL) {
    299 		/* "wdXX:kernel" */
    300 		*ptr = '\0';
    301 		*dev = bootname;
    302 		if (*++ptr)
    303 			*kname = ptr;
    304 	} else
    305 		/* "kernel" */
    306 		*kname = bootname;
    307 	return 0;
    308 }
    309 
    310 /*
    311  * Get the bootstring from PROM.
    312  */
    313 int
    314 prominit(memsize)
    315 	unsigned int memsize;
    316 {
    317 	bootstring = (char *)(memsize - 512);
    318 	bootstring[511] = '\0';
    319 }
    320 
    321 /*
    322  * Print boot message.
    323  */
    324 int
    325 print_banner(memsize)
    326 	unsigned int memsize;
    327 {
    328 	printf("\n");
    329 	printf(">> %s " NETBSD_VERS " Bootloader, Revision %s [@%p]\n",
    330 			bootprog_name, bootprog_rev, (void*)&start);
    331 	printf(">> (%s, %s)\n", bootprog_maker, bootprog_date);
    332 	printf(">> Memory:\t\t%u k\n", (memsize - MIPS_KSEG0_START) / 1024);
    333 	printf(">> PROM boot string:\t%s\n", bootstring);
    334 }
    335 
    336 /*
    337  * Entry point.
    338  * Parse PROM boot string, load the kernel and jump into it
    339  */
    340 int
    341 main(memsize)
    342 	unsigned int memsize;
    343 {
    344 	char **namep, *dev, *kernel, *bi_addr;
    345 	char bootpath[PATH_MAX];
    346 	int win;
    347 	u_long marks[MARK_MAX];
    348 	void (*entry) __P((unsigned int, u_int, char*));
    349 
    350 	struct btinfo_flags bi_flags;
    351 	struct btinfo_symtab bi_syms;
    352 	struct btinfo_bootpath bi_bpath;
    353 
    354 	int addr, speed;
    355 
    356 	/* Initialize boot info early */
    357 	bi_flags.bi_flags = 0x0;
    358 	bi_addr = bi_init();
    359 
    360 	prominit(memsize);
    361 	if (cninit(&addr, &speed) != NULL)
    362 		bi_flags.bi_flags |= BI_SERIAL_CONSOLE;
    363 
    364 	print_banner(memsize);
    365 
    366 	memset(marks, 0, sizeof marks);
    367 	get_bsdbootname(&dev, &kernel);
    368 
    369 	if (kernel != NULL) {
    370 		DPRINTF(("kernel: %s\n", kernel));
    371 		kernelnames[0] = kernel;
    372 		kernelnames[1] = NULL;
    373 	} else {
    374 		DPRINTF(("kernel: NULL\n"));
    375 	}
    376 
    377 	win = 0;
    378 	DPRINTF(("Kernel names: %p\n", kernelnames));
    379 	for (namep = kernelnames, win = 0; (*namep != NULL) && !win; namep++) {
    380 		kernel = *namep;
    381 
    382 		bootpath[0] = '\0';
    383 
    384 		strcpy(bootpath, dev ? dev : DEFBOOTDEV);
    385 		strcat(bootpath, ":");
    386 		strcat(bootpath, kernel);
    387 
    388 		printf("Loading: %s\n", bootpath);
    389 		patch_bootstring(bootpath);
    390 		win = (loadfile(bootpath, marks, LOAD_ALL) != -1);
    391 	}
    392 
    393 	if (win) {
    394 		strncpy(bi_bpath.bootpath, kernel, BTINFO_BOOTPATH_LEN);
    395 		bi_add(&bi_bpath, BTINFO_BOOTPATH, sizeof(bi_bpath));
    396 
    397 		entry = (void *) marks[MARK_ENTRY];
    398 		bi_syms.nsym = marks[MARK_NSYM];
    399 		bi_syms.ssym = marks[MARK_SYM];
    400 		bi_syms.esym = marks[MARK_END];
    401 		bi_add(&bi_syms, BTINFO_SYMTAB, sizeof(bi_syms));
    402 
    403 		bi_add(&bi_flags, BTINFO_FLAGS, sizeof(bi_flags));
    404 
    405 		entry = (void *) marks[MARK_ENTRY];
    406 
    407 		DPRINTF(("Bootinfo @ 0x%x\n", bi_addr));
    408 		printf("Starting at 0x%x\n\n", (u_int)entry);
    409 		(*entry)(memsize, BOOTINFO_MAGIC, bi_addr);
    410 	}
    411 
    412 	(void)printf("Boot failed! Rebooting...\n");
    413 	return (0);
    414 }
    415