1 // Copyright (C) 2007-2016 CEA/DEN, EDF R&D, OPEN CASCADE
3 // Copyright (C) 2003-2007 OPEN CASCADE, EADS/CCR, LIP6, CEA/DEN,
4 // CEDRAT, EDF R&D, LEG, PRINCIPIA R&D, BUREAU VERITAS
6 // This library is free software; you can redistribute it and/or
7 // modify it under the terms of the GNU Lesser General Public
8 // License as published by the Free Software Foundation; either
9 // version 2.1 of the License, or (at your option) any later version.
11 // This library is distributed in the hope that it will be useful,
12 // but WITHOUT ANY WARRANTY; without even the implied warranty of
13 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 // Lesser General Public License for more details.
16 // You should have received a copy of the GNU Lesser General Public
17 // License along with this library; if not, write to the Free Software
18 // Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
20 // See http://www.salome-platform.org/ or email : webmaster.salome@opencascade.com
23 // File: Utils_ExceptHandler.cxx
24 // Created: Mon Mar 15 10:23:41 2004
25 // Author: Oksana TCHEBANOVA
26 // <ota@localhost.localdomain>
28 #include "Utils_ExceptHandlers.hxx"
29 #include "Utils_CorbaException.hxx"
30 #include "Utils_SALOME_Exception.hxx"
36 #pragma comment(lib, "Dbghelp.lib")
43 #include <SALOMEconfig.h>
44 #include CORBA_SERVER_HEADER(SALOME_Exception)
46 //#define NBLINES_BACKTRACE 64
48 void printBacktrace(std::stringstream& txt)
50 typedef USHORT(WINAPI *CaptureStackBackTraceType)(__in ULONG, __in ULONG, __out PVOID*, __out_opt PULONG);
51 CaptureStackBackTraceType func = (CaptureStackBackTraceType)(GetProcAddress(LoadLibrary("kernel32.dll"), "RtlCaptureStackBackTrace"));
55 const int kMaxCallers = 128;
57 void * callers_stack[kMaxCallers];
58 unsigned short frames;
61 process = GetCurrentProcess();
62 SymInitialize(process, NULL, TRUE);
63 frames = (func)(0, kMaxCallers, callers_stack, NULL);
64 symbol = (SYMBOL_INFO *)calloc(sizeof(SYMBOL_INFO) + 256 * sizeof(char), 1);
65 symbol->MaxNameLen = 255;
66 symbol->SizeOfStruct = sizeof(SYMBOL_INFO);
68 const unsigned short MAX_CALLERS_SHOWN = 64;
69 frames = frames < MAX_CALLERS_SHOWN ? frames : MAX_CALLERS_SHOWN;
70 for (unsigned int i = 0; i < frames; i++)
72 SymFromAddr(process, (DWORD64)(callers_stack[i]), 0, symbol);
73 txt << "*** " << i << ": " << callers_stack[i] << " " << symbol->Name << " - 0x" << symbol->Address << std::endl;
79 void printBacktrace(void **stacklines, int nbLines, std::stringstream& txt)
81 char **stackSymbols = backtrace_symbols(stacklines, nbLines);
82 for (int i = 0; i < nbLines; i++)
85 if (dladdr(stacklines[i], &infodl))
87 txt << i << " " << infodl.dli_fname << " " << infodl.dli_fbase << " ";
88 char *demangled = NULL;
90 demangled = abi::__cxa_demangle(infodl.dli_sname, NULL, 0, &status);
91 if (status == 0 && demangled != NULL)
93 std::string demangstr = demangled; // copy
98 if (infodl.dli_sname != 0 && infodl.dli_sname[0] != 0)
100 std::string sname = infodl.dli_sname;
101 if (sname.size() > 0)
102 txt << infodl.dli_sname;
105 txt << " " << infodl.dli_saddr;
110 txt << i << " " << stackSymbols[i] << std::endl;
116 void SalomeException ()
118 std::stringstream txt;
119 txt << "Salome Exception" << std::endl;
123 void *stacklines[64];
125 nbLines = backtrace(stacklines, 64);
126 printBacktrace(stacklines, nbLines, txt);
128 throw SALOME_Exception(txt.str().c_str());
131 void SALOME_SalomeException()
133 std::stringstream txt;
135 txt << "INTERNAL_ERROR, backtrace stack:" << std::endl;
138 void *stacklines[64];
140 nbLines = backtrace(stacklines, 64);
141 txt << "INTERNAL_ERROR, backtrace stack:" << nbLines << std::endl;
142 printBacktrace(stacklines, nbLines, txt);
144 THROW_SALOME_CORBA_EXCEPTION(txt.str().c_str(), SALOME::INTERNAL_ERROR);