entry64.S 30.5 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 13
 */

#include <linux/sys.h>
#include <linux/linkage.h>
14
#include <linux/init.h>
L
Linus Torvalds 已提交
15 16 17 18 19
#include <asm/cache.h>
#include <asm/lowcore.h>
#include <asm/errno.h>
#include <asm/ptrace.h>
#include <asm/thread_info.h>
20
#include <asm/asm-offsets.h>
L
Linus Torvalds 已提交
21 22 23 24 25 26 27
#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 已提交
28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48
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
49
SP_SVCNR      =	STACK_FRAME_OVERHEAD + __PT_SVCNR
H
Heiko Carstens 已提交
50
SP_SIZE      =	STACK_FRAME_OVERHEAD + __PT_SIZE
L
Linus Torvalds 已提交
51 52 53 54

STACK_SHIFT = PAGE_SHIFT + THREAD_ORDER
STACK_SIZE  = 1 << STACK_SHIFT

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

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

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

	.macro	TRACE_IRQS_OFF
71 72
	 basr	%r2,%r0
	 brasl	%r14,trace_hardirqs_off_caller
73
	.endm
74

75
	.macro TRACE_IRQS_CHECK
76
	basr	%r2,%r0
77 78
	tm	SP_PSW(%r15),0x03	# irqs enabled?
	jz	0f
79
	brasl	%r14,trace_hardirqs_on_caller
80
	j	1f
81
0:	brasl	%r14,trace_hardirqs_off_caller
82
1:
83
	.endm
84 85 86
#else
#define TRACE_IRQS_ON
#define TRACE_IRQS_OFF
87 88 89 90 91 92 93 94 95 96 97
#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
98
#define LOCKDEP_SYS_EXIT
99 100
#endif

H
Heiko Carstens 已提交
101
	.macro	UPDATE_VTIME lc_from,lc_to,lc_sum
L
Linus Torvalds 已提交
102 103 104 105 106 107 108 109 110 111 112 113 114 115
	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 已提交
116
	.macro	SAVE_ALL_BASE savearea
L
Linus Torvalds 已提交
117 118 119 120
	stmg	%r12,%r15,\savearea
	larl	%r13,system_call
	.endm

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

126
	.macro	SAVE_ALL_SYNC psworg,savearea
L
Linus Torvalds 已提交
127 128 129 130
	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
131 132 133 134 135 136 137 138 139 140 141
#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 已提交
142 143 144 145 146 147 148
	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
149
	tm	1(%r12),0x01		# retest problem state after cleanup
L
Linus Torvalds 已提交
150 151 152 153 154 155 156 157 158 159 160 161
	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
162 163 164 165
2:
	.endm

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

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

/*
 * Scheduler resume function, called by switch_to
 *  gpr2 = (task_struct *) prev
 *  gpr3 = (task_struct *) next
 * Returns:
 *  gpr2 = prev
 */
H
Heiko Carstens 已提交
197
	.globl	__switch_to
L
Linus Torvalds 已提交
198 199 200
__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 已提交
201 202 203 204
	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 已提交
205
__switch_to_noper:
H
Heiko Carstens 已提交
206
	lg	%r4,__THREAD_info(%r2)		    # get thread_info of prev
207 208 209 210 211 212
	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 已提交
213
	stmg	%r6,%r15,__SF_GPRS(%r15)# store __switch_to registers of prev task
L
Linus Torvalds 已提交
214 215
	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 已提交
216
	lmg	%r6,%r15,__SF_GPRS(%r15)# load __switch_to registers of next task
L
Linus Torvalds 已提交
217 218
	stg	%r3,__LC_CURRENT	# __LC_CURRENT = current task struct
	lctl	%c4,%c4,__TASK_pid(%r3) # load pid to control reg. 4
H
Heiko Carstens 已提交
219
	lg	%r3,__THREAD_info(%r3)	# load thread_info from task struct
L
Linus Torvalds 已提交
220 221 222 223 224 225 226 227 228 229 230
	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 已提交
231
	.globl	system_call
L
Linus Torvalds 已提交
232
system_call:
M
Martin Schwidefsky 已提交
233
	stpt	__LC_SYNC_ENTER_TIMER
L
Linus Torvalds 已提交
234 235
sysc_saveall:
	SAVE_ALL_BASE __LC_SAVE_AREA
236
	SAVE_ALL_SVC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
H
Heiko Carstens 已提交
237 238
	CREATE_STACK_FRAME __LC_SVC_OLD_PSW,__LC_SAVE_AREA
	llgh	%r7,__LC_SVC_INT_CODE	# get svc number from lowcore
L
Linus Torvalds 已提交
239 240 241 242 243 244 245 246
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
247
	ltgr	%r7,%r7		# test for svc 0
