entry64.S 30.6 KB
Newer Older
L
Linus Torvalds 已提交
1
/*
2
 *  arch/s390/kernel/entry64.S
L
Linus Torvalds 已提交
3 4
 *    S390 low-level entry points.
 *
5
 *    Copyright (C) IBM Corp. 1999,2006
L
Linus Torvalds 已提交
6
 *    Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
H
Heiko Carstens 已提交
7 8
 *		 Hartmut Penner (hp@de.ibm.com),
 *		 Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com),
9
 *		 Heiko Carstens <heiko.carstens@de.ibm.com>
L
Linus Torvalds 已提交
10 11 12
 */

#include <linux/linkage.h>
13
#include <linux/init.h>
L
Linus Torvalds 已提交
14 15 16 17
#include <asm/cache.h>
#include <asm/errno.h>
#include <asm/ptrace.h>
#include <asm/thread_info.h>
18
#include <asm/asm-offsets.h>
L
Linus Torvalds 已提交
19 20 21 22 23 24 25
#include <asm/unistd.h>
#include <asm/page.h>

/*
 * Stack layout for the system_call stack entry.
 * The first few entries are identical to the user_regs_struct.
 */
H
Heiko Carstens 已提交
26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46
SP_PTREGS    =	STACK_FRAME_OVERHEAD
SP_ARGS      =	STACK_FRAME_OVERHEAD + __PT_ARGS
SP_PSW	     =	STACK_FRAME_OVERHEAD + __PT_PSW
SP_R0	     =	STACK_FRAME_OVERHEAD + __PT_GPRS
SP_R1	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 8
SP_R2	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 16
SP_R3	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 24
SP_R4	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 32
SP_R5	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 40
SP_R6	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 48
SP_R7	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 56
SP_R8	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 64
SP_R9	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 72
SP_R10	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 80
SP_R11	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 88
SP_R12	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 96
SP_R13	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 104
SP_R14	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 112
SP_R15	     =	STACK_FRAME_OVERHEAD + __PT_GPRS + 120
SP_ORIG_R2   =	STACK_FRAME_OVERHEAD + __PT_ORIG_GPR2
SP_ILC	     =	STACK_FRAME_OVERHEAD + __PT_ILC
47
SP_SVCNR      =	STACK_FRAME_OVERHEAD + __PT_SVCNR
H
Heiko Carstens 已提交
48
SP_SIZE      =	STACK_FRAME_OVERHEAD + __PT_SIZE
L
Linus Torvalds 已提交
49 50 51 52

STACK_SHIFT = PAGE_SHIFT + THREAD_ORDER
STACK_SIZE  = 1 << STACK_SHIFT

M
Martin Schwidefsky 已提交
53
_TIF_WORK_SVC = (_TIF_SIGPENDING | _TIF_NOTIFY_RESUME | _TIF_NEED_RESCHED | \
54
		 _TIF_MCCK_PENDING | _TIF_RESTART_SVC | _TIF_SINGLE_STEP )
M
Martin Schwidefsky 已提交
55
_TIF_WORK_INT = (_TIF_SIGPENDING | _TIF_NOTIFY_RESUME | _TIF_NEED_RESCHED | \
56
		 _TIF_MCCK_PENDING)
57
_TIF_SYSCALL = (_TIF_SYSCALL_TRACE>>8 | _TIF_SYSCALL_AUDIT>>8 | \
58
		_TIF_SECCOMP>>8 | _TIF_SYSCALL_TRACEPOINT>>8)
L
Linus Torvalds 已提交
59 60 61

#define BASED(name) name-system_call(%r13)

62 63
#ifdef CONFIG_TRACE_IRQFLAGS
	.macro	TRACE_IRQS_ON
64 65
	 basr	%r2,%r0
	 brasl	%r14,trace_hardirqs_on_caller
66 67 68
	.endm

	.macro	TRACE_IRQS_OFF
69 70
	 basr	%r2,%r0
	 brasl	%r14,trace_hardirqs_off_caller
71
	.endm
72

73
	.macro TRACE_IRQS_CHECK
74
	basr	%r2,%r0
75 76
	tm	SP_PSW(%r15),0x03	# irqs enabled?
	jz	0f
77
	brasl	%r14,trace_hardirqs_on_caller
78
	j	1f
79
0:	brasl	%r14,trace_hardirqs_off_caller
80
1:
81
	.endm
82 83 84
#else
#define TRACE_IRQS_ON
#define TRACE_IRQS_OFF
85 86 87 88 89 90 91 92 93 94 95
#define TRACE_IRQS_CHECK
#endif

#ifdef CONFIG_LOCKDEP
	.macro	LOCKDEP_SYS_EXIT
	tm	SP_PSW+1(%r15),0x01	# returning to user ?
	jz	0f
	brasl	%r14,lockdep_sys_exit
0:
	.endm
#else
96
#define LOCKDEP_SYS_EXIT
97 98
#endif

H
Heiko Carstens 已提交
99
	.macro	UPDATE_VTIME lc_from,lc_to,lc_sum
L
Linus Torvalds 已提交
100 101 102 103 104 105 106 107 108 109 110 111 112 113
	lg	%r10,\lc_from
	slg	%r10,\lc_to
	alg	%r10,\lc_sum
	stg	%r10,\lc_sum
	.endm

/*
 * Register usage in interrupt handlers:
 *    R9  - pointer to current task structure
 *    R13 - pointer to literal pool
 *    R14 - return register for function calls
 *    R15 - kernel stack pointer
 */

H
Heiko Carstens 已提交
114
	.macro	SAVE_ALL_BASE savearea
L
Linus Torvalds 已提交
115 116 117 118
	stmg	%r12,%r15,\savearea
	larl	%r13,system_call
	.endm

119 120 121 122 123
	.macro	SAVE_ALL_SVC psworg,savearea
	la	%r12,\psworg
	lg	%r15,__LC_KERNEL_STACK	# problem state -> load ksp
	.endm

124
	.macro	SAVE_ALL_SYNC psworg,savearea
L
Linus Torvalds 已提交
125 126 127 128
	la	%r12,\psworg
	tm	\psworg+1,0x01		# test problem state bit
	jz	2f			# skip stack setup save
	lg	%r15,__LC_KERNEL_STACK	# problem state -> load ksp
129 130 131 132 133 134 135 136 137 138 139
#ifdef CONFIG_CHECK_STACK
	j	3f
2:	tml	%r15,STACK_SIZE - CONFIG_STACK_GUARD
	jz	stack_overflow
3:
#endif
2:
	.endm

	.macro	SAVE_ALL_ASYNC psworg,savearea
	la	%r12,\psworg
L
Linus Torvalds 已提交
140 141 142 143 144 145 146
	tm	\psworg+1,0x01		# test problem state bit
	jnz	1f			# from user -> load kernel stack
	clc	\psworg+8(8),BASED(.Lcritical_end)
	jhe	0f
	clc	\psworg+8(8),BASED(.Lcritical_start)
	jl	0f
	brasl	%r14,cleanup_critical
147
	tm	1(%r12),0x01		# retest problem state after cleanup
L
Linus Torvalds 已提交
148 149 150 151 152 153 154 155 156 157 158 159
	jnz	1f
0:	lg	%r14,__LC_ASYNC_STACK	# are we already on the async. stack ?
	slgr	%r14,%r15
	srag	%r14,%r14,STACK_SHIFT
	jz	2f
1:	lg	%r15,__LC_ASYNC_STACK	# load async stack
#ifdef CONFIG_CHECK_STACK
	j	3f
