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 <stdlib.h>
21 #include <time.h>
22
23
24 #define N 100
25
26 static pthread_once_t once = PTHREAD_ONCE_INIT;
27
28 static int global;
29
30 static void
once_handler(void)31 once_handler (void)
32 {
33 struct timespec ts;
34
35 ++global;
36
37 ts.tv_sec = 2;
38 ts.tv_nsec = 0;
39 nanosleep (&ts, NULL);
40 }
41
42
43 static void *
tf(void * arg)44 tf (void *arg)
45 {
46 pthread_once (&once, once_handler);
47
48 if (global != 1)
49 {
50 printf ("thread %ld: global == %d\n", (long int) arg, global);
51 exit (1);
52 }
53
54 return NULL;
55 }
56
57
58 static int
do_test(void)59 do_test (void)
60 {
61 pthread_attr_t at;
62 pthread_t th[N];
63 int cnt;
64
65 if (pthread_attr_init (&at) != 0)
66 {
67 puts ("attr_init failed");
68 return 1;
69 }
70
71 if (pthread_attr_setstacksize (&at, 1 * 1024 * 1024) != 0)
72 {
73 puts ("attr_setstacksize failed");
74 return 1;
75 }
76
77 for (cnt = 0; cnt < N; ++cnt)
78 if (pthread_create (&th[cnt], &at, tf, (void *) (long int) cnt) != 0)
79 {
80 printf ("creation of thread %d failed\n", cnt);
81 return 1;
82 }
83
84 if (pthread_attr_destroy (&at) != 0)
85 {
86 puts ("attr_destroy failed");
87 return 1;
88 }
89
90 for (cnt = 0; cnt < N; ++cnt)
91 if (pthread_join (th[cnt], NULL) != 0)
92 {
93 printf ("join of thread %d failed\n", cnt);
94 return 1;
95 }
96
97 return 0;
98 }
99
100 #define TEST_FUNCTION do_test ()
101 #include "../test-skeleton.c"
102