]>
Commit | Line | Data |
---|---|---|
610e67ed | 1 | /* Copyright (C) 1999,2001,2002,2005,2006,2009 Free Software Foundation, Inc. |
c41041bc UD |
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 | |
41bdb6e2 AJ |
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. | |
c41041bc UD |
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 | |
41bdb6e2 | 12 | Lesser General Public License for more details. |
c41041bc | 13 | |
41bdb6e2 AJ |
14 | You should have received a copy of the GNU Lesser General Public |
15 | License along with the GNU C Library; if not, write to the Free | |
16 | Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA | |
17 | 02111-1307 USA. */ | |
c41041bc | 18 | |
b6caa3a6 | 19 | #include <assert.h> |
a334319f | 20 | #include <stdlib.h> |
b6caa3a6 UD |
21 | |
22 | #include <bits/libc-lock.h> | |
c41041bc | 23 | #include "exit.h" |
a3c88553 UD |
24 | #include <atomic.h> |
25 | #include <sysdep.h> | |
c41041bc | 26 | |
6b87a564 UD |
27 | #undef __cxa_atexit |
28 | ||
610e67ed | 29 | |
c41041bc | 30 | int |
610e67ed UD |
31 | attribute_hidden |
32 | __internal_atexit (void (*func) (void *), void *arg, void *d, | |
33 | struct exit_function_list **listp) | |
c41041bc | 34 | { |
610e67ed | 35 | struct exit_function *new = __new_exitfn (listp); |
c41041bc UD |
36 | |
37 | if (new == NULL) | |
38 | return -1; | |
39 | ||
a3c88553 UD |
40 | #ifdef PTR_MANGLE |
41 | PTR_MANGLE (func); | |
42 | #endif | |
5ef50d00 | 43 | new->func.cxa.fn = (void (*) (void *, int)) func; |
c41041bc UD |
44 | new->func.cxa.arg = arg; |
45 | new->func.cxa.dso_handle = d; | |
a3c88553 UD |
46 | atomic_write_barrier (); |
47 | new->flavor = ef_cxa; | |
c41041bc UD |
48 | return 0; |
49 | } | |
610e67ed UD |
50 | |
51 | ||
52 | /* Register a function to be called by exit or when a shared library | |
53 | is unloaded. This function is only called from code generated by | |
54 | the C++ compiler. */ | |
55 | int | |
56 | __cxa_atexit (void (*func) (void *), void *arg, void *d) | |
57 | { | |
58 | return __internal_atexit (func, arg, d, &__exit_funcs); | |
59 | } | |
6b87a564 | 60 | INTDEF(__cxa_atexit) |
c08bc50a UD |
61 | |
62 | ||
63 | /* We change global data, so we need locking. */ | |
64 | __libc_lock_define_initialized (static, lock) | |
65 | ||
66 | ||
67 | static struct exit_function_list initial; | |
68 | struct exit_function_list *__exit_funcs = &initial; | |
a92b1166 | 69 | uint64_t __new_exitfn_called; |
c08bc50a UD |
70 | |
71 | struct exit_function * | |
610e67ed | 72 | __new_exitfn (struct exit_function_list **listp) |
c08bc50a | 73 | { |
b6caa3a6 | 74 | struct exit_function_list *p = NULL; |
c08bc50a | 75 | struct exit_function_list *l; |
b6caa3a6 | 76 | struct exit_function *r = NULL; |
c08bc50a UD |
77 | size_t i = 0; |
78 | ||
79 | __libc_lock_lock (lock); | |
80 | ||
610e67ed | 81 | for (l = *listp; l != NULL; p = l, l = l->next) |
c08bc50a | 82 | { |
b6caa3a6 UD |
83 | for (i = l->idx; i > 0; --i) |
84 | if (l->fns[i - 1].flavor != ef_free) | |
c08bc50a | 85 | break; |
b6caa3a6 UD |
86 | |
87 | if (i > 0) | |
c08bc50a UD |
88 | break; |
89 | ||
b6caa3a6 UD |
90 | /* This block is completely unused. */ |
91 | l->idx = 0; | |
c08bc50a UD |
92 | } |
93 | ||
b6caa3a6 | 94 | if (l == NULL || i == sizeof (l->fns) / sizeof (l->fns[0])) |
c08bc50a | 95 | { |
b6caa3a6 UD |
96 | /* The last entry in a block is used. Use the first entry in |
97 | the previous block if it exists. Otherwise create a new one. */ | |
98 | if (p == NULL) | |
c08bc50a | 99 | { |
b6caa3a6 UD |
100 | assert (l != NULL); |
101 | p = (struct exit_function_list *) | |
102 | calloc (1, sizeof (struct exit_function_list)); | |
103 | if (p != NULL) | |
104 | { | |
610e67ed UD |
105 | p->next = *listp; |
106 | *listp = p; | |
b6caa3a6 UD |
107 | } |
108 | } | |
c08bc50a | 109 | |
b6caa3a6 UD |
110 | if (p != NULL) |
111 | { | |
112 | r = &p->fns[0]; | |
113 | p->idx = 1; | |
c08bc50a UD |
114 | } |
115 | } | |
b6caa3a6 UD |
116 | else |
117 | { | |
118 | /* There is more room in the block. */ | |
119 | r = &l->fns[i]; | |
120 | l->idx = i + 1; | |
121 | } | |
c08bc50a UD |
122 | |
123 | /* Mark entry as used, but we don't know the flavor now. */ | |
b6caa3a6 | 124 | if (r != NULL) |
a92b1166 UD |
125 | { |
126 | r->flavor = ef_us; | |
127 | ++__new_exitfn_called; | |
128 | } | |
c08bc50a UD |
129 | |
130 | __libc_lock_unlock (lock); | |
131 | ||
b6caa3a6 | 132 | return r; |
c08bc50a | 133 | } |