1 // SPDX-License-Identifier: GPL-2.0
3 * ipl/reipl/dump support for Linux on s390.
5 * Copyright IBM Corp. 2005, 2012
6 * Author(s): Michael Holzheu <holzheu@de.ibm.com>
7 * Heiko Carstens <heiko.carstens@de.ibm.com>
8 * Volker Sameske <sameske@de.ibm.com>
11 #include <linux/types.h>
12 #include <linux/export.h>
13 #include <linux/init.h>
14 #include <linux/device.h>
15 #include <linux/delay.h>
16 #include <linux/reboot.h>
17 #include <linux/ctype.h>
19 #include <linux/gfp.h>
20 #include <linux/crash_dump.h>
21 #include <linux/debug_locks.h>
25 #include <asm/setup.h>
26 #include <asm/cpcmd.h>
28 #include <asm/ebcdic.h>
29 #include <asm/reset.h>
31 #include <asm/checksum.h>
32 #include <asm/debug.h>
33 #include <asm/os_info.h>
36 #define IPL_PARM_BLOCK_VERSION 0
38 #define IPL_UNKNOWN_STR "unknown"
39 #define IPL_CCW_STR "ccw"
40 #define IPL_FCP_STR "fcp"
41 #define IPL_FCP_DUMP_STR "fcp_dump"
42 #define IPL_NSS_STR "nss"
44 #define DUMP_CCW_STR "ccw"
45 #define DUMP_FCP_STR "fcp"
46 #define DUMP_NONE_STR "none"
49 * Four shutdown trigger types are supported:
56 #define ON_PANIC_STR "on_panic"
57 #define ON_HALT_STR "on_halt"
58 #define ON_POFF_STR "on_poff"
59 #define ON_REIPL_STR "on_reboot"
60 #define ON_RESTART_STR "on_restart"
62 struct shutdown_action;
63 struct shutdown_trigger {
65 struct shutdown_action *action;
69 * The following shutdown action types are supported:
71 #define SHUTDOWN_ACTION_IPL_STR "ipl"
72 #define SHUTDOWN_ACTION_REIPL_STR "reipl"
73 #define SHUTDOWN_ACTION_DUMP_STR "dump"
74 #define SHUTDOWN_ACTION_VMCMD_STR "vmcmd"
75 #define SHUTDOWN_ACTION_STOP_STR "stop"
76 #define SHUTDOWN_ACTION_DUMP_REIPL_STR "dump_reipl"
78 struct shutdown_action {
80 void (*fn) (struct shutdown_trigger *trigger);
85 static char *ipl_type_str(enum ipl_type type)
92 case IPL_TYPE_FCP_DUMP:
93 return IPL_FCP_DUMP_STR;
96 case IPL_TYPE_UNKNOWN:
98 return IPL_UNKNOWN_STR;
108 static char *dump_type_str(enum dump_type type)
112 return DUMP_NONE_STR;
123 static u16 ipl_devno;
127 REIPL_METHOD_CCW_CIO,
128 REIPL_METHOD_CCW_DIAG,
130 REIPL_METHOD_FCP_RO_DIAG,
131 REIPL_METHOD_FCP_RW_DIAG,
132 REIPL_METHOD_FCP_RO_VM,
133 REIPL_METHOD_FCP_DUMP,
135 REIPL_METHOD_NSS_DIAG,
136 REIPL_METHOD_DEFAULT,
142 DUMP_METHOD_CCW_DIAG,
144 DUMP_METHOD_FCP_DIAG,
147 static int diag308_set_works;
149 static struct ipl_parameter_block ipl_block;
151 static int reipl_capabilities = IPL_TYPE_UNKNOWN;
153 static enum ipl_type reipl_type = IPL_TYPE_UNKNOWN;
154 static enum ipl_method reipl_method = REIPL_METHOD_DEFAULT;
155 static struct ipl_parameter_block *reipl_block_fcp;
156 static struct ipl_parameter_block *reipl_block_ccw;
157 static struct ipl_parameter_block *reipl_block_nss;
158 static struct ipl_parameter_block *reipl_block_actual;
160 static int dump_capabilities = DUMP_TYPE_NONE;
161 static enum dump_type dump_type = DUMP_TYPE_NONE;
162 static enum dump_method dump_method = DUMP_METHOD_NONE;
163 static struct ipl_parameter_block *dump_block_fcp;
164 static struct ipl_parameter_block *dump_block_ccw;
166 static struct sclp_ipl_info sclp_ipl_info;
168 static inline int __diag308(unsigned long subcode, void *addr)
170 register unsigned long _addr asm("0") = (unsigned long) addr;
171 register unsigned long _rc asm("1") = 0;
174 " diag %0,%2,0x308\n"
177 : "+d" (_addr), "+d" (_rc)
178 : "d" (subcode) : "cc", "memory");
182 int diag308(unsigned long subcode, void *addr)
184 diag_stat_inc(DIAG_STAT_X308);
185 return __diag308(subcode, addr);
187 EXPORT_SYMBOL_GPL(diag308);
191 #define IPL_ATTR_SHOW_FN(_prefix, _name, _format, args...) \
192 static ssize_t sys_##_prefix##_##_name##_show(struct kobject *kobj, \
193 struct kobj_attribute *attr, \
196 return snprintf(page, PAGE_SIZE, _format, ##args); \
199 #define IPL_ATTR_CCW_STORE_FN(_prefix, _name, _ipl_blk) \
200 static ssize_t sys_##_prefix##_##_name##_store(struct kobject *kobj, \
201 struct kobj_attribute *attr, \
202 const char *buf, size_t len) \
204 unsigned long long ssid, devno; \
206 if (sscanf(buf, "0.%llx.%llx\n", &ssid, &devno) != 2) \
209 if (ssid > __MAX_SSID || devno > __MAX_SUBCHANNEL) \
212 _ipl_blk.ssid = ssid; \
213 _ipl_blk.devno = devno; \
217 #define DEFINE_IPL_CCW_ATTR_RW(_prefix, _name, _ipl_blk) \
218 IPL_ATTR_SHOW_FN(_prefix, _name, "0.%x.%04x\n", \
219 _ipl_blk.ssid, _ipl_blk.devno); \
220 IPL_ATTR_CCW_STORE_FN(_prefix, _name, _ipl_blk); \
221 static struct kobj_attribute sys_##_prefix##_##_name##_attr = \
222 __ATTR(_name, (S_IRUGO | S_IWUSR), \
223 sys_##_prefix##_##_name##_show, \
224 sys_##_prefix##_##_name##_store) \
226 #define DEFINE_IPL_ATTR_RO(_prefix, _name, _format, _value) \
227 IPL_ATTR_SHOW_FN(_prefix, _name, _format, _value) \
228 static struct kobj_attribute sys_##_prefix##_##_name##_attr = \
229 __ATTR(_name, S_IRUGO, sys_##_prefix##_##_name##_show, NULL)
231 #define DEFINE_IPL_ATTR_RW(_prefix, _name, _fmt_out, _fmt_in, _value) \
232 IPL_ATTR_SHOW_FN(_prefix, _name, _fmt_out, (unsigned long long) _value) \
233 static ssize_t sys_##_prefix##_##_name##_store(struct kobject *kobj, \
234 struct kobj_attribute *attr, \
235 const char *buf, size_t len) \
237 unsigned long long value; \
238 if (sscanf(buf, _fmt_in, &value) != 1) \
243 static struct kobj_attribute sys_##_prefix##_##_name##_attr = \
244 __ATTR(_name,(S_IRUGO | S_IWUSR), \
245 sys_##_prefix##_##_name##_show, \
246 sys_##_prefix##_##_name##_store)
248 #define DEFINE_IPL_ATTR_STR_RW(_prefix, _name, _fmt_out, _fmt_in, _value)\
249 IPL_ATTR_SHOW_FN(_prefix, _name, _fmt_out, _value) \
250 static ssize_t sys_##_prefix##_##_name##_store(struct kobject *kobj, \
251 struct kobj_attribute *attr, \
252 const char *buf, size_t len) \
254 strncpy(_value, buf, sizeof(_value) - 1); \
258 static struct kobj_attribute sys_##_prefix##_##_name##_attr = \
259 __ATTR(_name,(S_IRUGO | S_IWUSR), \
260 sys_##_prefix##_##_name##_show, \
261 sys_##_prefix##_##_name##_store)
263 static void make_attrs_ro(struct attribute **attrs)
266 (*attrs)->mode = S_IRUGO;
275 static __init enum ipl_type get_ipl_type(void)
277 struct ipl_parameter_block *ipl = IPL_PARMBLOCK_START;
279 if (!(ipl_flags & IPL_DEVNO_VALID))
280 return IPL_TYPE_UNKNOWN;
281 if (!(ipl_flags & IPL_PARMBLOCK_VALID))
283 if (ipl->hdr.version > IPL_MAX_SUPPORTED_VERSION)
284 return IPL_TYPE_UNKNOWN;
285 if (ipl->hdr.pbt != DIAG308_IPL_TYPE_FCP)
286 return IPL_TYPE_UNKNOWN;
287 if (ipl->ipl_info.fcp.opt == DIAG308_IPL_OPT_DUMP)
288 return IPL_TYPE_FCP_DUMP;
292 struct ipl_info ipl_info;
293 EXPORT_SYMBOL_GPL(ipl_info);
295 static ssize_t ipl_type_show(struct kobject *kobj, struct kobj_attribute *attr,
298 return sprintf(page, "%s\n", ipl_type_str(ipl_info.type));
301 static struct kobj_attribute sys_ipl_type_attr = __ATTR_RO(ipl_type);
303 /* VM IPL PARM routines */
304 static size_t reipl_get_ascii_vmparm(char *dest, size_t size,
305 const struct ipl_parameter_block *ipb)
309 char has_lowercase = 0;
312 if ((ipb->ipl_info.ccw.vm_flags & DIAG308_VM_FLAGS_VP_VALID) &&
313 (ipb->ipl_info.ccw.vm_parm_len > 0)) {
315 len = min_t(size_t, size - 1, ipb->ipl_info.ccw.vm_parm_len);
316 memcpy(dest, ipb->ipl_info.ccw.vm_parm, len);
317 /* If at least one character is lowercase, we assume mixed
318 * case; otherwise we convert everything to lowercase.
320 for (i = 0; i < len; i++)
321 if ((dest[i] > 0x80 && dest[i] < 0x8a) || /* a-i */
322 (dest[i] > 0x90 && dest[i] < 0x9a) || /* j-r */
323 (dest[i] > 0xa1 && dest[i] < 0xaa)) { /* s-z */
328 EBC_TOLOWER(dest, len);
336 size_t append_ipl_vmparm(char *dest, size_t size)
341 if (diag308_set_works && (ipl_block.hdr.pbt == DIAG308_IPL_TYPE_CCW))
342 rc = reipl_get_ascii_vmparm(dest, size, &ipl_block);
348 static ssize_t ipl_vm_parm_show(struct kobject *kobj,
349 struct kobj_attribute *attr, char *page)
351 char parm[DIAG308_VMPARM_SIZE + 1] = {};
353 append_ipl_vmparm(parm, sizeof(parm));
354 return sprintf(page, "%s\n", parm);
357 static size_t scpdata_length(const char* buf, size_t count)
360 if (buf[count - 1] != '\0' && buf[count - 1] != ' ')
367 static size_t reipl_append_ascii_scpdata(char *dest, size_t size,
368 const struct ipl_parameter_block *ipb)
374 count = min(size - 1, scpdata_length(ipb->ipl_info.fcp.scp_data,
375 ipb->ipl_info.fcp.scp_data_len));
380 for (i = 0; i < count; i++) {
381 if (!isascii(ipb->ipl_info.fcp.scp_data[i])) {
385 if (!has_lowercase && islower(ipb->ipl_info.fcp.scp_data[i]))
390 memcpy(dest, ipb->ipl_info.fcp.scp_data, count);
392 for (i = 0; i < count; i++)
393 dest[i] = tolower(ipb->ipl_info.fcp.scp_data[i]);
399 size_t append_ipl_scpdata(char *dest, size_t len)
404 if (ipl_block.hdr.pbt == DIAG308_IPL_TYPE_FCP)
405 rc = reipl_append_ascii_scpdata(dest, len, &ipl_block);
412 static struct kobj_attribute sys_ipl_vm_parm_attr =
413 __ATTR(parm, S_IRUGO, ipl_vm_parm_show, NULL);
415 static ssize_t sys_ipl_device_show(struct kobject *kobj,
416 struct kobj_attribute *attr, char *page)
418 struct ipl_parameter_block *ipl = IPL_PARMBLOCK_START;
420 switch (ipl_info.type) {
422 return sprintf(page, "0.%x.%04x\n", ipl_ssid, ipl_devno);
424 case IPL_TYPE_FCP_DUMP:
425 return sprintf(page, "0.0.%04x\n", ipl->ipl_info.fcp.devno);
431 static struct kobj_attribute sys_ipl_device_attr =
432 __ATTR(device, S_IRUGO, sys_ipl_device_show, NULL);
434 static ssize_t ipl_parameter_read(struct file *filp, struct kobject *kobj,
435 struct bin_attribute *attr, char *buf,
436 loff_t off, size_t count)
438 return memory_read_from_buffer(buf, count, &off, IPL_PARMBLOCK_START,
441 static struct bin_attribute ipl_parameter_attr =
442 __BIN_ATTR(binary_parameter, S_IRUGO, ipl_parameter_read, NULL,
445 static ssize_t ipl_scp_data_read(struct file *filp, struct kobject *kobj,
446 struct bin_attribute *attr, char *buf,
447 loff_t off, size_t count)
449 unsigned int size = IPL_PARMBLOCK_START->ipl_info.fcp.scp_data_len;
450 void *scp_data = &IPL_PARMBLOCK_START->ipl_info.fcp.scp_data;
452 return memory_read_from_buffer(buf, count, &off, scp_data, size);
454 static struct bin_attribute ipl_scp_data_attr =
455 __BIN_ATTR(scp_data, S_IRUGO, ipl_scp_data_read, NULL, PAGE_SIZE);
457 static struct bin_attribute *ipl_fcp_bin_attrs[] = {
463 /* FCP ipl device attributes */
465 DEFINE_IPL_ATTR_RO(ipl_fcp, wwpn, "0x%016llx\n", (unsigned long long)
466 IPL_PARMBLOCK_START->ipl_info.fcp.wwpn);
467 DEFINE_IPL_ATTR_RO(ipl_fcp, lun, "0x%016llx\n", (unsigned long long)
468 IPL_PARMBLOCK_START->ipl_info.fcp.lun);
469 DEFINE_IPL_ATTR_RO(ipl_fcp, bootprog, "%lld\n", (unsigned long long)
470 IPL_PARMBLOCK_START->ipl_info.fcp.bootprog);
471 DEFINE_IPL_ATTR_RO(ipl_fcp, br_lba, "%lld\n", (unsigned long long)
472 IPL_PARMBLOCK_START->ipl_info.fcp.br_lba);
474 static ssize_t ipl_ccw_loadparm_show(struct kobject *kobj,
475 struct kobj_attribute *attr, char *page)
477 char loadparm[LOADPARM_LEN + 1] = {};
479 if (!sclp_ipl_info.is_valid)
480 return sprintf(page, "#unknown#\n");
481 memcpy(loadparm, &sclp_ipl_info.loadparm, LOADPARM_LEN);
482 EBCASC(loadparm, LOADPARM_LEN);
484 return sprintf(page, "%s\n", loadparm);
487 static struct kobj_attribute sys_ipl_ccw_loadparm_attr =
488 __ATTR(loadparm, 0444, ipl_ccw_loadparm_show, NULL);
490 static struct attribute *ipl_fcp_attrs[] = {
491 &sys_ipl_type_attr.attr,
492 &sys_ipl_device_attr.attr,
493 &sys_ipl_fcp_wwpn_attr.attr,
494 &sys_ipl_fcp_lun_attr.attr,
495 &sys_ipl_fcp_bootprog_attr.attr,
496 &sys_ipl_fcp_br_lba_attr.attr,
497 &sys_ipl_ccw_loadparm_attr.attr,
501 static struct attribute_group ipl_fcp_attr_group = {
502 .attrs = ipl_fcp_attrs,
503 .bin_attrs = ipl_fcp_bin_attrs,
506 /* CCW ipl device attributes */
508 static struct attribute *ipl_ccw_attrs_vm[] = {
509 &sys_ipl_type_attr.attr,
510 &sys_ipl_device_attr.attr,
511 &sys_ipl_ccw_loadparm_attr.attr,
512 &sys_ipl_vm_parm_attr.attr,
516 static struct attribute *ipl_ccw_attrs_lpar[] = {
517 &sys_ipl_type_attr.attr,
518 &sys_ipl_device_attr.attr,
519 &sys_ipl_ccw_loadparm_attr.attr,
523 static struct attribute_group ipl_ccw_attr_group_vm = {
524 .attrs = ipl_ccw_attrs_vm,
527 static struct attribute_group ipl_ccw_attr_group_lpar = {
528 .attrs = ipl_ccw_attrs_lpar
531 /* UNKNOWN ipl device attributes */
533 static struct attribute *ipl_unknown_attrs[] = {
534 &sys_ipl_type_attr.attr,
538 static struct attribute_group ipl_unknown_attr_group = {
539 .attrs = ipl_unknown_attrs,
542 static struct kset *ipl_kset;
544 static void __ipl_run(void *unused)
546 diag308(DIAG308_LOAD_CLEAR, NULL);
548 __cpcmd("IPL", NULL, 0, NULL);
549 else if (ipl_info.type == IPL_TYPE_CCW)
550 reipl_ccw_dev(&ipl_info.data.ccw.dev_id);
553 static void ipl_run(struct shutdown_trigger *trigger)
555 smp_call_ipl_cpu(__ipl_run, NULL);
558 static int __init ipl_init(void)
562 ipl_kset = kset_create_and_add("ipl", NULL, firmware_kobj);
567 switch (ipl_info.type) {
570 rc = sysfs_create_group(&ipl_kset->kobj,
571 &ipl_ccw_attr_group_vm);
573 rc = sysfs_create_group(&ipl_kset->kobj,
574 &ipl_ccw_attr_group_lpar);
577 case IPL_TYPE_FCP_DUMP:
578 rc = sysfs_create_group(&ipl_kset->kobj, &ipl_fcp_attr_group);
581 rc = sysfs_create_group(&ipl_kset->kobj,
582 &ipl_unknown_attr_group);
587 panic("ipl_init failed: rc = %i\n", rc);
592 static struct shutdown_action __refdata ipl_action = {
593 .name = SHUTDOWN_ACTION_IPL_STR,
599 * reipl shutdown action: Reboot Linux on shutdown.
602 /* VM IPL PARM attributes */
603 static ssize_t reipl_generic_vmparm_show(struct ipl_parameter_block *ipb,
606 char vmparm[DIAG308_VMPARM_SIZE + 1] = {};
608 reipl_get_ascii_vmparm(vmparm, sizeof(vmparm), ipb);
609 return sprintf(page, "%s\n", vmparm);
612 static ssize_t reipl_generic_vmparm_store(struct ipl_parameter_block *ipb,
614 const char *buf, size_t len)
618 /* ignore trailing newline */
620 if ((len > 0) && (buf[len - 1] == '\n'))
623 if (ip_len > vmparm_max)
626 /* parm is used to store kernel options, check for common chars */
627 for (i = 0; i < ip_len; i++)
628 if (!(isalnum(buf[i]) || isascii(buf[i]) || isprint(buf[i])))
631 memset(ipb->ipl_info.ccw.vm_parm, 0, DIAG308_VMPARM_SIZE);
632 ipb->ipl_info.ccw.vm_parm_len = ip_len;
634 ipb->ipl_info.ccw.vm_flags |= DIAG308_VM_FLAGS_VP_VALID;
635 memcpy(ipb->ipl_info.ccw.vm_parm, buf, ip_len);
636 ASCEBC(ipb->ipl_info.ccw.vm_parm, ip_len);
638 ipb->ipl_info.ccw.vm_flags &= ~DIAG308_VM_FLAGS_VP_VALID;
645 static ssize_t reipl_nss_vmparm_show(struct kobject *kobj,
646 struct kobj_attribute *attr, char *page)
648 return reipl_generic_vmparm_show(reipl_block_nss, page);
651 static ssize_t reipl_nss_vmparm_store(struct kobject *kobj,
652 struct kobj_attribute *attr,
653 const char *buf, size_t len)
655 return reipl_generic_vmparm_store(reipl_block_nss, 56, buf, len);
659 static ssize_t reipl_ccw_vmparm_show(struct kobject *kobj,
660 struct kobj_attribute *attr, char *page)
662 return reipl_generic_vmparm_show(reipl_block_ccw, page);
665 static ssize_t reipl_ccw_vmparm_store(struct kobject *kobj,
666 struct kobj_attribute *attr,
667 const char *buf, size_t len)
669 return reipl_generic_vmparm_store(reipl_block_ccw, 64, buf, len);
672 static struct kobj_attribute sys_reipl_nss_vmparm_attr =
673 __ATTR(parm, S_IRUGO | S_IWUSR, reipl_nss_vmparm_show,
674 reipl_nss_vmparm_store);
675 static struct kobj_attribute sys_reipl_ccw_vmparm_attr =
676 __ATTR(parm, S_IRUGO | S_IWUSR, reipl_ccw_vmparm_show,
677 reipl_ccw_vmparm_store);
679 /* FCP reipl device attributes */
681 static ssize_t reipl_fcp_scpdata_read(struct file *filp, struct kobject *kobj,
682 struct bin_attribute *attr,
683 char *buf, loff_t off, size_t count)
685 size_t size = reipl_block_fcp->ipl_info.fcp.scp_data_len;
686 void *scp_data = reipl_block_fcp->ipl_info.fcp.scp_data;
688 return memory_read_from_buffer(buf, count, &off, scp_data, size);
691 static ssize_t reipl_fcp_scpdata_write(struct file *filp, struct kobject *kobj,
692 struct bin_attribute *attr,
693 char *buf, loff_t off, size_t count)
695 size_t scpdata_len = count;
702 memcpy(reipl_block_fcp->ipl_info.fcp.scp_data, buf, count);
703 if (scpdata_len % 8) {
704 padding = 8 - (scpdata_len % 8);
705 memset(reipl_block_fcp->ipl_info.fcp.scp_data + scpdata_len,
707 scpdata_len += padding;
710 reipl_block_fcp->ipl_info.fcp.scp_data_len = scpdata_len;
711 reipl_block_fcp->hdr.len = IPL_PARM_BLK_FCP_LEN + scpdata_len;
712 reipl_block_fcp->hdr.blk0_len = IPL_PARM_BLK0_FCP_LEN + scpdata_len;
716 static struct bin_attribute sys_reipl_fcp_scp_data_attr =
717 __BIN_ATTR(scp_data, (S_IRUGO | S_IWUSR), reipl_fcp_scpdata_read,
718 reipl_fcp_scpdata_write, DIAG308_SCPDATA_SIZE);
720 static struct bin_attribute *reipl_fcp_bin_attrs[] = {
721 &sys_reipl_fcp_scp_data_attr,
725 DEFINE_IPL_ATTR_RW(reipl_fcp, wwpn, "0x%016llx\n", "%llx\n",
726 reipl_block_fcp->ipl_info.fcp.wwpn);
727 DEFINE_IPL_ATTR_RW(reipl_fcp, lun, "0x%016llx\n", "%llx\n",
728 reipl_block_fcp->ipl_info.fcp.lun);
729 DEFINE_IPL_ATTR_RW(reipl_fcp, bootprog, "%lld\n", "%lld\n",
730 reipl_block_fcp->ipl_info.fcp.bootprog);
731 DEFINE_IPL_ATTR_RW(reipl_fcp, br_lba, "%lld\n", "%lld\n",
732 reipl_block_fcp->ipl_info.fcp.br_lba);
733 DEFINE_IPL_ATTR_RW(reipl_fcp, device, "0.0.%04llx\n", "0.0.%llx\n",
734 reipl_block_fcp->ipl_info.fcp.devno);
736 static void reipl_get_ascii_loadparm(char *loadparm,
737 struct ipl_parameter_block *ibp)
739 memcpy(loadparm, ibp->hdr.loadparm, LOADPARM_LEN);
740 EBCASC(loadparm, LOADPARM_LEN);
741 loadparm[LOADPARM_LEN] = 0;
745 static ssize_t reipl_generic_loadparm_show(struct ipl_parameter_block *ipb,
748 char buf[LOADPARM_LEN + 1];
750 reipl_get_ascii_loadparm(buf, ipb);
751 return sprintf(page, "%s\n", buf);
754 static ssize_t reipl_generic_loadparm_store(struct ipl_parameter_block *ipb,
755 const char *buf, size_t len)
759 /* ignore trailing newline */
761 if ((len > 0) && (buf[len - 1] == '\n'))
763 /* loadparm can have max 8 characters and must not start with a blank */
764 if ((lp_len > LOADPARM_LEN) || ((lp_len > 0) && (buf[0] == ' ')))
766 /* loadparm can only contain "a-z,A-Z,0-9,SP,." */
767 for (i = 0; i < lp_len; i++) {
768 if (isalpha(buf[i]) || isdigit(buf[i]) || (buf[i] == ' ') ||
773 /* initialize loadparm with blanks */
774 memset(ipb->hdr.loadparm, ' ', LOADPARM_LEN);
775 /* copy and convert to ebcdic */
776 memcpy(ipb->hdr.loadparm, buf, lp_len);
777 ASCEBC(ipb->hdr.loadparm, LOADPARM_LEN);
782 static ssize_t reipl_fcp_loadparm_show(struct kobject *kobj,
783 struct kobj_attribute *attr, char *page)
785 return reipl_generic_loadparm_show(reipl_block_fcp, page);
788 static ssize_t reipl_fcp_loadparm_store(struct kobject *kobj,
789 struct kobj_attribute *attr,
790 const char *buf, size_t len)
792 return reipl_generic_loadparm_store(reipl_block_fcp, buf, len);
795 static struct kobj_attribute sys_reipl_fcp_loadparm_attr =
796 __ATTR(loadparm, S_IRUGO | S_IWUSR, reipl_fcp_loadparm_show,
797 reipl_fcp_loadparm_store);
799 static struct attribute *reipl_fcp_attrs[] = {
800 &sys_reipl_fcp_device_attr.attr,
801 &sys_reipl_fcp_wwpn_attr.attr,
802 &sys_reipl_fcp_lun_attr.attr,
803 &sys_reipl_fcp_bootprog_attr.attr,
804 &sys_reipl_fcp_br_lba_attr.attr,
805 &sys_reipl_fcp_loadparm_attr.attr,
809 static struct attribute_group reipl_fcp_attr_group = {
810 .attrs = reipl_fcp_attrs,
811 .bin_attrs = reipl_fcp_bin_attrs,
814 /* CCW reipl device attributes */
815 DEFINE_IPL_CCW_ATTR_RW(reipl_ccw, device, reipl_block_ccw->ipl_info.ccw);
818 static ssize_t reipl_nss_loadparm_show(struct kobject *kobj,
819 struct kobj_attribute *attr, char *page)
821 return reipl_generic_loadparm_show(reipl_block_nss, page);
824 static ssize_t reipl_nss_loadparm_store(struct kobject *kobj,
825 struct kobj_attribute *attr,
826 const char *buf, size_t len)
828 return reipl_generic_loadparm_store(reipl_block_nss, buf, len);
832 static ssize_t reipl_ccw_loadparm_show(struct kobject *kobj,
833 struct kobj_attribute *attr, char *page)
835 return reipl_generic_loadparm_show(reipl_block_ccw, page);
838 static ssize_t reipl_ccw_loadparm_store(struct kobject *kobj,
839 struct kobj_attribute *attr,
840 const char *buf, size_t len)
842 return reipl_generic_loadparm_store(reipl_block_ccw, buf, len);
845 static struct kobj_attribute sys_reipl_ccw_loadparm_attr =
846 __ATTR(loadparm, S_IRUGO | S_IWUSR, reipl_ccw_loadparm_show,
847 reipl_ccw_loadparm_store);
849 static struct attribute *reipl_ccw_attrs_vm[] = {
850 &sys_reipl_ccw_device_attr.attr,
851 &sys_reipl_ccw_loadparm_attr.attr,
852 &sys_reipl_ccw_vmparm_attr.attr,
856 static struct attribute *reipl_ccw_attrs_lpar[] = {
857 &sys_reipl_ccw_device_attr.attr,
858 &sys_reipl_ccw_loadparm_attr.attr,
862 static struct attribute_group reipl_ccw_attr_group_vm = {
864 .attrs = reipl_ccw_attrs_vm,
867 static struct attribute_group reipl_ccw_attr_group_lpar = {
869 .attrs = reipl_ccw_attrs_lpar,
873 /* NSS reipl device attributes */
874 static void reipl_get_ascii_nss_name(char *dst,
875 struct ipl_parameter_block *ipb)
877 memcpy(dst, ipb->ipl_info.ccw.nss_name, NSS_NAME_SIZE);
878 EBCASC(dst, NSS_NAME_SIZE);
879 dst[NSS_NAME_SIZE] = 0;
882 static ssize_t reipl_nss_name_show(struct kobject *kobj,
883 struct kobj_attribute *attr, char *page)
885 char nss_name[NSS_NAME_SIZE + 1] = {};
887 reipl_get_ascii_nss_name(nss_name, reipl_block_nss);
888 return sprintf(page, "%s\n", nss_name);
891 static ssize_t reipl_nss_name_store(struct kobject *kobj,
892 struct kobj_attribute *attr,
893 const char *buf, size_t len)
897 /* ignore trailing newline */
899 if ((len > 0) && (buf[len - 1] == '\n'))
902 if (nss_len > NSS_NAME_SIZE)
905 memset(reipl_block_nss->ipl_info.ccw.nss_name, 0x40, NSS_NAME_SIZE);
907 reipl_block_nss->ipl_info.ccw.vm_flags |=
908 DIAG308_VM_FLAGS_NSS_VALID;
909 memcpy(reipl_block_nss->ipl_info.ccw.nss_name, buf, nss_len);
910 ASCEBC(reipl_block_nss->ipl_info.ccw.nss_name, nss_len);
911 EBC_TOUPPER(reipl_block_nss->ipl_info.ccw.nss_name, nss_len);
913 reipl_block_nss->ipl_info.ccw.vm_flags &=
914 ~DIAG308_VM_FLAGS_NSS_VALID;
920 static struct kobj_attribute sys_reipl_nss_name_attr =
921 __ATTR(name, S_IRUGO | S_IWUSR, reipl_nss_name_show,
922 reipl_nss_name_store);
924 static struct kobj_attribute sys_reipl_nss_loadparm_attr =
925 __ATTR(loadparm, S_IRUGO | S_IWUSR, reipl_nss_loadparm_show,
926 reipl_nss_loadparm_store);
928 static struct attribute *reipl_nss_attrs[] = {
929 &sys_reipl_nss_name_attr.attr,
930 &sys_reipl_nss_loadparm_attr.attr,
931 &sys_reipl_nss_vmparm_attr.attr,
935 static struct attribute_group reipl_nss_attr_group = {
937 .attrs = reipl_nss_attrs,
940 static void set_reipl_block_actual(struct ipl_parameter_block *reipl_block)
942 reipl_block_actual = reipl_block;
943 os_info_entry_add(OS_INFO_REIPL_BLOCK, reipl_block_actual,
944 reipl_block->hdr.len);
949 static int reipl_set_type(enum ipl_type type)
951 if (!(reipl_capabilities & type))
956 if (diag308_set_works)
957 reipl_method = REIPL_METHOD_CCW_DIAG;
958 else if (MACHINE_IS_VM)
959 reipl_method = REIPL_METHOD_CCW_VM;
961 reipl_method = REIPL_METHOD_CCW_CIO;
962 set_reipl_block_actual(reipl_block_ccw);
965 if (diag308_set_works)
966 reipl_method = REIPL_METHOD_FCP_RW_DIAG;
967 else if (MACHINE_IS_VM)
968 reipl_method = REIPL_METHOD_FCP_RO_VM;
970 reipl_method = REIPL_METHOD_FCP_RO_DIAG;
971 set_reipl_block_actual(reipl_block_fcp);
973 case IPL_TYPE_FCP_DUMP:
974 reipl_method = REIPL_METHOD_FCP_DUMP;
977 if (diag308_set_works)
978 reipl_method = REIPL_METHOD_NSS_DIAG;
980 reipl_method = REIPL_METHOD_NSS;
981 set_reipl_block_actual(reipl_block_nss);
983 case IPL_TYPE_UNKNOWN:
984 reipl_method = REIPL_METHOD_DEFAULT;
993 static ssize_t reipl_type_show(struct kobject *kobj,
994 struct kobj_attribute *attr, char *page)
996 return sprintf(page, "%s\n", ipl_type_str(reipl_type));
999 static ssize_t reipl_type_store(struct kobject *kobj,
1000 struct kobj_attribute *attr,
1001 const char *buf, size_t len)
1005 if (strncmp(buf, IPL_CCW_STR, strlen(IPL_CCW_STR)) == 0)
1006 rc = reipl_set_type(IPL_TYPE_CCW);
1007 else if (strncmp(buf, IPL_FCP_STR, strlen(IPL_FCP_STR)) == 0)
1008 rc = reipl_set_type(IPL_TYPE_FCP);
1009 else if (strncmp(buf, IPL_NSS_STR, strlen(IPL_NSS_STR)) == 0)
1010 rc = reipl_set_type(IPL_TYPE_NSS);
1011 return (rc != 0) ? rc : len;
1014 static struct kobj_attribute reipl_type_attr =
1015 __ATTR(reipl_type, 0644, reipl_type_show, reipl_type_store);
1017 static struct kset *reipl_kset;
1018 static struct kset *reipl_fcp_kset;
1020 static void get_ipl_string(char *dst, struct ipl_parameter_block *ipb,
1021 const enum ipl_method m)
1023 char loadparm[LOADPARM_LEN + 1] = {};
1024 char vmparm[DIAG308_VMPARM_SIZE + 1] = {};
1025 char nss_name[NSS_NAME_SIZE + 1] = {};
1028 reipl_get_ascii_loadparm(loadparm, ipb);
1029 reipl_get_ascii_nss_name(nss_name, ipb);
1030 reipl_get_ascii_vmparm(vmparm, sizeof(vmparm), ipb);
1033 case REIPL_METHOD_CCW_VM:
1034 pos = sprintf(dst, "IPL %X CLEAR", ipb->ipl_info.ccw.devno);
1036 case REIPL_METHOD_NSS:
1037 pos = sprintf(dst, "IPL %s", nss_name);
1042 if (strlen(loadparm) > 0)
1043 pos += sprintf(dst + pos, " LOADPARM '%s'", loadparm);
1044 if (strlen(vmparm) > 0)
1045 sprintf(dst + pos, " PARM %s", vmparm);
1048 static void __reipl_run(void *unused)
1050 struct ccw_dev_id devid;
1051 static char buf[128];
1053 switch (reipl_method) {
1054 case REIPL_METHOD_CCW_CIO:
1055 devid.ssid = reipl_block_ccw->ipl_info.ccw.ssid;
1056 devid.devno = reipl_block_ccw->ipl_info.ccw.devno;
1057 reipl_ccw_dev(&devid);
1059 case REIPL_METHOD_CCW_VM:
1060 get_ipl_string(buf, reipl_block_ccw, REIPL_METHOD_CCW_VM);
1061 __cpcmd(buf, NULL, 0, NULL);
1063 case REIPL_METHOD_CCW_DIAG:
1064 diag308(DIAG308_SET, reipl_block_ccw);
1065 diag308(DIAG308_LOAD_CLEAR, NULL);
1067 case REIPL_METHOD_FCP_RW_DIAG:
1068 diag308(DIAG308_SET, reipl_block_fcp);
1069 diag308(DIAG308_LOAD_CLEAR, NULL);
1071 case REIPL_METHOD_FCP_RO_DIAG:
1072 diag308(DIAG308_LOAD_CLEAR, NULL);
1074 case REIPL_METHOD_FCP_RO_VM:
1075 __cpcmd("IPL", NULL, 0, NULL);
1077 case REIPL_METHOD_NSS_DIAG:
1078 diag308(DIAG308_SET, reipl_block_nss);
1079 diag308(DIAG308_LOAD_CLEAR, NULL);
1081 case REIPL_METHOD_NSS:
1082 get_ipl_string(buf, reipl_block_nss, REIPL_METHOD_NSS);
1083 __cpcmd(buf, NULL, 0, NULL);
1085 case REIPL_METHOD_DEFAULT:
1087 __cpcmd("IPL", NULL, 0, NULL);
1088 diag308(DIAG308_LOAD_CLEAR, NULL);
1090 case REIPL_METHOD_FCP_DUMP:
1093 disabled_wait((unsigned long) __builtin_return_address(0));
1096 static void reipl_run(struct shutdown_trigger *trigger)
1098 smp_call_ipl_cpu(__reipl_run, NULL);
1101 static void reipl_block_ccw_init(struct ipl_parameter_block *ipb)
1103 ipb->hdr.len = IPL_PARM_BLK_CCW_LEN;
1104 ipb->hdr.version = IPL_PARM_BLOCK_VERSION;
1105 ipb->hdr.blk0_len = IPL_PARM_BLK0_CCW_LEN;
1106 ipb->hdr.pbt = DIAG308_IPL_TYPE_CCW;
1109 static void reipl_block_ccw_fill_parms(struct ipl_parameter_block *ipb)
1112 /* check if read scp info worked and set loadparm */
1113 if (sclp_ipl_info.is_valid)
1114 memcpy(ipb->hdr.loadparm, &sclp_ipl_info.loadparm, LOADPARM_LEN);
1116 /* read scp info failed: set empty loadparm (EBCDIC blanks) */
1117 memset(ipb->hdr.loadparm, 0x40, LOADPARM_LEN);
1118 ipb->hdr.flags = DIAG308_FLAGS_LP_VALID;
1121 if (MACHINE_IS_VM && diag308_set_works &&
1122 (ipl_block.ipl_info.ccw.vm_flags & DIAG308_VM_FLAGS_VP_VALID)) {
1124 ipb->ipl_info.ccw.vm_flags |= DIAG308_VM_FLAGS_VP_VALID;
1125 ipb->ipl_info.ccw.vm_parm_len =
1126 ipl_block.ipl_info.ccw.vm_parm_len;
1127 memcpy(ipb->ipl_info.ccw.vm_parm,
1128 ipl_block.ipl_info.ccw.vm_parm, DIAG308_VMPARM_SIZE);
1132 static int __init reipl_nss_init(void)
1139 reipl_block_nss = (void *) get_zeroed_page(GFP_KERNEL);
1140 if (!reipl_block_nss)
1143 if (!diag308_set_works)
1144 sys_reipl_nss_vmparm_attr.attr.mode = S_IRUGO;
1146 rc = sysfs_create_group(&reipl_kset->kobj, &reipl_nss_attr_group);
1150 reipl_block_ccw_init(reipl_block_nss);
1151 reipl_capabilities |= IPL_TYPE_NSS;
1155 static int __init reipl_ccw_init(void)
1159 reipl_block_ccw = (void *) get_zeroed_page(GFP_KERNEL);
1160 if (!reipl_block_ccw)
1163 if (MACHINE_IS_VM) {
1164 if (!diag308_set_works)
1165 sys_reipl_ccw_vmparm_attr.attr.mode = S_IRUGO;
1166 rc = sysfs_create_group(&reipl_kset->kobj,
1167 &reipl_ccw_attr_group_vm);
1169 if(!diag308_set_works)
1170 sys_reipl_ccw_loadparm_attr.attr.mode = S_IRUGO;
1171 rc = sysfs_create_group(&reipl_kset->kobj,
1172 &reipl_ccw_attr_group_lpar);
1177 reipl_block_ccw_init(reipl_block_ccw);
1178 if (ipl_info.type == IPL_TYPE_CCW) {
1179 reipl_block_ccw->ipl_info.ccw.ssid = ipl_ssid;
1180 reipl_block_ccw->ipl_info.ccw.devno = ipl_devno;
1181 reipl_block_ccw_fill_parms(reipl_block_ccw);
1184 reipl_capabilities |= IPL_TYPE_CCW;
1188 static int __init reipl_fcp_init(void)
1192 if (!diag308_set_works) {
1193 if (ipl_info.type == IPL_TYPE_FCP) {
1194 make_attrs_ro(reipl_fcp_attrs);
1195 sys_reipl_fcp_scp_data_attr.attr.mode = S_IRUGO;
1200 reipl_block_fcp = (void *) get_zeroed_page(GFP_KERNEL);
1201 if (!reipl_block_fcp)
1204 /* sysfs: create fcp kset for mixing attr group and bin attrs */
1205 reipl_fcp_kset = kset_create_and_add(IPL_FCP_STR, NULL,
1207 if (!reipl_fcp_kset) {
1208 free_page((unsigned long) reipl_block_fcp);
1212 rc = sysfs_create_group(&reipl_fcp_kset->kobj, &reipl_fcp_attr_group);
1214 kset_unregister(reipl_fcp_kset);
1215 free_page((unsigned long) reipl_block_fcp);
1219 if (ipl_info.type == IPL_TYPE_FCP) {
1220 memcpy(reipl_block_fcp, IPL_PARMBLOCK_START, PAGE_SIZE);
1222 * Fix loadparm: There are systems where the (SCSI) LOADPARM
1223 * is invalid in the SCSI IPL parameter block, so take it
1224 * always from sclp_ipl_info.
1226 memcpy(reipl_block_fcp->hdr.loadparm, sclp_ipl_info.loadparm,
1229 reipl_block_fcp->hdr.len = IPL_PARM_BLK_FCP_LEN;
1230 reipl_block_fcp->hdr.version = IPL_PARM_BLOCK_VERSION;
1231 reipl_block_fcp->hdr.blk0_len = IPL_PARM_BLK0_FCP_LEN;
1232 reipl_block_fcp->hdr.pbt = DIAG308_IPL_TYPE_FCP;
1233 reipl_block_fcp->ipl_info.fcp.opt = DIAG308_IPL_OPT_IPL;
1235 reipl_capabilities |= IPL_TYPE_FCP;
1239 static int __init reipl_type_init(void)
1241 enum ipl_type reipl_type = ipl_info.type;
1242 struct ipl_parameter_block *reipl_block;
1245 reipl_block = os_info_old_entry(OS_INFO_REIPL_BLOCK, &size);
1249 * If we have an OS info reipl block, this will be used
1251 if (reipl_block->hdr.pbt == DIAG308_IPL_TYPE_FCP) {
1252 memcpy(reipl_block_fcp, reipl_block, size);
1253 reipl_type = IPL_TYPE_FCP;
1254 } else if (reipl_block->hdr.pbt == DIAG308_IPL_TYPE_CCW) {
1255 memcpy(reipl_block_ccw, reipl_block, size);
1256 reipl_type = IPL_TYPE_CCW;
1259 return reipl_set_type(reipl_type);
1262 static int __init reipl_init(void)
1266 reipl_kset = kset_create_and_add("reipl", NULL, firmware_kobj);
1269 rc = sysfs_create_file(&reipl_kset->kobj, &reipl_type_attr.attr);
1271 kset_unregister(reipl_kset);
1274 rc = reipl_ccw_init();
1277 rc = reipl_fcp_init();
1280 rc = reipl_nss_init();
1283 return reipl_type_init();
1286 static struct shutdown_action __refdata reipl_action = {
1287 .name = SHUTDOWN_ACTION_REIPL_STR,
1293 * dump shutdown action: Dump Linux on shutdown.
1296 /* FCP dump device attributes */
1298 DEFINE_IPL_ATTR_RW(dump_fcp, wwpn, "0x%016llx\n", "%llx\n",
1299 dump_block_fcp->ipl_info.fcp.wwpn);
1300 DEFINE_IPL_ATTR_RW(dump_fcp, lun, "0x%016llx\n", "%llx\n",
1301 dump_block_fcp->ipl_info.fcp.lun);
1302 DEFINE_IPL_ATTR_RW(dump_fcp, bootprog, "%lld\n", "%lld\n",
1303 dump_block_fcp->ipl_info.fcp.bootprog);
1304 DEFINE_IPL_ATTR_RW(dump_fcp, br_lba, "%lld\n", "%lld\n",
1305 dump_block_fcp->ipl_info.fcp.br_lba);
1306 DEFINE_IPL_ATTR_RW(dump_fcp, device, "0.0.%04llx\n", "0.0.%llx\n",
1307 dump_block_fcp->ipl_info.fcp.devno);
1309 static struct attribute *dump_fcp_attrs[] = {
1310 &sys_dump_fcp_device_attr.attr,
1311 &sys_dump_fcp_wwpn_attr.attr,
1312 &sys_dump_fcp_lun_attr.attr,
1313 &sys_dump_fcp_bootprog_attr.attr,
1314 &sys_dump_fcp_br_lba_attr.attr,
1318 static struct attribute_group dump_fcp_attr_group = {
1319 .name = IPL_FCP_STR,
1320 .attrs = dump_fcp_attrs,
1323 /* CCW dump device attributes */
1324 DEFINE_IPL_CCW_ATTR_RW(dump_ccw, device, dump_block_ccw->ipl_info.ccw);
1326 static struct attribute *dump_ccw_attrs[] = {
1327 &sys_dump_ccw_device_attr.attr,
1331 static struct attribute_group dump_ccw_attr_group = {
1332 .name = IPL_CCW_STR,
1333 .attrs = dump_ccw_attrs,
1338 static int dump_set_type(enum dump_type type)
1340 if (!(dump_capabilities & type))
1344 if (diag308_set_works)
1345 dump_method = DUMP_METHOD_CCW_DIAG;
1346 else if (MACHINE_IS_VM)
1347 dump_method = DUMP_METHOD_CCW_VM;
1349 dump_method = DUMP_METHOD_CCW_CIO;
1352 dump_method = DUMP_METHOD_FCP_DIAG;
1355 dump_method = DUMP_METHOD_NONE;
1361 static ssize_t dump_type_show(struct kobject *kobj,
1362 struct kobj_attribute *attr, char *page)
1364 return sprintf(page, "%s\n", dump_type_str(dump_type));
1367 static ssize_t dump_type_store(struct kobject *kobj,
1368 struct kobj_attribute *attr,
1369 const char *buf, size_t len)
1373 if (strncmp(buf, DUMP_NONE_STR, strlen(DUMP_NONE_STR)) == 0)
1374 rc = dump_set_type(DUMP_TYPE_NONE);
1375 else if (strncmp(buf, DUMP_CCW_STR, strlen(DUMP_CCW_STR)) == 0)
1376 rc = dump_set_type(DUMP_TYPE_CCW);
1377 else if (strncmp(buf, DUMP_FCP_STR, strlen(DUMP_FCP_STR)) == 0)
1378 rc = dump_set_type(DUMP_TYPE_FCP);
1379 return (rc != 0) ? rc : len;
1382 static struct kobj_attribute dump_type_attr =
1383 __ATTR(dump_type, 0644, dump_type_show, dump_type_store);
1385 static struct kset *dump_kset;
1387 static void diag308_dump(void *dump_block)
1389 diag308(DIAG308_SET, dump_block);
1391 if (diag308(DIAG308_LOAD_NORMAL_DUMP, NULL) != 0x302)
1393 udelay_simple(USEC_PER_SEC);
1397 static void __dump_run(void *unused)
1399 struct ccw_dev_id devid;
1400 static char buf[100];
1402 switch (dump_method) {
1403 case DUMP_METHOD_CCW_CIO:
1404 devid.ssid = dump_block_ccw->ipl_info.ccw.ssid;
1405 devid.devno = dump_block_ccw->ipl_info.ccw.devno;
1406 reipl_ccw_dev(&devid);
1408 case DUMP_METHOD_CCW_VM:
1409 sprintf(buf, "STORE STATUS");
1410 __cpcmd(buf, NULL, 0, NULL);
1411 sprintf(buf, "IPL %X", dump_block_ccw->ipl_info.ccw.devno);
1412 __cpcmd(buf, NULL, 0, NULL);
1414 case DUMP_METHOD_CCW_DIAG:
1415 diag308_dump(dump_block_ccw);
1417 case DUMP_METHOD_FCP_DIAG:
1418 diag308_dump(dump_block_fcp);
1425 static void dump_run(struct shutdown_trigger *trigger)
1427 if (dump_method == DUMP_METHOD_NONE)
1430 smp_call_ipl_cpu(__dump_run, NULL);
1433 static int __init dump_ccw_init(void)
1437 dump_block_ccw = (void *) get_zeroed_page(GFP_KERNEL);
1438 if (!dump_block_ccw)
1440 rc = sysfs_create_group(&dump_kset->kobj, &dump_ccw_attr_group);
1442 free_page((unsigned long)dump_block_ccw);
1445 dump_block_ccw->hdr.len = IPL_PARM_BLK_CCW_LEN;
1446 dump_block_ccw->hdr.version = IPL_PARM_BLOCK_VERSION;
1447 dump_block_ccw->hdr.blk0_len = IPL_PARM_BLK0_CCW_LEN;
1448 dump_block_ccw->hdr.pbt = DIAG308_IPL_TYPE_CCW;
1449 dump_capabilities |= DUMP_TYPE_CCW;
1453 static int __init dump_fcp_init(void)
1457 if (!sclp_ipl_info.has_dump)
1458 return 0; /* LDIPL DUMP is not installed */
1459 if (!diag308_set_works)
1461 dump_block_fcp = (void *) get_zeroed_page(GFP_KERNEL);
1462 if (!dump_block_fcp)
1464 rc = sysfs_create_group(&dump_kset->kobj, &dump_fcp_attr_group);
1466 free_page((unsigned long)dump_block_fcp);
1469 dump_block_fcp->hdr.len = IPL_PARM_BLK_FCP_LEN;
1470 dump_block_fcp->hdr.version = IPL_PARM_BLOCK_VERSION;
1471 dump_block_fcp->hdr.blk0_len = IPL_PARM_BLK0_FCP_LEN;
1472 dump_block_fcp->hdr.pbt = DIAG308_IPL_TYPE_FCP;
1473 dump_block_fcp->ipl_info.fcp.opt = DIAG308_IPL_OPT_DUMP;
1474 dump_capabilities |= DUMP_TYPE_FCP;
1478 static int __init dump_init(void)
1482 dump_kset = kset_create_and_add("dump", NULL, firmware_kobj);
1485 rc = sysfs_create_file(&dump_kset->kobj, &dump_type_attr.attr);
1487 kset_unregister(dump_kset);
1490 rc = dump_ccw_init();
1493 rc = dump_fcp_init();
1496 dump_set_type(DUMP_TYPE_NONE);
1500 static struct shutdown_action __refdata dump_action = {
1501 .name = SHUTDOWN_ACTION_DUMP_STR,
1506 static void dump_reipl_run(struct shutdown_trigger *trigger)
1508 unsigned long ipib = (unsigned long) reipl_block_actual;
1511 csum = (__force unsigned int)
1512 csum_partial(reipl_block_actual, reipl_block_actual->hdr.len, 0);
1513 mem_assign_absolute(S390_lowcore.ipib, ipib);
1514 mem_assign_absolute(S390_lowcore.ipib_checksum, csum);
1518 static int __init dump_reipl_init(void)
1520 if (!diag308_set_works)
1526 static struct shutdown_action __refdata dump_reipl_action = {
1527 .name = SHUTDOWN_ACTION_DUMP_REIPL_STR,
1528 .fn = dump_reipl_run,
1529 .init = dump_reipl_init,
1533 * vmcmd shutdown action: Trigger vm command on shutdown.
1536 static char vmcmd_on_reboot[128];
1537 static char vmcmd_on_panic[128];
1538 static char vmcmd_on_halt[128];
1539 static char vmcmd_on_poff[128];
1540 static char vmcmd_on_restart[128];
1542 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_reboot, "%s\n", "%s\n", vmcmd_on_reboot);
1543 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_panic, "%s\n", "%s\n", vmcmd_on_panic);
1544 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_halt, "%s\n", "%s\n", vmcmd_on_halt);
1545 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_poff, "%s\n", "%s\n", vmcmd_on_poff);
1546 DEFINE_IPL_ATTR_STR_RW(vmcmd, on_restart, "%s\n", "%s\n", vmcmd_on_restart);
1548 static struct attribute *vmcmd_attrs[] = {
1549 &sys_vmcmd_on_reboot_attr.attr,
1550 &sys_vmcmd_on_panic_attr.attr,
1551 &sys_vmcmd_on_halt_attr.attr,
1552 &sys_vmcmd_on_poff_attr.attr,
1553 &sys_vmcmd_on_restart_attr.attr,
1557 static struct attribute_group vmcmd_attr_group = {
1558 .attrs = vmcmd_attrs,
1561 static struct kset *vmcmd_kset;
1563 static void vmcmd_run(struct shutdown_trigger *trigger)
1567 if (strcmp(trigger->name, ON_REIPL_STR) == 0)
1568 cmd = vmcmd_on_reboot;
1569 else if (strcmp(trigger->name, ON_PANIC_STR) == 0)
1570 cmd = vmcmd_on_panic;
1571 else if (strcmp(trigger->name, ON_HALT_STR) == 0)
1572 cmd = vmcmd_on_halt;
1573 else if (strcmp(trigger->name, ON_POFF_STR) == 0)
1574 cmd = vmcmd_on_poff;
1575 else if (strcmp(trigger->name, ON_RESTART_STR) == 0)
1576 cmd = vmcmd_on_restart;
1580 if (strlen(cmd) == 0)
1582 __cpcmd(cmd, NULL, 0, NULL);
1585 static int vmcmd_init(void)
1589 vmcmd_kset = kset_create_and_add("vmcmd", NULL, firmware_kobj);
1592 return sysfs_create_group(&vmcmd_kset->kobj, &vmcmd_attr_group);
1595 static struct shutdown_action vmcmd_action = {SHUTDOWN_ACTION_VMCMD_STR,
1596 vmcmd_run, vmcmd_init};
1599 * stop shutdown action: Stop Linux on shutdown.
1602 static void stop_run(struct shutdown_trigger *trigger)
1604 if (strcmp(trigger->name, ON_PANIC_STR) == 0 ||
1605 strcmp(trigger->name, ON_RESTART_STR) == 0)
1606 disabled_wait((unsigned long) __builtin_return_address(0));
1610 static struct shutdown_action stop_action = {SHUTDOWN_ACTION_STOP_STR,
1615 static struct shutdown_action *shutdown_actions_list[] = {
1616 &ipl_action, &reipl_action, &dump_reipl_action, &dump_action,
1617 &vmcmd_action, &stop_action};
1618 #define SHUTDOWN_ACTIONS_COUNT (sizeof(shutdown_actions_list) / sizeof(void *))
1624 static struct kset *shutdown_actions_kset;
1626 static int set_trigger(const char *buf, struct shutdown_trigger *trigger,
1631 for (i = 0; i < SHUTDOWN_ACTIONS_COUNT; i++) {
1632 if (sysfs_streq(buf, shutdown_actions_list[i]->name)) {
1633 if (shutdown_actions_list[i]->init_rc) {
1634 return shutdown_actions_list[i]->init_rc;
1636 trigger->action = shutdown_actions_list[i];
1646 static struct shutdown_trigger on_reboot_trigger = {ON_REIPL_STR,
1649 static ssize_t on_reboot_show(struct kobject *kobj,
1650 struct kobj_attribute *attr, char *page)
1652 return sprintf(page, "%s\n", on_reboot_trigger.action->name);
1655 static ssize_t on_reboot_store(struct kobject *kobj,
1656 struct kobj_attribute *attr,
1657 const char *buf, size_t len)
1659 return set_trigger(buf, &on_reboot_trigger, len);
1661 static struct kobj_attribute on_reboot_attr = __ATTR_RW(on_reboot);
1663 static void do_machine_restart(char *__unused)
1666 on_reboot_trigger.action->fn(&on_reboot_trigger);
1669 void (*_machine_restart)(char *command) = do_machine_restart;
1673 static struct shutdown_trigger on_panic_trigger = {ON_PANIC_STR, &stop_action};
1675 static ssize_t on_panic_show(struct kobject *kobj,
1676 struct kobj_attribute *attr, char *page)
1678 return sprintf(page, "%s\n", on_panic_trigger.action->name);
1681 static ssize_t on_panic_store(struct kobject *kobj,
1682 struct kobj_attribute *attr,
1683 const char *buf, size_t len)
1685 return set_trigger(buf, &on_panic_trigger, len);
1687 static struct kobj_attribute on_panic_attr = __ATTR_RW(on_panic);
1689 static void do_panic(void)
1692 on_panic_trigger.action->fn(&on_panic_trigger);
1693 stop_run(&on_panic_trigger);
1698 static struct shutdown_trigger on_restart_trigger = {ON_RESTART_STR,
1701 static ssize_t on_restart_show(struct kobject *kobj,
1702 struct kobj_attribute *attr, char *page)
1704 return sprintf(page, "%s\n", on_restart_trigger.action->name);
1707 static ssize_t on_restart_store(struct kobject *kobj,
1708 struct kobj_attribute *attr,
1709 const char *buf, size_t len)
1711 return set_trigger(buf, &on_restart_trigger, len);
1713 static struct kobj_attribute on_restart_attr = __ATTR_RW(on_restart);
1715 static void __do_restart(void *ignore)
1717 __arch_local_irq_stosm(0x04); /* enable DAT */
1719 #ifdef CONFIG_CRASH_DUMP
1722 on_restart_trigger.action->fn(&on_restart_trigger);
1723 stop_run(&on_restart_trigger);
1726 void do_restart(void)
1731 smp_call_online_cpu(__do_restart, NULL);
1736 static struct shutdown_trigger on_halt_trigger = {ON_HALT_STR, &stop_action};
1738 static ssize_t on_halt_show(struct kobject *kobj,
1739 struct kobj_attribute *attr, char *page)
1741 return sprintf(page, "%s\n", on_halt_trigger.action->name);
1744 static ssize_t on_halt_store(struct kobject *kobj,
1745 struct kobj_attribute *attr,
1746 const char *buf, size_t len)
1748 return set_trigger(buf, &on_halt_trigger, len);
1750 static struct kobj_attribute on_halt_attr = __ATTR_RW(on_halt);
1752 static void do_machine_halt(void)
1755 on_halt_trigger.action->fn(&on_halt_trigger);
1756 stop_run(&on_halt_trigger);
1758 void (*_machine_halt)(void) = do_machine_halt;
1762 static struct shutdown_trigger on_poff_trigger = {ON_POFF_STR, &stop_action};
1764 static ssize_t on_poff_show(struct kobject *kobj,
1765 struct kobj_attribute *attr, char *page)
1767 return sprintf(page, "%s\n", on_poff_trigger.action->name);
1770 static ssize_t on_poff_store(struct kobject *kobj,
1771 struct kobj_attribute *attr,
1772 const char *buf, size_t len)
1774 return set_trigger(buf, &on_poff_trigger, len);
1776 static struct kobj_attribute on_poff_attr = __ATTR_RW(on_poff);
1778 static void do_machine_power_off(void)
1781 on_poff_trigger.action->fn(&on_poff_trigger);
1782 stop_run(&on_poff_trigger);
1784 void (*_machine_power_off)(void) = do_machine_power_off;
1786 static struct attribute *shutdown_action_attrs[] = {
1787 &on_restart_attr.attr,
1788 &on_reboot_attr.attr,
1789 &on_panic_attr.attr,
1795 static struct attribute_group shutdown_action_attr_group = {
1796 .attrs = shutdown_action_attrs,
1799 static void __init shutdown_triggers_init(void)
1801 shutdown_actions_kset = kset_create_and_add("shutdown_actions", NULL,
1803 if (!shutdown_actions_kset)
1805 if (sysfs_create_group(&shutdown_actions_kset->kobj,
1806 &shutdown_action_attr_group))
1810 panic("shutdown_triggers_init failed\n");
1813 static void __init shutdown_actions_init(void)
1817 for (i = 0; i < SHUTDOWN_ACTIONS_COUNT; i++) {
1818 if (!shutdown_actions_list[i]->init)
1820 shutdown_actions_list[i]->init_rc =
1821 shutdown_actions_list[i]->init();
1825 static int __init s390_ipl_init(void)
1827 char str[8] = {0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40, 0x40};
1829 sclp_early_get_ipl_info(&sclp_ipl_info);
1831 * Fix loadparm: There are systems where the (SCSI) LOADPARM
1832 * returned by read SCP info is invalid (contains EBCDIC blanks)
1833 * when the system has been booted via diag308. In that case we use
1834 * the value from diag308, if available.
1836 * There are also systems where diag308 store does not work in
1837 * case the system is booted from HMC. Fortunately in this case
1838 * READ SCP info provides the correct value.
1840 if (memcmp(sclp_ipl_info.loadparm, str, sizeof(str)) == 0 &&
1842 memcpy(sclp_ipl_info.loadparm, ipl_block.hdr.loadparm,
1844 shutdown_actions_init();
1845 shutdown_triggers_init();
1849 __initcall(s390_ipl_init);
1851 static void __init strncpy_skip_quote(char *dst, char *src, int n)
1856 for (sx = 0; src[sx] != 0; sx++) {
1859 dst[dx++] = src[sx];
1865 static int __init vmcmd_on_reboot_setup(char *str)
1869 strncpy_skip_quote(vmcmd_on_reboot, str, 127);
1870 vmcmd_on_reboot[127] = 0;
1871 on_reboot_trigger.action = &vmcmd_action;
1874 __setup("vmreboot=", vmcmd_on_reboot_setup);
1876 static int __init vmcmd_on_panic_setup(char *str)
1880 strncpy_skip_quote(vmcmd_on_panic, str, 127);
1881 vmcmd_on_panic[127] = 0;
1882 on_panic_trigger.action = &vmcmd_action;
1885 __setup("vmpanic=", vmcmd_on_panic_setup);
1887 static int __init vmcmd_on_halt_setup(char *str)
1891 strncpy_skip_quote(vmcmd_on_halt, str, 127);
1892 vmcmd_on_halt[127] = 0;
1893 on_halt_trigger.action = &vmcmd_action;
1896 __setup("vmhalt=", vmcmd_on_halt_setup);
1898 static int __init vmcmd_on_poff_setup(char *str)
1902 strncpy_skip_quote(vmcmd_on_poff, str, 127);
1903 vmcmd_on_poff[127] = 0;
1904 on_poff_trigger.action = &vmcmd_action;
1907 __setup("vmpoff=", vmcmd_on_poff_setup);
1909 static int on_panic_notify(struct notifier_block *self,
1910 unsigned long event, void *data)
1916 static struct notifier_block on_panic_nb = {
1917 .notifier_call = on_panic_notify,
1918 .priority = INT_MIN,
1921 void __init setup_ipl(void)
1923 ipl_info.type = get_ipl_type();
1924 switch (ipl_info.type) {
1926 ipl_info.data.ccw.dev_id.ssid = ipl_ssid;
1927 ipl_info.data.ccw.dev_id.devno = ipl_devno;
1930 case IPL_TYPE_FCP_DUMP:
1931 ipl_info.data.fcp.dev_id.ssid = 0;
1932 ipl_info.data.fcp.dev_id.devno =
1933 IPL_PARMBLOCK_START->ipl_info.fcp.devno;
1934 ipl_info.data.fcp.wwpn = IPL_PARMBLOCK_START->ipl_info.fcp.wwpn;
1935 ipl_info.data.fcp.lun = IPL_PARMBLOCK_START->ipl_info.fcp.lun;
1938 case IPL_TYPE_UNKNOWN:
1939 /* We have no info to copy */
1942 atomic_notifier_chain_register(&panic_notifier_list, &on_panic_nb);
1945 void __init ipl_update_parameters(void)
1949 rc = diag308(DIAG308_STORE, &ipl_block);
1950 if ((rc == DIAG308_RC_OK) || (rc == DIAG308_RC_NOCONFIG))
1951 diag308_set_works = 1;
1954 void __init ipl_verify_parameters(void)
1956 struct cio_iplinfo iplinfo;
1958 if (cio_get_iplinfo(&iplinfo))
1961 ipl_ssid = iplinfo.ssid;
1962 ipl_devno = iplinfo.devno;
1963 ipl_flags |= IPL_DEVNO_VALID;
1964 if (!iplinfo.is_qdio)
1966 ipl_flags |= IPL_PARMBLOCK_VALID;
1969 static LIST_HEAD(rcall);
1970 static DEFINE_MUTEX(rcall_mutex);
1972 void register_reset_call(struct reset_call *reset)
1974 mutex_lock(&rcall_mutex);
1975 list_add(&reset->list, &rcall);
1976 mutex_unlock(&rcall_mutex);
1978 EXPORT_SYMBOL_GPL(register_reset_call);
1980 void unregister_reset_call(struct reset_call *reset)
1982 mutex_lock(&rcall_mutex);
1983 list_del(&reset->list);
1984 mutex_unlock(&rcall_mutex);
1986 EXPORT_SYMBOL_GPL(unregister_reset_call);
1988 static void do_reset_calls(void)
1990 struct reset_call *reset;
1992 if (diag308_set_works) {
1996 list_for_each_entry(reset, &rcall, list)
2000 void s390_reset_system(void)
2004 lc = (struct lowcore *)(unsigned long) store_prefix();
2006 /* Stack for interrupt/machine check handler */
2007 lc->panic_stack = S390_lowcore.panic_stack;
2009 /* Disable prefixing */
2012 /* Disable lowcore protection */
2013 __ctl_clear_bit(0,28);
2015 /* Set new machine check handler */
2016 S390_lowcore.mcck_new_psw.mask = PSW_KERNEL_BITS | PSW_MASK_DAT;
2017 S390_lowcore.mcck_new_psw.addr =
2018 (unsigned long) s390_base_mcck_handler;
2020 /* Set new program check handler */
2021 S390_lowcore.program_new_psw.mask = PSW_KERNEL_BITS | PSW_MASK_DAT;
2022 S390_lowcore.program_new_psw.addr =
2023 (unsigned long) s390_base_pgm_handler;