2:	tml	%r15,STACK_SIZE - CONFIG_STACK_GUARD
	jz	stack_overflow
3:
#endif
160 161 162 163
2:
	.endm

	.macro	CREATE_STACK_FRAME psworg,savearea
H
Heiko Carstens 已提交
164 165
	aghi	%r15,-SP_SIZE		# make room for registers & psw
	mvc	SP_PSW(16,%r15),0(%r12)	# move user PSW to stack
L
Linus Torvalds 已提交
166
	stg	%r2,SP_ORIG_R2(%r15)	# store original content of gpr 2
167
	icm	%r12,3,__LC_SVC_ILC
L
Linus Torvalds 已提交
168
	stmg	%r0,%r11,SP_R0(%r15)	# store gprs %r0-%r11 to kernel stack
169
	st	%r12,SP_SVCNR(%r15)
L
Linus Torvalds 已提交
170 171 172
	mvc	SP_R12(32,%r15),\savearea # move %r12-%r15 to stack
	la	%r12,0
	stg	%r12,__SF_BACKCHAIN(%r15)
H
Heiko Carstens 已提交
173
	.endm
L
Linus Torvalds 已提交
174

175 176
	.macro	RESTORE_ALL psworg,sync
	mvc	\psworg(16),SP_PSW(%r15) # move user PSW to lowcore
L
Linus Torvalds 已提交
177
	.if !\sync
178
	ni	\psworg+1,0xfd		# clear wait state bit
L
Linus Torvalds 已提交
179
	.endif
180 181
	lg	%r14,__LC_VDSO_PER_CPU
	lmg	%r0,%r13,SP_R0(%r15)	# load gprs 0-13 of user
M
Martin Schwidefsky 已提交
182
	stpt	__LC_EXIT_TIMER
183 184
	mvc	__VDSO_ECTG_BASE(16,%r14),__LC_EXIT_TIMER
	lmg	%r14,%r15,SP_R14(%r15)	# load grps 14-15 of user
185
	lpswe	\psworg			# back to caller
L
Linus Torvalds 已提交
186 187 188 189 190 191 192 193 194
	.endm

/*
 * Scheduler resume function, called by switch_to
 *  gpr2 = (task_struct *) prev
 *  gpr3 = (task_struct *) next
 * Returns:
 *  gpr2 = prev
 */
H
Heiko Carstens 已提交
195
	.globl	__switch_to
L
Linus Torvalds 已提交
196 197 198
__switch_to:
	tm	__THREAD_per+4(%r3),0xe8 # is the new process using per ?
	jz	__switch_to_noper		# if not we're fine
H
Heiko Carstens 已提交
199 200 201 202
	stctg	%c9,%c11,__SF_EMPTY(%r15)# We are using per stuff
	clc	__THREAD_per(24,%r3),__SF_EMPTY(%r15)
	je	__switch_to_noper	     # we got away without bashing TLB's
	lctlg	%c9,%c11,__THREAD_per(%r3)	# Nope we didn't
L
Linus Torvalds 已提交
203
__switch_to_noper:
H
Heiko Carstens 已提交
204
	lg	%r4,__THREAD_info(%r2)		    # get thread_info of prev
205 206 207 208 209 210
	tm	__TI_flags+7(%r4),_TIF_MCCK_PENDING # machine check pending?
	jz	__switch_to_no_mcck
	ni	__TI_flags+7(%r4),255-_TIF_MCCK_PENDING # clear flag in prev
	lg	%r4,__THREAD_info(%r3)		    # get thread_info of next
	oi	__TI_flags+7(%r4),_TIF_MCCK_PENDING # set it in next
__switch_to_no_mcck:
H
Heiko Carstens 已提交
211
	stmg	%r6,%r15,__SF_GPRS(%r15)# store __switch_to registers of prev task
L
Linus Torvalds 已提交
212 213
	stg	%r15,__THREAD_ksp(%r2)	# store kernel stack to prev->tss.ksp
	lg	%r15,__THREAD_ksp(%r3)	# load kernel stack from next->tss.ksp
H
Heiko Carstens 已提交
214
	lmg	%r6,%r15,__SF_GPRS(%r15)# load __switch_to registers of next task
L
Linus Torvalds 已提交
215 216
	stg	%r3,__LC_CURRENT	# __LC_CURRENT = current task struct
	lctl	%c4,%c4,__TASK_pid(%r3) # load pid to control reg. 4
H
Heiko Carstens 已提交
217
	lg	%r3,__THREAD_info(%r3)	# load thread_info from task struct
L
Linus Torvalds 已提交
218 219 220 221 222 223 224 225 226 227 228
	stg	%r3,__LC_THREAD_INFO
	aghi	%r3,STACK_SIZE
	stg	%r3,__LC_KERNEL_STACK	# __LC_KERNEL_STACK = new kernel stack
	br	%r14

__critical_start:
/*
 * SVC interrupt handler routine. System calls are synchronous events and
 * are executed with interrupts enabled.
 */

H
Heiko Carstens 已提交
229
	.globl	system_call
L
Linus Torvalds 已提交
230
system_call:
M
Martin Schwidefsky 已提交
231
	stpt	__LC_SYNC_ENTER_TIMER
L
Linus Torvalds 已提交
232 233
sysc_saveall:
	SAVE_ALL_BASE __LC_SAVE_AREA
234
	SAVE_ALL_SVC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
H
Heiko Carstens 已提交
235 236
	CREATE_STACK_FRAME __LC_SVC_OLD_PSW,__LC_SAVE_AREA
	llgh	%r7,__LC_SVC_INT_CODE	# get svc number from lowcore
L
Linus Torvalds 已提交
237 238 239 240 241 242 243 244
sysc_vtime:
	UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
sysc_stime:
	UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
sysc_update:
	mvc	__LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
sysc_do_svc:
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
245
	ltgr	%r7,%r7		# test for svc 0
L
Linus Torvalds 已提交
246 247 248 249
	jnz	sysc_nr_ok
	# svc 0: system call number in %r1
	cl	%r1,BASED(.Lnr_syscalls)
	jnl	sysc_nr_ok
H
Heiko Carstens 已提交
250
	lgfr	%r7,%r1 	# clear high word in r1
L
Linus Torvalds 已提交
251 252 253
sysc_nr_ok:
	mvc	SP_ARGS(8,%r15),SP_R7(%r15)
sysc_do_restart:
254 255
	sth	%r7,SP_SVCNR(%r15)
	sllg	%r7,%r7,2	# svc number * 4
H
Heiko Carstens 已提交
256
	larl	%r10,sys_call_table
257
#ifdef CONFIG_COMPAT
258 259
	tm	__TI_flags+5(%r9),(_TIF_31BIT>>16)  # running in 31 bit mode ?
	jno	sysc_noemu
H
Heiko Carstens 已提交
260
	larl	%r10,sys_call_table_emu  # use 31 bit emulation system calls
L
Linus Torvalds 已提交
261 262
sysc_noemu:
#endif
263
	tm	__TI_flags+6(%r9),_TIF_SYSCALL
H
Heiko Carstens 已提交
264 265 266 267
	lgf	%r8,0(%r7,%r10) # load address of system call routine
	jnz	sysc_tracesys
	basr	%r14,%r8	# call sys_xxxx
	stg	%r2,SP_R2(%r15) # store return value (change R2 on stack)
L
Linus Torvalds 已提交
268 269 270

sysc_return:
	tm	__TI_flags+7(%r9),_TIF_WORK_SVC
H
Heiko Carstens 已提交
271
	jnz	sysc_work	# there is work to do (signals etc.)
