fix stale locks left behind when pthread_create fails
[musl] / src / thread / pthread_key_create.c
1 #include "pthread_impl.h"
2
3 const size_t __pthread_tsd_size = sizeof(void *) * PTHREAD_KEYS_MAX;
4 void *__pthread_tsd_main[PTHREAD_KEYS_MAX] = { 0 };
5
6 static void (*keys[PTHREAD_KEYS_MAX])(void *);
7
8 static void nodtor(void *dummy)
9 {
10 }
11
12 int pthread_key_create(pthread_key_t *k, void (*dtor)(void *))
13 {
14         unsigned i = (uintptr_t)&k / 16 % PTHREAD_KEYS_MAX;
15         unsigned j = i;
16
17         __pthread_self_init();
18         if (!dtor) dtor = nodtor;
19         do {
20                 if (!a_cas_p(keys+j, 0, dtor)) {
21                         *k = j;
22                         return 0;
23                 }
24         } while ((j=(j+1)%PTHREAD_KEYS_MAX) != i);
25         return EAGAIN;
26 }
27
28 int pthread_key_delete(pthread_key_t k)
29 {
30         keys[k] = 0;
31         return 0;
32 }
33
34 void __pthread_tsd_run_dtors()
35 {
36         pthread_t self = __pthread_self();
37         int i, j, not_finished = self->tsd_used;
38         for (j=0; not_finished && j<PTHREAD_DESTRUCTOR_ITERATIONS; j++) {
39                 not_finished = 0;
40                 for (i=0; i<PTHREAD_KEYS_MAX; i++) {
41                         if (self->tsd[i] && keys[i]) {
42                                 void *tmp = self->tsd[i];
43                                 self->tsd[i] = 0;
44                                 keys[i](tmp);
45                                 not_finished = 1;
46                         }
47                 }
48         }
49 }