1321369Sdim/* $NetBSD: t_once.c,v 1.1 2010/07/16 15:42:53 jmmv Exp $ */ 2202878Srdivacky 3353358Sdim/* 4353358Sdim * Copyright (c) 2008 The NetBSD Foundation, Inc. 5353358Sdim * All rights reserved. 6202878Srdivacky * 7202878Srdivacky * Redistribution and use in source and binary forms, with or without 8202878Srdivacky * modification, are permitted provided that the following conditions 9202878Srdivacky * are met: 10321369Sdim * 1. Redistributions of source code must retain the above copyright 11321369Sdim * notice, this list of conditions and the following disclaimer. 12341825Sdim * 2. Redistributions in binary form must reproduce the above copyright 13341825Sdim * notice, this list of conditions and the following disclaimer in the 14202878Srdivacky * documentation and/or other materials provided with the distribution. 15202878Srdivacky * 16202878Srdivacky * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 17344779Sdim * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 18309124Sdim * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 19202878Srdivacky * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 20202878Srdivacky * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 21321369Sdim * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 22202878Srdivacky * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 23210299Sed * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 24210299Sed * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 25210299Sed * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 26210299Sed * POSSIBILITY OF SUCH DAMAGE. 27202878Srdivacky */ 28202878Srdivacky 29202878Srdivacky#include <sys/cdefs.h> 30234353Sdim__COPYRIGHT("@(#) Copyright (c) 2008\ 31234353Sdim The NetBSD Foundation, inc. All rights reserved."); 32249423Sdim__RCSID("$NetBSD: t_once.c,v 1.1 2010/07/16 15:42:53 jmmv Exp $"); 33234353Sdim 34280031Sdim#ifdef __FreeBSD__ 35280031Sdim#include <sys/time.h> /* For itimer*, etc. */ 36280031Sdim#endif 37280031Sdim#include <pthread.h> 38341825Sdim#include <signal.h> 39341825Sdim#include <stdio.h> 40341825Sdim#include <stdlib.h> 41341825Sdim 42341825Sdim#include <atf-c.h> 43341825Sdim 44341825Sdim#include "h_common.h" 45341825Sdim 46341825Sdimstatic pthread_once_t once = PTHREAD_ONCE_INIT; 47341825Sdimstatic pthread_mutex_t mutex = PTHREAD_MUTEX_INITIALIZER; 48341825Sdimstatic int x; 49341825Sdim 50341825Sdim#define NTHREADS 25 51341825Sdim 52341825Sdimstatic void 53341825Sdimofunc(void) 54341825Sdim{ 55341825Sdim printf("Variable x has value %d\n", x); 56341825Sdim x++; 57341825Sdim} 58341825Sdim 59341825SdimATF_TC(once1); 60341825SdimATF_TC_HEAD(once1, tc) 61341825Sdim{ 62341825Sdim atf_tc_set_md_var(tc, "descr", "Checks pthread_once()"); 63341825Sdim} 64341825SdimATF_TC_BODY(once1, tc) 65341825Sdim{ 66341825Sdim 67341825Sdim printf("1: Test 1 of pthread_once()\n"); 68341825Sdim 69341825Sdim PTHREAD_REQUIRE(pthread_once(&once, ofunc)); 70341825Sdim PTHREAD_REQUIRE(pthread_once(&once, ofunc)); 71341825Sdim 72341825Sdim printf("1: X has value %d\n",x ); 73341825Sdim ATF_REQUIRE_EQ(x, 1); 74341825Sdim} 75341825Sdim 76341825Sdimstatic void 77341825Sdimonce2_ofunc(void) 78341825Sdim{ 79341825Sdim x++; 80341825Sdim printf("ofunc: Variable x has value %d\n", x); 81341825Sdim x++; 82341825Sdim} 83341825Sdim 84341825Sdimstatic void * 85341825Sdimonce2_threadfunc(void *arg) 86341825Sdim{ 87344779Sdim int num; 88341825Sdim 89341825Sdim PTHREAD_REQUIRE(pthread_once(&once, once2_ofunc)); 90341825Sdim 91341825Sdim num = *(int *)arg; 92341825Sdim printf("Thread %d sees x with value %d\n", num, x); 93341825Sdim ATF_REQUIRE_EQ(x, 2); 94341825Sdim 95341825Sdim return NULL; 96341825Sdim} 97341825Sdim 98341825SdimATF_TC(once2); 99341825SdimATF_TC_HEAD(once2, tc) 100341825Sdim{ 101341825Sdim atf_tc_set_md_var(tc, "descr", "Checks pthread_once()"); 102341825Sdim} 103341825SdimATF_TC_BODY(once2, tc) 104341825Sdim{ 105341825Sdim pthread_t threads[NTHREADS]; 106341825Sdim int id[NTHREADS]; 107341825Sdim int i; 108341825Sdim 109341825Sdim printf("1: Test 2 of pthread_once()\n"); 110341825Sdim 111341825Sdim for (i=0; i < NTHREADS; i++) { 112341825Sdim id[i] = i; 113341825Sdim PTHREAD_REQUIRE(pthread_create(&threads[i], NULL, once2_threadfunc, &id[i])); 114341825Sdim } 115341825Sdim 116341825Sdim for (i=0; i < NTHREADS; i++) 117341825Sdim PTHREAD_REQUIRE(pthread_join(threads[i], NULL)); 118341825Sdim 119341825Sdim printf("1: X has value %d\n",x ); 120341825Sdim ATF_REQUIRE_EQ(x, 2); 121341825Sdim} 122341825Sdim 123341825Sdimstatic void 124341825Sdimonce3_cleanup(void *m) 125341825Sdim{ 126341825Sdim pthread_mutex_t *mu = m; 127341825Sdim 128341825Sdim PTHREAD_REQUIRE(pthread_mutex_unlock(mu)); 129341825Sdim} 130 131static void 132once3_ofunc(void) 133{ 134 pthread_testcancel(); 135} 136 137static void * 138once3_threadfunc(void *arg) 139{ 140 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex)); 141 pthread_cleanup_push(once3_cleanup, &mutex); 142 PTHREAD_REQUIRE(pthread_once(&once, once3_ofunc)); 143 pthread_cleanup_pop(1); 144 145 return NULL; 146} 147 148static void 149handler(int sig, siginfo_t *info, void *ctx) 150{ 151 atf_tc_fail("Signal handler was called; " 152 "main thread deadlocked in pthread_once()"); 153} 154 155ATF_TC(once3); 156ATF_TC_HEAD(once3, tc) 157{ 158 atf_tc_set_md_var(tc, "descr", "Checks pthread_once()"); 159} 160ATF_TC_BODY(once3, tc) 161{ 162 pthread_t thread; 163 struct sigaction act; 164 struct itimerval it; 165 printf("Test 3 of pthread_once() (test versus cancellation)\n"); 166 167 act.sa_sigaction = handler; 168 sigemptyset(&act.sa_mask); 169 act.sa_flags = SA_SIGINFO; 170 sigaction(SIGALRM, &act, NULL); 171 172 timerclear(&it.it_value); 173 it.it_value.tv_usec = 500000; 174 timerclear(&it.it_interval); 175 setitimer(ITIMER_REAL, &it, NULL); 176 177 PTHREAD_REQUIRE(pthread_mutex_lock(&mutex)); 178 PTHREAD_REQUIRE(pthread_create(&thread, NULL, once3_threadfunc, NULL)); 179 PTHREAD_REQUIRE(pthread_cancel(thread)); 180 PTHREAD_REQUIRE(pthread_mutex_unlock(&mutex)); 181 PTHREAD_REQUIRE(pthread_join(thread, NULL)); 182 183 PTHREAD_REQUIRE(pthread_once(&once, ofunc)); 184 185 /* Cancel timer */ 186 timerclear(&it.it_value); 187 setitimer(ITIMER_REAL, &it, NULL); 188 189 printf("Test succeeded\n"); 190} 191 192ATF_TP_ADD_TCS(tp) 193{ 194 ATF_TP_ADD_TC(tp, once1); 195 ATF_TP_ADD_TC(tp, once2); 196 ATF_TP_ADD_TC(tp, once3); 197 198 return atf_no_error(); 199} 200