Initial revision
[kopensolaris-gnu/glibc.git] / nptl / tst-mutex7.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 <pthread.h>
21 #include <stdio.h>
22 #include <time.h>
23
24
25 static pthread_mutex_t lock = PTHREAD_MUTEX_INITIALIZER;
26
27
28 #define ROUNDS 1000
29 #define N 100
30
31
32 static void *
33 tf (void *arg)
34 {
35   int nr = (long int) arg;
36   int cnt;
37   struct timespec ts = { .tv_sec = 0, .tv_nsec = 11000 };
38
39   for (cnt = 0; cnt < ROUNDS; ++cnt)
40     {
41       if (pthread_mutex_lock (&lock) != 0)
42         {
43           printf ("thread %d: failed to get the lock\n", nr);
44           return (void *) 1l;
45         }
46
47       if (pthread_mutex_unlock (&lock) != 0)
48         {
49           printf ("thread %d: failed to release the lock\n", nr);
50           return (void *) 1l;
51         }
52
53       nanosleep (&ts, NULL);
54     }
55
56   return NULL;
57 }
58
59
60 static int
61 do_test (void)
62 {
63   pthread_t th[N];
64   int cnt;
65
66   if (pthread_mutex_lock (&lock) != 0)
67     {
68       puts ("locking in parent failed");
69       return 1;
70     }
71
72   for (cnt = 0; cnt < N; ++cnt)
73     if (pthread_create (&th[cnt], NULL, tf, (void *) (long int) cnt) != 0)
74       {
75         printf ("creating thread %d failed\n", cnt);
76         return 1;
77       }
78
79   if (pthread_mutex_unlock (&lock) != 0)
80     {
81       puts ("unlocking in parent failed");
82       return 1;
83     }
84
85   for (cnt = 0; cnt < N; ++cnt)
86     if (pthread_join (th[cnt], NULL) != 0)
87       {
88         printf ("joining thread %d failed\n", cnt);
89         return 1;
90       }
91
92   return 0;
93 }
94
95 #define TIMEOUT 60
96 #define TEST_FUNCTION do_test ()
97 #include "../test-skeleton.c"