-// new abi support -*- C++ -*-
-// Copyright (C) 2000
-// Free Software Foundation, Inc.
-// Written by Nathan Sidwell, Codesourcery LLC, <nathan@codesourcery.com>
-//
-// GNU CC is free software; you can redistribute it and/or modify
+// New abi Support -*- C++ -*-
+
+// Copyright (C) 2000, 2001, 2003, 2004 Free Software Foundation, Inc.
+//
+// This file is part of GCC.
+//
+// GCC is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2, or (at your option)
// any later version.
-// GNU CC is distributed in the hope that it will be useful,
+// GCC is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
// You should have received a copy of the GNU General Public License
-// along with GNU CC; see the file COPYING. If not, write to
+// along with GCC; see the file COPYING. If not, write to
// the Free Software Foundation, 59 Temple Place - Suite 330,
// Boston, MA 02111-1307, USA.
// invalidate any other reasons why the executable file might be covered by
// the GNU General Public License.
-#if defined(__GXX_ABI_VERSION) && __GXX_ABI_VERSION >= 100
+// Written by Nathan Sidwell, Codesourcery LLC, <nathan@codesourcery.com>
+
#include <cxxabi.h>
#include <new>
#include <exception>
-
-// Exception handling hook, to mark current exception as not caught --
-// generally because we're about to rethrow it after some cleanup.
-extern "C" void __uncatch_exception (void);
+#include <exception_defines.h>
+#include "unwind-cxx.h"
namespace __cxxabiv1
{
+ namespace
+ {
+ struct uncatch_exception
+ {
+ uncatch_exception();
+ ~uncatch_exception () { __cxa_begin_catch (&p->unwindHeader); }
+
+ __cxa_exception* p;
-/* allocate and construct array */
-extern "C" void *
-__cxa_vec_new (size_t element_count,
- size_t element_size,
- size_t padding_size,
- void (*constructor) (void *),
- void (*destructor) (void *))
-{
- return __cxa_vec_new2 (element_count, element_size, padding_size,
- constructor, destructor,
- &operator new[], &operator delete []);
-}
+ private:
+ uncatch_exception&
+ operator=(const uncatch_exception&);
-extern "C" void *
-__cxa_vec_new2 (size_t element_count,
- size_t element_size,
- size_t padding_size,
- void (*constructor) (void *),
- void (*destructor) (void *),
- void *(*alloc) (size_t),
- void (*dealloc) (void *))
-{
- size_t size = element_count * element_size + padding_size;
- char *base = static_cast <char *> (alloc (size));
-
- if (padding_size)
- {
- base += padding_size;
- reinterpret_cast <size_t *> (base)[-1] = element_count;
- }
- try
- {
- __cxa_vec_ctor (base, element_count, element_size,
- constructor, destructor);
- }
- catch (...)
- {
- __uncatch_exception ();
- dealloc (base - padding_size);
- throw;
- }
- return base;
-}
+ uncatch_exception(const uncatch_exception&);
+ };
-extern "C" void *
-__cxa_vec_new3 (size_t element_count,
- size_t element_size,
- size_t padding_size,
- void (*constructor) (void *),
- void (*destructor) (void *),
- void *(*alloc) (size_t),
- void (*dealloc) (void *, size_t))
-{
- size_t size = element_count * element_size + padding_size;
- char *base = static_cast <char *> (alloc (size));
-
- if (padding_size)
- {
- base += padding_size;
- reinterpret_cast <size_t *> (base)[-1] = element_count;
- }
- try
- {
- __cxa_vec_ctor (base, element_count, element_size,
- constructor, destructor);
- }
- catch (...)
+ uncatch_exception::uncatch_exception() : p(0)
{
- __uncatch_exception ();
- dealloc (base - padding_size, size);
- throw;
- }
- return base;
-}
+ __cxa_eh_globals *globals = __cxa_get_globals_fast ();
-/* construct array */
-extern "C" void
-__cxa_vec_ctor (void *array_address,
- size_t element_count,
- size_t element_size,
- void (*constructor) (void *),
- void (*destructor) (void *))
-{
- size_t ix = 0;
- char *ptr = static_cast <char *> (array_address);
-
- try
- {
- if (constructor)
- for (; ix != element_count; ix++, ptr += element_size)
- constructor (ptr);
+ p = globals->caughtExceptions;
+ p->handlerCount -= 1;
+ globals->caughtExceptions = p->nextException;
+ globals->uncaughtExceptions += 1;
}
- catch (...)
- {
- __uncatch_exception ();
- __cxa_vec_dtor (array_address, ix, element_size, destructor);
- throw;
- }
-}
+ }
+
+ // Allocate and construct array.
+ extern "C" void *
+ __cxa_vec_new(std::size_t element_count,
+ std::size_t element_size,
+ std::size_t padding_size,
+ void (*constructor) (void *),
+ void (*destructor) (void *))
+ {
+ return __cxa_vec_new2(element_count, element_size, padding_size,
+ constructor, destructor,
+ &operator new[], &operator delete []);
+ }
-/* construct an array by copying */
+ extern "C" void *
+ __cxa_vec_new2(std::size_t element_count,
+ std::size_t element_size,
+ std::size_t padding_size,
+ void (*constructor) (void *),
+ void (*destructor) (void *),
+ void *(*alloc) (std::size_t),
+ void (*dealloc) (void *))
+ {
+ std::size_t size = element_count * element_size + padding_size;
+ char *base = static_cast <char *> (alloc (size));
+ if (!base)
+ return base;
-extern "C" void
-__cxa_vec_cctor (void *dest_array,
- void *src_array,
- size_t element_count,
- size_t element_size,
- void (*constructor) (void *, void *),
+ if (padding_size)
+ {
+ base += padding_size;
+ reinterpret_cast <std::size_t *> (base)[-1] = element_count;
+#ifdef _GLIBCXX_ELTSIZE_IN_COOKIE
+ reinterpret_cast <std::size_t *> (base)[-2] = element_size;
+#endif
+ }
+ try
+ {
+ __cxa_vec_ctor(base, element_count, element_size,
+ constructor, destructor);
+ }
+ catch (...)
+ {
+ {
+ uncatch_exception ue;
+ dealloc(base - padding_size);
+ }
+ __throw_exception_again;
+ }
+ return base;
+ }
+
+ extern "C" void *
+ __cxa_vec_new3(std::size_t element_count,
+ std::size_t element_size,
+ std::size_t padding_size,
+ void (*constructor) (void *),
+ void (*destructor) (void *),
+ void *(*alloc) (std::size_t),
+ void (*dealloc) (void *, std::size_t))
+ {
+ std::size_t size = element_count * element_size + padding_size;
+ char *base = static_cast<char *>(alloc (size));
+ if (!base)
+ return base;
+
+ if (padding_size)
+ {
+ base += padding_size;
+ reinterpret_cast<std::size_t *>(base)[-1] = element_count;
+#ifdef _GLIBCXX_ELTSIZE_IN_COOKIE
+ reinterpret_cast <std::size_t *> (base)[-2] = element_size;
+#endif
+ }
+ try
+ {
+ __cxa_vec_ctor(base, element_count, element_size,
+ constructor, destructor);
+ }
+ catch (...)
+ {
+ {
+ uncatch_exception ue;
+ dealloc(base - padding_size, size);
+ }
+ __throw_exception_again;
+ }
+ return base;
+ }
+
+ // Construct array.
+ extern "C" void
+ __cxa_vec_ctor(void *array_address,
+ std::size_t element_count,
+ std::size_t element_size,
+ void (*constructor) (void *),
void (*destructor) (void *))
-{
- size_t ix = 0;
- char *dest_ptr = static_cast <char *> (dest_array);
- char *src_ptr = static_cast <char *> (src_array);
+ {
+ std::size_t ix = 0;
+ char *ptr = static_cast<char *>(array_address);
+
+ try
+ {
+ if (constructor)
+ for (; ix != element_count; ix++, ptr += element_size)
+ constructor(ptr);
+ }
+ catch (...)
+ {
+ {
+ uncatch_exception ue;
+ __cxa_vec_cleanup(array_address, ix, element_size, destructor);
+ }
+ __throw_exception_again;
+ }
+ }
+
+ // Construct an array by copying.
+ extern "C" void
+ __cxa_vec_cctor(void *dest_array,
+ void *src_array,
+ std::size_t element_count,
+ std::size_t element_size,
+ void (*constructor) (void *, void *),
+ void (*destructor) (void *))
+ {
+ std::size_t ix = 0;
+ char *dest_ptr = static_cast<char *>(dest_array);
+ char *src_ptr = static_cast<char *>(src_array);
+
+ try
+ {
+ if (constructor)
+ for (; ix != element_count;
+ ix++, src_ptr += element_size, dest_ptr += element_size)
+ constructor(dest_ptr, src_ptr);
+ }
+ catch (...)
+ {
+ {
+ uncatch_exception ue;
+ __cxa_vec_cleanup(dest_array, ix, element_size, destructor);
+ }
+ __throw_exception_again;
+ }
+ }
+
+ // Destruct array.
+ extern "C" void
+ __cxa_vec_dtor(void *array_address,
+ std::size_t element_count,
+ std::size_t element_size,
+ void (*destructor) (void *))
+ {
+ if (destructor)
+ {
+ char *ptr = static_cast<char *>(array_address);
+ std::size_t ix = element_count;
- try
- {
- if (constructor)
- for (; ix != element_count;
- ix++, src_ptr += element_size, dest_ptr += element_size)
- constructor (dest_ptr, src_ptr);
- }
- catch (...)
- {
- __uncatch_exception ();
- __cxa_vec_dtor (dest_array, ix, element_size, destructor);
- throw;
- }
-}
+ ptr += element_count * element_size;
-/* destruct array */
-extern "C" void
-__cxa_vec_dtor (void *array_address,
- size_t element_count,
- size_t element_size,
- void (*destructor) (void *))
-{
- if (destructor)
- {
- char *ptr = static_cast <char *> (array_address);
- size_t ix = element_count;
- bool unwinding = std::uncaught_exception ();
-
- ptr += element_count * element_size;
-
- try
- {
- while (ix--)
- {
- ptr -= element_size;
- destructor (ptr);
- }
- }
- catch (...)
- {
- if (unwinding)
- // [except.ctor]/3 If a destructor called during stack unwinding
- // exits with an exception, terminate is called.
- std::terminate ();
- __uncatch_exception ();
- __cxa_vec_dtor (array_address, ix, element_size, destructor);
- throw;
- }
- }
-}
+ try
+ {
+ while (ix--)
+ {
+ ptr -= element_size;
+ destructor(ptr);
+ }
+ }
+ catch (...)
+ {
+ {
+ uncatch_exception ue;
+ __cxa_vec_cleanup(array_address, ix, element_size, destructor);
+ }
+ __throw_exception_again;
+ }
+ }
+ }
-/* destruct and release array */
-extern "C" void
-__cxa_vec_delete (void *array_address,
- size_t element_size,
- size_t padding_size,
- void (*destructor) (void *))
-{
- __cxa_vec_delete2 (array_address, element_size, padding_size,
- destructor,
- &operator delete []);
-}
+ // Destruct array as a result of throwing an exception.
+ // [except.ctor]/3 If a destructor called during stack unwinding
+ // exits with an exception, terminate is called.
+ extern "C" void
+ __cxa_vec_cleanup(void *array_address,
+ std::size_t element_count,
+ std::size_t element_size,
+ void (*destructor) (void *))
+ {
+ if (destructor)
+ {
+ char *ptr = static_cast <char *> (array_address);
+ std::size_t ix = element_count;
-extern "C" void
-__cxa_vec_delete2 (void *array_address,
- size_t element_size,
- size_t padding_size,
- void (*destructor) (void *),
- void (*dealloc) (void *))
-{
- char *base = static_cast <char *> (array_address);
-
- if (padding_size)
- {
- size_t element_count = reinterpret_cast <size_t *> (base)[-1];
- base -= padding_size;
- try
- {
- __cxa_vec_dtor (array_address, element_count, element_size,
- destructor);
- }
- catch (...)
- {
- __uncatch_exception ();
- dealloc (base);
- throw;
- }
- }
- dealloc (base);
-}
+ ptr += element_count * element_size;
-extern "C" void
-__cxa_vec_delete3 (void *array_address,
- size_t element_size,
- size_t padding_size,
- void (*destructor) (void *),
- void (*dealloc) (void *, size_t))
-{
- char *base = static_cast <char *> (array_address);
- size_t size = 0;
+ try
+ {
+ while (ix--)
+ {
+ ptr -= element_size;
+ destructor(ptr);
+ }
+ }
+ catch (...)
+ {
+ std::terminate();
+ }
+ }
+ }
+
+ // Destruct and release array.
+ extern "C" void
+ __cxa_vec_delete(void *array_address,
+ std::size_t element_size,
+ std::size_t padding_size,
+ void (*destructor) (void *))
+ {
+ __cxa_vec_delete2(array_address, element_size, padding_size,
+ destructor,
+ &operator delete []);
+ }
+
+ extern "C" void
+ __cxa_vec_delete2(void *array_address,
+ std::size_t element_size,
+ std::size_t padding_size,
+ void (*destructor) (void *),
+ void (*dealloc) (void *))
+ {
+ if (!array_address)
+ return;
+
+ char* base = static_cast<char *>(array_address);
- if (padding_size)
- {
- size_t element_count = reinterpret_cast <size_t *> (base)[-1];
- base -= padding_size;
- size = element_count * element_size + padding_size;
- try
- {
- __cxa_vec_dtor (array_address, element_count, element_size,
- destructor);
- }
- catch (...)
- {
- __uncatch_exception ();
- dealloc (base, size);
- throw;
- }
- }
- dealloc (base, size);
-}
+ if (padding_size)
+ {
+ std::size_t element_count = reinterpret_cast<std::size_t *>(base)[-1];
+ base -= padding_size;
+ try
+ {
+ __cxa_vec_dtor(array_address, element_count, element_size,
+ destructor);
+ }
+ catch (...)
+ {
+ {
+ uncatch_exception ue;
+ dealloc(base);
+ }
+ __throw_exception_again;
+ }
+ }
+ dealloc(base);
+ }
+
+ extern "C" void
+ __cxa_vec_delete3(void *array_address,
+ std::size_t element_size,
+ std::size_t padding_size,
+ void (*destructor) (void *),
+ void (*dealloc) (void *, std::size_t))
+ {
+ if (!array_address)
+ return;
+
+ char* base = static_cast <char *> (array_address);
+ std::size_t size = 0;
+ if (padding_size)
+ {
+ std::size_t element_count = reinterpret_cast<std::size_t *> (base)[-1];
+ base -= padding_size;
+ size = element_count * element_size + padding_size;
+ try
+ {
+ __cxa_vec_dtor(array_address, element_count, element_size,
+ destructor);
+ }
+ catch (...)
+ {
+ {
+ uncatch_exception ue;
+ dealloc(base, size);
+ }
+ __throw_exception_again;
+ }
+ }
+ dealloc(base, size);
+ }
} // namespace __cxxabiv1
-#endif // defined(__GXX_ABI_VERSION) && __GXX_ABI_VERSION >= 100