L
Linus Torvalds 已提交
248 249 250 251
	jnz	sysc_nr_ok
	# svc 0: system call number in %r1
	cl	%r1,BASED(.Lnr_syscalls)
	jnl	sysc_nr_ok
H
Heiko Carstens 已提交
252
	lgfr	%r7,%r1 	# clear high word in r1
L
Linus Torvalds 已提交
253 254 255
sysc_nr_ok:
	mvc	SP_ARGS(8,%r15),SP_R7(%r15)
sysc_do_restart:
256 257
	sth	%r7,SP_SVCNR(%r15)
	sllg	%r7,%r7,2	# svc number * 4
H
Heiko Carstens 已提交
258
	larl	%r10,sys_call_table
259
#ifdef CONFIG_COMPAT
260 261
	tm	__TI_flags+5(%r9),(_TIF_31BIT>>16)  # running in 31 bit mode ?
	jno	sysc_noemu
H
Heiko Carstens 已提交
262
	larl	%r10,sys_call_table_emu  # use 31 bit emulation system calls
L
Linus Torvalds 已提交
263 264
sysc_noemu:
#endif
265
	tm	__TI_flags+6(%r9),_TIF_SYSCALL
H
Heiko Carstens 已提交
266 267 268 269
	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 已提交
270 271 272

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

#ifdef CONFIG_TRACE_IRQFLAGS
	.align	8
	.globl sysc_restore_trace_psw
sysc_restore_trace_psw:
	.quad	0, sysc_restore_trace
#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 544 545 546 547 548
	lg	%r9,__LC_THREAD_INFO	# load pointer to thread_info struct
	lg	%r1,__TI_task(%r9)
	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
549
	TRACE_IRQS_ON
L
Linus Torvalds 已提交
550 551 552
	stosm	__SF_EMPTY(%r15),0x03	# reenable interrupts
	j	sysc_do_svc

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

L
Linus Torvalds 已提交
562 563 564
/*
 * IO interrupt handler routine
 */
H
Heiko Carstens 已提交
565
	.globl io_int_handler
L
Linus Torvalds 已提交
566 567
io_int_handler:
	stck	__LC_INT_CLOCK
568
	stpt	__LC_ASYNC_ENTER_TIMER
L
Linus Torvalds 已提交
569
	SAVE_ALL_BASE __LC_SAVE_AREA+32
570
	SAVE_ALL_ASYNC __LC_IO_OLD_PSW,__LC_SAVE_AREA+32
571
	CREATE_STACK_FRAME __LC_IO_OLD_PSW,__LC_SAVE_AREA+32
L
Linus Torvalds 已提交
572 573 574 575 576 577 578
	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
579
	TRACE_IRQS_OFF
H
Heiko Carstens 已提交
580 581
	la	%r2,SP_PTREGS(%r15)	# address of register-save area
	brasl	%r14,do_IRQ		# call standard irq handler
L
Linus Torvalds 已提交
582 583
io_return:
	tm	__TI_flags+7(%r9),_TIF_WORK_INT
H
Heiko Carstens 已提交
584
	jnz	io_work 		# there is work to do (signals etc.)
585 586 587 588 589 590
io_restore:
#ifdef CONFIG_TRACE_IRQFLAGS
	larl	%r1,io_restore_trace_psw
	lpswe	0(%r1)
io_restore_trace:
	TRACE_IRQS_CHECK
591
	LOCKDEP_SYS_EXIT
592
#endif
L
Linus Torvalds 已提交
593
io_leave:
H
Heiko Carstens 已提交
594
	RESTORE_ALL __LC_RETURN_PSW,0
595
io_done:
L
Linus Torvalds 已提交
596

597 598 599 600 601 602 603
#ifdef CONFIG_TRACE_IRQFLAGS
	.align	8
	.globl io_restore_trace_psw
io_restore_trace_psw:
	.quad	0, io_restore_trace
#endif

604
#
605 606
# There is work todo, we need to check if we return to userspace, then
# check, if we are in SIE, if yes leave it
607 608 609 610
#
io_work:
	tm	SP_PSW+1(%r15),0x01	# returning to user ?
#ifndef CONFIG_PREEMPT
611 612 613 614 615 616 617 618 619 620 621
#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
622
	jno	io_restore		# no-> skip resched & signal
623
#endif
624 625
#else
	jnz	io_work_user		# yes -> do resched & signal
626 627 628 629 630 631 632 633 634 635
#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
636
	# check for preemptive scheduling
H
Heiko Carstens 已提交
637
	icm	%r0,15,__TI_precount(%r9)
638
	jnz	io_restore		# preemption is disabled
L
Linus Torvalds 已提交
639 640 641 642
	# 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 已提交
643
	xc	__SF_BACKCHAIN(8,%r1),__SF_BACKCHAIN(%r1) # clear back chain
