1/*	$NetBSD: boot.c,v 1.20 2024/03/06 19:48:53 andvar 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 */
84char *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
98static char *devname(char *);
99int main(int, char **);
100
101/*
102 * This gets arguments from the first stage boot loader, 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 */
110int
111main(int argc, char **argv)
112{
113	char *name, **namep, *dev, *kernel;
114	char bootname[PATH_MAX], bootpath[PATH_MAX];
115	int entry, win;
116	u_long marks[MARK_MAX];
117	struct btinfo_symtab bi_syms;
118	struct btinfo_bootpath bi_bpath;
119
120	/* print a banner */
121	printf("\n");
122	printf("NetBSD/pmax " NETBSD_VERS " " BOOT_TYPE_NAME " Bootstrap, Revision %s\n",
123	    bootprog_rev);
124	printf("\n");
125
126	/* initialise bootinfo structure early */
127	bi_init(BOOTINFO_ADDR);
128
129	/* check for DS5000 boot */
130	if (strcmp(argv[0], "boot") == 0) {
131		argc--;
132		argv++;
133	}
134	name = argv[0];
135	printf("Boot: %s\n", name);
136
137	/* NOTE: devname() can modify bootname[]. */
138	strcpy(bootname, argv[0]);
139	if ((kernel = devname(bootname)) == NULL) {
140		dev = bootname;
141		name = NULL;
142	}
143
144	memset(marks, 0, sizeof marks);
145	if (name != NULL)
146		win = (loadfile(name, marks, LOAD_KERNEL) == 0);
147	else {
148		win = 0;
149		for (namep = kernelnames, win = 0; *namep != NULL && !win;
150		    namep++) {
151			kernel = *namep;
152			strcpy(bootpath, dev);
153			strcat(bootpath, kernel);
154			printf("Loading: %s\n", bootpath);
155			win = (loadfile(bootpath, marks, LOAD_ALL) != -1);
156			if (win) {
157				name = bootpath;
158			}
159		}
160	}
161	if (!win)
162		goto fail;
163
164	strncpy(bi_bpath.bootpath, kernel, BTINFO_BOOTPATH_LEN);
165	bi_add(&bi_bpath, BTINFO_BOOTPATH, sizeof(bi_bpath));
166
167	entry = marks[MARK_ENTRY];
168	bi_syms.nsym = marks[MARK_NSYM];
169	bi_syms.ssym = marks[MARK_SYM];
170	bi_syms.esym = marks[MARK_END];
171	bi_add(&bi_syms, BTINFO_SYMTAB, sizeof(bi_syms));
172
173	printf("Starting at 0x%x\n\n", entry);
174	if (callv == &callvec)
175		startprog(entry, entry, argc, argv, 0, 0,
176		    BOOTINFO_MAGIC, BOOTINFO_ADDR);
177	else
178		startprog(entry, entry, argc, argv, DEC_PROM_MAGIC,
179		    callv, BOOTINFO_MAGIC, BOOTINFO_ADDR);
180	(void)printf("KERNEL RETURNED!\n");
181
182fail:
183	(void)printf("Boot failed!  Halting...\n");
184	return (0);
185}
186
187
188/*
189 * Check whether or not fname is a device name only or a full
190 * bootpath including the kernel name.  This code to do this
191 * is copied from loadfile() in the first stage bootblocks.
192 * Returns the kernel name, or NULL if no kernel name specified.
193 *
194 * NOTE:  fname will be modified if it's of the form N/rzY
195 *        without a trailing slash.
196 */
197static char *
198devname(char *fname)
199{
200	char c;
201
202	while ((c = *fname++) != '\0') {
203		if (c == ')')
204			break;
205		if (c != '/')
206			continue;
207		while ((c = *fname++) != '\0')
208			if (c == '/')
209				break;
210		/*
211		 * Make "N/rzY" with no trailing '/' valid by adding
212		 * the extra '/' before appending 'boot.pmax' to the path.
213		 */
214		if (c != '/') {
215			fname--;
216			*fname++ = '/';
217			*fname = '\0';
218		}
219		break;
220	}
221	return (*fname == '\0' ? NULL : fname);
222}
223