]>
Commit | Line | Data |
---|---|---|
b6caa3a6 | 1 | /* Copyright (C) 1999, 2001, 2002, 2005 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 | ||
c41041bc UD |
29 | /* Register a function to be called by exit or when a shared library |
30 | is unloaded. This function is only called from code generated by | |
31 | the C++ compiler. */ | |
32 | int | |
33 | __cxa_atexit (void (*func) (void *), void *arg, void *d) | |
34 | { | |
35 | struct exit_function *new = __new_exitfn (); | |
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 | } | |
6b87a564 | 50 | INTDEF(__cxa_atexit) |
c08bc50a UD |
51 | |
52 | ||
53 | /* We change global data, so we need locking. */ | |
54 | __libc_lock_define_initialized (static, lock) | |
55 | ||
56 | ||
57 | static struct exit_function_list initial; | |
58 | struct exit_function_list *__exit_funcs = &initial; | |
59 | ||
60 | struct exit_function * | |
61 | __new_exitfn (void) | |
62 | { | |
b6caa3a6 | 63 | struct exit_function_list *p = NULL; |
c08bc50a | 64 | struct exit_function_list *l; |
b6caa3a6 | 65 | struct exit_function *r = NULL; |
c08bc50a UD |
66 | size_t i = 0; |
67 | ||
68 | __libc_lock_lock (lock); | |
69 | ||
b6caa3a6 | 70 | for (l = __exit_funcs; l != NULL; p = l, l = l->next) |
c08bc50a | 71 | { |
b6caa3a6 UD |
72 | for (i = l->idx; i > 0; --i) |
73 | if (l->fns[i - 1].flavor != ef_free) | |
c08bc50a | 74 | break; |
b6caa3a6 UD |
75 | |
76 | if (i > 0) | |
c08bc50a UD |
77 | break; |
78 | ||
b6caa3a6 UD |
79 | /* This block is completely unused. */ |
80 | l->idx = 0; | |
c08bc50a UD |
81 | } |
82 | ||
b6caa3a6 | 83 | if (l == NULL || i == sizeof (l->fns) / sizeof (l->fns[0])) |
c08bc50a | 84 | { |
b6caa3a6 UD |
85 | /* The last entry in a block is used. Use the first entry in |
86 | the previous block if it exists. Otherwise create a new one. */ | |
87 | if (p == NULL) | |
c08bc50a | 88 | { |
b6caa3a6 UD |
89 | assert (l != NULL); |
90 | p = (struct exit_function_list *) | |
91 | calloc (1, sizeof (struct exit_function_list)); | |
92 | if (p != NULL) | |
93 | { | |
94 | p->next = __exit_funcs; | |
95 | __exit_funcs = p; | |
96 | } | |
97 | } | |
c08bc50a | 98 | |
b6caa3a6 UD |
99 | if (p != NULL) |
100 | { | |
101 | r = &p->fns[0]; | |
102 | p->idx = 1; | |
c08bc50a UD |
103 | } |
104 | } | |
b6caa3a6 UD |
105 | else |
106 | { | |
107 | /* There is more room in the block. */ | |
108 | r = &l->fns[i]; | |
109 | l->idx = i + 1; | |
110 | } | |
c08bc50a UD |
111 | |
112 | /* Mark entry as used, but we don't know the flavor now. */ | |
b6caa3a6 UD |
113 | if (r != NULL) |
114 | r->flavor = ef_us; | |
c08bc50a UD |
115 | |
116 | __libc_lock_unlock (lock); | |
117 | ||
b6caa3a6 | 118 | return r; |
c08bc50a | 119 | } |