272 273 274 275 276 277
sysc_restore:
#ifdef CONFIG_TRACE_IRQFLAGS
	larl	%r1,sysc_restore_trace_psw
	lpswe	0(%r1)
sysc_restore_trace:
	TRACE_IRQS_CHECK
278
	LOCKDEP_SYS_EXIT
279
#endif
L
Linus Torvalds 已提交
280
sysc_leave:
H
Heiko Carstens 已提交
281
	RESTORE_ALL __LC_RETURN_PSW,1
282 283 284
sysc_done:

#ifdef CONFIG_TRACE_IRQFLAGS
285
	.section .data,"aw",@progbits
286 287 288 289
	.align	8
	.globl sysc_restore_trace_psw
sysc_restore_trace_psw:
	.quad	0, sysc_restore_trace
290
	.previous
291
#endif
L
Linus Torvalds 已提交
292 293 294 295 296 297

#
# recheck if there is more work to do
#
sysc_work_loop:
	tm	__TI_flags+7(%r9),_TIF_WORK_SVC
298
	jz	sysc_restore	  # there is no work to do
L
Linus Torvalds 已提交
299 300 301 302
#
# One of the work bits is on. Find out which one.
#
sysc_work:
303 304
	tm	SP_PSW+1(%r15),0x01	# returning to user ?
	jno	sysc_restore
305 306
	tm	__TI_flags+7(%r9),_TIF_MCCK_PENDING
	jo	sysc_mcck_pending
L
Linus Torvalds 已提交
307 308
	tm	__TI_flags+7(%r9),_TIF_NEED_RESCHED
	jo	sysc_reschedule
309
	tm	__TI_flags+7(%r9),_TIF_SIGPENDING
310
	jnz	sysc_sigpending
M
Martin Schwidefsky 已提交
311 312
	tm	__TI_flags+7(%r9),_TIF_NOTIFY_RESUME
	jnz	sysc_notify_resume
L
Linus Torvalds 已提交
313 314 315 316
	tm	__TI_flags+7(%r9),_TIF_RESTART_SVC
	jo	sysc_restart
	tm	__TI_flags+7(%r9),_TIF_SINGLE_STEP
	jo	sysc_singlestep
317 318
	j	sysc_restore
sysc_work_done:
L
Linus Torvalds 已提交
319 320 321

#
# _TIF_NEED_RESCHED is set, call schedule
H
Heiko Carstens 已提交
322 323 324 325
#
sysc_reschedule:
	larl	%r14,sysc_work_loop
	jg	schedule	# return point is sysc_return
L
Linus Torvalds 已提交
326

327 328 329 330 331
#
# _TIF_MCCK_PENDING is set, call handler
#
sysc_mcck_pending:
	larl	%r14,sysc_work_loop
H
Heiko Carstens 已提交
332
	jg	s390_handle_mcck	# TIF bit will be cleared by handler
333

L
Linus Torvalds 已提交
334
#
335
# _TIF_SIGPENDING is set, call do_signal
L
Linus Torvalds 已提交
336
#
H
Heiko Carstens 已提交
337
sysc_sigpending:
L
Linus Torvalds 已提交
338
	ni	__TI_flags+7(%r9),255-_TIF_SINGLE_STEP # clear TIF_SINGLE_STEP
H
Heiko Carstens 已提交
339 340
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
	brasl	%r14,do_signal		# call do_signal
L
Linus Torvalds 已提交
341 342 343 344
	tm	__TI_flags+7(%r9),_TIF_RESTART_SVC
	jo	sysc_restart
	tm	__TI_flags+7(%r9),_TIF_SINGLE_STEP
	jo	sysc_singlestep
H
Heiko Carstens 已提交
345
	j	sysc_work_loop
L
Linus Torvalds 已提交
346

M
Martin Schwidefsky 已提交
347 348 349 350 351 352 353 354
#
# _TIF_NOTIFY_RESUME is set, call do_notify_resume
#
sysc_notify_resume:
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
	larl	%r14,sysc_work_loop
	jg	do_notify_resume	# call do_notify_resume

L
Linus Torvalds 已提交
355 356 357 358 359
#
# _TIF_RESTART_SVC is set, set up registers and restart svc
#
sysc_restart:
	ni	__TI_flags+7(%r9),255-_TIF_RESTART_SVC # clear TIF_RESTART_SVC
H
Heiko Carstens 已提交
360
	lg	%r7,SP_R2(%r15)		# load new svc number
L
Linus Torvalds 已提交
361
	mvc	SP_R2(8,%r15),SP_ORIG_R2(%r15) # restore first argument
H
Heiko Carstens 已提交
362 363
	lmg	%r2,%r6,SP_R2(%r15)	# load svc arguments
	j	sysc_do_restart 	# restart svc
L
Linus Torvalds 已提交
364 365 366 367 368

#
# _TIF_SINGLE_STEP is set, call do_single_step
#
sysc_singlestep:
369 370
	ni	__TI_flags+7(%r9),255-_TIF_SINGLE_STEP	# clear TIF_SINGLE_STEP
	xc	SP_SVCNR(2,%r15),SP_SVCNR(%r15)		# clear svc number
L
Linus Torvalds 已提交
371 372 373 374 375
	la	%r2,SP_PTREGS(%r15)	# address of register-save area
	larl	%r14,sysc_return	# load adr. of system return
	jg	do_single_step		# branch to do_sigtrap

#
M
Martin Schwidefsky 已提交
376 377
# call tracehook_report_syscall_entry/tracehook_report_syscall_exit before
# and after the system call
L
Linus Torvalds 已提交
378 379
#
sysc_tracesys:
H
Heiko Carstens 已提交
380
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
L
Linus Torvalds 已提交
381 382
	la	%r3,0
	srl	%r7,2
H
Heiko Carstens 已提交
383
	stg	%r7,SP_R2(%r15)
M
Martin Schwidefsky 已提交
384
	brasl	%r14,do_syscall_trace_enter
L
Linus Torvalds 已提交
385
	lghi	%r0,NR_syscalls
M
Martin Schwidefsky 已提交
386
	clgr	%r0,%r2
L
Linus Torvalds 已提交
387
	jnh	sysc_tracenogo
388
	sllg	%r7,%r2,2		# svc number *4
L
Linus Torvalds 已提交
389 390
	lgf	%r8,0(%r7,%r10)
sysc_tracego:
H
Heiko Carstens 已提交
391 392 393 394
	lmg	%r3,%r6,SP_R3(%r15)
	lg	%r2,SP_ORIG_R2(%r15)
	basr	%r14,%r8		# call sys_xxx
	stg	%r2,SP_R2(%r15)		# store return value
L
Linus Torvalds 已提交
395
sysc_tracenogo:
396
	tm	__TI_flags+6(%r9),_TIF_SYSCALL
H
Heiko Carstens 已提交
397 398 399
	jz	sysc_return
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
	larl	%r14,sysc_return	# return point is sysc_return
M
Martin Schwidefsky 已提交
400
	jg	do_syscall_trace_exit
L
Linus Torvalds 已提交
401 402 403 404

#
# a new process exits the kernel with ret_from_fork
#
H
Heiko Carstens 已提交
405
	.globl	ret_from_fork
L
Linus Torvalds 已提交
406 407 408 409 410 411
ret_from_fork:
	lg	%r13,__LC_SVC_NEW_PSW+8
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
	tm	SP_PSW+1(%r15),0x01	# forking a kernel thread ?
	jo	0f
	stg	%r15,SP_R15(%r15)	# store stack pointer for new kthread
