2 Copyright (C) 2001-2006, William Joseph.
5 This file is part of GtkRadiant.
7 GtkRadiant is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 GtkRadiant is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with GtkRadiant; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
22 #include "stacktrace.h"
23 #include "stream/textstream.h"
25 #include "environment.h"
30 void write_stack_trace( TextOutputStream& outputStream ){
31 const unsigned int MAX_SYMBOLS = 256;
32 void* symbols[MAX_SYMBOLS];
34 // get return addresses
35 int symbol_count = backtrace( symbols, MAX_SYMBOLS );
37 if ( !symbol_count ) {
41 // resolve and print names
42 char** symbol_names = backtrace_symbols( symbols, symbol_count );
44 for ( int i = 0; ( i < symbol_count ); ++i )
45 outputStream << symbol_names[i] << "\n";
47 // not a memleak, see www.gnu.org/software/libc/manual (Debugging Support, Backtraces)
51 #elif defined ( WIN32 ) && defined ( _MSC_VER )
61 Address( void* value ) : m_value( value ){
65 /// \brief Writes an address \p p to \p ostream in hexadecimal form.
66 template<typename TextOutputStreamType>
67 inline TextOutputStreamType& ostream_write( TextOutputStreamType& ostream, const Address& p ){
68 const std::size_t bufferSize = ( sizeof( void* ) * 2 ) + 1;
70 ostream.write( buf, snprintf( buf, bufferSize, "%0p", p.m_value ) );
78 Offset( void* value ) : m_value( value ){
82 /// \brief Writes an address \p p to \p ostream in hexadecimal form.
83 template<typename TextOutputStreamType>
84 inline TextOutputStreamType& ostream_write( TextOutputStreamType& ostream, const Offset& p ){
85 const std::size_t bufferSize = ( sizeof( void* ) * 2 ) + 1;
87 ostream.write( buf, snprintf( buf, bufferSize, "%X", p.m_value ) );
91 /// \brief Writes a WCHAR string \p s to \p ostream.
92 template<typename TextOutputStreamType>
93 inline TextOutputStreamType& ostream_write( TextOutputStreamType& ostream, const WCHAR* s ){
94 const std::size_t bufferSize = 1024;
96 ostream.write( buf, snprintf( buf, bufferSize, "%ls", s ) );
100 struct EnumerateSymbolsContext
103 TextOutputStream& outputStream;
105 EnumerateSymbolsContext( STACKFRAME64& sf, TextOutputStream& outputStream ) : sf( sf ), outputStream( outputStream ), count( 0 ){
109 void write_symbol( PSYMBOL_INFO pSym, STACKFRAME64& sf, TextOutputStream& outputStream, std::size_t& count ){
111 if ( pSym->Flags & SYMFLAG_PARAMETER ) {
114 if ( SymGetTypeInfo( GetCurrentProcess(), pSym->ModBase, pSym->TypeIndex,
115 TI_GET_BASETYPE, &basicType ) ) {
121 if ( SymGetTypeInfo( GetCurrentProcess(), pSym->ModBase, pSym->TypeIndex,
122 TI_GET_TYPEID, &typeId ) ) {
123 if ( SymGetTypeInfo( GetCurrentProcess(), pSym->ModBase, pSym->TypeIndex,
124 TI_GET_BASETYPE, &basicType ) ) {
129 const char* FormatGetLastError();
130 const char* error = FormatGetLastError();
134 if ( SymGetTypeInfo( GetCurrentProcess(), pSym->ModBase, typeId,
135 TI_GET_SYMNAME, &name ) ) {
136 outputStream << name << " ";
142 const char* FormatGetLastError();
143 const char* error = FormatGetLastError();
150 const char* FormatGetLastError();
151 const char* error = FormatGetLastError();
156 outputStream << ", ";
158 outputStream << pSym->Name;
165 EnumerateSymbolsCallback(
166 PSYMBOL_INFO pSymInfo,
169 write_symbol( pSymInfo, ( (EnumerateSymbolsContext*)UserContext )->sf, ( (EnumerateSymbolsContext*)UserContext )->outputStream, ( (EnumerateSymbolsContext*)UserContext )->count );
175 void write_stack_trace( PCONTEXT pContext, TextOutputStream& outputStream ){
176 HANDLE m_hProcess = GetCurrentProcess();
177 DWORD dwMachineType = 0;
179 CONTEXT context = *pContext;
181 // Could use SymSetOptions here to add the SYMOPT_DEFERRED_LOADS flag
182 if ( !SymInitialize( m_hProcess, (PSTR)environment_get_app_path(), TRUE ) ) {
187 memset( &sf, 0, sizeof( sf ) );
188 sf.AddrPC.Mode = AddrModeFlat;
189 sf.AddrStack.Mode = AddrModeFlat;
190 sf.AddrFrame.Mode = AddrModeFlat;
193 // Initialize the STACKFRAME structure for the first call. This is only
194 // necessary for Intel CPUs, and isn't mentioned in the documentation.
195 sf.AddrPC.Offset = context.Eip;
196 sf.AddrStack.Offset = context.Esp;
197 sf.AddrFrame.Offset = context.Ebp;
199 dwMachineType = IMAGE_FILE_MACHINE_I386;
201 sf.AddrPC.Offset = context.Rip;
202 sf.AddrStack.Offset = context.Rsp;
204 // MSDN: x64: The frame pointer is RBP or RDI. This value is not always used.
205 // very funny, we'll try Rdi for now
206 sf.AddrFrame.Offset = context.Rdi;
208 dwMachineType = IMAGE_FILE_MACHINE_AMD64;
211 const unsigned int max_sym_name = 1024; // should be enough
215 // Get the next stack frame
216 if ( !StackWalk64( dwMachineType,
222 SymFunctionTableAccess64,
228 if ( 0 == sf.AddrFrame.Offset ) { // Basic sanity check to make sure
229 break; // the frame is OK. Bail if not.
232 // Get the name of the function for this stack frame entry
233 BYTE symbolBuffer[ sizeof( SYMBOL_INFO ) + max_sym_name ];
234 PSYMBOL_INFO pSymbol = (PSYMBOL_INFO)symbolBuffer;
235 pSymbol->SizeOfStruct = sizeof( SYMBOL_INFO );
236 pSymbol->MaxNameLen = max_sym_name;
238 DWORD64 symDisplacement = 0; // Displacement of the input address,
239 // relative to the start of the symbol
241 IMAGEHLP_MODULE64 module = { sizeof( IMAGEHLP_MODULE64 ) };
242 if ( SymGetModuleInfo64( m_hProcess, sf.AddrPC.Offset, &module ) ) {
243 outputStream << module.ModuleName << "!";
245 if ( SymFromAddr( m_hProcess, sf.AddrPC.Offset, &symDisplacement, pSymbol ) ) {
246 char undecoratedName[max_sym_name];
247 UnDecorateSymbolName( pSymbol->Name, undecoratedName, max_sym_name, UNDNAME_COMPLETE );
249 outputStream << undecoratedName;
252 // Use SymSetContext to get just the locals/params for this frame
253 IMAGEHLP_STACK_FRAME imagehlpStackFrame;
254 imagehlpStackFrame.InstructionOffset = sf.AddrPC.Offset;
255 SymSetContext( m_hProcess, &imagehlpStackFrame, 0 );
257 // Enumerate the locals/parameters
258 EnumerateSymbolsContext context( sf, outputStream );
259 SymEnumSymbols( m_hProcess, 0, 0, EnumerateSymbolsCallback, &context );
262 outputStream << " + " << Offset( reinterpret_cast<void*>( symDisplacement ) );
264 // Get the source line for this stack frame entry
265 IMAGEHLP_LINE64 lineInfo = { sizeof( IMAGEHLP_LINE64 ) };
266 DWORD dwLineDisplacement;
267 if ( SymGetLineFromAddr64( m_hProcess, sf.AddrPC.Offset,
268 &dwLineDisplacement, &lineInfo ) ) {
269 outputStream << " " << lineInfo.FileName << " line " << Unsigned( lineInfo.LineNumber );
274 outputStream << Address( reinterpret_cast<void*>( sf.AddrPC.Offset ) );
278 outputStream << "\n";
281 SymCleanup( m_hProcess );
286 void write_stack_trace( TextOutputStream& outputStream ){
287 __try { RaiseException( 0,0,0,0 ); } __except( write_stack_trace( ( GetExceptionInformation() )->ContextRecord, outputStream ), EXCEPTION_CONTINUE_EXECUTION ) {
291 #elif defined ( WIN32 )
292 void write_stack_trace( TextOutputStream& outputStream ){
293 outputStream << "\nStacktrace is disabled on this compiler\n";
296 void write_stack_trace( TextOutputStream& outputStream ){
297 outputStream << "\nStacktrace is disabled on this platform\n";