annotate libgomp/config/accel/sem.h @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 1830386684a0
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
145
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
1 /* Copyright (C) 2015-2020 Free Software Foundation, Inc.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
2 Contributed by Alexander Monakov <amonakov@ispras.ru>
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
3
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
4 This file is part of the GNU Offloading and Multi Processing Library
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
5 (libgomp).
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
6
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
7 Libgomp is free software; you can redistribute it and/or modify it
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
8 under the terms of the GNU General Public License as published by
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
9 the Free Software Foundation; either version 3, or (at your option)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
10 any later version.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
11
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
12 Libgomp is distributed in the hope that it will be useful, but WITHOUT ANY
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
14 FOR A PARTICULAR PURPOSE. See the GNU General Public License for
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
15 more details.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
16
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
17 Under Section 7 of GPL version 3, you are granted additional
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
18 permissions described in the GCC Runtime Library Exception, version
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
19 3.1, as published by the Free Software Foundation.
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
20
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
21 You should have received a copy of the GNU General Public License and
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
22 a copy of the GCC Runtime Library Exception along with this program;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
23 see the files COPYING3 and COPYING.RUNTIME respectively. If not, see
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
24 <http://www.gnu.org/licenses/>. */
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
25
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
26 /* This is an NVPTX specific implementation of a semaphore synchronization
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
27 mechanism for libgomp. This type is private to the library. This
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
28 semaphore implementation uses atomic instructions and busy waiting. */
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
29
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
30 #ifndef GOMP_SEM_H
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
31 #define GOMP_SEM_H 1
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
32
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
33 typedef int gomp_sem_t;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
34
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
35 static inline void
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
36 gomp_sem_init (gomp_sem_t *sem, int value)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
37 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
38 *sem = value;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
39 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
40
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
41 static inline void
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
42 gomp_sem_destroy (gomp_sem_t *sem)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
43 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
44 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
45
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
46 static inline void
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
47 gomp_sem_wait (gomp_sem_t *sem)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
48 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
49 int count = __atomic_load_n (sem, MEMMODEL_ACQUIRE);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
50 for (;;)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
51 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
52 while (count == 0)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
53 count = __atomic_load_n (sem, MEMMODEL_ACQUIRE);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
54 if (__atomic_compare_exchange_n (sem, &count, count - 1, false,
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
55 MEMMODEL_ACQUIRE, MEMMODEL_RELAXED))
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
56 return;
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
57 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
58 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
59
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
60 static inline void
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
61 gomp_sem_post (gomp_sem_t *sem)
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
62 {
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
63 (void) __atomic_add_fetch (sem, 1, MEMMODEL_RELEASE);
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
64 }
1830386684a0 gcc-9.2.0
anatofuz
parents:
diff changeset
65 #endif /* GOMP_SEM_H */