diff options
Diffstat (limited to 'arch/s390/kernel/base.S')
| -rw-r--r-- | arch/s390/kernel/base.S | 150 |
1 files changed, 150 insertions, 0 deletions
diff --git a/arch/s390/kernel/base.S b/arch/s390/kernel/base.S new file mode 100644 index 000000000000..dc7e5259770f --- /dev/null +++ b/arch/s390/kernel/base.S | |||
| @@ -0,0 +1,150 @@ | |||
| 1 | /* | ||
| 2 | * arch/s390/kernel/base.S | ||
| 3 | * | ||
| 4 | * Copyright IBM Corp. 2006,2007 | ||
| 5 | * Author(s): Heiko Carstens <heiko.carstens@de.ibm.com> | ||
| 6 | * Michael Holzheu <holzheu@de.ibm.com> | ||
| 7 | */ | ||
| 8 | |||
| 9 | #include <asm/ptrace.h> | ||
| 10 | #include <asm/lowcore.h> | ||
| 11 | |||
| 12 | #ifdef CONFIG_64BIT | ||
| 13 | |||
| 14 | .globl s390_base_mcck_handler | ||
| 15 | s390_base_mcck_handler: | ||
| 16 | basr %r13,0 | ||
| 17 | 0: lg %r15,__LC_PANIC_STACK # load panic stack | ||
| 18 | aghi %r15,-STACK_FRAME_OVERHEAD | ||
| 19 | larl %r1,s390_base_mcck_handler_fn | ||
| 20 | lg %r1,0(%r1) | ||
| 21 | ltgr %r1,%r1 | ||
| 22 | jz 1f | ||
| 23 | basr %r14,%r1 | ||
| 24 | 1: la %r1,4095 | ||
| 25 | lmg %r0,%r15,__LC_GPREGS_SAVE_AREA-4095(%r1) | ||
| 26 | lpswe __LC_MCK_OLD_PSW | ||
| 27 | |||
| 28 | .section .bss | ||
| 29 | .globl s390_base_mcck_handler_fn | ||
| 30 | s390_base_mcck_handler_fn: | ||
| 31 | .quad 0 | ||
| 32 | .previous | ||
| 33 | |||
| 34 | .globl s390_base_ext_handler | ||
| 35 | s390_base_ext_handler: | ||
| 36 | stmg %r0,%r15,__LC_SAVE_AREA | ||
| 37 | basr %r13,0 | ||
| 38 | 0: aghi %r15,-STACK_FRAME_OVERHEAD | ||
| 39 | larl %r1,s390_base_ext_handler_fn | ||
| 40 | lg %r1,0(%r1) | ||
| 41 | ltgr %r1,%r1 | ||
| 42 | jz 1f | ||
| 43 | basr %r14,%r1 | ||
| 44 | 1: lmg %r0,%r15,__LC_SAVE_AREA | ||
| 45 | ni __LC_EXT_OLD_PSW+1,0xfd # clear wait state bit | ||
| 46 | lpswe __LC_EXT_OLD_PSW | ||
| 47 | |||
| 48 | .section .bss | ||
| 49 | .globl s390_base_ext_handler_fn | ||
| 50 | s390_base_ext_handler_fn: | ||
| 51 | .quad 0 | ||
| 52 | .previous | ||
| 53 | |||
| 54 | .globl s390_base_pgm_handler | ||
| 55 | s390_base_pgm_handler: | ||
| 56 | stmg %r0,%r15,__LC_SAVE_AREA | ||
| 57 | basr %r13,0 | ||
| 58 | 0: aghi %r15,-STACK_FRAME_OVERHEAD | ||
| 59 | larl %r1,s390_base_pgm_handler_fn | ||
| 60 | lg %r1,0(%r1) | ||
| 61 | ltgr %r1,%r1 | ||
| 62 | jz 1f | ||
| 63 | basr %r14,%r1 | ||
| 64 | lmg %r0,%r15,__LC_SAVE_AREA | ||
| 65 | lpswe __LC_PGM_OLD_PSW | ||
| 66 | 1: lpswe disabled_wait_psw-0b(%r13) | ||
| 67 | |||
| 68 | .align 8 | ||
| 69 | disabled_wait_psw: | ||
| 70 | .quad 0x0002000180000000,0x0000000000000000 + s390_base_pgm_handler | ||
| 71 | |||
| 72 | .section .bss | ||
| 73 | .globl s390_base_pgm_handler_fn | ||
| 74 | s390_base_pgm_handler_fn: | ||
| 75 | .quad 0 | ||
| 76 | .previous | ||
| 77 | |||
| 78 | #else /* CONFIG_64BIT */ | ||
| 79 | |||
| 80 | .globl s390_base_mcck_handler | ||
| 81 | s390_base_mcck_handler: | ||
| 82 | basr %r13,0 | ||
| 83 | 0: l %r15,__LC_PANIC_STACK # load panic stack | ||
| 84 | ahi %r15,-STACK_FRAME_OVERHEAD | ||
| 85 | l %r1,2f-0b(%r13) | ||
| 86 | l %r1,0(%r1) | ||
| 87 | ltr %r1,%r1 | ||
| 88 | jz 1f | ||
| 89 | basr %r14,%r1 | ||
| 90 | 1: lm %r0,%r15,__LC_GPREGS_SAVE_AREA | ||
| 91 | lpsw __LC_MCK_OLD_PSW | ||
| 92 | |||
| 93 | 2: .long s390_base_mcck_handler_fn | ||
| 94 | |||
| 95 | .section .bss | ||
| 96 | .globl s390_base_mcck_handler_fn | ||
| 97 | s390_base_mcck_handler_fn: | ||
| 98 | .long 0 | ||
| 99 | .previous | ||
| 100 | |||
| 101 | .globl s390_base_ext_handler | ||
| 102 | s390_base_ext_handler: | ||
| 103 | stm %r0,%r15,__LC_SAVE_AREA | ||
| 104 | basr %r13,0 | ||
| 105 | 0: ahi %r15,-STACK_FRAME_OVERHEAD | ||
| 106 | l %r1,2f-0b(%r13) | ||
| 107 | l %r1,0(%r1) | ||
| 108 | ltr %r1,%r1 | ||
| 109 | jz 1f | ||
| 110 | basr %r14,%r1 | ||
| 111 | 1: lm %r0,%r15,__LC_SAVE_AREA | ||
| 112 | ni __LC_EXT_OLD_PSW+1,0xfd # clear wait state bit | ||
| 113 | lpsw __LC_EXT_OLD_PSW | ||
| 114 | |||
| 115 | 2: .long s390_base_ext_handler_fn | ||
| 116 | |||
| 117 | .section .bss | ||
| 118 | .globl s390_base_ext_handler_fn | ||
| 119 | s390_base_ext_handler_fn: | ||
| 120 | .long 0 | ||
| 121 | .previous | ||
| 122 | |||
| 123 | .globl s390_base_pgm_handler | ||
| 124 | s390_base_pgm_handler: | ||
| 125 | stm %r0,%r15,__LC_SAVE_AREA | ||
| 126 | basr %r13,0 | ||
| 127 | 0: ahi %r15,-STACK_FRAME_OVERHEAD | ||
| 128 | l %r1,2f-0b(%r13) | ||
| 129 | l %r1,0(%r1) | ||
| 130 | ltr %r1,%r1 | ||
| 131 | jz 1f | ||
| 132 | basr %r14,%r1 | ||
| 133 | lm %r0,%r15,__LC_SAVE_AREA | ||
| 134 | lpsw __LC_PGM_OLD_PSW | ||
| 135 | |||
| 136 | 1: lpsw disabled_wait_psw-0b(%r13) | ||
| 137 | |||
| 138 | 2: .long s390_base_pgm_handler_fn | ||
| 139 | |||
| 140 | disabled_wait_psw: | ||
| 141 | .align 8 | ||
| 142 | .long 0x000a0000,0x00000000 + s390_base_pgm_handler | ||
| 143 | |||
| 144 | .section .bss | ||
| 145 | .globl s390_base_pgm_handler_fn | ||
| 146 | s390_base_pgm_handler_fn: | ||
| 147 | .long 0 | ||
| 148 | .previous | ||
| 149 | |||
| 150 | #endif /* CONFIG_64BIT */ | ||