1*549e984eSSergio Lopez /* 2*549e984eSSergio Lopez * Copyright (c) 2003-2004 Fabrice Bellard 3*549e984eSSergio Lopez * Copyright (c) 2019 Red Hat, Inc. 4*549e984eSSergio Lopez * 5*549e984eSSergio Lopez * Permission is hereby granted, free of charge, to any person obtaining a copy 6*549e984eSSergio Lopez * of this software and associated documentation files (the "Software"), to deal 7*549e984eSSergio Lopez * in the Software without restriction, including without limitation the rights 8*549e984eSSergio Lopez * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell 9*549e984eSSergio Lopez * copies of the Software, and to permit persons to whom the Software is 10*549e984eSSergio Lopez * furnished to do so, subject to the following conditions: 11*549e984eSSergio Lopez * 12*549e984eSSergio Lopez * The above copyright notice and this permission notice shall be included in 13*549e984eSSergio Lopez * all copies or substantial portions of the Software. 14*549e984eSSergio Lopez * 15*549e984eSSergio Lopez * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR 16*549e984eSSergio Lopez * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, 17*549e984eSSergio Lopez * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL 18*549e984eSSergio Lopez * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER 19*549e984eSSergio Lopez * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, 20*549e984eSSergio Lopez * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN 21*549e984eSSergio Lopez * THE SOFTWARE. 22*549e984eSSergio Lopez */ 23*549e984eSSergio Lopez #include "qemu/osdep.h" 24*549e984eSSergio Lopez #include "qemu/error-report.h" 25*549e984eSSergio Lopez #include "qemu/option.h" 26*549e984eSSergio Lopez #include "qemu/cutils.h" 27*549e984eSSergio Lopez #include "qemu/units.h" 28*549e984eSSergio Lopez #include "qemu-common.h" 29*549e984eSSergio Lopez #include "qapi/error.h" 30*549e984eSSergio Lopez #include "qapi/qmp/qerror.h" 31*549e984eSSergio Lopez #include "qapi/qapi-visit-common.h" 32*549e984eSSergio Lopez #include "qapi/visitor.h" 33*549e984eSSergio Lopez #include "sysemu/qtest.h" 34*549e984eSSergio Lopez #include "sysemu/numa.h" 35*549e984eSSergio Lopez #include "sysemu/replay.h" 36*549e984eSSergio Lopez #include "sysemu/sysemu.h" 37*549e984eSSergio Lopez 38*549e984eSSergio Lopez #include "hw/i386/x86.h" 39*549e984eSSergio Lopez #include "hw/i386/pc.h" 40*549e984eSSergio Lopez #include "target/i386/cpu.h" 41*549e984eSSergio Lopez #include "hw/i386/topology.h" 42*549e984eSSergio Lopez #include "hw/i386/fw_cfg.h" 43*549e984eSSergio Lopez 44*549e984eSSergio Lopez #include "hw/acpi/cpu_hotplug.h" 45*549e984eSSergio Lopez #include "hw/nmi.h" 46*549e984eSSergio Lopez #include "hw/loader.h" 47*549e984eSSergio Lopez #include "multiboot.h" 48*549e984eSSergio Lopez #include "elf.h" 49*549e984eSSergio Lopez #include "standard-headers/asm-x86/bootparam.h" 50*549e984eSSergio Lopez 51*549e984eSSergio Lopez #define BIOS_FILENAME "bios.bin" 52*549e984eSSergio Lopez 53*549e984eSSergio Lopez /* Physical Address of PVH entry point read from kernel ELF NOTE */ 54*549e984eSSergio Lopez static size_t pvh_start_addr; 55*549e984eSSergio Lopez 56*549e984eSSergio Lopez /* 57*549e984eSSergio Lopez * Calculates initial APIC ID for a specific CPU index 58*549e984eSSergio Lopez * 59*549e984eSSergio Lopez * Currently we need to be able to calculate the APIC ID from the CPU index 60*549e984eSSergio Lopez * alone (without requiring a CPU object), as the QEMU<->Seabios interfaces have 61*549e984eSSergio Lopez * no concept of "CPU index", and the NUMA tables on fw_cfg need the APIC ID of 62*549e984eSSergio Lopez * all CPUs up to max_cpus. 63*549e984eSSergio Lopez */ 64*549e984eSSergio Lopez uint32_t x86_cpu_apic_id_from_index(PCMachineState *pcms, 65*549e984eSSergio Lopez unsigned int cpu_index) 66*549e984eSSergio Lopez { 67*549e984eSSergio Lopez MachineState *ms = MACHINE(pcms); 68*549e984eSSergio Lopez PCMachineClass *pcmc = PC_MACHINE_GET_CLASS(pcms); 69*549e984eSSergio Lopez uint32_t correct_id; 70*549e984eSSergio Lopez static bool warned; 71*549e984eSSergio Lopez 72*549e984eSSergio Lopez correct_id = x86_apicid_from_cpu_idx(pcms->smp_dies, ms->smp.cores, 73*549e984eSSergio Lopez ms->smp.threads, cpu_index); 74*549e984eSSergio Lopez if (pcmc->compat_apic_id_mode) { 75*549e984eSSergio Lopez if (cpu_index != correct_id && !warned && !qtest_enabled()) { 76*549e984eSSergio Lopez error_report("APIC IDs set in compatibility mode, " 77*549e984eSSergio Lopez "CPU topology won't match the configuration"); 78*549e984eSSergio Lopez warned = true; 79*549e984eSSergio Lopez } 80*549e984eSSergio Lopez return cpu_index; 81*549e984eSSergio Lopez } else { 82*549e984eSSergio Lopez return correct_id; 83*549e984eSSergio Lopez } 84*549e984eSSergio Lopez } 85*549e984eSSergio Lopez 86*549e984eSSergio Lopez void x86_cpu_new(PCMachineState *pcms, int64_t apic_id, Error **errp) 87*549e984eSSergio Lopez { 88*549e984eSSergio Lopez Object *cpu = NULL; 89*549e984eSSergio Lopez Error *local_err = NULL; 90*549e984eSSergio Lopez CPUX86State *env = NULL; 91*549e984eSSergio Lopez 92*549e984eSSergio Lopez cpu = object_new(MACHINE(pcms)->cpu_type); 93*549e984eSSergio Lopez 94*549e984eSSergio Lopez env = &X86_CPU(cpu)->env; 95*549e984eSSergio Lopez env->nr_dies = pcms->smp_dies; 96*549e984eSSergio Lopez 97*549e984eSSergio Lopez object_property_set_uint(cpu, apic_id, "apic-id", &local_err); 98*549e984eSSergio Lopez object_property_set_bool(cpu, true, "realized", &local_err); 99*549e984eSSergio Lopez 100*549e984eSSergio Lopez object_unref(cpu); 101*549e984eSSergio Lopez error_propagate(errp, local_err); 102*549e984eSSergio Lopez } 103*549e984eSSergio Lopez 104*549e984eSSergio Lopez void x86_cpus_init(PCMachineState *pcms) 105*549e984eSSergio Lopez { 106*549e984eSSergio Lopez int i; 107*549e984eSSergio Lopez const CPUArchIdList *possible_cpus; 108*549e984eSSergio Lopez MachineState *ms = MACHINE(pcms); 109*549e984eSSergio Lopez MachineClass *mc = MACHINE_GET_CLASS(pcms); 110*549e984eSSergio Lopez PCMachineClass *pcmc = PC_MACHINE_CLASS(mc); 111*549e984eSSergio Lopez 112*549e984eSSergio Lopez x86_cpu_set_default_version(pcmc->default_cpu_version); 113*549e984eSSergio Lopez 114*549e984eSSergio Lopez /* 115*549e984eSSergio Lopez * Calculates the limit to CPU APIC ID values 116*549e984eSSergio Lopez * 117*549e984eSSergio Lopez * Limit for the APIC ID value, so that all 118*549e984eSSergio Lopez * CPU APIC IDs are < pcms->apic_id_limit. 119*549e984eSSergio Lopez * 120*549e984eSSergio Lopez * This is used for FW_CFG_MAX_CPUS. See comments on fw_cfg_arch_create(). 121*549e984eSSergio Lopez */ 122*549e984eSSergio Lopez pcms->apic_id_limit = x86_cpu_apic_id_from_index(pcms, 123*549e984eSSergio Lopez ms->smp.max_cpus - 1) + 1; 124*549e984eSSergio Lopez possible_cpus = mc->possible_cpu_arch_ids(ms); 125*549e984eSSergio Lopez for (i = 0; i < ms->smp.cpus; i++) { 126*549e984eSSergio Lopez x86_cpu_new(pcms, possible_cpus->cpus[i].arch_id, &error_fatal); 127*549e984eSSergio Lopez } 128*549e984eSSergio Lopez } 129*549e984eSSergio Lopez 130*549e984eSSergio Lopez CpuInstanceProperties 131*549e984eSSergio Lopez x86_cpu_index_to_props(MachineState *ms, unsigned cpu_index) 132*549e984eSSergio Lopez { 133*549e984eSSergio Lopez MachineClass *mc = MACHINE_GET_CLASS(ms); 134*549e984eSSergio Lopez const CPUArchIdList *possible_cpus = mc->possible_cpu_arch_ids(ms); 135*549e984eSSergio Lopez 136*549e984eSSergio Lopez assert(cpu_index < possible_cpus->len); 137*549e984eSSergio Lopez return possible_cpus->cpus[cpu_index].props; 138*549e984eSSergio Lopez } 139*549e984eSSergio Lopez 140*549e984eSSergio Lopez int64_t x86_get_default_cpu_node_id(const MachineState *ms, int idx) 141*549e984eSSergio Lopez { 142*549e984eSSergio Lopez X86CPUTopoInfo topo; 143*549e984eSSergio Lopez PCMachineState *pcms = PC_MACHINE(ms); 144*549e984eSSergio Lopez 145*549e984eSSergio Lopez assert(idx < ms->possible_cpus->len); 146*549e984eSSergio Lopez x86_topo_ids_from_apicid(ms->possible_cpus->cpus[idx].arch_id, 147*549e984eSSergio Lopez pcms->smp_dies, ms->smp.cores, 148*549e984eSSergio Lopez ms->smp.threads, &topo); 149*549e984eSSergio Lopez return topo.pkg_id % ms->numa_state->num_nodes; 150*549e984eSSergio Lopez } 151*549e984eSSergio Lopez 152*549e984eSSergio Lopez const CPUArchIdList *x86_possible_cpu_arch_ids(MachineState *ms) 153*549e984eSSergio Lopez { 154*549e984eSSergio Lopez PCMachineState *pcms = PC_MACHINE(ms); 155*549e984eSSergio Lopez int i; 156*549e984eSSergio Lopez unsigned int max_cpus = ms->smp.max_cpus; 157*549e984eSSergio Lopez 158*549e984eSSergio Lopez if (ms->possible_cpus) { 159*549e984eSSergio Lopez /* 160*549e984eSSergio Lopez * make sure that max_cpus hasn't changed since the first use, i.e. 161*549e984eSSergio Lopez * -smp hasn't been parsed after it 162*549e984eSSergio Lopez */ 163*549e984eSSergio Lopez assert(ms->possible_cpus->len == max_cpus); 164*549e984eSSergio Lopez return ms->possible_cpus; 165*549e984eSSergio Lopez } 166*549e984eSSergio Lopez 167*549e984eSSergio Lopez ms->possible_cpus = g_malloc0(sizeof(CPUArchIdList) + 168*549e984eSSergio Lopez sizeof(CPUArchId) * max_cpus); 169*549e984eSSergio Lopez ms->possible_cpus->len = max_cpus; 170*549e984eSSergio Lopez for (i = 0; i < ms->possible_cpus->len; i++) { 171*549e984eSSergio Lopez X86CPUTopoInfo topo; 172*549e984eSSergio Lopez 173*549e984eSSergio Lopez ms->possible_cpus->cpus[i].type = ms->cpu_type; 174*549e984eSSergio Lopez ms->possible_cpus->cpus[i].vcpus_count = 1; 175*549e984eSSergio Lopez ms->possible_cpus->cpus[i].arch_id = 176*549e984eSSergio Lopez x86_cpu_apic_id_from_index(pcms, i); 177*549e984eSSergio Lopez x86_topo_ids_from_apicid(ms->possible_cpus->cpus[i].arch_id, 178*549e984eSSergio Lopez pcms->smp_dies, ms->smp.cores, 179*549e984eSSergio Lopez ms->smp.threads, &topo); 180*549e984eSSergio Lopez ms->possible_cpus->cpus[i].props.has_socket_id = true; 181*549e984eSSergio Lopez ms->possible_cpus->cpus[i].props.socket_id = topo.pkg_id; 182*549e984eSSergio Lopez if (pcms->smp_dies > 1) { 183*549e984eSSergio Lopez ms->possible_cpus->cpus[i].props.has_die_id = true; 184*549e984eSSergio Lopez ms->possible_cpus->cpus[i].props.die_id = topo.die_id; 185*549e984eSSergio Lopez } 186*549e984eSSergio Lopez ms->possible_cpus->cpus[i].props.has_core_id = true; 187*549e984eSSergio Lopez ms->possible_cpus->cpus[i].props.core_id = topo.core_id; 188*549e984eSSergio Lopez ms->possible_cpus->cpus[i].props.has_thread_id = true; 189*549e984eSSergio Lopez ms->possible_cpus->cpus[i].props.thread_id = topo.smt_id; 190*549e984eSSergio Lopez } 191*549e984eSSergio Lopez return ms->possible_cpus; 192*549e984eSSergio Lopez } 193*549e984eSSergio Lopez 194*549e984eSSergio Lopez static long get_file_size(FILE *f) 195*549e984eSSergio Lopez { 196*549e984eSSergio Lopez long where, size; 197*549e984eSSergio Lopez 198*549e984eSSergio Lopez /* XXX: on Unix systems, using fstat() probably makes more sense */ 199*549e984eSSergio Lopez 200*549e984eSSergio Lopez where = ftell(f); 201*549e984eSSergio Lopez fseek(f, 0, SEEK_END); 202*549e984eSSergio Lopez size = ftell(f); 203*549e984eSSergio Lopez fseek(f, where, SEEK_SET); 204*549e984eSSergio Lopez 205*549e984eSSergio Lopez return size; 206*549e984eSSergio Lopez } 207*549e984eSSergio Lopez 208*549e984eSSergio Lopez struct setup_data { 209*549e984eSSergio Lopez uint64_t next; 210*549e984eSSergio Lopez uint32_t type; 211*549e984eSSergio Lopez uint32_t len; 212*549e984eSSergio Lopez uint8_t data[0]; 213*549e984eSSergio Lopez } __attribute__((packed)); 214*549e984eSSergio Lopez 215*549e984eSSergio Lopez 216*549e984eSSergio Lopez /* 217*549e984eSSergio Lopez * The entry point into the kernel for PVH boot is different from 218*549e984eSSergio Lopez * the native entry point. The PVH entry is defined by the x86/HVM 219*549e984eSSergio Lopez * direct boot ABI and is available in an ELFNOTE in the kernel binary. 220*549e984eSSergio Lopez * 221*549e984eSSergio Lopez * This function is passed to load_elf() when it is called from 222*549e984eSSergio Lopez * load_elfboot() which then additionally checks for an ELF Note of 223*549e984eSSergio Lopez * type XEN_ELFNOTE_PHYS32_ENTRY and passes it to this function to 224*549e984eSSergio Lopez * parse the PVH entry address from the ELF Note. 225*549e984eSSergio Lopez * 226*549e984eSSergio Lopez * Due to trickery in elf_opts.h, load_elf() is actually available as 227*549e984eSSergio Lopez * load_elf32() or load_elf64() and this routine needs to be able 228*549e984eSSergio Lopez * to deal with being called as 32 or 64 bit. 229*549e984eSSergio Lopez * 230*549e984eSSergio Lopez * The address of the PVH entry point is saved to the 'pvh_start_addr' 231*549e984eSSergio Lopez * global variable. (although the entry point is 32-bit, the kernel 232*549e984eSSergio Lopez * binary can be either 32-bit or 64-bit). 233*549e984eSSergio Lopez */ 234*549e984eSSergio Lopez static uint64_t read_pvh_start_addr(void *arg1, void *arg2, bool is64) 235*549e984eSSergio Lopez { 236*549e984eSSergio Lopez size_t *elf_note_data_addr; 237*549e984eSSergio Lopez 238*549e984eSSergio Lopez /* Check if ELF Note header passed in is valid */ 239*549e984eSSergio Lopez if (arg1 == NULL) { 240*549e984eSSergio Lopez return 0; 241*549e984eSSergio Lopez } 242*549e984eSSergio Lopez 243*549e984eSSergio Lopez if (is64) { 244*549e984eSSergio Lopez struct elf64_note *nhdr64 = (struct elf64_note *)arg1; 245*549e984eSSergio Lopez uint64_t nhdr_size64 = sizeof(struct elf64_note); 246*549e984eSSergio Lopez uint64_t phdr_align = *(uint64_t *)arg2; 247*549e984eSSergio Lopez uint64_t nhdr_namesz = nhdr64->n_namesz; 248*549e984eSSergio Lopez 249*549e984eSSergio Lopez elf_note_data_addr = 250*549e984eSSergio Lopez ((void *)nhdr64) + nhdr_size64 + 251*549e984eSSergio Lopez QEMU_ALIGN_UP(nhdr_namesz, phdr_align); 252*549e984eSSergio Lopez } else { 253*549e984eSSergio Lopez struct elf32_note *nhdr32 = (struct elf32_note *)arg1; 254*549e984eSSergio Lopez uint32_t nhdr_size32 = sizeof(struct elf32_note); 255*549e984eSSergio Lopez uint32_t phdr_align = *(uint32_t *)arg2; 256*549e984eSSergio Lopez uint32_t nhdr_namesz = nhdr32->n_namesz; 257*549e984eSSergio Lopez 258*549e984eSSergio Lopez elf_note_data_addr = 259*549e984eSSergio Lopez ((void *)nhdr32) + nhdr_size32 + 260*549e984eSSergio Lopez QEMU_ALIGN_UP(nhdr_namesz, phdr_align); 261*549e984eSSergio Lopez } 262*549e984eSSergio Lopez 263*549e984eSSergio Lopez pvh_start_addr = *elf_note_data_addr; 264*549e984eSSergio Lopez 265*549e984eSSergio Lopez return pvh_start_addr; 266*549e984eSSergio Lopez } 267*549e984eSSergio Lopez 268*549e984eSSergio Lopez static bool load_elfboot(const char *kernel_filename, 269*549e984eSSergio Lopez int kernel_file_size, 270*549e984eSSergio Lopez uint8_t *header, 271*549e984eSSergio Lopez size_t pvh_xen_start_addr, 272*549e984eSSergio Lopez FWCfgState *fw_cfg) 273*549e984eSSergio Lopez { 274*549e984eSSergio Lopez uint32_t flags = 0; 275*549e984eSSergio Lopez uint32_t mh_load_addr = 0; 276*549e984eSSergio Lopez uint32_t elf_kernel_size = 0; 277*549e984eSSergio Lopez uint64_t elf_entry; 278*549e984eSSergio Lopez uint64_t elf_low, elf_high; 279*549e984eSSergio Lopez int kernel_size; 280*549e984eSSergio Lopez 281*549e984eSSergio Lopez if (ldl_p(header) != 0x464c457f) { 282*549e984eSSergio Lopez return false; /* no elfboot */ 283*549e984eSSergio Lopez } 284*549e984eSSergio Lopez 285*549e984eSSergio Lopez bool elf_is64 = header[EI_CLASS] == ELFCLASS64; 286*549e984eSSergio Lopez flags = elf_is64 ? 287*549e984eSSergio Lopez ((Elf64_Ehdr *)header)->e_flags : ((Elf32_Ehdr *)header)->e_flags; 288*549e984eSSergio Lopez 289*549e984eSSergio Lopez if (flags & 0x00010004) { /* LOAD_ELF_HEADER_HAS_ADDR */ 290*549e984eSSergio Lopez error_report("elfboot unsupported flags = %x", flags); 291*549e984eSSergio Lopez exit(1); 292*549e984eSSergio Lopez } 293*549e984eSSergio Lopez 294*549e984eSSergio Lopez uint64_t elf_note_type = XEN_ELFNOTE_PHYS32_ENTRY; 295*549e984eSSergio Lopez kernel_size = load_elf(kernel_filename, read_pvh_start_addr, 296*549e984eSSergio Lopez NULL, &elf_note_type, &elf_entry, 297*549e984eSSergio Lopez &elf_low, &elf_high, 0, I386_ELF_MACHINE, 298*549e984eSSergio Lopez 0, 0); 299*549e984eSSergio Lopez 300*549e984eSSergio Lopez if (kernel_size < 0) { 301*549e984eSSergio Lopez error_report("Error while loading elf kernel"); 302*549e984eSSergio Lopez exit(1); 303*549e984eSSergio Lopez } 304*549e984eSSergio Lopez mh_load_addr = elf_low; 305*549e984eSSergio Lopez elf_kernel_size = elf_high - elf_low; 306*549e984eSSergio Lopez 307*549e984eSSergio Lopez if (pvh_start_addr == 0) { 308*549e984eSSergio Lopez error_report("Error loading uncompressed kernel without PVH ELF Note"); 309*549e984eSSergio Lopez exit(1); 310*549e984eSSergio Lopez } 311*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_KERNEL_ENTRY, pvh_start_addr); 312*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_KERNEL_ADDR, mh_load_addr); 313*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_KERNEL_SIZE, elf_kernel_size); 314*549e984eSSergio Lopez 315*549e984eSSergio Lopez return true; 316*549e984eSSergio Lopez } 317*549e984eSSergio Lopez 318*549e984eSSergio Lopez void x86_load_linux(PCMachineState *pcms, 319*549e984eSSergio Lopez FWCfgState *fw_cfg) 320*549e984eSSergio Lopez { 321*549e984eSSergio Lopez uint16_t protocol; 322*549e984eSSergio Lopez int setup_size, kernel_size, cmdline_size; 323*549e984eSSergio Lopez int dtb_size, setup_data_offset; 324*549e984eSSergio Lopez uint32_t initrd_max; 325*549e984eSSergio Lopez uint8_t header[8192], *setup, *kernel; 326*549e984eSSergio Lopez hwaddr real_addr, prot_addr, cmdline_addr, initrd_addr = 0; 327*549e984eSSergio Lopez FILE *f; 328*549e984eSSergio Lopez char *vmode; 329*549e984eSSergio Lopez MachineState *machine = MACHINE(pcms); 330*549e984eSSergio Lopez PCMachineClass *pcmc = PC_MACHINE_GET_CLASS(pcms); 331*549e984eSSergio Lopez struct setup_data *setup_data; 332*549e984eSSergio Lopez const char *kernel_filename = machine->kernel_filename; 333*549e984eSSergio Lopez const char *initrd_filename = machine->initrd_filename; 334*549e984eSSergio Lopez const char *dtb_filename = machine->dtb; 335*549e984eSSergio Lopez const char *kernel_cmdline = machine->kernel_cmdline; 336*549e984eSSergio Lopez 337*549e984eSSergio Lopez /* Align to 16 bytes as a paranoia measure */ 338*549e984eSSergio Lopez cmdline_size = (strlen(kernel_cmdline) + 16) & ~15; 339*549e984eSSergio Lopez 340*549e984eSSergio Lopez /* load the kernel header */ 341*549e984eSSergio Lopez f = fopen(kernel_filename, "rb"); 342*549e984eSSergio Lopez if (!f) { 343*549e984eSSergio Lopez fprintf(stderr, "qemu: could not open kernel file '%s': %s\n", 344*549e984eSSergio Lopez kernel_filename, strerror(errno)); 345*549e984eSSergio Lopez exit(1); 346*549e984eSSergio Lopez } 347*549e984eSSergio Lopez 348*549e984eSSergio Lopez kernel_size = get_file_size(f); 349*549e984eSSergio Lopez if (!kernel_size || 350*549e984eSSergio Lopez fread(header, 1, MIN(ARRAY_SIZE(header), kernel_size), f) != 351*549e984eSSergio Lopez MIN(ARRAY_SIZE(header), kernel_size)) { 352*549e984eSSergio Lopez fprintf(stderr, "qemu: could not load kernel '%s': %s\n", 353*549e984eSSergio Lopez kernel_filename, strerror(errno)); 354*549e984eSSergio Lopez exit(1); 355*549e984eSSergio Lopez } 356*549e984eSSergio Lopez 357*549e984eSSergio Lopez /* kernel protocol version */ 358*549e984eSSergio Lopez if (ldl_p(header + 0x202) == 0x53726448) { 359*549e984eSSergio Lopez protocol = lduw_p(header + 0x206); 360*549e984eSSergio Lopez } else { 361*549e984eSSergio Lopez /* 362*549e984eSSergio Lopez * This could be a multiboot kernel. If it is, let's stop treating it 363*549e984eSSergio Lopez * like a Linux kernel. 364*549e984eSSergio Lopez * Note: some multiboot images could be in the ELF format (the same of 365*549e984eSSergio Lopez * PVH), so we try multiboot first since we check the multiboot magic 366*549e984eSSergio Lopez * header before to load it. 367*549e984eSSergio Lopez */ 368*549e984eSSergio Lopez if (load_multiboot(fw_cfg, f, kernel_filename, initrd_filename, 369*549e984eSSergio Lopez kernel_cmdline, kernel_size, header)) { 370*549e984eSSergio Lopez return; 371*549e984eSSergio Lopez } 372*549e984eSSergio Lopez /* 373*549e984eSSergio Lopez * Check if the file is an uncompressed kernel file (ELF) and load it, 374*549e984eSSergio Lopez * saving the PVH entry point used by the x86/HVM direct boot ABI. 375*549e984eSSergio Lopez * If load_elfboot() is successful, populate the fw_cfg info. 376*549e984eSSergio Lopez */ 377*549e984eSSergio Lopez if (pcmc->pvh_enabled && 378*549e984eSSergio Lopez load_elfboot(kernel_filename, kernel_size, 379*549e984eSSergio Lopez header, pvh_start_addr, fw_cfg)) { 380*549e984eSSergio Lopez fclose(f); 381*549e984eSSergio Lopez 382*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_CMDLINE_SIZE, 383*549e984eSSergio Lopez strlen(kernel_cmdline) + 1); 384*549e984eSSergio Lopez fw_cfg_add_string(fw_cfg, FW_CFG_CMDLINE_DATA, kernel_cmdline); 385*549e984eSSergio Lopez 386*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_SETUP_SIZE, sizeof(header)); 387*549e984eSSergio Lopez fw_cfg_add_bytes(fw_cfg, FW_CFG_SETUP_DATA, 388*549e984eSSergio Lopez header, sizeof(header)); 389*549e984eSSergio Lopez 390*549e984eSSergio Lopez /* load initrd */ 391*549e984eSSergio Lopez if (initrd_filename) { 392*549e984eSSergio Lopez GMappedFile *mapped_file; 393*549e984eSSergio Lopez gsize initrd_size; 394*549e984eSSergio Lopez gchar *initrd_data; 395*549e984eSSergio Lopez GError *gerr = NULL; 396*549e984eSSergio Lopez 397*549e984eSSergio Lopez mapped_file = g_mapped_file_new(initrd_filename, false, &gerr); 398*549e984eSSergio Lopez if (!mapped_file) { 399*549e984eSSergio Lopez fprintf(stderr, "qemu: error reading initrd %s: %s\n", 400*549e984eSSergio Lopez initrd_filename, gerr->message); 401*549e984eSSergio Lopez exit(1); 402*549e984eSSergio Lopez } 403*549e984eSSergio Lopez pcms->initrd_mapped_file = mapped_file; 404*549e984eSSergio Lopez 405*549e984eSSergio Lopez initrd_data = g_mapped_file_get_contents(mapped_file); 406*549e984eSSergio Lopez initrd_size = g_mapped_file_get_length(mapped_file); 407*549e984eSSergio Lopez initrd_max = pcms->below_4g_mem_size - pcmc->acpi_data_size - 1; 408*549e984eSSergio Lopez if (initrd_size >= initrd_max) { 409*549e984eSSergio Lopez fprintf(stderr, "qemu: initrd is too large, cannot support." 410*549e984eSSergio Lopez "(max: %"PRIu32", need %"PRId64")\n", 411*549e984eSSergio Lopez initrd_max, (uint64_t)initrd_size); 412*549e984eSSergio Lopez exit(1); 413*549e984eSSergio Lopez } 414*549e984eSSergio Lopez 415*549e984eSSergio Lopez initrd_addr = (initrd_max - initrd_size) & ~4095; 416*549e984eSSergio Lopez 417*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_INITRD_ADDR, initrd_addr); 418*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_INITRD_SIZE, initrd_size); 419*549e984eSSergio Lopez fw_cfg_add_bytes(fw_cfg, FW_CFG_INITRD_DATA, initrd_data, 420*549e984eSSergio Lopez initrd_size); 421*549e984eSSergio Lopez } 422*549e984eSSergio Lopez 423*549e984eSSergio Lopez option_rom[nb_option_roms].bootindex = 0; 424*549e984eSSergio Lopez option_rom[nb_option_roms].name = "pvh.bin"; 425*549e984eSSergio Lopez nb_option_roms++; 426*549e984eSSergio Lopez 427*549e984eSSergio Lopez return; 428*549e984eSSergio Lopez } 429*549e984eSSergio Lopez protocol = 0; 430*549e984eSSergio Lopez } 431*549e984eSSergio Lopez 432*549e984eSSergio Lopez if (protocol < 0x200 || !(header[0x211] & 0x01)) { 433*549e984eSSergio Lopez /* Low kernel */ 434*549e984eSSergio Lopez real_addr = 0x90000; 435*549e984eSSergio Lopez cmdline_addr = 0x9a000 - cmdline_size; 436*549e984eSSergio Lopez prot_addr = 0x10000; 437*549e984eSSergio Lopez } else if (protocol < 0x202) { 438*549e984eSSergio Lopez /* High but ancient kernel */ 439*549e984eSSergio Lopez real_addr = 0x90000; 440*549e984eSSergio Lopez cmdline_addr = 0x9a000 - cmdline_size; 441*549e984eSSergio Lopez prot_addr = 0x100000; 442*549e984eSSergio Lopez } else { 443*549e984eSSergio Lopez /* High and recent kernel */ 444*549e984eSSergio Lopez real_addr = 0x10000; 445*549e984eSSergio Lopez cmdline_addr = 0x20000; 446*549e984eSSergio Lopez prot_addr = 0x100000; 447*549e984eSSergio Lopez } 448*549e984eSSergio Lopez 449*549e984eSSergio Lopez /* highest address for loading the initrd */ 450*549e984eSSergio Lopez if (protocol >= 0x20c && 451*549e984eSSergio Lopez lduw_p(header + 0x236) & XLF_CAN_BE_LOADED_ABOVE_4G) { 452*549e984eSSergio Lopez /* 453*549e984eSSergio Lopez * Linux has supported initrd up to 4 GB for a very long time (2007, 454*549e984eSSergio Lopez * long before XLF_CAN_BE_LOADED_ABOVE_4G which was added in 2013), 455*549e984eSSergio Lopez * though it only sets initrd_max to 2 GB to "work around bootloader 456*549e984eSSergio Lopez * bugs". Luckily, QEMU firmware(which does something like bootloader) 457*549e984eSSergio Lopez * has supported this. 458*549e984eSSergio Lopez * 459*549e984eSSergio Lopez * It's believed that if XLF_CAN_BE_LOADED_ABOVE_4G is set, initrd can 460*549e984eSSergio Lopez * be loaded into any address. 461*549e984eSSergio Lopez * 462*549e984eSSergio Lopez * In addition, initrd_max is uint32_t simply because QEMU doesn't 463*549e984eSSergio Lopez * support the 64-bit boot protocol (specifically the ext_ramdisk_image 464*549e984eSSergio Lopez * field). 465*549e984eSSergio Lopez * 466*549e984eSSergio Lopez * Therefore here just limit initrd_max to UINT32_MAX simply as well. 467*549e984eSSergio Lopez */ 468*549e984eSSergio Lopez initrd_max = UINT32_MAX; 469*549e984eSSergio Lopez } else if (protocol >= 0x203) { 470*549e984eSSergio Lopez initrd_max = ldl_p(header + 0x22c); 471*549e984eSSergio Lopez } else { 472*549e984eSSergio Lopez initrd_max = 0x37ffffff; 473*549e984eSSergio Lopez } 474*549e984eSSergio Lopez 475*549e984eSSergio Lopez if (initrd_max >= pcms->below_4g_mem_size - pcmc->acpi_data_size) { 476*549e984eSSergio Lopez initrd_max = pcms->below_4g_mem_size - pcmc->acpi_data_size - 1; 477*549e984eSSergio Lopez } 478*549e984eSSergio Lopez 479*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_CMDLINE_ADDR, cmdline_addr); 480*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_CMDLINE_SIZE, strlen(kernel_cmdline) + 1); 481*549e984eSSergio Lopez fw_cfg_add_string(fw_cfg, FW_CFG_CMDLINE_DATA, kernel_cmdline); 482*549e984eSSergio Lopez 483*549e984eSSergio Lopez if (protocol >= 0x202) { 484*549e984eSSergio Lopez stl_p(header + 0x228, cmdline_addr); 485*549e984eSSergio Lopez } else { 486*549e984eSSergio Lopez stw_p(header + 0x20, 0xA33F); 487*549e984eSSergio Lopez stw_p(header + 0x22, cmdline_addr - real_addr); 488*549e984eSSergio Lopez } 489*549e984eSSergio Lopez 490*549e984eSSergio Lopez /* handle vga= parameter */ 491*549e984eSSergio Lopez vmode = strstr(kernel_cmdline, "vga="); 492*549e984eSSergio Lopez if (vmode) { 493*549e984eSSergio Lopez unsigned int video_mode; 494*549e984eSSergio Lopez int ret; 495*549e984eSSergio Lopez /* skip "vga=" */ 496*549e984eSSergio Lopez vmode += 4; 497*549e984eSSergio Lopez if (!strncmp(vmode, "normal", 6)) { 498*549e984eSSergio Lopez video_mode = 0xffff; 499*549e984eSSergio Lopez } else if (!strncmp(vmode, "ext", 3)) { 500*549e984eSSergio Lopez video_mode = 0xfffe; 501*549e984eSSergio Lopez } else if (!strncmp(vmode, "ask", 3)) { 502*549e984eSSergio Lopez video_mode = 0xfffd; 503*549e984eSSergio Lopez } else { 504*549e984eSSergio Lopez ret = qemu_strtoui(vmode, NULL, 0, &video_mode); 505*549e984eSSergio Lopez if (ret != 0) { 506*549e984eSSergio Lopez fprintf(stderr, "qemu: can't parse 'vga' parameter: %s\n", 507*549e984eSSergio Lopez strerror(-ret)); 508*549e984eSSergio Lopez exit(1); 509*549e984eSSergio Lopez } 510*549e984eSSergio Lopez } 511*549e984eSSergio Lopez stw_p(header + 0x1fa, video_mode); 512*549e984eSSergio Lopez } 513*549e984eSSergio Lopez 514*549e984eSSergio Lopez /* loader type */ 515*549e984eSSergio Lopez /* 516*549e984eSSergio Lopez * High nybble = B reserved for QEMU; low nybble is revision number. 517*549e984eSSergio Lopez * If this code is substantially changed, you may want to consider 518*549e984eSSergio Lopez * incrementing the revision. 519*549e984eSSergio Lopez */ 520*549e984eSSergio Lopez if (protocol >= 0x200) { 521*549e984eSSergio Lopez header[0x210] = 0xB0; 522*549e984eSSergio Lopez } 523*549e984eSSergio Lopez /* heap */ 524*549e984eSSergio Lopez if (protocol >= 0x201) { 525*549e984eSSergio Lopez header[0x211] |= 0x80; /* CAN_USE_HEAP */ 526*549e984eSSergio Lopez stw_p(header + 0x224, cmdline_addr - real_addr - 0x200); 527*549e984eSSergio Lopez } 528*549e984eSSergio Lopez 529*549e984eSSergio Lopez /* load initrd */ 530*549e984eSSergio Lopez if (initrd_filename) { 531*549e984eSSergio Lopez GMappedFile *mapped_file; 532*549e984eSSergio Lopez gsize initrd_size; 533*549e984eSSergio Lopez gchar *initrd_data; 534*549e984eSSergio Lopez GError *gerr = NULL; 535*549e984eSSergio Lopez 536*549e984eSSergio Lopez if (protocol < 0x200) { 537*549e984eSSergio Lopez fprintf(stderr, "qemu: linux kernel too old to load a ram disk\n"); 538*549e984eSSergio Lopez exit(1); 539*549e984eSSergio Lopez } 540*549e984eSSergio Lopez 541*549e984eSSergio Lopez mapped_file = g_mapped_file_new(initrd_filename, false, &gerr); 542*549e984eSSergio Lopez if (!mapped_file) { 543*549e984eSSergio Lopez fprintf(stderr, "qemu: error reading initrd %s: %s\n", 544*549e984eSSergio Lopez initrd_filename, gerr->message); 545*549e984eSSergio Lopez exit(1); 546*549e984eSSergio Lopez } 547*549e984eSSergio Lopez pcms->initrd_mapped_file = mapped_file; 548*549e984eSSergio Lopez 549*549e984eSSergio Lopez initrd_data = g_mapped_file_get_contents(mapped_file); 550*549e984eSSergio Lopez initrd_size = g_mapped_file_get_length(mapped_file); 551*549e984eSSergio Lopez if (initrd_size >= initrd_max) { 552*549e984eSSergio Lopez fprintf(stderr, "qemu: initrd is too large, cannot support." 553*549e984eSSergio Lopez "(max: %"PRIu32", need %"PRId64")\n", 554*549e984eSSergio Lopez initrd_max, (uint64_t)initrd_size); 555*549e984eSSergio Lopez exit(1); 556*549e984eSSergio Lopez } 557*549e984eSSergio Lopez 558*549e984eSSergio Lopez initrd_addr = (initrd_max - initrd_size) & ~4095; 559*549e984eSSergio Lopez 560*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_INITRD_ADDR, initrd_addr); 561*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_INITRD_SIZE, initrd_size); 562*549e984eSSergio Lopez fw_cfg_add_bytes(fw_cfg, FW_CFG_INITRD_DATA, initrd_data, initrd_size); 563*549e984eSSergio Lopez 564*549e984eSSergio Lopez stl_p(header + 0x218, initrd_addr); 565*549e984eSSergio Lopez stl_p(header + 0x21c, initrd_size); 566*549e984eSSergio Lopez } 567*549e984eSSergio Lopez 568*549e984eSSergio Lopez /* load kernel and setup */ 569*549e984eSSergio Lopez setup_size = header[0x1f1]; 570*549e984eSSergio Lopez if (setup_size == 0) { 571*549e984eSSergio Lopez setup_size = 4; 572*549e984eSSergio Lopez } 573*549e984eSSergio Lopez setup_size = (setup_size + 1) * 512; 574*549e984eSSergio Lopez if (setup_size > kernel_size) { 575*549e984eSSergio Lopez fprintf(stderr, "qemu: invalid kernel header\n"); 576*549e984eSSergio Lopez exit(1); 577*549e984eSSergio Lopez } 578*549e984eSSergio Lopez kernel_size -= setup_size; 579*549e984eSSergio Lopez 580*549e984eSSergio Lopez setup = g_malloc(setup_size); 581*549e984eSSergio Lopez kernel = g_malloc(kernel_size); 582*549e984eSSergio Lopez fseek(f, 0, SEEK_SET); 583*549e984eSSergio Lopez if (fread(setup, 1, setup_size, f) != setup_size) { 584*549e984eSSergio Lopez fprintf(stderr, "fread() failed\n"); 585*549e984eSSergio Lopez exit(1); 586*549e984eSSergio Lopez } 587*549e984eSSergio Lopez if (fread(kernel, 1, kernel_size, f) != kernel_size) { 588*549e984eSSergio Lopez fprintf(stderr, "fread() failed\n"); 589*549e984eSSergio Lopez exit(1); 590*549e984eSSergio Lopez } 591*549e984eSSergio Lopez fclose(f); 592*549e984eSSergio Lopez 593*549e984eSSergio Lopez /* append dtb to kernel */ 594*549e984eSSergio Lopez if (dtb_filename) { 595*549e984eSSergio Lopez if (protocol < 0x209) { 596*549e984eSSergio Lopez fprintf(stderr, "qemu: Linux kernel too old to load a dtb\n"); 597*549e984eSSergio Lopez exit(1); 598*549e984eSSergio Lopez } 599*549e984eSSergio Lopez 600*549e984eSSergio Lopez dtb_size = get_image_size(dtb_filename); 601*549e984eSSergio Lopez if (dtb_size <= 0) { 602*549e984eSSergio Lopez fprintf(stderr, "qemu: error reading dtb %s: %s\n", 603*549e984eSSergio Lopez dtb_filename, strerror(errno)); 604*549e984eSSergio Lopez exit(1); 605*549e984eSSergio Lopez } 606*549e984eSSergio Lopez 607*549e984eSSergio Lopez setup_data_offset = QEMU_ALIGN_UP(kernel_size, 16); 608*549e984eSSergio Lopez kernel_size = setup_data_offset + sizeof(struct setup_data) + dtb_size; 609*549e984eSSergio Lopez kernel = g_realloc(kernel, kernel_size); 610*549e984eSSergio Lopez 611*549e984eSSergio Lopez stq_p(header + 0x250, prot_addr + setup_data_offset); 612*549e984eSSergio Lopez 613*549e984eSSergio Lopez setup_data = (struct setup_data *)(kernel + setup_data_offset); 614*549e984eSSergio Lopez setup_data->next = 0; 615*549e984eSSergio Lopez setup_data->type = cpu_to_le32(SETUP_DTB); 616*549e984eSSergio Lopez setup_data->len = cpu_to_le32(dtb_size); 617*549e984eSSergio Lopez 618*549e984eSSergio Lopez load_image_size(dtb_filename, setup_data->data, dtb_size); 619*549e984eSSergio Lopez } 620*549e984eSSergio Lopez 621*549e984eSSergio Lopez memcpy(setup, header, MIN(sizeof(header), setup_size)); 622*549e984eSSergio Lopez 623*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_KERNEL_ADDR, prot_addr); 624*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_KERNEL_SIZE, kernel_size); 625*549e984eSSergio Lopez fw_cfg_add_bytes(fw_cfg, FW_CFG_KERNEL_DATA, kernel, kernel_size); 626*549e984eSSergio Lopez 627*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_SETUP_ADDR, real_addr); 628*549e984eSSergio Lopez fw_cfg_add_i32(fw_cfg, FW_CFG_SETUP_SIZE, setup_size); 629*549e984eSSergio Lopez fw_cfg_add_bytes(fw_cfg, FW_CFG_SETUP_DATA, setup, setup_size); 630*549e984eSSergio Lopez 631*549e984eSSergio Lopez option_rom[nb_option_roms].bootindex = 0; 632*549e984eSSergio Lopez option_rom[nb_option_roms].name = "linuxboot.bin"; 633*549e984eSSergio Lopez if (pcmc->linuxboot_dma_enabled && fw_cfg_dma_enabled(fw_cfg)) { 634*549e984eSSergio Lopez option_rom[nb_option_roms].name = "linuxboot_dma.bin"; 635*549e984eSSergio Lopez } 636*549e984eSSergio Lopez nb_option_roms++; 637*549e984eSSergio Lopez } 638*549e984eSSergio Lopez 639*549e984eSSergio Lopez void x86_bios_rom_init(MemoryRegion *rom_memory, bool isapc_ram_fw) 640*549e984eSSergio Lopez { 641*549e984eSSergio Lopez char *filename; 642*549e984eSSergio Lopez MemoryRegion *bios, *isa_bios; 643*549e984eSSergio Lopez int bios_size, isa_bios_size; 644*549e984eSSergio Lopez int ret; 645*549e984eSSergio Lopez 646*549e984eSSergio Lopez /* BIOS load */ 647*549e984eSSergio Lopez if (bios_name == NULL) { 648*549e984eSSergio Lopez bios_name = BIOS_FILENAME; 649*549e984eSSergio Lopez } 650*549e984eSSergio Lopez filename = qemu_find_file(QEMU_FILE_TYPE_BIOS, bios_name); 651*549e984eSSergio Lopez if (filename) { 652*549e984eSSergio Lopez bios_size = get_image_size(filename); 653*549e984eSSergio Lopez } else { 654*549e984eSSergio Lopez bios_size = -1; 655*549e984eSSergio Lopez } 656*549e984eSSergio Lopez if (bios_size <= 0 || 657*549e984eSSergio Lopez (bios_size % 65536) != 0) { 658*549e984eSSergio Lopez goto bios_error; 659*549e984eSSergio Lopez } 660*549e984eSSergio Lopez bios = g_malloc(sizeof(*bios)); 661*549e984eSSergio Lopez memory_region_init_ram(bios, NULL, "pc.bios", bios_size, &error_fatal); 662*549e984eSSergio Lopez if (!isapc_ram_fw) { 663*549e984eSSergio Lopez memory_region_set_readonly(bios, true); 664*549e984eSSergio Lopez } 665*549e984eSSergio Lopez ret = rom_add_file_fixed(bios_name, (uint32_t)(-bios_size), -1); 666*549e984eSSergio Lopez if (ret != 0) { 667*549e984eSSergio Lopez bios_error: 668*549e984eSSergio Lopez fprintf(stderr, "qemu: could not load PC BIOS '%s'\n", bios_name); 669*549e984eSSergio Lopez exit(1); 670*549e984eSSergio Lopez } 671*549e984eSSergio Lopez g_free(filename); 672*549e984eSSergio Lopez 673*549e984eSSergio Lopez /* map the last 128KB of the BIOS in ISA space */ 674*549e984eSSergio Lopez isa_bios_size = MIN(bios_size, 128 * KiB); 675*549e984eSSergio Lopez isa_bios = g_malloc(sizeof(*isa_bios)); 676*549e984eSSergio Lopez memory_region_init_alias(isa_bios, NULL, "isa-bios", bios, 677*549e984eSSergio Lopez bios_size - isa_bios_size, isa_bios_size); 678*549e984eSSergio Lopez memory_region_add_subregion_overlap(rom_memory, 679*549e984eSSergio Lopez 0x100000 - isa_bios_size, 680*549e984eSSergio Lopez isa_bios, 681*549e984eSSergio Lopez 1); 682*549e984eSSergio Lopez if (!isapc_ram_fw) { 683*549e984eSSergio Lopez memory_region_set_readonly(isa_bios, true); 684*549e984eSSergio Lopez } 685*549e984eSSergio Lopez 686*549e984eSSergio Lopez /* map all the bios at the top of memory */ 687*549e984eSSergio Lopez memory_region_add_subregion(rom_memory, 688*549e984eSSergio Lopez (uint32_t)(-bios_size), 689*549e984eSSergio Lopez bios); 690*549e984eSSergio Lopez } 691