Separate ATA code from generic disk code.
[seabios.git] / src / floppy.c
index 6214acba21ea2d083bb646b65fd476e7342915b3..7f236ce47953e0c8bed9c26dbd1064f3606dbe2c 100644 (file)
@@ -1,6 +1,6 @@
 // 16bit code to access floppy drives.
 //
-// Copyright (C) 2008  Kevin O'Connor <kevin@koconnor.net>
+// Copyright (C) 2008,2009  Kevin O'Connor <kevin@koconnor.net>
 // Copyright (C) 2002  MandrakeSoft S.A.
 //
 // This file may be distributed under the terms of the GNU LGPLv3 license.
@@ -39,34 +39,58 @@ struct floppy_ext_dbt_s diskette_param_table2 VAR16_32 = {
     .drive_type     = 4,    // drive type in cmos
 };
 
+// Since no provisions are made for multiple drive types, most
+// values in this table are ignored.  I set parameters for 1.44M
+// floppy here
+struct floppy_dbt_s diskette_param_table VAR16FIXED(0xefc7) = {
+    .specify1       = 0xAF,
+    .specify2       = 0x02, // head load time 0000001, DMA used
+    .shutoff_ticks  = 0x25,
+    .bps_code       = 0x02,
+    .sectors        = 18,
+    .interblock_len = 0x1B,
+    .data_len       = 0xFF,
+    .gap_len        = 0x6C,
+    .fill_byte      = 0xF6,
+    .settle_time    = 0x0F,
+    .startup_time   = 0x08,
+};
+
+u8 FloppyCount VAR16_32;
+u8 FloppyTypes[2] VAR16_32;
+
 void
-floppy_drive_setup()
+floppy_setup()
 {
     if (! CONFIG_FLOPPY_SUPPORT)
         return;
     dprintf(3, "init floppy drives\n");
-    if (CONFIG_COREBOOT)
-        // XXX - disable floppies on coreboot for now.
-        outb_cmos(0, CMOS_FLOPPY_DRIVE_TYPE);
-    u8 type = inb_cmos(CMOS_FLOPPY_DRIVE_TYPE);
-    u8 out = 0;
-    u8 num_floppies = 0;
+    FloppyCount = 0;
+    FloppyTypes[0] = FloppyTypes[1] = 0;
 
-    if (type & 0xf0) {
-        out |= 0x07;
-        num_floppies++;
-    }
-    if (type & 0x0f) {
-        out |= 0x70;
-        num_floppies++;
+    u8 out = 0;
+    if (CONFIG_COREBOOT) {
+        // XXX - disable floppies on coreboot for now.
+    } else {
+        u8 type = inb_cmos(CMOS_FLOPPY_DRIVE_TYPE);
+        if (type & 0xf0) {
+            out |= 0x07;
+            FloppyTypes[0] = type >> 4;
+            FloppyCount++;
+        }
+        if (type & 0x0f) {
+            out |= 0x70;
+            FloppyTypes[1] = type & 0x0f;
+            FloppyCount++;
+        }
     }
     SET_BDA(floppy_harddisk_info, out);
 
     // Update equipment word bits for floppy
-    if (num_floppies == 1)
+    if (FloppyCount == 1)
         // 1 drive, ready for boot
         SETBITS_BDA(equipment_list_flags, 0x01);
-    else if (num_floppies == 2)
+    else if (FloppyCount == 2)
         // 2 drives, ready for boot
         SETBITS_BDA(equipment_list_flags, 0x41);
 
@@ -75,37 +99,24 @@ floppy_drive_setup()
     enable_hwirq(6, entry_0e);
 }
 
-static inline void
-set_diskette_current_cyl(u8 drive, u8 cyl)
-{
-    if (drive)
-        SET_BDA(floppy_track1, cyl);
-    else
-        SET_BDA(floppy_track0, cyl);
-}
+#define floppy_ret(regs, code)                                  \
+    __floppy_ret((regs), (code) | (__LINE__ << 8), __func__)
 
-static u16
-get_drive_type(u8 drive)
+void
+__floppy_ret(struct bregs *regs, u32 linecode, const char *fname)
 {
-    // check CMOS to see if drive exists
-    u8 drive_type = inb_cmos(CMOS_FLOPPY_DRIVE_TYPE);
-    if (drive == 0)
-        drive_type >>= 4;
+    u8 code = linecode;
+    SET_BDA(floppy_last_status, code);
+    if (code)
+        __set_code_fail(regs, linecode, fname);
     else
-        drive_type &= 0x0f;
-    return drive_type;
+        set_code_success(regs);
 }
 
-static u16
-floppy_media_known(u8 drive)
-{
-    if (!(GET_BDA(floppy_recalibration_status) & (1<<drive)))
-        return 0;
-    u8 v = GET_BDA(floppy_media_state[drive]);
-    if (!(v & FMS_MEDIA_DRIVE_ESTABLISHED))
-        return 0;
-    return 1;
-}
+
+/****************************************************************
+ * Low-level floppy IO
+ ****************************************************************/
 
 static void
 floppy_reset_controller()
@@ -120,6 +131,28 @@ floppy_reset_controller()
         ;
 }
 
