1 /* SPDX-License-Identifier: GPL-2.0-or-later *
2 /*
3 * HPMC (High Priority Machine Check) handler.
4 *
5 * Copyright (C) 1999 Philipp Rumpf <prumpf@tux
6 * Copyright (C) 1999 Hewlett-Packard (Frank R
7 * Copyright (C) 2000 Hewlett-Packard (John Ma
8 */
9
10
11 /*
12 * This HPMC handler retrieves the HPMC pim da
13 * returns to the default trap handler with co
14 * The default trap handler calls handle inter
15 * does a stack and register dump. This at lea
16 * developers to get back to C code in virtual
17 * have the option to examine and print values
18 * would help in debugging an HPMC caused by a
19 *
20 * There is more to do here:
21 *
22 * 1) On MP systems we need to synchroniz
23 * before calling pdc/iodc.
24 * 2) We should be checking the system st
25 * returning to the fault handler if t
26 * bad.
27 *
28 */
29
30 .level 1.1
31
32 #include <asm/assembly.h>
33 #include <asm/pdc.h>
34 #include <asm/psw.h>
35
36 #include <linux/linkage.h>
37 #include <linux/init.h>
38
39 /*
40 * stack for os_hpmc, the HPMC handler
41 * buffer for IODC procedures (for the
42 *
43 * IODC requires 7K byte stack. That
44 */
45
46 .import toc_stack,data
47 #define hpmc_stack toc_stack /* re-
48
49 #define HPMC_IODC_BUF_SIZE 0x8000
50
51 __PAGE_ALIGNED_BSS
52 .align 4096
53 hpmc_iodc_buf:
54 .block HPMC_IODC_BUF_SIZE
55
56 .section .bss
57 .align 8
58 hpmc_raddr:
59 .block 128
60
61 #define HPMC_PIM_DATA_SIZE 896 /* Enough to ho
62
63 .section .bss
64 .align 8
65 ENTRY(hpmc_pim_data)
66 .block HPMC_PIM_DATA_SIZE
67 END(hpmc_pim_data)
68
69 .text
70
71 .import intr_save, code
72 .align 16
73 ENTRY(os_hpmc)
74 .os_hpmc:
75
76 /*
77 * registers modified:
78 *
79 * Using callee saves registers with
80 * original values are in the pim du
81 *
82 * r2 (rp) return pointer
83 * r3 address of PDCE_PROC
84 * r4 scratch
85 * r5 scratch
86 * r23 (arg3) procedure arg
87 * r24 (arg2) procedure arg
88 * r25 (arg1) procedure arg
89 * r26 (arg0) procedure arg
90 * r30 (sp) stack pointer
91 *
92 * registers read:
93 *
94 * r26 contains address of PDCE_PRO
95 * r28 (ret0) return value from pro
96 */
97
98 copy arg0, %r3 /* save addres
99
100 /*
101 * disable nested HPMCs
102 *
103 * Increment os_hpmc checksum to inval
104 * Do this before turning the PSW M bi
105 */
106
107 mfctl %cr14, %r4
108 ldw 52(%r4),%r5
109 addi 1,%r5,%r5
110 stw %r5,52(%r4)
111
112 /* MP_FIXME: synchronize all processor
113
114 /* Setup stack pointer. */
115
116 load32 PA(hpmc_stack),sp
117
118 ldo 128(sp),sp /* leave room for a
119
120 /*
121 * Most PDC routines require that the
122 * So turn on the Q bit and turn off t
123 */
124
125 ldi PSW_SM_Q,%r4
126 mtctl %r4,ipsw
127 mtctl %r0,pcsq
128 mtctl %r0,pcsq
129 load32 PA(os_hpmc_1),%r4
130 mtctl %r4,pcoq
131 ldo 4(%r4),%r4
132 mtctl %r4,pcoq
133 rfi
134 nop
135
136 os_hpmc_1:
137
138 /* Call PDC_PIM to get HPMC pim info *
139
140 /*
141 * Note that on some newer boxes, PDC_
142 * before PDC_IO if you want IO to be
143 * a flag that PDC_IO examines.
144 */
145
146 ldo PDC_PIM(%r0), arg0
147 ldo PDC_PIM_HPMC(%r0),arg1
148 load32 PA(hpmc_raddr),arg2
149 load32 PA(hpmc_pim_data),arg3
150 load32 HPMC_PIM_DATA_SIZE,%r4
151 stw %r4,-52(sp)
152
153 ldil L%PA(os_hpmc_2), rp
154 bv (r3)
155 ldo R%PA(os_hpmc_2)(rp), rp
156
157 os_hpmc_2:
158 comib,<> 0,ret0, os_hpmc_fail
159
160 /* Reset IO by calling the hversion de
161
162 ldo PDC_IO(%r0),arg0
163 ldo 0(%r0),arg1
164 ldo 0(%r0),arg2
165 ldo 0(%r0),arg3
166 stw %r0,-52(sp)
167
168 ldil L%PA(os_hpmc_3),rp
169 bv (%r3)
170 ldo R%PA(os_hpmc_3)(rp),rp
171
172 os_hpmc_3:
173
174 /* FIXME? Check for errors from PDC_IO
175
176 /*
177 * Initialize the IODC console device
178 * are stored on page 0.
179 */
180
181 /*
182 * Load IODC into hpmc_iodc_buf by cal
183 * Note that PDC_IODC handles flushing
184 * data and instruction cache lines.
185 */
186
187 ldo PDC_IODC(%r0),arg0
188 ldo PDC_IODC_READ(%r0),arg1
189 load32 PA(hpmc_raddr),arg2
190 ldw BOOT_CONSOLE_HPA_OFFSET(%r0),a
191 ldo PDC_IODC_RI_INIT(%r0),%r4
192 stw %r4,-52(sp)
193 load32 PA(hpmc_iodc_buf),%r4
194 stw %r4,-56(sp)
195 load32 HPMC_IODC_BUF_SIZE,%r4
196 stw %r4,-60(sp)
197
198 ldil L%PA(os_hpmc_4),rp
199 bv (%r3)
200 ldo R%PA(os_hpmc_4)(rp),rp
201
202 os_hpmc_4:
203 comib,<> 0,ret0,os_hpmc_fail
204
205 /* Call the entry init (just loaded by
206
207 ldw BOOT_CONSOLE_HPA_OFFSET(%r0),a
208 ldo ENTRY_INIT_MOD_DEV(%r0), arg1
209 ldw BOOT_CONSOLE_SPA_OFFSET(%r0),a
210 depi 0,31,11,arg2
211 ldo BOOT_CONSOLE_PATH_OFFSET(%r0),
212 load32 PA(hpmc_raddr),%r4
213 stw %r4, -52(sp)
214 stw %r0, -56(sp)
215 stw %r0, -60(sp)
216 stw %r0, -64(sp)
217 stw %r0, -68(sp)
218
219 load32 PA(hpmc_iodc_buf),%r5
220 ldil L%PA(os_hpmc_5),rp
221 bv (%r5)
222 ldo R%PA(os_hpmc_5)(rp),rp
223
224 os_hpmc_5:
225 comib,<> 0,ret0,os_hpmc_fail
226
227 /* Prepare to call intr_save */
228
229 /*
230 * Load kernel page directory (load in
231 * we don't intend to ever return to u
232 */
233
234 load32 PA(swapper_pg_dir),%r4
235 mtctl %r4,%cr24 /* Ini
236 mtctl %r4,%cr25 /* Ini
237
238 /* Clear sr4-sr7 */
239
240 mtsp %r0, %sr4
241 mtsp %r0, %sr5
242 mtsp %r0, %sr6
243 mtsp %r0, %sr7
244
245 tovirt_r1 %r30 /* make sp virtual
246
247 rsm PSW_SM_Q,%r0 /* Clea
248 ldi 1,%r8 /* Set trap code t
249 load32 PA(intr_save),%r1
250 be 0(%sr7,%r1)
251 nop
252
253 os_hpmc_fail:
254
255 /*
256 * Reset the system
257 *
258 * Some systems may lockup from a broa
259 * hversion PDC_BROADCAST_RESET() firs
260 * MP_FIXME: reset all processors if m
261 */
262
263 /* PDC_BROADCAST_RESET() */
264
265 ldo PDC_BROADCAST_RESET(%r0),arg0
266 ldo 0(%r0),arg1
267
268 ldil L%PA(os_hpmc_6),rp
269 bv (%r3)
270 ldo R%PA(os_hpmc_6)(rp),rp
271
272 os_hpmc_6:
273
274 /*
275 * possible return values:
276 * -1 non-existent procedure
277 * -2 non-existent option
278 * -16 unaligned stack
279 *
280 * If call returned, do a broadcast re
281 */
282
283 ldil L%0xfffc0000,%r4 /* IO_
284 ldo 5(%r0),%r5
285 stw %r5,48(%r4) /* CM
286
287 b .
288 nop
289 .align 16 /* make function lengt
Linux® is a registered trademark of Linus Torvalds in the United States and other countries.
TOMOYO® is a registered trademark of NTT DATA CORPORATION.