Merge branch 'next' into for-linus
[linux-2.6] / include / asm-xtensa / system.h
1 /*
2  * include/asm-xtensa/system.h
3  *
4  * This file is subject to the terms and conditions of the GNU General Public
5  * License.  See the file "COPYING" in the main directory of this archive
6  * for more details.
7  *
8  * Copyright (C) 2001 - 2005 Tensilica Inc.
9  */
10
11 #ifndef _XTENSA_SYSTEM_H
12 #define _XTENSA_SYSTEM_H
13
14 #include <linux/stringify.h>
15
16 #include <asm/processor.h>
17
18 /* interrupt control */
19
20 #define local_save_flags(x)                                             \
21         __asm__ __volatile__ ("rsr %0,"__stringify(PS) : "=a" (x));
22 #define local_irq_restore(x)    do {                                    \
23         __asm__ __volatile__ ("wsr %0, "__stringify(PS)" ; rsync"       \
24                               :: "a" (x) : "memory"); } while(0);
25 #define local_irq_save(x)       do {                                    \
26         __asm__ __volatile__ ("rsil %0, "__stringify(LOCKLEVEL)         \
27                               : "=a" (x) :: "memory");} while(0);
28
29 static inline void local_irq_disable(void)
30 {
31         unsigned long flags;
32         __asm__ __volatile__ ("rsil %0, "__stringify(LOCKLEVEL)
33                               : "=a" (flags) :: "memory");
34 }
35 static inline void local_irq_enable(void)
36 {
37         unsigned long flags;
38         __asm__ __volatile__ ("rsil %0, 0" : "=a" (flags) :: "memory");
39
40 }
41
42 static inline int irqs_disabled(void)
43 {
44         unsigned long flags;
45         local_save_flags(flags);
46         return flags & 0xf;
47 }
48
49
50 #define smp_read_barrier_depends() do { } while(0)
51 #define read_barrier_depends() do { } while(0)
52
53 #define mb()  barrier()
54 #define rmb() mb()
55 #define wmb() mb()
56
57 #ifdef CONFIG_SMP
58 #error smp_* not defined
59 #else
60 #define smp_mb()        barrier()
61 #define smp_rmb()       barrier()
62 #define smp_wmb()       barrier()
63 #endif
64
65 #define set_mb(var, value)      do { var = value; mb(); } while (0)
66
67 #if !defined (__ASSEMBLY__)
68
69 /* * switch_to(n) should switch tasks to task nr n, first
70  * checking that n isn't the current task, in which case it does nothing.
71  */
72 extern void *_switch_to(void *last, void *next);
73
74 #endif  /* __ASSEMBLY__ */
75
76 #define switch_to(prev,next,last)               \
77 do {                                            \
78         (last) = _switch_to(prev, next);        \
79 } while(0)
80
81 /*
82  * cmpxchg
83  */
84
85 static inline unsigned long
86 __cmpxchg_u32(volatile int *p, int old, int new)
87 {
88   __asm__ __volatile__("rsil    a15, "__stringify(LOCKLEVEL)"\n\t"
89                        "l32i    %0, %1, 0              \n\t"
90                        "bne     %0, %2, 1f             \n\t"
91                        "s32i    %3, %1, 0              \n\t"
92                        "1:                             \n\t"
93                        "wsr     a15, "__stringify(PS)" \n\t"
94                        "rsync                          \n\t"
95                        : "=&a" (old)
96                        : "a" (p), "a" (old), "r" (new)
97                        : "a15", "memory");
98   return old;
99 }
100 /* This function doesn't exist, so you'll get a linker error
101  * if something tries to do an invalid cmpxchg(). */
102
103 extern void __cmpxchg_called_with_bad_pointer(void);
104
105 static __inline__ unsigned long
106 __cmpxchg(volatile void *ptr, unsigned long old, unsigned long new, int size)
107 {
108         switch (size) {
109         case 4:  return __cmpxchg_u32(ptr, old, new);
110         default: __cmpxchg_called_with_bad_pointer();
111                  return old;
112         }
113 }
114
115 #define cmpxchg(ptr,o,n)                                                      \
116         ({ __typeof__(*(ptr)) _o_ = (o);                                      \
117            __typeof__(*(ptr)) _n_ = (n);                                      \
118            (__typeof__(*(ptr))) __cmpxchg((ptr), (unsigned long)_o_,          \
119                                         (unsigned long)_n_, sizeof (*(ptr))); \
120         })
121
122 #include <asm-generic/cmpxchg-local.h>
123
124 static inline unsigned long __cmpxchg_local(volatile void *ptr,
125                                       unsigned long old,
126                                       unsigned long new, int size)
127 {
128         switch (size) {
129         case 4:
130                 return __cmpxchg_u32(ptr, old, new);
131         default:
132                 return __cmpxchg_local_generic(ptr, old, new, size);
133         }
134
135         return old;
136 }
137
138 /*
139  * cmpxchg_local and cmpxchg64_local are atomic wrt current CPU. Always make
140  * them available.
141  */
142 #define cmpxchg_local(ptr, o, n)                                               \
143         ((__typeof__(*(ptr)))__cmpxchg_local_generic((ptr), (unsigned long)(o),\
144                         (unsigned long)(n), sizeof(*(ptr))))
145 #define cmpxchg64_local(ptr, o, n) __cmpxchg64_local_generic((ptr), (o), (n))
146
147 /*
148  * xchg_u32
149  *
150  * Note that a15 is used here because the register allocation
151  * done by the compiler is not guaranteed and a window overflow
152  * may not occur between the rsil and wsr instructions. By using
153  * a15 in the rsil, the machine is guaranteed to be in a state
154  * where no register reference will cause an overflow.
155  */
156
157 static inline unsigned long xchg_u32(volatile int * m, unsigned long val)
158 {
159   unsigned long tmp;
160   __asm__ __volatile__("rsil    a15, "__stringify(LOCKLEVEL)"\n\t"
161                        "l32i    %0, %1, 0              \n\t"
162                        "s32i    %2, %1, 0              \n\t"
163                        "wsr     a15, "__stringify(PS)" \n\t"
164                        "rsync                          \n\t"
165                        : "=&a" (tmp)
166                        : "a" (m), "a" (val)
167                        : "a15", "memory");
168   return tmp;
169 }
170
171 #define xchg(ptr,x) ((__typeof__(*(ptr)))__xchg((unsigned long)(x),(ptr),sizeof(*(ptr))))
172
173 /*
174  * This only works if the compiler isn't horribly bad at optimizing.
175  * gcc-2.5.8 reportedly can't handle this, but I define that one to
176  * be dead anyway.
177  */
178
179 extern void __xchg_called_with_bad_pointer(void);
180
181 static __inline__ unsigned long
182 __xchg(unsigned long x, volatile void * ptr, int size)
183 {
184         switch (size) {
185                 case 4:
186                         return xchg_u32(ptr, x);
187         }
188         __xchg_called_with_bad_pointer();
189         return x;
190 }
191
192 extern void set_except_vector(int n, void *addr);
193
194 static inline void spill_registers(void)
195 {
196         unsigned int a0, ps;
197
198         __asm__ __volatile__ (
199                 "movi   a14," __stringify (PS_EXCM_BIT) " | 1\n\t"
200                 "mov    a12, a0\n\t"
201                 "rsr    a13," __stringify(SAR) "\n\t"
202                 "xsr    a14," __stringify(PS) "\n\t"
203                 "movi   a0, _spill_registers\n\t"
204                 "rsync\n\t"
205                 "callx0 a0\n\t"
206                 "mov    a0, a12\n\t"
207                 "wsr    a13," __stringify(SAR) "\n\t"
208                 "wsr    a14," __stringify(PS) "\n\t"
209                 :: "a" (&a0), "a" (&ps)
210                 : "a2", "a3", "a4", "a7", "a11", "a12", "a13", "a14", "a15", "memory");
211 }
212
213 #define arch_align_stack(x) (x)
214
215 #endif  /* _XTENSA_SYSTEM_H */