1 | /* $Id: IEMR3.cpp 100222 2023-06-20 02:40:48Z vboxsync $ */
|
---|
2 | /** @file
|
---|
3 | * IEM - Interpreted Execution Manager.
|
---|
4 | */
|
---|
5 |
|
---|
6 | /*
|
---|
7 | * Copyright (C) 2011-2023 Oracle and/or its affiliates.
|
---|
8 | *
|
---|
9 | * This file is part of VirtualBox base platform packages, as
|
---|
10 | * available from https://www.virtualbox.org.
|
---|
11 | *
|
---|
12 | * This program is free software; you can redistribute it and/or
|
---|
13 | * modify it under the terms of the GNU General Public License
|
---|
14 | * as published by the Free Software Foundation, in version 3 of the
|
---|
15 | * License.
|
---|
16 | *
|
---|
17 | * This program is distributed in the hope that it will be useful, but
|
---|
18 | * WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
19 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
---|
20 | * General Public License for more details.
|
---|
21 | *
|
---|
22 | * You should have received a copy of the GNU General Public License
|
---|
23 | * along with this program; if not, see <https://www.gnu.org/licenses>.
|
---|
24 | *
|
---|
25 | * SPDX-License-Identifier: GPL-3.0-only
|
---|
26 | */
|
---|
27 |
|
---|
28 |
|
---|
29 | /*********************************************************************************************************************************
|
---|
30 | * Header Files *
|
---|
31 | *********************************************************************************************************************************/
|
---|
32 | #define LOG_GROUP LOG_GROUP_EM
|
---|
33 | #include <VBox/vmm/iem.h>
|
---|
34 | #include <VBox/vmm/cpum.h>
|
---|
35 | #include <VBox/vmm/dbgf.h>
|
---|
36 | #include <VBox/vmm/mm.h>
|
---|
37 | #if defined(VBOX_VMM_TARGET_ARMV8)
|
---|
38 | # include "IEMInternal-armv8.h"
|
---|
39 | #else
|
---|
40 | # include "IEMInternal.h"
|
---|
41 | #endif
|
---|
42 | #include <VBox/vmm/vm.h>
|
---|
43 | #include <VBox/vmm/vmapi.h>
|
---|
44 | #include <VBox/err.h>
|
---|
45 | #ifdef VBOX_WITH_DEBUGGER
|
---|
46 | # include <VBox/dbg.h>
|
---|
47 | #endif
|
---|
48 |
|
---|
49 | #include <iprt/assert.h>
|
---|
50 | #include <iprt/getopt.h>
|
---|
51 | #include <iprt/string.h>
|
---|
52 |
|
---|
53 |
|
---|
54 | /*********************************************************************************************************************************
|
---|
55 | * Internal Functions *
|
---|
56 | *********************************************************************************************************************************/
|
---|
57 | static FNDBGFINFOARGVINT iemR3InfoITlb;
|
---|
58 | static FNDBGFINFOARGVINT iemR3InfoDTlb;
|
---|
59 | #ifdef VBOX_WITH_DEBUGGER
|
---|
60 | static void iemR3RegisterDebuggerCommands(void);
|
---|
61 | #endif
|
---|
62 |
|
---|
63 |
|
---|
64 | #if !defined(VBOX_VMM_TARGET_ARMV8)
|
---|
65 | static const char *iemGetTargetCpuName(uint32_t enmTargetCpu)
|
---|
66 | {
|
---|
67 | switch (enmTargetCpu)
|
---|
68 | {
|
---|
69 | #define CASE_RET_STR(enmValue) case enmValue: return #enmValue + (sizeof("IEMTARGETCPU_") - 1)
|
---|
70 | CASE_RET_STR(IEMTARGETCPU_8086);
|
---|
71 | CASE_RET_STR(IEMTARGETCPU_V20);
|
---|
72 | CASE_RET_STR(IEMTARGETCPU_186);
|
---|
73 | CASE_RET_STR(IEMTARGETCPU_286);
|
---|
74 | CASE_RET_STR(IEMTARGETCPU_386);
|
---|
75 | CASE_RET_STR(IEMTARGETCPU_486);
|
---|
76 | CASE_RET_STR(IEMTARGETCPU_PENTIUM);
|
---|
77 | CASE_RET_STR(IEMTARGETCPU_PPRO);
|
---|
78 | CASE_RET_STR(IEMTARGETCPU_CURRENT);
|
---|
79 | #undef CASE_RET_STR
|
---|
80 | default: return "Unknown";
|
---|
81 | }
|
---|
82 | }
|
---|
83 | #endif
|
---|
84 |
|
---|
85 |
|
---|
86 | /**
|
---|
87 | * Initializes the interpreted execution manager.
|
---|
88 | *
|
---|
89 | * This must be called after CPUM as we're quering information from CPUM about
|
---|
90 | * the guest and host CPUs.
|
---|
91 | *
|
---|
92 | * @returns VBox status code.
|
---|
93 | * @param pVM The cross context VM structure.
|
---|
94 | */
|
---|
95 | VMMR3DECL(int) IEMR3Init(PVM pVM)
|
---|
96 | {
|
---|
97 | #if !defined(VBOX_VMM_TARGET_ARMV8) && !defined(VBOX_WITHOUT_CPUID_HOST_CALL)
|
---|
98 | /*
|
---|
99 | * Read configuration.
|
---|
100 | */
|
---|
101 | PCFGMNODE pIem = CFGMR3GetChild(CFGMR3GetRoot(pVM), "IEM");
|
---|
102 |
|
---|
103 | /** @cfgm{/IEM/CpuIdHostCall, boolean, false}
|
---|
104 | * Controls whether the custom VBox specific CPUID host call interface is
|
---|
105 | * enabled or not. */
|
---|
106 | # ifdef DEBUG_bird
|
---|
107 | int rc = CFGMR3QueryBoolDef(pIem, "CpuIdHostCall", &pVM->iem.s.fCpuIdHostCall, true);
|
---|
108 | # else
|
---|
109 | int rc = CFGMR3QueryBoolDef(pIem, "CpuIdHostCall", &pVM->iem.s.fCpuIdHostCall, false);
|
---|
110 | # endif
|
---|
111 | AssertLogRelRCReturn(rc, rc);
|
---|
112 | #endif
|
---|
113 |
|
---|
114 | /*
|
---|
115 | * Initialize per-CPU data and register statistics.
|
---|
116 | */
|
---|
117 | uint64_t const uInitialTlbRevision = UINT64_C(0) - (IEMTLB_REVISION_INCR * 200U);
|
---|
118 | uint64_t const uInitialTlbPhysRev = UINT64_C(0) - (IEMTLB_PHYS_REV_INCR * 100U);
|
---|
119 |
|
---|
120 | for (VMCPUID idCpu = 0; idCpu < pVM->cCpus; idCpu++)
|
---|
121 | {
|
---|
122 | PVMCPU pVCpu = pVM->apCpusR3[idCpu];
|
---|
123 | AssertCompile(sizeof(pVCpu->iem.s) <= sizeof(pVCpu->iem.padding)); /* (tstVMStruct can't do it's job w/o instruction stats) */
|
---|
124 |
|
---|
125 | pVCpu->iem.s.CodeTlb.uTlbRevision = pVCpu->iem.s.DataTlb.uTlbRevision = uInitialTlbRevision;
|
---|
126 | pVCpu->iem.s.CodeTlb.uTlbPhysRev = pVCpu->iem.s.DataTlb.uTlbPhysRev = uInitialTlbPhysRev;
|
---|
127 |
|
---|
128 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cInstructions, STAMTYPE_U32, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
129 | "Instructions interpreted", "/IEM/CPU%u/cInstructions", idCpu);
|
---|
130 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cLongJumps, STAMTYPE_U32, STAMVISIBILITY_ALWAYS, STAMUNIT_BYTES,
|
---|
131 | "Number of longjmp calls", "/IEM/CPU%u/cLongJumps", idCpu);
|
---|
132 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cPotentialExits, STAMTYPE_U32, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
133 | "Potential exits", "/IEM/CPU%u/cPotentialExits", idCpu);
|
---|
134 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cRetAspectNotImplemented, STAMTYPE_U32_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
135 | "VERR_IEM_ASPECT_NOT_IMPLEMENTED", "/IEM/CPU%u/cRetAspectNotImplemented", idCpu);
|
---|
136 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cRetInstrNotImplemented, STAMTYPE_U32_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
137 | "VERR_IEM_INSTR_NOT_IMPLEMENTED", "/IEM/CPU%u/cRetInstrNotImplemented", idCpu);
|
---|
138 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cRetInfStatuses, STAMTYPE_U32_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
139 | "Informational statuses returned", "/IEM/CPU%u/cRetInfStatuses", idCpu);
|
---|
140 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cRetErrStatuses, STAMTYPE_U32_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
141 | "Error statuses returned", "/IEM/CPU%u/cRetErrStatuses", idCpu);
|
---|
142 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cbWritten, STAMTYPE_U32, STAMVISIBILITY_ALWAYS, STAMUNIT_BYTES,
|
---|
143 | "Approx bytes written", "/IEM/CPU%u/cbWritten", idCpu);
|
---|
144 | STAMR3RegisterF(pVM, &pVCpu->iem.s.cPendingCommit, STAMTYPE_U32, STAMVISIBILITY_ALWAYS, STAMUNIT_BYTES,
|
---|
145 | "Times RC/R0 had to postpone instruction committing to ring-3", "/IEM/CPU%u/cPendingCommit", idCpu);
|
---|
146 |
|
---|
147 | #ifdef VBOX_WITH_STATISTICS
|
---|
148 | STAMR3RegisterF(pVM, &pVCpu->iem.s.CodeTlb.cTlbHits, STAMTYPE_U64_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
149 | "Code TLB hits", "/IEM/CPU%u/CodeTlb-Hits", idCpu);
|
---|
150 | STAMR3RegisterF(pVM, &pVCpu->iem.s.DataTlb.cTlbHits, STAMTYPE_U64_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
151 | "Data TLB hits", "/IEM/CPU%u/DataTlb-Hits", idCpu);
|
---|
152 | #endif
|
---|
153 | STAMR3RegisterF(pVM, &pVCpu->iem.s.CodeTlb.cTlbMisses, STAMTYPE_U32_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
154 | "Code TLB misses", "/IEM/CPU%u/CodeTlb-Misses", idCpu);
|
---|
155 | STAMR3RegisterF(pVM, &pVCpu->iem.s.CodeTlb.uTlbRevision, STAMTYPE_X64, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
156 | "Code TLB revision", "/IEM/CPU%u/CodeTlb-Revision", idCpu);
|
---|
157 | STAMR3RegisterF(pVM, (void *)&pVCpu->iem.s.CodeTlb.uTlbPhysRev, STAMTYPE_X64, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
158 | "Code TLB physical revision", "/IEM/CPU%u/CodeTlb-PhysRev", idCpu);
|
---|
159 | STAMR3RegisterF(pVM, &pVCpu->iem.s.CodeTlb.cTlbSlowReadPath, STAMTYPE_U32_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
160 | "Code TLB slow read path", "/IEM/CPU%u/CodeTlb-SlowReads", idCpu);
|
---|
161 |
|
---|
162 | STAMR3RegisterF(pVM, &pVCpu->iem.s.DataTlb.cTlbMisses, STAMTYPE_U32_RESET, STAMVISIBILITY_ALWAYS, STAMUNIT_COUNT,
|
---|
163 | "Data TLB misses", "/IEM/CPU%u/DataTlb-Misses", idCpu);
|
---|
164 | STAMR3RegisterF(pVM, &pVCpu->iem.s.DataTlb.uTlbRevision, STAMTYPE_X64, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
165 | "Data TLB revision", "/IEM/CPU%u/DataTlb-Revision", idCpu);
|
---|
166 | STAMR3RegisterF(pVM, (void *)&pVCpu->iem.s.DataTlb.uTlbPhysRev, STAMTYPE_X64, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
167 | "Data TLB physical revision", "/IEM/CPU%u/DataTlb-PhysRev", idCpu);
|
---|
168 |
|
---|
169 | STAMR3RegisterF(pVM, (void *)&pVCpu->iem.s.cTbAllocs, STAMTYPE_U64, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
170 | "Translation block allocations", "/IEM/CPU%u/cTbAllocs", idCpu);
|
---|
171 | STAMR3RegisterF(pVM, (void *)&pVCpu->iem.s.cTbFrees, STAMTYPE_U64, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
172 | "Translation block frees", "/IEM/CPU%u/cTbFrees", idCpu);
|
---|
173 | STAMR3RegisterF(pVM, (void *)&pVCpu->iem.s.cTbLookupHits, STAMTYPE_U64, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
174 | "Translation block lookup hits", "/IEM/CPU%u/cTbLookupHits", idCpu);
|
---|
175 | STAMR3RegisterF(pVM, (void *)&pVCpu->iem.s.cTbLookupMisses, STAMTYPE_U64, STAMVISIBILITY_ALWAYS, STAMUNIT_NONE,
|
---|
176 | "Translation block lookup misses", "/IEM/CPU%u/cTbLookupMisses", idCpu);
|
---|
177 |
|
---|
178 | for (uint32_t i = 0; i < RT_ELEMENTS(pVCpu->iem.s.aStatXcpts); i++)
|
---|
179 | STAMR3RegisterF(pVM, &pVCpu->iem.s.aStatXcpts[i], STAMTYPE_COUNTER, STAMVISIBILITY_USED, STAMUNIT_OCCURENCES,
|
---|
180 | "", "/IEM/CPU%u/Exceptions/%02x", idCpu, i);
|
---|
181 | for (uint32_t i = 0; i < RT_ELEMENTS(pVCpu->iem.s.aStatInts); i++)
|
---|
182 | STAMR3RegisterF(pVM, &pVCpu->iem.s.aStatInts[i], STAMTYPE_U32_RESET, STAMVISIBILITY_USED, STAMUNIT_OCCURENCES,
|
---|
183 | "", "/IEM/CPU%u/Interrupts/%02x", idCpu, i);
|
---|
184 |
|
---|
185 | #if !defined(VBOX_VMM_TARGET_ARMV8) && defined(VBOX_WITH_STATISTICS) && !defined(DOXYGEN_RUNNING)
|
---|
186 | /* Instruction statistics: */
|
---|
187 | # define IEM_DO_INSTR_STAT(a_Name, a_szDesc) \
|
---|
188 | STAMR3RegisterF(pVM, &pVCpu->iem.s.StatsRZ.a_Name, STAMTYPE_U32_RESET, STAMVISIBILITY_USED, \
|
---|
189 | STAMUNIT_COUNT, a_szDesc, "/IEM/CPU%u/instr-RZ/" #a_Name, idCpu); \
|
---|
190 | STAMR3RegisterF(pVM, &pVCpu->iem.s.StatsR3.a_Name, STAMTYPE_U32_RESET, STAMVISIBILITY_USED, \
|
---|
191 | STAMUNIT_COUNT, a_szDesc, "/IEM/CPU%u/instr-R3/" #a_Name, idCpu);
|
---|
192 | # include "IEMInstructionStatisticsTmpl.h"
|
---|
193 | # undef IEM_DO_INSTR_STAT
|
---|
194 | #endif
|
---|
195 |
|
---|
196 | /*
|
---|
197 | * Host and guest CPU information.
|
---|
198 | */
|
---|
199 | if (idCpu == 0)
|
---|
200 | {
|
---|
201 | pVCpu->iem.s.enmCpuVendor = CPUMGetGuestCpuVendor(pVM);
|
---|
202 | pVCpu->iem.s.enmHostCpuVendor = CPUMGetHostCpuVendor(pVM);
|
---|
203 | #if !defined(VBOX_VMM_TARGET_ARMV8)
|
---|
204 | pVCpu->iem.s.aidxTargetCpuEflFlavour[0] = pVCpu->iem.s.enmCpuVendor == CPUMCPUVENDOR_INTEL
|
---|
205 | || pVCpu->iem.s.enmCpuVendor == CPUMCPUVENDOR_VIA /*??*/
|
---|
206 | ? IEMTARGETCPU_EFL_BEHAVIOR_INTEL : IEMTARGETCPU_EFL_BEHAVIOR_AMD;
|
---|
207 | # if defined(RT_ARCH_X86) || defined(RT_ARCH_AMD64)
|
---|
208 | if (pVCpu->iem.s.enmCpuVendor == pVCpu->iem.s.enmHostCpuVendor)
|
---|
209 | pVCpu->iem.s.aidxTargetCpuEflFlavour[1] = IEMTARGETCPU_EFL_BEHAVIOR_NATIVE;
|
---|
210 | else
|
---|
211 | # endif
|
---|
212 | pVCpu->iem.s.aidxTargetCpuEflFlavour[1] = pVCpu->iem.s.aidxTargetCpuEflFlavour[0];
|
---|
213 | #else
|
---|
214 | pVCpu->iem.s.aidxTargetCpuEflFlavour[0] = IEMTARGETCPU_EFL_BEHAVIOR_NATIVE;
|
---|
215 | pVCpu->iem.s.aidxTargetCpuEflFlavour[1] = pVCpu->iem.s.aidxTargetCpuEflFlavour[0];
|
---|
216 | #endif
|
---|
217 |
|
---|
218 | #if !defined(VBOX_VMM_TARGET_ARMV8) && (IEM_CFG_TARGET_CPU == IEMTARGETCPU_DYNAMIC)
|
---|
219 | switch (pVM->cpum.ro.GuestFeatures.enmMicroarch)
|
---|
220 | {
|
---|
221 | case kCpumMicroarch_Intel_8086: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_8086; break;
|
---|
222 | case kCpumMicroarch_Intel_80186: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_186; break;
|
---|
223 | case kCpumMicroarch_Intel_80286: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_286; break;
|
---|
224 | case kCpumMicroarch_Intel_80386: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_386; break;
|
---|
225 | case kCpumMicroarch_Intel_80486: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_486; break;
|
---|
226 | case kCpumMicroarch_Intel_P5: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_PENTIUM; break;
|
---|
227 | case kCpumMicroarch_Intel_P6: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_PPRO; break;
|
---|
228 | case kCpumMicroarch_NEC_V20: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_V20; break;
|
---|
229 | case kCpumMicroarch_NEC_V30: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_V20; break;
|
---|
230 | default: pVCpu->iem.s.uTargetCpu = IEMTARGETCPU_CURRENT; break;
|
---|
231 | }
|
---|
232 | LogRel(("IEM: TargetCpu=%s, Microarch=%s aidxTargetCpuEflFlavour={%d,%d}\n",
|
---|
233 | iemGetTargetCpuName(pVCpu->iem.s.uTargetCpu), CPUMMicroarchName(pVM->cpum.ro.GuestFeatures.enmMicroarch),
|
---|
234 | pVCpu->iem.s.aidxTargetCpuEflFlavour[0], pVCpu->iem.s.aidxTargetCpuEflFlavour[1]));
|
---|
235 | #else
|
---|
236 | LogRel(("IEM: Microarch=%s aidxTargetCpuEflFlavour={%d,%d}\n",
|
---|
237 | CPUMMicroarchName(pVM->cpum.ro.GuestFeatures.enmMicroarch),
|
---|
238 | pVCpu->iem.s.aidxTargetCpuEflFlavour[0], pVCpu->iem.s.aidxTargetCpuEflFlavour[1]));
|
---|
239 | #endif
|
---|
240 | }
|
---|
241 | else
|
---|
242 | {
|
---|
243 | pVCpu->iem.s.enmCpuVendor = pVM->apCpusR3[0]->iem.s.enmCpuVendor;
|
---|
244 | pVCpu->iem.s.enmHostCpuVendor = pVM->apCpusR3[0]->iem.s.enmHostCpuVendor;
|
---|
245 | pVCpu->iem.s.aidxTargetCpuEflFlavour[0] = pVM->apCpusR3[0]->iem.s.aidxTargetCpuEflFlavour[0];
|
---|
246 | pVCpu->iem.s.aidxTargetCpuEflFlavour[1] = pVM->apCpusR3[0]->iem.s.aidxTargetCpuEflFlavour[1];
|
---|
247 | #if IEM_CFG_TARGET_CPU == IEMTARGETCPU_DYNAMIC
|
---|
248 | pVCpu->iem.s.uTargetCpu = pVM->apCpusR3[0]->iem.s.uTargetCpu;
|
---|
249 | #endif
|
---|
250 | }
|
---|
251 |
|
---|
252 | /*
|
---|
253 | * Mark all buffers free.
|
---|
254 | */
|
---|
255 | uint32_t iMemMap = RT_ELEMENTS(pVCpu->iem.s.aMemMappings);
|
---|
256 | while (iMemMap-- > 0)
|
---|
257 | pVCpu->iem.s.aMemMappings[iMemMap].fAccess = IEM_ACCESS_INVALID;
|
---|
258 | }
|
---|
259 |
|
---|
260 | #if !defined(VBOX_VMM_TARGET_ARMV8) && defined(VBOX_WITH_NESTED_HWVIRT_VMX)
|
---|
261 | /*
|
---|
262 | * Register the per-VM VMX APIC-access page handler type.
|
---|
263 | */
|
---|
264 | if (pVM->cpum.ro.GuestFeatures.fVmx)
|
---|
265 | {
|
---|
266 | rc = PGMR3HandlerPhysicalTypeRegister(pVM, PGMPHYSHANDLERKIND_ALL, PGMPHYSHANDLER_F_NOT_IN_HM,
|
---|
267 | iemVmxApicAccessPageHandler,
|
---|
268 | "VMX APIC-access page", &pVM->iem.s.hVmxApicAccessPage);
|
---|
269 | AssertLogRelRCReturn(rc, rc);
|
---|
270 | }
|
---|
271 | #endif
|
---|
272 |
|
---|
273 | DBGFR3InfoRegisterInternalArgv(pVM, "itlb", "IEM instruction TLB", iemR3InfoITlb, DBGFINFO_FLAGS_RUN_ON_EMT);
|
---|
274 | DBGFR3InfoRegisterInternalArgv(pVM, "dtlb", "IEM instruction TLB", iemR3InfoDTlb, DBGFINFO_FLAGS_RUN_ON_EMT);
|
---|
275 | #ifdef VBOX_WITH_DEBUGGER
|
---|
276 | iemR3RegisterDebuggerCommands();
|
---|
277 | #endif
|
---|
278 |
|
---|
279 | return VINF_SUCCESS;
|
---|
280 | }
|
---|
281 |
|
---|
282 |
|
---|
283 | VMMR3DECL(int) IEMR3Term(PVM pVM)
|
---|
284 | {
|
---|
285 | NOREF(pVM);
|
---|
286 | return VINF_SUCCESS;
|
---|
287 | }
|
---|
288 |
|
---|
289 |
|
---|
290 | VMMR3DECL(void) IEMR3Relocate(PVM pVM)
|
---|
291 | {
|
---|
292 | RT_NOREF(pVM);
|
---|
293 | }
|
---|
294 |
|
---|
295 |
|
---|
296 | /** Worker for iemR3InfoTlbPrintSlots and iemR3InfoTlbPrintAddress. */
|
---|
297 | static void iemR3InfoTlbPrintHeader(PVMCPU pVCpu, PCDBGFINFOHLP pHlp, IEMTLB const *pTlb, bool *pfHeader)
|
---|
298 | {
|
---|
299 | if (*pfHeader)
|
---|
300 | return;
|
---|
301 | pHlp->pfnPrintf(pHlp, "%cTLB for CPU %u:\n", &pVCpu->iem.s.CodeTlb == pTlb ? 'I' : 'D', pVCpu->idCpu);
|
---|
302 | *pfHeader = true;
|
---|
303 | }
|
---|
304 |
|
---|
305 |
|
---|
306 | /** Worker for iemR3InfoTlbPrintSlots and iemR3InfoTlbPrintAddress. */
|
---|
307 | static void iemR3InfoTlbPrintSlot(PCDBGFINFOHLP pHlp, IEMTLB const *pTlb, IEMTLBENTRY const *pTlbe, uint32_t uSlot)
|
---|
308 | {
|
---|
309 | pHlp->pfnPrintf(pHlp, "%02x: %s %#018RX64 -> %RGp / %p / %#05x %s%s%s%s/%s%s%s/%s %s\n",
|
---|
310 | uSlot,
|
---|
311 | (pTlbe->uTag & IEMTLB_REVISION_MASK) == pTlb->uTlbRevision ? "valid "
|
---|
312 | : (pTlbe->uTag & IEMTLB_REVISION_MASK) == 0 ? "empty "
|
---|
313 | : "expired",
|
---|
314 | (pTlbe->uTag & ~IEMTLB_REVISION_MASK) << X86_PAGE_SHIFT,
|
---|
315 | pTlbe->GCPhys, pTlbe->pbMappingR3,
|
---|
316 | (uint32_t)(pTlbe->fFlagsAndPhysRev & ~IEMTLBE_F_PHYS_REV),
|
---|
317 | pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PT_NO_EXEC ? "NX" : " X",
|
---|
318 | pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PT_NO_WRITE ? "RO" : "RW",
|
---|
319 | pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PT_NO_ACCESSED ? "-" : "A",
|
---|
320 | pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PT_NO_DIRTY ? "-" : "D",
|
---|
321 | pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PG_NO_WRITE ? "-" : "w",
|
---|
322 | pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PG_NO_READ ? "-" : "r",
|
---|
323 | pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PG_UNASSIGNED ? "U" : "-",
|
---|
324 | pTlbe->fFlagsAndPhysRev & IEMTLBE_F_NO_MAPPINGR3 ? "S" : "M",
|
---|
325 | (pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PHYS_REV) == pTlb->uTlbPhysRev ? "phys-valid"
|
---|
326 | : (pTlbe->fFlagsAndPhysRev & IEMTLBE_F_PHYS_REV) == 0 ? "phys-empty" : "phys-expired");
|
---|
327 | }
|
---|
328 |
|
---|
329 |
|
---|
330 | /** Displays one or more TLB slots. */
|
---|
331 | static void iemR3InfoTlbPrintSlots(PVMCPU pVCpu, PCDBGFINFOHLP pHlp, IEMTLB const *pTlb,
|
---|
332 | uint32_t uSlot, uint32_t cSlots, bool *pfHeader)
|
---|
333 | {
|
---|
334 | if (uSlot < RT_ELEMENTS(pTlb->aEntries))
|
---|
335 | {
|
---|
336 | if (cSlots > RT_ELEMENTS(pTlb->aEntries))
|
---|
337 | {
|
---|
338 | pHlp->pfnPrintf(pHlp, "error: Too many slots given: %u, adjusting it down to the max (%u)\n",
|
---|
339 | cSlots, RT_ELEMENTS(pTlb->aEntries));
|
---|
340 | cSlots = RT_ELEMENTS(pTlb->aEntries);
|
---|
341 | }
|
---|
342 |
|
---|
343 | iemR3InfoTlbPrintHeader(pVCpu, pHlp, pTlb, pfHeader);
|
---|
344 | while (cSlots-- > 0)
|
---|
345 | {
|
---|
346 | IEMTLBENTRY const Tlbe = pTlb->aEntries[uSlot];
|
---|
347 | iemR3InfoTlbPrintSlot(pHlp, pTlb, &Tlbe, uSlot);
|
---|
348 | uSlot = (uSlot + 1) % RT_ELEMENTS(pTlb->aEntries);
|
---|
349 | }
|
---|
350 | }
|
---|
351 | else
|
---|
352 | pHlp->pfnPrintf(pHlp, "error: TLB slot is out of range: %u (%#x), max %u (%#x)\n",
|
---|
353 | uSlot, uSlot, RT_ELEMENTS(pTlb->aEntries) - 1, RT_ELEMENTS(pTlb->aEntries) - 1);
|
---|
354 | }
|
---|
355 |
|
---|
356 |
|
---|
357 | /** Displays the TLB slot for the given address. */
|
---|
358 | static void iemR3InfoTlbPrintAddress(PVMCPU pVCpu, PCDBGFINFOHLP pHlp, IEMTLB const *pTlb,
|
---|
359 | uint64_t uAddress, bool *pfHeader)
|
---|
360 | {
|
---|
361 | iemR3InfoTlbPrintHeader(pVCpu, pHlp, pTlb, pfHeader);
|
---|
362 |
|
---|
363 | uint64_t const uTag = (uAddress << 16) >> (X86_PAGE_SHIFT + 16);
|
---|
364 | uint32_t const uSlot = (uint8_t)uTag;
|
---|
365 | IEMTLBENTRY const Tlbe = pTlb->aEntries[uSlot];
|
---|
366 | pHlp->pfnPrintf(pHlp, "Address %#RX64 -> slot %#x - %s\n", uAddress, uSlot,
|
---|
367 | Tlbe.uTag == (uTag | pTlb->uTlbRevision) ? "match"
|
---|
368 | : (Tlbe.uTag & ~IEMTLB_REVISION_MASK) == uTag ? "expired" : "mismatch");
|
---|
369 | iemR3InfoTlbPrintSlot(pHlp, pTlb, &Tlbe, uSlot);
|
---|
370 | }
|
---|
371 |
|
---|
372 |
|
---|
373 | /** Common worker for iemR3InfoDTlb and iemR3InfoITlb. */
|
---|
374 | static void iemR3InfoTlbCommon(PVM pVM, PCDBGFINFOHLP pHlp, int cArgs, char **papszArgs, bool fITlb)
|
---|
375 | {
|
---|
376 | /*
|
---|
377 | * This is entirely argument driven.
|
---|
378 | */
|
---|
379 | static RTGETOPTDEF const s_aOptions[] =
|
---|
380 | {
|
---|
381 | { "--cpu", 'c', RTGETOPT_REQ_UINT32 },
|
---|
382 | { "--vcpu", 'c', RTGETOPT_REQ_UINT32 },
|
---|
383 | { "all", 'A', RTGETOPT_REQ_NOTHING },
|
---|
384 | { "--all", 'A', RTGETOPT_REQ_NOTHING },
|
---|
385 | { "--address", 'a', RTGETOPT_REQ_UINT64 | RTGETOPT_FLAG_HEX },
|
---|
386 | { "--range", 'r', RTGETOPT_REQ_UINT32_PAIR | RTGETOPT_FLAG_HEX },
|
---|
387 | { "--slot", 's', RTGETOPT_REQ_UINT32 | RTGETOPT_FLAG_HEX },
|
---|
388 | };
|
---|
389 |
|
---|
390 | char szDefault[] = "-A";
|
---|
391 | char *papszDefaults[2] = { szDefault, NULL };
|
---|
392 | if (cArgs == 0)
|
---|
393 | {
|
---|
394 | cArgs = 1;
|
---|
395 | papszArgs = papszDefaults;
|
---|
396 | }
|
---|
397 |
|
---|
398 | RTGETOPTSTATE State;
|
---|
399 | int rc = RTGetOptInit(&State, cArgs, papszArgs, s_aOptions, RT_ELEMENTS(s_aOptions), 0 /*iFirst*/, 0 /*fFlags*/);
|
---|
400 | AssertRCReturnVoid(rc);
|
---|
401 |
|
---|
402 | bool fNeedHeader = true;
|
---|
403 | bool fAddressMode = true;
|
---|
404 | PVMCPU pVCpu = VMMGetCpu(pVM);
|
---|
405 | if (!pVCpu)
|
---|
406 | pVCpu = VMMGetCpuById(pVM, 0);
|
---|
407 |
|
---|
408 | RTGETOPTUNION ValueUnion;
|
---|
409 | while ((rc = RTGetOpt(&State, &ValueUnion)) != 0)
|
---|
410 | {
|
---|
411 | switch (rc)
|
---|
412 | {
|
---|
413 | case 'c':
|
---|
414 | if (ValueUnion.u32 >= pVM->cCpus)
|
---|
415 | pHlp->pfnPrintf(pHlp, "error: Invalid CPU ID: %u\n", ValueUnion.u32);
|
---|
416 | else if (!pVCpu || pVCpu->idCpu != ValueUnion.u32)
|
---|
417 | {
|
---|
418 | pVCpu = VMMGetCpuById(pVM, ValueUnion.u32);
|
---|
419 | fNeedHeader = true;
|
---|
420 | }
|
---|
421 | break;
|
---|
422 |
|
---|
423 | case 'a':
|
---|
424 | iemR3InfoTlbPrintAddress(pVCpu, pHlp, fITlb ? &pVCpu->iem.s.CodeTlb : &pVCpu->iem.s.DataTlb,
|
---|
425 | ValueUnion.u64, &fNeedHeader);
|
---|
426 | fAddressMode = true;
|
---|
427 | break;
|
---|
428 |
|
---|
429 | case 'A':
|
---|
430 | iemR3InfoTlbPrintSlots(pVCpu, pHlp, fITlb ? &pVCpu->iem.s.CodeTlb : &pVCpu->iem.s.DataTlb,
|
---|
431 | 0, RT_ELEMENTS(pVCpu->iem.s.CodeTlb.aEntries), &fNeedHeader);
|
---|
432 | break;
|
---|
433 |
|
---|
434 | case 'r':
|
---|
435 | iemR3InfoTlbPrintSlots(pVCpu, pHlp, fITlb ? &pVCpu->iem.s.CodeTlb : &pVCpu->iem.s.DataTlb,
|
---|
436 | ValueUnion.PairU32.uFirst, ValueUnion.PairU32.uSecond, &fNeedHeader);
|
---|
437 | fAddressMode = false;
|
---|
438 | break;
|
---|
439 |
|
---|
440 | case 's':
|
---|
441 | iemR3InfoTlbPrintSlots(pVCpu, pHlp, fITlb ? &pVCpu->iem.s.CodeTlb : &pVCpu->iem.s.DataTlb,
|
---|
442 | ValueUnion.u32, 1, &fNeedHeader);
|
---|
443 | fAddressMode = false;
|
---|
444 | break;
|
---|
445 |
|
---|
446 | case VINF_GETOPT_NOT_OPTION:
|
---|
447 | if (fAddressMode)
|
---|
448 | {
|
---|
449 | uint64_t uAddr;
|
---|
450 | rc = RTStrToUInt64Full(ValueUnion.psz, 16, &uAddr);
|
---|
451 | if (RT_SUCCESS(rc) && rc != VWRN_NUMBER_TOO_BIG)
|
---|
452 | iemR3InfoTlbPrintAddress(pVCpu, pHlp, fITlb ? &pVCpu->iem.s.CodeTlb : &pVCpu->iem.s.DataTlb,
|
---|
453 | uAddr, &fNeedHeader);
|
---|
454 | else
|
---|
455 | pHlp->pfnPrintf(pHlp, "error: Invalid or malformed guest address '%s': %Rrc\n", ValueUnion.psz, rc);
|
---|
456 | }
|
---|
457 | else
|
---|
458 | {
|
---|
459 | uint32_t uSlot;
|
---|
460 | rc = RTStrToUInt32Full(ValueUnion.psz, 16, &uSlot);
|
---|
461 | if (RT_SUCCESS(rc) && rc != VWRN_NUMBER_TOO_BIG)
|
---|
462 | iemR3InfoTlbPrintSlots(pVCpu, pHlp, fITlb ? &pVCpu->iem.s.CodeTlb : &pVCpu->iem.s.DataTlb,
|
---|
463 | uSlot, 1, &fNeedHeader);
|
---|
464 | else
|
---|
465 | pHlp->pfnPrintf(pHlp, "error: Invalid or malformed TLB slot number '%s': %Rrc\n", ValueUnion.psz, rc);
|
---|
466 | }
|
---|
467 | break;
|
---|
468 |
|
---|
469 | case 'h':
|
---|
470 | pHlp->pfnPrintf(pHlp,
|
---|
471 | "Usage: info %ctlb [options]\n"
|
---|
472 | "\n"
|
---|
473 | "Options:\n"
|
---|
474 | " -c<n>, --cpu=<n>, --vcpu=<n>\n"
|
---|
475 | " Selects the CPU which TLBs we're looking at. Default: Caller / 0\n"
|
---|
476 | " -A, --all, all\n"
|
---|
477 | " Display all the TLB entries (default if no other args).\n"
|
---|
478 | " -a<virt>, --address=<virt>\n"
|
---|
479 | " Shows the TLB entry for the specified guest virtual address.\n"
|
---|
480 | " -r<slot:count>, --range=<slot:count>\n"
|
---|
481 | " Shows the TLB entries for the specified slot range.\n"
|
---|
482 | " -s<slot>,--slot=<slot>\n"
|
---|
483 | " Shows the given TLB slot.\n"
|
---|
484 | "\n"
|
---|
485 | "Non-options are interpreted according to the last -a, -r or -s option,\n"
|
---|
486 | "defaulting to addresses if not preceeded by any of those options.\n"
|
---|
487 | , fITlb ? 'i' : 'd');
|
---|
488 | return;
|
---|
489 |
|
---|
490 | default:
|
---|
491 | pHlp->pfnGetOptError(pHlp, rc, &ValueUnion, &State);
|
---|
492 | return;
|
---|
493 | }
|
---|
494 | }
|
---|
495 | }
|
---|
496 |
|
---|
497 |
|
---|
498 | /**
|
---|
499 | * @callback_method_impl{FNDBGFINFOARGVINT, itlb}
|
---|
500 | */
|
---|
501 | static DECLCALLBACK(void) iemR3InfoITlb(PVM pVM, PCDBGFINFOHLP pHlp, int cArgs, char **papszArgs)
|
---|
502 | {
|
---|
503 | return iemR3InfoTlbCommon(pVM, pHlp, cArgs, papszArgs, true /*fITlb*/);
|
---|
504 | }
|
---|
505 |
|
---|
506 |
|
---|
507 | /**
|
---|
508 | * @callback_method_impl{FNDBGFINFOARGVINT, dtlb}
|
---|
509 | */
|
---|
510 | static DECLCALLBACK(void) iemR3InfoDTlb(PVM pVM, PCDBGFINFOHLP pHlp, int cArgs, char **papszArgs)
|
---|
511 | {
|
---|
512 | return iemR3InfoTlbCommon(pVM, pHlp, cArgs, papszArgs, false /*fITlb*/);
|
---|
513 | }
|
---|
514 |
|
---|
515 |
|
---|
516 | #ifdef VBOX_WITH_DEBUGGER
|
---|
517 |
|
---|
518 | /** @callback_method_impl{FNDBGCCMD,
|
---|
519 | * Implements the '.alliem' command. }
|
---|
520 | */
|
---|
521 | static DECLCALLBACK(int) iemR3DbgFlushTlbs(PCDBGCCMD pCmd, PDBGCCMDHLP pCmdHlp, PUVM pUVM, PCDBGCVAR paArgs, unsigned cArgs)
|
---|
522 | {
|
---|
523 | VMCPUID idCpu = DBGCCmdHlpGetCurrentCpu(pCmdHlp);
|
---|
524 | PVMCPU pVCpu = VMMR3GetCpuByIdU(pUVM, idCpu);
|
---|
525 | if (pVCpu)
|
---|
526 | {
|
---|
527 | VMR3ReqPriorityCallVoidWaitU(pUVM, idCpu, (PFNRT)IEMTlbInvalidateAll, 1, pVCpu);
|
---|
528 | return VINF_SUCCESS;
|
---|
529 | }
|
---|
530 | RT_NOREF(paArgs, cArgs);
|
---|
531 | return DBGCCmdHlpFail(pCmdHlp, pCmd, "failed to get the PVMCPU for the current CPU");
|
---|
532 | }
|
---|
533 |
|
---|
534 |
|
---|
535 | /**
|
---|
536 | * Called by IEMR3Init to register debugger commands.
|
---|
537 | */
|
---|
538 | static void iemR3RegisterDebuggerCommands(void)
|
---|
539 | {
|
---|
540 | /*
|
---|
541 | * Register debugger commands.
|
---|
542 | */
|
---|
543 | static DBGCCMD const s_aCmds[] =
|
---|
544 | {
|
---|
545 | {
|
---|
546 | /* .pszCmd = */ "iemflushtlb",
|
---|
547 | /* .cArgsMin = */ 0,
|
---|
548 | /* .cArgsMax = */ 0,
|
---|
549 | /* .paArgDescs = */ NULL,
|
---|
550 | /* .cArgDescs = */ 0,
|
---|
551 | /* .fFlags = */ 0,
|
---|
552 | /* .pfnHandler = */ iemR3DbgFlushTlbs,
|
---|
553 | /* .pszSyntax = */ "",
|
---|
554 | /* .pszDescription = */ "Flushed the code and data TLBs"
|
---|
555 | },
|
---|
556 | };
|
---|
557 |
|
---|
558 | int rc = DBGCRegisterCommands(&s_aCmds[0], RT_ELEMENTS(s_aCmds));
|
---|
559 | AssertLogRelRC(rc);
|
---|
560 | }
|
---|
561 |
|
---|
562 | #endif
|
---|
563 |
|
---|