1 /* $NetBSD: bootxx.c,v 1.2 2019/12/14 02:58:20 tsutsui 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
71 typedef void (entrypt) (int, char **, int, const void *, int, char *);
72
73 entrypt main;
74 entrypt *loadfile (char *path, char *name);
75
76 /*
77 * This gets arguments from the PROM, calls other routines to open
78 * and load the secondary boot loader called boot, and then transfers
79 * execution to that program.
80 */
81 void
main(int argc,char ** argv,int code,const void * cv,int bim,char * bip)82 main(int argc, char **argv, int code, const void *cv, int bim, char *bip)
83 {
84 char *cp;
85 entrypt *entry;
86
87 cp = *argv;
88
89 printf("\nNetBSD/emips " NETBSD_VERS " " BOOTXX_FS_NAME " Bootstrap\n");
90
91 entry = loadfile(cp, "netbsd");
92 if ((int)entry != -1)
93 goto goodload;
94
95 /* Give old /boot a go... */
96 entry = loadfile(cp, "/boot");
97 if ((int)entry != -1)
98 goto goodload;
99
100 goto bad;
101 goodload:
102
103 entry(argc, argv, code, cv, bim, bip);
104 bad:
105 printf("Boot failed.\n");
106 }
107
108 /*
109 * Open 'filename', read in program and return the entry point or -1 if error.
110 */
111 entrypt *
loadfile(char * path,char * name)112 loadfile(char *path, char *name)
113 {
114 int fd, i;
115 char c, *buf, bootfname[64];
116 Elf32_Ehdr ehdr;
117 Elf32_Phdr phdr;
118
119 strcpy(bootfname, path);
120 buf = bootfname;
121 while ((c = *buf++) != '\0') {
122 if (c == ')')
123 break;
124 if (c != '/')
125 continue;
126 while ((c = *buf++) != '\0')
127 if (c == '/')
128 break;
129 /*
130 * Make "N/rzY" with no trailing '/' valid by adding
131 * the extra '/' before appending 'bootemips' to the path.
132 */
133 if (c != '/') {
134 buf--;
135 *buf++ = '/';
136 *buf = '\0';
137 }
138 break;
139 }
140 strcpy(buf, name);
141 if ((fd = open(bootfname, 0)) < 0) {
142 printf("open %s: %d\n", bootfname, errno);
143 goto err;
144 }
145
146 /* read the exec header */
147 i = read(fd, (char *)&ehdr, sizeof(ehdr));
148 if ((i != sizeof(ehdr)) ||
149 (memcmp(ehdr.e_ident, ELFMAG, SELFMAG) != 0) ||
150 (ehdr.e_ident[EI_CLASS] != ELFCLASS32)) {
151 printf("%s: No ELF header\n", bootfname);
152 goto cerr;
153 }
154
155 for (i = 0; i < ehdr.e_phnum; i++) {
156 if (lseek(fd, (off_t) ehdr.e_phoff + i * sizeof(phdr), 0) < 0)
157 goto cerr;
158 if (read(fd, &phdr, sizeof(phdr)) != sizeof(phdr))
159 goto cerr;
160 if (phdr.p_type != PT_LOAD)
161 continue;
162 if (lseek(fd, (off_t)phdr.p_offset, 0) < 0)
163 goto cerr;
164 if (read(fd, (char *)phdr.p_paddr, phdr.p_filesz) != phdr.p_filesz)
165 goto cerr;
166 }
167 return ((entrypt*)ehdr.e_entry);
168
169 cerr:
170 #ifndef LIBSA_NO_FS_CLOSE
171 (void) close(fd);
172 #endif
173 err:
174 printf("Can't load '%s'\n", bootfname);
175 return ((entrypt*)-1);
176 }
177