1 /* Copyright (C) 2002-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 <pthread.h>
19 #include <stdio.h>
20 #include <string.h>
21
22
23 static int result;
24
25
26 static void
destr(void * arg)27 destr (void *arg)
28 {
29 if (arg != (void *) &result)
30 result = 2;
31 else
32 result = 0;
33 }
34
35
36 static void *
tf(void * arg)37 tf (void *arg)
38 {
39 pthread_key_t key = (pthread_key_t) (long int) arg;
40 int err;
41
42 /* Use an arbirary but valid pointer to avoid GCC warnings. */
43 err = pthread_setspecific (key, &result);
44 if (err != 0)
45 result = 3;
46
47 return NULL;
48 }
49
50
51 static int
do_test(void)52 do_test (void)
53 {
54 pthread_key_t key;
55 pthread_t th;
56 int err;
57
58 err = pthread_key_create (&key, destr);
59 if (err != 0)
60 {
61 printf ("key_create failed: %s\n", strerror (err));
62 return 1;
63 }
64
65 result = 1;
66
67 err = pthread_create (&th, NULL, tf, (void *) (long int) key);
68 if (err != 0)
69 {
70 printf ("create failed: %s\n", strerror (err));
71 return 1;
72 }
73
74 /* Wait for the thread to terminate. */
75 err = pthread_join (th, NULL);
76 if (err != 0)
77 {
78 printf ("join failed: %s\n", strerror (err));
79 return 1;
80 }
81
82 if (result == 1)
83 puts ("destructor not called");
84 else if (result == 2)
85 puts ("destructor got passed a wrong value");
86 else if (result == 3)
87 puts ("setspecific in child failed");
88 else if (result != 0)
89 puts ("result != 0");
90
91 return result;
92 }
93
94
95 #define TEST_FUNCTION do_test ()
96 #include "../test-skeleton.c"
97