src/floppy.c

   1 // 16bit code to access floppy drives.
   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 "types.h" // u8
   9 #include "disk.h" // DISK_RET_SUCCESS
  10 #include "config.h" // CONFIG_FLOPPY_SUPPORT
  11 #include "biosvar.h" // SET_BDA
  12 #include "util.h" // irq_disable
  13 #include "cmos.h" // inb_cmos
  14 #include "pic.h" // unmask_pic1
  15 #include "bregs.h" // struct bregs
  16
  17 #define BX_FLOPPY_ON_CNT 37   /* 2 seconds */
  18
  19 // New diskette parameter table adding 3 parameters from IBM
  20 // Since no provisions are made for multiple drive types, most
  21 // values in this table are ignored.  I set parameters for 1.44M
  22 // floppy here
  23 struct floppy_ext_dbt_s diskette_param_table2 VISIBLE16 = {
  24     .dbt = {
  25         .specify1       = 0xAF,
  26         .specify2       = 0x02, // head load time 0000001, DMA used
  27         .shutoff_ticks  = 0x25,
  28         .bps_code       = 0x02,
  29         .sectors        = 18,
  30         .interblock_len = 0x1B,
  31         .data_len       = 0xFF,
  32         .gap_len        = 0x6C,
  33         .fill_byte      = 0xF6,
  34         .settle_time    = 0x0F,
  35         .startup_time   = 0x08,
  36     },
  37     .max_track      = 79,   // maximum track
  38     .data_rate      = 0,    // data transfer rate
  39     .drive_type     = 4,    // drive type in cmos
  40 };
  41
  42 void
  43 floppy_drive_setup()
  44 {
  45     if (! CONFIG_FLOPPY_SUPPORT)
  46         return;
  47     dprintf(3, "init floppy drives\n");
  48     u8 type = inb_cmos(CMOS_FLOPPY_DRIVE_TYPE);
  49     u8 out = 0;
  50     u8 num_floppies = 0;
  51
  52     if (type & 0xf0) {
  53         out |= 0x07;
  54         num_floppies++;
  55     }
  56     if (type & 0x0f) {
  57         out |= 0x70;
  58         num_floppies++;
  59     }
  60     SET_BDA(floppy_harddisk_info, out);
  61
  62     // Update equipment word bits for floppy
  63     if (num_floppies == 1)
  64         // 1 drive, ready for boot
  65         SETBITS_BDA(equipment_list_flags, 0x01);
  66     else if (num_floppies == 2)
  67         // 2 drives, ready for boot
  68         SETBITS_BDA(equipment_list_flags, 0x41);
  69
  70     outb(0x02, PORT_DMA1_MASK_REG);
  71
  72     // Enable IRQ6 (handle_0e)
  73     unmask_pic1(PIC1_IRQ6);
  74 }
  75
  76 static inline void
  77 set_diskette_current_cyl(u8 drive, u8 cyl)
  78 {
  79     if (drive)
  80         SET_BDA(floppy_track1, cyl);
  81     else
  82         SET_BDA(floppy_track0, cyl);
  83 }
  84
  85 static u16
  86 get_drive_type(u8 drive)
  87 {
  88     // check CMOS to see if drive exists
  89     u8 drive_type = inb_cmos(CMOS_FLOPPY_DRIVE_TYPE);
  90     if (drive == 0)
  91         drive_type >>= 4;
  92     else
  93         drive_type &= 0x0f;
  94     return drive_type;
  95 }
  96
  97 static u16
  98 floppy_media_known(u8 drive)
  99 {
 100     if (!(GET_BDA(floppy_recalibration_status) & (1<<drive)))
 101         return 0;
 102     u8 v = GET_BDA(floppy_media_state[drive]);
 103     if (!(v & FMS_MEDIA_DRIVE_ESTABLISHED))
 104         return 0;
 105     return 1;
 106 }
 107
 108 static void
 109 floppy_reset_controller()
 110 {
 111     // Reset controller
 112     u8 val8 = inb(PORT_FD_DOR);
 113     outb(val8 & ~0x04, PORT_FD_DOR);
 114     outb(val8 | 0x04, PORT_FD_DOR);
 115
 116     // Wait for controller to come out of reset
 117     while ((inb(PORT_FD_STATUS) & 0xc0) != 0x80)
 118         ;
 119 }
 120
 121 static void
 122 floppy_prepare_controller(u8 drive)
 123 {
 124     CLEARBITS_BDA(floppy_recalibration_status, FRS_TIMEOUT);
 125
 126     // turn on motor of selected drive, DMA & int enabled, normal operation
 127     u8 prev_reset = inb(PORT_FD_DOR) & 0x04;
 128     u8 dor = 0x10;
 129     if (drive)
 130         dor = 0x20;
 131     dor |= 0x0c;
 132     dor |= drive;
 133     outb(dor, PORT_FD_DOR);
 134
 135     // reset the disk motor timeout value of INT 08
 136     SET_BDA(floppy_motor_counter, BX_FLOPPY_ON_CNT);
 137
 138     // wait for drive readiness
 139     while ((inb(PORT_FD_STATUS) & 0xc0) != 0x80)
 140         ;
 141
 142     if (prev_reset == 0) {
 143         irq_enable();
 144         u8 v;
 145         for (;;) {
 146             v = GET_BDA(floppy_recalibration_status);
 147             if (v & FRS_TIMEOUT)
 148                 break;
 149             cpu_relax();
 150         }
 151         irq_disable();
 152
 153         v &= ~FRS_TIMEOUT;
 154         SET_BDA(floppy_recalibration_status, v);
 155     }
 156 }
 157
 158 static int
 159 floppy_pio(u8 *cmd, u8 cmdlen)
 160 {
 161     floppy_prepare_controller(cmd[1] & 1);
 162
 163     // send command to controller
 164     u8 i;
 165     for (i=0; i<cmdlen; i++)
 166         outb(cmd[i], PORT_FD_DATA);
 167
 168     irq_enable();
 169     u8 v;
 170     for (;;) {
 171         if (!GET_BDA(floppy_motor_counter)) {
 172             irq_disable();
 173             floppy_reset_controller();
 174             return -1;
 175         }
 176         v = GET_BDA(floppy_recalibration_status);
 177         if (v & FRS_TIMEOUT)
 178             break;
 179         cpu_relax();
 180     }
 181     irq_disable();
 182
 183     v &= ~FRS_TIMEOUT;
 184     SET_BDA(floppy_recalibration_status, v);
 185
 186     return 0;
 187 }
 188
 189 #define floppy_ret(regs, code) \
 190     __floppy_ret(__func__, __LINE__, (regs), (code))
 191
 192 void
 193 __floppy_ret(const char *fname, int lineno, struct bregs *regs, u8 code)
 194 {
 195     SET_BDA(floppy_last_status, code);
 196     if (code)
 197         __set_code_fail(fname, lineno, regs, code);
 198     else
 199         set_code_success(regs);
 200 }
 201
 202 static int
 203 floppy_cmd(struct bregs *regs, u16 count, u8 *cmd, u8 cmdlen)
 204 {
 205     // es:bx = pointer to where to place information from diskette
 206     // port 04: DMA-1 base and current address, channel 2
 207     // port 05: DMA-1 base and current count, channel 2
 208     u16 page = regs->es >> 12;   // upper 4 bits
 209     u16 base_es = regs->es << 4; // lower 16bits contributed by ES
 210     u16 base_address = base_es + regs->bx; // lower 16 bits of address
 211     // contributed by ES:BX
 212     if (base_address < base_es)
 213         // in case of carry, adjust page by 1
 214         page++;
 215
 216     // check for 64K boundary overrun
 217     u16 last_addr = base_address + count;
 218     if (last_addr < base_address) {
 219         floppy_ret(regs, DISK_RET_EBOUNDARY);
 220         return -1;
 221     }
 222
 223     u8 mode_register = 0x4a; // single mode, increment, autoinit disable,
 224     if (cmd[0] == 0xe6)
 225         // read
 226         mode_register = 0x46;
 227
 228     //DEBUGF("floppy dma c2\n");
 229     outb(0x06, PORT_DMA1_MASK_REG);
 230     outb(0x00, PORT_DMA1_CLEAR_FF_REG); // clear flip-flop
 231     outb(base_address, PORT_DMA_ADDR_2);
 232     outb(base_address>>8, PORT_DMA_ADDR_2);
 233     outb(0x00, PORT_DMA1_CLEAR_FF_REG); // clear flip-flop
 234     outb(count, PORT_DMA_CNT_2);
 235     outb(count>>8, PORT_DMA_CNT_2);
 236
 237     // port 0b: DMA-1 Mode Register
 238     // transfer type=write, channel 2
 239     outb(mode_register, PORT_DMA1_MODE_REG);
 240
 241     // port 81: DMA-1 Page Register, channel 2
 242     outb(page, PORT_DMA_PAGE_2);
 243
 244     outb(0x02, PORT_DMA1_MASK_REG); // unmask channel 2
 245
 246     int ret = floppy_pio(cmd, cmdlen);
 247     if (ret) {
 248         floppy_ret(regs, DISK_RET_ETIMEOUT);
 249         return -1;
 250     }
 251
 252     // check port 3f4 for accessibility to status bytes
 253     if ((inb(PORT_FD_STATUS) & 0xc0) != 0xc0)
 254         BX_PANIC("int13_diskette: ctrl not ready\n");
 255
 256     // read 7 return status bytes from controller
 257     u8 i;
 258     for (i=0; i<7; i++) {
 259         u8 v = inb(PORT_FD_DATA);
 260         cmd[i] = v;
 261         SET_BDA(floppy_return_status[i], v);
 262     }
 263
 264     return 0;
 265 }
 266
 267 static void
 268 floppy_drive_recal(u8 drive)
 269 {
 270     // send Recalibrate command (2 bytes) to controller
 271     u8 data[12];
 272     data[0] = 0x07;  // 07: Recalibrate
 273     data[1] = drive; // 0=drive0, 1=drive1
 274     floppy_pio(data, 2);
 275
 276     SETBITS_BDA(floppy_recalibration_status, 1<<drive);
 277     set_diskette_current_cyl(drive, 0);
 278 }
 279
 280 static u16
 281 floppy_media_sense(u8 drive)
 282 {
 283     u16 rv;
 284     u8 config_data, media_state;
 285
 286     floppy_drive_recal(drive);
 287
 288     // for now cheat and get drive type from CMOS,
 289     // assume media is same as drive type
 290
 291     // ** config_data **
 292     // Bitfields for diskette media control:
 293     // Bit(s)  Description (Table M0028)
 294     //  7-6  last data rate set by controller
 295     //        00=500kbps, 01=300kbps, 10=250kbps, 11=1Mbps
 296     //  5-4  last diskette drive step rate selected
 297     //        00=0Ch, 01=0Dh, 10=0Eh, 11=0Ah
 298     //  3-2  {data rate at start of operation}
 299     //  1-0  reserved
 300
 301     // ** media_state **
 302     // Bitfields for diskette drive media state:
 303     // Bit(s)  Description (Table M0030)
 304     //  7-6  data rate
 305     //    00=500kbps, 01=300kbps, 10=250kbps, 11=1Mbps
 306     //  5  double stepping required (e.g. 360kB in 1.2MB)
 307     //  4  media type established
 308     //  3  drive capable of supporting 4MB media
 309     //  2-0  on exit from BIOS, contains
 310     //    000 trying 360kB in 360kB
 311     //    001 trying 360kB in 1.2MB
 312     //    010 trying 1.2MB in 1.2MB
 313     //    011 360kB in 360kB established
 314     //    100 360kB in 1.2MB established
 315     //    101 1.2MB in 1.2MB established
 316     //    110 reserved
 317     //    111 all other formats/drives
 318
 319     switch (get_drive_type(drive)) {
 320     case 1:
 321         // 360K 5.25" drive
 322         config_data = 0x00; // 0000 0000
 323         media_state = 0x25; // 0010 0101
 324         rv = 1;
 325         break;
 326     case 2:
 327         // 1.2 MB 5.25" drive
 328         config_data = 0x00; // 0000 0000
 329         media_state = 0x25; // 0010 0101   // need double stepping??? (bit 5)
 330         rv = 1;
 331         break;
 332     case 3:
 333         // 720K 3.5" drive
 334         config_data = 0x00; // 0000 0000 ???
 335         media_state = 0x17; // 0001 0111
 336         rv = 1;
 337         break;
 338     case 4:
 339         // 1.44 MB 3.5" drive
 340         config_data = 0x00; // 0000 0000
 341         media_state = 0x17; // 0001 0111
 342         rv = 1;
 343         break;
 344     case 5:
 345         // 2.88 MB 3.5" drive
 346         config_data = 0xCC; // 1100 1100
 347         media_state = 0xD7; // 1101 0111
 348         rv = 1;
 349         break;
 350     //
 351     // Extended floppy size uses special cmos setting
 352     case 6:
 353         // 160k 5.25" drive
 354         config_data = 0x00; // 0000 0000
 355         media_state = 0x27; // 0010 0111
 356         rv = 1;
 357         break;
 358     case 7:
 359         // 180k 5.25" drive
 360         config_data = 0x00; // 0000 0000
 361         media_state = 0x27; // 0010 0111
 362         rv = 1;
 363         break;
 364     case 8:
 365         // 320k 5.25" drive
 366         config_data = 0x00; // 0000 0000
 367         media_state = 0x27; // 0010 0111
 368         rv = 1;
 369         break;
 370     default:
 371         // not recognized
 372         config_data = 0x00; // 0000 0000
 373         media_state = 0x00; // 0000 0000
 374         rv = 0;
 375     }
 376
 377     SET_BDA(floppy_last_data_rate, config_data);
 378     SET_BDA(floppy_media_state[drive], media_state);
 379     return rv;
 380 }
 381
 382 static int
 383 check_drive(struct bregs *regs, u8 drive)
 384 {
 385     // see if drive exists
 386     if (drive > 1 || !get_drive_type(drive)) {
 387         // XXX - return type doesn't match
 388         floppy_ret(regs, DISK_RET_ETIMEOUT);
 389         return -1;
 390     }
 391
 392     // see if media in drive, and type is known
 393     if (floppy_media_known(drive) == 0 && floppy_media_sense(drive) == 0) {
 394         floppy_ret(regs, DISK_RET_EMEDIA);
 395         return -1;
 396     }
 397     return 0;
 398 }
 399
 400 // diskette controller reset
 401 static void
 402 floppy_1300(struct bregs *regs, u8 drive)
 403 {
 404     if (drive > 1) {
 405         floppy_ret(regs, DISK_RET_EPARAM);
 406         return;
 407     }
 408     if (!get_drive_type(drive)) {
 409         floppy_ret(regs, DISK_RET_ETIMEOUT);
 410         return;
 411     }
 412     set_diskette_current_cyl(drive, 0); // current cylinder
 413     floppy_ret(regs, DISK_RET_SUCCESS);
 414 }
 415
 416 // Read Diskette Status
 417 static void
 418 floppy_1301(struct bregs *regs, u8 drive)
 419 {
 420     u8 v = GET_BDA(floppy_last_status);
 421     regs->ah = v;
 422     set_cf(regs, v);
 423 }
 424
 425 // Read Diskette Sectors
 426 static void
 427 floppy_1302(struct bregs *regs, u8 drive)
 428 {
 429     if (check_drive(regs, drive))
 430         goto fail;
 431
 432     u8 num_sectors = regs->al;
 433     u8 track       = regs->ch;
 434     u8 sector      = regs->cl;
 435     u8 head        = regs->dh;
 436
 437     if (head > 1 || sector == 0 || num_sectors == 0
 438         || track > 79 || num_sectors > 72) {
 439         floppy_ret(regs, DISK_RET_EPARAM);
 440         goto fail;
 441     }
 442
 443     // send read-normal-data command (9 bytes) to controller
 444     u8 data[12];
 445     data[0] = 0xe6; // e6: read normal data
 446     data[1] = (head << 2) | drive; // HD DR1 DR2
 447     data[2] = track;
 448     data[3] = head;
 449     data[4] = sector;
 450     data[5] = 2; // 512 byte sector size
 451     data[6] = sector + num_sectors - 1; // last sector to read on track
 452     data[7] = 0; // Gap length
 453     data[8] = 0xff; // Gap length
 454
 455     int ret = floppy_cmd(regs, (num_sectors * 512) - 1, data, 9);
 456     if (ret)
 457         goto fail;
 458
 459     if (data[0] & 0xc0) {
 460         floppy_ret(regs, DISK_RET_ECONTROLLER);
 461         goto fail;
 462     }
 463
 464     // ??? should track be new val from return_status[3] ?
 465     set_diskette_current_cyl(drive, track);
 466     // AL = number of sectors read (same value as passed)
 467     floppy_ret(regs, DISK_RET_SUCCESS);
 468     return;
 469 fail:
 470     regs->al = 0; // no sectors read
 471 }
 472
 473 // Write Diskette Sectors
 474 static void
 475 floppy_1303(struct bregs *regs, u8 drive)
 476 {
 477     if (check_drive(regs, drive))
 478         goto fail;
 479
 480     u8 num_sectors = regs->al;
 481     u8 track       = regs->ch;
 482     u8 sector      = regs->cl;
 483     u8 head        = regs->dh;
 484
 485     if (head > 1 || sector == 0 || num_sectors == 0
 486         || track > 79 || num_sectors > 72) {
 487         floppy_ret(regs, DISK_RET_EPARAM);
 488         goto fail;
 489     }
 490
 491     // send write-normal-data command (9 bytes) to controller
 492     u8 data[12];
 493     data[0] = 0xc5; // c5: write normal data
 494     data[1] = (head << 2) | drive; // HD DR1 DR2
 495     data[2] = track;
 496     data[3] = head;
 497     data[4] = sector;
 498     data[5] = 2; // 512 byte sector size
 499     data[6] = sector + num_sectors - 1; // last sector to write on track
 500     data[7] = 0; // Gap length
 501     data[8] = 0xff; // Gap length
 502
 503     int ret = floppy_cmd(regs, (num_sectors * 512) - 1, data, 9);
 504     if (ret)
 505         goto fail;
 506
 507     if (data[0] & 0xc0) {
 508         if (data[1] & 0x02) {
 509             floppy_ret(regs, DISK_RET_EWRITEPROTECT);
 510             goto fail;
 511         }
 512         BX_PANIC("int13_diskette_function: read error\n");
 513     }
 514
 515     // ??? should track be new val from return_status[3] ?
 516     set_diskette_current_cyl(drive, track);
 517     // AL = number of sectors read (same value as passed)
 518     floppy_ret(regs, DISK_RET_SUCCESS);
 519     return;
 520 fail:
 521     regs->al = 0; // no sectors read
 522 }
 523
 524 // Verify Diskette Sectors
 525 static void
 526 floppy_1304(struct bregs *regs, u8 drive)
 527 {
 528     if (check_drive(regs, drive))
 529         goto fail;
 530
 531     u8 num_sectors = regs->al;
 532     u8 track       = regs->ch;
 533     u8 sector      = regs->cl;
 534     u8 head        = regs->dh;
 535
 536     if (head > 1 || sector == 0 || num_sectors == 0
 537         || track > 79 || num_sectors > 72) {
 538         floppy_ret(regs, DISK_RET_EPARAM);
 539         goto fail;
 540     }
 541
 542     // ??? should track be new val from return_status[3] ?
 543     set_diskette_current_cyl(drive, track);
 544     // AL = number of sectors verified (same value as passed)
 545     floppy_ret(regs, DISK_RET_SUCCESS);
 546     return;
 547 fail:
 548     regs->al = 0; // no sectors read
 549 }
 550
 551 // format diskette track
 552 static void
 553 floppy_1305(struct bregs *regs, u8 drive)
 554 {
 555     dprintf(3, "floppy f05\n");
 556
 557     if (check_drive(regs, drive))
 558         return;
 559
 560     u8 num_sectors = regs->al;
 561     u8 head        = regs->dh;
 562
 563     if (head > 1 || num_sectors == 0 || num_sectors > 18) {
 564         floppy_ret(regs, DISK_RET_EPARAM);
 565         return;
 566     }
 567
 568     // send format-track command (6 bytes) to controller
 569     u8 data[12];
 570     data[0] = 0x4d; // 4d: format track
 571     data[1] = (head << 2) | drive; // HD DR1 DR2
 572     data[2] = 2; // 512 byte sector size
 573     data[3] = num_sectors; // number of sectors per track
 574     data[4] = 0; // Gap length
 575     data[5] = 0xf6; // Fill byte
 576
 577     int ret = floppy_cmd(regs, (num_sectors * 4) - 1, data, 6);
 578     if (ret)
 579         return;
 580
 581     if (data[0] & 0xc0) {
 582         if (data[1] & 0x02) {
 583             floppy_ret(regs, DISK_RET_EWRITEPROTECT);
 584             return;
 585         }
 586         BX_PANIC("int13_diskette_function: read error\n");
 587     }
 588
 589     set_diskette_current_cyl(drive, 0);
 590     floppy_ret(regs, 0);
 591 }
 592
 593 // read diskette drive parameters
 594 static void
 595 floppy_1308(struct bregs *regs, u8 drive)
 596 {
 597     dprintf(3, "floppy f08\n");
 598
 599     u8 drive_type = inb_cmos(CMOS_FLOPPY_DRIVE_TYPE);
 600     u8 num_floppies = 0;
 601     if (drive_type & 0xf0)
 602         num_floppies++;
 603     if (drive_type & 0x0f)
 604         num_floppies++;
 605
 606     if (drive > 1) {
 607         regs->ax = 0;
 608         regs->bx = 0;
 609         regs->cx = 0;
 610         regs->dx = 0;
 611         regs->es = 0;
 612         regs->di = 0;
 613         regs->dl = num_floppies;
 614         set_success(regs);
 615         return;
 616     }
 617
 618     if (drive == 0)
 619         drive_type >>= 4;
 620     else
 621         drive_type &= 0x0f;
 622
 623     regs->bh = 0;
 624     regs->bl = drive_type;
 625     regs->ah = 0;
 626     regs->al = 0;
 627     regs->dl = num_floppies;
 628
 629     switch (drive_type) {
 630     case 0: // none
 631         regs->cx = 0;
 632         regs->dh = 0; // max head #
 633         break;
 634
 635     case 1: // 360KB, 5.25"
 636         regs->cx = 0x2709; // 40 tracks, 9 sectors
 637         regs->dh = 1; // max head #
 638         break;
 639
 640     case 2: // 1.2MB, 5.25"
 641         regs->cx = 0x4f0f; // 80 tracks, 15 sectors
 642         regs->dh = 1; // max head #
 643         break;
 644
 645     case 3: // 720KB, 3.5"
 646         regs->cx = 0x4f09; // 80 tracks, 9 sectors
 647         regs->dh = 1; // max head #
 648         break;
 649
 650     case 4: // 1.44MB, 3.5"
 651         regs->cx = 0x4f12; // 80 tracks, 18 sectors
 652         regs->dh = 1; // max head #
 653         break;
 654
 655     case 5: // 2.88MB, 3.5"
 656         regs->cx = 0x4f24; // 80 tracks, 36 sectors
 657         regs->dh = 1; // max head #
 658         break;
 659
 660     case 6: // 160k, 5.25"
 661         regs->cx = 0x2708; // 40 tracks, 8 sectors
 662         regs->dh = 0; // max head #
 663         break;
 664
 665     case 7: // 180k, 5.25"
 666         regs->cx = 0x2709; // 40 tracks, 9 sectors
 667         regs->dh = 0; // max head #
 668         break;
 669
 670     case 8: // 320k, 5.25"
 671         regs->cx = 0x2708; // 40 tracks, 8 sectors
 672         regs->dh = 1; // max head #
 673         break;
 674
 675     default: // ?
 676         BX_PANIC("floppy: int13: bad floppy type\n");
 677     }
 678
 679     /* set es & di to point to 11 byte diskette param table in ROM */
 680     regs->es = SEG_BIOS;
 681     regs->di = (u32)&diskette_param_table2;
 682     /* disk status not changed upon success */
 683 }
 684
 685 // read diskette drive type
 686 static void
 687 floppy_1315(struct bregs *regs, u8 drive)
 688 {
 689     dprintf(6, "floppy f15\n");
 690     if (drive > 1) {
 691         set_fail(regs);
 692         regs->ah = 0; // only 2 drives supported
 693         // set_diskette_ret_status here ???
 694         return;
 695     }
 696     u8 drive_type = get_drive_type(drive);
 697
 698     regs->ah = (drive_type != 0);
 699     set_success(regs);
 700 }
 701
 702 // get diskette change line status
 703 static void
 704 floppy_1316(struct bregs *regs, u8 drive)
 705 {
 706     if (drive > 1) {
 707         floppy_ret(regs, DISK_RET_EPARAM);
 708         return;
 709     }
 710     floppy_ret(regs, DISK_RET_ECHANGED);
 711 }
 712
 713 static void
 714 floppy_13XX(struct bregs *regs, u8 drive)
 715 {
 716     floppy_ret(regs, DISK_RET_EPARAM);
 717 }
 718
 719 void
 720 floppy_13(struct bregs *regs, u8 drive)
 721 {
 722     if (! CONFIG_FLOPPY_SUPPORT) {
 723         // Minimal stubs
 724         switch (regs->ah) {
 725         case 0x01: floppy_1301(regs, drive); break;
 726         default:   floppy_13XX(regs, drive); break;
 727         }
 728         return;
 729     }
 730     switch (regs->ah) {
 731     case 0x00: floppy_1300(regs, drive); break;
 732     case 0x01: floppy_1301(regs, drive); break;
 733     case 0x02: floppy_1302(regs, drive); break;
 734     case 0x03: floppy_1303(regs, drive); break;
 735     case 0x04: floppy_1304(regs, drive); break;
 736     case 0x05: floppy_1305(regs, drive); break;
 737     case 0x08: floppy_1308(regs, drive); break;
 738     case 0x15: floppy_1315(regs, drive); break;
 739     case 0x16: floppy_1316(regs, drive); break;
 740     default:   floppy_13XX(regs, drive); break;
 741     }
 742 }
 743
 744 // INT 0Eh Diskette Hardware ISR Entry Point
 745 void VISIBLE16
 746 handle_0e()
 747 {
 748     debug_isr(DEBUG_ISR_0e);
 749     if ((inb(PORT_FD_STATUS) & 0xc0) != 0xc0) {
 750         outb(0x08, PORT_FD_DATA); // sense interrupt status
 751         while ((inb(PORT_FD_STATUS) & 0xc0) != 0xc0)
 752             ;
 753         do {
 754             inb(PORT_FD_DATA);
 755         } while ((inb(PORT_FD_STATUS) & 0xc0) == 0xc0);
 756     }
 757     eoi_pic1();
 758     // diskette interrupt has occurred
 759     SETBITS_BDA(floppy_recalibration_status, FRS_TIMEOUT);
 760 }
 761
 762 // Called from int08 handler.
 763 void
 764 floppy_tick()
 765 {
 766     // time to turn off drive(s)?
 767     u8 fcount = GET_BDA(floppy_motor_counter);
 768     if (fcount) {
 769         fcount--;
 770         SET_BDA(floppy_motor_counter, fcount);
 771         if (fcount == 0)
 772             // turn motor(s) off
 773             outb(inb(PORT_FD_DOR) & 0xcf, PORT_FD_DOR);
 774     }
 775 }