1 /* Copyright (C) 2002-2023 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/>. */
24 #include <support/xunistd.h>
26 static int do_test (void);
28 #define TEST_FUNCTION do_test ()
29 #include "../test-skeleton.c"
35 #ifdef PTHREAD_KEYS_MAX
36 max
= PTHREAD_KEYS_MAX
;
38 max
= _POSIX_THREAD_KEYS_MAX
;
40 pthread_key_t
*keys
= alloca (max
* sizeof (pthread_key_t
));
43 for (i
= 0; i
< max
; ++i
)
44 if (pthread_key_create (&keys
[i
], NULL
) != 0)
46 write_message ("key_create failed\n");
51 printf ("created key %d\n", i
);
53 if (pthread_setspecific (keys
[i
], (const void *) (i
+ 100l)) != 0)
55 xwrite (2, "setspecific failed\n", 19);
60 for (i
= 0; i
< max
; ++i
)
62 if (pthread_getspecific (keys
[i
]) != (void *) (i
+ 100l))
64 xwrite (2, "getspecific failed\n", 19);
68 if (pthread_key_delete (keys
[i
]) != 0)
70 xwrite (2, "key_delete failed\n", 18);
75 /* Now it must be once again possible to allocate keys. */
76 if (pthread_key_create (&keys
[0], NULL
) != 0)
78 xwrite (2, "2nd key_create failed\n", 22);
82 if (pthread_key_delete (keys
[0]) != 0)
84 xwrite (2, "2nd key_delete failed\n", 22);