--- np2/i386c/ia32/ia32.mcr 2004/02/04 13:24:35 1.7 +++ np2/i386c/ia32/ia32.mcr 2008/03/22 04:03:07 1.25 @@ -1,4 +1,4 @@ -/* $Id: ia32.mcr,v 1.7 2004/02/04 13:24:35 monaka Exp $ */ +/* $Id: ia32.mcr,v 1.25 2008/03/22 04:03:07 monaka Exp $ */ /* * Copyright (c) 2002-2003 NONAKA Kimihiro @@ -12,8 +12,6 @@ * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. - * 3. The name of the author may not be used to endorse or promote products - * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES @@ -33,27 +31,34 @@ /* * misc */ -#define __CBW(src) ((WORD)((SBYTE)(src))) -#define __CBD(src) ((DWORD)((SBYTE)(src))) -#define __CWDE(src) ((SWORD)(src)) +#define __CBW(src) ((UINT16)((SINT8)(src))) +#define __CBD(src) ((UINT32)((SINT8)(src))) +#define __CWDE(src) ((SINT16)(src)) + +#ifndef PTR_TO_UINT32 +#define PTR_TO_UINT32(p) ((UINT32)((unsigned long)(p))) +#endif +#ifndef UINT32_TO_PTR +#define UINT32_TO_PTR(v) ((void *)((unsigned long)(UINT32)(v))) +#endif -#define SWAPBYTE(p, q) \ +#define SWAP_BYTE(p, q) \ do { \ - BYTE __tmp = (p); \ + UINT8 __tmp = (p); \ (p) = (q); \ (q) = __tmp; \ } while (/*CONSTCOND*/ 0) -#define SWAPWORD(p, q) \ +#define SWAP_WORD(p, q) \ do { \ - WORD __tmp = (p); \ + UINT16 __tmp = (p); \ (p) = (q); \ (q) = __tmp; \ } while (/*CONSTCOND*/ 0) -#define SWAPDWORD(p, q) \ +#define SWAP_DWORD(p, q) \ do { \ - DWORD __tmp = (p); \ + UINT32 __tmp = (p); \ (p) = (q); \ (q) = __tmp; \ } while (/*CONSTCOND*/ 0) @@ -84,63 +89,50 @@ do { \ /* * instruction pointer */ -#define SET_EIP(v) \ +/* コードフェッチに使用するので、OpSize の影響を受けてはいけない */ +#define _ADD_EIP(v) \ do { \ - DWORD __new_ip = (v); \ - if (!CPU_STATSAVE.cpu_inst_default.op_32) {\ - __new_ip &= 0x0000ffff; \ - } \ - if (__new_ip > CPU_STAT_CS_LIMIT) { \ - VERBOSE(("SET_EIP: new_ip = %08x, limit = %08x", __new_ip, CPU_STAT_CS_LIMIT)); \ - EXCEPTION(GP_EXCEPTION, 0); \ - } \ - CPU_EIP = __new_ip; \ -} while (/*CONSTCOND*/ 0) - -#define ADD_EIP(v) \ -do { \ - DWORD __tmp_ip = CPU_EIP + (v); \ - if (!CPU_STATSAVE.cpu_inst_default.op_32) {\ - __tmp_ip &= 0x0000ffff; \ + UINT32 __tmp_ip = CPU_EIP + (v); \ + if (!CPU_STATSAVE.cpu_inst_default.op_32) { \ + __tmp_ip &= 0xffff; \ } \ CPU_EIP = __tmp_ip; \ } while (/*CONSTCOND*/ 0) - #define GET_PCBYTE(v) \ do { \ (v) = cpu_codefetch(CPU_EIP); \ - ADD_EIP(1); \ + _ADD_EIP(1); \ } while (/*CONSTCOND*/ 0) #define GET_PCBYTES(v) \ do { \ (v) = __CBW(cpu_codefetch(CPU_EIP)); \ - ADD_EIP(1); \ + _ADD_EIP(1); \ } while (/*CONSTCOND*/ 0) #define GET_PCBYTESD(v) \ do { \ (v) = __CBD(cpu_codefetch(CPU_EIP)); \ - ADD_EIP(1); \ + _ADD_EIP(1); \ } while (/*CONSTCOND*/ 0) #define GET_PCWORD(v) \ do { \ (v) = cpu_codefetch_w(CPU_EIP); \ - ADD_EIP(2); \ + _ADD_EIP(2); \ } while (/*CONSTCOND*/ 0) #define GET_PCWORDS(v) \ do { \ (v) = __CWDE(cpu_codefetch_w(CPU_EIP)); \ - ADD_EIP(2); \ + _ADD_EIP(2); \ } while (/*CONSTCOND*/ 0) #define GET_PCDWORD(v) \ do { \ (v) = cpu_codefetch_d(CPU_EIP); \ - ADD_EIP(4); \ + _ADD_EIP(4); \ } while (/*CONSTCOND*/ 0) #define PREPART_EA_REG8(b, d_s) \ @@ -186,7 +178,7 @@ do { \ CPU_WORKCLOCK(regclk); \ (s) = *(reg8_b20[(b)]); \ } else { \ - DWORD __t; \ + UINT32 __t; \ CPU_WORKCLOCK(memclk); \ __t = calc_ea_dst((b)); \ (s) = cpu_vmemoryread(CPU_INST_SEGREG_INDEX, __t); \ @@ -201,7 +193,7 @@ do { \ CPU_WORKCLOCK(regclk); \ (s) = *(reg16_b20[(b)]); \ } else { \ - DWORD __t; \ + UINT32 __t; \ CPU_WORKCLOCK(memclk); \ __t = calc_ea_dst((b)); \ (s) = cpu_vmemoryread_w(CPU_INST_SEGREG_INDEX, __t); \ @@ -216,7 +208,7 @@ do { \ CPU_WORKCLOCK(regclk); \ (s) = *(reg8_b20[(b)]); \ } else { \ - DWORD __t; \ + UINT32 __t; \ CPU_WORKCLOCK(memclk); \ __t = calc_ea_dst((b)); \ (s) = cpu_vmemoryread(CPU_INST_SEGREG_INDEX, __t); \ @@ -231,7 +223,7 @@ do { \ CPU_WORKCLOCK(regclk); \ (s) = *(reg32_b20[(b)]); \ } else { \ - DWORD __t; \ + UINT32 __t; \ CPU_WORKCLOCK(memclk); \ __t = calc_ea_dst((b)); \ (s) = cpu_vmemoryread_d(CPU_INST_SEGREG_INDEX, __t); \ @@ -246,7 +238,7 @@ do { \ CPU_WORKCLOCK(regclk); \ (s) = *(reg8_b20[(b)]); \ } else { \ - DWORD __t; \ + UINT32 __t; \ CPU_WORKCLOCK(memclk); \ __t = calc_ea_dst((b)); \ (s) = cpu_vmemoryread(CPU_INST_SEGREG_INDEX, __t); \ @@ -261,7 +253,7 @@ do { \ CPU_WORKCLOCK(regclk); \ (s) = *(reg16_b20[(b)]); \ } else { \ - DWORD __t; \ + UINT32 __t; \ CPU_WORKCLOCK(memclk); \ __t = calc_ea_dst((b)); \ (s) = cpu_vmemoryread_w(CPU_INST_SEGREG_INDEX, __t); \ @@ -273,31 +265,31 @@ do { \ /* * arith */ -#define _ADDBYTE(r, d, s) \ +#define _ADD_BYTE(r, d, s) \ do { \ (r) = (s) + (d); \ CPU_OV = ((r) ^ (s)) & ((r) ^ (d)) & 0x80; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpcflag[(r) & 0x1ff]; \ } while (/*CONSTCOND*/ 0) -#define _ADDWORD(r, d, s) \ +#define _ADD_WORD(r, d, s) \ do { \ (r) = (s) + (d); \ CPU_OV = ((r) ^ (s)) & ((r) ^ (d)) & 0x8000; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ if ((r) & 0xffff0000) { \ (r) &= 0x0000ffff; \ CPU_FLAGL |= C_FLAG; \ } \ - CPU_FLAGL |= szpflag_w[(WORD)(r)]; \ + CPU_FLAGL |= szpflag_w[(UINT16)(r)]; \ } while (/*CONSTCOND*/ 0) -#define _ADDDWORD(r, d, s) \ +#define _ADD_DWORD(r, d, s) \ do { \ (r) = (s) + (d); \ CPU_OV = ((r) ^ (s)) & ((r) ^ (d)) & 0x80000000; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ if ((r) < (s)) { \ CPU_FLAGL |= C_FLAG; \ } \ @@ -307,28 +299,28 @@ do { \ if ((r) & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ - CPU_FLAGL |= szpcflag[(BYTE)(r)] & P_FLAG; \ + CPU_FLAGL |= szpcflag[(UINT8)(r)] & P_FLAG; \ } while (/*CONSTCOND*/ 0) -#define _ORBYTE(d, s) \ +#define _OR_BYTE(d, s) \ do { \ (d) |= (s); \ CPU_OV = 0; \ - CPU_FLAGL = szpcflag[(BYTE)(d)]; \ + CPU_FLAGL = szpcflag[(UINT8)(d)]; \ } while (/*CONSTCOND*/ 0) -#define _ORWORD(d, s) \ +#define _OR_WORD(d, s) \ do { \ (d) |= (s); \ CPU_OV = 0; \ - CPU_FLAGL = szpflag_w[(WORD)(d)]; \ + CPU_FLAGL = szpflag_w[(UINT16)(d)]; \ } while (/*CONSTCOND*/ 0) -#define _ORDWORD(d, s) \ +#define _OR_DWORD(d, s) \ do { \ (d) |= (s); \ CPU_OV = 0; \ - CPU_FLAGL = szpcflag[(BYTE)(d)] & P_FLAG; \ + CPU_FLAGL = (UINT8)(szpcflag[(UINT8)(d)] & P_FLAG); \ if ((d) == 0) { \ CPU_FLAGL |= Z_FLAG; \ } \ @@ -338,32 +330,32 @@ do { \ } while (/*CONSTCOND*/ 0) /* flag no check */ -#define _ADCBYTE(r, d, s) \ +#define _ADC_BYTE(r, d, s) \ do { \ (r) = (CPU_FLAGL & C_FLAG) + (s) + (d); \ CPU_OV = ((r) ^ (s)) & ((r) ^ (d)) & 0x80; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpcflag[(r) & 0x1ff]; \ } while (/*CONSTCOND*/ 0) -#define _ADCWORD(r, d, s) \ +#define _ADC_WORD(r, d, s) \ do { \ (r) = (CPU_FLAGL & C_FLAG) + (s) + (d); \ CPU_OV = ((r) ^ (s)) & ((r) ^ (d)) & 0x8000; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ if ((r) & 0xffff0000) { \ (r) &= 0x0000ffff; \ CPU_FLAGL |= C_FLAG; \ } \ - CPU_FLAGL |= szpflag_w[(WORD)(r)]; \ + CPU_FLAGL |= szpflag_w[(UINT16)(r)]; \ } while (/*CONSTCOND*/ 0) -#define _ADCDWORD(r, d, s) \ +#define _ADC_DWORD(r, d, s) \ do { \ - DWORD __c = (CPU_FLAGL & C_FLAG); \ + UINT32 __c = (CPU_FLAGL & C_FLAG); \ (r) = (s) + (d) + __c; \ CPU_OV = ((r) ^ (s)) & ((r) ^ (d)) & 0x80000000; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ if ((!__c && (r) < (s)) || (__c && (r) <= (s))) { \ CPU_FLAGL |= C_FLAG; \ } \ @@ -373,7 +365,7 @@ do { \ if ((r) & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ - CPU_FLAGL |= szpcflag[(BYTE)(r)] & P_FLAG; \ + CPU_FLAGL |= szpcflag[(UINT8)(r)] & P_FLAG; \ } while (/*CONSTCOND*/ 0) /* flag no check */ @@ -381,7 +373,7 @@ do { \ do { \ (r) = (d) - (s) - (CPU_FLAGL & C_FLAG); \ CPU_OV = ((d) ^ (r)) & ((d) ^ (s)) & 0x80; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpcflag[(r) & 0x1ff]; \ } while (/*CONSTCOND*/ 0) @@ -389,20 +381,20 @@ do { \ do { \ (r) = (d) - (s) - (CPU_FLAGL & C_FLAG); \ CPU_OV = ((d) ^ (r)) & ((d) ^ (s)) & 0x8000; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ if ((r) & 0xffff0000) { \ (r) &= 0x0000ffff; \ CPU_FLAGL |= C_FLAG; \ } \ - CPU_FLAGL |= szpflag_w[(WORD)(r)]; \ + CPU_FLAGL |= szpflag_w[(UINT16)(r)]; \ } while (/*CONSTCOND*/ 0) #define _DWORD_SBB(r, d, s) \ do { \ - DWORD __c = (CPU_FLAGL & C_FLAG); \ + UINT32 __c = (CPU_FLAGL & C_FLAG); \ (r) = (d) - (s) - __c; \ CPU_OV = ((d) ^ (r)) & ((d) ^ (s)) & 0x80000000; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ if ((!__c && (d) < (s)) || (__c && (d) <= (s))) { \ CPU_FLAGL |= C_FLAG; \ } \ @@ -412,28 +404,28 @@ do { \ if ((r) & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ - CPU_FLAGL |= szpcflag[(BYTE)(r)] & P_FLAG; \ + CPU_FLAGL |= szpcflag[(UINT8)(r)] & P_FLAG; \ } while (/*CONSTCOND*/ 0) -#define _ANDBYTE(d, s) \ +#define _AND_BYTE(d, s) \ do { \ (d) &= (s); \ CPU_OV = 0; \ - CPU_FLAGL = szpcflag[(BYTE)(d)]; \ + CPU_FLAGL = szpcflag[(UINT8)(d)]; \ } while (/*CONSTCOND*/ 0) -#define _ANDWORD(d, s) \ +#define _AND_WORD(d, s) \ do { \ (d) &= (s); \ CPU_OV = 0; \ - CPU_FLAGL = szpflag_w[(WORD)(d)]; \ + CPU_FLAGL = szpflag_w[(UINT16)(d)]; \ } while (/*CONSTCOND*/ 0) -#define _ANDDWORD(d, s) \ +#define _AND_DWORD(d, s) \ do { \ (d) &= (s); \ CPU_OV = 0; \ - CPU_FLAGL = szpcflag[(BYTE)(d)] & P_FLAG; \ + CPU_FLAGL = (UINT8)(szpcflag[(UINT8)(d)] & P_FLAG); \ if ((d) == 0) { \ CPU_FLAGL |= Z_FLAG; \ } \ @@ -446,7 +438,7 @@ do { \ do { \ (r) = (d) - (s); \ CPU_OV = ((d) ^ (r)) & ((d) ^ (s)) & 0x80; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpcflag[(r) & 0x1ff]; \ } while (/*CONSTCOND*/ 0) @@ -454,19 +446,19 @@ do { \ do { \ (r) = (d) - (s); \ CPU_OV = ((d) ^ (r)) & ((d) ^ (s)) & 0x8000; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ if ((r) & 0xffff0000) { \ (r) &= 0x0000ffff; \ CPU_FLAGL |= C_FLAG; \ } \ - CPU_FLAGL |= szpflag_w[(WORD)(r)]; \ + CPU_FLAGL |= szpflag_w[(UINT16)(r)]; \ } while (/*CONSTCOND*/ 0) #define _DWORD_SUB(r, d, s) \ do { \ (r) = (d) - (s); \ CPU_OV = ((d) ^ (r)) & ((d) ^ (s)) & 0x80000000; \ - CPU_FLAGL = (BYTE)(((r) ^ (d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((r) ^ (d) ^ (s)) & A_FLAG); \ if ((d) < (s)) { \ CPU_FLAGL |= C_FLAG; \ } \ @@ -476,28 +468,28 @@ do { \ if ((r) & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ - CPU_FLAGL |= szpcflag[(BYTE)(r)] & P_FLAG; \ + CPU_FLAGL |= szpcflag[(UINT8)(r)] & P_FLAG; \ } while (/*CONSTCOND*/ 0) #define _BYTE_XOR(d, s) \ do { \ (d) ^= s; \ CPU_OV = 0; \ - CPU_FLAGL = szpcflag[(BYTE)(d)]; \ + CPU_FLAGL = szpcflag[(UINT8)(d)]; \ } while (/*CONSTCOND*/ 0) #define _WORD_XOR(d, s) \ do { \ (d) ^= (s); \ CPU_OV = 0; \ - CPU_FLAGL = szpflag_w[(WORD)(d)]; \ + CPU_FLAGL = szpflag_w[(UINT16)(d)]; \ } while (/*CONSTCOND*/ 0) #define _DWORD_XOR(d, s) \ do { \ (d) ^= (s); \ CPU_OV = 0; \ - CPU_FLAGL = szpcflag[(BYTE)(d)] & P_FLAG; \ + CPU_FLAGL = (UINT8)(szpcflag[(UINT8)(d)] & P_FLAG); \ if ((d) == 0) { \ CPU_FLAGL |= Z_FLAG; \ } \ @@ -510,7 +502,7 @@ do { \ do { \ (d) = 0 - (s); \ CPU_OV = ((d) & (s)) & 0x80; \ - CPU_FLAGL = (BYTE)(((d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((d) ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpcflag[(d) & 0x1ff]; \ } while (/*CONSTCOND*/ 0) @@ -518,19 +510,19 @@ do { \ do { \ (d) = 0 - (s); \ CPU_OV = ((d) & (s)) & 0x8000; \ - CPU_FLAGL = (BYTE)(((d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((d) ^ (s)) & A_FLAG); \ if ((d) & 0xffff0000) { \ (d) &= 0x0000ffff; \ CPU_FLAGL |= C_FLAG; \ } \ - CPU_FLAGL |= szpflag_w[(WORD)(d)]; \ + CPU_FLAGL |= szpflag_w[(UINT16)(d)]; \ } while (/*CONSTCOND*/ 0) #define _DWORD_NEG(d, s) \ do { \ (d) = 0 - (s); \ CPU_OV = ((d) & (s)) & 0x80000000; \ - CPU_FLAGL = (BYTE)(((d) ^ (s)) & A_FLAG); \ + CPU_FLAGL = (UINT8)(((d) ^ (s)) & A_FLAG); \ if ((d) == 0) { \ CPU_FLAGL |= Z_FLAG; \ } else { \ @@ -539,13 +531,13 @@ do { \ if ((d) & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ - CPU_FLAGL |= szpcflag[(BYTE)(d)] & P_FLAG; \ + CPU_FLAGL |= szpcflag[(UINT8)(d)] & P_FLAG; \ } while (/*CONSTCOND*/ 0) #define _BYTE_MUL(r, d, s) \ do { \ CPU_FLAGL &= (Z_FLAG | S_FLAG | A_FLAG | P_FLAG); \ - (r) = (BYTE)(d) * (BYTE)(s); \ + (r) = (UINT8)(d) * (UINT8)(s); \ CPU_OV = (r) >> 8; \ if (CPU_OV) { \ CPU_FLAGL |= C_FLAG; \ @@ -555,7 +547,7 @@ do { \ #define _WORD_MUL(r, d, s) \ do { \ CPU_FLAGL &= (Z_FLAG | S_FLAG | A_FLAG | P_FLAG); \ - (r) = (WORD)(d) * (WORD)(s); \ + (r) = (UINT16)(d) * (UINT16)(s); \ CPU_OV = (r) >> 16; \ if (CPU_OV) { \ CPU_FLAGL |= C_FLAG; \ @@ -564,11 +556,11 @@ do { \ #define _DWORD_MUL(r, d, s) \ do { \ - QWORD __v; \ + UINT64 __v; \ CPU_FLAGL &= (Z_FLAG | S_FLAG | A_FLAG | P_FLAG); \ - __v = (QWORD)(d) * (QWORD)(s); \ - (r) = (DWORD)__v; \ - CPU_OV = (DWORD)(__v >> 32); \ + __v = (UINT64)(d) * (UINT64)(s); \ + (r) = (UINT32)__v; \ + CPU_OV = (UINT32)(__v >> 32); \ if (CPU_OV) { \ CPU_FLAGL |= C_FLAG; \ } \ @@ -577,7 +569,7 @@ do { \ #define _BYTE_IMUL(r, d, s) \ do { \ CPU_FLAGL &= (Z_FLAG | S_FLAG | A_FLAG | P_FLAG); \ - (r) = (SBYTE)(d) * (SBYTE)(s); \ + (r) = (SINT8)(d) * (SINT8)(s); \ CPU_OV = ((r) + 0x80) & 0xffffff00; \ if (CPU_OV) { \ CPU_FLAGL |= C_FLAG; \ @@ -587,10 +579,7 @@ do { \ #define _WORD_IMUL(r, d, s) \ do { \ CPU_FLAGL &= (Z_FLAG | S_FLAG | A_FLAG | P_FLAG); \ - (r) = (SWORD)(d) * (SWORD)(s); \ - /* -32768 < r < 32767 (CF = OV = 0) */ \ - /* 0xffff8000 < r < 0x00007fff (CF = OV = 0) */ \ - /* 0x00000000 < r + 0x8000 < 0x0000ffff (CF = OV = 0) */ \ + (r) = (SINT16)(d) * (SINT16)(s); \ CPU_OV = ((r) + 0x8000) & 0xffff0000; \ if (CPU_OV) { \ CPU_FLAGL |= C_FLAG; \ @@ -600,8 +589,8 @@ do { \ #define _DWORD_IMUL(r, d, s) \ do { \ CPU_FLAGL &= (Z_FLAG | S_FLAG | A_FLAG | P_FLAG); \ - (r) = (SQWORD)(d) * (SQWORD)(s); \ - CPU_OV = (DWORD)(((r) + 0x80000000ULL) >> 32); \ + (r) = (SINT64)(d) * (SINT64)(s); \ + CPU_OV = (UINT32)(((r) + QWORD_CONST(0x80000000)) >> 32); \ if (CPU_OV) { \ CPU_FLAGL |= C_FLAG; \ } \ @@ -610,125 +599,146 @@ do { \ /* flag no check */ #define _BYTE_INC(s) \ do { \ - BYTE __b = (s); \ + UINT8 __b = (s); \ __b++; \ CPU_OV = __b & (__b ^ (s)) & 0x80; \ CPU_FLAGL &= C_FLAG; \ - CPU_FLAGL |= (BYTE)((__b ^ (s)) & A_FLAG); \ + CPU_FLAGL |= (UINT8)((__b ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpcflag[__b]; \ (s) = __b; \ } while (/*CONSTCOND*/ 0) #define _WORD_INC(s) \ do { \ - WORD __b = (s); \ + UINT16 __b = (s); \ __b++; \ CPU_OV = __b & (__b ^ (s)) & 0x8000; \ CPU_FLAGL &= C_FLAG; \ - CPU_FLAGL |= (BYTE)((__b ^ (s)) & A_FLAG); \ + CPU_FLAGL |= (UINT8)((__b ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpflag_w[__b]; \ (s) = __b; \ } while (/*CONSTCOND*/ 0) #define _DWORD_INC(s) \ do { \ - DWORD __b = (s); \ + UINT32 __b = (s); \ __b++; \ CPU_OV = __b & (__b ^ (s)) & 0x80000000; \ CPU_FLAGL &= C_FLAG; \ - CPU_FLAGL |= (BYTE)((__b ^ (s)) & A_FLAG); \ + CPU_FLAGL |= (UINT8)((__b ^ (s)) & A_FLAG); \ if (__b == 0) { \ CPU_FLAGL |= Z_FLAG; \ } \ if (__b & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ - CPU_FLAGL |= szpcflag[(BYTE)(__b)] & P_FLAG; \ + CPU_FLAGL |= szpcflag[(UINT8)(__b)] & P_FLAG; \ (s) = __b; \ } while (/*CONSTCOND*/ 0) /* flag no check */ #define _BYTE_DEC(s) \ do { \ - BYTE __b = (s); \ + UINT8 __b = (s); \ __b--; \ CPU_OV = (s) & (__b ^ (s)) & 0x80; \ CPU_FLAGL &= C_FLAG; \ - CPU_FLAGL |= (BYTE)((__b ^ (s)) & A_FLAG); \ + CPU_FLAGL |= (UINT8)((__b ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpcflag[__b]; \ (s) = __b; \ } while (/*CONSTCOND*/ 0) #define _WORD_DEC(s) \ do { \ - WORD __b = (s); \ + UINT16 __b = (s); \ __b--; \ CPU_OV = (s) & (__b ^ (s)) & 0x8000; \ CPU_FLAGL &= C_FLAG; \ - CPU_FLAGL |= (BYTE)((__b ^ (s)) & A_FLAG); \ + CPU_FLAGL |= (UINT8)((__b ^ (s)) & A_FLAG); \ CPU_FLAGL |= szpflag_w[__b]; \ (s) = __b; \ } while (/*CONSTCOND*/ 0) #define _DWORD_DEC(s) \ do { \ - DWORD __b = (s); \ + UINT32 __b = (s); \ __b--; \ CPU_OV = (s) & (__b ^ (s)) & 0x80000000; \ CPU_FLAGL &= C_FLAG; \ - CPU_FLAGL |= (BYTE)((__b ^ (s)) & A_FLAG); \ + CPU_FLAGL |= (UINT8)((__b ^ (s)) & A_FLAG); \ if ((__b) == 0) { \ CPU_FLAGL |= Z_FLAG; \ } \ if ((__b) & 0x80000000) { \ CPU_FLAGL |= S_FLAG; \ } \ - CPU_FLAGL |= szpcflag[(BYTE)(__b)] & P_FLAG; \ + CPU_FLAGL |= szpcflag[(UINT8)(__b)] & P_FLAG; \ (s) = __b; \ } while (/*CONSTCOND*/ 0) +#define BYTE_NOT(s) \ +do { \ + (s) ^= 0xff; \ +} while (/*CONSTCOND*/ 0) + +#define WORD_NOT(s) \ +do { \ + (s) ^= 0xffff; \ +} while (/*CONSTCOND*/ 0) + +#define DWORD_NOT(s) \ +do { \ + (s) ^= 0xffffffff; \ +} while (/*CONSTCOND*/ 0) + /* * stack */ #define REGPUSH(reg, clock) \ do { \ - CPU_SP -= 2; \ - cpu_vmemorywrite_w(CPU_SS_INDEX, CPU_SP, reg); \ + UINT16 new_sp = CPU_SP - 2; \ CPU_WORKCLOCK(clock); \ + cpu_vmemorywrite_w(CPU_SS_INDEX, new_sp, reg); \ + CPU_SP = new_sp; \ } while (/*CONSTCOND*/ 0) #define REGPUSH_32(reg, clock) \ do { \ - CPU_ESP -= 4; \ - cpu_vmemorywrite_d(CPU_SS_INDEX, CPU_ESP, reg); \ + UINT32 new_esp = CPU_ESP - 4; \ CPU_WORKCLOCK(clock); \ + cpu_vmemorywrite_d(CPU_SS_INDEX, new_esp, reg); \ + CPU_ESP = new_esp; \ } while (/*CONSTCOND*/ 0) #define REGPUSH0(reg) \ do { \ - CPU_SP -= 2; \ - cpu_vmemorywrite_w(CPU_SS_INDEX, CPU_SP, reg); \ + UINT16 new_sp = CPU_SP - 2; \ + cpu_vmemorywrite_w(CPU_SS_INDEX, new_sp, (UINT16)reg); \ + CPU_SP = new_sp; \ } while (/*CONSTCOND*/ 0) /* Operand Size == 16 && Stack Size == 32 */ #define REGPUSH0_16_32(reg) \ do { \ - CPU_ESP -= 2; \ - cpu_vmemorywrite_w(CPU_SS_INDEX, CPU_ESP, reg); \ + UINT32 new_esp = CPU_ESP - 2; \ + cpu_vmemorywrite_w(CPU_SS_INDEX, new_esp, (UINT16)reg); \ + CPU_ESP = new_esp; \ } while (/*CONSTCOND*/ 0) /* Operand Size == 32 && Stack Size == 16 */ #define REGPUSH0_32_16(reg) \ do { \ - CPU_SP -= 4; \ - cpu_vmemorywrite_d(CPU_SS_INDEX, CPU_SP, reg); \ + UINT16 new_sp = CPU_SP - 4; \ + cpu_vmemorywrite_d(CPU_SS_INDEX, new_sp, reg); \ + CPU_SP = new_sp; \ } while (/*CONSTCOND*/ 0) #define REGPUSH0_32(reg) \ do { \ - CPU_ESP -= 4; \ - cpu_vmemorywrite_d(CPU_SS_INDEX, CPU_ESP, reg); \ + UINT32 new_esp = CPU_ESP - 4; \ + cpu_vmemorywrite_d(CPU_SS_INDEX, new_esp, reg); \ + CPU_ESP = new_esp; \ } while (/*CONSTCOND*/ 0) #define PUSH0_16(reg) \ @@ -760,16 +770,16 @@ do { \ #define REGPOP(reg, clock) \ do { \ + CPU_WORKCLOCK(clock); \ (reg) = cpu_vmemoryread_w(CPU_SS_INDEX, CPU_SP); \ CPU_SP += 2; \ - CPU_WORKCLOCK(clock); \ } while (/*CONSTCOND*/ 0) #define REGPOP_32(reg, clock) \ do { \ + CPU_WORKCLOCK(clock); \ (reg) = cpu_vmemoryread_d(CPU_SS_INDEX, CPU_ESP); \ CPU_ESP += 4; \ - CPU_WORKCLOCK(clock); \ } while (/*CONSTCOND*/ 0) #define REGPOP0(reg) \ @@ -814,45 +824,128 @@ do { \ } \ } while (/*CONSTCOND*/ 0) +/* + * stack pointer + */ +#define SP_PUSH_16(reg) \ +do { \ + UINT16 sp = CPU_SP; \ + if (!CPU_STAT_SS32) { \ + REGPUSH0(sp); \ + } else { \ + REGPUSH0_16_32(sp); \ + } \ +} while (/*CONSTCOND*/ 0) + +#define ESP_PUSH_32(reg) \ +do { \ + UINT32 sp = CPU_ESP; \ + if (!CPU_STAT_SS32) { \ + REGPUSH0_32_16(sp); \ + } else { \ + REGPUSH0_32(sp); \ + } \ +} while (/*CONSTCOND*/ 0) + +#define SP_POP_16(reg) \ +do { \ + UINT32 sp; \ + if (!CPU_STAT_SS32) { \ + sp = CPU_SP; \ + } else { \ + sp = CPU_ESP; \ + } \ + CPU_SP = cpu_vmemoryread_w(CPU_SS_INDEX, sp); \ +} while (/*CONSTCOND*/ 0) + +#define ESP_POP_32(reg) \ +do { \ + UINT32 sp; \ + if (!CPU_STAT_SS32) { \ + sp = CPU_SP; \ + } else { \ + sp = CPU_ESP; \ + } \ + CPU_ESP = cpu_vmemoryread_d(CPU_SS_INDEX, sp); \ +} while (/*CONSTCOND*/ 0) + /* * jump */ #define JMPSHORT(clock) \ do { \ - DWORD __ip; \ + UINT32 __new_ip; \ + UINT32 __dest; \ CPU_WORKCLOCK(clock); \ - __ip = __CBD(cpu_codefetch(CPU_EIP)); \ - __ip++; \ - ADD_EIP(__ip); \ + GET_PCBYTESD(__dest); \ + __new_ip = CPU_EIP + __dest; \ + if (!CPU_INST_OP32) { \ + __new_ip &= 0xffff; \ + } \ + if (__new_ip > CPU_STAT_CS_LIMIT) { \ + EXCEPTION(GP_EXCEPTION, 0); \ + } \ + CPU_EIP = __new_ip; \ } while (/*CONSTCOND*/ 0) #define JMPNEAR(clock) \ do { \ - DWORD __ip; \ + UINT16 __new_ip; \ + SINT16 __dest; \ CPU_WORKCLOCK(clock); \ - __ip = __CWDE(cpu_codefetch_w(CPU_EIP)); \ - __ip += 2; \ - ADD_EIP(__ip); \ + GET_PCWORDS(__dest); \ + __new_ip = CPU_IP + __dest; \ + if (__new_ip > CPU_STAT_CS_LIMIT) { \ + EXCEPTION(GP_EXCEPTION, 0); \ + } \ + CPU_EIP = __new_ip; \ } while (/*CONSTCOND*/ 0) -#define JMPNEAR_4(clock) \ +#define JMPNEAR32(clock) \ do { \ - DWORD __ip; \ + UINT32 __new_ip; \ + UINT32 __dest; \ CPU_WORKCLOCK(clock); \ - __ip = cpu_codefetch_d(CPU_EIP); \ - __ip += 4; \ - ADD_EIP(__ip); \ + GET_PCDWORD(__dest); \ + __new_ip = CPU_EIP + __dest; \ + if (__new_ip > CPU_STAT_CS_LIMIT) { \ + EXCEPTION(GP_EXCEPTION, 0); \ + } \ + CPU_EIP = __new_ip; \ } while (/*CONSTCOND*/ 0) #define JMPNOP(clock, d) \ do { \ CPU_WORKCLOCK(clock); \ - ADD_EIP((d)); \ + _ADD_EIP((d)); \ } while (/*CONSTCOND*/ 0) /* + * conditions + */ +#define CC_O (CPU_OV) +#define CC_NO (!CPU_OV) +#define CC_C (CPU_FLAGL & C_FLAG) +#define CC_NC (!(CPU_FLAGL & C_FLAG)) +#define CC_Z (CPU_FLAGL & Z_FLAG) +#define CC_NZ (!(CPU_FLAGL & Z_FLAG)) +#define CC_NA (CPU_FLAGL & (Z_FLAG | C_FLAG)) +#define CC_A (!(CPU_FLAGL & (Z_FLAG | C_FLAG))) +#define CC_S (CPU_FLAGL & S_FLAG) +#define CC_NS (!(CPU_FLAGL & S_FLAG)) +#define CC_P (CPU_FLAGL & P_FLAG) +#define CC_NP (!(CPU_FLAGL & P_FLAG)) +#define CC_L (((CPU_FLAGL & S_FLAG) == 0) != (CPU_OV == 0)) +#define CC_NL (((CPU_FLAGL & S_FLAG) == 0) == (CPU_OV == 0)) +#define CC_LE ((CPU_FLAGL & Z_FLAG) || \ + (((CPU_FLAGL & S_FLAG) == 0) != (CPU_OV == 0))) +#define CC_NLE ((!(CPU_FLAGL & Z_FLAG)) && \ + (((CPU_FLAGL & S_FLAG) == 0) == (CPU_OV == 0))) + + +/* * instruction check */ #include "ia32xc.mcr"