f99303eb4a
D front-end changes: - Import dmd v2.102.0-beta.1 - `static assert' now supports multiple message arguments. D runtime changes: - Import druntime v2.102.0-beta.1 - The default `Throwable.TraceInfo' generation now is `@nogc'. - `Object.factory' method has now been deprecated. Phobos changes: - Import phobos v2.102.0-beta.1 - Added float- and double-precision implementations for log function families in std.math. - `std.typecons.Unique' now calls `destroy` on struct types gcc/d/ChangeLog: * Make-lang.in (D_FRONTEND_OBJS): Add d/location.o. * d-lang.cc (d_init_options): Update for new front-end interface. (d_post_options): Call Loc::set after handling options. * dmd/MERGE: Merge upstream dmd 09faa4eacd. * dmd/VERSION: Bump version to v2.102.0-beta.1. libphobos/ChangeLog: * libdruntime/MERGE: Merge upstream druntime 09faa4eacd. * src/MERGE: Merge upstream phobos 13ef27a56. * testsuite/libphobos.exceptions/refcounted.d: Add test for chained reference counted exceptions. * testsuite/libphobos.shared/finalize.d: Add dg-warning for deprecated factory interfaces. * testsuite/libphobos.gc/issue22843.d: New test. gcc/testsuite/ChangeLog: * gdc.dg/simd2a.d: Update. * gdc.dg/simd2b.d: Update. * gdc.dg/simd2c.d: Update. * gdc.dg/simd2d.d: Update. * gdc.dg/simd2e.d: Update. * gdc.dg/simd2f.d: Update. * gdc.dg/simd2g.d: Update. * gdc.dg/simd2h.d: Update. * gdc.dg/simd2i.d: Update. * gdc.dg/simd2j.d: Update.
113 lines
7 KiB
D
113 lines
7 KiB
D
/**
|
|
* ...
|
|
*
|
|
* Copyright: Copyright Benjamin Thaut 2010 - 2011.
|
|
* License: Distributed under the
|
|
* $(LINK2 http://www.boost.org/LICENSE_1_0.txt, Boost Software License 1.0).
|
|
* (See accompanying file LICENSE)
|
|
* Authors: Benjamin Thaut, Sean Kelly
|
|
* Source: $(DRUNTIMESRC core/sys/windows/_stacktrace.d)
|
|
*/
|
|
|
|
module core.sys.windows.dbghelp;
|
|
version (Windows):
|
|
|
|
import core.sys.windows.winbase /+: FreeLibrary, GetProcAddress, LoadLibraryA+/;
|
|
import core.sys.windows.windef;
|
|
|
|
public import core.sys.windows.dbghelp_types;
|
|
|
|
extern(Windows)
|
|
{
|
|
alias BOOL function(HANDLE hProcess, DWORD64 lpBaseAddress, PVOID lpBuffer, DWORD nSize, LPDWORD lpNumberOfBytesRead) ReadProcessMemoryProc64;
|
|
alias PVOID function(HANDLE hProcess, DWORD64 AddrBase) FunctionTableAccessProc64;
|
|
alias DWORD64 function(HANDLE hProcess, DWORD64 Address) GetModuleBaseProc64;
|
|
alias DWORD64 function(HANDLE hProcess, HANDLE hThread, ADDRESS64 *lpaddr) TranslateAddressProc64;
|
|
|
|
alias BOOL function(HANDLE hProcess, PCSTR UserSearchPath, bool fInvadeProcess) SymInitializeFunc;
|
|
alias BOOL function(HANDLE hProcess) SymCleanupFunc;
|
|
alias DWORD function(DWORD SymOptions) SymSetOptionsFunc;
|
|
alias DWORD function() SymGetOptionsFunc;
|
|
alias PVOID function(HANDLE hProcess, DWORD64 AddrBase) SymFunctionTableAccess64Func;
|
|
alias BOOL function(DWORD MachineType, HANDLE hProcess, HANDLE hThread, STACKFRAME64 *StackFrame, PVOID ContextRecord,
|
|
ReadProcessMemoryProc64 ReadMemoryRoutine, FunctionTableAccessProc64 FunctoinTableAccess,
|
|
GetModuleBaseProc64 GetModuleBaseRoutine, TranslateAddressProc64 TranslateAddress) @nogc StackWalk64Func;
|
|
alias BOOL function(HANDLE hProcess, DWORD64 dwAddr, PDWORD pdwDisplacement, IMAGEHLP_LINEA64 *line) SymGetLineFromAddr64Func;
|
|
alias DWORD64 function(HANDLE hProcess, DWORD64 dwAddr) SymGetModuleBase64Func;
|
|
alias BOOL function(HANDLE hProcess, DWORD64 dwAddr, IMAGEHLP_MODULEA64 *ModuleInfo) SymGetModuleInfo64Func;
|
|
alias BOOL function(HANDLE hProcess, DWORD64 Address, DWORD64 *Displacement, IMAGEHLP_SYMBOLA64 *Symbol) SymGetSymFromAddr64Func;
|
|
alias DWORD function(PCSTR DecoratedName, PSTR UnDecoratedName, DWORD UndecoratedLength, DWORD Flags) UnDecorateSymbolNameFunc;
|
|
alias DWORD64 function(HANDLE hProcess, HANDLE hFile, PCSTR ImageName, PCSTR ModuleName, DWORD64 BaseOfDll, DWORD SizeOfDll) SymLoadModule64Func;
|
|
alias BOOL function(HANDLE hProcess, PSTR SearchPath, DWORD SearchPathLength) SymGetSearchPathFunc;
|
|
alias BOOL function(HANDLE hProcess, PCSTR SearchPath) SymSetSearchPathFunc;
|
|
alias BOOL function(HANDLE hProcess, DWORD64 Address) SymUnloadModule64Func;
|
|
alias BOOL function(HANDLE hProcess, ULONG ActionCode, ulong CallbackContext, ulong UserContext) PSYMBOL_REGISTERED_CALLBACK64;
|
|
alias BOOL function(HANDLE hProcess, PSYMBOL_REGISTERED_CALLBACK64 CallbackFunction, ulong UserContext) SymRegisterCallback64Func;
|
|
alias API_VERSION* function() ImagehlpApiVersionFunc;
|
|
}
|
|
|
|
struct DbgHelp
|
|
{
|
|
SymInitializeFunc SymInitialize;
|
|
SymCleanupFunc SymCleanup;
|
|
StackWalk64Func StackWalk64;
|
|
SymGetOptionsFunc SymGetOptions;
|
|
SymSetOptionsFunc SymSetOptions;
|
|
SymFunctionTableAccess64Func SymFunctionTableAccess64;
|
|
SymGetLineFromAddr64Func SymGetLineFromAddr64;
|
|
SymGetModuleBase64Func SymGetModuleBase64;
|
|
SymGetModuleInfo64Func SymGetModuleInfo64;
|
|
SymGetSymFromAddr64Func SymGetSymFromAddr64;
|
|
UnDecorateSymbolNameFunc UnDecorateSymbolName;
|
|
SymLoadModule64Func SymLoadModule64;
|
|
SymGetSearchPathFunc SymGetSearchPath;
|
|
SymSetSearchPathFunc SymSetSearchPath;
|
|
SymUnloadModule64Func SymUnloadModule64;
|
|
SymRegisterCallback64Func SymRegisterCallback64;
|
|
ImagehlpApiVersionFunc ImagehlpApiVersion;
|
|
|
|
static DbgHelp* get() @nogc
|
|
{
|
|
if ( sm_hndl != sm_hndl.init )
|
|
return &sm_inst;
|
|
if ( (sm_hndl = LoadLibraryA( "dbghelp.dll" )) != sm_hndl.init )
|
|
{
|
|
sm_inst.SymInitialize = cast(SymInitializeFunc) GetProcAddress(sm_hndl,"SymInitialize");
|
|
sm_inst.SymCleanup = cast(SymCleanupFunc) GetProcAddress(sm_hndl,"SymCleanup");
|
|
sm_inst.StackWalk64 = cast(StackWalk64Func) GetProcAddress(sm_hndl,"StackWalk64");
|
|
sm_inst.SymGetOptions = cast(SymGetOptionsFunc) GetProcAddress(sm_hndl,"SymGetOptions");
|
|
sm_inst.SymSetOptions = cast(SymSetOptionsFunc) GetProcAddress(sm_hndl,"SymSetOptions");
|
|
sm_inst.SymFunctionTableAccess64 = cast(SymFunctionTableAccess64Func) GetProcAddress(sm_hndl,"SymFunctionTableAccess64");
|
|
sm_inst.SymGetLineFromAddr64 = cast(SymGetLineFromAddr64Func) GetProcAddress(sm_hndl,"SymGetLineFromAddr64");
|
|
sm_inst.SymGetModuleBase64 = cast(SymGetModuleBase64Func) GetProcAddress(sm_hndl,"SymGetModuleBase64");
|
|
sm_inst.SymGetModuleInfo64 = cast(SymGetModuleInfo64Func) GetProcAddress(sm_hndl,"SymGetModuleInfo64");
|
|
sm_inst.SymGetSymFromAddr64 = cast(SymGetSymFromAddr64Func) GetProcAddress(sm_hndl,"SymGetSymFromAddr64");
|
|
sm_inst.UnDecorateSymbolName = cast(UnDecorateSymbolNameFunc) GetProcAddress(sm_hndl,"UnDecorateSymbolName");
|
|
sm_inst.SymLoadModule64 = cast(SymLoadModule64Func) GetProcAddress(sm_hndl,"SymLoadModule64");
|
|
sm_inst.SymGetSearchPath = cast(SymGetSearchPathFunc) GetProcAddress(sm_hndl,"SymGetSearchPath");
|
|
sm_inst.SymSetSearchPath = cast(SymSetSearchPathFunc) GetProcAddress(sm_hndl,"SymSetSearchPath");
|
|
sm_inst.SymUnloadModule64 = cast(SymUnloadModule64Func) GetProcAddress(sm_hndl,"SymUnloadModule64");
|
|
sm_inst.SymRegisterCallback64 = cast(SymRegisterCallback64Func) GetProcAddress(sm_hndl, "SymRegisterCallback64");
|
|
sm_inst.ImagehlpApiVersion = cast(ImagehlpApiVersionFunc) GetProcAddress(sm_hndl, "ImagehlpApiVersion");
|
|
assert( sm_inst.SymInitialize && sm_inst.SymCleanup && sm_inst.StackWalk64 && sm_inst.SymGetOptions &&
|
|
sm_inst.SymSetOptions && sm_inst.SymFunctionTableAccess64 && sm_inst.SymGetLineFromAddr64 &&
|
|
sm_inst.SymGetModuleBase64 && sm_inst.SymGetModuleInfo64 && sm_inst.SymGetSymFromAddr64 &&
|
|
sm_inst.UnDecorateSymbolName && sm_inst.SymLoadModule64 && sm_inst.SymGetSearchPath &&
|
|
sm_inst.SymSetSearchPath && sm_inst.SymUnloadModule64 && sm_inst.SymRegisterCallback64 &&
|
|
sm_inst.ImagehlpApiVersion);
|
|
|
|
return &sm_inst;
|
|
}
|
|
return null;
|
|
}
|
|
|
|
shared static ~this()
|
|
{
|
|
if ( sm_hndl != sm_hndl.init )
|
|
FreeLibrary( sm_hndl );
|
|
}
|
|
|
|
private:
|
|
__gshared DbgHelp sm_inst;
|
|
__gshared HANDLE sm_hndl;
|
|
}
|