Changeset 1986 in vbox

Timestamp:

Apr 9, 2007 10:22:30 AM (18 years ago)

Author:

vboxsync

svn:sync-xref-src-repo-rev:

20273

Message:

Btr emulation added. (possibly dangerous; not well tested)

Location:

trunk/src/VBox/VMM/VMMAll

Files:

• EMAll.cpp (modified) (3 diffs)
• EMAllA.asm (modified) (1 diff)

trunk/src/VBox/VMM/VMMAll/EMAll.cpp

@@ -1184 +1184 @@
                 /* All done! */
                 *pcbSize = param2.size;
+                return VINF_SUCCESS;
+            }
+#ifdef IN_GC
+        }
+    }
+#endif
+    return VERR_EM_INTERPRETER;
+}
+
+/**
+ * BTR Emulation.
+ */
+static int emInterpretBtr(PVM pVM, PDISCPUSTATE pCpu, PCPUMCTXCORE pRegFrame, RTGCPTR pvFault, uint32_t *pcbSize)
+{
+    OP_PARAMVAL param1, param2;
+    int rc = DISQueryParamVal(pRegFrame, pCpu, &pCpu->param1, &param1, PARAM_DEST);
+    if(VBOX_FAILURE(rc))
+        return VERR_EM_INTERPRETER;
+
+    rc = DISQueryParamVal(pRegFrame, pCpu, &pCpu->param2, &param2, PARAM_SOURCE);
+    if(VBOX_FAILURE(rc))
+        return VERR_EM_INTERPRETER;
+
+#ifdef IN_GC
+    if (TRPMHasTrap(pVM))
+    {
+        if (TRPMGetErrorCode(pVM) & X86_TRAP_PF_RW)
+        {
+#endif
+            RTGCPTR  pParam1;
+            uint32_t valpar1, valpar2;
+
+            /* The destination is always a virtual address */
+            if (param1.type != PARMTYPE_ADDRESS)
+                return VERR_EM_INTERPRETER;
+
+            pParam1 = (RTGCPTR)param1.val.val32;
+            pParam1 = emConvertToFlatAddr(pVM, pRegFrame, pCpu, &pCpu->param1, pParam1);
+
+            /* Register or immediate data */
+            switch(param2.type)
+            {
+            case PARMTYPE_IMMEDIATE:    /* both immediate data and register (ugly) */
+                valpar2 = param2.val.val32;
+                break;
+
+            default:
+                AssertFailed();
+                return VERR_EM_INTERPRETER;
+            }
+
+            pParam1 = (RTGCPTR)((RTGCUINTPTR)pParam1 + valpar2/8);
+#ifdef IN_GC
+            /* Safety check. */
+            /** @todo cpu may access two or four bytes */
+            AssertReturn(pParam1 == pvFault, VERR_EM_INTERPRETER);
+#endif
+            rc = emRamRead(pVM, &valpar1, pParam1, 1);
+            if (VBOX_FAILURE(rc))
+            {
+                AssertMsgFailed(("emRamRead %VGv size=%d failed with %Vrc\n", pParam1, param1.size, rc));
+                return VERR_EM_INTERPRETER;
+            }
+
+            /* Data read, emulate BTR. */
+            uint32_t eflags = EMEmulateBtr(&valpar1, valpar2 & 0x7);
+
+            /* Update guest's eflags and finish. */
+            pRegFrame->eflags.u32 = (pRegFrame->eflags.u32 & ~(X86_EFL_CF | X86_EFL_PF | X86_EFL_AF | X86_EFL_ZF | X86_EFL_SF | X86_EFL_OF))
+                                  | (eflags                &  (X86_EFL_CF | X86_EFL_PF | X86_EFL_AF | X86_EFL_ZF | X86_EFL_SF | X86_EFL_OF));
+
+            /* And write it back */
+            rc = emRamWrite(pVM, pParam1, &valpar1, 1);
+            if (VBOX_SUCCESS(rc))
+            {
+                /* All done! */
+                *pcbSize = 1;
                 return VINF_SUCCESS;
             }
@@ -1943 +2020 @@
         INTERPRET_CASE(OP_ADC,Adc);
         INTERPRET_CASE(OP_SUB,Sub);
+        INTERPRET_CASE(OP_BTR,Btr);
 #ifdef IN_GC
         INTERPRET_CASE(OP_RDTSC,Rdtsc);
@@ -1950 +2028 @@
         INTERPRET_CASE(OP_IRET,Iret);
 #ifdef VBOX_WITH_STATISTICS
-        INTERPRET_STAT_CASE(OP_BTR,Btr);
         INTERPRET_STAT_CASE(OP_BTS,Bts);
         INTERPRET_STAT_CASE(OP_CMPXCHG,CmpXchg);

trunk/src/VBox/VMM/VMMAll/EMAllA.asm

@@ -623 +623 @@
     retn
 ENDPROC     EMEmulateSub
+
+
+;;
+; Emulate BTR instruction, CDECL calling conv.
+; EMDECL(uint32_t) EMEmulateBtr(uint32_t *pu32Param1, uint32_t u32Param2);
+;
+; @returns EFLAGS after the operation, only arithmetic flags is valid.
+; @param    [esp + 04h]    Param 1 - First parameter - pointer to data item.
+; @param    [esp + 08h]    Param 2 - Second parameter.
+; @uses     eax, ecx, edx
+;
+align 16
+BEGINPROC   EMEmulateBtr
+%ifdef __AMD64__
+%ifndef __WIN64__
+    mov     rcx, rdi                    ; rcx = first parameter
+    mov     rdx, rsi                    ; rdx = second parameter
+%endif  ; !__WIN64__
+%else   ; !__AMD64__
+    mov     ecx, [esp + 04h]            ; ecx = first parameter
+    mov     edx, [esp + 08h]            ; edx = second parameter
+%endif
+
+    and     edx, 7
+    btr    [MY_PTR_REG], edx
+
+    ; collect flags and return.
+    pushf
+    pop     MY_RET_REG
+    retn
+ENDPROC     EMEmulateBtr