1*629ff9f7SJohn Marino /* Copyright (C) 2008, 2009 Free Software Foundation, Inc.
2*629ff9f7SJohn Marino    Contributed by Jakub Jelinek <jakub@redhat.com>.
3*629ff9f7SJohn Marino 
4*629ff9f7SJohn Marino    This file is part of the GNU OpenMP Library (libgomp).
5*629ff9f7SJohn Marino 
6*629ff9f7SJohn Marino    Libgomp is free software; you can redistribute it and/or modify it
7*629ff9f7SJohn Marino    under the terms of the GNU General Public License as published by
8*629ff9f7SJohn Marino    the Free Software Foundation; either version 3, or (at your option)
9*629ff9f7SJohn Marino    any later version.
10*629ff9f7SJohn Marino 
11*629ff9f7SJohn Marino    Libgomp is distributed in the hope that it will be useful, but WITHOUT ANY
12*629ff9f7SJohn Marino    WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
13*629ff9f7SJohn Marino    FOR A PARTICULAR PURPOSE.  See the GNU General Public License for
14*629ff9f7SJohn Marino    more details.
15*629ff9f7SJohn Marino 
16*629ff9f7SJohn Marino    Under Section 7 of GPL version 3, you are granted additional
17*629ff9f7SJohn Marino    permissions described in the GCC Runtime Library Exception, version
18*629ff9f7SJohn Marino    3.1, as published by the Free Software Foundation.
19*629ff9f7SJohn Marino 
20*629ff9f7SJohn Marino    You should have received a copy of the GNU General Public License and
21*629ff9f7SJohn Marino    a copy of the GCC Runtime Library Exception along with this program;
22*629ff9f7SJohn Marino    see the files COPYING3 and COPYING.RUNTIME respectively.  If not, see
23*629ff9f7SJohn Marino    <http://www.gnu.org/licenses/>.  */
24*629ff9f7SJohn Marino 
25*629ff9f7SJohn Marino /* This is a Linux specific implementation of a mutex synchronization
26*629ff9f7SJohn Marino    mechanism for libgomp.  This type is private to the library.  This
27*629ff9f7SJohn Marino    implementation uses atomic instructions and the futex syscall.  */
28*629ff9f7SJohn Marino 
29*629ff9f7SJohn Marino #ifndef GOMP_PTRLOCK_H
30*629ff9f7SJohn Marino #define GOMP_PTRLOCK_H 1
31*629ff9f7SJohn Marino 
32*629ff9f7SJohn Marino typedef struct { void *ptr; gomp_mutex_t lock; } gomp_ptrlock_t;
33*629ff9f7SJohn Marino 
gomp_ptrlock_init(gomp_ptrlock_t * ptrlock,void * ptr)34*629ff9f7SJohn Marino static inline void gomp_ptrlock_init (gomp_ptrlock_t *ptrlock, void *ptr)
35*629ff9f7SJohn Marino {
36*629ff9f7SJohn Marino   ptrlock->ptr = ptr;
37*629ff9f7SJohn Marino   gomp_mutex_init (&ptrlock->lock);
38*629ff9f7SJohn Marino }
39*629ff9f7SJohn Marino 
gomp_ptrlock_get(gomp_ptrlock_t * ptrlock)40*629ff9f7SJohn Marino static inline void *gomp_ptrlock_get (gomp_ptrlock_t *ptrlock)
41*629ff9f7SJohn Marino {
42*629ff9f7SJohn Marino   if (ptrlock->ptr != NULL)
43*629ff9f7SJohn Marino     return ptrlock->ptr;
44*629ff9f7SJohn Marino 
45*629ff9f7SJohn Marino   gomp_mutex_lock (&ptrlock->lock);
46*629ff9f7SJohn Marino   if (ptrlock->ptr != NULL)
47*629ff9f7SJohn Marino     {
48*629ff9f7SJohn Marino       gomp_mutex_unlock (&ptrlock->lock);
49*629ff9f7SJohn Marino       return ptrlock->ptr;
50*629ff9f7SJohn Marino     }
51*629ff9f7SJohn Marino 
52*629ff9f7SJohn Marino   return NULL;
53*629ff9f7SJohn Marino }
54*629ff9f7SJohn Marino 
gomp_ptrlock_set(gomp_ptrlock_t * ptrlock,void * ptr)55*629ff9f7SJohn Marino static inline void gomp_ptrlock_set (gomp_ptrlock_t *ptrlock, void *ptr)
56*629ff9f7SJohn Marino {
57*629ff9f7SJohn Marino   ptrlock->ptr = ptr;
58*629ff9f7SJohn Marino   gomp_mutex_unlock (&ptrlock->lock);
59*629ff9f7SJohn Marino }
60*629ff9f7SJohn Marino 
gomp_ptrlock_destroy(gomp_ptrlock_t * ptrlock)61*629ff9f7SJohn Marino static inline void gomp_ptrlock_destroy (gomp_ptrlock_t *ptrlock)
62*629ff9f7SJohn Marino {
63*629ff9f7SJohn Marino   gomp_mutex_destroy (&ptrlock->lock);
64*629ff9f7SJohn Marino }
65*629ff9f7SJohn Marino 
66*629ff9f7SJohn Marino #endif /* GOMP_PTRLOCK_H */
67