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 56 char line[100]; 57 58 extern u_int opendev; 59 extern char *lowram; 60 extern int noconsole; 61 62 /* 63 * XXX UFS accepts a /, NFS doesn't. 64 */ 65 char *name; 66 char *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 75 static int bdev, badapt, bctlr, bunit, bpart; 76 77 void main __P((void)); 78 void getbootdev __P((int *)); 79 void exec_hp300 __P((char *, u_long, int)); 80 81 void 82 main() 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 113 void 114 getbootdev(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 150 void 151 exec_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