diff options
Diffstat (limited to 'src/cxa.c')
| -rw-r--r-- | src/cxa.c | 198 |
1 files changed, 0 insertions, 198 deletions
diff --git a/src/cxa.c b/src/cxa.c deleted file mode 100644 index 998170e..0000000 --- a/src/cxa.c +++ /dev/null @@ -1,198 +0,0 @@ -#include "stlport_prefix.h" - -#if defined(__unix) && defined(__GNUC__) - -#ifdef __FreeBSD__ -# include <osreldate.h> -#endif - -#if (defined(__FreeBSD__) && (__FreeBSD_version < 503001)) || defined(__sun) || defined (__hpux) -/* Note: __cxa_finalize and __cxa_atexit present in libc in FreeBSD 5.3 */ - -#include <stdlib.h> -#include <stdio.h> -#include <pthread.h> - -/* __asm__ (".symver " "__cxa_finalize" "," "__cxa_finalize" "@" "STLPORT_5_0_0"); */ -/* __asm__ (".symver " "__cxa_finalize" "," "__cxa_finalize" "@@" "STLPORT_5_0_0"); */ - -/* Not atomic! */ -/* But we can use static mutexes here: I hope that performance issue isn't very - significant on unloading (for only few calls, ~10) - ptr */ - -/* -#define atomic_compare_and_exchange_bool_acq(mem, newval, oldval) \ - ({ __typeof (mem) __gmemp = (mem); \ - __typeof (*mem) __gnewval = (newval); \ - \ - *__gmemp == (oldval) ? (*__gmemp = __gnewval, 0) : 1; }) -*/ - -enum { - ef_free, /* `ef_free' MUST be zero! */ - ef_us, - ef_on, - ef_at, - ef_cxa -}; - -struct exit_function -{ - /* `flavour' should be of type of the `enum' above but since we need - this element in an atomic operation we have to use `long int'. */ - long int flavor; - union { - void (*at)(void); - struct { - void (*fn)(int status, void *arg); - void *arg; - } on; - struct { - void (*fn)(void *arg, int status); - void *arg; - void *dso_handle; - } cxa; - } func; -}; - -struct exit_function_list -{ - struct exit_function_list *next; - size_t idx; - struct exit_function fns[32]; -}; - -struct exit_function *__new_exitfn (void); - -/* Register a function to be called by exit or when a shared library - is unloaded. This function is only called from code generated by - the C++ compiler. */ -int __cxa_atexit(void (*func)(void *), void *arg, void *d) -{ - struct exit_function *new = __new_exitfn (); - - if ( new == NULL ) - return -1; - - new->flavor = ef_cxa; - new->func.cxa.fn = (void (*) (void *, int)) func; - new->func.cxa.arg = arg; - new->func.cxa.dso_handle = d; - return 0; -} - - -/* We change global data, so we need locking. */ -#ifdef __linux__ -static pthread_mutex_t lock = PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP; -#endif -/* #ifdef __FreeBSD__ */ -#if 0 -static pthread_mutex_t lock = - { PTHREAD_MUTEX_RECURSIVE /* PTHREAD_MUTEX_DEFAULT */, PTHREAD_PRIO_NONE, {NULL,NULL}, - NULL, { NULL }, /* MUTEX_FLAGS_PRIVATE */ 0x1, 0, 0, 0, {NULL, NULL}, - { 0, 0, 0, 0 } }; -#endif -#ifdef __sun -static pthread_mutex_t lock = - {{0, 0, 0, PTHREAD_MUTEX_RECURSIVE, _MUTEX_MAGIC}, {{{0}}}, 0}; -#endif -#ifdef __hpux -static pthread_mutex_t lock = PTHREAD_MUTEX_RECURSIVE_INITIALIZER_NP; -# ifdef __ia64 -void *__dso_handle = (void *) &__dso_handle; -# endif -#endif - - -static struct exit_function_list initial; -struct exit_function_list *__exit_funcs = &initial; - -struct exit_function *__new_exitfn(void) -{ - struct exit_function_list *l; - size_t i = 0; - -#ifndef __FreeBSD__ - pthread_mutex_lock( &lock ); -#endif - - for (l = __exit_funcs; l != NULL; l = l->next) { - for (i = 0; i < l->idx; ++i) - if (l->fns[i].flavor == ef_free) - break; - if ( i < l->idx ) - break; - - if (l->idx < sizeof (l->fns) / sizeof (l->fns[0])) { - i = l->idx++; - break; - } - } - - if (l == NULL) { - l = (struct exit_function_list *)malloc( sizeof(struct exit_function_list) ); - if (l != NULL) { - l->next = __exit_funcs; - __exit_funcs = l; - - l->idx = 1; - i = 0; - } - } - - /* Mark entry as used, but we don't know the flavor now. */ - if ( l != NULL ) - l->fns[i].flavor = ef_us; - -#ifndef __FreeBSD__ - pthread_mutex_unlock( &lock ); -#endif - - return l == NULL ? NULL : &l->fns[i]; -} - -/* If D is non-NULL, call all functions registered with `__cxa_atexit' - with the same dso handle. Otherwise, if D is NULL, call all of the - registered handlers. */ - -/* - * Note, that original __cxa_finalize don't use lock, but use __exit_funcs - * i.e. global data. - */ -void __cxa_finalize(void *d) -{ - struct exit_function_list *funcs; - -#ifndef __FreeBSD__ - pthread_mutex_lock( &lock ); -#endif - - for (funcs = __exit_funcs; funcs; funcs = funcs->next) { - struct exit_function *f; - - for (f = &funcs->fns[funcs->idx - 1]; f >= &funcs->fns[0]; --f) { - if ( (d == NULL || d == f->func.cxa.dso_handle) && (f->flavor == ef_cxa) ) { - f->flavor = ef_free; - (*f->func.cxa.fn) (f->func.cxa.arg, 0); - } - } - } - - /* Remove the registered fork handlers. We do not have to - unregister anything if the program is going to terminate anyway. */ -#ifdef UNREGISTER_ATFORK - if (d != NULL) - UNREGISTER_ATFORK (d); -#endif -#ifndef __FreeBSD__ - pthread_mutex_unlock( &lock ); -#endif -} - -/* __asm__ (".symver " "__cxa_finalize" "," "__cxa_finalize" "@@" "STLPORT_5_0_0"); */ -/* void __cxa_finalize(void *d) __attribute__ ((weak)); */ - -#endif /* OS name */ -#endif /* __unix */ - |