--- np2/i286x/i286x.cpp 2003/12/08 00:55:31 1.7 +++ np2/i286x/i286x.cpp 2004/02/18 18:29:29 1.20 @@ -5,7 +5,6 @@ #include "i286xs.h" #include "i286xrep.h" #include "i286xcts.h" -#include "memory.h" #include "pccore.h" #include "iocore.h" #include "i286x.mcr" @@ -58,12 +57,72 @@ void i286x_initialize(void) { v30xinit(); } +void i286x_deinitialize(void) { + + if (CPU_EXTMEM) { + _MFREE(CPU_EXTMEM); + CPU_EXTMEM = NULL; + CPU_EXTMEMSIZE = 0; + } +} + +static void i286x_initreg(void) { + + I286_CS = 0xf000; + CS_BASE = 0xf0000; + I286_IP = 0xfff0; + i286core.s.adrsmask = 0xfffff; + i286x_resetprefetch(); +} + void i286x_reset(void) { ZeroMemory(&i286core.s, sizeof(i286core.s)); - I286_CS = 0x1fc0; - CS_BASE = 0x1fc00; - i286core.s.adrsmask = 0xfffff; + i286x_initreg(); +} + +void i286x_shut(void) { + + ZeroMemory(&i286core.s, offsetof(I286STAT, cpu_type)); + i286x_initreg(); +} + +void i286x_setextsize(UINT32 size) { + + if (CPU_EXTMEMSIZE != size) { + if (CPU_EXTMEM) { + _MFREE(CPU_EXTMEM); + CPU_EXTMEM = NULL; + } + if (size) { + CPU_EXTMEM = (BYTE *)_MALLOC(size + 16, "EXTMEM"); + if (CPU_EXTMEM == NULL) { + size = 0; + } + } + CPU_EXTMEMSIZE = size; + } + i286core.e.ems[0] = mem + 0xc0000; + i286core.e.ems[1] = mem + 0xc4000; + i286core.e.ems[2] = mem + 0xc8000; + i286core.e.ems[3] = mem + 0xcc000; +} + +void i286x_setemm(UINT frame, UINT32 addr) { + + BYTE *ptr; + + frame &= 3; + if (addr < USE_HIMEM) { + ptr = mem + addr; + } + else if ((addr - 0x100000 + 0x4000) <= CPU_EXTMEMSIZE) { + ptr = CPU_EXTMEM + (addr - 0x100000); + } + else { + ptr = mem + 0xc0000 + (frame << 14); + } + i286core.e.ems[frame] = ptr; } @@ -168,6 +227,30 @@ LABEL void __fastcall i286x_localint(voi } +// プロテクトモードのセレクタ(in ax / ret eax) +LABEL void __fastcall i286x_selector(void) { + + __asm { + mov ecx, dword ptr (I286_GDTR.base) + test eax, 4 + je short ixsl_1 + mov ecx, dword ptr (I286_LDTRC.base) +ixsl_1: and eax, not 7 + and ecx, 0ffffffh + lea ecx, [ecx + eax + 2] + call i286_memoryread_w + push eax + add ecx, 2 + call i286_memoryread + pop ecx + and eax, 0ffh + movzx ecx, cx + shl eax, 16 + add eax, ecx + ret + } +} + LABEL void i286x(void) { @@ -364,11 +447,16 @@ I286 pop_es(void) { // 07: pop es __asm { I286CLOCK(5) REGPOP(I286_ES) - and eax, 00ffffh + movzx eax, ax + test I286_MSW, MSW_PE + jne short pop_es_pe shl eax, 4 // make segreg - mov ES_BASE, eax +pop_es_base: mov ES_BASE, eax GET_NEXTPRE1 ret + +pop_es_pe: push offset pop_es_base + jmp i286x_selector } } @@ -572,9 +660,11 @@ I286 pop_ss(void) { // 17: pop ss __asm { I286CLOCK(5) REGPOP(I286_SS) - and eax, 00ffffh + movzx eax, ax + test I286_MSW, MSW_PE + jne short pop_ss_pe shl eax, 4 // make segreg - mov SS_BASE, eax +pop_ss_base: mov SS_BASE, eax mov SS_FIX, eax cmp i286core.s.prefix, 0 // 00/06/24 jne prefix_exist @@ -583,6 +673,9 @@ I286 pop_ss(void) { // 17: pop ss GET_NEXTPRE1 jmp i286op[ebp*4] +pop_ss_pe: push offset pop_ss_base + jmp i286x_selector + prefix_exist: pop eax // eax<-offset removeprefix call eax jmp noprefix @@ -696,12 +789,17 @@ I286 pop_ds(void) { // 1F: pop ds __asm { I286CLOCK(5) REGPOP(I286_DS) - and eax, 00ffffh + movzx eax, ax + test I286_MSW, MSW_PE + jne short pop_ds_pe shl eax, 4 // make segreg - mov DS_BASE, eax +pop_ds_base: mov DS_BASE, eax mov DS_FIX, eax GET_NEXTPRE1 ret + +pop_ds_pe: push offset pop_ds_base + jmp i286x_selector } } @@ -1678,13 +1776,8 @@ I286 _insb(void) { // 6C: insb __asm { GET_NEXTPRE1 I286CLOCK(5) -#if 1 movzx ecx, I286_DX call iocore_inp8 -#else - mov cx, I286_DX - call i286_in -#endif mov dl, al movzx ecx, I286_ES shl ecx, 4 @@ -1725,13 +1818,8 @@ I286 _outsb(void) { // 6E: outsb mov dl, al STRING_DIR add I286_SI, ax -#if 1 movzx ecx, I286_DX jmp iocore_out8 -#else - mov cx, I286_DX - jmp i286_out -#endif } } @@ -2402,23 +2490,24 @@ I286 mov_seg_ea(void) { // 8E: mov GET_NEXTPRE2 mov ax, word ptr I286_REG[edi*2] jmp segset - align 16 + align 4 src_memory: I286CLOCK(5) call p_ea_dst[eax*4] call i286_memoryread_w segset: mov word ptr I286_SEGREG[ebp], ax - and eax, 0000ffffh + movzx eax, ax + test I286_MSW, MSW_PE + jne short mov_seg_pe shl eax, 4 // make segreg - mov SEG_BASE[ebp*2], eax +mov_seg_base: mov SEG_BASE[ebp*2], eax sub ebp, 2*2 - jc segsetr + jc short segsetr mov SS_FIX[ebp*2], eax - je setss + je short setss segsetr:ret - align 16 setss: cmp i286core.s.prefix, 0 // 00/05/13 je noprefix pop eax @@ -2427,9 +2516,10 @@ I286 mov_seg_ea(void) { // 8E: mov movzx eax, bl jmp i286op[eax*4] - align 16 - fixcs: - INT_NUM(6) +mov_seg_pe: push offset mov_seg_base + jmp i286x_selector + + fixcs: INT_NUM(6) } } @@ -2624,10 +2714,17 @@ I286 call_far(void) { // 9A: call mov si, bx shr ebx, 16 mov I286_CS, bx + test I286_MSW, MSW_PE + jne short call_far_pe shl ebx, 4 mov CS_BASE, ebx - RESET_XPREFETCH +call_far_base: RESET_XPREFETCH ret + +call_far_pe: mov eax, ebx + call i286x_selector + mov CS_BASE, eax + jmp short call_far_base } } @@ -2668,16 +2765,15 @@ I286 _popf(void) { // 9D: popf cmp ah, 3 sete I286_TRAP - test ah, 2 // fast_intr + je irqcheck // fast_intr + test ah, 2 je nextop - cmp pic.ext_irq, 0 - jne nextop - mov al, pic.pi[0].imr - mov ah, pic.pi[1].imr + mov al, pic.pi[0 * (type _PICITEM)].imr + mov ah, pic.pi[1 * (type _PICITEM)].imr not ax - test al, pic.pi[0].irr + test al, pic.pi[0 * (type _PICITEM)].irr jne irqcheck - test al, pic.pi[1].irr + test ah, pic.pi[1 * (type _PICITEM)].irr jne irqcheck nextop: ret @@ -2778,10 +2874,8 @@ I286 _movsb(void) { // A4: movsb add ecx, DS_FIX call i286_memoryread mov dl, al - movzx ecx, I286_ES - shl ecx, 4 - movzx eax, I286_DI - add ecx, eax + movzx ecx, I286_DI + add ecx, ES_BASE STRING_DIR add I286_SI, ax add I286_DI, ax @@ -2798,10 +2892,8 @@ I286 _movsw(void) { // A5: movsw add ecx, DS_FIX call i286_memoryread_w mov dx, ax - movzx ecx, I286_ES - shl ecx, 4 - movzx eax, I286_DI - add ecx, eax + movzx ecx, I286_DI + add ecx, ES_BASE STRING_DIRx2 add I286_SI, ax add I286_DI, ax @@ -2818,10 +2910,8 @@ I286 _cmpsb(void) { // A6: cmpsb add ecx, DS_FIX call i286_memoryread mov dl, al - movzx ecx, I286_ES - shl ecx, 4 - movzx eax, I286_DI - add ecx, eax + movzx ecx, I286_DI + add ecx, ES_BASE call i286_memoryread cmp dl, al FLAG_STORE_OF @@ -2841,10 +2931,8 @@ I286 _cmpsw(void) { // A7: cmpsw add ecx, DS_FIX call i286_memoryread_w mov edx, eax - movzx ecx, I286_ES - shl ecx, 4 - movzx eax, I286_DI - add ecx, eax + movzx ecx, I286_DI + add ecx, ES_BASE call i286_memoryread_w cmp dx, ax FLAG_STORE_OF @@ -2883,10 +2971,8 @@ I286 _stosb(void) { // AA: stosb __asm { GET_NEXTPRE1 I286CLOCK(3) - movzx ecx, I286_ES - shl ecx, 4 - movzx eax, I286_DI - add ecx, eax + movzx ecx, I286_DI + add ecx, ES_BASE STRING_DIR add I286_DI, ax mov dl, I286_AL @@ -2899,10 +2985,8 @@ I286 _stosw(void) { // AB: stosw __asm { GET_NEXTPRE1 I286CLOCK(3) - movzx ecx, I286_ES - shl ecx, 4 - movzx eax, I286_DI - add ecx, eax + movzx ecx, I286_DI + add ecx, ES_BASE STRING_DIRx2 add I286_DI, ax mov dx, I286_AX @@ -2945,10 +3029,8 @@ I286 _scasb(void) { // AE: scasb __asm { GET_NEXTPRE1 I286CLOCK(7) - movzx ecx, I286_ES - shl ecx, 4 - movzx eax, I286_DI - add ecx, eax + movzx ecx, I286_DI + add ecx, ES_BASE call i286_memoryread cmp I286_AL, al FLAG_STORE_OF @@ -2963,10 +3045,8 @@ I286 _scasw(void) { // AF: scasw __asm { GET_NEXTPRE1 I286CLOCK(7) - movzx ecx, I286_ES - shl ecx, 4 - movzx eax, I286_DI - add ecx, eax + movzx ecx, I286_DI + add ecx, ES_BASE call i286_memoryread_w cmp I286_AX, ax FLAG_STORE_OF @@ -3294,7 +3374,7 @@ I286 les_r16_ea(void) { // C4: les shl eax, 4 // make segreg mov ES_BASE, eax ret - align 16 + align 4 src_register: INT_NUM(6) } @@ -3478,12 +3558,17 @@ I286 ret_far_data16(void) { // CA: lea ecx, [edi + ebp] call i286_memoryread_w mov I286_CS, ax - and eax, 0000ffffh + movzx eax, ax + test I286_MSW, MSW_PE + jne short ret_far16_pe shl eax, 4 // make segreg - mov CS_BASE, eax +ret_far16_base: mov CS_BASE, eax add I286_SP, 4 RESET_XPREFETCH ret + +ret_far16_pe: push offset ret_far16_base + jmp i286x_selector } } @@ -3501,13 +3586,18 @@ I286 ret_far(void) { // CB: ret fa add bx, 2 call i286_memoryread_w mov I286_CS, ax - and eax, 0000ffffh + movzx eax, ax + test I286_MSW, MSW_PE + jne short ret_far_pe shl eax, 4 // make segreg - mov CS_BASE, eax +ret_far_base: mov CS_BASE, eax mov ebp, eax mov I286_SP, bx RESET_XPREFETCH ret + +ret_far_pe: push offset ret_far_base + jmp i286x_selector } } @@ -3555,22 +3645,19 @@ I286 int_data8(void) { // CD: int I286 _into(void) { // CE: into __asm { + I286CLOCK(4) test I286_FLAG, O_FLAG jne intovf - I286CLOCK(4) GET_NEXTPRE1 ret - align 16 - intovf: - I286CLOCK(24) - INT_NUM(4) + + intovf: INT_NUM(4) } } I286 _iret(void) { // CF: iret __asm { - call extirq_pop I286CLOCK(31) mov edi, SS_BASE movzx ebx, I286_SP @@ -3596,16 +3683,16 @@ I286 _iret(void) { // CF: iret sete I286_TRAP RESET_XPREFETCH - test I286_FLAG, I_FLAG // fast_intr + cmp I286_TRAP, 0 // fast_intr + jne irqcheck + test I286_FLAG, I_FLAG je nextop - cmp pic.ext_irq, 0 - jne nextop - mov al, pic.pi[0].imr - mov ah, pic.pi[1].imr + mov al, pic.pi[0 * (type _PICITEM)].imr + mov ah, pic.pi[1 * (type _PICITEM)].imr not ax - test al, pic.pi[0].irr + test al, pic.pi[0 * (type _PICITEM)].irr jne irqcheck - test al, pic.pi[1].irr + test ah, pic.pi[1 * (type _PICITEM)].irr jne irqcheck nextop: ret @@ -3778,9 +3865,8 @@ nzflagsed: xor al, ah or I286_FLAGL, al GET_NEXTPRE2 ret - align 16 - div0: - INT_NUM(0) + + div0: INT_NUM(0) } } @@ -3924,15 +4010,11 @@ I286 in_al_data8(void) { // E4: in I286CLOCK(5) lea eax, [esi + 2] add eax, CS_BASE - mov i286core.s.inport, eax + mov I286_INPADRS, eax movzx ecx, bh -#if 1 call iocore_inp8 -#else - call i286_in -#endif mov I286_AL, al - mov i286core.s.inport, 0 + mov I286_INPADRS, 0 GET_NEXTPRE2 ret } @@ -3961,12 +4043,8 @@ I286 out_data8_al(void) { // E6: ou GET_NEXTPRE2 pop ecx mov dl, I286_AL -#if 1 jmp iocore_out8 -#else - jmp i286_out -#endif - } + } } I286 out_data8_ax(void) { // E7: out DATA8, ax @@ -4018,10 +4096,17 @@ I286 jmp_far(void) { // EA: jmp fa mov si, bx shr ebx, 16 mov I286_CS, bx + test I286_MSW, MSW_PE + jne short jmp_far_pe shl ebx, 4 // make segreg mov CS_BASE, ebx - RESET_XPREFETCH +jmp_far_base: RESET_XPREFETCH ret + +jmp_far_pe: mov eax, ebx + call i286x_selector + mov CS_BASE, eax + jmp short jmp_far_base } } @@ -4041,13 +4126,8 @@ I286 in_al_dx(void) { // EC: in al __asm { I286CLOCK(5) -#if 1 movzx ecx, I286_DX call iocore_inp8 -#else - mov cx, I286_DX - call i286_in -#endif mov I286_AL, al GET_NEXTPRE1 ret @@ -4071,15 +4151,9 @@ I286 out_dx_al(void) { // EE: out __asm { GET_NEXTPRE1 I286CLOCK(3) -#if 1 movzx ecx, I286_DX mov dl, I286_AL jmp iocore_out8 -#else - mov cx, I286_DX - mov dl, I286_AL - jmp i286_out -#endif } } @@ -4201,14 +4275,13 @@ I286 _sti(void) { // FB: sti test I286_FLAG, T_FLAG setne I286_TRAP - cmp pic.ext_irq, 0 // fast_intr - jne jmp_nextop - mov al, pic.pi[0].imr - mov ah, pic.pi[1].imr + jne nextopandexit // fast_intr + mov al, pic.pi[0 * (type _PICITEM)].imr + mov ah, pic.pi[1 * (type _PICITEM)].imr not ax - test al, pic.pi[0].irr + test al, pic.pi[0 * (type _PICITEM)].irr jne nextopandexit - test al, pic.pi[1].irr + test ah, pic.pi[1 * (type _PICITEM)].irr jne nextopandexit jmp_nextop: jmp i286op[ebp*4]