NO-OP: whitespace
[ardour.git] / libs / pbd / stacktrace.cc
index d203bef968c78da1cd61e95b691302463790a64a..3b308f7db2dea749695a72036706880054d37182 100644 (file)
@@ -1,5 +1,5 @@
 /*
-    Copyright (C) 2000-2007 Paul Davis 
+    Copyright (C) 2000-2007 Paul Davis
 
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
 #include "libpbd-config.h"
 
 #include "pbd/stacktrace.h"
+#include "pbd/debug.h"
+#include "pbd/demangle.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 ()
@@ -33,48 +44,6 @@ PBD::trace_twb ()
 #ifdef HAVE_EXECINFO
 
 #include <execinfo.h>
-#include <cxxabi.h>
-
-static std::string 
-symbol_demangle (const std::string& l)
-{
-       int status;
-
-       try {
-               
-               char* realname = abi::__cxa_demangle (l.c_str(), 0, 0, &status);
-               std::string d (realname);
-               free (realname);
-               return d;
-       } catch (std::exception) {
-               
-       }
-
-       return l;
-}
-
-std::string 
-PBD::demangle (std::string const & l)
-{
-       std::string::size_type const b = l.find_first_of ("(");
-
-       if (b == std::string::npos) {
-               return symbol_demangle (l);
-       }
-
-       std::string::size_type const p = l.find_last_of ("+");
-       if (p == std::string::npos) {
-               return symbol_demangle (l);
-       }
-
-       if ((p - b) <= 1) {
-               return symbol_demangle (l);
-       }
-       
-       std::string const fn = l.substr (b + 1, p - b - 1);
-
-       return symbol_demangle (fn);
-}
 
 void
 PBD::stacktrace (std::ostream& out, int levels)
@@ -83,18 +52,18 @@ PBD::stacktrace (std::ostream& out, int levels)
        size_t size;
        char **strings;
        size_t i;
-     
+
        size = backtrace (array, 200);
 
        if (size) {
                strings = backtrace_symbols (array, size);
-     
+
                if (strings) {
-                       
+
                        for (i = 0; i < size && (levels == 0 || i < size_t(levels)); i++) {
                                out << "  " << demangle (strings[i]) << std::endl;
                        }
-                       
+
                        free (strings);
                }
        } else {
@@ -102,6 +71,57 @@ PBD::stacktrace (std::ostream& out, int levels)
        }
 }
 
+#elif defined (PLATFORM_WINDOWS)
+
+#if defined DEBUG && !defined CaptureStackBackTrace
+#define CaptureStackBackTrace RtlCaptureStackBackTrace
+
+extern "C" {
+    __declspec(dllimport) USHORT WINAPI CaptureStackBackTrace (
+                                 ULONG  SamplesToSkip,
+                                 ULONG  SamplesToCapture,
+                                 PVOID  *BackTrace,
+                                 PULONG BackTraceHash
+                             );
+}
+#endif
+
+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 samples;
+       SYMBOL_INFO  * symbol;
+       HANDLE         process;
+
+       process = GetCurrentProcess();
+       out << "+++++Backtrace process: " <<  DEBUG_THREAD_SELF << std::endl;
+
+       SymInitialize( process, NULL, TRUE );
+
+       samples               = CaptureStackBackTrace( 0, levels, stack, NULL );
+
+       out << "+++++Backtrace samples: " <<  samples << 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 < samples; i++ )
+       {
+               SymFromAddr( process, ( DWORD64 )( stack[ i ] ), 0, symbol );
+               out << string_compose( "%1: %2 - %3\n", samples - i - 1, symbol->Name, symbol->Address );
+       }
+
+       out.flush();
+
+       free( symbol );
+#endif
+}
+
 #else
 
 void
@@ -110,10 +130,10 @@ PBD::stacktrace (std::ostream& out, int /*levels*/)
        out << "stack tracing is not enabled on this platform" << std::endl;
 }
 
+#endif
+
 void
 c_stacktrace ()
 {
        PBD::stacktrace (std::cout);
 }
-
-#endif /* HAVE_EXECINFO */