H
Heiko Carstens 已提交
412
0:	brasl	%r14,schedule_tail
413
	TRACE_IRQS_ON
H
Heiko Carstens 已提交
414
	stosm	24(%r15),0x03		# reenable interrupts
415
	j	sysc_tracenogo
L
Linus Torvalds 已提交
416 417

#
M
Martin Schwidefsky 已提交
418 419
# kernel_execve function needs to deal with pt_regs that is not
# at the usual place
L
Linus Torvalds 已提交
420
#
M
Martin Schwidefsky 已提交
421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444 445 446
	.globl	kernel_execve
kernel_execve:
	stmg	%r12,%r15,96(%r15)
	lgr	%r14,%r15
	aghi	%r15,-SP_SIZE
	stg	%r14,__SF_BACKCHAIN(%r15)
	la	%r12,SP_PTREGS(%r15)
	xc	0(__PT_SIZE,%r12),0(%r12)
	lgr	%r5,%r12
	brasl	%r14,do_execve
	ltgfr	%r2,%r2
	je	0f
	aghi	%r15,SP_SIZE
	lmg	%r12,%r15,96(%r15)
	br	%r14
	# execve succeeded.
0:	stnsm	__SF_EMPTY(%r15),0xfc	# disable interrupts
	lg	%r15,__LC_KERNEL_STACK	# load ksp
	aghi	%r15,-SP_SIZE		# make room for registers & psw
	lg	%r13,__LC_SVC_NEW_PSW+8
	lg	%r9,__LC_THREAD_INFO
	mvc	SP_PTREGS(__PT_SIZE,%r15),0(%r12)	# copy pt_regs
	xc	__SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15)
	stosm	__SF_EMPTY(%r15),0x03	# reenable interrupts
	brasl	%r14,execve_tail
	j	sysc_return
L
Linus Torvalds 已提交
447 448 449 450 451

/*
 * Program check handler routine
 */

H
Heiko Carstens 已提交
452
	.globl	pgm_check_handler
L
Linus Torvalds 已提交
453 454 455 456 457 458 459 460 461 462 463 464 465 466
pgm_check_handler:
/*
 * First we need to check for a special case:
 * Single stepping an instruction that disables the PER event mask will
 * cause a PER event AFTER the mask has been set. Example: SVC or LPSW.
 * For a single stepped SVC the program check handler gets control after
 * the SVC new PSW has been loaded. But we want to execute the SVC first and
 * then handle the PER event. Therefore we update the SVC old PSW to point
 * to the pgm_check_handler and branch to the SVC handler after we checked
 * if we have to load the kernel stack register.
 * For every other possible cause for PER event without the PER mask set
 * we just ignore the PER event (FIXME: is there anything we have to do
 * for LPSW?).
 */
M
Martin Schwidefsky 已提交
467
	stpt	__LC_SYNC_ENTER_TIMER
L
Linus Torvalds 已提交
468
	SAVE_ALL_BASE __LC_SAVE_AREA
H
Heiko Carstens 已提交
469 470
	tm	__LC_PGM_INT_CODE+1,0x80 # check whether we got a per exception
	jnz	pgm_per 		 # got per exception -> special case
471
	SAVE_ALL_SYNC __LC_PGM_OLD_PSW,__LC_SAVE_AREA
472
	CREATE_STACK_FRAME __LC_PGM_OLD_PSW,__LC_SAVE_AREA
L
Linus Torvalds 已提交
473 474 475 476 477 478 479
	tm	SP_PSW+1(%r15),0x01	# interrupting from user ?
	jz	pgm_no_vtime
	UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
	UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
	mvc	__LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
pgm_no_vtime:
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
480
	mvc	SP_ARGS(8,%r15),__LC_LAST_BREAK
481
	TRACE_IRQS_OFF
H
Heiko Carstens 已提交
482
	lgf	%r3,__LC_PGM_ILC	# load program interruption code
L
Linus Torvalds 已提交
483 484 485
	lghi	%r8,0x7f
	ngr	%r8,%r3
pgm_do_call:
H
Heiko Carstens 已提交
486 487 488 489
	sll	%r8,3
	larl	%r1,pgm_check_table
	lg	%r1,0(%r8,%r1)		# load address of handler routine
	la	%r2,SP_PTREGS(%r15)	# address of register-save area
L
Linus Torvalds 已提交
490
	larl	%r14,sysc_return
H
Heiko Carstens 已提交
491
	br	%r1			# branch to interrupt-handler
L
Linus Torvalds 已提交
492 493 494 495 496

#
# handle per exception
#
pgm_per:
H
Heiko Carstens 已提交
497 498
	tm	__LC_PGM_OLD_PSW,0x40	# test if per event recording is on
	jnz	pgm_per_std		# ok, normal per event from user space
L
Linus Torvalds 已提交
499
# ok its one of the special cases, now we need to find out which one
H
Heiko Carstens 已提交
500 501
	clc	__LC_PGM_OLD_PSW(16),__LC_SVC_NEW_PSW
	je	pgm_svcper
L
Linus Torvalds 已提交
502 503
# no interesting special case, ignore PER event
	lmg	%r12,%r15,__LC_SAVE_AREA
H
Heiko Carstens 已提交
504
	lpswe	__LC_PGM_OLD_PSW
L
Linus Torvalds 已提交
505 506 507 508 509

#
# Normal per exception
#
pgm_per_std:
510
	SAVE_ALL_SYNC __LC_PGM_OLD_PSW,__LC_SAVE_AREA
511
	CREATE_STACK_FRAME __LC_PGM_OLD_PSW,__LC_SAVE_AREA
L
Linus Torvalds 已提交
512 513 514 515 516 517 518
	tm	SP_PSW+1(%r15),0x01	# interrupting from user ?
	jz	pgm_no_vtime2
	UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
	UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
	mvc	__LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
pgm_no_vtime2:
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
519
	TRACE_IRQS_OFF
L
Linus Torvalds 已提交
520
	lg	%r1,__TI_task(%r9)
M
Michael Grundy 已提交
521 522
	tm	SP_PSW+1(%r15),0x01	# kernel per event ?
	jz	kernel_per
L
Linus Torvalds 已提交
523 524 525 526
	mvc	__THREAD_per+__PER_atmid(2,%r1),__LC_PER_ATMID
	mvc	__THREAD_per+__PER_address(8,%r1),__LC_PER_ADDRESS
	mvc	__THREAD_per+__PER_access_id(1,%r1),__LC_PER_ACCESS_ID
	oi	__TI_flags+7(%r9),_TIF_SINGLE_STEP # set TIF_SINGLE_STEP
H
Heiko Carstens 已提交
527
	lgf	%r3,__LC_PGM_ILC	# load program interruption code
L
Linus Torvalds 已提交
528
	lghi	%r8,0x7f
H
Heiko Carstens 已提交
529
	ngr	%r8,%r3			# clear per-event-bit and ilc
L
Linus Torvalds 已提交
530 531 532 533 534 535 536
	je	sysc_return
	j	pgm_do_call

#
# it was a single stepped SVC that is causing all the trouble
#
pgm_svcper:
537
	SAVE_ALL_SYNC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
538
	CREATE_STACK_FRAME __LC_SVC_OLD_PSW,__LC_SAVE_AREA
L
Linus Torvalds 已提交
539 540 541
	UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
	UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
	mvc	__LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
H
Heiko Carstens 已提交
542
	llgh	%r7,__LC_SVC_INT_CODE	# get svc number from lowcore
