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 163897 2006-11-02 01:23:18Z marcel $");
| 28__FBSDID("$FreeBSD: head/sys/boot/pc98/loader/main.c 172924 2007-10-24 11:54:04Z 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 <sys/reboot.h>
39
40#include "bootstrap.h"
41#include "libi386/libi386.h"
42#include "btxv86.h"
43
44#define KARGS_FLAGS_CD 0x1
45#define KARGS_FLAGS_PXE 0x2
46
47/* Arguments passed in from the boot1/boot2 loader */
48static struct
49{
50 u_int32_t howto;
51 u_int32_t bootdev;
52 u_int32_t bootflags;
53 u_int32_t pxeinfo;
54 u_int32_t res2;
55 u_int32_t bootinfo;
56} *kargs;
57
58static u_int32_t initial_howto;
59static u_int32_t initial_bootdev;
60static struct bootinfo *initial_bootinfo;
61
62struct arch_switch archsw; /* MI/MD interface boundary */
63
64static void extract_currdev(void);
65static int isa_inb(int port);
66static void isa_outb(int port, int value);
67void exit(int code);
68
69/* from vers.c */
70extern char bootprog_name[], bootprog_rev[], bootprog_date[], bootprog_maker[];
71
72/* XXX debugging */
73extern char end[];
74
75static void *heap_top;
76static void *heap_bottom;
77
78int
79main(void)
80{
81 int i;
82
83 /* Pick up arguments */
84 kargs = (void *)__args;
85 initial_howto = kargs->howto;
86 initial_bootdev = kargs->bootdev;
87 initial_bootinfo = kargs->bootinfo ? (struct bootinfo *)PTOV(kargs->bootinfo) : NULL;
88
89 /*
90 * Initialise the heap as early as possible. Once this is done, malloc() is usable.
91 */
92 bios_getmem();
93
94#ifdef LOADER_BZIP2_SUPPORT
95 heap_top = PTOV(memtop_copyin);
96 memtop_copyin -= 0x300000;
97 heap_bottom = PTOV(memtop_copyin);
98#else
99 heap_top = (void *)bios_basemem;
100 heap_bottom = (void *)end;
101#endif
102 setheap(heap_bottom, heap_top);
103
104 /*
105 * XXX Chicken-and-egg problem; we want to have console output early, but some
106 * console attributes may depend on reading from eg. the boot device, which we
107 * can't do yet.
108 *
109 * We can use printf() etc. once this is done.
110 * If the previous boot stage has requested a serial console, prefer that.
111 */
112 bi_setboothowto(initial_howto);
113 if (initial_howto & RB_MULTIPLE) {
114 if (initial_howto & RB_SERIAL)
115 setenv("console", "comconsole vidconsole", 1);
116 else
117 setenv("console", "vidconsole comconsole", 1);
118 } else if (initial_howto & RB_SERIAL)
119 setenv("console", "comconsole", 1);
120 else if (initial_howto & RB_MUTE)
121 setenv("console", "nullconsole", 1);
122 cons_probe();
123
124 /*
125 * Initialise the block cache
126 */
127 bcache_init(32, 512); /* 16k cache XXX tune this */
128
129 /*
130 * Special handling for PXE and CD booting.
131 */
132 if (kargs->bootinfo == 0) {
133 /*
134 * We only want the PXE disk to try to init itself in the below
135 * walk through devsw if we actually booted off of PXE.
136 */
137 if (kargs->bootflags & KARGS_FLAGS_PXE)
138 pxe_enable(kargs->pxeinfo ? PTOV(kargs->pxeinfo) : NULL);
139 else if (kargs->bootflags & KARGS_FLAGS_CD)
140 bc_add(initial_bootdev);
141 }
142
143 /*
144 * March through the device switch probing for things.
145 */
146 for (i = 0; devsw[i] != NULL; i++)
147 if (devsw[i]->dv_init != NULL)
148 (devsw[i]->dv_init)();
149 printf("BIOS %dkB/%dkB available memory\n", bios_basemem / 1024, bios_extmem / 1024);
150 if (initial_bootinfo != NULL) {
151 initial_bootinfo->bi_basemem = bios_basemem / 1024;
152 initial_bootinfo->bi_extmem = bios_extmem / 1024;
153 }
154
155 printf("\n");
156 printf("%s, Revision %s\n", bootprog_name, bootprog_rev);
157 printf("(%s, %s)\n", bootprog_maker, bootprog_date);
158
159 extract_currdev(); /* set $currdev and $loaddev */
160 setenv("LINES", "24", 1); /* optional */
161
162 archsw.arch_autoload = i386_autoload;
163 archsw.arch_getdev = i386_getdev;
164 archsw.arch_copyin = i386_copyin;
165 archsw.arch_copyout = i386_copyout;
166 archsw.arch_readin = i386_readin;
167 archsw.arch_isainb = isa_inb;
168 archsw.arch_isaoutb = isa_outb;
169
170 interact(); /* doesn't return */
171
172 /* if we ever get here, it is an error */
173 return (1);
174}
175
176/*
177 * Set the 'current device' by (if possible) recovering the boot device as
178 * supplied by the initial bootstrap.
179 *
180 * XXX should be extended for netbooting.
181 */
182static void
183extract_currdev(void)
184{
185 struct i386_devdesc new_currdev;
186 int major, biosdev = -1;
187
188 /* Assume we are booting from a BIOS disk by default */
189 new_currdev.d_dev = &biosdisk;
190
191 /* new-style boot loaders such as pxeldr and cdldr */
192 if (kargs->bootinfo == 0) {
193 if ((kargs->bootflags & KARGS_FLAGS_CD) != 0) {
194 /* we are booting from a CD with cdboot */
195 new_currdev.d_dev = &bioscd;
196 new_currdev.d_unit = bc_bios2unit(initial_bootdev);
197 } else if ((kargs->bootflags & KARGS_FLAGS_PXE) != 0) {
198 /* we are booting from pxeldr */
199 new_currdev.d_dev = &pxedisk;
200 new_currdev.d_unit = 0;
201 } else {
202 /* we don't know what our boot device is */
203 new_currdev.d_kind.biosdisk.slice = -1;
204 new_currdev.d_kind.biosdisk.partition = 0;
205 biosdev = -1;
206 }
207 } else if ((initial_bootdev & B_MAGICMASK) != B_DEVMAGIC) {
208 /* The passed-in boot device is bad */
209 new_currdev.d_kind.biosdisk.slice = -1;
210 new_currdev.d_kind.biosdisk.partition = 0;
211 biosdev = -1;
212 } else {
| 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 <sys/reboot.h>
39
40#include "bootstrap.h"
41#include "libi386/libi386.h"
42#include "btxv86.h"
43
44#define KARGS_FLAGS_CD 0x1
45#define KARGS_FLAGS_PXE 0x2
46
47/* Arguments passed in from the boot1/boot2 loader */
48static struct
49{
50 u_int32_t howto;
51 u_int32_t bootdev;
52 u_int32_t bootflags;
53 u_int32_t pxeinfo;
54 u_int32_t res2;
55 u_int32_t bootinfo;
56} *kargs;
57
58static u_int32_t initial_howto;
59static u_int32_t initial_bootdev;
60static struct bootinfo *initial_bootinfo;
61
62struct arch_switch archsw; /* MI/MD interface boundary */
63
64static void extract_currdev(void);
65static int isa_inb(int port);
66static void isa_outb(int port, int value);
67void exit(int code);
68
69/* from vers.c */
70extern char bootprog_name[], bootprog_rev[], bootprog_date[], bootprog_maker[];
71
72/* XXX debugging */
73extern char end[];
74
75static void *heap_top;
76static void *heap_bottom;
77
78int
79main(void)
80{
81 int i;
82
83 /* Pick up arguments */
84 kargs = (void *)__args;
85 initial_howto = kargs->howto;
86 initial_bootdev = kargs->bootdev;
87 initial_bootinfo = kargs->bootinfo ? (struct bootinfo *)PTOV(kargs->bootinfo) : NULL;
88
89 /*
90 * Initialise the heap as early as possible. Once this is done, malloc() is usable.
91 */
92 bios_getmem();
93
94#ifdef LOADER_BZIP2_SUPPORT
95 heap_top = PTOV(memtop_copyin);
96 memtop_copyin -= 0x300000;
97 heap_bottom = PTOV(memtop_copyin);
98#else
99 heap_top = (void *)bios_basemem;
100 heap_bottom = (void *)end;
101#endif
102 setheap(heap_bottom, heap_top);
103
104 /*
105 * XXX Chicken-and-egg problem; we want to have console output early, but some
106 * console attributes may depend on reading from eg. the boot device, which we
107 * can't do yet.
108 *
109 * We can use printf() etc. once this is done.
110 * If the previous boot stage has requested a serial console, prefer that.
111 */
112 bi_setboothowto(initial_howto);
113 if (initial_howto & RB_MULTIPLE) {
114 if (initial_howto & RB_SERIAL)
115 setenv("console", "comconsole vidconsole", 1);
116 else
117 setenv("console", "vidconsole comconsole", 1);
118 } else if (initial_howto & RB_SERIAL)
119 setenv("console", "comconsole", 1);
120 else if (initial_howto & RB_MUTE)
121 setenv("console", "nullconsole", 1);
122 cons_probe();
123
124 /*
125 * Initialise the block cache
126 */
127 bcache_init(32, 512); /* 16k cache XXX tune this */
128
129 /*
130 * Special handling for PXE and CD booting.
131 */
132 if (kargs->bootinfo == 0) {
133 /*
134 * We only want the PXE disk to try to init itself in the below
135 * walk through devsw if we actually booted off of PXE.
136 */
137 if (kargs->bootflags & KARGS_FLAGS_PXE)
138 pxe_enable(kargs->pxeinfo ? PTOV(kargs->pxeinfo) : NULL);
139 else if (kargs->bootflags & KARGS_FLAGS_CD)
140 bc_add(initial_bootdev);
141 }
142
143 /*
144 * March through the device switch probing for things.
145 */
146 for (i = 0; devsw[i] != NULL; i++)
147 if (devsw[i]->dv_init != NULL)
148 (devsw[i]->dv_init)();
149 printf("BIOS %dkB/%dkB available memory\n", bios_basemem / 1024, bios_extmem / 1024);
150 if (initial_bootinfo != NULL) {
151 initial_bootinfo->bi_basemem = bios_basemem / 1024;
152 initial_bootinfo->bi_extmem = bios_extmem / 1024;
153 }
154
155 printf("\n");
156 printf("%s, Revision %s\n", bootprog_name, bootprog_rev);
157 printf("(%s, %s)\n", bootprog_maker, bootprog_date);
158
159 extract_currdev(); /* set $currdev and $loaddev */
160 setenv("LINES", "24", 1); /* optional */
161
162 archsw.arch_autoload = i386_autoload;
163 archsw.arch_getdev = i386_getdev;
164 archsw.arch_copyin = i386_copyin;
165 archsw.arch_copyout = i386_copyout;
166 archsw.arch_readin = i386_readin;
167 archsw.arch_isainb = isa_inb;
168 archsw.arch_isaoutb = isa_outb;
169
170 interact(); /* doesn't return */
171
172 /* if we ever get here, it is an error */
173 return (1);
174}
175
176/*
177 * Set the 'current device' by (if possible) recovering the boot device as
178 * supplied by the initial bootstrap.
179 *
180 * XXX should be extended for netbooting.
181 */
182static void
183extract_currdev(void)
184{
185 struct i386_devdesc new_currdev;
186 int major, biosdev = -1;
187
188 /* Assume we are booting from a BIOS disk by default */
189 new_currdev.d_dev = &biosdisk;
190
191 /* new-style boot loaders such as pxeldr and cdldr */
192 if (kargs->bootinfo == 0) {
193 if ((kargs->bootflags & KARGS_FLAGS_CD) != 0) {
194 /* we are booting from a CD with cdboot */
195 new_currdev.d_dev = &bioscd;
196 new_currdev.d_unit = bc_bios2unit(initial_bootdev);
197 } else if ((kargs->bootflags & KARGS_FLAGS_PXE) != 0) {
198 /* we are booting from pxeldr */
199 new_currdev.d_dev = &pxedisk;
200 new_currdev.d_unit = 0;
201 } else {
202 /* we don't know what our boot device is */
203 new_currdev.d_kind.biosdisk.slice = -1;
204 new_currdev.d_kind.biosdisk.partition = 0;
205 biosdev = -1;
206 }
207 } else if ((initial_bootdev & B_MAGICMASK) != B_DEVMAGIC) {
208 /* The passed-in boot device is bad */
209 new_currdev.d_kind.biosdisk.slice = -1;
210 new_currdev.d_kind.biosdisk.partition = 0;
211 biosdev = -1;
212 } else {
|
213 new_currdev.d_kind.biosdisk.slice = (B_ADAPTOR(initial_bootdev) << 4) +
214 B_CONTROLLER(initial_bootdev) - 1;
| 213 new_currdev.d_kind.biosdisk.slice = B_SLICE(initial_bootdev) - 1;
|
215 new_currdev.d_kind.biosdisk.partition = B_PARTITION(initial_bootdev);
216 biosdev = initial_bootinfo->bi_bios_dev;
217 major = B_TYPE(initial_bootdev);
218
219 /*
220 * If we are booted by an old bootstrap, we have to guess at the BIOS
221 * unit number. We will lose if there is more than one disk type
222 * and we are not booting from the lowest-numbered disk type
223 * (ie. SCSI when IDE also exists).
224 */
225 if ((biosdev == 0) && (B_TYPE(initial_bootdev) != 2)) { /* biosdev doesn't match major */
226 if (B_TYPE(initial_bootdev) == 6)
227 biosdev = 0x30 + B_UNIT(initial_bootdev);
228 else
229 biosdev = (major << 3) + 0x80 + B_UNIT(initial_bootdev);
230 }
231 }
232 new_currdev.d_type = new_currdev.d_dev->dv_type;
233
234 /*
235 * If we are booting off of a BIOS disk and we didn't succeed in determining
236 * which one we booted off of, just use disk0: as a reasonable default.
237 */
238 if ((new_currdev.d_type == biosdisk.dv_type) &&
239 ((new_currdev.d_unit = bd_bios2unit(biosdev)) == -1)) {
240 printf("Can't work out which disk we are booting from.\n"
241 "Guessed BIOS device 0x%x not found by probes, defaulting to disk0:\n", biosdev);
242 new_currdev.d_unit = 0;
243 }
244 env_setenv("currdev", EV_VOLATILE, i386_fmtdev(&new_currdev),
245 i386_setcurrdev, env_nounset);
246 env_setenv("loaddev", EV_VOLATILE, i386_fmtdev(&new_currdev), env_noset,
247 env_nounset);
248}
249
250COMMAND_SET(reboot, "reboot", "reboot the system", command_reboot);
251
252static int
253command_reboot(int argc, char *argv[])
254{
255 int i;
256
257 for (i = 0; devsw[i] != NULL; ++i)
258 if (devsw[i]->dv_cleanup != NULL)
259 (devsw[i]->dv_cleanup)();
260
261 printf("Rebooting...\n");
262 delay(1000000);
263 __exit(0);
264}
265
266/* provide this for panic, as it's not in the startup code */
267void
268exit(int code)
269{
270 __exit(code);
271}
272
273COMMAND_SET(heap, "heap", "show heap usage", command_heap);
274
275static int
276command_heap(int argc, char *argv[])
277{
278 mallocstats();
279 printf("heap base at %p, top at %p, upper limit at %p\n", heap_bottom,
280 sbrk(0), heap_top);
281 return(CMD_OK);
282}
283
284/* ISA bus access functions for PnP, derived from <machine/cpufunc.h> */
285static int
286isa_inb(int port)
287{
288 u_char data;
289
290 if (__builtin_constant_p(port) &&
291 (((port) & 0xffff) < 0x100) &&
292 ((port) < 0x10000)) {
293 __asm __volatile("inb %1,%0" : "=a" (data) : "id" ((u_short)(port)));
294 } else {
295 __asm __volatile("inb %%dx,%0" : "=a" (data) : "d" (port));
296 }
297 return(data);
298}
299
300static void
301isa_outb(int port, int value)
302{
303 u_char al = value;
304
305 if (__builtin_constant_p(port) &&
306 (((port) & 0xffff) < 0x100) &&
307 ((port) < 0x10000)) {
308 __asm __volatile("outb %0,%1" : : "a" (al), "id" ((u_short)(port)));
309 } else {
310 __asm __volatile("outb %0,%%dx" : : "a" (al), "d" (port));
311 }
312}
313
| 214 new_currdev.d_kind.biosdisk.partition = B_PARTITION(initial_bootdev);
215 biosdev = initial_bootinfo->bi_bios_dev;
216 major = B_TYPE(initial_bootdev);
217
218 /*
219 * If we are booted by an old bootstrap, we have to guess at the BIOS
220 * unit number. We will lose if there is more than one disk type
221 * and we are not booting from the lowest-numbered disk type
222 * (ie. SCSI when IDE also exists).
223 */
224 if ((biosdev == 0) && (B_TYPE(initial_bootdev) != 2)) { /* biosdev doesn't match major */
225 if (B_TYPE(initial_bootdev) == 6)
226 biosdev = 0x30 + B_UNIT(initial_bootdev);
227 else
228 biosdev = (major << 3) + 0x80 + B_UNIT(initial_bootdev);
229 }
230 }
231 new_currdev.d_type = new_currdev.d_dev->dv_type;
232
233 /*
234 * If we are booting off of a BIOS disk and we didn't succeed in determining
235 * which one we booted off of, just use disk0: as a reasonable default.
236 */
237 if ((new_currdev.d_type == biosdisk.dv_type) &&
238 ((new_currdev.d_unit = bd_bios2unit(biosdev)) == -1)) {
239 printf("Can't work out which disk we are booting from.\n"
240 "Guessed BIOS device 0x%x not found by probes, defaulting to disk0:\n", biosdev);
241 new_currdev.d_unit = 0;
242 }
243 env_setenv("currdev", EV_VOLATILE, i386_fmtdev(&new_currdev),
244 i386_setcurrdev, env_nounset);
245 env_setenv("loaddev", EV_VOLATILE, i386_fmtdev(&new_currdev), env_noset,
246 env_nounset);
247}
248
249COMMAND_SET(reboot, "reboot", "reboot the system", command_reboot);
250
251static int
252command_reboot(int argc, char *argv[])
253{
254 int i;
255
256 for (i = 0; devsw[i] != NULL; ++i)
257 if (devsw[i]->dv_cleanup != NULL)
258 (devsw[i]->dv_cleanup)();
259
260 printf("Rebooting...\n");
261 delay(1000000);
262 __exit(0);
263}
264
265/* provide this for panic, as it's not in the startup code */
266void
267exit(int code)
268{
269 __exit(code);
270}
271
272COMMAND_SET(heap, "heap", "show heap usage", command_heap);
273
274static int
275command_heap(int argc, char *argv[])
276{
277 mallocstats();
278 printf("heap base at %p, top at %p, upper limit at %p\n", heap_bottom,
279 sbrk(0), heap_top);
280 return(CMD_OK);
281}
282
283/* ISA bus access functions for PnP, derived from <machine/cpufunc.h> */
284static int
285isa_inb(int port)
286{
287 u_char data;
288
289 if (__builtin_constant_p(port) &&
290 (((port) & 0xffff) < 0x100) &&
291 ((port) < 0x10000)) {
292 __asm __volatile("inb %1,%0" : "=a" (data) : "id" ((u_short)(port)));
293 } else {
294 __asm __volatile("inb %%dx,%0" : "=a" (data) : "d" (port));
295 }
296 return(data);
297}
298
299static void
300isa_outb(int port, int value)
301{
302 u_char al = value;
303
304 if (__builtin_constant_p(port) &&
305 (((port) & 0xffff) < 0x100) &&
306 ((port) < 0x10000)) {
307 __asm __volatile("outb %0,%1" : : "a" (al), "id" ((u_short)(port)));
308 } else {
309 __asm __volatile("outb %0,%%dx" : : "a" (al), "d" (port));
310 }
311}
312
|