|
|
| version 1.20, 2003/12/01 18:25:03 | version 1.28, 2004/01/22 01:10:04 |
|---|---|
| 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 28 | Line 27 |
| I286FN _reserved(void) { | I286FN _reserved(void) { |
| I286_WORKCLOCK(23); // ToDo | |
| INT_NUM(6, I286_IP - 1); | INT_NUM(6, I286_IP - 1); |
| } | } |
| Line 149 I286FN _push_es(void) { // 06: pus | Line 147 I286FN _push_es(void) { // 06: pus |
| I286FN _pop_es(void) { // 07: pop es | I286FN _pop_es(void) { // 07: pop es |
| REGPOP(I286_ES, 5) | UINT tmp; |
| ES_BASE = (UINT32)I286_ES << 4; | |
| REGPOP(tmp, 5) | |
| I286_ES = tmp; | |
| if (!(I286_MSW & MSW_PE)) { | |
| ES_BASE = tmp << 4; | |
| NEXT_OPCODE | |
| } | |
| else { | |
| ES_BASE = i286c_selector(tmp); | |
| } | |
| } | } |
| I286FN _or_ea_r8(void) { // 08: or EA, REG8 | I286FN _or_ea_r8(void) { // 08: or EA, REG8 |
| Line 383 I286FN _push_ss(void) { // 16: pus | Line 390 I286FN _push_ss(void) { // 16: pus |
| I286FN _pop_ss(void) { // 17: pop ss | I286FN _pop_ss(void) { // 17: pop ss |
| REGPOP(I286_SS, 5) | UINT tmp; |
| SS_BASE = I286_SS << 4; | UINT32 base; |
| SS_FIX = SS_BASE; | |
| NEXT_OPCODE | REGPOP(tmp, 5) |
| I286_SS = tmp; | |
| if (!(I286_MSW & MSW_PE)) { | |
| SS_BASE = tmp << 4; | |
| SS_FIX = tmp << 4; | |
| NEXT_OPCODE | |
| } | |
| else { | |
| base = i286c_selector(tmp); | |
| SS_BASE = base; | |
| SS_FIX = base; | |
| NEXT_OPCODE | |
| } | |
| } | } |
| I286FN _sbb_ea_r8(void) { // 18: sbb EA, REG8 | I286FN _sbb_ea_r8(void) { // 18: sbb EA, REG8 |
| Line 506 I286FN _push_ds(void) { // 1e: pus | Line 525 I286FN _push_ds(void) { // 1e: pus |
| I286FN _pop_ds(void) { // 1f: pop ds | I286FN _pop_ds(void) { // 1f: pop ds |
| REGPOP(I286_DS, 5) | UINT tmp; |
| DS_BASE = I286_DS << 4; | UINT32 base; |
| DS_FIX = DS_BASE; | |
| REGPOP(tmp, 5) | |
| I286_DS = tmp; | |
| if (!(I286_MSW & MSW_PE)) { | |
| DS_BASE = tmp << 4; | |
| DS_FIX = tmp << 4; | |
| NEXT_OPCODE | |
| } | |
| else { | |
| base = i286c_selector(tmp); | |
| DS_BASE = base; | |
| DS_FIX = base; | |
| NEXT_OPCODE | |
| } | |
| } | } |
| I286FN _and_ea_r8(void) { // 20: and EA, REG8 | I286FN _and_ea_r8(void) { // 20: and EA, REG8 |
| Line 623 I286FN _segprefix_es(void) { // 26: | Line 655 I286FN _segprefix_es(void) { // 26: |
| SS_FIX = ES_BASE; | SS_FIX = ES_BASE; |
| DS_FIX = ES_BASE; | DS_FIX = ES_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 769 I286FN _segprefix_cs(void) { // 2e: | Line 801 I286FN _segprefix_cs(void) { // 2e: |
| SS_FIX = CS_BASE; | SS_FIX = CS_BASE; |
| DS_FIX = CS_BASE; | DS_FIX = CS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 910 I286FN _segprefix_ss(void) { // 36: | Line 942 I286FN _segprefix_ss(void) { // 36: |
| SS_FIX = SS_BASE; | SS_FIX = SS_BASE; |
| DS_FIX = SS_BASE; | DS_FIX = SS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 934 I286FN _aaa(void) { // 37: aaa | Line 966 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 1026 I286FN _segprefix_ds(void) { // 3e: | Line 1059 I286FN _segprefix_ds(void) { // 3e: |
| SS_FIX = DS_BASE; | SS_FIX = DS_BASE; |
| DS_FIX = DS_BASE; | DS_FIX = DS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 1659 I286FN _mov_seg_ea(void) { // 8E: mo | Line 1692 I286FN _mov_seg_ea(void) { // 8E: mo |
| UINT op; | UINT op; |
| UINT tmp; | UINT tmp; |
| UINT32 base; | |
| UINT16 ipbak; | UINT16 ipbak; |
| ipbak = I286_IP; | ipbak = I286_IP; |
| Line 1671 I286FN _mov_seg_ea(void) { // 8E: mo | Line 1705 I286FN _mov_seg_ea(void) { // 8E: mo |
| I286_WORKCLOCK(5); | I286_WORKCLOCK(5); |
| tmp = i286_memoryread_w(CALC_EA(op)); | tmp = i286_memoryread_w(CALC_EA(op)); |
| } | } |
| if (!(I286_MSW & MSW_PE)) { | |
| base = tmp << 4; | |
| } | |
| else { | |
| base = i286c_selector(tmp); | |
| } | |
| switch(op & 0x18) { | switch(op & 0x18) { |
| case 0x00: // es | case 0x00: // es |
| I286_ES = (UINT16)tmp; | I286_ES = (UINT16)tmp; |
| ES_BASE = tmp << 4; | ES_BASE = base; |
| break; | break; |
| case 0x10: // ss | case 0x10: // ss |
| I286_SS = (UINT16)tmp; | I286_SS = (UINT16)tmp; |
| SS_BASE = tmp << 4; | SS_BASE = base; |
| SS_FIX = SS_BASE; | SS_FIX = base; |
| NEXT_OPCODE | NEXT_OPCODE |
| break; | break; |
| case 0x18: // ds | case 0x18: // ds |
| I286_DS = (UINT16)tmp; | I286_DS = (UINT16)tmp; |
| DS_BASE = tmp << 4; | DS_BASE = base; |
| DS_FIX = DS_BASE; | DS_FIX = base; |
| break; | break; |
| default: // cs | default: // cs |
| Line 1819 I286FN _popf(void) { // 9D: popf | Line 1860 I286FN _popf(void) { // 9D: popf |
| I286_TRAP = ((flag & 0x300) == 0x300); | I286_TRAP = ((flag & 0x300) == 0x300); |
| I286_WORKCLOCK(5); | I286_WORKCLOCK(5); |
| #if defined(INTR_FAST) | #if defined(INTR_FAST) |
| if ((flag & I_FLAG) && (PICEXISTINTR)) { | if ((I286_TRAP) || ((flag & I_FLAG) && (PICEXISTINTR))) { |
| I286IRQCHECKTERM | I286IRQCHECKTERM |
| } | } |
| #else | #else |
| Line 2245 I286FN _ret_far(void) { // CB: ret | Line 2286 I286FN _ret_far(void) { // CB: ret |
| I286FN _int_03(void) { // CC: int 3 | I286FN _int_03(void) { // CC: int 3 |
| I286_WORKCLOCK(23); | I286_WORKCLOCK(3); |
| INT_NUM(3, I286_IP); | INT_NUM(3, I286_IP); |
| } | } |
| extern int tr; | |
| I286FN _int_data8(void) { // CD: int DATA8 | I286FN _int_data8(void) { // CD: int DATA8 |
| UINT vect; | UINT vect; |
| I286_WORKCLOCK(23); | I286_WORKCLOCK(3); |
| GET_PCBYTE(vect) | GET_PCBYTE(vect) |
| if ((vect == 0x21) && (CPU_AX == 0x5f02)) { | |
| tr = 1; | |
| } | |
| INT_NUM(vect, I286_IP); | INT_NUM(vect, I286_IP); |
| } | } |
| Line 2262 I286FN _into(void) { // CE: into | Line 2307 I286FN _into(void) { // CE: into |
| I286_WORKCLOCK(4); | I286_WORKCLOCK(4); |
| if (I286_OV) { | if (I286_OV) { |
| I286_WORKCLOCK(24 - 4); | |
| INT_NUM(4, I286_IP); | INT_NUM(4, I286_IP); |
| } | } |
| } | } |
| Line 2281 I286FN _iret(void) { // CF: iret | Line 2325 I286FN _iret(void) { // CF: iret |
| CS_BASE = I286_CS << 4; | CS_BASE = I286_CS << 4; |
| I286_WORKCLOCK(31); | I286_WORKCLOCK(31); |
| #if defined(INTR_FAST) | #if defined(INTR_FAST) |
| if ((flag & I_FLAG) && (PICEXISTINTR)) { | if ((I286_TRAP) || ((flag & I_FLAG) && (PICEXISTINTR))) { |
| I286IRQCHECKTERM | I286IRQCHECKTERM |
| } | } |
| #else | #else |
| Line 2340 I286FN _shift_ea8_cl(void) { // D2: sh | Line 2384 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 2368 I286FN _shift_ea16_cl(void) { // D3: s | Line 2412 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 2474 I286FN _in_al_data8(void) { // E4: i | Line 2518 I286FN _in_al_data8(void) { // E4: i |
| I286_WORKCLOCK(5); | I286_WORKCLOCK(5); |
| GET_PCBYTE(port) | GET_PCBYTE(port) |
| i286core.s.inport = CS_BASE + I286_IP; | I286_INPADRS = CS_BASE + I286_IP; |
| I286_AL = iocore_inp8(port); | I286_AL = iocore_inp8(port); |
| i286core.s.inport = 0; | I286_INPADRS = 0; |
| } | } |
| I286FN _in_ax_data8(void) { // E5: in ax, DATA8 | I286FN _in_ax_data8(void) { // E5: in ax, DATA8 |
| Line 2576 I286FN _lock(void) { // F0: lock | Line 2620 I286FN _lock(void) { // F0: lock |
| I286FN _repne(void) { // F2: repne | I286FN _repne(void) { // F2: repne |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repne[op](); | i286op_repne[op](); |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 2590 I286FN _repne(void) { // F2: repne | Line 2634 I286FN _repne(void) { // F2: repne |
| I286FN _repe(void) { // F3: repe | I286FN _repe(void) { // F3: repe |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.prefix < MAX_PREFIX) { | if (I286_PREFIX < MAX_PREFIX) { |
| UINT op; | UINT op; |
| GET_PCBYTE(op); | GET_PCBYTE(op); |
| i286op_repe[op](); | i286op_repe[op](); |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 2661 I286FN _sti(void) { // FB: sti | Line 2705 I286FN _sti(void) { // FB: sti |
| I286_FLAG |= I_FLAG; | I286_FLAG |= I_FLAG; |
| I286_TRAP = (I286_FLAG & T_FLAG) >> 8; | I286_TRAP = (I286_FLAG & T_FLAG) >> 8; |
| #if defined(INTR_FAST) | #if defined(INTR_FAST) |
| if (!PICEXISTINTR) { | if ((I286_TRAP) || (PICEXISTINTR)) { |
| NEXT_OPCODE; | REMAIN_ADJUST(1) |
| } | } |
| else { | else { |
| REMAIN_ADJUST(1) | NEXT_OPCODE; |
| } | } |
| #else | #else |
| REMAIN_ADJUST(1) | REMAIN_ADJUST(1) |
| Line 2984 I286FN _repe_segprefix_es(void) { | Line 3028 I286FN _repe_segprefix_es(void) { |
| DS_FIX = ES_BASE; | DS_FIX = ES_BASE; |
| SS_FIX = ES_BASE; | SS_FIX = ES_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3001 I286FN _repe_segprefix_cs(void) { | Line 3045 I286FN _repe_segprefix_cs(void) { |
| DS_FIX = CS_BASE; | DS_FIX = CS_BASE; |
| SS_FIX = CS_BASE; | SS_FIX = CS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3018 I286FN _repe_segprefix_ss(void) { | Line 3062 I286FN _repe_segprefix_ss(void) { |
| DS_FIX = SS_BASE; | DS_FIX = SS_BASE; |
| SS_FIX = SS_BASE; | SS_FIX = SS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3035 I286FN _repe_segprefix_ds(void) { | Line 3079 I286FN _repe_segprefix_ds(void) { |
| DS_FIX = DS_BASE; | DS_FIX = DS_BASE; |
| SS_FIX = DS_BASE; | SS_FIX = DS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3329 I286FN _repne_segprefix_es(void) { | Line 3373 I286FN _repne_segprefix_es(void) { |
| DS_FIX = ES_BASE; | DS_FIX = ES_BASE; |
| SS_FIX = ES_BASE; | SS_FIX = ES_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3346 I286FN _repne_segprefix_cs(void) { | Line 3390 I286FN _repne_segprefix_cs(void) { |
| DS_FIX = CS_BASE; | DS_FIX = CS_BASE; |
| SS_FIX = CS_BASE; | SS_FIX = CS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3363 I286FN _repne_segprefix_ss(void) { | Line 3407 I286FN _repne_segprefix_ss(void) { |
| DS_FIX = SS_BASE; | DS_FIX = SS_BASE; |
| SS_FIX = SS_BASE; | SS_FIX = SS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |
| Line 3380 I286FN _repne_segprefix_ds(void) { | Line 3424 I286FN _repne_segprefix_ds(void) { |
| DS_FIX = DS_BASE; | DS_FIX = DS_BASE; |
| SS_FIX = DS_BASE; | SS_FIX = DS_BASE; |
| i286core.s.prefix++; | I286_PREFIX++; |
| if (i286core.s.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 |
| i286core.s.prefix = 0; | I286_PREFIX = 0; |
| } | } |
| else { | else { |
| INT_NUM(6, I286_IP); | INT_NUM(6, I286_IP); |