2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* arch/s390/kernel/entry.S
|
|
|
|
* S390 low-level entry points.
|
|
|
|
*
|
2006-02-01 11:06:38 +00:00
|
|
|
* Copyright (C) IBM Corp. 1999,2006
|
2005-04-16 22:20:36 +00:00
|
|
|
* Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
|
2006-09-28 14:56:37 +00:00
|
|
|
* Hartmut Penner (hp@de.ibm.com),
|
|
|
|
* Denis Joseph Barrow (djbarrow@de.ibm.com,barrow_dj@yahoo.com),
|
2005-06-25 21:55:30 +00:00
|
|
|
* Heiko Carstens <heiko.carstens@de.ibm.com>
|
2005-04-16 22:20:36 +00:00
|
|
|
*/
|
|
|
|
|
2008-02-05 15:50:40 +00:00
|
|
|
#include <linux/init.h>
|
2011-07-24 08:48:19 +00:00
|
|
|
#include <linux/linkage.h>
|
2005-04-16 22:20:36 +00:00
|
|
|
#include <asm/cache.h>
|
|
|
|
#include <asm/errno.h>
|
|
|
|
#include <asm/ptrace.h>
|
|
|
|
#include <asm/thread_info.h>
|
2005-09-09 18:57:26 +00:00
|
|
|
#include <asm/asm-offsets.h>
|
2005-04-16 22:20:36 +00:00
|
|
|
#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.
|
|
|
|
*/
|
2006-09-28 14:56:37 +00:00
|
|
|
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 + 4
|
|
|
|
SP_R2 = STACK_FRAME_OVERHEAD + __PT_GPRS + 8
|
|
|
|
SP_R3 = STACK_FRAME_OVERHEAD + __PT_GPRS + 12
|
|
|
|
SP_R4 = STACK_FRAME_OVERHEAD + __PT_GPRS + 16
|
|
|
|
SP_R5 = STACK_FRAME_OVERHEAD + __PT_GPRS + 20
|
|
|
|
SP_R6 = STACK_FRAME_OVERHEAD + __PT_GPRS + 24
|
|
|
|
SP_R7 = STACK_FRAME_OVERHEAD + __PT_GPRS + 28
|
|
|
|
SP_R8 = STACK_FRAME_OVERHEAD + __PT_GPRS + 32
|
|
|
|
SP_R9 = STACK_FRAME_OVERHEAD + __PT_GPRS + 36
|
|
|
|
SP_R10 = STACK_FRAME_OVERHEAD + __PT_GPRS + 40
|
|
|
|
SP_R11 = STACK_FRAME_OVERHEAD + __PT_GPRS + 44
|
|
|
|
SP_R12 = STACK_FRAME_OVERHEAD + __PT_GPRS + 48
|
|
|
|
SP_R13 = STACK_FRAME_OVERHEAD + __PT_GPRS + 52
|
|
|
|
SP_R14 = STACK_FRAME_OVERHEAD + __PT_GPRS + 56
|
|
|
|
SP_R15 = STACK_FRAME_OVERHEAD + __PT_GPRS + 60
|
|
|
|
SP_ORIG_R2 = STACK_FRAME_OVERHEAD + __PT_ORIG_GPR2
|
|
|
|
SP_ILC = STACK_FRAME_OVERHEAD + __PT_ILC
|
2008-11-27 10:05:55 +00:00
|
|
|
SP_SVCNR = STACK_FRAME_OVERHEAD + __PT_SVCNR
|
2006-09-28 14:56:37 +00:00
|
|
|
SP_SIZE = STACK_FRAME_OVERHEAD + __PT_SIZE
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2008-10-10 19:33:20 +00:00
|
|
|
_TIF_WORK_SVC = (_TIF_SIGPENDING | _TIF_NOTIFY_RESUME | _TIF_NEED_RESCHED | \
|
2011-01-05 11:48:10 +00:00
|
|
|
_TIF_MCCK_PENDING | _TIF_RESTART_SVC | _TIF_PER_TRAP )
|
2008-10-10 19:33:20 +00:00
|
|
|
_TIF_WORK_INT = (_TIF_SIGPENDING | _TIF_NOTIFY_RESUME | _TIF_NEED_RESCHED | \
|
2006-02-01 11:06:38 +00:00
|
|
|
_TIF_MCCK_PENDING)
|
2009-06-12 08:26:47 +00:00
|
|
|
_TIF_SYSCALL = (_TIF_SYSCALL_TRACE>>8 | _TIF_SYSCALL_AUDIT>>8 | \
|
2009-08-24 21:43:11 +00:00
|
|
|
_TIF_SECCOMP>>8 | _TIF_SYSCALL_TRACEPOINT>>8)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
STACK_SHIFT = PAGE_SHIFT + THREAD_ORDER
|
|
|
|
STACK_SIZE = 1 << STACK_SHIFT
|
|
|
|
|
|
|
|
#define BASED(name) name-system_call(%r13)
|
|
|
|
|
2006-07-03 07:24:46 +00:00
|
|
|
#ifdef CONFIG_TRACE_IRQFLAGS
|
|
|
|
.macro TRACE_IRQS_ON
|
2008-11-14 17:18:05 +00:00
|
|
|
basr %r2,%r0
|
|
|
|
l %r1,BASED(.Ltrace_irq_on_caller)
|
2006-07-03 07:24:46 +00:00
|
|
|
basr %r14,%r1
|
|
|
|
.endm
|
|
|
|
|
|
|
|
.macro TRACE_IRQS_OFF
|
2008-11-14 17:18:05 +00:00
|
|
|
basr %r2,%r0
|
|
|
|
l %r1,BASED(.Ltrace_irq_off_caller)
|
2006-07-03 07:24:46 +00:00
|
|
|
basr %r14,%r1
|
|
|
|
.endm
|
|
|
|
#else
|
|
|
|
#define TRACE_IRQS_ON
|
|
|
|
#define TRACE_IRQS_OFF
|
2007-11-20 10:13:32 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
#ifdef CONFIG_LOCKDEP
|
|
|
|
.macro LOCKDEP_SYS_EXIT
|
|
|
|
tm SP_PSW+1(%r15),0x01 # returning to user ?
|
|
|
|
jz 0f
|
|
|
|
l %r1,BASED(.Llockdep_sys_exit)
|
|
|
|
basr %r14,%r1
|
|
|
|
0:
|
|
|
|
.endm
|
|
|
|
#else
|
2007-10-11 20:11:12 +00:00
|
|
|
#define LOCKDEP_SYS_EXIT
|
2006-07-03 07:24:46 +00:00
|
|
|
#endif
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* 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
|
|
|
|
*/
|
|
|
|
|
2006-09-28 14:56:37 +00:00
|
|
|
.macro UPDATE_VTIME lc_from,lc_to,lc_sum
|
2005-04-16 22:20:36 +00:00
|
|
|
lm %r10,%r11,\lc_from
|
|
|
|
sl %r10,\lc_to
|
|
|
|
sl %r11,\lc_to+4
|
|
|
|
bc 3,BASED(0f)
|
|
|
|
sl %r10,BASED(.Lc_1)
|
|
|
|
0: al %r10,\lc_sum
|
|
|
|
al %r11,\lc_sum+4
|
|
|
|
bc 12,BASED(1f)
|
|
|
|
al %r10,BASED(.Lc_1)
|
|
|
|
1: stm %r10,%r11,\lc_sum
|
|
|
|
.endm
|
|
|
|
|
2011-01-05 11:47:57 +00:00
|
|
|
.macro SAVE_ALL_SVC psworg,savearea
|
2005-04-16 22:20:36 +00:00
|
|
|
stm %r12,%r15,\savearea
|
|
|
|
l %r13,__LC_SVC_NEW_PSW+4 # load &system_call to %r13
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r15,__LC_KERNEL_STACK # problem state -> load ksp
|
|
|
|
s %r15,BASED(.Lc_spsize) # make room for registers & psw
|
2005-04-16 22:20:36 +00:00
|
|
|
.endm
|
|
|
|
|
2011-01-05 11:47:57 +00:00
|
|
|
.macro SAVE_ALL_BASE savearea
|
|
|
|
stm %r12,%r15,\savearea
|
|
|
|
l %r13,__LC_SVC_NEW_PSW+4 # load &system_call to %r13
|
2007-07-10 09:24:18 +00:00
|
|
|
.endm
|
|
|
|
|
2011-01-05 11:47:57 +00:00
|
|
|
.macro SAVE_ALL_PGM psworg,savearea
|
2005-04-16 22:20:36 +00:00
|
|
|
tm \psworg+1,0x01 # test problem state bit
|
2006-06-29 12:58:05 +00:00
|
|
|
#ifdef CONFIG_CHECK_STACK
|
2011-01-05 11:47:57 +00:00
|
|
|
bnz BASED(1f)
|
|
|
|
tml %r15,STACK_SIZE - CONFIG_STACK_GUARD
|
|
|
|
bnz BASED(2f)
|
|
|
|
la %r12,\psworg
|
|
|
|
b BASED(stack_overflow)
|
|
|
|
#else
|
|
|
|
bz BASED(2f)
|
2006-06-29 12:58:05 +00:00
|
|
|
#endif
|
2011-01-05 11:47:57 +00:00
|
|
|
1: l %r15,__LC_KERNEL_STACK # problem state -> load ksp
|
|
|
|
2: s %r15,BASED(.Lc_spsize) # make room for registers & psw
|
2006-06-29 12:58:05 +00:00
|
|
|
.endm
|
|
|
|
|
|
|
|
.macro SAVE_ALL_ASYNC psworg,savearea
|
2011-01-05 11:47:57 +00:00
|
|
|
stm %r12,%r15,\savearea
|
|
|
|
l %r13,__LC_SVC_NEW_PSW+4 # load &system_call to %r13
|
2006-06-29 12:58:05 +00:00
|
|
|
la %r12,\psworg
|
2005-04-16 22:20:36 +00:00
|
|
|
tm \psworg+1,0x01 # test problem state bit
|
|
|
|
bnz BASED(1f) # from user -> load async stack
|
|
|
|
clc \psworg+4(4),BASED(.Lcritical_end)
|
|
|
|
bhe BASED(0f)
|
|
|
|
clc \psworg+4(4),BASED(.Lcritical_start)
|
|
|
|
bl BASED(0f)
|
|
|
|
l %r14,BASED(.Lcleanup_critical)
|
|
|
|
basr %r14,%r14
|
2005-09-17 02:27:42 +00:00
|
|
|
tm 1(%r12),0x01 # retest problem state after cleanup
|
2005-04-16 22:20:36 +00:00
|
|
|
bnz BASED(1f)
|
|
|
|
0: l %r14,__LC_ASYNC_STACK # are we already on the async stack ?
|
|
|
|
slr %r14,%r15
|
|
|
|
sra %r14,STACK_SHIFT
|
|
|
|
#ifdef CONFIG_CHECK_STACK
|
2011-01-05 11:47:57 +00:00
|
|
|
bnz BASED(1f)
|
|
|
|
tml %r15,STACK_SIZE - CONFIG_STACK_GUARD
|
|
|
|
bnz BASED(2f)
|
|
|
|
b BASED(stack_overflow)
|
|
|
|
#else
|
|
|
|
bz BASED(2f)
|
2005-04-16 22:20:36 +00:00
|
|
|
#endif
|
2011-01-05 11:47:57 +00:00
|
|
|
1: l %r15,__LC_ASYNC_STACK
|
|
|
|
2: s %r15,BASED(.Lc_spsize) # make room for registers & psw
|
2005-06-25 21:55:30 +00:00
|
|
|
.endm
|
|
|
|
|
2011-01-05 11:47:57 +00:00
|
|
|
.macro CREATE_STACK_FRAME savearea
|
|
|
|
xc __SF_BACKCHAIN(4,%r15),__SF_BACKCHAIN(%r15)
|
2005-04-16 22:20:36 +00:00
|
|
|
st %r2,SP_ORIG_R2(%r15) # store original content of gpr 2
|
|
|
|
mvc SP_R12(16,%r15),\savearea # move %r12-%r15 to stack
|
2011-01-05 11:47:57 +00:00
|
|
|
stm %r0,%r11,SP_R0(%r15) # store gprs %r0-%r11 to kernel stack
|
2005-04-16 22:20:36 +00:00
|
|
|
.endm
|
|
|
|
|
2006-09-28 14:56:37 +00:00
|
|
|
.macro RESTORE_ALL psworg,sync
|
2005-09-03 22:57:56 +00:00
|
|
|
mvc \psworg(8),SP_PSW(%r15) # move user PSW to lowcore
|
2005-04-16 22:20:36 +00:00
|
|
|
.if !\sync
|
2005-09-03 22:57:56 +00:00
|
|
|
ni \psworg+1,0xfd # clear wait state bit
|
2005-04-16 22:20:36 +00:00
|
|
|
.endif
|
|
|
|
lm %r0,%r15,SP_R0(%r15) # load gprs 0-15 of user
|
2008-12-25 12:39:25 +00:00
|
|
|
stpt __LC_EXIT_TIMER
|
2005-09-03 22:57:56 +00:00
|
|
|
lpsw \psworg # back to caller
|
2005-04-16 22:20:36 +00:00
|
|
|
.endm
|
|
|
|
|
2010-10-25 14:10:37 +00:00
|
|
|
.macro REENABLE_IRQS
|
|
|
|
mvc __SF_EMPTY(1,%r15),SP_PSW(%r15)
|
|
|
|
ni __SF_EMPTY(%r15),0xbf
|
|
|
|
ssm __SF_EMPTY(%r15)
|
|
|
|
.endm
|
|
|
|
|
2011-01-05 11:47:25 +00:00
|
|
|
.section .kprobes.text, "ax"
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* Scheduler resume function, called by switch_to
|
|
|
|
* gpr2 = (task_struct *) prev
|
|
|
|
* gpr3 = (task_struct *) next
|
|
|
|
* Returns:
|
|
|
|
* gpr2 = prev
|
|
|
|
*/
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(__switch_to)
|
2006-09-28 14:56:37 +00:00
|
|
|
basr %r1,0
|
2011-01-05 11:48:10 +00:00
|
|
|
0: l %r4,__THREAD_info(%r2) # get thread_info of prev
|
|
|
|
l %r5,__THREAD_info(%r3) # get thread_info of next
|
2005-06-25 21:55:30 +00:00
|
|
|
tm __TI_flags+3(%r4),_TIF_MCCK_PENDING # machine check pending?
|
2011-01-05 11:48:10 +00:00
|
|
|
bz 1f-0b(%r1)
|
|
|
|
ni __TI_flags+3(%r4),255-_TIF_MCCK_PENDING # clear flag in prev
|
|
|
|
oi __TI_flags+3(%r5),_TIF_MCCK_PENDING # set it in next
|
|
|
|
1: stm %r6,%r15,__SF_GPRS(%r15) # store gprs of prev task
|
|
|
|
st %r15,__THREAD_ksp(%r2) # store kernel stack of prev
|
|
|
|
l %r15,__THREAD_ksp(%r3) # load kernel stack of next
|
|
|
|
lctl %c4,%c4,__TASK_pid(%r3) # load pid to control reg. 4
|
|
|
|
lm %r6,%r15,__SF_GPRS(%r15) # load gprs of next task
|
|
|
|
st %r3,__LC_CURRENT # store task struct of next
|
2011-05-23 08:24:34 +00:00
|
|
|
mvc __LC_CURRENT_PID(4,%r0),__TASK_pid(%r3) # store pid of next
|
2011-01-05 11:48:10 +00:00
|
|
|
st %r5,__LC_THREAD_INFO # store thread info of next
|
|
|
|
ahi %r5,STACK_SIZE # end of kernel stack of next
|
|
|
|
st %r5,__LC_KERNEL_STACK # store end of kernel stack
|
2005-04-16 22:20:36 +00:00
|
|
|
br %r14
|
|
|
|
|
|
|
|
__critical_start:
|
|
|
|
/*
|
|
|
|
* SVC interrupt handler routine. System calls are synchronous events and
|
|
|
|
* are executed with interrupts enabled.
|
|
|
|
*/
|
|
|
|
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(system_call)
|
2008-12-25 12:39:25 +00:00
|
|
|
stpt __LC_SYNC_ENTER_TIMER
|
2005-04-16 22:20:36 +00:00
|
|
|
sysc_saveall:
|
2007-07-10 09:24:18 +00:00
|
|
|
SAVE_ALL_SVC __LC_SVC_OLD_PSW,__LC_SAVE_AREA
|
2011-01-05 11:47:57 +00:00
|
|
|
CREATE_STACK_FRAME __LC_SAVE_AREA
|
|
|
|
mvc SP_PSW(8,%r15),__LC_SVC_OLD_PSW
|
|
|
|
mvc SP_ILC(4,%r15),__LC_SVC_ILC
|
|
|
|
l %r12,__LC_THREAD_INFO # load pointer to thread_info struct
|
2005-04-16 22:20:36 +00:00
|
|
|
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:
|
2011-01-05 11:47:57 +00:00
|
|
|
xr %r7,%r7
|
|
|
|
icm %r7,3,SP_SVCNR(%r15) # load svc number and test for svc 0
|
2006-09-28 14:56:37 +00:00
|
|
|
bnz BASED(sysc_nr_ok) # svc number > 0
|
2005-04-16 22:20:36 +00:00
|
|
|
# svc 0: system call number in %r1
|
|
|
|
cl %r1,BASED(.Lnr_syscalls)
|
|
|
|
bnl BASED(sysc_nr_ok)
|
2011-01-05 11:47:57 +00:00
|
|
|
sth %r1,SP_SVCNR(%r15)
|
2006-09-28 14:56:37 +00:00
|
|
|
lr %r7,%r1 # copy svc number to %r7
|
2005-04-16 22:20:36 +00:00
|
|
|
sysc_nr_ok:
|
2008-11-27 10:05:55 +00:00
|
|
|
sll %r7,2 # svc number *4
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r10,BASED(.Lsysc_table)
|
|
|
|
tm __TI_flags+2(%r12),_TIF_SYSCALL
|
2010-10-25 14:10:40 +00:00
|
|
|
mvc SP_ARGS(4,%r15),SP_R7(%r15)
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r8,0(%r7,%r10) # get system call addr.
|
2006-09-28 14:56:37 +00:00
|
|
|
bnz BASED(sysc_tracesys)
|
|
|
|
basr %r14,%r8 # call sys_xxxx
|
|
|
|
st %r2,SP_R2(%r15) # store return value (change R2 on stack)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
sysc_return:
|
2010-05-17 08:00:02 +00:00
|
|
|
LOCKDEP_SYS_EXIT
|
|
|
|
sysc_tif:
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_WORK_SVC
|
2005-04-16 22:20:36 +00:00
|
|
|
bnz BASED(sysc_work) # there is work to do (signals etc.)
|
2007-11-20 10:13:32 +00:00
|
|
|
sysc_restore:
|
2006-09-28 14:56:37 +00:00
|
|
|
RESTORE_ALL __LC_RETURN_PSW,1
|
2007-11-20 10:13:32 +00:00
|
|
|
sysc_done:
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
2010-05-17 08:00:01 +00:00
|
|
|
# There is work to do, but first we need to check if we return to userspace.
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
|
|
|
sysc_work:
|
2008-05-07 07:22:52 +00:00
|
|
|
tm SP_PSW+1(%r15),0x01 # returning to user ?
|
|
|
|
bno BASED(sysc_restore)
|
2010-05-17 08:00:01 +00:00
|
|
|
|
|
|
|
#
|
|
|
|
# One of the work bits is on. Find out which one.
|
|
|
|
#
|
2010-05-17 08:00:02 +00:00
|
|
|
sysc_work_tif:
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_MCCK_PENDING
|
2005-06-25 21:55:30 +00:00
|
|
|
bo BASED(sysc_mcck_pending)
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_NEED_RESCHED
|
2005-04-16 22:20:36 +00:00
|
|
|
bo BASED(sysc_reschedule)
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_SIGPENDING
|
2010-05-17 08:00:01 +00:00
|
|
|
bo BASED(sysc_sigpending)
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_NOTIFY_RESUME
|
2010-05-17 08:00:01 +00:00
|
|
|
bo BASED(sysc_notify_resume)
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_RESTART_SVC
|
2005-04-16 22:20:36 +00:00
|
|
|
bo BASED(sysc_restart)
|
2011-01-05 11:48:10 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_PER_TRAP
|
2005-04-16 22:20:36 +00:00
|
|
|
bo BASED(sysc_singlestep)
|
2010-05-17 08:00:01 +00:00
|
|
|
b BASED(sysc_return) # beware of critical section cleanup
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
#
|
|
|
|
# _TIF_NEED_RESCHED is set, call schedule
|
2006-09-28 14:56:37 +00:00
|
|
|
#
|
|
|
|
sysc_reschedule:
|
|
|
|
l %r1,BASED(.Lschedule)
|
2010-05-17 08:00:02 +00:00
|
|
|
la %r14,BASED(sysc_return)
|
2006-09-28 14:56:37 +00:00
|
|
|
br %r1 # call scheduler
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2005-06-25 21:55:30 +00:00
|
|
|
#
|
|
|
|
# _TIF_MCCK_PENDING is set, call handler
|
|
|
|
#
|
|
|
|
sysc_mcck_pending:
|
|
|
|
l %r1,BASED(.Ls390_handle_mcck)
|
2010-05-17 08:00:02 +00:00
|
|
|
la %r14,BASED(sysc_return)
|
2005-06-25 21:55:30 +00:00
|
|
|
br %r1 # TIF bit will be cleared by handler
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
2008-04-30 07:53:08 +00:00
|
|
|
# _TIF_SIGPENDING is set, call do_signal
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
2006-09-28 14:56:37 +00:00
|
|
|
sysc_sigpending:
|
2011-01-05 11:48:10 +00:00
|
|
|
ni __TI_flags+3(%r12),255-_TIF_PER_TRAP # clear TIF_PER_TRAP
|
2006-09-28 14:56:37 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # load pt_regs
|
|
|
|
l %r1,BASED(.Ldo_signal)
|
|
|
|
basr %r14,%r1 # call do_signal
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_RESTART_SVC
|
2005-04-16 22:20:36 +00:00
|
|
|
bo BASED(sysc_restart)
|
2011-01-05 11:48:10 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_PER_TRAP
|
2005-04-16 22:20:36 +00:00
|
|
|
bo BASED(sysc_singlestep)
|
2010-05-17 08:00:02 +00:00
|
|
|
b BASED(sysc_return)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2008-10-10 19:33:20 +00:00
|
|
|
#
|
|
|
|
# _TIF_NOTIFY_RESUME is set, call do_notify_resume
|
|
|
|
#
|
|
|
|
sysc_notify_resume:
|
|
|
|
la %r2,SP_PTREGS(%r15) # load pt_regs
|
|
|
|
l %r1,BASED(.Ldo_notify_resume)
|
2010-05-17 08:00:02 +00:00
|
|
|
la %r14,BASED(sysc_return)
|
2008-10-10 19:33:20 +00:00
|
|
|
br %r1 # call do_notify_resume
|
|
|
|
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
|
|
|
# _TIF_RESTART_SVC is set, set up registers and restart svc
|
|
|
|
#
|
|
|
|
sysc_restart:
|
2011-01-05 11:47:57 +00:00
|
|
|
ni __TI_flags+3(%r12),255-_TIF_RESTART_SVC # clear TIF_RESTART_SVC
|
2006-09-28 14:56:37 +00:00
|
|
|
l %r7,SP_R2(%r15) # load new svc number
|
2005-04-16 22:20:36 +00:00
|
|
|
mvc SP_R2(4,%r15),SP_ORIG_R2(%r15) # restore first argument
|
2006-09-28 14:56:37 +00:00
|
|
|
lm %r2,%r6,SP_R2(%r15) # load svc arguments
|
2011-01-05 11:47:57 +00:00
|
|
|
sth %r7,SP_SVCNR(%r15)
|
2010-10-25 14:10:40 +00:00
|
|
|
b BASED(sysc_nr_ok) # restart svc
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
#
|
2011-01-05 11:48:10 +00:00
|
|
|
# _TIF_PER_TRAP is set, call do_per_trap
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
|
|
|
sysc_singlestep:
|
2011-01-05 11:48:10 +00:00
|
|
|
ni __TI_flags+3(%r12),255-_TIF_PER_TRAP # clear TIF_PER_TRAP
|
2011-01-05 11:47:57 +00:00
|
|
|
xc SP_SVCNR(2,%r15),SP_SVCNR(%r15) # clear svc number
|
2005-04-16 22:20:36 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # address of register-save area
|
|
|
|
l %r1,BASED(.Lhandle_per) # load adr. of per handler
|
2010-05-17 08:00:02 +00:00
|
|
|
la %r14,BASED(sysc_return) # load adr. of system return
|
2011-01-05 11:48:10 +00:00
|
|
|
br %r1 # branch to do_per_trap
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
#
|
2008-10-10 19:33:20 +00:00
|
|
|
# call tracehook_report_syscall_entry/tracehook_report_syscall_exit before
|
|
|
|
# and after the system call
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
|
|
|
sysc_tracesys:
|
2008-10-10 19:33:20 +00:00
|
|
|
l %r1,BASED(.Ltrace_entry)
|
2006-09-28 14:56:37 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # load pt_regs
|
2005-04-16 22:20:36 +00:00
|
|
|
la %r3,0
|
2011-01-05 11:47:57 +00:00
|
|
|
xr %r0,%r0
|
|
|
|
icm %r0,3,SP_SVCNR(%r15)
|
|
|
|
st %r0,SP_R2(%r15)
|
2005-04-16 22:20:36 +00:00
|
|
|
basr %r14,%r1
|
2008-10-10 19:33:20 +00:00
|
|
|
cl %r2,BASED(.Lnr_syscalls)
|
2005-04-16 22:20:36 +00:00
|
|
|
bnl BASED(sysc_tracenogo)
|
2008-10-10 19:33:20 +00:00
|
|
|
lr %r7,%r2
|
2008-11-27 10:05:55 +00:00
|
|
|
sll %r7,2 # svc number *4
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r8,0(%r7,%r10)
|
2005-04-16 22:20:36 +00:00
|
|
|
sysc_tracego:
|
|
|
|
lm %r3,%r6,SP_R3(%r15)
|
2010-10-25 14:10:40 +00:00
|
|
|
mvc SP_ARGS(4,%r15),SP_R7(%r15)
|
2005-04-16 22:20:36 +00:00
|
|
|
l %r2,SP_ORIG_R2(%r15)
|
2006-09-28 14:56:37 +00:00
|
|
|
basr %r14,%r8 # call sys_xxx
|
|
|
|
st %r2,SP_R2(%r15) # store return value
|
2005-04-16 22:20:36 +00:00
|
|
|
sysc_tracenogo:
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+2(%r12),_TIF_SYSCALL
|
2006-09-28 14:56:37 +00:00
|
|
|
bz BASED(sysc_return)
|
2008-10-10 19:33:20 +00:00
|
|
|
l %r1,BASED(.Ltrace_exit)
|
2006-09-28 14:56:37 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # load pt_regs
|
2005-04-16 22:20:36 +00:00
|
|
|
la %r14,BASED(sysc_return)
|
|
|
|
br %r1
|
|
|
|
|
|
|
|
#
|
|
|
|
# a new process exits the kernel with ret_from_fork
|
|
|
|
#
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(ret_from_fork)
|
2005-04-16 22:20:36 +00:00
|
|
|
l %r13,__LC_SVC_NEW_PSW+4
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r12,__LC_THREAD_INFO # load pointer to thread_info struct
|
2005-04-16 22:20:36 +00:00
|
|
|
tm SP_PSW+1(%r15),0x01 # forking a kernel thread ?
|
|
|
|
bo BASED(0f)
|
|
|
|
st %r15,SP_R15(%r15) # store stack pointer for new kthread
|
2006-09-28 14:56:37 +00:00
|
|
|
0: l %r1,BASED(.Lschedtail)
|
|
|
|
basr %r14,%r1
|
2006-07-03 07:24:46 +00:00
|
|
|
TRACE_IRQS_ON
|
2006-09-28 14:56:37 +00:00
|
|
|
stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
|
[S390] audit: get s390 ret_from_fork in sync with other architectures
On s390 we have ret_from_fork jump not to the "do all work we
normally do on return from syscall" as on x86, ppc, etc., but to the
"do all such work except audit". Historical reasons - the codepath
triggered when we have AUDIT process flag set is separated from the
normall one and they converge at sysc_return, which is the common
part of post-syscall work. And does not include calling audit_syscall_exit() -
that's done in the end of sysc_tracesys path, just before that path jumps
to sysc_return.
IOW, the child returning from fork()/clone()/vfork() doesn't
call audit_syscall_exit() at all, so no matter what we do with its
audit context, we are not going to see the audit entry.
The fix is simple: have ret_from_fork go to the point just past
the call of sys_.... in the 'we have AUDIT flag set' path. There we
have (64bit variant; for 31bit the situation is the same):
sysc_tracenogo:
tm __TI_flags+7(%r9),(_TIF_SYSCALL_TRACE|_TIF_SYSCALL_AUDIT)
jz sysc_return
la %r2,SP_PTREGS(%r15) # load pt_regs
larl %r14,sysc_return # return point is sysc_return
jg do_syscall_trace_exit
which is precisely what we need - check the flag, bugger off to sysc_return
if not set, otherwise call do_syscall_trace_exit() and bugger off to
sysc_return. r9 has just been properly set by ret_from_fork itself,
so we are fine.
Tested on s390x, seems to work fine. WARNING: it's been about
16 years since my last contact with 3X0 assembler[1], so additional
review would be very welcome. I don't think I've managed to screw it
up, but...
[1] that *was* in another country and besides, the box is dead...
Signed-off-by: Al Viro <viro@zeniv.linux.org.uk>
Signed-off-by: Heiko Carstens <heiko.carstens@de.ibm.com>
Signed-off-by: Martin Schwidefsky <schwidefsky@de.ibm.com>
2008-12-25 12:37:58 +00:00
|
|
|
b BASED(sysc_tracenogo)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
#
|
2007-04-27 14:01:40 +00:00
|
|
|
# kernel_execve function needs to deal with pt_regs that is not
|
|
|
|
# at the usual place
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(kernel_execve)
|
2007-04-27 14:01:40 +00:00
|
|
|
stm %r12,%r15,48(%r15)
|
|
|
|
lr %r14,%r15
|
|
|
|
l %r13,__LC_SVC_NEW_PSW+4
|
|
|
|
s %r15,BASED(.Lc_spsize)
|
|
|
|
st %r14,__SF_BACKCHAIN(%r15)
|
|
|
|
la %r12,SP_PTREGS(%r15)
|
|
|
|
xc 0(__PT_SIZE,%r12),0(%r12)
|
|
|
|
l %r1,BASED(.Ldo_execve)
|
|
|
|
lr %r5,%r12
|
|
|
|
basr %r14,%r1
|
|
|
|
ltr %r2,%r2
|
|
|
|
be BASED(0f)
|
|
|
|
a %r15,BASED(.Lc_spsize)
|
|
|
|
lm %r12,%r15,48(%r15)
|
|
|
|
br %r14
|
|
|
|
# execve succeeded.
|
|
|
|
0: stnsm __SF_EMPTY(%r15),0xfc # disable interrupts
|
|
|
|
l %r15,__LC_KERNEL_STACK # load ksp
|
|
|
|
s %r15,BASED(.Lc_spsize) # make room for registers & psw
|
|
|
|
mvc SP_PTREGS(__PT_SIZE,%r15),0(%r12) # copy pt_regs
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r12,__LC_THREAD_INFO
|
2007-04-27 14:01:40 +00:00
|
|
|
xc __SF_BACKCHAIN(4,%r15),__SF_BACKCHAIN(%r15)
|
|
|
|
stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
|
|
|
|
l %r1,BASED(.Lexecve_tail)
|
|
|
|
basr %r14,%r1
|
|
|
|
b BASED(sysc_return)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Program check handler routine
|
|
|
|
*/
|
|
|
|
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(pgm_check_handler)
|
2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* 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?).
|
|
|
|
*/
|
2008-12-25 12:39:25 +00:00
|
|
|
stpt __LC_SYNC_ENTER_TIMER
|
2005-04-16 22:20:36 +00:00
|
|
|
SAVE_ALL_BASE __LC_SAVE_AREA
|
2006-09-28 14:56:37 +00:00
|
|
|
tm __LC_PGM_INT_CODE+1,0x80 # check whether we got a per exception
|
|
|
|
bnz BASED(pgm_per) # got per exception -> special case
|
2011-01-05 11:47:57 +00:00
|
|
|
SAVE_ALL_PGM __LC_PGM_OLD_PSW,__LC_SAVE_AREA
|
|
|
|
CREATE_STACK_FRAME __LC_SAVE_AREA
|
|
|
|
xc SP_ILC(4,%r15),SP_ILC(%r15)
|
|
|
|
mvc SP_PSW(8,%r15),__LC_PGM_OLD_PSW
|
|
|
|
l %r12,__LC_THREAD_INFO # load pointer to thread_info struct
|
2005-04-16 22:20:36 +00:00
|
|
|
tm SP_PSW+1(%r15),0x01 # interrupting from user ?
|
|
|
|
bz BASED(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:
|
2006-09-28 14:56:37 +00:00
|
|
|
l %r3,__LC_PGM_ILC # load program interruption code
|
2010-10-25 14:10:37 +00:00
|
|
|
l %r4,__LC_TRANS_EXC_CODE
|
|
|
|
REENABLE_IRQS
|
2005-04-16 22:20:36 +00:00
|
|
|
la %r8,0x7f
|
|
|
|
nr %r8,%r3
|
2006-09-28 14:56:37 +00:00
|
|
|
sll %r8,2
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r1,BASED(.Ljump_table)
|
|
|
|
l %r1,0(%r8,%r1) # load address of handler routine
|
2006-09-28 14:56:37 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # address of register-save area
|
2011-01-05 11:47:57 +00:00
|
|
|
basr %r14,%r1 # branch to interrupt-handler
|
2010-05-17 08:00:02 +00:00
|
|
|
pgm_exit:
|
|
|
|
b BASED(sysc_return)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
#
|
|
|
|
# handle per exception
|
|
|
|
#
|
|
|
|
pgm_per:
|
2006-09-28 14:56:37 +00:00
|
|
|
tm __LC_PGM_OLD_PSW,0x40 # test if per event recording is on
|
|
|
|
bnz BASED(pgm_per_std) # ok, normal per event from user space
|
2005-04-16 22:20:36 +00:00
|
|
|
# ok its one of the special cases, now we need to find out which one
|
2006-09-28 14:56:37 +00:00
|
|
|
clc __LC_PGM_OLD_PSW(8),__LC_SVC_NEW_PSW
|
|
|
|
be BASED(pgm_svcper)
|
2005-04-16 22:20:36 +00:00
|
|
|
# no interesting special case, ignore PER event
|
2006-09-28 14:56:37 +00:00
|
|
|
lm %r12,%r15,__LC_SAVE_AREA
|
|
|
|
lpsw 0x28
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
#
|
|
|
|
# Normal per exception
|
|
|
|
#
|
|
|
|
pgm_per_std:
|
2011-01-05 11:47:57 +00:00
|
|
|
SAVE_ALL_PGM __LC_PGM_OLD_PSW,__LC_SAVE_AREA
|
|
|
|
CREATE_STACK_FRAME __LC_SAVE_AREA
|
|
|
|
mvc SP_PSW(8,%r15),__LC_PGM_OLD_PSW
|
|
|
|
l %r12,__LC_THREAD_INFO # load pointer to thread_info struct
|
2005-04-16 22:20:36 +00:00
|
|
|
tm SP_PSW+1(%r15),0x01 # interrupting from user ?
|
|
|
|
bz BASED(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:
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r1,__TI_task(%r12)
|
2010-05-17 08:00:02 +00:00
|
|
|
tm SP_PSW+1(%r15),0x01 # kernel per event ?
|
|
|
|
bz BASED(kernel_per)
|
2011-01-05 11:48:10 +00:00
|
|
|
mvc __THREAD_per_cause(2,%r1),__LC_PER_CAUSE
|
|
|
|
mvc __THREAD_per_address(4,%r1),__LC_PER_ADDRESS
|
|
|
|
mvc __THREAD_per_paid(1,%r1),__LC_PER_PAID
|
|
|
|
oi __TI_flags+3(%r12),_TIF_PER_TRAP # set TIF_PER_TRAP
|
2006-09-28 14:56:37 +00:00
|
|
|
l %r3,__LC_PGM_ILC # load program interruption code
|
2010-10-25 14:10:37 +00:00
|
|
|
l %r4,__LC_TRANS_EXC_CODE
|
|
|
|
REENABLE_IRQS
|
2005-04-16 22:20:36 +00:00
|
|
|
la %r8,0x7f
|
2006-09-28 14:56:37 +00:00
|
|
|
nr %r8,%r3 # clear per-event-bit and ilc
|
2010-07-27 17:29:37 +00:00
|
|
|
be BASED(pgm_exit2) # only per or per+check ?
|
|
|
|
sll %r8,2
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r1,BASED(.Ljump_table)
|
|
|
|
l %r1,0(%r8,%r1) # load address of handler routine
|
2010-07-27 17:29:37 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # address of register-save area
|
2011-01-05 11:47:57 +00:00
|
|
|
basr %r14,%r1 # branch to interrupt-handler
|
2010-07-27 17:29:37 +00:00
|
|
|
pgm_exit2:
|
|
|
|
b BASED(sysc_return)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
#
|
|
|
|
# it was a single stepped SVC that is causing all the trouble
|
|
|
|
#
|
|
|
|
pgm_svcper:
|
2011-01-05 11:47:57 +00:00
|
|
|
SAVE_ALL_PGM __LC_SVC_OLD_PSW,__LC_SAVE_AREA
|
|
|
|
CREATE_STACK_FRAME __LC_SAVE_AREA
|
|
|
|
mvc SP_PSW(8,%r15),__LC_SVC_OLD_PSW
|
|
|
|
mvc SP_ILC(4,%r15),__LC_SVC_ILC
|
|
|
|
l %r12,__LC_THREAD_INFO # load pointer to thread_info struct
|
2005-04-16 22:20:36 +00:00
|
|
|
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
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r8,__TI_task(%r12)
|
2011-01-05 11:48:10 +00:00
|
|
|
mvc __THREAD_per_cause(2,%r8),__LC_PER_CAUSE
|
|
|
|
mvc __THREAD_per_address(4,%r8),__LC_PER_ADDRESS
|
|
|
|
mvc __THREAD_per_paid(1,%r8),__LC_PER_PAID
|
|
|
|
oi __TI_flags+3(%r12),_TIF_PER_TRAP # set TIF_PER_TRAP
|
2005-04-16 22:20:36 +00:00
|
|
|
stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
|
2010-05-17 08:00:02 +00:00
|
|
|
lm %r2,%r6,SP_R2(%r15) # load svc arguments
|
2005-04-16 22:20:36 +00:00
|
|
|
b BASED(sysc_do_svc)
|
|
|
|
|
2006-09-20 13:58:39 +00:00
|
|
|
#
|
|
|
|
# per was called from kernel, must be kprobes
|
|
|
|
#
|
|
|
|
kernel_per:
|
2010-10-29 14:50:45 +00:00
|
|
|
REENABLE_IRQS
|
2011-01-05 11:47:57 +00:00
|
|
|
xc SP_SVCNR(2,%r15),SP_SVCNR(%r15)
|
2006-09-20 13:58:39 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # address of register-save area
|
|
|
|
l %r1,BASED(.Lhandle_per) # load adr. of per handler
|
2010-05-17 08:00:02 +00:00
|
|
|
basr %r14,%r1 # branch to do_single_step
|
|
|
|
b BASED(pgm_exit)
|
2006-09-20 13:58:39 +00:00
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* IO interrupt handler routine
|
|
|
|
*/
|
|
|
|
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(io_int_handler)
|
2005-04-16 22:20:36 +00:00
|
|
|
stck __LC_INT_CLOCK
|
2008-12-31 14:11:41 +00:00
|
|
|
stpt __LC_ASYNC_ENTER_TIMER
|
2006-06-29 12:58:05 +00:00
|
|
|
SAVE_ALL_ASYNC __LC_IO_OLD_PSW,__LC_SAVE_AREA+16
|
2011-01-05 11:47:57 +00:00
|
|
|
CREATE_STACK_FRAME __LC_SAVE_AREA+16
|
|
|
|
mvc SP_PSW(8,%r15),0(%r12) # move user PSW to stack
|
|
|
|
l %r12,__LC_THREAD_INFO # load pointer to thread_info struct
|
2005-04-16 22:20:36 +00:00
|
|
|
tm SP_PSW+1(%r15),0x01 # interrupting from user ?
|
|
|
|
bz BASED(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:
|
2006-07-03 07:24:46 +00:00
|
|
|
TRACE_IRQS_OFF
|
2006-09-28 14:56:37 +00:00
|
|
|
l %r1,BASED(.Ldo_IRQ) # load address of do_IRQ
|
|
|
|
la %r2,SP_PTREGS(%r15) # address of register-save area
|
|
|
|
basr %r14,%r1 # branch to standard irq handler
|
2005-04-16 22:20:36 +00:00
|
|
|
io_return:
|
2010-05-17 08:00:02 +00:00
|
|
|
LOCKDEP_SYS_EXIT
|
|
|
|
TRACE_IRQS_ON
|
|
|
|
io_tif:
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_WORK_INT
|
2006-09-28 14:56:37 +00:00
|
|
|
bnz BASED(io_work) # there is work to do (signals etc.)
|
2007-11-20 10:13:32 +00:00
|
|
|
io_restore:
|
2006-09-28 14:56:37 +00:00
|
|
|
RESTORE_ALL __LC_RETURN_PSW,0
|
2005-09-03 22:57:56 +00:00
|
|
|
io_done:
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2008-05-07 07:22:52 +00:00
|
|
|
#
|
2010-05-17 08:00:01 +00:00
|
|
|
# There is work todo, find out in which context we have been interrupted:
|
|
|
|
# 1) if we return to user space we can do all _TIF_WORK_INT work
|
|
|
|
# 2) if we return to kernel code and preemptive scheduling is enabled check
|
|
|
|
# the preemption counter and if it is zero call preempt_schedule_irq
|
|
|
|
# Before any work can be done, a switch to the kernel stack is required.
|
2008-05-07 07:22:52 +00:00
|
|
|
#
|
|
|
|
io_work:
|
|
|
|
tm SP_PSW+1(%r15),0x01 # returning to user ?
|
2010-05-17 08:00:01 +00:00
|
|
|
bo BASED(io_work_user) # yes -> do resched & signal
|
|
|
|
#ifdef CONFIG_PREEMPT
|
2008-05-07 07:22:52 +00:00
|
|
|
# check for preemptive scheduling
|
2011-01-05 11:47:57 +00:00
|
|
|
icm %r0,15,__TI_precount(%r12)
|
2008-05-07 07:22:52 +00:00
|
|
|
bnz BASED(io_restore) # preemption disabled
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_NEED_RESCHED
|
2010-05-17 08:00:02 +00:00
|
|
|
bno BASED(io_restore)
|
2010-05-17 08:00:01 +00:00
|
|
|
# switch to kernel stack
|
2005-04-16 22:20:36 +00:00
|
|
|
l %r1,SP_R15(%r15)
|
|
|
|
s %r1,BASED(.Lc_spsize)
|
|
|
|
mvc SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
|
2006-09-28 14:56:37 +00:00
|
|
|
xc __SF_BACKCHAIN(4,%r1),__SF_BACKCHAIN(%r1) # clear back chain
|
2005-04-16 22:20:36 +00:00
|
|
|
lr %r15,%r1
|
2010-05-17 08:00:02 +00:00
|
|
|
# TRACE_IRQS_ON already done at io_return, call
|
|
|
|
# TRACE_IRQS_OFF to keep things symmetrical
|
|
|
|
TRACE_IRQS_OFF
|
2007-11-20 10:13:35 +00:00
|
|
|
l %r1,BASED(.Lpreempt_schedule_irq)
|
2010-05-17 08:00:02 +00:00
|
|
|
basr %r14,%r1 # call preempt_schedule_irq
|
|
|
|
b BASED(io_return)
|
|
|
|
#else
|
2010-05-17 08:00:01 +00:00
|
|
|
b BASED(io_restore)
|
2010-05-17 08:00:02 +00:00
|
|
|
#endif
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2010-05-17 08:00:01 +00:00
|
|
|
#
|
|
|
|
# Need to do work before returning to userspace, switch to kernel stack
|
|
|
|
#
|
2008-05-07 07:22:52 +00:00
|
|
|
io_work_user:
|
2005-04-16 22:20:36 +00:00
|
|
|
l %r1,__LC_KERNEL_STACK
|
|
|
|
s %r1,BASED(.Lc_spsize)
|
|
|
|
mvc SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
|
2006-09-28 14:56:37 +00:00
|
|
|
xc __SF_BACKCHAIN(4,%r1),__SF_BACKCHAIN(%r1) # clear back chain
|
2005-04-16 22:20:36 +00:00
|
|
|
lr %r15,%r1
|
2010-05-17 08:00:02 +00:00
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
|
|
|
# One of the work bits is on. Find out which one.
|
2010-05-17 08:00:01 +00:00
|
|
|
# Checked are: _TIF_SIGPENDING, _TIF_NOTIFY_RESUME, _TIF_NEED_RESCHED
|
2006-09-28 14:56:37 +00:00
|
|
|
# and _TIF_MCCK_PENDING
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
2010-05-17 08:00:02 +00:00
|
|
|
io_work_tif:
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_MCCK_PENDING
|
2006-09-28 14:56:37 +00:00
|
|
|
bo BASED(io_mcck_pending)
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_NEED_RESCHED
|
2005-04-16 22:20:36 +00:00
|
|
|
bo BASED(io_reschedule)
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_SIGPENDING
|
2010-05-17 08:00:01 +00:00
|
|
|
bo BASED(io_sigpending)
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_NOTIFY_RESUME
|
2010-05-17 08:00:01 +00:00
|
|
|
bo BASED(io_notify_resume)
|
|
|
|
b BASED(io_return) # beware of critical section cleanup
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2005-06-25 21:55:30 +00:00
|
|
|
#
|
|
|
|
# _TIF_MCCK_PENDING is set, call handler
|
|
|
|
#
|
|
|
|
io_mcck_pending:
|
2010-05-17 08:00:02 +00:00
|
|
|
# TRACE_IRQS_ON already done at io_return
|
2005-06-25 21:55:30 +00:00
|
|
|
l %r1,BASED(.Ls390_handle_mcck)
|
2007-07-27 10:29:18 +00:00
|
|
|
basr %r14,%r1 # TIF bit will be cleared by handler
|
2010-05-17 08:00:02 +00:00
|
|
|
TRACE_IRQS_OFF
|
|
|
|
b BASED(io_return)
|
2005-06-25 21:55:30 +00:00
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
|
|
|
# _TIF_NEED_RESCHED is set, call schedule
|
2006-09-28 14:56:37 +00:00
|
|
|
#
|
|
|
|
io_reschedule:
|
2010-05-17 08:00:02 +00:00
|
|
|
# TRACE_IRQS_ON already done at io_return
|
2006-09-28 14:56:37 +00:00
|
|
|
l %r1,BASED(.Lschedule)
|
|
|
|
stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
|
|
|
|
basr %r14,%r1 # call scheduler
|
|
|
|
stnsm __SF_EMPTY(%r15),0xfc # disable I/O and ext. interrupts
|
2007-11-20 10:13:32 +00:00
|
|
|
TRACE_IRQS_OFF
|
2010-05-17 08:00:02 +00:00
|
|
|
b BASED(io_return)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
#
|
2008-04-30 07:53:08 +00:00
|
|
|
# _TIF_SIGPENDING is set, call do_signal
|
2005-04-16 22:20:36 +00:00
|
|
|
#
|
2006-09-28 14:56:37 +00:00
|
|
|
io_sigpending:
|
2010-05-17 08:00:02 +00:00
|
|
|
# TRACE_IRQS_ON already done at io_return
|
2006-09-28 14:56:37 +00:00
|
|
|
stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
|
|
|
|
la %r2,SP_PTREGS(%r15) # load pt_regs
|
|
|
|
l %r1,BASED(.Ldo_signal)
|
|
|
|
basr %r14,%r1 # call do_signal
|
|
|
|
stnsm __SF_EMPTY(%r15),0xfc # disable I/O and ext. interrupts
|
2007-11-20 10:13:32 +00:00
|
|
|
TRACE_IRQS_OFF
|
2010-05-17 08:00:02 +00:00
|
|
|
b BASED(io_return)
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2008-10-10 19:33:20 +00:00
|
|
|
#
|
|
|
|
# _TIF_SIGPENDING is set, call do_signal
|
|
|
|
#
|
|
|
|
io_notify_resume:
|
2010-05-17 08:00:02 +00:00
|
|
|
# TRACE_IRQS_ON already done at io_return
|
2008-10-10 19:33:20 +00:00
|
|
|
stosm __SF_EMPTY(%r15),0x03 # reenable interrupts
|
|
|
|
la %r2,SP_PTREGS(%r15) # load pt_regs
|
|
|
|
l %r1,BASED(.Ldo_notify_resume)
|
|
|
|
basr %r14,%r1 # call do_signal
|
|
|
|
stnsm __SF_EMPTY(%r15),0xfc # disable I/O and ext. interrupts
|
|
|
|
TRACE_IRQS_OFF
|
2010-05-17 08:00:02 +00:00
|
|
|
b BASED(io_return)
|
2008-10-10 19:33:20 +00:00
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* External interrupt handler routine
|
|
|
|
*/
|
|
|
|
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(ext_int_handler)
|
2005-04-16 22:20:36 +00:00
|
|
|
stck __LC_INT_CLOCK
|
2008-12-31 14:11:41 +00:00
|
|
|
stpt __LC_ASYNC_ENTER_TIMER
|
2006-06-29 12:58:05 +00:00
|
|
|
SAVE_ALL_ASYNC __LC_EXT_OLD_PSW,__LC_SAVE_AREA+16
|
2011-01-05 11:47:57 +00:00
|
|
|
CREATE_STACK_FRAME __LC_SAVE_AREA+16
|
|
|
|
mvc SP_PSW(8,%r15),0(%r12) # move user PSW to stack
|
|
|
|
l %r12,__LC_THREAD_INFO # load pointer to thread_info struct
|
2005-04-16 22:20:36 +00:00
|
|
|
tm SP_PSW+1(%r15),0x01 # interrupting from user ?
|
|
|
|
bz BASED(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:
|
2006-07-03 07:24:46 +00:00
|
|
|
TRACE_IRQS_OFF
|
2006-09-28 14:56:37 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # address of register-save area
|
2010-10-25 14:10:38 +00:00
|
|
|
l %r3,__LC_CPU_ADDRESS # get cpu address + interruption code
|
|
|
|
l %r4,__LC_EXT_PARAMS # get external parameters
|
2005-04-16 22:20:36 +00:00
|
|
|
l %r1,BASED(.Ldo_extint)
|
|
|
|
basr %r14,%r1
|
|
|
|
b BASED(io_return)
|
|
|
|
|
2005-09-03 22:57:56 +00:00
|
|
|
__critical_end:
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* Machine check handler routines
|
|
|
|
*/
|
|
|
|
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(mcck_int_handler)
|
2010-05-17 08:00:03 +00:00
|
|
|
stck __LC_MCCK_CLOCK
|
2005-06-25 21:55:30 +00:00
|
|
|
spt __LC_CPU_TIMER_SAVE_AREA # revalidate cpu timer
|
|
|
|
lm %r0,%r15,__LC_GPREGS_SAVE_AREA # revalidate gprs
|
2005-04-16 22:20:36 +00:00
|
|
|
SAVE_ALL_BASE __LC_SAVE_AREA+32
|
2005-06-25 21:55:30 +00:00
|
|
|
la %r12,__LC_MCK_OLD_PSW
|
2006-09-28 14:56:37 +00:00
|
|
|
tm __LC_MCCK_CODE,0x80 # system damage?
|
2005-06-25 21:55:30 +00:00
|
|
|
bo BASED(mcck_int_main) # yes -> rest of mcck code invalid
|
2010-05-17 08:00:03 +00:00
|
|
|
mvc __LC_MCCK_ENTER_TIMER(8),__LC_CPU_TIMER_SAVE_AREA
|
2006-06-29 12:58:05 +00:00
|
|
|
tm __LC_MCCK_CODE+5,0x02 # stored cpu timer value valid?
|
|
|
|
bo BASED(1f)
|
|
|
|
la %r14,__LC_SYNC_ENTER_TIMER
|
|
|
|
clc 0(8,%r14),__LC_ASYNC_ENTER_TIMER
|
|
|
|
bl BASED(0f)
|
|
|
|
la %r14,__LC_ASYNC_ENTER_TIMER
|
|
|
|
0: clc 0(8,%r14),__LC_EXIT_TIMER
|
|
|
|
bl BASED(0f)
|
|
|
|
la %r14,__LC_EXIT_TIMER
|
|
|
|
0: clc 0(8,%r14),__LC_LAST_UPDATE_TIMER
|
|
|
|
bl BASED(0f)
|
|
|
|
la %r14,__LC_LAST_UPDATE_TIMER
|
|
|
|
0: spt 0(%r14)
|
2010-05-17 08:00:03 +00:00
|
|
|
mvc __LC_MCCK_ENTER_TIMER(8),0(%r14)
|
2008-12-25 12:39:25 +00:00
|
|
|
1: tm __LC_MCCK_CODE+2,0x09 # mwp + ia of old psw valid?
|
2005-06-25 21:55:30 +00:00
|
|
|
bno BASED(mcck_int_main) # no -> skip cleanup critical
|
|
|
|
tm __LC_MCK_OLD_PSW+1,0x01 # test problem state bit
|
|
|
|
bnz BASED(mcck_int_main) # from user -> load async stack
|
|
|
|
clc __LC_MCK_OLD_PSW+4(4),BASED(.Lcritical_end)
|
|
|
|
bhe BASED(mcck_int_main)
|
|
|
|
clc __LC_MCK_OLD_PSW+4(4),BASED(.Lcritical_start)
|
|
|
|
bl BASED(mcck_int_main)
|
|
|
|
l %r14,BASED(.Lcleanup_critical)
|
|
|
|
basr %r14,%r14
|
|
|
|
mcck_int_main:
|
|
|
|
l %r14,__LC_PANIC_STACK # are we already on the panic stack?
|
|
|
|
slr %r14,%r15
|
|
|
|
sra %r14,PAGE_SHIFT
|
|
|
|
be BASED(0f)
|
|
|
|
l %r15,__LC_PANIC_STACK # load panic stack
|
2011-01-05 11:47:57 +00:00
|
|
|
0: s %r15,BASED(.Lc_spsize) # make room for registers & psw
|
|
|
|
CREATE_STACK_FRAME __LC_SAVE_AREA+32
|
|
|
|
mvc SP_PSW(8,%r15),0(%r12)
|
|
|
|
l %r12,__LC_THREAD_INFO # load pointer to thread_info struct
|
2006-09-28 14:56:37 +00:00
|
|
|
tm __LC_MCCK_CODE+2,0x08 # mwp of old psw valid?
|
2005-09-03 22:57:56 +00:00
|
|
|
bno BASED(mcck_no_vtime) # no -> skip cleanup critical
|
2006-06-29 12:58:05 +00:00
|
|
|
tm SP_PSW+1(%r15),0x01 # interrupting from user ?
|
2005-09-03 22:57:56 +00:00
|
|
|
bz BASED(mcck_no_vtime)
|
2010-05-17 08:00:03 +00:00
|
|
|
UPDATE_VTIME __LC_EXIT_TIMER,__LC_MCCK_ENTER_TIMER,__LC_USER_TIMER
|
2005-09-03 22:57:56 +00:00
|
|
|
UPDATE_VTIME __LC_LAST_UPDATE_TIMER,__LC_EXIT_TIMER,__LC_SYSTEM_TIMER
|
2010-05-17 08:00:03 +00:00
|
|
|
mvc __LC_LAST_UPDATE_TIMER(8),__LC_MCCK_ENTER_TIMER
|
2005-09-03 22:57:56 +00:00
|
|
|
mcck_no_vtime:
|
2005-06-25 21:55:30 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # load pt_regs
|
2006-09-28 14:56:37 +00:00
|
|
|
l %r1,BASED(.Ls390_mcck)
|
|
|
|
basr %r14,%r1 # call machine check handler
|
|
|
|
tm SP_PSW+1(%r15),0x01 # returning to user ?
|
2005-06-25 21:55:30 +00:00
|
|
|
bno BASED(mcck_return)
|
2006-09-28 14:56:37 +00:00
|
|
|
l %r1,__LC_KERNEL_STACK # switch to kernel stack
|
2005-06-25 21:55:30 +00:00
|
|
|
s %r1,BASED(.Lc_spsize)
|
|
|
|
mvc SP_PTREGS(__PT_SIZE,%r1),SP_PTREGS(%r15)
|
2006-09-28 14:56:37 +00:00
|
|
|
xc __SF_BACKCHAIN(4,%r1),__SF_BACKCHAIN(%r1) # clear back chain
|
2005-06-25 21:55:30 +00:00
|
|
|
lr %r15,%r1
|
|
|
|
stosm __SF_EMPTY(%r15),0x04 # turn dat on
|
2011-01-05 11:47:57 +00:00
|
|
|
tm __TI_flags+3(%r12),_TIF_MCCK_PENDING
|
2005-06-25 21:55:30 +00:00
|
|
|
bno BASED(mcck_return)
|
2006-07-03 07:24:46 +00:00
|
|
|
TRACE_IRQS_OFF
|
2005-06-25 21:55:30 +00:00
|
|
|
l %r1,BASED(.Ls390_handle_mcck)
|
|
|
|
basr %r14,%r1 # call machine check handler
|
2006-07-03 07:24:46 +00:00
|
|
|
TRACE_IRQS_ON
|
2005-04-16 22:20:36 +00:00
|
|
|
mcck_return:
|
2006-06-29 12:58:05 +00:00
|
|
|
mvc __LC_RETURN_MCCK_PSW(8),SP_PSW(%r15) # move return PSW
|
|
|
|
ni __LC_RETURN_MCCK_PSW+1,0xfd # clear wait state bit
|
|
|
|
tm __LC_RETURN_MCCK_PSW+1,0x01 # returning to user ?
|
|
|
|
bno BASED(0f)
|
|
|
|
lm %r0,%r15,SP_R0(%r15) # load gprs 0-15
|
|
|
|
stpt __LC_EXIT_TIMER
|
|
|
|
lpsw __LC_RETURN_MCCK_PSW # back to caller
|
2008-12-25 12:39:25 +00:00
|
|
|
0: lm %r0,%r15,SP_R0(%r15) # load gprs 0-15
|
2006-06-29 12:58:05 +00:00
|
|
|
lpsw __LC_RETURN_MCCK_PSW # back to caller
|
|
|
|
|
2006-09-28 14:56:37 +00:00
|
|
|
RESTORE_ALL __LC_RETURN_MCCK_PSW,0
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Restart interruption handler, kick starter for additional CPUs
|
|
|
|
*/
|
2007-06-19 11:10:03 +00:00
|
|
|
#ifdef CONFIG_SMP
|
2008-02-05 15:50:40 +00:00
|
|
|
__CPUINIT
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(restart_int_handler)
|
2009-04-14 13:36:27 +00:00
|
|
|
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)
|
2006-09-28 14:56:37 +00:00
|
|
|
l %r15,__LC_SAVE_AREA+60 # load ksp
|
|
|
|
lctl %c0,%c15,__LC_CREGS_SAVE_AREA # get new ctl regs
|
|
|
|
lam %a0,%a15,__LC_AREGS_SAVE_AREA
|
|
|
|
lm %r6,%r15,__SF_GPRS(%r15) # load registers from clone
|
2009-04-14 13:36:27 +00:00
|
|
|
l %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
|
2006-09-28 14:56:37 +00:00
|
|
|
stosm __SF_EMPTY(%r15),0x04 # now we can turn dat on
|
|
|
|
basr %r14,0
|
|
|
|
l %r14,restart_addr-.(%r14)
|
2011-05-10 15:13:39 +00:00
|
|
|
basr %r14,%r14 # branch to start_secondary
|
2005-04-16 22:20:36 +00:00
|
|
|
restart_addr:
|
2006-09-28 14:56:37 +00:00
|
|
|
.long start_secondary
|
2009-04-14 13:36:27 +00:00
|
|
|
.align 8
|
|
|
|
restart_vtime:
|
|
|
|
.long 0x7fffffff,0xffffffff
|
2007-06-19 11:10:03 +00:00
|
|
|
.previous
|
2005-04-16 22:20:36 +00:00
|
|
|
#else
|
|
|
|
/*
|
|
|
|
* If we do not run with SMP enabled, let the new CPU crash ...
|
|
|
|
*/
|
2011-07-24 08:48:19 +00:00
|
|
|
ENTRY(restart_int_handler)
|
2006-09-28 14:56:37 +00:00
|
|
|
basr %r1,0
|
2005-04-16 22:20:36 +00:00
|
|
|
restart_base:
|
2006-09-28 14:56:37 +00:00
|
|
|
lpsw restart_crash-restart_base(%r1)
|
|
|
|
.align 8
|
2005-04-16 22:20:36 +00:00
|
|
|
restart_crash:
|
2006-09-28 14:56:37 +00:00
|
|
|
.long 0x000a0000,0x00000000
|
2005-04-16 22:20:36 +00:00
|
|
|
restart_go:
|
|
|
|
#endif
|
|
|
|
|
2011-08-03 14:44:19 +00:00
|
|
|
#
|
|
|
|
# PSW restart interrupt handler
|
|
|
|
#
|
|
|
|
ENTRY(psw_restart_int_handler)
|
|
|
|
st %r15,__LC_SAVE_AREA_64(%r0) # save r15
|
|
|
|
basr %r15,0
|
|
|
|
0: l %r15,.Lrestart_stack-0b(%r15) # load restart stack
|
|
|
|
l %r15,0(%r15)
|
|
|
|
ahi %r15,-SP_SIZE # make room for pt_regs
|
|
|
|
stm %r0,%r14,SP_R0(%r15) # store gprs %r0-%r14 to stack
|
|
|
|
mvc SP_R15(4,%r15),__LC_SAVE_AREA_64(%r0)# store saved %r15 to stack
|
|
|
|
mvc SP_PSW(8,%r15),__LC_RST_OLD_PSW(%r0) # store restart old psw
|
|
|
|
xc __SF_BACKCHAIN(4,%r15),__SF_BACKCHAIN(%r15) # set backchain to 0
|
|
|
|
basr %r14,0
|
|
|
|
1: l %r14,.Ldo_restart-1b(%r14)
|
|
|
|
basr %r14,%r14
|
|
|
|
|
|
|
|
basr %r14,0 # load disabled wait PSW if
|
|
|
|
2: lpsw restart_psw_crash-2b(%r14) # do_restart returns
|
|
|
|
.align 4
|
|
|
|
.Ldo_restart:
|
|
|
|
.long do_restart
|
|
|
|
.Lrestart_stack:
|
|
|
|
.long restart_stack
|
|
|
|
.align 8
|
|
|
|
restart_psw_crash:
|
|
|
|
.long 0x000a0000,0x00000000 + restart_psw_crash
|
|
|
|
|
2011-01-05 11:47:25 +00:00
|
|
|
.section .kprobes.text, "ax"
|
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
#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:
|
|
|
|
l %r15,__LC_PANIC_STACK # change to panic stack
|
|
|
|
sl %r15,BASED(.Lc_spsize)
|
|
|
|
mvc SP_PSW(8,%r15),0(%r12) # move user PSW to stack
|
|
|
|
stm %r0,%r11,SP_R0(%r15) # store gprs %r0-%r11 to kernel stack
|
|
|
|
la %r1,__LC_SAVE_AREA
|
|
|
|
ch %r12,BASED(.L0x020) # old psw addr == __LC_SVC_OLD_PSW ?
|
|
|
|
be BASED(0f)
|
|
|
|
ch %r12,BASED(.L0x028) # old psw addr == __LC_PGM_OLD_PSW ?
|
|
|
|
be BASED(0f)
|
|
|
|
la %r1,__LC_SAVE_AREA+16
|
|
|
|
0: mvc SP_R12(16,%r15),0(%r1) # move %r12-%r15 to stack
|
2006-09-28 14:56:37 +00:00
|
|
|
xc __SF_BACKCHAIN(4,%r15),__SF_BACKCHAIN(%r15) # clear back chain
|
2005-04-16 22:20:36 +00:00
|
|
|
l %r1,BASED(1f) # branch to kernel_stack_overflow
|
2006-09-28 14:56:37 +00:00
|
|
|
la %r2,SP_PTREGS(%r15) # load pt_regs
|
2005-04-16 22:20:36 +00:00
|
|
|
br %r1
|
2006-09-28 14:56:37 +00:00
|
|
|
1: .long kernel_stack_overflow
|
2005-04-16 22:20:36 +00:00
|
|
|
#endif
|
|
|
|
|
|
|
|
cleanup_table_system_call:
|
|
|
|
.long system_call + 0x80000000, sysc_do_svc + 0x80000000
|
2010-05-17 08:00:02 +00:00
|
|
|
cleanup_table_sysc_tif:
|
|
|
|
.long sysc_tif + 0x80000000, sysc_restore + 0x80000000
|
|
|
|
cleanup_table_sysc_restore:
|
|
|
|
.long sysc_restore + 0x80000000, sysc_done + 0x80000000
|
|
|
|
cleanup_table_io_tif:
|
|
|
|
.long io_tif + 0x80000000, io_restore + 0x80000000
|
|
|
|
cleanup_table_io_restore:
|
|
|
|
.long io_restore + 0x80000000, io_done + 0x80000000
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
cleanup_critical:
|
|
|
|
clc 4(4,%r12),BASED(cleanup_table_system_call)
|
|
|
|
bl BASED(0f)
|
|
|
|
clc 4(4,%r12),BASED(cleanup_table_system_call+4)
|
|
|
|
bl BASED(cleanup_system_call)
|
|
|
|
0:
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_table_sysc_tif)
|
2005-04-16 22:20:36 +00:00
|
|
|
bl BASED(0f)
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_table_sysc_tif+4)
|
|
|
|
bl BASED(cleanup_sysc_tif)
|
2005-04-16 22:20:36 +00:00
|
|
|
0:
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_table_sysc_restore)
|
2005-04-16 22:20:36 +00:00
|
|
|
bl BASED(0f)
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_table_sysc_restore+4)
|
|
|
|
bl BASED(cleanup_sysc_restore)
|
2006-06-29 12:58:05 +00:00
|
|
|
0:
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_table_io_tif)
|
2006-06-29 12:58:05 +00:00
|
|
|
bl BASED(0f)
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_table_io_tif+4)
|
|
|
|
bl BASED(cleanup_io_tif)
|
2005-09-03 22:57:56 +00:00
|
|
|
0:
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_table_io_restore)
|
2005-09-03 22:57:56 +00:00
|
|
|
bl BASED(0f)
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_table_io_restore+4)
|
|
|
|
bl BASED(cleanup_io_restore)
|
2005-04-16 22:20:36 +00:00
|
|
|
0:
|
|
|
|
br %r14
|
|
|
|
|
|
|
|
cleanup_system_call:
|
|
|
|
mvc __LC_RETURN_PSW(8),0(%r12)
|
|
|
|
clc __LC_RETURN_PSW+4(4),BASED(cleanup_system_call_insn+4)
|
|
|
|
bh BASED(0f)
|
2010-05-17 08:00:03 +00:00
|
|
|
mvc __LC_SYNC_ENTER_TIMER(8),__LC_MCCK_ENTER_TIMER
|
|
|
|
c %r12,BASED(.Lmck_old_psw)
|
|
|
|
be BASED(0f)
|
2005-04-16 22:20:36 +00:00
|
|
|
mvc __LC_SYNC_ENTER_TIMER(8),__LC_ASYNC_ENTER_TIMER
|
2010-05-17 08:00:03 +00:00
|
|
|
0: c %r12,BASED(.Lmck_old_psw)
|
|
|
|
la %r12,__LC_SAVE_AREA+32
|
|
|
|
be BASED(0f)
|
|
|
|
la %r12,__LC_SAVE_AREA+16
|
2005-04-16 22:20:36 +00:00
|
|
|
0: clc __LC_RETURN_PSW+4(4),BASED(cleanup_system_call_insn+8)
|
|
|
|
bhe BASED(cleanup_vtime)
|
|
|
|
clc __LC_RETURN_PSW+4(4),BASED(cleanup_system_call_insn)
|
|
|
|
bh BASED(0f)
|
2005-09-03 22:57:56 +00:00
|
|
|
mvc __LC_SAVE_AREA(16),0(%r12)
|
|
|
|
0: st %r13,4(%r12)
|
2011-01-05 11:47:57 +00:00
|
|
|
l %r15,__LC_KERNEL_STACK # problem state -> load ksp
|
|
|
|
s %r15,BASED(.Lc_spsize) # make room for registers & psw
|
2005-09-03 22:57:56 +00:00
|
|
|
st %r15,12(%r12)
|
2011-01-05 11:47:57 +00:00
|
|
|
CREATE_STACK_FRAME __LC_SAVE_AREA
|
|
|
|
mvc SP_PSW(8,%r15),__LC_SVC_OLD_PSW
|
|
|
|
mvc SP_ILC(4,%r15),__LC_SVC_ILC
|
|
|
|
mvc 0(4,%r12),__LC_THREAD_INFO
|
2005-04-16 22:20:36 +00:00
|
|
|
cleanup_vtime:
|
|
|
|
clc __LC_RETURN_PSW+4(4),BASED(cleanup_system_call_insn+12)
|
|
|
|
bhe BASED(cleanup_stime)
|
|
|
|
UPDATE_VTIME __LC_EXIT_TIMER,__LC_SYNC_ENTER_TIMER,__LC_USER_TIMER
|
|
|
|
cleanup_stime:
|
|
|
|
clc __LC_RETURN_PSW+4(4),BASED(cleanup_system_call_insn+16)
|
|
|
|
bh BASED(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+4(4),BASED(cleanup_table_system_call+4)
|
|
|
|
la %r12,__LC_RETURN_PSW
|
|
|
|
br %r14
|
|
|
|
cleanup_system_call_insn:
|
|
|
|
.long sysc_saveall + 0x80000000
|
2006-09-28 14:56:37 +00:00
|
|
|
.long system_call + 0x80000000
|
|
|
|
.long sysc_vtime + 0x80000000
|
|
|
|
.long sysc_stime + 0x80000000
|
|
|
|
.long sysc_update + 0x80000000
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2010-05-17 08:00:02 +00:00
|
|
|
cleanup_sysc_tif:
|
2005-04-16 22:20:36 +00:00
|
|
|
mvc __LC_RETURN_PSW(4),0(%r12)
|
2010-05-17 08:00:02 +00:00
|
|
|
mvc __LC_RETURN_PSW+4(4),BASED(cleanup_table_sysc_tif)
|
2005-04-16 22:20:36 +00:00
|
|
|
la %r12,__LC_RETURN_PSW
|
|
|
|
br %r14
|
|
|
|
|
2010-05-17 08:00:02 +00:00
|
|
|
cleanup_sysc_restore:
|
|
|
|
clc 4(4,%r12),BASED(cleanup_sysc_restore_insn)
|
2005-09-03 22:57:56 +00:00
|
|
|
be BASED(2f)
|
2010-05-17 08:00:03 +00:00
|
|
|
mvc __LC_EXIT_TIMER(8),__LC_MCCK_ENTER_TIMER
|
|
|
|
c %r12,BASED(.Lmck_old_psw)
|
|
|
|
be BASED(0f)
|
2005-04-16 22:20:36 +00:00
|
|
|
mvc __LC_EXIT_TIMER(8),__LC_ASYNC_ENTER_TIMER
|
2010-05-17 08:00:03 +00:00
|
|
|
0: clc 4(4,%r12),BASED(cleanup_sysc_restore_insn+4)
|
2005-09-03 22:57:56 +00:00
|
|
|
be BASED(2f)
|
2005-04-16 22:20:36 +00:00
|
|
|
mvc __LC_RETURN_PSW(8),SP_PSW(%r15)
|
2005-09-03 22:57:56 +00:00
|
|
|
c %r12,BASED(.Lmck_old_psw)
|
2010-05-17 08:00:03 +00:00
|
|
|
la %r12,__LC_SAVE_AREA+32
|
|
|
|
be BASED(1f)
|
|
|
|
la %r12,__LC_SAVE_AREA+16
|
|
|
|
1: mvc 0(16,%r12),SP_R12(%r15)
|
|
|
|
lm %r0,%r11,SP_R0(%r15)
|
2005-04-16 22:20:36 +00:00
|
|
|
l %r15,SP_R15(%r15)
|
2005-09-03 22:57:56 +00:00
|
|
|
2: la %r12,__LC_RETURN_PSW
|
2005-04-16 22:20:36 +00:00
|
|
|
br %r14
|
2010-05-17 08:00:02 +00:00
|
|
|
cleanup_sysc_restore_insn:
|
2007-11-20 10:13:32 +00:00
|
|
|
.long sysc_done - 4 + 0x80000000
|
|
|
|
.long sysc_done - 8 + 0x80000000
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2010-05-17 08:00:02 +00:00
|
|
|
cleanup_io_tif:
|
2010-04-09 11:43:00 +00:00
|
|
|
mvc __LC_RETURN_PSW(4),0(%r12)
|
2010-05-17 08:00:02 +00:00
|
|
|
mvc __LC_RETURN_PSW+4(4),BASED(cleanup_table_io_tif)
|
2010-04-09 11:43:00 +00:00
|
|
|
la %r12,__LC_RETURN_PSW
|
|
|
|
br %r14
|
|
|
|
|
2010-05-17 08:00:02 +00:00
|
|
|
cleanup_io_restore:
|
|
|
|
clc 4(4,%r12),BASED(cleanup_io_restore_insn)
|
2010-05-17 08:00:03 +00:00
|
|
|
be BASED(1f)
|
|
|
|
mvc __LC_EXIT_TIMER(8),__LC_MCCK_ENTER_TIMER
|
2010-05-17 08:00:02 +00:00
|
|
|
clc 4(4,%r12),BASED(cleanup_io_restore_insn+4)
|
2010-05-17 08:00:03 +00:00
|
|
|
be BASED(1f)
|
2005-09-03 22:57:56 +00:00
|
|
|
mvc __LC_RETURN_PSW(8),SP_PSW(%r15)
|
|
|
|
mvc __LC_SAVE_AREA+32(16),SP_R12(%r15)
|
2010-05-17 08:00:03 +00:00
|
|
|
lm %r0,%r11,SP_R0(%r15)
|
2005-09-03 22:57:56 +00:00
|
|
|
l %r15,SP_R15(%r15)
|
2010-05-17 08:00:03 +00:00
|
|
|
1: la %r12,__LC_RETURN_PSW
|
2005-09-03 22:57:56 +00:00
|
|
|
br %r14
|
2010-05-17 08:00:02 +00:00
|
|
|
cleanup_io_restore_insn:
|
2007-11-20 10:13:32 +00:00
|
|
|
.long io_done - 4 + 0x80000000
|
|
|
|
.long io_done - 8 + 0x80000000
|
2005-09-03 22:57:56 +00:00
|
|
|
|
2005-04-16 22:20:36 +00:00
|
|
|
/*
|
|
|
|
* Integer constants
|
|
|
|
*/
|
2006-09-28 14:56:37 +00:00
|
|
|
.align 4
|
|
|
|
.Lc_spsize: .long SP_SIZE
|
|
|
|
.Lc_overhead: .long STACK_FRAME_OVERHEAD
|
|
|
|
.Lnr_syscalls: .long NR_syscalls
|
|
|
|
.L0x018: .short 0x018
|
|
|
|
.L0x020: .short 0x020
|
|
|
|
.L0x028: .short 0x028
|
|
|
|
.L0x030: .short 0x030
|
|
|
|
.L0x038: .short 0x038
|
|
|
|
.Lc_1: .long 1
|
2005-04-16 22:20:36 +00:00
|
|
|
|
|
|
|
/*
|
|
|
|
* Symbol constants
|
|
|
|
*/
|
2006-09-28 14:56:37 +00:00
|
|
|
.Ls390_mcck: .long s390_do_machine_check
|
2005-06-25 21:55:30 +00:00
|
|
|
.Ls390_handle_mcck:
|
2006-09-28 14:56:37 +00:00
|
|
|
.long s390_handle_mcck
|
|
|
|
.Lmck_old_psw: .long __LC_MCK_OLD_PSW
|
|
|
|
.Ldo_IRQ: .long do_IRQ
|
|
|
|
.Ldo_extint: .long do_extint
|
|
|
|
.Ldo_signal: .long do_signal
|
2008-10-10 19:33:20 +00:00
|
|
|
.Ldo_notify_resume:
|
|
|
|
.long do_notify_resume
|
2011-01-05 11:48:10 +00:00
|
|
|
.Lhandle_per: .long do_per_trap
|
2007-04-27 14:01:40 +00:00
|
|
|
.Ldo_execve: .long do_execve
|
|
|
|
.Lexecve_tail: .long execve_tail
|
2006-09-28 14:56:37 +00:00
|
|
|
.Ljump_table: .long pgm_check_table
|
|
|
|
.Lschedule: .long schedule
|
2007-12-04 15:09:04 +00:00
|
|
|
#ifdef CONFIG_PREEMPT
|
2007-11-20 10:13:35 +00:00
|
|
|
.Lpreempt_schedule_irq:
|
|
|
|
.long preempt_schedule_irq
|
2007-12-04 15:09:04 +00:00
|
|
|
#endif
|
2008-10-10 19:33:20 +00:00
|
|
|
.Ltrace_entry: .long do_syscall_trace_enter
|
|
|
|
.Ltrace_exit: .long do_syscall_trace_exit
|
2006-09-28 14:56:37 +00:00
|
|
|
.Lschedtail: .long schedule_tail
|
|
|
|
.Lsysc_table: .long sys_call_table
|
2006-07-03 07:24:46 +00:00
|
|
|
#ifdef CONFIG_TRACE_IRQFLAGS
|
2008-11-14 17:18:05 +00:00
|
|
|
.Ltrace_irq_on_caller:
|
|
|
|
.long trace_hardirqs_on_caller
|
|
|
|
.Ltrace_irq_off_caller:
|
|
|
|
.long trace_hardirqs_off_caller
|
2008-11-14 17:18:03 +00:00
|
|
|
#endif
|
|
|
|
#ifdef CONFIG_LOCKDEP
|
2007-10-11 20:11:12 +00:00
|
|
|
.Llockdep_sys_exit:
|
|
|
|
.long lockdep_sys_exit
|
2006-07-03 07:24:46 +00:00
|
|
|
#endif
|
2005-04-16 22:20:36 +00:00
|
|
|
.Lcritical_start:
|
2006-09-28 14:56:37 +00:00
|
|
|
.long __critical_start + 0x80000000
|
2005-04-16 22:20:36 +00:00
|
|
|
.Lcritical_end:
|
2006-09-28 14:56:37 +00:00
|
|
|
.long __critical_end + 0x80000000
|
2005-04-16 22:20:36 +00:00
|
|
|
.Lcleanup_critical:
|
2006-09-28 14:56:37 +00:00
|
|
|
.long cleanup_critical
|
2005-04-16 22:20:36 +00:00
|
|
|
|
2006-09-28 14:56:37 +00:00
|
|
|
.section .rodata, "a"
|
2005-04-16 22:20:36 +00:00
|
|
|
#define SYSCALL(esa,esame,emu) .long esa
|
2009-06-12 08:26:47 +00:00
|
|
|
.globl sys_call_table
|
2005-04-16 22:20:36 +00:00
|
|
|
sys_call_table:
|
|
|
|
#include "syscalls.S"
|
|
|
|
#undef SYSCALL
|