1 /* Copyright (C) 2002, 2003, 2004 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@redhat.com>, 2002.
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.
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.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, write to the Free
17 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
34 size_t ps = sysconf (_SC_PAGESIZE);
35 char tmpfname[] = "/tmp/tst-barrier2.XXXXXX";
40 pthread_barrierattr_t a;
47 fd = mkstemp (tmpfname);
50 printf ("cannot open temporary file: %m\n");
54 /* Make sure it is always removed. */
57 /* Create one page of data. */
58 memset (data, '\0', ps);
60 /* Write the data to the file. */
61 if (write (fd, data, ps) != (ssize_t) ps)
67 mem = mmap (NULL, ps, PROT_READ | PROT_WRITE, MAP_SHARED, fd, 0);
68 if (mem == MAP_FAILED)
70 printf ("mmap failed: %m\n");
74 b = (pthread_barrier_t *) (((uintptr_t) mem + __alignof (pthread_barrier_t))
75 & ~(__alignof (pthread_barrier_t) - 1));
77 if (pthread_barrierattr_init (&a) != 0)
79 puts ("barrierattr_init failed");
83 if (pthread_barrierattr_getpshared (&a, &p) != 0)
85 puts ("1st barrierattr_getpshared failed");
89 if (p != PTHREAD_PROCESS_PRIVATE)
91 puts ("default pshared value wrong");
95 if (pthread_barrierattr_setpshared (&a, PTHREAD_PROCESS_SHARED) != 0)
97 puts ("barrierattr_setpshared failed");
101 if (pthread_barrierattr_getpshared (&a, &p) != 0)
103 puts ("2nd barrierattr_getpshared failed");
107 if (p != PTHREAD_PROCESS_SHARED)
109 puts ("pshared value after setpshared call wrong");
113 if (pthread_barrier_init (b, &a, 2) != 0)
115 puts ("barrier_init failed");
119 if (pthread_barrierattr_destroy (&a) != 0)
121 puts ("barrierattr_destroy failed");
125 puts ("going to fork now");
129 puts ("fork failed");
133 /* Just to be sure we don't hang forever. */
137 for (cnt = 0; cnt < N; ++cnt)
141 e = pthread_barrier_wait (b);
142 if (e == PTHREAD_BARRIER_SERIAL_THREAD)
146 printf ("%s: barrier_wait returned value %d != 0 and PTHREAD_BARRIER_SERIAL_THREAD\n",
147 pid == 0 ? "child" : "parent", e);
154 printf ("%s: was %d times the serial thread\n",
155 pid == 0 ? "child" : "parent", serials);
158 /* The child. Pass the number of times we had the serializing
159 thread back to the parent. */
162 if (waitpid (pid, &status, 0) != pid)
164 puts ("waitpid failed");
168 if (!WIFEXITED (status))
170 puts ("child exited abnormally");
174 if (WEXITSTATUS (status) + serials != N)
176 printf ("total number of serials is %d, expected %d\n",
177 WEXITSTATUS (status) + serials, N);
184 #define TEST_FUNCTION do_test ()
185 #include "../test-skeleton.c"