0
|
1 |
// Copyright (c) 2008-2009 Nokia Corporation and/or its subsidiary(-ies).
|
|
2 |
// All rights reserved.
|
|
3 |
// This component and the accompanying materials are made available
|
|
4 |
// under the terms of the License "Eclipse Public License v1.0"
|
|
5 |
// which accompanies this distribution, and is available
|
|
6 |
// at the URL "http://www.eclipse.org/legal/epl-v10.html".
|
|
7 |
//
|
|
8 |
// Initial Contributors:
|
|
9 |
// Nokia Corporation - initial contribution.
|
|
10 |
//
|
|
11 |
// Contributors:
|
|
12 |
//
|
|
13 |
// Description:
|
|
14 |
// e32\common\arm\atomic_8_16_32_exec.h
|
|
15 |
// 8, 16 and 32 bit user side atomic operations on V5 processors
|
|
16 |
// These work by calling Exec functions.
|
|
17 |
//
|
|
18 |
//
|
|
19 |
|
|
20 |
#include "atomic_ops.h"
|
|
21 |
|
|
22 |
#ifdef __CPU_ARMV6
|
|
23 |
#error 8/16/32 bit atomic operations on ARMv6 must use LDREX/STREX
|
|
24 |
#else
|
|
25 |
// Write paging not supported, so atomics can assume unpaged memory, so FAST exec OK
|
|
26 |
|
|
27 |
#if __DATA_SIZE__==8
|
|
28 |
#define __ATOMIC_EXEC__(op) FAST_EXEC1_NR(EFastExecFastAtomic##op##8)
|
|
29 |
#elif __DATA_SIZE__==16
|
|
30 |
#define __ATOMIC_EXEC__(op) FAST_EXEC1_NR(EFastExecFastAtomic##op##16)
|
|
31 |
#elif __DATA_SIZE__==32
|
|
32 |
#define __ATOMIC_EXEC__(op) FAST_EXEC1_NR(EFastExecFastAtomic##op##32)
|
|
33 |
#else
|
|
34 |
#error Invalid data size
|
|
35 |
#endif
|
|
36 |
|
|
37 |
#endif
|
|
38 |
|
|
39 |
#ifdef __BARRIERS_NEEDED__
|
|
40 |
#error Barriers not supported on V6/V5, only V6K/V7
|
|
41 |
#endif
|
|
42 |
|
|
43 |
#if defined(__OP_LOAD__)
|
|
44 |
#error Load operation not defined
|
|
45 |
|
|
46 |
#elif defined(__OP_STORE__)
|
|
47 |
#error Store operation not defined
|
|
48 |
|
|
49 |
#elif defined(__OP_RMW1__)
|
|
50 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,rel,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*v*/)
|
|
51 |
{
|
|
52 |
// R0=a, R1=v
|
|
53 |
// return value in R0
|
|
54 |
// just fall through
|
|
55 |
}
|
|
56 |
|
|
57 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,rlx,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*v*/)
|
|
58 |
{
|
|
59 |
// R0=a, R1=v
|
|
60 |
// return value in R0
|
|
61 |
// just fall through
|
|
62 |
}
|
|
63 |
|
|
64 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,ord,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*v*/)
|
|
65 |
{
|
|
66 |
// R0=a, R1=v
|
|
67 |
// return value in R0
|
|
68 |
// just fall through
|
|
69 |
}
|
|
70 |
|
|
71 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,acq,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*v*/)
|
|
72 |
{
|
|
73 |
// R0=a, R1=v
|
|
74 |
// return value in R0
|
|
75 |
#if defined(__OP_ADD__)
|
|
76 |
asm("stmfd sp!, {r0-r1} "); // iA=a, i0=v, i1, i2 unused
|
|
77 |
asm("mov r0, sp ");
|
|
78 |
__ATOMIC_EXEC__(Add);
|
|
79 |
asm("add sp, sp, #8 ");
|
|
80 |
#else
|
|
81 |
#if defined(__OP_SWP__)
|
|
82 |
asm("mov r2, r1 "); // XOR mask = v
|
|
83 |
asm("mov r1, #0 "); // AND mask = 0
|
|
84 |
#elif defined(__OP_AND__)
|
|
85 |
asm("mov r2, #0 "); // AND mask = v, XOR mask = 0
|
|
86 |
#elif defined(__OP_IOR__)
|
|
87 |
asm("mov r2, r1 "); // XOR mask = v
|
|
88 |
asm("mvn r1, r1 "); // AND mask = ~v
|
|
89 |
#elif defined(__OP_XOR__)
|
|
90 |
asm("mov r2, r1 "); // XOR mask = v
|
|
91 |
asm("mvn r1, #0 "); // AND mask = 0xFFFFFFFF
|
|
92 |
#endif
|
|
93 |
asm("stmfd sp!, {r0-r2} "); // iA=a, i0=AND mask, i1=XOR mask, i2 unused
|
|
94 |
asm("mov r0, sp ");
|
|
95 |
__ATOMIC_EXEC__(Axo);
|
|
96 |
asm("add sp, sp, #12 ");
|
|
97 |
#endif
|
|
98 |
__JUMP(,lr);
|
|
99 |
}
|
|
100 |
|
|
101 |
|
|
102 |
#elif defined(__OP_CAS__)
|
|
103 |
extern "C" EXPORT_C __NAKED__ TBool __fname__(__OPERATION__,rel,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ * /*q*/, __TYPE__ /*v*/)
|
|
104 |
{
|
|
105 |
// R0=a, R1=q, R2=v
|
|
106 |
// return value in R0
|
|
107 |
// just fall through
|
|
108 |
}
|
|
109 |
|
|
110 |
extern "C" EXPORT_C __NAKED__ TBool __fname__(__OPERATION__,rlx,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ * /*q*/, __TYPE__ /*v*/)
|
|
111 |
{
|
|
112 |
// R0=a, R1=q, R2=v
|
|
113 |
// return value in R0
|
|
114 |
// just fall through
|
|
115 |
}
|
|
116 |
|
|
117 |
extern "C" EXPORT_C __NAKED__ TBool __fname__(__OPERATION__,ord,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ * /*q*/, __TYPE__ /*v*/)
|
|
118 |
{
|
|
119 |
// R0=a, R1=q, R2=v
|
|
120 |
// return value in R0
|
|
121 |
// just fall through
|
|
122 |
}
|
|
123 |
|
|
124 |
extern "C" EXPORT_C __NAKED__ TBool __fname__(__OPERATION__,acq,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ * /*q*/, __TYPE__ /*v*/)
|
|
125 |
{
|
|
126 |
// R0=a, R1=q, R2=v
|
|
127 |
// return value in R0
|
|
128 |
asm("stmfd sp!, {r0-r2} "); // iA=a, iQ=q, i1=v, i2 unused
|
|
129 |
asm("mov r0, sp ");
|
|
130 |
__ATOMIC_EXEC__(Cas);
|
|
131 |
asm("add sp, sp, #12 ");
|
|
132 |
__JUMP(,lr);
|
|
133 |
}
|
|
134 |
|
|
135 |
|
|
136 |
#elif defined(__OP_AXO__)
|
|
137 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,rel,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*u*/, __TYPE__ /*v*/)
|
|
138 |
{
|
|
139 |
// R0=a, R1=u, R2=v
|
|
140 |
// return value in R0
|
|
141 |
// just fall through
|
|
142 |
}
|
|
143 |
|
|
144 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,rlx,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*u*/, __TYPE__ /*v*/)
|
|
145 |
{
|
|
146 |
// R0=a, R1=u, R2=v
|
|
147 |
// return value in R0
|
|
148 |
// just fall through
|
|
149 |
}
|
|
150 |
|
|
151 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,ord,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*u*/, __TYPE__ /*v*/)
|
|
152 |
{
|
|
153 |
// R0=a, R1=u, R2=v
|
|
154 |
// return value in R0
|
|
155 |
// just fall through
|
|
156 |
}
|
|
157 |
|
|
158 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,acq,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*u*/, __TYPE__ /*v*/)
|
|
159 |
{
|
|
160 |
// R0=a, R1=u, R2=v
|
|
161 |
// return value in R0
|
|
162 |
asm("stmfd sp!, {r0-r2} "); // iA=a, i0=u, i1=v, i2 unused
|
|
163 |
asm("mov r0, sp ");
|
|
164 |
__ATOMIC_EXEC__(Axo);
|
|
165 |
asm("add sp, sp, #12 ");
|
|
166 |
__JUMP(,lr);
|
|
167 |
}
|
|
168 |
|
|
169 |
|
|
170 |
#elif defined(__OP_RMW3__)
|
|
171 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,rel,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*t*/, __TYPE__ /*u*/, __TYPE__ /*v*/)
|
|
172 |
{
|
|
173 |
// R0=a, R1=t, R2=u, R3=v
|
|
174 |
// return value in R0
|
|
175 |
// just fall through
|
|
176 |
}
|
|
177 |
|
|
178 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,rlx,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*t*/, __TYPE__ /*u*/, __TYPE__ /*v*/)
|
|
179 |
{
|
|
180 |
// R0=a, R1=t, R2=u, R3=v
|
|
181 |
// return value in R0
|
|
182 |
// just fall through
|
|
183 |
}
|
|
184 |
|
|
185 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,ord,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*t*/, __TYPE__ /*u*/, __TYPE__ /*v*/)
|
|
186 |
{
|
|
187 |
// R0=a, R1=t, R2=u, R3=v
|
|
188 |
// return value in R0
|
|
189 |
// just fall through
|
|
190 |
}
|
|
191 |
|
|
192 |
extern "C" EXPORT_C __NAKED__ __TYPE__ __fname__(__OPERATION__,acq,__DATA_SIZE__)(volatile TAny* /*a*/, __TYPE__ /*t*/, __TYPE__ /*u*/, __TYPE__ /*v*/)
|
|
193 |
{
|
|
194 |
// R0=a, R1=t, R2=u, R3=v
|
|
195 |
// return value in R0
|
|
196 |
asm("stmfd sp!, {r0-r3} "); // iA=a, i0=t, i1=u, i2=v
|
|
197 |
asm("mov r0, sp ");
|
|
198 |
#if defined(__OP_TAU__)
|
|
199 |
__ATOMIC_EXEC__(Tau);
|
|
200 |
#elif defined(__OP_TAS__)
|
|
201 |
__ATOMIC_EXEC__(Tas);
|
|
202 |
#endif
|
|
203 |
asm("add sp, sp, #16 ");
|
|
204 |
__JUMP(,lr);
|
|
205 |
}
|
|
206 |
|
|
207 |
|
|
208 |
#endif
|
|
209 |
|
|
210 |
#undef __ATOMIC_EXEC__
|
|
211 |
|
|
212 |
// Second inclusion undefines temporaries
|
|
213 |
#include "atomic_ops.h"
|