| /**************************************************************************** |
| * Realmode X86 Emulator Library |
| * |
| * Copyright (C) 2007 Freescale Semiconductor, Inc. All rights reserved. |
| * Jason Jin <Jason.jin@freescale.com> |
| * |
| * Copyright (C) 1991-2004 SciTech Software, Inc. |
| * Copyright (C) David Mosberger-Tang |
| * Copyright (C) 1999 Egbert Eich |
| * |
| * ======================================================================== |
| * |
| * Permission to use, copy, modify, distribute, and sell this software and |
| * its documentation for any purpose is hereby granted without fee, |
| * provided that the above copyright notice appear in all copies and that |
| * both that copyright notice and this permission notice appear in |
| * supporting documentation, and that the name of the authors not be used |
| * in advertising or publicity pertaining to distribution of the software |
| * without specific, written prior permission. The authors makes no |
| * representations about the suitability of this software for any purpose. |
| * It is provided "as is" without express or implied warranty. |
| * |
| * THE AUTHORS DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, |
| * INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO |
| * EVENT SHALL THE AUTHORS BE LIABLE FOR ANY SPECIAL, INDIRECT OR |
| * CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF |
| * USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR |
| * OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR |
| * PERFORMANCE OF THIS SOFTWARE. |
| * |
| * ======================================================================== |
| * |
| * Language: ANSI C |
| * Environment: Any |
| * Developer: Kendall Bennett |
| * |
| * Description: This file includes subroutines to implement the decoding |
| * and emulation of all the x86 processor instructions. |
| * |
| * There are approximately 250 subroutines in here, which correspond |
| * to the 256 byte-"opcodes" found on the 8086. The table which |
| * dispatches this is found in the files optab.[ch]. |
| * |
| * Each opcode proc has a comment preceeding it which gives it's table |
| * address. Several opcodes are missing (undefined) in the table. |
| * |
| * Each proc includes information for decoding (DECODE_PRINTF and |
| * DECODE_PRINTF2), debugging (TRACE_REGS, SINGLE_STEP), and misc |
| * functions (START_OF_INSTR, END_OF_INSTR). |
| * |
| * Many of the procedures are *VERY* similar in coding. This has |
| * allowed for a very large amount of code to be generated in a fairly |
| * short amount of time (i.e. cut, paste, and modify). The result is |
| * that much of the code below could have been folded into subroutines |
| * for a large reduction in size of this file. The downside would be |
| * that there would be a penalty in execution speed. The file could |
| * also have been *MUCH* larger by inlining certain functions which |
| * were called. This could have resulted even faster execution. The |
| * prime directive I used to decide whether to inline the code or to |
| * modularize it, was basically: 1) no unnecessary subroutine calls, |
| * 2) no routines more than about 200 lines in size, and 3) modularize |
| * any code that I might not get right the first time. The fetch_* |
| * subroutines fall into the latter category. The The decode_* fall |
| * into the second category. The coding of the "switch(mod){ .... }" |
| * in many of the subroutines below falls into the first category. |
| * Especially, the coding of {add,and,or,sub,...}_{byte,word} |
| * subroutines are an especially glaring case of the third guideline. |
| * Since so much of the code is cloned from other modules (compare |
| * opcode #00 to opcode #01), making the basic operations subroutine |
| * calls is especially important; otherwise mistakes in coding an |
| * "add" would represent a nightmare in maintenance. |
| * |
| * Jason ported this file to u-boot. place all the function pointer in |
| * the got2 sector. Removed some opcode. |
| * |
| ****************************************************************************/ |
| |
| #include "x86emu/x86emui.h" |
| /*----------------------------- Implementation ----------------------------*/ |
| |
| /* constant arrays to do several instructions in just one function */ |
| |
| #ifdef DEBUG |
| static char *x86emu_GenOpName[8] = { |
| "ADD", "OR", "ADC", "SBB", "AND", "SUB", "XOR", "CMP"}; |
| #endif |
| |
| /* used by several opcodes */ |
| static u8 (*genop_byte_operation[])(u8 d, u8 s) __attribute__ ((section(".got2"))) = |
| { |
| add_byte, /* 00 */ |
| or_byte, /* 01 */ |
| adc_byte, /* 02 */ |
| sbb_byte, /* 03 */ |
| and_byte, /* 04 */ |
| sub_byte, /* 05 */ |
| xor_byte, /* 06 */ |
| cmp_byte, /* 07 */ |
| }; |
| |
| static u16 (*genop_word_operation[])(u16 d, u16 s) __attribute__ ((section(".got2"))) = |
| { |
| add_word, /*00 */ |
| or_word, /*01 */ |
| adc_word, /*02 */ |
| sbb_word, /*03 */ |
| and_word, /*04 */ |
| sub_word, /*05 */ |
| xor_word, /*06 */ |
| cmp_word, /*07 */ |
| }; |
| |
| static u32 (*genop_long_operation[])(u32 d, u32 s) __attribute__ ((section(".got2"))) = |
| { |
| add_long, /*00 */ |
| or_long, /*01 */ |
| adc_long, /*02 */ |
| sbb_long, /*03 */ |
| and_long, /*04 */ |
| sub_long, /*05 */ |
| xor_long, /*06 */ |
| cmp_long, /*07 */ |
| }; |
| |
| /* used by opcodes 80, c0, d0, and d2. */ |
| static u8(*opcD0_byte_operation[])(u8 d, u8 s) __attribute__ ((section(".got2"))) = |
| { |
| rol_byte, |
| ror_byte, |
| rcl_byte, |
| rcr_byte, |
| shl_byte, |
| shr_byte, |
| shl_byte, /* sal_byte === shl_byte by definition */ |
| sar_byte, |
| }; |
| |
| /* used by opcodes c1, d1, and d3. */ |
| static u16(*opcD1_word_operation[])(u16 s, u8 d) __attribute__ ((section(".got2"))) = |
| { |
| rol_word, |
| ror_word, |
| rcl_word, |
| rcr_word, |
| shl_word, |
| shr_word, |
| shl_word, /* sal_byte === shl_byte by definition */ |
| sar_word, |
| }; |
| |
| /* used by opcodes c1, d1, and d3. */ |
| static u32 (*opcD1_long_operation[])(u32 s, u8 d) __attribute__ ((section(".got2"))) = |
| { |
| rol_long, |
| ror_long, |
| rcl_long, |
| rcr_long, |
| shl_long, |
| shr_long, |
| shl_long, /* sal_byte === shl_byte by definition */ |
| sar_long, |
| }; |
| |
| #ifdef DEBUG |
| |
| static char *opF6_names[8] = |
| { "TEST\t", "", "NOT\t", "NEG\t", "MUL\t", "IMUL\t", "DIV\t", "IDIV\t" }; |
| |
| #endif |
| |
| /**************************************************************************** |
| PARAMETERS: |
| op1 - Instruction op code |
| |
| REMARKS: |
| Handles illegal opcodes. |
| ****************************************************************************/ |
| void x86emuOp_illegal_op( |
| u8 op1) |
| { |
| START_OF_INSTR(); |
| if (M.x86.R_SP != 0) { |
| DECODE_PRINTF("ILLEGAL X86 OPCODE\n"); |
| TRACE_REGS(); |
| DB( printk("%04x:%04x: %02X ILLEGAL X86 OPCODE!\n", |
| M.x86.R_CS, M.x86.R_IP-1,op1)); |
| HALT_SYS(); |
| } |
| else { |
| /* If we get here, it means the stack pointer is back to zero |
| * so we are just returning from an emulator service call |
| * so therte is no need to display an error message. We trap |
| * the emulator with an 0xF1 opcode to finish the service |
| * call. |
| */ |
| X86EMU_halt_sys(); |
| } |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcodes 0x00, 0x08, 0x10, 0x18, 0x20, 0x28, 0x30, 0x38 |
| ****************************************************************************/ |
| void x86emuOp_genop_byte_RM_R(u8 op1) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| u8 *destreg, *srcreg; |
| u8 destval; |
| |
| op1 = (op1 >> 3) & 0x7; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF(x86emu_GenOpName[op1]); |
| DECODE_PRINTF("\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if(mod<3) |
| { destoffset = decode_rmXX_address(mod,rl); |
| DECODE_PRINTF(","); |
| destval = fetch_data_byte(destoffset); |
| srcreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = genop_byte_operation[op1](destval, *srcreg); |
| store_data_byte(destoffset, destval); |
| } |
| else |
| { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = genop_byte_operation[op1](*destreg, *srcreg); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcodes 0x01, 0x09, 0x11, 0x19, 0x21, 0x29, 0x31, 0x39 |
| ****************************************************************************/ |
| void x86emuOp_genop_word_RM_R(u8 op1) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| op1 = (op1 >> 3) & 0x7; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF(x86emu_GenOpName[op1]); |
| DECODE_PRINTF("\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| |
| if(mod<3) { |
| destoffset = decode_rmXX_address(mod,rl); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| u32 *srcreg; |
| |
| DECODE_PRINTF(","); |
| destval = fetch_data_long(destoffset); |
| srcreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = genop_long_operation[op1](destval, *srcreg); |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval; |
| u16 *srcreg; |
| |
| DECODE_PRINTF(","); |
| destval = fetch_data_word(destoffset); |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = genop_word_operation[op1](destval, *srcreg); |
| store_data_word(destoffset, destval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg,*srcreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = genop_long_operation[op1](*destreg, *srcreg); |
| } else { |
| u16 *destreg,*srcreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = genop_word_operation[op1](*destreg, *srcreg); |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcodes 0x02, 0x0a, 0x12, 0x1a, 0x22, 0x2a, 0x32, 0x3a |
| ****************************************************************************/ |
| void x86emuOp_genop_byte_R_RM(u8 op1) |
| { |
| int mod, rl, rh; |
| u8 *destreg, *srcreg; |
| uint srcoffset; |
| u8 srcval; |
| |
| op1 = (op1 >> 3) & 0x7; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF(x86emu_GenOpName[op1]); |
| DECODE_PRINTF("\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcoffset = decode_rmXX_address(mod,rl); |
| srcval = fetch_data_byte(srcoffset); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_BYTE_REGISTER(rl); |
| srcval = *srcreg; |
| } |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = genop_byte_operation[op1](*destreg, srcval); |
| |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcodes 0x03, 0x0b, 0x13, 0x1b, 0x23, 0x2b, 0x33, 0x3b |
| ****************************************************************************/ |
| void x86emuOp_genop_word_R_RM(u8 op1) |
| { |
| int mod, rl, rh; |
| uint srcoffset; |
| u32 *destreg32, srcval; |
| u16 *destreg; |
| |
| op1 = (op1 >> 3) & 0x7; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF(x86emu_GenOpName[op1]); |
| DECODE_PRINTF("\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| srcoffset = decode_rmXX_address(mod,rl); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| destreg32 = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcval = fetch_data_long(srcoffset); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg32 = genop_long_operation[op1](*destreg32, srcval); |
| } else { |
| destreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcval = fetch_data_word(srcoffset); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = genop_word_operation[op1](*destreg, srcval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *srcreg; |
| destreg32 = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg32 = genop_long_operation[op1](*destreg32, *srcreg); |
| } else { |
| u16 *srcreg; |
| destreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = genop_word_operation[op1](*destreg, *srcreg); |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcodes 0x04, 0x0c, 0x14, 0x1c, 0x24, 0x2c, 0x34, 0x3c |
| ****************************************************************************/ |
| void x86emuOp_genop_byte_AL_IMM(u8 op1) |
| { |
| u8 srcval; |
| |
| op1 = (op1 >> 3) & 0x7; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF(x86emu_GenOpName[op1]); |
| DECODE_PRINTF("\tAL,"); |
| srcval = fetch_byte_imm(); |
| DECODE_PRINTF2("%x\n", srcval); |
| TRACE_AND_STEP(); |
| M.x86.R_AL = genop_byte_operation[op1](M.x86.R_AL, srcval); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcodes 0x05, 0x0d, 0x15, 0x1d, 0x25, 0x2d, 0x35, 0x3d |
| ****************************************************************************/ |
| void x86emuOp_genop_word_AX_IMM(u8 op1) |
| { |
| u32 srcval; |
| |
| op1 = (op1 >> 3) & 0x7; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF(x86emu_GenOpName[op1]); |
| DECODE_PRINTF("\tEAX,"); |
| srcval = fetch_long_imm(); |
| } else { |
| DECODE_PRINTF(x86emu_GenOpName[op1]); |
| DECODE_PRINTF("\tAX,"); |
| srcval = fetch_word_imm(); |
| } |
| DECODE_PRINTF2("%x\n", srcval); |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| M.x86.R_EAX = genop_long_operation[op1](M.x86.R_EAX, srcval); |
| } else { |
| M.x86.R_AX = genop_word_operation[op1](M.x86.R_AX, (u16)srcval); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x06 |
| ****************************************************************************/ |
| void x86emuOp_push_ES(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("PUSH\tES\n"); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_ES); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x07 |
| ****************************************************************************/ |
| void x86emuOp_pop_ES(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("POP\tES\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_ES = pop_word(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x0e |
| ****************************************************************************/ |
| void x86emuOp_push_CS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("PUSH\tCS\n"); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_CS); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x0f. Escape for two-byte opcode (286 or better) |
| ****************************************************************************/ |
| void x86emuOp_two_byte(u8 X86EMU_UNUSED(op1)) |
| { |
| u8 op2 = (*sys_rdb)(((u32)M.x86.R_CS << 4) + (M.x86.R_IP++)); |
| INC_DECODED_INST_LEN(1); |
| (*x86emu_optab2[op2])(op2); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x16 |
| ****************************************************************************/ |
| void x86emuOp_push_SS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("PUSH\tSS\n"); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_SS); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x17 |
| ****************************************************************************/ |
| void x86emuOp_pop_SS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("POP\tSS\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_SS = pop_word(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x1e |
| ****************************************************************************/ |
| void x86emuOp_push_DS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("PUSH\tDS\n"); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_DS); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x1f |
| ****************************************************************************/ |
| void x86emuOp_pop_DS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("POP\tDS\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_DS = pop_word(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x26 |
| ****************************************************************************/ |
| void x86emuOp_segovr_ES(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("ES:\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_SEGOVR_ES; |
| /* |
| * note the lack of DECODE_CLEAR_SEGOVR(r) since, here is one of 4 |
| * opcode subroutines we do not want to do this. |
| */ |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x27 |
| ****************************************************************************/ |
| void x86emuOp_daa(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("DAA\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_AL = daa_byte(M.x86.R_AL); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x2e |
| ****************************************************************************/ |
| void x86emuOp_segovr_CS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("CS:\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_SEGOVR_CS; |
| /* note no DECODE_CLEAR_SEGOVR here. */ |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x2f |
| ****************************************************************************/ |
| void x86emuOp_das(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("DAS\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_AL = das_byte(M.x86.R_AL); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x36 |
| ****************************************************************************/ |
| void x86emuOp_segovr_SS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("SS:\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_SEGOVR_SS; |
| /* no DECODE_CLEAR_SEGOVR ! */ |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x37 |
| ****************************************************************************/ |
| void x86emuOp_aaa(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("AAA\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_AX = aaa_word(M.x86.R_AX); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x3e |
| ****************************************************************************/ |
| void x86emuOp_segovr_DS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("DS:\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_SEGOVR_DS; |
| /* NO DECODE_CLEAR_SEGOVR! */ |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x3f |
| ****************************************************************************/ |
| void x86emuOp_aas(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("AAS\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_AX = aas_word(M.x86.R_AX); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x40 - 0x47 |
| ****************************************************************************/ |
| void x86emuOp_inc_register(u8 op1) |
| { |
| START_OF_INSTR(); |
| op1 &= 0x7; |
| DECODE_PRINTF("INC\t"); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *reg; |
| reg = DECODE_RM_LONG_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *reg = inc_long(*reg); |
| } else { |
| u16 *reg; |
| reg = DECODE_RM_WORD_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *reg = inc_word(*reg); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x48 - 0x4F |
| ****************************************************************************/ |
| void x86emuOp_dec_register(u8 op1) |
| { |
| START_OF_INSTR(); |
| op1 &= 0x7; |
| DECODE_PRINTF("DEC\t"); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *reg; |
| reg = DECODE_RM_LONG_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *reg = dec_long(*reg); |
| } else { |
| u16 *reg; |
| reg = DECODE_RM_WORD_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *reg = dec_word(*reg); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x50 - 0x57 |
| ****************************************************************************/ |
| void x86emuOp_push_register(u8 op1) |
| { |
| START_OF_INSTR(); |
| op1 &= 0x7; |
| DECODE_PRINTF("PUSH\t"); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *reg; |
| reg = DECODE_RM_LONG_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| push_long(*reg); |
| } else { |
| u16 *reg; |
| reg = DECODE_RM_WORD_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| push_word(*reg); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x58 - 0x5F |
| ****************************************************************************/ |
| void x86emuOp_pop_register(u8 op1) |
| { |
| START_OF_INSTR(); |
| op1 &= 0x7; |
| DECODE_PRINTF("POP\t"); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *reg; |
| reg = DECODE_RM_LONG_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *reg = pop_long(); |
| } else { |
| u16 *reg; |
| reg = DECODE_RM_WORD_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *reg = pop_word(); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x60 |
| ****************************************************************************/ |
| void x86emuOp_push_all(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("PUSHAD\n"); |
| } else { |
| DECODE_PRINTF("PUSHA\n"); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 old_sp = M.x86.R_ESP; |
| |
| push_long(M.x86.R_EAX); |
| push_long(M.x86.R_ECX); |
| push_long(M.x86.R_EDX); |
| push_long(M.x86.R_EBX); |
| push_long(old_sp); |
| push_long(M.x86.R_EBP); |
| push_long(M.x86.R_ESI); |
| push_long(M.x86.R_EDI); |
| } else { |
| u16 old_sp = M.x86.R_SP; |
| |
| push_word(M.x86.R_AX); |
| push_word(M.x86.R_CX); |
| push_word(M.x86.R_DX); |
| push_word(M.x86.R_BX); |
| push_word(old_sp); |
| push_word(M.x86.R_BP); |
| push_word(M.x86.R_SI); |
| push_word(M.x86.R_DI); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x61 |
| ****************************************************************************/ |
| void x86emuOp_pop_all(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("POPAD\n"); |
| } else { |
| DECODE_PRINTF("POPA\n"); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| M.x86.R_EDI = pop_long(); |
| M.x86.R_ESI = pop_long(); |
| M.x86.R_EBP = pop_long(); |
| M.x86.R_ESP += 4; /* skip ESP */ |
| M.x86.R_EBX = pop_long(); |
| M.x86.R_EDX = pop_long(); |
| M.x86.R_ECX = pop_long(); |
| M.x86.R_EAX = pop_long(); |
| } else { |
| M.x86.R_DI = pop_word(); |
| M.x86.R_SI = pop_word(); |
| M.x86.R_BP = pop_word(); |
| M.x86.R_SP += 2; /* skip SP */ |
| M.x86.R_BX = pop_word(); |
| M.x86.R_DX = pop_word(); |
| M.x86.R_CX = pop_word(); |
| M.x86.R_AX = pop_word(); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /*opcode 0x62 ILLEGAL OP, calls x86emuOp_illegal_op() */ |
| /*opcode 0x63 ILLEGAL OP, calls x86emuOp_illegal_op() */ |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x64 |
| ****************************************************************************/ |
| void x86emuOp_segovr_FS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("FS:\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_SEGOVR_FS; |
| /* |
| * note the lack of DECODE_CLEAR_SEGOVR(r) since, here is one of 4 |
| * opcode subroutines we do not want to do this. |
| */ |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x65 |
| ****************************************************************************/ |
| void x86emuOp_segovr_GS(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("GS:\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_SEGOVR_GS; |
| /* |
| * note the lack of DECODE_CLEAR_SEGOVR(r) since, here is one of 4 |
| * opcode subroutines we do not want to do this. |
| */ |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x66 - prefix for 32-bit register |
| ****************************************************************************/ |
| void x86emuOp_prefix_data(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("DATA:\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_PREFIX_DATA; |
| /* note no DECODE_CLEAR_SEGOVR here. */ |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x67 - prefix for 32-bit address |
| ****************************************************************************/ |
| void x86emuOp_prefix_addr(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("ADDR:\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_PREFIX_ADDR; |
| /* note no DECODE_CLEAR_SEGOVR here. */ |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x68 |
| ****************************************************************************/ |
| void x86emuOp_push_word_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u32 imm; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| imm = fetch_long_imm(); |
| } else { |
| imm = fetch_word_imm(); |
| } |
| DECODE_PRINTF2("PUSH\t%x\n", imm); |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| push_long(imm); |
| } else { |
| push_word((u16)imm); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x69 |
| ****************************************************************************/ |
| void x86emuOp_imul_word_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint srcoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("IMUL\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| srcoffset = decode_rmXX_address(mod, rl); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| u32 srcval; |
| u32 res_lo,res_hi; |
| s32 imm; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcval = fetch_data_long(srcoffset); |
| imm = fetch_long_imm(); |
| DECODE_PRINTF2(",%d\n", (s32)imm); |
| TRACE_AND_STEP(); |
| imul_long_direct(&res_lo,&res_hi,(s32)srcval,(s32)imm); |
| if ((((res_lo & 0x80000000) == 0) && (res_hi == 0x00000000)) || |
| (((res_lo & 0x80000000) != 0) && (res_hi == 0xFFFFFFFF))) { |
| CLEAR_FLAG(F_CF); |
| CLEAR_FLAG(F_OF); |
| } else { |
| SET_FLAG(F_CF); |
| SET_FLAG(F_OF); |
| } |
| *destreg = (u32)res_lo; |
| } else { |
| u16 *destreg; |
| u16 srcval; |
| u32 res; |
| s16 imm; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcval = fetch_data_word(srcoffset); |
| imm = fetch_word_imm(); |
| DECODE_PRINTF2(",%d\n", (s32)imm); |
| TRACE_AND_STEP(); |
| res = (s16)srcval * (s16)imm; |
| if ((((res & 0x8000) == 0) && ((res >> 16) == 0x0000)) || |
| (((res & 0x8000) != 0) && ((res >> 16) == 0xFFFF))) { |
| CLEAR_FLAG(F_CF); |
| CLEAR_FLAG(F_OF); |
| } else { |
| SET_FLAG(F_CF); |
| SET_FLAG(F_OF); |
| } |
| *destreg = (u16)res; |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg,*srcreg; |
| u32 res_lo,res_hi; |
| s32 imm; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rl); |
| imm = fetch_long_imm(); |
| DECODE_PRINTF2(",%d\n", (s32)imm); |
| TRACE_AND_STEP(); |
| imul_long_direct(&res_lo,&res_hi,(s32)*srcreg,(s32)imm); |
| if ((((res_lo & 0x80000000) == 0) && (res_hi == 0x00000000)) || |
| (((res_lo & 0x80000000) != 0) && (res_hi == 0xFFFFFFFF))) { |
| CLEAR_FLAG(F_CF); |
| CLEAR_FLAG(F_OF); |
| } else { |
| SET_FLAG(F_CF); |
| SET_FLAG(F_OF); |
| } |
| *destreg = (u32)res_lo; |
| } else { |
| u16 *destreg,*srcreg; |
| u32 res; |
| s16 imm; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rl); |
| imm = fetch_word_imm(); |
| DECODE_PRINTF2(",%d\n", (s32)imm); |
| res = (s16)*srcreg * (s16)imm; |
| if ((((res & 0x8000) == 0) && ((res >> 16) == 0x0000)) || |
| (((res & 0x8000) != 0) && ((res >> 16) == 0xFFFF))) { |
| CLEAR_FLAG(F_CF); |
| CLEAR_FLAG(F_OF); |
| } else { |
| SET_FLAG(F_CF); |
| SET_FLAG(F_OF); |
| } |
| *destreg = (u16)res; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x6a |
| ****************************************************************************/ |
| void x86emuOp_push_byte_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| s16 imm; |
| |
| START_OF_INSTR(); |
| imm = (s8)fetch_byte_imm(); |
| DECODE_PRINTF2("PUSH\t%d\n", imm); |
| TRACE_AND_STEP(); |
| push_word(imm); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x6b |
| ****************************************************************************/ |
| void x86emuOp_imul_byte_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint srcoffset; |
| s8 imm; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("IMUL\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| srcoffset = decode_rmXX_address(mod, rl); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| u32 srcval; |
| u32 res_lo,res_hi; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcval = fetch_data_long(srcoffset); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2(",%d\n", (s32)imm); |
| TRACE_AND_STEP(); |
| imul_long_direct(&res_lo,&res_hi,(s32)srcval,(s32)imm); |
| if ((((res_lo & 0x80000000) == 0) && (res_hi == 0x00000000)) || |
| (((res_lo & 0x80000000) != 0) && (res_hi == 0xFFFFFFFF))) { |
| CLEAR_FLAG(F_CF); |
| CLEAR_FLAG(F_OF); |
| } else { |
| SET_FLAG(F_CF); |
| SET_FLAG(F_OF); |
| } |
| *destreg = (u32)res_lo; |
| } else { |
| u16 *destreg; |
| u16 srcval; |
| u32 res; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcval = fetch_data_word(srcoffset); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2(",%d\n", (s32)imm); |
| TRACE_AND_STEP(); |
| res = (s16)srcval * (s16)imm; |
| if ((((res & 0x8000) == 0) && ((res >> 16) == 0x0000)) || |
| (((res & 0x8000) != 0) && ((res >> 16) == 0xFFFF))) { |
| CLEAR_FLAG(F_CF); |
| CLEAR_FLAG(F_OF); |
| } else { |
| SET_FLAG(F_CF); |
| SET_FLAG(F_OF); |
| } |
| *destreg = (u16)res; |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg,*srcreg; |
| u32 res_lo,res_hi; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rl); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2(",%d\n", (s32)imm); |
| TRACE_AND_STEP(); |
| imul_long_direct(&res_lo,&res_hi,(s32)*srcreg,(s32)imm); |
| if ((((res_lo & 0x80000000) == 0) && (res_hi == 0x00000000)) || |
| (((res_lo & 0x80000000) != 0) && (res_hi == 0xFFFFFFFF))) { |
| CLEAR_FLAG(F_CF); |
| CLEAR_FLAG(F_OF); |
| } else { |
| SET_FLAG(F_CF); |
| SET_FLAG(F_OF); |
| } |
| *destreg = (u32)res_lo; |
| } else { |
| u16 *destreg,*srcreg; |
| u32 res; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rl); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2(",%d\n", (s32)imm); |
| TRACE_AND_STEP(); |
| res = (s16)*srcreg * (s16)imm; |
| if ((((res & 0x8000) == 0) && ((res >> 16) == 0x0000)) || |
| (((res & 0x8000) != 0) && ((res >> 16) == 0xFFFF))) { |
| CLEAR_FLAG(F_CF); |
| CLEAR_FLAG(F_OF); |
| } else { |
| SET_FLAG(F_CF); |
| SET_FLAG(F_OF); |
| } |
| *destreg = (u16)res; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x6c |
| ****************************************************************************/ |
| void x86emuOp_ins_byte(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("INSB\n"); |
| ins(1); |
| TRACE_AND_STEP(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x6d |
| ****************************************************************************/ |
| void x86emuOp_ins_word(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("INSD\n"); |
| ins(4); |
| } else { |
| DECODE_PRINTF("INSW\n"); |
| ins(2); |
| } |
| TRACE_AND_STEP(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x6e |
| ****************************************************************************/ |
| void x86emuOp_outs_byte(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("OUTSB\n"); |
| outs(1); |
| TRACE_AND_STEP(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x6f |
| ****************************************************************************/ |
| void x86emuOp_outs_word(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("OUTSD\n"); |
| outs(4); |
| } else { |
| DECODE_PRINTF("OUTSW\n"); |
| outs(2); |
| } |
| TRACE_AND_STEP(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x70 - 0x7F |
| ****************************************************************************/ |
| int x86emu_check_jump_condition(u8 op); |
| |
| void x86emuOp_jump_near_cond(u8 op1) |
| { |
| s8 offset; |
| u16 target; |
| int cond; |
| |
| /* jump to byte offset if overflow flag is set */ |
| START_OF_INSTR(); |
| cond = x86emu_check_jump_condition(op1 & 0xF); |
| offset = (s8)fetch_byte_imm(); |
| target = (u16)(M.x86.R_IP + (s16)offset); |
| DECODE_PRINTF2("%x\n", target); |
| TRACE_AND_STEP(); |
| if (cond) |
| M.x86.R_IP = target; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x80 |
| ****************************************************************************/ |
| void x86emuOp_opc80_byte_RM_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg; |
| uint destoffset; |
| u8 imm; |
| u8 destval; |
| |
| /* |
| * Weirdo special case instruction format. Part of the opcode |
| * held below in "RH". Doubly nested case would result, except |
| * that the decoded instruction |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ADD\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("OR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("ADC\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("SBB\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("AND\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SUB\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("XOR\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("CMP\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| if (mod < 3) { |
| DECODE_PRINTF("BYTE PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(","); |
| destval = fetch_data_byte(destoffset); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_byte_operation[rh]) (destval, imm); |
| if (rh != 7) |
| store_data_byte(destoffset, destval); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF(","); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_byte_operation[rh]) (*destreg, imm); |
| if (rh != 7) |
| *destreg = destval; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x81 |
| ****************************************************************************/ |
| void x86emuOp_opc81_word_RM_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| /* |
| * Weirdo special case instruction format. Part of the opcode |
| * held below in "RH". Doubly nested case would result, except |
| * that the decoded instruction |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ADD\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("OR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("ADC\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("SBB\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("AND\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SUB\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("XOR\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("CMP\t"); |
| break; |
| } |
| } |
| #endif |
| /* |
| * Know operation, decode the mod byte to find the addressing |
| * mode. |
| */ |
| if (mod < 3) { |
| DECODE_PRINTF("DWORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval,imm; |
| |
| DECODE_PRINTF(","); |
| destval = fetch_data_long(destoffset); |
| imm = fetch_long_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_long_operation[rh]) (destval, imm); |
| if (rh != 7) |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval,imm; |
| |
| DECODE_PRINTF(","); |
| destval = fetch_data_word(destoffset); |
| imm = fetch_word_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_word_operation[rh]) (destval, imm); |
| if (rh != 7) |
| store_data_word(destoffset, destval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| u32 destval,imm; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF(","); |
| imm = fetch_long_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_long_operation[rh]) (*destreg, imm); |
| if (rh != 7) |
| *destreg = destval; |
| } else { |
| u16 *destreg; |
| u16 destval,imm; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF(","); |
| imm = fetch_word_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_word_operation[rh]) (*destreg, imm); |
| if (rh != 7) |
| *destreg = destval; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x82 |
| ****************************************************************************/ |
| void x86emuOp_opc82_byte_RM_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg; |
| uint destoffset; |
| u8 imm; |
| u8 destval; |
| |
| /* |
| * Weirdo special case instruction format. Part of the opcode |
| * held below in "RH". Doubly nested case would result, except |
| * that the decoded instruction Similar to opcode 81, except that |
| * the immediate byte is sign extended to a word length. |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ADD\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("OR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("ADC\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("SBB\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("AND\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SUB\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("XOR\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("CMP\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| if (mod < 3) { |
| DECODE_PRINTF("BYTE PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| destval = fetch_data_byte(destoffset); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_byte_operation[rh]) (destval, imm); |
| if (rh != 7) |
| store_data_byte(destoffset, destval); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_byte_operation[rh]) (*destreg, imm); |
| if (rh != 7) |
| *destreg = destval; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x83 |
| ****************************************************************************/ |
| void x86emuOp_opc83_word_RM_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| /* |
| * Weirdo special case instruction format. Part of the opcode |
| * held below in "RH". Doubly nested case would result, except |
| * that the decoded instruction Similar to opcode 81, except that |
| * the immediate byte is sign extended to a word length. |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ADD\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("OR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("ADC\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("SBB\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("AND\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SUB\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("XOR\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("CMP\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| if (mod < 3) { |
| DECODE_PRINTF("DWORD PTR "); |
| destoffset = decode_rmXX_address(mod,rl); |
| |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval,imm; |
| |
| destval = fetch_data_long(destoffset); |
| imm = (s8) fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_long_operation[rh]) (destval, imm); |
| if (rh != 7) |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval,imm; |
| |
| destval = fetch_data_word(destoffset); |
| imm = (s8) fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_word_operation[rh]) (destval, imm); |
| if (rh != 7) |
| store_data_word(destoffset, destval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| u32 destval,imm; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| imm = (s8) fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_long_operation[rh]) (*destreg, imm); |
| if (rh != 7) |
| *destreg = destval; |
| } else { |
| u16 *destreg; |
| u16 destval,imm; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| imm = (s8) fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| destval = (*genop_word_operation[rh]) (*destreg, imm); |
| if (rh != 7) |
| *destreg = destval; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x84 |
| ****************************************************************************/ |
| void x86emuOp_test_byte_RM_R(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg, *srcreg; |
| uint destoffset; |
| u8 destval; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("TEST\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(","); |
| destval = fetch_data_byte(destoffset); |
| srcreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| test_byte(destval, *srcreg); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| test_byte(*destreg, *srcreg); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x85 |
| ****************************************************************************/ |
| void x86emuOp_test_word_RM_R(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("TEST\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| u32 *srcreg; |
| |
| DECODE_PRINTF(","); |
| destval = fetch_data_long(destoffset); |
| srcreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| test_long(destval, *srcreg); |
| } else { |
| u16 destval; |
| u16 *srcreg; |
| |
| DECODE_PRINTF(","); |
| destval = fetch_data_word(destoffset); |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| test_word(destval, *srcreg); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg,*srcreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| test_long(*destreg, *srcreg); |
| } else { |
| u16 *destreg,*srcreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| test_word(*destreg, *srcreg); |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x86 |
| ****************************************************************************/ |
| void x86emuOp_xchg_byte_RM_R(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg, *srcreg; |
| uint destoffset; |
| u8 destval; |
| u8 tmp; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("XCHG\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(","); |
| destval = fetch_data_byte(destoffset); |
| srcreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| tmp = *srcreg; |
| *srcreg = destval; |
| destval = tmp; |
| store_data_byte(destoffset, destval); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| tmp = *srcreg; |
| *srcreg = *destreg; |
| *destreg = tmp; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x87 |
| ****************************************************************************/ |
| void x86emuOp_xchg_word_RM_R(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("XCHG\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(","); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *srcreg; |
| u32 destval,tmp; |
| |
| destval = fetch_data_long(destoffset); |
| srcreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| tmp = *srcreg; |
| *srcreg = destval; |
| destval = tmp; |
| store_data_long(destoffset, destval); |
| } else { |
| u16 *srcreg; |
| u16 destval,tmp; |
| |
| destval = fetch_data_word(destoffset); |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| tmp = *srcreg; |
| *srcreg = destval; |
| destval = tmp; |
| store_data_word(destoffset, destval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg,*srcreg; |
| u32 tmp; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| tmp = *srcreg; |
| *srcreg = *destreg; |
| *destreg = tmp; |
| } else { |
| u16 *destreg,*srcreg; |
| u16 tmp; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| tmp = *srcreg; |
| *srcreg = *destreg; |
| *destreg = tmp; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x88 |
| ****************************************************************************/ |
| void x86emuOp_mov_byte_RM_R(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg, *srcreg; |
| uint destoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| store_data_byte(destoffset, *srcreg); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = *srcreg; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x89 |
| ****************************************************************************/ |
| void x86emuOp_mov_word_RM_R(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *srcreg; |
| |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| store_data_long(destoffset, *srcreg); |
| } else { |
| u16 *srcreg; |
| |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| store_data_word(destoffset, *srcreg); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg,*srcreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = *srcreg; |
| } else { |
| u16 *destreg,*srcreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = *srcreg; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x8a |
| ****************************************************************************/ |
| void x86emuOp_mov_byte_R_RM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg, *srcreg; |
| uint srcoffset; |
| u8 srcval; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcoffset = decode_rmXX_address(mod, rl); |
| srcval = fetch_data_byte(srcoffset); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = srcval; |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = *srcreg; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x8b |
| ****************************************************************************/ |
| void x86emuOp_mov_word_R_RM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint srcoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| u32 srcval; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcoffset = decode_rmXX_address(mod, rl); |
| srcval = fetch_data_long(srcoffset); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = srcval; |
| } else { |
| u16 *destreg; |
| u16 srcval; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcoffset = decode_rmXX_address(mod, rl); |
| srcval = fetch_data_word(srcoffset); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = srcval; |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg, *srcreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = *srcreg; |
| } else { |
| u16 *destreg, *srcreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = *srcreg; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x8c |
| ****************************************************************************/ |
| void x86emuOp_mov_word_RM_SR(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u16 *destreg, *srcreg; |
| uint destoffset; |
| u16 destval; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(","); |
| srcreg = decode_rm_seg_register(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = *srcreg; |
| store_data_word(destoffset, destval); |
| } else { /* register to register */ |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF(","); |
| srcreg = decode_rm_seg_register(rh); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = *srcreg; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x8d |
| ****************************************************************************/ |
| void x86emuOp_lea_word_R_M(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u16 *srcreg; |
| uint destoffset; |
| |
| /* |
| * TODO: Need to handle address size prefix! |
| * |
| * lea eax,[eax+ebx*2] ?? |
| */ |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("LEA\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| srcreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *srcreg = (u16)destoffset; |
| } |
| /* } else { undefined. Do nothing. } */ |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x8e |
| ****************************************************************************/ |
| void x86emuOp_mov_word_SR_RM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u16 *destreg, *srcreg; |
| uint srcoffset; |
| u16 srcval; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| destreg = decode_rm_seg_register(rh); |
| DECODE_PRINTF(","); |
| srcoffset = decode_rmXX_address(mod, rl); |
| srcval = fetch_data_word(srcoffset); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = srcval; |
| } else { /* register to register */ |
| destreg = decode_rm_seg_register(rh); |
| DECODE_PRINTF(","); |
| srcreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = *srcreg; |
| } |
| /* |
| * Clean up, and reset all the R_xSP pointers to the correct |
| * locations. This is about 3x too much overhead (doing all the |
| * segreg ptrs when only one is needed, but this instruction |
| * *cannot* be that common, and this isn't too much work anyway. |
| */ |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x8f |
| ****************************************************************************/ |
| void x86emuOp_pop_RM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("POP\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (rh != 0) { |
| DECODE_PRINTF("ILLEGAL DECODE OF OPCODE 8F\n"); |
| HALT_SYS(); |
| } |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = pop_long(); |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval; |
| |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = pop_word(); |
| store_data_word(destoffset, destval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = pop_long(); |
| } else { |
| u16 *destreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = pop_word(); |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x90 |
| ****************************************************************************/ |
| void x86emuOp_nop(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("NOP\n"); |
| TRACE_AND_STEP(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x91-0x97 |
| ****************************************************************************/ |
| void x86emuOp_xchg_word_AX_register(u8 X86EMU_UNUSED(op1)) |
| { |
| u32 tmp; |
| |
| op1 &= 0x7; |
| |
| START_OF_INSTR(); |
| |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *reg32; |
| DECODE_PRINTF("XCHG\tEAX,"); |
| reg32 = DECODE_RM_LONG_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| tmp = M.x86.R_EAX; |
| M.x86.R_EAX = *reg32; |
| *reg32 = tmp; |
| } else { |
| u16 *reg16; |
| DECODE_PRINTF("XCHG\tAX,"); |
| reg16 = DECODE_RM_WORD_REGISTER(op1); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| tmp = M.x86.R_AX; |
| M.x86.R_EAX = *reg16; |
| *reg16 = (u16)tmp; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x98 |
| ****************************************************************************/ |
| void x86emuOp_cbw(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("CWDE\n"); |
| } else { |
| DECODE_PRINTF("CBW\n"); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| if (M.x86.R_AX & 0x8000) { |
| M.x86.R_EAX |= 0xffff0000; |
| } else { |
| M.x86.R_EAX &= 0x0000ffff; |
| } |
| } else { |
| if (M.x86.R_AL & 0x80) { |
| M.x86.R_AH = 0xff; |
| } else { |
| M.x86.R_AH = 0x0; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x99 |
| ****************************************************************************/ |
| void x86emuOp_cwd(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("CDQ\n"); |
| } else { |
| DECODE_PRINTF("CWD\n"); |
| } |
| DECODE_PRINTF("CWD\n"); |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| if (M.x86.R_EAX & 0x80000000) { |
| M.x86.R_EDX = 0xffffffff; |
| } else { |
| M.x86.R_EDX = 0x0; |
| } |
| } else { |
| if (M.x86.R_AX & 0x8000) { |
| M.x86.R_DX = 0xffff; |
| } else { |
| M.x86.R_DX = 0x0; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x9a |
| ****************************************************************************/ |
| void x86emuOp_call_far_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 farseg, faroff; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("CALL\t"); |
| faroff = fetch_word_imm(); |
| farseg = fetch_word_imm(); |
| DECODE_PRINTF2("%04x:", farseg); |
| DECODE_PRINTF2("%04x\n", faroff); |
| CALL_TRACE(M.x86.saved_cs, M.x86.saved_ip, farseg, faroff, "FAR "); |
| |
| /* XXX |
| * |
| * Hooked interrupt vectors calling into our "BIOS" will cause |
| * problems unless all intersegment stuff is checked for BIOS |
| * access. Check needed here. For moment, let it alone. |
| */ |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_CS); |
| M.x86.R_CS = farseg; |
| push_word(M.x86.R_IP); |
| M.x86.R_IP = faroff; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x9b |
| ****************************************************************************/ |
| void x86emuOp_wait(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("WAIT"); |
| TRACE_AND_STEP(); |
| /* NADA. */ |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x9c |
| ****************************************************************************/ |
| void x86emuOp_pushf_word(u8 X86EMU_UNUSED(op1)) |
| { |
| u32 flags; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("PUSHFD\n"); |
| } else { |
| DECODE_PRINTF("PUSHF\n"); |
| } |
| TRACE_AND_STEP(); |
| |
| /* clear out *all* bits not representing flags, and turn on real bits */ |
| flags = (M.x86.R_EFLG & F_MSK) | F_ALWAYS_ON; |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| push_long(flags); |
| } else { |
| push_word((u16)flags); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x9d |
| ****************************************************************************/ |
| void x86emuOp_popf_word(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("POPFD\n"); |
| } else { |
| DECODE_PRINTF("POPF\n"); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| M.x86.R_EFLG = pop_long(); |
| } else { |
| M.x86.R_FLG = pop_word(); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x9e |
| ****************************************************************************/ |
| void x86emuOp_sahf(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("SAHF\n"); |
| TRACE_AND_STEP(); |
| /* clear the lower bits of the flag register */ |
| M.x86.R_FLG &= 0xffffff00; |
| /* or in the AH register into the flags register */ |
| M.x86.R_FLG |= M.x86.R_AH; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0x9f |
| ****************************************************************************/ |
| void x86emuOp_lahf(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("LAHF\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_AH = (u8)(M.x86.R_FLG & 0xff); |
| /*undocumented TC++ behavior??? Nope. It's documented, but |
| you have too look real hard to notice it. */ |
| M.x86.R_AH |= 0x2; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa0 |
| ****************************************************************************/ |
| void x86emuOp_mov_AL_M_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 offset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\tAL,"); |
| offset = fetch_word_imm(); |
| DECODE_PRINTF2("[%04x]\n", offset); |
| TRACE_AND_STEP(); |
| M.x86.R_AL = fetch_data_byte(offset); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa1 |
| ****************************************************************************/ |
| void x86emuOp_mov_AX_M_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 offset; |
| |
| START_OF_INSTR(); |
| offset = fetch_word_imm(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF2("MOV\tEAX,[%04x]\n", offset); |
| } else { |
| DECODE_PRINTF2("MOV\tAX,[%04x]\n", offset); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| M.x86.R_EAX = fetch_data_long(offset); |
| } else { |
| M.x86.R_AX = fetch_data_word(offset); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa2 |
| ****************************************************************************/ |
| void x86emuOp_mov_M_AL_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 offset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| offset = fetch_word_imm(); |
| DECODE_PRINTF2("[%04x],AL\n", offset); |
| TRACE_AND_STEP(); |
| store_data_byte(offset, M.x86.R_AL); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa3 |
| ****************************************************************************/ |
| void x86emuOp_mov_M_AX_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 offset; |
| |
| START_OF_INSTR(); |
| offset = fetch_word_imm(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF2("MOV\t[%04x],EAX\n", offset); |
| } else { |
| DECODE_PRINTF2("MOV\t[%04x],AX\n", offset); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| store_data_long(offset, M.x86.R_EAX); |
| } else { |
| store_data_word(offset, M.x86.R_AX); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa4 |
| ****************************************************************************/ |
| void x86emuOp_movs_byte(u8 X86EMU_UNUSED(op1)) |
| { |
| u8 val; |
| u32 count; |
| int inc; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOVS\tBYTE\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -1; |
| else |
| inc = 1; |
| TRACE_AND_STEP(); |
| count = 1; |
| if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) { |
| /* dont care whether REPE or REPNE */ |
| /* move them until CX is ZERO. */ |
| count = M.x86.R_CX; |
| M.x86.R_CX = 0; |
| M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE); |
| } |
| while (count--) { |
| val = fetch_data_byte(M.x86.R_SI); |
| store_data_byte_abs(M.x86.R_ES, M.x86.R_DI, val); |
| M.x86.R_SI += inc; |
| M.x86.R_DI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa5 |
| ****************************************************************************/ |
| void x86emuOp_movs_word(u8 X86EMU_UNUSED(op1)) |
| { |
| u32 val; |
| int inc; |
| u32 count; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("MOVS\tDWORD\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -4; |
| else |
| inc = 4; |
| } else { |
| DECODE_PRINTF("MOVS\tWORD\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -2; |
| else |
| inc = 2; |
| } |
| TRACE_AND_STEP(); |
| count = 1; |
| if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) { |
| /* dont care whether REPE or REPNE */ |
| /* move them until CX is ZERO. */ |
| count = M.x86.R_CX; |
| M.x86.R_CX = 0; |
| M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE); |
| } |
| while (count--) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| val = fetch_data_long(M.x86.R_SI); |
| store_data_long_abs(M.x86.R_ES, M.x86.R_DI, val); |
| } else { |
| val = fetch_data_word(M.x86.R_SI); |
| store_data_word_abs(M.x86.R_ES, M.x86.R_DI, (u16)val); |
| } |
| M.x86.R_SI += inc; |
| M.x86.R_DI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa6 |
| ****************************************************************************/ |
| void x86emuOp_cmps_byte(u8 X86EMU_UNUSED(op1)) |
| { |
| s8 val1, val2; |
| int inc; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("CMPS\tBYTE\n"); |
| TRACE_AND_STEP(); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -1; |
| else |
| inc = 1; |
| |
| if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) { |
| /* REPE */ |
| /* move them until CX is ZERO. */ |
| while (M.x86.R_CX != 0) { |
| val1 = fetch_data_byte(M.x86.R_SI); |
| val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_byte(val1, val2); |
| M.x86.R_CX -= 1; |
| M.x86.R_SI += inc; |
| M.x86.R_DI += inc; |
| if ( (M.x86.mode & SYSMODE_PREFIX_REPE) && (ACCESS_FLAG(F_ZF) == 0) ) break; |
| if ( (M.x86.mode & SYSMODE_PREFIX_REPNE) && ACCESS_FLAG(F_ZF) ) break; |
| } |
| M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE); |
| } else { |
| val1 = fetch_data_byte(M.x86.R_SI); |
| val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_byte(val1, val2); |
| M.x86.R_SI += inc; |
| M.x86.R_DI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa7 |
| ****************************************************************************/ |
| void x86emuOp_cmps_word(u8 X86EMU_UNUSED(op1)) |
| { |
| u32 val1,val2; |
| int inc; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("CMPS\tDWORD\n"); |
| inc = 4; |
| } else { |
| DECODE_PRINTF("CMPS\tWORD\n"); |
| inc = 2; |
| } |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -inc; |
| |
| TRACE_AND_STEP(); |
| if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) { |
| /* REPE */ |
| /* move them until CX is ZERO. */ |
| while (M.x86.R_CX != 0) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| val1 = fetch_data_long(M.x86.R_SI); |
| val2 = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_long(val1, val2); |
| } else { |
| val1 = fetch_data_word(M.x86.R_SI); |
| val2 = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_word((u16)val1, (u16)val2); |
| } |
| M.x86.R_CX -= 1; |
| M.x86.R_SI += inc; |
| M.x86.R_DI += inc; |
| if ( (M.x86.mode & SYSMODE_PREFIX_REPE) && ACCESS_FLAG(F_ZF) == 0 ) break; |
| if ( (M.x86.mode & SYSMODE_PREFIX_REPNE) && ACCESS_FLAG(F_ZF) ) break; |
| } |
| M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE); |
| } else { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| val1 = fetch_data_long(M.x86.R_SI); |
| val2 = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_long(val1, val2); |
| } else { |
| val1 = fetch_data_word(M.x86.R_SI); |
| val2 = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_word((u16)val1, (u16)val2); |
| } |
| M.x86.R_SI += inc; |
| M.x86.R_DI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa8 |
| ****************************************************************************/ |
| void x86emuOp_test_AL_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int imm; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("TEST\tAL,"); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2("%04x\n", imm); |
| TRACE_AND_STEP(); |
| test_byte(M.x86.R_AL, (u8)imm); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xa9 |
| ****************************************************************************/ |
| void x86emuOp_test_AX_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u32 srcval; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("TEST\tEAX,"); |
| srcval = fetch_long_imm(); |
| } else { |
| DECODE_PRINTF("TEST\tAX,"); |
| srcval = fetch_word_imm(); |
| } |
| DECODE_PRINTF2("%x\n", srcval); |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| test_long(M.x86.R_EAX, srcval); |
| } else { |
| test_word(M.x86.R_AX, (u16)srcval); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xaa |
| ****************************************************************************/ |
| void x86emuOp_stos_byte(u8 X86EMU_UNUSED(op1)) |
| { |
| int inc; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("STOS\tBYTE\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -1; |
| else |
| inc = 1; |
| TRACE_AND_STEP(); |
| if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) { |
| /* dont care whether REPE or REPNE */ |
| /* move them until CX is ZERO. */ |
| while (M.x86.R_CX != 0) { |
| store_data_byte_abs(M.x86.R_ES, M.x86.R_DI, M.x86.R_AL); |
| M.x86.R_CX -= 1; |
| M.x86.R_DI += inc; |
| } |
| M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE); |
| } else { |
| store_data_byte_abs(M.x86.R_ES, M.x86.R_DI, M.x86.R_AL); |
| M.x86.R_DI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xab |
| ****************************************************************************/ |
| void x86emuOp_stos_word(u8 X86EMU_UNUSED(op1)) |
| { |
| int inc; |
| u32 count; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("STOS\tDWORD\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -4; |
| else |
| inc = 4; |
| } else { |
| DECODE_PRINTF("STOS\tWORD\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -2; |
| else |
| inc = 2; |
| } |
| TRACE_AND_STEP(); |
| count = 1; |
| if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) { |
| /* dont care whether REPE or REPNE */ |
| /* move them until CX is ZERO. */ |
| count = M.x86.R_CX; |
| M.x86.R_CX = 0; |
| M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE); |
| } |
| while (count--) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| store_data_long_abs(M.x86.R_ES, M.x86.R_DI, M.x86.R_EAX); |
| } else { |
| store_data_word_abs(M.x86.R_ES, M.x86.R_DI, M.x86.R_AX); |
| } |
| M.x86.R_DI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xac |
| ****************************************************************************/ |
| void x86emuOp_lods_byte(u8 X86EMU_UNUSED(op1)) |
| { |
| int inc; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("LODS\tBYTE\n"); |
| TRACE_AND_STEP(); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -1; |
| else |
| inc = 1; |
| if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) { |
| /* dont care whether REPE or REPNE */ |
| /* move them until CX is ZERO. */ |
| while (M.x86.R_CX != 0) { |
| M.x86.R_AL = fetch_data_byte(M.x86.R_SI); |
| M.x86.R_CX -= 1; |
| M.x86.R_SI += inc; |
| } |
| M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE); |
| } else { |
| M.x86.R_AL = fetch_data_byte(M.x86.R_SI); |
| M.x86.R_SI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xad |
| ****************************************************************************/ |
| void x86emuOp_lods_word(u8 X86EMU_UNUSED(op1)) |
| { |
| int inc; |
| u32 count; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("LODS\tDWORD\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -4; |
| else |
| inc = 4; |
| } else { |
| DECODE_PRINTF("LODS\tWORD\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -2; |
| else |
| inc = 2; |
| } |
| TRACE_AND_STEP(); |
| count = 1; |
| if (M.x86.mode & (SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE)) { |
| /* dont care whether REPE or REPNE */ |
| /* move them until CX is ZERO. */ |
| count = M.x86.R_CX; |
| M.x86.R_CX = 0; |
| M.x86.mode &= ~(SYSMODE_PREFIX_REPE | SYSMODE_PREFIX_REPNE); |
| } |
| while (count--) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| M.x86.R_EAX = fetch_data_long(M.x86.R_SI); |
| } else { |
| M.x86.R_AX = fetch_data_word(M.x86.R_SI); |
| } |
| M.x86.R_SI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xae |
| ****************************************************************************/ |
| void x86emuOp_scas_byte(u8 X86EMU_UNUSED(op1)) |
| { |
| s8 val2; |
| int inc; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("SCAS\tBYTE\n"); |
| TRACE_AND_STEP(); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -1; |
| else |
| inc = 1; |
| if (M.x86.mode & SYSMODE_PREFIX_REPE) { |
| /* REPE */ |
| /* move them until CX is ZERO. */ |
| while (M.x86.R_CX != 0) { |
| val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_byte(M.x86.R_AL, val2); |
| M.x86.R_CX -= 1; |
| M.x86.R_DI += inc; |
| if (ACCESS_FLAG(F_ZF) == 0) |
| break; |
| } |
| M.x86.mode &= ~SYSMODE_PREFIX_REPE; |
| } else if (M.x86.mode & SYSMODE_PREFIX_REPNE) { |
| /* REPNE */ |
| /* move them until CX is ZERO. */ |
| while (M.x86.R_CX != 0) { |
| val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_byte(M.x86.R_AL, val2); |
| M.x86.R_CX -= 1; |
| M.x86.R_DI += inc; |
| if (ACCESS_FLAG(F_ZF)) |
| break; /* zero flag set means equal */ |
| } |
| M.x86.mode &= ~SYSMODE_PREFIX_REPNE; |
| } else { |
| val2 = fetch_data_byte_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_byte(M.x86.R_AL, val2); |
| M.x86.R_DI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xaf |
| ****************************************************************************/ |
| void x86emuOp_scas_word(u8 X86EMU_UNUSED(op1)) |
| { |
| int inc; |
| u32 val; |
| |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("SCAS\tDWORD\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -4; |
| else |
| inc = 4; |
| } else { |
| DECODE_PRINTF("SCAS\tWORD\n"); |
| if (ACCESS_FLAG(F_DF)) /* down */ |
| inc = -2; |
| else |
| inc = 2; |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_REPE) { |
| /* REPE */ |
| /* move them until CX is ZERO. */ |
| while (M.x86.R_CX != 0) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| val = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_long(M.x86.R_EAX, val); |
| } else { |
| val = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_word(M.x86.R_AX, (u16)val); |
| } |
| M.x86.R_CX -= 1; |
| M.x86.R_DI += inc; |
| if (ACCESS_FLAG(F_ZF) == 0) |
| break; |
| } |
| M.x86.mode &= ~SYSMODE_PREFIX_REPE; |
| } else if (M.x86.mode & SYSMODE_PREFIX_REPNE) { |
| /* REPNE */ |
| /* move them until CX is ZERO. */ |
| while (M.x86.R_CX != 0) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| val = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_long(M.x86.R_EAX, val); |
| } else { |
| val = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_word(M.x86.R_AX, (u16)val); |
| } |
| M.x86.R_CX -= 1; |
| M.x86.R_DI += inc; |
| if (ACCESS_FLAG(F_ZF)) |
| break; /* zero flag set means equal */ |
| } |
| M.x86.mode &= ~SYSMODE_PREFIX_REPNE; |
| } else { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| val = fetch_data_long_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_long(M.x86.R_EAX, val); |
| } else { |
| val = fetch_data_word_abs(M.x86.R_ES, M.x86.R_DI); |
| cmp_word(M.x86.R_AX, (u16)val); |
| } |
| M.x86.R_DI += inc; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xb0 - 0xb7 |
| ****************************************************************************/ |
| void x86emuOp_mov_byte_register_IMM(u8 op1) |
| { |
| u8 imm, *ptr; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| ptr = DECODE_RM_BYTE_REGISTER(op1 & 0x7); |
| DECODE_PRINTF(","); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| TRACE_AND_STEP(); |
| *ptr = imm; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xb8 - 0xbf |
| ****************************************************************************/ |
| void x86emuOp_mov_word_register_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u32 srcval; |
| |
| op1 &= 0x7; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *reg32; |
| reg32 = DECODE_RM_LONG_REGISTER(op1); |
| srcval = fetch_long_imm(); |
| DECODE_PRINTF2(",%x\n", srcval); |
| TRACE_AND_STEP(); |
| *reg32 = srcval; |
| } else { |
| u16 *reg16; |
| reg16 = DECODE_RM_WORD_REGISTER(op1); |
| srcval = fetch_word_imm(); |
| DECODE_PRINTF2(",%x\n", srcval); |
| TRACE_AND_STEP(); |
| *reg16 = (u16)srcval; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc0 |
| ****************************************************************************/ |
| void x86emuOp_opcC0_byte_RM_MEM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg; |
| uint destoffset; |
| u8 destval; |
| u8 amt; |
| |
| /* |
| * Yet another weirdo special case instruction format. Part of |
| * the opcode held below in "RH". Doubly nested case would |
| * result, except that the decoded instruction |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ROL\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("ROR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("RCL\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("RCR\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("SHL\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SHR\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("SAL\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("SAR\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| if (mod < 3) { |
| DECODE_PRINTF("BYTE PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| amt = fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", amt); |
| destval = fetch_data_byte(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD0_byte_operation[rh]) (destval, amt); |
| store_data_byte(destoffset, destval); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| amt = fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", amt); |
| TRACE_AND_STEP(); |
| destval = (*opcD0_byte_operation[rh]) (*destreg, amt); |
| *destreg = destval; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc1 |
| ****************************************************************************/ |
| void x86emuOp_opcC1_word_RM_MEM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| u8 amt; |
| |
| /* |
| * Yet another weirdo special case instruction format. Part of |
| * the opcode held below in "RH". Doubly nested case would |
| * result, except that the decoded instruction |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ROL\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("ROR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("RCL\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("RCR\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("SHL\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SHR\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("SAL\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("SAR\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| if (mod < 3) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| |
| DECODE_PRINTF("DWORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| amt = fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", amt); |
| destval = fetch_data_long(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD1_long_operation[rh]) (destval, amt); |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval; |
| |
| DECODE_PRINTF("WORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| amt = fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", amt); |
| destval = fetch_data_word(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD1_word_operation[rh]) (destval, amt); |
| store_data_word(destoffset, destval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| amt = fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", amt); |
| TRACE_AND_STEP(); |
| *destreg = (*opcD1_long_operation[rh]) (*destreg, amt); |
| } else { |
| u16 *destreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| amt = fetch_byte_imm(); |
| DECODE_PRINTF2(",%x\n", amt); |
| TRACE_AND_STEP(); |
| *destreg = (*opcD1_word_operation[rh]) (*destreg, amt); |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc2 |
| ****************************************************************************/ |
| void x86emuOp_ret_near_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 imm; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("RET\t"); |
| imm = fetch_word_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| RETURN_TRACE("RET",M.x86.saved_cs,M.x86.saved_ip); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = pop_word(); |
| M.x86.R_SP += imm; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc3 |
| ****************************************************************************/ |
| void x86emuOp_ret_near(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("RET\n"); |
| RETURN_TRACE("RET",M.x86.saved_cs,M.x86.saved_ip); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = pop_word(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc4 |
| ****************************************************************************/ |
| void x86emuOp_les_R_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rh, rl; |
| u16 *dstreg; |
| uint srcoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("LES\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| dstreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *dstreg = fetch_data_word(srcoffset); |
| M.x86.R_ES = fetch_data_word(srcoffset + 2); |
| } |
| /* else UNDEFINED! register to register */ |
| |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc5 |
| ****************************************************************************/ |
| void x86emuOp_lds_R_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rh, rl; |
| u16 *dstreg; |
| uint srcoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("LDS\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (mod < 3) { |
| dstreg = DECODE_RM_WORD_REGISTER(rh); |
| DECODE_PRINTF(","); |
| srcoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *dstreg = fetch_data_word(srcoffset); |
| M.x86.R_DS = fetch_data_word(srcoffset + 2); |
| } |
| /* else UNDEFINED! */ |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc6 |
| ****************************************************************************/ |
| void x86emuOp_mov_byte_RM_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg; |
| uint destoffset; |
| u8 imm; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (rh != 0) { |
| DECODE_PRINTF("ILLEGAL DECODE OF OPCODE c6\n"); |
| HALT_SYS(); |
| } |
| if (mod < 3) { |
| DECODE_PRINTF("BYTE PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2(",%2x\n", imm); |
| TRACE_AND_STEP(); |
| store_data_byte(destoffset, imm); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| imm = fetch_byte_imm(); |
| DECODE_PRINTF2(",%2x\n", imm); |
| TRACE_AND_STEP(); |
| *destreg = imm; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc7 |
| ****************************************************************************/ |
| void x86emuOp_mov_word_RM_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("MOV\t"); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| if (rh != 0) { |
| DECODE_PRINTF("ILLEGAL DECODE OF OPCODE 8F\n"); |
| HALT_SYS(); |
| } |
| if (mod < 3) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 imm; |
| |
| DECODE_PRINTF("DWORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| imm = fetch_long_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| store_data_long(destoffset, imm); |
| } else { |
| u16 imm; |
| |
| DECODE_PRINTF("WORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| imm = fetch_word_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| store_data_word(destoffset, imm); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| u32 imm; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| imm = fetch_long_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| *destreg = imm; |
| } else { |
| u16 *destreg; |
| u16 imm; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| imm = fetch_word_imm(); |
| DECODE_PRINTF2(",%x\n", imm); |
| TRACE_AND_STEP(); |
| *destreg = imm; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc8 |
| ****************************************************************************/ |
| void x86emuOp_enter(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 local,frame_pointer; |
| u8 nesting; |
| int i; |
| |
| START_OF_INSTR(); |
| local = fetch_word_imm(); |
| nesting = fetch_byte_imm(); |
| DECODE_PRINTF2("ENTER %x\n", local); |
| DECODE_PRINTF2(",%x\n", nesting); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_BP); |
| frame_pointer = M.x86.R_SP; |
| if (nesting > 0) { |
| for (i = 1; i < nesting; i++) { |
| M.x86.R_BP -= 2; |
| push_word(fetch_data_word_abs(M.x86.R_SS, M.x86.R_BP)); |
| } |
| push_word(frame_pointer); |
| } |
| M.x86.R_BP = frame_pointer; |
| M.x86.R_SP = (u16)(M.x86.R_SP - local); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xc9 |
| ****************************************************************************/ |
| void x86emuOp_leave(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("LEAVE\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_SP = M.x86.R_BP; |
| M.x86.R_BP = pop_word(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xca |
| ****************************************************************************/ |
| void x86emuOp_ret_far_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 imm; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("RETF\t"); |
| imm = fetch_word_imm(); |
| DECODE_PRINTF2("%x\n", imm); |
| RETURN_TRACE("RETF",M.x86.saved_cs,M.x86.saved_ip); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = pop_word(); |
| M.x86.R_CS = pop_word(); |
| M.x86.R_SP += imm; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xcb |
| ****************************************************************************/ |
| void x86emuOp_ret_far(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("RETF\n"); |
| RETURN_TRACE("RETF",M.x86.saved_cs,M.x86.saved_ip); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = pop_word(); |
| M.x86.R_CS = pop_word(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xcc |
| ****************************************************************************/ |
| void x86emuOp_int3(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 tmp; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("INT 3\n"); |
| tmp = (u16) mem_access_word(3 * 4 + 2); |
| /* access the segment register */ |
| TRACE_AND_STEP(); |
| if (_X86EMU_intrTab[3]) { |
| (*_X86EMU_intrTab[3])(3); |
| } else { |
| push_word((u16)M.x86.R_FLG); |
| CLEAR_FLAG(F_IF); |
| CLEAR_FLAG(F_TF); |
| push_word(M.x86.R_CS); |
| M.x86.R_CS = mem_access_word(3 * 4 + 2); |
| push_word(M.x86.R_IP); |
| M.x86.R_IP = mem_access_word(3 * 4); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xcd |
| ****************************************************************************/ |
| void x86emuOp_int_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 tmp; |
| u8 intnum; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("INT\t"); |
| intnum = fetch_byte_imm(); |
| DECODE_PRINTF2("%x\n", intnum); |
| tmp = mem_access_word(intnum * 4 + 2); |
| TRACE_AND_STEP(); |
| if (_X86EMU_intrTab[intnum]) { |
| (*_X86EMU_intrTab[intnum])(intnum); |
| } else { |
| push_word((u16)M.x86.R_FLG); |
| CLEAR_FLAG(F_IF); |
| CLEAR_FLAG(F_TF); |
| push_word(M.x86.R_CS); |
| M.x86.R_CS = mem_access_word(intnum * 4 + 2); |
| push_word(M.x86.R_IP); |
| M.x86.R_IP = mem_access_word(intnum * 4); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xce |
| ****************************************************************************/ |
| void x86emuOp_into(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 tmp; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("INTO\n"); |
| TRACE_AND_STEP(); |
| if (ACCESS_FLAG(F_OF)) { |
| tmp = mem_access_word(4 * 4 + 2); |
| if (_X86EMU_intrTab[4]) { |
| (*_X86EMU_intrTab[4])(4); |
| } else { |
| push_word((u16)M.x86.R_FLG); |
| CLEAR_FLAG(F_IF); |
| CLEAR_FLAG(F_TF); |
| push_word(M.x86.R_CS); |
| M.x86.R_CS = mem_access_word(4 * 4 + 2); |
| push_word(M.x86.R_IP); |
| M.x86.R_IP = mem_access_word(4 * 4); |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xcf |
| ****************************************************************************/ |
| void x86emuOp_iret(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("IRET\n"); |
| |
| TRACE_AND_STEP(); |
| |
| M.x86.R_IP = pop_word(); |
| M.x86.R_CS = pop_word(); |
| M.x86.R_FLG = pop_word(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xd0 |
| ****************************************************************************/ |
| void x86emuOp_opcD0_byte_RM_1(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg; |
| uint destoffset; |
| u8 destval; |
| |
| /* |
| * Yet another weirdo special case instruction format. Part of |
| * the opcode held below in "RH". Doubly nested case would |
| * result, except that the decoded instruction |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ROL\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("ROR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("RCL\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("RCR\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("SHL\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SHR\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("SAL\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("SAR\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| if (mod < 3) { |
| DECODE_PRINTF("BYTE PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(",1\n"); |
| destval = fetch_data_byte(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD0_byte_operation[rh]) (destval, 1); |
| store_data_byte(destoffset, destval); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF(",1\n"); |
| TRACE_AND_STEP(); |
| destval = (*opcD0_byte_operation[rh]) (*destreg, 1); |
| *destreg = destval; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xd1 |
| ****************************************************************************/ |
| void x86emuOp_opcD1_word_RM_1(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| /* |
| * Yet another weirdo special case instruction format. Part of |
| * the opcode held below in "RH". Doubly nested case would |
| * result, except that the decoded instruction |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ROL\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("ROR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("RCL\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("RCR\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("SHL\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SHR\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("SAL\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("SAR\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| if (mod < 3) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| |
| DECODE_PRINTF("DWORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(",1\n"); |
| destval = fetch_data_long(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD1_long_operation[rh]) (destval, 1); |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval; |
| |
| DECODE_PRINTF("WORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(",1\n"); |
| destval = fetch_data_word(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD1_word_operation[rh]) (destval, 1); |
| store_data_word(destoffset, destval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| u32 *destreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF(",1\n"); |
| TRACE_AND_STEP(); |
| destval = (*opcD1_long_operation[rh]) (*destreg, 1); |
| *destreg = destval; |
| } else { |
| u16 destval; |
| u16 *destreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF(",1\n"); |
| TRACE_AND_STEP(); |
| destval = (*opcD1_word_operation[rh]) (*destreg, 1); |
| *destreg = destval; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xd2 |
| ****************************************************************************/ |
| void x86emuOp_opcD2_byte_RM_CL(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg; |
| uint destoffset; |
| u8 destval; |
| u8 amt; |
| |
| /* |
| * Yet another weirdo special case instruction format. Part of |
| * the opcode held below in "RH". Doubly nested case would |
| * result, except that the decoded instruction |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ROL\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("ROR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("RCL\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("RCR\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("SHL\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SHR\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("SAL\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("SAR\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| amt = M.x86.R_CL; |
| if (mod < 3) { |
| DECODE_PRINTF("BYTE PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(",CL\n"); |
| destval = fetch_data_byte(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD0_byte_operation[rh]) (destval, amt); |
| store_data_byte(destoffset, destval); |
| } else { /* register to register */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF(",CL\n"); |
| TRACE_AND_STEP(); |
| destval = (*opcD0_byte_operation[rh]) (*destreg, amt); |
| *destreg = destval; |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xd3 |
| ****************************************************************************/ |
| void x86emuOp_opcD3_word_RM_CL(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| u8 amt; |
| |
| /* |
| * Yet another weirdo special case instruction format. Part of |
| * the opcode held below in "RH". Doubly nested case would |
| * result, except that the decoded instruction |
| */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("ROL\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("ROR\t"); |
| break; |
| case 2: |
| DECODE_PRINTF("RCL\t"); |
| break; |
| case 3: |
| DECODE_PRINTF("RCR\t"); |
| break; |
| case 4: |
| DECODE_PRINTF("SHL\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("SHR\t"); |
| break; |
| case 6: |
| DECODE_PRINTF("SAL\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("SAR\t"); |
| break; |
| } |
| } |
| #endif |
| /* know operation, decode the mod byte to find the addressing |
| mode. */ |
| amt = M.x86.R_CL; |
| if (mod < 3) { |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| |
| DECODE_PRINTF("DWORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(",CL\n"); |
| destval = fetch_data_long(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD1_long_operation[rh]) (destval, amt); |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval; |
| |
| DECODE_PRINTF("WORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF(",CL\n"); |
| destval = fetch_data_word(destoffset); |
| TRACE_AND_STEP(); |
| destval = (*opcD1_word_operation[rh]) (destval, amt); |
| store_data_word(destoffset, destval); |
| } |
| } else { /* register to register */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF(",CL\n"); |
| TRACE_AND_STEP(); |
| *destreg = (*opcD1_long_operation[rh]) (*destreg, amt); |
| } else { |
| u16 *destreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF(",CL\n"); |
| TRACE_AND_STEP(); |
| *destreg = (*opcD1_word_operation[rh]) (*destreg, amt); |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xd4 |
| ****************************************************************************/ |
| void x86emuOp_aam(u8 X86EMU_UNUSED(op1)) |
| { |
| u8 a; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("AAM\n"); |
| a = fetch_byte_imm(); /* this is a stupid encoding. */ |
| if (a != 10) { |
| DECODE_PRINTF("ERROR DECODING AAM\n"); |
| TRACE_REGS(); |
| HALT_SYS(); |
| } |
| TRACE_AND_STEP(); |
| /* note the type change here --- returning AL and AH in AX. */ |
| M.x86.R_AX = aam_word(M.x86.R_AL); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xd5 |
| ****************************************************************************/ |
| void x86emuOp_aad(u8 X86EMU_UNUSED(op1)) |
| { |
| u8 a; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("AAD\n"); |
| a = fetch_byte_imm(); |
| TRACE_AND_STEP(); |
| M.x86.R_AX = aad_word(M.x86.R_AX); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /* opcode 0xd6 ILLEGAL OPCODE */ |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xd7 |
| ****************************************************************************/ |
| void x86emuOp_xlat(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 addr; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("XLAT\n"); |
| TRACE_AND_STEP(); |
| addr = (u16)(M.x86.R_BX + (u8)M.x86.R_AL); |
| M.x86.R_AL = fetch_data_byte(addr); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /* instuctions D8 .. DF are in i87_ops.c */ |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe0 |
| ****************************************************************************/ |
| void x86emuOp_loopne(u8 X86EMU_UNUSED(op1)) |
| { |
| s16 ip; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("LOOPNE\t"); |
| ip = (s8) fetch_byte_imm(); |
| ip += (s16) M.x86.R_IP; |
| DECODE_PRINTF2("%04x\n", ip); |
| TRACE_AND_STEP(); |
| M.x86.R_CX -= 1; |
| if (M.x86.R_CX != 0 && !ACCESS_FLAG(F_ZF)) /* CX != 0 and !ZF */ |
| M.x86.R_IP = ip; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe1 |
| ****************************************************************************/ |
| void x86emuOp_loope(u8 X86EMU_UNUSED(op1)) |
| { |
| s16 ip; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("LOOPE\t"); |
| ip = (s8) fetch_byte_imm(); |
| ip += (s16) M.x86.R_IP; |
| DECODE_PRINTF2("%04x\n", ip); |
| TRACE_AND_STEP(); |
| M.x86.R_CX -= 1; |
| if (M.x86.R_CX != 0 && ACCESS_FLAG(F_ZF)) /* CX != 0 and ZF */ |
| M.x86.R_IP = ip; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe2 |
| ****************************************************************************/ |
| void x86emuOp_loop(u8 X86EMU_UNUSED(op1)) |
| { |
| s16 ip; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("LOOP\t"); |
| ip = (s8) fetch_byte_imm(); |
| ip += (s16) M.x86.R_IP; |
| DECODE_PRINTF2("%04x\n", ip); |
| TRACE_AND_STEP(); |
| M.x86.R_CX -= 1; |
| if (M.x86.R_CX != 0) |
| M.x86.R_IP = ip; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe3 |
| ****************************************************************************/ |
| void x86emuOp_jcxz(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 target; |
| s8 offset; |
| |
| /* jump to byte offset if overflow flag is set */ |
| START_OF_INSTR(); |
| DECODE_PRINTF("JCXZ\t"); |
| offset = (s8)fetch_byte_imm(); |
| target = (u16)(M.x86.R_IP + offset); |
| DECODE_PRINTF2("%x\n", target); |
| TRACE_AND_STEP(); |
| if (M.x86.R_CX == 0) |
| M.x86.R_IP = target; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe4 |
| ****************************************************************************/ |
| void x86emuOp_in_byte_AL_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u8 port; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("IN\t"); |
| port = (u8) fetch_byte_imm(); |
| DECODE_PRINTF2("%x,AL\n", port); |
| TRACE_AND_STEP(); |
| M.x86.R_AL = (*sys_inb)(port); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe5 |
| ****************************************************************************/ |
| void x86emuOp_in_word_AX_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u8 port; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("IN\t"); |
| port = (u8) fetch_byte_imm(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF2("EAX,%x\n", port); |
| } else { |
| DECODE_PRINTF2("AX,%x\n", port); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| M.x86.R_EAX = (*sys_inl)(port); |
| } else { |
| M.x86.R_AX = (*sys_inw)(port); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe6 |
| ****************************************************************************/ |
| void x86emuOp_out_byte_IMM_AL(u8 X86EMU_UNUSED(op1)) |
| { |
| u8 port; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("OUT\t"); |
| port = (u8) fetch_byte_imm(); |
| DECODE_PRINTF2("%x,AL\n", port); |
| TRACE_AND_STEP(); |
| (*sys_outb)(port, M.x86.R_AL); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe7 |
| ****************************************************************************/ |
| void x86emuOp_out_word_IMM_AX(u8 X86EMU_UNUSED(op1)) |
| { |
| u8 port; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("OUT\t"); |
| port = (u8) fetch_byte_imm(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF2("%x,EAX\n", port); |
| } else { |
| DECODE_PRINTF2("%x,AX\n", port); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| (*sys_outl)(port, M.x86.R_EAX); |
| } else { |
| (*sys_outw)(port, M.x86.R_AX); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe8 |
| ****************************************************************************/ |
| void x86emuOp_call_near_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| s16 ip; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("CALL\t"); |
| ip = (s16) fetch_word_imm(); |
| ip += (s16) M.x86.R_IP; /* CHECK SIGN */ |
| DECODE_PRINTF2("%04x\n", ip); |
| CALL_TRACE(M.x86.saved_cs, M.x86.saved_ip, M.x86.R_CS, ip, ""); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_IP); |
| M.x86.R_IP = ip; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xe9 |
| ****************************************************************************/ |
| void x86emuOp_jump_near_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| int ip; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("JMP\t"); |
| ip = (s16)fetch_word_imm(); |
| ip += (s16)M.x86.R_IP; |
| DECODE_PRINTF2("%04x\n", ip); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = (u16)ip; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xea |
| ****************************************************************************/ |
| void x86emuOp_jump_far_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 cs, ip; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("JMP\tFAR "); |
| ip = fetch_word_imm(); |
| cs = fetch_word_imm(); |
| DECODE_PRINTF2("%04x:", cs); |
| DECODE_PRINTF2("%04x\n", ip); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = ip; |
| M.x86.R_CS = cs; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xeb |
| ****************************************************************************/ |
| void x86emuOp_jump_byte_IMM(u8 X86EMU_UNUSED(op1)) |
| { |
| u16 target; |
| s8 offset; |
| |
| START_OF_INSTR(); |
| DECODE_PRINTF("JMP\t"); |
| offset = (s8)fetch_byte_imm(); |
| target = (u16)(M.x86.R_IP + offset); |
| DECODE_PRINTF2("%x\n", target); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = target; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xec |
| ****************************************************************************/ |
| void x86emuOp_in_byte_AL_DX(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("IN\tAL,DX\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_AL = (*sys_inb)(M.x86.R_DX); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xed |
| ****************************************************************************/ |
| void x86emuOp_in_word_AX_DX(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("IN\tEAX,DX\n"); |
| } else { |
| DECODE_PRINTF("IN\tAX,DX\n"); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| M.x86.R_EAX = (*sys_inl)(M.x86.R_DX); |
| } else { |
| M.x86.R_AX = (*sys_inw)(M.x86.R_DX); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xee |
| ****************************************************************************/ |
| void x86emuOp_out_byte_DX_AL(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("OUT\tDX,AL\n"); |
| TRACE_AND_STEP(); |
| (*sys_outb)(M.x86.R_DX, M.x86.R_AL); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xef |
| ****************************************************************************/ |
| void x86emuOp_out_word_DX_AX(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("OUT\tDX,EAX\n"); |
| } else { |
| DECODE_PRINTF("OUT\tDX,AX\n"); |
| } |
| TRACE_AND_STEP(); |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| (*sys_outl)(M.x86.R_DX, M.x86.R_EAX); |
| } else { |
| (*sys_outw)(M.x86.R_DX, M.x86.R_AX); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf0 |
| ****************************************************************************/ |
| void x86emuOp_lock(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("LOCK:\n"); |
| TRACE_AND_STEP(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /*opcode 0xf1 ILLEGAL OPERATION */ |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf2 |
| ****************************************************************************/ |
| void x86emuOp_repne(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("REPNE\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_PREFIX_REPNE; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf3 |
| ****************************************************************************/ |
| void x86emuOp_repe(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("REPE\n"); |
| TRACE_AND_STEP(); |
| M.x86.mode |= SYSMODE_PREFIX_REPE; |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf4 |
| ****************************************************************************/ |
| void x86emuOp_halt(u8 X86EMU_UNUSED(op1)) |
| { |
| START_OF_INSTR(); |
| DECODE_PRINTF("HALT\n"); |
| TRACE_AND_STEP(); |
| HALT_SYS(); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf5 |
| ****************************************************************************/ |
| void x86emuOp_cmc(u8 X86EMU_UNUSED(op1)) |
| { |
| /* complement the carry flag. */ |
| START_OF_INSTR(); |
| DECODE_PRINTF("CMC\n"); |
| TRACE_AND_STEP(); |
| TOGGLE_FLAG(F_CF); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf6 |
| ****************************************************************************/ |
| void x86emuOp_opcF6_byte_RM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| u8 *destreg; |
| uint destoffset; |
| u8 destval, srcval; |
| |
| /* long, drawn out code follows. Double switch for a total |
| of 32 cases. */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| DECODE_PRINTF(opF6_names[rh]); |
| if (mod < 3) { |
| DECODE_PRINTF("BYTE PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| destval = fetch_data_byte(destoffset); |
| |
| switch (rh) { |
| case 0: /* test byte imm */ |
| DECODE_PRINTF(","); |
| srcval = fetch_byte_imm(); |
| DECODE_PRINTF2("%02x\n", srcval); |
| TRACE_AND_STEP(); |
| test_byte(destval, srcval); |
| break; |
| case 1: |
| DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F6\n"); |
| HALT_SYS(); |
| break; |
| case 2: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = not_byte(destval); |
| store_data_byte(destoffset, destval); |
| break; |
| case 3: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = neg_byte(destval); |
| store_data_byte(destoffset, destval); |
| break; |
| case 4: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| mul_byte(destval); |
| break; |
| case 5: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| imul_byte(destval); |
| break; |
| case 6: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| div_byte(destval); |
| break; |
| default: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| idiv_byte(destval); |
| break; |
| } |
| } else { /* mod=11 */ |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| switch (rh) { |
| case 0: /* test byte imm */ |
| DECODE_PRINTF(","); |
| srcval = fetch_byte_imm(); |
| DECODE_PRINTF2("%02x\n", srcval); |
| TRACE_AND_STEP(); |
| test_byte(*destreg, srcval); |
| break; |
| case 1: |
| DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F6\n"); |
| HALT_SYS(); |
| break; |
| case 2: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = not_byte(*destreg); |
| break; |
| case 3: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = neg_byte(*destreg); |
| break; |
| case 4: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| mul_byte(*destreg); /*!!! */ |
| break; |
| case 5: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| imul_byte(*destreg); |
| break; |
| case 6: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| div_byte(*destreg); |
| break; |
| default: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| idiv_byte(*destreg); |
| break; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf7 |
| ****************************************************************************/ |
| void x86emuOp_opcF7_word_RM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rl, rh; |
| uint destoffset; |
| |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| DECODE_PRINTF(opF6_names[rh]); |
| if (mod < 3) { |
| |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval, srcval; |
| |
| DECODE_PRINTF("DWORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| destval = fetch_data_long(destoffset); |
| |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF(","); |
| srcval = fetch_long_imm(); |
| DECODE_PRINTF2("%x\n", srcval); |
| TRACE_AND_STEP(); |
| test_long(destval, srcval); |
| break; |
| case 1: |
| DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F7\n"); |
| HALT_SYS(); |
| break; |
| case 2: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = not_long(destval); |
| store_data_long(destoffset, destval); |
| break; |
| case 3: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = neg_long(destval); |
| store_data_long(destoffset, destval); |
| break; |
| case 4: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| mul_long(destval); |
| break; |
| case 5: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| imul_long(destval); |
| break; |
| case 6: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| div_long(destval); |
| break; |
| case 7: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| idiv_long(destval); |
| break; |
| } |
| } else { |
| u16 destval, srcval; |
| |
| DECODE_PRINTF("WORD PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| destval = fetch_data_word(destoffset); |
| |
| switch (rh) { |
| case 0: /* test word imm */ |
| DECODE_PRINTF(","); |
| srcval = fetch_word_imm(); |
| DECODE_PRINTF2("%x\n", srcval); |
| TRACE_AND_STEP(); |
| test_word(destval, srcval); |
| break; |
| case 1: |
| DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F7\n"); |
| HALT_SYS(); |
| break; |
| case 2: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = not_word(destval); |
| store_data_word(destoffset, destval); |
| break; |
| case 3: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| destval = neg_word(destval); |
| store_data_word(destoffset, destval); |
| break; |
| case 4: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| mul_word(destval); |
| break; |
| case 5: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| imul_word(destval); |
| break; |
| case 6: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| div_word(destval); |
| break; |
| case 7: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| idiv_word(destval); |
| break; |
| } |
| } |
| |
| } else { /* mod=11 */ |
| |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| u32 srcval; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| |
| switch (rh) { |
| case 0: /* test word imm */ |
| DECODE_PRINTF(","); |
| srcval = fetch_long_imm(); |
| DECODE_PRINTF2("%x\n", srcval); |
| TRACE_AND_STEP(); |
| test_long(*destreg, srcval); |
| break; |
| case 1: |
| DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F6\n"); |
| HALT_SYS(); |
| break; |
| case 2: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = not_long(*destreg); |
| break; |
| case 3: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = neg_long(*destreg); |
| break; |
| case 4: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| mul_long(*destreg); /*!!! */ |
| break; |
| case 5: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| imul_long(*destreg); |
| break; |
| case 6: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| div_long(*destreg); |
| break; |
| case 7: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| idiv_long(*destreg); |
| break; |
| } |
| } else { |
| u16 *destreg; |
| u16 srcval; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| |
| switch (rh) { |
| case 0: /* test word imm */ |
| DECODE_PRINTF(","); |
| srcval = fetch_word_imm(); |
| DECODE_PRINTF2("%x\n", srcval); |
| TRACE_AND_STEP(); |
| test_word(*destreg, srcval); |
| break; |
| case 1: |
| DECODE_PRINTF("ILLEGAL OP MOD=00 RH=01 OP=F6\n"); |
| HALT_SYS(); |
| break; |
| case 2: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = not_word(*destreg); |
| break; |
| case 3: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = neg_word(*destreg); |
| break; |
| case 4: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| mul_word(*destreg); /*!!! */ |
| break; |
| case 5: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| imul_word(*destreg); |
| break; |
| case 6: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| div_word(*destreg); |
| break; |
| case 7: |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| idiv_word(*destreg); |
| break; |
| } |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf8 |
| ****************************************************************************/ |
| void x86emuOp_clc(u8 X86EMU_UNUSED(op1)) |
| { |
| /* clear the carry flag. */ |
| START_OF_INSTR(); |
| DECODE_PRINTF("CLC\n"); |
| TRACE_AND_STEP(); |
| CLEAR_FLAG(F_CF); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xf9 |
| ****************************************************************************/ |
| void x86emuOp_stc(u8 X86EMU_UNUSED(op1)) |
| { |
| /* set the carry flag. */ |
| START_OF_INSTR(); |
| DECODE_PRINTF("STC\n"); |
| TRACE_AND_STEP(); |
| SET_FLAG(F_CF); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xfa |
| ****************************************************************************/ |
| void x86emuOp_cli(u8 X86EMU_UNUSED(op1)) |
| { |
| /* clear interrupts. */ |
| START_OF_INSTR(); |
| DECODE_PRINTF("CLI\n"); |
| TRACE_AND_STEP(); |
| CLEAR_FLAG(F_IF); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xfb |
| ****************************************************************************/ |
| void x86emuOp_sti(u8 X86EMU_UNUSED(op1)) |
| { |
| /* enable interrupts. */ |
| START_OF_INSTR(); |
| DECODE_PRINTF("STI\n"); |
| TRACE_AND_STEP(); |
| SET_FLAG(F_IF); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xfc |
| ****************************************************************************/ |
| void x86emuOp_cld(u8 X86EMU_UNUSED(op1)) |
| { |
| /* clear interrupts. */ |
| START_OF_INSTR(); |
| DECODE_PRINTF("CLD\n"); |
| TRACE_AND_STEP(); |
| CLEAR_FLAG(F_DF); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xfd |
| ****************************************************************************/ |
| void x86emuOp_std(u8 X86EMU_UNUSED(op1)) |
| { |
| /* clear interrupts. */ |
| START_OF_INSTR(); |
| DECODE_PRINTF("STD\n"); |
| TRACE_AND_STEP(); |
| SET_FLAG(F_DF); |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xfe |
| ****************************************************************************/ |
| void x86emuOp_opcFE_byte_RM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rh, rl; |
| u8 destval; |
| uint destoffset; |
| u8 *destreg; |
| |
| /* Yet another special case instruction. */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| |
| switch (rh) { |
| case 0: |
| DECODE_PRINTF("INC\t"); |
| break; |
| case 1: |
| DECODE_PRINTF("DEC\t"); |
| break; |
| case 2: |
| case 3: |
| case 4: |
| case 5: |
| case 6: |
| case 7: |
| DECODE_PRINTF2("ILLEGAL OP MAJOR OP 0xFE MINOR OP %x \n", mod); |
| HALT_SYS(); |
| break; |
| } |
| } |
| #endif |
| if (mod < 3) { |
| DECODE_PRINTF("BYTE PTR "); |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF("\n"); |
| destval = fetch_data_byte(destoffset); |
| TRACE_AND_STEP(); |
| if (rh == 0) |
| destval = inc_byte(destval); |
| else |
| destval = dec_byte(destval); |
| store_data_byte(destoffset, destval); |
| } else { |
| destreg = DECODE_RM_BYTE_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| if (rh == 0) |
| *destreg = inc_byte(*destreg); |
| else |
| *destreg = dec_byte(*destreg); |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /**************************************************************************** |
| REMARKS: |
| Handles opcode 0xff |
| ****************************************************************************/ |
| void x86emuOp_opcFF_word_RM(u8 X86EMU_UNUSED(op1)) |
| { |
| int mod, rh, rl; |
| uint destoffset = 0; |
| u16 *destreg; |
| u16 destval,destval2; |
| |
| /* Yet another special case instruction. */ |
| START_OF_INSTR(); |
| FETCH_DECODE_MODRM(mod, rh, rl); |
| #ifdef DEBUG |
| if (DEBUG_DECODE()) { |
| /* XXX DECODE_PRINTF may be changed to something more |
| general, so that it is important to leave the strings |
| in the same format, even though the result is that the |
| above test is done twice. */ |
| |
| switch (rh) { |
| case 0: |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("INC\tDWORD PTR "); |
| } else { |
| DECODE_PRINTF("INC\tWORD PTR "); |
| } |
| break; |
| case 1: |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| DECODE_PRINTF("DEC\tDWORD PTR "); |
| } else { |
| DECODE_PRINTF("DEC\tWORD PTR "); |
| } |
| break; |
| case 2: |
| DECODE_PRINTF("CALL\t "); |
| break; |
| case 3: |
| DECODE_PRINTF("CALL\tFAR "); |
| break; |
| case 4: |
| DECODE_PRINTF("JMP\t"); |
| break; |
| case 5: |
| DECODE_PRINTF("JMP\tFAR "); |
| break; |
| case 6: |
| DECODE_PRINTF("PUSH\t"); |
| break; |
| case 7: |
| DECODE_PRINTF("ILLEGAL DECODING OF OPCODE FF\t"); |
| HALT_SYS(); |
| break; |
| } |
| } |
| #endif |
| if (mod < 3) { |
| destoffset = decode_rmXX_address(mod, rl); |
| DECODE_PRINTF("\n"); |
| switch (rh) { |
| case 0: /* inc word ptr ... */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| |
| destval = fetch_data_long(destoffset); |
| TRACE_AND_STEP(); |
| destval = inc_long(destval); |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval; |
| |
| destval = fetch_data_word(destoffset); |
| TRACE_AND_STEP(); |
| destval = inc_word(destval); |
| store_data_word(destoffset, destval); |
| } |
| break; |
| case 1: /* dec word ptr ... */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| |
| destval = fetch_data_long(destoffset); |
| TRACE_AND_STEP(); |
| destval = dec_long(destval); |
| store_data_long(destoffset, destval); |
| } else { |
| u16 destval; |
| |
| destval = fetch_data_word(destoffset); |
| TRACE_AND_STEP(); |
| destval = dec_word(destval); |
| store_data_word(destoffset, destval); |
| } |
| break; |
| case 2: /* call word ptr ... */ |
| destval = fetch_data_word(destoffset); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_IP); |
| M.x86.R_IP = destval; |
| break; |
| case 3: /* call far ptr ... */ |
| destval = fetch_data_word(destoffset); |
| destval2 = fetch_data_word(destoffset + 2); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_CS); |
| M.x86.R_CS = destval2; |
| push_word(M.x86.R_IP); |
| M.x86.R_IP = destval; |
| break; |
| case 4: /* jmp word ptr ... */ |
| destval = fetch_data_word(destoffset); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = destval; |
| break; |
| case 5: /* jmp far ptr ... */ |
| destval = fetch_data_word(destoffset); |
| destval2 = fetch_data_word(destoffset + 2); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = destval; |
| M.x86.R_CS = destval2; |
| break; |
| case 6: /* push word ptr ... */ |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 destval; |
| |
| destval = fetch_data_long(destoffset); |
| TRACE_AND_STEP(); |
| push_long(destval); |
| } else { |
| u16 destval; |
| |
| destval = fetch_data_word(destoffset); |
| TRACE_AND_STEP(); |
| push_word(destval); |
| } |
| break; |
| } |
| } else { |
| switch (rh) { |
| case 0: |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = inc_long(*destreg); |
| } else { |
| u16 *destreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = inc_word(*destreg); |
| } |
| break; |
| case 1: |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = dec_long(*destreg); |
| } else { |
| u16 *destreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| *destreg = dec_word(*destreg); |
| } |
| break; |
| case 2: /* call word ptr ... */ |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| push_word(M.x86.R_IP); |
| M.x86.R_IP = *destreg; |
| break; |
| case 3: /* jmp far ptr ... */ |
| DECODE_PRINTF("OPERATION UNDEFINED 0XFF \n"); |
| TRACE_AND_STEP(); |
| HALT_SYS(); |
| break; |
| |
| case 4: /* jmp ... */ |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| M.x86.R_IP = (u16) (*destreg); |
| break; |
| case 5: /* jmp far ptr ... */ |
| DECODE_PRINTF("OPERATION UNDEFINED 0XFF \n"); |
| TRACE_AND_STEP(); |
| HALT_SYS(); |
| break; |
| case 6: |
| if (M.x86.mode & SYSMODE_PREFIX_DATA) { |
| u32 *destreg; |
| |
| destreg = DECODE_RM_LONG_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| push_long(*destreg); |
| } else { |
| u16 *destreg; |
| |
| destreg = DECODE_RM_WORD_REGISTER(rl); |
| DECODE_PRINTF("\n"); |
| TRACE_AND_STEP(); |
| push_word(*destreg); |
| } |
| break; |
| } |
| } |
| DECODE_CLEAR_SEGOVR(); |
| END_OF_INSTR(); |
| } |
| |
| /*************************************************************************** |
| * Single byte operation code table: |
| **************************************************************************/ |
| void (*x86emu_optab[256])(u8) __attribute__ ((section(".got2"))) = |
| { |
| /* 0x00 */ x86emuOp_genop_byte_RM_R, |
| /* 0x01 */ x86emuOp_genop_word_RM_R, |
| /* 0x02 */ x86emuOp_genop_byte_R_RM, |
| /* 0x03 */ x86emuOp_genop_word_R_RM, |
| /* 0x04 */ x86emuOp_genop_byte_AL_IMM, |
| /* 0x05 */ x86emuOp_genop_word_AX_IMM, |
| /* 0x06 */ x86emuOp_push_ES, |
| /* 0x07 */ x86emuOp_pop_ES, |
| |
| /* 0x08 */ x86emuOp_genop_byte_RM_R, |
| /* 0x09 */ x86emuOp_genop_word_RM_R, |
| /* 0x0a */ x86emuOp_genop_byte_R_RM, |
| /* 0x0b */ x86emuOp_genop_word_R_RM, |
| /* 0x0c */ x86emuOp_genop_byte_AL_IMM, |
| /* 0x0d */ x86emuOp_genop_word_AX_IMM, |
| /* 0x0e */ x86emuOp_push_CS, |
| /* 0x0f */ x86emuOp_two_byte, |
| |
| /* 0x10 */ x86emuOp_genop_byte_RM_R, |
| /* 0x11 */ x86emuOp_genop_word_RM_R, |
| /* 0x12 */ x86emuOp_genop_byte_R_RM, |
| /* 0x13 */ x86emuOp_genop_word_R_RM, |
| /* 0x14 */ x86emuOp_genop_byte_AL_IMM, |
| /* 0x15 */ x86emuOp_genop_word_AX_IMM, |
| /* 0x16 */ x86emuOp_push_SS, |
| /* 0x17 */ x86emuOp_pop_SS, |
| |
| /* 0x18 */ x86emuOp_genop_byte_RM_R, |
| /* 0x19 */ x86emuOp_genop_word_RM_R, |
| /* 0x1a */ x86emuOp_genop_byte_R_RM, |
| /* 0x1b */ x86emuOp_genop_word_R_RM, |
| /* 0x1c */ x86emuOp_genop_byte_AL_IMM, |
| /* 0x1d */ x86emuOp_genop_word_AX_IMM, |
| /* 0x1e */ x86emuOp_push_DS, |
| /* 0x1f */ x86emuOp_pop_DS, |
| |
| /* 0x20 */ x86emuOp_genop_byte_RM_R, |
| /* 0x21 */ x86emuOp_genop_word_RM_R, |
| /* 0x22 */ x86emuOp_genop_byte_R_RM, |
| /* 0x23 */ x86emuOp_genop_word_R_RM, |
| /* 0x24 */ x86emuOp_genop_byte_AL_IMM, |
| /* 0x25 */ x86emuOp_genop_word_AX_IMM, |
| /* 0x26 */ x86emuOp_segovr_ES, |
| /* 0x27 */ x86emuOp_daa, |
| |
| /* 0x28 */ x86emuOp_genop_byte_RM_R, |
| /* 0x29 */ x86emuOp_genop_word_RM_R, |
| /* 0x2a */ x86emuOp_genop_byte_R_RM, |
| /* 0x2b */ x86emuOp_genop_word_R_RM, |
| /* 0x2c */ x86emuOp_genop_byte_AL_IMM, |
| /* 0x2d */ x86emuOp_genop_word_AX_IMM, |
| /* 0x2e */ x86emuOp_segovr_CS, |
| /* 0x2f */ x86emuOp_das, |
| |
| /* 0x30 */ x86emuOp_genop_byte_RM_R, |
| /* 0x31 */ x86emuOp_genop_word_RM_R, |
| /* 0x32 */ x86emuOp_genop_byte_R_RM, |
| /* 0x33 */ x86emuOp_genop_word_R_RM, |
| /* 0x34 */ x86emuOp_genop_byte_AL_IMM, |
| /* 0x35 */ x86emuOp_genop_word_AX_IMM, |
| /* 0x36 */ x86emuOp_segovr_SS, |
| /* 0x37 */ x86emuOp_aaa, |
| |
| /* 0x38 */ x86emuOp_genop_byte_RM_R, |
| /* 0x39 */ x86emuOp_genop_word_RM_R, |
| /* 0x3a */ x86emuOp_genop_byte_R_RM, |
| /* 0x3b */ x86emuOp_genop_word_R_RM, |
| /* 0x3c */ x86emuOp_genop_byte_AL_IMM, |
| /* 0x3d */ x86emuOp_genop_word_AX_IMM, |
| /* 0x3e */ x86emuOp_segovr_DS, |
| /* 0x3f */ x86emuOp_aas, |
| |
| /* 0x40 */ x86emuOp_inc_register, |
| /* 0x41 */ x86emuOp_inc_register, |
| /* 0x42 */ x86emuOp_inc_register, |
| /* 0x43 */ x86emuOp_inc_register, |
| /* 0x44 */ x86emuOp_inc_register, |
| /* 0x45 */ x86emuOp_inc_register, |
| /* 0x46 */ x86emuOp_inc_register, |
| /* 0x47 */ x86emuOp_inc_register, |
| |
| /* 0x48 */ x86emuOp_dec_register, |
| /* 0x49 */ x86emuOp_dec_register, |
| /* 0x4a */ x86emuOp_dec_register, |
| /* 0x4b */ x86emuOp_dec_register, |
| /* 0x4c */ x86emuOp_dec_register, |
| /* 0x4d */ x86emuOp_dec_register, |
| /* 0x4e */ x86emuOp_dec_register, |
| /* 0x4f */ x86emuOp_dec_register, |
| |
| /* 0x50 */ x86emuOp_push_register, |
| /* 0x51 */ x86emuOp_push_register, |
| /* 0x52 */ x86emuOp_push_register, |
| /* 0x53 */ x86emuOp_push_register, |
| /* 0x54 */ x86emuOp_push_register, |
| /* 0x55 */ x86emuOp_push_register, |
| /* 0x56 */ x86emuOp_push_register, |
| /* 0x57 */ x86emuOp_push_register, |
| |
| /* 0x58 */ x86emuOp_pop_register, |
| /* 0x59 */ x86emuOp_pop_register, |
| /* 0x5a */ x86emuOp_pop_register, |
| /* 0x5b */ x86emuOp_pop_register, |
| /* 0x5c */ x86emuOp_pop_register, |
| /* 0x5d */ x86emuOp_pop_register, |
| /* 0x5e */ x86emuOp_pop_register, |
| /* 0x5f */ x86emuOp_pop_register, |
| |
| /* 0x60 */ x86emuOp_push_all, |
| /* 0x61 */ x86emuOp_pop_all, |
| /* 0x62 */ x86emuOp_illegal_op, /* bound */ |
| /* 0x63 */ x86emuOp_illegal_op, /* arpl */ |
| /* 0x64 */ x86emuOp_segovr_FS, |
| /* 0x65 */ x86emuOp_segovr_GS, |
| /* 0x66 */ x86emuOp_prefix_data, |
| /* 0x67 */ x86emuOp_prefix_addr, |
| |
| /* 0x68 */ x86emuOp_push_word_IMM, |
| /* 0x69 */ x86emuOp_imul_word_IMM, |
| /* 0x6a */ x86emuOp_push_byte_IMM, |
| /* 0x6b */ x86emuOp_imul_byte_IMM, |
| /* 0x6c */ x86emuOp_ins_byte, |
| /* 0x6d */ x86emuOp_ins_word, |
| /* 0x6e */ x86emuOp_outs_byte, |
| /* 0x6f */ x86emuOp_outs_word, |
| |
| /* 0x70 */ x86emuOp_jump_near_cond, |
| /* 0x71 */ x86emuOp_jump_near_cond, |
| /* 0x72 */ x86emuOp_jump_near_cond, |
| /* 0x73 */ x86emuOp_jump_near_cond, |
| /* 0x74 */ x86emuOp_jump_near_cond, |
| /* 0x75 */ x86emuOp_jump_near_cond, |
| /* 0x76 */ x86emuOp_jump_near_cond, |
| /* 0x77 */ x86emuOp_jump_near_cond, |
| |
| /* 0x78 */ x86emuOp_jump_near_cond, |
| /* 0x79 */ x86emuOp_jump_near_cond, |
| /* 0x7a */ x86emuOp_jump_near_cond, |
| /* 0x7b */ x86emuOp_jump_near_cond, |
| /* 0x7c */ x86emuOp_jump_near_cond, |
| /* 0x7d */ x86emuOp_jump_near_cond, |
| /* 0x7e */ x86emuOp_jump_near_cond, |
| /* 0x7f */ x86emuOp_jump_near_cond, |
| |
| /* 0x80 */ x86emuOp_opc80_byte_RM_IMM, |
| /* 0x81 */ x86emuOp_opc81_word_RM_IMM, |
| /* 0x82 */ x86emuOp_opc82_byte_RM_IMM, |
| /* 0x83 */ x86emuOp_opc83_word_RM_IMM, |
| /* 0x84 */ x86emuOp_test_byte_RM_R, |
| /* 0x85 */ x86emuOp_test_word_RM_R, |
| /* 0x86 */ x86emuOp_xchg_byte_RM_R, |
| /* 0x87 */ x86emuOp_xchg_word_RM_R, |
| |
| /* 0x88 */ x86emuOp_mov_byte_RM_R, |
| /* 0x89 */ x86emuOp_mov_word_RM_R, |
| /* 0x8a */ x86emuOp_mov_byte_R_RM, |
| /* 0x8b */ x86emuOp_mov_word_R_RM, |
| /* 0x8c */ x86emuOp_mov_word_RM_SR, |
| /* 0x8d */ x86emuOp_lea_word_R_M, |
| /* 0x8e */ x86emuOp_mov_word_SR_RM, |
| /* 0x8f */ x86emuOp_pop_RM, |
| |
| /* 0x90 */ x86emuOp_nop, |
| /* 0x91 */ x86emuOp_xchg_word_AX_register, |
| /* 0x92 */ x86emuOp_xchg_word_AX_register, |
| /* 0x93 */ x86emuOp_xchg_word_AX_register, |
| /* 0x94 */ x86emuOp_xchg_word_AX_register, |
| /* 0x95 */ x86emuOp_xchg_word_AX_register, |
| /* 0x96 */ x86emuOp_xchg_word_AX_register, |
| /* 0x97 */ x86emuOp_xchg_word_AX_register, |
| |
| /* 0x98 */ x86emuOp_cbw, |
| /* 0x99 */ x86emuOp_cwd, |
| /* 0x9a */ x86emuOp_call_far_IMM, |
| /* 0x9b */ x86emuOp_wait, |
| /* 0x9c */ x86emuOp_pushf_word, |
| /* 0x9d */ x86emuOp_popf_word, |
| /* 0x9e */ x86emuOp_sahf, |
| /* 0x9f */ x86emuOp_lahf, |
| |
| /* 0xa0 */ x86emuOp_mov_AL_M_IMM, |
| /* 0xa1 */ x86emuOp_mov_AX_M_IMM, |
| /* 0xa2 */ x86emuOp_mov_M_AL_IMM, |
| /* 0xa3 */ x86emuOp_mov_M_AX_IMM, |
| /* 0xa4 */ x86emuOp_movs_byte, |
| /* 0xa5 */ x86emuOp_movs_word, |
| /* 0xa6 */ x86emuOp_cmps_byte, |
| /* 0xa7 */ x86emuOp_cmps_word, |
| /* 0xa8 */ x86emuOp_test_AL_IMM, |
| /* 0xa9 */ x86emuOp_test_AX_IMM, |
| /* 0xaa */ x86emuOp_stos_byte, |
| /* 0xab */ x86emuOp_stos_word, |
| /* 0xac */ x86emuOp_lods_byte, |
| /* 0xad */ x86emuOp_lods_word, |
| /* 0xac */ x86emuOp_scas_byte, |
| /* 0xad */ x86emuOp_scas_word, |
| |
| /* 0xb0 */ x86emuOp_mov_byte_register_IMM, |
| /* 0xb1 */ x86emuOp_mov_byte_register_IMM, |
| /* 0xb2 */ x86emuOp_mov_byte_register_IMM, |
| /* 0xb3 */ x86emuOp_mov_byte_register_IMM, |
| /* 0xb4 */ x86emuOp_mov_byte_register_IMM, |
| /* 0xb5 */ x86emuOp_mov_byte_register_IMM, |
| /* 0xb6 */ x86emuOp_mov_byte_register_IMM, |
| /* 0xb7 */ x86emuOp_mov_byte_register_IMM, |
| |
| /* 0xb8 */ x86emuOp_mov_word_register_IMM, |
| /* 0xb9 */ x86emuOp_mov_word_register_IMM, |
| /* 0xba */ x86emuOp_mov_word_register_IMM, |
| /* 0xbb */ x86emuOp_mov_word_register_IMM, |
| /* 0xbc */ x86emuOp_mov_word_register_IMM, |
| /* 0xbd */ x86emuOp_mov_word_register_IMM, |
| /* 0xbe */ x86emuOp_mov_word_register_IMM, |
| /* 0xbf */ x86emuOp_mov_word_register_IMM, |
| |
| /* 0xc0 */ x86emuOp_opcC0_byte_RM_MEM, |
| /* 0xc1 */ x86emuOp_opcC1_word_RM_MEM, |
| /* 0xc2 */ x86emuOp_ret_near_IMM, |
| /* 0xc3 */ x86emuOp_ret_near, |
| /* 0xc4 */ x86emuOp_les_R_IMM, |
| /* 0xc5 */ x86emuOp_lds_R_IMM, |
| /* 0xc6 */ x86emuOp_mov_byte_RM_IMM, |
| /* 0xc7 */ x86emuOp_mov_word_RM_IMM, |
| /* 0xc8 */ x86emuOp_enter, |
| /* 0xc9 */ x86emuOp_leave, |
| /* 0xca */ x86emuOp_ret_far_IMM, |
| /* 0xcb */ x86emuOp_ret_far, |
| /* 0xcc */ x86emuOp_int3, |
| /* 0xcd */ x86emuOp_int_IMM, |
| /* 0xce */ x86emuOp_into, |
| /* 0xcf */ x86emuOp_iret, |
| |
| /* 0xd0 */ x86emuOp_opcD0_byte_RM_1, |
| /* 0xd1 */ x86emuOp_opcD1_word_RM_1, |
| /* 0xd2 */ x86emuOp_opcD2_byte_RM_CL, |
| /* 0xd3 */ x86emuOp_opcD3_word_RM_CL, |
| /* 0xd4 */ x86emuOp_aam, |
| /* 0xd5 */ x86emuOp_aad, |
| /* 0xd6 */ x86emuOp_illegal_op, /* Undocumented SETALC instruction */ |
| /* 0xd7 */ x86emuOp_xlat, |
| /* 0xd8 */ NULL, /*x86emuOp_esc_coprocess_d8,*/ |
| /* 0xd9 */ NULL, /*x86emuOp_esc_coprocess_d9,*/ |
| /* 0xda */ NULL, /*x86emuOp_esc_coprocess_da,*/ |
| /* 0xdb */ NULL, /*x86emuOp_esc_coprocess_db,*/ |
| /* 0xdc */ NULL, /*x86emuOp_esc_coprocess_dc,*/ |
| /* 0xdd */ NULL, /*x86emuOp_esc_coprocess_dd,*/ |
| /* 0xde */ NULL, /*x86emuOp_esc_coprocess_de,*/ |
| /* 0xdf */ NULL, /*x86emuOp_esc_coprocess_df,*/ |
| |
| /* 0xe0 */ x86emuOp_loopne, |
| /* 0xe1 */ x86emuOp_loope, |
| /* 0xe2 */ x86emuOp_loop, |
| /* 0xe3 */ x86emuOp_jcxz, |
| /* 0xe4 */ x86emuOp_in_byte_AL_IMM, |
| /* 0xe5 */ x86emuOp_in_word_AX_IMM, |
| /* 0xe6 */ x86emuOp_out_byte_IMM_AL, |
| /* 0xe7 */ x86emuOp_out_word_IMM_AX, |
| |
| /* 0xe8 */ x86emuOp_call_near_IMM, |
| /* 0xe9 */ x86emuOp_jump_near_IMM, |
| /* 0xea */ x86emuOp_jump_far_IMM, |
| /* 0xeb */ x86emuOp_jump_byte_IMM, |
| /* 0xec */ x86emuOp_in_byte_AL_DX, |
| /* 0xed */ x86emuOp_in_word_AX_DX, |
| /* 0xee */ x86emuOp_out_byte_DX_AL, |
| /* 0xef */ x86emuOp_out_word_DX_AX, |
| |
| /* 0xf0 */ x86emuOp_lock, |
| /* 0xf1 */ x86emuOp_illegal_op, |
| /* 0xf2 */ x86emuOp_repne, |
| /* 0xf3 */ x86emuOp_repe, |
| /* 0xf4 */ x86emuOp_halt, |
| /* 0xf5 */ x86emuOp_cmc, |
| /* 0xf6 */ x86emuOp_opcF6_byte_RM, |
| /* 0xf7 */ x86emuOp_opcF7_word_RM, |
| |
| /* 0xf8 */ x86emuOp_clc, |
| /* 0xf9 */ x86emuOp_stc, |
| /* 0xfa */ x86emuOp_cli, |
| /* 0xfb */ x86emuOp_sti, |
| /* 0xfc */ x86emuOp_cld, |
| /* 0xfd */ x86emuOp_std, |
| /* 0xfe */ x86emuOp_opcFE_byte_RM, |
| /* 0xff */ x86emuOp_opcFF_word_RM, |
| }; |