1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
|
/* { dg-do compile { target { powerpc*-*-* && lp64 } } } */
/* { dg-skip-if "" { powerpc*-*-darwin* } { "*" } { "" } } */
/* { dg-require-effective-target powerpc_vsx_ok } */
/* { dg-options "-mcpu=power7 -O2" } */
/* { dg-final { scan-assembler-not "lbarx" } } */
/* { dg-final { scan-assembler-not "lharx" } } */
/* { dg-final { scan-assembler-times "lwarx" 18 } } */
/* { dg-final { scan-assembler-times "ldarx" 6 } } */
/* { dg-final { scan-assembler-not "lqarx" } } */
/* { dg-final { scan-assembler-not "stbcx" } } */
/* { dg-final { scan-assembler-not "sthcx" } } */
/* { dg-final { scan-assembler-times "stwcx" 18 } } */
/* { dg-final { scan-assembler-times "stdcx" 6 } } */
/* { dg-final { scan-assembler-not "stqcx" } } */
/* { dg-final { scan-assembler-times "bl __atomic" 6 } } */
/* { dg-final { scan-assembler-times "isync" 12 } } */
/* { dg-final { scan-assembler-times "lwsync" 8 } } */
/* { dg-final { scan-assembler-not "mtvsrd" } } */
/* { dg-final { scan-assembler-not "mtvsrwa" } } */
/* { dg-final { scan-assembler-not "mtvsrwz" } } */
/* { dg-final { scan-assembler-not "mfvsrd" } } */
/* { dg-final { scan-assembler-not "mfvsrwz" } } */
/* Test for the byte atomic operations on power8 using lbarx/stbcx. */
char
char_fetch_add_relaxed (char *ptr, int value)
{
return __atomic_fetch_add (ptr, value, __ATOMIC_RELAXED);
}
char
char_fetch_sub_consume (char *ptr, int value)
{
return __atomic_fetch_sub (ptr, value, __ATOMIC_CONSUME);
}
char
char_fetch_and_acquire (char *ptr, int value)
{
return __atomic_fetch_and (ptr, value, __ATOMIC_ACQUIRE);
}
char
char_fetch_ior_release (char *ptr, int value)
{
return __atomic_fetch_or (ptr, value, __ATOMIC_RELEASE);
}
char
char_fetch_xor_acq_rel (char *ptr, int value)
{
return __atomic_fetch_xor (ptr, value, __ATOMIC_ACQ_REL);
}
char
char_fetch_nand_seq_cst (char *ptr, int value)
{
return __atomic_fetch_nand (ptr, value, __ATOMIC_SEQ_CST);
}
/* Test for the half word atomic operations on power8 using lharx/sthcx. */
short
short_fetch_add_relaxed (short *ptr, int value)
{
return __atomic_fetch_add (ptr, value, __ATOMIC_RELAXED);
}
short
short_fetch_sub_consume (short *ptr, int value)
{
return __atomic_fetch_sub (ptr, value, __ATOMIC_CONSUME);
}
short
short_fetch_and_acquire (short *ptr, int value)
{
return __atomic_fetch_and (ptr, value, __ATOMIC_ACQUIRE);
}
short
short_fetch_ior_release (short *ptr, int value)
{
return __atomic_fetch_or (ptr, value, __ATOMIC_RELEASE);
}
short
short_fetch_xor_acq_rel (short *ptr, int value)
{
return __atomic_fetch_xor (ptr, value, __ATOMIC_ACQ_REL);
}
short
short_fetch_nand_seq_cst (short *ptr, int value)
{
return __atomic_fetch_nand (ptr, value, __ATOMIC_SEQ_CST);
}
/* Test for the word atomic operations on power8 using lwarx/stwcx. */
int
int_fetch_add_relaxed (int *ptr, int value)
{
return __atomic_fetch_add (ptr, value, __ATOMIC_RELAXED);
}
int
int_fetch_sub_consume (int *ptr, int value)
{
return __atomic_fetch_sub (ptr, value, __ATOMIC_CONSUME);
}
int
int_fetch_and_acquire (int *ptr, int value)
{
return __atomic_fetch_and (ptr, value, __ATOMIC_ACQUIRE);
}
int
int_fetch_ior_release (int *ptr, int value)
{
return __atomic_fetch_or (ptr, value, __ATOMIC_RELEASE);
}
int
int_fetch_xor_acq_rel (int *ptr, int value)
{
return __atomic_fetch_xor (ptr, value, __ATOMIC_ACQ_REL);
}
int
int_fetch_nand_seq_cst (int *ptr, int value)
{
return __atomic_fetch_nand (ptr, value, __ATOMIC_SEQ_CST);
}
/* Test for the double word atomic operations on power8 using ldarx/stdcx. */
long
long_fetch_add_relaxed (long *ptr, long value)
{
return __atomic_fetch_add (ptr, value, __ATOMIC_RELAXED);
}
long
long_fetch_sub_consume (long *ptr, long value)
{
return __atomic_fetch_sub (ptr, value, __ATOMIC_CONSUME);
}
long
long_fetch_and_acquire (long *ptr, long value)
{
return __atomic_fetch_and (ptr, value, __ATOMIC_ACQUIRE);
}
long
long_fetch_ior_release (long *ptr, long value)
{
return __atomic_fetch_or (ptr, value, __ATOMIC_RELEASE);
}
long
long_fetch_xor_acq_rel (long *ptr, long value)
{
return __atomic_fetch_xor (ptr, value, __ATOMIC_ACQ_REL);
}
long
long_fetch_nand_seq_cst (long *ptr, long value)
{
return __atomic_fetch_nand (ptr, value, __ATOMIC_SEQ_CST);
}
/* Test for the quad word atomic operations on power8 using ldarx/stdcx. */
__int128_t
quad_fetch_add_relaxed (__int128_t *ptr, __int128_t value)
{
return __atomic_fetch_add (ptr, value, __ATOMIC_RELAXED);
}
__int128_t
quad_fetch_sub_consume (__int128_t *ptr, __int128_t value)
{
return __atomic_fetch_sub (ptr, value, __ATOMIC_CONSUME);
}
__int128_t
quad_fetch_and_acquire (__int128_t *ptr, __int128_t value)
{
return __atomic_fetch_and (ptr, value, __ATOMIC_ACQUIRE);
}
__int128_t
quad_fetch_ior_release (__int128_t *ptr, __int128_t value)
{
return __atomic_fetch_or (ptr, value, __ATOMIC_RELEASE);
}
__int128_t
quad_fetch_xor_acq_rel (__int128_t *ptr, __int128_t value)
{
return __atomic_fetch_xor (ptr, value, __ATOMIC_ACQ_REL);
}
__int128_t
quad_fetch_nand_seq_cst (__int128_t *ptr, __int128_t value)
{
return __atomic_fetch_nand (ptr, value, __ATOMIC_SEQ_CST);
}
|