L
Linus Torvalds 已提交
543
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
544 545 546 547
	lg	%r8,__TI_task(%r9)
	mvc	__THREAD_per+__PER_atmid(2,%r8),__LC_PER_ATMID
	mvc	__THREAD_per+__PER_address(8,%r8),__LC_PER_ADDRESS
	mvc	__THREAD_per+__PER_access_id(1,%r8),__LC_PER_ACCESS_ID
L
Linus Torvalds 已提交
548
	oi	__TI_flags+7(%r9),_TIF_SINGLE_STEP # set TIF_SINGLE_STEP
549
	TRACE_IRQS_ON
550
	lmg	%r2,%r6,SP_R2(%r15)	# load svc arguments
L
Linus Torvalds 已提交
551 552 553
	stosm	__SF_EMPTY(%r15),0x03	# reenable interrupts
	j	sysc_do_svc

M
Michael Grundy 已提交
554 555 556 557
#
# per was called from kernel, must be kprobes
#
kernel_per:
558
	xc	SP_SVCNR(2,%r15),SP_SVCNR(%r15)	# clear svc number
M
Michael Grundy 已提交
559
	la	%r2,SP_PTREGS(%r15)	# address of register-save area
560
	larl	%r14,sysc_restore	# load adr. of system ret, no work
M
Michael Grundy 已提交
561 562
	jg	do_single_step		# branch to do_single_step

L
Linus Torvalds 已提交
563 564 565
/*
 * IO interrupt handler routine
 */
H
Heiko Carstens 已提交
566
	.globl io_int_handler
L
Linus Torvalds 已提交
567 568
io_int_handler:
	stck	__LC_INT_CLOCK
569
	stpt	__LC_ASYNC_ENTER_TIMER
L
Linus Torvalds 已提交
570
	SAVE_ALL_BASE __LC_SAVE_AREA+32
571
	SAVE_ALL_ASYNC __LC_IO_OLD_PSW,__LC_SAVE_AREA+32
572
	CREATE_STACK_FRAME __LC_IO_OLD_PSW,__LC_SAVE_AREA+32
L
Linus Torvalds 已提交
573 574 575 576 577 578 579
	tm	SP_PSW+1(%r15),0x01	# interrupting from user ?
	jz	io_no_vtime
	UPDATE_VTIME __LC_EXIT_TIMER,__LC_ASYNC_ENTER_TIMER,__LC_USER_TIMER
	UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
	mvc	__LC_LAST_UPDATE_TIMER(8),__LC_ASYNC_ENTER_TIMER
io_no_vtime:
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
580
	TRACE_IRQS_OFF
H
Heiko Carstens 已提交
581 582
	la	%r2,SP_PTREGS(%r15)	# address of register-save area
	brasl	%r14,do_IRQ		# call standard irq handler
L
Linus Torvalds 已提交
583 584
io_return:
	tm	__TI_flags+7(%r9),_TIF_WORK_INT
H
Heiko Carstens 已提交
585
	jnz	io_work 		# there is work to do (signals etc.)
586 587 588 589 590 591
io_restore:
#ifdef CONFIG_TRACE_IRQFLAGS
	larl	%r1,io_restore_trace_psw
	lpswe	0(%r1)
io_restore_trace:
	TRACE_IRQS_CHECK
592
	LOCKDEP_SYS_EXIT
593
#endif
L
Linus Torvalds 已提交
594
io_leave:
H
Heiko Carstens 已提交
595
	RESTORE_ALL __LC_RETURN_PSW,0
596
io_done:
L
Linus Torvalds 已提交
597

598
#ifdef CONFIG_TRACE_IRQFLAGS
599
	.section .data,"aw",@progbits
600 601 602 603
	.align	8
	.globl io_restore_trace_psw
io_restore_trace_psw:
	.quad	0, io_restore_trace
604
	.previous
605 606
#endif

607
#
608 609
# There is work todo, we need to check if we return to userspace, then
# check, if we are in SIE, if yes leave it
610 611 612 613
#
io_work:
	tm	SP_PSW+1(%r15),0x01	# returning to user ?
#ifndef CONFIG_PREEMPT
614 615 616 617 618 619 620 621 622 623 624
#if defined(CONFIG_KVM) || defined(CONFIG_KVM_MODULE)
	jnz	io_work_user		# yes -> no need to check for SIE
	la	%r1, BASED(sie_opcode)	# we return to kernel here
	lg	%r2, SP_PSW+8(%r15)
	clc	0(2,%r1), 0(%r2)	# is current instruction = SIE?
	jne	io_restore		# no-> return to kernel
	lg	%r1, SP_PSW+8(%r15)	# yes-> add 4 bytes to leave SIE
	aghi	%r1, 4
	stg	%r1, SP_PSW+8(%r15)
	j	io_restore		# return to kernel
#else
625
	jno	io_restore		# no-> skip resched & signal
626
#endif
627 628
#else
	jnz	io_work_user		# yes -> do resched & signal
629 630 631 632 633 634 635 636 637 638
#if defined(CONFIG_KVM) || defined(CONFIG_KVM_MODULE)
	la	%r1, BASED(sie_opcode)
	lg	%r2, SP_PSW+8(%r15)
	clc	0(2,%r1), 0(%r2)	# is current instruction = SIE?
	jne	0f			# no -> leave PSW alone
	lg	%r1, SP_PSW+8(%r15)	# yes-> add 4 bytes to leave SIE
	aghi	%r1, 4
	stg	%r1, SP_PSW+8(%r15)
0:
#endif
639
	# check for preemptive scheduling
H
Heiko Carstens 已提交
640
	icm	%r0,15,__TI_precount(%r9)
641
	jnz	io_restore		# preemption is disabled
L
Linus Torvalds 已提交
642 643 644 645
	# switch to kernel stack
	lg	%r1,SP_R15(%r15)
	aghi	%r1,-SP_SIZE
	mvc	SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
H
Heiko Carstens 已提交
646
	xc	__SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) # clear back chain
L
Linus Torvalds 已提交
647 648 649
	lgr	%r15,%r1
io_resume_loop:
	tm	__TI_flags+7(%r9),_TIF_NEED_RESCHED
650
	jno	io_restore
H
Heiko Carstens 已提交
651 652
	larl	%r14,io_resume_loop
	jg	preempt_schedule_irq
L
Linus Torvalds 已提交
653 654
#endif

655
io_work_user:
L
Linus Torvalds 已提交
656 657 658
	lg	%r1,__LC_KERNEL_STACK
	aghi	%r1,-SP_SIZE
	mvc	SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
H
Heiko Carstens 已提交
659
	xc	__SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) # clear back chain
L
Linus Torvalds 已提交
660 661 662
	lgr	%r15,%r1
#
# One of the work bits is on. Find out which one.
663 664
# Checked are: _TIF_SIGPENDING, _TIF_RESTORE_SIGPENDING, _TIF_NEED_RESCHED
#	       and _TIF_MCCK_PENDING
L
Linus Torvalds 已提交
665 666
#
io_work_loop:
667 668
	tm	__TI_flags+7(%r9),_TIF_MCCK_PENDING
	jo	io_mcck_pending
L
Linus Torvalds 已提交
669 670
	tm	__TI_flags+7(%r9),_TIF_NEED_RESCHED
	jo	io_reschedule
671
	tm	__TI_flags+7(%r9),_TIF_SIGPENDING
672
	jnz	io_sigpending
M
Martin Schwidefsky 已提交
673 674
	tm	__TI_flags+7(%r9),_TIF_NOTIFY_RESUME
	jnz	io_notify_resume
675 676
	j	io_restore
