|
|
| version 1.15, 2003/11/29 03:38:26 | version 1.24, 2003/12/12 01:04:40 |
|---|---|
| Line 1 | Line 1 |
| #include "compiler.h" | #include "compiler.h" |
| #include "i286.h" | #include "cpucore.h" |
| #include "i286c.h" | #include "i286c.h" |
| #include "memory.h" | |
| #include "pccore.h" | #include "pccore.h" |
| #include "iocore.h" | #include "iocore.h" |
| #include "bios.h" | #include "bios.h" |
| Line 10 | Line 9 |
| #define MAX_PREFIX 8 | #define MAX_PREFIX 8 |
| #define NEXT_OPCODE \ | #define NEXT_OPCODE \ |
| if (I286_REMCLOCK < 1) { \ | if (I286_REMCLOCK < 1) { \ |
| I286_BASECLOCK += (1 - I286_REMCLOCK); \ | I286_BASECLOCK += (1 - I286_REMCLOCK); \ |
| Line 622 I286FN _segprefix_es(void) { // 26: | Line 622 I286FN _segprefix_es(void) { // 26: |
| SS_FIX = ES_BASE; | SS_FIX = ES_BASE; |
| DS_FIX = ES_BASE; | DS_FIX = ES_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op[op](); | i286op[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 768 I286FN _segprefix_cs(void) { // 2e: | Line 768 I286FN _segprefix_cs(void) { // 2e: |
| SS_FIX = CS_BASE; | SS_FIX = CS_BASE; |
| DS_FIX = CS_BASE; | DS_FIX = CS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op[op](); | i286op[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 909 I286FN _segprefix_ss(void) { // 36: | Line 909 I286FN _segprefix_ss(void) { // 36: |
| SS_FIX = SS_BASE; | SS_FIX = SS_BASE; |
| DS_FIX = SS_BASE; | DS_FIX = SS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op[op](); | i286op[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 933 I286FN _aaa(void) { // 37: aaa | Line 933 I286FN _aaa(void) { // 37: aaa |
| else { | else { |
| I286_FLAGL &= ~(A_FLAG | C_FLAG); | I286_FLAGL &= ~(A_FLAG | C_FLAG); |
| } | } |
| I286_AL &= 0x0f; | |
| } | } |
| I286FN _cmp_ea_r8(void) { // 38: cmp EA, REG8 | I286FN _cmp_ea_r8(void) { // 38: cmp EA, REG8 |
| Line 1025 I286FN _segprefix_ds(void) { // 3e: | Line 1026 I286FN _segprefix_ds(void) { // 3e: |
| SS_FIX = DS_BASE; | SS_FIX = DS_BASE; |
| DS_FIX = DS_BASE; | DS_FIX = DS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op[op](); | i286op[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 1085 I286FN _pop_bp(void) REGPOP(I286_BP, 5) | Line 1086 I286FN _pop_bp(void) REGPOP(I286_BP, 5) |
| I286FN _pop_si(void) REGPOP(I286_SI, 5) // 5E: pop si | I286FN _pop_si(void) REGPOP(I286_SI, 5) // 5E: pop si |
| I286FN _pop_di(void) REGPOP(I286_DI, 5) // 5F: pop di | I286FN _pop_di(void) REGPOP(I286_DI, 5) // 5F: pop di |
| #if (defined(ARM) || defined(X11)) && defined(BYTESEX_LITTLE) | |
| I286FN _pusha(void) { // 60: pusha | I286FN _pusha(void) { // 60: pusha |
| UINT16 tmp; | REG16 tmp; |
| UINT32 addr; | |
| I286_WORKCLOCK(17); | |
| tmp = I286_SP; | |
| addr = tmp + SS_BASE; | |
| if ((tmp < 16) || (INHIBIT_WORDP(addr))) { | |
| REGPUSH0(I286_AX) | |
| REGPUSH0(I286_CX) | |
| REGPUSH0(I286_DX) | |
| REGPUSH0(I286_BX) | |
| REGPUSH0(tmp) | |
| REGPUSH0(I286_BP) | |
| REGPUSH0(I286_SI) | |
| REGPUSH0(I286_DI) | |
| } | |
| else { | |
| *(UINT16 *)(mem + addr - 2) = I286_AX; | |
| *(UINT16 *)(mem + addr - 4) = I286_CX; | |
| *(UINT16 *)(mem + addr - 6) = I286_DX; | |
| *(UINT16 *)(mem + addr - 8) = I286_BX; | |
| *(UINT16 *)(mem + addr - 10) = tmp; | |
| *(UINT16 *)(mem + addr - 12) = I286_BP; | |
| *(UINT16 *)(mem + addr - 14) = I286_SI; | |
| *(UINT16 *)(mem + addr - 16) = I286_DI; | |
| I286_SP -= 16; | |
| } | |
| } | |
| I286FN _popa(void) { // 61: popa | |
| UINT tmp; | |
| UINT32 addr; | |
| I286_WORKCLOCK(19); | |
| tmp = I286_SP + 16; | |
| addr = tmp + SS_BASE; | |
| if ((tmp >= 0x10000) || (INHIBIT_WORDP(addr))) { | |
| REGPOP0(I286_DI); | |
| REGPOP0(I286_SI); | |
| REGPOP0(I286_BP); | |
| I286_SP += 2; | |
| REGPOP0(I286_BX); | |
| REGPOP0(I286_DX); | |
| REGPOP0(I286_CX); | |
| REGPOP0(I286_AX); | |
| } | |
| else { | |
| I286_DI = *(UINT16 *)(mem + addr - 16); | |
| I286_SI = *(UINT16 *)(mem + addr - 14); | |
| I286_BP = *(UINT16 *)(mem + addr - 12); | |
| I286_BX = *(UINT16 *)(mem + addr - 8); | |
| I286_DX = *(UINT16 *)(mem + addr - 6); | |
| I286_CX = *(UINT16 *)(mem + addr - 4); | |
| I286_AX = *(UINT16 *)(mem + addr - 2); | |
| I286_SP = tmp; | |
| } | |
| } | |
| #else | |
| I286FN _pusha(void) { // 60: pusha | |
| REG16 tmp; | |
| tmp = I286_SP; | tmp = I286_SP; |
| REGPUSH0(I286_AX) | REGPUSH0(I286_AX) |
| Line 1114 I286FN _popa(void) { // 61: popa | Line 1180 I286FN _popa(void) { // 61: popa |
| I286_WORKCLOCK(19); | I286_WORKCLOCK(19); |
| } | } |
| #endif | |
| I286FN _bound(void) { // 62: bound | I286FN _bound(void) { // 62: bound |
| UINT vect = 0; | UINT vect = 0; |
| Line 1743 I286FN _pushf(void) { // 9C: pushf | Line 1811 I286FN _pushf(void) { // 9C: pushf |
| I286FN _popf(void) { // 9D: popf | I286FN _popf(void) { // 9D: popf |
| UINT flag; | |
| REGPOP0(flag) | |
| I286_OV = flag & O_FLAG; | |
| I286_FLAG = flag & (0xfff ^ O_FLAG); | |
| I286_TRAP = ((flag & 0x300) == 0x300); | |
| I286_WORKCLOCK(5); | I286_WORKCLOCK(5); |
| REGPOP0(I286_FLAG) | #if defined(INTR_FAST) |
| I286_OV = I286_FLAG & O_FLAG; | if ((I286_TRAP) || ((flag & I_FLAG) && (PICEXISTINTR))) { |
| I286_FLAG &= (0xfff ^ O_FLAG); | I286IRQCHECKTERM |
| I286_TRAP = ((I286_FLAG & 0x300) == 0x300); | } |
| #else | |
| I286IRQCHECKTERM | I286IRQCHECKTERM |
| #endif | |
| } | } |
| I286FN _sahf(void) { // 9E: sahf | I286FN _sahf(void) { // 9E: sahf |
| Line 2193 I286FN _into(void) { // CE: into | Line 2269 I286FN _into(void) { // CE: into |
| I286FN _iret(void) { // CF: iret | I286FN _iret(void) { // CF: iret |
| UINT flag; | |
| extirq_pop(); | extirq_pop(); |
| I286_WORKCLOCK(31); | |
| REGPOP0(I286_IP) | REGPOP0(I286_IP) |
| REGPOP0(I286_CS) | REGPOP0(I286_CS) |
| REGPOP0(I286_FLAG) | REGPOP0(flag) |
| I286_OV = I286_FLAG & O_FLAG; | I286_OV = flag & O_FLAG; |
| I286_FLAG &= 0x7ff; | I286_FLAG = flag & (0xfff ^ O_FLAG); |
| I286_TRAP = ((I286_FLAG & 0x300) == 0x300); | I286_TRAP = ((flag & 0x300) == 0x300); |
| CS_BASE = I286_CS << 4; | CS_BASE = I286_CS << 4; |
| I286_WORKCLOCK(31); | |
| #if defined(INTR_FAST) | |
| if ((I286_TRAP) || ((flag & I_FLAG) && (PICEXISTINTR))) { | |
| I286IRQCHECKTERM | |
| } | |
| #else | |
| I286IRQCHECKTERM | I286IRQCHECKTERM |
| #endif | |
| } | } |
| I286FN _shift_ea8_1(void) { // D0: shift EA8, 1 | I286FN _shift_ea8_1(void) { // D0: shift EA8, 1 |
| Line 2256 I286FN _shift_ea8_cl(void) { // D2: sh | Line 2340 I286FN _shift_ea8_cl(void) { // D2: sh |
| BYTE *out; | BYTE *out; |
| UINT op; | UINT op; |
| UINT32 madr; | UINT32 madr; |
| BYTE cl; | REG8 cl; |
| GET_PCBYTE(op) | GET_PCBYTE(op) |
| if (op >= 0xc0) { | if (op >= 0xc0) { |
| Line 2284 I286FN _shift_ea16_cl(void) { // D3: s | Line 2368 I286FN _shift_ea16_cl(void) { // D3: s |
| UINT16 *out; | UINT16 *out; |
| UINT op; | UINT op; |
| UINT32 madr; | UINT32 madr; |
| BYTE cl; | REG8 cl; |
| GET_PCBYTE(op) | GET_PCBYTE(op) |
| if (op >= 0xc0) { | if (op >= 0xc0) { |
| Line 2390 I286FN _in_al_data8(void) { // E4: i | Line 2474 I286FN _in_al_data8(void) { // E4: i |
| I286_WORKCLOCK(5); | I286_WORKCLOCK(5); |
| GET_PCBYTE(port) | GET_PCBYTE(port) |
| i286reg.inport = CS_BASE + I286_IP; | I286_INPADRS = CS_BASE + I286_IP; |
| I286_AL = iocore_inp8(port); | I286_AL = iocore_inp8(port); |
| i286reg.inport = 0; | I286_INPADRS = 0; |
| } | } |
| I286FN _in_ax_data8(void) { // E5: in ax, DATA8 | I286FN _in_ax_data8(void) { // E5: in ax, DATA8 |
| Line 2492 I286FN _lock(void) { // F0: lock | Line 2576 I286FN _lock(void) { // F0: lock |
| I286FN _repne(void) { // F2: repne | I286FN _repne(void) { // F2: repne |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repne[op](); | i286op_repne[op](); |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 2506 I286FN _repne(void) { // F2: repne | Line 2590 I286FN _repne(void) { // F2: repne |
| I286FN _repe(void) { // F3: repe | I286FN _repe(void) { // F3: repe |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repe[op](); | i286op_repe[op](); |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 2568 I286FN _cli(void) { // FA: cli | Line 2652 I286FN _cli(void) { // FA: cli |
| I286FN _sti(void) { // FB: sti | I286FN _sti(void) { // FB: sti |
| I286_WORKCLOCK(2); | I286_WORKCLOCK(2); |
| #if defined(INTR_FAST) | |
| if (I286_FLAG & I_FLAG) { | |
| NEXT_OPCODE; | |
| return; // 更新の意味なし | |
| } | |
| #endif | |
| I286_FLAG |= I_FLAG; | I286_FLAG |= I_FLAG; |
| I286_TRAP = (I286_FLAG & T_FLAG) >> 8; // ToDo | I286_TRAP = (I286_FLAG & T_FLAG) >> 8; |
| #if defined(INTR_FAST) | |
| if ((I286_TRAP) || (PICEXISTINTR)) { | |
| REMAIN_ADJUST(1) | |
| } | |
| else { | |
| NEXT_OPCODE; | |
| } | |
| #else | |
| REMAIN_ADJUST(1) | REMAIN_ADJUST(1) |
| #endif | |
| } | } |
| I286FN _cld(void) { // FC: cld | I286FN _cld(void) { // FC: cld |
| Line 2886 I286FN _repe_segprefix_es(void) { | Line 2984 I286FN _repe_segprefix_es(void) { |
| DS_FIX = ES_BASE; | DS_FIX = ES_BASE; |
| SS_FIX = ES_BASE; | SS_FIX = ES_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repe[op](); | i286op_repe[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 2903 I286FN _repe_segprefix_cs(void) { | Line 3001 I286FN _repe_segprefix_cs(void) { |
| DS_FIX = CS_BASE; | DS_FIX = CS_BASE; |
| SS_FIX = CS_BASE; | SS_FIX = CS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repe[op](); | i286op_repe[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 2920 I286FN _repe_segprefix_ss(void) { | Line 3018 I286FN _repe_segprefix_ss(void) { |
| DS_FIX = SS_BASE; | DS_FIX = SS_BASE; |
| SS_FIX = SS_BASE; | SS_FIX = SS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repe[op](); | i286op_repe[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 2937 I286FN _repe_segprefix_ds(void) { | Line 3035 I286FN _repe_segprefix_ds(void) { |
| DS_FIX = DS_BASE; | DS_FIX = DS_BASE; |
| SS_FIX = DS_BASE; | SS_FIX = DS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repe[op](); | i286op_repe[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3231 I286FN _repne_segprefix_es(void) { | Line 3329 I286FN _repne_segprefix_es(void) { |
| DS_FIX = ES_BASE; | DS_FIX = ES_BASE; |
| SS_FIX = ES_BASE; | SS_FIX = ES_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repne[op](); | i286op_repne[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3248 I286FN _repne_segprefix_cs(void) { | Line 3346 I286FN _repne_segprefix_cs(void) { |
| DS_FIX = CS_BASE; | DS_FIX = CS_BASE; |
| SS_FIX = CS_BASE; | SS_FIX = CS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repne[op](); | i286op_repne[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3265 I286FN _repne_segprefix_ss(void) { | Line 3363 I286FN _repne_segprefix_ss(void) { |
| DS_FIX = SS_BASE; | DS_FIX = SS_BASE; |
| SS_FIX = SS_BASE; | SS_FIX = SS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repne[op](); | i286op_repne[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3282 I286FN _repne_segprefix_ds(void) { | Line 3380 I286FN _repne_segprefix_ds(void) { |
| DS_FIX = DS_BASE; | DS_FIX = DS_BASE; |
| SS_FIX = DS_BASE; | SS_FIX = DS_BASE; |
| i286reg.prefix++; | I286_PREFIX++; |
| if (i286reg.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repne[op](); | i286op_repne[op](); |
| REMOVE_PREFIX | REMOVE_PREFIX |
| i286reg.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |