16f713d18SHari Bathini // SPDX-License-Identifier: GPL-2.0-only 26f713d18SHari Bathini /* 36f713d18SHari Bathini * Interface for exporting the OPAL ELF core. 46f713d18SHari Bathini * Heavily inspired from fs/proc/vmcore.c 56f713d18SHari Bathini * 66f713d18SHari Bathini * Copyright 2019, Hari Bathini, IBM Corporation. 76f713d18SHari Bathini */ 86f713d18SHari Bathini 96f713d18SHari Bathini #define pr_fmt(fmt) "opal core: " fmt 106f713d18SHari Bathini 116f713d18SHari Bathini #include <linux/memblock.h> 126f713d18SHari Bathini #include <linux/uaccess.h> 136f713d18SHari Bathini #include <linux/proc_fs.h> 146f713d18SHari Bathini #include <linux/elf.h> 156f713d18SHari Bathini #include <linux/elfcore.h> 16845426f3SHari Bathini #include <linux/kobject.h> 17845426f3SHari Bathini #include <linux/sysfs.h> 186f713d18SHari Bathini #include <linux/slab.h> 196f713d18SHari Bathini #include <linux/crash_core.h> 206f713d18SHari Bathini #include <linux/of.h> 216f713d18SHari Bathini 226f713d18SHari Bathini #include <asm/page.h> 236f713d18SHari Bathini #include <asm/opal.h> 246f713d18SHari Bathini #include <asm/fadump-internal.h> 256f713d18SHari Bathini 266f713d18SHari Bathini #include "opal-fadump.h" 276f713d18SHari Bathini 286f713d18SHari Bathini #define MAX_PT_LOAD_CNT 8 296f713d18SHari Bathini 306f713d18SHari Bathini /* NT_AUXV note related info */ 316f713d18SHari Bathini #define AUXV_CNT 1 326f713d18SHari Bathini #define AUXV_DESC_SZ (((2 * AUXV_CNT) + 1) * sizeof(Elf64_Off)) 336f713d18SHari Bathini 346f713d18SHari Bathini struct opalcore_config { 356f713d18SHari Bathini u32 num_cpus; 366f713d18SHari Bathini /* PIR value of crashing CPU */ 376f713d18SHari Bathini u32 crashing_cpu; 386f713d18SHari Bathini 396f713d18SHari Bathini /* CPU state data info from F/W */ 406f713d18SHari Bathini u64 cpu_state_destination_vaddr; 416f713d18SHari Bathini u64 cpu_state_data_size; 426f713d18SHari Bathini u64 cpu_state_entry_size; 436f713d18SHari Bathini 446f713d18SHari Bathini /* OPAL memory to be exported as PT_LOAD segments */ 456f713d18SHari Bathini u64 ptload_addr[MAX_PT_LOAD_CNT]; 466f713d18SHari Bathini u64 ptload_size[MAX_PT_LOAD_CNT]; 476f713d18SHari Bathini u64 ptload_cnt; 486f713d18SHari Bathini 496f713d18SHari Bathini /* Pointer to the first PT_LOAD in the ELF core file */ 506f713d18SHari Bathini Elf64_Phdr *ptload_phdr; 516f713d18SHari Bathini 526f713d18SHari Bathini /* Total size of opalcore file. */ 536f713d18SHari Bathini size_t opalcore_size; 546f713d18SHari Bathini 556f713d18SHari Bathini /* Buffer for all the ELF core headers and the PT_NOTE */ 566f713d18SHari Bathini size_t opalcorebuf_sz; 576f713d18SHari Bathini char *opalcorebuf; 586f713d18SHari Bathini 596f713d18SHari Bathini /* NT_AUXV buffer */ 606f713d18SHari Bathini char auxv_buf[AUXV_DESC_SZ]; 616f713d18SHari Bathini }; 626f713d18SHari Bathini 636f713d18SHari Bathini struct opalcore { 646f713d18SHari Bathini struct list_head list; 656f713d18SHari Bathini u64 paddr; 666f713d18SHari Bathini size_t size; 676f713d18SHari Bathini loff_t offset; 686f713d18SHari Bathini }; 696f713d18SHari Bathini 706f713d18SHari Bathini static LIST_HEAD(opalcore_list); 716f713d18SHari Bathini static struct opalcore_config *oc_conf; 726f713d18SHari Bathini static const struct opal_mpipl_fadump *opalc_metadata; 736f713d18SHari Bathini static const struct opal_mpipl_fadump *opalc_cpu_metadata; 746f713d18SHari Bathini 756f713d18SHari Bathini /* 766f713d18SHari Bathini * Set crashing CPU's signal to SIGUSR1. if the kernel is triggered 776f713d18SHari Bathini * by kernel, SIGTERM otherwise. 786f713d18SHari Bathini */ 796f713d18SHari Bathini bool kernel_initiated; 806f713d18SHari Bathini 816f713d18SHari Bathini static struct opalcore * __init get_new_element(void) 826f713d18SHari Bathini { 836f713d18SHari Bathini return kzalloc(sizeof(struct opalcore), GFP_KERNEL); 846f713d18SHari Bathini } 856f713d18SHari Bathini 866f713d18SHari Bathini static inline int is_opalcore_usable(void) 876f713d18SHari Bathini { 886f713d18SHari Bathini return (oc_conf && oc_conf->opalcorebuf != NULL) ? 1 : 0; 896f713d18SHari Bathini } 906f713d18SHari Bathini 916f713d18SHari Bathini static Elf64_Word *append_elf64_note(Elf64_Word *buf, char *name, 926f713d18SHari Bathini u32 type, void *data, 936f713d18SHari Bathini size_t data_len) 946f713d18SHari Bathini { 956f713d18SHari Bathini Elf64_Nhdr *note = (Elf64_Nhdr *)buf; 966f713d18SHari Bathini Elf64_Word namesz = strlen(name) + 1; 976f713d18SHari Bathini 986f713d18SHari Bathini note->n_namesz = cpu_to_be32(namesz); 996f713d18SHari Bathini note->n_descsz = cpu_to_be32(data_len); 1006f713d18SHari Bathini note->n_type = cpu_to_be32(type); 1016f713d18SHari Bathini buf += DIV_ROUND_UP(sizeof(*note), sizeof(Elf64_Word)); 1026f713d18SHari Bathini memcpy(buf, name, namesz); 1036f713d18SHari Bathini buf += DIV_ROUND_UP(namesz, sizeof(Elf64_Word)); 1046f713d18SHari Bathini memcpy(buf, data, data_len); 1056f713d18SHari Bathini buf += DIV_ROUND_UP(data_len, sizeof(Elf64_Word)); 1066f713d18SHari Bathini 1076f713d18SHari Bathini return buf; 1086f713d18SHari Bathini } 1096f713d18SHari Bathini 1106f713d18SHari Bathini static void fill_prstatus(struct elf_prstatus *prstatus, int pir, 1116f713d18SHari Bathini struct pt_regs *regs) 1126f713d18SHari Bathini { 1136f713d18SHari Bathini memset(prstatus, 0, sizeof(struct elf_prstatus)); 1146f713d18SHari Bathini elf_core_copy_kernel_regs(&(prstatus->pr_reg), regs); 1156f713d18SHari Bathini 1166f713d18SHari Bathini /* 1176f713d18SHari Bathini * Overload PID with PIR value. 1186f713d18SHari Bathini * As a PIR value could also be '0', add an offset of '100' 1196f713d18SHari Bathini * to every PIR to avoid misinterpretations in GDB. 1206f713d18SHari Bathini */ 1216f713d18SHari Bathini prstatus->pr_pid = cpu_to_be32(100 + pir); 1226f713d18SHari Bathini prstatus->pr_ppid = cpu_to_be32(1); 1236f713d18SHari Bathini 1246f713d18SHari Bathini /* 1256f713d18SHari Bathini * Indicate SIGUSR1 for crash initiated from kernel. 1266f713d18SHari Bathini * SIGTERM otherwise. 1276f713d18SHari Bathini */ 1286f713d18SHari Bathini if (pir == oc_conf->crashing_cpu) { 1296f713d18SHari Bathini short sig; 1306f713d18SHari Bathini 1316f713d18SHari Bathini sig = kernel_initiated ? SIGUSR1 : SIGTERM; 1326f713d18SHari Bathini prstatus->pr_cursig = cpu_to_be16(sig); 1336f713d18SHari Bathini } 1346f713d18SHari Bathini } 1356f713d18SHari Bathini 1366f713d18SHari Bathini static Elf64_Word *auxv_to_elf64_notes(Elf64_Word *buf, 1376f713d18SHari Bathini u64 opal_boot_entry) 1386f713d18SHari Bathini { 1396f713d18SHari Bathini Elf64_Off *bufp = (Elf64_Off *)oc_conf->auxv_buf; 1406f713d18SHari Bathini int idx = 0; 1416f713d18SHari Bathini 1426f713d18SHari Bathini memset(bufp, 0, AUXV_DESC_SZ); 1436f713d18SHari Bathini 1446f713d18SHari Bathini /* Entry point of OPAL */ 1456f713d18SHari Bathini bufp[idx++] = cpu_to_be64(AT_ENTRY); 1466f713d18SHari Bathini bufp[idx++] = cpu_to_be64(opal_boot_entry); 1476f713d18SHari Bathini 1486f713d18SHari Bathini /* end of vector */ 1496f713d18SHari Bathini bufp[idx++] = cpu_to_be64(AT_NULL); 1506f713d18SHari Bathini 1516f713d18SHari Bathini buf = append_elf64_note(buf, CRASH_CORE_NOTE_NAME, NT_AUXV, 1526f713d18SHari Bathini oc_conf->auxv_buf, AUXV_DESC_SZ); 1536f713d18SHari Bathini return buf; 1546f713d18SHari Bathini } 1556f713d18SHari Bathini 1566f713d18SHari Bathini /* 1576f713d18SHari Bathini * Read from the ELF header and then the crash dump. 1586f713d18SHari Bathini * Returns number of bytes read on success, -errno on failure. 1596f713d18SHari Bathini */ 1606f713d18SHari Bathini static ssize_t read_opalcore(struct file *file, struct kobject *kobj, 1616f713d18SHari Bathini struct bin_attribute *bin_attr, char *to, 1626f713d18SHari Bathini loff_t pos, size_t count) 1636f713d18SHari Bathini { 1646f713d18SHari Bathini struct opalcore *m; 1656f713d18SHari Bathini ssize_t tsz, avail; 1666f713d18SHari Bathini loff_t tpos = pos; 1676f713d18SHari Bathini 1686f713d18SHari Bathini if (pos >= oc_conf->opalcore_size) 1696f713d18SHari Bathini return 0; 1706f713d18SHari Bathini 1716f713d18SHari Bathini /* Adjust count if it goes beyond opalcore size */ 1726f713d18SHari Bathini avail = oc_conf->opalcore_size - pos; 1736f713d18SHari Bathini if (count > avail) 1746f713d18SHari Bathini count = avail; 1756f713d18SHari Bathini 1766f713d18SHari Bathini if (count == 0) 1776f713d18SHari Bathini return 0; 1786f713d18SHari Bathini 1796f713d18SHari Bathini /* Read ELF core header and/or PT_NOTE segment */ 1806f713d18SHari Bathini if (tpos < oc_conf->opalcorebuf_sz) { 1816f713d18SHari Bathini tsz = min_t(size_t, oc_conf->opalcorebuf_sz - tpos, count); 1826f713d18SHari Bathini memcpy(to, oc_conf->opalcorebuf + tpos, tsz); 1836f713d18SHari Bathini to += tsz; 1846f713d18SHari Bathini tpos += tsz; 1856f713d18SHari Bathini count -= tsz; 1866f713d18SHari Bathini } 1876f713d18SHari Bathini 1886f713d18SHari Bathini list_for_each_entry(m, &opalcore_list, list) { 1896f713d18SHari Bathini /* nothing more to read here */ 1906f713d18SHari Bathini if (count == 0) 1916f713d18SHari Bathini break; 1926f713d18SHari Bathini 1936f713d18SHari Bathini if (tpos < m->offset + m->size) { 1946f713d18SHari Bathini void *addr; 1956f713d18SHari Bathini 1966f713d18SHari Bathini tsz = min_t(size_t, m->offset + m->size - tpos, count); 1976f713d18SHari Bathini addr = (void *)(m->paddr + tpos - m->offset); 1986f713d18SHari Bathini memcpy(to, __va(addr), tsz); 1996f713d18SHari Bathini to += tsz; 2006f713d18SHari Bathini tpos += tsz; 2016f713d18SHari Bathini count -= tsz; 2026f713d18SHari Bathini } 2036f713d18SHari Bathini } 2046f713d18SHari Bathini 2056f713d18SHari Bathini return (tpos - pos); 2066f713d18SHari Bathini } 2076f713d18SHari Bathini 2086f713d18SHari Bathini static struct bin_attribute opal_core_attr = { 2096f713d18SHari Bathini .attr = {.name = "core", .mode = 0400}, 2106f713d18SHari Bathini .read = read_opalcore 2116f713d18SHari Bathini }; 2126f713d18SHari Bathini 2136f713d18SHari Bathini /* 2146f713d18SHari Bathini * Read CPU state dump data and convert it into ELF notes. 2156f713d18SHari Bathini * 2166f713d18SHari Bathini * Each register entry is of 16 bytes, A numerical identifier along with 2176f713d18SHari Bathini * a GPR/SPR flag in the first 8 bytes and the register value in the next 2186f713d18SHari Bathini * 8 bytes. For more details refer to F/W documentation. 2196f713d18SHari Bathini */ 2206f713d18SHari Bathini static Elf64_Word * __init opalcore_append_cpu_notes(Elf64_Word *buf) 2216f713d18SHari Bathini { 2226f713d18SHari Bathini u32 thread_pir, size_per_thread, regs_offset, regs_cnt, reg_esize; 2236f713d18SHari Bathini struct hdat_fadump_thread_hdr *thdr; 2246f713d18SHari Bathini struct elf_prstatus prstatus; 2256f713d18SHari Bathini Elf64_Word *first_cpu_note; 2266f713d18SHari Bathini struct pt_regs regs; 2276f713d18SHari Bathini char *bufp; 2286f713d18SHari Bathini int i; 2296f713d18SHari Bathini 2306f713d18SHari Bathini size_per_thread = oc_conf->cpu_state_entry_size; 2316f713d18SHari Bathini bufp = __va(oc_conf->cpu_state_destination_vaddr); 2326f713d18SHari Bathini 2336f713d18SHari Bathini /* 2346f713d18SHari Bathini * Offset for register entries, entry size and registers count is 2356f713d18SHari Bathini * duplicated in every thread header in keeping with HDAT format. 2366f713d18SHari Bathini * Use these values from the first thread header. 2376f713d18SHari Bathini */ 2386f713d18SHari Bathini thdr = (struct hdat_fadump_thread_hdr *)bufp; 2396f713d18SHari Bathini regs_offset = (offsetof(struct hdat_fadump_thread_hdr, offset) + 2406f713d18SHari Bathini be32_to_cpu(thdr->offset)); 2416f713d18SHari Bathini reg_esize = be32_to_cpu(thdr->esize); 2426f713d18SHari Bathini regs_cnt = be32_to_cpu(thdr->ecnt); 2436f713d18SHari Bathini 2446f713d18SHari Bathini pr_debug("--------CPU State Data------------\n"); 2456f713d18SHari Bathini pr_debug("NumCpus : %u\n", oc_conf->num_cpus); 2466f713d18SHari Bathini pr_debug("\tOffset: %u, Entry size: %u, Cnt: %u\n", 2476f713d18SHari Bathini regs_offset, reg_esize, regs_cnt); 2486f713d18SHari Bathini 2496f713d18SHari Bathini /* 2506f713d18SHari Bathini * Skip past the first CPU note. Fill this note with the 2516f713d18SHari Bathini * crashing CPU's prstatus. 2526f713d18SHari Bathini */ 2536f713d18SHari Bathini first_cpu_note = buf; 2546f713d18SHari Bathini buf = append_elf64_note(buf, CRASH_CORE_NOTE_NAME, NT_PRSTATUS, 2556f713d18SHari Bathini &prstatus, sizeof(prstatus)); 2566f713d18SHari Bathini 2576f713d18SHari Bathini for (i = 0; i < oc_conf->num_cpus; i++, bufp += size_per_thread) { 2586f713d18SHari Bathini thdr = (struct hdat_fadump_thread_hdr *)bufp; 2596f713d18SHari Bathini thread_pir = be32_to_cpu(thdr->pir); 2606f713d18SHari Bathini 2616f713d18SHari Bathini pr_debug("[%04d] PIR: 0x%x, core state: 0x%02x\n", 2626f713d18SHari Bathini i, thread_pir, thdr->core_state); 2636f713d18SHari Bathini 2646f713d18SHari Bathini /* 2656f713d18SHari Bathini * Register state data of MAX cores is provided by firmware, 2666f713d18SHari Bathini * but some of this cores may not be active. So, while 2676f713d18SHari Bathini * processing register state data, check core state and 2686f713d18SHari Bathini * skip threads that belong to inactive cores. 2696f713d18SHari Bathini */ 2706f713d18SHari Bathini if (thdr->core_state == HDAT_FADUMP_CORE_INACTIVE) 2716f713d18SHari Bathini continue; 2726f713d18SHari Bathini 2736f713d18SHari Bathini opal_fadump_read_regs((bufp + regs_offset), regs_cnt, 2746f713d18SHari Bathini reg_esize, false, ®s); 2756f713d18SHari Bathini 2766f713d18SHari Bathini pr_debug("PIR 0x%x - R1 : 0x%llx, NIP : 0x%llx\n", thread_pir, 2776f713d18SHari Bathini be64_to_cpu(regs.gpr[1]), be64_to_cpu(regs.nip)); 2786f713d18SHari Bathini fill_prstatus(&prstatus, thread_pir, ®s); 2796f713d18SHari Bathini 2806f713d18SHari Bathini if (thread_pir != oc_conf->crashing_cpu) { 2816f713d18SHari Bathini buf = append_elf64_note(buf, CRASH_CORE_NOTE_NAME, 2826f713d18SHari Bathini NT_PRSTATUS, &prstatus, 2836f713d18SHari Bathini sizeof(prstatus)); 2846f713d18SHari Bathini } else { 2856f713d18SHari Bathini /* 2866f713d18SHari Bathini * Add crashing CPU as the first NT_PRSTATUS note for 2876f713d18SHari Bathini * GDB to process the core file appropriately. 2886f713d18SHari Bathini */ 2896f713d18SHari Bathini append_elf64_note(first_cpu_note, CRASH_CORE_NOTE_NAME, 2906f713d18SHari Bathini NT_PRSTATUS, &prstatus, 2916f713d18SHari Bathini sizeof(prstatus)); 2926f713d18SHari Bathini } 2936f713d18SHari Bathini } 2946f713d18SHari Bathini 2956f713d18SHari Bathini return buf; 2966f713d18SHari Bathini } 2976f713d18SHari Bathini 2986f713d18SHari Bathini static int __init create_opalcore(void) 2996f713d18SHari Bathini { 3006f713d18SHari Bathini u64 opal_boot_entry, opal_base_addr, paddr; 3016f713d18SHari Bathini u32 hdr_size, cpu_notes_size, count; 3026f713d18SHari Bathini struct device_node *dn; 3036f713d18SHari Bathini struct opalcore *new; 3046f713d18SHari Bathini loff_t opalcore_off; 3056f713d18SHari Bathini struct page *page; 3066f713d18SHari Bathini Elf64_Phdr *phdr; 3076f713d18SHari Bathini Elf64_Ehdr *elf; 3086f713d18SHari Bathini int i, ret; 3096f713d18SHari Bathini char *bufp; 3106f713d18SHari Bathini 3116f713d18SHari Bathini /* Get size of header & CPU notes for OPAL core */ 3126f713d18SHari Bathini hdr_size = (sizeof(Elf64_Ehdr) + 3136f713d18SHari Bathini ((oc_conf->ptload_cnt + 1) * sizeof(Elf64_Phdr))); 3146f713d18SHari Bathini cpu_notes_size = ((oc_conf->num_cpus * (CRASH_CORE_NOTE_HEAD_BYTES + 3156f713d18SHari Bathini CRASH_CORE_NOTE_NAME_BYTES + 3166f713d18SHari Bathini CRASH_CORE_NOTE_DESC_BYTES)) + 3176f713d18SHari Bathini (CRASH_CORE_NOTE_HEAD_BYTES + 3186f713d18SHari Bathini CRASH_CORE_NOTE_NAME_BYTES + AUXV_DESC_SZ)); 3196f713d18SHari Bathini 3206f713d18SHari Bathini /* Allocate buffer to setup OPAL core */ 3216f713d18SHari Bathini oc_conf->opalcorebuf_sz = PAGE_ALIGN(hdr_size + cpu_notes_size); 3226f713d18SHari Bathini oc_conf->opalcorebuf = alloc_pages_exact(oc_conf->opalcorebuf_sz, 3236f713d18SHari Bathini GFP_KERNEL | __GFP_ZERO); 3246f713d18SHari Bathini if (!oc_conf->opalcorebuf) { 3256f713d18SHari Bathini pr_err("Not enough memory to setup OPAL core (size: %lu)\n", 3266f713d18SHari Bathini oc_conf->opalcorebuf_sz); 3276f713d18SHari Bathini oc_conf->opalcorebuf_sz = 0; 3286f713d18SHari Bathini return -ENOMEM; 3296f713d18SHari Bathini } 3306f713d18SHari Bathini count = oc_conf->opalcorebuf_sz / PAGE_SIZE; 3316f713d18SHari Bathini page = virt_to_page(oc_conf->opalcorebuf); 3326f713d18SHari Bathini for (i = 0; i < count; i++) 3336f713d18SHari Bathini mark_page_reserved(page + i); 3346f713d18SHari Bathini 3356f713d18SHari Bathini pr_debug("opalcorebuf = 0x%llx\n", (u64)oc_conf->opalcorebuf); 3366f713d18SHari Bathini 3376f713d18SHari Bathini /* Read OPAL related device-tree entries */ 3386f713d18SHari Bathini dn = of_find_node_by_name(NULL, "ibm,opal"); 3396f713d18SHari Bathini if (dn) { 3406f713d18SHari Bathini ret = of_property_read_u64(dn, "opal-base-address", 3416f713d18SHari Bathini &opal_base_addr); 3426f713d18SHari Bathini pr_debug("opal-base-address: %llx\n", opal_base_addr); 3436f713d18SHari Bathini ret |= of_property_read_u64(dn, "opal-boot-address", 3446f713d18SHari Bathini &opal_boot_entry); 3456f713d18SHari Bathini pr_debug("opal-boot-address: %llx\n", opal_boot_entry); 3466f713d18SHari Bathini } 3476f713d18SHari Bathini if (!dn || ret) 3486f713d18SHari Bathini pr_warn("WARNING: Failed to read OPAL base & entry values\n"); 3496f713d18SHari Bathini 3506f713d18SHari Bathini /* Use count to keep track of the program headers */ 3516f713d18SHari Bathini count = 0; 3526f713d18SHari Bathini 3536f713d18SHari Bathini bufp = oc_conf->opalcorebuf; 3546f713d18SHari Bathini elf = (Elf64_Ehdr *)bufp; 3556f713d18SHari Bathini bufp += sizeof(Elf64_Ehdr); 3566f713d18SHari Bathini memcpy(elf->e_ident, ELFMAG, SELFMAG); 3576f713d18SHari Bathini elf->e_ident[EI_CLASS] = ELF_CLASS; 3586f713d18SHari Bathini elf->e_ident[EI_DATA] = ELFDATA2MSB; 3596f713d18SHari Bathini elf->e_ident[EI_VERSION] = EV_CURRENT; 3606f713d18SHari Bathini elf->e_ident[EI_OSABI] = ELF_OSABI; 3616f713d18SHari Bathini memset(elf->e_ident+EI_PAD, 0, EI_NIDENT-EI_PAD); 3626f713d18SHari Bathini elf->e_type = cpu_to_be16(ET_CORE); 3636f713d18SHari Bathini elf->e_machine = cpu_to_be16(ELF_ARCH); 3646f713d18SHari Bathini elf->e_version = cpu_to_be32(EV_CURRENT); 3656f713d18SHari Bathini elf->e_entry = 0; 3666f713d18SHari Bathini elf->e_phoff = cpu_to_be64(sizeof(Elf64_Ehdr)); 3676f713d18SHari Bathini elf->e_shoff = 0; 3686f713d18SHari Bathini elf->e_flags = 0; 3696f713d18SHari Bathini 3706f713d18SHari Bathini elf->e_ehsize = cpu_to_be16(sizeof(Elf64_Ehdr)); 3716f713d18SHari Bathini elf->e_phentsize = cpu_to_be16(sizeof(Elf64_Phdr)); 3726f713d18SHari Bathini elf->e_phnum = 0; 3736f713d18SHari Bathini elf->e_shentsize = 0; 3746f713d18SHari Bathini elf->e_shnum = 0; 3756f713d18SHari Bathini elf->e_shstrndx = 0; 3766f713d18SHari Bathini 3776f713d18SHari Bathini phdr = (Elf64_Phdr *)bufp; 3786f713d18SHari Bathini bufp += sizeof(Elf64_Phdr); 3796f713d18SHari Bathini phdr->p_type = cpu_to_be32(PT_NOTE); 3806f713d18SHari Bathini phdr->p_flags = 0; 3816f713d18SHari Bathini phdr->p_align = 0; 3826f713d18SHari Bathini phdr->p_paddr = phdr->p_vaddr = 0; 3836f713d18SHari Bathini phdr->p_offset = cpu_to_be64(hdr_size); 3846f713d18SHari Bathini phdr->p_filesz = phdr->p_memsz = cpu_to_be64(cpu_notes_size); 3856f713d18SHari Bathini count++; 3866f713d18SHari Bathini 3876f713d18SHari Bathini opalcore_off = oc_conf->opalcorebuf_sz; 3886f713d18SHari Bathini oc_conf->ptload_phdr = (Elf64_Phdr *)bufp; 3896f713d18SHari Bathini paddr = 0; 3906f713d18SHari Bathini for (i = 0; i < oc_conf->ptload_cnt; i++) { 3916f713d18SHari Bathini phdr = (Elf64_Phdr *)bufp; 3926f713d18SHari Bathini bufp += sizeof(Elf64_Phdr); 3936f713d18SHari Bathini phdr->p_type = cpu_to_be32(PT_LOAD); 3946f713d18SHari Bathini phdr->p_flags = cpu_to_be32(PF_R|PF_W|PF_X); 3956f713d18SHari Bathini phdr->p_align = 0; 3966f713d18SHari Bathini 3976f713d18SHari Bathini new = get_new_element(); 3986f713d18SHari Bathini if (!new) 3996f713d18SHari Bathini return -ENOMEM; 4006f713d18SHari Bathini new->paddr = oc_conf->ptload_addr[i]; 4016f713d18SHari Bathini new->size = oc_conf->ptload_size[i]; 4026f713d18SHari Bathini new->offset = opalcore_off; 4036f713d18SHari Bathini list_add_tail(&new->list, &opalcore_list); 4046f713d18SHari Bathini 4056f713d18SHari Bathini phdr->p_paddr = cpu_to_be64(paddr); 4066f713d18SHari Bathini phdr->p_vaddr = cpu_to_be64(opal_base_addr + paddr); 4076f713d18SHari Bathini phdr->p_filesz = phdr->p_memsz = 4086f713d18SHari Bathini cpu_to_be64(oc_conf->ptload_size[i]); 4096f713d18SHari Bathini phdr->p_offset = cpu_to_be64(opalcore_off); 4106f713d18SHari Bathini 4116f713d18SHari Bathini count++; 4126f713d18SHari Bathini opalcore_off += oc_conf->ptload_size[i]; 4136f713d18SHari Bathini paddr += oc_conf->ptload_size[i]; 4146f713d18SHari Bathini } 4156f713d18SHari Bathini 4166f713d18SHari Bathini elf->e_phnum = cpu_to_be16(count); 4176f713d18SHari Bathini 4186f713d18SHari Bathini bufp = (char *)opalcore_append_cpu_notes((Elf64_Word *)bufp); 4196f713d18SHari Bathini bufp = (char *)auxv_to_elf64_notes((Elf64_Word *)bufp, opal_boot_entry); 4206f713d18SHari Bathini 4216f713d18SHari Bathini oc_conf->opalcore_size = opalcore_off; 4226f713d18SHari Bathini return 0; 4236f713d18SHari Bathini } 4246f713d18SHari Bathini 4256f713d18SHari Bathini static void opalcore_cleanup(void) 4266f713d18SHari Bathini { 4276f713d18SHari Bathini if (oc_conf == NULL) 4286f713d18SHari Bathini return; 4296f713d18SHari Bathini 4306f713d18SHari Bathini /* Remove OPAL core sysfs file */ 4316f713d18SHari Bathini sysfs_remove_bin_file(opal_kobj, &opal_core_attr); 4326f713d18SHari Bathini oc_conf->ptload_phdr = NULL; 4336f713d18SHari Bathini oc_conf->ptload_cnt = 0; 4346f713d18SHari Bathini 4356f713d18SHari Bathini /* free the buffer used for setting up OPAL core */ 4366f713d18SHari Bathini if (oc_conf->opalcorebuf) { 4376f713d18SHari Bathini void *end = (void *)((u64)oc_conf->opalcorebuf + 4386f713d18SHari Bathini oc_conf->opalcorebuf_sz); 4396f713d18SHari Bathini 4406f713d18SHari Bathini free_reserved_area(oc_conf->opalcorebuf, end, -1, NULL); 4416f713d18SHari Bathini oc_conf->opalcorebuf = NULL; 4426f713d18SHari Bathini oc_conf->opalcorebuf_sz = 0; 4436f713d18SHari Bathini } 4446f713d18SHari Bathini 4456f713d18SHari Bathini kfree(oc_conf); 4466f713d18SHari Bathini oc_conf = NULL; 4476f713d18SHari Bathini } 4486f713d18SHari Bathini __exitcall(opalcore_cleanup); 4496f713d18SHari Bathini 4506f713d18SHari Bathini static void __init opalcore_config_init(void) 4516f713d18SHari Bathini { 4526f713d18SHari Bathini u32 idx, cpu_data_version; 4536f713d18SHari Bathini struct device_node *np; 4546f713d18SHari Bathini const __be32 *prop; 4556f713d18SHari Bathini u64 addr = 0; 4566f713d18SHari Bathini int i, ret; 4576f713d18SHari Bathini 4586f713d18SHari Bathini np = of_find_node_by_path("/ibm,opal/dump"); 4596f713d18SHari Bathini if (np == NULL) 4606f713d18SHari Bathini return; 4616f713d18SHari Bathini 4626f713d18SHari Bathini if (!of_device_is_compatible(np, "ibm,opal-dump")) { 4636f713d18SHari Bathini pr_warn("Support missing for this f/w version!\n"); 4646f713d18SHari Bathini return; 4656f713d18SHari Bathini } 4666f713d18SHari Bathini 4676f713d18SHari Bathini /* Check if dump has been initiated on last reboot */ 4686f713d18SHari Bathini prop = of_get_property(np, "mpipl-boot", NULL); 4696f713d18SHari Bathini if (!prop) { 4706f713d18SHari Bathini of_node_put(np); 4716f713d18SHari Bathini return; 4726f713d18SHari Bathini } 4736f713d18SHari Bathini 4746f713d18SHari Bathini /* Get OPAL metadata */ 4756f713d18SHari Bathini ret = opal_mpipl_query_tag(OPAL_MPIPL_TAG_OPAL, &addr); 4766f713d18SHari Bathini if ((ret != OPAL_SUCCESS) || !addr) { 4776f713d18SHari Bathini pr_err("Failed to get OPAL metadata (%d)\n", ret); 4786f713d18SHari Bathini goto error_out; 4796f713d18SHari Bathini } 4806f713d18SHari Bathini 4816f713d18SHari Bathini addr = be64_to_cpu(addr); 4826f713d18SHari Bathini pr_debug("OPAL metadata addr: %llx\n", addr); 4836f713d18SHari Bathini opalc_metadata = __va(addr); 4846f713d18SHari Bathini 4856f713d18SHari Bathini /* Get OPAL CPU metadata */ 4866f713d18SHari Bathini ret = opal_mpipl_query_tag(OPAL_MPIPL_TAG_CPU, &addr); 4876f713d18SHari Bathini if ((ret != OPAL_SUCCESS) || !addr) { 4886f713d18SHari Bathini pr_err("Failed to get OPAL CPU metadata (%d)\n", ret); 4896f713d18SHari Bathini goto error_out; 4906f713d18SHari Bathini } 4916f713d18SHari Bathini 4926f713d18SHari Bathini addr = be64_to_cpu(addr); 4936f713d18SHari Bathini pr_debug("CPU metadata addr: %llx\n", addr); 4946f713d18SHari Bathini opalc_cpu_metadata = __va(addr); 4956f713d18SHari Bathini 4966f713d18SHari Bathini /* Allocate memory for config buffer */ 4976f713d18SHari Bathini oc_conf = kzalloc(sizeof(struct opalcore_config), GFP_KERNEL); 4986f713d18SHari Bathini if (oc_conf == NULL) 4996f713d18SHari Bathini goto error_out; 5006f713d18SHari Bathini 5016f713d18SHari Bathini /* Parse OPAL metadata */ 5026f713d18SHari Bathini if (opalc_metadata->version != OPAL_MPIPL_VERSION) { 5036f713d18SHari Bathini pr_warn("Supported OPAL metadata version: %u, found: %u!\n", 5046f713d18SHari Bathini OPAL_MPIPL_VERSION, opalc_metadata->version); 5056f713d18SHari Bathini pr_warn("WARNING: F/W using newer OPAL metadata format!!\n"); 5066f713d18SHari Bathini } 5076f713d18SHari Bathini 5086f713d18SHari Bathini oc_conf->ptload_cnt = 0; 5096f713d18SHari Bathini idx = be32_to_cpu(opalc_metadata->region_cnt); 5106f713d18SHari Bathini if (idx > MAX_PT_LOAD_CNT) { 5116f713d18SHari Bathini pr_warn("WARNING: OPAL regions count (%d) adjusted to limit (%d)", 5126f713d18SHari Bathini MAX_PT_LOAD_CNT, idx); 5136f713d18SHari Bathini idx = MAX_PT_LOAD_CNT; 5146f713d18SHari Bathini } 5156f713d18SHari Bathini for (i = 0; i < idx; i++) { 5166f713d18SHari Bathini oc_conf->ptload_addr[oc_conf->ptload_cnt] = 5176f713d18SHari Bathini be64_to_cpu(opalc_metadata->region[i].dest); 5186f713d18SHari Bathini oc_conf->ptload_size[oc_conf->ptload_cnt++] = 5196f713d18SHari Bathini be64_to_cpu(opalc_metadata->region[i].size); 5206f713d18SHari Bathini } 5216f713d18SHari Bathini oc_conf->ptload_cnt = i; 5226f713d18SHari Bathini oc_conf->crashing_cpu = be32_to_cpu(opalc_metadata->crashing_pir); 5236f713d18SHari Bathini 5246f713d18SHari Bathini if (!oc_conf->ptload_cnt) { 5256f713d18SHari Bathini pr_err("OPAL memory regions not found\n"); 5266f713d18SHari Bathini goto error_out; 5276f713d18SHari Bathini } 5286f713d18SHari Bathini 5296f713d18SHari Bathini /* Parse OPAL CPU metadata */ 5306f713d18SHari Bathini cpu_data_version = be32_to_cpu(opalc_cpu_metadata->cpu_data_version); 5316f713d18SHari Bathini if (cpu_data_version != HDAT_FADUMP_CPU_DATA_VER) { 5326f713d18SHari Bathini pr_warn("Supported CPU data version: %u, found: %u!\n", 5336f713d18SHari Bathini HDAT_FADUMP_CPU_DATA_VER, cpu_data_version); 5346f713d18SHari Bathini pr_warn("WARNING: F/W using newer CPU state data format!!\n"); 5356f713d18SHari Bathini } 5366f713d18SHari Bathini 5376f713d18SHari Bathini addr = be64_to_cpu(opalc_cpu_metadata->region[0].dest); 5386f713d18SHari Bathini if (!addr) { 5396f713d18SHari Bathini pr_err("CPU state data not found!\n"); 5406f713d18SHari Bathini goto error_out; 5416f713d18SHari Bathini } 5426f713d18SHari Bathini oc_conf->cpu_state_destination_vaddr = (u64)__va(addr); 5436f713d18SHari Bathini 5446f713d18SHari Bathini oc_conf->cpu_state_data_size = 5456f713d18SHari Bathini be64_to_cpu(opalc_cpu_metadata->region[0].size); 5466f713d18SHari Bathini oc_conf->cpu_state_entry_size = 5476f713d18SHari Bathini be32_to_cpu(opalc_cpu_metadata->cpu_data_size); 5486f713d18SHari Bathini 5496f713d18SHari Bathini if ((oc_conf->cpu_state_entry_size == 0) || 5506f713d18SHari Bathini (oc_conf->cpu_state_entry_size > oc_conf->cpu_state_data_size)) { 5516f713d18SHari Bathini pr_err("CPU state data is invalid.\n"); 5526f713d18SHari Bathini goto error_out; 5536f713d18SHari Bathini } 5546f713d18SHari Bathini oc_conf->num_cpus = (oc_conf->cpu_state_data_size / 5556f713d18SHari Bathini oc_conf->cpu_state_entry_size); 5566f713d18SHari Bathini 5576f713d18SHari Bathini of_node_put(np); 5586f713d18SHari Bathini return; 5596f713d18SHari Bathini 5606f713d18SHari Bathini error_out: 5616f713d18SHari Bathini pr_err("Could not export /sys/firmware/opal/core\n"); 5626f713d18SHari Bathini opalcore_cleanup(); 5636f713d18SHari Bathini of_node_put(np); 5646f713d18SHari Bathini } 5656f713d18SHari Bathini 566845426f3SHari Bathini static ssize_t fadump_release_opalcore_store(struct kobject *kobj, 567845426f3SHari Bathini struct kobj_attribute *attr, 568845426f3SHari Bathini const char *buf, size_t count) 569845426f3SHari Bathini { 570845426f3SHari Bathini int input = -1; 571845426f3SHari Bathini 572845426f3SHari Bathini if (kstrtoint(buf, 0, &input)) 573845426f3SHari Bathini return -EINVAL; 574845426f3SHari Bathini 575845426f3SHari Bathini if (input == 1) { 576845426f3SHari Bathini if (oc_conf == NULL) { 577845426f3SHari Bathini pr_err("'/sys/firmware/opal/core' file not accessible!\n"); 578845426f3SHari Bathini return -EPERM; 579845426f3SHari Bathini } 580845426f3SHari Bathini 581845426f3SHari Bathini /* 582845426f3SHari Bathini * Take away '/sys/firmware/opal/core' and release all memory 583845426f3SHari Bathini * used for exporting this file. 584845426f3SHari Bathini */ 585845426f3SHari Bathini opalcore_cleanup(); 586845426f3SHari Bathini } else 587845426f3SHari Bathini return -EINVAL; 588845426f3SHari Bathini 589845426f3SHari Bathini return count; 590845426f3SHari Bathini } 591845426f3SHari Bathini 592845426f3SHari Bathini static struct kobj_attribute opalcore_rel_attr = __ATTR(fadump_release_opalcore, 593845426f3SHari Bathini 0200, NULL, 594845426f3SHari Bathini fadump_release_opalcore_store); 595845426f3SHari Bathini 5966f713d18SHari Bathini static int __init opalcore_init(void) 5976f713d18SHari Bathini { 5986f713d18SHari Bathini int rc = -1; 5996f713d18SHari Bathini 6006f713d18SHari Bathini opalcore_config_init(); 6016f713d18SHari Bathini 6026f713d18SHari Bathini if (oc_conf == NULL) 6036f713d18SHari Bathini return rc; 6046f713d18SHari Bathini 6056f713d18SHari Bathini create_opalcore(); 6066f713d18SHari Bathini 6076f713d18SHari Bathini /* 6086f713d18SHari Bathini * If oc_conf->opalcorebuf= is set in the 2nd kernel, 6096f713d18SHari Bathini * then capture the dump. 6106f713d18SHari Bathini */ 6116f713d18SHari Bathini if (!(is_opalcore_usable())) { 6126f713d18SHari Bathini pr_err("Failed to export /sys/firmware/opal/core\n"); 6136f713d18SHari Bathini opalcore_cleanup(); 6146f713d18SHari Bathini return rc; 6156f713d18SHari Bathini } 6166f713d18SHari Bathini 6176f713d18SHari Bathini /* Set OPAL core file size */ 6186f713d18SHari Bathini opal_core_attr.size = oc_conf->opalcore_size; 6196f713d18SHari Bathini 6206f713d18SHari Bathini /* Export OPAL core sysfs file */ 6216f713d18SHari Bathini rc = sysfs_create_bin_file(opal_kobj, &opal_core_attr); 6226f713d18SHari Bathini if (rc != 0) { 6236f713d18SHari Bathini pr_err("Failed to export /sys/firmware/opal/core\n"); 6246f713d18SHari Bathini opalcore_cleanup(); 6256f713d18SHari Bathini return rc; 6266f713d18SHari Bathini } 6276f713d18SHari Bathini 628845426f3SHari Bathini rc = sysfs_create_file(kernel_kobj, &opalcore_rel_attr.attr); 629845426f3SHari Bathini if (rc) { 630845426f3SHari Bathini pr_warn("unable to create sysfs file fadump_release_opalcore (%d)\n", 631845426f3SHari Bathini rc); 632845426f3SHari Bathini } 633845426f3SHari Bathini 6346f713d18SHari Bathini return 0; 6356f713d18SHari Bathini } 6366f713d18SHari Bathini fs_initcall(opalcore_init); 637