2007-02-05 23:18:37 +03:00
|
|
|
/*
|
|
|
|
* arch/s390/kernel/base.S
|
|
|
|
*
|
2012-07-20 13:15:04 +04:00
|
|
|
* Copyright IBM Corp. 2006, 2007
|
2007-02-05 23:18:37 +03:00
|
|
|
* Author(s): Heiko Carstens <heiko.carstens@de.ibm.com>
|
|
|
|
* Michael Holzheu <holzheu@de.ibm.com>
|
|
|
|
*/
|
|
|
|
|
2011-07-24 12:48:19 +04:00
|
|
|
#include <linux/linkage.h>
|
2010-02-27 00:37:43 +03:00
|
|
|
#include <asm/asm-offsets.h>
|
2007-02-05 23:18:37 +03:00
|
|
|
#include <asm/ptrace.h>
|
2012-06-04 17:05:43 +04:00
|
|
|
#include <asm/sigp.h>
|
2007-02-05 23:18:37 +03:00
|
|
|
|
2011-07-24 12:48:19 +04:00
|
|
|
ENTRY(s390_base_mcck_handler)
|
2007-02-05 23:18:37 +03:00
|
|
|
basr %r13,0
|
|
|
|
0: lg %r15,__LC_PANIC_STACK # load panic stack
|
|
|
|
aghi %r15,-STACK_FRAME_OVERHEAD
|
|
|
|
larl %r1,s390_base_mcck_handler_fn
|
|
|
|
lg %r1,0(%r1)
|
|
|
|
ltgr %r1,%r1
|
|
|
|
jz 1f
|
|
|
|
basr %r14,%r1
|
|
|
|
1: la %r1,4095
|
|
|
|
lmg %r0,%r15,__LC_GPREGS_SAVE_AREA-4095(%r1)
|
|
|
|
lpswe __LC_MCK_OLD_PSW
|
|
|
|
|
|
|
|
.section .bss
|
2011-07-24 12:48:19 +04:00
|
|
|
.align 8
|
2007-02-05 23:18:37 +03:00
|
|
|
.globl s390_base_mcck_handler_fn
|
|
|
|
s390_base_mcck_handler_fn:
|
|
|
|
.quad 0
|
|
|
|
.previous
|
|
|
|
|
2011-07-24 12:48:19 +04:00
|
|
|
ENTRY(s390_base_ext_handler)
|
2011-12-27 14:27:15 +04:00
|
|
|
stmg %r0,%r15,__LC_SAVE_AREA_ASYNC
|
2007-02-05 23:18:37 +03:00
|
|
|
basr %r13,0
|
|
|
|
0: aghi %r15,-STACK_FRAME_OVERHEAD
|
|
|
|
larl %r1,s390_base_ext_handler_fn
|
|
|
|
lg %r1,0(%r1)
|
|
|
|
ltgr %r1,%r1
|
|
|
|
jz 1f
|
|
|
|
basr %r14,%r1
|
2011-12-27 14:27:15 +04:00
|
|
|
1: lmg %r0,%r15,__LC_SAVE_AREA_ASYNC
|
2007-02-05 23:18:37 +03:00
|
|
|
ni __LC_EXT_OLD_PSW+1,0xfd # clear wait state bit
|
|
|
|
lpswe __LC_EXT_OLD_PSW
|
|
|
|
|
|
|
|
.section .bss
|
2011-07-24 12:48:19 +04:00
|
|
|
.align 8
|
2007-02-05 23:18:37 +03:00
|
|
|
.globl s390_base_ext_handler_fn
|
|
|
|
s390_base_ext_handler_fn:
|
|
|
|
.quad 0
|
|
|
|
.previous
|
|
|
|
|
2011-07-24 12:48:19 +04:00
|
|
|
ENTRY(s390_base_pgm_handler)
|
2011-12-27 14:27:15 +04:00
|
|
|
stmg %r0,%r15,__LC_SAVE_AREA_SYNC
|
2007-02-05 23:18:37 +03:00
|
|
|
basr %r13,0
|
|
|
|
0: aghi %r15,-STACK_FRAME_OVERHEAD
|
|
|
|
larl %r1,s390_base_pgm_handler_fn
|
|
|
|
lg %r1,0(%r1)
|
|
|
|
ltgr %r1,%r1
|
|
|
|
jz 1f
|
|
|
|
basr %r14,%r1
|
2011-12-27 14:27:15 +04:00
|
|
|
lmg %r0,%r15,__LC_SAVE_AREA_SYNC
|
2007-02-05 23:18:37 +03:00
|
|
|
lpswe __LC_PGM_OLD_PSW
|
|
|
|
1: lpswe disabled_wait_psw-0b(%r13)
|
|
|
|
|
|
|
|
.align 8
|
|
|
|
disabled_wait_psw:
|
|
|
|
.quad 0x0002000180000000,0x0000000000000000 + s390_base_pgm_handler
|
|
|
|
|
|
|
|
.section .bss
|
2011-07-24 12:48:19 +04:00
|
|
|
.align 8
|
2007-02-05 23:18:37 +03:00
|
|
|
.globl s390_base_pgm_handler_fn
|
|
|
|
s390_base_pgm_handler_fn:
|
|
|
|
.quad 0
|
|
|
|
.previous
|
|
|
|
|
2011-08-03 18:44:22 +04:00
|
|
|
#
|
|
|
|
# Calls diag 308 subcode 1 and continues execution
|
|
|
|
#
|
|
|
|
ENTRY(diag308_reset)
|
|
|
|
larl %r4,.Lctlregs # Save control registers
|
|
|
|
stctg %c0,%c15,0(%r4)
|
2015-05-26 20:05:23 +03:00
|
|
|
lg %r2,0(%r4) # Disable lowcore protection
|
|
|
|
nilh %r2,0xefff
|
|
|
|
larl %r4,.Lctlreg0
|
|
|
|
stg %r2,0(%r4)
|
|
|
|
lctlg %c0,%c0,0(%r4)
|
2011-10-30 18:16:40 +04:00
|
|
|
larl %r4,.Lfpctl # Floating point control register
|
|
|
|
stfpc 0(%r4)
|
2015-05-26 20:05:23 +03:00
|
|
|
larl %r4,.Lprefix # Save prefix register
|
|
|
|
stpx 0(%r4)
|
|
|
|
larl %r4,.Lprefix_zero # Set prefix register to 0
|
|
|
|
spx 0(%r4)
|
2012-05-21 13:30:30 +04:00
|
|
|
larl %r4,.Lcontinue_psw # Save PSW flags
|
|
|
|
epsw %r2,%r3
|
|
|
|
stm %r2,%r3,0(%r4)
|
2011-08-03 18:44:22 +04:00
|
|
|
larl %r4,.Lrestart_psw # Setup restart PSW at absolute 0
|
|
|
|
lghi %r3,0
|
|
|
|
lg %r4,0(%r4) # Save PSW
|
|
|
|
sturg %r4,%r3 # Use sturg, because of large pages
|
|
|
|
lghi %r1,1
|
2015-01-14 19:52:10 +03:00
|
|
|
lghi %r0,0
|
|
|
|
diag %r0,%r1,0x308
|
2011-08-03 18:44:22 +04:00
|
|
|
.Lrestart_part2:
|
|
|
|
lhi %r0,0 # Load r0 with zero
|
|
|
|
lhi %r1,2 # Use mode 2 = ESAME (dump)
|
2012-06-04 17:05:43 +04:00
|
|
|
sigp %r1,%r0,SIGP_SET_ARCHITECTURE # Switch to ESAME mode
|
2011-08-03 18:44:22 +04:00
|
|
|
sam64 # Switch to 64 bit addressing mode
|
|
|
|
larl %r4,.Lctlregs # Restore control registers
|
|
|
|
lctlg %c0,%c15,0(%r4)
|
2011-10-30 18:16:40 +04:00
|
|
|
larl %r4,.Lfpctl # Restore floating point ctl register
|
|
|
|
lfpc 0(%r4)
|
2015-05-26 20:05:23 +03:00
|
|
|
larl %r4,.Lprefix # Restore prefix register
|
|
|
|
spx 0(%r4)
|
2012-05-21 13:30:30 +04:00
|
|
|
larl %r4,.Lcontinue_psw # Restore PSW flags
|
|
|
|
lpswe 0(%r4)
|
|
|
|
.Lcontinue:
|
2011-08-03 18:44:22 +04:00
|
|
|
br %r14
|
|
|
|
.align 16
|
|
|
|
.Lrestart_psw:
|
|
|
|
.long 0x00080000,0x80000000 + .Lrestart_part2
|
|
|
|
|
2012-05-21 13:30:30 +04:00
|
|
|
.section .data..nosave,"aw",@progbits
|
|
|
|
.align 8
|
|
|
|
.Lcontinue_psw:
|
|
|
|
.quad 0,.Lcontinue
|
|
|
|
.previous
|
|
|
|
|
2011-08-03 18:44:22 +04:00
|
|
|
.section .bss
|
|
|
|
.align 8
|
2015-05-26 20:05:23 +03:00
|
|
|
.Lctlreg0:
|
|
|
|
.quad 0
|
2011-08-03 18:44:22 +04:00
|
|
|
.Lctlregs:
|
|
|
|
.rept 16
|
|
|
|
.quad 0
|
|
|
|
.endr
|
2011-10-30 18:16:40 +04:00
|
|
|
.Lfpctl:
|
|
|
|
.long 0
|
2015-05-26 20:05:23 +03:00
|
|
|
.Lprefix:
|
|
|
|
.long 0
|
|
|
|
.Lprefix_zero:
|
|
|
|
.long 0
|
2011-08-03 18:44:22 +04:00
|
|
|
.previous
|