blob: fe1c6bf0a0322f286f2bd7c716602fb08adc4ad5 [file] [log] [blame]
Kevin O'Connorf13b0082008-08-17 11:26:42 -04001// Code to load disk image and start system boot.
Kevin O'Connorf076a3e2008-02-25 22:25:15 -05002//
3// Copyright (C) 2008 Kevin O'Connor <kevin@koconnor.net>
4// Copyright (C) 2002 MandrakeSoft S.A.
5//
Kevin O'Connorb1b7c2a2009-01-15 20:52:58 -05006// This file may be distributed under the terms of the GNU LGPLv3 license.
Kevin O'Connorf076a3e2008-02-25 22:25:15 -05007
Kevin O'Connorf076a3e2008-02-25 22:25:15 -05008#include "util.h" // irq_enable
Kevin O'Connor9521e262008-07-04 13:04:29 -04009#include "biosvar.h" // GET_EBDA
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050010#include "config.h" // CONFIG_*
Kevin O'Connor180a9592008-03-04 22:50:53 -050011#include "disk.h" // cdrom_boot
Kevin O'Connor9521e262008-07-04 13:04:29 -040012#include "bregs.h" // struct bregs
Kevin O'Connorc659fde2008-12-28 23:43:20 -050013#include "boot.h" // struct ipl_s
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050014#include "cmos.h" // inb_cmos
Kevin O'Connorc659fde2008-12-28 23:43:20 -050015
16struct ipl_s IPL;
Kevin O'Connorf076a3e2008-02-25 22:25:15 -050017
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050018
19/****************************************************************
Kevin O'Connor0a924122009-02-08 19:43:47 -050020 * IPL and BCV handlers
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050021 ****************************************************************/
22
23void
24boot_setup()
25{
26 if (! CONFIG_BOOT)
27 return;
28 dprintf(3, "init boot device ordering\n");
29
30 memset(&IPL, 0, sizeof(IPL));
31
32 // Floppy drive
Kevin O'Connor0a924122009-02-08 19:43:47 -050033 struct ipl_entry_s *ie = &IPL.bev[0];
Kevin O'Connor71f036d2009-02-08 16:57:22 -050034 ie->type = IPL_TYPE_FLOPPY;
35 ie->description = "Floppy";
36 ie++;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050037
38 // First HDD
Kevin O'Connor71f036d2009-02-08 16:57:22 -050039 ie->type = IPL_TYPE_HARDDISK;
40 ie->description = "Hard Disk";
41 ie++;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050042
43 // CDROM
44 if (CONFIG_CDROM_BOOT) {
Kevin O'Connor71f036d2009-02-08 16:57:22 -050045 ie->type = IPL_TYPE_CDROM;
46 ie->description = "CD-Rom";
47 ie++;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050048 }
49
Kevin O'Connor67823442009-04-13 14:14:51 -040050 if (CONFIG_COREBOOT_FLASH) {
51 ie->type = IPL_TYPE_CBFS;
52 ie->description = "CBFS";
53 ie++;
54 }
55
Kevin O'Connor0a924122009-02-08 19:43:47 -050056 IPL.bevcount = ie - IPL.bev;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050057 SET_EBDA(boot_sequence, 0xffff);
58 if (CONFIG_COREBOOT) {
59 // XXX - hardcode defaults for coreboot.
60 IPL.bootorder = 0x00000231;
61 IPL.checkfloppysig = 1;
62 } else {
63 // On emulators, get boot order from nvram.
64 IPL.bootorder = (inb_cmos(CMOS_BIOS_BOOTFLAG2)
65 | ((inb_cmos(CMOS_BIOS_BOOTFLAG1) & 0xf0) << 4));
66 if (!(inb_cmos(CMOS_BIOS_BOOTFLAG1) & 1))
67 IPL.checkfloppysig = 1;
68 }
69}
70
71// Add a BEV vector for a given pnp compatible option rom.
72void
73add_bev(u16 seg, u16 bev, u16 desc)
74{
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050075 if (! CONFIG_BOOT)
76 return;
Kevin O'Connor0a924122009-02-08 19:43:47 -050077 if (IPL.bevcount >= ARRAY_SIZE(IPL.bev))
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050078 return;
79
Kevin O'Connor0a924122009-02-08 19:43:47 -050080 struct ipl_entry_s *ie = &IPL.bev[IPL.bevcount++];
Kevin O'Connor71f036d2009-02-08 16:57:22 -050081 ie->type = IPL_TYPE_BEV;
82 ie->vector = (seg << 16) | bev;
Kevin O'Connor0a924122009-02-08 19:43:47 -050083 const char *d = "Unknown";
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050084 if (desc)
Kevin O'Connor0a924122009-02-08 19:43:47 -050085 d = MAKE_FLATPTR(seg, desc);
86 ie->description = d;
87}
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -050088
Kevin O'Connor0a924122009-02-08 19:43:47 -050089// Add a bcv entry for an expansion card harddrive or legacy option rom
90void
91add_bcv(u16 seg, u16 ip, u16 desc)
92{
93 if (! CONFIG_BOOT)
94 return;
95 if (IPL.bcvcount >= ARRAY_SIZE(IPL.bcv))
96 return;
97
98 struct ipl_entry_s *ie = &IPL.bcv[IPL.bcvcount++];
99 ie->type = IPL_TYPE_BEV;
100 ie->vector = (seg << 16) | ip;
101 const char *d = "Legacy option rom";
102 if (desc)
103 d = MAKE_FLATPTR(seg, desc);
104 ie->description = d;
105}
106
107// Add a bcv entry for an ata harddrive
108void
109add_bcv_hd(int driveid, const char *desc)
110{
111 if (! CONFIG_BOOT)
112 return;
113 if (IPL.bcvcount >= ARRAY_SIZE(IPL.bcv))
114 return;
115
116 struct ipl_entry_s *ie = &IPL.bcv[IPL.bcvcount++];
117 ie->type = IPL_TYPE_HARDDISK;
118 ie->vector = driveid;
119 ie->description = desc;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500120}
121
122
123/****************************************************************
Kevin O'Connor0a924122009-02-08 19:43:47 -0500124 * Boot menu and BCV execution
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500125 ****************************************************************/
126
Kevin O'Connor0a924122009-02-08 19:43:47 -0500127// Show a generic menu item
128static int
129menu_show_default(struct ipl_entry_s *ie, int menupos)
130{
131 char desc[33];
132 printf("%d. %s\n", menupos
133 , strtcpy(desc, ie->description, ARRAY_SIZE(desc)));
134 return 1;
135}
136
137// Show floppy menu item - but only if there exists a floppy drive.
138static int
139menu_show_floppy(struct ipl_entry_s *ie, int menupos)
140{
141 if (!FloppyCount)
142 return 0;
143 return menu_show_default(ie, menupos);
144}
145
146// Show menu items from BCV list.
147static int
148menu_show_harddisk(struct ipl_entry_s *ie, int menupos)
149{
150 int i;
151 for (i = 0; i < IPL.bcvcount; i++) {
152 struct ipl_entry_s *ie = &IPL.bcv[i];
153 switch (ie->type) {
154 case IPL_TYPE_HARDDISK:
155 printf("%d. ata%d-%d %s\n", menupos + i
Kevin O'Connor7da1dcd2009-02-16 10:51:24 -0500156 , ie->vector / 2, ie->vector % 2, ie->description);
Kevin O'Connor0a924122009-02-08 19:43:47 -0500157 break;
158 default:
159 menu_show_default(ie, menupos+i);
160 break;
161 }
162 }
163 return IPL.bcvcount;
164}
165
166// Show cdrom menu item - but only if there exists a cdrom drive.
167static int
168menu_show_cdrom(struct ipl_entry_s *ie, int menupos)
169{
Kevin O'Connor7da1dcd2009-02-16 10:51:24 -0500170 int i;
171 for (i = 0; i < ATA.cdcount; i++) {
172 int driveid = ATA.idmap[1][i];
173 printf("%d. CD-Rom [ata%d-%d %s]\n", menupos + i
174 , driveid / 2, driveid % 2, ATA.devices[driveid].model);
175 }
176 return ATA.cdcount;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500177}
178
Kevin O'Connor67823442009-04-13 14:14:51 -0400179// Show coreboot-fs menu item.
180static int
181menu_show_cbfs(struct ipl_entry_s *ie, int menupos)
182{
183 int count = 0;
184 for (;;) {
185 const char *filename = cbfs_findNprefix("img/", count);
186 if (!filename)
187 break;
188 printf("%d. Payload [%s]\n", menupos + count, &filename[4]);
189 count++;
190 if (count > 8)
191 break;
192 }
193 return count;
194}
195
Kevin O'Connor0a924122009-02-08 19:43:47 -0500196// Show IPL option menu.
197static void
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500198interactive_bootmenu()
199{
200 if (! CONFIG_BOOTMENU)
201 return;
202
203 while (get_keystroke(0) >= 0)
204 ;
205
206 printf("Press F12 for boot menu.\n\n");
207
208 int scan_code = get_keystroke(2500);
209 if (scan_code != 0x86)
210 /* not F12 */
211 return;
212
213 while (get_keystroke(0) >= 0)
214 ;
215
216 printf("Select boot device:\n\n");
217
Kevin O'Connor0a924122009-02-08 19:43:47 -0500218 int subcount[ARRAY_SIZE(IPL.bev)];
219 int menupos = 1;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500220 int i;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500221 for (i = 0; i < IPL.bevcount; i++) {
222 struct ipl_entry_s *ie = &IPL.bev[i];
223 int sc = 1;
224 switch (ie->type) {
225 case IPL_TYPE_FLOPPY:
226 sc = menu_show_floppy(ie, menupos);
227 break;
228 case IPL_TYPE_HARDDISK:
229 sc = menu_show_harddisk(ie, menupos);
230 break;
231 case IPL_TYPE_CDROM:
232 sc = menu_show_cdrom(ie, menupos);
233 break;
Kevin O'Connor67823442009-04-13 14:14:51 -0400234 case IPL_TYPE_CBFS:
235 sc = menu_show_cbfs(ie, menupos);
236 break;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500237 default:
238 sc = menu_show_default(ie, menupos);
239 break;
240 }
241 subcount[i] = sc;
242 menupos += sc;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500243 }
244
245 for (;;) {
246 scan_code = get_keystroke(1000);
247 if (scan_code == 0x01)
248 // ESC
249 break;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500250 if (scan_code < 1 || scan_code > menupos)
251 continue;
252 int choice = scan_code - 1;
253
254 // Find out which IPL this was for.
255 int bev = 0;
256 while (choice > subcount[bev]) {
257 choice -= subcount[bev];
258 bev++;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500259 }
Kevin O'Connor67823442009-04-13 14:14:51 -0400260 IPL.bev[bev].subchoice = choice-1;
Kevin O'Connor0a924122009-02-08 19:43:47 -0500261
262 // Add user choice to the boot order.
263 IPL.bootorder = (IPL.bootorder << 4) | (bev+1);
264 break;
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500265 }
266 printf("\n");
267}
268
Kevin O'Connor0a924122009-02-08 19:43:47 -0500269// Run the specified bcv.
270static void
271run_bcv(struct ipl_entry_s *ie)
272{
273 switch (ie->type) {
274 case IPL_TYPE_HARDDISK:
275 map_drive(ie->vector);
276 break;
277 case IPL_TYPE_BEV:
278 call_bcv(ie->vector >> 16, ie->vector & 0xffff);
279 break;
280 }
281}
282
283// Prepare for boot - show menu and run bcvs.
284void
285boot_prep()
286{
287 if (! CONFIG_BOOT)
288 return;
289
290 // Allow user to modify BCV/IPL order.
291 interactive_bootmenu();
292
293 // Run BCVs
Kevin O'Connor67823442009-04-13 14:14:51 -0400294 int override = IPL.bev[1].subchoice;
Kevin O'Connor7da1dcd2009-02-16 10:51:24 -0500295 if (override < IPL.bcvcount)
Kevin O'Connor0a924122009-02-08 19:43:47 -0500296 run_bcv(&IPL.bcv[override]);
297 int i;
298 for (i=0; i<IPL.bcvcount; i++)
299 if (i != override)
300 run_bcv(&IPL.bcv[i]);
301}
302
Kevin O'Connor9f4e1d92009-02-08 15:44:08 -0500303
304/****************************************************************
305 * Boot code (int 18/19)
306 ****************************************************************/
307
Kevin O'Connor0a924122009-02-08 19:43:47 -0500308// Jump to a bootup entry point.
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500309static void
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500310call_boot_entry(u16 bootseg, u16 bootip, u8 bootdrv)
311{
312 dprintf(1, "Booting from %x:%x\n", bootseg, bootip);
313
314 struct bregs br;
315 memset(&br, 0, sizeof(br));
316 br.ip = bootip;
317 br.cs = bootseg;
318 // Set the magic number in ax and the boot drive in dl.
319 br.dl = bootdrv;
320 br.ax = 0xaa55;
321 call16(&br);
322}
323
324// Boot from a disk (either floppy or harddrive)
325static void
326boot_disk(u8 bootdrv, int checksig)
327{
328 u16 bootseg = 0x07c0;
329
330 // Read sector
331 struct bregs br;
332 memset(&br, 0, sizeof(br));
333 br.dl = bootdrv;
334 br.es = bootseg;
335 br.ah = 2;
336 br.al = 1;
337 br.cl = 1;
338 call16_int(0x13, &br);
339
340 if (br.flags & F_CF) {
341 printf("Boot failed: could not read the boot disk\n\n");
342 return;
343 }
344
345 if (checksig) {
346 struct mbr_s *mbr = (void*)0;
347 if (GET_FARVAR(bootseg, mbr->signature) != MBR_SIGNATURE) {
348 printf("Boot failed: not a bootable disk\n\n");
349 return;
350 }
351 }
352
353 /* Canonicalize bootseg:bootip */
354 u16 bootip = (bootseg & 0x0fff) << 4;
355 bootseg &= 0xf000;
356
357 call_boot_entry(bootseg, bootip, bootdrv);
358}
359
360// Boot from a CD-ROM
361static void
Kevin O'Connor67823442009-04-13 14:14:51 -0400362boot_cdrom(struct ipl_entry_s *ie)
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500363{
364 if (! CONFIG_CDROM_BOOT)
365 return;
Kevin O'Connor67823442009-04-13 14:14:51 -0400366 int status = cdrom_boot(ie->subchoice);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500367 if (status) {
368 printf("Boot failed: Could not read from CDROM (code %04x)\n", status);
369 return;
370 }
371
372 u16 ebda_seg = get_ebda_seg();
373 u8 bootdrv = GET_EBDA2(ebda_seg, cdemu.emulated_drive);
374 u16 bootseg = GET_EBDA2(ebda_seg, cdemu.load_segment);
375 /* Canonicalize bootseg:bootip */
376 u16 bootip = (bootseg & 0x0fff) << 4;
377 bootseg &= 0xf000;
378
379 call_boot_entry(bootseg, bootip, bootdrv);
380}
381
Kevin O'Connor67823442009-04-13 14:14:51 -0400382// Boot from a CD-ROM
383static void
384boot_cbfs(struct ipl_entry_s *ie)
385{
386 if (! CONFIG_COREBOOT_FLASH)
387 return;
388 const char *filename = cbfs_findNprefix("img/", ie->subchoice);
389 if (! filename)
390 return;
391 cbfs_run_payload(filename);
392}
393
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500394static void
395do_boot(u16 seq_nr)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500396{
Kevin O'Connor40967022008-07-21 22:23:05 -0400397 if (! CONFIG_BOOT)
Kevin O'Connore07e18e2009-02-08 17:07:29 -0500398 panic("Boot support not compiled in.\n");
Kevin O'Connor40967022008-07-21 22:23:05 -0400399
Kevin O'Connorc659fde2008-12-28 23:43:20 -0500400 u32 bootdev = IPL.bootorder;
Kevin O'Connor840c5342008-03-29 14:04:34 -0400401 bootdev >>= 4 * seq_nr;
402 bootdev &= 0xf;
Kevin O'Connore0113c92008-04-05 15:51:12 -0400403
Kevin O'Connor5ca4b952009-02-15 13:45:48 -0500404 if (bootdev == 0) {
405 printf("No bootable device.\n");
406 // Loop with irqs enabled - this allows ctrl+alt+delete to work.
407 for (;;)
408 usleep(1000000);
409 }
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500410
Kevin O'Connorabc75972008-05-18 00:20:53 -0400411 /* Translate bootdev to an IPL table offset by subtracting 1 */
Kevin O'Connor840c5342008-03-29 14:04:34 -0400412 bootdev -= 1;
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500413
Kevin O'Connor0a924122009-02-08 19:43:47 -0500414 if (bootdev >= IPL.bevcount) {
Kevin O'Connorac8df8c2008-05-24 23:46:33 -0400415 dprintf(1, "Invalid boot device (0x%x)\n", bootdev);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500416 goto fail;
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500417 }
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500418
419 /* Do the loading, and set up vector as a far pointer to the boot
420 * address, and bootdrv as the boot drive */
Kevin O'Connor0a924122009-02-08 19:43:47 -0500421 struct ipl_entry_s *ie = &IPL.bev[bootdev];
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500422 char desc[33];
423 printf("Booting from %s...\n"
424 , strtcpy(desc, ie->description, ARRAY_SIZE(desc)));
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500425
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500426 switch(ie->type) {
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400427 case IPL_TYPE_FLOPPY:
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500428 boot_disk(0x00, IPL.checkfloppysig);
429 break;
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400430 case IPL_TYPE_HARDDISK:
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500431 boot_disk(0x80, 1);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500432 break;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500433 case IPL_TYPE_CDROM:
Kevin O'Connor67823442009-04-13 14:14:51 -0400434 boot_cdrom(ie);
435 break;
436 case IPL_TYPE_CBFS:
437 boot_cbfs(ie);
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500438 break;
439 case IPL_TYPE_BEV:
440 call_boot_entry(ie->vector >> 16, ie->vector & 0xffff, 0);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500441 break;
Kevin O'Connor180a9592008-03-04 22:50:53 -0500442 }
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500443
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500444 // Boot failed: invoke the boot recovery function
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400445 struct bregs br;
Kevin O'Connor71f036d2009-02-08 16:57:22 -0500446fail:
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400447 memset(&br, 0, sizeof(br));
448 call16_int(0x18, &br);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500449}
450
451// Boot Failure recovery: try the next device.
Kevin O'Connor44eeaf12008-07-06 10:14:49 -0400452void VISIBLE32
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500453handle_18()
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500454{
Kevin O'Connor61d6b062008-06-21 12:15:10 -0400455 debug_serial_setup();
Kevin O'Connor15c1f222008-06-12 22:59:43 -0400456 debug_enter(NULL, DEBUG_HDL_18);
Kevin O'Connor08815372008-12-29 21:16:31 -0500457 u16 ebda_seg = get_ebda_seg();
458 u16 seq = GET_EBDA2(ebda_seg, boot_sequence) + 1;
459 SET_EBDA2(ebda_seg, boot_sequence, seq);
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400460 do_boot(seq);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500461}
462
463// INT 19h Boot Load Service Entry Point
Kevin O'Connor44eeaf12008-07-06 10:14:49 -0400464void VISIBLE32
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500465handle_19()
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500466{
Kevin O'Connor61d6b062008-06-21 12:15:10 -0400467 debug_serial_setup();
Kevin O'Connor15c1f222008-06-12 22:59:43 -0400468 debug_enter(NULL, DEBUG_HDL_19);
Kevin O'Connor08815372008-12-29 21:16:31 -0500469 SET_EBDA(boot_sequence, 0);
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400470 do_boot(0);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500471}
Kevin O'Connorcdd3d652008-07-12 14:22:14 -0400472
473// Ughh - some older gcc compilers have a bug which causes VISIBLE32
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400474// functions to not be exported as global variables.
Kevin O'Connorcdd3d652008-07-12 14:22:14 -0400475asm(".global handle_18, handle_19");