+static int
+wait_floppy_irq()
+{
+    irq_enable();
+    u8 v;
+    for (;;) {
+        if (!GET_BDA(floppy_motor_counter)) {
+            irq_disable();
+            return -1;
+        }
+        v = GET_BDA(floppy_recalibration_status);
+        if (v & FRS_TIMEOUT)
+            break;
+        cpu_relax();
+    }
+    irq_disable();
+
+    v &= ~FRS_TIMEOUT;
+    SET_BDA(floppy_recalibration_status, v);
+    return 0;
+}
+
 static void
 floppy_prepare_controller(u8 drive)
 {
@@ -141,20 +174,8 @@ floppy_prepare_controller(u8 drive)
     while ((inb(PORT_FD_STATUS) & 0xc0) != 0x80)
         ;
 
-    if (prev_reset == 0) {
-        irq_enable();
-        u8 v;
-        for (;;) {
-            v = GET_BDA(floppy_recalibration_status);
-            if (v & FRS_TIMEOUT)
-                break;
-            cpu_relax();
-        }
-        irq_disable();
-
-        v &= ~FRS_TIMEOUT;
-        SET_BDA(floppy_recalibration_status, v);
-    }
+    if (!prev_reset)
+        wait_floppy_irq();
 }
 
 static int
@@ -167,46 +188,20 @@ floppy_pio(u8 *cmd, u8 cmdlen)
     for (i=0; i<cmdlen; i++)
         outb(cmd[i], PORT_FD_DATA);
 
-    irq_enable();
-    u8 v;
-    for (;;) {
-        if (!GET_BDA(floppy_motor_counter)) {
-            irq_disable();
-            floppy_reset_controller();
-            return -1;
-        }
-        v = GET_BDA(floppy_recalibration_status);
-        if (v & FRS_TIMEOUT)
-            break;
-        cpu_relax();
+    int ret = wait_floppy_irq();
+    if (ret) {
+        floppy_reset_controller();
+        return -1;
     }
-    irq_disable();
-
-    v &= ~FRS_TIMEOUT;
-    SET_BDA(floppy_recalibration_status, v);
 
     return 0;
 }
 
-#define floppy_ret(regs, code)                                  \
-    __floppy_ret((regs), (code) | (__LINE__ << 8), __func__)
-
-void
-__floppy_ret(struct bregs *regs, u32 linecode, const char *fname)
-{
-    u8 code = linecode;
-    SET_BDA(floppy_last_status, code);
-    if (code)
-        __set_code_fail(regs, linecode, fname);
-    else
-        set_code_success(regs);
-}
-
 static int
 floppy_cmd(struct bregs *regs, u16 count, u8 *cmd, u8 cmdlen)
 {
     // es:bx = pointer to where to place information from diskette
-    u32 addr = (u32)MAKE_FARPTR(regs->es, regs->bx);
+    u32 addr = (u32)MAKE_FLATPTR(regs->es, regs->bx);
 
     // check for 64K boundary overrun
     u32 last_addr = addr + count;
@@ -245,8 +240,10 @@ floppy_cmd(struct bregs *regs, u16 count, u8 *cmd, u8 cmdlen)
     }
 
     // check port 3f4 for accessibility to status bytes
-    if ((inb(PORT_FD_STATUS) & 0xc0) != 0xc0)
-        BX_PANIC("int13_diskette: ctrl not ready\n");
+    if ((inb(PORT_FD_STATUS) & 0xc0) != 0xc0) {
+        floppy_ret(regs, DISK_RET_ECONTROLLER);
+        return -1;
+    }
 
     // read 7 return status bytes from controller
     u8 i;
@@ -259,6 +256,17 @@ floppy_cmd(struct bregs *regs, u16 count, u8 *cmd, u8 cmdlen)
     return 0;
 }
 
