149698745SVasily Gorbik // SPDX-License-Identifier: GPL-2.0 249698745SVasily Gorbik #include <linux/init.h> 349698745SVasily Gorbik #include <linux/ctype.h> 449698745SVasily Gorbik #include <asm/ebcdic.h> 549698745SVasily Gorbik #include <asm/sclp.h> 649698745SVasily Gorbik #include <asm/sections.h> 749698745SVasily Gorbik #include <asm/boot_data.h> 8b5e80459SVasily Gorbik #include <asm/facility.h> 949698745SVasily Gorbik #include "boot.h" 1049698745SVasily Gorbik 1149698745SVasily Gorbik char __bootdata(early_command_line)[COMMAND_LINE_SIZE]; 1249698745SVasily Gorbik struct ipl_parameter_block __bootdata(early_ipl_block); 1349698745SVasily Gorbik int __bootdata(early_ipl_block_valid); 1449698745SVasily Gorbik 1549698745SVasily Gorbik unsigned long __bootdata(memory_end); 1649698745SVasily Gorbik int __bootdata(memory_end_set); 17d58106c3SVasily Gorbik int __bootdata(noexec_disabled); 1849698745SVasily Gorbik 1949698745SVasily Gorbik static inline int __diag308(unsigned long subcode, void *addr) 2049698745SVasily Gorbik { 2149698745SVasily Gorbik register unsigned long _addr asm("0") = (unsigned long)addr; 2249698745SVasily Gorbik register unsigned long _rc asm("1") = 0; 2349698745SVasily Gorbik unsigned long reg1, reg2; 2449698745SVasily Gorbik psw_t old = S390_lowcore.program_new_psw; 2549698745SVasily Gorbik 2649698745SVasily Gorbik asm volatile( 2749698745SVasily Gorbik " epsw %0,%1\n" 2849698745SVasily Gorbik " st %0,%[psw_pgm]\n" 2949698745SVasily Gorbik " st %1,%[psw_pgm]+4\n" 3049698745SVasily Gorbik " larl %0,1f\n" 3149698745SVasily Gorbik " stg %0,%[psw_pgm]+8\n" 3249698745SVasily Gorbik " diag %[addr],%[subcode],0x308\n" 3349698745SVasily Gorbik "1: nopr %%r7\n" 3449698745SVasily Gorbik : "=&d" (reg1), "=&a" (reg2), 3549698745SVasily Gorbik [psw_pgm] "=Q" (S390_lowcore.program_new_psw), 3649698745SVasily Gorbik [addr] "+d" (_addr), "+d" (_rc) 3749698745SVasily Gorbik : [subcode] "d" (subcode) 3849698745SVasily Gorbik : "cc", "memory"); 3949698745SVasily Gorbik S390_lowcore.program_new_psw = old; 4049698745SVasily Gorbik return _rc; 4149698745SVasily Gorbik } 4249698745SVasily Gorbik 4349698745SVasily Gorbik void store_ipl_parmblock(void) 4449698745SVasily Gorbik { 4549698745SVasily Gorbik int rc; 4649698745SVasily Gorbik 4749698745SVasily Gorbik rc = __diag308(DIAG308_STORE, &early_ipl_block); 4849698745SVasily Gorbik if (rc == DIAG308_RC_OK && 4949698745SVasily Gorbik early_ipl_block.hdr.version <= IPL_MAX_SUPPORTED_VERSION) 5049698745SVasily Gorbik early_ipl_block_valid = 1; 5149698745SVasily Gorbik } 5249698745SVasily Gorbik 5349698745SVasily Gorbik static size_t scpdata_length(const char *buf, size_t count) 5449698745SVasily Gorbik { 5549698745SVasily Gorbik while (count) { 5649698745SVasily Gorbik if (buf[count - 1] != '\0' && buf[count - 1] != ' ') 5749698745SVasily Gorbik break; 5849698745SVasily Gorbik count--; 5949698745SVasily Gorbik } 6049698745SVasily Gorbik return count; 6149698745SVasily Gorbik } 6249698745SVasily Gorbik 6349698745SVasily Gorbik static size_t ipl_block_get_ascii_scpdata(char *dest, size_t size, 6449698745SVasily Gorbik const struct ipl_parameter_block *ipb) 6549698745SVasily Gorbik { 6649698745SVasily Gorbik size_t count; 6749698745SVasily Gorbik size_t i; 6849698745SVasily Gorbik int has_lowercase; 6949698745SVasily Gorbik 7049698745SVasily Gorbik count = min(size - 1, scpdata_length(ipb->ipl_info.fcp.scp_data, 7149698745SVasily Gorbik ipb->ipl_info.fcp.scp_data_len)); 7249698745SVasily Gorbik if (!count) 7349698745SVasily Gorbik goto out; 7449698745SVasily Gorbik 7549698745SVasily Gorbik has_lowercase = 0; 7649698745SVasily Gorbik for (i = 0; i < count; i++) { 7749698745SVasily Gorbik if (!isascii(ipb->ipl_info.fcp.scp_data[i])) { 7849698745SVasily Gorbik count = 0; 7949698745SVasily Gorbik goto out; 8049698745SVasily Gorbik } 8149698745SVasily Gorbik if (!has_lowercase && islower(ipb->ipl_info.fcp.scp_data[i])) 8249698745SVasily Gorbik has_lowercase = 1; 8349698745SVasily Gorbik } 8449698745SVasily Gorbik 8549698745SVasily Gorbik if (has_lowercase) 8649698745SVasily Gorbik memcpy(dest, ipb->ipl_info.fcp.scp_data, count); 8749698745SVasily Gorbik else 8849698745SVasily Gorbik for (i = 0; i < count; i++) 8949698745SVasily Gorbik dest[i] = tolower(ipb->ipl_info.fcp.scp_data[i]); 9049698745SVasily Gorbik out: 9149698745SVasily Gorbik dest[count] = '\0'; 9249698745SVasily Gorbik return count; 9349698745SVasily Gorbik } 9449698745SVasily Gorbik 9549698745SVasily Gorbik static void append_ipl_block_parm(void) 9649698745SVasily Gorbik { 9749698745SVasily Gorbik char *parm, *delim; 9849698745SVasily Gorbik size_t len, rc = 0; 9949698745SVasily Gorbik 10049698745SVasily Gorbik len = strlen(early_command_line); 10149698745SVasily Gorbik 10249698745SVasily Gorbik delim = early_command_line + len; /* '\0' character position */ 10349698745SVasily Gorbik parm = early_command_line + len + 1; /* append right after '\0' */ 10449698745SVasily Gorbik 10549698745SVasily Gorbik switch (early_ipl_block.hdr.pbt) { 10649698745SVasily Gorbik case DIAG308_IPL_TYPE_CCW: 10749698745SVasily Gorbik rc = ipl_block_get_ascii_vmparm( 10849698745SVasily Gorbik parm, COMMAND_LINE_SIZE - len - 1, &early_ipl_block); 10949698745SVasily Gorbik break; 11049698745SVasily Gorbik case DIAG308_IPL_TYPE_FCP: 11149698745SVasily Gorbik rc = ipl_block_get_ascii_scpdata( 11249698745SVasily Gorbik parm, COMMAND_LINE_SIZE - len - 1, &early_ipl_block); 11349698745SVasily Gorbik break; 11449698745SVasily Gorbik } 11549698745SVasily Gorbik if (rc) { 11649698745SVasily Gorbik if (*parm == '=') 11749698745SVasily Gorbik memmove(early_command_line, parm + 1, rc); 11849698745SVasily Gorbik else 11949698745SVasily Gorbik *delim = ' '; /* replace '\0' with space */ 12049698745SVasily Gorbik } 12149698745SVasily Gorbik } 12249698745SVasily Gorbik 12349698745SVasily Gorbik static inline int has_ebcdic_char(const char *str) 12449698745SVasily Gorbik { 12549698745SVasily Gorbik int i; 12649698745SVasily Gorbik 12749698745SVasily Gorbik for (i = 0; str[i]; i++) 12849698745SVasily Gorbik if (str[i] & 0x80) 12949698745SVasily Gorbik return 1; 13049698745SVasily Gorbik return 0; 13149698745SVasily Gorbik } 13249698745SVasily Gorbik 13349698745SVasily Gorbik void setup_boot_command_line(void) 13449698745SVasily Gorbik { 13549698745SVasily Gorbik COMMAND_LINE[ARCH_COMMAND_LINE_SIZE - 1] = 0; 13649698745SVasily Gorbik /* convert arch command line to ascii if necessary */ 13749698745SVasily Gorbik if (has_ebcdic_char(COMMAND_LINE)) 13849698745SVasily Gorbik EBCASC(COMMAND_LINE, ARCH_COMMAND_LINE_SIZE); 13949698745SVasily Gorbik /* copy arch command line */ 14049698745SVasily Gorbik strcpy(early_command_line, strim(COMMAND_LINE)); 14149698745SVasily Gorbik 14249698745SVasily Gorbik /* append IPL PARM data to the boot command line */ 14349698745SVasily Gorbik if (early_ipl_block_valid) 14449698745SVasily Gorbik append_ipl_block_parm(); 14549698745SVasily Gorbik } 14649698745SVasily Gorbik 147b5e80459SVasily Gorbik static void modify_facility(unsigned long nr, bool clear) 148b5e80459SVasily Gorbik { 149b5e80459SVasily Gorbik if (clear) 150b5e80459SVasily Gorbik __clear_facility(nr, S390_lowcore.stfle_fac_list); 151b5e80459SVasily Gorbik else 152b5e80459SVasily Gorbik __set_facility(nr, S390_lowcore.stfle_fac_list); 153b5e80459SVasily Gorbik } 154b5e80459SVasily Gorbik 155b5e80459SVasily Gorbik static void modify_fac_list(char *str) 156b5e80459SVasily Gorbik { 157b5e80459SVasily Gorbik unsigned long val, endval; 158b5e80459SVasily Gorbik char *endp; 159b5e80459SVasily Gorbik bool clear; 160b5e80459SVasily Gorbik 161b5e80459SVasily Gorbik while (*str) { 162b5e80459SVasily Gorbik clear = false; 163b5e80459SVasily Gorbik if (*str == '!') { 164b5e80459SVasily Gorbik clear = true; 165b5e80459SVasily Gorbik str++; 166b5e80459SVasily Gorbik } 167b5e80459SVasily Gorbik val = simple_strtoull(str, &endp, 0); 168b5e80459SVasily Gorbik if (str == endp) 169b5e80459SVasily Gorbik break; 170b5e80459SVasily Gorbik str = endp; 171b5e80459SVasily Gorbik if (*str == '-') { 172b5e80459SVasily Gorbik str++; 173b5e80459SVasily Gorbik endval = simple_strtoull(str, &endp, 0); 174b5e80459SVasily Gorbik if (str == endp) 175b5e80459SVasily Gorbik break; 176b5e80459SVasily Gorbik str = endp; 177b5e80459SVasily Gorbik while (val <= endval) { 178b5e80459SVasily Gorbik modify_facility(val, clear); 179b5e80459SVasily Gorbik val++; 180b5e80459SVasily Gorbik } 181b5e80459SVasily Gorbik } else { 182b5e80459SVasily Gorbik modify_facility(val, clear); 183b5e80459SVasily Gorbik } 184b5e80459SVasily Gorbik if (*str != ',') 185b5e80459SVasily Gorbik break; 186b5e80459SVasily Gorbik str++; 187b5e80459SVasily Gorbik } 188b5e80459SVasily Gorbik } 189b5e80459SVasily Gorbik 19049698745SVasily Gorbik static char command_line_buf[COMMAND_LINE_SIZE] __section(.data); 191b5e80459SVasily Gorbik void parse_boot_command_line(void) 19249698745SVasily Gorbik { 19349698745SVasily Gorbik char *param, *val; 194d58106c3SVasily Gorbik bool enabled; 195d58106c3SVasily Gorbik char *args; 196d58106c3SVasily Gorbik int rc; 19749698745SVasily Gorbik 19849698745SVasily Gorbik args = strcpy(command_line_buf, early_command_line); 19949698745SVasily Gorbik while (*args) { 20049698745SVasily Gorbik args = next_arg(args, ¶m, &val); 20149698745SVasily Gorbik 20249698745SVasily Gorbik if (!strcmp(param, "mem")) { 20349698745SVasily Gorbik memory_end = memparse(val, NULL); 20449698745SVasily Gorbik memory_end_set = 1; 20549698745SVasily Gorbik } 206d58106c3SVasily Gorbik 207d58106c3SVasily Gorbik if (!strcmp(param, "noexec")) { 208d58106c3SVasily Gorbik rc = kstrtobool(val, &enabled); 209d58106c3SVasily Gorbik if (!rc && !enabled) 210d58106c3SVasily Gorbik noexec_disabled = 1; 211d58106c3SVasily Gorbik } 212b5e80459SVasily Gorbik 213b5e80459SVasily Gorbik if (!strcmp(param, "facilities")) 214b5e80459SVasily Gorbik modify_fac_list(val); 21549698745SVasily Gorbik } 21649698745SVasily Gorbik } 21749698745SVasily Gorbik 21849698745SVasily Gorbik void setup_memory_end(void) 21949698745SVasily Gorbik { 22049698745SVasily Gorbik #ifdef CONFIG_CRASH_DUMP 22149698745SVasily Gorbik if (!OLDMEM_BASE && early_ipl_block_valid && 22249698745SVasily Gorbik early_ipl_block.hdr.pbt == DIAG308_IPL_TYPE_FCP && 22349698745SVasily Gorbik early_ipl_block.ipl_info.fcp.opt == DIAG308_IPL_OPT_DUMP) { 22449698745SVasily Gorbik if (!sclp_early_get_hsa_size(&memory_end) && memory_end) 22549698745SVasily Gorbik memory_end_set = 1; 22649698745SVasily Gorbik } 22749698745SVasily Gorbik #endif 22849698745SVasily Gorbik } 229