]> CyberLeo.Net >> Repos - FreeBSD/releng/9.2.git/blob - contrib/libstdc++/libsupc++/eh_throw.cc
- Copy stable/9 to releng/9.2 as part of the 9.2-RELEASE cycle.
[FreeBSD/releng/9.2.git] / contrib / libstdc++ / libsupc++ / eh_throw.cc
1 // -*- C++ -*- Exception handling routines for throwing.
2 // Copyright (C) 2001, 2003 Free Software Foundation, Inc.
3 //
4 // This file is part of GCC.
5 //
6 // GCC is free software; you can redistribute it and/or modify
7 // it under the terms of the GNU General Public License as published by
8 // the Free Software Foundation; either version 2, or (at your option)
9 // any later version.
10 //
11 // GCC 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
17 // along with GCC; see the file COPYING.  If not, write to
18 // the Free Software Foundation, 51 Franklin Street, Fifth Floor,
19 // Boston, MA 02110-1301, 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 #include "unwind-cxx.h"
32
33 using namespace __cxxabiv1;
34
35
36 static void
37 __gxx_exception_cleanup (_Unwind_Reason_Code code, _Unwind_Exception *exc)
38 {
39   __cxa_exception *header = __get_exception_header_from_ue (exc);
40
41   // If we haven't been caught by a foreign handler, then this is
42   // some sort of unwind error.  In that case just die immediately.
43   // _Unwind_DeleteException in the HP-UX IA64 libunwind library
44   //  returns _URC_NO_REASON and not _URC_FOREIGN_EXCEPTION_CAUGHT
45   // like the GCC _Unwind_DeleteException function does.
46   if (code != _URC_FOREIGN_EXCEPTION_CAUGHT && code != _URC_NO_REASON)
47     __terminate (header->terminateHandler);
48
49   if (header->exceptionDestructor)
50     header->exceptionDestructor (header + 1);
51
52   __cxa_free_exception (header + 1);
53 }
54
55
56 extern "C" void
57 __cxxabiv1::__cxa_throw (void *obj, std::type_info *tinfo, 
58                          void (*dest) (void *))
59 {
60   __cxa_exception *header = __get_exception_header_from_obj (obj);
61   header->exceptionType = tinfo;
62   header->exceptionDestructor = dest;
63   header->unexpectedHandler = __unexpected_handler;
64   header->terminateHandler = __terminate_handler;
65   __GXX_INIT_EXCEPTION_CLASS(header->unwindHeader.exception_class);
66   header->unwindHeader.exception_cleanup = __gxx_exception_cleanup;
67
68 #ifdef _GLIBCXX_SJLJ_EXCEPTIONS
69   _Unwind_SjLj_RaiseException (&header->unwindHeader);
70 #else
71   _Unwind_RaiseException (&header->unwindHeader);
72 #endif
73
74   // Some sort of unwinding error.  Note that terminate is a handler.
75   __cxa_begin_catch (&header->unwindHeader);
76   std::terminate ();
77 }
78
79 extern "C" void
80 __cxxabiv1::__cxa_rethrow ()
81 {
82   __cxa_eh_globals *globals = __cxa_get_globals ();
83   __cxa_exception *header = globals->caughtExceptions;
84
85   globals->uncaughtExceptions += 1;
86
87   // Watch for luser rethrowing with no active exception.
88   if (header)
89     {
90       // Tell __cxa_end_catch this is a rethrow.
91       if (!__is_gxx_exception_class(header->unwindHeader.exception_class))
92         globals->caughtExceptions = 0;
93       else
94         header->handlerCount = -header->handlerCount;
95
96 #ifdef _GLIBCXX_SJLJ_EXCEPTIONS
97       _Unwind_SjLj_Resume_or_Rethrow (&header->unwindHeader);
98 #else
99 #if defined(_LIBUNWIND_STD_ABI)
100       _Unwind_RaiseException (&header->unwindHeader);
101 #else
102       _Unwind_Resume_or_Rethrow (&header->unwindHeader);
103 #endif
104 #endif
105   
106       // Some sort of unwinding error.  Note that terminate is a handler.
107       __cxa_begin_catch (&header->unwindHeader);
108     }
109   std::terminate ();
110 }