1 /* Copyright (C) 2003 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
3 Contributed by Ulrich Drepper <drepper@redhat.com>, 2003.
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
29 static pthread_once_t once
= PTHREAD_ONCE_INIT
;
31 static pthread_cond_t cond
= PTHREAD_COND_INITIALIZER
;
32 static pthread_mutex_t mut
= PTHREAD_MUTEX_INITIALIZER
;
34 static pthread_barrier_t bar
;
41 if (pthread_mutex_lock (&mut
) != 0)
43 puts ("once_handler1: mutex_lock failed");
47 int r
= pthread_barrier_wait (&bar
);
48 if (r
!= 0 && r
!= PTHREAD_BARRIER_SERIAL_THREAD
)
50 puts ("once_handler1: barrier_wait failed");
54 pthread_cond_wait (&cond
, &mut
);
56 /* We should never get here. */
70 pthread_once (&once
, once_handler1
);
72 /* We should never get here. */
73 puts ("pthread_once in tf returned");
81 int r
= pthread_barrier_wait (&bar
);
82 if (r
!= 0 && r
!= PTHREAD_BARRIER_SERIAL_THREAD
)
84 puts ("once_handler2: barrier_wait failed");
88 pthread_once (&once
, once_handler2
);
99 if (pthread_barrier_init (&bar
, NULL
, 2) != 0)
101 puts ("barrier_init failed");
105 if (pthread_create (&th
[0], NULL
, tf1
, NULL
) != 0)
107 puts ("first create failed");
111 int r
= pthread_barrier_wait (&bar
);
112 if (r
!= 0 && r
!= PTHREAD_BARRIER_SERIAL_THREAD
)
114 puts ("first barrier_wait failed");
118 if (pthread_mutex_lock (&mut
) != 0)
120 puts ("mutex_lock failed");
123 /* We unlock the mutex so that we catch the case where the pthread_cond_wait
124 call incorrectly resumes and tries to get the mutex. */
125 if (pthread_mutex_unlock (&mut
) != 0)
127 puts ("mutex_unlock failed");
131 if (pthread_create (&th
[1], NULL
, tf2
, NULL
) != 0)
133 puts ("second create failed");
137 r
= pthread_barrier_wait (&bar
);
138 if (r
!= 0 && r
!= PTHREAD_BARRIER_SERIAL_THREAD
)
140 puts ("second barrier_wait failed");
144 /* Give the second thread a chance to reach the pthread_once call. */
147 /* Cancel the thread. */
148 if (pthread_cancel (th
[0]) != 0)
150 puts ("cancel failed");
155 pthread_join (th
[0], &result
);
156 if (result
!= PTHREAD_CANCELED
)
158 puts ("first join didn't return PTHREAD_CANCELED");
162 puts ("joined first thread");
164 pthread_join (th
[1], &result
);
167 puts ("second join didn't return PTHREAD_CANCELED");
173 puts ("global still 0");
180 #define TEST_FUNCTION do_test ()
182 #include "../test-skeleton.c"