1 // SPDX-License-Identifier: GPL-2.0
2 #include <linux/init.h>
3 #include <linux/ctype.h>
4 #include <asm/ebcdic.h>
6 #include <asm/sections.h>
7 #include <asm/boot_data.h>
8 #include <asm/facility.h>
11 char __bootdata(early_command_line)[COMMAND_LINE_SIZE];
12 struct ipl_parameter_block __bootdata(early_ipl_block);
13 int __bootdata(early_ipl_block_valid);
15 unsigned long __bootdata(memory_end);
16 int __bootdata(memory_end_set);
17 int __bootdata(noexec_disabled);
19 static inline int __diag308(unsigned long subcode, void *addr)
21 register unsigned long _addr asm("0") = (unsigned long)addr;
22 register unsigned long _rc asm("1") = 0;
23 unsigned long reg1, reg2;
24 psw_t old = S390_lowcore.program_new_psw;
29 " st %1,%[psw_pgm]+4\n"
31 " stg %0,%[psw_pgm]+8\n"
32 " diag %[addr],%[subcode],0x308\n"
34 : "=&d" (reg1), "=&a" (reg2),
35 [psw_pgm] "=Q" (S390_lowcore.program_new_psw),
36 [addr] "+d" (_addr), "+d" (_rc)
37 : [subcode] "d" (subcode)
39 S390_lowcore.program_new_psw = old;
43 void store_ipl_parmblock(void)
47 rc = __diag308(DIAG308_STORE, &early_ipl_block);
48 if (rc == DIAG308_RC_OK &&
49 early_ipl_block.hdr.version <= IPL_MAX_SUPPORTED_VERSION)
50 early_ipl_block_valid = 1;
53 static size_t scpdata_length(const char *buf, size_t count)
56 if (buf[count - 1] != '\0' && buf[count - 1] != ' ')
63 static size_t ipl_block_get_ascii_scpdata(char *dest, size_t size,
64 const struct ipl_parameter_block *ipb)
70 count = min(size - 1, scpdata_length(ipb->ipl_info.fcp.scp_data,
71 ipb->ipl_info.fcp.scp_data_len));
76 for (i = 0; i < count; i++) {
77 if (!isascii(ipb->ipl_info.fcp.scp_data[i])) {
81 if (!has_lowercase && islower(ipb->ipl_info.fcp.scp_data[i]))
86 memcpy(dest, ipb->ipl_info.fcp.scp_data, count);
88 for (i = 0; i < count; i++)
89 dest[i] = tolower(ipb->ipl_info.fcp.scp_data[i]);
95 static void append_ipl_block_parm(void)
100 len = strlen(early_command_line);
102 delim = early_command_line + len; /* '\0' character position */
103 parm = early_command_line + len + 1; /* append right after '\0' */
105 switch (early_ipl_block.hdr.pbt) {
106 case DIAG308_IPL_TYPE_CCW:
107 rc = ipl_block_get_ascii_vmparm(
108 parm, COMMAND_LINE_SIZE - len - 1, &early_ipl_block);
110 case DIAG308_IPL_TYPE_FCP:
111 rc = ipl_block_get_ascii_scpdata(
112 parm, COMMAND_LINE_SIZE - len - 1, &early_ipl_block);
117 memmove(early_command_line, parm + 1, rc);
119 *delim = ' '; /* replace '\0' with space */
123 static inline int has_ebcdic_char(const char *str)
127 for (i = 0; str[i]; i++)
133 void setup_boot_command_line(void)
135 COMMAND_LINE[ARCH_COMMAND_LINE_SIZE - 1] = 0;
136 /* convert arch command line to ascii if necessary */
137 if (has_ebcdic_char(COMMAND_LINE))
138 EBCASC(COMMAND_LINE, ARCH_COMMAND_LINE_SIZE);
139 /* copy arch command line */
140 strcpy(early_command_line, strim(COMMAND_LINE));
142 /* append IPL PARM data to the boot command line */
143 if (early_ipl_block_valid)
144 append_ipl_block_parm();
147 static void modify_facility(unsigned long nr, bool clear)
150 __clear_facility(nr, S390_lowcore.stfle_fac_list);
152 __set_facility(nr, S390_lowcore.stfle_fac_list);
155 static void modify_fac_list(char *str)
157 unsigned long val, endval;
167 val = simple_strtoull(str, &endp, 0);
173 endval = simple_strtoull(str, &endp, 0);
177 while (val <= endval) {
178 modify_facility(val, clear);
182 modify_facility(val, clear);
190 static char command_line_buf[COMMAND_LINE_SIZE] __section(.data);
191 void parse_boot_command_line(void)
198 args = strcpy(command_line_buf, early_command_line);
200 args = next_arg(args, ¶m, &val);
202 if (!strcmp(param, "mem")) {
203 memory_end = memparse(val, NULL);
207 if (!strcmp(param, "noexec")) {
208 rc = kstrtobool(val, &enabled);
213 if (!strcmp(param, "facilities"))
214 modify_fac_list(val);
218 void setup_memory_end(void)
220 #ifdef CONFIG_CRASH_DUMP
221 if (!OLDMEM_BASE && early_ipl_block_valid &&
222 early_ipl_block.hdr.pbt == DIAG308_IPL_TYPE_FCP &&
223 early_ipl_block.ipl_info.fcp.opt == DIAG308_IPL_OPT_DUMP) {
224 if (!sclp_early_get_hsa_size(&memory_end) && memory_end)