X-Git-Url: https://main.carlh.net/gitweb/?a=blobdiff_plain;f=libs%2Fpbd%2Fstacktrace.cc;h=8a7cdfafca010d2605e870cca2763ce5e85c1785;hb=368a091acdcf0476ed9b3f3b79aab1d77794104e;hp=d203bef968c78da1cd61e95b691302463790a64a;hpb=fd23ebd0886cd61f8ee68d52d6576d00a16c9032;p=ardour.git

diff --git a/libs/pbd/stacktrace.cc b/libs/pbd/stacktrace.cc
index d203bef968..8a7cdfafca 100644
--- a/libs/pbd/stacktrace.cc
+++ b/libs/pbd/stacktrace.cc
@@ -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
@@ -20,8 +20,19 @@
 #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  FramesToSkip,
+                                 ULONG  FramesToCapture,
+                                 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 frames;
+	SYMBOL_INFO  * symbol;
+	HANDLE         process;
+
+	process = GetCurrentProcess();
+	out << "+++++Backtrace process: " <<  DEBUG_THREAD_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
+}
+
 #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 */