1 /* Copyright (C) 1995,1996 Robert de Bath <rdebath@cix.compulink.co.uk>
2 * This file is part of the Linux-8086 C library and is distributed
3 * under the GNU Library General Public License.
7 * Dec 2000 Manuel Novoa III
9 * Made atexit handling conform to standards... i.e. no args.
10 * Removed on_exit since it did not match gnu libc definition.
11 * Combined atexit and __do_exit into one object file.
13 * Feb 2001 Manuel Novoa III
15 * Reworked file after addition of __uClibc_main.
16 * Changed name of __do_exit to atexit_handler.
17 * Changed name of __cleanup to __uClibc_cleanup.
18 * Moved declaration of __uClibc_cleanup to __uClibc_main
19 * where it is initialized with (possibly weak alias)
22 * Jul 2001 Steve Thayer
24 * Added an on_exit implementation (that now matches gnu libc definition.)
25 * Pulled atexit_handler out of the atexit object since it is now required by
26 * on_exit as well. Renamed it to __exit_handler.
27 * Fixed a problem where exit functions stop getting called if one of
29 * As a side effect of these changes, abort() no longer calls the exit
30 * functions (it now matches the gnu libc definition).
32 * August 2002 Erik Andersen
33 * Added locking so atexit and friends can be thread safe
44 #ifdef __UCLIBC_HAS_THREADS__
46 static pthread_mutex_t mylock = PTHREAD_RECURSIVE_MUTEX_INITIALIZER_NP;
47 # define LOCK pthread_mutex_lock(&mylock)
48 # define UNLOCK pthread_mutex_unlock(&mylock);
55 #define __MAX_EXIT __UCLIBC_MAX_ATEXIT
57 typedef void (*aefuncp) (void); /* atexit function pointer */
58 typedef void (*oefuncp) (int, void *); /* on_exit function pointer */
62 } ef_type; /* exit function types */
64 /* this is in the L_exit object */
65 extern void (*__exit_cleanup) (int);
67 /* these are in the L___do_exit object */
68 extern int __exit_count;
69 extern void __exit_handler(int);
70 extern struct exit_function {
71 ef_type type; /* ef_atexit or ef_on_exit */
79 } __exit_function_table[__MAX_EXIT];
83 * register a function to be called at normal program termination
84 * (the registered function takes no arguments)
86 int atexit(aefuncp func)
88 struct exit_function *efp;
91 if (__exit_count >= __MAX_EXIT) {
97 __exit_cleanup = __exit_handler; /* enable cleanup */
98 efp = &__exit_function_table[__exit_count++];
99 efp->type = ef_atexit;
100 efp->funcs.atexit = func;
109 * register a function to be called at normal program termination
110 * the registered function takes two arguments:
111 * status - the exit status that was passed to the exit() function
112 * arg - generic argument
114 int on_exit(oefuncp func, void *arg)
116 struct exit_function *efp;
119 if (__exit_count >= __MAX_EXIT) {
125 __exit_cleanup = __exit_handler; /* enable cleanup */
126 efp = &__exit_function_table[__exit_count++];
127 efp->type = ef_on_exit;
128 efp->funcs.on_exit.func = func;
129 efp->funcs.on_exit.arg = arg;
136 #ifdef L___exit_handler
137 struct exit_function __exit_function_table[__MAX_EXIT];
138 int __exit_count = 0; /* Number of registered exit functions */
141 * Handle the work of executing the registered exit functions
142 * This is called while we are locked, so no additional locking
145 void __exit_handler(int status)
147 struct exit_function *efp;
149 /* In reverse order */
150 for ( ; __exit_count-- ; ) {
151 efp = &__exit_function_table[__exit_count];
154 if (efp->funcs.on_exit.func) {
155 (efp->funcs.on_exit.func) (status, efp->funcs.on_exit.arg);
159 if (efp->funcs.atexit) {
160 (efp->funcs.atexit) ();
169 extern void weak_function _stdio_term(void);
170 void (*__exit_cleanup) (int) = 0;
173 * Normal program termination
177 /* Perform exit-specific cleanup (atexit and on_exit) */
179 if (__exit_cleanup) {
184 /* If we are using stdio, try to shut it down. At the very least,
185 * this will attempt to commit all buffered writes. It may also
186 * unbuffer all writable files, or close them outright.
187 * Check the stdio routines for details. */