1 /* $NetBSD: t_sem.c,v 1.9 2017/01/16 16:22:22 christos Exp $ */ 2 3 /* 4 * Copyright (c) 2008, 2010 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 /*- 30 * Copyright (c)2004 YAMAMOTO Takashi, 31 * All rights reserved. 32 * 33 * Redistribution and use in source and binary forms, with or without 34 * modification, are permitted provided that the following conditions 35 * are met: 36 * 1. Redistributions of source code must retain the above copyright 37 * notice, this list of conditions and the following disclaimer. 38 * 2. Redistributions in binary form must reproduce the above copyright 39 * notice, this list of conditions and the following disclaimer in the 40 * documentation and/or other materials provided with the distribution. 41 * 42 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 43 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 44 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 45 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 46 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 47 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 48 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 49 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 50 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 51 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 52 * SUCH DAMAGE. 53 */ 54 55 /**************************************************************************** 56 * 57 * Copyright (C) 2000 Jason Evans <jasone@freebsd.org>. 58 * All rights reserved. 59 * 60 * Redistribution and use in source and binary forms, with or without 61 * modification, are permitted provided that the following conditions 62 * are met: 63 * 1. Redistributions of source code must retain the above copyright 64 * notice(s), this list of conditions and the following disclaimer as 65 * the first lines of this file unmodified other than the possible 66 * addition of one or more copyright notices. 67 * 2. Redistributions in binary form must reproduce the above copyright 68 * notice(s), this list of conditions and the following disclaimer in 69 * the documentation and/or other materials provided with the 70 * distribution. 71 * 72 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER(S) ``AS IS'' AND ANY 73 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 74 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 75 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER(S) BE 76 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 77 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 78 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR 79 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, 80 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE 81 * OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, 82 * EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 83 * 84 ****************************************************************************/ 85 86 #include <sys/cdefs.h> 87 __COPYRIGHT("@(#) Copyright (c) 2008, 2010\ 88 The NetBSD Foundation, inc. All rights reserved."); 89 __RCSID("$NetBSD: t_sem.c,v 1.9 2017/01/16 16:22:22 christos Exp $"); 90 91 #include <sys/time.h> 92 #include <errno.h> 93 #include <fcntl.h> 94 #include <pthread.h> 95 #include <semaphore.h> 96 #include <signal.h> 97 #include <stdio.h> 98 #include <stdlib.h> 99 #include <string.h> 100 #include <unistd.h> 101 102 #include <atf-c.h> 103 104 #include "h_common.h" 105 106 #define NTHREADS 10 107 108 #define _LIBC_R_ 109 110 #define SEM_REQUIRE(x) \ 111 ATF_REQUIRE_EQ_MSG(x, 0, "%s", strerror(errno)) 112 113 static sem_t sem; 114 115 ATF_TC(named); 116 ATF_TC_HEAD(named, tc) 117 { 118 atf_tc_set_md_var(tc, "descr", "Checks named semaphores"); 119 } 120 ATF_TC_BODY(named, tc) 121 { 122 sem_t *semp; 123 124 ATF_REQUIRE_MSG(-1 != sysconf(_SC_SEMAPHORES), "%s", strerror(errno)); 125 126 printf("Test begin\n"); 127 128 (void) sem_unlink("/foo"); 129 semp = sem_open("/foo", O_CREAT | O_EXCL, 0644, 0); 130 ATF_REQUIRE_MSG(semp != SEM_FAILED, "%s", strerror(errno)); 131 SEM_REQUIRE(sem_close(semp)); 132 SEM_REQUIRE(sem_unlink("/foo")); 133 134 printf("Test end\n"); 135 } 136 137 ATF_TC(unnamed); 138 ATF_TC_HEAD(unnamed, tc) 139 { 140 atf_tc_set_md_var(tc, "descr", "Checks unnamed semaphores"); 141 } 142 143 static void * 144 entry(void * a_arg) 145 { 146 pthread_t self = pthread_self(); 147 sem_t *semp = (sem_t *) a_arg; 148 149 printf("Thread %p waiting for semaphore...\n", self); 150 sem_wait(semp); 151 printf("Thread %p got semaphore\n", self); 152 153 return NULL; 154 } 155 156 ATF_TC_BODY(unnamed, tc) 157 { 158 sem_t sem_a, sem_b; 159 pthread_t threads[NTHREADS]; 160 unsigned i, j; 161 int val; 162 163 ATF_REQUIRE_MSG(-1 != sysconf(_SC_SEMAPHORES), "%s", strerror(errno)); 164 165 printf("Test begin\n"); 166 167 SEM_REQUIRE(sem_init(&sem_b, 0, 0)); 168 SEM_REQUIRE(sem_getvalue(&sem_b, &val)); 169 ATF_REQUIRE_EQ(0, val); 170 171 SEM_REQUIRE(sem_post(&sem_b)); 172 SEM_REQUIRE(sem_getvalue(&sem_b, &val)); 173 ATF_REQUIRE_EQ(1, val); 174 175 SEM_REQUIRE(sem_wait(&sem_b)); 176 ATF_REQUIRE_EQ(sem_trywait(&sem_b), -1); 177 ATF_REQUIRE_EQ(errno, EAGAIN); 178 SEM_REQUIRE(sem_post(&sem_b)); 179 SEM_REQUIRE(sem_trywait(&sem_b)); 180 SEM_REQUIRE(sem_post(&sem_b)); 181 SEM_REQUIRE(sem_wait(&sem_b)); 182 SEM_REQUIRE(sem_post(&sem_b)); 183 184 SEM_REQUIRE(sem_destroy(&sem_b)); 185 186 SEM_REQUIRE(sem_init(&sem_a, 0, 0)); 187 188 for (j = 0; j < 2; j++) { 189 for (i = 0; i < NTHREADS; i++) { 190 PTHREAD_REQUIRE(pthread_create(&threads[i], NULL, 191 entry, (void *) &sem_a)); 192 } 193 194 for (i = 0; i < NTHREADS; i++) { 195 usleep(10000); 196 printf("main loop %u: posting...\n", j+1); 197 SEM_REQUIRE(sem_post(&sem_a)); 198 } 199 200 for (i = 0; i < NTHREADS; i++) { 201 PTHREAD_REQUIRE(pthread_join(threads[i], NULL)); 202 } 203 } 204 205 SEM_REQUIRE(sem_destroy(&sem_a)); 206 207 printf("Test end\n"); 208 } 209 210 static void 211 sighandler(int signo) 212 { 213 /* printf("signal %d\n", signo); */ 214 215 ATF_REQUIRE_EQ_MSG(signo, SIGALRM, "unexpected signal"); 216 SEM_REQUIRE(sem_post(&sem)); 217 } 218 219 static void 220 alarm_ms(const int ms) 221 { 222 struct itimerval timer; 223 timer.it_interval.tv_sec = 0; 224 timer.it_interval.tv_usec = 0; 225 timer.it_value.tv_sec = 0; 226 timer.it_value.tv_usec = ms * 1000; 227 ATF_REQUIRE(setitimer(ITIMER_REAL, &timer, NULL) == 0); 228 } 229 230 static void * 231 threadfunc(void *arg) 232 { 233 int i, ret; 234 235 printf("Entering loop\n"); 236 for (i = 0; i < 500; ) { 237 if ((i & 1) != 0) { 238 do { 239 ret = sem_wait(&sem); 240 } while (ret == -1 && errno == EINTR); 241 ATF_REQUIRE(ret == 0); 242 } else { 243 ret = sem_trywait(&sem); 244 if (ret == -1) { 245 ATF_REQUIRE(errno == EAGAIN); 246 continue; 247 } 248 } 249 printf("%s: %d\n", __func__, i); 250 alarm_ms(5); 251 i++; 252 } 253 254 return NULL; 255 } 256 257 static void 258 before_start_test(const bool use_pthread) 259 { 260 pthread_t t; 261 262 SEM_REQUIRE(sem_init(&sem, 0, 0)); 263 ATF_REQUIRE(SIG_ERR != signal(SIGALRM, sighandler)); 264 265 alarm_ms(5); 266 267 if (use_pthread) { 268 PTHREAD_REQUIRE(pthread_create(&t, NULL, threadfunc, NULL)); 269 PTHREAD_REQUIRE(pthread_join(t, NULL)); 270 } else { 271 threadfunc(NULL); 272 } 273 } 274 275 ATF_TC(before_start_no_threads); 276 ATF_TC_HEAD(before_start_no_threads, tc) 277 { 278 atf_tc_set_md_var(tc, "descr", "Checks using semaphores without any " 279 "thread running"); 280 atf_tc_set_md_var(tc, "timeout", "40"); 281 } 282 ATF_TC_BODY(before_start_no_threads, tc) 283 { 284 before_start_test(false); 285 } 286 287 ATF_TC(before_start_one_thread); 288 ATF_TC_HEAD(before_start_one_thread, tc) 289 { 290 atf_tc_set_md_var(tc, "descr", "Checks using semaphores before " 291 "starting one thread"); 292 atf_tc_set_md_var(tc, "timeout", "40"); 293 } 294 ATF_TC_BODY(before_start_one_thread, tc) 295 { 296 before_start_test(true); 297 } 298 299 ATF_TP_ADD_TCS(tp) 300 { 301 ATF_TP_ADD_TC(tp, named); 302 ATF_TP_ADD_TC(tp, unnamed); 303 ATF_TP_ADD_TC(tp, before_start_no_threads); 304 ATF_TP_ADD_TC(tp, before_start_one_thread); 305 306 return atf_no_error(); 307 } 308