1 // SPDX-License-Identifier: GPL-2.0
2 /*
3 * ipl/reipl/dump support for Linux on s390.
4 *
5 * Copyright IBM Corp. 2005, 2012
6 * Author(s): Michael Holzheu <holzheu@de.ibm.com>
7 * Volker Sameske <sameske@de.ibm.com>
8 */
9
10 #include <linux/types.h>
11 #include <linux/export.h>
12 #include <linux/init.h>
13 #include <linux/device.h>
14 #include <linux/delay.h>
15 #include <linux/kstrtox.h>
16 #include <linux/panic_notifier.h>
17 #include <linux/reboot.h>
18 #include <linux/ctype.h>
19 #include <linux/fs.h>
20 #include <linux/gfp.h>
21 #include <linux/crash_dump.h>
22 #include <linux/debug_locks.h>
23 #include <linux/vmalloc.h>
24 #include <asm/asm-extable.h>
25 #include <asm/machine.h>
26 #include <asm/diag.h>
27 #include <asm/ipl.h>
28 #include <asm/smp.h>
29 #include <asm/setup.h>
30 #include <asm/cpcmd.h>
31 #include <asm/ebcdic.h>
32 #include <asm/sclp.h>
33 #include <asm/checksum.h>
34 #include <asm/debug.h>
35 #include <asm/abs_lowcore.h>
36 #include <asm/os_info.h>
37 #include <asm/sections.h>
38 #include <asm/boot_data.h>
39 #include "entry.h"
40
41 #define IPL_PARM_BLOCK_VERSION 0
42
43 #define IPL_UNKNOWN_STR "unknown"
44 #define IPL_CCW_STR "ccw"
45 #define IPL_ECKD_STR "eckd"
46 #define IPL_ECKD_DUMP_STR "eckd_dump"
47 #define IPL_FCP_STR "fcp"
48 #define IPL_FCP_DUMP_STR "fcp_dump"
49 #define IPL_NVME_STR "nvme"
50 #define IPL_NVME_DUMP_STR "nvme_dump"
51 #define IPL_NSS_STR "nss"
52
53 #define DUMP_CCW_STR "ccw"
54 #define DUMP_ECKD_STR "eckd"
55 #define DUMP_FCP_STR "fcp"
56 #define DUMP_NVME_STR "nvme"
57 #define DUMP_NONE_STR "none"
58
59 /*
60 * Four shutdown trigger types are supported:
61 * - panic
62 * - halt
63 * - power off
64 * - reipl
65 * - restart
66 */
67 #define ON_PANIC_STR "on_panic"
68 #define ON_HALT_STR "on_halt"
69 #define ON_POFF_STR "on_poff"
70 #define ON_REIPL_STR "on_reboot"
71 #define ON_RESTART_STR "on_restart"
72
73 struct shutdown_action;
74 struct shutdown_trigger {
75 char *name;
76 struct shutdown_action *action;
77 };
78
79 /*
80 * The following shutdown action types are supported:
81 */
82 #define SHUTDOWN_ACTION_IPL_STR "ipl"
83 #define SHUTDOWN_ACTION_REIPL_STR "reipl"
84 #define SHUTDOWN_ACTION_DUMP_STR "dump"
85 #define SHUTDOWN_ACTION_VMCMD_STR "vmcmd"
86 #define SHUTDOWN_ACTION_STOP_STR "stop"
87 #define SHUTDOWN_ACTION_DUMP_REIPL_STR "dump_reipl"
88
89 struct shutdown_action {
90 char *name;
91 void (*fn) (struct shutdown_trigger *trigger);
92 int (*init) (void);
93 int init_rc;
94 };
95
ipl_type_str(enum ipl_type type)96 static char *ipl_type_str(enum ipl_type type)
97 {
98 switch (type) {
99 case IPL_TYPE_CCW:
100 return IPL_CCW_STR;
101 case IPL_TYPE_ECKD:
102 return IPL_ECKD_STR;
103 case IPL_TYPE_ECKD_DUMP:
104 return IPL_ECKD_DUMP_STR;
105 case IPL_TYPE_FCP:
106 return IPL_FCP_STR;
107 case IPL_TYPE_FCP_DUMP:
108 return IPL_FCP_DUMP_STR;
109 case IPL_TYPE_NSS:
110 return IPL_NSS_STR;
111 case IPL_TYPE_NVME:
112 return IPL_NVME_STR;
113 case IPL_TYPE_NVME_DUMP:
114 return IPL_NVME_DUMP_STR;
115 case IPL_TYPE_UNKNOWN:
116 default:
117 return IPL_UNKNOWN_STR;
118 }
119 }
120
121 enum dump_type {
122 DUMP_TYPE_NONE = 1,
123 DUMP_TYPE_CCW = 2,
124 DUMP_TYPE_FCP = 4,
125 DUMP_TYPE_NVME = 8,
126 DUMP_TYPE_ECKD = 16,
127 };
128
dump_type_str(enum dump_type type)129 static char *dump_type_str(enum dump_type type)
130 {
131 switch (type) {
132 case DUMP_TYPE_NONE:
133 return DUMP_NONE_STR;
134 case DUMP_TYPE_CCW:
135 return DUMP_CCW_STR;
136 case DUMP_TYPE_ECKD:
137 return DUMP_ECKD_STR;
138 case DUMP_TYPE_FCP:
139 return DUMP_FCP_STR;
140 case DUMP_TYPE_NVME:
141 return DUMP_NVME_STR;
142 default:
143 return NULL;
144 }
145 }
146
147 int __bootdata_preserved(ipl_block_valid);
148 struct ipl_parameter_block __bootdata_preserved(ipl_block);
149 int __bootdata_preserved(ipl_secure_flag);
150
151 unsigned long __bootdata_preserved(ipl_cert_list_addr);
152 unsigned long __bootdata_preserved(ipl_cert_list_size);
153
154 unsigned long __bootdata(early_ipl_comp_list_addr);
155 unsigned long __bootdata(early_ipl_comp_list_size);
156
157 static int reipl_capabilities = IPL_TYPE_UNKNOWN;
158
159 static enum ipl_type reipl_type = IPL_TYPE_UNKNOWN;
160 static struct ipl_parameter_block *reipl_block_fcp;
161 static struct ipl_parameter_block *reipl_block_nvme;
162 static struct ipl_parameter_block *reipl_block_ccw;
163 static struct ipl_parameter_block *reipl_block_eckd;
164 static struct ipl_parameter_block *reipl_block_nss;
165 static struct ipl_parameter_block *reipl_block_actual;
166
167 static int dump_capabilities = DUMP_TYPE_NONE;
168 static enum dump_type dump_type = DUMP_TYPE_NONE;
169 static struct ipl_parameter_block *dump_block_fcp;
170 static struct ipl_parameter_block *dump_block_nvme;
171 static struct ipl_parameter_block *dump_block_ccw;
172 static struct ipl_parameter_block *dump_block_eckd;
173
174 static struct sclp_ipl_info sclp_ipl_info;
175
176 static bool reipl_nvme_clear;
177 static bool reipl_fcp_clear;
178 static bool reipl_ccw_clear;
179 static bool reipl_eckd_clear;
180
181 static unsigned long os_info_flags;
182
__diag308(unsigned long subcode,unsigned long addr)183 static inline int __diag308(unsigned long subcode, unsigned long addr)
184 {
185 union register_pair r1;
186
187 r1.even = addr;
188 r1.odd = 0;
189 asm_inline volatile(
190 " diag %[r1],%[subcode],0x308\n"
191 "0: nopr %%r7\n"
192 EX_TABLE(0b,0b)
193 : [r1] "+&d" (r1.pair)
194 : [subcode] "d" (subcode)
195 : "cc", "memory");
196 return r1.odd;
197 }
198
diag308(unsigned long subcode,void * addr)199 int diag308(unsigned long subcode, void *addr)
200 {
201 diag_stat_inc(DIAG_STAT_X308);
202 return __diag308(subcode, addr ? virt_to_phys(addr) : 0);
203 }
204 EXPORT_SYMBOL_GPL(diag308);
205
206 /* SYSFS */
207
208 #define IPL_ATTR_SHOW_FN(_prefix, _name, _format, args...) \
209 static ssize_t sys_##_prefix##_##_name##_show(struct kobject *kobj, \
210 struct kobj_attribute *attr, \
211 char *page) \
212 { \
213 return sysfs_emit(page, _format, ##args); \
214 }
215
216 #define IPL_ATTR_CCW_STORE_FN(_prefix, _name, _ipl_blk) \
217 static ssize_t sys_##_prefix##_##_name##_store(struct kobject *kobj, \
218 struct kobj_attribute *attr, \
219 const char *buf, size_t len) \
220 { \
221 unsigned long long ssid, devno; \
222 \
223 if (sscanf(buf, "0.%llx.%llx\n", &ssid, &devno) != 2) \
224 return -EINVAL; \
225 \
226 if (ssid > __MAX_SSID || devno > __MAX_SUBCHANNEL) \
227 return -EINVAL; \
228 \
229 _ipl_blk.ssid = ssid; \
230 _ipl_blk.devno = devno; \
231 return len; \
232 }
233
234 #define DEFINE_IPL_CCW_ATTR_RW(_prefix, _name, _ipl_blk) \
235 IPL_ATTR_SHOW_FN(_prefix, _name, "0.%x.%04x\n", \
236 _ipl_blk.ssid, _ipl_blk.devno); \
237 IPL_ATTR_CCW_STORE_FN(_prefix, _name, _ipl_blk); \
238 static struct kobj_attribute sys_##_prefix##_##_name##_attr = \
239 __ATTR(_name, 0644, \
240 sys_##_prefix##_##_name##_show, \
241 sys_##_prefix##_##_name##_store) \
242
243 #define DEFINE_IPL_ATTR_RO(_prefix, _name, _format, _value) \
244 IPL_ATTR_SHOW_FN(_prefix, _name, _format, _value) \
245 static struct kobj_attribute sys_##_prefix##_##_name##_attr = \
246 __ATTR(_name, 0444, sys_##_prefix##_##_name##_show, NULL)
247
248 #define DEFINE_IPL_ATTR_RW(_prefix, _name, _fmt_out, _fmt_in, _value) \
249 IPL_ATTR_SHOW_FN(_prefix, _name, _fmt_out, (unsigned long long) _value) \
250 static ssize_t sys_##_prefix##_##_name##_store(struct kobject *kobj, \
251 struct kobj_attribute *attr, \
252 const char *buf, size_t len) \
253 { \
254 unsigned long long value; \
255 if (sscanf(buf, _fmt_in, &value) != 1) \
256 return -EINVAL; \
257 _value = value; \
258 return len; \
259 } \
260 static struct kobj_attribute sys_##_prefix##_##_name##_attr = \
261 __ATTR(_name, 0644, \
262 sys_##_prefix##_##_name##_show, \
263 sys_##_prefix##_##_name##_store)
264
265 #define DEFINE_IPL_ATTR_STR_RW(_prefix, _name, _fmt_out, _fmt_in, _value)\
266 IPL_ATTR_SHOW_FN(_prefix, _name, _fmt_out, _value) \
267 static ssize_t sys_##_prefix##_##_name##_store(struct kobject *kobj, \
268 struct kobj_attribute *attr, \
269 const char *buf, size_t len) \
270 { \
271 if (len >= sizeof(_value)) \
272 return -E2BIG; \
273 len = strscpy(_value, buf, sizeof(_value)); \
274 if ((ssize_t)len < 0) \
275 return len; \
276 strim(_value); \
277 return len; \
278 } \
279 static struct kobj_attribute sys_##_prefix##_##_name##_attr = \
280 __ATTR(_name, 0644, \
281 sys_##_prefix##_##_name##_show, \
282 sys_##_prefix##_##_name##_store)
283
284 #define IPL_ATTR_SCP_DATA_SHOW_FN(_prefix, _ipl_block) \
285 static ssize_t sys_##_prefix##_scp_data_show(struct file *filp, \
286 struct kobject *kobj, \
287 const struct bin_attribute *attr, \
288 char *buf, loff_t off, \
289 size_t count) \
290 { \
291 size_t size = _ipl_block.scp_data_len; \
292 void *scp_data = _ipl_block.scp_data; \
293 \
294 return memory_read_from_buffer(buf, count, &off, \
295 scp_data, size); \
296 }
297
298 #define IPL_ATTR_SCP_DATA_STORE_FN(_prefix, _ipl_block_hdr, _ipl_block, _ipl_bp_len, _ipl_bp0_len)\
299 static ssize_t sys_##_prefix##_scp_data_store(struct file *filp, \
300 struct kobject *kobj, \
301 const struct bin_attribute *attr, \
302 char *buf, loff_t off, \
303 size_t count) \
304 { \
305 size_t scpdata_len = count; \
306 size_t padding; \
307 \
308 if (off) \
309 return -EINVAL; \
310 \
311 memcpy(_ipl_block.scp_data, buf, count); \
312 if (scpdata_len % 8) { \
313 padding = 8 - (scpdata_len % 8); \
314 memset(_ipl_block.scp_data + scpdata_len, \
315 0, padding); \
316 scpdata_len += padding; \
317 } \
318 \
319 _ipl_block_hdr.len = _ipl_bp_len + scpdata_len; \
320 _ipl_block.len = _ipl_bp0_len + scpdata_len; \
321 _ipl_block.scp_data_len = scpdata_len; \
322 \
323 return count; \
324 }
325
326 #define DEFINE_IPL_ATTR_SCP_DATA_RO(_prefix, _ipl_block, _size) \
327 IPL_ATTR_SCP_DATA_SHOW_FN(_prefix, _ipl_block) \
328 static const struct bin_attribute sys_##_prefix##_scp_data_attr = \
329 __BIN_ATTR(scp_data, 0444, sys_##_prefix##_scp_data_show, \
330 NULL, _size)
331
332 #define DEFINE_IPL_ATTR_SCP_DATA_RW(_prefix, _ipl_block_hdr, _ipl_block, _ipl_bp_len, _ipl_bp0_len, _size)\
333 IPL_ATTR_SCP_DATA_SHOW_FN(_prefix, _ipl_block) \
334 IPL_ATTR_SCP_DATA_STORE_FN(_prefix, _ipl_block_hdr, _ipl_block, _ipl_bp_len, _ipl_bp0_len)\
335 static const struct bin_attribute sys_##_prefix##_scp_data_attr = \
336 __BIN_ATTR(scp_data, 0644, sys_##_prefix##_scp_data_show, \
337 sys_##_prefix##_scp_data_store, _size)
338
339 /*
340 * ipl section
341 */
342
get_ipl_type(void)343 static __init enum ipl_type get_ipl_type(void)
344 {
345 if (!ipl_block_valid)
346 return IPL_TYPE_UNKNOWN;
347
348 switch (ipl_block.pb0_hdr.pbt) {
349 case IPL_PBT_CCW:
350 return IPL_TYPE_CCW;
351 case IPL_PBT_FCP:
352 if (ipl_block.fcp.opt == IPL_PB0_FCP_OPT_DUMP)
353 return IPL_TYPE_FCP_DUMP;
354 else
355 return IPL_TYPE_FCP;
356 case IPL_PBT_NVME:
357 if (ipl_block.nvme.opt == IPL_PB0_NVME_OPT_DUMP)
358 return IPL_TYPE_NVME_DUMP;
359 else
360 return IPL_TYPE_NVME;
361 case IPL_PBT_ECKD:
362 if (ipl_block.eckd.opt == IPL_PB0_ECKD_OPT_DUMP)
363 return IPL_TYPE_ECKD_DUMP;
364 else
365 return IPL_TYPE_ECKD;
366 }
367 return IPL_TYPE_UNKNOWN;
368 }
369
370 struct ipl_info ipl_info;
371 EXPORT_SYMBOL_GPL(ipl_info);
372
ipl_type_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)373 static ssize_t ipl_type_show(struct kobject *kobj, struct kobj_attribute *attr,
374 char *page)
375 {
376 return sysfs_emit(page, "%s\n", ipl_type_str(ipl_info.type));
377 }
378
379 static struct kobj_attribute sys_ipl_type_attr = __ATTR_RO(ipl_type);
380
ipl_secure_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)381 static ssize_t ipl_secure_show(struct kobject *kobj,
382 struct kobj_attribute *attr, char *page)
383 {
384 return sysfs_emit(page, "%i\n", !!ipl_secure_flag);
385 }
386
387 static struct kobj_attribute sys_ipl_secure_attr =
388 __ATTR(secure, 0444, ipl_secure_show, NULL);
389
ipl_has_secure_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)390 static ssize_t ipl_has_secure_show(struct kobject *kobj,
391 struct kobj_attribute *attr, char *page)
392 {
393 return sysfs_emit(page, "%i\n", !!sclp.has_sipl);
394 }
395
396 static struct kobj_attribute sys_ipl_has_secure_attr =
397 __ATTR(has_secure, 0444, ipl_has_secure_show, NULL);
398
ipl_vm_parm_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)399 static ssize_t ipl_vm_parm_show(struct kobject *kobj,
400 struct kobj_attribute *attr, char *page)
401 {
402 char parm[DIAG308_VMPARM_SIZE + 1] = {};
403
404 if (ipl_block_valid && (ipl_block.pb0_hdr.pbt == IPL_PBT_CCW))
405 ipl_block_get_ascii_vmparm(parm, sizeof(parm), &ipl_block);
406 return sysfs_emit(page, "%s\n", parm);
407 }
408
409 static struct kobj_attribute sys_ipl_vm_parm_attr =
410 __ATTR(parm, 0444, ipl_vm_parm_show, NULL);
411
sys_ipl_device_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)412 static ssize_t sys_ipl_device_show(struct kobject *kobj,
413 struct kobj_attribute *attr, char *page)
414 {
415 switch (ipl_info.type) {
416 case IPL_TYPE_CCW:
417 return sysfs_emit(page, "0.%x.%04x\n", ipl_block.ccw.ssid,
418 ipl_block.ccw.devno);
419 case IPL_TYPE_ECKD:
420 case IPL_TYPE_ECKD_DUMP:
421 return sysfs_emit(page, "0.%x.%04x\n", ipl_block.eckd.ssid,
422 ipl_block.eckd.devno);
423 case IPL_TYPE_FCP:
424 case IPL_TYPE_FCP_DUMP:
425 return sysfs_emit(page, "0.0.%04x\n", ipl_block.fcp.devno);
426 case IPL_TYPE_NVME:
427 case IPL_TYPE_NVME_DUMP:
428 return sysfs_emit(page, "%08ux\n", ipl_block.nvme.fid);
429 default:
430 return 0;
431 }
432 }
433
434 static struct kobj_attribute sys_ipl_device_attr =
435 __ATTR(device, 0444, sys_ipl_device_show, NULL);
436
sys_ipl_parameter_read(struct file * filp,struct kobject * kobj,const struct bin_attribute * attr,char * buf,loff_t off,size_t count)437 static ssize_t sys_ipl_parameter_read(struct file *filp, struct kobject *kobj,
438 const struct bin_attribute *attr, char *buf,
439 loff_t off, size_t count)
440 {
441 return memory_read_from_buffer(buf, count, &off, &ipl_block,
442 ipl_block.hdr.len);
443 }
444 static const struct bin_attribute sys_ipl_parameter_attr =
445 __BIN_ATTR(binary_parameter, 0444, sys_ipl_parameter_read, NULL,
446 PAGE_SIZE);
447
448 DEFINE_IPL_ATTR_SCP_DATA_RO(ipl_fcp, ipl_block.fcp, PAGE_SIZE);
449
450 static const struct bin_attribute *const ipl_fcp_bin_attrs[] = {
451 &sys_ipl_parameter_attr,
452 &sys_ipl_fcp_scp_data_attr,
453 NULL,
454 };
455
456 DEFINE_IPL_ATTR_SCP_DATA_RO(ipl_nvme, ipl_block.nvme, PAGE_SIZE);
457
458 static const struct bin_attribute *const ipl_nvme_bin_attrs[] = {
459 &sys_ipl_parameter_attr,
460 &sys_ipl_nvme_scp_data_attr,
461 NULL,
462 };
463
464 DEFINE_IPL_ATTR_SCP_DATA_RO(ipl_eckd, ipl_block.eckd, PAGE_SIZE);
465
466 static const struct bin_attribute *const ipl_eckd_bin_attrs[] = {
467 &sys_ipl_parameter_attr,
468 &sys_ipl_eckd_scp_data_attr,
469 NULL,
470 };
471
472 /* FCP ipl device attributes */
473
474 DEFINE_IPL_ATTR_RO(ipl_fcp, wwpn, "0x%016llx\n",
475 (unsigned long long)ipl_block.fcp.wwpn);
476 DEFINE_IPL_ATTR_RO(ipl_fcp, lun, "0x%016llx\n",
477 (unsigned long long)ipl_block.fcp.lun);
478 DEFINE_IPL_ATTR_RO(ipl_fcp, bootprog, "%lld\n",
479 (unsigned long long)ipl_block.fcp.bootprog);
480 DEFINE_IPL_ATTR_RO(ipl_fcp, br_lba, "%lld\n",
481 (unsigned long long)ipl_block.fcp.br_lba);
482
483 /* NVMe ipl device attributes */
484 DEFINE_IPL_ATTR_RO(ipl_nvme, fid, "0x%08llx\n",
485 (unsigned long long)ipl_block.nvme.fid);
486 DEFINE_IPL_ATTR_RO(ipl_nvme, nsid, "0x%08llx\n",
487 (unsigned long long)ipl_block.nvme.nsid);
488 DEFINE_IPL_ATTR_RO(ipl_nvme, bootprog, "%lld\n",
489 (unsigned long long)ipl_block.nvme.bootprog);
490 DEFINE_IPL_ATTR_RO(ipl_nvme, br_lba, "%lld\n",
491 (unsigned long long)ipl_block.nvme.br_lba);
492
493 /* ECKD ipl device attributes */
494 DEFINE_IPL_ATTR_RO(ipl_eckd, bootprog, "%lld\n",
495 (unsigned long long)ipl_block.eckd.bootprog);
496
497 #define IPL_ATTR_BR_CHR_SHOW_FN(_name, _ipb) \
498 static ssize_t eckd_##_name##_br_chr_show(struct kobject *kobj, \
499 struct kobj_attribute *attr, \
500 char *buf) \
501 { \
502 struct ipl_pb0_eckd *ipb = &(_ipb); \
503 \
504 if (!ipb->br_chr.cyl && \
505 !ipb->br_chr.head && \
506 !ipb->br_chr.record) \
507 return sysfs_emit(buf, "auto\n"); \
508 \
509 return sysfs_emit(buf, "0x%x,0x%x,0x%x\n", \
510 ipb->br_chr.cyl, \
511 ipb->br_chr.head, \
512 ipb->br_chr.record); \
513 }
514
515 #define IPL_ATTR_BR_CHR_STORE_FN(_name, _ipb) \
516 static ssize_t eckd_##_name##_br_chr_store(struct kobject *kobj, \
517 struct kobj_attribute *attr, \
518 const char *buf, size_t len) \
519 { \
520 struct ipl_pb0_eckd *ipb = &(_ipb); \
521 unsigned long args[3] = { 0 }; \
522 char *p, *p1, *tmp = NULL; \
523 int i, rc; \
524 \
525 if (!strncmp(buf, "auto", 4)) \
526 goto out; \
527 \
528 tmp = kstrdup(buf, GFP_KERNEL); \
529 p = tmp; \
530 for (i = 0; i < 3; i++) { \
531 p1 = strsep(&p, ", "); \
532 if (!p1) { \
533 rc = -EINVAL; \
534 goto err; \
535 } \
536 rc = kstrtoul(p1, 0, args + i); \
537 if (rc) \
538 goto err; \
539 } \
540 \
541 rc = -EINVAL; \
542 if (i != 3) \
543 goto err; \
544 \
545 if ((args[0] || args[1]) && !args[2]) \
546 goto err; \
547 \
548 if (args[0] > UINT_MAX || args[1] > 255 || args[2] > 255) \
549 goto err; \
550 \
551 out: \
552 ipb->br_chr.cyl = args[0]; \
553 ipb->br_chr.head = args[1]; \
554 ipb->br_chr.record = args[2]; \
555 rc = len; \
556 err: \
557 kfree(tmp); \
558 return rc; \
559 }
560
561 IPL_ATTR_BR_CHR_SHOW_FN(ipl, ipl_block.eckd);
562 static struct kobj_attribute sys_ipl_eckd_br_chr_attr =
563 __ATTR(br_chr, 0644, eckd_ipl_br_chr_show, NULL);
564
565 IPL_ATTR_BR_CHR_SHOW_FN(reipl, reipl_block_eckd->eckd);
566 IPL_ATTR_BR_CHR_STORE_FN(reipl, reipl_block_eckd->eckd);
567
568 static struct kobj_attribute sys_reipl_eckd_br_chr_attr =
569 __ATTR(br_chr, 0644, eckd_reipl_br_chr_show, eckd_reipl_br_chr_store);
570
ipl_ccw_loadparm_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)571 static ssize_t ipl_ccw_loadparm_show(struct kobject *kobj,
572 struct kobj_attribute *attr, char *page)
573 {
574 char loadparm[LOADPARM_LEN + 1] = {};
575
576 if (!sclp_ipl_info.is_valid)
577 return sysfs_emit(page, "#unknown#\n");
578 memcpy(loadparm, &sclp_ipl_info.loadparm, LOADPARM_LEN);
579 EBCASC(loadparm, LOADPARM_LEN);
580 strim(loadparm);
581 return sysfs_emit(page, "%s\n", loadparm);
582 }
583
584 static struct kobj_attribute sys_ipl_ccw_loadparm_attr =
585 __ATTR(loadparm, 0444, ipl_ccw_loadparm_show, NULL);
586
587 static struct attribute *ipl_fcp_attrs[] = {
588 &sys_ipl_device_attr.attr,
589 &sys_ipl_fcp_wwpn_attr.attr,
590 &sys_ipl_fcp_lun_attr.attr,
591 &sys_ipl_fcp_bootprog_attr.attr,
592 &sys_ipl_fcp_br_lba_attr.attr,
593 &sys_ipl_ccw_loadparm_attr.attr,
594 NULL,
595 };
596
597 static const struct attribute_group ipl_fcp_attr_group = {
598 .attrs = ipl_fcp_attrs,
599 .bin_attrs_new = ipl_fcp_bin_attrs,
600 };
601
602 static struct attribute *ipl_nvme_attrs[] = {
603 &sys_ipl_nvme_fid_attr.attr,
604 &sys_ipl_nvme_nsid_attr.attr,
605 &sys_ipl_nvme_bootprog_attr.attr,
606 &sys_ipl_nvme_br_lba_attr.attr,
607 &sys_ipl_ccw_loadparm_attr.attr,
608 NULL,
609 };
610
611 static const struct attribute_group ipl_nvme_attr_group = {
612 .attrs = ipl_nvme_attrs,
613 .bin_attrs_new = ipl_nvme_bin_attrs,
614 };
615
616 static struct attribute *ipl_eckd_attrs[] = {
617 &sys_ipl_eckd_bootprog_attr.attr,
618 &sys_ipl_eckd_br_chr_attr.attr,
619 &sys_ipl_ccw_loadparm_attr.attr,
620 &sys_ipl_device_attr.attr,
621 NULL,
622 };
623
624 static const struct attribute_group ipl_eckd_attr_group = {
625 .attrs = ipl_eckd_attrs,
626 .bin_attrs_new = ipl_eckd_bin_attrs,
627 };
628
629 /* CCW ipl device attributes */
630
631 static struct attribute *ipl_ccw_attrs_vm[] = {
632 &sys_ipl_device_attr.attr,
633 &sys_ipl_ccw_loadparm_attr.attr,
634 &sys_ipl_vm_parm_attr.attr,
635 NULL,
636 };
637
638 static struct attribute *ipl_ccw_attrs_lpar[] = {
639 &sys_ipl_device_attr.attr,
640 &sys_ipl_ccw_loadparm_attr.attr,
641 NULL,
642 };
643
644 static const struct attribute_group ipl_ccw_attr_group_vm = {
645 .attrs = ipl_ccw_attrs_vm,
646 };
647
648 static const struct attribute_group ipl_ccw_attr_group_lpar = {
649 .attrs = ipl_ccw_attrs_lpar
650 };
651
652 static struct attribute *ipl_common_attrs[] = {
653 &sys_ipl_type_attr.attr,
654 &sys_ipl_secure_attr.attr,
655 &sys_ipl_has_secure_attr.attr,
656 NULL,
657 };
658
659 static const struct attribute_group ipl_common_attr_group = {
660 .attrs = ipl_common_attrs,
661 };
662
663 static struct kset *ipl_kset;
664
__ipl_run(void * unused)665 static void __ipl_run(void *unused)
666 {
667 diag308(DIAG308_LOAD_CLEAR, NULL);
668 }
669
ipl_run(struct shutdown_trigger * trigger)670 static void ipl_run(struct shutdown_trigger *trigger)
671 {
672 smp_call_ipl_cpu(__ipl_run, NULL);
673 }
674
ipl_init(void)675 static int __init ipl_init(void)
676 {
677 int rc;
678
679 ipl_kset = kset_create_and_add("ipl", NULL, firmware_kobj);
680 if (!ipl_kset) {
681 rc = -ENOMEM;
682 goto out;
683 }
684 rc = sysfs_create_group(&ipl_kset->kobj, &ipl_common_attr_group);
685 if (rc)
686 goto out;
687 switch (ipl_info.type) {
688 case IPL_TYPE_CCW:
689 if (machine_is_vm())
690 rc = sysfs_create_group(&ipl_kset->kobj,
691 &ipl_ccw_attr_group_vm);
692 else
693 rc = sysfs_create_group(&ipl_kset->kobj,
694 &ipl_ccw_attr_group_lpar);
695 break;
696 case IPL_TYPE_ECKD:
697 case IPL_TYPE_ECKD_DUMP:
698 rc = sysfs_create_group(&ipl_kset->kobj, &ipl_eckd_attr_group);
699 break;
700 case IPL_TYPE_FCP:
701 case IPL_TYPE_FCP_DUMP:
702 rc = sysfs_create_group(&ipl_kset->kobj, &ipl_fcp_attr_group);
703 break;
704 case IPL_TYPE_NVME:
705 case IPL_TYPE_NVME_DUMP:
706 rc = sysfs_create_group(&ipl_kset->kobj, &ipl_nvme_attr_group);
707 break;
708 default:
709 break;
710 }
711 out:
712 if (rc)
713 panic("ipl_init failed: rc = %i\n", rc);
714
715 return 0;
716 }
717
718 static struct shutdown_action __refdata ipl_action = {
719 .name = SHUTDOWN_ACTION_IPL_STR,
720 .fn = ipl_run,
721 .init = ipl_init,
722 };
723
724 /*
725 * reipl shutdown action: Reboot Linux on shutdown.
726 */
727
728 /* VM IPL PARM attributes */
reipl_generic_vmparm_show(struct ipl_parameter_block * ipb,char * page)729 static ssize_t reipl_generic_vmparm_show(struct ipl_parameter_block *ipb,
730 char *page)
731 {
732 char vmparm[DIAG308_VMPARM_SIZE + 1] = {};
733
734 ipl_block_get_ascii_vmparm(vmparm, sizeof(vmparm), ipb);
735 return sysfs_emit(page, "%s\n", vmparm);
736 }
737
reipl_generic_vmparm_store(struct ipl_parameter_block * ipb,size_t vmparm_max,const char * buf,size_t len)738 static ssize_t reipl_generic_vmparm_store(struct ipl_parameter_block *ipb,
739 size_t vmparm_max,
740 const char *buf, size_t len)
741 {
742 int i, ip_len;
743
744 /* ignore trailing newline */
745 ip_len = len;
746 if ((len > 0) && (buf[len - 1] == '\n'))
747 ip_len--;
748
749 if (ip_len > vmparm_max)
750 return -EINVAL;
751
752 /* parm is used to store kernel options, check for common chars */
753 for (i = 0; i < ip_len; i++)
754 if (!(isalnum(buf[i]) || isascii(buf[i]) || isprint(buf[i])))
755 return -EINVAL;
756
757 memset(ipb->ccw.vm_parm, 0, DIAG308_VMPARM_SIZE);
758 ipb->ccw.vm_parm_len = ip_len;
759 if (ip_len > 0) {
760 ipb->ccw.vm_flags |= IPL_PB0_CCW_VM_FLAG_VP;
761 memcpy(ipb->ccw.vm_parm, buf, ip_len);
762 ASCEBC(ipb->ccw.vm_parm, ip_len);
763 } else {
764 ipb->ccw.vm_flags &= ~IPL_PB0_CCW_VM_FLAG_VP;
765 }
766
767 return len;
768 }
769
770 /* NSS wrapper */
reipl_nss_vmparm_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)771 static ssize_t reipl_nss_vmparm_show(struct kobject *kobj,
772 struct kobj_attribute *attr, char *page)
773 {
774 return reipl_generic_vmparm_show(reipl_block_nss, page);
775 }
776
reipl_nss_vmparm_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)777 static ssize_t reipl_nss_vmparm_store(struct kobject *kobj,
778 struct kobj_attribute *attr,
779 const char *buf, size_t len)
780 {
781 return reipl_generic_vmparm_store(reipl_block_nss, 56, buf, len);
782 }
783
784 /* CCW wrapper */
reipl_ccw_vmparm_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)785 static ssize_t reipl_ccw_vmparm_show(struct kobject *kobj,
786 struct kobj_attribute *attr, char *page)
787 {
788 return reipl_generic_vmparm_show(reipl_block_ccw, page);
789 }
790
reipl_ccw_vmparm_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)791 static ssize_t reipl_ccw_vmparm_store(struct kobject *kobj,
792 struct kobj_attribute *attr,
793 const char *buf, size_t len)
794 {
795 return reipl_generic_vmparm_store(reipl_block_ccw, 64, buf, len);
796 }
797
798 static struct kobj_attribute sys_reipl_nss_vmparm_attr =
799 __ATTR(parm, 0644, reipl_nss_vmparm_show,
800 reipl_nss_vmparm_store);
801 static struct kobj_attribute sys_reipl_ccw_vmparm_attr =
802 __ATTR(parm, 0644, reipl_ccw_vmparm_show,
803 reipl_ccw_vmparm_store);
804
805 /* FCP reipl device attributes */
806
807 DEFINE_IPL_ATTR_SCP_DATA_RW(reipl_fcp, reipl_block_fcp->hdr,
808 reipl_block_fcp->fcp,
809 IPL_BP_FCP_LEN, IPL_BP0_FCP_LEN,
810 DIAG308_SCPDATA_SIZE);
811
812 static const struct bin_attribute *const reipl_fcp_bin_attrs[] = {
813 &sys_reipl_fcp_scp_data_attr,
814 NULL,
815 };
816
817 DEFINE_IPL_ATTR_RW(reipl_fcp, wwpn, "0x%016llx\n", "%llx\n",
818 reipl_block_fcp->fcp.wwpn);
819 DEFINE_IPL_ATTR_RW(reipl_fcp, lun, "0x%016llx\n", "%llx\n",
820 reipl_block_fcp->fcp.lun);
821 DEFINE_IPL_ATTR_RW(reipl_fcp, bootprog, "%lld\n", "%lld\n",
822 reipl_block_fcp->fcp.bootprog);
823 DEFINE_IPL_ATTR_RW(reipl_fcp, br_lba, "%lld\n", "%lld\n",
824 reipl_block_fcp->fcp.br_lba);
825 DEFINE_IPL_ATTR_RW(reipl_fcp, device, "0.0.%04llx\n", "0.0.%llx\n",
826 reipl_block_fcp->fcp.devno);
827
reipl_get_ascii_loadparm(char * loadparm,struct ipl_parameter_block * ibp)828 static void reipl_get_ascii_loadparm(char *loadparm,
829 struct ipl_parameter_block *ibp)
830 {
831 memcpy(loadparm, ibp->common.loadparm, LOADPARM_LEN);
832 EBCASC(loadparm, LOADPARM_LEN);
833 loadparm[LOADPARM_LEN] = 0;
834 strim(loadparm);
835 }
836
reipl_generic_loadparm_show(struct ipl_parameter_block * ipb,char * page)837 static ssize_t reipl_generic_loadparm_show(struct ipl_parameter_block *ipb,
838 char *page)
839 {
840 char buf[LOADPARM_LEN + 1];
841
842 reipl_get_ascii_loadparm(buf, ipb);
843 return sysfs_emit(page, "%s\n", buf);
844 }
845
reipl_generic_loadparm_store(struct ipl_parameter_block * ipb,const char * buf,size_t len)846 static ssize_t reipl_generic_loadparm_store(struct ipl_parameter_block *ipb,
847 const char *buf, size_t len)
848 {
849 int i, lp_len;
850
851 /* ignore trailing newline */
852 lp_len = len;
853 if ((len > 0) && (buf[len - 1] == '\n'))
854 lp_len--;
855 /* loadparm can have max 8 characters and must not start with a blank */
856 if ((lp_len > LOADPARM_LEN) || ((lp_len > 0) && (buf[0] == ' ')))
857 return -EINVAL;
858 /* loadparm can only contain "a-z,A-Z,0-9,SP,." */
859 for (i = 0; i < lp_len; i++) {
860 if (isalpha(buf[i]) || isdigit(buf[i]) || (buf[i] == ' ') ||
861 (buf[i] == '.'))
862 continue;
863 return -EINVAL;
864 }
865 /* initialize loadparm with blanks */
866 memset(ipb->common.loadparm, ' ', LOADPARM_LEN);
867 /* copy and convert to ebcdic */
868 memcpy(ipb->common.loadparm, buf, lp_len);
869 ASCEBC(ipb->common.loadparm, LOADPARM_LEN);
870 ipb->common.flags |= IPL_PB0_FLAG_LOADPARM;
871 return len;
872 }
873
874 #define DEFINE_GENERIC_LOADPARM(name) \
875 static ssize_t reipl_##name##_loadparm_show(struct kobject *kobj, \
876 struct kobj_attribute *attr, char *page) \
877 { \
878 return reipl_generic_loadparm_show(reipl_block_##name, page); \
879 } \
880 static ssize_t reipl_##name##_loadparm_store(struct kobject *kobj, \
881 struct kobj_attribute *attr, \
882 const char *buf, size_t len) \
883 { \
884 return reipl_generic_loadparm_store(reipl_block_##name, buf, len); \
885 } \
886 static struct kobj_attribute sys_reipl_##name##_loadparm_attr = \
887 __ATTR(loadparm, 0644, reipl_##name##_loadparm_show, \
888 reipl_##name##_loadparm_store)
889
890 DEFINE_GENERIC_LOADPARM(fcp);
891 DEFINE_GENERIC_LOADPARM(nvme);
892 DEFINE_GENERIC_LOADPARM(ccw);
893 DEFINE_GENERIC_LOADPARM(nss);
894 DEFINE_GENERIC_LOADPARM(eckd);
895
reipl_fcp_clear_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)896 static ssize_t reipl_fcp_clear_show(struct kobject *kobj,
897 struct kobj_attribute *attr, char *page)
898 {
899 return sysfs_emit(page, "%u\n", reipl_fcp_clear);
900 }
901
reipl_fcp_clear_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)902 static ssize_t reipl_fcp_clear_store(struct kobject *kobj,
903 struct kobj_attribute *attr,
904 const char *buf, size_t len)
905 {
906 if (kstrtobool(buf, &reipl_fcp_clear) < 0)
907 return -EINVAL;
908 return len;
909 }
910
911 static struct attribute *reipl_fcp_attrs[] = {
912 &sys_reipl_fcp_device_attr.attr,
913 &sys_reipl_fcp_wwpn_attr.attr,
914 &sys_reipl_fcp_lun_attr.attr,
915 &sys_reipl_fcp_bootprog_attr.attr,
916 &sys_reipl_fcp_br_lba_attr.attr,
917 &sys_reipl_fcp_loadparm_attr.attr,
918 NULL,
919 };
920
921 static const struct attribute_group reipl_fcp_attr_group = {
922 .attrs = reipl_fcp_attrs,
923 .bin_attrs_new = reipl_fcp_bin_attrs,
924 };
925
926 static struct kobj_attribute sys_reipl_fcp_clear_attr =
927 __ATTR(clear, 0644, reipl_fcp_clear_show, reipl_fcp_clear_store);
928
929 /* NVME reipl device attributes */
930
931 DEFINE_IPL_ATTR_SCP_DATA_RW(reipl_nvme, reipl_block_nvme->hdr,
932 reipl_block_nvme->nvme,
933 IPL_BP_NVME_LEN, IPL_BP0_NVME_LEN,
934 DIAG308_SCPDATA_SIZE);
935
936 static const struct bin_attribute *const reipl_nvme_bin_attrs[] = {
937 &sys_reipl_nvme_scp_data_attr,
938 NULL,
939 };
940
941 DEFINE_IPL_ATTR_RW(reipl_nvme, fid, "0x%08llx\n", "%llx\n",
942 reipl_block_nvme->nvme.fid);
943 DEFINE_IPL_ATTR_RW(reipl_nvme, nsid, "0x%08llx\n", "%llx\n",
944 reipl_block_nvme->nvme.nsid);
945 DEFINE_IPL_ATTR_RW(reipl_nvme, bootprog, "%lld\n", "%lld\n",
946 reipl_block_nvme->nvme.bootprog);
947 DEFINE_IPL_ATTR_RW(reipl_nvme, br_lba, "%lld\n", "%lld\n",
948 reipl_block_nvme->nvme.br_lba);
949
950 static struct attribute *reipl_nvme_attrs[] = {
951 &sys_reipl_nvme_fid_attr.attr,
952 &sys_reipl_nvme_nsid_attr.attr,
953 &sys_reipl_nvme_bootprog_attr.attr,
954 &sys_reipl_nvme_br_lba_attr.attr,
955 &sys_reipl_nvme_loadparm_attr.attr,
956 NULL,
957 };
958
959 static const struct attribute_group reipl_nvme_attr_group = {
960 .attrs = reipl_nvme_attrs,
961 .bin_attrs_new = reipl_nvme_bin_attrs
962 };
963
reipl_nvme_clear_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)964 static ssize_t reipl_nvme_clear_show(struct kobject *kobj,
965 struct kobj_attribute *attr, char *page)
966 {
967 return sysfs_emit(page, "%u\n", reipl_nvme_clear);
968 }
969
reipl_nvme_clear_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)970 static ssize_t reipl_nvme_clear_store(struct kobject *kobj,
971 struct kobj_attribute *attr,
972 const char *buf, size_t len)
973 {
974 if (kstrtobool(buf, &reipl_nvme_clear) < 0)
975 return -EINVAL;
976 return len;
977 }
978
979 static struct kobj_attribute sys_reipl_nvme_clear_attr =
980 __ATTR(clear, 0644, reipl_nvme_clear_show, reipl_nvme_clear_store);
981
982 /* CCW reipl device attributes */
983 DEFINE_IPL_CCW_ATTR_RW(reipl_ccw, device, reipl_block_ccw->ccw);
984
reipl_ccw_clear_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)985 static ssize_t reipl_ccw_clear_show(struct kobject *kobj,
986 struct kobj_attribute *attr, char *page)
987 {
988 return sysfs_emit(page, "%u\n", reipl_ccw_clear);
989 }
990
reipl_ccw_clear_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)991 static ssize_t reipl_ccw_clear_store(struct kobject *kobj,
992 struct kobj_attribute *attr,
993 const char *buf, size_t len)
994 {
995 if (kstrtobool(buf, &reipl_ccw_clear) < 0)
996 return -EINVAL;
997 return len;
998 }
999
1000 static struct kobj_attribute sys_reipl_ccw_clear_attr =
1001 __ATTR(clear, 0644, reipl_ccw_clear_show, reipl_ccw_clear_store);
1002
1003 static struct attribute *reipl_ccw_attrs_vm[] = {
1004 &sys_reipl_ccw_device_attr.attr,
1005 &sys_reipl_ccw_loadparm_attr.attr,
1006 &sys_reipl_ccw_vmparm_attr.attr,
1007 &sys_reipl_ccw_clear_attr.attr,
1008 NULL,
1009 };
1010
1011 static struct attribute *reipl_ccw_attrs_lpar[] = {
1012 &sys_reipl_ccw_device_attr.attr,
1013 &sys_reipl_ccw_loadparm_attr.attr,
1014 &sys_reipl_ccw_clear_attr.attr,
1015 NULL,
1016 };
1017
1018 static struct attribute_group reipl_ccw_attr_group_vm = {
1019 .name = IPL_CCW_STR,
1020 .attrs = reipl_ccw_attrs_vm,
1021 };
1022
1023 static struct attribute_group reipl_ccw_attr_group_lpar = {
1024 .name = IPL_CCW_STR,
1025 .attrs = reipl_ccw_attrs_lpar,
1026 };
1027
1028 /* ECKD reipl device attributes */
1029
1030 DEFINE_IPL_ATTR_SCP_DATA_RW(reipl_eckd, reipl_block_eckd->hdr,
1031 reipl_block_eckd->eckd,
1032 IPL_BP_ECKD_LEN, IPL_BP0_ECKD_LEN,
1033 DIAG308_SCPDATA_SIZE);
1034
1035 static const struct bin_attribute *const reipl_eckd_bin_attrs[] = {
1036 &sys_reipl_eckd_scp_data_attr,
1037 NULL,
1038 };
1039
1040 DEFINE_IPL_CCW_ATTR_RW(reipl_eckd, device, reipl_block_eckd->eckd);
1041 DEFINE_IPL_ATTR_RW(reipl_eckd, bootprog, "%lld\n", "%lld\n",
1042 reipl_block_eckd->eckd.bootprog);
1043
1044 static struct attribute *reipl_eckd_attrs[] = {
1045 &sys_reipl_eckd_device_attr.attr,
1046 &sys_reipl_eckd_bootprog_attr.attr,
1047 &sys_reipl_eckd_br_chr_attr.attr,
1048 &sys_reipl_eckd_loadparm_attr.attr,
1049 NULL,
1050 };
1051
1052 static const struct attribute_group reipl_eckd_attr_group = {
1053 .attrs = reipl_eckd_attrs,
1054 .bin_attrs_new = reipl_eckd_bin_attrs
1055 };
1056
reipl_eckd_clear_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)1057 static ssize_t reipl_eckd_clear_show(struct kobject *kobj,
1058 struct kobj_attribute *attr, char *page)
1059 {
1060 return sysfs_emit(page, "%u\n", reipl_eckd_clear);
1061 }
1062
reipl_eckd_clear_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)1063 static ssize_t reipl_eckd_clear_store(struct kobject *kobj,
1064 struct kobj_attribute *attr,
1065 const char *buf, size_t len)
1066 {
1067 if (kstrtobool(buf, &reipl_eckd_clear) < 0)
1068 return -EINVAL;
1069 return len;
1070 }
1071
1072 static struct kobj_attribute sys_reipl_eckd_clear_attr =
1073 __ATTR(clear, 0644, reipl_eckd_clear_show, reipl_eckd_clear_store);
1074
1075 /* NSS reipl device attributes */
reipl_get_ascii_nss_name(char * dst,struct ipl_parameter_block * ipb)1076 static void reipl_get_ascii_nss_name(char *dst,
1077 struct ipl_parameter_block *ipb)
1078 {
1079 memcpy(dst, ipb->ccw.nss_name, NSS_NAME_SIZE);
1080 EBCASC(dst, NSS_NAME_SIZE);
1081 dst[NSS_NAME_SIZE] = 0;
1082 }
1083
reipl_nss_name_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)1084 static ssize_t reipl_nss_name_show(struct kobject *kobj,
1085 struct kobj_attribute *attr, char *page)
1086 {
1087 char nss_name[NSS_NAME_SIZE + 1] = {};
1088
1089 reipl_get_ascii_nss_name(nss_name, reipl_block_nss);
1090 return sysfs_emit(page, "%s\n", nss_name);
1091 }
1092
reipl_nss_name_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)1093 static ssize_t reipl_nss_name_store(struct kobject *kobj,
1094 struct kobj_attribute *attr,
1095 const char *buf, size_t len)
1096 {
1097 int nss_len;
1098
1099 /* ignore trailing newline */
1100 nss_len = len;
1101 if ((len > 0) && (buf[len - 1] == '\n'))
1102 nss_len--;
1103
1104 if (nss_len > NSS_NAME_SIZE)
1105 return -EINVAL;
1106
1107 memset(reipl_block_nss->ccw.nss_name, 0x40, NSS_NAME_SIZE);
1108 if (nss_len > 0) {
1109 reipl_block_nss->ccw.vm_flags |= IPL_PB0_CCW_VM_FLAG_NSS;
1110 memcpy(reipl_block_nss->ccw.nss_name, buf, nss_len);
1111 ASCEBC(reipl_block_nss->ccw.nss_name, nss_len);
1112 EBC_TOUPPER(reipl_block_nss->ccw.nss_name, nss_len);
1113 } else {
1114 reipl_block_nss->ccw.vm_flags &= ~IPL_PB0_CCW_VM_FLAG_NSS;
1115 }
1116
1117 return len;
1118 }
1119
1120 static struct kobj_attribute sys_reipl_nss_name_attr =
1121 __ATTR(name, 0644, reipl_nss_name_show,
1122 reipl_nss_name_store);
1123
1124 static struct attribute *reipl_nss_attrs[] = {
1125 &sys_reipl_nss_name_attr.attr,
1126 &sys_reipl_nss_loadparm_attr.attr,
1127 &sys_reipl_nss_vmparm_attr.attr,
1128 NULL,
1129 };
1130
1131 static struct attribute_group reipl_nss_attr_group = {
1132 .name = IPL_NSS_STR,
1133 .attrs = reipl_nss_attrs,
1134 };
1135
set_os_info_reipl_block(void)1136 void set_os_info_reipl_block(void)
1137 {
1138 os_info_entry_add_data(OS_INFO_REIPL_BLOCK, reipl_block_actual,
1139 reipl_block_actual->hdr.len);
1140 }
1141
1142 /* reipl type */
1143
reipl_set_type(enum ipl_type type)1144 static int reipl_set_type(enum ipl_type type)
1145 {
1146 if (!(reipl_capabilities & type))
1147 return -EINVAL;
1148
1149 switch(type) {
1150 case IPL_TYPE_CCW:
1151 reipl_block_actual = reipl_block_ccw;
1152 break;
1153 case IPL_TYPE_ECKD:
1154 reipl_block_actual = reipl_block_eckd;
1155 break;
1156 case IPL_TYPE_FCP:
1157 reipl_block_actual = reipl_block_fcp;
1158 break;
1159 case IPL_TYPE_NVME:
1160 reipl_block_actual = reipl_block_nvme;
1161 break;
1162 case IPL_TYPE_NSS:
1163 reipl_block_actual = reipl_block_nss;
1164 break;
1165 default:
1166 break;
1167 }
1168 reipl_type = type;
1169 return 0;
1170 }
1171
reipl_type_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)1172 static ssize_t reipl_type_show(struct kobject *kobj,
1173 struct kobj_attribute *attr, char *page)
1174 {
1175 return sysfs_emit(page, "%s\n", ipl_type_str(reipl_type));
1176 }
1177
reipl_type_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)1178 static ssize_t reipl_type_store(struct kobject *kobj,
1179 struct kobj_attribute *attr,
1180 const char *buf, size_t len)
1181 {
1182 int rc = -EINVAL;
1183
1184 if (strncmp(buf, IPL_CCW_STR, strlen(IPL_CCW_STR)) == 0)
1185 rc = reipl_set_type(IPL_TYPE_CCW);
1186 else if (strncmp(buf, IPL_ECKD_STR, strlen(IPL_ECKD_STR)) == 0)
1187 rc = reipl_set_type(IPL_TYPE_ECKD);
1188 else if (strncmp(buf, IPL_FCP_STR, strlen(IPL_FCP_STR)) == 0)
1189 rc = reipl_set_type(IPL_TYPE_FCP);
1190 else if (strncmp(buf, IPL_NVME_STR, strlen(IPL_NVME_STR)) == 0)
1191 rc = reipl_set_type(IPL_TYPE_NVME);
1192 else if (strncmp(buf, IPL_NSS_STR, strlen(IPL_NSS_STR)) == 0)
1193 rc = reipl_set_type(IPL_TYPE_NSS);
1194 return (rc != 0) ? rc : len;
1195 }
1196
1197 static struct kobj_attribute reipl_type_attr =
1198 __ATTR(reipl_type, 0644, reipl_type_show, reipl_type_store);
1199
1200 static struct kset *reipl_kset;
1201 static struct kset *reipl_fcp_kset;
1202 static struct kset *reipl_nvme_kset;
1203 static struct kset *reipl_eckd_kset;
1204
__reipl_run(void * unused)1205 static void __reipl_run(void *unused)
1206 {
1207 switch (reipl_type) {
1208 case IPL_TYPE_CCW:
1209 diag308(DIAG308_SET, reipl_block_ccw);
1210 if (reipl_ccw_clear)
1211 diag308(DIAG308_LOAD_CLEAR, NULL);
1212 else
1213 diag308(DIAG308_LOAD_NORMAL_DUMP, NULL);
1214 break;
1215 case IPL_TYPE_ECKD:
1216 diag308(DIAG308_SET, reipl_block_eckd);
1217 if (reipl_eckd_clear)
1218 diag308(DIAG308_LOAD_CLEAR, NULL);
1219 else
1220 diag308(DIAG308_LOAD_NORMAL, NULL);
1221 break;
1222 case IPL_TYPE_FCP:
1223 diag308(DIAG308_SET, reipl_block_fcp);
1224 if (reipl_fcp_clear)
1225 diag308(DIAG308_LOAD_CLEAR, NULL);
1226 else
1227 diag308(DIAG308_LOAD_NORMAL, NULL);
1228 break;
1229 case IPL_TYPE_NVME:
1230 diag308(DIAG308_SET, reipl_block_nvme);
1231 if (reipl_nvme_clear)
1232 diag308(DIAG308_LOAD_CLEAR, NULL);
1233 else
1234 diag308(DIAG308_LOAD_NORMAL, NULL);
1235 break;
1236 case IPL_TYPE_NSS:
1237 diag308(DIAG308_SET, reipl_block_nss);
1238 diag308(DIAG308_LOAD_CLEAR, NULL);
1239 break;
1240 case IPL_TYPE_UNKNOWN:
1241 diag308(DIAG308_LOAD_CLEAR, NULL);
1242 break;
1243 case IPL_TYPE_FCP_DUMP:
1244 case IPL_TYPE_NVME_DUMP:
1245 case IPL_TYPE_ECKD_DUMP:
1246 break;
1247 }
1248 disabled_wait();
1249 }
1250
reipl_run(struct shutdown_trigger * trigger)1251 static void reipl_run(struct shutdown_trigger *trigger)
1252 {
1253 smp_call_ipl_cpu(__reipl_run, NULL);
1254 }
1255
reipl_block_ccw_init(struct ipl_parameter_block * ipb)1256 static void reipl_block_ccw_init(struct ipl_parameter_block *ipb)
1257 {
1258 ipb->hdr.len = IPL_BP_CCW_LEN;
1259 ipb->hdr.version = IPL_PARM_BLOCK_VERSION;
1260 ipb->pb0_hdr.len = IPL_BP0_CCW_LEN;
1261 ipb->pb0_hdr.pbt = IPL_PBT_CCW;
1262 }
1263
reipl_block_ccw_fill_parms(struct ipl_parameter_block * ipb)1264 static void reipl_block_ccw_fill_parms(struct ipl_parameter_block *ipb)
1265 {
1266 /* LOADPARM */
1267 /* check if read scp info worked and set loadparm */
1268 if (sclp_ipl_info.is_valid)
1269 memcpy(ipb->ccw.loadparm, &sclp_ipl_info.loadparm, LOADPARM_LEN);
1270 else
1271 /* read scp info failed: set empty loadparm (EBCDIC blanks) */
1272 memset(ipb->ccw.loadparm, 0x40, LOADPARM_LEN);
1273 ipb->ccw.flags = IPL_PB0_FLAG_LOADPARM;
1274
1275 /* VM PARM */
1276 if (machine_is_vm() && ipl_block_valid &&
1277 (ipl_block.ccw.vm_flags & IPL_PB0_CCW_VM_FLAG_VP)) {
1278
1279 ipb->ccw.vm_flags |= IPL_PB0_CCW_VM_FLAG_VP;
1280 ipb->ccw.vm_parm_len = ipl_block.ccw.vm_parm_len;
1281 memcpy(ipb->ccw.vm_parm,
1282 ipl_block.ccw.vm_parm, DIAG308_VMPARM_SIZE);
1283 }
1284 }
1285
reipl_nss_init(void)1286 static int __init reipl_nss_init(void)
1287 {
1288 int rc;
1289
1290 if (!machine_is_vm())
1291 return 0;
1292
1293 reipl_block_nss = (void *) get_zeroed_page(GFP_KERNEL);
1294 if (!reipl_block_nss)
1295 return -ENOMEM;
1296
1297 rc = sysfs_create_group(&reipl_kset->kobj, &reipl_nss_attr_group);
1298 if (rc)
1299 return rc;
1300
1301 reipl_block_ccw_init(reipl_block_nss);
1302 reipl_capabilities |= IPL_TYPE_NSS;
1303 return 0;
1304 }
1305
reipl_ccw_init(void)1306 static int __init reipl_ccw_init(void)
1307 {
1308 int rc;
1309
1310 reipl_block_ccw = (void *) get_zeroed_page(GFP_KERNEL);
1311 if (!reipl_block_ccw)
1312 return -ENOMEM;
1313
1314 rc = sysfs_create_group(&reipl_kset->kobj,
1315 machine_is_vm() ? &reipl_ccw_attr_group_vm
1316 : &reipl_ccw_attr_group_lpar);
1317 if (rc)
1318 return rc;
1319
1320 reipl_block_ccw_init(reipl_block_ccw);
1321 if (ipl_info.type == IPL_TYPE_CCW) {
1322 reipl_block_ccw->ccw.ssid = ipl_block.ccw.ssid;
1323 reipl_block_ccw->ccw.devno = ipl_block.ccw.devno;
1324 reipl_block_ccw_fill_parms(reipl_block_ccw);
1325 }
1326
1327 reipl_capabilities |= IPL_TYPE_CCW;
1328 return 0;
1329 }
1330
reipl_fcp_init(void)1331 static int __init reipl_fcp_init(void)
1332 {
1333 int rc;
1334
1335 reipl_block_fcp = (void *) get_zeroed_page(GFP_KERNEL);
1336 if (!reipl_block_fcp)
1337 return -ENOMEM;
1338
1339 /* sysfs: create fcp kset for mixing attr group and bin attrs */
1340 reipl_fcp_kset = kset_create_and_add(IPL_FCP_STR, NULL,
1341 &reipl_kset->kobj);
1342 if (!reipl_fcp_kset) {
1343 free_page((unsigned long) reipl_block_fcp);
1344 return -ENOMEM;
1345 }
1346
1347 rc = sysfs_create_group(&reipl_fcp_kset->kobj, &reipl_fcp_attr_group);
1348 if (rc)
1349 goto out1;
1350
1351 if (test_facility(141)) {
1352 rc = sysfs_create_file(&reipl_fcp_kset->kobj,
1353 &sys_reipl_fcp_clear_attr.attr);
1354 if (rc)
1355 goto out2;
1356 } else {
1357 reipl_fcp_clear = true;
1358 }
1359
1360 if (ipl_info.type == IPL_TYPE_FCP) {
1361 memcpy(reipl_block_fcp, &ipl_block, sizeof(ipl_block));
1362 /*
1363 * Fix loadparm: There are systems where the (SCSI) LOADPARM
1364 * is invalid in the SCSI IPL parameter block, so take it
1365 * always from sclp_ipl_info.
1366 */
1367 memcpy(reipl_block_fcp->fcp.loadparm, sclp_ipl_info.loadparm,
1368 LOADPARM_LEN);
1369 } else {
1370 reipl_block_fcp->hdr.len = IPL_BP_FCP_LEN;
1371 reipl_block_fcp->hdr.version = IPL_PARM_BLOCK_VERSION;
1372 reipl_block_fcp->fcp.len = IPL_BP0_FCP_LEN;
1373 reipl_block_fcp->fcp.pbt = IPL_PBT_FCP;
1374 reipl_block_fcp->fcp.opt = IPL_PB0_FCP_OPT_IPL;
1375 }
1376 reipl_capabilities |= IPL_TYPE_FCP;
1377 return 0;
1378
1379 out2:
1380 sysfs_remove_group(&reipl_fcp_kset->kobj, &reipl_fcp_attr_group);
1381 out1:
1382 kset_unregister(reipl_fcp_kset);
1383 free_page((unsigned long) reipl_block_fcp);
1384 return rc;
1385 }
1386
reipl_nvme_init(void)1387 static int __init reipl_nvme_init(void)
1388 {
1389 int rc;
1390
1391 reipl_block_nvme = (void *) get_zeroed_page(GFP_KERNEL);
1392 if (!reipl_block_nvme)
1393 return -ENOMEM;
1394
1395 /* sysfs: create kset for mixing attr group and bin attrs */
1396 reipl_nvme_kset = kset_create_and_add(IPL_NVME_STR, NULL,
1397 &reipl_kset->kobj);
1398 if (!reipl_nvme_kset) {
1399 free_page((unsigned long) reipl_block_nvme);
1400 return -ENOMEM;
1401 }
1402
1403 rc = sysfs_create_group(&reipl_nvme_kset->kobj, &reipl_nvme_attr_group);
1404 if (rc)
1405 goto out1;
1406
1407 if (test_facility(141)) {
1408 rc = sysfs_create_file(&reipl_nvme_kset->kobj,
1409 &sys_reipl_nvme_clear_attr.attr);
1410 if (rc)
1411 goto out2;
1412 } else {
1413 reipl_nvme_clear = true;
1414 }
1415
1416 if (ipl_info.type == IPL_TYPE_NVME) {
1417 memcpy(reipl_block_nvme, &ipl_block, sizeof(ipl_block));
1418 /*
1419 * Fix loadparm: There are systems where the (SCSI) LOADPARM
1420 * is invalid in the IPL parameter block, so take it
1421 * always from sclp_ipl_info.
1422 */
1423 memcpy(reipl_block_nvme->nvme.loadparm, sclp_ipl_info.loadparm,
1424 LOADPARM_LEN);
1425 } else {
1426 reipl_block_nvme->hdr.len = IPL_BP_NVME_LEN;
1427 reipl_block_nvme->hdr.version = IPL_PARM_BLOCK_VERSION;
1428 reipl_block_nvme->nvme.len = IPL_BP0_NVME_LEN;
1429 reipl_block_nvme->nvme.pbt = IPL_PBT_NVME;
1430 reipl_block_nvme->nvme.opt = IPL_PB0_NVME_OPT_IPL;
1431 }
1432 reipl_capabilities |= IPL_TYPE_NVME;
1433 return 0;
1434
1435 out2:
1436 sysfs_remove_group(&reipl_nvme_kset->kobj, &reipl_nvme_attr_group);
1437 out1:
1438 kset_unregister(reipl_nvme_kset);
1439 free_page((unsigned long) reipl_block_nvme);
1440 return rc;
1441 }
1442
reipl_eckd_init(void)1443 static int __init reipl_eckd_init(void)
1444 {
1445 int rc;
1446
1447 if (!sclp.has_sipl_eckd)
1448 return 0;
1449
1450 reipl_block_eckd = (void *)get_zeroed_page(GFP_KERNEL);
1451 if (!reipl_block_eckd)
1452 return -ENOMEM;
1453
1454 /* sysfs: create kset for mixing attr group and bin attrs */
1455 reipl_eckd_kset = kset_create_and_add(IPL_ECKD_STR, NULL,
1456 &reipl_kset->kobj);
1457 if (!reipl_eckd_kset) {
1458 free_page((unsigned long)reipl_block_eckd);
1459 return -ENOMEM;
1460 }
1461
1462 rc = sysfs_create_group(&reipl_eckd_kset->kobj, &reipl_eckd_attr_group);
1463 if (rc)
1464 goto out1;
1465
1466 if (test_facility(141)) {
1467 rc = sysfs_create_file(&reipl_eckd_kset->kobj,
1468 &sys_reipl_eckd_clear_attr.attr);
1469 if (rc)
1470 goto out2;
1471 } else {
1472 reipl_eckd_clear = true;
1473 }
1474
1475 if (ipl_info.type == IPL_TYPE_ECKD) {
1476 memcpy(reipl_block_eckd, &ipl_block, sizeof(ipl_block));
1477 } else {
1478 reipl_block_eckd->hdr.len = IPL_BP_ECKD_LEN;
1479 reipl_block_eckd->hdr.version = IPL_PARM_BLOCK_VERSION;
1480 reipl_block_eckd->eckd.len = IPL_BP0_ECKD_LEN;
1481 reipl_block_eckd->eckd.pbt = IPL_PBT_ECKD;
1482 reipl_block_eckd->eckd.opt = IPL_PB0_ECKD_OPT_IPL;
1483 }
1484 reipl_capabilities |= IPL_TYPE_ECKD;
1485 return 0;
1486
1487 out2:
1488 sysfs_remove_group(&reipl_eckd_kset->kobj, &reipl_eckd_attr_group);
1489 out1:
1490 kset_unregister(reipl_eckd_kset);
1491 free_page((unsigned long)reipl_block_eckd);
1492 return rc;
1493 }
1494
reipl_type_init(void)1495 static int __init reipl_type_init(void)
1496 {
1497 enum ipl_type reipl_type = ipl_info.type;
1498 struct ipl_parameter_block *reipl_block;
1499 unsigned long size;
1500
1501 reipl_block = os_info_old_entry(OS_INFO_REIPL_BLOCK, &size);
1502 if (!reipl_block)
1503 goto out;
1504 /*
1505 * If we have an OS info reipl block, this will be used
1506 */
1507 if (reipl_block->pb0_hdr.pbt == IPL_PBT_FCP) {
1508 memcpy(reipl_block_fcp, reipl_block, size);
1509 reipl_type = IPL_TYPE_FCP;
1510 } else if (reipl_block->pb0_hdr.pbt == IPL_PBT_NVME) {
1511 memcpy(reipl_block_nvme, reipl_block, size);
1512 reipl_type = IPL_TYPE_NVME;
1513 } else if (reipl_block->pb0_hdr.pbt == IPL_PBT_CCW) {
1514 memcpy(reipl_block_ccw, reipl_block, size);
1515 reipl_type = IPL_TYPE_CCW;
1516 } else if (reipl_block->pb0_hdr.pbt == IPL_PBT_ECKD) {
1517 memcpy(reipl_block_eckd, reipl_block, size);
1518 reipl_type = IPL_TYPE_ECKD;
1519 }
1520 out:
1521 return reipl_set_type(reipl_type);
1522 }
1523
reipl_init(void)1524 static int __init reipl_init(void)
1525 {
1526 int rc;
1527
1528 reipl_kset = kset_create_and_add("reipl", NULL, firmware_kobj);
1529 if (!reipl_kset)
1530 return -ENOMEM;
1531 rc = sysfs_create_file(&reipl_kset->kobj, &reipl_type_attr.attr);
1532 if (rc) {
1533 kset_unregister(reipl_kset);
1534 return rc;
1535 }
1536 rc = reipl_ccw_init();
1537 if (rc)
1538 return rc;
1539 rc = reipl_eckd_init();
1540 if (rc)
1541 return rc;
1542 rc = reipl_fcp_init();
1543 if (rc)
1544 return rc;
1545 rc = reipl_nvme_init();
1546 if (rc)
1547 return rc;
1548 rc = reipl_nss_init();
1549 if (rc)
1550 return rc;
1551 return reipl_type_init();
1552 }
1553
1554 static struct shutdown_action __refdata reipl_action = {
1555 .name = SHUTDOWN_ACTION_REIPL_STR,
1556 .fn = reipl_run,
1557 .init = reipl_init,
1558 };
1559
1560 /*
1561 * dump shutdown action: Dump Linux on shutdown.
1562 */
1563
1564 /* FCP dump device attributes */
1565
1566 DEFINE_IPL_ATTR_RW(dump_fcp, wwpn, "0x%016llx\n", "%llx\n",
1567 dump_block_fcp->fcp.wwpn);
1568 DEFINE_IPL_ATTR_RW(dump_fcp, lun, "0x%016llx\n", "%llx\n",
1569 dump_block_fcp->fcp.lun);
1570 DEFINE_IPL_ATTR_RW(dump_fcp, bootprog, "%lld\n", "%lld\n",
1571 dump_block_fcp->fcp.bootprog);
1572 DEFINE_IPL_ATTR_RW(dump_fcp, br_lba, "%lld\n", "%lld\n",
1573 dump_block_fcp->fcp.br_lba);
1574 DEFINE_IPL_ATTR_RW(dump_fcp, device, "0.0.%04llx\n", "0.0.%llx\n",
1575 dump_block_fcp->fcp.devno);
1576
1577 DEFINE_IPL_ATTR_SCP_DATA_RW(dump_fcp, dump_block_fcp->hdr,
1578 dump_block_fcp->fcp,
1579 IPL_BP_FCP_LEN, IPL_BP0_FCP_LEN,
1580 DIAG308_SCPDATA_SIZE);
1581
1582 static struct attribute *dump_fcp_attrs[] = {
1583 &sys_dump_fcp_device_attr.attr,
1584 &sys_dump_fcp_wwpn_attr.attr,
1585 &sys_dump_fcp_lun_attr.attr,
1586 &sys_dump_fcp_bootprog_attr.attr,
1587 &sys_dump_fcp_br_lba_attr.attr,
1588 NULL,
1589 };
1590
1591 static const struct bin_attribute *const dump_fcp_bin_attrs[] = {
1592 &sys_dump_fcp_scp_data_attr,
1593 NULL,
1594 };
1595
1596 static const struct attribute_group dump_fcp_attr_group = {
1597 .name = IPL_FCP_STR,
1598 .attrs = dump_fcp_attrs,
1599 .bin_attrs_new = dump_fcp_bin_attrs,
1600 };
1601
1602 /* NVME dump device attributes */
1603 DEFINE_IPL_ATTR_RW(dump_nvme, fid, "0x%08llx\n", "%llx\n",
1604 dump_block_nvme->nvme.fid);
1605 DEFINE_IPL_ATTR_RW(dump_nvme, nsid, "0x%08llx\n", "%llx\n",
1606 dump_block_nvme->nvme.nsid);
1607 DEFINE_IPL_ATTR_RW(dump_nvme, bootprog, "%lld\n", "%llx\n",
1608 dump_block_nvme->nvme.bootprog);
1609 DEFINE_IPL_ATTR_RW(dump_nvme, br_lba, "%lld\n", "%llx\n",
1610 dump_block_nvme->nvme.br_lba);
1611
1612 DEFINE_IPL_ATTR_SCP_DATA_RW(dump_nvme, dump_block_nvme->hdr,
1613 dump_block_nvme->nvme,
1614 IPL_BP_NVME_LEN, IPL_BP0_NVME_LEN,
1615 DIAG308_SCPDATA_SIZE);
1616
1617 static struct attribute *dump_nvme_attrs[] = {
1618 &sys_dump_nvme_fid_attr.attr,
1619 &sys_dump_nvme_nsid_attr.attr,
1620 &sys_dump_nvme_bootprog_attr.attr,
1621 &sys_dump_nvme_br_lba_attr.attr,
1622 NULL,
1623 };
1624
1625 static const struct bin_attribute *const dump_nvme_bin_attrs[] = {
1626 &sys_dump_nvme_scp_data_attr,
1627 NULL,
1628 };
1629
1630 static const struct attribute_group dump_nvme_attr_group = {
1631 .name = IPL_NVME_STR,
1632 .attrs = dump_nvme_attrs,
1633 .bin_attrs_new = dump_nvme_bin_attrs,
1634 };
1635
1636 /* ECKD dump device attributes */
1637 DEFINE_IPL_CCW_ATTR_RW(dump_eckd, device, dump_block_eckd->eckd);
1638 DEFINE_IPL_ATTR_RW(dump_eckd, bootprog, "%lld\n", "%llx\n",
1639 dump_block_eckd->eckd.bootprog);
1640
1641 IPL_ATTR_BR_CHR_SHOW_FN(dump, dump_block_eckd->eckd);
1642 IPL_ATTR_BR_CHR_STORE_FN(dump, dump_block_eckd->eckd);
1643
1644 static struct kobj_attribute sys_dump_eckd_br_chr_attr =
1645 __ATTR(br_chr, 0644, eckd_dump_br_chr_show, eckd_dump_br_chr_store);
1646
1647 DEFINE_IPL_ATTR_SCP_DATA_RW(dump_eckd, dump_block_eckd->hdr,
1648 dump_block_eckd->eckd,
1649 IPL_BP_ECKD_LEN, IPL_BP0_ECKD_LEN,
1650 DIAG308_SCPDATA_SIZE);
1651
1652 static struct attribute *dump_eckd_attrs[] = {
1653 &sys_dump_eckd_device_attr.attr,
1654 &sys_dump_eckd_bootprog_attr.attr,
1655 &sys_dump_eckd_br_chr_attr.attr,
1656 NULL,
1657 };
1658
1659 static const struct bin_attribute *const dump_eckd_bin_attrs[] = {
1660 &sys_dump_eckd_scp_data_attr,
1661 NULL,
1662 };
1663
1664 static const struct attribute_group dump_eckd_attr_group = {
1665 .name = IPL_ECKD_STR,
1666 .attrs = dump_eckd_attrs,
1667 .bin_attrs_new = dump_eckd_bin_attrs,
1668 };
1669
1670 /* CCW dump device attributes */
1671 DEFINE_IPL_CCW_ATTR_RW(dump_ccw, device, dump_block_ccw->ccw);
1672
1673 static struct attribute *dump_ccw_attrs[] = {
1674 &sys_dump_ccw_device_attr.attr,
1675 NULL,
1676 };
1677
1678 static struct attribute_group dump_ccw_attr_group = {
1679 .name = IPL_CCW_STR,
1680 .attrs = dump_ccw_attrs,
1681 };
1682
1683 /* dump type */
1684
dump_set_type(enum dump_type type)1685 static int dump_set_type(enum dump_type type)
1686 {
1687 if (!(dump_capabilities & type))
1688 return -EINVAL;
1689 dump_type = type;
1690 return 0;
1691 }
1692
dump_type_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)1693 static ssize_t dump_type_show(struct kobject *kobj,
1694 struct kobj_attribute *attr, char *page)
1695 {
1696 return sysfs_emit(page, "%s\n", dump_type_str(dump_type));
1697 }
1698
dump_type_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)1699 static ssize_t dump_type_store(struct kobject *kobj,
1700 struct kobj_attribute *attr,
1701 const char *buf, size_t len)
1702 {
1703 int rc = -EINVAL;
1704
1705 if (strncmp(buf, DUMP_NONE_STR, strlen(DUMP_NONE_STR)) == 0)
1706 rc = dump_set_type(DUMP_TYPE_NONE);
1707 else if (strncmp(buf, DUMP_CCW_STR, strlen(DUMP_CCW_STR)) == 0)
1708 rc = dump_set_type(DUMP_TYPE_CCW);
1709 else if (strncmp(buf, DUMP_ECKD_STR, strlen(DUMP_ECKD_STR)) == 0)
1710 rc = dump_set_type(DUMP_TYPE_ECKD);
1711 else if (strncmp(buf, DUMP_FCP_STR, strlen(DUMP_FCP_STR)) == 0)
1712 rc = dump_set_type(DUMP_TYPE_FCP);
1713 else if (strncmp(buf, DUMP_NVME_STR, strlen(DUMP_NVME_STR)) == 0)
1714 rc = dump_set_type(DUMP_TYPE_NVME);
1715 return (rc != 0) ? rc : len;
1716 }
1717
1718 static struct kobj_attribute dump_type_attr =
1719 __ATTR(dump_type, 0644, dump_type_show, dump_type_store);
1720
dump_area_size_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)1721 static ssize_t dump_area_size_show(struct kobject *kobj,
1722 struct kobj_attribute *attr, char *page)
1723 {
1724 return sysfs_emit(page, "%lu\n", sclp.hsa_size);
1725 }
1726
1727 static struct kobj_attribute dump_area_size_attr = __ATTR_RO(dump_area_size);
1728
1729 static struct attribute *dump_attrs[] = {
1730 &dump_type_attr.attr,
1731 &dump_area_size_attr.attr,
1732 NULL,
1733 };
1734
1735 static struct attribute_group dump_attr_group = {
1736 .attrs = dump_attrs,
1737 };
1738
1739 static struct kset *dump_kset;
1740
diag308_dump(void * dump_block)1741 static void diag308_dump(void *dump_block)
1742 {
1743 diag308(DIAG308_SET, dump_block);
1744 while (1) {
1745 if (diag308(DIAG308_LOAD_NORMAL_DUMP, NULL) != 0x302)
1746 break;
1747 udelay(USEC_PER_SEC);
1748 }
1749 }
1750
__dump_run(void * unused)1751 static void __dump_run(void *unused)
1752 {
1753 switch (dump_type) {
1754 case DUMP_TYPE_CCW:
1755 diag308_dump(dump_block_ccw);
1756 break;
1757 case DUMP_TYPE_ECKD:
1758 diag308_dump(dump_block_eckd);
1759 break;
1760 case DUMP_TYPE_FCP:
1761 diag308_dump(dump_block_fcp);
1762 break;
1763 case DUMP_TYPE_NVME:
1764 diag308_dump(dump_block_nvme);
1765 break;
1766 default:
1767 break;
1768 }
1769 }
1770
dump_run(struct shutdown_trigger * trigger)1771 static void dump_run(struct shutdown_trigger *trigger)
1772 {
1773 if (dump_type == DUMP_TYPE_NONE)
1774 return;
1775 smp_send_stop();
1776 smp_call_ipl_cpu(__dump_run, NULL);
1777 }
1778
dump_ccw_init(void)1779 static int __init dump_ccw_init(void)
1780 {
1781 int rc;
1782
1783 dump_block_ccw = (void *) get_zeroed_page(GFP_KERNEL);
1784 if (!dump_block_ccw)
1785 return -ENOMEM;
1786 rc = sysfs_create_group(&dump_kset->kobj, &dump_ccw_attr_group);
1787 if (rc) {
1788 free_page((unsigned long)dump_block_ccw);
1789 return rc;
1790 }
1791 dump_block_ccw->hdr.len = IPL_BP_CCW_LEN;
1792 dump_block_ccw->hdr.version = IPL_PARM_BLOCK_VERSION;
1793 dump_block_ccw->ccw.len = IPL_BP0_CCW_LEN;
1794 dump_block_ccw->ccw.pbt = IPL_PBT_CCW;
1795 dump_capabilities |= DUMP_TYPE_CCW;
1796 return 0;
1797 }
1798
dump_fcp_init(void)1799 static int __init dump_fcp_init(void)
1800 {
1801 int rc;
1802
1803 if (!sclp_ipl_info.has_dump)
1804 return 0; /* LDIPL DUMP is not installed */
1805 dump_block_fcp = (void *) get_zeroed_page(GFP_KERNEL);
1806 if (!dump_block_fcp)
1807 return -ENOMEM;
1808 rc = sysfs_create_group(&dump_kset->kobj, &dump_fcp_attr_group);
1809 if (rc) {
1810 free_page((unsigned long)dump_block_fcp);
1811 return rc;
1812 }
1813 dump_block_fcp->hdr.len = IPL_BP_FCP_LEN;
1814 dump_block_fcp->hdr.version = IPL_PARM_BLOCK_VERSION;
1815 dump_block_fcp->fcp.len = IPL_BP0_FCP_LEN;
1816 dump_block_fcp->fcp.pbt = IPL_PBT_FCP;
1817 dump_block_fcp->fcp.opt = IPL_PB0_FCP_OPT_DUMP;
1818 dump_capabilities |= DUMP_TYPE_FCP;
1819 return 0;
1820 }
1821
dump_nvme_init(void)1822 static int __init dump_nvme_init(void)
1823 {
1824 int rc;
1825
1826 if (!sclp_ipl_info.has_dump)
1827 return 0; /* LDIPL DUMP is not installed */
1828 dump_block_nvme = (void *) get_zeroed_page(GFP_KERNEL);
1829 if (!dump_block_nvme)
1830 return -ENOMEM;
1831 rc = sysfs_create_group(&dump_kset->kobj, &dump_nvme_attr_group);
1832 if (rc) {
1833 free_page((unsigned long)dump_block_nvme);
1834 return rc;
1835 }
1836 dump_block_nvme->hdr.len = IPL_BP_NVME_LEN;
1837 dump_block_nvme->hdr.version = IPL_PARM_BLOCK_VERSION;
1838 dump_block_nvme->nvme.len = IPL_BP0_NVME_LEN;
1839 dump_block_nvme->nvme.pbt = IPL_PBT_NVME;
1840 dump_block_nvme->nvme.opt = IPL_PB0_NVME_OPT_DUMP;
1841 dump_capabilities |= DUMP_TYPE_NVME;
1842 return 0;
1843 }
1844
dump_eckd_init(void)1845 static int __init dump_eckd_init(void)
1846 {
1847 int rc;
1848
1849 if (!sclp_ipl_info.has_dump || !sclp.has_sipl_eckd)
1850 return 0; /* LDIPL DUMP is not installed */
1851 dump_block_eckd = (void *)get_zeroed_page(GFP_KERNEL);
1852 if (!dump_block_eckd)
1853 return -ENOMEM;
1854 rc = sysfs_create_group(&dump_kset->kobj, &dump_eckd_attr_group);
1855 if (rc) {
1856 free_page((unsigned long)dump_block_eckd);
1857 return rc;
1858 }
1859 dump_block_eckd->hdr.len = IPL_BP_ECKD_LEN;
1860 dump_block_eckd->hdr.version = IPL_PARM_BLOCK_VERSION;
1861 dump_block_eckd->eckd.len = IPL_BP0_ECKD_LEN;
1862 dump_block_eckd->eckd.pbt = IPL_PBT_ECKD;
1863 dump_block_eckd->eckd.opt = IPL_PB0_ECKD_OPT_DUMP;
1864 dump_capabilities |= DUMP_TYPE_ECKD;
1865 return 0;
1866 }
1867
dump_init(void)1868 static int __init dump_init(void)
1869 {
1870 int rc;
1871
1872 dump_kset = kset_create_and_add("dump", NULL, firmware_kobj);
1873 if (!dump_kset)
1874 return -ENOMEM;
1875 rc = sysfs_create_group(&dump_kset->kobj, &dump_attr_group);
1876 if (rc) {
1877 kset_unregister(dump_kset);
1878 return rc;
1879 }
1880 rc = dump_ccw_init();
1881 if (rc)
1882 return rc;
1883 rc = dump_eckd_init();
1884 if (rc)
1885 return rc;
1886 rc = dump_fcp_init();
1887 if (rc)
1888 return rc;
1889 rc = dump_nvme_init();
1890 if (rc)
1891 return rc;
1892 dump_set_type(DUMP_TYPE_NONE);
1893 return 0;
1894 }
1895
1896 static struct shutdown_action __refdata dump_action = {
1897 .name = SHUTDOWN_ACTION_DUMP_STR,
1898 .fn = dump_run,
1899 .init = dump_init,
1900 };
1901
dump_reipl_run(struct shutdown_trigger * trigger)1902 static void dump_reipl_run(struct shutdown_trigger *trigger)
1903 {
1904 struct lowcore *abs_lc;
1905 unsigned int csum;
1906
1907 /*
1908 * Set REIPL_CLEAR flag in os_info flags entry indicating
1909 * 'clear' sysfs attribute has been set on the panicked system
1910 * for specified reipl type.
1911 * Always set for IPL_TYPE_NSS and IPL_TYPE_UNKNOWN.
1912 */
1913 if ((reipl_type == IPL_TYPE_CCW && reipl_ccw_clear) ||
1914 (reipl_type == IPL_TYPE_ECKD && reipl_eckd_clear) ||
1915 (reipl_type == IPL_TYPE_FCP && reipl_fcp_clear) ||
1916 (reipl_type == IPL_TYPE_NVME && reipl_nvme_clear) ||
1917 reipl_type == IPL_TYPE_NSS ||
1918 reipl_type == IPL_TYPE_UNKNOWN)
1919 os_info_flags |= OS_INFO_FLAG_REIPL_CLEAR;
1920 os_info_entry_add_data(OS_INFO_FLAGS_ENTRY, &os_info_flags, sizeof(os_info_flags));
1921 csum = (__force unsigned int)cksm(reipl_block_actual, reipl_block_actual->hdr.len, 0);
1922 abs_lc = get_abs_lowcore();
1923 abs_lc->ipib = __pa(reipl_block_actual);
1924 abs_lc->ipib_checksum = csum;
1925 put_abs_lowcore(abs_lc);
1926 dump_run(trigger);
1927 }
1928
1929 static struct shutdown_action __refdata dump_reipl_action = {
1930 .name = SHUTDOWN_ACTION_DUMP_REIPL_STR,
1931 .fn = dump_reipl_run,
1932 };
1933
1934 /*
1935 * vmcmd shutdown action: Trigger vm command on shutdown.
1936 */
1937
1938 #define VMCMD_MAX_SIZE 240
1939
1940 static char vmcmd_on_reboot[VMCMD_MAX_SIZE + 1];
1941 static char vmcmd_on_panic[VMCMD_MAX_SIZE + 1];
1942 static char vmcmd_on_halt[VMCMD_MAX_SIZE + 1];
1943 static char vmcmd_on_poff[VMCMD_MAX_SIZE + 1];
1944 static char vmcmd_on_restart[VMCMD_MAX_SIZE + 1];
1945
1946 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_reboot, "%s\n", "%s\n", vmcmd_on_reboot);
1947 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_panic, "%s\n", "%s\n", vmcmd_on_panic);
1948 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_halt, "%s\n", "%s\n", vmcmd_on_halt);
1949 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_poff, "%s\n", "%s\n", vmcmd_on_poff);
1950 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_restart, "%s\n", "%s\n", vmcmd_on_restart);
1951
1952 static struct attribute *vmcmd_attrs[] = {
1953 &sys_vmcmd_on_reboot_attr.attr,
1954 &sys_vmcmd_on_panic_attr.attr,
1955 &sys_vmcmd_on_halt_attr.attr,
1956 &sys_vmcmd_on_poff_attr.attr,
1957 &sys_vmcmd_on_restart_attr.attr,
1958 NULL,
1959 };
1960
1961 static struct attribute_group vmcmd_attr_group = {
1962 .attrs = vmcmd_attrs,
1963 };
1964
1965 static struct kset *vmcmd_kset;
1966
vmcmd_run(struct shutdown_trigger * trigger)1967 static void vmcmd_run(struct shutdown_trigger *trigger)
1968 {
1969 char *cmd;
1970
1971 if (strcmp(trigger->name, ON_REIPL_STR) == 0)
1972 cmd = vmcmd_on_reboot;
1973 else if (strcmp(trigger->name, ON_PANIC_STR) == 0)
1974 cmd = vmcmd_on_panic;
1975 else if (strcmp(trigger->name, ON_HALT_STR) == 0)
1976 cmd = vmcmd_on_halt;
1977 else if (strcmp(trigger->name, ON_POFF_STR) == 0)
1978 cmd = vmcmd_on_poff;
1979 else if (strcmp(trigger->name, ON_RESTART_STR) == 0)
1980 cmd = vmcmd_on_restart;
1981 else
1982 return;
1983
1984 if (strlen(cmd) == 0)
1985 return;
1986 __cpcmd(cmd, NULL, 0, NULL);
1987 }
1988
vmcmd_init(void)1989 static int vmcmd_init(void)
1990 {
1991 if (!machine_is_vm())
1992 return -EOPNOTSUPP;
1993 vmcmd_kset = kset_create_and_add("vmcmd", NULL, firmware_kobj);
1994 if (!vmcmd_kset)
1995 return -ENOMEM;
1996 return sysfs_create_group(&vmcmd_kset->kobj, &vmcmd_attr_group);
1997 }
1998
1999 static struct shutdown_action vmcmd_action = {SHUTDOWN_ACTION_VMCMD_STR,
2000 vmcmd_run, vmcmd_init};
2001
2002 /*
2003 * stop shutdown action: Stop Linux on shutdown.
2004 */
2005
stop_run(struct shutdown_trigger * trigger)2006 static void stop_run(struct shutdown_trigger *trigger)
2007 {
2008 if (strcmp(trigger->name, ON_PANIC_STR) == 0 ||
2009 strcmp(trigger->name, ON_RESTART_STR) == 0)
2010 disabled_wait();
2011 smp_stop_cpu();
2012 }
2013
2014 static struct shutdown_action stop_action = {SHUTDOWN_ACTION_STOP_STR,
2015 stop_run, NULL};
2016
2017 /* action list */
2018
2019 static struct shutdown_action *shutdown_actions_list[] = {
2020 &ipl_action, &reipl_action, &dump_reipl_action, &dump_action,
2021 &vmcmd_action, &stop_action};
2022 #define SHUTDOWN_ACTIONS_COUNT (sizeof(shutdown_actions_list) / sizeof(void *))
2023
2024 /*
2025 * Trigger section
2026 */
2027
2028 static struct kset *shutdown_actions_kset;
2029
set_trigger(const char * buf,struct shutdown_trigger * trigger,size_t len)2030 static int set_trigger(const char *buf, struct shutdown_trigger *trigger,
2031 size_t len)
2032 {
2033 int i;
2034
2035 for (i = 0; i < SHUTDOWN_ACTIONS_COUNT; i++) {
2036 if (sysfs_streq(buf, shutdown_actions_list[i]->name)) {
2037 if (shutdown_actions_list[i]->init_rc) {
2038 return shutdown_actions_list[i]->init_rc;
2039 } else {
2040 trigger->action = shutdown_actions_list[i];
2041 return len;
2042 }
2043 }
2044 }
2045 return -EINVAL;
2046 }
2047
2048 /* on reipl */
2049
2050 static struct shutdown_trigger on_reboot_trigger = {ON_REIPL_STR,
2051 &reipl_action};
2052
on_reboot_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)2053 static ssize_t on_reboot_show(struct kobject *kobj,
2054 struct kobj_attribute *attr, char *page)
2055 {
2056 return sysfs_emit(page, "%s\n", on_reboot_trigger.action->name);
2057 }
2058
on_reboot_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)2059 static ssize_t on_reboot_store(struct kobject *kobj,
2060 struct kobj_attribute *attr,
2061 const char *buf, size_t len)
2062 {
2063 return set_trigger(buf, &on_reboot_trigger, len);
2064 }
2065 static struct kobj_attribute on_reboot_attr = __ATTR_RW(on_reboot);
2066
do_machine_restart(char * __unused)2067 static void do_machine_restart(char *__unused)
2068 {
2069 smp_send_stop();
2070 on_reboot_trigger.action->fn(&on_reboot_trigger);
2071 reipl_run(NULL);
2072 }
2073 void (*_machine_restart)(char *command) = do_machine_restart;
2074
2075 /* on panic */
2076
2077 static struct shutdown_trigger on_panic_trigger = {ON_PANIC_STR, &stop_action};
2078
on_panic_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)2079 static ssize_t on_panic_show(struct kobject *kobj,
2080 struct kobj_attribute *attr, char *page)
2081 {
2082 return sysfs_emit(page, "%s\n", on_panic_trigger.action->name);
2083 }
2084
on_panic_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)2085 static ssize_t on_panic_store(struct kobject *kobj,
2086 struct kobj_attribute *attr,
2087 const char *buf, size_t len)
2088 {
2089 return set_trigger(buf, &on_panic_trigger, len);
2090 }
2091 static struct kobj_attribute on_panic_attr = __ATTR_RW(on_panic);
2092
do_panic(void)2093 static void do_panic(void)
2094 {
2095 lgr_info_log();
2096 on_panic_trigger.action->fn(&on_panic_trigger);
2097 stop_run(&on_panic_trigger);
2098 }
2099
2100 /* on restart */
2101
2102 static struct shutdown_trigger on_restart_trigger = {ON_RESTART_STR,
2103 &stop_action};
2104
on_restart_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)2105 static ssize_t on_restart_show(struct kobject *kobj,
2106 struct kobj_attribute *attr, char *page)
2107 {
2108 return sysfs_emit(page, "%s\n", on_restart_trigger.action->name);
2109 }
2110
on_restart_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)2111 static ssize_t on_restart_store(struct kobject *kobj,
2112 struct kobj_attribute *attr,
2113 const char *buf, size_t len)
2114 {
2115 return set_trigger(buf, &on_restart_trigger, len);
2116 }
2117 static struct kobj_attribute on_restart_attr = __ATTR_RW(on_restart);
2118
__do_restart(void * ignore)2119 static void __do_restart(void *ignore)
2120 {
2121 smp_send_stop();
2122 #ifdef CONFIG_CRASH_DUMP
2123 crash_kexec(NULL);
2124 #endif
2125 on_restart_trigger.action->fn(&on_restart_trigger);
2126 stop_run(&on_restart_trigger);
2127 }
2128
do_restart(void * arg)2129 void do_restart(void *arg)
2130 {
2131 tracing_off();
2132 debug_locks_off();
2133 lgr_info_log();
2134 smp_call_ipl_cpu(__do_restart, arg);
2135 }
2136
2137 /* on halt */
2138
2139 static struct shutdown_trigger on_halt_trigger = {ON_HALT_STR, &stop_action};
2140
on_halt_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)2141 static ssize_t on_halt_show(struct kobject *kobj,
2142 struct kobj_attribute *attr, char *page)
2143 {
2144 return sysfs_emit(page, "%s\n", on_halt_trigger.action->name);
2145 }
2146
on_halt_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)2147 static ssize_t on_halt_store(struct kobject *kobj,
2148 struct kobj_attribute *attr,
2149 const char *buf, size_t len)
2150 {
2151 return set_trigger(buf, &on_halt_trigger, len);
2152 }
2153 static struct kobj_attribute on_halt_attr = __ATTR_RW(on_halt);
2154
do_machine_halt(void)2155 static void do_machine_halt(void)
2156 {
2157 smp_send_stop();
2158 on_halt_trigger.action->fn(&on_halt_trigger);
2159 stop_run(&on_halt_trigger);
2160 }
2161 void (*_machine_halt)(void) = do_machine_halt;
2162
2163 /* on power off */
2164
2165 static struct shutdown_trigger on_poff_trigger = {ON_POFF_STR, &stop_action};
2166
on_poff_show(struct kobject * kobj,struct kobj_attribute * attr,char * page)2167 static ssize_t on_poff_show(struct kobject *kobj,
2168 struct kobj_attribute *attr, char *page)
2169 {
2170 return sysfs_emit(page, "%s\n", on_poff_trigger.action->name);
2171 }
2172
on_poff_store(struct kobject * kobj,struct kobj_attribute * attr,const char * buf,size_t len)2173 static ssize_t on_poff_store(struct kobject *kobj,
2174 struct kobj_attribute *attr,
2175 const char *buf, size_t len)
2176 {
2177 return set_trigger(buf, &on_poff_trigger, len);
2178 }
2179 static struct kobj_attribute on_poff_attr = __ATTR_RW(on_poff);
2180
do_machine_power_off(void)2181 static void do_machine_power_off(void)
2182 {
2183 smp_send_stop();
2184 on_poff_trigger.action->fn(&on_poff_trigger);
2185 stop_run(&on_poff_trigger);
2186 }
2187 void (*_machine_power_off)(void) = do_machine_power_off;
2188
2189 static struct attribute *shutdown_action_attrs[] = {
2190 &on_restart_attr.attr,
2191 &on_reboot_attr.attr,
2192 &on_panic_attr.attr,
2193 &on_halt_attr.attr,
2194 &on_poff_attr.attr,
2195 NULL,
2196 };
2197
2198 static struct attribute_group shutdown_action_attr_group = {
2199 .attrs = shutdown_action_attrs,
2200 };
2201
shutdown_triggers_init(void)2202 static void __init shutdown_triggers_init(void)
2203 {
2204 shutdown_actions_kset = kset_create_and_add("shutdown_actions", NULL,
2205 firmware_kobj);
2206 if (!shutdown_actions_kset)
2207 goto fail;
2208 if (sysfs_create_group(&shutdown_actions_kset->kobj,
2209 &shutdown_action_attr_group))
2210 goto fail;
2211 return;
2212 fail:
2213 panic("shutdown_triggers_init failed\n");
2214 }
2215
shutdown_actions_init(void)2216 static void __init shutdown_actions_init(void)
2217 {
2218 int i;
2219
2220 for (i = 0; i < SHUTDOWN_ACTIONS_COUNT; i++) {
2221 if (!shutdown_actions_list[i]->init)
2222 continue;
2223 shutdown_actions_list[i]->init_rc =
2224 shutdown_actions_list[i]->init();
2225 }
2226 }
2227
s390_ipl_init(void)2228 static int __init s390_ipl_init(void)
2229 {
2230 char str[8] = {0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40};
2231
2232 sclp_early_get_ipl_info(&sclp_ipl_info);
2233 /*
2234 * Fix loadparm: There are systems where the (SCSI) LOADPARM
2235 * returned by read SCP info is invalid (contains EBCDIC blanks)
2236 * when the system has been booted via diag308. In that case we use
2237 * the value from diag308, if available.
2238 *
2239 * There are also systems where diag308 store does not work in
2240 * case the system is booted from HMC. Fortunately in this case
2241 * READ SCP info provides the correct value.
2242 */
2243 if (memcmp(sclp_ipl_info.loadparm, str, sizeof(str)) == 0 && ipl_block_valid)
2244 memcpy(sclp_ipl_info.loadparm, ipl_block.ccw.loadparm, LOADPARM_LEN);
2245 shutdown_actions_init();
2246 shutdown_triggers_init();
2247 return 0;
2248 }
2249
2250 __initcall(s390_ipl_init);
2251
strncpy_skip_quote(char * dst,char * src,int n)2252 static void __init strncpy_skip_quote(char *dst, char *src, int n)
2253 {
2254 int sx, dx;
2255
2256 dx = 0;
2257 for (sx = 0; src[sx] != 0; sx++) {
2258 if (src[sx] == '"')
2259 continue;
2260 dst[dx++] = src[sx];
2261 if (dx >= n)
2262 break;
2263 }
2264 }
2265
vmcmd_on_reboot_setup(char * str)2266 static int __init vmcmd_on_reboot_setup(char *str)
2267 {
2268 if (!machine_is_vm())
2269 return 1;
2270 strncpy_skip_quote(vmcmd_on_reboot, str, VMCMD_MAX_SIZE);
2271 vmcmd_on_reboot[VMCMD_MAX_SIZE] = 0;
2272 on_reboot_trigger.action = &vmcmd_action;
2273 return 1;
2274 }
2275 __setup("vmreboot=", vmcmd_on_reboot_setup);
2276
vmcmd_on_panic_setup(char * str)2277 static int __init vmcmd_on_panic_setup(char *str)
2278 {
2279 if (!machine_is_vm())
2280 return 1;
2281 strncpy_skip_quote(vmcmd_on_panic, str, VMCMD_MAX_SIZE);
2282 vmcmd_on_panic[VMCMD_MAX_SIZE] = 0;
2283 on_panic_trigger.action = &vmcmd_action;
2284 return 1;
2285 }
2286 __setup("vmpanic=", vmcmd_on_panic_setup);
2287
vmcmd_on_halt_setup(char * str)2288 static int __init vmcmd_on_halt_setup(char *str)
2289 {
2290 if (!machine_is_vm())
2291 return 1;
2292 strncpy_skip_quote(vmcmd_on_halt, str, VMCMD_MAX_SIZE);
2293 vmcmd_on_halt[VMCMD_MAX_SIZE] = 0;
2294 on_halt_trigger.action = &vmcmd_action;
2295 return 1;
2296 }
2297 __setup("vmhalt=", vmcmd_on_halt_setup);
2298
vmcmd_on_poff_setup(char * str)2299 static int __init vmcmd_on_poff_setup(char *str)
2300 {
2301 if (!machine_is_vm())
2302 return 1;
2303 strncpy_skip_quote(vmcmd_on_poff, str, VMCMD_MAX_SIZE);
2304 vmcmd_on_poff[VMCMD_MAX_SIZE] = 0;
2305 on_poff_trigger.action = &vmcmd_action;
2306 return 1;
2307 }
2308 __setup("vmpoff=", vmcmd_on_poff_setup);
2309
on_panic_notify(struct notifier_block * self,unsigned long event,void * data)2310 static int on_panic_notify(struct notifier_block *self,
2311 unsigned long event, void *data)
2312 {
2313 do_panic();
2314 return NOTIFY_OK;
2315 }
2316
2317 static struct notifier_block on_panic_nb = {
2318 .notifier_call = on_panic_notify,
2319 .priority = INT_MIN,
2320 };
2321
setup_ipl(void)2322 void __init setup_ipl(void)
2323 {
2324 BUILD_BUG_ON(sizeof(struct ipl_parameter_block) != PAGE_SIZE);
2325
2326 ipl_info.type = get_ipl_type();
2327 switch (ipl_info.type) {
2328 case IPL_TYPE_CCW:
2329 ipl_info.data.ccw.dev_id.ssid = ipl_block.ccw.ssid;
2330 ipl_info.data.ccw.dev_id.devno = ipl_block.ccw.devno;
2331 break;
2332 case IPL_TYPE_ECKD:
2333 case IPL_TYPE_ECKD_DUMP:
2334 ipl_info.data.eckd.dev_id.ssid = ipl_block.eckd.ssid;
2335 ipl_info.data.eckd.dev_id.devno = ipl_block.eckd.devno;
2336 break;
2337 case IPL_TYPE_FCP:
2338 case IPL_TYPE_FCP_DUMP:
2339 ipl_info.data.fcp.dev_id.ssid = 0;
2340 ipl_info.data.fcp.dev_id.devno = ipl_block.fcp.devno;
2341 ipl_info.data.fcp.wwpn = ipl_block.fcp.wwpn;
2342 ipl_info.data.fcp.lun = ipl_block.fcp.lun;
2343 break;
2344 case IPL_TYPE_NVME:
2345 case IPL_TYPE_NVME_DUMP:
2346 ipl_info.data.nvme.fid = ipl_block.nvme.fid;
2347 ipl_info.data.nvme.nsid = ipl_block.nvme.nsid;
2348 break;
2349 case IPL_TYPE_NSS:
2350 case IPL_TYPE_UNKNOWN:
2351 /* We have no info to copy */
2352 break;
2353 }
2354 atomic_notifier_chain_register(&panic_notifier_list, &on_panic_nb);
2355 }
2356
s390_reset_system(void)2357 void s390_reset_system(void)
2358 {
2359 /* Disable prefixing */
2360 set_prefix(0);
2361
2362 /* Disable lowcore protection */
2363 local_ctl_clear_bit(0, CR0_LOW_ADDRESS_PROTECTION_BIT);
2364 diag_amode31_ops.diag308_reset();
2365 }
2366
2367 #ifdef CONFIG_KEXEC_FILE
2368
ipl_report_add_component(struct ipl_report * report,struct kexec_buf * kbuf,unsigned char flags,unsigned short cert)2369 int ipl_report_add_component(struct ipl_report *report, struct kexec_buf *kbuf,
2370 unsigned char flags, unsigned short cert)
2371 {
2372 struct ipl_report_component *comp;
2373
2374 comp = vzalloc(sizeof(*comp));
2375 if (!comp)
2376 return -ENOMEM;
2377 list_add_tail(&comp->list, &report->components);
2378
2379 comp->entry.addr = kbuf->mem;
2380 comp->entry.len = kbuf->memsz;
2381 comp->entry.flags = flags;
2382 comp->entry.certificate_index = cert;
2383
2384 report->size += sizeof(comp->entry);
2385
2386 return 0;
2387 }
2388
ipl_report_add_certificate(struct ipl_report * report,void * key,unsigned long addr,unsigned long len)2389 int ipl_report_add_certificate(struct ipl_report *report, void *key,
2390 unsigned long addr, unsigned long len)
2391 {
2392 struct ipl_report_certificate *cert;
2393
2394 cert = vzalloc(sizeof(*cert));
2395 if (!cert)
2396 return -ENOMEM;
2397 list_add_tail(&cert->list, &report->certificates);
2398
2399 cert->entry.addr = addr;
2400 cert->entry.len = len;
2401 cert->key = key;
2402
2403 report->size += sizeof(cert->entry);
2404 report->size += cert->entry.len;
2405
2406 return 0;
2407 }
2408
ipl_report_init(struct ipl_parameter_block * ipib)2409 struct ipl_report *ipl_report_init(struct ipl_parameter_block *ipib)
2410 {
2411 struct ipl_report *report;
2412
2413 report = vzalloc(sizeof(*report));
2414 if (!report)
2415 return ERR_PTR(-ENOMEM);
2416
2417 report->ipib = ipib;
2418 INIT_LIST_HEAD(&report->components);
2419 INIT_LIST_HEAD(&report->certificates);
2420
2421 report->size = ALIGN(ipib->hdr.len, 8);
2422 report->size += sizeof(struct ipl_rl_hdr);
2423 report->size += sizeof(struct ipl_rb_components);
2424 report->size += sizeof(struct ipl_rb_certificates);
2425
2426 return report;
2427 }
2428
ipl_report_finish(struct ipl_report * report)2429 void *ipl_report_finish(struct ipl_report *report)
2430 {
2431 struct ipl_report_certificate *cert;
2432 struct ipl_report_component *comp;
2433 struct ipl_rb_certificates *certs;
2434 struct ipl_parameter_block *ipib;
2435 struct ipl_rb_components *comps;
2436 struct ipl_rl_hdr *rl_hdr;
2437 void *buf, *ptr;
2438
2439 buf = vzalloc(report->size);
2440 if (!buf)
2441 goto out;
2442 ptr = buf;
2443
2444 memcpy(ptr, report->ipib, report->ipib->hdr.len);
2445 ipib = ptr;
2446 if (ipl_secure_flag)
2447 ipib->hdr.flags |= IPL_PL_FLAG_SIPL;
2448 ipib->hdr.flags |= IPL_PL_FLAG_IPLSR;
2449 ptr += report->ipib->hdr.len;
2450 ptr = PTR_ALIGN(ptr, 8);
2451
2452 rl_hdr = ptr;
2453 ptr += sizeof(*rl_hdr);
2454
2455 comps = ptr;
2456 comps->rbt = IPL_RBT_COMPONENTS;
2457 ptr += sizeof(*comps);
2458 list_for_each_entry(comp, &report->components, list) {
2459 memcpy(ptr, &comp->entry, sizeof(comp->entry));
2460 ptr += sizeof(comp->entry);
2461 }
2462 comps->len = ptr - (void *)comps;
2463
2464 certs = ptr;
2465 certs->rbt = IPL_RBT_CERTIFICATES;
2466 ptr += sizeof(*certs);
2467 list_for_each_entry(cert, &report->certificates, list) {
2468 memcpy(ptr, &cert->entry, sizeof(cert->entry));
2469 ptr += sizeof(cert->entry);
2470 }
2471 certs->len = ptr - (void *)certs;
2472 rl_hdr->len = ptr - (void *)rl_hdr;
2473
2474 list_for_each_entry(cert, &report->certificates, list) {
2475 memcpy(ptr, cert->key, cert->entry.len);
2476 ptr += cert->entry.len;
2477 }
2478
2479 BUG_ON(ptr > buf + report->size);
2480 out:
2481 return buf;
2482 }
2483
ipl_report_free(struct ipl_report * report)2484 int ipl_report_free(struct ipl_report *report)
2485 {
2486 struct ipl_report_component *comp, *ncomp;
2487 struct ipl_report_certificate *cert, *ncert;
2488
2489 list_for_each_entry_safe(comp, ncomp, &report->components, list)
2490 vfree(comp);
2491
2492 list_for_each_entry_safe(cert, ncert, &report->certificates, list)
2493 vfree(cert);
2494
2495 vfree(report);
2496
2497 return 0;
2498 }
2499
2500 #endif
2501