diff options
Diffstat (limited to 'orc/x86.c')
-rw-r--r-- | orc/x86.c | 749 |
1 files changed, 0 insertions, 749 deletions
diff --git a/orc/x86.c b/orc/x86.c deleted file mode 100644 index aaf09c1..0000000 --- a/orc/x86.c +++ /dev/null @@ -1,749 +0,0 @@ - -#include "config.h" - -#include <stdio.h> -#include <string.h> -#include <stdlib.h> - -#include <unistd.h> -#include <sys/types.h> - -#include <orc/orcprogram.h> -#include <orc/x86.h> - -const char * -x86_get_regname(int i) -{ - static const char *x86_regs[] = { - "eax", "ecx", "edx", "ebx", "esp", "ebp", "esi", "edi", - "r8d", "r9d", "r10d", "r11d", "r12d", "r13d", "r14d", "r15d" }; - - if (i>=ORC_GP_REG_BASE && i<ORC_GP_REG_BASE + 16) return x86_regs[i - ORC_GP_REG_BASE]; - switch (i) { - case 0: - return "UNALLOCATED"; - case 1: - return "direct"; - default: - printf("register %d\n", i); - return "ERROR"; - } -} - -int -x86_get_regnum(int i) -{ - return (i&0xf); -} - -const char * -x86_get_regname_16(int i) -{ - static const char *x86_regs[] = { "ax", "cx", "dx", "bx", - "sp", "bp", "si", "di" }; - - if (i>=ORC_GP_REG_BASE && i<ORC_GP_REG_BASE + 8) return x86_regs[i - ORC_GP_REG_BASE]; - switch (i) { - case 0: - return "UNALLOCATED"; - case 1: - return "direct"; - default: - return "ERROR"; - } -} - -const char * -x86_get_regname_64(int i) -{ - static const char *x86_regs[] = { - "rax", "rcx", "rdx", "rbx", "rsp", "rbp", "rsi", "rdi", - "r8", "r9", "r10", "r11", "r12", "r13", "r14", "r15" }; - - if (i>=ORC_GP_REG_BASE && i<ORC_GP_REG_BASE + 16) return x86_regs[i - ORC_GP_REG_BASE]; - switch (i) { - case 0: - return "UNALLOCATED"; - case 1: - return "direct"; - default: - return "ERROR"; - } -} - -const char * -x86_get_regname_ptr(int i) -{ - if (x86_64) { - return x86_get_regname_64 (i); - } else { - return x86_get_regname (i); - } -} - -const char * -x86_get_regname_mmx(int i) -{ - static const char *x86_regs[] = { "mm0", "mm1", "mm2", "mm3", - "mm4", "mm5", "mm6", "mm7" }; - - if (i>=X86_MM0 && i<X86_MM0 + 8) return x86_regs[i - X86_MM0]; - switch (i) { - case 0: - return "UNALLOCATED"; - case 1: - return "direct"; - default: - return "ERROR"; - } -} - -const char * -x86_get_regname_sse(int i) -{ - static const char *x86_regs[] = { - "xmm0", "xmm1", "xmm2", "xmm3", "xmm4", "xmm5", "xmm6", "xmm7", - "xmm8", "xmm9", "xmm10", "xmm11", "xmm12", "xmm13", "xmm14", "xmm15" - }; - - if (i>=X86_XMM0 && i<X86_XMM0 + 16) return x86_regs[i - X86_XMM0]; - switch (i) { - case 0: - return "UNALLOCATED"; - case 1: - return "direct"; - default: - return "ERROR"; - } -} - -void -x86_emit_push (OrcProgram *program, int size, int reg) -{ - - if (size == 1) { - program->error = 1; - } else if (size == 2) { - printf(" pushw %%%s\n", x86_get_regname_16(reg)); - *program->codeptr++ = 0x66; - *program->codeptr++ = 0x50 + x86_get_regnum(reg); - } else { - printf(" pushl %%%s\n", x86_get_regname(reg)); - *program->codeptr++ = 0x50 + x86_get_regnum(reg); - } -} - -void -x86_emit_pop (OrcProgram *program, int size, int reg) -{ - - if (size == 1) { - program->error = 1; - } else if (size == 2) { - printf(" popw %%%s\n", x86_get_regname_16(reg)); - *program->codeptr++ = 0x66; - *program->codeptr++ = 0x58 + x86_get_regnum(reg); - } else { - printf(" popl %%%s\n", x86_get_regname(reg)); - *program->codeptr++ = 0x58 + x86_get_regnum(reg); - } -} - -#define X86_MODRM(mod, rm, reg) ((((mod)&3)<<6)|(((rm)&7)<<0)|(((reg)&7)<<3)) -#define X86_SIB(ss, ind, reg) ((((ss)&3)<<6)|(((ind)&7)<<3)|((reg)&7)) - -void -x86_emit_modrm_memoffset (OrcProgram *program, int reg1, int offset, int reg2) -{ - if (offset == 0 && reg2 != x86_exec_ptr) { - if (reg2 == X86_ESP) { - *program->codeptr++ = X86_MODRM(0, 4, reg1); - *program->codeptr++ = X86_SIB(0, 4, reg2); - } else { - *program->codeptr++ = X86_MODRM(0, reg2, reg1); - } - } else if (offset >= -128 && offset < 128) { - *program->codeptr++ = X86_MODRM(1, reg2, reg1); - if (reg2 == X86_ESP) { - *program->codeptr++ = X86_SIB(0, 4, reg2); - } - *program->codeptr++ = (offset & 0xff); - } else { - *program->codeptr++ = X86_MODRM(2, reg2, reg1); - if (reg2 == X86_ESP) { - *program->codeptr++ = X86_SIB(0, 4, reg2); - } - *program->codeptr++ = (offset & 0xff); - *program->codeptr++ = ((offset>>8) & 0xff); - *program->codeptr++ = ((offset>>16) & 0xff); - *program->codeptr++ = ((offset>>24) & 0xff); - } -} - -void -x86_emit_modrm_reg (OrcProgram *program, int reg1, int reg2) -{ - *program->codeptr++ = X86_MODRM(3, reg1, reg2); -} - -void -x86_emit_rex (OrcProgram *program, int size, int reg1, int reg2, int reg3) -{ - int rex = 0x40; - - if (x86_64) { - if (size >= 8) rex |= 0x08; - if (reg1 == 1 || (x86_get_regnum(reg1)>=8)) rex |= 0x4; - if (reg2 == 1 || (x86_get_regnum(reg2)>=8)) rex |= 0x2; - if (reg3 == 1 || (x86_get_regnum(reg3)>=8)) rex |= 0x1; - - if (rex != 0x40) *program->codeptr++ = rex; - //*program->codeptr++ = rex; - } -} - -void -x86_emit_mov_memoffset_reg (OrcProgram *program, int size, int offset, - int reg1, int reg2) -{ - - if (size == 2) { - printf(" movw %d(%%%s), %%%s\n", offset, x86_get_regname_ptr(reg1), - x86_get_regname_16(reg2)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" movl %d(%%%s), %%%s\n", offset, x86_get_regname_ptr(reg1), - x86_get_regname(reg2)); - } else { - printf(" mov %d(%%%s), %%%s\n", offset, x86_get_regname_ptr(reg1), - x86_get_regname_64(reg2)); - } - - x86_emit_rex(program, size, reg2, 0, reg1); - *program->codeptr++ = 0x8b; - x86_emit_modrm_memoffset (program, reg2, offset, reg1); -} - -void -x86_emit_mov_memoffset_mmx (OrcProgram *program, int size, int offset, - int reg1, int reg2) -{ - if (size == 4) { - printf(" movd %d(%%%s), %%%s\n", offset, x86_get_regname_ptr(reg1), - x86_get_regname_mmx(reg2)); - x86_emit_rex(program, 0, reg2, 0, reg1); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x6e; - } else { - printf(" movq %d(%%%s), %%%s\n", offset, x86_get_regname_ptr(reg1), - x86_get_regname_mmx(reg2)); - x86_emit_rex(program, 0, reg2, 0, reg1); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x6f; - } - x86_emit_modrm_memoffset (program, reg2, offset, reg1); -} - -void -x86_emit_mov_memoffset_sse (OrcProgram *program, int size, int offset, - int reg1, int reg2) -{ - if (size == 4) { - printf(" movd %d(%%%s), %%%s\n", offset, x86_get_regname_ptr(reg1), - x86_get_regname_sse(reg2)); - *program->codeptr++ = 0x66; - x86_emit_rex(program, 0, reg2, 0, reg1); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x6e; - } else if (size == 8) { - printf(" movq %d(%%%s), %%%s\n", offset, x86_get_regname_ptr(reg1), - x86_get_regname_sse(reg2)); - *program->codeptr++ = 0x66; - x86_emit_rex(program, 0, reg2, 0, reg1); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x6f; - } else { - printf(" movdqu %d(%%%s), %%%s\n", offset, x86_get_regname_ptr(reg1), - x86_get_regname_sse(reg2)); - x86_emit_rex(program, 0, reg2, 0, reg1); - *program->codeptr++ = 0xf3; - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x6f; - } - x86_emit_modrm_memoffset (program, reg2, offset, reg1); -} - -void -x86_emit_mov_reg_memoffset (OrcProgram *program, int size, int reg1, int offset, - int reg2) -{ - if (size == 2) { - printf(" movw %%%s, %d(%%%s)\n", x86_get_regname_16(reg1), offset, - x86_get_regname_ptr(reg2)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" movl %%%s, %d(%%%s)\n", x86_get_regname(reg1), offset, - x86_get_regname_ptr(reg2)); - } else { - printf(" mov %%%s, %d(%%%s)\n", x86_get_regname(reg1), offset, - x86_get_regname_ptr(reg2)); - } - - x86_emit_rex(program, size, reg1, 0, reg2); - *program->codeptr++ = 0x89; - x86_emit_modrm_memoffset (program, reg1, offset, reg2); -} - -void -x86_emit_mov_mmx_memoffset (OrcProgram *program, int size, int reg1, int offset, - int reg2) -{ - x86_emit_rex(program, 0, reg1, 0, reg2); - if (size == 4) { - printf(" movd %%%s, %d(%%%s)\n", x86_get_regname_mmx(reg1), offset, - x86_get_regname_ptr(reg2)); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x7e; - } else if (size == 8) { - printf(" movq %%%s, %d(%%%s)\n", x86_get_regname_mmx(reg1), offset, - x86_get_regname_ptr(reg2)); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x7f; - } - - x86_emit_modrm_memoffset (program, reg1, offset, reg2); -} - -void -x86_emit_mov_sse_memoffset (OrcProgram *program, int size, int reg1, int offset, - int reg2) -{ - if (size == 4) { - printf(" movd %%%s, %d(%%%s)\n", x86_get_regname_sse(reg1), offset, - x86_get_regname_ptr(reg2)); - *program->codeptr++ = 0x66; - x86_emit_rex(program, 0, reg1, 0, reg2); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x7e; - } else if (size == 8) { - printf(" movq %%%s, %d(%%%s)\n", x86_get_regname_sse(reg1), offset, - x86_get_regname_ptr(reg2)); - *program->codeptr++ = 0x66; - x86_emit_rex(program, 0, reg1, 0, reg2); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x7f; - } else { - printf(" movdqu %%%s, %d(%%%s)\n", x86_get_regname_sse(reg1), offset, - x86_get_regname_ptr(reg2)); - *program->codeptr++ = 0xf3; - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x7f; - } - - x86_emit_modrm_memoffset (program, reg1, offset, reg2); -} - -void -x86_emit_mov_imm_reg (OrcProgram *program, int size, int value, int reg1) -{ - if (size == 2) { - printf(" movw $%d, %%%s\n", value, x86_get_regname_16(reg1)); - x86_emit_rex(program, size, reg1, 0, 0); - *program->codeptr++ = 0x66; - *program->codeptr++ = 0xb8 + x86_get_regnum(reg1); - *program->codeptr++ = (value & 0xff); - *program->codeptr++ = ((value>>8) & 0xff); - } else if (size == 4) { - printf(" movl $%d, %%%s\n", value, x86_get_regname(reg1)); - x86_emit_rex(program, size, reg1, 0, 0); - *program->codeptr++ = 0xb8 + x86_get_regnum(reg1); - *program->codeptr++ = (value & 0xff); - *program->codeptr++ = ((value>>8) & 0xff); - *program->codeptr++ = ((value>>16) & 0xff); - *program->codeptr++ = ((value>>24) & 0xff); - } else { - /* FIXME */ - } - -} - -void x86_emit_mov_reg_reg (OrcProgram *program, int size, int reg1, int reg2) -{ - if (size == 2) { - printf(" movw %%%s, %%%s\n", x86_get_regname_16(reg1), - x86_get_regname_16(reg2)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" movl %%%s, %%%s\n", x86_get_regname(reg1), - x86_get_regname(reg2)); - } else { - printf(" mov %%%s, %%%s\n", x86_get_regname_64(reg1), - x86_get_regname_64(reg2)); - } - - x86_emit_rex(program, size, reg2, 0, reg1); - *program->codeptr++ = 0x89; - x86_emit_modrm_reg (program, reg2, reg1); -} - -void x86_emit_mov_reg_mmx (OrcProgram *program, int reg1, int reg2) -{ - /* FIXME */ - printf(" movd %%%s, %%%s\n", x86_get_regname(reg1), - x86_get_regname_mmx(reg2)); - x86_emit_rex(program, 0, reg1, 0, reg2); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x6e; - x86_emit_modrm_reg (program, reg1, reg2); -} - -void x86_emit_mov_mmx_reg (OrcProgram *program, int reg1, int reg2) -{ - /* FIXME */ - printf(" movd %%%s, %%%s\n", x86_get_regname_mmx(reg1), - x86_get_regname(reg2)); - x86_emit_rex(program, 0, reg2, 0, reg1); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x7e; - x86_emit_modrm_reg (program, reg2, reg1); -} - -void x86_emit_mov_reg_sse (OrcProgram *program, int reg1, int reg2) -{ - /* FIXME */ - printf(" movd %%%s, %%%s\n", x86_get_regname(reg1), - x86_get_regname_sse(reg2)); - *program->codeptr++ = 0x66; - x86_emit_rex(program, 0, reg1, 0, reg2); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x6e; - x86_emit_modrm_reg (program, reg1, reg2); -} - -void x86_emit_mov_sse_reg (OrcProgram *program, int reg1, int reg2) -{ - /* FIXME */ - printf(" movd %%%s, %%%s\n", x86_get_regname_sse(reg1), - x86_get_regname(reg2)); - *program->codeptr++ = 0x66; - x86_emit_rex(program, 0, reg2, 0, reg1); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x7e; - x86_emit_modrm_reg (program, reg2, reg1); -} - -void -x86_emit_test_reg_reg (OrcProgram *program, int size, int reg1, int reg2) -{ - if (size == 2) { - printf(" testw %%%s, %%%s\n", x86_get_regname_16(reg1), - x86_get_regname_16(reg2)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" testl %%%s, %%%s\n", x86_get_regname(reg1), - x86_get_regname(reg2)); - } else { - printf(" test %%%s, %%%s\n", x86_get_regname(reg1), - x86_get_regname(reg2)); - } - - x86_emit_rex(program, size, reg2, 0, reg1); - *program->codeptr++ = 0x85; - x86_emit_modrm_reg (program, reg2, reg1); -} - -void -x86_emit_sar_imm_reg (OrcProgram *program, int size, int value, int reg) -{ - if (size == 2) { - printf(" sarw $%d, %%%s\n", value, x86_get_regname_16(reg)); - } else if (size == 4) { - printf(" sarl $%d, %%%s\n", value, x86_get_regname(reg)); - } else { - printf(" sar $%d, %%%s\n", value, x86_get_regname_64(reg)); - } - - x86_emit_rex(program, size, reg, 0, 0); - if (value == 1) { - *program->codeptr++ = 0xd1; - x86_emit_modrm_reg (program, reg, 7); - } else { - *program->codeptr++ = 0xc1; - x86_emit_modrm_reg (program, reg, 7); - *program->codeptr++ = value; - } -} - -void -x86_emit_and_imm_memoffset (OrcProgram *program, int size, int value, - int offset, int reg) -{ - if (size == 2) { - printf(" andw $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" andl $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - } else { - printf(" and $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - } - - x86_emit_rex(program, size, 0, 0, reg); - if (value >= -128 && value < 128) { - *program->codeptr++ = 0x83; - /* FIXME */ - x86_emit_modrm_memoffset (program, 0, offset, reg); - *program->codeptr++ = (value & 0xff); - } else { - *program->codeptr++ = 0x81; - /* FIXME */ - x86_emit_modrm_memoffset (program, 0, offset, reg); - *program->codeptr++ = (value & 0xff); - *program->codeptr++ = ((value>>8) & 0xff); - if (size == 4) { - *program->codeptr++ = ((value>>16) & 0xff); - *program->codeptr++ = ((value>>24) & 0xff); - } - } -} - -void -x86_emit_and_imm_reg (OrcProgram *program, int size, int value, int reg) -{ - if (size == 2) { - printf(" andw $%d, %%%s\n", value, x86_get_regname_16(reg)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" andl $%d, %%%s\n", value, x86_get_regname(reg)); - } else { - printf(" and $%d, %%%s\n", value, x86_get_regname_64(reg)); - } - - x86_emit_rex(program, size, 0, 0, reg); - if (value >= -128 && value < 128) { - *program->codeptr++ = 0x83; - x86_emit_modrm_reg (program, reg, 4); - *program->codeptr++ = (value & 0xff); - } else { - *program->codeptr++ = 0x81; - x86_emit_modrm_reg (program, reg, 4); - *program->codeptr++ = (value & 0xff); - *program->codeptr++ = ((value>>8) & 0xff); - if (size == 4) { - *program->codeptr++ = ((value>>16) & 0xff); - *program->codeptr++ = ((value>>24) & 0xff); - } - } -} - -void -x86_emit_add_imm_memoffset (OrcProgram *program, int size, int value, - int offset, int reg) -{ - if (size == 2) { - printf(" addw $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" addl $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - } else { - printf(" add $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - } - - x86_emit_rex(program, size, 0, 0, reg); - if (value >= -128 && value < 128) { - *program->codeptr++ = 0x83; - x86_emit_modrm_memoffset (program, 0, offset, reg); - *program->codeptr++ = (value & 0xff); - } else { - *program->codeptr++ = 0x81; - x86_emit_modrm_memoffset (program, 0, offset, reg); - *program->codeptr++ = (value & 0xff); - *program->codeptr++ = ((value>>8) & 0xff); - if (size == 4) { - *program->codeptr++ = ((value>>16) & 0xff); - *program->codeptr++ = ((value>>24) & 0xff); - } - } -} - -void -x86_emit_add_imm_reg (OrcProgram *program, int size, int value, int reg) -{ - if (size == 2) { - printf(" addw $%d, %%%s\n", value, x86_get_regname_16(reg)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" addl $%d, %%%s\n", value, x86_get_regname(reg)); - } else { - printf(" add $%d, %%%s\n", value, x86_get_regname_64(reg)); - } - - x86_emit_rex(program, size, 0, 0, reg); - if (value >= -128 && value < 128) { - *program->codeptr++ = 0x83; - x86_emit_modrm_reg (program, reg, 0); - *program->codeptr++ = (value & 0xff); - } else { - *program->codeptr++ = 0x81; - x86_emit_modrm_reg (program, reg, 0); - *program->codeptr++ = (value & 0xff); - *program->codeptr++ = ((value>>8) & 0xff); - if (size == 4) { - *program->codeptr++ = ((value>>16) & 0xff); - *program->codeptr++ = ((value>>24) & 0xff); - } - } -} - -void -x86_emit_cmp_imm_memoffset (OrcProgram *program, int size, int value, - int offset, int reg) -{ - if (size == 2) { - printf(" cmpw $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" cmpl $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - } else { - printf(" cmp $%d, %d(%%%s)\n", value, offset, - x86_get_regname_ptr(reg)); - } - - x86_emit_rex(program, size, 0, 0, reg); - if (value >= -128 && value < 128) { - *program->codeptr++ = 0x83; - x86_emit_modrm_memoffset (program, 7, offset, reg); - *program->codeptr++ = (value & 0xff); - } else { - *program->codeptr++ = 0x81; - x86_emit_modrm_memoffset (program, 7, offset, reg); - *program->codeptr++ = (value & 0xff); - *program->codeptr++ = ((value>>8) & 0xff); - if (size == 4) { - *program->codeptr++ = ((value>>16) & 0xff); - *program->codeptr++ = ((value>>24) & 0xff); - } - } -} - -void -x86_emit_dec_memoffset (OrcProgram *program, int size, - int offset, int reg) -{ - if (size == 2) { - printf(" decw %d(%%%s)\n", offset, x86_get_regname_ptr(reg)); - *program->codeptr++ = 0x66; - } else if (size == 4) { - printf(" decl %d(%%%s)\n", offset, x86_get_regname_ptr(reg)); - } else { - printf(" dec %d(%%%s)\n", offset, x86_get_regname_ptr(reg)); - } - - x86_emit_rex(program, size, 0, 0, reg); - *program->codeptr++ = 0xff; - x86_emit_modrm_memoffset (program, 1, offset, reg); -} - -void x86_emit_ret (OrcProgram *program) -{ - if (x86_64) { - printf(" retq\n"); - } else { - printf(" ret\n"); - } - *program->codeptr++ = 0xc3; -} - -void x86_emit_emms (OrcProgram *program) -{ - printf(" emms\n"); - *program->codeptr++ = 0x0f; - *program->codeptr++ = 0x77; -} - -void -x86_add_fixup (OrcProgram *program, unsigned char *ptr, int label) -{ - program->fixups[program->n_fixups].ptr = ptr; - program->fixups[program->n_fixups].label = label; - program->fixups[program->n_fixups].type = 0; - program->n_fixups++; -} - -void -x86_add_label (OrcProgram *program, unsigned char *ptr, int label) -{ - program->labels[label] = ptr; -} - -void x86_emit_je (OrcProgram *program, int label) -{ - printf(" je .L%d\n", label); - - *program->codeptr++ = 0x74; - x86_add_fixup (program, program->codeptr, label); - *program->codeptr++ = -1; -} - -void x86_emit_jne (OrcProgram *program, int label) -{ - printf(" jne .L%d\n", label); - *program->codeptr++ = 0x75; - x86_add_fixup (program, program->codeptr, label); - *program->codeptr++ = -1; -} - -void x86_emit_label (OrcProgram *program, int label) -{ - printf(".L%d:\n", label); - - x86_add_label (program, program->codeptr, label); -} - -void -x86_test (OrcProgram *program) -{ - int size; - int i; - int j; - int reg; - - for(size=2;size<=4;size+=2) { - for(i=0;i<8;i++){ - reg = ORC_GP_REG_BASE + i; - x86_emit_push (program, size, reg); - x86_emit_pop (program, size, reg); - x86_emit_mov_imm_reg (program, size, 0, reg); - x86_emit_mov_imm_reg (program, size, 1, reg); - x86_emit_mov_imm_reg (program, size, 256, reg); - x86_emit_dec_memoffset (program, size, 0, reg); - x86_emit_dec_memoffset (program, size, 1, reg); - x86_emit_dec_memoffset (program, size, 256, reg); - x86_emit_add_imm_memoffset (program, size, 1, 0, reg); - x86_emit_add_imm_memoffset (program, size, 1, 1, reg); - x86_emit_add_imm_memoffset (program, size, 1, 256, reg); - x86_emit_add_imm_memoffset (program, size, 256, 0, reg); - x86_emit_add_imm_memoffset (program, size, 256, 1, reg); - x86_emit_add_imm_memoffset (program, size, 256, 256, reg); - for(j=0;j<8;j++){ - int reg2 = ORC_GP_REG_BASE + j; - x86_emit_mov_reg_reg (program, size, reg, reg2); - x86_emit_mov_memoffset_reg (program, size, 0, reg, reg2); - x86_emit_mov_memoffset_reg (program, size, 1, reg, reg2); - x86_emit_mov_memoffset_reg (program, size, 256, reg, reg2); - x86_emit_mov_reg_memoffset (program, size, reg, 0, reg2); - x86_emit_mov_reg_memoffset (program, size, reg, 1, reg2); - x86_emit_mov_reg_memoffset (program, size, reg, 256, reg2); - } - } - } - -} - |