--- np2/bios/bios1b.c 2003/10/25 20:51:53 1.4 +++ np2/bios/bios1b.c 2012/01/23 09:59:51 1.37 @@ -1,10 +1,11 @@ #include "compiler.h" -#include "i286.h" -#include "memory.h" +#include "cpucore.h" #include "pccore.h" #include "iocore.h" +#include "scsicmd.h" #include "bios.h" #include "biosmem.h" +#include "sxsibios.h" #include "fddfile.h" #include "fdd_mtr.h" #include "sxsi.h" @@ -16,42 +17,66 @@ enum { }; - char fdmode = 0; -static BYTE work[65536]; -static BYTE mtr_c = 0; -static UINT mtr_r = 0; +// ---- FDD +static BOOL setfdcmode(REG8 drv, REG8 type, REG8 rpm) { -// ---- FDD + if (drv >= 4) { + return(FAILURE); + } + if ((rpm) && (!fdc.support144)) { + return(FAILURE); + } + if ((fdc.chgreg ^ type) & 1) { + return(FAILURE); + } + fdc.chgreg = type; + fdc.rpm[drv] = rpm; + if (type & 2) { + CTRL_FDMEDIA = DISKTYPE_2HD; + } + else { + CTRL_FDMEDIA = DISKTYPE_2DD; + } + return(SUCCESS); +} -static void init_fdd_equip(void) { +void fddbios_equip(REG8 type, BOOL clear) { - UINT16 diskequip; + REG16 diskequip; diskequip = GETBIOSMEM16(MEMW_DISK_EQUIP); - diskequip &= 0x0f00; - diskequip |= (UINT16)(~fdmode) & 3; - diskequip |= (UINT16)fdmode << 12; + if (clear) { + diskequip &= 0x0f00; + } + if (type & 1) { + diskequip &= 0xfff0; + diskequip |= (fdc.equip & 0x0f); + } + else { + diskequip &= 0x0fff; + diskequip |= (fdc.equip & 0x0f) << 12; + } SETBIOSMEM16(MEMW_DISK_EQUIP, diskequip); } static void biosfd_setchrn(void) { - fdc.C = I286_CL; - fdc.H = I286_DH; - fdc.R = I286_DL; - fdc.N = I286_CH; + fdc.C = CPU_CL; + fdc.H = CPU_DH; + fdc.R = CPU_DL; + fdc.N = CPU_CH; } #if 0 static void biosfd_resultout(UINT32 result) { - BYTE *ptr; + UINT8 *ptr; ptr = mem + 0x00564 + (fdc.us*8); - ptr[0] = (BYTE)(result & 0xff) | (fdc.hd << 2) | fdc.us; - ptr[1] = (BYTE)(result >> 8); - ptr[2] = (BYTE)(result >> 16); + ptr[0] = (UINT8)(result & 0xff) | (fdc.hd << 2) | fdc.us; + ptr[1] = (UINT8)(result >> 8); + ptr[2] = (UINT8)(result >> 16); ptr[3] = fdc.C; ptr[4] = fdc.H; ptr[5] = fdc.R; @@ -60,7 +85,7 @@ static void biosfd_resultout(UINT32 resu } #endif -static BOOL biosfd_seek(BYTE track, BOOL ndensity) { +static BOOL biosfd_seek(REG8 track, BOOL ndensity) { if (ndensity) { if (track < 42) { @@ -71,24 +96,23 @@ static BOOL biosfd_seek(BYTE track, BOOL } } fdc.ncn = track; - mtr_c = track; if (fdd_seek()) { return(FAILURE); } return(SUCCESS); } -static UINT16 fdfmt_biospara(BYTE fmt, BYTE rpm) { // ver0.31 +static UINT16 fdfmt_biospara(REG8 type, REG8 rpm, REG8 fmt) { - UINT16 seg; - UINT16 off; + UINT seg; + UINT off; UINT16 n; n = fdc.N; if (n >= 4) { n = 3; } - if (CTRL_FDMEDIA == DISKTYPE_2HD) { + if (type & 2) { seg = GETBIOSMEM16(MEMW_F2HD_P_SEG); off = GETBIOSMEM16(MEMW_F2HD_P_OFF); } @@ -100,26 +124,18 @@ static UINT16 fdfmt_biospara(BYTE fmt, B off = 0x2361; // see bios.cpp } off += fdc.us * 2; - off = i286_memword_read(seg, off); + off = MEMR_READ16(seg, off); off += n * 8; - if (!(I286_AH & 0x40)) { + if (!(CPU_AH & 0x40)) { off += 4; } if (fmt) { off += 2; } - return(i286_memword_read(seg, off)); -} - -static void change_rpm(BYTE rpm) { // ver0.31 - - if (np2cfg.usefd144) { - fdc.rpm = rpm; - } + return(MEMR_READ16(seg, off)); } - enum { FDCBIOS_NORESULT, FDCBIOS_SUCCESS, @@ -134,10 +150,10 @@ enum { static void fdd_int(int result) { - if (result == FDCBIOS_NORESULT) { // ver0.29 + if (result == FDCBIOS_NORESULT) { return; } - switch(I286_AH & 0x0f) { + switch(CPU_AH & 0x0f) { case 0x00: // シーク case 0x01: // ベリファイ case 0x02: // 診断の為の読み込み @@ -147,6 +163,7 @@ static void fdd_int(int result) { case 0x0a: // READ ID case 0x0d: // フォーマット break; + default: return; } @@ -183,7 +200,17 @@ static void fdd_int(int result) { fdc.stat[fdc.us] |= FDCRLT_IC0 | FDCRLT_NW; fdcsend_error7(); break; + + default: + return; + } + if (fdc.chgreg & 1) { + mem[MEMB_DISK_INTL] &= ~(0x01 << fdc.us); + } + else { + mem[MEMB_DISK_INTH] &= ~(0x10 << fdc.us); } + CPU_IP = BIOSOFST_WAIT; } #if 1 @@ -197,29 +224,29 @@ static struct { static void b0patch(void) { - if ((!b0p.flg) || (b0p.cx != I286_CX) || (b0p.dx != I286_DX)) { + if ((!b0p.flg) || (b0p.cx != CPU_CX) || (b0p.dx != CPU_DX)) { b0p.flg = TRUE; b0p.pos = 0; - b0p.cx = I286_CX; - b0p.dx = I286_DX; + b0p.cx = CPU_CX; + b0p.dx = CPU_DX; } else { if (!b0p.pos) { UINT32 addr; UINT size; UINT cnt; - BYTE c; - BYTE cl; - BYTE last; - addr = ES_BASE + I286_BP; - size = I286_BX; + REG8 c; + REG8 cl; + REG8 last; + addr = CPU_BP; + size = CPU_BX; cnt = 0; last = 0; while(size--) { - c = i286_memoryread(addr++); + c = MEMR_READ8(CPU_ES, addr++); cl = 0; do { - BYTE now = c & 0x80; + REG8 now = c & 0x80; c <<= 1; b0p.pos++; if (now == last) { @@ -239,14 +266,14 @@ static void b0patch(void) { } } } - if ((b0p.pos >> 3) < I286_BX) { - UINT32 addr; - BYTE c; - addr = ES_BASE + I286_BP + (b0p.pos >> 3); - c = i286_memoryread(addr); + if ((b0p.pos >> 3) < CPU_BX) { + UINT addr; + REG8 c; + addr = CPU_BP + (b0p.pos >> 3); + c = MEMR_READ8(CPU_ES, addr); c ^= (1 << (b0p.pos & 7)); b0p.pos++; - i286_memorywrite(addr, c); + MEMR_WRITE8(CPU_ES, addr, c); } } } @@ -256,82 +283,83 @@ static void b0clr(void) { } #endif -static BYTE fdd_operate(BYTE type, BOOL ndensity, BYTE rpm) { // ver0.31 +static REG8 fdd_operate(REG8 type, REG8 rpm, BOOL ndensity) { - BYTE ret_ah = 0x60; + REG8 ret_ah = 0x60; UINT16 size; UINT16 pos; UINT16 accesssize; UINT16 secsize; UINT16 para; - BYTE s; - BYTE ID[4]; - BYTE hd; + UINT8 s; + UINT8 ID[4]; + UINT8 hd; int result = FDCBIOS_NORESULT; UINT32 addr; + UINT8 mtr_c; + UINT mtr_r; + UINT fmode; - mtr_c = 0xff; + mtr_c = fdc.ncn; mtr_r = 0; - // とりあえずBIOSの時は無視する - fdc.mf = 0xff; // ver0.29 + fdc.mf = 0xff; + +// TRACE_("int 1Bh", CPU_AH); -// TRACE_("int 1Bh", I286_AH); + if (setfdcmode((REG8)(CPU_AL & 3), type, rpm) != SUCCESS) { + return(0x40); + } - change_rpm(rpm); // ver0.31 - if ((I286_AH & 0x0f) != 0x0a) { + if ((CPU_AH & 0x0f) != 0x0a) { fdc.crcn = 0; } - if ((I286_AH & 0x0f) != 0x03) { - CTRL_FDMEDIA = type; - switch(type) { - case DISKTYPE_2HD: - if (pic.pi[1].imr & PIC_INT42) { - return(0xd0); - } - break; - case DISKTYPE_2DD: - if (pic.pi[1].imr & PIC_INT41) { - return(0xd0); - } - break; + if ((CPU_AH & 0x0f) != 0x03) { + if (type & 2) { + if (pic.pi[1].imr & PIC_INT42) { + return(0x40); + } + } + else { + if (pic.pi[1].imr & PIC_INT41) { + return(0x40); + } } - if (fdc.us != (I286_AL & 0x03)) { - fdc.us = I286_AL & 0x03; + if (fdc.us != (CPU_AL & 0x03)) { + fdc.us = CPU_AL & 0x03; fdc.crcn = 0; } - hd = ((I286_DH) ^ (I286_AL >> 2)) & 1; + hd = ((CPU_DH) ^ (CPU_AL >> 2)) & 1; if (fdc.hd != hd) { fdc.hd = hd; fdc.crcn = 0; } if (!fdd_diskready(fdc.us)) { fdd_int(FDCBIOS_NONREADY); - if (I286_AH == 0x84) { // ver0.28 - return(0x68); // 新センスは 両用ドライブ情報も - } - if (I286_AH == 0xc4) { // ver0.31 - if (np2cfg.usefd144) { - return(0x6c); + ret_ah = 0x60; + if ((CPU_AX & 0x8f40) == 0x8400) { + ret_ah |= 8; // 1MB/640KB両用ドライブ + if ((CPU_AH & 0x40) && (fdc.support144)) { + ret_ah |= 4; // 1.44対応ドライブ } - return(0x68); } - return(0x60); + return(ret_ah); } } - // 2DDのモード選択 // ver0.29 - if (type == DISKTYPE_2DD) { - if (!(mem[MEMB_F2DD_MODE] & (0x10 << fdc.us))) { - ndensity = 1; + // モード選択 // ver0.78 + fmode = (type & 1)?MEMB_F2HD_MODE:MEMB_F2DD_MODE; + if (!(CPU_AL & 0x80)) { + if (!(mem[fmode] & (0x10 << fdc.us))) { + ndensity = TRUE; } } - switch(I286_AH & 0x0f) { + switch(CPU_AH & 0x0f) { case 0x00: // シーク - if (I286_AH & 0x10) { - if (!biosfd_seek(I286_CL, ndensity)) { + if (CPU_AH & 0x10) { + if (!biosfd_seek(CPU_CL, ndensity)) { result = FDCBIOS_SEEKSUCCESS; } else { @@ -342,8 +370,8 @@ static BYTE fdd_operate(BYTE type, BOOL break; case 0x01: // ベリファイ - if (I286_AH & 0x10) { - if (!biosfd_seek(I286_CL, ndensity)) { + if (CPU_AH & 0x10) { + if (!biosfd_seek(CPU_CL, ndensity)) { result = FDCBIOS_SEEKSUCCESS; } else { @@ -353,7 +381,7 @@ static BYTE fdd_operate(BYTE type, BOOL } } biosfd_setchrn(); - para = fdfmt_biospara(0, rpm); + para = fdfmt_biospara(type, rpm, 0); if (!para) { ret_ah = 0xd0; break; @@ -364,7 +392,7 @@ static BYTE fdd_operate(BYTE type, BOOL else { secsize = 128 << 8; } - size = I286_BX; + size = CPU_BX; while(size) { if (size > secsize) { accesssize = secsize; @@ -376,8 +404,9 @@ static BYTE fdd_operate(BYTE type, BOOL break; } size -= accesssize; - mtr_r += accesssize; // ver0.26 - if ((fdc.R++ == (BYTE)para) && (I286_AH & 0x80) && (!fdc.hd)) { + mtr_r += accesssize; + if ((fdc.R++ == (UINT8)para) && + (CPU_AH & 0x80) && (!fdc.hd)) { fdc.hd = 1; fdc.H = 1; fdc.R = 1; @@ -397,7 +426,7 @@ static BYTE fdd_operate(BYTE type, BOOL break; case 0x03: // 初期化 - init_fdd_equip(); + fddbios_equip(type, FALSE); ret_ah = 0x00; break; @@ -409,29 +438,28 @@ static BYTE fdd_operate(BYTE type, BOOL else if (fdd_diskprotect(fdc.us)) { ret_ah = 0x10; } - if (I286_AL & 0x80) { // 2HD + if (CPU_AL & 0x80) { // 2HD ret_ah |= 0x01; } else { // 2DD - if (mem[0x005ca] & (0x01 << fdc.us)) { - ret_ah++; + if (mem[fmode] & (0x01 << fdc.us)) { + ret_ah |= 0x01; } - if (mem[0x005ca] & (0x10 << fdc.us)) { // ver0.30 + if (mem[fmode] & (0x10 << fdc.us)) { ret_ah |= 0x04; } } - if (I286_AH & 0x80) { // ver0.30 + if ((CPU_AX & 0x8f40) == 0x8400) { ret_ah |= 8; // 1MB/640KB両用ドライブ - if ((I286_AH & 0x40) && - (np2cfg.usefd144)) { // ver0.31 + if ((CPU_AH & 0x40) && (fdc.support144)) { ret_ah |= 4; // 1.44対応ドライブ } } break; case 0x05: // データの書き込み - if (I286_AH & 0x10) { - if (!biosfd_seek(I286_CL, ndensity)) { + if (CPU_AH & 0x10) { + if (!biosfd_seek(CPU_CL, ndensity)) { result = FDCBIOS_SEEKSUCCESS; } else { @@ -441,7 +469,7 @@ static BYTE fdd_operate(BYTE type, BOOL } } biosfd_setchrn(); - para = fdfmt_biospara(0, rpm); + para = fdfmt_biospara(type, rpm, 0); if (!para) { ret_ah = 0xd0; break; @@ -457,8 +485,8 @@ static BYTE fdd_operate(BYTE type, BOOL else { secsize = 128 << 8; } - size = I286_BX; - addr = ES_BASE + I286_BP; + size = CPU_BX; + addr = ES_BASE + CPU_BP; while(size) { if (size > secsize) { accesssize = secsize; @@ -466,14 +494,15 @@ static BYTE fdd_operate(BYTE type, BOOL else { accesssize = size; } - i286_memx_read(addr, fdc.buf, accesssize); + MEML_READS(addr, fdc.buf, accesssize); if (fdd_write()) { break; } addr += accesssize; size -= accesssize; - mtr_r += accesssize; // ver0.26 - if ((fdc.R++ == (BYTE)para) && (I286_AH & 0x80) && (!fdc.hd)) { + mtr_r += accesssize; + if ((fdc.R++ == (UINT8)para) && + (CPU_AH & 0x80) && (!fdc.hd)) { fdc.hd = 1; fdc.H = 1; fdc.R = 1; @@ -487,15 +516,15 @@ static BYTE fdd_operate(BYTE type, BOOL result = FDCBIOS_SUCCESS; } else { - ret_ah = fddlasterror; // 0xc0 // ver0.28 + ret_ah = fddlasterror; // 0xc0 result = FDCBIOS_WRITEERROR; } break; case 0x02: // 診断の為の読み込み case 0x06: // データの読み込み - if (I286_AH & 0x10) { - if (!biosfd_seek(I286_CL, ndensity)) { + if (CPU_AH & 0x10) { + if (!biosfd_seek(CPU_CL, ndensity)) { result = FDCBIOS_SEEKSUCCESS; } else { @@ -505,7 +534,7 @@ static BYTE fdd_operate(BYTE type, BOOL } } biosfd_setchrn(); - para = fdfmt_biospara(0, rpm); + para = fdfmt_biospara(type, rpm, 0); if (!para) { ret_ah = 0xd0; break; @@ -522,8 +551,8 @@ static BYTE fdd_operate(BYTE type, BOOL else { secsize = 128 << 8; } - size = I286_BX; - addr = ES_BASE + I286_BP; + size = CPU_BX; + addr = ES_BASE + CPU_BP; while(size) { if (size > secsize) { accesssize = secsize; @@ -534,12 +563,12 @@ static BYTE fdd_operate(BYTE type, BOOL if (fdd_read()) { break; } - i286_memx_write(addr, fdc.buf, accesssize); + MEML_WRITES(addr, fdc.buf, accesssize); addr += accesssize; size -= accesssize; - mtr_r += accesssize; // ver0.26 - if (fdc.R++ == (BYTE)para) { - if ((I286_AH & 0x80) && (!fdc.hd)) { + mtr_r += accesssize; + if (fdc.R++ == (UINT8)para) { + if ((CPU_AH & 0x80) && (!fdc.hd)) { fdc.hd = 1; fdc.H = 1; fdc.R = 1; @@ -569,13 +598,13 @@ static BYTE fdd_operate(BYTE type, BOOL #endif } #if 1 - else if ((I286_AH & 0x0f) == 0x02) { // ARS対策… + else if ((CPU_AH & 0x0f) == 0x02) { // ARS対策… ret_ah = 0x00; result = FDCBIOS_READERROR; } #endif else { - ret_ah = fddlasterror; // 0xc0; // ver0.28 + ret_ah = fddlasterror; // 0xc0; result = FDCBIOS_READERROR; } break; @@ -587,9 +616,9 @@ static BYTE fdd_operate(BYTE type, BOOL break; case 0x0a: // READ ID - fdc.mf = I286_AH & 0x40; // ver0.29 - if (I286_AH & 0x10) { // ver0.28 - if (!biosfd_seek(I286_CL, ndensity)) { + fdc.mf = CPU_AH & 0x40; + if (CPU_AH & 0x10) { + if (!biosfd_seek(CPU_CL, ndensity)) { result = FDCBIOS_SEEKSUCCESS; } else { @@ -599,232 +628,87 @@ static BYTE fdd_operate(BYTE type, BOOL } } if (fdd_readid()) { - ret_ah = fddlasterror; // 0xa0; // ver0.28 + ret_ah = fddlasterror; // 0xa0; break; } - if (fdc.N < 8) { // ver0.26 + if (fdc.N < 8) { mtr_r += 128 << fdc.N; } else { mtr_r += 128 << 8; } ret_ah = 0x00; - I286_CL = fdc.C; - I286_DH = fdc.H; - I286_DL = fdc.R; - I286_CH = fdc.N; + CPU_CL = fdc.C; + CPU_DH = fdc.H; + CPU_DL = fdc.R; + CPU_CH = fdc.N; result = FDCBIOS_SUCCESS; break; case 0x0d: // フォーマット - if (I286_AH & 0x10) { - biosfd_seek(I286_CL, ndensity); + if (CPU_AH & 0x10) { + biosfd_seek(CPU_CL, ndensity); } if (fdd_diskprotect(fdc.us)) { ret_ah = 0x70; break; } - fdc.d = I286_DL; - fdc.N = I286_CH; - para = fdfmt_biospara(1, rpm); + fdc.d = CPU_DL; + fdc.N = CPU_CH; + para = fdfmt_biospara(type, rpm, 1); if (!para) { ret_ah = 0xd0; break; } - fdc.sc = (BYTE)para; + fdc.sc = (UINT8)para; fdd_formatinit(); - pos = I286_BP; + pos = CPU_BP; for (s=0; s> 4; - if ((I286_AL & 0x0f) >= 2) { - return(0x60); - } - np2drv |= (I286_AL & 1); - sxsi = &sxsi_hd[np2drv]; - if (I286_AL & 0x80) { - if ((I286_DL >= sxsi->sectors) || - (I286_DH >= sxsi->surfaces) || - (I286_CX >= sxsi->tracks)) { - return(0xd0); - } - (*pos) = ((I286_CX * sxsi->surfaces) + I286_DH) * sxsi->sectors - + I286_DL; - } - else { - *pos = (I286_DL << 16) | I286_CX; - if (!(I286_AL & 0x20)) { - (*pos) &= 0x1fffff; - } - if ((*pos) >= sxsi->totals) { - return(0xd0); - } - } - return(0x00); -} - - -static BYTE sxsi_operate(BYTE type) { - - BYTE ret_ah = 0x00; - BYTE drv; - long pos; -// int i; - - drv = (I286_AL & 0x20) >> 4; - if ((I286_AL & 0x0f) >= 2) { - return(0x60); - } - drv |= (I286_AL & 1); - - switch(I286_AH & 0x0f) { - case 0x01: // ベリファイ - case 0x07: // リトラクト - case 0x0f: // リトラクト - break; - - case 0x03: // イニシャライズ - if (type == HDDTYPE_SASI) { - init_sasi_equip(); - } - else if (type == HDDTYPE_SCSI) { - init_scsi_equip(); - } - break; - - case 0x04: // センス ret_ah = 0x00; - if ((I286_AH == 0x04) && (type == HDDTYPE_SASI)) { - ret_ah = 0x04; - } - else if ((I286_AH == 0x44) && (type == HDDTYPE_SCSI)) { - I286_BX = 1; - } - else if (I286_AH == 0x84) { - I286_BX = sxsi_hd[drv].size; - I286_CX = sxsi_hd[drv].tracks; - I286_DH = sxsi_hd[drv].surfaces; - I286_DL = sxsi_hd[drv].sectors; - } - break; - - case 0x05: // データの書き込み - i286_memx_read(ES_BASE + I286_BP, work, I286_BX); - ret_ah = sxsi_pos(&pos); - if (!ret_ah) { - ret_ah = sxsi_write(I286_AL, pos, work, I286_BX); - } - break; - - case 0x06: // データの読み込み - ret_ah = sxsi_pos(&pos); - if (!ret_ah) { - ret_ah = sxsi_read(I286_AL, pos, work, I286_BX); - if (ret_ah < 0x20) { - i286_memx_write(ES_BASE + I286_BP, work, I286_BX); - } - } - break; - - case 0x0d: // フォーマット - if (I286_DL) { - ret_ah = 0x30; - break; - } - i286_memstr_read(I286_ES, I286_BP, work, I286_BX); - ret_ah = sxsi_pos(&pos); - if (!ret_ah) { - ret_ah = sxsi_format(I286_AL, pos); - } - break; - - default: - ret_ah = 0x40; break; } + fdd_int(result); + if (mtr_c != fdc.ncn) { + fddmtr_seek(fdc.us, mtr_c, mtr_r); + } return(ret_ah); } // -------------------------------------------------------------------- BIOS -static UINT16 boot_fd1(BYTE rpm) { // ver0.31 +static UINT16 boot_fd1(REG8 type, REG8 rpm) { UINT remain; UINT size; UINT32 pos; UINT16 bootseg; - change_rpm(rpm); // ver0.31 + if (setfdcmode(fdc.us, type, rpm) != SUCCESS) { + return(0); + } if (biosfd_seek(0, 0)) { return(0); } @@ -868,50 +752,53 @@ static UINT16 boot_fd1(BYTE rpm) { return(bootseg); } -static UINT16 boot_fd(BYTE drv, BYTE type) { // ver0.27 +static UINT16 boot_fd(REG8 drv, REG8 type) { UINT16 bootseg; if (drv >= 4) { return(0); } - fdc.us = drv & 3; + fdc.us = drv; if (!fdd_diskready(fdc.us)) { return(0); } // 2HD if (type & 1) { - CTRL_FDMEDIA = DISKTYPE_2HD; + fdc.chgreg |= 0x01; // 1.25MB - bootseg = boot_fd1(0); + bootseg = boot_fd1(3, 0); if (bootseg) { - mem[MEMB_DISK_BOOT] = (BYTE)(0x90+drv); + mem[MEMB_DISK_BOOT] = (UINT8)(0x90 + drv); + fddbios_equip(3, TRUE); return(bootseg); } // 1.44MB - bootseg = boot_fd1(1); + bootseg = boot_fd1(3, 1); if (bootseg) { - mem[MEMB_DISK_BOOT] = (BYTE)(0x30+drv); + mem[MEMB_DISK_BOOT] = (UINT8)(0x30 + drv); + fddbios_equip(3, TRUE); return(bootseg); } } - if (type & 2) { // ver0.29 + if (type & 2) { + fdc.chgreg &= ~0x01; // 2DD - CTRL_FDMEDIA = DISKTYPE_2DD; - bootseg = boot_fd1(0); + bootseg = boot_fd1(0, 0); if (bootseg) { - mem[MEMB_DISK_BOOT] = (BYTE)(0x70+drv); - fdmode = 3; + mem[MEMB_DISK_BOOT] = (UINT8)(0x70 + drv); + fddbios_equip(0, TRUE); return(bootseg); } } + fdc.chgreg |= 0x01; return(0); } -static UINT16 boot_hd(BYTE drv) { // ver0.27 +static REG16 boot_hd(REG8 drv) { - BYTE ret; + REG8 ret; ret = sxsi_read(drv, 0, mem + 0x1fc00, 0x400); if (ret < 0x20) { @@ -921,16 +808,17 @@ static UINT16 boot_hd(BYTE drv) { return(0); } -UINT16 bootstrapload(void) { // ver0.27 +REG16 bootstrapload(void) { - BYTE i; - UINT16 bootseg; + UINT8 i; + REG16 bootseg; - fdmode = 0; +// fdmode = 0; bootseg = 0; switch(mem[MEMB_MSW5] & 0xf0) { // うぐぅ…本当はALレジスタの値から case 0x00: // ノーマル break; + case 0x20: // 640KB FDD for (i=0; (i<4) && (!bootseg); i++) { if (fdd_diskready(i)) { @@ -938,6 +826,7 @@ UINT16 bootstrapload(void) { // } } break; + case 0x40: // 1.2MB FDD for (i=0; (i<4) && (!bootseg); i++) { if (fdd_diskready(i)) { @@ -945,25 +834,24 @@ UINT16 bootstrapload(void) { // } } break; + case 0x60: // MO break; + case 0xa0: // SASI 1 - if (sxsi_hd[0].fname[0]) { - bootseg = boot_hd(0x80); - } + bootseg = boot_hd(0x80); break; + case 0xb0: // SASI 2 - if (sxsi_hd[1].fname[0]) { - bootseg = boot_hd(0x81); - } + bootseg = boot_hd(0x81); break; + case 0xc0: // SCSI - for (i=0; (i<2) && (!bootseg); i++) { - if (sxsi_hd[i+2].fname[0]) { - bootseg = boot_hd((BYTE)(0xa0 | i)); - } + for (i=0; (i<4) && (!bootseg); i++) { + bootseg = boot_hd((REG8)(0xa0 + i)); } break; + default: // ROM return(0); } @@ -973,57 +861,102 @@ UINT16 bootstrapload(void) { // } } for (i=0; (i<2) && (!bootseg); i++) { - if (sxsi_hd[i].fname[0]) { - bootseg = boot_hd((BYTE)(0x80 | i)); - } + bootseg = boot_hd((REG8)(0x80 + i)); } - for (i=0; (i<2) && (!bootseg); i++) { - if (sxsi_hd[i+2].fname[0]) { - bootseg = boot_hd((BYTE)(0xa0 | i)); - } + for (i=0; (i<4) && (!bootseg); i++) { + bootseg = boot_hd((REG8)(0xa0 + i)); } - - init_fdd_equip(); - init_sasi_equip(); - init_scsi_equip(); return(bootseg); } + // -------------------------------------------------------------------------- void bios0x1b(void) { - BYTE ret_ah; - BYTE flag; + REG8 ret_ah; + REG8 flag; + +#if 1 // bypass to disk bios + REG8 seg; + UINT sp; + + seg = mem[MEMX_DISK_XROM + (CPU_AL >> 4)]; + if (seg) { + sp = CPU_SP; + MEMR_WRITE16(CPU_SS, sp - 2, CPU_DS); + MEMR_WRITE16(CPU_SS, sp - 4, CPU_SI); + MEMR_WRITE16(CPU_SS, sp - 6, CPU_DI); + MEMR_WRITE16(CPU_SS, sp - 8, CPU_ES); // +a + MEMR_WRITE16(CPU_SS, sp - 10, CPU_BP); // +8 + MEMR_WRITE16(CPU_SS, sp - 12, CPU_DX); // +6 + MEMR_WRITE16(CPU_SS, sp - 14, CPU_CX); // +4 + MEMR_WRITE16(CPU_SS, sp - 16, CPU_BX); // +2 + MEMR_WRITE16(CPU_SS, sp - 18, CPU_AX); // +0 +#if 0 + TRACEOUT(("call by %.4x:%.4x", + MEMR_READ16(CPU_SS, CPU_SP+2), + MEMR_READ16(CPU_SS, CPU_SP))); + TRACEOUT(("bypass to %.4x:0018", seg << 8)); + TRACEOUT(("AX=%04x BX=%04x %02x:%02x:%02x:%02x ES=%04x BP=%04x", + CPU_AX, CPU_BX, CPU_CL, CPU_DH, CPU_DL, CPU_CH, + CPU_ES, CPU_BP)); +#endif + sp -= 18; + CPU_SP = sp; + CPU_BP = sp; + CPU_DS = 0x0000; + CPU_BX = 0x04B0; + CPU_AX = seg << 8; + CPU_CS = seg << 8; + CPU_IP = 0x18; + return; + } +#endif - switch(I286_AL & 0xf0) { +#if defined(SUPPORT_SCSI) + if ((CPU_AL & 0xf0) == 0xc0) { + TRACEOUT(("%.4x:%.4x AX=%.4x BX=%.4x CX=%.4x DX=%.4 ES=%.4x BP=%.4x", + MEMR_READ16(CPU_SS, CPU_SP+2), + MEMR_READ16(CPU_SS, CPU_SP), + CPU_AX, CPU_BX, CPU_CX, CPU_DX, CPU_ES, CPU_BP)); + scsicmd_bios(); + return; + } +#endif + + switch(CPU_AL & 0xf0) { case 0x90: - ret_ah = fdd_operate(DISKTYPE_2HD, 0, 0); + ret_ah = fdd_operate(3, 0, FALSE); break; case 0x30: case 0xb0: - ret_ah = fdd_operate(DISKTYPE_2HD, 0, 1); + ret_ah = fdd_operate(3, 1, FALSE); break; case 0x10: + ret_ah = fdd_operate(1, 0, FALSE); + break; + case 0x70: case 0xf0: - ret_ah = fdd_operate(DISKTYPE_2DD, 0, 0); + ret_ah = fdd_operate(0, 0, FALSE); break; case 0x50: - ret_ah = fdd_operate(DISKTYPE_2DD, 1, 0); + ret_ah = fdd_operate(0, 0, TRUE); break; case 0x00: case 0x80: - ret_ah = sxsi_operate(HDDTYPE_SASI); + ret_ah = sasibios_operate(); break; -#if 0 + +#if defined(SUPPORT_SCSI) case 0x20: case 0xa0: - ret_ah = sxsi_operate(HDDTYPE_SCSI); + ret_ah = scsibios_operate(); break; #endif @@ -1032,31 +965,48 @@ void bios0x1b(void) { break; } #if 0 - { - static BYTE p = 0; - if ((I286_CL == 0x4d) && (ret_ah == 0xe0)) { - if (!p) { - trace_sw = 1; - p++; - debug_status(); - memorydump(); - } - } - } -#endif -#if 0 TRACEOUT(("%04x:%04x AX=%04x BX=%04x %02x:%02x:%02x:%02x\n" \ "ES=%04x BP=%04x \nret=%02x", - i286_memword_read(I286_SS, I286_SP+2), - i286_memword_read(I286_SS, I286_SP), - I286_AX, I286_BX, I286_CL, I286_DH, I286_DL, I286_CH, - I286_ES, I286_BP, ret_ah)); + MEMR_READ16(CPU_SS, CPU_SP+2), + MEMR_READ16(CPU_SS, CPU_SP), + CPU_AX, CPU_BX, CPU_CL, CPU_DH, CPU_DL, CPU_CH, + CPU_ES, CPU_BP, ret_ah)); #endif - I286_AH = ret_ah; - flag = i286_membyte_read(I286_SS, I286_SP+4) & 0xfe; + CPU_AH = ret_ah; + flag = MEMR_READ8(CPU_SS, CPU_SP+4) & 0xfe; if (ret_ah >= 0x20) { - flag |= 1; + flag += 1; + } + MEMR_WRITE8(CPU_SS, CPU_SP + 4, flag); +} + +UINT bios0x1b_wait(void) { + + UINT addr; + REG8 bit; + + if (fddmtr.busy) { + CPU_REMCLOCK = -1; + } + else { + if (fdc.chgreg & 1) { + addr = MEMB_DISK_INTL; + bit = 0x01; + } + else { + addr = MEMB_DISK_INTH; + bit = 0x10; + } + bit <<= fdc.us; + if (mem[addr] & bit) { + mem[addr] &= ~bit; + return(0); + } + else { + CPU_REMCLOCK -= 1000; + } } - i286_membyte_write(I286_SS, I286_SP+4, flag); + CPU_IP--; + return(1); }