Commit | Line | Data |
---|---|---|
1da177e4 | 1 | /* |
1da177e4 LT |
2 | * S390 low-level entry points. |
3 | * | |
a53c8fab | 4 | * Copyright IBM Corp. 1999, 2012 |
1da177e4 | 5 | * Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com), |
25d83cbf HC |
6 | * Hartmut Penner (hp@de.ibm.com), |
7 | * Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com), | |
77fa2245 | 8 | * Heiko Carstens <heiko.carstens@de.ibm.com> |
1da177e4 LT |
9 | */ |
10 | ||
2bc89b5e | 11 | #include <linux/init.h> |
144d634a | 12 | #include <linux/linkage.h> |
eb608fb3 | 13 | #include <asm/processor.h> |
1da177e4 | 14 | #include <asm/cache.h> |
1da177e4 LT |
15 | #include <asm/errno.h> |
16 | #include <asm/ptrace.h> | |
17 | #include <asm/thread_info.h> | |
0013a854 | 18 | #include <asm/asm-offsets.h> |
1da177e4 LT |
19 | #include <asm/unistd.h> |
20 | #include <asm/page.h> | |
eb546195 | 21 | #include <asm/sigp.h> |
1f44a225 | 22 | #include <asm/irq.h> |
9977e886 HB |
23 | #include <asm/fpu-internal.h> |
24 | #include <asm/vx-insn.h> | |
1da177e4 | 25 | |
c5328901 MS |
26 | __PT_R0 = __PT_GPRS |
27 | __PT_R1 = __PT_GPRS + 8 | |
28 | __PT_R2 = __PT_GPRS + 16 | |
29 | __PT_R3 = __PT_GPRS + 24 | |
30 | __PT_R4 = __PT_GPRS + 32 | |
31 | __PT_R5 = __PT_GPRS + 40 | |
32 | __PT_R6 = __PT_GPRS + 48 | |
33 | __PT_R7 = __PT_GPRS + 56 | |
34 | __PT_R8 = __PT_GPRS + 64 | |
35 | __PT_R9 = __PT_GPRS + 72 | |
36 | __PT_R10 = __PT_GPRS + 80 | |
37 | __PT_R11 = __PT_GPRS + 88 | |
38 | __PT_R12 = __PT_GPRS + 96 | |
39 | __PT_R13 = __PT_GPRS + 104 | |
40 | __PT_R14 = __PT_GPRS + 112 | |
41 | __PT_R15 = __PT_GPRS + 120 | |
1da177e4 LT |
42 | |
43 | STACK_SHIFT = PAGE_SHIFT + THREAD_ORDER | |
44 | STACK_SIZE = 1 << STACK_SHIFT | |
dc7ee00d | 45 | STACK_INIT = STACK_SIZE - STACK_FRAME_OVERHEAD - __PT_SIZE |
1da177e4 | 46 | |
2a0a5b22 JW |
47 | _TIF_WORK = (_TIF_SIGPENDING | _TIF_NOTIFY_RESUME | _TIF_NEED_RESCHED | \ |
48 | _TIF_UPROBE) | |
d3a73acb MS |
49 | _TIF_TRACE = (_TIF_SYSCALL_TRACE | _TIF_SYSCALL_AUDIT | _TIF_SECCOMP | \ |
50 | _TIF_SYSCALL_TRACEPOINT) | |
9977e886 | 51 | _CIF_WORK = (_CIF_MCCK_PENDING | _CIF_ASCE | _CIF_FPU) |
d3a73acb | 52 | _PIF_WORK = (_PIF_PER_TRAP) |
1da177e4 | 53 | |
9977e886 | 54 | #define BASED(name) name-cleanup_critical(%r13) |
1da177e4 | 55 | |
1f194a4c | 56 | .macro TRACE_IRQS_ON |
c5328901 | 57 | #ifdef CONFIG_TRACE_IRQFLAGS |
6a2df3a8 MS |
58 | basr %r2,%r0 |
59 | brasl %r14,trace_hardirqs_on_caller | |
c5328901 | 60 | #endif |
1f194a4c HC |
61 | .endm |
62 | ||
63 | .macro TRACE_IRQS_OFF | |
c5328901 | 64 | #ifdef CONFIG_TRACE_IRQFLAGS |
6a2df3a8 MS |
65 | basr %r2,%r0 |
66 | brasl %r14,trace_hardirqs_off_caller | |
411788ea | 67 | #endif |
c5328901 | 68 | .endm |
411788ea | 69 | |
411788ea | 70 | .macro LOCKDEP_SYS_EXIT |
c5328901 MS |
71 | #ifdef CONFIG_LOCKDEP |
72 | tm __PT_PSW+1(%r11),0x01 # returning to user ? | |
73 | jz .+10 | |
411788ea | 74 | brasl %r14,lockdep_sys_exit |
1f194a4c | 75 | #endif |
1da177e4 | 76 | .endm |
1da177e4 | 77 | |
c5328901 | 78 | .macro CHECK_STACK stacksize,savearea |
63b12246 | 79 | #ifdef CONFIG_CHECK_STACK |
c5328901 MS |
80 | tml %r15,\stacksize - CONFIG_STACK_GUARD |
81 | lghi %r14,\savearea | |
82 | jz stack_overflow | |
63b12246 | 83 | #endif |
63b12246 MS |
84 | .endm |
85 | ||
2acb94f4 | 86 | .macro SWITCH_ASYNC savearea,timer |
c5328901 MS |
87 | tmhh %r8,0x0001 # interrupting from user ? |
88 | jnz 1f | |
89 | lgr %r14,%r9 | |
90 | slg %r14,BASED(.Lcritical_start) | |
91 | clg %r14,BASED(.Lcritical_length) | |
1da177e4 | 92 | jhe 0f |
c5328901 | 93 | lghi %r11,\savearea # inside critical section, do cleanup |
1da177e4 | 94 | brasl %r14,cleanup_critical |
c5328901 | 95 | tmhh %r8,0x0001 # retest problem state after cleanup |
1da177e4 | 96 | jnz 1f |
2acb94f4 | 97 | 0: lg %r14,__LC_ASYNC_STACK # are we already on the async stack? |
1da177e4 | 98 | slgr %r14,%r15 |
2acb94f4 | 99 | srag %r14,%r14,STACK_SHIFT |
a359bb11 | 100 | jnz 2f |
2acb94f4 | 101 | CHECK_STACK 1<<STACK_SHIFT,\savearea |
dc7ee00d | 102 | aghi %r15,-(STACK_FRAME_OVERHEAD + __PT_SIZE) |
a359bb11 MS |
103 | j 3f |
104 | 1: LAST_BREAK %r14 | |
105 | UPDATE_VTIME %r14,%r15,\timer | |
2acb94f4 | 106 | 2: lg %r15,__LC_ASYNC_STACK # load async stack |
a359bb11 | 107 | 3: la %r11,STACK_FRAME_OVERHEAD(%r15) |
25d83cbf | 108 | .endm |
1da177e4 | 109 | |
a359bb11 MS |
110 | .macro UPDATE_VTIME w1,w2,enter_timer |
111 | lg \w1,__LC_EXIT_TIMER | |
112 | lg \w2,__LC_LAST_UPDATE_TIMER | |
113 | slg \w1,\enter_timer | |
114 | slg \w2,__LC_EXIT_TIMER | |
115 | alg \w1,__LC_USER_TIMER | |
116 | alg \w2,__LC_SYSTEM_TIMER | |
117 | stg \w1,__LC_USER_TIMER | |
118 | stg \w2,__LC_SYSTEM_TIMER | |
c5328901 | 119 | mvc __LC_LAST_UPDATE_TIMER(8),\enter_timer |
1da177e4 LT |
120 | .endm |
121 | ||
c5328901 MS |
122 | .macro LAST_BREAK scratch |
123 | srag \scratch,%r10,23 | |
124 | jz .+10 | |
125 | stg %r10,__TI_last_break(%r12) | |
86f2552b MS |
126 | .endm |
127 | ||
1e54622e | 128 | .macro REENABLE_IRQS |
c5328901 MS |
129 | stg %r8,__LC_RETURN_PSW |
130 | ni __LC_RETURN_PSW,0xbf | |
131 | ssm __LC_RETURN_PSW | |
1e54622e MS |
132 | .endm |
133 | ||
473e66ba | 134 | .macro STCK savearea |
d652d596 | 135 | #ifdef CONFIG_HAVE_MARCH_Z9_109_FEATURES |
473e66ba HC |
136 | .insn s,0xb27c0000,\savearea # store clock fast |
137 | #else | |
138 | .insn s,0xb2050000,\savearea # store clock | |
139 | #endif | |
140 | .endm | |
141 | ||
860dba45 MS |
142 | .section .kprobes.text, "ax" |
143 | ||
1da177e4 LT |
144 | /* |
145 | * Scheduler resume function, called by switch_to | |
146 | * gpr2 = (task_struct *) prev | |
147 | * gpr3 = (task_struct *) next | |
148 | * Returns: | |
149 | * gpr2 = prev | |
150 | */ | |
144d634a | 151 | ENTRY(__switch_to) |
eda0c6d6 | 152 | stmg %r6,%r15,__SF_GPRS(%r15) # store gprs of prev task |
3827ec3d MS |
153 | lgr %r1,%r2 |
154 | aghi %r1,__TASK_thread # thread_struct of prev task | |
155 | lg %r4,__TASK_thread_info(%r2) # get thread_info of prev | |
156 | lg %r5,__TASK_thread_info(%r3) # get thread_info of next | |
157 | stg %r15,__THREAD_ksp(%r1) # store kernel stack of prev | |
158 | lgr %r1,%r3 | |
159 | aghi %r1,__TASK_thread # thread_struct of next task | |
eda0c6d6 | 160 | lgr %r15,%r5 |
dc7ee00d | 161 | aghi %r15,STACK_INIT # end of kernel stack of next |
eda0c6d6 MS |
162 | stg %r3,__LC_CURRENT # store task struct of next |
163 | stg %r5,__LC_THREAD_INFO # store thread info of next | |
164 | stg %r15,__LC_KERNEL_STACK # store end of kernel stack | |
3827ec3d | 165 | lg %r15,__THREAD_ksp(%r1) # load kernel stack of next |
eda0c6d6 MS |
166 | lctl %c4,%c4,__TASK_pid(%r3) # load pid to control reg. 4 |
167 | mvc __LC_CURRENT_PID+4(4,%r0),__TASK_pid(%r3) # store pid of next | |
d3a73acb | 168 | lmg %r6,%r15,__SF_GPRS(%r15) # load gprs of next task |
1da177e4 LT |
169 | br %r14 |
170 | ||
86ed42f4 | 171 | .L__critical_start: |
d0fc4107 MS |
172 | |
173 | #if IS_ENABLED(CONFIG_KVM) | |
174 | /* | |
175 | * sie64a calling convention: | |
176 | * %r2 pointer to sie control block | |
177 | * %r3 guest register save area | |
178 | */ | |
179 | ENTRY(sie64a) | |
180 | stmg %r6,%r14,__SF_GPRS(%r15) # save kernel registers | |
181 | stg %r2,__SF_EMPTY(%r15) # save control block pointer | |
182 | stg %r3,__SF_EMPTY+8(%r15) # save guest register save area | |
183 | xc __SF_EMPTY+16(16,%r15),__SF_EMPTY+16(%r15) # host id & reason | |
184 | tm __LC_CPU_FLAGS+7,_CIF_FPU # load guest fp/vx registers ? | |
185 | jno .Lsie_load_guest_gprs | |
186 | lg %r12,__LC_THREAD_INFO # load fp/vx regs save area | |
187 | brasl %r14,load_fpu_regs # load guest fp/vx regs | |
188 | .Lsie_load_guest_gprs: | |
189 | lmg %r0,%r13,0(%r3) # load guest gprs 0-13 | |
190 | lg %r14,__LC_GMAP # get gmap pointer | |
191 | ltgr %r14,%r14 | |
192 | jz .Lsie_gmap | |
193 | lctlg %c1,%c1,__GMAP_ASCE(%r14) # load primary asce | |
194 | .Lsie_gmap: | |
195 | lg %r14,__SF_EMPTY(%r15) # get control block pointer | |
196 | oi __SIE_PROG0C+3(%r14),1 # we are going into SIE now | |
197 | tm __SIE_PROG20+3(%r14),3 # last exit... | |
198 | jnz .Lsie_skip | |
199 | tm __LC_CPU_FLAGS+7,_CIF_FPU | |
200 | jo .Lsie_skip # exit if fp/vx regs changed | |
201 | tm __LC_MACHINE_FLAGS+6,0x20 # MACHINE_FLAG_LPP | |
202 | jz .Lsie_enter | |
203 | .insn s,0xb2800000,__SF_EMPTY(%r15) # set guest id | |
204 | .Lsie_enter: | |
205 | sie 0(%r14) | |
206 | tm __LC_MACHINE_FLAGS+6,0x20 # MACHINE_FLAG_LPP | |
207 | jz .Lsie_skip | |
208 | .insn s,0xb2800000,__SF_EMPTY+16(%r15)# set host id | |
209 | .Lsie_skip: | |
210 | ni __SIE_PROG0C+3(%r14),0xfe # no longer in SIE | |
211 | lctlg %c1,%c1,__LC_USER_ASCE # load primary asce | |
212 | .Lsie_done: | |
213 | # some program checks are suppressing. C code (e.g. do_protection_exception) | |
214 | # will rewind the PSW by the ILC, which is 4 bytes in case of SIE. Other | |
215 | # instructions between sie64a and .Lsie_done should not cause program | |
216 | # interrupts. So lets use a nop (47 00 00 00) as a landing pad. | |
217 | # See also .Lcleanup_sie | |
218 | .Lrewind_pad: | |
219 | nop 0 | |
220 | .globl sie_exit | |
221 | sie_exit: | |
222 | lg %r14,__SF_EMPTY+8(%r15) # load guest register save area | |
223 | stmg %r0,%r13,0(%r14) # save guest gprs 0-13 | |
224 | lmg %r6,%r14,__SF_GPRS(%r15) # restore kernel registers | |
225 | lg %r2,__SF_EMPTY+24(%r15) # return exit reason code | |
226 | br %r14 | |
227 | .Lsie_fault: | |
228 | lghi %r14,-EFAULT | |
229 | stg %r14,__SF_EMPTY+24(%r15) # set exit reason code | |
230 | j sie_exit | |
231 | ||
232 | EX_TABLE(.Lrewind_pad,.Lsie_fault) | |
233 | EX_TABLE(sie_exit,.Lsie_fault) | |
234 | #endif | |
235 | ||
1da177e4 LT |
236 | /* |
237 | * SVC interrupt handler routine. System calls are synchronous events and | |
238 | * are executed with interrupts enabled. | |
239 | */ | |
240 | ||
144d634a | 241 | ENTRY(system_call) |
c185b783 | 242 | stpt __LC_SYNC_ENTER_TIMER |
86ed42f4 | 243 | .Lsysc_stmg: |
c5328901 MS |
244 | stmg %r8,%r15,__LC_SAVE_AREA_SYNC |
245 | lg %r10,__LC_LAST_BREAK | |
246 | lg %r12,__LC_THREAD_INFO | |
d3a73acb | 247 | lghi %r14,_PIF_SYSCALL |
86ed42f4 | 248 | .Lsysc_per: |
c5328901 | 249 | lg %r15,__LC_KERNEL_STACK |
c5328901 | 250 | la %r11,STACK_FRAME_OVERHEAD(%r15) # pointer to pt_regs |
c5328901 | 251 | LAST_BREAK %r13 |
a359bb11 MS |
252 | .Lsysc_vtime: |
253 | UPDATE_VTIME %r10,%r13,__LC_SYNC_ENTER_TIMER | |
c5328901 MS |
254 | stmg %r0,%r7,__PT_R0(%r11) |
255 | mvc __PT_R8(64,%r11),__LC_SAVE_AREA_SYNC | |
256 | mvc __PT_PSW(16,%r11),__LC_SVC_OLD_PSW | |
aa33c8cb | 257 | mvc __PT_INT_CODE(4,%r11),__LC_SVC_ILC |
d3a73acb | 258 | stg %r14,__PT_FLAGS(%r11) |
86ed42f4 | 259 | .Lsysc_do_svc: |
61649881 | 260 | lg %r10,__TI_sysc_table(%r12) # address of system call table |
aa33c8cb | 261 | llgh %r8,__PT_INT_CODE+2(%r11) |
c5328901 | 262 | slag %r8,%r8,2 # shift and test for svc 0 |
86ed42f4 | 263 | jnz .Lsysc_nr_ok |
1da177e4 | 264 | # svc 0: system call number in %r1 |
c5328901 | 265 | llgfr %r1,%r1 # clear high word in r1 |
86f2552b | 266 | cghi %r1,NR_syscalls |
86ed42f4 | 267 | jnl .Lsysc_nr_ok |
aa33c8cb | 268 | sth %r1,__PT_INT_CODE+2(%r11) |
c5328901 | 269 | slag %r8,%r1,2 |
86ed42f4 | 270 | .Lsysc_nr_ok: |
c5328901 MS |
271 | xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) |
272 | stg %r2,__PT_ORIG_GPR2(%r11) | |
273 | stg %r7,STACK_FRAME_OVERHEAD(%r15) | |
274 | lgf %r9,0(%r8,%r10) # get system call add. | |
d3a73acb | 275 | tm __TI_flags+7(%r12),_TIF_TRACE |
86ed42f4 | 276 | jnz .Lsysc_tracesys |
c5328901 MS |
277 | basr %r14,%r9 # call sys_xxxx |
278 | stg %r2,__PT_R2(%r11) # store return value | |
1da177e4 | 279 | |
86ed42f4 | 280 | .Lsysc_return: |
6a2df3a8 | 281 | LOCKDEP_SYS_EXIT |
86ed42f4 | 282 | .Lsysc_tif: |
d3a73acb | 283 | tm __PT_FLAGS+7(%r11),_PIF_WORK |
86ed42f4 | 284 | jnz .Lsysc_work |
d3a73acb | 285 | tm __TI_flags+7(%r12),_TIF_WORK |
86ed42f4 | 286 | jnz .Lsysc_work # check for work |
d3a73acb | 287 | tm __LC_CPU_FLAGS+7,_CIF_WORK |
86ed42f4 MS |
288 | jnz .Lsysc_work |
289 | .Lsysc_restore: | |
c5328901 MS |
290 | lg %r14,__LC_VDSO_PER_CPU |
291 | lmg %r0,%r10,__PT_R0(%r11) | |
292 | mvc __LC_RETURN_PSW(16),__PT_PSW(%r11) | |
293 | stpt __LC_EXIT_TIMER | |
294 | mvc __VDSO_ECTG_BASE(16,%r14),__LC_EXIT_TIMER | |
295 | lmg %r11,%r15,__PT_R11(%r11) | |
296 | lpswe __LC_RETURN_PSW | |
86ed42f4 | 297 | .Lsysc_done: |
411788ea | 298 | |
43d399d2 MS |
299 | # |
300 | # One of the work bits is on. Find out which one. | |
301 | # | |
86ed42f4 | 302 | .Lsysc_work: |
d3a73acb | 303 | tm __LC_CPU_FLAGS+7,_CIF_MCCK_PENDING |
86ed42f4 | 304 | jo .Lsysc_mcck_pending |
86f2552b | 305 | tm __TI_flags+7(%r12),_TIF_NEED_RESCHED |
86ed42f4 | 306 | jo .Lsysc_reschedule |
2a0a5b22 JW |
307 | #ifdef CONFIG_UPROBES |
308 | tm __TI_flags+7(%r12),_TIF_UPROBE | |
86ed42f4 | 309 | jo .Lsysc_uprobe_notify |
2a0a5b22 | 310 | #endif |
d3a73acb | 311 | tm __PT_FLAGS+7(%r11),_PIF_PER_TRAP |
86ed42f4 | 312 | jo .Lsysc_singlestep |
86f2552b | 313 | tm __TI_flags+7(%r12),_TIF_SIGPENDING |
86ed42f4 | 314 | jo .Lsysc_sigpending |
86f2552b | 315 | tm __TI_flags+7(%r12),_TIF_NOTIFY_RESUME |
86ed42f4 | 316 | jo .Lsysc_notify_resume |
9977e886 HB |
317 | tm __LC_CPU_FLAGS+7,_CIF_FPU |
318 | jo .Lsysc_vxrs | |
d3a73acb | 319 | tm __LC_CPU_FLAGS+7,_CIF_ASCE |
86ed42f4 MS |
320 | jo .Lsysc_uaccess |
321 | j .Lsysc_return # beware of critical section cleanup | |
1da177e4 LT |
322 | |
323 | # | |
324 | # _TIF_NEED_RESCHED is set, call schedule | |
25d83cbf | 325 | # |
86ed42f4 MS |
326 | .Lsysc_reschedule: |
327 | larl %r14,.Lsysc_return | |
c5328901 | 328 | jg schedule |
1da177e4 | 329 | |
77fa2245 | 330 | # |
d3a73acb | 331 | # _CIF_MCCK_PENDING is set, call handler |
77fa2245 | 332 | # |
86ed42f4 MS |
333 | .Lsysc_mcck_pending: |
334 | larl %r14,.Lsysc_return | |
25d83cbf | 335 | jg s390_handle_mcck # TIF bit will be cleared by handler |
77fa2245 | 336 | |
457f2180 | 337 | # |
d3a73acb | 338 | # _CIF_ASCE is set, load user space asce |
457f2180 | 339 | # |
86ed42f4 | 340 | .Lsysc_uaccess: |
d3a73acb | 341 | ni __LC_CPU_FLAGS+7,255-_CIF_ASCE |
457f2180 | 342 | lctlg %c1,%c1,__LC_USER_ASCE # load primary asce |
86ed42f4 | 343 | j .Lsysc_return |
457f2180 | 344 | |
9977e886 HB |
345 | # |
346 | # CIF_FPU is set, restore floating-point controls and floating-point registers. | |
347 | # | |
348 | .Lsysc_vxrs: | |
349 | larl %r14,.Lsysc_return | |
350 | jg load_fpu_regs | |
351 | ||
1da177e4 | 352 | # |
02a029b3 | 353 | # _TIF_SIGPENDING is set, call do_signal |
1da177e4 | 354 | # |
86ed42f4 | 355 | .Lsysc_sigpending: |
c5328901 MS |
356 | lgr %r2,%r11 # pass pointer to pt_regs |
357 | brasl %r14,do_signal | |
d3a73acb | 358 | tm __PT_FLAGS+7(%r11),_PIF_SYSCALL |
86ed42f4 | 359 | jno .Lsysc_return |
c5328901 | 360 | lmg %r2,%r7,__PT_R2(%r11) # load svc arguments |
dbbfe487 | 361 | lg %r10,__TI_sysc_table(%r12) # address of system call table |
c5328901 | 362 | lghi %r8,0 # svc 0 returns -ENOSYS |
450e47da | 363 | llgh %r1,__PT_INT_CODE+2(%r11) # load new svc number |
b6ef5bb3 | 364 | cghi %r1,NR_syscalls |
86ed42f4 | 365 | jnl .Lsysc_nr_ok # invalid svc number -> do svc 0 |
c5328901 | 366 | slag %r8,%r1,2 |
86ed42f4 | 367 | j .Lsysc_nr_ok # restart svc |
1da177e4 | 368 | |
753c4dd6 MS |
369 | # |
370 | # _TIF_NOTIFY_RESUME is set, call do_notify_resume | |
371 | # | |
86ed42f4 | 372 | .Lsysc_notify_resume: |
c5328901 | 373 | lgr %r2,%r11 # pass pointer to pt_regs |
86ed42f4 | 374 | larl %r14,.Lsysc_return |
c5328901 | 375 | jg do_notify_resume |
753c4dd6 | 376 | |
2a0a5b22 JW |
377 | # |
378 | # _TIF_UPROBE is set, call uprobe_notify_resume | |
379 | # | |
380 | #ifdef CONFIG_UPROBES | |
86ed42f4 | 381 | .Lsysc_uprobe_notify: |
2a0a5b22 | 382 | lgr %r2,%r11 # pass pointer to pt_regs |
86ed42f4 | 383 | larl %r14,.Lsysc_return |
2a0a5b22 JW |
384 | jg uprobe_notify_resume |
385 | #endif | |
386 | ||
1da177e4 | 387 | # |
d3a73acb | 388 | # _PIF_PER_TRAP is set, call do_per_trap |
1da177e4 | 389 | # |
86ed42f4 | 390 | .Lsysc_singlestep: |
d3a73acb | 391 | ni __PT_FLAGS+7(%r11),255-_PIF_PER_TRAP |
c5328901 | 392 | lgr %r2,%r11 # pass pointer to pt_regs |
86ed42f4 | 393 | larl %r14,.Lsysc_return |
5e9a2692 | 394 | jg do_per_trap |
1da177e4 | 395 | |
1da177e4 | 396 | # |
753c4dd6 MS |
397 | # call tracehook_report_syscall_entry/tracehook_report_syscall_exit before |
398 | # and after the system call | |
1da177e4 | 399 | # |
86ed42f4 | 400 | .Lsysc_tracesys: |
c5328901 | 401 | lgr %r2,%r11 # pass pointer to pt_regs |
1da177e4 | 402 | la %r3,0 |
aa33c8cb | 403 | llgh %r0,__PT_INT_CODE+2(%r11) |
c5328901 | 404 | stg %r0,__PT_R2(%r11) |
753c4dd6 | 405 | brasl %r14,do_syscall_trace_enter |
1da177e4 | 406 | lghi %r0,NR_syscalls |
753c4dd6 | 407 | clgr %r0,%r2 |
86ed42f4 | 408 | jnh .Lsysc_tracenogo |
c5328901 MS |
409 | sllg %r8,%r2,2 |
410 | lgf %r9,0(%r8,%r10) | |
86ed42f4 | 411 | .Lsysc_tracego: |
c5328901 MS |
412 | lmg %r3,%r7,__PT_R3(%r11) |
413 | stg %r7,STACK_FRAME_OVERHEAD(%r15) | |
414 | lg %r2,__PT_ORIG_GPR2(%r11) | |
415 | basr %r14,%r9 # call sys_xxx | |
416 | stg %r2,__PT_R2(%r11) # store return value | |
86ed42f4 | 417 | .Lsysc_tracenogo: |
d3a73acb | 418 | tm __TI_flags+7(%r12),_TIF_TRACE |
86ed42f4 | 419 | jz .Lsysc_return |
c5328901 | 420 | lgr %r2,%r11 # pass pointer to pt_regs |
86ed42f4 | 421 | larl %r14,.Lsysc_return |
753c4dd6 | 422 | jg do_syscall_trace_exit |
1da177e4 LT |
423 | |
424 | # | |
425 | # a new process exits the kernel with ret_from_fork | |
426 | # | |
144d634a | 427 | ENTRY(ret_from_fork) |
c5328901 MS |
428 | la %r11,STACK_FRAME_OVERHEAD(%r15) |
429 | lg %r12,__LC_THREAD_INFO | |
37fe5d41 AV |
430 | brasl %r14,schedule_tail |
431 | TRACE_IRQS_ON | |
432 | ssm __LC_SVC_NEW_PSW # reenable interrupts | |
30dcb099 | 433 | tm __PT_PSW+1(%r11),0x01 # forking a kernel thread ? |
86ed42f4 | 434 | jne .Lsysc_tracenogo |
30dcb099 AV |
435 | # it's a kernel thread |
436 | lmg %r9,%r10,__PT_R9(%r11) # load gprs | |
37fe5d41 AV |
437 | ENTRY(kernel_thread_starter) |
438 | la %r2,0(%r10) | |
439 | basr %r14,%r9 | |
86ed42f4 | 440 | j .Lsysc_tracenogo |
1da177e4 LT |
441 | |
442 | /* | |
443 | * Program check handler routine | |
444 | */ | |
445 | ||
144d634a | 446 | ENTRY(pgm_check_handler) |
c185b783 | 447 | stpt __LC_SYNC_ENTER_TIMER |
c5328901 MS |
448 | stmg %r8,%r15,__LC_SAVE_AREA_SYNC |
449 | lg %r10,__LC_LAST_BREAK | |
450 | lg %r12,__LC_THREAD_INFO | |
9977e886 | 451 | larl %r13,cleanup_critical |
c5328901 | 452 | lmg %r8,%r9,__LC_PGM_OLD_PSW |
c5328901 | 453 | tmhh %r8,0x0001 # test problem state bit |
d0fc4107 MS |
454 | jnz 2f # -> fault in user space |
455 | #if IS_ENABLED(CONFIG_KVM) | |
456 | # cleanup critical section for sie64a | |
457 | lgr %r14,%r9 | |
458 | slg %r14,BASED(.Lsie_critical_start) | |
459 | clg %r14,BASED(.Lsie_critical_length) | |
460 | jhe 0f | |
461 | brasl %r14,.Lcleanup_sie | |
462 | #endif | |
463 | 0: tmhh %r8,0x4000 # PER bit set in old PSW ? | |
464 | jnz 1f # -> enabled, can't be a double fault | |
c5328901 | 465 | tm __LC_PGM_ILC+3,0x80 # check for per exception |
86ed42f4 | 466 | jnz .Lpgm_svcper # -> single stepped svc |
d0fc4107 | 467 | 1: CHECK_STACK STACK_SIZE,__LC_SAVE_AREA_SYNC |
dc7ee00d | 468 | aghi %r15,-(STACK_FRAME_OVERHEAD + __PT_SIZE) |
d0fc4107 | 469 | j 3f |
a359bb11 MS |
470 | 2: LAST_BREAK %r14 |
471 | UPDATE_VTIME %r14,%r15,__LC_SYNC_ENTER_TIMER | |
c5328901 | 472 | lg %r15,__LC_KERNEL_STACK |
d35339a4 | 473 | lg %r14,__TI_task(%r12) |
3827ec3d | 474 | aghi %r14,__TASK_thread # pointer to thread_struct |
d35339a4 MS |
475 | lghi %r13,__LC_PGM_TDB |
476 | tm __LC_PGM_ILC+2,0x02 # check for transaction abort | |
d0fc4107 | 477 | jz 3f |
d35339a4 | 478 | mvc __THREAD_trap_tdb(256,%r14),0(%r13) |
d0fc4107 | 479 | 3: la %r11,STACK_FRAME_OVERHEAD(%r15) |
c5328901 MS |
480 | stmg %r0,%r7,__PT_R0(%r11) |
481 | mvc __PT_R8(64,%r11),__LC_SAVE_AREA_SYNC | |
482 | stmg %r8,%r9,__PT_PSW(%r11) | |
aa33c8cb MS |
483 | mvc __PT_INT_CODE(4,%r11),__LC_PGM_ILC |
484 | mvc __PT_INT_PARM_LONG(8,%r11),__LC_TRANS_EXC_CODE | |
d3a73acb | 485 | xc __PT_FLAGS(8,%r11),__PT_FLAGS(%r11) |
c5328901 MS |
486 | stg %r10,__PT_ARGS(%r11) |
487 | tm __LC_PGM_ILC+3,0x80 # check for per exception | |
d0fc4107 | 488 | jz 4f |
c5328901 | 489 | tmhh %r8,0x0001 # kernel per event ? |
86ed42f4 | 490 | jz .Lpgm_kprobe |
d3a73acb | 491 | oi __PT_FLAGS+7(%r11),_PIF_PER_TRAP |
d35339a4 | 492 | mvc __THREAD_per_address(8,%r14),__LC_PER_ADDRESS |
21ee7ffd JF |
493 | mvc __THREAD_per_cause(2,%r14),__LC_PER_CODE |
494 | mvc __THREAD_per_paid(1,%r14),__LC_PER_ACCESS_ID | |
d0fc4107 | 495 | 4: REENABLE_IRQS |
c5328901 | 496 | xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) |
f5cdac27 | 497 | larl %r1,pgm_check_table |
aa33c8cb MS |
498 | llgh %r10,__PT_INT_CODE+2(%r11) |
499 | nill %r10,0x007f | |
b01a37a7 | 500 | sll %r10,2 |
a359bb11 | 501 | je .Lpgm_return |
b01a37a7 | 502 | lgf %r1,0(%r10,%r1) # load address of handler routine |
c5328901 | 503 | lgr %r2,%r11 # pass pointer to pt_regs |
f5cdac27 | 504 | basr %r14,%r1 # branch to interrupt-handler |
a359bb11 MS |
505 | .Lpgm_return: |
506 | LOCKDEP_SYS_EXIT | |
507 | tm __PT_PSW+1(%r11),0x01 # returning to user ? | |
508 | jno .Lsysc_restore | |
509 | j .Lsysc_tif | |
1da177e4 LT |
510 | |
511 | # | |
c5328901 | 512 | # PER event in supervisor state, must be kprobes |
1da177e4 | 513 | # |
86ed42f4 | 514 | .Lpgm_kprobe: |
c5328901 MS |
515 | REENABLE_IRQS |
516 | xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) | |
517 | lgr %r2,%r11 # pass pointer to pt_regs | |
518 | brasl %r14,do_per_trap | |
a359bb11 | 519 | j .Lpgm_return |
1da177e4 | 520 | |
4ba069b8 | 521 | # |
c5328901 | 522 | # single stepped system call |
4ba069b8 | 523 | # |
86ed42f4 | 524 | .Lpgm_svcper: |
c5328901 | 525 | mvc __LC_RETURN_PSW(8),__LC_SVC_NEW_PSW |
86ed42f4 | 526 | larl %r14,.Lsysc_per |
c5328901 | 527 | stg %r14,__LC_RETURN_PSW+8 |
d3a73acb | 528 | lghi %r14,_PIF_SYSCALL | _PIF_PER_TRAP |
86ed42f4 | 529 | lpswe __LC_RETURN_PSW # branch to .Lsysc_per and enable irqs |
4ba069b8 | 530 | |
1da177e4 LT |
531 | /* |
532 | * IO interrupt handler routine | |
533 | */ | |
144d634a | 534 | ENTRY(io_int_handler) |
473e66ba | 535 | STCK __LC_INT_CLOCK |
9cfb9b3c | 536 | stpt __LC_ASYNC_ENTER_TIMER |
c5328901 MS |
537 | stmg %r8,%r15,__LC_SAVE_AREA_ASYNC |
538 | lg %r10,__LC_LAST_BREAK | |
539 | lg %r12,__LC_THREAD_INFO | |
9977e886 | 540 | larl %r13,cleanup_critical |
c5328901 | 541 | lmg %r8,%r9,__LC_IO_OLD_PSW |
2acb94f4 | 542 | SWITCH_ASYNC __LC_SAVE_AREA_ASYNC,__LC_ASYNC_ENTER_TIMER |
c5328901 MS |
543 | stmg %r0,%r7,__PT_R0(%r11) |
544 | mvc __PT_R8(64,%r11),__LC_SAVE_AREA_ASYNC | |
545 | stmg %r8,%r9,__PT_PSW(%r11) | |
48f6b00c | 546 | mvc __PT_INT_CODE(12,%r11),__LC_SUBCHANNEL_ID |
d3a73acb | 547 | xc __PT_FLAGS(8,%r11),__PT_FLAGS(%r11) |
1f194a4c | 548 | TRACE_IRQS_OFF |
c5328901 | 549 | xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) |
86ed42f4 | 550 | .Lio_loop: |
c5328901 | 551 | lgr %r2,%r11 # pass pointer to pt_regs |
1f44a225 MS |
552 | lghi %r3,IO_INTERRUPT |
553 | tm __PT_INT_CODE+8(%r11),0x80 # adapter interrupt ? | |
86ed42f4 | 554 | jz .Lio_call |
1f44a225 | 555 | lghi %r3,THIN_INTERRUPT |
86ed42f4 | 556 | .Lio_call: |
c5328901 | 557 | brasl %r14,do_IRQ |
48f6b00c | 558 | tm __LC_MACHINE_FLAGS+6,0x10 # MACHINE_FLAG_LPAR |
86ed42f4 | 559 | jz .Lio_return |
48f6b00c | 560 | tpi 0 |
86ed42f4 | 561 | jz .Lio_return |
48f6b00c | 562 | mvc __PT_INT_CODE(12,%r11),__LC_SUBCHANNEL_ID |
86ed42f4 MS |
563 | j .Lio_loop |
564 | .Lio_return: | |
6a2df3a8 MS |
565 | LOCKDEP_SYS_EXIT |
566 | TRACE_IRQS_ON | |
86ed42f4 | 567 | .Lio_tif: |
d3a73acb | 568 | tm __TI_flags+7(%r12),_TIF_WORK |
86ed42f4 | 569 | jnz .Lio_work # there is work to do (signals etc.) |
d3a73acb | 570 | tm __LC_CPU_FLAGS+7,_CIF_WORK |
86ed42f4 MS |
571 | jnz .Lio_work |
572 | .Lio_restore: | |
c5328901 MS |
573 | lg %r14,__LC_VDSO_PER_CPU |
574 | lmg %r0,%r10,__PT_R0(%r11) | |
575 | mvc __LC_RETURN_PSW(16),__PT_PSW(%r11) | |
c5328901 MS |
576 | stpt __LC_EXIT_TIMER |
577 | mvc __VDSO_ECTG_BASE(16,%r14),__LC_EXIT_TIMER | |
578 | lmg %r11,%r15,__PT_R11(%r11) | |
579 | lpswe __LC_RETURN_PSW | |
86ed42f4 | 580 | .Lio_done: |
1da177e4 | 581 | |
2688905e | 582 | # |
43d399d2 | 583 | # There is work todo, find out in which context we have been interrupted: |
d3a73acb | 584 | # 1) if we return to user space we can do all _TIF_WORK work |
43d399d2 MS |
585 | # 2) if we return to kernel code and kvm is enabled check if we need to |
586 | # modify the psw to leave SIE | |
587 | # 3) if we return to kernel code and preemptive scheduling is enabled check | |
588 | # the preemption counter and if it is zero call preempt_schedule_irq | |
589 | # Before any work can be done, a switch to the kernel stack is required. | |
2688905e | 590 | # |
86ed42f4 | 591 | .Lio_work: |
c5328901 | 592 | tm __PT_PSW+1(%r11),0x01 # returning to user ? |
86ed42f4 | 593 | jo .Lio_work_user # yes -> do resched & signal |
43d399d2 | 594 | #ifdef CONFIG_PREEMPT |
2688905e | 595 | # check for preemptive scheduling |
86f2552b | 596 | icm %r0,15,__TI_precount(%r12) |
86ed42f4 | 597 | jnz .Lio_restore # preemption is disabled |
6a2df3a8 | 598 | tm __TI_flags+7(%r12),_TIF_NEED_RESCHED |
86ed42f4 | 599 | jno .Lio_restore |
1da177e4 | 600 | # switch to kernel stack |
c5328901 MS |
601 | lg %r1,__PT_R15(%r11) |
602 | aghi %r1,-(STACK_FRAME_OVERHEAD + __PT_SIZE) | |
603 | mvc STACK_FRAME_OVERHEAD(__PT_SIZE,%r1),0(%r11) | |
604 | xc __SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) | |
605 | la %r11,STACK_FRAME_OVERHEAD(%r1) | |
1da177e4 | 606 | lgr %r15,%r1 |
86ed42f4 | 607 | # TRACE_IRQS_ON already done at .Lio_return, call |
6a2df3a8 MS |
608 | # TRACE_IRQS_OFF to keep things symmetrical |
609 | TRACE_IRQS_OFF | |
610 | brasl %r14,preempt_schedule_irq | |
86ed42f4 | 611 | j .Lio_return |
6a2df3a8 | 612 | #else |
86ed42f4 | 613 | j .Lio_restore |
6a2df3a8 | 614 | #endif |
1da177e4 | 615 | |
43d399d2 MS |
616 | # |
617 | # Need to do work before returning to userspace, switch to kernel stack | |
618 | # | |
86ed42f4 | 619 | .Lio_work_user: |
1da177e4 | 620 | lg %r1,__LC_KERNEL_STACK |
c5328901 MS |
621 | mvc STACK_FRAME_OVERHEAD(__PT_SIZE,%r1),0(%r11) |
622 | xc __SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) | |
623 | la %r11,STACK_FRAME_OVERHEAD(%r1) | |
1da177e4 | 624 | lgr %r15,%r1 |
43d399d2 | 625 | |
1da177e4 LT |
626 | # |
627 | # One of the work bits is on. Find out which one. | |
1da177e4 | 628 | # |
86ed42f4 | 629 | .Lio_work_tif: |
d3a73acb | 630 | tm __LC_CPU_FLAGS+7,_CIF_MCCK_PENDING |
86ed42f4 | 631 | jo .Lio_mcck_pending |
86f2552b | 632 | tm __TI_flags+7(%r12),_TIF_NEED_RESCHED |
86ed42f4 | 633 | jo .Lio_reschedule |
86f2552b | 634 | tm __TI_flags+7(%r12),_TIF_SIGPENDING |
86ed42f4 | 635 | jo .Lio_sigpending |
86f2552b | 636 | tm __TI_flags+7(%r12),_TIF_NOTIFY_RESUME |
86ed42f4 | 637 | jo .Lio_notify_resume |
9977e886 HB |
638 | tm __LC_CPU_FLAGS+7,_CIF_FPU |
639 | jo .Lio_vxrs | |
d3a73acb | 640 | tm __LC_CPU_FLAGS+7,_CIF_ASCE |
86ed42f4 MS |
641 | jo .Lio_uaccess |
642 | j .Lio_return # beware of critical section cleanup | |
0eaeafa1 | 643 | |
77fa2245 | 644 | # |
d3a73acb | 645 | # _CIF_MCCK_PENDING is set, call handler |
77fa2245 | 646 | # |
86ed42f4 MS |
647 | .Lio_mcck_pending: |
648 | # TRACE_IRQS_ON already done at .Lio_return | |
b771aeac | 649 | brasl %r14,s390_handle_mcck # TIF bit will be cleared by handler |
6a2df3a8 | 650 | TRACE_IRQS_OFF |
86ed42f4 | 651 | j .Lio_return |
77fa2245 | 652 | |
457f2180 | 653 | # |
d3a73acb | 654 | # _CIF_ASCE is set, load user space asce |
457f2180 | 655 | # |
86ed42f4 | 656 | .Lio_uaccess: |
d3a73acb | 657 | ni __LC_CPU_FLAGS+7,255-_CIF_ASCE |
457f2180 | 658 | lctlg %c1,%c1,__LC_USER_ASCE # load primary asce |
86ed42f4 | 659 | j .Lio_return |
457f2180 | 660 | |
9977e886 HB |
661 | # |
662 | # CIF_FPU is set, restore floating-point controls and floating-point registers. | |
663 | # | |
664 | .Lio_vxrs: | |
665 | larl %r14,.Lio_return | |
666 | jg load_fpu_regs | |
667 | ||
1da177e4 LT |
668 | # |
669 | # _TIF_NEED_RESCHED is set, call schedule | |
25d83cbf | 670 | # |
86ed42f4 MS |
671 | .Lio_reschedule: |
672 | # TRACE_IRQS_ON already done at .Lio_return | |
c5328901 | 673 | ssm __LC_SVC_NEW_PSW # reenable interrupts |
25d83cbf | 674 | brasl %r14,schedule # call scheduler |
c5328901 | 675 | ssm __LC_PGM_NEW_PSW # disable I/O and ext. interrupts |
411788ea | 676 | TRACE_IRQS_OFF |
86ed42f4 | 677 | j .Lio_return |
1da177e4 LT |
678 | |
679 | # | |
02a029b3 | 680 | # _TIF_SIGPENDING or is set, call do_signal |
1da177e4 | 681 | # |
86ed42f4 MS |
682 | .Lio_sigpending: |
683 | # TRACE_IRQS_ON already done at .Lio_return | |
c5328901 MS |
684 | ssm __LC_SVC_NEW_PSW # reenable interrupts |
685 | lgr %r2,%r11 # pass pointer to pt_regs | |
686 | brasl %r14,do_signal | |
687 | ssm __LC_PGM_NEW_PSW # disable I/O and ext. interrupts | |
411788ea | 688 | TRACE_IRQS_OFF |
86ed42f4 | 689 | j .Lio_return |
1da177e4 | 690 | |
753c4dd6 MS |
691 | # |
692 | # _TIF_NOTIFY_RESUME or is set, call do_notify_resume | |
693 | # | |
86ed42f4 MS |
694 | .Lio_notify_resume: |
695 | # TRACE_IRQS_ON already done at .Lio_return | |
c5328901 MS |
696 | ssm __LC_SVC_NEW_PSW # reenable interrupts |
697 | lgr %r2,%r11 # pass pointer to pt_regs | |
698 | brasl %r14,do_notify_resume | |
699 | ssm __LC_PGM_NEW_PSW # disable I/O and ext. interrupts | |
753c4dd6 | 700 | TRACE_IRQS_OFF |
86ed42f4 | 701 | j .Lio_return |
753c4dd6 | 702 | |
1da177e4 LT |
703 | /* |
704 | * External interrupt handler routine | |
705 | */ | |
144d634a | 706 | ENTRY(ext_int_handler) |
473e66ba | 707 | STCK __LC_INT_CLOCK |
9cfb9b3c | 708 | stpt __LC_ASYNC_ENTER_TIMER |
c5328901 MS |
709 | stmg %r8,%r15,__LC_SAVE_AREA_ASYNC |
710 | lg %r10,__LC_LAST_BREAK | |
711 | lg %r12,__LC_THREAD_INFO | |
9977e886 | 712 | larl %r13,cleanup_critical |
c5328901 | 713 | lmg %r8,%r9,__LC_EXT_OLD_PSW |
2acb94f4 | 714 | SWITCH_ASYNC __LC_SAVE_AREA_ASYNC,__LC_ASYNC_ENTER_TIMER |
c5328901 MS |
715 | stmg %r0,%r7,__PT_R0(%r11) |
716 | mvc __PT_R8(64,%r11),__LC_SAVE_AREA_ASYNC | |
717 | stmg %r8,%r9,__PT_PSW(%r11) | |
48f6b00c MS |
718 | lghi %r1,__LC_EXT_PARAMS2 |
719 | mvc __PT_INT_CODE(4,%r11),__LC_EXT_CPU_ADDR | |
720 | mvc __PT_INT_PARM(4,%r11),__LC_EXT_PARAMS | |
721 | mvc __PT_INT_PARM_LONG(8,%r11),0(%r1) | |
d3a73acb | 722 | xc __PT_FLAGS(8,%r11),__PT_FLAGS(%r11) |
1f194a4c | 723 | TRACE_IRQS_OFF |
0de9db37 | 724 | xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) |
c5328901 | 725 | lgr %r2,%r11 # pass pointer to pt_regs |
1f44a225 MS |
726 | lghi %r3,EXT_INTERRUPT |
727 | brasl %r14,do_IRQ | |
86ed42f4 | 728 | j .Lio_return |
1da177e4 | 729 | |
4c1051e3 | 730 | /* |
86ed42f4 | 731 | * Load idle PSW. The second "half" of this function is in .Lcleanup_idle. |
4c1051e3 MS |
732 | */ |
733 | ENTRY(psw_idle) | |
27f6b416 | 734 | stg %r3,__SF_EMPTY(%r15) |
86ed42f4 | 735 | larl %r1,.Lpsw_idle_lpsw+4 |
4c1051e3 | 736 | stg %r1,__SF_EMPTY+8(%r15) |
27f6b416 MS |
737 | STCK __CLOCK_IDLE_ENTER(%r2) |
738 | stpt __TIMER_IDLE_ENTER(%r2) | |
86ed42f4 | 739 | .Lpsw_idle_lpsw: |
4c1051e3 MS |
740 | lpswe __SF_EMPTY(%r15) |
741 | br %r14 | |
86ed42f4 | 742 | .Lpsw_idle_end: |
4c1051e3 | 743 | |
9977e886 HB |
744 | /* Store floating-point controls and floating-point or vector extension |
745 | * registers instead. A critical section cleanup assures that the registers | |
746 | * are stored even if interrupted for some other work. The register %r2 | |
747 | * designates a struct fpu to store register contents. If the specified | |
748 | * structure does not contain a register save area, the register store is | |
749 | * omitted (see also comments in arch_dup_task_struct()). | |
750 | * | |
751 | * The CIF_FPU flag is set in any case. The CIF_FPU triggers a lazy restore | |
752 | * of the register contents at system call or io return. | |
753 | */ | |
754 | ENTRY(save_fpu_regs) | |
755 | tm __LC_CPU_FLAGS+7,_CIF_FPU | |
756 | bor %r14 | |
757 | stfpc __FPU_fpc(%r2) | |
758 | .Lsave_fpu_regs_fpc_end: | |
759 | lg %r3,__FPU_regs(%r2) | |
760 | ltgr %r3,%r3 | |
761 | jz .Lsave_fpu_regs_done # no save area -> set CIF_FPU | |
762 | tm __FPU_flags+3(%r2),FPU_USE_VX | |
763 | jz .Lsave_fpu_regs_fp # no -> store FP regs | |
764 | .Lsave_fpu_regs_vx_low: | |
765 | VSTM %v0,%v15,0,%r3 # vstm 0,15,0(3) | |
766 | .Lsave_fpu_regs_vx_high: | |
767 | VSTM %v16,%v31,256,%r3 # vstm 16,31,256(3) | |
768 | j .Lsave_fpu_regs_done # -> set CIF_FPU flag | |
769 | .Lsave_fpu_regs_fp: | |
770 | std 0,0(%r3) | |
771 | std 1,8(%r3) | |
772 | std 2,16(%r3) | |
773 | std 3,24(%r3) | |
774 | std 4,32(%r3) | |
775 | std 5,40(%r3) | |
776 | std 6,48(%r3) | |
777 | std 7,56(%r3) | |
778 | std 8,64(%r3) | |
779 | std 9,72(%r3) | |
780 | std 10,80(%r3) | |
781 | std 11,88(%r3) | |
782 | std 12,96(%r3) | |
783 | std 13,104(%r3) | |
784 | std 14,112(%r3) | |
785 | std 15,120(%r3) | |
786 | .Lsave_fpu_regs_done: | |
787 | oi __LC_CPU_FLAGS+7,_CIF_FPU | |
788 | br %r14 | |
789 | .Lsave_fpu_regs_end: | |
790 | ||
791 | /* Load floating-point controls and floating-point or vector extension | |
792 | * registers. A critical section cleanup assures that the register contents | |
793 | * are loaded even if interrupted for some other work. Depending on the saved | |
794 | * FP/VX state, the vector-enablement control, CR0.46, is either set or cleared. | |
795 | * | |
796 | * There are special calling conventions to fit into sysc and io return work: | |
797 | * %r12: __LC_THREAD_INFO | |
798 | * %r15: <kernel stack> | |
799 | * The function requires: | |
800 | * %r4 and __SF_EMPTY+32(%r15) | |
801 | */ | |
802 | load_fpu_regs: | |
803 | tm __LC_CPU_FLAGS+7,_CIF_FPU | |
804 | bnor %r14 | |
805 | lg %r4,__TI_task(%r12) | |
806 | la %r4,__THREAD_fpu(%r4) | |
807 | lfpc __FPU_fpc(%r4) | |
808 | stctg %c0,%c0,__SF_EMPTY+32(%r15) # store CR0 | |
809 | tm __FPU_flags+3(%r4),FPU_USE_VX # VX-enabled task ? | |
810 | lg %r4,__FPU_regs(%r4) # %r4 <- reg save area | |
811 | jz .Lload_fpu_regs_fp_ctl # -> no VX, load FP regs | |
812 | .Lload_fpu_regs_vx_ctl: | |
813 | tm __SF_EMPTY+32+5(%r15),2 # test VX control | |
814 | jo .Lload_fpu_regs_vx | |
815 | oi __SF_EMPTY+32+5(%r15),2 # set VX control | |
816 | lctlg %c0,%c0,__SF_EMPTY+32(%r15) | |
817 | .Lload_fpu_regs_vx: | |
818 | VLM %v0,%v15,0,%r4 | |
819 | .Lload_fpu_regs_vx_high: | |
820 | VLM %v16,%v31,256,%r4 | |
821 | j .Lload_fpu_regs_done | |
822 | .Lload_fpu_regs_fp_ctl: | |
823 | tm __SF_EMPTY+32+5(%r15),2 # test VX control | |
824 | jz .Lload_fpu_regs_fp | |
825 | ni __SF_EMPTY+32+5(%r15),253 # clear VX control | |
826 | lctlg %c0,%c0,__SF_EMPTY+32(%r15) | |
827 | .Lload_fpu_regs_fp: | |
828 | ld 0,0(%r4) | |
829 | ld 1,8(%r4) | |
830 | ld 2,16(%r4) | |
831 | ld 3,24(%r4) | |
832 | ld 4,32(%r4) | |
833 | ld 5,40(%r4) | |
834 | ld 6,48(%r4) | |
835 | ld 7,56(%r4) | |
836 | ld 8,64(%r4) | |
837 | ld 9,72(%r4) | |
838 | ld 10,80(%r4) | |
839 | ld 11,88(%r4) | |
840 | ld 12,96(%r4) | |
841 | ld 13,104(%r4) | |
842 | ld 14,112(%r4) | |
843 | ld 15,120(%r4) | |
844 | .Lload_fpu_regs_done: | |
845 | ni __LC_CPU_FLAGS+7,255-_CIF_FPU | |
846 | br %r14 | |
847 | .Lload_fpu_regs_end: | |
848 | ||
849 | /* Test and set the vector enablement control in CR0.46 */ | |
850 | ENTRY(__ctl_set_vx) | |
851 | stctg %c0,%c0,__SF_EMPTY(%r15) | |
852 | tm __SF_EMPTY+5(%r15),2 | |
853 | bor %r14 | |
854 | oi __SF_EMPTY+5(%r15),2 | |
855 | lctlg %c0,%c0,__SF_EMPTY(%r15) | |
856 | br %r14 | |
857 | .L__ctl_set_vx_end: | |
858 | ||
86ed42f4 | 859 | .L__critical_end: |
ae6aa2ea | 860 | |
1da177e4 LT |
861 | /* |
862 | * Machine check handler routines | |
863 | */ | |
144d634a | 864 | ENTRY(mcck_int_handler) |
473e66ba | 865 | STCK __LC_MCCK_CLOCK |
77fa2245 HC |
866 | la %r1,4095 # revalidate r1 |
867 | spt __LC_CPU_TIMER_SAVE_AREA-4095(%r1) # revalidate cpu timer | |
25d83cbf | 868 | lmg %r0,%r15,__LC_GPREGS_SAVE_AREA-4095(%r1)# revalidate gprs |
c5328901 MS |
869 | lg %r10,__LC_LAST_BREAK |
870 | lg %r12,__LC_THREAD_INFO | |
9977e886 | 871 | larl %r13,cleanup_critical |
c5328901 | 872 | lmg %r8,%r9,__LC_MCK_OLD_PSW |
25d83cbf | 873 | tm __LC_MCCK_CODE,0x80 # system damage? |
86ed42f4 | 874 | jo .Lmcck_panic # yes -> rest of mcck code invalid |
c5328901 MS |
875 | lghi %r14,__LC_CPU_TIMER_SAVE_AREA |
876 | mvc __LC_MCCK_ENTER_TIMER(8),0(%r14) | |
63b12246 | 877 | tm __LC_MCCK_CODE+5,0x02 # stored cpu timer value valid? |
c5328901 | 878 | jo 3f |
63b12246 MS |
879 | la %r14,__LC_SYNC_ENTER_TIMER |
880 | clc 0(8,%r14),__LC_ASYNC_ENTER_TIMER | |
881 | jl 0f | |
882 | la %r14,__LC_ASYNC_ENTER_TIMER | |
883 | 0: clc 0(8,%r14),__LC_EXIT_TIMER | |
c5328901 | 884 | jl 1f |
63b12246 | 885 | la %r14,__LC_EXIT_TIMER |
c5328901 MS |
886 | 1: clc 0(8,%r14),__LC_LAST_UPDATE_TIMER |
887 | jl 2f | |
63b12246 | 888 | la %r14,__LC_LAST_UPDATE_TIMER |
c5328901 | 889 | 2: spt 0(%r14) |
6377981f | 890 | mvc __LC_MCCK_ENTER_TIMER(8),0(%r14) |
c5328901 | 891 | 3: tm __LC_MCCK_CODE+2,0x09 # mwp + ia of old psw valid? |
86ed42f4 | 892 | jno .Lmcck_panic # no -> skip cleanup critical |
2acb94f4 | 893 | SWITCH_ASYNC __LC_GPREGS_SAVE_AREA+64,__LC_MCCK_ENTER_TIMER |
86ed42f4 | 894 | .Lmcck_skip: |
6551fbdf MS |
895 | lghi %r14,__LC_GPREGS_SAVE_AREA+64 |
896 | stmg %r0,%r7,__PT_R0(%r11) | |
897 | mvc __PT_R8(64,%r11),0(%r14) | |
c5328901 | 898 | stmg %r8,%r9,__PT_PSW(%r11) |
d3a73acb | 899 | xc __PT_FLAGS(8,%r11),__PT_FLAGS(%r11) |
c5328901 MS |
900 | xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) |
901 | lgr %r2,%r11 # pass pointer to pt_regs | |
77fa2245 | 902 | brasl %r14,s390_do_machine_check |
c5328901 | 903 | tm __PT_PSW+1(%r11),0x01 # returning to user ? |
86ed42f4 | 904 | jno .Lmcck_return |
77fa2245 | 905 | lg %r1,__LC_KERNEL_STACK # switch to kernel stack |
c5328901 MS |
906 | mvc STACK_FRAME_OVERHEAD(__PT_SIZE,%r1),0(%r11) |
907 | xc __SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) | |
908 | la %r11,STACK_FRAME_OVERHEAD(%r1) | |
77fa2245 | 909 | lgr %r15,%r1 |
c5328901 | 910 | ssm __LC_PGM_NEW_PSW # turn dat on, keep irqs off |
d3a73acb | 911 | tm __LC_CPU_FLAGS+7,_CIF_MCCK_PENDING |
86ed42f4 | 912 | jno .Lmcck_return |
1f194a4c | 913 | TRACE_IRQS_OFF |
77fa2245 | 914 | brasl %r14,s390_handle_mcck |
1f194a4c | 915 | TRACE_IRQS_ON |
86ed42f4 | 916 | .Lmcck_return: |
c5328901 MS |
917 | lg %r14,__LC_VDSO_PER_CPU |
918 | lmg %r0,%r10,__PT_R0(%r11) | |
919 | mvc __LC_RETURN_MCCK_PSW(16),__PT_PSW(%r11) # move return PSW | |
63b12246 MS |
920 | tm __LC_RETURN_MCCK_PSW+1,0x01 # returning to user ? |
921 | jno 0f | |
922 | stpt __LC_EXIT_TIMER | |
c5328901 MS |
923 | mvc __VDSO_ECTG_BASE(16,%r14),__LC_EXIT_TIMER |
924 | 0: lmg %r11,%r15,__PT_R11(%r11) | |
925 | lpswe __LC_RETURN_MCCK_PSW | |
926 | ||
86ed42f4 | 927 | .Lmcck_panic: |
c5328901 | 928 | lg %r15,__LC_PANIC_STACK |
2acb94f4 | 929 | aghi %r15,-(STACK_FRAME_OVERHEAD + __PT_SIZE) |
86ed42f4 | 930 | j .Lmcck_skip |
1da177e4 | 931 | |
7dd6b334 MH |
932 | # |
933 | # PSW restart interrupt handler | |
934 | # | |
8b646bd7 | 935 | ENTRY(restart_int_handler) |
c5328901 | 936 | stg %r15,__LC_SAVE_AREA_RESTART |
8b646bd7 | 937 | lg %r15,__LC_RESTART_STACK |
c5328901 | 938 | aghi %r15,-__PT_SIZE # create pt_regs on stack |
8b646bd7 | 939 | xc 0(__PT_SIZE,%r15),0(%r15) |
c5328901 MS |
940 | stmg %r0,%r14,__PT_R0(%r15) |
941 | mvc __PT_R15(8,%r15),__LC_SAVE_AREA_RESTART | |
942 | mvc __PT_PSW(16,%r15),__LC_RST_OLD_PSW # store restart old psw | |
8b646bd7 MS |
943 | aghi %r15,-STACK_FRAME_OVERHEAD # create stack frame on stack |
944 | xc 0(STACK_FRAME_OVERHEAD,%r15),0(%r15) | |
fbe76568 HC |
945 | lg %r1,__LC_RESTART_FN # load fn, parm & source cpu |
946 | lg %r2,__LC_RESTART_DATA | |
947 | lg %r3,__LC_RESTART_SOURCE | |
8b646bd7 MS |
948 | ltgr %r3,%r3 # test source cpu address |
949 | jm 1f # negative -> skip source stop | |
eb546195 | 950 | 0: sigp %r4,%r3,SIGP_SENSE # sigp sense to source cpu |
8b646bd7 MS |
951 | brc 10,0b # wait for status stored |
952 | 1: basr %r14,%r1 # call function | |
953 | stap __SF_EMPTY(%r15) # store cpu address | |
954 | llgh %r3,__SF_EMPTY(%r15) | |
eb546195 | 955 | 2: sigp %r4,%r3,SIGP_STOP # sigp stop to current cpu |
8b646bd7 MS |
956 | brc 2,2b |
957 | 3: j 3b | |
7dd6b334 | 958 | |
860dba45 MS |
959 | .section .kprobes.text, "ax" |
960 | ||
1da177e4 LT |
961 | #ifdef CONFIG_CHECK_STACK |
962 | /* | |
963 | * The synchronous or the asynchronous stack overflowed. We are dead. | |
964 | * No need to properly save the registers, we are going to panic anyway. | |
965 | * Setup a pt_regs so that show_trace can provide a good call trace. | |
966 | */ | |
967 | stack_overflow: | |
dc7ee00d MS |
968 | lg %r15,__LC_PANIC_STACK # change to panic stack |
969 | la %r11,STACK_FRAME_OVERHEAD(%r15) | |
c5328901 MS |
970 | stmg %r0,%r7,__PT_R0(%r11) |
971 | stmg %r8,%r9,__PT_PSW(%r11) | |
972 | mvc __PT_R8(64,%r11),0(%r14) | |
973 | stg %r10,__PT_ORIG_GPR2(%r11) # store last break to orig_gpr2 | |
c5328901 MS |
974 | xc __SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) |
975 | lgr %r2,%r11 # pass pointer to pt_regs | |
1da177e4 LT |
976 | jg kernel_stack_overflow |
977 | #endif | |
978 | ||
1da177e4 | 979 | cleanup_critical: |
d0fc4107 MS |
980 | #if IS_ENABLED(CONFIG_KVM) |
981 | clg %r9,BASED(.Lcleanup_table_sie) # .Lsie_gmap | |
982 | jl 0f | |
983 | clg %r9,BASED(.Lcleanup_table_sie+8)# .Lsie_done | |
984 | jl .Lcleanup_sie | |
985 | #endif | |
86ed42f4 | 986 | clg %r9,BASED(.Lcleanup_table) # system_call |
1da177e4 | 987 | jl 0f |
86ed42f4 MS |
988 | clg %r9,BASED(.Lcleanup_table+8) # .Lsysc_do_svc |
989 | jl .Lcleanup_system_call | |
990 | clg %r9,BASED(.Lcleanup_table+16) # .Lsysc_tif | |
1da177e4 | 991 | jl 0f |
86ed42f4 MS |
992 | clg %r9,BASED(.Lcleanup_table+24) # .Lsysc_restore |
993 | jl .Lcleanup_sysc_tif | |
994 | clg %r9,BASED(.Lcleanup_table+32) # .Lsysc_done | |
995 | jl .Lcleanup_sysc_restore | |
996 | clg %r9,BASED(.Lcleanup_table+40) # .Lio_tif | |
63b12246 | 997 | jl 0f |
86ed42f4 MS |
998 | clg %r9,BASED(.Lcleanup_table+48) # .Lio_restore |
999 | jl .Lcleanup_io_tif | |
1000 | clg %r9,BASED(.Lcleanup_table+56) # .Lio_done | |
1001 | jl .Lcleanup_io_restore | |
1002 | clg %r9,BASED(.Lcleanup_table+64) # psw_idle | |
4c1051e3 | 1003 | jl 0f |
86ed42f4 MS |
1004 | clg %r9,BASED(.Lcleanup_table+72) # .Lpsw_idle_end |
1005 | jl .Lcleanup_idle | |
9977e886 HB |
1006 | clg %r9,BASED(.Lcleanup_table+80) # save_fpu_regs |
1007 | jl 0f | |
1008 | clg %r9,BASED(.Lcleanup_table+88) # .Lsave_fpu_regs_end | |
1009 | jl .Lcleanup_save_fpu_regs | |
1010 | clg %r9,BASED(.Lcleanup_table+96) # load_fpu_regs | |
1011 | jl 0f | |
1012 | clg %r9,BASED(.Lcleanup_table+104) # .Lload_fpu_regs_end | |
1013 | jl .Lcleanup_load_fpu_regs | |
1014 | clg %r9,BASED(.Lcleanup_table+112) # __ctl_set_vx | |
1015 | jl 0f | |
1016 | clg %r9,BASED(.Lcleanup_table+120) # .L__ctl_set_vx_end | |
1017 | jl .Lcleanup___ctl_set_vx | |
c5328901 MS |
1018 | 0: br %r14 |
1019 | ||
d0fc4107 MS |
1020 | .align 8 |
1021 | .Lcleanup_table: | |
1022 | .quad system_call | |
1023 | .quad .Lsysc_do_svc | |
1024 | .quad .Lsysc_tif | |
1025 | .quad .Lsysc_restore | |
1026 | .quad .Lsysc_done | |
1027 | .quad .Lio_tif | |
1028 | .quad .Lio_restore | |
1029 | .quad .Lio_done | |
1030 | .quad psw_idle | |
1031 | .quad .Lpsw_idle_end | |
1032 | .quad save_fpu_regs | |
1033 | .quad .Lsave_fpu_regs_end | |
1034 | .quad load_fpu_regs | |
1035 | .quad .Lload_fpu_regs_end | |
1036 | .quad __ctl_set_vx | |
1037 | .quad .L__ctl_set_vx_end | |
1038 | ||
1039 | #if IS_ENABLED(CONFIG_KVM) | |
1040 | .Lcleanup_table_sie: | |
1041 | .quad .Lsie_gmap | |
1042 | .quad .Lsie_done | |
1043 | ||
1044 | .Lcleanup_sie: | |
1045 | lg %r9,__SF_EMPTY(%r15) # get control block pointer | |
1046 | tm __LC_MACHINE_FLAGS+6,0x20 # MACHINE_FLAG_LPP | |
1047 | jz 0f | |
1048 | .insn s,0xb2800000,__SF_EMPTY+16(%r15)# set host id | |
1049 | 0: ni __SIE_PROG0C+3(%r9),0xfe # no longer in SIE | |
1050 | lctlg %c1,%c1,__LC_USER_ASCE # load primary asce | |
1051 | larl %r9,sie_exit # skip forward to sie_exit | |
1052 | br %r14 | |
1053 | #endif | |
1da177e4 | 1054 | |
86ed42f4 | 1055 | .Lcleanup_system_call: |
c5328901 | 1056 | # check if stpt has been executed |
86ed42f4 | 1057 | clg %r9,BASED(.Lcleanup_system_call_insn) |
1da177e4 LT |
1058 | jh 0f |
1059 | mvc __LC_SYNC_ENTER_TIMER(8),__LC_ASYNC_ENTER_TIMER | |
c5328901 | 1060 | cghi %r11,__LC_SAVE_AREA_ASYNC |
6377981f | 1061 | je 0f |
c5328901 MS |
1062 | mvc __LC_SYNC_ENTER_TIMER(8),__LC_MCCK_ENTER_TIMER |
1063 | 0: # check if stmg has been executed | |
86ed42f4 | 1064 | clg %r9,BASED(.Lcleanup_system_call_insn+8) |
1da177e4 | 1065 | jh 0f |
c5328901 MS |
1066 | mvc __LC_SAVE_AREA_SYNC(64),0(%r11) |
1067 | 0: # check if base register setup + TIF bit load has been done | |
86ed42f4 | 1068 | clg %r9,BASED(.Lcleanup_system_call_insn+16) |
c5328901 MS |
1069 | jhe 0f |
1070 | # set up saved registers r10 and r12 | |
1071 | stg %r10,16(%r11) # r10 last break | |
1072 | stg %r12,32(%r11) # r12 thread-info pointer | |
1073 | 0: # check if the user time update has been done | |
86ed42f4 | 1074 | clg %r9,BASED(.Lcleanup_system_call_insn+24) |
c5328901 MS |
1075 | jh 0f |
1076 | lg %r15,__LC_EXIT_TIMER | |
1077 | slg %r15,__LC_SYNC_ENTER_TIMER | |
1078 | alg %r15,__LC_USER_TIMER | |
1079 | stg %r15,__LC_USER_TIMER | |
1080 | 0: # check if the system time update has been done | |
86ed42f4 | 1081 | clg %r9,BASED(.Lcleanup_system_call_insn+32) |
c5328901 MS |
1082 | jh 0f |
1083 | lg %r15,__LC_LAST_UPDATE_TIMER | |
1084 | slg %r15,__LC_EXIT_TIMER | |
1085 | alg %r15,__LC_SYSTEM_TIMER | |
1086 | stg %r15,__LC_SYSTEM_TIMER | |
1087 | 0: # update accounting time stamp | |
1da177e4 | 1088 | mvc __LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER |
c5328901 MS |
1089 | # do LAST_BREAK |
1090 | lg %r9,16(%r11) | |
1091 | srag %r9,%r9,23 | |
86f2552b | 1092 | jz 0f |
c5328901 MS |
1093 | mvc __TI_last_break(8,%r12),16(%r11) |
1094 | 0: # set up saved register r11 | |
1095 | lg %r15,__LC_KERNEL_STACK | |
dc7ee00d MS |
1096 | la %r9,STACK_FRAME_OVERHEAD(%r15) |
1097 | stg %r9,24(%r11) # r11 pt_regs pointer | |
c5328901 | 1098 | # fill pt_regs |
dc7ee00d MS |
1099 | mvc __PT_R8(64,%r9),__LC_SAVE_AREA_SYNC |
1100 | stmg %r0,%r7,__PT_R0(%r9) | |
1101 | mvc __PT_PSW(16,%r9),__LC_SVC_OLD_PSW | |
1102 | mvc __PT_INT_CODE(4,%r9),__LC_SVC_ILC | |
d3a73acb MS |
1103 | xc __PT_FLAGS(8,%r9),__PT_FLAGS(%r9) |
1104 | mvi __PT_FLAGS+7(%r9),_PIF_SYSCALL | |
c5328901 | 1105 | # setup saved register r15 |
c5328901 MS |
1106 | stg %r15,56(%r11) # r15 stack pointer |
1107 | # set new psw address and exit | |
86ed42f4 | 1108 | larl %r9,.Lsysc_do_svc |
1da177e4 | 1109 | br %r14 |
86ed42f4 | 1110 | .Lcleanup_system_call_insn: |
25d83cbf | 1111 | .quad system_call |
86ed42f4 MS |
1112 | .quad .Lsysc_stmg |
1113 | .quad .Lsysc_per | |
a359bb11 | 1114 | .quad .Lsysc_vtime+36 |
86ed42f4 | 1115 | .quad .Lsysc_vtime+42 |
1da177e4 | 1116 | |
86ed42f4 MS |
1117 | .Lcleanup_sysc_tif: |
1118 | larl %r9,.Lsysc_tif | |
1da177e4 LT |
1119 | br %r14 |
1120 | ||
86ed42f4 MS |
1121 | .Lcleanup_sysc_restore: |
1122 | clg %r9,BASED(.Lcleanup_sysc_restore_insn) | |
6377981f | 1123 | je 0f |
c5328901 MS |
1124 | lg %r9,24(%r11) # get saved pointer to pt_regs |
1125 | mvc __LC_RETURN_PSW(16),__PT_PSW(%r9) | |
1126 | mvc 0(64,%r11),__PT_R8(%r9) | |
1127 | lmg %r0,%r7,__PT_R0(%r9) | |
1128 | 0: lmg %r8,%r9,__LC_RETURN_PSW | |
1da177e4 | 1129 | br %r14 |
86ed42f4 MS |
1130 | .Lcleanup_sysc_restore_insn: |
1131 | .quad .Lsysc_done - 4 | |
1da177e4 | 1132 | |
86ed42f4 MS |
1133 | .Lcleanup_io_tif: |
1134 | larl %r9,.Lio_tif | |
176b1803 MS |
1135 | br %r14 |
1136 | ||
86ed42f4 MS |
1137 | .Lcleanup_io_restore: |
1138 | clg %r9,BASED(.Lcleanup_io_restore_insn) | |
c5328901 MS |
1139 | je 0f |
1140 | lg %r9,24(%r11) # get saved r11 pointer to pt_regs | |
1141 | mvc __LC_RETURN_PSW(16),__PT_PSW(%r9) | |
c5328901 MS |
1142 | mvc 0(64,%r11),__PT_R8(%r9) |
1143 | lmg %r0,%r7,__PT_R0(%r9) | |
1144 | 0: lmg %r8,%r9,__LC_RETURN_PSW | |
ae6aa2ea | 1145 | br %r14 |
86ed42f4 MS |
1146 | .Lcleanup_io_restore_insn: |
1147 | .quad .Lio_done - 4 | |
ae6aa2ea | 1148 | |
86ed42f4 | 1149 | .Lcleanup_idle: |
4c1051e3 | 1150 | # copy interrupt clock & cpu timer |
27f6b416 MS |
1151 | mvc __CLOCK_IDLE_EXIT(8,%r2),__LC_INT_CLOCK |
1152 | mvc __TIMER_IDLE_EXIT(8,%r2),__LC_ASYNC_ENTER_TIMER | |
4c1051e3 MS |
1153 | cghi %r11,__LC_SAVE_AREA_ASYNC |
1154 | je 0f | |
27f6b416 MS |
1155 | mvc __CLOCK_IDLE_EXIT(8,%r2),__LC_MCCK_CLOCK |
1156 | mvc __TIMER_IDLE_EXIT(8,%r2),__LC_MCCK_ENTER_TIMER | |
4c1051e3 | 1157 | 0: # check if stck & stpt have been executed |
86ed42f4 | 1158 | clg %r9,BASED(.Lcleanup_idle_insn) |
4c1051e3 | 1159 | jhe 1f |
27f6b416 MS |
1160 | mvc __CLOCK_IDLE_ENTER(8,%r2),__CLOCK_IDLE_EXIT(%r2) |
1161 | mvc __TIMER_IDLE_ENTER(8,%r2),__TIMER_IDLE_EXIT(%r2) | |
1162 | 1: # account system time going idle | |
4c1051e3 | 1163 | lg %r9,__LC_STEAL_TIMER |
27f6b416 | 1164 | alg %r9,__CLOCK_IDLE_ENTER(%r2) |
4c1051e3 MS |
1165 | slg %r9,__LC_LAST_UPDATE_CLOCK |
1166 | stg %r9,__LC_STEAL_TIMER | |
27f6b416 | 1167 | mvc __LC_LAST_UPDATE_CLOCK(8),__CLOCK_IDLE_EXIT(%r2) |
4c1051e3 MS |
1168 | lg %r9,__LC_SYSTEM_TIMER |
1169 | alg %r9,__LC_LAST_UPDATE_TIMER | |
27f6b416 | 1170 | slg %r9,__TIMER_IDLE_ENTER(%r2) |
4c1051e3 | 1171 | stg %r9,__LC_SYSTEM_TIMER |
27f6b416 | 1172 | mvc __LC_LAST_UPDATE_TIMER(8),__TIMER_IDLE_EXIT(%r2) |
4c1051e3 | 1173 | # prepare return psw |
0587d409 | 1174 | nihh %r8,0xfcfd # clear irq & wait state bits |
4c1051e3 MS |
1175 | lg %r9,48(%r11) # return from psw_idle |
1176 | br %r14 | |
86ed42f4 MS |
1177 | .Lcleanup_idle_insn: |
1178 | .quad .Lpsw_idle_lpsw | |
4c1051e3 | 1179 | |
9977e886 HB |
1180 | .Lcleanup_save_fpu_regs: |
1181 | tm __LC_CPU_FLAGS+7,_CIF_FPU | |
1182 | bor %r14 | |
1183 | clg %r9,BASED(.Lcleanup_save_fpu_regs_done) | |
1184 | jhe 5f | |
1185 | clg %r9,BASED(.Lcleanup_save_fpu_regs_fp) | |
1186 | jhe 4f | |
1187 | clg %r9,BASED(.Lcleanup_save_fpu_regs_vx_high) | |
1188 | jhe 3f | |
1189 | clg %r9,BASED(.Lcleanup_save_fpu_regs_vx_low) | |
1190 | jhe 2f | |
1191 | clg %r9,BASED(.Lcleanup_save_fpu_fpc_end) | |
1192 | jhe 1f | |
1193 | 0: # Store floating-point controls | |
1194 | stfpc __FPU_fpc(%r2) | |
1195 | 1: # Load register save area and check if VX is active | |
1196 | lg %r3,__FPU_regs(%r2) | |
1197 | ltgr %r3,%r3 | |
1198 | jz 5f # no save area -> set CIF_FPU | |
1199 | tm __FPU_flags+3(%r2),FPU_USE_VX | |
1200 | jz 4f # no VX -> store FP regs | |
1201 | 2: # Store vector registers (V0-V15) | |
1202 | VSTM %v0,%v15,0,%r3 # vstm 0,15,0(3) | |
1203 | 3: # Store vector registers (V16-V31) | |
1204 | VSTM %v16,%v31,256,%r3 # vstm 16,31,256(3) | |
1205 | j 5f # -> done, set CIF_FPU flag | |
1206 | 4: # Store floating-point registers | |
1207 | std 0,0(%r3) | |
1208 | std 1,8(%r3) | |
1209 | std 2,16(%r3) | |
1210 | std 3,24(%r3) | |
1211 | std 4,32(%r3) | |
1212 | std 5,40(%r3) | |
1213 | std 6,48(%r3) | |
1214 | std 7,56(%r3) | |
1215 | std 8,64(%r3) | |
1216 | std 9,72(%r3) | |
1217 | std 10,80(%r3) | |
1218 | std 11,88(%r3) | |
1219 | std 12,96(%r3) | |
1220 | std 13,104(%r3) | |
1221 | std 14,112(%r3) | |
1222 | std 15,120(%r3) | |
1223 | 5: # Set CIF_FPU flag | |
1224 | oi __LC_CPU_FLAGS+7,_CIF_FPU | |
1225 | lg %r9,48(%r11) # return from save_fpu_regs | |
1226 | br %r14 | |
1227 | .Lcleanup_save_fpu_fpc_end: | |
1228 | .quad .Lsave_fpu_regs_fpc_end | |
1229 | .Lcleanup_save_fpu_regs_vx_low: | |
1230 | .quad .Lsave_fpu_regs_vx_low | |
1231 | .Lcleanup_save_fpu_regs_vx_high: | |
1232 | .quad .Lsave_fpu_regs_vx_high | |
1233 | .Lcleanup_save_fpu_regs_fp: | |
1234 | .quad .Lsave_fpu_regs_fp | |
1235 | .Lcleanup_save_fpu_regs_done: | |
1236 | .quad .Lsave_fpu_regs_done | |
1237 | ||
1238 | .Lcleanup_load_fpu_regs: | |
1239 | tm __LC_CPU_FLAGS+7,_CIF_FPU | |
1240 | bnor %r14 | |
1241 | clg %r9,BASED(.Lcleanup_load_fpu_regs_done) | |
1242 | jhe 1f | |
1243 | clg %r9,BASED(.Lcleanup_load_fpu_regs_fp) | |
1244 | jhe 2f | |
1245 | clg %r9,BASED(.Lcleanup_load_fpu_regs_fp_ctl) | |
1246 | jhe 3f | |
1247 | clg %r9,BASED(.Lcleanup_load_fpu_regs_vx_high) | |
1248 | jhe 4f | |
1249 | clg %r9,BASED(.Lcleanup_load_fpu_regs_vx) | |
1250 | jhe 5f | |
1251 | clg %r9,BASED(.Lcleanup_load_fpu_regs_vx_ctl) | |
1252 | jhe 6f | |
1253 | lg %r4,__TI_task(%r12) | |
1254 | la %r4,__THREAD_fpu(%r4) | |
1255 | lfpc __FPU_fpc(%r4) | |
1256 | tm __FPU_flags+3(%r4),FPU_USE_VX # VX-enabled task ? | |
1257 | lg %r4,__FPU_regs(%r4) # %r4 <- reg save area | |
1258 | jz 3f # -> no VX, load FP regs | |
1259 | 6: # Set VX-enablement control | |
1260 | stctg %c0,%c0,__SF_EMPTY+32(%r15) # store CR0 | |
1261 | tm __SF_EMPTY+32+5(%r15),2 # test VX control | |
1262 | jo 5f | |
1263 | oi __SF_EMPTY+32+5(%r15),2 # set VX control | |
1264 | lctlg %c0,%c0,__SF_EMPTY+32(%r15) | |
1265 | 5: # Load V0 ..V15 registers | |
1266 | VLM %v0,%v15,0,%r4 | |
1267 | 4: # Load V16..V31 registers | |
1268 | VLM %v16,%v31,256,%r4 | |
1269 | j 1f | |
1270 | 3: # Clear VX-enablement control for FP | |
1271 | stctg %c0,%c0,__SF_EMPTY+32(%r15) # store CR0 | |
1272 | tm __SF_EMPTY+32+5(%r15),2 # test VX control | |
1273 | jz 2f | |
1274 | ni __SF_EMPTY+32+5(%r15),253 # clear VX control | |
1275 | lctlg %c0,%c0,__SF_EMPTY+32(%r15) | |
1276 | 2: # Load floating-point registers | |
1277 | ld 0,0(%r4) | |
1278 | ld 1,8(%r4) | |
1279 | ld 2,16(%r4) | |
1280 | ld 3,24(%r4) | |
1281 | ld 4,32(%r4) | |
1282 | ld 5,40(%r4) | |
1283 | ld 6,48(%r4) | |
1284 | ld 7,56(%r4) | |
1285 | ld 8,64(%r4) | |
1286 | ld 9,72(%r4) | |
1287 | ld 10,80(%r4) | |
1288 | ld 11,88(%r4) | |
1289 | ld 12,96(%r4) | |
1290 | ld 13,104(%r4) | |
1291 | ld 14,112(%r4) | |
1292 | ld 15,120(%r4) | |
1293 | 1: # Clear CIF_FPU bit | |
1294 | ni __LC_CPU_FLAGS+7,255-_CIF_FPU | |
1295 | lg %r9,48(%r11) # return from load_fpu_regs | |
1296 | br %r14 | |
1297 | .Lcleanup_load_fpu_regs_vx_ctl: | |
1298 | .quad .Lload_fpu_regs_vx_ctl | |
1299 | .Lcleanup_load_fpu_regs_vx: | |
1300 | .quad .Lload_fpu_regs_vx | |
1301 | .Lcleanup_load_fpu_regs_vx_high: | |
1302 | .quad .Lload_fpu_regs_vx_high | |
1303 | .Lcleanup_load_fpu_regs_fp_ctl: | |
1304 | .quad .Lload_fpu_regs_fp_ctl | |
1305 | .Lcleanup_load_fpu_regs_fp: | |
1306 | .quad .Lload_fpu_regs_fp | |
1307 | .Lcleanup_load_fpu_regs_done: | |
1308 | .quad .Lload_fpu_regs_done | |
1309 | ||
1310 | .Lcleanup___ctl_set_vx: | |
1311 | stctg %c0,%c0,__SF_EMPTY(%r15) | |
1312 | tm __SF_EMPTY+5(%r15),2 | |
1313 | bor %r14 | |
1314 | oi __SF_EMPTY+5(%r15),2 | |
1315 | lctlg %c0,%c0,__SF_EMPTY(%r15) | |
1316 | lg %r9,48(%r11) # return from __ctl_set_vx | |
1317 | br %r14 | |
1318 | ||
1da177e4 LT |
1319 | /* |
1320 | * Integer constants | |
1321 | */ | |
c5328901 | 1322 | .align 8 |
1da177e4 | 1323 | .Lcritical_start: |
86ed42f4 | 1324 | .quad .L__critical_start |
c5328901 | 1325 | .Lcritical_length: |
86ed42f4 | 1326 | .quad .L__critical_end - .L__critical_start |
61aa4884 | 1327 | #if IS_ENABLED(CONFIG_KVM) |
d0fc4107 | 1328 | .Lsie_critical_start: |
86ed42f4 | 1329 | .quad .Lsie_gmap |
7c470539 | 1330 | .Lsie_critical_length: |
86ed42f4 | 1331 | .quad .Lsie_done - .Lsie_gmap |
603d1a50 MS |
1332 | #endif |
1333 | ||
a876cb3f HC |
1334 | .section .rodata, "a" |
1335 | #define SYSCALL(esame,emu) .long esame | |
9bf1226b | 1336 | .globl sys_call_table |
1da177e4 LT |
1337 | sys_call_table: |
1338 | #include "syscalls.S" | |
1339 | #undef SYSCALL | |
1340 | ||
347a8dc3 | 1341 | #ifdef CONFIG_COMPAT |
1da177e4 | 1342 | |
a876cb3f | 1343 | #define SYSCALL(esame,emu) .long emu |
61649881 | 1344 | .globl sys_call_table_emu |
1da177e4 LT |
1345 | sys_call_table_emu: |
1346 | #include "syscalls.S" | |
1347 | #undef SYSCALL | |
1348 | #endif |