Add support for testing adaptive mutexes.
[kopensolaris-gnu/glibc.git] / nptl / tst-mutex7.c
1 /* Copyright (C) 2002, 2004 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 #ifndef INIT
26 # define INIT PTHREAD_MUTEX_INITIALIZER
27 #endif
28
29
30 static pthread_mutex_t lock = INIT;
31
32
33 #define ROUNDS 1000
34 #define N 100
35
36
37 static void *
38 tf (void *arg)
39 {
40   int nr = (long int) arg;
41   int cnt;
42   struct timespec ts = { .tv_sec = 0, .tv_nsec = 11000 };
43
44   for (cnt = 0; cnt < ROUNDS; ++cnt)
45     {
46       if (pthread_mutex_lock (&lock) != 0)
47         {
48           printf ("thread %d: failed to get the lock\n", nr);
49           return (void *) 1l;
50         }
51
52       if (pthread_mutex_unlock (&lock) != 0)
53         {
54           printf ("thread %d: failed to release the lock\n", nr);
55           return (void *) 1l;
56         }
57
58       nanosleep (&ts, NULL);
59     }
60
61   return NULL;
62 }
63
64
65 static int
66 do_test (void)
67 {
68   pthread_attr_t at;
69   pthread_t th[N];
70   int cnt;
71
72   if (pthread_attr_init (&at) != 0)
73     {
74       puts ("attr_init failed");
75       return 1;
76     }
77
78   if (pthread_attr_setstacksize (&at, 1 * 1024 * 1024) != 0)
79     {
80       puts ("attr_setstacksize failed");
81       return 1;
82     }
83
84   if (pthread_mutex_lock (&lock) != 0)
85     {
86       puts ("locking in parent failed");
87       return 1;
88     }
89
90   for (cnt = 0; cnt < N; ++cnt)
91     if (pthread_create (&th[cnt], &at, tf, (void *) (long int) cnt) != 0)
92       {
93         printf ("creating thread %d failed\n", cnt);
94         return 1;
95       }
96
97   if (pthread_attr_destroy (&at) != 0)
98     {
99       puts ("attr_destroy failed");
100       return 1;
101     }
102
103   if (pthread_mutex_unlock (&lock) != 0)
104     {
105       puts ("unlocking in parent failed");
106       return 1;
107     }
108
109   for (cnt = 0; cnt < N; ++cnt)
110     if (pthread_join (th[cnt], NULL) != 0)
111       {
112         printf ("joining thread %d failed\n", cnt);
113         return 1;
114       }
115
116   return 0;
117 }
118
119 #define TIMEOUT 60
120 #define TEST_FUNCTION do_test ()
121 #include "../test-skeleton.c"