1 // Verbose terminate_handler -*- C++ -*-
2 
3 // Copyright (C) 2001, 2002, 2004, 2005 Free Software Foundation
4 //
5 // This file is part of the GNU ISO C++ Library.  This library is free
6 // software; you can redistribute it and/or modify it under the
7 // terms of the GNU General Public License as published by the
8 // Free Software Foundation; either version 2, or (at your option)
9 // any later version.
10 
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
14 // GNU General Public License for more details.
15 
16 // You should have received a copy of the GNU General Public License along
17 // with this library; see the file COPYING.  If not, write to the Free
18 // Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
19 // USA.
20 
21 // As a special exception, you may use this file as part of a free software
22 // library without restriction.  Specifically, if other files instantiate
23 // templates or use macros or inline functions from this file, or you compile
24 // this file and link it with other files to produce an executable, this
25 // file does not by itself cause the resulting executable to be covered by
26 // the GNU General Public License.  This exception does not however
27 // invalidate any other reasons why the executable file might be covered by
28 // the GNU General Public License.
29 
30 #include <bits/c++config.h>
31 
32 #if _GLIBCXX_HOSTED
33 #include <cstdlib>
34 #include <exception>
35 #include <exception_defines.h>
36 #include <cxxabi.h>
37 # include <cstdio>
38 
39 using namespace std;
40 using namespace abi;
41 
42 _GLIBCXX_BEGIN_NAMESPACE(__gnu_cxx)
43 
44   // A replacement for the standard terminate_handler which prints
45   // more information about the terminating exception (if any) on
46   // stderr.
47   void __verbose_terminate_handler()
48   {
49     static bool terminating;
50     if (terminating)
51       {
52 	fputs("terminate called recursively\n", stderr);
53 	abort ();
54       }
55     terminating = true;
56 
57     // Make sure there was an exception; terminate is also called for an
58     // attempt to rethrow when there is no suitable exception.
59     type_info *t = __cxa_current_exception_type();
60     if (t)
61       {
62 	// Note that "name" is the mangled name.
63 	char const *name = t->name();
64 	{
65 	  int status = -1;
66 	  char *dem = 0;
67 
68 	  dem = __cxa_demangle(name, 0, 0, &status);
69 
70 	  fputs("terminate called after throwing an instance of '", stderr);
71 	  if (status == 0)
72 	    fputs(dem, stderr);
73 	  else
74 	    fputs(name, stderr);
75 	  fputs("'\n", stderr);
76 
77 	  if (status == 0)
78 	    free(dem);
79 	}
80 
81 	// If the exception is derived from std::exception, we can
82 	// give more information.
83 	try { __throw_exception_again; }
84 #ifdef __EXCEPTIONS
85 	catch (exception &exc)
86 	  {
87 	    char const *w = exc.what();
88 	    fputs("  what():  ", stderr);
89 	    fputs(w, stderr);
90 	    fputs("\n", stderr);
91           }
92 #endif
93 	catch (...) { }
94       }
95     else
96       fputs("terminate called without an active exception\n", stderr);
97 
98     abort();
99   }
100 
101 _GLIBCXX_END_NAMESPACE
102 
103 #endif
104