461 lines
23 KiB
C
461 lines
23 KiB
C
#ifndef _CODEGEN_IR_DEFS_
|
|
#define _CODEGEN_IR_DEFS_
|
|
|
|
#include "codegen_reg.h"
|
|
|
|
#define UOP_REG(reg, size, version) ((reg) | (size) | (version << 8))
|
|
|
|
/*uOP is a barrier. All previous uOPs must have completed before this one executes.
|
|
All registers must have been written back or discarded.
|
|
This should be used when calling external functions that may change any emulated
|
|
registers.*/
|
|
#define UOP_TYPE_BARRIER (1 << 31)
|
|
|
|
/*uOP is a barrier. All previous uOPs must have completed before this one executes.
|
|
All registers must have been written back, but do not have to be discarded.
|
|
This should be used when calling functions that preserve registers, but can cause
|
|
the code block to exit (eg memory load/store functions).*/
|
|
#define UOP_TYPE_ORDER_BARRIER (1 << 27)
|
|
|
|
/*uOP uses source and dest registers*/
|
|
#define UOP_TYPE_PARAMS_REGS (1 << 28)
|
|
/*uOP uses pointer*/
|
|
#define UOP_TYPE_PARAMS_POINTER (1 << 29)
|
|
/*uOP uses immediate data*/
|
|
#define UOP_TYPE_PARAMS_IMM (1 << 30)
|
|
|
|
/*uOP is a jump, with the destination uOP in uop->jump_dest_uop. The compiler must
|
|
set jump_dest in the destination uOP to the address of the branch offset to be
|
|
written when known.*/
|
|
#define UOP_TYPE_JUMP (1 << 26)
|
|
/*uOP is the destination of a jump, and must set the destination offset of the jump
|
|
at compile time.*/
|
|
#define UOP_TYPE_JUMP_DEST (1 << 25)
|
|
|
|
|
|
#define UOP_LOAD_FUNC_ARG_0 (UOP_TYPE_PARAMS_REGS | 0x00)
|
|
#define UOP_LOAD_FUNC_ARG_1 (UOP_TYPE_PARAMS_REGS | 0x01)
|
|
#define UOP_LOAD_FUNC_ARG_2 (UOP_TYPE_PARAMS_REGS | 0x02)
|
|
#define UOP_LOAD_FUNC_ARG_3 (UOP_TYPE_PARAMS_REGS | 0x03)
|
|
#define UOP_LOAD_FUNC_ARG_0_IMM (UOP_TYPE_PARAMS_IMM | 0x08)
|
|
#define UOP_LOAD_FUNC_ARG_1_IMM (UOP_TYPE_PARAMS_IMM | 0x09)
|
|
#define UOP_LOAD_FUNC_ARG_2_IMM (UOP_TYPE_PARAMS_IMM | 0x0a)
|
|
#define UOP_LOAD_FUNC_ARG_3_IMM (UOP_TYPE_PARAMS_IMM | 0x0b)
|
|
#define UOP_CALL_FUNC (UOP_TYPE_PARAMS_POINTER | 0x10 | UOP_TYPE_BARRIER)
|
|
/*UOP_CALL_INSTRUCTION_FUNC - call instruction handler at p, check return value and exit block if non-zero*/
|
|
#define UOP_CALL_INSTRUCTION_FUNC (UOP_TYPE_PARAMS_POINTER | 0x11 | UOP_TYPE_BARRIER)
|
|
#define UOP_STORE_P_IMM (UOP_TYPE_PARAMS_IMM | 0x12)
|
|
#define UOP_STORE_P_IMM_8 (UOP_TYPE_PARAMS_IMM | 0x13)
|
|
/*UOP_LOAD_SEG - load segment in src_reg_a to segment p via loadseg(), check return value and exit block if non-zero*/
|
|
#define UOP_LOAD_SEG (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_POINTER | 0x14 | UOP_TYPE_BARRIER)
|
|
/*UOP_JMP - jump to ptr*/
|
|
#define UOP_JMP (UOP_TYPE_PARAMS_POINTER | 0x15 | UOP_TYPE_ORDER_BARRIER)
|
|
/*UOP_CALL_FUNC - call instruction handler at p, dest_reg = return value*/
|
|
#define UOP_CALL_FUNC_RESULT (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_POINTER | 0x16 | UOP_TYPE_BARRIER)
|
|
/*UOP_MOV_PTR - dest_reg = p*/
|
|
#define UOP_MOV_PTR (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_POINTER | 0x20)
|
|
/*UOP_MOV_IMM - dest_reg = imm_data*/
|
|
#define UOP_MOV_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x21)
|
|
/*UOP_MOV - dest_reg = src_reg_a*/
|
|
#define UOP_MOV (UOP_TYPE_PARAMS_REGS | 0x22)
|
|
/*UOP_MOVZX - dest_reg = zero_extend(src_reg_a)*/
|
|
#define UOP_MOVZX (UOP_TYPE_PARAMS_REGS | 0x23)
|
|
/*UOP_ADD - dest_reg = src_reg_a + src_reg_b*/
|
|
#define UOP_ADD (UOP_TYPE_PARAMS_REGS | 0x30)
|
|
/*UOP_ADD_IMM - dest_reg = src_reg_a + immediate*/
|
|
#define UOP_ADD_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x31)
|
|
/*UOP_AND - dest_reg = src_reg_a & src_reg_b*/
|
|
#define UOP_AND (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x32)
|
|
/*UOP_AND_IMM - dest_reg = src_reg_a & immediate*/
|
|
#define UOP_AND_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x33)
|
|
/*UOP_ADD_LSHIFT - dest_reg = src_reg_a + (src_reg_b << imm_data)
|
|
Intended for EA calcluations, imm_data must be between 0 and 3*/
|
|
#define UOP_ADD_LSHIFT (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x34)
|
|
/*UOP_OR - dest_reg = src_reg_a | src_reg_b*/
|
|
#define UOP_OR (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x35)
|
|
/*UOP_OR_IMM - dest_reg = src_reg_a | immediate*/
|
|
#define UOP_OR_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x36)
|
|
/*UOP_SUB - dest_reg = src_reg_a - src_reg_b*/
|
|
#define UOP_SUB (UOP_TYPE_PARAMS_REGS | 0x37)
|
|
/*UOP_SUB_IMM - dest_reg = src_reg_a - immediate*/
|
|
#define UOP_SUB_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x38)
|
|
/*UOP_XOR - dest_reg = src_reg_a ^ src_reg_b*/
|
|
#define UOP_XOR (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x39)
|
|
/*UOP_XOR_IMM - dest_reg = src_reg_a ^ immediate*/
|
|
#define UOP_XOR_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x3a)
|
|
/*UOP_MEM_LOAD_ABS - dest_reg = src_reg_a:[immediate]*/
|
|
#define UOP_MEM_LOAD_ABS (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x40 | UOP_TYPE_ORDER_BARRIER)
|
|
/*UOP_MEM_LOAD_REG - dest_reg = src_reg_a:[src_reg_b]*/
|
|
#define UOP_MEM_LOAD_REG (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x41 | UOP_TYPE_ORDER_BARRIER)
|
|
/*UOP_MEM_STORE_ABS - src_reg_a:[immediate] = src_reg_b*/
|
|
#define UOP_MEM_STORE_ABS (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x42 | UOP_TYPE_ORDER_BARRIER)
|
|
/*UOP_MEM_STORE_REG - src_reg_a:[src_reg_b] = src_reg_c*/
|
|
#define UOP_MEM_STORE_REG (UOP_TYPE_PARAMS_REGS | 0x43 | UOP_TYPE_ORDER_BARRIER)
|
|
/*UOP_MEM_STORE_IMM_8 - byte src_reg_a:[src_reg_b] = imm_data*/
|
|
#define UOP_MEM_STORE_IMM_8 (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x44 | UOP_TYPE_ORDER_BARRIER)
|
|
/*UOP_MEM_STORE_IMM_16 - word src_reg_a:[src_reg_b] = imm_data*/
|
|
#define UOP_MEM_STORE_IMM_16 (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x45 | UOP_TYPE_ORDER_BARRIER)
|
|
/*UOP_MEM_STORE_IMM_32 - long src_reg_a:[src_reg_b] = imm_data*/
|
|
#define UOP_MEM_STORE_IMM_32 (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x46 | UOP_TYPE_ORDER_BARRIER)
|
|
/*UOP_CMP_IMM_JZ - if (src_reg_a == imm_data) then jump to ptr*/
|
|
#define UOP_CMP_IMM_JZ (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x48 | UOP_TYPE_ORDER_BARRIER)
|
|
|
|
/*UOP_SAR - dest_reg = src_reg_a >> src_reg_b*/
|
|
#define UOP_SAR (UOP_TYPE_PARAMS_REGS | 0x50)
|
|
/*UOP_SAR_IMM - dest_reg = src_reg_a >> immediate*/
|
|
#define UOP_SAR_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x51)
|
|
/*UOP_SHL - dest_reg = src_reg_a << src_reg_b*/
|
|
#define UOP_SHL (UOP_TYPE_PARAMS_REGS | 0x52)
|
|
/*UOP_SHL_IMM - dest_reg = src_reg_a << immediate*/
|
|
#define UOP_SHL_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x53)
|
|
/*UOP_SHR - dest_reg = src_reg_a >> src_reg_b*/
|
|
#define UOP_SHR (UOP_TYPE_PARAMS_REGS | 0x54)
|
|
/*UOP_SHR_IMM - dest_reg = src_reg_a >> immediate*/
|
|
#define UOP_SHR_IMM (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | 0x55)
|
|
|
|
/*UOP_CMP_IMM_JZ_DEST - if (src_reg_a == imm_data) then jump to ptr*/
|
|
#define UOP_CMP_IMM_JZ_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x60 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_IMM_JNZ_DEST - if (src_reg_a != imm_data) then jump to ptr*/
|
|
#define UOP_CMP_IMM_JNZ_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x61 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
|
|
/*UOP_CMP_JB_DEST - if (src_reg_a < src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JB_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x62 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JNB_DEST - if (src_reg_a >= src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JNB_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x63 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JO_DEST - if (src_reg_a < src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JO_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x64 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JNO_DEST - if (src_reg_a >= src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JNO_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x65 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JZ_DEST - if (src_reg_a == src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JZ_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x66 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JNZ_DEST - if (src_reg_a != src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JNZ_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x67 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JL_DEST - if (signed)(src_reg_a < src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JL_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x68 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JNL_DEST - if (signed)(src_reg_a >= src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JNL_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x69 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JBE_DEST - if (src_reg_a <= src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JBE_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x6a | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JNBE_DEST - if (src_reg_a > src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JNBE_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x6b | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JLE_DEST - if (signed)(src_reg_a <= src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JLE_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x6c | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_CMP_JNLE_DEST - if (signed)(src_reg_a > src_reg_b) then jump to ptr*/
|
|
#define UOP_CMP_JNLE_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x6d | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
|
|
|
|
/*UOP_TEST_JNS_DEST - if (src_reg_a positive) then jump to ptr*/
|
|
#define UOP_TEST_JNS_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x70 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
/*UOP_TEST_JS_DEST - if (src_reg_a positive) then jump to ptr*/
|
|
#define UOP_TEST_JS_DEST (UOP_TYPE_PARAMS_REGS | UOP_TYPE_PARAMS_IMM | UOP_TYPE_PARAMS_POINTER | 0x71 | UOP_TYPE_ORDER_BARRIER | UOP_TYPE_JUMP)
|
|
|
|
#define UOP_MAX 0x72
|
|
|
|
#define UOP_MASK 0xffff
|
|
|
|
typedef struct uop_t
|
|
{
|
|
uint32_t type;
|
|
ir_reg_t dest_reg_a;
|
|
ir_reg_t src_reg_a;
|
|
ir_reg_t src_reg_b;
|
|
ir_reg_t src_reg_c;
|
|
uint32_t imm_data;
|
|
void *p;
|
|
ir_host_reg_t dest_reg_a_real;
|
|
ir_host_reg_t src_reg_a_real, src_reg_b_real, src_reg_c_real;
|
|
int jump_dest_uop;
|
|
int jump_list_next;
|
|
void *jump_dest;
|
|
} uop_t;
|
|
|
|
#define UOP_NR_MAX 4096
|
|
|
|
typedef struct ir_data_t
|
|
{
|
|
uop_t uops[UOP_NR_MAX];
|
|
int wr_pos;
|
|
} ir_data_t;
|
|
|
|
static inline uop_t *uop_alloc(ir_data_t *ir)
|
|
{
|
|
uop_t *uop;
|
|
|
|
if (ir->wr_pos >= UOP_NR_MAX)
|
|
fatal("Exceeded uOP max\n");
|
|
|
|
uop = &ir->uops[ir->wr_pos++];
|
|
|
|
uop->dest_reg_a = invalid_ir_reg;
|
|
uop->src_reg_a = invalid_ir_reg;
|
|
uop->src_reg_b = invalid_ir_reg;
|
|
uop->src_reg_c = invalid_ir_reg;
|
|
|
|
uop->jump_list_next = -1;
|
|
|
|
return uop;
|
|
}
|
|
|
|
static inline void uop_set_jump_dest(ir_data_t *ir, int jump_uop)
|
|
{
|
|
uop_t *uop = &ir->uops[jump_uop];
|
|
|
|
uop->jump_dest_uop = ir->wr_pos;
|
|
}
|
|
|
|
static inline int uop_gen_reg_src1(uint32_t uop_type, ir_data_t *ir, int src_reg_a)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
|
|
return ir->wr_pos-1;
|
|
}
|
|
|
|
static inline void uop_gen_reg_src1_arg(uint32_t uop_type, ir_data_t *ir, int arg, int src_reg_a)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
}
|
|
|
|
static inline int uop_gen_reg_src1_imm(uint32_t uop_type, ir_data_t *ir, int src_reg, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg);
|
|
uop->imm_data = imm;
|
|
|
|
return ir->wr_pos-1;
|
|
}
|
|
|
|
static inline void uop_gen_reg_dst_imm(uint32_t uop_type, ir_data_t *ir, int dest_reg, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->dest_reg_a = codegen_reg_write(dest_reg);
|
|
uop->imm_data = imm;
|
|
}
|
|
|
|
static inline void uop_gen_reg_dst_pointer(uint32_t uop_type, ir_data_t *ir, int dest_reg, void *p)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->dest_reg_a = codegen_reg_write(dest_reg);
|
|
uop->p = p;
|
|
}
|
|
|
|
static inline void uop_gen_reg_dst_src1(uint32_t uop_type, ir_data_t *ir, int dest_reg, int src_reg)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg);
|
|
uop->dest_reg_a = codegen_reg_write(dest_reg);
|
|
}
|
|
|
|
static inline void uop_gen_reg_dst_src1_imm(uint32_t uop_type, ir_data_t *ir, int dest_reg, int src_reg_a, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
uop->dest_reg_a = codegen_reg_write(dest_reg);
|
|
uop->imm_data = imm;
|
|
}
|
|
|
|
static inline void uop_gen_reg_dst_src2(uint32_t uop_type, ir_data_t *ir, int dest_reg, int src_reg_a, int src_reg_b)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
uop->src_reg_b = codegen_reg_read(src_reg_b);
|
|
uop->dest_reg_a = codegen_reg_write(dest_reg);
|
|
}
|
|
|
|
static inline void uop_gen_reg_dst_src2_imm(uint32_t uop_type, ir_data_t *ir, int dest_reg, int src_reg_a, int src_reg_b, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
uop->src_reg_b = codegen_reg_read(src_reg_b);
|
|
uop->dest_reg_a = codegen_reg_write(dest_reg);
|
|
uop->imm_data = imm;
|
|
}
|
|
|
|
static inline void uop_gen_reg_dst_src_imm(uint32_t uop_type, ir_data_t *ir, int dest_reg, int src_reg, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg);
|
|
uop->dest_reg_a = codegen_reg_write(dest_reg);
|
|
uop->imm_data = imm;
|
|
}
|
|
|
|
static inline int uop_gen_reg_src2(uint32_t uop_type, ir_data_t *ir, int src_reg_a, int src_reg_b)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
uop->src_reg_b = codegen_reg_read(src_reg_b);
|
|
|
|
return ir->wr_pos-1;
|
|
}
|
|
|
|
static inline void uop_gen_reg_src2_imm(uint32_t uop_type, ir_data_t *ir, int src_reg_a, int src_reg_b, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
uop->src_reg_b = codegen_reg_read(src_reg_b);
|
|
uop->imm_data = imm;
|
|
}
|
|
|
|
static inline void uop_gen_reg_src3(uint32_t uop_type, ir_data_t *ir, int src_reg_a, int src_reg_b, int src_reg_c)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
uop->src_reg_b = codegen_reg_read(src_reg_b);
|
|
uop->src_reg_c = codegen_reg_read(src_reg_c);
|
|
}
|
|
|
|
static inline void uop_gen_imm(uint32_t uop_type, ir_data_t *ir, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->imm_data = imm;
|
|
}
|
|
|
|
static inline void uop_gen_pointer(uint32_t uop_type, ir_data_t *ir, void *p)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->p = p;
|
|
}
|
|
|
|
static inline void uop_gen_pointer_imm(uint32_t uop_type, ir_data_t *ir, void *p, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->p = p;
|
|
uop->imm_data = imm;
|
|
}
|
|
|
|
static inline void uop_gen_reg_src_pointer(uint32_t uop_type, ir_data_t *ir, int src_reg_a, void *p)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
uop->p = p;
|
|
}
|
|
|
|
static inline void uop_gen_reg_src_pointer_imm(uint32_t uop_type, ir_data_t *ir, int src_reg_a, void *p, uint32_t imm)
|
|
{
|
|
uop_t *uop = uop_alloc(ir);
|
|
|
|
uop->type = uop_type;
|
|
uop->src_reg_a = codegen_reg_read(src_reg_a);
|
|
uop->p = p;
|
|
uop->imm_data = imm;
|
|
}
|
|
|
|
#define uop_LOAD_FUNC_ARG_REG(ir, arg, reg) uop_gen_reg_src1_arg(UOP_LOAD_FUNC_ARG_0 + arg, ir, reg)
|
|
|
|
#define uop_LOAD_FUNC_ARG_IMM(ir, arg, imm) uop_gen_imm(UOP_LOAD_FUNC_ARG_0_IMM + arg, ir, imm)
|
|
|
|
#define uop_ADD(ir, dst_reg, src_reg_a, src_reg_b) uop_gen_reg_dst_src2(UOP_ADD, ir, dst_reg, src_reg_a, src_reg_b)
|
|
#define uop_ADD_IMM(ir, dst_reg, src_reg, imm) uop_gen_reg_dst_src_imm(UOP_ADD_IMM, ir, dst_reg, src_reg, imm)
|
|
#define uop_ADD_LSHIFT(ir, dst_reg, src_reg_a, src_reg_b, shift) uop_gen_reg_dst_src2_imm(UOP_ADD_LSHIFT, ir, dst_reg, src_reg_a, src_reg_b, shift)
|
|
#define uop_AND(ir, dst_reg, src_reg_a, src_reg_b) uop_gen_reg_dst_src2(UOP_AND, ir, dst_reg, src_reg_a, src_reg_b)
|
|
#define uop_AND_IMM(ir, dst_reg, src_reg, imm) uop_gen_reg_dst_src_imm(UOP_AND_IMM, ir, dst_reg, src_reg, imm)
|
|
#define uop_OR(ir, dst_reg, src_reg_a, src_reg_b) uop_gen_reg_dst_src2(UOP_OR, ir, dst_reg, src_reg_a, src_reg_b)
|
|
#define uop_OR_IMM(ir, dst_reg, src_reg, imm) uop_gen_reg_dst_src_imm(UOP_OR_IMM, ir, dst_reg, src_reg, imm)
|
|
#define uop_SUB(ir, dst_reg, src_reg_a, src_reg_b) uop_gen_reg_dst_src2(UOP_SUB, ir, dst_reg, src_reg_a, src_reg_b)
|
|
#define uop_SUB_IMM(ir, dst_reg, src_reg, imm) uop_gen_reg_dst_src_imm(UOP_SUB_IMM, ir, dst_reg, src_reg, imm)
|
|
#define uop_XOR(ir, dst_reg, src_reg_a, src_reg_b) uop_gen_reg_dst_src2(UOP_XOR, ir, dst_reg, src_reg_a, src_reg_b)
|
|
#define uop_XOR_IMM(ir, dst_reg, src_reg, imm) uop_gen_reg_dst_src_imm(UOP_XOR_IMM, ir, dst_reg, src_reg, imm)
|
|
|
|
#define uop_SAR(ir, dst_reg, src_reg, shift_reg) uop_gen_reg_dst_src2(UOP_SAR, ir, dst_reg, src_reg, shift_reg)
|
|
#define uop_SAR_IMM(ir, dst_reg, src_reg, imm) uop_gen_reg_dst_src_imm(UOP_SAR_IMM, ir, dst_reg, src_reg, imm)
|
|
#define uop_SHL(ir, dst_reg, src_reg, shift_reg) uop_gen_reg_dst_src2(UOP_SHL, ir, dst_reg, src_reg, shift_reg)
|
|
#define uop_SHL_IMM(ir, dst_reg, src_reg, imm) uop_gen_reg_dst_src_imm(UOP_SHL_IMM, ir, dst_reg, src_reg, imm)
|
|
#define uop_SHR(ir, dst_reg, src_reg, shift_reg) uop_gen_reg_dst_src2(UOP_SHR, ir, dst_reg, src_reg, shift_reg)
|
|
#define uop_SHR_IMM(ir, dst_reg, src_reg, imm) uop_gen_reg_dst_src_imm(UOP_SHR_IMM, ir, dst_reg, src_reg, imm)
|
|
|
|
#define uop_CALL_FUNC(ir, p) uop_gen_pointer(UOP_CALL_FUNC, ir, p)
|
|
#define uop_CALL_FUNC_RESULT(ir, dst_reg, p) uop_gen_reg_dst_pointer(UOP_CALL_FUNC_RESULT, ir, dst_reg, p)
|
|
#define uop_CALL_INSTRUCTION_FUNC(ir, p) uop_gen_pointer(UOP_CALL_INSTRUCTION_FUNC, ir, p)
|
|
|
|
#define uop_CMP_IMM_JZ(ir, src_reg, imm, p) uop_gen_reg_src_pointer_imm(UOP_CMP_IMM_JZ, ir, src_reg, p, imm)
|
|
|
|
#define uop_CMP_IMM_JNZ_DEST(ir, src_reg, imm) uop_gen_reg_src1_imm(UOP_CMP_IMM_JNZ_DEST, ir, src_reg, imm)
|
|
#define uop_CMP_IMM_JZ_DEST(ir, src_reg, imm) uop_gen_reg_src1_imm(UOP_CMP_IMM_JZ_DEST, ir, src_reg, imm)
|
|
|
|
#define uop_CMP_JNB_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JNB_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JNBE_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JNBE_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JNL_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JNL_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JNLE_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JNLE_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JNO_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JNO_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JNZ_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JNZ_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JB_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JB_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JBE_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JBE_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JL_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JL_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JLE_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JLE_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JO_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JO_DEST, ir, src_reg_a, src_reg_b)
|
|
#define uop_CMP_JZ_DEST(ir, src_reg_a, src_reg_b) uop_gen_reg_src2(UOP_CMP_JZ_DEST, ir, src_reg_a, src_reg_b)
|
|
|
|
#define uop_JMP(ir, p) uop_gen_pointer(UOP_JMP, ir, p)
|
|
|
|
#define uop_LOAD_SEG(ir, p, src_reg) uop_gen_reg_src_pointer(UOP_LOAD_SEG, ir, src_reg, p)
|
|
|
|
#define uop_MEM_LOAD_ABS(ir, dst_reg, seg_reg, imm) uop_gen_reg_dst_src_imm(UOP_MEM_LOAD_ABS, ir, dst_reg, seg_reg, imm)
|
|
#define uop_MEM_LOAD_REG(ir, dst_reg, seg_reg, addr_reg) uop_gen_reg_dst_src2(UOP_MEM_LOAD_REG, ir, dst_reg, seg_reg, addr_reg)
|
|
#define uop_MEM_STORE_ABS(ir, seg_reg, imm, src_reg) uop_gen_reg_src2_imm(UOP_MEM_STORE_ABS, ir, seg_reg, src_reg, imm)
|
|
#define uop_MEM_STORE_REG(ir, seg_reg, addr_reg, src_reg) uop_gen_reg_src3(UOP_MEM_STORE_REG, ir, seg_reg, addr_reg, src_reg)
|
|
#define uop_MEM_STORE_IMM_8(ir, seg_reg, addr_reg, imm) uop_gen_reg_src2_imm(UOP_MEM_STORE_IMM_8, ir, seg_reg, addr_reg, imm)
|
|
#define uop_MEM_STORE_IMM_16(ir, seg_reg, addr_reg, imm) uop_gen_reg_src2_imm(UOP_MEM_STORE_IMM_16, ir, seg_reg, addr_reg, imm)
|
|
#define uop_MEM_STORE_IMM_32(ir, seg_reg, addr_reg, imm) uop_gen_reg_src2_imm(UOP_MEM_STORE_IMM_32, ir, seg_reg, addr_reg, imm)
|
|
|
|
#define uop_MOV(ir, dst_reg, src_reg) uop_gen_reg_dst_src1(UOP_MOV, ir, dst_reg, src_reg)
|
|
#define uop_MOV_IMM(ir, reg, imm) uop_gen_reg_dst_imm(UOP_MOV_IMM, ir, reg, imm)
|
|
#define uop_MOV_PTR(ir, reg, p) uop_gen_reg_dst_pointer(UOP_MOV_PTR, ir, reg, p)
|
|
#define uop_MOVZX(ir, dst_reg, src_reg) uop_gen_reg_dst_src1(UOP_MOVZX, ir, dst_reg, src_reg)
|
|
|
|
#define uop_STORE_PTR_IMM(ir, p, imm) uop_gen_pointer_imm(UOP_STORE_P_IMM, ir, p, imm)
|
|
#define uop_STORE_PTR_IMM_8(ir, p, imm) uop_gen_pointer_imm(UOP_STORE_P_IMM_8, ir, p, imm)
|
|
|
|
#define uop_TEST_JNS_DEST(ir, src_reg) uop_gen_reg_src1(UOP_TEST_JNS_DEST, ir, src_reg)
|
|
#define uop_TEST_JS_DEST(ir, src_reg) uop_gen_reg_src1(UOP_TEST_JS_DEST, ir, src_reg)
|
|
|
|
void codegen_direct_read_16(codeblock_t *block, int host_reg, void *p);
|
|
void codegen_direct_read_32(codeblock_t *block, int host_reg, void *p);
|
|
|
|
void codegen_direct_write_8(codeblock_t *block, void *p, int host_reg);
|
|
void codegen_direct_write_16(codeblock_t *block, void *p, int host_reg);
|
|
void codegen_direct_write_32(codeblock_t *block, void *p, int host_reg);
|
|
void codegen_direct_write_ptr(codeblock_t *block, void *p, int host_reg);
|
|
|
|
void codegen_direct_read_16_stack(codeblock_t *block, int host_reg, int stack_offset);
|
|
void codegen_direct_read_32_stack(codeblock_t *block, int host_reg, int stack_offset);
|
|
|
|
void codegen_direct_write_32_stack(codeblock_t *block, int stack_offset, int host_reg);
|
|
|
|
void codegen_set_jump_dest(codeblock_t *block, void *p);
|
|
|
|
#endif
|