|
williamr@4
|
1 |
|
|
williamr@4
|
2 |
// Currently, SUN CC requires object file
|
|
williamr@4
|
3 |
|
|
williamr@4
|
4 |
#if defined (__GNUC__)
|
|
williamr@4
|
5 |
|
|
williamr@4
|
6 |
/*
|
|
williamr@4
|
7 |
** int _STLP_atomic_exchange (__stl_atomic_t *pvalue, __stl_atomic_t value)
|
|
williamr@4
|
8 |
*/
|
|
williamr@4
|
9 |
|
|
williamr@4
|
10 |
# ifdef __sparc_v9__
|
|
williamr@4
|
11 |
|
|
williamr@4
|
12 |
# ifdef __arch64__
|
|
williamr@4
|
13 |
|
|
williamr@4
|
14 |
# define _STLP_EXCH_ASM asm volatile ("casx [%3], %4, %0 ; membar #LoadLoad | #LoadStore " : \
|
|
williamr@4
|
15 |
"=r" (_L_value2), "=m" (*_L_pvalue1) : \
|
|
williamr@4
|
16 |
"m" (*_L_pvalue1), "r" (_L_pvalue1), "r" (_L_value1), "0" (_L_value2) )
|
|
williamr@4
|
17 |
|
|
williamr@4
|
18 |
# else /* __arch64__ */
|
|
williamr@4
|
19 |
|
|
williamr@4
|
20 |
# define _STLP_EXCH_ASM asm volatile ("cas [%3], %4, %0" : \
|
|
williamr@4
|
21 |
"=r" (_L_value2), "=m" (*_L_pvalue1) : \
|
|
williamr@4
|
22 |
"m" (*_L_pvalue1), "r" (_L_pvalue1), "r" (_L_value1), "0" (_L_value2) )
|
|
williamr@4
|
23 |
# endif
|
|
williamr@4
|
24 |
|
|
williamr@4
|
25 |
# else /* __sparc_v9__ */
|
|
williamr@4
|
26 |
|
|
williamr@4
|
27 |
# define _STLP_EXCH_ASM asm volatile ("swap [%3], %0 " : \
|
|
williamr@4
|
28 |
"=r" (_L_value2), "=m" (*_L_pvalue1) : \
|
|
williamr@4
|
29 |
"m" (*_L_pvalue1), "r" (_L_pvalue1), "0" (_L_value2) )
|
|
williamr@4
|
30 |
# endif
|
|
williamr@4
|
31 |
|
|
williamr@4
|
32 |
|
|
williamr@4
|
33 |
# define _STLP_ATOMIC_EXCHANGE(__pvalue1, __value2) \
|
|
williamr@4
|
34 |
({ register volatile __stl_atomic_t *_L_pvalue1 = __pvalue1; \
|
|
williamr@4
|
35 |
register __stl_atomic_t _L_value1, _L_value2 = __value2 ; \
|
|
williamr@4
|
36 |
do { _L_value1 = *_L_pvalue1; _STLP_EXCH_ASM; } while ( _L_value1 != _L_value2 ) ; \
|
|
williamr@4
|
37 |
_L_value1; })
|
|
williamr@4
|
38 |
|
|
williamr@4
|
39 |
# define _STLP_ATOMIC_INCREMENT(__pvalue1) \
|
|
williamr@4
|
40 |
{ register volatile __stl_atomic_t *_L_pvalue1 = __pvalue1; \
|
|
williamr@4
|
41 |
register __stl_atomic_t _L_value1, _L_value2; \
|
|
williamr@4
|
42 |
do { _L_value1 = *_L_pvalue1; _L_value2 = _L_value1+1; _STLP_EXCH_ASM; } while ( _L_value1 != _L_value2 ) ; }
|
|
williamr@4
|
43 |
|
|
williamr@4
|
44 |
# define _STLP_ATOMIC_DECREMENT(__pvalue1) \
|
|
williamr@4
|
45 |
{ register volatile __stl_atomic_t *_L_pvalue1 = __pvalue1; \
|
|
williamr@4
|
46 |
register __stl_atomic_t _L_value1, _L_value2; \
|
|
williamr@4
|
47 |
do { _L_value1 = *_L_pvalue1; _L_value2 = _L_value1-1; _STLP_EXCH_ASM; } while ( _L_value1 != _L_value2 ) ; }
|
|
williamr@4
|
48 |
|
|
williamr@4
|
49 |
# elif ! defined (_STLP_NO_EXTERN_INLINE)
|
|
williamr@4
|
50 |
|
|
williamr@4
|
51 |
extern "C" __stl_atomic_t _STLP_atomic_exchange(__stl_atomic_t * __x, __stl_atomic_t __v);
|
|
williamr@4
|
52 |
extern "C" void _STLP_atomic_decrement(__stl_atomic_t* i);
|
|
williamr@4
|
53 |
extern "C" void _STLP_atomic_increment(__stl_atomic_t* i);
|
|
williamr@4
|
54 |
|
|
williamr@4
|
55 |
# define _STLP_ATOMIC_INCREMENT(__x) _STLP_atomic_increment((__stl_atomic_t*)__x)
|
|
williamr@4
|
56 |
# define _STLP_ATOMIC_DECREMENT(__x) _STLP_atomic_decrement((__stl_atomic_t*)__x)
|
|
williamr@4
|
57 |
# define _STLP_ATOMIC_EXCHANGE(__x, __y) _STLP_atomic_exchange((__stl_atomic_t*)__x, (__stl_atomic_t)__y)
|
|
williamr@4
|
58 |
|
|
williamr@4
|
59 |
# endif
|
|
williamr@4
|
60 |
|