MachineDebuggerImpl.cpp revision a04100f955c08c93b063cf3d9c4f963637996f3c
/* $Id$ */
/** @file
* VBox IMachineDebugger COM class implementation.
*/
/*
* Copyright (C) 2006-2010 Oracle Corporation
*
* This file is part of VirtualBox Open Source Edition (OSE), as
* available from http://www.virtualbox.org. This file is free software;
* you can redistribute it and/or modify it under the terms of the GNU
* General Public License (GPL) as published by the Free Software
* Foundation, in version 2 as it comes in the "COPYING" file of the
* VirtualBox OSE distribution. VirtualBox OSE is distributed in the
* hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
*/
#include "MachineDebuggerImpl.h"
#include "Global.h"
#include "ConsoleImpl.h"
#include "AutoCaller.h"
#include "Logging.h"
#include <VBox/vmm/em.h>
#include <VBox/vmm/patm.h>
#include <VBox/vmm/csam.h>
#include <VBox/vmm/vm.h>
#include <VBox/vmm/uvm.h>
#include <VBox/vmm/tm.h>
#include <VBox/vmm/hm.h>
#include <VBox/err.h>
#include <iprt/cpp/utils.h>
// defines
/////////////////////////////////////////////////////////////////////////////
// globals
/////////////////////////////////////////////////////////////////////////////
// constructor / destructor
/////////////////////////////////////////////////////////////////////////////
MachineDebugger::MachineDebugger()
: mParent(NULL)
{
}
MachineDebugger::~MachineDebugger()
{
}
HRESULT MachineDebugger::FinalConstruct()
{
unconst(mParent) = NULL;
return BaseFinalConstruct();
}
void MachineDebugger::FinalRelease()
{
uninit();
BaseFinalRelease();
}
// public initializer/uninitializer for internal purposes only
/////////////////////////////////////////////////////////////////////////////
/**
* Initializes the machine debugger object.
*
* @returns COM result indicator
* @param aParent handle of our parent object
*/
HRESULT MachineDebugger::init (Console *aParent)
{
LogFlowThisFunc(("aParent=%p\n", aParent));
ComAssertRet(aParent, E_INVALIDARG);
/* Enclose the state transition NotReady->InInit->Ready */
AutoInitSpan autoInitSpan(this);
AssertReturn(autoInitSpan.isOk(), E_FAIL);
unconst(mParent) = aParent;
mSingleStepQueued = ~0;
mRecompileUserQueued = ~0;
mRecompileSupervisorQueued = ~0;
mPatmEnabledQueued = ~0;
mCsamEnabledQueued = ~0;
mLogEnabledQueued = ~0;
mVirtualTimeRateQueued = ~0;
mFlushMode = false;
/* Confirm a successful initialization */
autoInitSpan.setSucceeded();
return S_OK;
}
/**
* Uninitializes the instance and sets the ready flag to FALSE.
* Called either from FinalRelease() or by the parent when it gets destroyed.
*/
void MachineDebugger::uninit()
{
LogFlowThisFunc(("\n"));
/* Enclose the state transition Ready->InUninit->NotReady */
AutoUninitSpan autoUninitSpan(this);
if (autoUninitSpan.uninitDone())
return;
unconst(mParent) = NULL;
mFlushMode = false;
}
// IMachineDebugger properties
/////////////////////////////////////////////////////////////////////////////
/**
* Returns the current singlestepping flag.
*
* @returns COM status code
* @param a_fEnabled Where to store the result.
*/
STDMETHODIMP MachineDebugger::COMGETTER(SingleStep)(BOOL *a_fEnabled)
{
CheckComArgOutPointerValid(a_fEnabled);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
/** @todo */
ReturnComNotImplemented();
}
}
return hrc;
}
/**
* Sets the singlestepping flag.
*
* @returns COM status code
* @param a_fEnable The new state.
*/
STDMETHODIMP MachineDebugger::COMSETTER(SingleStep)(BOOL a_fEnable)
{
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
/** @todo */
ReturnComNotImplemented();
}
}
return hrc;
}
/**
* Returns the current recompile user mode code flag.
*
* @returns COM status code
* @param a_fEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(RecompileUser) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtrQuiet pVM (mParent);
if (pVM.isOk())
*aEnabled = !EMIsRawRing3Enabled (pVM.raw());
else
*aEnabled = false;
return S_OK;
}
/**
* Sets the recompile user mode code flag.
*
* @returns COM status
* @param aEnable new user mode code recompile flag.
*/
STDMETHODIMP MachineDebugger::COMSETTER(RecompileUser)(BOOL aEnable)
{
LogFlowThisFunc(("enable=%d\n", aEnable));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
if (queueSettings())
mRecompileUserQueued = aEnable; // queue the request
else
{
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
int vrc = EMR3SetExecutionPolicy(ptrVM.raw(), EMEXECPOLICY_RECOMPILE_RING3, RT_BOOL(aEnable));
if (RT_FAILURE(vrc))
hrc = setError(VBOX_E_VM_ERROR, tr("EMR3SetExecutionPolicy failed with %Rrc"), vrc);
}
}
}
return hrc;
}
/**
* Returns the current recompile supervisor code flag.
*
* @returns COM status code
* @param aEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(RecompileSupervisor) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtrQuiet pVM (mParent);
if (pVM.isOk())
*aEnabled = !EMIsRawRing0Enabled (pVM.raw());
else
*aEnabled = false;
return S_OK;
}
/**
* Sets the new recompile supervisor code flag.
*
* @returns COM status code
* @param aEnable new recompile supervisor code flag
*/
STDMETHODIMP MachineDebugger::COMSETTER(RecompileSupervisor)(BOOL aEnable)
{
LogFlowThisFunc(("enable=%d\n", aEnable));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
if (queueSettings())
mRecompileSupervisorQueued = aEnable; // queue the request
else
{
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
int vrc = EMR3SetExecutionPolicy(ptrVM.raw(), EMEXECPOLICY_RECOMPILE_RING0, RT_BOOL(aEnable));
if (RT_FAILURE(vrc))
hrc = setError(VBOX_E_VM_ERROR, tr("EMR3SetExecutionPolicy failed with %Rrc"), vrc);
}
}
}
return hrc;
}
/**
* Returns the current patch manager enabled flag.
*
* @returns COM status code
* @param aEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(PATMEnabled) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtrQuiet pVM (mParent);
if (pVM.isOk())
*aEnabled = PATMIsEnabled (pVM.raw());
else
*aEnabled = false;
return S_OK;
}
/**
* Set the new patch manager enabled flag.
*
* @returns COM status code
* @param aEnable new patch manager enabled flag
*/
STDMETHODIMP MachineDebugger::COMSETTER(PATMEnabled) (BOOL aEnable)
{
LogFlowThisFunc(("enable=%d\n", aEnable));
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
if (queueSettings())
{
// queue the request
mPatmEnabledQueued = aEnable;
return S_OK;
}
Console::SafeVMPtr pVM(mParent);
if (FAILED(pVM.rc())) return pVM.rc();
PATMR3AllowPatching (pVM, aEnable);
return S_OK;
}
/**
* Returns the current code scanner enabled flag.
*
* @returns COM status code
* @param aEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(CSAMEnabled) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtrQuiet pVM (mParent);
if (pVM.isOk())
*aEnabled = CSAMIsEnabled (pVM.raw());
else
*aEnabled = false;
return S_OK;
}
/**
* Sets the new code scanner enabled flag.
*
* @returns COM status code
* @param aEnable new code scanner enabled flag
*/
STDMETHODIMP MachineDebugger::COMSETTER(CSAMEnabled) (BOOL aEnable)
{
LogFlowThisFunc(("enable=%d\n", aEnable));
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
if (queueSettings())
{
// queue the request
mCsamEnabledQueued = aEnable;
return S_OK;
}
Console::SafeVMPtr pVM(mParent);
if (FAILED(pVM.rc())) return pVM.rc();
int vrc;
if (aEnable)
vrc = CSAMEnableScanning (pVM);
else
vrc = CSAMDisableScanning (pVM);
if (RT_FAILURE(vrc))
{
/** @todo handle error case */
}
return S_OK;
}
/**
* Returns the log enabled / disabled status.
*
* @returns COM status code
* @param aEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(LogEnabled) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
#ifdef LOG_ENABLED
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
const PRTLOGGER pLogInstance = RTLogDefaultInstance();
*aEnabled = pLogInstance && !(pLogInstance->fFlags & RTLOGFLAGS_DISABLED);
#else
*aEnabled = false;
#endif
return S_OK;
}
/**
* Enables or disables logging.
*
* @returns COM status code
* @param aEnabled The new code log state.
*/
STDMETHODIMP MachineDebugger::COMSETTER(LogEnabled) (BOOL aEnabled)
{
LogFlowThisFunc(("aEnabled=%d\n", aEnabled));
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
if (queueSettings())
{
// queue the request
mLogEnabledQueued = aEnabled;
return S_OK;
}
Console::SafeVMPtr pVM(mParent);
if (FAILED(pVM.rc())) return pVM.rc();
#ifdef LOG_ENABLED
int vrc = DBGFR3LogModifyFlags (pVM, aEnabled ? "enabled" : "disabled");
if (RT_FAILURE(vrc))
{
/** @todo handle error code. */
}
#endif
return S_OK;
}
HRESULT MachineDebugger::logStringProps(PRTLOGGER pLogger, PFNLOGGETSTR pfnLogGetStr,
const char *pszLogGetStr, BSTR *a_pbstrSettings)
{
/* Make sure the VM is powered up. */
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
HRESULT hrc = ptrVM.rc();
if (FAILED(hrc))
return hrc;
/* Make sure we've got a logger. */
if (!pLogger)
{
Bstr bstrEmpty;
bstrEmpty.cloneTo(a_pbstrSettings);
return S_OK;
}
/* Do the job. */
size_t cbBuf = _1K;
for (;;)
{
char *pszBuf = (char *)RTMemTmpAlloc(cbBuf);
AssertReturn(pszBuf, E_OUTOFMEMORY);
int rc = pfnLogGetStr(pLogger, pszBuf, cbBuf);
if (RT_SUCCESS(rc))
{
try
{
Bstr bstrRet(pszBuf);
bstrRet.detachTo(a_pbstrSettings);
hrc = S_OK;
}
catch (std::bad_alloc)
{
hrc = E_OUTOFMEMORY;
}
RTMemTmpFree(pszBuf);
return hrc;
}
RTMemTmpFree(pszBuf);
AssertReturn(rc == VERR_BUFFER_OVERFLOW, setError(VBOX_E_IPRT_ERROR, tr("%s returned %Rrc"), pszLogGetStr, rc));
/* try again with a bigger buffer. */
cbBuf *= 2;
AssertReturn(cbBuf <= _256K, setError(E_FAIL, tr("%s returns too much data"), pszLogGetStr));
}
}
STDMETHODIMP MachineDebugger::COMGETTER(LogDbgFlags)(BSTR *a_pbstrSettings)
{
CheckComArgOutPointerValid(a_pbstrSettings);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
hrc = logStringProps(RTLogGetDefaultInstance(), RTLogGetFlags, "RTGetFlags", a_pbstrSettings);
return hrc;
}
STDMETHODIMP MachineDebugger::COMGETTER(LogDbgGroups)(BSTR *a_pbstrSettings)
{
CheckComArgOutPointerValid(a_pbstrSettings);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
hrc = logStringProps(RTLogGetDefaultInstance(), RTLogGetGroupSettings, "RTLogGetGroupSettings", a_pbstrSettings);
return hrc;
}
STDMETHODIMP MachineDebugger::COMGETTER(LogDbgDestinations)(BSTR *a_pbstrSettings)
{
CheckComArgOutPointerValid(a_pbstrSettings);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
hrc = logStringProps(RTLogGetDefaultInstance(), RTLogGetDestinations, "RTLogGetDestinations", a_pbstrSettings);
return hrc;
}
STDMETHODIMP MachineDebugger::COMGETTER(LogRelFlags)(BSTR *a_pbstrSettings)
{
CheckComArgOutPointerValid(a_pbstrSettings);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
hrc = logStringProps(RTLogRelDefaultInstance(), RTLogGetFlags, "RTGetFlags", a_pbstrSettings);
return hrc;
}
STDMETHODIMP MachineDebugger::COMGETTER(LogRelGroups)(BSTR *a_pbstrSettings)
{
CheckComArgOutPointerValid(a_pbstrSettings);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
hrc = logStringProps(RTLogRelDefaultInstance(), RTLogGetGroupSettings, "RTLogGetGroupSettings", a_pbstrSettings);
return hrc;
}
STDMETHODIMP MachineDebugger::COMGETTER(LogRelDestinations)(BSTR *a_pbstrSettings)
{
CheckComArgOutPointerValid(a_pbstrSettings);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
hrc = logStringProps(RTLogRelDefaultInstance(), RTLogGetDestinations, "RTLogGetDestinations", a_pbstrSettings);
return hrc;
}
/**
* Returns the current hardware virtualization flag.
*
* @returns COM status code
* @param aEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(HWVirtExEnabled) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtrQuiet pVM (mParent);
if (pVM.isOk())
*aEnabled = HMIsEnabled (pVM.raw());
else
*aEnabled = false;
return S_OK;
}
/**
* Returns the current nested paging flag.
*
* @returns COM status code
* @param aEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(HWVirtExNestedPagingEnabled) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtrQuiet pVM (mParent);
if (pVM.isOk())
*aEnabled = HMR3IsNestedPagingActive (pVM.raw());
else
*aEnabled = false;
return S_OK;
}
/**
* Returns the current VPID flag.
*
* @returns COM status code
* @param aEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(HWVirtExVPIDEnabled) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtrQuiet pVM (mParent);
if (pVM.isOk())
*aEnabled = HMR3IsVPIDActive (pVM.raw());
else
*aEnabled = false;
return S_OK;
}
STDMETHODIMP MachineDebugger::COMGETTER(OSName)(BSTR *a_pbstrName)
{
LogFlowThisFunc(("\n"));
CheckComArgNotNull(a_pbstrName);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
/*
* Do the job and try convert the name.
*/
char szName[64];
int vrc = DBGFR3OSQueryNameAndVersion(ptrVM.raw(), szName, sizeof(szName), NULL, 0);
if (RT_SUCCESS(vrc))
{
try
{
Bstr bstrName(szName);
bstrName.detachTo(a_pbstrName);
}
catch (std::bad_alloc)
{
hrc = E_OUTOFMEMORY;
}
}
else
hrc = setError(VBOX_E_VM_ERROR, tr("DBGFR3OSQueryNameAndVersion failed with %Rrc"), vrc);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::COMGETTER(OSVersion)(BSTR *a_pbstrVersion)
{
LogFlowThisFunc(("\n"));
CheckComArgNotNull(a_pbstrVersion);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
/*
* Do the job and try convert the name.
*/
char szVersion[256];
int vrc = DBGFR3OSQueryNameAndVersion(ptrVM.raw(), NULL, 0, szVersion, sizeof(szVersion));
if (RT_SUCCESS(vrc))
{
try
{
Bstr bstrVersion(szVersion);
bstrVersion.detachTo(a_pbstrVersion);
}
catch (std::bad_alloc)
{
hrc = E_OUTOFMEMORY;
}
}
else
hrc = setError(VBOX_E_VM_ERROR, tr("DBGFR3OSQueryNameAndVersion failed with %Rrc"), vrc);
}
}
return hrc;
}
/**
* Returns the current PAE flag.
*
* @returns COM status code
* @param aEnabled address of result variable
*/
STDMETHODIMP MachineDebugger::COMGETTER(PAEEnabled) (BOOL *aEnabled)
{
CheckComArgOutPointerValid(aEnabled);
AutoCaller autoCaller(this);
if (FAILED(autoCaller.rc())) return autoCaller.rc();
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtrQuiet ptrVM(mParent);
if (ptrVM.isOk())
{
uint32_t cr4;
int rc = DBGFR3RegCpuQueryU32(ptrVM.raw(), 0 /*idCpu*/, DBGFREG_CR4, &cr4); AssertRC(rc);
*aEnabled = RT_BOOL(cr4 & X86_CR4_PAE);
}
else
*aEnabled = false;
return S_OK;
}
/**
* Returns the current virtual time rate.
*
* @returns COM status code.
* @param a_puPct Where to store the rate.
*/
STDMETHODIMP MachineDebugger::COMGETTER(VirtualTimeRate)(ULONG *a_puPct)
{
CheckComArgOutPointerValid(a_puPct);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
*a_puPct = TMR3GetWarpDrive(ptrVM.rawUVM());
}
return hrc;
}
/**
* Returns the current virtual time rate.
*
* @returns COM status code.
* @param aPct Where to store the rate.
*/
STDMETHODIMP MachineDebugger::COMSETTER(VirtualTimeRate)(ULONG a_uPct)
{
if (a_uPct < 2 || a_uPct > 20000)
return setError(E_INVALIDARG, tr("%u is out of range [2..20000]"), a_uPct);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
if (queueSettings())
mVirtualTimeRateQueued = a_uPct;
else
{
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
int vrc = TMR3SetWarpDrive(ptrVM.rawUVM(), a_uPct);
if (RT_FAILURE(vrc))
hrc = setError(VBOX_E_VM_ERROR, tr("TMR3SetWarpDrive(, %u) failed with rc=%Rrc"), a_uPct, vrc);
}
}
}
return hrc;
}
/**
* Hack for getting the user mode VM handle (UVM).
*
* This is only temporary (promise) while prototyping the debugger.
*
* @returns COM status code
* @param a_u64Vm Where to store the vm handle. Since there is no
* uintptr_t in COM, we're using the max integer.
* (No, ULONG is not pointer sized!)
* @remarks The returned handle must be passed to VMR3ReleaseUVM()!
* @remarks Prior to 4.3 this returned PVM.
*/
STDMETHODIMP MachineDebugger::COMGETTER(VM)(LONG64 *a_i64Vm)
{
CheckComArgOutPointerValid(a_i64Vm);
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
VMR3RetainUVM(ptrVM.rawUVM());
*a_i64Vm = (intptr_t)ptrVM.rawUVM();
}
/*
* Note! pVM protection provided by SafeVMPtr is no long effective
* after we return from this method.
*/
}
return hrc;
}
// IMachineDebugger methods
/////////////////////////////////////////////////////////////////////////////
STDMETHODIMP MachineDebugger::DumpGuestCore(IN_BSTR a_bstrFilename, IN_BSTR a_bstrCompression)
{
CheckComArgStrNotEmptyOrNull(a_bstrFilename);
Utf8Str strFilename(a_bstrFilename);
if (a_bstrCompression && *a_bstrCompression)
return setError(E_INVALIDARG, tr("The compression parameter must be empty"));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
int vrc = DBGFR3CoreWrite(ptrVM, strFilename.c_str(), false /*fReplaceFile*/);
if (RT_SUCCESS(vrc))
hrc = S_OK;
else
hrc = setError(E_FAIL, tr("DBGFR3CoreWrite failed with %Rrc"), vrc);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::DumpHostProcessCore(IN_BSTR a_bstrFilename, IN_BSTR a_bstrCompression)
{
ReturnComNotImplemented();
}
/**
* Debug info string buffer formatter.
*/
typedef struct MACHINEDEBUGGERINOFHLP
{
/** The core info helper structure. */
DBGFINFOHLP Core;
/** Pointer to the buffer. */
char *pszBuf;
/** The size of the buffer. */
size_t cbBuf;
/** The offset into the buffer */
size_t offBuf;
/** Indicates an out-of-memory condition. */
bool fOutOfMemory;
} MACHINEDEBUGGERINOFHLP;
/** Pointer to a Debug info string buffer formatter. */
typedef MACHINEDEBUGGERINOFHLP *PMACHINEDEBUGGERINOFHLP;
/**
* @callback_method_impl{FNRTSTROUTPUT}
*/
static DECLCALLBACK(size_t) MachineDebuggerInfoOutput(void *pvArg, const char *pachChars, size_t cbChars)
{
PMACHINEDEBUGGERINOFHLP pHlp = (PMACHINEDEBUGGERINOFHLP)pvArg;
/*
* Grow the buffer if required.
*/
size_t const cbRequired = cbChars + pHlp->offBuf + 1;
if (cbRequired > pHlp->cbBuf)
{
if (RT_UNLIKELY(pHlp->fOutOfMemory))
return 0;
size_t cbBufNew = pHlp->cbBuf * 2;
if (cbRequired > cbBufNew)
cbBufNew = RT_ALIGN_Z(cbRequired, 256);
void *pvBufNew = RTMemRealloc(pHlp->pszBuf, cbBufNew);
if (RT_UNLIKELY(!pvBufNew))
{
pHlp->fOutOfMemory = true;
RTMemFree(pHlp->pszBuf);
pHlp->pszBuf = NULL;
pHlp->cbBuf = 0;
pHlp->offBuf = 0;
return 0;
}
pHlp->pszBuf = (char *)pvBufNew;
pHlp->cbBuf = cbBufNew;
}
/*
* Copy the bytes into the buffer and terminate it.
*/
memcpy(&pHlp->pszBuf[pHlp->offBuf], pachChars, cbChars);
pHlp->offBuf += cbChars;
pHlp->pszBuf[pHlp->offBuf] = '\0';
Assert(pHlp->offBuf < pHlp->cbBuf);
return cbChars;
}
/**
* @interface_method_impl{DBGFINFOHLP, pfnPrintfV}
*/
static DECLCALLBACK(void) MachineDebuggerInfoPrintfV(PCDBGFINFOHLP pHlp, const char *pszFormat, va_list va)
{
RTStrFormatV(MachineDebuggerInfoOutput, (void *)pHlp, NULL, NULL, pszFormat, va);
}
/**
* @interface_method_impl{DBGFINFOHLP, pfnPrintf}
*/
static DECLCALLBACK(void) MachineDebuggerInfoPrintf(PCDBGFINFOHLP pHlp, const char *pszFormat, ...)
{
va_list va;
va_start(va, pszFormat);
MachineDebuggerInfoPrintfV(pHlp, pszFormat, va);
va_end(va);
}
/**
* Initializes the debug info string buffer formatter
*
* @param pHlp The help structure to init.
*/
static void MachineDebuggerInfoInit(PMACHINEDEBUGGERINOFHLP pHlp)
{
pHlp->Core.pfnPrintf = MachineDebuggerInfoPrintf;
pHlp->Core.pfnPrintfV = MachineDebuggerInfoPrintfV;
pHlp->pszBuf = NULL;
pHlp->cbBuf = 0;
pHlp->offBuf = 0;
pHlp->fOutOfMemory = false;
}
/**
* Deletes the debug info string buffer formatter.
* @param pHlp The helper structure to delete.
*/
static void MachineDebuggerInfoDelete(PMACHINEDEBUGGERINOFHLP pHlp)
{
RTMemFree(pHlp->pszBuf);
pHlp->pszBuf = NULL;
}
STDMETHODIMP MachineDebugger::Info(IN_BSTR a_bstrName, IN_BSTR a_bstrArgs, BSTR *a_pbstrInfo)
{
LogFlowThisFunc(("\n"));
/*
* Validate and convert input.
*/
CheckComArgStrNotEmptyOrNull(a_bstrName);
Utf8Str strName, strArgs;
try
{
strName = a_bstrName;
strArgs = a_bstrArgs;
}
catch (std::bad_alloc)
{
return E_OUTOFMEMORY;
}
/*
* Do the autocaller and lock bits.
*/
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
/*
* Create a helper and call DBGFR3Info.
*/
MACHINEDEBUGGERINOFHLP Hlp;
MachineDebuggerInfoInit(&Hlp);
int vrc = DBGFR3Info(ptrVM.raw(), strName.c_str(), strArgs.c_str(), &Hlp.Core);
if (RT_SUCCESS(vrc))
{
if (!Hlp.fOutOfMemory)
{
/*
* Convert the info string, watching out for allocation errors.
*/
try
{
Bstr bstrInfo(Hlp.pszBuf);
bstrInfo.detachTo(a_pbstrInfo);
}
catch (std::bad_alloc)
{
hrc = E_OUTOFMEMORY;
}
}
else
hrc = E_OUTOFMEMORY;
}
else
hrc = setError(VBOX_E_VM_ERROR, tr("DBGFR3Info failed with %Rrc"), vrc);
MachineDebuggerInfoDelete(&Hlp);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::InjectNMI()
{
LogFlowThisFunc(("\n"));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
int vrc = HMR3InjectNMI(ptrVM);
if (RT_SUCCESS(vrc))
hrc = S_OK;
else
hrc = setError(E_FAIL, tr("HMR3InjectNMI failed with %Rrc"), vrc);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::ModifyLogFlags(IN_BSTR a_bstrSettings)
{
CheckComArgStrNotEmptyOrNull(a_bstrSettings);
Utf8Str strSettings(a_bstrSettings);
LogFlowThisFunc(("a_bstrSettings=%s\n", strSettings.c_str()));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
int vrc = DBGFR3LogModifyFlags(ptrVM, strSettings.c_str());
if (RT_SUCCESS(vrc))
hrc = S_OK;
else
hrc = setError(E_FAIL, tr("DBGFR3LogModifyFlags failed with %Rrc"), vrc);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::ModifyLogGroups(IN_BSTR a_bstrSettings)
{
CheckComArgStrNotEmptyOrNull(a_bstrSettings);
Utf8Str strSettings(a_bstrSettings);
LogFlowThisFunc(("a_bstrSettings=%s\n", strSettings.c_str()));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
int vrc = DBGFR3LogModifyGroups(ptrVM, strSettings.c_str());
if (RT_SUCCESS(vrc))
hrc = S_OK;
else
hrc = setError(E_FAIL, tr("DBGFR3LogModifyGroups failed with %Rrc"), vrc);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::ModifyLogDestinations(IN_BSTR a_bstrSettings)
{
CheckComArgStrNotEmptyOrNull(a_bstrSettings);
Utf8Str strSettings(a_bstrSettings);
LogFlowThisFunc(("a_bstrSettings=%s\n", strSettings.c_str()));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
int vrc = DBGFR3LogModifyDestinations(ptrVM, strSettings.c_str());
if (RT_SUCCESS(vrc))
hrc = S_OK;
else
hrc = setError(E_FAIL, tr("DBGFR3LogModifyDestinations failed with %Rrc"), vrc);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::ReadPhysicalMemory(LONG64 a_Address, ULONG a_cbRead, ComSafeArrayOut(BYTE, a_abData))
{
ReturnComNotImplemented();
}
STDMETHODIMP MachineDebugger::WritePhysicalMemory(LONG64 a_Address, ULONG a_cbRead, ComSafeArrayIn(BYTE, a_abData))
{
ReturnComNotImplemented();
}
STDMETHODIMP MachineDebugger::ReadVirtualMemory(ULONG a_idCpu, LONG64 a_Address, ULONG a_cbRead, ComSafeArrayOut(BYTE, a_abData))
{
ReturnComNotImplemented();
}
STDMETHODIMP MachineDebugger::WriteVirtualMemory(ULONG a_idCpu, LONG64 a_Address, ULONG a_cbRead, ComSafeArrayIn(BYTE, a_abData))
{
ReturnComNotImplemented();
}
STDMETHODIMP MachineDebugger::DetectOS(BSTR *a_pbstrName)
{
LogFlowThisFunc(("\n"));
CheckComArgNotNull(a_pbstrName);
/*
* Do the autocaller and lock bits.
*/
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
/*
* Do the job and try convert the name.
*/
/** @todo automatically load the DBGC plugins or this is a waste of time. */
char szName[64];
int vrc = DBGFR3OSDetect(ptrVM.raw(), szName, sizeof(szName));
if (RT_SUCCESS(vrc) && vrc != VINF_DBGF_OS_NOT_DETCTED)
{
try
{
Bstr bstrName(szName);
bstrName.detachTo(a_pbstrName);
}
catch (std::bad_alloc)
{
hrc = E_OUTOFMEMORY;
}
}
else
hrc = setError(VBOX_E_VM_ERROR, tr("DBGFR3OSDetect failed with %Rrc"), vrc);
}
}
return hrc;
}
/**
* Formats a register value.
*
* This is used by both register getter methods.
*
* @returns
* @param a_pbstr The output Bstr variable.
* @param a_pValue The value to format.
* @param a_enmType The type of the value.
*/
DECLINLINE(HRESULT) formatRegisterValue(Bstr *a_pbstr, PCDBGFREGVAL a_pValue, DBGFREGVALTYPE a_enmType)
{
char szHex[160];
ssize_t cch = DBGFR3RegFormatValue(szHex, sizeof(szHex), a_pValue, a_enmType, true /*fSpecial*/);
if (RT_UNLIKELY(cch <= 0))
return E_UNEXPECTED;
*a_pbstr = szHex;
return S_OK;
}
STDMETHODIMP MachineDebugger::GetRegister(ULONG a_idCpu, IN_BSTR a_bstrName, BSTR *a_pbstrValue)
{
/*
* Validate and convert input.
*/
CheckComArgStrNotEmptyOrNull(a_bstrName);
CheckComArgNotNull(a_pbstrValue);
Utf8Str strName;
try
{
strName = a_bstrName;
}
catch (std::bad_alloc)
{
return E_OUTOFMEMORY;
}
/*
* The prologue.
*/
LogFlowThisFunc(("\n"));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
/*
* Real work.
*/
DBGFREGVAL Value;
DBGFREGVALTYPE enmType;
int vrc = DBGFR3RegNmQuery(ptrVM.raw(), a_idCpu, strName.c_str(), &Value, &enmType);
if (RT_SUCCESS(vrc))
{
try
{
Bstr bstrValue;
hrc = formatRegisterValue(&bstrValue, &Value, enmType);
if (SUCCEEDED(hrc))
bstrValue.detachTo(a_pbstrValue);
}
catch (std::bad_alloc)
{
hrc = E_OUTOFMEMORY;
}
}
else if (vrc == VERR_DBGF_REGISTER_NOT_FOUND)
hrc = setError(E_FAIL, tr("Register '%s' was not found"), strName.c_str());
else if (vrc == VERR_INVALID_CPU_ID)
hrc = setError(E_FAIL, tr("Invalid CPU ID: %u"), a_idCpu);
else
hrc = setError(VBOX_E_VM_ERROR,
tr("DBGFR3RegNmQuery failed with rc=%Rrc querying register '%s' with default cpu set to %u"),
vrc, strName.c_str(), a_idCpu);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::GetRegisters(ULONG a_idCpu, ComSafeArrayOut(BSTR, a_bstrNames), ComSafeArrayOut(BSTR, a_bstrValues))
{
/*
* The prologue.
*/
LogFlowThisFunc(("\n"));
AutoCaller autoCaller(this);
HRESULT hrc = autoCaller.rc();
if (SUCCEEDED(hrc))
{
AutoWriteLock alock(this COMMA_LOCKVAL_SRC_POS);
Console::SafeVMPtr ptrVM(mParent);
hrc = ptrVM.rc();
if (SUCCEEDED(hrc))
{
/*
* Real work.
*/
size_t cRegs;
int vrc = DBGFR3RegNmQueryAllCount(ptrVM.raw(), &cRegs);
if (RT_SUCCESS(vrc))
{
PDBGFREGENTRYNM paRegs = (PDBGFREGENTRYNM)RTMemAllocZ(sizeof(paRegs[0]) * cRegs);
if (paRegs)
{
vrc = DBGFR3RegNmQueryAll(ptrVM.raw(), paRegs, cRegs);
if (RT_SUCCESS(vrc))
{
try
{
com::SafeArray<BSTR> abstrNames(cRegs);
com::SafeArray<BSTR> abstrValues(cRegs);
for (uint32_t iReg = 0; iReg < cRegs; iReg++)
{
char szHex[128];
Bstr bstrValue;
hrc = formatRegisterValue(&bstrValue, &paRegs[iReg].Val, paRegs[iReg].enmType);
AssertComRC(hrc);
bstrValue.detachTo(&abstrValues[iReg]);
Bstr bstrName(paRegs[iReg].pszName);
bstrName.detachTo(&abstrNames[iReg]);
}
abstrNames.detachTo(ComSafeArrayOutArg(a_bstrNames));
abstrValues.detachTo(ComSafeArrayOutArg(a_bstrValues));
}
catch (std::bad_alloc)
{
hrc = E_OUTOFMEMORY;
}
}
else
hrc = setError(E_FAIL, tr("DBGFR3RegNmQueryAll failed with %Rrc"), vrc);
RTMemFree(paRegs);
}
else
hrc = E_OUTOFMEMORY;
}
else
hrc = setError(E_FAIL, tr("DBGFR3RegNmQueryAllCount failed with %Rrc"), vrc);
}
}
return hrc;
}
STDMETHODIMP MachineDebugger::SetRegister(ULONG a_idCpu, IN_BSTR a_bstrName, IN_BSTR a_bstrValue)
{
ReturnComNotImplemented();
}
STDMETHODIMP MachineDebugger::SetRegisters(ULONG a_idCpu, ComSafeArrayIn(IN_BSTR, a_bstrNames), ComSafeArrayIn(IN_BSTR, a_bstrValues))
{
ReturnComNotImplemented();
}
STDMETHODIMP MachineDebugger::DumpGuestStack(ULONG a_idCpu, BSTR *a_pbstrStack)
{
ReturnComNotImplemented();
}
/**
* Resets VM statistics.
*
* @returns COM status code.
* @param aPattern The selection pattern. A bit similar to filename globbing.
*/
STDMETHODIMP MachineDebugger::ResetStats(IN_BSTR aPattern)
{
Console::SafeVMPtrQuiet ptrVM(mParent);
if (!ptrVM.isOk())
return setError(VBOX_E_INVALID_VM_STATE, "Machine is not running");
STAMR3Reset(ptrVM.rawUVM(), Utf8Str(aPattern).c_str());
return S_OK;
}
/**
* Dumps VM statistics to the log.
*
* @returns COM status code.
* @param aPattern The selection pattern. A bit similar to filename globbing.
*/
STDMETHODIMP MachineDebugger::DumpStats(IN_BSTR aPattern)
{
Console::SafeVMPtrQuiet ptrVM(mParent);
if (!ptrVM.isOk())
return setError(VBOX_E_INVALID_VM_STATE, "Machine is not running");
STAMR3Dump(ptrVM.rawUVM(), Utf8Str(aPattern).c_str());
return S_OK;
}
/**
* Get the VM statistics in an XML format.
*
* @returns COM status code.
* @param aPattern The selection pattern. A bit similar to filename globbing.
* @param aWithDescriptions Whether to include the descriptions.
* @param aStats The XML document containing the statistics.
*/
STDMETHODIMP MachineDebugger::GetStats (IN_BSTR aPattern, BOOL aWithDescriptions, BSTR *aStats)
{
Console::SafeVMPtrQuiet ptrVM (mParent);
if (!ptrVM.isOk())
return setError(VBOX_E_INVALID_VM_STATE, "Machine is not running");
char *pszSnapshot;
int vrc = STAMR3Snapshot(ptrVM.rawUVM(), Utf8Str(aPattern).c_str(), &pszSnapshot, NULL,
!!aWithDescriptions);
if (RT_FAILURE(vrc))
return vrc == VERR_NO_MEMORY ? E_OUTOFMEMORY : E_FAIL;
/** @todo this is horribly inefficient! And it's kinda difficult to tell whether it failed...
* Must use UTF-8 or ASCII here and completely avoid these two extra copy operations.
* Until that's done, this method is kind of useless for debugger statistics GUI because
* of the amount statistics in a debug build. */
Bstr(pszSnapshot).detachTo(aStats);
STAMR3SnapshotFree(ptrVM.rawUVM(), pszSnapshot);
return S_OK;
}
// public methods only for internal purposes
/////////////////////////////////////////////////////////////////////////////
void MachineDebugger::flushQueuedSettings()
{
mFlushMode = true;
if (mSingleStepQueued != ~0)
{
COMSETTER(SingleStep)(mSingleStepQueued);
mSingleStepQueued = ~0;
}
if (mRecompileUserQueued != ~0)
{
COMSETTER(RecompileUser)(mRecompileUserQueued);
mRecompileUserQueued = ~0;
}
if (mRecompileSupervisorQueued != ~0)
{
COMSETTER(RecompileSupervisor)(mRecompileSupervisorQueued);
mRecompileSupervisorQueued = ~0;
}
if (mPatmEnabledQueued != ~0)
{
COMSETTER(PATMEnabled)(mPatmEnabledQueued);
mPatmEnabledQueued = ~0;
}
if (mCsamEnabledQueued != ~0)
{
COMSETTER(CSAMEnabled)(mCsamEnabledQueued);
mCsamEnabledQueued = ~0;
}
if (mLogEnabledQueued != ~0)
{
COMSETTER(LogEnabled)(mLogEnabledQueued);
mLogEnabledQueued = ~0;
}
if (mVirtualTimeRateQueued != ~(uint32_t)0)
{
COMSETTER(VirtualTimeRate)(mVirtualTimeRateQueued);
mVirtualTimeRateQueued = ~0;
}
mFlushMode = false;
}
// private methods
/////////////////////////////////////////////////////////////////////////////
bool MachineDebugger::queueSettings() const
{
if (!mFlushMode)
{
// check if the machine is running
MachineState_T machineState;
mParent->COMGETTER(State)(&machineState);
switch (machineState)
{
// queue the request
default:
return true;
case MachineState_Running:
case MachineState_Paused:
case MachineState_Stuck:
case MachineState_LiveSnapshotting:
case MachineState_Teleporting:
break;
}
}
return false;
}
/* vi: set tabstop=4 shiftwidth=4 expandtab: */