io_work_done:
L
Linus Torvalds 已提交
677

678 679 680 681 682
#if defined(CONFIG_KVM) || defined(CONFIG_KVM_MODULE)
sie_opcode:
	.long 0xb2140000
#endif

683 684 685 686
#
# _TIF_MCCK_PENDING is set, call handler
#
io_mcck_pending:
H
Heiko Carstens 已提交
687 688
	brasl	%r14,s390_handle_mcck	# TIF bit will be cleared by handler
	j	io_work_loop
689

L
Linus Torvalds 已提交
690 691
#
# _TIF_NEED_RESCHED is set, call schedule
H
Heiko Carstens 已提交
692 693
#
io_reschedule:
694
	TRACE_IRQS_ON
H
Heiko Carstens 已提交
695 696 697
	stosm	__SF_EMPTY(%r15),0x03	# reenable interrupts
	brasl	%r14,schedule		# call scheduler
	stnsm	__SF_EMPTY(%r15),0xfc	# disable I/O and ext. interrupts
698
	TRACE_IRQS_OFF
L
Linus Torvalds 已提交
699
	tm	__TI_flags+7(%r9),_TIF_WORK_INT
700
	jz	io_restore		# there is no work to do
L
Linus Torvalds 已提交
701 702 703
	j	io_work_loop

#
704
# _TIF_SIGPENDING or is set, call do_signal
L
Linus Torvalds 已提交
705
#
H
Heiko Carstens 已提交
706
io_sigpending:
707
	TRACE_IRQS_ON
H
Heiko Carstens 已提交
708 709
	stosm	__SF_EMPTY(%r15),0x03	# reenable interrupts
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
L
Linus Torvalds 已提交
710
	brasl	%r14,do_signal		# call do_signal
H
Heiko Carstens 已提交
711
	stnsm	__SF_EMPTY(%r15),0xfc	# disable I/O and ext. interrupts
712
	TRACE_IRQS_OFF
H
Heiko Carstens 已提交
713
	j	io_work_loop
L
Linus Torvalds 已提交
714

M
Martin Schwidefsky 已提交
715 716 717 718 719 720 721 722 723 724 725 726
#
# _TIF_NOTIFY_RESUME or is set, call do_notify_resume
#
io_notify_resume:
	TRACE_IRQS_ON
	stosm	__SF_EMPTY(%r15),0x03	# reenable interrupts
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
	brasl	%r14,do_notify_resume	# call do_notify_resume
	stnsm	__SF_EMPTY(%r15),0xfc	# disable I/O and ext. interrupts
	TRACE_IRQS_OFF
	j	io_work_loop

L
Linus Torvalds 已提交
727 728 729
/*
 * External interrupt handler routine
 */
H
Heiko Carstens 已提交
730
	.globl	ext_int_handler
L
Linus Torvalds 已提交
731 732
ext_int_handler:
	stck	__LC_INT_CLOCK
733
	stpt	__LC_ASYNC_ENTER_TIMER
L
Linus Torvalds 已提交
734
	SAVE_ALL_BASE __LC_SAVE_AREA+32
735
	SAVE_ALL_ASYNC __LC_EXT_OLD_PSW,__LC_SAVE_AREA+32
736
	CREATE_STACK_FRAME __LC_EXT_OLD_PSW,__LC_SAVE_AREA+32
L
Linus Torvalds 已提交
737 738 739 740 741 742 743
	tm	SP_PSW+1(%r15),0x01	# interrupting from user ?
	jz	ext_no_vtime
	UPDATE_VTIME __LC_EXIT_TIMER,__LC_ASYNC_ENTER_TIMER,__LC_USER_TIMER
	UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
	mvc	__LC_LAST_UPDATE_TIMER(8),__LC_ASYNC_ENTER_TIMER
ext_no_vtime:
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
744
	TRACE_IRQS_OFF
H
Heiko Carstens 已提交
745 746 747
	la	%r2,SP_PTREGS(%r15)	# address of register-save area
	llgh	%r3,__LC_EXT_INT_CODE	# get interruption code
	brasl	%r14,do_extint
L
Linus Torvalds 已提交
748 749
	j	io_return

750 751
__critical_end:

L
Linus Torvalds 已提交
752 753 754
/*
 * Machine check handler routines
 */
H
Heiko Carstens 已提交
755
	.globl mcck_int_handler
L
Linus Torvalds 已提交
756
mcck_int_handler:
757
	stck	__LC_INT_CLOCK
758 759
	la	%r1,4095		# revalidate r1
	spt	__LC_CPU_TIMER_SAVE_AREA-4095(%r1)	# revalidate cpu timer
H
Heiko Carstens 已提交
760
	lmg	%r0,%r15,__LC_GPREGS_SAVE_AREA-4095(%r1)# revalidate gprs
L
Linus Torvalds 已提交
761
	SAVE_ALL_BASE __LC_SAVE_AREA+64
762
	la	%r12,__LC_MCK_OLD_PSW
H
Heiko Carstens 已提交
763
	tm	__LC_MCCK_CODE,0x80	# system damage?
764
	jo	mcck_int_main		# yes -> rest of mcck code invalid
765 766 767 768 769 770 771 772 773 774 775 776 777 778 779 780 781
	la	%r14,4095
	mvc	__LC_SAVE_AREA+104(8),__LC_ASYNC_ENTER_TIMER
	mvc	__LC_ASYNC_ENTER_TIMER(8),__LC_CPU_TIMER_SAVE_AREA-4095(%r14)
	tm	__LC_MCCK_CODE+5,0x02	# stored cpu timer value valid?
	jo	1f
	la	%r14,__LC_SYNC_ENTER_TIMER
	clc	0(8,%r14),__LC_ASYNC_ENTER_TIMER
	jl	0f
	la	%r14,__LC_ASYNC_ENTER_TIMER
0:	clc	0(8,%r14),__LC_EXIT_TIMER
	jl	0f
	la	%r14,__LC_EXIT_TIMER
0:	clc	0(8,%r14),__LC_LAST_UPDATE_TIMER
	jl	0f
	la	%r14,__LC_LAST_UPDATE_TIMER
0:	spt	0(%r14)
	mvc	__LC_ASYNC_ENTER_TIMER(8),0(%r14)
M
Martin Schwidefsky 已提交
782
1:	tm	__LC_MCCK_CODE+2,0x09	# mwp + ia of old psw valid?
783
	jno	mcck_int_main		# no -> skip cleanup critical
H
Heiko Carstens 已提交
784
	tm	__LC_MCK_OLD_PSW+1,0x01 # test problem state bit
785 786 787
	jnz	mcck_int_main		# from user -> load kernel stack
	clc	__LC_MCK_OLD_PSW+8(8),BASED(.Lcritical_end)
	jhe	mcck_int_main
H
Heiko Carstens 已提交
788
	clc	__LC_MCK_OLD_PSW+8(8),BASED(.Lcritical_start)
789
	jl	mcck_int_main
H
Heiko Carstens 已提交
790
	brasl	%r14,cleanup_critical
791
mcck_int_main:
H
Heiko Carstens 已提交
792
	lg	%r14,__LC_PANIC_STACK	# are we already on the panic stack?
793 794 795
	slgr	%r14,%r15
	srag	%r14,%r14,PAGE_SHIFT
	jz	0f
H
Heiko Carstens 已提交
796
	lg	%r15,__LC_PANIC_STACK	# load panic stack
797
0:	CREATE_STACK_FRAME __LC_MCK_OLD_PSW,__LC_SAVE_AREA+64
798 799
	tm	__LC_MCCK_CODE+2,0x08	# mwp of old psw valid?
	jno	mcck_no_vtime		# no -> no timer update
