EMR3Dbg.cpp@ 101043

Last change on this file since 101043 was 99900, checked in by vboxsync, 19 months ago
VMM/EM: Added .iemrecompiled debugger command. bugref:10369
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 13.5 KB

Line
1	/* $Id: EMR3Dbg.cpp 99900 2023-05-22 13:14:20Z vboxsync $ */
2	/** @file
3	* EM - Execution Monitor / Manager, Debugger Related Bits.
4	*/
5
6	/*
7	* Copyright (C) 2006-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/em.h>
34	#include <VBox/vmm/hm.h>
35	#include <VBox/vmm/nem.h>
36	#include <VBox/dbg.h>
37	#include "EMInternal.h"
38	#include <VBox/vmm/vm.h>
39	#include <iprt/string.h>
40	#include <iprt/ctype.h>
41
42
43	/**
44	* Common worker for the '.alliem' and '.iemrecompiled' commands.
45	*/
46	static int emR3DbgCmdSetPolicyCommon(PCDBGCCMD pCmd, PDBGCCMDHLP pCmdHlp, PUVM pUVM, PCDBGCVAR paArgs, unsigned cArgs,
47	EMEXECPOLICY enmPolicy, const char *pszPolicy)
48	{
49	int rc;
50	bool f;
51
52	if (cArgs == 0)
53	{
54	rc = EMR3QueryExecutionPolicy(pUVM, enmPolicy, &f);
55	if (RT_FAILURE(rc))
56	return DBGCCmdHlpFailRc(pCmdHlp, pCmd, rc, "EMR3QueryExecutionPolicy(,%s,", pszPolicy);
57	DBGCCmdHlpPrintf(pCmdHlp, f ? "%s: enabled\n" : "%s: disabled\n", pszPolicy);
58	}
59	else
60	{
61	rc = DBGCCmdHlpVarToBool(pCmdHlp, &paArgs[0], &f);
62	if (RT_FAILURE(rc))
63	return DBGCCmdHlpFailRc(pCmdHlp, pCmd, rc, "DBGCCmdHlpVarToBool");
64	rc = EMR3SetExecutionPolicy(pUVM, enmPolicy, f);
65	if (RT_FAILURE(rc))
66	return DBGCCmdHlpFailRc(pCmdHlp, pCmd, rc, "EMR3SetExecutionPolicy(,%s,%RTbool)", pszPolicy, f);
67	}
68	return VINF_SUCCESS;
69	}
70
71
72	/** @callback_method_impl{FNDBGCCMD,
73	* Implements the '.alliem' command. }
74	*/
75	static DECLCALLBACK(int) emR3DbgCmdAllIem(PCDBGCCMD pCmd, PDBGCCMDHLP pCmdHlp, PUVM pUVM, PCDBGCVAR paArgs, unsigned cArgs)
76	{
77	return emR3DbgCmdSetPolicyCommon(pCmd, pCmdHlp, pUVM, paArgs, cArgs, EMEXECPOLICY_IEM_ALL, "EMEXECPOLICY_IEM_ALL");
78	}
79
80
81	/** @callback_method_impl{FNDBGCCMD,
82	* Implements the '.iemrecompiled' command. }
83	*/
84	static DECLCALLBACK(int) emR3DbgCmdIemRecompiled(PCDBGCCMD pCmd, PDBGCCMDHLP pCmdHlp, PUVM pUVM, PCDBGCVAR paArgs, unsigned cArgs)
85	{
86	return emR3DbgCmdSetPolicyCommon(pCmd, pCmdHlp, pUVM, paArgs, cArgs, EMEXECPOLICY_IEM_RECOMPILED, "EMEXECPOLICY_IEM_RECOMPILED");
87	}
88
89
90	/** Describes a optional boolean argument. */
91	static DBGCVARDESC const g_BoolArg = { 0, 1, DBGCVAR_CAT_ANY, 0, "boolean", "Boolean value." };
92
93	/** Commands. */
94	static DBGCCMD const g_aCmds[] =
95	{
96	{
97	"alliem", 0, 1, &g_BoolArg, 1, 0, emR3DbgCmdAllIem, "[boolean]",
98	"Enables or disables executing ALL code in IEM, if no arguments are given it displays the current status."
99	},
100	{
101	"iemrecompiled", 0, 1, &g_BoolArg, 1, 0, emR3DbgCmdIemRecompiled, "[boolean]",
102	"Enables or disables recompiled ALL-in-IEM execution, if no arguments are given it displays the current status."
103	},
104	};
105
106
107	/**
108	* Translates EMEXITTYPE into a name.
109	*
110	* @returns Pointer to read-only name, NULL if unknown type.
111	* @param enmExitType The exit type to name.
112	*/
113	VMM_INT_DECL(const char *) EMR3GetExitTypeName(EMEXITTYPE enmExitType)
114	{
115	switch (enmExitType)
116	{
117	case EMEXITTYPE_INVALID: return "invalid";
118	case EMEXITTYPE_IO_PORT_READ: return "I/O port read";
119	case EMEXITTYPE_IO_PORT_WRITE: return "I/O port write";
120	case EMEXITTYPE_IO_PORT_STR_READ: return "I/O port string read";
121	case EMEXITTYPE_IO_PORT_STR_WRITE: return "I/O port string write";
122	case EMEXITTYPE_MMIO: return "MMIO access";
123	case EMEXITTYPE_MMIO_READ: return "MMIO read";
124	case EMEXITTYPE_MMIO_WRITE: return "MMIO write";
125	case EMEXITTYPE_MSR_READ: return "MSR read";
126	case EMEXITTYPE_MSR_WRITE: return "MSR write";
127	case EMEXITTYPE_CPUID: return "CPUID";
128	case EMEXITTYPE_RDTSC: return "RDTSC";
129	case EMEXITTYPE_MOV_CRX: return "MOV CRx";
130	case EMEXITTYPE_MOV_DRX: return "MOV DRx";
131	case EMEXITTYPE_VMREAD: return "VMREAD";
132	case EMEXITTYPE_VMWRITE: return "VMWRITE";
133
134	/* Raw-mode only: */
135	case EMEXITTYPE_INVLPG: return "INVLPG";
136	case EMEXITTYPE_LLDT: return "LLDT";
137	case EMEXITTYPE_RDPMC: return "RDPMC";
138	case EMEXITTYPE_CLTS: return "CLTS";
139	case EMEXITTYPE_STI: return "STI";
140	case EMEXITTYPE_INT: return "INT";
141	case EMEXITTYPE_SYSCALL: return "SYSCALL";
142	case EMEXITTYPE_SYSENTER: return "SYSENTER";
143	case EMEXITTYPE_HLT: return "HLT";
144	}
145	return NULL;
146	}
147
148
149	/**
150	* Translates flags+type into an exit name.
151	*
152	* @returns Exit name.
153	* @param uFlagsAndType The exit to name.
154	* @param pszFallback Buffer for formatting a numeric fallback.
155	* @param cbFallback Size of fallback buffer.
156	*/
157	static const char emR3HistoryGetExitName(uint32_t uFlagsAndType, char pszFallback, size_t cbFallback)
158	{
159	const char *pszExitName;
160	switch (uFlagsAndType & EMEXIT_F_KIND_MASK)
161	{
162	case EMEXIT_F_KIND_EM:
163	pszExitName = EMR3GetExitTypeName((EMEXITTYPE)(uFlagsAndType & EMEXIT_F_TYPE_MASK));
164	break;
165
166	#if !defined(VBOX_VMM_TARGET_ARMV8)
167	case EMEXIT_F_KIND_VMX:
168	pszExitName = HMGetVmxExitName( uFlagsAndType & EMEXIT_F_TYPE_MASK);
169	break;
170
171	case EMEXIT_F_KIND_SVM:
172	pszExitName = HMGetSvmExitName( uFlagsAndType & EMEXIT_F_TYPE_MASK);
173	break;
174	#endif
175
176	case EMEXIT_F_KIND_NEM:
177	pszExitName = NEMR3GetExitName( uFlagsAndType & EMEXIT_F_TYPE_MASK);
178	break;
179
180	case EMEXIT_F_KIND_XCPT:
181	#if defined(VBOX_VMM_TARGET_ARMV8)
182	pszExitName = NULL;
183	AssertReleaseFailed();
184	#else
185	switch (uFlagsAndType & EMEXIT_F_TYPE_MASK)
186	{
187	case X86_XCPT_DE: return "Xcpt #DE";
188	case X86_XCPT_DB: return "Xcpt #DB";
189	case X86_XCPT_NMI: return "Xcpt #NMI";
190	case X86_XCPT_BP: return "Xcpt #BP";
191	case X86_XCPT_OF: return "Xcpt #OF";
192	case X86_XCPT_BR: return "Xcpt #BR";
193	case X86_XCPT_UD: return "Xcpt #UD";
194	case X86_XCPT_NM: return "Xcpt #NM";
195	case X86_XCPT_DF: return "Xcpt #DF";
196	case X86_XCPT_CO_SEG_OVERRUN: return "Xcpt #CO_SEG_OVERRUN";
197	case X86_XCPT_TS: return "Xcpt #TS";
198	case X86_XCPT_NP: return "Xcpt #NP";
199	case X86_XCPT_SS: return "Xcpt #SS";
200	case X86_XCPT_GP: return "Xcpt #GP";
201	case X86_XCPT_PF: return "Xcpt #PF";
202	case X86_XCPT_MF: return "Xcpt #MF";
203	case X86_XCPT_AC: return "Xcpt #AC";
204	case X86_XCPT_MC: return "Xcpt #MC";
205	case X86_XCPT_XF: return "Xcpt #XF";
206	case X86_XCPT_VE: return "Xcpt #VE";
207	case X86_XCPT_SX: return "Xcpt #SX";
208	default:
209	pszExitName = NULL;
210	break;
211	}
212	#endif
213	break;
214
215	default:
216	AssertFailed();
217	pszExitName = NULL;
218	break;
219	}
220	if (pszExitName)
221	return pszExitName;
222	RTStrPrintf(pszFallback, cbFallback, "%#06x", uFlagsAndType & (EMEXIT_F_KIND_MASK \| EMEXIT_F_TYPE_MASK));
223	return pszFallback;
224	}
225
226
227	/**
228	* Displays the VM-exit history.
229	*
230	* @param pVM The cross context VM structure.
231	* @param pHlp The info helper functions.
232	* @param pszArgs Arguments, ignored.
233	*/
234	static DECLCALLBACK(void) emR3InfoExitHistory(PVM pVM, PCDBGFINFOHLP pHlp, const char *pszArgs)
235	{
236	NOREF(pszArgs);
237
238	/*
239	* Figure out target cpu and parse arguments.
240	*/
241	PVMCPU pVCpu = VMMGetCpu(pVM);
242	if (!pVCpu)
243	pVCpu = pVM->apCpusR3[0];
244	bool fReverse = true;
245	uint32_t cLeft = RT_ELEMENTS(pVCpu->em.s.aExitHistory);
246
247	while (pszArgs && *pszArgs)
248	{
249	pszArgs = RTStrStripL(pszArgs);
250	if (!*pszArgs)
251	break;
252	if (RT_C_IS_DIGIT(*pszArgs))
253	{
254	/* The number to dump. */
255	uint32_t uValue = cLeft;
256	RTStrToUInt32Ex(pszArgs, (char **)&pszArgs, 0, &uValue);
257	if (uValue > 0)
258	cLeft = RT_MIN(uValue, RT_ELEMENTS(pVCpu->em.s.aExitHistory));
259	}
260	else if (RTStrCmp(pszArgs, "reverse") == 0)
261	{
262	pszArgs += 7;
263	fReverse = true;
264	}
265	else if (RTStrCmp(pszArgs, "ascending") == 0)
266	{
267	pszArgs += 9;
268	fReverse = false;
269	}
270	else if (RTStrCmp(pszArgs, "asc") == 0)
271	{
272	pszArgs += 3;
273	fReverse = false;
274	}
275	else
276	{
277	const char *pszStart = pszArgs;
278	while (pszArgs && !RT_C_IS_SPACE(pszArgs))
279	pszArgs++;
280	pHlp->pfnPrintf(pHlp, "Unknown option: %.*s\n", pszArgs - pszStart, pszArgs);
281	}
282	}
283
284	/*
285	* Do the job.
286	*/
287	uint64_t idx = pVCpu->em.s.iNextExit;
288	if (idx == 0)
289	pHlp->pfnPrintf(pHlp, "CPU[%u]: VM-exit history: empty\n", pVCpu->idCpu);
290	else
291	{
292	/*
293	* Print header.
294	*/
295	pHlp->pfnPrintf(pHlp,
296	"CPU[%u]: VM-exit history:\n"
297	" Exit No.: TSC timestamp / delta RIP (Flat/*) Exit Name\n"
298	, pVCpu->idCpu);
299
300	/*
301	* Adjust bounds if ascending order.
302	*/
303	if (!fReverse)
304	{
305	if (idx > cLeft)
306	idx -= cLeft;
307	else
308	{
309	cLeft = idx;
310	idx = 0;
311	}
312	}
313
314	/*
315	* Print the entries.
316	*/
317	uint64_t uPrevTimestamp = 0;
318	do
319	{
320	if (fReverse)
321	idx -= 1;
322	PCEMEXITENTRY const pEntry = &pVCpu->em.s.aExitHistory[(uintptr_t)idx & 0xff];
323
324	/* Get the exit name. */
325	char szExitName[16];
326	const char *pszExitName = emR3HistoryGetExitName(pEntry->uFlagsAndType, szExitName, sizeof(szExitName));
327
328	/* Calc delta (negative if reverse order, positive ascending). */
329	int64_t offDelta = uPrevTimestamp != 0 && pEntry->uTimestamp != 0 ? pEntry->uTimestamp - uPrevTimestamp : 0;
330	uPrevTimestamp = pEntry->uTimestamp;
331
332	char szPC[32];
333	if (!(pEntry->uFlagsAndType & (EMEXIT_F_CS_EIP \| EMEXIT_F_UNFLATTENED_PC)))
334	RTStrPrintf(szPC, sizeof(szPC), "%016RX64 ", pEntry->uFlatPC);
335	else if (pEntry->uFlagsAndType & EMEXIT_F_UNFLATTENED_PC)
336	RTStrPrintf(szPC, sizeof(szPC), "%016RX64*", pEntry->uFlatPC);
337	else
338	RTStrPrintf(szPC, sizeof(szPC), "%04x:%08RX32* ", (uint32_t)(pEntry->uFlatPC >> 32), (uint32_t)pEntry->uFlatPC);
339
340	/* Do the printing. */
341	if (pEntry->idxSlot == UINT32_MAX)
342	pHlp->pfnPrintf(pHlp, " %10RU64: %#018RX64/%+-9RI64 %s %#07x %s\n",
343	idx, pEntry->uTimestamp, offDelta, szPC, pEntry->uFlagsAndType, pszExitName);
344	else
345	{
346	/** @todo more on this later */
347	pHlp->pfnPrintf(pHlp, " %10RU64: %#018RX64/%+-9RI64 %s %#07x %s slot=%#x\n",
348	idx, pEntry->uTimestamp, offDelta, szPC, pEntry->uFlagsAndType, pszExitName, pEntry->idxSlot);
349	}
350
351	/* Advance if ascending. */
352	if (!fReverse)
353	idx += 1;
354	} while (--cLeft > 0 && idx > 0);
355	}
356	}
357
358
359	int emR3InitDbg(PVM pVM)
360	{
361	/*
362	* Register info dumpers.
363	*/
364	const char *pszExitsDesc = "Dumps the VM-exit history. Arguments: Number of entries; 'asc', 'ascending' or 'reverse'.";
365	int rc = DBGFR3InfoRegisterInternalEx(pVM, "exits", pszExitsDesc, emR3InfoExitHistory, DBGFINFO_FLAGS_ALL_EMTS);
366	AssertLogRelRCReturn(rc, rc);
367	rc = DBGFR3InfoRegisterInternalEx(pVM, "exithistory", pszExitsDesc, emR3InfoExitHistory, DBGFINFO_FLAGS_ALL_EMTS);
368	AssertLogRelRCReturn(rc, rc);
369
370	#ifdef VBOX_WITH_DEBUGGER
371	/*
372	* Register debugger commands.
373	*/
374	rc = DBGCRegisterCommands(&g_aCmds[0], RT_ELEMENTS(g_aCmds));
375	AssertLogRelRCReturn(rc, rc);
376	#endif
377
378	return VINF_SUCCESS;
379	}
380

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/VMM/VMMR3/EMR3Dbg.cpp@ 101043

Download in other formats: