Initial revision
[kopensolaris-gnu/glibc.git] / nptl / tst-cond2.c
1 /* Copyright (C) 2002 Free Software Foundation, Inc.
2    This file is part of the GNU C Library.
3    Contributed by Ulrich Drepper <drepper@redhat.com>, 2002.
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, write to the Free
17    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
18    02111-1307 USA.  */
19
20 #include <error.h>
21 #include <pthread.h>
22 #include <stdio.h>
23 #include <stdlib.h>
24
25
26 static pthread_mutex_t mut = PTHREAD_MUTEX_INITIALIZER;
27 static pthread_cond_t cond = PTHREAD_COND_INITIALIZER;
28
29
30 static void *
31 tf (void *a)
32 {
33   int i = (long int) a;
34   int err;
35
36   printf ("child %d: wait\n", i);
37
38   err = pthread_cond_wait (&cond, &mut);
39   if (err != 0)
40     error (EXIT_FAILURE, err, "child %d: failed to wait", i);
41
42   printf ("child %d: woken up\n", i);
43
44   err = pthread_mutex_unlock (&mut);
45   if (err != 0)
46     error (EXIT_FAILURE, err, "child %d: unlock failed", i);
47
48   printf ("child %d: done\n", i);
49
50   return NULL;
51 }
52
53
54 #define N 10
55
56
57 static int
58 do_test (void)
59 {
60   pthread_t th[N];
61   int i;
62   int err;
63
64   printf ("&cond = %p\n&mut = %p\n", &cond, &mut);
65
66   puts ("first lock");
67
68   err = pthread_mutex_lock (&mut);
69   if (err != 0)
70     error (EXIT_FAILURE, err, "initial locking failed");
71
72   for (i = 0; i < N; ++i)
73     {
74       printf ("create thread %d\n", i);
75
76       err = pthread_create (&th[i], NULL, tf, (void *) (long int) i);
77       if (err != 0)
78         error (EXIT_FAILURE, err, "cannot create thread %d", i);
79
80       printf ("wait for child %d\n", i);
81
82       /* Lock and thereby wait for the child to start up and get the
83          conditional variable.  */
84       pthread_mutex_lock (&mut);
85     }
86
87   puts ("final unlock");
88
89   /* Unlock in preparation of the broadcast.  */
90   err = pthread_mutex_unlock (&mut);
91   if (err != 0)
92     error (EXIT_FAILURE, err, "parent: unlock failed");
93
94   puts ("broadcast");
95
96   /* Wake up all threads.  */
97   err = pthread_cond_broadcast (&cond);
98   if (err != 0)
99     error (EXIT_FAILURE, err, "parent: broadcast failed");
100
101   /* Join all threads.  */
102   for (i = 0; i < N; ++i)
103     {
104       printf ("join thread %d\n", i);
105
106       err = pthread_join (th[i], NULL);
107       if (err != 0)
108         error (EXIT_FAILURE, err, "join of child %d failed", i);
109     }
110
111   puts ("done");
112
113   return 0;
114 }
115
116
117 #define TEST_FUNCTION do_test ()
118 #include "../test-skeleton.c"