blob: 48ad06a6cc365429ebd8954ea14598771c0af409 [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//
6// This file may be distributed under the terms of the GNU GPLv3 license.
7
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'Connor15aee2e2008-03-01 13:34:04 -050011#include "ata.h" // ata_detect
Kevin O'Connor180a9592008-03-04 22:50:53 -050012#include "disk.h" // cdrom_boot
Kevin O'Connor9521e262008-07-04 13:04:29 -040013#include "bregs.h" // struct bregs
Kevin O'Connorf076a3e2008-02-25 22:25:15 -050014
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050015//--------------------------------------------------------------------------
16// print_boot_device
17// displays the boot device
18//--------------------------------------------------------------------------
19
20static const char drivetypes[][10]={
Kevin O'Connorabc75972008-05-18 00:20:53 -040021 "", "Floppy", "Hard Disk", "CD-Rom", "Network"
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050022};
23
Kevin O'Connore0113c92008-04-05 15:51:12 -040024void
25printf_bootdev(u16 bootdev)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -050026{
Kevin O'Connore0113c92008-04-05 15:51:12 -040027 u16 type = GET_EBDA(ipl.table[bootdev].type);
28
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050029 /* NIC appears as type 0x80 */
30 if (type == IPL_TYPE_BEV)
31 type = 0x4;
32 if (type == 0 || type > 0x4)
33 BX_PANIC("Bad drive type\n");
Kevin O'Connore0113c92008-04-05 15:51:12 -040034 printf("%s", drivetypes[type]);
Kevin O'Connora2e73802008-02-27 10:27:00 -050035
Kevin O'Connore0113c92008-04-05 15:51:12 -040036 /* print product string if BEV */
Kevin O'Connorf782d602008-11-08 13:35:32 -050037 char *far_description = GET_EBDA(ipl.table[bootdev].description);
Kevin O'Connore0113c92008-04-05 15:51:12 -040038 if (type == 4 && far_description != 0) {
39 char description[33];
40 /* first 32 bytes are significant */
Kevin O'Connorf782d602008-11-08 13:35:32 -050041 memcpy_far(MAKE_FARPTR(GET_SEG(SS), description), far_description, 32);
Kevin O'Connore0113c92008-04-05 15:51:12 -040042 /* terminate string */
43 description[32] = 0;
44 printf(" [%.s]", description);
45 }
46}
47
48static void
49print_boot_device(u16 bootdev)
50{
51 printf("Booting from ");
52 printf_bootdev(bootdev);
53 printf("...\n");
Kevin O'Connorf076a3e2008-02-25 22:25:15 -050054}
55
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050056//--------------------------------------------------------------------------
57// print_boot_failure
58// displays the reason why boot failed
59//--------------------------------------------------------------------------
60static void
61print_boot_failure(u16 type, u8 reason)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -050062{
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050063 if (type == 0 || type > 0x3)
64 BX_PANIC("Bad drive type\n");
65
Kevin O'Connora2e73802008-02-27 10:27:00 -050066 printf("Boot failed");
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050067 if (type < 4) {
68 /* Report the reason too */
69 if (reason==0)
70 printf(": not a bootable disk");
71 else
72 printf(": could not read the boot disk");
73 }
Kevin O'Connora2e73802008-02-27 10:27:00 -050074 printf("\n\n");
Kevin O'Connorf076a3e2008-02-25 22:25:15 -050075}
76
77static void
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050078try_boot(u16 seq_nr)
Kevin O'Connorf076a3e2008-02-25 22:25:15 -050079{
Kevin O'Connor40967022008-07-21 22:23:05 -040080 if (! CONFIG_BOOT)
81 BX_PANIC("Boot support not compiled in.\n");
82
Kevin O'Connor56a506d2008-03-29 13:15:36 -040083 SET_EBDA(ipl.sequence, seq_nr);
Kevin O'Connor7a558e42008-03-11 20:38:33 -040084
Kevin O'Connorabc75972008-05-18 00:20:53 -040085 u32 bootdev = GET_EBDA(ipl.bootorder);
Kevin O'Connor840c5342008-03-29 14:04:34 -040086 bootdev >>= 4 * seq_nr;
87 bootdev &= 0xf;
Kevin O'Connore0113c92008-04-05 15:51:12 -040088
Kevin O'Connor840c5342008-03-29 14:04:34 -040089 if (bootdev == 0)
90 BX_PANIC("No bootable device.\n");
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050091
Kevin O'Connorabc75972008-05-18 00:20:53 -040092 /* Translate bootdev to an IPL table offset by subtracting 1 */
Kevin O'Connor840c5342008-03-29 14:04:34 -040093 bootdev -= 1;
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050094
Kevin O'Connor56a506d2008-03-29 13:15:36 -040095 if (bootdev >= GET_EBDA(ipl.count)) {
Kevin O'Connorac8df8c2008-05-24 23:46:33 -040096 dprintf(1, "Invalid boot device (0x%x)\n", bootdev);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050097 return;
98 }
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -050099
100 /* Do the loading, and set up vector as a far pointer to the boot
101 * address, and bootdrv as the boot drive */
Kevin O'Connore0113c92008-04-05 15:51:12 -0400102 print_boot_device(bootdev);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500103
Kevin O'Connore0113c92008-04-05 15:51:12 -0400104 u16 type = GET_EBDA(ipl.table[bootdev].type);
105
106 u16 bootseg, bootip;
107 u8 bootdrv = 0;
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500108 struct bregs cr;
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500109 switch(type) {
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400110 case IPL_TYPE_FLOPPY:
111 case IPL_TYPE_HARDDISK:
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500112
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500113 bootdrv = (type == IPL_TYPE_HARDDISK) ? 0x80 : 0x00;
114 bootseg = 0x07c0;
115
116 // Read sector
117 memset(&cr, 0, sizeof(cr));
118 cr.dl = bootdrv;
119 cr.es = bootseg;
120 cr.ah = 2;
121 cr.al = 1;
122 cr.cl = 1;
123 call16_int(0x13, &cr);
124
125 if (cr.flags & F_CF) {
126 print_boot_failure(type, 1);
127 return;
128 }
129
130 /* Always check the signature on a HDD boot sector; on FDD,
Kevin O'Connorabc75972008-05-18 00:20:53 -0400131 * only do the check if configured for it */
132 if (type != IPL_TYPE_FLOPPY || GET_EBDA(ipl.checkfloppysig)) {
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500133 if (GET_FARVAR(bootseg, *(u16*)0x1fe) != 0xaa55) {
134 print_boot_failure(type, 0);
135 return;
136 }
137 }
138
139 /* Canonicalize bootseg:bootip */
140 bootip = (bootseg & 0x0fff) << 4;
141 bootseg &= 0xf000;
142 break;
Kevin O'Connor180a9592008-03-04 22:50:53 -0500143 case IPL_TYPE_CDROM: {
144 /* CD-ROM */
145 if (! CONFIG_CDROM_BOOT)
Kevin O'Connord19501e2008-12-10 20:52:09 -0500146 return;
Kevin O'Connora05223c2008-06-28 12:15:57 -0400147 int status = cdrom_boot();
Kevin O'Connor180a9592008-03-04 22:50:53 -0500148 if (status) {
149 printf("CDROM boot failure code : %04x\n", status);
150 print_boot_failure(type, 1);
151 return;
152 }
153
154 bootdrv = GET_EBDA(cdemu.emulated_drive);
155 bootseg = GET_EBDA(cdemu.load_segment);
156 /* Canonicalize bootseg:bootip */
157 bootip = (bootseg & 0x0fff) << 4;
158 bootseg &= 0xf000;
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500159 break;
Kevin O'Connor180a9592008-03-04 22:50:53 -0500160 }
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500161 case IPL_TYPE_BEV: {
162 /* Expansion ROM with a Bootstrap Entry Vector (a far
163 * pointer) */
Kevin O'Connor56a506d2008-03-29 13:15:36 -0400164 u32 vector = GET_EBDA(ipl.table[bootdev].vector);
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500165 bootseg = vector >> 16;
166 bootip = vector & 0xffff;
167 break;
168 }
169 default:
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500170 return;
171 }
172
Kevin O'Connordcc7a4f2008-03-08 23:25:16 -0500173 /* Debugging info */
Kevin O'Connorac8df8c2008-05-24 23:46:33 -0400174 dprintf(1, "Booting from %x:%x\n", bootseg, bootip);
Kevin O'Connordcc7a4f2008-03-08 23:25:16 -0500175
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500176 memset(&cr, 0, sizeof(cr));
177 cr.ip = bootip;
178 cr.cs = bootseg;
179 // Set the magic number in ax and the boot drive in dl.
180 cr.dl = bootdrv;
181 cr.ax = 0xaa55;
182 call16(&cr);
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400183}
184
185static void
186do_boot(u16 seq_nr)
187{
188 try_boot(seq_nr);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500189
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500190 // Boot failed: invoke the boot recovery function
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400191 struct bregs br;
192 memset(&br, 0, sizeof(br));
193 call16_int(0x18, &br);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500194}
195
196// Boot Failure recovery: try the next device.
Kevin O'Connor44eeaf12008-07-06 10:14:49 -0400197void VISIBLE32
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500198handle_18()
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500199{
Kevin O'Connor61d6b062008-06-21 12:15:10 -0400200 debug_serial_setup();
Kevin O'Connor15c1f222008-06-12 22:59:43 -0400201 debug_enter(NULL, DEBUG_HDL_18);
Kevin O'Connor56a506d2008-03-29 13:15:36 -0400202 u16 seq = GET_EBDA(ipl.sequence) + 1;
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400203 do_boot(seq);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500204}
205
206// INT 19h Boot Load Service Entry Point
Kevin O'Connor44eeaf12008-07-06 10:14:49 -0400207void VISIBLE32
Kevin O'Connor38fcbfe2008-02-25 22:30:47 -0500208handle_19()
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500209{
Kevin O'Connor61d6b062008-06-21 12:15:10 -0400210 debug_serial_setup();
Kevin O'Connor15c1f222008-06-12 22:59:43 -0400211 debug_enter(NULL, DEBUG_HDL_19);
Kevin O'Connor7af49bf2008-03-09 13:46:13 -0400212 do_boot(0);
Kevin O'Connorf076a3e2008-02-25 22:25:15 -0500213}
Kevin O'Connorcdd3d652008-07-12 14:22:14 -0400214
215// Ughh - some older gcc compilers have a bug which causes VISIBLE32
Kevin O'Connorf13b0082008-08-17 11:26:42 -0400216// functions to not be exported as global variables.
Kevin O'Connorcdd3d652008-07-12 14:22:14 -0400217asm(".global handle_18, handle_19");