1 /*
2 * %CopyrightBegin%
3 *
4 * Copyright Ericsson AB 2008-2016. All Rights Reserved.
5 *
6 * Licensed under the Apache License, Version 2.0 (the "License");
7 * you may not use this file except in compliance with the License.
8 * You may obtain a copy of the License at
9 *
10 * http://www.apache.org/licenses/LICENSE-2.0
11 *
12 * Unless required by applicable law or agreed to in writing, software
13 * distributed under the License is distributed on an "AS IS" BASIS,
14 * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
15 * See the License for the specific language governing permissions and
16 * limitations under the License.
17 *
18 * %CopyrightEnd%
19 */
20
21 /*
22 * Native ethread atomics on TILE64/TILEPro.
23 *
24 */
25 #ifndef ETHREAD_TILE_ATOMIC_H
26 #define ETHREAD_TILE_ATOMIC_H
27
28 #define ETHR_HAVE_NATIVE_ATOMIC32 1
29 #define ETHR_NATIVE_ATOMIC32_IMPL "tilera"
30
31 #include <atomic.h>
32
33 /* An atomic is an aligned int accessed via locked operations.
34 */
35 typedef struct {
36 volatile ethr_sint32_t counter;
37 } ethr_native_atomic32_t;
38
39 #if defined(ETHR_TRY_INLINE_FUNCS) || defined(ETHR_ATOMIC_IMPL__)
40
41 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_ADDR 1
42
43 static ETHR_INLINE ethr_sint32_t *
ethr_native_atomic32_addr(ethr_native_atomic32_t * var)44 ethr_native_atomic32_addr(ethr_native_atomic32_t *var)
45 {
46 return (ethr_sint32_t *) &var->counter;
47 }
48
49 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_INIT 1
50
51 static ETHR_INLINE void
ethr_native_atomic32_init(ethr_native_atomic32_t * var,ethr_sint32_t i)52 ethr_native_atomic32_init(ethr_native_atomic32_t *var, ethr_sint32_t i)
53 {
54 var->counter = i;
55 }
56
57 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_READ 1
58
59 static ETHR_INLINE ethr_sint32_t
ethr_native_atomic32_read(ethr_native_atomic32_t * var)60 ethr_native_atomic32_read(ethr_native_atomic32_t *var)
61 {
62 return var->counter;
63 }
64
65 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_READ_ACQB 1
66
67 static ETHR_INLINE ethr_sint32_t
ethr_native_atomic32_read_acqb(ethr_native_atomic32_t * var)68 ethr_native_atomic32_read_acqb(ethr_native_atomic32_t *var)
69 {
70 return atomic_compare_and_exchange_val_acq(&var->counter,
71 0x81818181,
72 0x81818181);
73 }
74
75 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_ADD 1
76
77 static ETHR_INLINE void
ethr_native_atomic32_add(ethr_native_atomic32_t * var,ethr_sint32_t incr)78 ethr_native_atomic32_add(ethr_native_atomic32_t *var, ethr_sint32_t incr)
79 {
80 atomic_add(&var->counter, incr);
81 }
82
83 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_INC 1
84
85 static ETHR_INLINE void
ethr_native_atomic32_inc(ethr_native_atomic32_t * var)86 ethr_native_atomic32_inc(ethr_native_atomic32_t *var)
87 {
88 atomic_increment(&var->counter);
89 }
90
91 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_DEC 1
92
93 static ETHR_INLINE void
ethr_native_atomic32_dec(ethr_native_atomic32_t * var)94 ethr_native_atomic32_dec(ethr_native_atomic32_t *var)
95 {
96 atomic_decrement(&var->counter);
97 }
98
99 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_ADD_RETURN 1
100
101 static ETHR_INLINE ethr_sint32_t
ethr_native_atomic32_add_return(ethr_native_atomic32_t * var,ethr_sint32_t incr)102 ethr_native_atomic32_add_return(ethr_native_atomic32_t *var, ethr_sint32_t incr)
103 {
104 return atomic_exchange_and_add(&var->counter, incr) + incr;
105 }
106
107 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_AND_RETOLD 1
108
109 static ETHR_INLINE ethr_sint32_t
ethr_native_atomic32_and_retold(ethr_native_atomic32_t * var,ethr_sint32_t mask)110 ethr_native_atomic32_and_retold(ethr_native_atomic32_t *var, ethr_sint32_t mask)
111 {
112 return atomic_and_val(&var->counter, mask);
113 }
114
115 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_OR_RETOLD 1
116
117 static ETHR_INLINE ethr_sint32_t
ethr_native_atomic32_or_retold(ethr_native_atomic32_t * var,ethr_sint32_t mask)118 ethr_native_atomic32_or_retold(ethr_native_atomic32_t *var, ethr_sint32_t mask)
119 {
120 return atomic_or_val(&var->counter, mask);
121 }
122
123 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_XCHG_ACQB 1
124
125 static ETHR_INLINE ethr_sint32_t
ethr_native_atomic32_xchg_acqb(ethr_native_atomic32_t * var,ethr_sint32_t val)126 ethr_native_atomic32_xchg_acqb(ethr_native_atomic32_t *var, ethr_sint32_t val)
127 {
128 return atomic_exchange_acq(&var->counter, val);
129 }
130
131 #define ETHR_HAVE_ETHR_NATIVE_ATOMIC32_CMPXCHG_ACQB 1
132
133 static ETHR_INLINE ethr_sint32_t
ethr_native_atomic32_cmpxchg_acqb(ethr_native_atomic32_t * var,ethr_sint32_t new,ethr_sint32_t expected)134 ethr_native_atomic32_cmpxchg_acqb(ethr_native_atomic32_t *var,
135 ethr_sint32_t new,
136 ethr_sint32_t expected)
137 {
138 return atomic_compare_and_exchange_val_acq(&var->counter, new, expected);
139 }
140
141 #endif /* ETHR_TRY_INLINE_FUNCS */
142
143 #endif /* ETHREAD_TILE_ATOMIC_H */
144