uboot.c revision 1.8 
1/*	$NetBSD: uboot.c,v 1.8 2001/10/09 16:03:11 tsutsui Exp $	*/
2
3/*-
4 * Copyright (c) 1982, 1986, 1990, 1993
5 *	The Regents of the University of California.  All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 *    notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 *    notice, this list of conditions and the following disclaimer in the
14 *    documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 *    must display the following acknowledgement:
17 *	This product includes software developed by the University of
18 *	California, Berkeley and its contributors.
19 * 4. Neither the name of the University nor the names of its contributors
20 *    may be used to endorse or promote products derived from this software
21 *    without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * SUCH DAMAGE.
34 *
35 *	@(#)boot.c	8.1 (Berkeley) 6/10/93
36 */
37
38#include <sys/param.h>
39#include <sys/reboot.h>
40#include <sys/boot_flag.h>
41#include <a.out.h>
42
43#include <lib/libsa/stand.h>
44#include <lib/libsa/loadfile.h>
45
46#include <machine/bootinfo.h>
47
48#include <hp300/stand/common/samachdep.h>
49
50/*
51 * Boot program... bits in `howto' determine whether boot stops to
52 * ask for system name.	 Boot device is derived from ROM provided
53 * information.
54 */
55
56char line[100];
57
58extern	u_int opendev;
59extern	char *lowram;
60extern	int noconsole;
61
62/*
63 * XXX UFS accepts a /, NFS doesn't.
64 */
65char *name;
66char *names[] = {
67	"netbsd",		"netbsd.gz",
68	"netbsd.bak",		"netbsd.bak.gz",
69	"netbsd.old",		"netbsd.old.gz",
70	"onetbsd",		"onetbsd.gz",
71	NULL
72};
73#define NUMNAMES	(sizeof(names) / sizeof(char *))
74
75static int bdev, badapt, bctlr, bunit, bpart;
76
77void main __P((void));
78void getbootdev __P((int *));
79void exec_hp300 __P((char *, u_long, int));
80
81void
82main()
83{
84	int currname = 0;
85
86	printf("\n");
87	printf(">> %s, Revision %s\n", bootprog_name, bootprog_rev);
88	printf(">> (%s, %s)\n", bootprog_maker, bootprog_date);
89	printf(">> HP 9000/%s SPU\n", getmachineid());
90	printf(">> Enter \"reset\" to reset system.\n");
91
92	bdev   = B_TYPE(bootdev);
93	badapt = B_ADAPTOR(bootdev);
94	bctlr  = B_CONTROLLER(bootdev);
95	bunit  = B_UNIT(bootdev);
96	bpart  = B_PARTITION(bootdev);
97
98	for (;;) {
99		name = names[currname++];
100		if (currname == NUMNAMES)
101			currname = 0;
102
103		if (!noconsole) {
104			howto = 0;
105			getbootdev(&howto);
106		} else
107			printf(": %s\n", name);
108		exec_hp300(name, (u_long)lowram, howto);
109		printf("boot: %s\n", strerror(errno));
110	}
111}
112
113void
114getbootdev(howto)
115	int *howto;
116{
117	char c, *ptr = line;
118
119	printf("Boot: [[[%s%d%c:]%s][-a][-c][-d][-s][-v][-q]] :- ",
120	    devsw[bdev].dv_name, bctlr + (8 * badapt), 'a' + bpart, name);
121
122	if (tgets(line)) {
123		if (strcmp(line, "reset") == 0) {
124			call_req_reboot();      /* reset machine */
125			printf("panic: can't reboot, halting\n");
126			asm("stop #0x2700");
127		}
128		while ((c = *ptr) != '\0') {
129			while (c == ' ')
130				c = *++ptr;
131			if (!c)
132				return;
133			if (c == '-')
134				while ((c = *++ptr) && c != ' ')
135					BOOT_FLAG(c, *howto);
136			else {
137				name = ptr;
138				while ((c = *++ptr) && c != ' ');
139				if (c)
140					*ptr++ = 0;
141			}
142		}
143	} else
144		printf("\n");
145}
146
147#define	round_to_size(x) \
148	(((x) + sizeof(u_long) - 1) & ~(sizeof(u_long) - 1))
149
150void
151exec_hp300(file, loadaddr, howto)
152	char *file;
153	u_long loadaddr;
154	int howto;
155{
156	u_long marks[MARK_MAX];
157	struct btinfo_magic *bt;
158	int fd;
159
160	marks[MARK_START] = loadaddr;
161	if ((fd = loadfile(name, marks, LOAD_KERNEL)) == -1)
162		return;
163
164	marks[MARK_END] = round_to_size(marks[MARK_END] - loadaddr);
165	printf("Start @ 0x%lx [%ld=0x%lx-0x%lx]...\n",
166	    marks[MARK_ENTRY], marks[MARK_NSYM],
167	    marks[MARK_SYM], marks[MARK_END]);
168
169	bt = (struct btinfo_magic *)lowram;
170        bt->common.type = BTINFO_MAGIC;
171        bt->magic1 = BOOTINFO_MAGIC1;
172        bt->magic2 = BOOTINFO_MAGIC2;
173
174	machdep_start((char *)marks[MARK_ENTRY], howto,
175	    (char *)loadaddr, (char *)marks[MARK_SYM],
176	    (char *)marks[MARK_END]);
177}
178