1/* Copyright (C) 1999-2017 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
8
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
13
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, see
16 <http://www.gnu.org/licenses/>. */
17
18#include <assert.h>
19#include <stdlib.h>
20#include <atomic.h>
21#include "exit.h"
22#include <fork.h>
23#include <sysdep.h>
24#include <stdint.h>
25
26/* If D is non-NULL, call all functions registered with `__cxa_atexit'
27 with the same dso handle. Otherwise, if D is NULL, call all of the
28 registered handlers. */
29void
30__cxa_finalize (void *d)
31{
32 struct exit_function_list *funcs;
33
34 restart:
35 for (funcs = __exit_funcs; funcs; funcs = funcs->next)
36 {
37 struct exit_function *f;
38
39 for (f = &funcs->fns[funcs->idx - 1]; f >= &funcs->fns[0]; --f)
40 {
41 void (*cxafn) (void *arg, int status);
42 void *cxaarg;
43
44 if ((d == NULL || d == f->func.cxa.dso_handle)
45 /* We don't want to run this cleanup more than once. */
46 && (cxafn = f->func.cxa.fn,
47 cxaarg = f->func.cxa.arg,
48 ! catomic_compare_and_exchange_bool_acq (&f->flavor, ef_free,
49 ef_cxa)))
50 {
51 uint64_t check = __new_exitfn_called;
52
53#ifdef PTR_DEMANGLE
54 PTR_DEMANGLE (cxafn);
55#endif
56 cxafn (cxaarg, 0);
57
58 /* It is possible that that last exit function registered
59 more exit functions. Start the loop over. */
60 if (__glibc_unlikely (check != __new_exitfn_called))
61 goto restart;
62 }
63 }
64 }
65
66 /* Also remove the quick_exit handlers, but do not call them. */
67 for (funcs = __quick_exit_funcs; funcs; funcs = funcs->next)
68 {
69 struct exit_function *f;
70
71 for (f = &funcs->fns[funcs->idx - 1]; f >= &funcs->fns[0]; --f)
72 if (d == NULL || d == f->func.cxa.dso_handle)
73 f->flavor = ef_free;
74 }
75
76 /* Remove the registered fork handlers. We do not have to
77 unregister anything if the program is going to terminate anyway. */
78#ifdef UNREGISTER_ATFORK
79 if (d != NULL)
80 UNREGISTER_ATFORK (d);
81#endif
82}
83