800
	tm	SP_PSW+1(%r15),0x01	# interrupting from user ?
801 802 803 804 805
	jz	mcck_no_vtime
	UPDATE_VTIME __LC_EXIT_TIMER,__LC_ASYNC_ENTER_TIMER,__LC_USER_TIMER
	UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
	mvc	__LC_LAST_UPDATE_TIMER(8),__LC_ASYNC_ENTER_TIMER
mcck_no_vtime:
806 807 808
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
	brasl	%r14,s390_do_machine_check
H
Heiko Carstens 已提交
809
	tm	SP_PSW+1(%r15),0x01	# returning to user ?
810 811 812 813 814 815 816 817 818
	jno	mcck_return
	lg	%r1,__LC_KERNEL_STACK	# switch to kernel stack
	aghi	%r1,-SP_SIZE
	mvc	SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
	xc	__SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) # clear back chain
	lgr	%r15,%r1
	stosm	__SF_EMPTY(%r15),0x04	# turn dat on
	tm	__TI_flags+7(%r9),_TIF_MCCK_PENDING
	jno	mcck_return
819
	TRACE_IRQS_OFF
820
	brasl	%r14,s390_handle_mcck
821
	TRACE_IRQS_ON
L
Linus Torvalds 已提交
822
mcck_return:
823 824 825 826 827 828 829
	mvc	__LC_RETURN_MCCK_PSW(16),SP_PSW(%r15) # move return PSW
	ni	__LC_RETURN_MCCK_PSW+1,0xfd # clear wait state bit
	lmg	%r0,%r15,SP_R0(%r15)	# load gprs 0-15
	mvc	__LC_ASYNC_ENTER_TIMER(8),__LC_SAVE_AREA+104
	tm	__LC_RETURN_MCCK_PSW+1,0x01 # returning to user ?
	jno	0f
	stpt	__LC_EXIT_TIMER
M
Martin Schwidefsky 已提交
830
0:	lpswe	__LC_RETURN_MCCK_PSW	# back to caller
L
Linus Torvalds 已提交
831 832 833 834

/*
 * Restart interruption handler, kick starter for additional CPUs
 */
835
#ifdef CONFIG_SMP
836
	__CPUINIT
H
Heiko Carstens 已提交
837
	.globl restart_int_handler
L
Linus Torvalds 已提交
838
restart_int_handler:
839 840 841 842 843 844
	basr	%r1,0
restart_base:
	spt	restart_vtime-restart_base(%r1)
	stck	__LC_LAST_UPDATE_CLOCK
	mvc	__LC_LAST_UPDATE_TIMER(8),restart_vtime-restart_base(%r1)
	mvc	__LC_EXIT_TIMER(8),restart_vtime-restart_base(%r1)
H
Heiko Carstens 已提交
845 846 847 848 849 850
	lg	%r15,__LC_SAVE_AREA+120 # load ksp
	lghi	%r10,__LC_CREGS_SAVE_AREA
	lctlg	%c0,%c15,0(%r10) # get new ctl regs
	lghi	%r10,__LC_AREGS_SAVE_AREA
	lam	%a0,%a15,0(%r10)
	lmg	%r6,%r15,__SF_GPRS(%r15) # load registers from clone
851 852 853 854
	lg	%r1,__LC_THREAD_INFO
	mvc	__LC_USER_TIMER(8),__TI_user_timer(%r1)
	mvc	__LC_SYSTEM_TIMER(8),__TI_system_timer(%r1)
	xc	__LC_STEAL_TIMER(8),__LC_STEAL_TIMER
H
Heiko Carstens 已提交
855 856
	stosm	__SF_EMPTY(%r15),0x04	# now we can turn dat on
	jg	start_secondary
857 858 859
	.align	8
restart_vtime:
	.long	0x7fffffff,0xffffffff
860
	.previous
L
Linus Torvalds 已提交
861 862 863 864
#else
/*
 * If we do not run with SMP enabled, let the new CPU crash ...
 */
H
Heiko Carstens 已提交
865
	.globl restart_int_handler
L
Linus Torvalds 已提交
866
restart_int_handler:
H
Heiko Carstens 已提交
867
	basr	%r1,0
L
Linus Torvalds 已提交
868
restart_base:
H
Heiko Carstens 已提交
869 870
	lpswe	restart_crash-restart_base(%r1)
	.align 8
L
Linus Torvalds 已提交
871
restart_crash:
H
Heiko Carstens 已提交
872
	.long  0x000a0000,0x00000000,0x00000000,0x00000000
L
Linus Torvalds 已提交
873 874 875 876 877 878 879 880 881 882 883
restart_go:
#endif

#ifdef CONFIG_CHECK_STACK
/*
 * The synchronous or the asynchronous stack overflowed. We are dead.
 * No need to properly save the registers, we are going to panic anyway.
 * Setup a pt_regs so that show_trace can provide a good call trace.
 */
stack_overflow:
	lg	%r15,__LC_PANIC_STACK	# change to panic stack
884
	aghi	%r15,-SP_SIZE
L
Linus Torvalds 已提交
885 886 887 888 889 890 891
	mvc	SP_PSW(16,%r15),0(%r12)	# move user PSW to stack
	stmg	%r0,%r11,SP_R0(%r15)	# store gprs %r0-%r11 to kernel stack
	la	%r1,__LC_SAVE_AREA
	chi	%r12,__LC_SVC_OLD_PSW
	je	0f
	chi	%r12,__LC_PGM_OLD_PSW
	je	0f
892
	la	%r1,__LC_SAVE_AREA+32
H
Heiko Carstens 已提交
893
0:	mvc	SP_R12(32,%r15),0(%r1)	# move %r12-%r15 to stack
894
	mvc	SP_ARGS(8,%r15),__LC_LAST_BREAK
H
Heiko Carstens 已提交
895 896
	xc	__SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) # clear back chain
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
L
Linus Torvalds 已提交
897 898 899 900 901 902 903 904
	jg	kernel_stack_overflow
#endif

cleanup_table_system_call:
	.quad	system_call, sysc_do_svc
cleanup_table_sysc_return:
	.quad	sysc_return, sysc_leave
cleanup_table_sysc_leave:
905
	.quad	sysc_leave, sysc_done
L
Linus Torvalds 已提交
906
cleanup_table_sysc_work_loop:
907
	.quad	sysc_work_loop, sysc_work_done
908 909
cleanup_table_io_return:
	.quad	io_return, io_leave
910 911 912
cleanup_table_io_leave:
	.quad	io_leave, io_done
cleanup_table_io_work_loop:
913
	.quad	io_work_loop, io_work_done
L
Linus Torvalds 已提交
914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933

cleanup_critical:
	clc	8(8,%r12),BASED(cleanup_table_system_call)
	jl	0f
	clc	8(8,%r12),BASED(cleanup_table_system_call+8)
	jl	cleanup_system_call
0:
	clc	8(8,%r12),BASED(cleanup_table_sysc_return)
	jl	0f
	clc	8(8,%r12),BASED(cleanup_table_sysc_return+8)
	jl	cleanup_sysc_return
0:
	clc	8(8,%r12),BASED(cleanup_table_sysc_leave)
	jl	0f
	clc	8(8,%r12),BASED(cleanup_table_sysc_leave+8)
	jl	cleanup_sysc_leave
0:
	clc	8(8,%r12),BASED(cleanup_table_sysc_work_loop)
	jl	0f
	clc	8(8,%r12),BASED(cleanup_table_sysc_work_loop+8)
