t_mutex.c revision 1.5 1 /* $NetBSD: t_mutex.c,v 1.5 2011/04/04 14:47:22 martin Exp $ */
2
3 /*
4 * Copyright (c) 2008 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
17 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 * POSSIBILITY OF SUCH DAMAGE.
27 */
28
29 #include <sys/cdefs.h>
30 __COPYRIGHT("@(#) Copyright (c) 2008\
31 The NetBSD Foundation, inc. All rights reserved.");
32 __RCSID("$NetBSD: t_mutex.c,v 1.5 2011/04/04 14:47:22 martin Exp $");
33
34 #include <pthread.h>
35 #include <stdio.h>
36 #include <string.h>
37 #include <unistd.h>
38
39 #include <atf-c.h>
40 #include <atf-c/config.h>
41
42 #include "h_common.h"
43
44 static pthread_mutex_t mutex;
45 static pthread_mutex_t static_mutex = PTHREAD_MUTEX_INITIALIZER;
46 static int global_x;
47
48 static void *
49 mutex1_threadfunc(void *arg)
50 {
51 int *param;
52
53 printf("2: Second thread.\n");
54
55 param = arg;
56 printf("2: Locking mutex\n");
57 pthread_mutex_lock(&mutex);
58 printf("2: Got mutex. *param = %d\n", *param);
59 ATF_REQUIRE_EQ(*param, 20);
60 (*param)++;
61
62 pthread_mutex_unlock(&mutex);
63
64 return param;
65 }
66
67 ATF_TC(mutex1);
68 ATF_TC_HEAD(mutex1, tc)
69 {
70 atf_tc_set_md_var(tc, "descr", "Checks mutexes");
71 }
72 ATF_TC_BODY(mutex1, tc)
73 {
74 int x;
75 pthread_t new;
76 void *joinval;
77
78 printf("1: Mutex-test 1\n");
79
80 PTHREAD_REQUIRE(pthread_mutex_init(&mutex, NULL));
81 x = 1;
82 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
83 PTHREAD_REQUIRE(pthread_create(&new, NULL, mutex1_threadfunc, &x));
84 printf("1: Before changing the value.\n");
85 sleep(2);
86 x = 20;
87 printf("1: Before releasing the mutex.\n");
88 sleep(2);
89 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
90 printf("1: After releasing the mutex.\n");
91 PTHREAD_REQUIRE(pthread_join(new, &joinval));
92
93 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
94 printf("1: Thread joined. X was %d. Return value (int) was %d\n",
95 x, *(int *)joinval);
96 ATF_REQUIRE_EQ(x, 21);
97 ATF_REQUIRE_EQ(*(int *)joinval, 21);
98 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
99 }
100
101 static void *
102 mutex2_threadfunc(void *arg)
103 {
104 long count = *(int *)arg;
105
106 printf("2: Second thread (%p). Count is %ld\n", pthread_self(), count);
107
108 while (count--) {
109 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
110 global_x++;
111 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
112 }
113
114 return (void *)count;
115 }
116
117 ATF_TC(mutex2);
118 ATF_TC_HEAD(mutex2, tc)
119 {
120 atf_tc_set_md_var(tc, "descr", "Checks mutexes");
121 if (strcmp(atf_config_get("atf_arch"), "powerpc") == 0)
122 atf_tc_set_md_var(tc, "timeout", "40");
123 }
124 ATF_TC_BODY(mutex2, tc)
125 {
126 const char *m_arch;
127 int count, count2;
128 pthread_t new;
129 void *joinval;
130
131 printf("1: Mutex-test 2\n");
132
133 m_arch = atf_config_get("atf_arch");
134 if (strcmp(m_arch, "powerpc") == 0) {
135 atf_tc_expect_timeout("PR port-powerpc/44387");
136 }
137
138 PTHREAD_REQUIRE(pthread_mutex_init(&mutex, NULL));
139
140 global_x = 0;
141 count = count2 = 10000000;
142
143 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
144 PTHREAD_REQUIRE(pthread_create(&new, NULL, mutex2_threadfunc, &count2));
145
146 printf("1: Thread %p\n", pthread_self());
147
148 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
149
150 while (count--) {
151 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
152 global_x++;
153 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
154 }
155
156 PTHREAD_REQUIRE(pthread_join(new, &joinval));
157
158 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
159 printf("1: Thread joined. X was %d. Return value (long) was %ld\n",
160 global_x, (long)joinval);
161 ATF_REQUIRE_EQ(global_x, 20000000);
162
163 /* XXX force a timeout in ppc case since an un-triggered race
164 otherwise looks like a "failure" */
165 if (strcmp(m_arch, "powerpc") == 0) {
166 /* We sleep for longer than the timeout to make ATF not
167 complain about unexpected success */
168 sleep(41);
169 }
170 }
171
172 static void *
173 mutex3_threadfunc(void *arg)
174 {
175 long count = *(int *)arg;
176
177 printf("2: Second thread (%p). Count is %ld\n", pthread_self(), count);
178
179 while (count--) {
180 PTHREAD_REQUIRE(pthread_mutex_lock(&static_mutex));
181 global_x++;
182 PTHREAD_REQUIRE(pthread_mutex_unlock(&static_mutex));
183 }
184
185 return (void *)count;
186 }
187
188 ATF_TC(mutex3);
189 ATF_TC_HEAD(mutex3, tc)
190 {
191 atf_tc_set_md_var(tc, "descr", "Checks mutexes using a static "
192 "initializer");
193 if (strcmp(atf_config_get("atf_arch"), "powerpc") == 0)
194 atf_tc_set_md_var(tc, "timeout", "40");
195 }
196 ATF_TC_BODY(mutex3, tc)
197 {
198 const char *m_arch;
199 int count, count2;
200 pthread_t new;
201 void *joinval;
202
203 printf("1: Mutex-test 3\n");
204
205 m_arch = atf_config_get("atf_arch");
206 if (strcmp(m_arch, "powerpc") == 0) {
207 atf_tc_expect_timeout("PR port-powerpc/44387");
208 }
209
210 global_x = 0;
211 count = count2 = 10000000;
212
213 PTHREAD_REQUIRE(pthread_mutex_lock(&static_mutex));
214 PTHREAD_REQUIRE(pthread_create(&new, NULL, mutex3_threadfunc, &count2));
215
216 printf("1: Thread %p\n", pthread_self());
217
218 PTHREAD_REQUIRE(pthread_mutex_unlock(&static_mutex));
219
220 while (count--) {
221 PTHREAD_REQUIRE(pthread_mutex_lock(&static_mutex));
222 global_x++;
223 PTHREAD_REQUIRE(pthread_mutex_unlock(&static_mutex));
224 }
225
226 PTHREAD_REQUIRE(pthread_join(new, &joinval));
227
228 PTHREAD_REQUIRE(pthread_mutex_lock(&static_mutex));
229 printf("1: Thread joined. X was %d. Return value (long) was %ld\n",
230 global_x, (long)joinval);
231 ATF_REQUIRE_EQ(global_x, 20000000);
232
233 /* XXX force a timeout in ppc case since an un-triggered race
234 otherwise looks like a "failure" */
235 if (strcmp(m_arch, "powerpc") == 0) {
236 /* We sleep for longer than the timeout to make ATF not
237 complain about unexpected success */
238 sleep(41);
239 }
240 }
241
242 static void *
243 mutex4_threadfunc(void *arg)
244 {
245 int *param;
246
247 printf("2: Second thread.\n");
248
249 param = arg;
250 printf("2: Locking mutex\n");
251 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
252 printf("2: Got mutex. *param = %d\n", *param);
253 (*param)++;
254
255 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
256
257 return param;
258 }
259
260 ATF_TC(mutex4);
261 ATF_TC_HEAD(mutex4, tc)
262 {
263 atf_tc_set_md_var(tc, "descr", "Checks mutexes");
264 }
265 ATF_TC_BODY(mutex4, tc)
266 {
267 int x;
268 pthread_t new;
269 pthread_mutexattr_t mattr;
270 void *joinval;
271
272 printf("1: Mutex-test 4\n");
273
274 PTHREAD_REQUIRE(pthread_mutexattr_init(&mattr));
275 PTHREAD_REQUIRE(pthread_mutexattr_settype(&mattr, PTHREAD_MUTEX_RECURSIVE));
276
277 PTHREAD_REQUIRE(pthread_mutex_init(&mutex, &mattr));
278
279 PTHREAD_REQUIRE(pthread_mutexattr_destroy(&mattr));
280
281 x = 1;
282 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
283 PTHREAD_REQUIRE(pthread_create(&new, NULL, mutex4_threadfunc, &x));
284
285 printf("1: Before recursively acquiring the mutex.\n");
286 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
287
288 printf("1: Before releasing the mutex once.\n");
289 sleep(2);
290 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
291 printf("1: After releasing the mutex once.\n");
292
293 x = 20;
294
295 printf("1: Before releasing the mutex twice.\n");
296 sleep(2);
297 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
298 printf("1: After releasing the mutex twice.\n");
299
300 PTHREAD_REQUIRE(pthread_join(new, &joinval));
301
302 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex));
303 printf("1: Thread joined. X was %d. Return value (int) was %d\n",
304 x, *(int *)joinval);
305 ATF_REQUIRE_EQ(x, 21);
306 ATF_REQUIRE_EQ(*(int *)joinval, 21);
307 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex));
308 }
309
310 ATF_TP_ADD_TCS(tp)
311 {
312 ATF_TP_ADD_TC(tp, mutex1);
313 ATF_TP_ADD_TC(tp, mutex2);
314 ATF_TP_ADD_TC(tp, mutex3);
315 ATF_TP_ADD_TC(tp, mutex4);
316
317 return atf_no_error();
318 }
319