bootxx.c revision 1.32
1 /* $NetBSD: bootxx.c,v 1.32 2009/03/14 15:36:12 dsl 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 <sys/param.h> 67 #include <sys/exec_elf.h> 68 #include <lib/libsa/stand.h> 69 #include <lib/libkern/libkern.h> 70 #include <machine/dec_prom.h> 71 72 typedef void (*entrypt)(int, char **, int, const void *); 73 74 int main(int, char **); 75 entrypt loadfile(char *path, char *name); 76 77 extern int clear_cache(char *addr, int len); 78 79 /* 80 * This gets arguments from the PROM, calls other routines to open 81 * and load the secondary boot loader called boot, and then transfers 82 * execution to that program. 83 * 84 * Argv[0] should be something like "rz(0,0,0)netbsd" on a DECstation 3100. 85 * Argv[0,1] should be something like "boot 5/rz0/netbsd" on a DECstation 5000. 86 * The argument "-a" means netbsd should do an automatic reboot. 87 */ 88 int 89 main(int argc, char **argv) 90 { 91 char *cp; 92 entrypt entry; 93 94 /* check for DS5000 boot */ 95 if (strcmp(argv[0], "boot") == 0) { 96 argc--; 97 argv++; 98 } 99 cp = *argv; 100 101 printf("\nNetBSD/pmax " NETBSD_VERS " " BOOTXX_FS_NAME " Primary Bootstrap\n"); 102 103 entry = loadfile(cp, "/boot.pmax"); 104 if ((int)entry != -1) 105 goto goodload; 106 107 /* Give old /boot a go... */ 108 entry = loadfile(cp, "/boot"); 109 if ((int)entry != -1) 110 goto goodload; 111 112 /* Booting off an 8.3 filesystem? */ 113 entry = loadfile(cp, "/boot.pma"); 114 if ((int)entry != -1) 115 goto goodload; 116 117 goto bad; 118 goodload: 119 120 clear_cache((char *)PRIMARY_LOAD_ADDRESS, 1024 * 1024); 121 if (callv == &callvec) 122 entry(argc, argv, 0, 0); 123 else 124 entry(argc, argv, DEC_PROM_MAGIC, callv); 125 bad: 126 /* XXX would calling prom_halt here be cleaner? */ 127 return (1); 128 } 129 130 /* 131 * Open 'filename', read in program and return the entry point or -1 if error. 132 */ 133 entrypt 134 loadfile(path, name) 135 char *path, *name; 136 { 137 int fd, i; 138 char c, *buf, bootfname[64]; 139 Elf32_Ehdr ehdr; 140 Elf32_Phdr phdr; 141 142 strcpy(bootfname, path); 143 buf = bootfname; 144 while ((c = *buf++) != '\0') { 145 if (c == ')') 146 break; 147 if (c != '/') 148 continue; 149 while ((c = *buf++) != '\0') 150 if (c == '/') 151 break; 152 /* 153 * Make "N/rzY" with no trailing '/' valid by adding 154 * the extra '/' before appending 'bootpmax' to the path. 155 */ 156 if (c != '/') { 157 buf--; 158 *buf++ = '/'; 159 *buf = '\0'; 160 } 161 break; 162 } 163 strcpy(buf, name); 164 if ((fd = open(bootfname, 0)) < 0) { 165 printf("open %s: %d\n", bootfname, errno); 166 goto err; 167 } 168 169 /* read the exec header */ 170 i = read(fd, (char *)&ehdr, sizeof(ehdr)); 171 if ((i != sizeof(ehdr)) || 172 (memcmp(ehdr.e_ident, ELFMAG, SELFMAG) != 0) || 173 (ehdr.e_ident[EI_CLASS] != ELFCLASS32)) { 174 printf("%s: No ELF header\n", bootfname); 175 goto cerr; 176 } 177 178 for (i = 0; i < ehdr.e_phnum; i++) { 179 if (lseek(fd, (off_t) ehdr.e_phoff + i * sizeof(phdr), 0) < 0) 180 goto cerr; 181 if (read(fd, &phdr, sizeof(phdr)) != sizeof(phdr)) 182 goto cerr; 183 if (phdr.p_type != PT_LOAD) 184 continue; 185 if (lseek(fd, (off_t)phdr.p_offset, 0) < 0) 186 goto cerr; 187 if (read(fd, (char *)phdr.p_paddr, phdr.p_filesz) != phdr.p_filesz) 188 goto cerr; 189 } 190 return ((entrypt)ehdr.e_entry); 191 192 cerr: 193 #ifndef LIBSA_NO_FS_CLOSE 194 (void) close(fd); 195 #endif 196 err: 197 printf("Can't load '%s'\n", bootfname); 198 return ((entrypt)-1); 199 } 200
Indexes created Thu Sep 25 16:09:42 GMT 2025