Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* $Id: system.h,v 1.69 2002/02/09 19:49:31 davem Exp $ */ |
2 | #ifndef __SPARC64_SYSTEM_H | |
3 | #define __SPARC64_SYSTEM_H | |
4 | ||
5 | #include <linux/config.h> | |
6 | #include <asm/ptrace.h> | |
7 | #include <asm/processor.h> | |
8 | #include <asm/visasm.h> | |
9 | ||
10 | #ifndef __ASSEMBLY__ | |
11 | /* | |
12 | * Sparc (general) CPU types | |
13 | */ | |
14 | enum sparc_cpu { | |
15 | sun4 = 0x00, | |
16 | sun4c = 0x01, | |
17 | sun4m = 0x02, | |
18 | sun4d = 0x03, | |
19 | sun4e = 0x04, | |
20 | sun4u = 0x05, /* V8 ploos ploos */ | |
21 | sun_unknown = 0x06, | |
22 | ap1000 = 0x07, /* almost a sun4m */ | |
23 | }; | |
24 | ||
25 | #define sparc_cpu_model sun4u | |
26 | ||
27 | /* This cannot ever be a sun4c nor sun4 :) That's just history. */ | |
28 | #define ARCH_SUN4C_SUN4 0 | |
29 | #define ARCH_SUN4 0 | |
30 | ||
4d803fcd DM |
31 | /* These are here in an effort to more fully work around Spitfire Errata |
32 | * #51. Essentially, if a memory barrier occurs soon after a mispredicted | |
33 | * branch, the chip can stop executing instructions until a trap occurs. | |
34 | * Therefore, if interrupts are disabled, the chip can hang forever. | |
35 | * | |
36 | * It used to be believed that the memory barrier had to be right in the | |
37 | * delay slot, but a case has been traced recently wherein the memory barrier | |
38 | * was one instruction after the branch delay slot and the chip still hung. | |
39 | * The offending sequence was the following in sym_wakeup_done() of the | |
40 | * sym53c8xx_2 driver: | |
41 | * | |
42 | * call sym_ccb_from_dsa, 0 | |
43 | * movge %icc, 0, %l0 | |
44 | * brz,pn %o0, .LL1303 | |
45 | * mov %o0, %l2 | |
46 | * membar #LoadLoad | |
47 | * | |
48 | * The branch has to be mispredicted for the bug to occur. Therefore, we put | |
49 | * the memory barrier explicitly into a "branch always, predicted taken" | |
50 | * delay slot to avoid the problem case. | |
51 | */ | |
52 | #define membar_safe(type) \ | |
53 | do { __asm__ __volatile__("ba,pt %%xcc, 1f\n\t" \ | |
54 | " membar " type "\n" \ | |
55 | "1:\n" \ | |
56 | : : : "memory"); \ | |
57 | } while (0) | |
58 | ||
59 | #define mb() \ | |
60 | membar_safe("#LoadLoad | #LoadStore | #StoreStore | #StoreLoad") | |
61 | #define rmb() \ | |
62 | membar_safe("#LoadLoad") | |
63 | #define wmb() \ | |
64 | membar_safe("#StoreStore") | |
65 | #define membar_storeload() \ | |
66 | membar_safe("#StoreLoad") | |
67 | #define membar_storeload_storestore() \ | |
68 | membar_safe("#StoreLoad | #StoreStore") | |
69 | #define membar_storeload_loadload() \ | |
70 | membar_safe("#StoreLoad | #LoadLoad") | |
71 | #define membar_storestore_loadstore() \ | |
72 | membar_safe("#StoreStore | #LoadStore") | |
4f07118f | 73 | |
1da177e4 LT |
74 | #endif |
75 | ||
76 | #define setipl(__new_ipl) \ | |
77 | __asm__ __volatile__("wrpr %0, %%pil" : : "r" (__new_ipl) : "memory") | |
78 | ||
79 | #define local_irq_disable() \ | |
80 | __asm__ __volatile__("wrpr 15, %%pil" : : : "memory") | |
81 | ||
82 | #define local_irq_enable() \ | |
83 | __asm__ __volatile__("wrpr 0, %%pil" : : : "memory") | |
84 | ||
85 | #define getipl() \ | |
86 | ({ unsigned long retval; __asm__ __volatile__("rdpr %%pil, %0" : "=r" (retval)); retval; }) | |
87 | ||
88 | #define swap_pil(__new_pil) \ | |
89 | ({ unsigned long retval; \ | |
90 | __asm__ __volatile__("rdpr %%pil, %0\n\t" \ | |
91 | "wrpr %1, %%pil" \ | |
92 | : "=&r" (retval) \ | |
93 | : "r" (__new_pil) \ | |
94 | : "memory"); \ | |
95 | retval; \ | |
96 | }) | |
97 | ||
98 | #define read_pil_and_cli() \ | |
99 | ({ unsigned long retval; \ | |
100 | __asm__ __volatile__("rdpr %%pil, %0\n\t" \ | |
101 | "wrpr 15, %%pil" \ | |
102 | : "=r" (retval) \ | |
103 | : : "memory"); \ | |
104 | retval; \ | |
105 | }) | |
106 | ||
107 | #define local_save_flags(flags) ((flags) = getipl()) | |
108 | #define local_irq_save(flags) ((flags) = read_pil_and_cli()) | |
109 | #define local_irq_restore(flags) setipl((flags)) | |
110 | ||
111 | /* On sparc64 IRQ flags are the PIL register. A value of zero | |
112 | * means all interrupt levels are enabled, any other value means | |
113 | * only IRQ levels greater than that value will be received. | |
114 | * Consequently this means that the lowest IRQ level is one. | |
115 | */ | |
116 | #define irqs_disabled() \ | |
117 | ({ unsigned long flags; \ | |
118 | local_save_flags(flags);\ | |
119 | (flags > 0); \ | |
120 | }) | |
121 | ||
122 | #define nop() __asm__ __volatile__ ("nop") | |
123 | ||
1da177e4 LT |
124 | #define read_barrier_depends() do { } while(0) |
125 | #define set_mb(__var, __value) \ | |
4f07118f | 126 | do { __var = __value; membar_storeload_storestore(); } while(0) |
1da177e4 | 127 | #define set_wmb(__var, __value) \ |
4f07118f | 128 | do { __var = __value; wmb(); } while(0) |
1da177e4 LT |
129 | |
130 | #ifdef CONFIG_SMP | |
131 | #define smp_mb() mb() | |
132 | #define smp_rmb() rmb() | |
133 | #define smp_wmb() wmb() | |
134 | #define smp_read_barrier_depends() read_barrier_depends() | |
135 | #else | |
136 | #define smp_mb() __asm__ __volatile__("":::"memory") | |
137 | #define smp_rmb() __asm__ __volatile__("":::"memory") | |
138 | #define smp_wmb() __asm__ __volatile__("":::"memory") | |
139 | #define smp_read_barrier_depends() do { } while(0) | |
140 | #endif | |
141 | ||
142 | #define flushi(addr) __asm__ __volatile__ ("flush %0" : : "r" (addr) : "memory") | |
143 | ||
144 | #define flushw_all() __asm__ __volatile__("flushw") | |
145 | ||
146 | /* Performance counter register access. */ | |
147 | #define read_pcr(__p) __asm__ __volatile__("rd %%pcr, %0" : "=r" (__p)) | |
148 | #define write_pcr(__p) __asm__ __volatile__("wr %0, 0x0, %%pcr" : : "r" (__p)) | |
149 | #define read_pic(__p) __asm__ __volatile__("rd %%pic, %0" : "=r" (__p)) | |
150 | ||
151 | /* Blackbird errata workaround. See commentary in | |
152 | * arch/sparc64/kernel/smp.c:smp_percpu_timer_interrupt() | |
153 | * for more information. | |
154 | */ | |
155 | #define reset_pic() \ | |
156 | __asm__ __volatile__("ba,pt %xcc, 99f\n\t" \ | |
157 | ".align 64\n" \ | |
158 | "99:wr %g0, 0x0, %pic\n\t" \ | |
159 | "rd %pic, %g0") | |
160 | ||
161 | #ifndef __ASSEMBLY__ | |
162 | ||
163 | extern void sun_do_break(void); | |
164 | extern int serial_console; | |
165 | extern int stop_a_enabled; | |
166 | ||
167 | static __inline__ int con_is_present(void) | |
168 | { | |
169 | return serial_console ? 0 : 1; | |
170 | } | |
171 | ||
172 | extern void synchronize_user_stack(void); | |
173 | ||
174 | extern void __flushw_user(void); | |
175 | #define flushw_user() __flushw_user() | |
176 | ||
177 | #define flush_user_windows flushw_user | |
178 | #define flush_register_windows flushw_all | |
179 | ||
4866cde0 NP |
180 | /* Don't hold the runqueue lock over context switch */ |
181 | #define __ARCH_WANT_UNLOCKED_CTXSW | |
182 | #define prepare_arch_switch(next) \ | |
183 | do { \ | |
1da177e4 LT |
184 | flushw_all(); \ |
185 | } while (0) | |
186 | ||
1da177e4 LT |
187 | /* See what happens when you design the chip correctly? |
188 | * | |
189 | * We tell gcc we clobber all non-fixed-usage registers except | |
190 | * for l0/l1. It will use one for 'next' and the other to hold | |
191 | * the output value of 'last'. 'next' is not referenced again | |
192 | * past the invocation of switch_to in the scheduler, so we need | |
193 | * not preserve it's value. Hairy, but it lets us remove 2 loads | |
194 | * and 2 stores in this critical code path. -DaveM | |
195 | */ | |
1da177e4 | 196 | #define EXTRA_CLOBBER ,"%l1" |
1da177e4 LT |
197 | #define switch_to(prev, next, last) \ |
198 | do { if (test_thread_flag(TIF_PERFCTR)) { \ | |
199 | unsigned long __tmp; \ | |
200 | read_pcr(__tmp); \ | |
201 | current_thread_info()->pcr_reg = __tmp; \ | |
202 | read_pic(__tmp); \ | |
203 | current_thread_info()->kernel_cntd0 += (unsigned int)(__tmp);\ | |
204 | current_thread_info()->kernel_cntd1 += ((__tmp) >> 32); \ | |
205 | } \ | |
206 | flush_tlb_pending(); \ | |
207 | save_and_clear_fpu(); \ | |
208 | /* If you are tempted to conditionalize the following */ \ | |
209 | /* so that ASI is only written if it changes, think again. */ \ | |
210 | __asm__ __volatile__("wr %%g0, %0, %%asi" \ | |
f3169641 | 211 | : : "r" (__thread_flag_byte_ptr(task_thread_info(next))[TI_FLAG_BYTE_CURRENT_DS]));\ |
56fb4df6 DM |
212 | trap_block[current_thread_info()->cpu].thread = \ |
213 | task_thread_info(next); \ | |
1da177e4 LT |
214 | __asm__ __volatile__( \ |
215 | "mov %%g4, %%g7\n\t" \ | |
1da177e4 LT |
216 | "stx %%i6, [%%sp + 2047 + 0x70]\n\t" \ |
217 | "stx %%i7, [%%sp + 2047 + 0x78]\n\t" \ | |
218 | "rdpr %%wstate, %%o5\n\t" \ | |
219 | "stx %%o6, [%%g6 + %3]\n\t" \ | |
220 | "stb %%o5, [%%g6 + %2]\n\t" \ | |
221 | "rdpr %%cwp, %%o5\n\t" \ | |
222 | "stb %%o5, [%%g6 + %5]\n\t" \ | |
223 | "mov %1, %%g6\n\t" \ | |
224 | "ldub [%1 + %5], %%g1\n\t" \ | |
225 | "wrpr %%g1, %%cwp\n\t" \ | |
226 | "ldx [%%g6 + %3], %%o6\n\t" \ | |
227 | "ldub [%%g6 + %2], %%o5\n\t" \ | |
db7d9a4e | 228 | "ldub [%%g6 + %4], %%o7\n\t" \ |
1da177e4 LT |
229 | "wrpr %%o5, 0x0, %%wstate\n\t" \ |
230 | "ldx [%%sp + 2047 + 0x70], %%i6\n\t" \ | |
231 | "ldx [%%sp + 2047 + 0x78], %%i7\n\t" \ | |
db7d9a4e | 232 | "ldx [%%g6 + %6], %%g4\n\t" \ |
db7d9a4e | 233 | "brz,pt %%o7, 1f\n\t" \ |
1da177e4 LT |
234 | " mov %%g7, %0\n\t" \ |
235 | "b,a ret_from_syscall\n\t" \ | |
236 | "1:\n\t" \ | |
237 | : "=&r" (last) \ | |
f3169641 | 238 | : "0" (task_thread_info(next)), \ |
db7d9a4e DM |
239 | "i" (TI_WSTATE), "i" (TI_KSP), "i" (TI_NEW_CHILD), \ |
240 | "i" (TI_CWP), "i" (TI_TASK) \ | |
1da177e4 LT |
241 | : "cc", \ |
242 | "g1", "g2", "g3", "g7", \ | |
243 | "l2", "l3", "l4", "l5", "l6", "l7", \ | |
244 | "i0", "i1", "i2", "i3", "i4", "i5", \ | |
245 | "o0", "o1", "o2", "o3", "o4", "o5", "o7" EXTRA_CLOBBER);\ | |
246 | /* If you fuck with this, update ret_from_syscall code too. */ \ | |
247 | if (test_thread_flag(TIF_PERFCTR)) { \ | |
248 | write_pcr(current_thread_info()->pcr_reg); \ | |
249 | reset_pic(); \ | |
250 | } \ | |
251 | } while(0) | |
252 | ||
4dc7a0bb IM |
253 | /* |
254 | * On SMP systems, when the scheduler does migration-cost autodetection, | |
255 | * it needs a way to flush as much of the CPU's caches as possible. | |
256 | * | |
257 | * TODO: fill this in! | |
258 | */ | |
259 | static inline void sched_cacheflush(void) | |
260 | { | |
261 | } | |
262 | ||
1da177e4 LT |
263 | static inline unsigned long xchg32(__volatile__ unsigned int *m, unsigned int val) |
264 | { | |
265 | unsigned long tmp1, tmp2; | |
266 | ||
267 | __asm__ __volatile__( | |
268 | " membar #StoreLoad | #LoadLoad\n" | |
269 | " mov %0, %1\n" | |
270 | "1: lduw [%4], %2\n" | |
271 | " cas [%4], %2, %0\n" | |
272 | " cmp %2, %0\n" | |
273 | " bne,a,pn %%icc, 1b\n" | |
274 | " mov %1, %0\n" | |
275 | " membar #StoreLoad | #StoreStore\n" | |
276 | : "=&r" (val), "=&r" (tmp1), "=&r" (tmp2) | |
277 | : "0" (val), "r" (m) | |
278 | : "cc", "memory"); | |
279 | return val; | |
280 | } | |
281 | ||
282 | static inline unsigned long xchg64(__volatile__ unsigned long *m, unsigned long val) | |
283 | { | |
284 | unsigned long tmp1, tmp2; | |
285 | ||
286 | __asm__ __volatile__( | |
287 | " membar #StoreLoad | #LoadLoad\n" | |
288 | " mov %0, %1\n" | |
289 | "1: ldx [%4], %2\n" | |
290 | " casx [%4], %2, %0\n" | |
291 | " cmp %2, %0\n" | |
292 | " bne,a,pn %%xcc, 1b\n" | |
293 | " mov %1, %0\n" | |
294 | " membar #StoreLoad | #StoreStore\n" | |
295 | : "=&r" (val), "=&r" (tmp1), "=&r" (tmp2) | |
296 | : "0" (val), "r" (m) | |
297 | : "cc", "memory"); | |
298 | return val; | |
299 | } | |
300 | ||
301 | #define xchg(ptr,x) ((__typeof__(*(ptr)))__xchg((unsigned long)(x),(ptr),sizeof(*(ptr)))) | |
302 | #define tas(ptr) (xchg((ptr),1)) | |
303 | ||
304 | extern void __xchg_called_with_bad_pointer(void); | |
305 | ||
306 | static __inline__ unsigned long __xchg(unsigned long x, __volatile__ void * ptr, | |
307 | int size) | |
308 | { | |
309 | switch (size) { | |
310 | case 4: | |
311 | return xchg32(ptr, x); | |
312 | case 8: | |
313 | return xchg64(ptr, x); | |
314 | }; | |
315 | __xchg_called_with_bad_pointer(); | |
316 | return x; | |
317 | } | |
318 | ||
319 | extern void die_if_kernel(char *str, struct pt_regs *regs) __attribute__ ((noreturn)); | |
320 | ||
321 | /* | |
322 | * Atomic compare and exchange. Compare OLD with MEM, if identical, | |
323 | * store NEW in MEM. Return the initial value in MEM. Success is | |
324 | * indicated by comparing RETURN with OLD. | |
325 | */ | |
326 | ||
327 | #define __HAVE_ARCH_CMPXCHG 1 | |
328 | ||
329 | static __inline__ unsigned long | |
330 | __cmpxchg_u32(volatile int *m, int old, int new) | |
331 | { | |
332 | __asm__ __volatile__("membar #StoreLoad | #LoadLoad\n" | |
333 | "cas [%2], %3, %0\n\t" | |
334 | "membar #StoreLoad | #StoreStore" | |
335 | : "=&r" (new) | |
336 | : "0" (new), "r" (m), "r" (old) | |
337 | : "memory"); | |
338 | ||
339 | return new; | |
340 | } | |
341 | ||
342 | static __inline__ unsigned long | |
343 | __cmpxchg_u64(volatile long *m, unsigned long old, unsigned long new) | |
344 | { | |
345 | __asm__ __volatile__("membar #StoreLoad | #LoadLoad\n" | |
346 | "casx [%2], %3, %0\n\t" | |
347 | "membar #StoreLoad | #StoreStore" | |
348 | : "=&r" (new) | |
349 | : "0" (new), "r" (m), "r" (old) | |
350 | : "memory"); | |
351 | ||
352 | return new; | |
353 | } | |
354 | ||
355 | /* This function doesn't exist, so you'll get a linker error | |
356 | if something tries to do an invalid cmpxchg(). */ | |
357 | extern void __cmpxchg_called_with_bad_pointer(void); | |
358 | ||
359 | static __inline__ unsigned long | |
360 | __cmpxchg(volatile void *ptr, unsigned long old, unsigned long new, int size) | |
361 | { | |
362 | switch (size) { | |
363 | case 4: | |
364 | return __cmpxchg_u32(ptr, old, new); | |
365 | case 8: | |
366 | return __cmpxchg_u64(ptr, old, new); | |
367 | } | |
368 | __cmpxchg_called_with_bad_pointer(); | |
369 | return old; | |
370 | } | |
371 | ||
372 | #define cmpxchg(ptr,o,n) \ | |
373 | ({ \ | |
374 | __typeof__(*(ptr)) _o_ = (o); \ | |
375 | __typeof__(*(ptr)) _n_ = (n); \ | |
376 | (__typeof__(*(ptr))) __cmpxchg((ptr), (unsigned long)_o_, \ | |
377 | (unsigned long)_n_, sizeof(*(ptr))); \ | |
378 | }) | |
379 | ||
380 | #endif /* !(__ASSEMBLY__) */ | |
381 | ||
382 | #define arch_align_stack(x) (x) | |
383 | ||
384 | #endif /* !(__SPARC64_SYSTEM_H) */ |