Warning: That file was not part of the compilation database. It may have many parsing errors.

1/* Copyright (C) 2002-2019 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, see
17 <http://www.gnu.org/licenses/>. */
18
19#include <errno.h>
20#include <pthread.h>
21#include <stdio.h>
22#include <stdlib.h>
23
24
25static pthread_mutex_t m;
26static pthread_barrier_t b;
27
28
29static void *
30tf (void *arg)
31{
32 int e = pthread_mutex_unlock (&m);
33 if (e == 0)
34 {
35 puts ("child: 1st mutex_unlock succeeded");
36 exit (1);
37 }
38 else if (e != EPERM)
39 {
40 puts ("child: 1st mutex_unlock error != EPERM");
41 exit (1);
42 }
43
44 e = pthread_mutex_trylock (&m);
45 if (e == 0)
46 {
47 puts ("child: 1st trylock suceeded");
48 exit (1);
49 }
50 if (e != EBUSY)
51 {
52 puts ("child: 1st trylock didn't return EBUSY");
53 exit (1);
54 }
55
56 e = pthread_barrier_wait (&b);
57 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
58 {
59 puts ("child: 1st barrier_wait failed");
60 exit (1);
61 }
62
63 e = pthread_barrier_wait (&b);
64 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
65 {
66 puts ("child: 2nd barrier_wait failed");
67 exit (1);
68 }
69
70 e = pthread_mutex_unlock (&m);
71 if (e == 0)
72 {
73 puts ("child: 2nd mutex_unlock succeeded");
74 exit (1);
75 }
76 else if (e != EPERM)
77 {
78 puts ("child: 2nd mutex_unlock error != EPERM");
79 exit (1);
80 }
81
82 if (pthread_mutex_trylock (&m) != 0)
83 {
84 puts ("child: 2nd trylock failed");
85 exit (1);
86 }
87
88 if (pthread_mutex_unlock (&m) != 0)
89 {
90 puts ("child: 3rd mutex_unlock failed");
91 exit (1);
92 }
93
94 return NULL;
95}
96
97
98static int
99do_test (void)
100{
101 pthread_mutexattr_t a;
102 int e;
103
104 if (pthread_mutexattr_init (&a) != 0)
105 {
106 puts ("mutexattr_init failed");
107 return 1;
108 }
109
110 if (pthread_mutexattr_settype (&a, PTHREAD_MUTEX_ERRORCHECK) != 0)
111 {
112 puts ("mutexattr_settype failed");
113 return 1;
114 }
115
116#ifdef ENABLE_PI
117 if (pthread_mutexattr_setprotocol (&a, PTHREAD_PRIO_INHERIT) != 0)
118 {
119 puts ("pthread_mutexattr_setprotocol failed");
120 return 1;
121 }
122#endif
123
124 e = pthread_mutex_init (&m, &a);
125 if (e != 0)
126 {
127#ifdef ENABLE_PI
128 if (e == ENOTSUP)
129 {
130 puts ("PI mutexes unsupported");
131 return 0;
132 }
133#endif
134 puts ("mutex_init failed");
135 return 1;
136 }
137
138 if (pthread_barrier_init (&b, NULL, 2) != 0)
139 {
140 puts ("barrier_init failed");
141 return 1;
142 }
143
144 e = pthread_mutex_unlock (&m);
145 if (e == 0)
146 {
147 puts ("1st mutex_unlock succeeded");
148 return 1;
149 }
150 else if (e != EPERM)
151 {
152 puts ("1st mutex_unlock error != EPERM");
153 return 1;
154 }
155
156 if (pthread_mutex_lock (&m) != 0)
157 {
158 puts ("mutex_lock failed");
159 return 1;
160 }
161
162 e = pthread_mutex_lock (&m);
163 if (e == 0)
164 {
165 puts ("2nd mutex_lock succeeded");
166 return 1;
167 }
168 else if (e != EDEADLK)
169 {
170 puts ("2nd mutex_lock error != EDEADLK");
171 return 1;
172 }
173
174 pthread_t th;
175 if (pthread_create (&th, NULL, tf, NULL) != 0)
176 {
177 puts ("create failed");
178 return 1;
179 }
180
181 e = pthread_barrier_wait (&b);
182 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
183 {
184 puts ("1st barrier_wait failed");
185 return 1;
186 }
187
188 if (pthread_mutex_unlock (&m) != 0)
189 {
190 puts ("2nd mutex_unlock failed");
191 return 1;
192 }
193
194 e = pthread_mutex_unlock (&m);
195 if (e == 0)
196 {
197 puts ("3rd mutex_unlock succeeded");
198 return 1;
199 }
200 else if (e != EPERM)
201 {
202 puts ("3rd mutex_unlock error != EPERM");
203 return 1;
204 }
205
206 e = pthread_barrier_wait (&b);
207 if (e != 0 && e != PTHREAD_BARRIER_SERIAL_THREAD)
208 {
209 puts ("2nd barrier_wait failed");
210 return 1;
211 }
212
213 if (pthread_join (th, NULL) != 0)
214 {
215 puts ("join failed");
216 return 1;
217 }
218
219 if (pthread_mutex_destroy (&m) != 0)
220 {
221 puts ("mutex_destroy failed");
222 return 1;
223 }
224
225 if (pthread_barrier_destroy (&b) != 0)
226 {
227 puts ("barrier_destroy failed");
228 return 1;
229 }
230
231 if (pthread_mutexattr_destroy (&a) != 0)
232 {
233 puts ("mutexattr_destroy failed");
234 return 1;
235 }
236
237 return 0;
238}
239
240#define TEST_FUNCTION do_test ()
241#include "../test-skeleton.c"
242

Warning: That file was not part of the compilation database. It may have many parsing errors.