-// 16bit code to access cdrom drives.
+// Support for booting from cdroms (the "El Torito" spec).
//
// Copyright (C) 2008,2009 Kevin O'Connor <kevin@koconnor.net>
// Copyright (C) 2002 MandrakeSoft S.A.
#include "bregs.h" // struct bregs
#include "biosvar.h" // GET_EBDA
#include "ata.h" // ATA_CMD_REQUEST_SENSE
+#include "blockcmd.h" // CDB_CMD_REQUEST_SENSE
/****************************************************************
* CD emulation
****************************************************************/
-static void
-cdemu_wp(struct bregs *regs, u8 driveid)
+static int
+cdemu_read(struct disk_op_s *op)
{
- disk_ret(regs, DISK_RET_EWRITEPROTECT);
-}
+ u16 ebda_seg = get_ebda_seg();
+ struct drive_s *drive_g = GET_EBDA2(ebda_seg, cdemu.emulated_drive);
+ struct disk_op_s dop;
+ dop.drive_g = drive_g;
+ dop.command = op->command;
+ dop.lba = GET_EBDA2(ebda_seg, cdemu.ilba) + op->lba / 4;
+
+ int count = op->count;
+ op->count = 0;
+ u8 *cdbuf_far = (void*)offsetof(struct extended_bios_data_area_s, cdemu_buf);
+
+ if (op->lba & 3) {
+ // Partial read of first block.
+ dop.count = 1;
+ dop.buf_fl = MAKE_FLATPTR(ebda_seg, cdbuf_far);
+ int ret = process_op(&dop);
+ if (ret)
+ return ret;
+ u8 thiscount = 4 - (op->lba & 3);
+ if (thiscount > count)
+ thiscount = count;
+ count -= thiscount;
+ memcpy_far(FLATPTR_TO_SEG(op->buf_fl)
+ , (void*)FLATPTR_TO_OFFSET(op->buf_fl)
+ , ebda_seg, cdbuf_far + (op->lba & 3) * 512
+ , thiscount * 512);
+ op->buf_fl += thiscount * 512;
+ op->count += thiscount;
+ dop.lba++;
+ }
-static void
-cdemu_1302(struct bregs *regs, u8 driveid)
-{
- cdemu_access(regs, driveid, CMD_READ);
-}
+ if (count > 3) {
+ // Read n number of regular blocks.
+ dop.count = count / 4;
+ dop.buf_fl = op->buf_fl;
+ int ret = process_op(&dop);
+ op->count += dop.count * 4;
+ if (ret)
+ return ret;
+ u8 thiscount = count & ~3;
+ count &= 3;
+ op->buf_fl += thiscount * 512;
+ dop.lba += thiscount / 4;
+ }
-static void
-cdemu_1304(struct bregs *regs, u8 driveid)
-{
- cdemu_access(regs, driveid, CMD_VERIFY);
+ if (count) {
+ // Partial read on last block.
+ dop.count = 1;
+ dop.buf_fl = MAKE_FLATPTR(ebda_seg, cdbuf_far);
+ int ret = process_op(&dop);
+ if (ret)
+ return ret;
+ u8 thiscount = count;
+ memcpy_far(FLATPTR_TO_SEG(op->buf_fl)
+ , (void*)FLATPTR_TO_OFFSET(op->buf_fl)
+ , ebda_seg, cdbuf_far, thiscount * 512);
+ op->count += thiscount;
+ }
+
+ return DISK_RET_SUCCESS;
}
-// read disk drive parameters
-static void
-cdemu_1308(struct bregs *regs, u8 driveid)
+int
+process_cdemu_op(struct disk_op_s *op)
{
- u16 ebda_seg = get_ebda_seg();
- u16 nlc = GET_EBDA2(ebda_seg, cdemu.lchs.cylinders) - 1;
- u16 nlh = GET_EBDA2(ebda_seg, cdemu.lchs.heads) - 1;
- u16 nlspt = GET_EBDA2(ebda_seg, cdemu.lchs.spt);
-
- regs->al = 0x00;
- regs->bl = 0x00;
- regs->ch = nlc & 0xff;
- regs->cl = ((nlc >> 2) & 0xc0) | (nlspt & 0x3f);
- regs->dh = nlh;
- // FIXME ElTorito Various. should send the real count of drives 1 or 2
- // FIXME ElTorito Harddisk. should send the HD count
- regs->dl = 0x02;
- u8 media = GET_EBDA2(ebda_seg, cdemu.media);
- if (media <= 3)
- regs->bl = media * 2;
-
- regs->es = SEG_BIOS;
- regs->di = (u32)&diskette_param_table2;
+ if (!CONFIG_CDROM_EMU)
+ return 0;
- disk_ret(regs, DISK_RET_SUCCESS);
+ switch (op->command) {
+ case CMD_READ:
+ return cdemu_read(op);
+ case CMD_WRITE:
+ case CMD_FORMAT:
+ return DISK_RET_EWRITEPROTECT;
+ case CMD_VERIFY:
+ case CMD_RESET:
+ case CMD_SEEK:
+ case CMD_ISREADY:
+ return DISK_RET_SUCCESS;
+ default:
+ op->count = 0;
+ return DISK_RET_EPARAM;
+ }
}
+struct drive_s *cdemu_drive VAR16VISIBLE;
+
void
-cdemu_13(struct bregs *regs)
+cdemu_setup(void)
{
- //debug_stub(regs);
-
- u16 ebda_seg = get_ebda_seg();
- u8 driveid = GET_EBDA2(ebda_seg, cdemu.emulated_driveid);
-
- switch (regs->ah) {
- case 0x02: cdemu_1302(regs, driveid); break;
- case 0x04: cdemu_1304(regs, driveid); break;
- case 0x08: cdemu_1308(regs, driveid); break;
-
- case 0x03:
- case 0x05:
- cdemu_wp(regs, driveid);
- break;
-
- // These functions are the same as standard CDROM.
- case 0x00:
- case 0x01:
- case 0x09:
- case 0x0c:
- case 0x0d:
- case 0x10:
- case 0x11:
- case 0x14:
- case 0x15:
- case 0x16:
- disk_13(regs, driveid);
- break;
-
- default: disk_13XX(regs, driveid); break;
+ if (!CONFIG_CDROM_EMU)
+ return;
+
+ struct drive_s *drive_g = malloc_fseg(sizeof(*drive_g));
+ if (! drive_g) {
+ warn_noalloc();
+ cdemu_drive = NULL;
+ return;
}
+ memset(drive_g, 0, sizeof(*drive_g));
+ cdemu_drive = STORE_GLOBAL_PTR(drive_g);
+ drive_g->type = DTYPE_CDEMU;
+ drive_g->blksize = DISK_SECTOR_SIZE;
+ drive_g->sectors = (u64)-1;
}
struct eltorito_s {
SET_INT13ET(regs, media, GET_EBDA2(ebda_seg, cdemu.media));
SET_INT13ET(regs, emulated_drive
, GET_EBDA2(ebda_seg, cdemu.emulated_extdrive));
- u8 driveid = GET_EBDA2(ebda_seg, cdemu.emulated_driveid);
- u8 cntl_id = GET_GLOBAL(Drives.drives[driveid].cntl_id);
+ struct drive_s *drive_g = GET_EBDA2(ebda_seg, cdemu.emulated_drive);
+ u8 cntl_id = GET_GLOBAL(drive_g->cntl_id);
SET_INT13ET(regs, controller_index, cntl_id / 2);
SET_INT13ET(regs, device_spec, cntl_id % 2);
SET_INT13ET(regs, ilba, GET_EBDA2(ebda_seg, cdemu.ilba));
if (regs->al == 0x00) {
// FIXME ElTorito Various. Should be handled accordingly to spec
SET_EBDA2(ebda_seg, cdemu.active, 0x00); // bye bye
+
+ // XXX - update floppy/hd count.
}
disk_ret(regs, DISK_RET_SUCCESS);
* CD booting
****************************************************************/
-// Request SENSE
-static int
-atapi_get_sense(int driveid, u8 *asc, u8 *ascq)
-{
- u8 atacmd[12], buffer[18];
- memset(atacmd, 0, sizeof(atacmd));
- atacmd[0] = ATA_CMD_REQUEST_SENSE;
- atacmd[4] = sizeof(buffer);
- int ret = ata_cmd_packet(driveid, atacmd, sizeof(atacmd), sizeof(buffer)
- , MAKE_FLATPTR(GET_SEG(SS), buffer));
- if (ret)
- return ret;
-
- *asc = buffer[12];
- *ascq = buffer[13];
-
- return 0;
-}
-
-// Request capacity
-static int
-atapi_read_capacity(int driveid, u32 *blksize, u32 *sectors)
-{
- u8 packet[12], buf[8];
- memset(packet, 0, sizeof(packet));
- packet[0] = 0x25; /* READ CAPACITY */
- int ret = ata_cmd_packet(driveid, packet, sizeof(packet), sizeof(buf)
- , MAKE_FLATPTR(GET_SEG(SS), buf));
- if (ret)
- return ret;
-
- *blksize = (((u32)buf[4] << 24) | ((u32)buf[5] << 16)
- | ((u32)buf[6] << 8) | ((u32)buf[7] << 0));
- *sectors = (((u32)buf[0] << 24) | ((u32)buf[1] << 16)
- | ((u32)buf[2] << 8) | ((u32)buf[3] << 0));
-
- return 0;
-}
-
static int
-atapi_is_ready(u16 driveid)
+atapi_is_ready(struct disk_op_s *op)
{
- dprintf(6, "atapi_is_ready (driveid=%d)\n", driveid);
+ dprintf(6, "atapi_is_ready (drive=%p)\n", op->drive_g);
/* Retry READ CAPACITY for 5 seconds unless MEDIUM NOT PRESENT is
* reported by the device. If the device reports "IN PROGRESS",
* 30 seconds is added. */
- u32 blksize, sectors;
+ struct cdbres_read_capacity info;
int in_progress = 0;
u64 end = calc_future_tsc(5000);
for (;;) {
- if (rdtscll() > end) {
+ if (check_time(end)) {
dprintf(1, "read capacity failed\n");
return -1;
}
- int ret = atapi_read_capacity(driveid, &blksize, §ors);
+ int ret = cdb_read_capacity(op, &info);
if (!ret)
// Success
break;
- u8 asc, ascq;
- ret = atapi_get_sense(driveid, &asc, &ascq);
+ struct cdbres_request_sense sense;
+ ret = cdb_get_sense(op, &sense);
if (ret)
// Error - retry.
continue;
// Sense succeeded.
- if (asc == 0x3a) { /* MEDIUM NOT PRESENT */
+ if (sense.asc == 0x3a) { /* MEDIUM NOT PRESENT */
dprintf(1, "Device reports MEDIUM NOT PRESENT\n");
return -1;
}
- if (asc == 0x04 && ascq == 0x01 && !in_progress) {
+ if (sense.asc == 0x04 && sense.ascq == 0x01 && !in_progress) {
/* IN PROGRESS OF BECOMING READY */
printf("Waiting for device to detect medium... ");
/* Allow 30 seconds more */
}
}
- if (blksize != GET_GLOBAL(Drives.drives[driveid].blksize)) {
+ u32 blksize = ntohl(info.blksize), sectors = ntohl(info.sectors);
+ if (blksize != GET_GLOBAL(op->drive_g->blksize)) {
printf("Unsupported sector size %u\n", blksize);
return -1;
}
int
cdrom_boot(int cdid)
{
- // Verify device is a cdrom.
- if (cdid >= Drives.cdcount)
+ struct disk_op_s dop;
+ memset(&dop, 0, sizeof(dop));
+ dop.drive_g = getDrive(EXTTYPE_CD, cdid);
+ if (!dop.drive_g)
return 1;
- int driveid = GET_GLOBAL(Drives.idmap[EXTTYPE_CD][cdid]);
- int ret = atapi_is_ready(driveid);
+ int ret = atapi_is_ready(&dop);
if (ret)
dprintf(1, "atapi_is_ready returned %d\n", ret);
// Read the Boot Record Volume Descriptor
u8 buffer[2048];
- struct disk_op_s dop;
- memset(&dop, 0, sizeof(dop));
- dop.driveid = driveid;
dop.lba = 0x11;
dop.count = 1;
dop.buf_fl = MAKE_FLATPTR(GET_SEG(SS), buffer);
- ret = cdrom_read(&dop);
+ ret = cdb_read(&dop);
if (ret)
return 3;
// And we read the Boot Catalog
dop.lba = lba;
- ret = cdrom_read(&dop);
+ dop.count = 1;
+ ret = cdb_read(&dop);
if (ret)
return 7;
u8 media = buffer[0x21];
SET_EBDA2(ebda_seg, cdemu.media, media);
- SET_EBDA2(ebda_seg, cdemu.emulated_driveid, driveid);
+ SET_EBDA2(ebda_seg, cdemu.emulated_drive, STORE_GLOBAL_PTR(dop.drive_g));
u16 boot_segment = *(u16*)&buffer[0x22];
if (!boot_segment)
dop.lba = lba;
dop.count = DIV_ROUND_UP(nbsectors, 4);
dop.buf_fl = MAKE_FLATPTR(boot_segment, 0);
- ret = cdrom_read(&dop);
+ ret = cdb_read(&dop);
if (ret)
return 12;
}
// Emulation of a floppy/harddisk requested
- if (! CONFIG_CDROM_EMU)
+ if (! CONFIG_CDROM_EMU || !cdemu_drive)
return 13;
// Set emulated drive id and increase bios installed hardware
if (media < 4) {
// Floppy emulation
SET_EBDA2(ebda_seg, cdemu.emulated_extdrive, 0x00);
+ // XXX - get and set actual floppy count.
SETBITS_BDA(equipment_list_flags, 0x41);
switch (media) {
projects / seabios.git / blobdiff