Misc minor improvements.
[seabios.git] / src / boot.c
index 19a4929d8fd9722dc95ee6daa13ce5fe83a322f2..1b5c3d8a9dcbe6bf8ef03857d47c2ae1b14cdab9 100644 (file)
@@ -1,4 +1,4 @@
-// 16bit code to load disk image and start system boot.
+// Code to load disk image and start system boot.
 //
 // Copyright (C) 2008  Kevin O'Connor <kevin@koconnor.net>
 // Copyright (C) 2002  MandrakeSoft S.A.
@@ -6,15 +6,11 @@
 // This file may be distributed under the terms of the GNU GPLv3 license.
 
 #include "util.h" // irq_enable
-#include "biosvar.h" // struct bregs
+#include "biosvar.h" // GET_EBDA
 #include "config.h" // CONFIG_*
-#include "cmos.h" // inb_cmos
 #include "ata.h" // ata_detect
-
-// We need a copy of this string, but we are not actually a PnP BIOS,
-// so make sure it is *not* aligned, so OSes will not see it if they
-// scan.
-char pnp_string[] VISIBLE __attribute__((aligned (2))) = " $PnP";
+#include "disk.h" // cdrom_boot
+#include "bregs.h" // struct bregs
 
 //--------------------------------------------------------------------------
 // print_boot_device
@@ -22,20 +18,39 @@ char pnp_string[] VISIBLE __attribute__((aligned (2))) = " $PnP";
 //--------------------------------------------------------------------------
 
 static const char drivetypes[][10]={
-    "", "Floppy","Hard Disk","CD-Rom", "Network"
+    "", "Floppy", "Hard Disk", "CD-Rom", "Network"
 };
 
-static void
-print_boot_device(u16 type)
+void
+printf_bootdev(u16 bootdev)
 {
+    u16 type = GET_EBDA(ipl.table[bootdev].type);
+
     /* NIC appears as type 0x80 */
     if (type == IPL_TYPE_BEV)
         type = 0x4;
     if (type == 0 || type > 0x4)
         BX_PANIC("Bad drive type\n");
-    printf("Booting from %s...\n", drivetypes[type]);
+    printf("%s", drivetypes[type]);
+
+    /* print product string if BEV */
+    void *far_description = (void*)GET_EBDA(ipl.table[bootdev].description);
+    if (type == 4 && far_description != 0) {
+        char description[33];
+        /* first 32 bytes are significant */
+        memcpy(MAKE_FARPTR(GET_SEG(SS), &description), far_description, 32);
+        /* terminate string */
+        description[32] = 0;
+        printf(" [%.s]", description);
+    }
+}
 
-    // XXX - latest cvs has BEV description
+static void
+print_boot_device(u16 bootdev)
+{
+    printf("Booting from ");
+    printf_bootdev(bootdev);
+    printf("...\n");
 }
 
 //--------------------------------------------------------------------------
