xref: /netbsd/sys/arch/ofppc/stand/ofwboot/boot.c (revision c4a72b64)
1 /*	$NetBSD: boot.c,v 1.12 2002/09/18 01:45:04 chs 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  * 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) 1995, 1996 Wolfgang Solfrank.
41  * Copyright (C) 1995, 1996 TooLs GmbH.
42  * All rights reserved.
43  *
44  * ELF support derived from NetBSD/alpha's boot loader, written
45  * by Christopher G. Demetriou.
46  *
47  * Redistribution and use in source and binary forms, with or without
48  * modification, are permitted provided that the following conditions
49  * are met:
50  * 1. Redistributions of source code must retain the above copyright
51  *    notice, this list of conditions and the following disclaimer.
52  * 2. Redistributions in binary form must reproduce the above copyright
53  *    notice, this list of conditions and the following disclaimer in the
54  *    documentation and/or other materials provided with the distribution.
55  * 3. All advertising materials mentioning features or use of this software
56  *    must display the following acknowledgement:
57  *	This product includes software developed by TooLs GmbH.
58  * 4. The name of TooLs GmbH may not be used to endorse or promote products
59  *    derived from this software without specific prior written permission.
60  *
61  * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
62  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
63  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
64  * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
65  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
66  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
67  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
68  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
69  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
70  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
71  */
72 
73 /*
74  * First try for the boot code
75  *
76  * Input syntax is:
77  *	[promdev[{:|,}partition]]/[filename] [flags]
78  */
79 
80 #define	ELFSIZE		32		/* We use 32-bit ELF. */
81 
82 #include <sys/param.h>
83 #include <sys/exec.h>
84 #include <sys/exec_elf.h>
85 #include <sys/reboot.h>
86 #include <sys/disklabel.h>
87 #include <sys/boot_flag.h>
88 
89 #include <lib/libsa/stand.h>
90 #include <lib/libsa/loadfile.h>
91 #include <lib/libkern/libkern.h>
92 
93 #include <machine/cpu.h>
94 
95 #include "ofdev.h"
96 #include "openfirm.h"
97 
98 #ifdef DEBUG
99 # define DPRINTF printf
100 #else
101 # define DPRINTF while (/*CONSTCOND*/0) printf
102 #endif
103 
104 char bootdev[128];
105 char bootfile[128];
106 int boothowto;
107 int debug;
108 
109 static char *kernels[] = { "/netbsd.ofppc", "/netbsd", "/netbsd.gz", NULL };
110 
111 static void
112 prom2boot(dev)
113 	char *dev;
114 {
115 	char *cp, *ocp;
116 
117 	ocp = cp;
118 	cp = dev + strlen(dev) - 1;
119 	for (; cp >= ocp; cp--) {
120 		if (*cp == ':') {
121 			*cp = '\0';
122 			return;
123 		}
124 	}
125 }
126 
127 static void
128 parseargs(str, howtop)
129 	char *str;
130 	int *howtop;
131 {
132 	char *cp;
133 
134 	/* Allow user to drop back to the PROM. */
135 	if (strcmp(str, "exit") == 0)
136 		OF_exit();
137 	if (strcmp(str, "halt") == 0)
138 		OF_exit();
139 	if (strcmp(str, "reboot") == 0)
140 		OF_boot("");
141 
142 	*howtop = 0;
143 
144 	for (cp = str; *cp; cp++)
145 		if (*cp == ' ' || *cp == '-')
146 			goto found;
147 
148 	return;
149 
150  found:
151 	*cp++ = '\0';
152 	while (*cp)
153 		BOOT_FLAG(*cp++, *howtop);
154 }
155 
156 static void
157 chain(entry, args, ssym, esym)
158 	void (*entry)();
159 	char *args;
160 	void *ssym, *esym;
161 {
162 	extern char end[], *cp;
163 	u_int l, magic = 0x19730224;
164 
165 	freeall();
166 
167 	/*
168 	 * Stash pointer to start and end of symbol table after the argument
169 	 * strings.
170 	 */
171 	l = strlen(args) + 1;
172 	l = (l + 3) & ~3;			/* align */
173 	DPRINTF("magic @ %p\n", args + l);
174 	memcpy(args + l, &magic, sizeof(magic));
175 	l += sizeof(magic);
176 	DPRINTF("ssym @ %p\n", args + l);
177 	memcpy(args + l, &ssym, sizeof(ssym));
178 	l += sizeof(ssym);
179 	DPRINTF("esym @ %p\n", args + l);
180 	memcpy(args + l, &esym, sizeof(esym));
181 	l += sizeof(esym);
182 	DPRINTF("args + l -> %p\n", args + l);
183 
184 	OF_chain((void *)RELOC, end - (char *)RELOC, entry, args, l);
185 	panic("chain");
186 }
187 
188 __dead void
189 _rtt()
190 {
191 
192 	OF_exit();
193 }
194 
195 void
196 main()
197 {
198 	extern char bootprog_name[], bootprog_rev[],
199 		    bootprog_maker[], bootprog_date[];
200 	int chosen, options;
201 	char bootline[512];		/* Should check size? */
202 	char *cp;
203 	u_long marks[MARK_MAX];
204 	u_int32_t entry;
205 	void *ssym, *esym;
206 
207 	printf("\n");
208 	printf(">> %s, Revision %s\n", bootprog_name, bootprog_rev);
209 	printf(">> (%s, %s)\n", bootprog_maker, bootprog_date);
210 
211 	/*
212 	 * Get the boot arguments from Openfirmware
213 	 */
214 	if ((chosen = OF_finddevice("/chosen")) == -1 ||
215 	    OF_getprop(chosen, "bootpath", bootdev, sizeof bootdev) < 0 ||
216 	    OF_getprop(chosen, "bootargs", bootline, sizeof bootline) < 0) {
217 		printf("Invalid Openfirmware environment\n");
218 		OF_exit();
219 	}
220 
221 	prom2boot(bootdev);
222 	parseargs(bootline, &boothowto);
223 	DPRINTF("bootline=%s\n", bootline);
224 
225 	for (;;) {
226 		int i;
227 
228 		if (boothowto & RB_ASKNAME) {
229 			printf("Boot: ");
230 			gets(bootline);
231 			parseargs(bootline, &boothowto);
232 		}
233 
234 		if (bootline[0]) {
235 			kernels[0] = bootline;
236 			kernels[1] = NULL;
237 		}
238 
239 		for (i = 0; kernels[i]; i++) {
240 			DPRINTF("Trying %s\n", kernels[i]);
241 
242 			marks[MARK_START] = 0;
243 			if (loadfile(kernels[i], marks, LOAD_KERNEL) >= 0)
244 				goto loaded;
245 		}
246 
247 		boothowto |= RB_ASKNAME;
248 	}
249  loaded:
250 
251 #ifdef	__notyet__
252 	OF_setprop(chosen, "bootpath", opened_name, strlen(opened_name) + 1);
253 	cp = bootline;
254 #else
255 	strcpy(bootline, opened_name);
256 	cp = bootline + strlen(bootline);
257 	*cp++ = ' ';
258 #endif
259 	*cp = '-';
260 	if (boothowto & RB_ASKNAME)
261 		*++cp = 'a';
262 	if (boothowto & RB_SINGLE)
263 		*++cp = 's';
264 	if (boothowto & RB_KDB)
265 		*++cp = 'd';
266 	if (*cp == '-')
267 #ifdef	__notyet__
268 		*cp = 0;
269 #else
270 		*--cp = 0;
271 #endif
272 	else
273 		*++cp = 0;
274 #ifdef	__notyet__
275 	OF_setprop(chosen, "bootargs", bootline, strlen(bootline) + 1);
276 #endif
277 
278 	entry = marks[MARK_ENTRY];
279 	ssym = (void *)marks[MARK_SYM];
280 	esym = (void *)marks[MARK_END];
281 
282 	printf(" start=0x%x\n", entry);
283 	__syncicache((void *)entry, (u_int)ssym - (u_int)entry);
284 	chain((void *)entry, bootline, ssym, esym);
285 
286 	OF_exit();
287 }
288