L
Linus Torvalds 已提交
644 645 646
	lgr	%r15,%r1
io_resume_loop:
	tm	__TI_flags+7(%r9),_TIF_NEED_RESCHED
647
	jno	io_restore
H
Heiko Carstens 已提交
648 649
	larl	%r14,io_resume_loop
	jg	preempt_schedule_irq
L
Linus Torvalds 已提交
650 651
#endif

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

675 676 677 678 679
#if defined(CONFIG_KVM) || defined(CONFIG_KVM_MODULE)
sie_opcode:
	.long 0xb2140000
#endif

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

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

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

M
Martin Schwidefsky 已提交
712 713 714 715 716 717 718 719 720 721 722 723
#
# _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 已提交
724 725 726
/*
 * External interrupt handler routine
 */
H
Heiko Carstens 已提交
727
	.globl	ext_int_handler
L
Linus Torvalds 已提交
728 729
ext_int_handler:
	stck	__LC_INT_CLOCK
730
	stpt	__LC_ASYNC_ENTER_TIMER
L
Linus Torvalds 已提交
731
	SAVE_ALL_BASE __LC_SAVE_AREA+32
732
	SAVE_ALL_ASYNC __LC_EXT_OLD_PSW,__LC_SAVE_AREA+32
733
	CREATE_STACK_FRAME __LC_EXT_OLD_PSW,__LC_SAVE_AREA+32
L
Linus Torvalds 已提交
734 735 736 737 738 739 740
	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
741
	TRACE_IRQS_OFF
H
Heiko Carstens 已提交
742 743 744
	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 已提交
745 746
	j	io_return

747 748
__critical_end:

L
Linus Torvalds 已提交
749 750 751
/*
 * Machine check handler routines
 */
H
Heiko Carstens 已提交
752
	.globl mcck_int_handler
L
Linus Torvalds 已提交
753
mcck_int_handler:
754
	stck	__LC_INT_CLOCK
755 756
	la	%r1,4095		# revalidate r1
	spt	__LC_CPU_TIMER_SAVE_AREA-4095(%r1)	# revalidate cpu timer
H
Heiko Carstens 已提交
757
	lmg	%r0,%r15,__LC_GPREGS_SAVE_AREA-4095(%r1)# revalidate gprs
L
Linus Torvalds 已提交
758
	SAVE_ALL_BASE __LC_SAVE_AREA+64
759
	la	%r12,__LC_MCK_OLD_PSW
H
Heiko Carstens 已提交
760
	tm	__LC_MCCK_CODE,0x80	# system damage?
761
	jo	mcck_int_main		# yes -> rest of mcck code invalid
762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777 778
	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 已提交
779
1:	tm	__LC_MCCK_CODE+2,0x09	# mwp + ia of old psw valid?
780
	jno	mcck_int_main		# no -> skip cleanup critical
H
Heiko Carstens 已提交
781
	tm	__LC_MCK_OLD_PSW+1,0x01 # test problem state bit
782 783 784
	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 已提交
785
	clc	__LC_MCK_OLD_PSW+8(8),BASED(.Lcritical_start)
786
	jl	mcck_int_main
H
Heiko Carstens 已提交
787
	brasl	%r14,cleanup_critical
788
mcck_int_main:
H
Heiko Carstens 已提交
789
	lg	%r14,__LC_PANIC_STACK	# are we already on the panic stack?
790 791 792
	slgr	%r14,%r15
	srag	%r14,%r14,PAGE_SHIFT
	jz	0f
H
Heiko Carstens 已提交
793
	lg	%r15,__LC_PANIC_STACK	# load panic stack
794
0:	CREATE_STACK_FRAME __LC_MCK_OLD_PSW,__LC_SAVE_AREA+64
795 796
	tm	__LC_MCCK_CODE+2,0x08	# mwp of old psw valid?
	jno	mcck_no_vtime		# no -> no timer update
797
	tm	SP_PSW+1(%r15),0x01	# interrupting from user ?
798 799 800 801 802
	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:
803 804 805
	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 已提交
806
	tm	SP_PSW+1(%r15),0x01	# returning to user ?
807 808 809 810 811 812 813 814 815
	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
816
	TRACE_IRQS_OFF
817
	brasl	%r14,s390_handle_mcck
818
	TRACE_IRQS_ON
L
Linus Torvalds 已提交
819
mcck_return:
820 821 822 823 824 825 826
	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 已提交
827
0:	lpswe	__LC_RETURN_MCCK_PSW	# back to caller
L
Linus Torvalds 已提交
828 829 830 831

/*
 * Restart interruption handler, kick starter for additional CPUs
 */
832
#ifdef CONFIG_SMP
833
	__CPUINIT
H
Heiko Carstens 已提交
834
	.globl restart_int_handler
L
Linus Torvalds 已提交
835
restart_int_handler:
836 837 838 839 840 841
	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 已提交
