149698745SVasily Gorbik // SPDX-License-Identifier: GPL-2.0 26d85dac2SVasily Gorbik #include <linux/kernel.h> 349698745SVasily Gorbik #include <linux/init.h> 449698745SVasily Gorbik #include <linux/ctype.h> 549698745SVasily Gorbik #include <asm/ebcdic.h> 649698745SVasily Gorbik #include <asm/sclp.h> 749698745SVasily Gorbik #include <asm/sections.h> 849698745SVasily Gorbik #include <asm/boot_data.h> 9b5e80459SVasily Gorbik #include <asm/facility.h> 10db9492ceSVasily Gorbik #include <asm/uv.h> 1149698745SVasily Gorbik #include "boot.h" 1249698745SVasily Gorbik 1349698745SVasily Gorbik char __bootdata(early_command_line)[COMMAND_LINE_SIZE]; 141e941d39SVasily Gorbik struct ipl_parameter_block __bootdata_preserved(ipl_block); 151e941d39SVasily Gorbik int __bootdata_preserved(ipl_block_valid); 1649698745SVasily Gorbik 1749698745SVasily Gorbik unsigned long __bootdata(memory_end); 1849698745SVasily Gorbik int __bootdata(memory_end_set); 19d58106c3SVasily Gorbik int __bootdata(noexec_disabled); 2049698745SVasily Gorbik 21b2d24b97SGerald Schaefer int kaslr_enabled __section(.data); 22b2d24b97SGerald Schaefer 2349698745SVasily Gorbik static inline int __diag308(unsigned long subcode, void *addr) 2449698745SVasily Gorbik { 2549698745SVasily Gorbik register unsigned long _addr asm("0") = (unsigned long)addr; 2649698745SVasily Gorbik register unsigned long _rc asm("1") = 0; 2749698745SVasily Gorbik unsigned long reg1, reg2; 2849698745SVasily Gorbik psw_t old = S390_lowcore.program_new_psw; 2949698745SVasily Gorbik 3049698745SVasily Gorbik asm volatile( 3149698745SVasily Gorbik " epsw %0,%1\n" 3249698745SVasily Gorbik " st %0,%[psw_pgm]\n" 3349698745SVasily Gorbik " st %1,%[psw_pgm]+4\n" 3449698745SVasily Gorbik " larl %0,1f\n" 3549698745SVasily Gorbik " stg %0,%[psw_pgm]+8\n" 3649698745SVasily Gorbik " diag %[addr],%[subcode],0x308\n" 3749698745SVasily Gorbik "1: nopr %%r7\n" 3849698745SVasily Gorbik : "=&d" (reg1), "=&a" (reg2), 3949698745SVasily Gorbik [psw_pgm] "=Q" (S390_lowcore.program_new_psw), 4049698745SVasily Gorbik [addr] "+d" (_addr), "+d" (_rc) 4149698745SVasily Gorbik : [subcode] "d" (subcode) 4249698745SVasily Gorbik : "cc", "memory"); 4349698745SVasily Gorbik S390_lowcore.program_new_psw = old; 4449698745SVasily Gorbik return _rc; 4549698745SVasily Gorbik } 4649698745SVasily Gorbik 4749698745SVasily Gorbik void store_ipl_parmblock(void) 4849698745SVasily Gorbik { 4949698745SVasily Gorbik int rc; 5049698745SVasily Gorbik 51db9492ceSVasily Gorbik uv_set_shared(__pa(&ipl_block)); 521e941d39SVasily Gorbik rc = __diag308(DIAG308_STORE, &ipl_block); 53db9492ceSVasily Gorbik uv_remove_shared(__pa(&ipl_block)); 5449698745SVasily Gorbik if (rc == DIAG308_RC_OK && 551e941d39SVasily Gorbik ipl_block.hdr.version <= IPL_MAX_SUPPORTED_VERSION) 561e941d39SVasily Gorbik ipl_block_valid = 1; 5749698745SVasily Gorbik } 5849698745SVasily Gorbik 594ae98789SArnd Bergmann static size_t scpdata_length(const u8 *buf, size_t count) 6049698745SVasily Gorbik { 6149698745SVasily Gorbik while (count) { 6249698745SVasily Gorbik if (buf[count - 1] != '\0' && buf[count - 1] != ' ') 6349698745SVasily Gorbik break; 6449698745SVasily Gorbik count--; 6549698745SVasily Gorbik } 6649698745SVasily Gorbik return count; 6749698745SVasily Gorbik } 6849698745SVasily Gorbik 6949698745SVasily Gorbik static size_t ipl_block_get_ascii_scpdata(char *dest, size_t size, 7049698745SVasily Gorbik const struct ipl_parameter_block *ipb) 7149698745SVasily Gorbik { 7249698745SVasily Gorbik size_t count; 7349698745SVasily Gorbik size_t i; 7449698745SVasily Gorbik int has_lowercase; 7549698745SVasily Gorbik 7686c74d86SMartin Schwidefsky count = min(size - 1, scpdata_length(ipb->fcp.scp_data, 7786c74d86SMartin Schwidefsky ipb->fcp.scp_data_len)); 7849698745SVasily Gorbik if (!count) 7949698745SVasily Gorbik goto out; 8049698745SVasily Gorbik 8149698745SVasily Gorbik has_lowercase = 0; 8249698745SVasily Gorbik for (i = 0; i < count; i++) { 8386c74d86SMartin Schwidefsky if (!isascii(ipb->fcp.scp_data[i])) { 8449698745SVasily Gorbik count = 0; 8549698745SVasily Gorbik goto out; 8649698745SVasily Gorbik } 8786c74d86SMartin Schwidefsky if (!has_lowercase && islower(ipb->fcp.scp_data[i])) 8849698745SVasily Gorbik has_lowercase = 1; 8949698745SVasily Gorbik } 9049698745SVasily Gorbik 9149698745SVasily Gorbik if (has_lowercase) 9286c74d86SMartin Schwidefsky memcpy(dest, ipb->fcp.scp_data, count); 9349698745SVasily Gorbik else 9449698745SVasily Gorbik for (i = 0; i < count; i++) 9586c74d86SMartin Schwidefsky dest[i] = tolower(ipb->fcp.scp_data[i]); 9649698745SVasily Gorbik out: 9749698745SVasily Gorbik dest[count] = '\0'; 9849698745SVasily Gorbik return count; 9949698745SVasily Gorbik } 10049698745SVasily Gorbik 10149698745SVasily Gorbik static void append_ipl_block_parm(void) 10249698745SVasily Gorbik { 10349698745SVasily Gorbik char *parm, *delim; 10449698745SVasily Gorbik size_t len, rc = 0; 10549698745SVasily Gorbik 10649698745SVasily Gorbik len = strlen(early_command_line); 10749698745SVasily Gorbik 10849698745SVasily Gorbik delim = early_command_line + len; /* '\0' character position */ 10949698745SVasily Gorbik parm = early_command_line + len + 1; /* append right after '\0' */ 11049698745SVasily Gorbik 1115f1207fbSMartin Schwidefsky switch (ipl_block.pb0_hdr.pbt) { 1125f1207fbSMartin Schwidefsky case IPL_PBT_CCW: 11349698745SVasily Gorbik rc = ipl_block_get_ascii_vmparm( 1141e941d39SVasily Gorbik parm, COMMAND_LINE_SIZE - len - 1, &ipl_block); 11549698745SVasily Gorbik break; 1165f1207fbSMartin Schwidefsky case IPL_PBT_FCP: 11749698745SVasily Gorbik rc = ipl_block_get_ascii_scpdata( 1181e941d39SVasily Gorbik parm, COMMAND_LINE_SIZE - len - 1, &ipl_block); 11949698745SVasily Gorbik break; 12049698745SVasily Gorbik } 12149698745SVasily Gorbik if (rc) { 12249698745SVasily Gorbik if (*parm == '=') 12349698745SVasily Gorbik memmove(early_command_line, parm + 1, rc); 12449698745SVasily Gorbik else 12549698745SVasily Gorbik *delim = ' '; /* replace '\0' with space */ 12649698745SVasily Gorbik } 12749698745SVasily Gorbik } 12849698745SVasily Gorbik 12949698745SVasily Gorbik static inline int has_ebcdic_char(const char *str) 13049698745SVasily Gorbik { 13149698745SVasily Gorbik int i; 13249698745SVasily Gorbik 13349698745SVasily Gorbik for (i = 0; str[i]; i++) 13449698745SVasily Gorbik if (str[i] & 0x80) 13549698745SVasily Gorbik return 1; 13649698745SVasily Gorbik return 0; 13749698745SVasily Gorbik } 13849698745SVasily Gorbik 13949698745SVasily Gorbik void setup_boot_command_line(void) 14049698745SVasily Gorbik { 14149698745SVasily Gorbik COMMAND_LINE[ARCH_COMMAND_LINE_SIZE - 1] = 0; 14249698745SVasily Gorbik /* convert arch command line to ascii if necessary */ 14349698745SVasily Gorbik if (has_ebcdic_char(COMMAND_LINE)) 14449698745SVasily Gorbik EBCASC(COMMAND_LINE, ARCH_COMMAND_LINE_SIZE); 14549698745SVasily Gorbik /* copy arch command line */ 14649698745SVasily Gorbik strcpy(early_command_line, strim(COMMAND_LINE)); 14749698745SVasily Gorbik 14849698745SVasily Gorbik /* append IPL PARM data to the boot command line */ 149093ddccbSVasily Gorbik if (!is_prot_virt_guest() && ipl_block_valid) 15049698745SVasily Gorbik append_ipl_block_parm(); 15149698745SVasily Gorbik } 15249698745SVasily Gorbik 153b5e80459SVasily Gorbik static void modify_facility(unsigned long nr, bool clear) 154b5e80459SVasily Gorbik { 155b5e80459SVasily Gorbik if (clear) 156b5e80459SVasily Gorbik __clear_facility(nr, S390_lowcore.stfle_fac_list); 157b5e80459SVasily Gorbik else 158b5e80459SVasily Gorbik __set_facility(nr, S390_lowcore.stfle_fac_list); 159b5e80459SVasily Gorbik } 160b5e80459SVasily Gorbik 1616d85dac2SVasily Gorbik static void check_cleared_facilities(void) 1626d85dac2SVasily Gorbik { 1636d85dac2SVasily Gorbik unsigned long als[] = { FACILITIES_ALS }; 1646d85dac2SVasily Gorbik int i; 1656d85dac2SVasily Gorbik 1666d85dac2SVasily Gorbik for (i = 0; i < ARRAY_SIZE(als); i++) { 1676d85dac2SVasily Gorbik if ((S390_lowcore.stfle_fac_list[i] & als[i]) != als[i]) { 1686d85dac2SVasily Gorbik sclp_early_printk("Warning: The Linux kernel requires facilities cleared via command line option\n"); 1696d85dac2SVasily Gorbik print_missing_facilities(); 1706d85dac2SVasily Gorbik break; 1716d85dac2SVasily Gorbik } 1726d85dac2SVasily Gorbik } 1736d85dac2SVasily Gorbik } 1746d85dac2SVasily Gorbik 175b5e80459SVasily Gorbik static void modify_fac_list(char *str) 176b5e80459SVasily Gorbik { 177b5e80459SVasily Gorbik unsigned long val, endval; 178b5e80459SVasily Gorbik char *endp; 179b5e80459SVasily Gorbik bool clear; 180b5e80459SVasily Gorbik 181b5e80459SVasily Gorbik while (*str) { 182b5e80459SVasily Gorbik clear = false; 183b5e80459SVasily Gorbik if (*str == '!') { 184b5e80459SVasily Gorbik clear = true; 185b5e80459SVasily Gorbik str++; 186b5e80459SVasily Gorbik } 187b5e80459SVasily Gorbik val = simple_strtoull(str, &endp, 0); 188b5e80459SVasily Gorbik if (str == endp) 189b5e80459SVasily Gorbik break; 190b5e80459SVasily Gorbik str = endp; 191b5e80459SVasily Gorbik if (*str == '-') { 192b5e80459SVasily Gorbik str++; 193b5e80459SVasily Gorbik endval = simple_strtoull(str, &endp, 0); 194b5e80459SVasily Gorbik if (str == endp) 195b5e80459SVasily Gorbik break; 196b5e80459SVasily Gorbik str = endp; 197b5e80459SVasily Gorbik while (val <= endval) { 198b5e80459SVasily Gorbik modify_facility(val, clear); 199b5e80459SVasily Gorbik val++; 200b5e80459SVasily Gorbik } 201b5e80459SVasily Gorbik } else { 202b5e80459SVasily Gorbik modify_facility(val, clear); 203b5e80459SVasily Gorbik } 204b5e80459SVasily Gorbik if (*str != ',') 205b5e80459SVasily Gorbik break; 206b5e80459SVasily Gorbik str++; 207b5e80459SVasily Gorbik } 2086d85dac2SVasily Gorbik check_cleared_facilities(); 209b5e80459SVasily Gorbik } 210b5e80459SVasily Gorbik 21149698745SVasily Gorbik static char command_line_buf[COMMAND_LINE_SIZE] __section(.data); 212b5e80459SVasily Gorbik void parse_boot_command_line(void) 21349698745SVasily Gorbik { 21449698745SVasily Gorbik char *param, *val; 215d58106c3SVasily Gorbik bool enabled; 216d58106c3SVasily Gorbik char *args; 217d58106c3SVasily Gorbik int rc; 21849698745SVasily Gorbik 219b2d24b97SGerald Schaefer kaslr_enabled = IS_ENABLED(CONFIG_RANDOMIZE_BASE); 22049698745SVasily Gorbik args = strcpy(command_line_buf, early_command_line); 22149698745SVasily Gorbik while (*args) { 22249698745SVasily Gorbik args = next_arg(args, ¶m, &val); 22349698745SVasily Gorbik 22449698745SVasily Gorbik if (!strcmp(param, "mem")) { 22549698745SVasily Gorbik memory_end = memparse(val, NULL); 22649698745SVasily Gorbik memory_end_set = 1; 22749698745SVasily Gorbik } 228d58106c3SVasily Gorbik 229d58106c3SVasily Gorbik if (!strcmp(param, "noexec")) { 230d58106c3SVasily Gorbik rc = kstrtobool(val, &enabled); 231d58106c3SVasily Gorbik if (!rc && !enabled) 232d58106c3SVasily Gorbik noexec_disabled = 1; 233d58106c3SVasily Gorbik } 234b5e80459SVasily Gorbik 235b5e80459SVasily Gorbik if (!strcmp(param, "facilities")) 236b5e80459SVasily Gorbik modify_fac_list(val); 237b2d24b97SGerald Schaefer 238b2d24b97SGerald Schaefer if (!strcmp(param, "nokaslr")) 239b2d24b97SGerald Schaefer kaslr_enabled = 0; 24049698745SVasily Gorbik } 24149698745SVasily Gorbik } 24249698745SVasily Gorbik 24349698745SVasily Gorbik void setup_memory_end(void) 24449698745SVasily Gorbik { 24549698745SVasily Gorbik #ifdef CONFIG_CRASH_DUMP 246b2d24b97SGerald Schaefer if (OLDMEM_BASE) { 247b2d24b97SGerald Schaefer kaslr_enabled = 0; 248b2d24b97SGerald Schaefer } else if (ipl_block_valid && 2495f1207fbSMartin Schwidefsky ipl_block.pb0_hdr.pbt == IPL_PBT_FCP && 2505f1207fbSMartin Schwidefsky ipl_block.fcp.opt == IPL_PB0_FCP_OPT_DUMP) { 251b2d24b97SGerald Schaefer kaslr_enabled = 0; 25249698745SVasily Gorbik if (!sclp_early_get_hsa_size(&memory_end) && memory_end) 25349698745SVasily Gorbik memory_end_set = 1; 25449698745SVasily Gorbik } 25549698745SVasily Gorbik #endif 25649698745SVasily Gorbik } 257