s390: Improve static-pie configure tests
[glibc.git] / nptl / tst-tsd4.c
blobad9ef0d94e4662d1261279e6163bf329bd5d2151
1 /* Copyright (C) 2003-2024 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
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.
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.
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/>. */
18 #include <limits.h>
19 #include <pthread.h>
20 #include <stdio.h>
21 #include <stdlib.h>
22 #include <unistd.h>
25 static pthread_key_t key;
28 static int rounds;
31 static void
32 destr (void *arg)
34 ++rounds;
36 /* Use an arbitrary but valid pointer to avoid GCC warnings. */
37 if (pthread_setspecific (key, (void *) &rounds) != 0)
39 puts ("destr: setspecific failed");
40 exit (1);
45 static void *
46 tf (void *arg)
48 /* Use an arbitrary but valid pointer to avoid GCC warnings. */
49 if (pthread_setspecific (key, (void *) &rounds) != 0)
51 puts ("tf: setspecific failed");
52 exit (1);
55 return NULL;
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
63 do_test (void)
65 /* Allocate two keys, both with destructors. */
66 if (pthread_key_create (&key, destr) != 0)
68 puts ("key_create failed");
69 return 1;
72 pthread_t th;
73 if (pthread_create (&th, NULL, tf, NULL) != 0)
75 puts ("create failed");
76 return 1;
79 if (pthread_join (th, NULL) != 0)
81 puts ("join failed");
82 return 1;
85 if (rounds < PTHREAD_DESTRUCTOR_ITERATIONS)
87 printf ("rounds == %d, PTHREAD_DESTRUCTOR_ITERATIONS = %d\n",
88 rounds, PTHREAD_DESTRUCTOR_ITERATIONS);
89 return 1;
92 if (pthread_getspecific (key) != NULL)
94 puts ("key data != NULL");
95 return 1;
98 return 0;
102 #define TEST_FUNCTION do_test ()
103 #include "../test-skeleton.c"