superh port
[musl] / arch / superh / atomic.h
1 #ifndef _INTERNAL_ATOMIC_H
2 #define _INTERNAL_ATOMIC_H
3
4 #include <stdint.h>
5
6 static inline int a_ctz_l(unsigned long x)
7 {
8         static const char debruijn32[32] = {
9                 0, 1, 23, 2, 29, 24, 19, 3, 30, 27, 25, 11, 20, 8, 4, 13,
10                 31, 22, 28, 18, 26, 10, 7, 12, 21, 17, 9, 6, 16, 5, 15, 14
11         };
12         return debruijn32[(x&-x)*0x076be629 >> 27];
13 }
14
15 static inline int a_ctz_64(uint64_t x)
16 {
17         uint32_t y = x;
18         if (!y) {
19                 y = x>>32;
20                 return 32 + a_ctz_l(y);
21         }
22         return a_ctz_l(y);
23 }
24
25 int  __sh_cas(volatile int *, int, int);
26 int  __sh_swap(volatile int *, int);
27 int  __sh_fetch_add(volatile int *, int);
28 void __sh_store(volatile int *, int);
29 void __sh_and(volatile int *, int);
30 void __sh_or(volatile int *, int);
31
32 #define a_cas(p,t,s)     __sh_cas(p,t,s)
33 #define a_swap(x,v)      __sh_swap(x,v)
34 #define a_fetch_add(x,v) __sh_fetch_add(x, v)
35 #define a_store(x,v)     __sh_store(x, v)
36 #define a_and(x,v)       __sh_and(x, v)
37 #define a_or(x,v)        __sh_or(x, v)
38
39 static inline void *a_cas_p(volatile void *p, void *t, void *s)
40 {
41         return (void *)a_cas(p, (int)t, (int)s);
42 }
43
44 static inline long a_cas_l(volatile void *p, long t, long s)
45 {
46         return a_cas(p, t, s);
47 }
48
49 static inline void a_inc(volatile int *x)
50 {
51         a_fetch_add(x, 1);
52 }
53
54 static inline void a_dec(volatile int *x)
55 {
56         a_fetch_add(x, -1);
57 }
58
59 static inline void a_spin()
60 {
61 }
62
63 static inline void a_crash()
64 {
65         *(volatile char *)0=0;
66 }
67
68 static inline void a_or_l(volatile void *p, long v)
69 {
70         a_or(p, v);
71 }
72
73 static inline void a_and_64(volatile uint64_t *p, uint64_t v)
74 {
75         union { uint64_t v; uint32_t r[2]; } u = { v };
76         a_and((int *)p,   u.r[0]);
77         a_and((int *)p+1, u.r[1]);
78 }
79
80 static inline void a_or_64(volatile uint64_t *p, uint64_t v)
81 {
82         union { uint64_t v; uint32_t r[2]; } u = { v };
83         a_or((int *)p,   u.r[0]);
84         a_or((int *)p+1, u.r[1]);
85 }
86
87 #endif