1 /* Copyright (C) 2003-2022 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 <https://www.gnu.org/licenses/>. */
17
18 #include <limits.h>
19 #include <pthread.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <unistd.h>
23
24
25 static pthread_key_t key;
26
27
28 static int rounds;
29
30
31 static void
destr(void * arg)32 destr (void *arg)
33 {
34 ++rounds;
35
36 /* Use an arbirary but valid pointer to avoid GCC warnings. */
37 if (pthread_setspecific (key, (void *) &rounds) != 0)
38 {
39 puts ("destr: setspecific failed");
40 exit (1);
41 }
42 }
43
44
45 static void *
tf(void * arg)46 tf (void *arg)
47 {
48 /* Use an arbirary but valid pointer to avoid GCC warnings. */
49 if (pthread_setspecific (key, (void *) &rounds) != 0)
50 {
51 puts ("tf: setspecific failed");
52 exit (1);
53 }
54
55 return NULL;
56 }
57
58
59 /* This test check non-standard behavior. The standard does not
60 require that the implementation has to stop calling TSD destructors
61 when they are set over and over again. But NPTL does. */
62 static int
do_test(void)63 do_test (void)
64 {
65 /* Allocate two keys, both with destructors. */
66 if (pthread_key_create (&key, destr) != 0)
67 {
68 puts ("key_create failed");
69 return 1;
70 }
71
72 pthread_t th;
73 if (pthread_create (&th, NULL, tf, NULL) != 0)
74 {
75 puts ("create failed");
76 return 1;
77 }
78
79 if (pthread_join (th, NULL) != 0)
80 {
81 puts ("join failed");
82 return 1;
83 }
84
85 if (rounds < PTHREAD_DESTRUCTOR_ITERATIONS)
86 {
87 printf ("rounds == %d, PTHREAD_DESTRUCTOR_ITERATIONS = %d\n",
88 rounds, PTHREAD_DESTRUCTOR_ITERATIONS);
89 return 1;
90 }
91
92 if (pthread_getspecific (key) != NULL)
93 {
94 puts ("key data != NULL");
95 return 1;
96 }
97
98 return 0;
99 }
100
101
102 #define TEST_FUNCTION do_test ()
103 #include "../test-skeleton.c"
104