1/*-
2 * Copyright (c) 1998 Michael Smith <msmith@freebsd.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27#include <sys/cdefs.h>
| 1/*-
2 * Copyright (c) 1998 Michael Smith <msmith@freebsd.org>
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 */
26
27#include <sys/cdefs.h>
|
28__FBSDID("$FreeBSD: head/sys/boot/pc98/loader/main.c 181436 2008-08-08 19:41:20Z jhb $");
| 28__FBSDID("$FreeBSD: head/sys/boot/pc98/loader/main.c 190046 2009-03-19 13:53:42Z nyan $");
|
29
30/*
31 * MD bootstrap main() and assorted miscellaneous
32 * commands.
33 */
34
35#include <stand.h>
36#include <string.h>
37#include <machine/bootinfo.h>
38#include <machine/psl.h>
39#include <sys/reboot.h>
40
41#include "bootstrap.h"
42#include "libi386/libi386.h"
43#include "btxv86.h"
44
45#define KARGS_FLAGS_CD 0x1
46#define KARGS_FLAGS_PXE 0x2
47
48/* Arguments passed in from the boot1/boot2 loader */
49static struct
50{
51 u_int32_t howto;
52 u_int32_t bootdev;
53 u_int32_t bootflags;
54 u_int32_t pxeinfo;
55 u_int32_t res2;
56 u_int32_t bootinfo;
57} *kargs;
58
59static u_int32_t initial_howto;
60static u_int32_t initial_bootdev;
61static struct bootinfo *initial_bootinfo;
62
63struct arch_switch archsw; /* MI/MD interface boundary */
64
65static void extract_currdev(void);
66static int isa_inb(int port);
67static void isa_outb(int port, int value);
68void exit(int code);
69
70/* from vers.c */
71extern char bootprog_name[], bootprog_rev[], bootprog_date[], bootprog_maker[];
72
73/* XXX debugging */
74extern char end[];
75
76static void *heap_top;
77static void *heap_bottom;
78
79int
80main(void)
81{
82 int i;
83
84 /* Pick up arguments */
85 kargs = (void *)__args;
86 initial_howto = kargs->howto;
87 initial_bootdev = kargs->bootdev;
88 initial_bootinfo = kargs->bootinfo ? (struct bootinfo *)PTOV(kargs->bootinfo) : NULL;
89
90 /* Initialize the v86 register set to a known-good state. */
91 bzero(&v86, sizeof(v86));
92 v86.efl = PSL_RESERVED_DEFAULT | PSL_I;
93
94 /*
95 * Initialise the heap as early as possible. Once this is done, malloc() is usable.
96 */
97 bios_getmem();
98
99#ifdef LOADER_BZIP2_SUPPORT
100 heap_top = PTOV(memtop_copyin);
101 memtop_copyin -= 0x300000;
102 heap_bottom = PTOV(memtop_copyin);
103#else
104 heap_top = (void *)bios_basemem;
105 heap_bottom = (void *)end;
106#endif
107 setheap(heap_bottom, heap_top);
108
109 /*
110 * XXX Chicken-and-egg problem; we want to have console output early, but some
111 * console attributes may depend on reading from eg. the boot device, which we
112 * can't do yet.
113 *
114 * We can use printf() etc. once this is done.
115 * If the previous boot stage has requested a serial console, prefer that.
116 */
117 bi_setboothowto(initial_howto);
118 if (initial_howto & RB_MULTIPLE) {
119 if (initial_howto & RB_SERIAL)
120 setenv("console", "comconsole vidconsole", 1);
121 else
122 setenv("console", "vidconsole comconsole", 1);
123 } else if (initial_howto & RB_SERIAL)
124 setenv("console", "comconsole", 1);
125 else if (initial_howto & RB_MUTE)
126 setenv("console", "nullconsole", 1);
127 cons_probe();
128
129 /*
130 * Initialise the block cache
131 */
132 bcache_init(32, 512); /* 16k cache XXX tune this */
133
134 /*
135 * Special handling for PXE and CD booting.
136 */
137 if (kargs->bootinfo == 0) {
138 /*
139 * We only want the PXE disk to try to init itself in the below
140 * walk through devsw if we actually booted off of PXE.
141 */
142 if (kargs->bootflags & KARGS_FLAGS_PXE)
143 pxe_enable(kargs->pxeinfo ? PTOV(kargs->pxeinfo) : NULL);
144 else if (kargs->bootflags & KARGS_FLAGS_CD)
145 bc_add(initial_bootdev);
146 }
147
| 29
30/*
31 * MD bootstrap main() and assorted miscellaneous
32 * commands.
33 */
34
35#include <stand.h>
36#include <string.h>
37#include <machine/bootinfo.h>
38#include <machine/psl.h>
39#include <sys/reboot.h>
40
41#include "bootstrap.h"
42#include "libi386/libi386.h"
43#include "btxv86.h"
44
45#define KARGS_FLAGS_CD 0x1
46#define KARGS_FLAGS_PXE 0x2
47
48/* Arguments passed in from the boot1/boot2 loader */
49static struct
50{
51 u_int32_t howto;
52 u_int32_t bootdev;
53 u_int32_t bootflags;
54 u_int32_t pxeinfo;
55 u_int32_t res2;
56 u_int32_t bootinfo;
57} *kargs;
58
59static u_int32_t initial_howto;
60static u_int32_t initial_bootdev;
61static struct bootinfo *initial_bootinfo;
62
63struct arch_switch archsw; /* MI/MD interface boundary */
64
65static void extract_currdev(void);
66static int isa_inb(int port);
67static void isa_outb(int port, int value);
68void exit(int code);
69
70/* from vers.c */
71extern char bootprog_name[], bootprog_rev[], bootprog_date[], bootprog_maker[];
72
73/* XXX debugging */
74extern char end[];
75
76static void *heap_top;
77static void *heap_bottom;
78
79int
80main(void)
81{
82 int i;
83
84 /* Pick up arguments */
85 kargs = (void *)__args;
86 initial_howto = kargs->howto;
87 initial_bootdev = kargs->bootdev;
88 initial_bootinfo = kargs->bootinfo ? (struct bootinfo *)PTOV(kargs->bootinfo) : NULL;
89
90 /* Initialize the v86 register set to a known-good state. */
91 bzero(&v86, sizeof(v86));
92 v86.efl = PSL_RESERVED_DEFAULT | PSL_I;
93
94 /*
95 * Initialise the heap as early as possible. Once this is done, malloc() is usable.
96 */
97 bios_getmem();
98
99#ifdef LOADER_BZIP2_SUPPORT
100 heap_top = PTOV(memtop_copyin);
101 memtop_copyin -= 0x300000;
102 heap_bottom = PTOV(memtop_copyin);
103#else
104 heap_top = (void *)bios_basemem;
105 heap_bottom = (void *)end;
106#endif
107 setheap(heap_bottom, heap_top);
108
109 /*
110 * XXX Chicken-and-egg problem; we want to have console output early, but some
111 * console attributes may depend on reading from eg. the boot device, which we
112 * can't do yet.
113 *
114 * We can use printf() etc. once this is done.
115 * If the previous boot stage has requested a serial console, prefer that.
116 */
117 bi_setboothowto(initial_howto);
118 if (initial_howto & RB_MULTIPLE) {
119 if (initial_howto & RB_SERIAL)
120 setenv("console", "comconsole vidconsole", 1);
121 else
122 setenv("console", "vidconsole comconsole", 1);
123 } else if (initial_howto & RB_SERIAL)
124 setenv("console", "comconsole", 1);
125 else if (initial_howto & RB_MUTE)
126 setenv("console", "nullconsole", 1);
127 cons_probe();
128
129 /*
130 * Initialise the block cache
131 */
132 bcache_init(32, 512); /* 16k cache XXX tune this */
133
134 /*
135 * Special handling for PXE and CD booting.
136 */
137 if (kargs->bootinfo == 0) {
138 /*
139 * We only want the PXE disk to try to init itself in the below
140 * walk through devsw if we actually booted off of PXE.
141 */
142 if (kargs->bootflags & KARGS_FLAGS_PXE)
143 pxe_enable(kargs->pxeinfo ? PTOV(kargs->pxeinfo) : NULL);
144 else if (kargs->bootflags & KARGS_FLAGS_CD)
145 bc_add(initial_bootdev);
146 }
147
|
| 148 archsw.arch_autoload = i386_autoload;
149 archsw.arch_getdev = i386_getdev;
150 archsw.arch_copyin = i386_copyin;
151 archsw.arch_copyout = i386_copyout;
152 archsw.arch_readin = i386_readin;
153 archsw.arch_isainb = isa_inb;
154 archsw.arch_isaoutb = isa_outb;
155
|
148 /*
149 * March through the device switch probing for things.
150 */
151 for (i = 0; devsw[i] != NULL; i++)
152 if (devsw[i]->dv_init != NULL)
153 (devsw[i]->dv_init)();
154 printf("BIOS %dkB/%dkB available memory\n", bios_basemem / 1024, bios_extmem / 1024);
155 if (initial_bootinfo != NULL) {
156 initial_bootinfo->bi_basemem = bios_basemem / 1024;
157 initial_bootinfo->bi_extmem = bios_extmem / 1024;
158 }
159
160 printf("\n");
161 printf("%s, Revision %s\n", bootprog_name, bootprog_rev);
162 printf("(%s, %s)\n", bootprog_maker, bootprog_date);
163
164 extract_currdev(); /* set $currdev and $loaddev */
165 setenv("LINES", "24", 1); /* optional */
| 156 /*
157 * March through the device switch probing for things.
158 */
159 for (i = 0; devsw[i] != NULL; i++)
160 if (devsw[i]->dv_init != NULL)
161 (devsw[i]->dv_init)();
162 printf("BIOS %dkB/%dkB available memory\n", bios_basemem / 1024, bios_extmem / 1024);
163 if (initial_bootinfo != NULL) {
164 initial_bootinfo->bi_basemem = bios_basemem / 1024;
165 initial_bootinfo->bi_extmem = bios_extmem / 1024;
166 }
167
168 printf("\n");
169 printf("%s, Revision %s\n", bootprog_name, bootprog_rev);
170 printf("(%s, %s)\n", bootprog_maker, bootprog_date);
171
172 extract_currdev(); /* set $currdev and $loaddev */
173 setenv("LINES", "24", 1); /* optional */
|
166
167 archsw.arch_autoload = i386_autoload;
168 archsw.arch_getdev = i386_getdev;
169 archsw.arch_copyin = i386_copyin;
170 archsw.arch_copyout = i386_copyout;
171 archsw.arch_readin = i386_readin;
172 archsw.arch_isainb = isa_inb;
173 archsw.arch_isaoutb = isa_outb;
| |
174
175 interact(); /* doesn't return */
176
177 /* if we ever get here, it is an error */
178 return (1);
179}
180
181/*
182 * Set the 'current device' by (if possible) recovering the boot device as
183 * supplied by the initial bootstrap.
184 *
185 * XXX should be extended for netbooting.
186 */
187static void
188extract_currdev(void)
189{
190 struct i386_devdesc new_currdev;
| 174
175 interact(); /* doesn't return */
176
177 /* if we ever get here, it is an error */
178 return (1);
179}
180
181/*
182 * Set the 'current device' by (if possible) recovering the boot device as
183 * supplied by the initial bootstrap.
184 *
185 * XXX should be extended for netbooting.
186 */
187static void
188extract_currdev(void)
189{
190 struct i386_devdesc new_currdev;
|
191 int major, biosdev = -1;
| 191 int major;
192 int biosdev = -1;
|
192
193 /* Assume we are booting from a BIOS disk by default */
194 new_currdev.d_dev = &biosdisk;
195
196 /* new-style boot loaders such as pxeldr and cdldr */
197 if (kargs->bootinfo == 0) {
198 if ((kargs->bootflags & KARGS_FLAGS_CD) != 0) {
199 /* we are booting from a CD with cdboot */
200 new_currdev.d_dev = &bioscd;
201 new_currdev.d_unit = bc_bios2unit(initial_bootdev);
202 } else if ((kargs->bootflags & KARGS_FLAGS_PXE) != 0) {
203 /* we are booting from pxeldr */
204 new_currdev.d_dev = &pxedisk;
205 new_currdev.d_unit = 0;
206 } else {
207 /* we don't know what our boot device is */
208 new_currdev.d_kind.biosdisk.slice = -1;
209 new_currdev.d_kind.biosdisk.partition = 0;
210 biosdev = -1;
211 }
212 } else if ((initial_bootdev & B_MAGICMASK) != B_DEVMAGIC) {
213 /* The passed-in boot device is bad */
214 new_currdev.d_kind.biosdisk.slice = -1;
215 new_currdev.d_kind.biosdisk.partition = 0;
216 biosdev = -1;
217 } else {
218 new_currdev.d_kind.biosdisk.slice = B_SLICE(initial_bootdev) - 1;
219 new_currdev.d_kind.biosdisk.partition = B_PARTITION(initial_bootdev);
220 biosdev = initial_bootinfo->bi_bios_dev;
221 major = B_TYPE(initial_bootdev);
222
223 /*
224 * If we are booted by an old bootstrap, we have to guess at the BIOS
225 * unit number. We will lose if there is more than one disk type
226 * and we are not booting from the lowest-numbered disk type
227 * (ie. SCSI when IDE also exists).
228 */
229 if ((biosdev == 0) && (B_TYPE(initial_bootdev) != 2)) { /* biosdev doesn't match major */
230 if (B_TYPE(initial_bootdev) == 6)
231 biosdev = 0x30 + B_UNIT(initial_bootdev);
232 else
233 biosdev = (major << 3) + 0x80 + B_UNIT(initial_bootdev);
234 }
235 }
236 new_currdev.d_type = new_currdev.d_dev->dv_type;
237
238 /*
239 * If we are booting off of a BIOS disk and we didn't succeed in determining
240 * which one we booted off of, just use disk0: as a reasonable default.
241 */
242 if ((new_currdev.d_type == biosdisk.dv_type) &&
243 ((new_currdev.d_unit = bd_bios2unit(biosdev)) == -1)) {
244 printf("Can't work out which disk we are booting from.\n"
245 "Guessed BIOS device 0x%x not found by probes, defaulting to disk0:\n", biosdev);
246 new_currdev.d_unit = 0;
247 }
248 env_setenv("currdev", EV_VOLATILE, i386_fmtdev(&new_currdev),
249 i386_setcurrdev, env_nounset);
250 env_setenv("loaddev", EV_VOLATILE, i386_fmtdev(&new_currdev), env_noset,
251 env_nounset);
252}
253
254COMMAND_SET(reboot, "reboot", "reboot the system", command_reboot);
255
256static int
257command_reboot(int argc, char *argv[])
258{
259 int i;
260
261 for (i = 0; devsw[i] != NULL; ++i)
262 if (devsw[i]->dv_cleanup != NULL)
263 (devsw[i]->dv_cleanup)();
264
265 printf("Rebooting...\n");
266 delay(1000000);
267 __exit(0);
268}
269
270/* provide this for panic, as it's not in the startup code */
271void
272exit(int code)
273{
274 __exit(code);
275}
276
277COMMAND_SET(heap, "heap", "show heap usage", command_heap);
278
279static int
280command_heap(int argc, char *argv[])
281{
282 mallocstats();
283 printf("heap base at %p, top at %p, upper limit at %p\n", heap_bottom,
284 sbrk(0), heap_top);
285 return(CMD_OK);
286}
287
288/* ISA bus access functions for PnP, derived from <machine/cpufunc.h> */
289static int
290isa_inb(int port)
291{
292 u_char data;
293
294 if (__builtin_constant_p(port) &&
295 (((port) & 0xffff) < 0x100) &&
296 ((port) < 0x10000)) {
297 __asm __volatile("inb %1,%0" : "=a" (data) : "id" ((u_short)(port)));
298 } else {
299 __asm __volatile("inb %%dx,%0" : "=a" (data) : "d" (port));
300 }
301 return(data);
302}
303
304static void
305isa_outb(int port, int value)
306{
307 u_char al = value;
308
309 if (__builtin_constant_p(port) &&
310 (((port) & 0xffff) < 0x100) &&
311 ((port) < 0x10000)) {
312 __asm __volatile("outb %0,%1" : : "a" (al), "id" ((u_short)(port)));
313 } else {
314 __asm __volatile("outb %0,%%dx" : : "a" (al), "d" (port));
315 }
316}
317
| 193
194 /* Assume we are booting from a BIOS disk by default */
195 new_currdev.d_dev = &biosdisk;
196
197 /* new-style boot loaders such as pxeldr and cdldr */
198 if (kargs->bootinfo == 0) {
199 if ((kargs->bootflags & KARGS_FLAGS_CD) != 0) {
200 /* we are booting from a CD with cdboot */
201 new_currdev.d_dev = &bioscd;
202 new_currdev.d_unit = bc_bios2unit(initial_bootdev);
203 } else if ((kargs->bootflags & KARGS_FLAGS_PXE) != 0) {
204 /* we are booting from pxeldr */
205 new_currdev.d_dev = &pxedisk;
206 new_currdev.d_unit = 0;
207 } else {
208 /* we don't know what our boot device is */
209 new_currdev.d_kind.biosdisk.slice = -1;
210 new_currdev.d_kind.biosdisk.partition = 0;
211 biosdev = -1;
212 }
213 } else if ((initial_bootdev & B_MAGICMASK) != B_DEVMAGIC) {
214 /* The passed-in boot device is bad */
215 new_currdev.d_kind.biosdisk.slice = -1;
216 new_currdev.d_kind.biosdisk.partition = 0;
217 biosdev = -1;
218 } else {
219 new_currdev.d_kind.biosdisk.slice = B_SLICE(initial_bootdev) - 1;
220 new_currdev.d_kind.biosdisk.partition = B_PARTITION(initial_bootdev);
221 biosdev = initial_bootinfo->bi_bios_dev;
222 major = B_TYPE(initial_bootdev);
223
224 /*
225 * If we are booted by an old bootstrap, we have to guess at the BIOS
226 * unit number. We will lose if there is more than one disk type
227 * and we are not booting from the lowest-numbered disk type
228 * (ie. SCSI when IDE also exists).
229 */
230 if ((biosdev == 0) && (B_TYPE(initial_bootdev) != 2)) { /* biosdev doesn't match major */
231 if (B_TYPE(initial_bootdev) == 6)
232 biosdev = 0x30 + B_UNIT(initial_bootdev);
233 else
234 biosdev = (major << 3) + 0x80 + B_UNIT(initial_bootdev);
235 }
236 }
237 new_currdev.d_type = new_currdev.d_dev->dv_type;
238
239 /*
240 * If we are booting off of a BIOS disk and we didn't succeed in determining
241 * which one we booted off of, just use disk0: as a reasonable default.
242 */
243 if ((new_currdev.d_type == biosdisk.dv_type) &&
244 ((new_currdev.d_unit = bd_bios2unit(biosdev)) == -1)) {
245 printf("Can't work out which disk we are booting from.\n"
246 "Guessed BIOS device 0x%x not found by probes, defaulting to disk0:\n", biosdev);
247 new_currdev.d_unit = 0;
248 }
249 env_setenv("currdev", EV_VOLATILE, i386_fmtdev(&new_currdev),
250 i386_setcurrdev, env_nounset);
251 env_setenv("loaddev", EV_VOLATILE, i386_fmtdev(&new_currdev), env_noset,
252 env_nounset);
253}
254
255COMMAND_SET(reboot, "reboot", "reboot the system", command_reboot);
256
257static int
258command_reboot(int argc, char *argv[])
259{
260 int i;
261
262 for (i = 0; devsw[i] != NULL; ++i)
263 if (devsw[i]->dv_cleanup != NULL)
264 (devsw[i]->dv_cleanup)();
265
266 printf("Rebooting...\n");
267 delay(1000000);
268 __exit(0);
269}
270
271/* provide this for panic, as it's not in the startup code */
272void
273exit(int code)
274{
275 __exit(code);
276}
277
278COMMAND_SET(heap, "heap", "show heap usage", command_heap);
279
280static int
281command_heap(int argc, char *argv[])
282{
283 mallocstats();
284 printf("heap base at %p, top at %p, upper limit at %p\n", heap_bottom,
285 sbrk(0), heap_top);
286 return(CMD_OK);
287}
288
289/* ISA bus access functions for PnP, derived from <machine/cpufunc.h> */
290static int
291isa_inb(int port)
292{
293 u_char data;
294
295 if (__builtin_constant_p(port) &&
296 (((port) & 0xffff) < 0x100) &&
297 ((port) < 0x10000)) {
298 __asm __volatile("inb %1,%0" : "=a" (data) : "id" ((u_short)(port)));
299 } else {
300 __asm __volatile("inb %%dx,%0" : "=a" (data) : "d" (port));
301 }
302 return(data);
303}
304
305static void
306isa_outb(int port, int value)
307{
308 u_char al = value;
309
310 if (__builtin_constant_p(port) &&
311 (((port) & 0xffff) < 0x100) &&
312 ((port) < 0x10000)) {
313 __asm __volatile("outb %0,%1" : : "a" (al), "id" ((u_short)(port)));
314 } else {
315 __asm __volatile("outb %0,%%dx" : : "a" (al), "d" (port));
316 }
317}
318
|