diff options
| -rw-r--r-- | libs/pbd/stacktrace.cc | 58 | ||||
| -rw-r--r-- | wscript | 4 |
2 files changed, 61 insertions, 1 deletions
diff --git a/libs/pbd/stacktrace.cc b/libs/pbd/stacktrace.cc index c74dd946f7..cf6b4a2df4 100644 --- a/libs/pbd/stacktrace.cc +++ b/libs/pbd/stacktrace.cc @@ -20,10 +20,18 @@ #include "libpbd-config.h" #include "pbd/stacktrace.h" +#include "pbd/compose.h" +#include "pbd/pthread_utils.h" + #include <cstdio> #include <iostream> #include <string> +#ifdef PLATFORM_WINDOWS +#include <Windows.h> +#include <DbgHelp.h> +#endif + void PBD::trace_twb () { @@ -103,6 +111,56 @@ PBD::stacktrace (std::ostream& out, int levels) } } +#elif defined (PLATFORM_WINDOWS) + +std::string +PBD::demangle (std::string const & l) /* JE - !!!! 'PBD' namespace might possibly get removed (except it's still used in 'libs/canvas/item.cc') */ +{ + return std::string(); +} + +void +PBD::stacktrace( std::ostream& out, int) +{ +#ifdef DEBUG + const size_t levels = 62; // does not support more then 62 levels of stacktrace + unsigned int i; + void * stack[ levels ]; + unsigned short frames; + SYMBOL_INFO * symbol; + HANDLE process; + + process = GetCurrentProcess(); + out << "+++++Backtrace process: " << pthread_self() << std::endl; + + SymInitialize( process, NULL, TRUE ); + + frames = CaptureStackBackTrace( 0, levels, stack, NULL ); + + out << "+++++Backtrace frames: " << frames << std::endl; + + symbol = ( SYMBOL_INFO * )calloc( sizeof( SYMBOL_INFO ) + 256 * sizeof( char ), 1 ); + symbol->MaxNameLen = 255; + symbol->SizeOfStruct = sizeof( SYMBOL_INFO ); + + for( i = 0; i < frames; i++ ) + { + SymFromAddr( process, ( DWORD64 )( stack[ i ] ), 0, symbol ); + out << string_compose( "%1: %2 - %3\n", frames - i - 1, symbol->Name, symbol->Address ); + } + + out.flush(); + + free( symbol ); +#endif +} + +void +c_stacktrace () +{ + PBD::stacktrace (std::cout); +} + #else std::string @@ -889,7 +889,9 @@ def configure(conf): lib='regex', uselib_store="REGEX", define_name='HAVE_REGEX_H') # TODO put this only where it is needed conf.env.append_value('LIB', 'regex') - + # TODO this should only be necessary for a debug build + conf.env.append_value('LIB', 'dbghelp') + # work around GdkDrawable BitBlt performance issue on windows # see http://gareus.org/wiki/ardour_windows_gdk_and_cairo conf.env.append_value('CFLAGS', '-DUSE_CAIRO_IMAGE_SURFACE') |