@@ -62,45 +77,38 @@ print_boot_failure(u16 type, u8 reason)
 static void
 try_boot(u16 seq_nr)
 {
-    SET_IPL(sequence, seq_nr);
-    u16 bootseg;
-    u8 bootdrv = 0;
-    u16 bootdev, bootip;
-
-    if (CONFIG_ELTORITO_BOOT) {
-        bootdev = inb_cmos(CMOS_BIOS_BOOTFLAG2);
-        bootdev |= ((inb_cmos(CMOS_BIOS_BOOTFLAG1) & 0xf0) << 4);
-        bootdev >>= 4 * seq_nr;
-        bootdev &= 0xf;
-        if (bootdev == 0)
-            BX_PANIC("No bootable device.\n");
-
-        /* Translate from CMOS runes to an IPL table offset by subtracting 1 */
-        bootdev -= 1;
-    } else {
-        if (seq_nr ==2)
-            BX_PANIC("No more boot devices.");
-        if (!!(inb_cmos(CMOS_BIOS_CONFIG) & 0x20) ^ (seq_nr == 1))
-            /* Boot from floppy if the bit is set or it's the second boot */
-            bootdev = 0x00;
-        else
-            bootdev = 0x01;
-    }
+    if (! CONFIG_BOOT)
+        BX_PANIC("Boot support not compiled in.\n");
 
-    if (bootdev >= GET_IPL(count)) {
-        BX_INFO("Invalid boot device (0x%x)\n", bootdev);
+    SET_EBDA(ipl.sequence, seq_nr);
+
+    u32 bootdev = GET_EBDA(ipl.bootorder);
+    bootdev >>= 4 * seq_nr;
+    bootdev &= 0xf;
+
+    if (bootdev == 0)
+        BX_PANIC("No bootable device.\n");
+
+    /* Translate bootdev to an IPL table offset by subtracting 1 */
+    bootdev -= 1;
+
+    if (bootdev >= GET_EBDA(ipl.count)) {
+        dprintf(1, "Invalid boot device (0x%x)\n", bootdev);
         return;
     }
-    u16 type = GET_IPL(table[bootdev].type);
 
     /* Do the loading, and set up vector as a far pointer to the boot
      * address, and bootdrv as the boot drive */
-    print_boot_device(type);
+    print_boot_device(bootdev);
+
+    u16 type = GET_EBDA(ipl.table[bootdev].type);
 
+    u16 bootseg, bootip;
+    u8 bootdrv = 0;
     struct bregs cr;
     switch(type) {
-    case IPL_TYPE_FLOPPY: /* FDD */
-    case IPL_TYPE_HARDDISK: /* HDD */
+    case IPL_TYPE_FLOPPY:
+    case IPL_TYPE_HARDDISK:
 
         bootdrv = (type == IPL_TYPE_HARDDISK) ? 0x80 : 0x00;
         bootseg = 0x07c0;
@@ -120,9 +128,8 @@ try_boot(u16 seq_nr)
         }
 
         /* Always check the signature on a HDD boot sector; on FDD,
-         * only do the check if the CMOS doesn't tell us to skip it */
-        if ((type != IPL_TYPE_FLOPPY)
-            || !((inb_cmos(CMOS_BIOS_BOOTFLAG1) & 0x01))) {
+         * only do the check if configured for it */
+        if (type != IPL_TYPE_FLOPPY || GET_EBDA(ipl.checkfloppysig)) {
             if (GET_FARVAR(bootseg, *(u16*)0x1fe) != 0xaa55) {
                 print_boot_failure(type, 0);
                 return;
@@ -133,14 +140,28 @@ try_boot(u16 seq_nr)
         bootip = (bootseg & 0x0fff) << 4;
         bootseg &= 0xf000;
         break;
-    case IPL_TYPE_CDROM: /* CD-ROM */
-        // XXX
-        return;
+    case IPL_TYPE_CDROM: {
+        /* CD-ROM */
+        if (! CONFIG_CDROM_BOOT)
+            break;
+        int status = cdrom_boot();
+        if (status) {
+            printf("CDROM boot failure code : %04x\n", status);
+            print_boot_failure(type, 1);
+            return;
+        }
+
+        bootdrv = GET_EBDA(cdemu.emulated_drive);
+        bootseg = GET_EBDA(cdemu.load_segment);
+        /* Canonicalize bootseg:bootip */
+        bootip = (bootseg & 0x0fff) << 4;
+        bootseg &= 0xf000;
         break;
+    }
     case IPL_TYPE_BEV: {
         /* Expansion ROM with a Bootstrap Entry Vector (a far
          * pointer) */
-        u32 vector = GET_IPL(table[bootdev].vector);
+        u32 vector = GET_EBDA(ipl.table[bootdev].vector);
         bootseg = vector >> 16;
         bootip = vector & 0xffff;
         break;
@@ -149,6 +170,9 @@ try_boot(u16 seq_nr)
         return;
     }
 
+    /* Debugging info */
+    dprintf(1, "Booting from %x:%x\n", bootseg, bootip);
+
     memset(&cr, 0, sizeof(cr));
     cr.ip = bootip;
     cr.cs = bootseg;
@@ -156,36 +180,38 @@ try_boot(u16 seq_nr)
     cr.dl = bootdrv;
     cr.ax = 0xaa55;
     call16(&cr);
+}
+
+static void
+do_boot(u16 seq_nr)
+{
+    try_boot(seq_nr);
 
     // Boot failed: invoke the boot recovery function
-    memset(&cr, 0, sizeof(cr));
-    call16_int(0x18, &cr);
+    struct bregs br;
+    memset(&br, 0, sizeof(br));
+    call16_int(0x18, &br);
 }
 
 // Boot Failure recovery: try the next device.
-void VISIBLE
+void VISIBLE32
 handle_18()
 {
-    debug_enter(NULL);
-    u16 seq = GET_IPL(sequence) + 1;
-    try_boot(seq);
+    debug_serial_setup();
+    debug_enter(NULL, DEBUG_HDL_18);
+    u16 seq = GET_EBDA(ipl.sequence) + 1;
+    do_boot(seq);
 }
 
 // INT 19h Boot Load Service Entry Point
-void VISIBLE
+void VISIBLE32
 handle_19()
 {
-    debug_enter(NULL);
-    try_boot(0);
+    debug_serial_setup();
+    debug_enter(NULL, DEBUG_HDL_19);
+    do_boot(0);
 }
 
-// Called from 32bit code - start boot process
-void VISIBLE
-begin_boot()
-{
-    ata_detect();
-    irq_enable();
-    struct bregs br;
-    memset(&br, 0, sizeof(br));
-    call16_int(0x19, &br);
-}
+// Ughh - some older gcc compilers have a bug which causes VISIBLE32
+// functions to not be exported as global variables.
+asm(".global handle_18, handle_19");