+
+/****************************************************************
+ * Floppy media sense
+ ****************************************************************/
+
+static inline void
+set_diskette_current_cyl(u8 drive, u8 cyl)
+{
+    SET_BDA(floppy_track[drive], cyl);
+}
+
 static void
 floppy_drive_recal(u8 drive)
 {
@@ -272,14 +280,9 @@ floppy_drive_recal(u8 drive)
     set_diskette_current_cyl(drive, 0);
 }
 
-static u16
+static int
 floppy_media_sense(u8 drive)
 {
-    u16 rv;
-    u8 config_data, media_state;
-
-    floppy_drive_recal(drive);
-
     // for now cheat and get drive type from CMOS,
     // assume media is same as drive type
 
@@ -311,36 +314,33 @@ floppy_media_sense(u8 drive)
     //    110 reserved
     //    111 all other formats/drives
 
-    switch (get_drive_type(drive)) {
+    int rv = 0;
+    u8 config_data, media_state;
+    switch (GET_GLOBAL(FloppyTypes[drive])) {
     case 1:
         // 360K 5.25" drive
         config_data = 0x00; // 0000 0000
         media_state = 0x25; // 0010 0101
-        rv = 1;
         break;
     case 2:
         // 1.2 MB 5.25" drive
         config_data = 0x00; // 0000 0000
         media_state = 0x25; // 0010 0101   // need double stepping??? (bit 5)
-        rv = 1;
         break;
     case 3:
         // 720K 3.5" drive
         config_data = 0x00; // 0000 0000 ???
         media_state = 0x17; // 0001 0111
-        rv = 1;
         break;
     case 4:
         // 1.44 MB 3.5" drive
         config_data = 0x00; // 0000 0000
         media_state = 0x17; // 0001 0111
-        rv = 1;
         break;
     case 5:
         // 2.88 MB 3.5" drive
         config_data = 0xCC; // 1100 1100
         media_state = 0xD7; // 1101 0111
-        rv = 1;
         break;
     //
     // Extended floppy size uses special cmos setting
@@ -348,25 +348,22 @@ floppy_media_sense(u8 drive)
         // 160k 5.25" drive
         config_data = 0x00; // 0000 0000
         media_state = 0x27; // 0010 0111
-        rv = 1;
         break;
     case 7:
         // 180k 5.25" drive
         config_data = 0x00; // 0000 0000
         media_state = 0x27; // 0010 0111
-        rv = 1;
         break;
     case 8:
         // 320k 5.25" drive
         config_data = 0x00; // 0000 0000
         media_state = 0x27; // 0010 0111
-        rv = 1;
         break;
     default:
         // not recognized
         config_data = 0x00; // 0000 0000
         media_state = 0x00; // 0000 0000
-        rv = 0;
+        rv = -1;
     }
 
     SET_BDA(floppy_last_data_rate, config_data);
@@ -378,20 +375,33 @@ static int
 check_drive(struct bregs *regs, u8 drive)
 {
     // see if drive exists
-    if (drive > 1 || !get_drive_type(drive)) {
-        // XXX - return type doesn't match
+    if (drive > 1 || !GET_GLOBAL(FloppyTypes[drive])) {
         floppy_ret(regs, DISK_RET_ETIMEOUT);
         return -1;
     }
 
-    // see if media in drive, and type is known
-    if (floppy_media_known(drive) == 0 && floppy_media_sense(drive) == 0) {
+    if ((GET_BDA(floppy_recalibration_status) & (1<<drive))
+        && (GET_BDA(floppy_media_state[drive]) & FMS_MEDIA_DRIVE_ESTABLISHED))
+        // Media is known.
+        return 0;
+
+    // Recalibrate drive.
+    floppy_drive_recal(drive);
+
+    // Sense media.
+    int ret = floppy_media_sense(drive);
+    if (ret) {
         floppy_ret(regs, DISK_RET_EMEDIA);
         return -1;
     }
     return 0;
 }
 
+
+/****************************************************************
+ * Floppy int13 handlers
+ ****************************************************************/
+
 // diskette controller reset
 static void
 floppy_1300(struct bregs *regs, u8 drive)
@@ -400,7 +410,7 @@ floppy_1300(struct bregs *regs, u8 drive)
         floppy_ret(regs, DISK_RET_EPARAM);
         return;
     }
-    if (!get_drive_type(drive)) {
+    if (!GET_GLOBAL(FloppyTypes[drive])) {
         floppy_ret(regs, DISK_RET_ETIMEOUT);
         return;
     }
@@ -500,11 +510,11 @@ floppy_1303(struct bregs *regs, u8 drive)
         goto fail;
 
     if (data[0] & 0xc0) {
-        if (data[1] & 0x02) {
+        if (data[1] & 0x02)
             floppy_ret(regs, DISK_RET_EWRITEPROTECT);
-            goto fail;
-        }
-        BX_PANIC("int13_diskette_function: read error\n");
+        else
+            floppy_ret(regs, DISK_RET_ECONTROLLER);
+        goto fail;
     }
 
     // ??? should track be new val from return_status[3] ?
@@ -574,11 +584,11 @@ floppy_1305(struct bregs *regs, u8 drive)
         return;
 
     if (data[0] & 0xc0) {
-        if (data[1] & 0x02) {
+        if (data[1] & 0x02)
             floppy_ret(regs, DISK_RET_EWRITEPROTECT);
-            return;
-        }
-        BX_PANIC("int13_diskette_function: read error\n");
+        else
+            floppy_ret(regs, DISK_RET_ECONTROLLER);
+        return;
     }
 
     set_diskette_current_cyl(drive, 0);
@@ -591,84 +601,60 @@ floppy_1308(struct bregs *regs, u8 drive)
 {
     dprintf(3, "floppy f08\n");
 
-    u8 drive_type = inb_cmos(CMOS_FLOPPY_DRIVE_TYPE);
-    u8 num_floppies = 0;
-    if (drive_type & 0xf0)
-        num_floppies++;
-    if (drive_type & 0x0f)
-        num_floppies++;
-
+    regs->ax = 0;
+    regs->dx = GET_GLOBAL(FloppyCount);
     if (drive > 1) {
-        regs->ax = 0;
         regs->bx = 0;
         regs->cx = 0;
-        regs->dx = 0;
         regs->es = 0;
         regs->di = 0;
-        regs->dl = num_floppies;
         set_fail(regs);
         return;
     }
 
-    if (drive == 0)
-        drive_type >>= 4;
-    else
-        drive_type &= 0x0f;
-
-    regs->bh = 0;
-    regs->bl = drive_type;
-    regs->ah = 0;
-    regs->al = 0;
-    regs->dl = num_floppies;
+    u8 drive_type = GET_GLOBAL(FloppyTypes[drive]);
+    regs->bx = drive_type;
 
     switch (drive_type) {
+    default: // ?
+        dprintf(1, "floppy: int13: bad floppy type\n");
+        // NO BREAK
     case 0: // none
         regs->cx = 0;
         regs->dh = 0; // max head #
         break;
-
     case 1: // 360KB, 5.25"
         regs->cx = 0x2709; // 40 tracks, 9 sectors
         regs->dh = 1; // max head #
         break;
-
     case 2: // 1.2MB, 5.25"
         regs->cx = 0x4f0f; // 80 tracks, 15 sectors
         regs->dh = 1; // max head #
         break;
-
     case 3: // 720KB, 3.5"
         regs->cx = 0x4f09; // 80 tracks, 9 sectors
         regs->dh = 1; // max head #
         break;
-
     case 4: // 1.44MB, 3.5"
         regs->cx = 0x4f12; // 80 tracks, 18 sectors
         regs->dh = 1; // max head #
         break;
-
     case 5: // 2.88MB, 3.5"
         regs->cx = 0x4f24; // 80 tracks, 36 sectors
         regs->dh = 1; // max head #
         break;
-
     case 6: // 160k, 5.25"
         regs->cx = 0x2708; // 40 tracks, 8 sectors
         regs->dh = 0; // max head #
         break;
-
     case 7: // 180k, 5.25"
         regs->cx = 0x2709; // 40 tracks, 9 sectors
         regs->dh = 0; // max head #
         break;
-
     case 8: // 320k, 5.25"
         regs->cx = 0x2708; // 40 tracks, 8 sectors
         regs->dh = 1; // max head #
         break;
-
-    default: // ?
-        BX_PANIC("floppy: int13: bad floppy type\n");
     }
 
     /* set es & di to point to 11 byte diskette param table in ROM */
@@ -689,7 +675,7 @@ floppy_1315(struct bregs *regs, u8 drive)
         // set_diskette_ret_status here ???
         return;
     }
-    u8 drive_type = get_drive_type(drive);
+    u8 drive_type = GET_GLOBAL(FloppyTypes[drive]);
 
     regs->ah = (drive_type != 0);
     set_success(regs);
@@ -737,6 +723,11 @@ floppy_13(struct bregs *regs, u8 drive)
     }
 }
 
+
+/****************************************************************
+ * HW irqs
+ ****************************************************************/
+
 // INT 0Eh Diskette Hardware ISR Entry Point
 void VISIBLE16
 handle_0e()