1/* Test barriers.
2 Copyright (C) 2000-2024 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
14
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <https://www.gnu.org/licenses/>. */
18
19#define _GNU_SOURCE
20
21#include <pthread.h>
22#include <stdio.h>
23#include <error.h>
24#include <assert.h>
25#include <errno.h>
26
27#define THREADS 500
28#define WAITS 3
29
30void *
31dowait (void *arg)
32{
33 pthread_barrier_t *barrier = arg;
34 int ret;
35
36 ret = pthread_barrier_wait (barrier: barrier);
37 printf (format: "%d ", pthread_self ());
38 return (void *) ret;
39}
40
41int
42main (int argc, char **argv)
43{
44 pthread_barrierattr_t attr;
45 pthread_barrier_t barrier;
46
47 int i, j;
48 error_t err;
49 pthread_t tid[THREADS];
50
51 int havesyncs;
52
53 err = pthread_barrierattr_init (attr: &attr);
54 if (err)
55 error (status: 1, errnum: err, format: "pthread_barrierattr_init");
56
57 err = pthread_barrierattr_getpshared (attr: &attr, pshared: &i);
58 if (err)
59 error (status: 1, errnum: err, format: "pthread_barrierattr_getpshared");
60 assert (i == PTHREAD_PROCESS_PRIVATE || i == PTHREAD_PROCESS_SHARED);
61
62 err = pthread_barrierattr_setpshared (attr: &attr, PTHREAD_PROCESS_PRIVATE);
63 if (err)
64 error (status: 1, errnum: err, format: "pthread_barrierattr_setpshared");
65
66 err = pthread_barrier_init (barrier: &barrier, attr: &attr, THREADS + 1);
67 if (err)
68 error (status: 1, errnum: err, format: "pthread_barrier_init");
69
70 for (j = 0; j < WAITS; j++)
71 {
72
73 for (i = 0; i < THREADS; i++)
74 {
75 err = pthread_create (newthread: &tid[i], attr: 0, start_routine: dowait, arg: &barrier);
76 if (err)
77 error (status: 1, errnum: err, format: "pthread_create (%d)", i);
78 }
79
80 printf (format: "Manager will now call pthread_barrier_wait.\n");
81
82 havesyncs
83 = pthread_barrier_wait (barrier: &barrier) == PTHREAD_BARRIER_SERIAL_THREAD
84 ? 1 : 0;
85
86 for (i = THREADS - 1; i >= 0; i--)
87 {
88 void *ret;
89 err = pthread_join (th: tid[i], thread_return: &ret);
90 if (err)
91 error (status: 1, errnum: err, format: "pthread_join");
92
93 switch ((int) ret)
94 {
95 case 0:
96 break;
97
98 case PTHREAD_BARRIER_SERIAL_THREAD:
99 havesyncs++;
100 break;
101
102 default:
103 assert (!"Unknown value returned from pthread_barrier_wait.");
104 break;
105 }
106 }
107
108 printf (format: "\n");
109
110 assert (havesyncs == 1);
111 }
112
113 return 0;
114}
115

source code of glibc/htl/tests/test-6.c