src/boot.c

   1 // 16bit code to load disk image and start system boot.
   2 //
   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
   8 #include "util.h" // irq_enable
   9 #include "biosvar.h" // struct bregs
  10 #include "config.h" // CONFIG_*
  11 #include "cmos.h" // inb_cmos
  12
  13 //--------------------------------------------------------------------------
  14 // print_boot_device
  15 //   displays the boot device
  16 //--------------------------------------------------------------------------
  17
  18 static const char drivetypes[][10]={
  19     "", "Floppy","Hard Disk","CD-Rom", "Network"
  20 };
  21
  22 static void
  23 print_boot_device(u16 type)
  24 {
  25     /* NIC appears as type 0x80 */
  26     if (type == IPL_TYPE_BEV)
  27         type = 0x4;
  28     if (type == 0 || type > 0x4)
  29         BX_PANIC("Bad drive type\n");
  30     printf("Booting from %s...\n", drivetypes[type]);
  31
  32     // XXX - latest cvs has BEV description
  33 }
  34
  35 //--------------------------------------------------------------------------
  36 // print_boot_failure
  37 //   displays the reason why boot failed
  38 //--------------------------------------------------------------------------
  39 static void
  40 print_boot_failure(u16 type, u8 reason)
  41 {
  42     if (type == 0 || type > 0x3)
  43         BX_PANIC("Bad drive type\n");
  44
  45     printf("Boot failed");
  46     if (type < 4) {
  47         /* Report the reason too */
  48         if (reason==0)
  49             printf(": not a bootable disk");
  50         else
  51             printf(": could not read the boot disk");
  52     }
  53     printf("\n\n");
  54 }
  55
  56 static void
  57 try_boot(u16 seq_nr)
  58 {
  59     SET_IPL(sequence, seq_nr);
  60     u16 bootseg;
  61     u8 bootdrv = 0;
  62     u16 bootdev, bootip;
  63
  64     if (CONFIG_ELTORITO_BOOT) {
  65         bootdev = inb_cmos(CMOS_BIOS_BOOTFLAG2);
  66         bootdev |= ((inb_cmos(CMOS_BIOS_BOOTFLAG1) & 0xf0) << 4);
  67         bootdev >>= 4 * seq_nr;
  68         bootdev &= 0xf;
  69         if (bootdev == 0)
  70             BX_PANIC("No bootable device.\n");
  71
  72         /* Translate from CMOS runes to an IPL table offset by subtracting 1 */
  73         bootdev -= 1;
  74     } else {
  75         if (seq_nr ==2)
  76             BX_PANIC("No more boot devices.");
  77         if (!!(inb_cmos(CMOS_BIOS_CONFIG) & 0x20) ^ (seq_nr == 1))
  78             /* Boot from floppy if the bit is set or it's the second boot */
  79             bootdev = 0x00;
  80         else
  81             bootdev = 0x01;
  82     }
  83
  84     if (bootdev >= GET_IPL(count)) {
  85         BX_INFO("Invalid boot device (0x%x)\n", bootdev);
  86         return;
  87     }
  88     u16 type = GET_IPL(table[bootdev].type);
  89
  90     /* Do the loading, and set up vector as a far pointer to the boot
  91      * address, and bootdrv as the boot drive */
  92     print_boot_device(type);
  93
  94     struct bregs cr;
  95     switch(type) {
  96     case IPL_TYPE_FLOPPY: /* FDD */
  97     case IPL_TYPE_HARDDISK: /* HDD */
  98
  99         bootdrv = (type == IPL_TYPE_HARDDISK) ? 0x80 : 0x00;
 100         bootseg = 0x07c0;
 101
 102         // Read sector
 103         memset(&cr, 0, sizeof(cr));
 104         cr.dl = bootdrv;
 105         cr.es = bootseg;
 106         cr.ah = 2;
 107         cr.al = 1;
 108         cr.cl = 1;
 109         call16_int(0x13, &cr);
 110
 111         if (cr.flags & F_CF) {
 112             print_boot_failure(type, 1);
 113             return;
 114         }
 115
 116         /* Always check the signature on a HDD boot sector; on FDD,
 117          * only do the check if the CMOS doesn't tell us to skip it */
 118         if ((type != IPL_TYPE_FLOPPY)
 119             || !((inb_cmos(CMOS_BIOS_BOOTFLAG1) & 0x01))) {
 120             if (GET_FARVAR(bootseg, *(u16*)0x1fe) != 0xaa55) {
 121                 print_boot_failure(type, 0);
 122                 return;
 123             }
 124         }
 125
 126         /* Canonicalize bootseg:bootip */
 127         bootip = (bootseg & 0x0fff) << 4;
 128         bootseg &= 0xf000;
 129         break;
 130     case IPL_TYPE_CDROM: /* CD-ROM */
 131         // XXX
 132         return;
 133         break;
 134     case IPL_TYPE_BEV: {
 135         /* Expansion ROM with a Bootstrap Entry Vector (a far
 136          * pointer) */
 137         u32 vector = GET_IPL(table[bootdev].vector);
 138         bootseg = vector >> 16;
 139         bootip = vector & 0xffff;
 140         break;
 141     }
 142     default:
 143         return;
 144     }
 145
 146     memset(&cr, 0, sizeof(cr));
 147     cr.ip = bootip;
 148     cr.cs = bootseg;
 149     // Set the magic number in ax and the boot drive in dl.
 150     cr.dl = bootdrv;
 151     cr.ax = 0xaa55;
 152     call16(&cr);
 153
 154     // Boot failed: invoke the boot recovery function
 155     memset(&cr, 0, sizeof(cr));
 156     call16_int(0x18, &cr);
 157 }
 158
 159 // Boot Failure recovery: try the next device.
 160 void VISIBLE
 161 handle_18()
 162 {
 163     debug_enter(NULL);
 164     u16 seq = GET_IPL(sequence) + 1;
 165     try_boot(seq);
 166 }
 167
 168 // INT 19h Boot Load Service Entry Point
 169 void VISIBLE
 170 handle_19()
 171 {
 172     debug_enter(NULL);
 173     try_boot(0);
 174 }
 175
 176 // Called from 32bit code - start boot process
 177 void VISIBLE
 178 begin_boot()
 179 {
 180     irq_enable();
 181     struct bregs br;
 182     memset(&br, 0, sizeof(br));
 183     call16_int(0x19, &br);
 184 }