X-Git-Url: http://v3vee.org/palacios/gitweb/gitweb.cgi?a=blobdiff_plain;f=palacios%2Fsrc%2Fpalacios%2Fvmm_v3dec.c;h=c05aef163cfeea85dafe526f2be35de8a61ee84c;hb=4d1d8fadad33de7d3ebce2083d9782048f78b44e;hp=54e11ad17dabe5bfd579eb1eea130d453c8ea0ad;hpb=259a6afe752758f5ef79b19d12b599a6419cecc9;p=palacios.git diff --git a/palacios/src/palacios/vmm_v3dec.c b/palacios/src/palacios/vmm_v3dec.c index 54e11ad..c05aef1 100644 --- a/palacios/src/palacios/vmm_v3dec.c +++ b/palacios/src/palacios/vmm_v3dec.c @@ -20,7 +20,7 @@ #include #include -#ifndef CONFIG_DEBUG_DECODER +#ifndef V3_CONFIG_DEBUG_DECODER #undef PrintDebug #define PrintDebug(fmt, args...) #endif @@ -75,7 +75,7 @@ int v3_decode(struct guest_info * core, addr_t instr_ptr, struct x86_instr * ins int length = 0; - PrintDebug("Decoding Instruction at %p\n", (void *)instr_ptr); + PrintDebug(core->vm_info, core, "Decoding Instruction at %p\n", (void *)instr_ptr); memset(instr, 0, sizeof(struct x86_instr)); @@ -102,10 +102,10 @@ int v3_decode(struct guest_info * core, addr_t instr_ptr, struct x86_instr * ins form = op_code_to_form((uint8_t *)(instr_ptr + length), &length); - PrintDebug("\t decoded as (%s)\n", op_form_to_str(form)); + PrintDebug(core->vm_info, core, "\t decoded as (%s)\n", op_form_to_str(form)); if (form == INVALID_INSTR) { - PrintError("Could not find instruction form (%x)\n", *(uint32_t *)(instr_ptr + length)); + PrintError(core->vm_info, core, "Could not find instruction form (%x)\n", *(uint32_t *)(instr_ptr + length)); return -1; } @@ -114,15 +114,17 @@ int v3_decode(struct guest_info * core, addr_t instr_ptr, struct x86_instr * ins ret = parse_operands(core, (uint8_t *)(instr_ptr + length), instr, form); if (ret == -1) { - PrintError("Could not parse instruction operands\n"); + PrintError(core->vm_info, core, "Could not parse instruction operands\n"); return -1; } length += ret; instr->instr_length += length; -#ifdef CONFIG_DEBUG_DECODER +#ifdef V3_CONFIG_DEBUG_DECODER + V3_Print(core->vm_info, core, "Decoding Instr at %p\n", (void *)core->rip); v3_print_instr(instr); + V3_Print(core->vm_info, core, "CS DB FLag=%x\n", core->segments.cs.db); #endif return 0; @@ -138,7 +140,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, uint8_t * instr_start = instr_ptr; - PrintDebug("\tOperand width=%d, Addr width=%d\n", operand_width, addr_width); + PrintDebug(core->vm_info, core, "\tOperand width=%d, Addr width=%d\n", operand_width, addr_width); switch (form) { case ADC_IMM2_8: @@ -153,14 +155,14 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, case AND_IMM2: case OR_IMM2: case SUB_IMM2: - case XOR_IMM2: - case MOV_IMM2:{ + case XOR_IMM2: + case MOV_IMM2: { uint8_t reg_code = 0; ret = decode_rm_operand(core, instr_ptr, form, instr, &(instr->dst_operand), ®_code); if (ret == -1) { - PrintError("Error decoding operand\n"); + PrintError(core->vm_info, core, "Error decoding operand\n"); return -1; } @@ -176,8 +178,10 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, instr->src_operand.operand = *(uint16_t *)instr_ptr; } else if (operand_width == 4) { instr->src_operand.operand = *(uint32_t *)instr_ptr; + } else if (operand_width == 8) { + instr->src_operand.operand = *(sint32_t *)instr_ptr; // This is a special case for sign extended 64bit ops } else { - PrintError("Illegal operand width (%d)\n", operand_width); + PrintError(core->vm_info, core, "Illegal operand width (%d)\n", operand_width); return -1; } @@ -209,7 +213,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, ret = decode_rm_operand(core, instr_ptr, form, instr, &(instr->dst_operand), ®_code); if (ret == -1) { - PrintError("Error decoding operand\n"); + PrintError(core->vm_info, core, "Error decoding operand\n"); return -1; } @@ -246,7 +250,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, ret = decode_rm_operand(core, instr_ptr, form, instr, &(instr->src_operand), ®_code); if (ret == -1) { - PrintError("Error decoding operand\n"); + PrintError(core->vm_info, core, "Error decoding operand\n"); return -1; } @@ -263,6 +267,80 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, break; } + case MOV_MEM2AL_8: + case MOV_MEM2AX: { + + /* Use AX for destination operand */ + instr->dst_operand.size = operand_width; + instr->dst_operand.type = REG_OPERAND; + instr->dst_operand.operand = (addr_t)&(core->vm_regs.rax); + instr->dst_operand.write = 1; + + /* Get the correct offset -- (seg + offset) */ + struct v3_segment * src_reg = get_instr_segment(core, instr); + addr_t offset = 0; + + if (addr_width == 2) { + offset = *(uint16_t *)instr_ptr; + } else if (addr_width == 4) { + offset = *(uint32_t *)instr_ptr; + } else if (addr_width == 8) { + offset = *(uint64_t *)instr_ptr; + } else { + PrintError(core->vm_info, core, "illegal address width for %s (width=%d)\n", + op_form_to_str(form), addr_width); + return -1; + } + + instr->src_operand.operand = ADDR_MASK(get_addr_linear(core, offset, src_reg), + get_addr_width(core, instr)); + + instr->src_operand.read = 1; + instr->src_operand.type = MEM_OPERAND; + instr->src_operand.size = addr_width; + + instr_ptr += addr_width; + instr->num_operands = 2; + + break; + } + case MOV_AL2MEM_8: + case MOV_AX2MEM: { + + /* Use AX for src operand */ + instr->src_operand.size = operand_width; + instr->src_operand.type = REG_OPERAND; + instr->src_operand.operand = (addr_t)&(core->vm_regs.rax); + instr->src_operand.write = 1; + + /* Get the correct offset -- (seg + offset) */ + struct v3_segment * dst_reg = get_instr_segment(core, instr); + addr_t offset = 0; + + if (addr_width == 2) { + offset = *(uint16_t *)instr_ptr; + } else if (addr_width == 4) { + offset = *(uint32_t *)instr_ptr; + } else if (addr_width == 8) { + offset = *(uint64_t *)instr_ptr; + } else { + PrintError(core->vm_info, core, "illegal address width for %s (width=%d)\n", + op_form_to_str(form), addr_width); + return -1; + } + + instr->dst_operand.operand = ADDR_MASK(get_addr_linear(core, offset, dst_reg), + get_addr_width(core, instr)); + + instr->dst_operand.read = 1; + instr->dst_operand.type = MEM_OPERAND; + instr->dst_operand.size = addr_width; + + instr_ptr += addr_width; + instr->num_operands = 2; + + break; + } case MOVSX_8: case MOVZX_8: { uint8_t reg_code = 0; @@ -271,7 +349,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, instr->src_operand.size = 1; if (ret == -1) { - PrintError("Error decoding operand\n"); + PrintError(core->vm_info, core, "Error decoding operand\n"); return -1; } @@ -296,7 +374,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, instr->src_operand.size = 2; if (ret == -1) { - PrintError("Error decoding operand\n"); + PrintError(core->vm_info, core, "Error decoding operand\n"); return -1; } @@ -324,7 +402,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, ret = decode_rm_operand(core, instr_ptr, form, instr, &(instr->dst_operand), ®_code); if (ret == -1) { - PrintError("Error decoding operand\n"); + PrintError(core->vm_info, core, "Error decoding operand\n"); return -1; } @@ -348,7 +426,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, instr->is_str_op = 1; if (instr->prefixes.rep == 1) { - instr->str_op_length = MASK(core->vm_regs.rcx, operand_width); + instr->str_op_length = MASK(core->vm_regs.rcx, addr_width); } else { instr->str_op_length = 1; } @@ -380,7 +458,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, ®_code); if (ret == -1) { - PrintError("Error decoding operand for (%s)\n", op_form_to_str(form)); + PrintError(core->vm_info, core, "Error decoding operand for (%s)\n", op_form_to_str(form)); return -1; } @@ -403,7 +481,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, ®_code); if (ret == -1) { - PrintError("Error decoding operand for (%s)\n", op_form_to_str(form)); + PrintError(core->vm_info, core, "Error decoding operand for (%s)\n", op_form_to_str(form)); return -1; } @@ -424,7 +502,7 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, instr->is_str_op = 1; if (instr->prefixes.rep == 1) { - instr->str_op_length = MASK(core->vm_regs.rcx, operand_width); + instr->str_op_length = MASK(core->vm_regs.rcx, addr_width); } else { instr->str_op_length = 1; } @@ -444,28 +522,54 @@ static int parse_operands(struct guest_info * core, uint8_t * instr_ptr, break; } + case INT: { + instr->dst_operand.type = IMM_OPERAND; + instr->dst_operand.size = operand_width; + instr->dst_operand.operand = *(uint8_t *)instr_ptr; + instr_ptr += operand_width; + instr->num_operands = 1; + + break; + } case INVLPG: { uint8_t reg_code = 0; - + ret = decode_rm_operand(core, instr_ptr, form, instr, &(instr->dst_operand), ®_code); - + if (ret == -1) { - PrintError("Error decoding operand for (%s)\n", op_form_to_str(form)); + PrintError(core->vm_info, core, "Error decoding operand for (%s)\n", op_form_to_str(form)); return -1; } - + instr_ptr += ret; - + + instr->num_operands = 1; + break; + } + case LMSW: + case SMSW: { + uint8_t reg_code = 0; + + ret = decode_rm_operand(core, instr_ptr, form, instr, &(instr->dst_operand), ®_code); + + if (ret == -1) { + PrintError(core->vm_info, core, "Error decoding operand for (%s)\n", op_form_to_str(form)); + return -1; + } + + instr_ptr += ret; + + instr->dst_operand.read = 1; + instr->num_operands = 1; break; } case CLTS: { // no operands. break; - } default: - PrintError("Invalid Instruction form: %s\n", op_form_to_str(form)); + PrintError(core->vm_info, core, "Invalid Instruction form: %s\n", op_form_to_str(form)); return -1; } @@ -484,12 +588,14 @@ static v3_op_type_t op_form_to_type(op_form_t form) { case INVLPG: return V3_OP_INVLPG; + case INT: + return V3_OP_INT; + case MOV_CR2: return V3_OP_MOVCR2; case MOV_2CR: return V3_OP_MOV2CR; - case MOV_MEM2_8: case MOV_MEM2: case MOV_2MEM_8: @@ -515,7 +621,6 @@ static v3_op_type_t op_form_to_type(op_form_t form) { return V3_OP_MOVZX; - case ADC_2MEM_8: case ADC_2MEM: case ADC_MEM2_8: