root / qemu-lock.h @ ed23fbd9
History | View | Annotate | Download (6.1 kB)
1 |
/*
|
---|---|
2 |
* Copyright (c) 2003 Fabrice Bellard
|
3 |
*
|
4 |
* This library is free software; you can redistribute it and/or
|
5 |
* modify it under the terms of the GNU Lesser General Public
|
6 |
* License as published by the Free Software Foundation; either
|
7 |
* version 2 of the License, or (at your option) any later version.
|
8 |
*
|
9 |
* This library is distributed in the hope that it will be useful,
|
10 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
11 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
12 |
* Lesser General Public License for more details.
|
13 |
*
|
14 |
* You should have received a copy of the GNU Lesser General Public
|
15 |
* License along with this library; if not, write to the Free Software
|
16 |
* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
17 |
*/
|
18 |
|
19 |
/* Locking primitives. Most of this code should be redundant -
|
20 |
system emulation doesn't need/use locking, NPTL userspace uses
|
21 |
pthread mutexes, and non-NPTL userspace isn't threadsafe anyway.
|
22 |
In either case a spinlock is probably the wrong kind of lock.
|
23 |
Spinlocks are only good if you know annother CPU has the lock and is
|
24 |
likely to release it soon. In environments where you have more threads
|
25 |
than physical CPUs (the extreme case being a single CPU host) a spinlock
|
26 |
simply wastes CPU until the OS decides to preempt it. */
|
27 |
#if defined(USE_NPTL)
|
28 |
|
29 |
#include <pthread.h> |
30 |
#define spin_lock pthread_mutex_lock
|
31 |
#define spin_unlock pthread_mutex_unlock
|
32 |
#define spinlock_t pthread_mutex_t
|
33 |
#define SPIN_LOCK_UNLOCKED PTHREAD_MUTEX_INITIALIZER
|
34 |
|
35 |
#else
|
36 |
|
37 |
#if defined(__hppa__)
|
38 |
|
39 |
typedef int spinlock_t[4]; |
40 |
|
41 |
#define SPIN_LOCK_UNLOCKED { 1, 1, 1, 1 } |
42 |
|
43 |
static inline void resetlock (spinlock_t *p) |
44 |
{ |
45 |
(*p)[0] = (*p)[1] = (*p)[2] = (*p)[3] = 1; |
46 |
} |
47 |
|
48 |
#else
|
49 |
|
50 |
typedef int spinlock_t; |
51 |
|
52 |
#define SPIN_LOCK_UNLOCKED 0 |
53 |
|
54 |
static inline void resetlock (spinlock_t *p) |
55 |
{ |
56 |
*p = SPIN_LOCK_UNLOCKED; |
57 |
} |
58 |
|
59 |
#endif
|
60 |
|
61 |
#if defined(__powerpc__)
|
62 |
static inline int testandset (int *p) |
63 |
{ |
64 |
int ret;
|
65 |
__asm__ __volatile__ ( |
66 |
"0: lwarx %0,0,%1\n"
|
67 |
" xor. %0,%3,%0\n"
|
68 |
" bne 1f\n"
|
69 |
" stwcx. %2,0,%1\n"
|
70 |
" bne- 0b\n"
|
71 |
"1: "
|
72 |
: "=&r" (ret)
|
73 |
: "r" (p), "r" (1), "r" (0) |
74 |
: "cr0", "memory"); |
75 |
return ret;
|
76 |
} |
77 |
#elif defined(__i386__)
|
78 |
static inline int testandset (int *p) |
79 |
{ |
80 |
long int readval = 0; |
81 |
|
82 |
__asm__ __volatile__ ("lock; cmpxchgl %2, %0"
|
83 |
: "+m" (*p), "+a" (readval) |
84 |
: "r" (1) |
85 |
: "cc");
|
86 |
return readval;
|
87 |
} |
88 |
#elif defined(__x86_64__)
|
89 |
static inline int testandset (int *p) |
90 |
{ |
91 |
long int readval = 0; |
92 |
|
93 |
__asm__ __volatile__ ("lock; cmpxchgl %2, %0"
|
94 |
: "+m" (*p), "+a" (readval) |
95 |
: "r" (1) |
96 |
: "cc");
|
97 |
return readval;
|
98 |
} |
99 |
#elif defined(__s390__)
|
100 |
static inline int testandset (int *p) |
101 |
{ |
102 |
int ret;
|
103 |
|
104 |
__asm__ __volatile__ ("0: cs %0,%1,0(%2)\n"
|
105 |
" jl 0b"
|
106 |
: "=&d" (ret)
|
107 |
: "r" (1), "a" (p), "0" (*p) |
108 |
: "cc", "memory" ); |
109 |
return ret;
|
110 |
} |
111 |
#elif defined(__alpha__)
|
112 |
static inline int testandset (int *p) |
113 |
{ |
114 |
int ret;
|
115 |
unsigned long one; |
116 |
|
117 |
__asm__ __volatile__ ("0: mov 1,%2\n"
|
118 |
" ldl_l %0,%1\n"
|
119 |
" stl_c %2,%1\n"
|
120 |
" beq %2,1f\n"
|
121 |
".subsection 2\n"
|
122 |
"1: br 0b\n"
|
123 |
".previous"
|
124 |
: "=r" (ret), "=m" (*p), "=r" (one) |
125 |
: "m" (*p));
|
126 |
return ret;
|
127 |
} |
128 |
#elif defined(__sparc__)
|
129 |
static inline int testandset (int *p) |
130 |
{ |
131 |
int ret;
|
132 |
|
133 |
__asm__ __volatile__("ldstub [%1], %0"
|
134 |
: "=r" (ret)
|
135 |
: "r" (p)
|
136 |
: "memory");
|
137 |
|
138 |
return (ret ? 1 : 0); |
139 |
} |
140 |
#elif defined(__arm__)
|
141 |
static inline int testandset (int *spinlock) |
142 |
{ |
143 |
register unsigned int ret; |
144 |
__asm__ __volatile__("swp %0, %1, [%2]"
|
145 |
: "=r"(ret)
|
146 |
: "0"(1), "r"(spinlock)); |
147 |
|
148 |
return ret;
|
149 |
} |
150 |
#elif defined(__mc68000)
|
151 |
static inline int testandset (int *p) |
152 |
{ |
153 |
char ret;
|
154 |
__asm__ __volatile__("tas %1; sne %0"
|
155 |
: "=r" (ret)
|
156 |
: "m" (p)
|
157 |
: "cc","memory"); |
158 |
return ret;
|
159 |
} |
160 |
#elif defined(__hppa__)
|
161 |
|
162 |
/* Because malloc only guarantees 8-byte alignment for malloc'd data,
|
163 |
and GCC only guarantees 8-byte alignment for stack locals, we can't
|
164 |
be assured of 16-byte alignment for atomic lock data even if we
|
165 |
specify "__attribute ((aligned(16)))" in the type declaration. So,
|
166 |
we use a struct containing an array of four ints for the atomic lock
|
167 |
type and dynamically select the 16-byte aligned int from the array
|
168 |
for the semaphore. */
|
169 |
#define __PA_LDCW_ALIGNMENT 16 |
170 |
static inline void *ldcw_align (void *p) { |
171 |
unsigned long a = (unsigned long)p; |
172 |
a = (a + __PA_LDCW_ALIGNMENT - 1) & ~(__PA_LDCW_ALIGNMENT - 1); |
173 |
return (void *)a; |
174 |
} |
175 |
|
176 |
static inline int testandset (spinlock_t *p) |
177 |
{ |
178 |
unsigned int ret; |
179 |
p = ldcw_align(p); |
180 |
__asm__ __volatile__("ldcw 0(%1),%0"
|
181 |
: "=r" (ret)
|
182 |
: "r" (p)
|
183 |
: "memory" );
|
184 |
return !ret;
|
185 |
} |
186 |
|
187 |
#elif defined(__ia64)
|
188 |
|
189 |
#include <ia64intrin.h> |
190 |
|
191 |
static inline int testandset (int *p) |
192 |
{ |
193 |
return __sync_lock_test_and_set (p, 1); |
194 |
} |
195 |
#elif defined(__mips__)
|
196 |
static inline int testandset (int *p) |
197 |
{ |
198 |
int ret;
|
199 |
|
200 |
__asm__ __volatile__ ( |
201 |
" .set push \n"
|
202 |
" .set noat \n"
|
203 |
" .set mips2 \n"
|
204 |
"1: li $1, 1 \n"
|
205 |
" ll %0, %1 \n"
|
206 |
" sc $1, %1 \n"
|
207 |
" beqz $1, 1b \n"
|
208 |
" .set pop "
|
209 |
: "=r" (ret), "+R" (*p) |
210 |
: |
211 |
: "memory");
|
212 |
|
213 |
return ret;
|
214 |
} |
215 |
#else
|
216 |
#error unimplemented CPU support
|
217 |
#endif
|
218 |
|
219 |
#if defined(CONFIG_USER_ONLY)
|
220 |
static inline void spin_lock(spinlock_t *lock) |
221 |
{ |
222 |
while (testandset(lock));
|
223 |
} |
224 |
|
225 |
static inline void spin_unlock(spinlock_t *lock) |
226 |
{ |
227 |
resetlock(lock); |
228 |
} |
229 |
|
230 |
static inline int spin_trylock(spinlock_t *lock) |
231 |
{ |
232 |
return !testandset(lock);
|
233 |
} |
234 |
#else
|
235 |
static inline void spin_lock(spinlock_t *lock) |
236 |
{ |
237 |
} |
238 |
|
239 |
static inline void spin_unlock(spinlock_t *lock) |
240 |
{ |
241 |
} |
242 |
|
243 |
static inline int spin_trylock(spinlock_t *lock) |
244 |
{ |
245 |
return 1; |
246 |
} |
247 |
#endif
|
248 |
|
249 |
#endif
|