1
2
3
4
5
6
7
8
9
10
11
12
13#ifndef __ASM_S390_PROCESSOR_H
14#define __ASM_S390_PROCESSOR_H
15
16#include <linux/linkage.h>
17#include <asm/cpu.h>
18#include <asm/page.h>
19#include <asm/ptrace.h>
20#include <asm/setup.h>
21
22#ifdef __KERNEL__
23
24
25
26
27#define current_text_addr() ({ void *pc; asm("basr %0,0" : "=a" (pc)); pc; })
28
29static inline void get_cpu_id(struct cpuid *ptr)
30{
31 asm volatile("stidp 0(%1)" : "=m" (*ptr) : "a" (ptr));
32}
33
34extern void s390_adjust_jiffies(void);
35extern void print_cpu_info(void);
36extern int get_cpu_capability(unsigned int *);
37
38
39
40
41#ifndef __s390x__
42
43#define TASK_SIZE (1UL << 31)
44#define TASK_UNMAPPED_BASE (1UL << 30)
45
46#else
47
48#define TASK_SIZE_OF(tsk) ((tsk)->mm->context.asce_limit)
49#define TASK_UNMAPPED_BASE (test_thread_flag(TIF_31BIT) ? \
50 (1UL << 30) : (1UL << 41))
51#define TASK_SIZE TASK_SIZE_OF(current)
52
53#endif
54
55#ifdef __KERNEL__
56
57#ifndef __s390x__
58#define STACK_TOP (1UL << 31)
59#define STACK_TOP_MAX (1UL << 31)
60#else
61#define STACK_TOP (1UL << (test_thread_flag(TIF_31BIT) ? 31:42))
62#define STACK_TOP_MAX (1UL << 42)
63#endif
64
65
66#endif
67
68#define HAVE_ARCH_PICK_MMAP_LAYOUT
69
70typedef struct {
71 __u32 ar4;
72} mm_segment_t;
73
74
75
76
77struct thread_struct {
78 s390_fp_regs fp_regs;
79 unsigned int acrs[NUM_ACRS];
80 unsigned long ksp;
81 mm_segment_t mm_segment;
82 unsigned long prot_addr;
83 unsigned int trap_no;
84 per_struct per_info;
85
86 unsigned long ieee_instruction_pointer;
87
88 unsigned long pfault_wait;
89};
90
91typedef struct thread_struct thread_struct;
92
93
94
95
96#ifndef __PACK_STACK
97struct stack_frame {
98 unsigned long back_chain;
99 unsigned long empty1[5];
100 unsigned long gprs[10];
101 unsigned int empty2[8];
102};
103#else
104struct stack_frame {
105 unsigned long empty1[5];
106 unsigned int empty2[8];
107 unsigned long gprs[10];
108 unsigned long back_chain;
109};
110#endif
111
112#define ARCH_MIN_TASKALIGN 8
113
114#define INIT_THREAD { \
115 .ksp = sizeof(init_stack) + (unsigned long) &init_stack, \
116}
117
118
119
120
121#define start_thread(regs, new_psw, new_stackp) do { \
122 set_fs(USER_DS); \
123 regs->psw.mask = psw_user_bits; \
124 regs->psw.addr = new_psw | PSW_ADDR_AMODE; \
125 regs->gprs[15] = new_stackp; \
126} while (0)
127
128#define start_thread31(regs, new_psw, new_stackp) do { \
129 set_fs(USER_DS); \
130 regs->psw.mask = psw_user32_bits; \
131 regs->psw.addr = new_psw | PSW_ADDR_AMODE; \
132 regs->gprs[15] = new_stackp; \
133 crst_table_downgrade(current->mm, 1UL << 31); \
134} while (0)
135
136
137struct task_struct;
138struct mm_struct;
139struct seq_file;
140
141
142extern void release_thread(struct task_struct *);
143extern int kernel_thread(int (*fn)(void *), void * arg, unsigned long flags);
144
145
146#define prepare_to_copy(tsk) do { } while (0)
147
148
149
150
151extern unsigned long thread_saved_pc(struct task_struct *t);
152
153
154
155
156extern void task_show_regs(struct seq_file *m, struct task_struct *task);
157
158extern void show_code(struct pt_regs *regs);
159
160unsigned long get_wchan(struct task_struct *p);
161#define task_pt_regs(tsk) ((struct pt_regs *) \
162 (task_stack_page(tsk) + THREAD_SIZE) - 1)
163#define KSTK_EIP(tsk) (task_pt_regs(tsk)->psw.addr)
164#define KSTK_ESP(tsk) (task_pt_regs(tsk)->gprs[15])
165
166
167
168
169static inline void cpu_relax(void)
170{
171 if (MACHINE_HAS_DIAG44)
172 asm volatile("diag 0,0,68");
173 barrier();
174}
175
176static inline void psw_set_key(unsigned int key)
177{
178 asm volatile("spka 0(%0)" : : "d" (key));
179}
180
181
182
183
184static inline void __load_psw(psw_t psw)
185{
186#ifndef __s390x__
187 asm volatile("lpsw 0(%0)" : : "a" (&psw), "m" (psw) : "cc");
188#else
189 asm volatile("lpswe 0(%0)" : : "a" (&psw), "m" (psw) : "cc");
190#endif
191}
192
193
194
195
196
197
198static inline void __load_psw_mask (unsigned long mask)
199{
200 unsigned long addr;
201 psw_t psw;
202
203 psw.mask = mask;
204
205#ifndef __s390x__
206 asm volatile(
207 " basr %0,0\n"
208 "0: ahi %0,1f-0b\n"
209 " st %0,4(%1)\n"
210 " lpsw 0(%1)\n"
211 "1:"
212 : "=&d" (addr) : "a" (&psw), "m" (psw) : "memory", "cc");
213#else
214 asm volatile(
215 " larl %0,1f\n"
216 " stg %0,8(%1)\n"
217 " lpswe 0(%1)\n"
218 "1:"
219 : "=&d" (addr) : "a" (&psw), "m" (psw) : "memory", "cc");
220#endif
221}
222
223
224
225
226static inline void enabled_wait(void)
227{
228 __load_psw_mask(PSW_BASE_BITS | PSW_MASK_IO | PSW_MASK_EXT |
229 PSW_MASK_MCHECK | PSW_MASK_WAIT | PSW_DEFAULT_KEY);
230}
231
232
233
234
235
236static inline void ATTRIB_NORET disabled_wait(unsigned long code)
237{
238 unsigned long ctl_buf;
239 psw_t dw_psw;
240
241 dw_psw.mask = PSW_BASE_BITS | PSW_MASK_WAIT;
242 dw_psw.addr = code;
243
244
245
246
247#ifndef __s390x__
248 asm volatile(
249 " stctl 0,0,0(%2)\n"
250 " ni 0(%2),0xef\n"
251 " lctl 0,0,0(%2)\n"
252 " stpt 0xd8\n"
253 " stckc 0xe0\n"
254 " stpx 0x108\n"
255 " stam 0,15,0x120\n"
256 " std 0,0x160\n"
257 " std 2,0x168\n"
258 " std 4,0x170\n"
259 " std 6,0x178\n"
260 " stm 0,15,0x180\n"
261 " stctl 0,15,0x1c0\n"
262 " oi 0x1c0,0x10\n"
263 " lpsw 0(%1)"
264 : "=m" (ctl_buf)
265 : "a" (&dw_psw), "a" (&ctl_buf), "m" (dw_psw) : "cc");
266#else
267 asm volatile(
268 " stctg 0,0,0(%2)\n"
269 " ni 4(%2),0xef\n"
270 " lctlg 0,0,0(%2)\n"
271 " lghi 1,0x1000\n"
272 " stpt 0x328(1)\n"
273 " stckc 0x330(1)\n"
274 " stpx 0x318(1)\n"
275 " stam 0,15,0x340(1)\n"
276 " stfpc 0x31c(1)\n"
277 " std 0,0x200(1)\n"
278 " std 1,0x208(1)\n"
279 " std 2,0x210(1)\n"
280 " std 3,0x218(1)\n"
281 " std 4,0x220(1)\n"
282 " std 5,0x228(1)\n"
283 " std 6,0x230(1)\n"
284 " std 7,0x238(1)\n"
285 " std 8,0x240(1)\n"
286 " std 9,0x248(1)\n"
287 " std 10,0x250(1)\n"
288 " std 11,0x258(1)\n"
289 " std 12,0x260(1)\n"
290 " std 13,0x268(1)\n"
291 " std 14,0x270(1)\n"
292 " std 15,0x278(1)\n"
293 " stmg 0,15,0x280(1)\n"
294 " stctg 0,15,0x380(1)\n"
295 " oi 0x384(1),0x10\n"
296 " lpswe 0(%1)"
297 : "=m" (ctl_buf)
298 : "a" (&dw_psw), "a" (&ctl_buf), "m" (dw_psw) : "cc", "0", "1");
299#endif
300 while (1);
301}
302
303
304
305
306
307extern void s390_base_mcck_handler(void);
308extern void s390_base_pgm_handler(void);
309extern void s390_base_ext_handler(void);
310
311extern void (*s390_base_mcck_handler_fn)(void);
312extern void (*s390_base_pgm_handler_fn)(void);
313extern void (*s390_base_ext_handler_fn)(void);
314
315#define ARCH_LOW_ADDRESS_LIMIT 0x7fffffffUL
316
317#endif
318
319
320
321
322#ifndef __s390x__
323#define EX_TABLE(_fault,_target) \
324 ".section __ex_table,\"a\"\n" \
325 " .align 4\n" \
326 " .long " #_fault "," #_target "\n" \
327 ".previous\n"
328#else
329#define EX_TABLE(_fault,_target) \
330 ".section __ex_table,\"a\"\n" \
331 " .align 8\n" \
332 " .quad " #_fault "," #_target "\n" \
333 ".previous\n"
334#endif
335
336#endif
337