Import libstdc++ from GCC 3.3.3-pre 20031106.
[dragonfly.git] / contrib / libstdc++3 / src / vterminate.cc
1 // Verbose terminate_handler -*- C++ -*-
2
3 // Copyright (C) 2001, 2002 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, 59 Temple Place - Suite 330, Boston, MA 02111-1307,
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 <cstdlib>
31 #include <cstdio>
32 #include <exception>
33 #include <exception_defines.h>
34 #include <cxxabi.h>
35
36 using namespace std;
37 using namespace abi;
38
39 namespace __gnu_cxx
40 {
41   /* A replacement for the standard terminate_handler which prints
42    more information about the terminating exception (if any) on
43    stderr.  */
44   void __verbose_terminate_handler()
45   {
46     // Make sure there was an exception; terminate is also called for an
47     // attempt to rethrow when there is no suitable exception.
48     type_info *t = __cxa_current_exception_type();
49     if (t)
50       {
51         char const *name = t->name();
52         // Note that "name" is the mangled name.
53         
54         {
55           int status = -1;
56           char *dem = 0;
57           
58           // Disabled until __cxa_demangle gets the runtime GPL exception.
59           dem = __cxa_demangle(name, 0, 0, &status);
60
61           printf("terminate called after throwing a `%s'\n", 
62                  status == 0 ? dem : name);
63
64           if (status == 0)
65             free(dem);
66         }
67
68         // If the exception is derived from std::exception, we can give more
69         // information.
70         try { __throw_exception_again; }
71 #ifdef __EXCEPTIONS
72         catch (exception &exc)
73           { fprintf(stderr, "  what(): %s\n", exc.what()); }
74 #endif
75         catch (...) { }
76       }
77     else
78       fprintf(stderr, "terminate called without an active exception\n");
79     
80     abort();
81   }
82 } // namespace __gnu_cxx