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 #ifdef PTHREAD_KEYS_MAX
26 const int max = PTHREAD_KEYS_MAX;
27 #else
28 const int max = _POSIX_THREAD_KEYS_MAX;
29 #endif
30 static pthread_key_t *keys;
31
32
33 static void *
tf1(void * arg)34 tf1 (void *arg)
35 {
36 int i;
37 for (i = 0; i < max; ++i)
38 if (pthread_setspecific (keys[i], (void *) (long int) (i + 1)) != 0)
39 {
40 puts ("setspecific failed");
41 exit (1);
42 }
43
44 return NULL;
45 }
46
47
48 static void *
tf2(void * arg)49 tf2 (void *arg)
50 {
51 int i;
52 for (i = 0; i < max; ++i)
53 if (pthread_getspecific (keys[i]) != NULL)
54 {
55 printf ("getspecific for key %d not NULL\n", i);
56 exit (1);
57 }
58
59 return NULL;
60 }
61
62
63 static int
do_test(void)64 do_test (void)
65 {
66 keys = alloca (max * sizeof (pthread_key_t));
67
68 int i;
69 for (i = 0; i < max; ++i)
70 if (pthread_key_create (&keys[i], NULL) != 0)
71 {
72 puts ("key_create failed");
73 exit (1);
74 }
75
76 pthread_attr_t a;
77
78 if (pthread_attr_init (&a) != 0)
79 {
80 puts ("attr_init failed");
81 exit (1);
82 }
83
84 if (pthread_attr_setstacksize (&a, 1 * 1024 * 1024) != 0)
85 {
86 puts ("attr_setstacksize failed");
87 return 1;
88 }
89
90 for (i = 0; i < 10; ++i)
91 {
92 int j;
93 #define N 2
94 pthread_t th[N];
95 for (j = 0; j < N; ++j)
96 if (pthread_create (&th[j], NULL, tf1, NULL) != 0)
97 {
98 puts ("1st create failed");
99 exit (1);
100 }
101
102 for (j = 0; j < N; ++j)
103 if (pthread_join (th[j], NULL) != 0)
104 {
105 puts ("1st join failed");
106 exit (1);
107 }
108
109 for (j = 0; j < N; ++j)
110 if (pthread_create (&th[j], NULL, tf2, NULL) != 0)
111 {
112 puts ("2nd create failed");
113 exit (1);
114 }
115
116 for (j = 0; j < N; ++j)
117 if (pthread_join (th[j], NULL) != 0)
118 {
119 puts ("2nd join failed");
120 exit (1);
121 }
122 }
123
124 if (pthread_attr_destroy (&a) != 0)
125 {
126 puts ("attr_destroy failed");
127 exit (1);
128 }
129
130 return 0;
131 }
132
133
134 #define TEST_FUNCTION do_test ()
135 #include "../test-skeleton.c"
136