xref: /netbsd-src/sys/arch/pmax/stand/common/boot.c (revision 404fbe5fb94ca1e054339640cabb2801ce52dd30)
1 /*	$NetBSD: boot.c,v 1.16 2008/04/28 20:23:31 martin Exp $	*/
2 
3 /*-
4  * Copyright (c) 1999 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 and Simon Burge.
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) 1992, 1993
34  *	The Regents of the University of California.  All rights reserved.
35  *
36  * This code is derived from software contributed to Berkeley by
37  * Ralph Campbell.
38  *
39  * Redistribution and use in source and binary forms, with or without
40  * modification, are permitted provided that the following conditions
41  * are met:
42  * 1. Redistributions of source code must retain the above copyright
43  *    notice, this list of conditions and the following disclaimer.
44  * 2. Redistributions in binary form must reproduce the above copyright
45  *    notice, this list of conditions and the following disclaimer in the
46  *    documentation and/or other materials provided with the distribution.
47  * 3. Neither the name of the University nor the names of its contributors
48  *    may be used to endorse or promote products derived from this software
49  *    without specific prior written permission.
50  *
51  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
52  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
53  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
54  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
55  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
56  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
57  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
58  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
59  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
60  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
61  * SUCH DAMAGE.
62  *
63  *	@(#)boot.c	8.1 (Berkeley) 6/10/93
64  */
65 
66 #include <lib/libsa/stand.h>
67 #include <lib/libsa/loadfile.h>
68 #include <lib/libkern/libkern.h>
69 
70 #include <sys/param.h>
71 #include <sys/exec.h>
72 #include <sys/exec_elf.h>
73 
74 #include <machine/dec_prom.h>
75 
76 #include "common.h"
77 #include "bootinfo.h"
78 
79 /*
80  * We won't go overboard with gzip'd kernel names.  After all we can
81  * still boot a gzip'd kernel called "netbsd.pmax" - it doesn't need
82  * the .gz suffix.
83  */
84 char *kernelnames[] = {
85 	"netbsd.pmax",
86 	"netbsd",	"netbsd.gz",
87 	"netbsd.bak",
88 	"netbsd.old",
89 	"onetbsd",
90 	"gennetbsd",
91 #ifdef notyet
92 	"netbsd.el",
93 #endif /*notyet*/
94 	NULL
95 };
96 
97 
98 static char *devname __P((char *));
99 int main __P((int, char **));
100 
101 /*
102  * This gets arguments from the first stage boot lader, calls PROM routines
103  * to open and load the program to boot, and then transfers execution to
104  * that new program.
105  *
106  * Argv[0] should be something like "rz(0,0,0)netbsd" on a DECstation 3100.
107  * Argv[0,1] should be something like "boot 5/rz0/netbsd" on a DECstation 5000.
108  * The argument "-a" means netbsd should do an automatic reboot.
109  */
110 int
111 main(argc, argv)
112 	int argc;
113 	char **argv;
114 {
115 	char *name, **namep, *dev, *kernel;
116 	char bootname[PATH_MAX], bootpath[PATH_MAX];
117 	int entry, win;
118 	u_long marks[MARK_MAX];
119 	struct btinfo_symtab bi_syms;
120 	struct btinfo_bootpath bi_bpath;
121 
122 	/* print a banner */
123 	printf("\n");
124 	printf("NetBSD/pmax " NETBSD_VERS " " BOOT_TYPE_NAME " Bootstrap, Revision %s\n",
125 	    bootprog_rev);
126 	printf("(%s, %s)\n", bootprog_maker, bootprog_date);
127 	printf("\n");
128 
129 	/* initialise bootinfo structure early */
130 	bi_init(BOOTINFO_ADDR);
131 
132 	/* check for DS5000 boot */
133 	if (strcmp(argv[0], "boot") == 0) {
134 		argc--;
135 		argv++;
136 	}
137 	name = argv[0];
138 	printf("Boot: %s\n", name);
139 
140 	/* NOTE: devname() can modify bootname[]. */
141 	strcpy(bootname, argv[0]);
142 	if ((kernel = devname(bootname)) == NULL) {
143 		dev = bootname;
144 		name = NULL;
145 	}
146 
147 	memset(marks, 0, sizeof marks);
148 	if (name != NULL)
149 		win = (loadfile(name, marks, LOAD_KERNEL) == 0);
150 	else {
151 		win = 0;
152 		for (namep = kernelnames, win = 0; *namep != NULL && !win;
153 		    namep++) {
154 			kernel = *namep;
155 			strcpy(bootpath, dev);
156 			strcat(bootpath, kernel);
157 			printf("Loading: %s\n", bootpath);
158 			win = (loadfile(bootpath, marks, LOAD_ALL) != -1);
159 			if (win) {
160 				name = bootpath;
161 			}
162 		}
163 	}
164 	if (!win)
165 		goto fail;
166 
167 	strncpy(bi_bpath.bootpath, kernel, BTINFO_BOOTPATH_LEN);
168 	bi_add(&bi_bpath, BTINFO_BOOTPATH, sizeof(bi_bpath));
169 
170 	entry = marks[MARK_ENTRY];
171 	bi_syms.nsym = marks[MARK_NSYM];
172 	bi_syms.ssym = marks[MARK_SYM];
173 	bi_syms.esym = marks[MARK_END];
174 	bi_add(&bi_syms, BTINFO_SYMTAB, sizeof(bi_syms));
175 
176 	printf("Starting at 0x%x\n\n", entry);
177 	if (callv == &callvec)
178 		startprog(entry, entry, argc, argv, 0, 0,
179 		    BOOTINFO_MAGIC, BOOTINFO_ADDR);
180 	else
181 		startprog(entry, entry, argc, argv, DEC_PROM_MAGIC,
182 		    callv, BOOTINFO_MAGIC, BOOTINFO_ADDR);
183 	(void)printf("KERNEL RETURNED!\n");
184 
185 fail:
186 	(void)printf("Boot failed!  Halting...\n");
187 	return (0);
188 }
189 
190 
191 /*
192  * Check whether or not fname is a device name only or a full
193  * bootpath including the kernel name.  This code to do this
194  * is copied from loadfile() in the first stage bootblocks.
195  * Returns the kernel name, or NULL if no kernel name specified.
196  *
197  * NOTE:  fname will be modified if it's of the form N/rzY
198  *        without a trailing slash.
199  */
200 static char *
201 devname(fname)
202 	char *fname;
203 {
204 	char c;
205 
206 	while ((c = *fname++) != '\0') {
207 		if (c == ')')
208 			break;
209 		if (c != '/')
210 			continue;
211 		while ((c = *fname++) != '\0')
212 			if (c == '/')
213 				break;
214 		/*
215 		 * Make "N/rzY" with no trailing '/' valid by adding
216 		 * the extra '/' before appending 'boot.pmax' to the path.
217 		 */
218 		if (c != '/') {
219 			fname--;
220 			*fname++ = '/';
221 			*fname = '\0';
222 		}
223 		break;
224 	}
225 	return (*fname == '\0' ? NULL : fname);
226 }
227