842 843 844 845 846 847
	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
848 849 850 851
	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 已提交
852 853
	stosm	__SF_EMPTY(%r15),0x04	# now we can turn dat on
	jg	start_secondary
854 855 856
	.align	8
restart_vtime:
	.long	0x7fffffff,0xffffffff
857
	.previous
L
Linus Torvalds 已提交
858 859 860 861
#else
/*
 * If we do not run with SMP enabled, let the new CPU crash ...
 */
H
Heiko Carstens 已提交
862
	.globl restart_int_handler
L
Linus Torvalds 已提交
863
restart_int_handler:
H
Heiko Carstens 已提交
864
	basr	%r1,0
L
Linus Torvalds 已提交
865
restart_base:
H
Heiko Carstens 已提交
866 867
	lpswe	restart_crash-restart_base(%r1)
	.align 8
L
Linus Torvalds 已提交
868
restart_crash:
H
Heiko Carstens 已提交
869
	.long  0x000a0000,0x00000000,0x00000000,0x00000000
L
Linus Torvalds 已提交
870 871 872 873 874 875 876 877 878 879 880
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
881
	aghi	%r15,-SP_SIZE
L
Linus Torvalds 已提交
882 883 884 885 886 887 888
	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
889
	la	%r1,__LC_SAVE_AREA+32
H
Heiko Carstens 已提交
890
0:	mvc	SP_R12(32,%r15),0(%r1)	# move %r12-%r15 to stack
891
	mvc	SP_ARGS(8,%r15),__LC_LAST_BREAK
H
Heiko Carstens 已提交
892 893
	xc	__SF_BACKCHAIN(8,%r15),__SF_BACKCHAIN(%r15) # clear back chain
	la	%r2,SP_PTREGS(%r15)	# load pt_regs
L
Linus Torvalds 已提交
894 895 896 897 898 899 900 901
	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:
902
	.quad	sysc_leave, sysc_done
L
Linus Torvalds 已提交
903
cleanup_table_sysc_work_loop:
904
	.quad	sysc_work_loop, sysc_work_done
905 906
cleanup_table_io_return:
	.quad	io_return, io_leave
907 908 909
cleanup_table_io_leave:
	.quad	io_leave, io_done
cleanup_table_io_work_loop:
910
	.quad	io_work_loop, io_work_done
L
Linus Torvalds 已提交
911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930

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)
931
	jl	cleanup_sysc_return
932 933 934 935 936
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
937 938 939 940 941 942 943 944 945 946
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 已提交
947 948 949 950 951
0:
	br	%r14

cleanup_system_call:
	mvc	__LC_RETURN_PSW(16),0(%r12)
952 953 954 955 956 957
	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 已提交
958 959 960 961 962 963 964
	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
965 966 967
	mvc	__LC_SAVE_AREA(32),0(%r12)
0:	stg	%r13,8(%r12)
	stg	%r12,__LC_SAVE_AREA+96	# argh
968
	SAVE_ALL_SYNC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
969
	CREATE_STACK_FRAME __LC_SVC_OLD_PSW,__LC_SAVE_AREA
970 971
	lg	%r12,__LC_SAVE_AREA+96	# argh
	stg	%r15,24(%r12)
L
Linus Torvalds 已提交
972 973 974 975 976 977 978 979 980 981 982 983 984 985 986 987
	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 已提交
988 989 990 991
	.quad	system_call
	.quad	sysc_vtime
	.quad	sysc_stime
	.quad	sysc_update
L
Linus Torvalds 已提交
992 993 994 995 996 997 998 999 1000

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

1019 1020 1021 1022 1023 1024 1025 1026
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)
1027
	je	3f
1028
	clc	8(8,%r12),BASED(cleanup_io_leave_insn+8)
1029 1030 1031
	jhe	0f
	mvc	__LC_EXIT_TIMER(8),__LC_ASYNC_ENTER_TIMER
0:	mvc	__LC_RETURN_PSW(16),SP_PSW(%r15)
1032
	cghi	%r12,__LC_MCK_OLD_PSW
1033
	jne	1f
1034
	mvc	__LC_SAVE_AREA+64(32),SP_R12(%r15)
1035 1036 1037
	j	2f
1:	mvc	__LC_SAVE_AREA+32(32),SP_R12(%r15)
2:	lmg	%r0,%r11,SP_R0(%r15)
1038
	lg	%r15,SP_R15(%r15)
1039
3:	la	%r12,__LC_RETURN_PSW
1040 1041
	br	%r14
cleanup_io_leave_insn:
1042
	.quad	io_done - 4
1043
	.quad	io_done - 16
1044

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

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

1068
#ifdef CONFIG_COMPAT
L
Linus Torvalds 已提交
1069 1070 1071 1072 1073 1074

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