934
	jl	cleanup_sysc_return
935 936 937 938 939
0:
	clc	8(8,%r12),BASED(cleanup_table_io_return)
	jl	0f
	clc	8(8,%r12),BASED(cleanup_table_io_return+8)
	jl	cleanup_io_return
940 941 942 943 944 945 946 947 948 949
0:
	clc	8(8,%r12),BASED(cleanup_table_io_leave)
	jl	0f
	clc	8(8,%r12),BASED(cleanup_table_io_leave+8)
	jl	cleanup_io_leave
0:
	clc	8(8,%r12),BASED(cleanup_table_io_work_loop)
	jl	0f
	clc	8(8,%r12),BASED(cleanup_table_io_work_loop+8)
	jl	cleanup_io_return
L
Linus Torvalds 已提交
950 951 952 953 954
0:
	br	%r14

cleanup_system_call:
	mvc	__LC_RETURN_PSW(16),0(%r12)
955 956 957 958 959 960
	cghi	%r12,__LC_MCK_OLD_PSW
	je	0f
	la	%r12,__LC_SAVE_AREA+32
	j	1f
0:	la	%r12,__LC_SAVE_AREA+64
1:
L
Linus Torvalds 已提交
961 962 963 964 965 966 967
	clc	__LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn+8)
	jh	0f
	mvc	__LC_SYNC_ENTER_TIMER(8),__LC_ASYNC_ENTER_TIMER
0:	clc	__LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn+16)
	jhe	cleanup_vtime
	clc	__LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn)
	jh	0f
968 969 970
	mvc	__LC_SAVE_AREA(32),0(%r12)
0:	stg	%r13,8(%r12)
	stg	%r12,__LC_SAVE_AREA+96	# argh
971
	SAVE_ALL_SYNC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
972
	CREATE_STACK_FRAME __LC_SVC_OLD_PSW,__LC_SAVE_AREA
973 974
	lg	%r12,__LC_SAVE_AREA+96	# argh
	stg	%r15,24(%r12)
L
Linus Torvalds 已提交
975 976 977 978 979 980 981 982 983 984 985 986 987 988 989 990
	llgh	%r7,__LC_SVC_INT_CODE
cleanup_vtime:
	clc	__LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn+24)
	jhe	cleanup_stime
	UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
cleanup_stime:
	clc	__LC_RETURN_PSW+8(8),BASED(cleanup_system_call_insn+32)
	jh	cleanup_update
	UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
cleanup_update:
	mvc	__LC_LAST_UPDATE_TIMER(8),__LC_SYNC_ENTER_TIMER
	mvc	__LC_RETURN_PSW+8(8),BASED(cleanup_table_system_call+8)
	la	%r12,__LC_RETURN_PSW
	br	%r14
cleanup_system_call_insn:
	.quad	sysc_saveall
H
Heiko Carstens 已提交
991 992 993 994
	.quad	system_call
	.quad	sysc_vtime
	.quad	sysc_stime
	.quad	sysc_update
L
Linus Torvalds 已提交
995 996 997 998 999 1000 1001 1002 1003

cleanup_sysc_return:
	mvc	__LC_RETURN_PSW(8),0(%r12)
	mvc	__LC_RETURN_PSW+8(8),BASED(cleanup_table_sysc_return)
	la	%r12,__LC_RETURN_PSW
	br	%r14

cleanup_sysc_leave:
	clc	8(8,%r12),BASED(cleanup_sysc_leave_insn)
1004
	je	3f
L
Linus Torvalds 已提交
1005
	clc	8(8,%r12),BASED(cleanup_sysc_leave_insn+8)
1006 1007 1008
	jhe	0f
	mvc	__LC_EXIT_TIMER(8),__LC_ASYNC_ENTER_TIMER
0:	mvc	__LC_RETURN_PSW(16),SP_PSW(%r15)
1009
	cghi	%r12,__LC_MCK_OLD_PSW
1010
	jne	1f
1011
	mvc	__LC_SAVE_AREA+64(32),SP_R12(%r15)
1012 1013 1014
	j	2f
1:	mvc	__LC_SAVE_AREA+32(32),SP_R12(%r15)
2:	lmg	%r0,%r11,SP_R0(%r15)
L
Linus Torvalds 已提交
1015
	lg	%r15,SP_R15(%r15)
1016
3:	la	%r12,__LC_RETURN_PSW
L
Linus Torvalds 已提交
1017 1018
	br	%r14
cleanup_sysc_leave_insn:
1019
	.quad	sysc_done - 4
1020
	.quad	sysc_done - 16
L
Linus Torvalds 已提交
1021

1022 1023 1024 1025 1026 1027 1028 1029
cleanup_io_return:
	mvc	__LC_RETURN_PSW(8),0(%r12)
	mvc	__LC_RETURN_PSW+8(8),BASED(cleanup_table_io_work_loop)
	la	%r12,__LC_RETURN_PSW
	br	%r14

cleanup_io_leave:
	clc	8(8,%r12),BASED(cleanup_io_leave_insn)
1030
	je	3f
1031
	clc	8(8,%r12),BASED(cleanup_io_leave_insn+8)
1032 1033 1034
	jhe	0f
	mvc	__LC_EXIT_TIMER(8),__LC_ASYNC_ENTER_TIMER
0:	mvc	__LC_RETURN_PSW(16),SP_PSW(%r15)
1035
	cghi	%r12,__LC_MCK_OLD_PSW
1036
	jne	1f
1037
	mvc	__LC_SAVE_AREA+64(32),SP_R12(%r15)
1038 1039 1040
	j	2f
1:	mvc	__LC_SAVE_AREA+32(32),SP_R12(%r15)
2:	lmg	%r0,%r11,SP_R0(%r15)
1041
	lg	%r15,SP_R15(%r15)
1042
3:	la	%r12,__LC_RETURN_PSW
1043 1044
	br	%r14
cleanup_io_leave_insn:
1045
	.quad	io_done - 4
1046
	.quad	io_done - 16
1047

L
Linus Torvalds 已提交
1048 1049 1050
/*
 * Integer constants
 */
H
Heiko Carstens 已提交
1051
		.align	4
L
Linus Torvalds 已提交
1052
.Lconst:
H
Heiko Carstens 已提交
1053 1054 1055 1056 1057 1058
.Lnr_syscalls:	.long	NR_syscalls
.L0x0130:	.short	0x130
.L0x0140:	.short	0x140
.L0x0150:	.short	0x150
.L0x0160:	.short	0x160
.L0x0170:	.short	0x170
L
Linus Torvalds 已提交
1059
.Lcritical_start:
H
Heiko Carstens 已提交
1060
		.quad	__critical_start
L
Linus Torvalds 已提交
1061
.Lcritical_end:
H
Heiko Carstens 已提交
1062
		.quad	__critical_end
L
Linus Torvalds 已提交
1063

H
Heiko Carstens 已提交
1064
		.section .rodata, "a"
L
Linus Torvalds 已提交
1065
#define SYSCALL(esa,esame,emu)	.long esame
1066
	.globl	sys_call_table
L
Linus Torvalds 已提交
1067 1068 1069 1070
sys_call_table:
#include "syscalls.S"
#undef SYSCALL

1071
#ifdef CONFIG_COMPAT
L
Linus Torvalds 已提交
1072 1073 1074 1075 1076 1077

#define SYSCALL(esa,esame,emu)	.long emu
sys_call_table_emu:
#include "syscalls.S"
#undef SYSCALL
#endif