1/*-
2 * Copyright (c) 2009-2010 The FreeBSD Foundation
3 * All rights reserved.
4 *
5 * This software was developed by Pawel Jakub Dawidek under sponsorship from
6 * the FreeBSD Foundation.
7 *
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
10 * are met:
11 * 1. Redistributions of source code must retain the above copyright
12 *    notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 *    notice, this list of conditions and the following disclaimer in the
15 *    documentation and/or other materials provided with the distribution.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHORS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30#ifndef	_SYNCH_H_
31#define	_SYNCH_H_
32
33#include <errno.h>
34#include <pthread.h>
35#ifdef HAVE_PTHREAD_NP_H
36#include <pthread_np.h>
37#endif
38#include <stdbool.h>
39#include <time.h>
40
41#include "pjdlog.h"
42
43#ifndef	PJDLOG_ASSERT
44#include <assert.h>
45#define	PJDLOG_ASSERT(...)	assert(__VA_ARGS__)
46#endif
47
48static __inline void
49mtx_init(pthread_mutex_t *lock)
50{
51	int error;
52
53	error = pthread_mutex_init(lock, NULL);
54	PJDLOG_ASSERT(error == 0);
55}
56static __inline void
57mtx_destroy(pthread_mutex_t *lock)
58{
59	int error;
60
61	error = pthread_mutex_destroy(lock);
62	PJDLOG_ASSERT(error == 0);
63}
64static __inline void
65mtx_lock(pthread_mutex_t *lock)
66{
67	int error;
68
69	error = pthread_mutex_lock(lock);
70	PJDLOG_ASSERT(error == 0);
71}
72static __inline bool
73mtx_trylock(pthread_mutex_t *lock)
74{
75	int error;
76
77	error = pthread_mutex_trylock(lock);
78	PJDLOG_ASSERT(error == 0 || error == EBUSY);
79	return (error == 0);
80}
81static __inline void
82mtx_unlock(pthread_mutex_t *lock)
83{
84	int error;
85
86	error = pthread_mutex_unlock(lock);
87	PJDLOG_ASSERT(error == 0);
88}
89static __inline bool
90mtx_owned(pthread_mutex_t *lock)
91{
92
93	return (pthread_mutex_isowned_np(lock) != 0);
94}
95
96static __inline void
97rw_init(pthread_rwlock_t *lock)
98{
99	int error;
100
101	error = pthread_rwlock_init(lock, NULL);
102	PJDLOG_ASSERT(error == 0);
103}
104static __inline void
105rw_destroy(pthread_rwlock_t *lock)
106{
107	int error;
108
109	error = pthread_rwlock_destroy(lock);
110	PJDLOG_ASSERT(error == 0);
111}
112static __inline void
113rw_rlock(pthread_rwlock_t *lock)
114{
115	int error;
116
117	error = pthread_rwlock_rdlock(lock);
118	PJDLOG_ASSERT(error == 0);
119}
120static __inline void
121rw_wlock(pthread_rwlock_t *lock)
122{
123	int error;
124
125	error = pthread_rwlock_wrlock(lock);
126	PJDLOG_ASSERT(error == 0);
127}
128static __inline void
129rw_unlock(pthread_rwlock_t *lock)
130{
131	int error;
132
133	error = pthread_rwlock_unlock(lock);
134	PJDLOG_ASSERT(error == 0);
135}
136
137static __inline void
138cv_init(pthread_cond_t *cv)
139{
140	pthread_condattr_t attr;
141	int error;
142
143	error = pthread_condattr_init(&attr);
144	PJDLOG_ASSERT(error == 0);
145#ifdef HAVE_PTHREAD_CONDATTR_SETCLOCK
146	error = pthread_condattr_setclock(&attr, CLOCK_MONOTONIC);
147	PJDLOG_ASSERT(error == 0);
148#endif
149	error = pthread_cond_init(cv, &attr);
150	PJDLOG_ASSERT(error == 0);
151	error = pthread_condattr_destroy(&attr);
152	PJDLOG_ASSERT(error == 0);
153}
154static __inline void
155cv_wait(pthread_cond_t *cv, pthread_mutex_t *lock)
156{
157	int error;
158
159	error = pthread_cond_wait(cv, lock);
160	PJDLOG_ASSERT(error == 0);
161}
162static __inline bool
163cv_timedwait(pthread_cond_t *cv, pthread_mutex_t *lock, int timeout)
164{
165	struct timespec ts;
166	int error;
167
168	if (timeout == 0) {
169		cv_wait(cv, lock);
170		return (false);
171	}
172
173#ifdef HAVE_PTHREAD_CONDATTR_SETCLOCK
174	error = clock_gettime(CLOCK_MONOTONIC, &ts);
175	PJDLOG_ASSERT(error == 0);
176	ts.tv_sec += timeout;
177	error = pthread_cond_timedwait(cv, lock, &ts);
178#elif HAVE_PTHREAD_COND_TIMEDWAIT_RELATIVE_NP
179	ts.tv_sec = timeout;
180	ts.tv_nsec = 0;
181	error = pthread_cond_timedwait_relative_np(cv, lock, &ts);
182#else
183#error Neither pthread_condattr_setclock nor pthread_cond_timedwait_relative_np is available.
184#endif
185	PJDLOG_ASSERT(error == 0 || error == ETIMEDOUT);
186	return (error == ETIMEDOUT);
187}
188static __inline void
189cv_signal(pthread_cond_t *cv)
190{
191	int error;
192
193	error = pthread_cond_signal(cv);
194	PJDLOG_ASSERT(error == 0);
195}
196static __inline void
197cv_broadcast(pthread_cond_t *cv)
198{
199	int error;
200
201	error = pthread_cond_broadcast(cv);
202	PJDLOG_ASSERT(error == 0);
203}
204#endif	/* !_SYNCH_H_ */
205