diff --git a/usr.sbin/bhyve/acpi.c b/usr.sbin/bhyve/acpi.c index 4f48986fd936..d8d021f4bb81 100644 --- a/usr.sbin/bhyve/acpi.c +++ b/usr.sbin/bhyve/acpi.c @@ -1,798 +1,757 @@ /*- * SPDX-License-Identifier: BSD-2-Clause-FreeBSD * * Copyright (c) 2012 NetApp, Inc. * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY NETAPP, INC ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL NETAPP, INC OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * $FreeBSD$ */ /* * bhyve ACPI table generator. * * Create the minimal set of ACPI tables required to boot FreeBSD (and * hopefully other o/s's). * * The tables are placed in the guest's ROM area just below 1MB physical, * above the MPTable. - * - * Layout (No longer correct at FADT and beyond due to properly - * calculating the size of the MADT to allow for changes to - * VM_MAXCPU above 21 which overflows this layout.) - * ------ - * RSDP -> 0xf2400 (36 bytes fixed) - * RSDT -> 0xf2440 (36 bytes + 4*7 table addrs, 4 used) - * XSDT -> 0xf2480 (36 bytes + 8*7 table addrs, 4 used) - * MADT -> 0xf2500 (depends on #CPUs) - * FADT -> 0xf2600 (268 bytes) - * HPET -> 0xf2740 (56 bytes) - * MCFG -> 0xf2780 (60 bytes) - * FACS -> 0xf27C0 (64 bytes) - * DSDT -> 0xf2800 (variable - can go up to 0x100000) */ #include __FBSDID("$FreeBSD$"); #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include "bhyverun.h" #include "acpi.h" #include "basl.h" #include "pci_emul.h" #include "vmgenc.h" -/* - * Define the base address of the ACPI tables, the sizes of some tables, - * and the offsets to the individual tables, - */ -#define RSDT_OFFSET 0x040 -#define XSDT_OFFSET 0x080 -#define MADT_OFFSET 0x100 -/* - * The MADT consists of: - * 44 Fixed Header - * 8 * maxcpu Processor Local APIC entries - * 12 I/O APIC entry - * 2 * 10 Interrupt Source Override entries - * 6 Local APIC NMI entry - */ -#define MADT_SIZE roundup2((44 + basl_ncpu*8 + 12 + 2*10 + 6), 0x100) -#define FADT_OFFSET (MADT_OFFSET + MADT_SIZE) -#define FADT_SIZE 0x140 -#define HPET_OFFSET (FADT_OFFSET + FADT_SIZE) -#define HPET_SIZE 0x40 -#define MCFG_OFFSET (HPET_OFFSET + HPET_SIZE) -#define MCFG_SIZE 0x40 -#define FACS_OFFSET (MCFG_OFFSET + MCFG_SIZE) -#define FACS_SIZE 0x40 -#define DSDT_OFFSET (FACS_OFFSET + FACS_SIZE) - #define BHYVE_ASL_TEMPLATE "bhyve.XXXXXXX" #define BHYVE_ASL_SUFFIX ".aml" #define BHYVE_ASL_COMPILER "/usr/sbin/iasl" #define BHYVE_ADDRESS_IOAPIC 0xFEC00000 #define BHYVE_ADDRESS_HPET 0xFED00000 #define BHYVE_ADDRESS_LAPIC 0xFEE00000 static int basl_keep_temps; static int basl_verbose_iasl; static int basl_ncpu; static uint32_t hpet_capabilities; /* * Contains the full pathname of the template to be passed * to mkstemp/mktemps(3) */ static char basl_template[MAXPATHLEN]; static char basl_stemplate[MAXPATHLEN]; /* * State for dsdt_line(), dsdt_indent(), and dsdt_unindent(). */ static FILE *dsdt_fp; static int dsdt_indent_level; static int dsdt_error; static struct basl_table *rsdt; static struct basl_table *xsdt; struct basl_fio { int fd; FILE *fp; char f_name[MAXPATHLEN]; }; #define EFPRINTF(...) \ if (fprintf(__VA_ARGS__) < 0) goto err_exit; #define EFFLUSH(x) \ if (fflush(x) != 0) goto err_exit; /* * Helper routines for writing to the DSDT from other modules. */ void dsdt_line(const char *fmt, ...) { va_list ap; if (dsdt_error != 0) return; if (strcmp(fmt, "") != 0) { if (dsdt_indent_level != 0) EFPRINTF(dsdt_fp, "%*c", dsdt_indent_level * 2, ' '); va_start(ap, fmt); if (vfprintf(dsdt_fp, fmt, ap) < 0) { va_end(ap); goto err_exit; } va_end(ap); } EFPRINTF(dsdt_fp, "\n"); return; err_exit: dsdt_error = errno; } void dsdt_indent(int levels) { dsdt_indent_level += levels; assert(dsdt_indent_level >= 0); } void dsdt_unindent(int levels) { assert(dsdt_indent_level >= levels); dsdt_indent_level -= levels; } void dsdt_fixed_ioport(uint16_t iobase, uint16_t length) { dsdt_line("IO (Decode16,"); dsdt_line(" 0x%04X, // Range Minimum", iobase); dsdt_line(" 0x%04X, // Range Maximum", iobase); dsdt_line(" 0x01, // Alignment"); dsdt_line(" 0x%02X, // Length", length); dsdt_line(" )"); } void dsdt_fixed_irq(uint8_t irq) { dsdt_line("IRQNoFlags ()"); dsdt_line(" {%d}", irq); } void dsdt_fixed_mem32(uint32_t base, uint32_t length) { dsdt_line("Memory32Fixed (ReadWrite,"); dsdt_line(" 0x%08X, // Address Base", base); dsdt_line(" 0x%08X, // Address Length", length); dsdt_line(" )"); } static int basl_fwrite_dsdt(FILE *fp) { dsdt_fp = fp; dsdt_error = 0; dsdt_indent_level = 0; dsdt_line("/*"); dsdt_line(" * bhyve DSDT template"); dsdt_line(" */"); dsdt_line("DefinitionBlock (\"bhyve_dsdt.aml\", \"DSDT\", 2," "\"BHYVE \", \"BVDSDT \", 0x00000001)"); dsdt_line("{"); dsdt_line(" Name (_S5, Package ()"); dsdt_line(" {"); dsdt_line(" 0x05,"); dsdt_line(" Zero,"); dsdt_line(" })"); pci_write_dsdt(); dsdt_line(""); dsdt_line(" Scope (_SB.PC00)"); dsdt_line(" {"); dsdt_line(" Device (HPET)"); dsdt_line(" {"); dsdt_line(" Name (_HID, EISAID(\"PNP0103\"))"); dsdt_line(" Name (_UID, 0)"); dsdt_line(" Name (_CRS, ResourceTemplate ()"); dsdt_line(" {"); dsdt_indent(4); dsdt_fixed_mem32(0xFED00000, 0x400); dsdt_unindent(4); dsdt_line(" })"); dsdt_line(" }"); dsdt_line(" }"); vmgenc_write_dsdt(); dsdt_line("}"); if (dsdt_error != 0) return (dsdt_error); EFFLUSH(fp); return (0); err_exit: return (errno); } static int basl_open(struct basl_fio *bf, int suffix) { int err; err = 0; if (suffix) { strlcpy(bf->f_name, basl_stemplate, MAXPATHLEN); bf->fd = mkstemps(bf->f_name, strlen(BHYVE_ASL_SUFFIX)); } else { strlcpy(bf->f_name, basl_template, MAXPATHLEN); bf->fd = mkstemp(bf->f_name); } if (bf->fd > 0) { bf->fp = fdopen(bf->fd, "w+"); if (bf->fp == NULL) { unlink(bf->f_name); close(bf->fd); } } else { err = 1; } return (err); } static void basl_close(struct basl_fio *bf) { if (!basl_keep_temps) unlink(bf->f_name); fclose(bf->fp); } static int basl_start(struct basl_fio *in, struct basl_fio *out) { int err; err = basl_open(in, 0); if (!err) { err = basl_open(out, 1); if (err) { basl_close(in); } } return (err); } static void basl_end(struct basl_fio *in, struct basl_fio *out) { basl_close(in); basl_close(out); } static int -basl_load(struct vmctx *ctx, int fd, uint64_t off) +basl_load(struct vmctx *ctx, int fd) { struct stat sb; void *addr; if (fstat(fd, &sb) < 0) return (errno); addr = calloc(1, sb.st_size); if (addr == NULL) return (EFAULT); if (read(fd, addr, sb.st_size) < 0) return (errno); struct basl_table *table; uint8_t name[ACPI_NAMESEG_SIZE + 1] = { 0 }; memcpy(name, addr, sizeof(name) - 1 /* last char is '\0' */); - BASL_EXEC( - basl_table_create(&table, ctx, name, BASL_TABLE_ALIGNMENT, off)); + BASL_EXEC(basl_table_create(&table, ctx, name, BASL_TABLE_ALIGNMENT)); BASL_EXEC(basl_table_append_bytes(table, addr, sb.st_size)); return (0); } static int -basl_compile(struct vmctx *ctx, int (*fwrite_section)(FILE *), uint64_t offset) +basl_compile(struct vmctx *ctx, int (*fwrite_section)(FILE *)) { struct basl_fio io[2]; static char iaslbuf[3*MAXPATHLEN + 10]; const char *fmt; int err; err = basl_start(&io[0], &io[1]); if (!err) { err = (*fwrite_section)(io[0].fp); if (!err) { /* * iasl sends the results of the compilation to * stdout. Shut this down by using the shell to * redirect stdout to /dev/null, unless the user * has requested verbose output for debugging * purposes */ fmt = basl_verbose_iasl ? "%s -p %s %s" : "/bin/sh -c \"%s -p %s %s\" 1> /dev/null"; snprintf(iaslbuf, sizeof(iaslbuf), fmt, BHYVE_ASL_COMPILER, io[1].f_name, io[0].f_name); err = system(iaslbuf); if (!err) { /* * Copy the aml output file into guest * memory at the specified location */ - err = basl_load(ctx, io[1].fd, offset); + err = basl_load(ctx, io[1].fd); } } basl_end(&io[0], &io[1]); } return (err); } static int basl_make_templates(void) { const char *tmpdir; int err; int len; err = 0; /* * */ if ((tmpdir = getenv("BHYVE_TMPDIR")) == NULL || *tmpdir == '\0' || (tmpdir = getenv("TMPDIR")) == NULL || *tmpdir == '\0') { tmpdir = _PATH_TMP; } len = strlen(tmpdir); if ((len + sizeof(BHYVE_ASL_TEMPLATE) + 1) < MAXPATHLEN) { strcpy(basl_template, tmpdir); while (len > 0 && basl_template[len - 1] == '/') len--; basl_template[len] = '/'; strcpy(&basl_template[len + 1], BHYVE_ASL_TEMPLATE); } else err = E2BIG; if (!err) { /* * len has been intialized (and maybe adjusted) above */ if ((len + sizeof(BHYVE_ASL_TEMPLATE) + 1 + sizeof(BHYVE_ASL_SUFFIX)) < MAXPATHLEN) { strcpy(basl_stemplate, tmpdir); basl_stemplate[len] = '/'; strcpy(&basl_stemplate[len + 1], BHYVE_ASL_TEMPLATE); len = strlen(basl_stemplate); strcpy(&basl_stemplate[len], BHYVE_ASL_SUFFIX); } else err = E2BIG; } return (err); } static int build_dsdt(struct vmctx *const ctx) { - BASL_EXEC(basl_compile(ctx, basl_fwrite_dsdt, DSDT_OFFSET)); + BASL_EXEC(basl_compile(ctx, basl_fwrite_dsdt)); return (0); } static int build_facs(struct vmctx *const ctx) { ACPI_TABLE_FACS facs; struct basl_table *table; BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_FACS, - BASL_TABLE_ALIGNMENT_FACS, FACS_OFFSET)); + BASL_TABLE_ALIGNMENT_FACS)); memset(&facs, 0, sizeof(facs)); memcpy(facs.Signature, ACPI_SIG_FACS, ACPI_NAMESEG_SIZE); facs.Length = sizeof(facs); facs.Version = htole32(2); BASL_EXEC(basl_table_append_bytes(table, &facs, sizeof(facs))); return (0); } static int build_fadt(struct vmctx *const ctx) { ACPI_TABLE_FADT fadt; struct basl_table *table; BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_FADT, - BASL_TABLE_ALIGNMENT, FADT_OFFSET)); + BASL_TABLE_ALIGNMENT)); memset(&fadt, 0, sizeof(fadt)); BASL_EXEC(basl_table_append_header(table, ACPI_SIG_FADT, 5, 1)); fadt.Facs = htole32(0); /* patched by basl */ fadt.Dsdt = htole32(0); /* patched by basl */ fadt.SciInterrupt = htole16(SCI_INT); fadt.SmiCommand = htole32(SMI_CMD); fadt.AcpiEnable = BHYVE_ACPI_ENABLE; fadt.AcpiDisable = BHYVE_ACPI_DISABLE; fadt.Pm1aEventBlock = htole32(PM1A_EVT_ADDR); fadt.Pm1aControlBlock = htole32(PM1A_CNT_ADDR); fadt.PmTimerBlock = htole32(IO_PMTMR); fadt.Gpe0Block = htole32(IO_GPE0_BLK); fadt.Pm1EventLength = 4; fadt.Pm1ControlLength = 2; fadt.PmTimerLength = 4; fadt.Gpe0BlockLength = IO_GPE0_LEN; fadt.Century = 0x32; fadt.BootFlags = htole16(ACPI_FADT_NO_VGA | ACPI_FADT_NO_ASPM); fadt.Flags = htole32(ACPI_FADT_WBINVD | ACPI_FADT_C1_SUPPORTED | ACPI_FADT_SLEEP_BUTTON | ACPI_FADT_32BIT_TIMER | ACPI_FADT_RESET_REGISTER | ACPI_FADT_HEADLESS | ACPI_FADT_APIC_PHYSICAL); basl_fill_gas(&fadt.ResetRegister, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, ACPI_GAS_ACCESS_WIDTH_BYTE, 0xCF9); fadt.ResetValue = 6; fadt.MinorRevision = 1; fadt.XFacs = htole64(0); /* patched by basl */ fadt.XDsdt = htole64(0); /* patched by basl */ basl_fill_gas(&fadt.XPm1aEventBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0x20, 0, ACPI_GAS_ACCESS_WIDTH_WORD, PM1A_EVT_ADDR); basl_fill_gas(&fadt.XPm1bEventBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0, 0, ACPI_GAS_ACCESS_WIDTH_UNDEFINED, 0); basl_fill_gas(&fadt.XPm1aControlBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0x10, 0, ACPI_GAS_ACCESS_WIDTH_WORD, PM1A_CNT_ADDR); basl_fill_gas(&fadt.XPm1bControlBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0, 0, ACPI_GAS_ACCESS_WIDTH_UNDEFINED, 0); basl_fill_gas(&fadt.XPm2ControlBlock, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, ACPI_GAS_ACCESS_WIDTH_UNDEFINED, 0); basl_fill_gas(&fadt.XPmTimerBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0x20, 0, ACPI_GAS_ACCESS_WIDTH_DWORD, IO_PMTMR); basl_fill_gas(&fadt.XGpe0Block, ACPI_ADR_SPACE_SYSTEM_IO, IO_GPE0_LEN * 8, 0, ACPI_GAS_ACCESS_WIDTH_BYTE, IO_GPE0_BLK); basl_fill_gas(&fadt.XGpe1Block, ACPI_ADR_SPACE_SYSTEM_IO, 0, 0, ACPI_GAS_ACCESS_WIDTH_UNDEFINED, 0); basl_fill_gas(&fadt.SleepControl, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, ACPI_GAS_ACCESS_WIDTH_BYTE, 0); basl_fill_gas(&fadt.SleepStatus, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, ACPI_GAS_ACCESS_WIDTH_BYTE, 0); BASL_EXEC(basl_table_append_content(table, &fadt, sizeof(fadt))); BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_FACS, offsetof(ACPI_TABLE_FADT, Facs), sizeof(fadt.Facs))); BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_DSDT, offsetof(ACPI_TABLE_FADT, Dsdt), sizeof(fadt.Dsdt))); BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_FACS, offsetof(ACPI_TABLE_FADT, XFacs), sizeof(fadt.XFacs))); BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_DSDT, offsetof(ACPI_TABLE_FADT, XDsdt), sizeof(fadt.XDsdt))); BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_FADT, ACPI_RSDT_ENTRY_SIZE)); BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_FADT, ACPI_XSDT_ENTRY_SIZE)); return (0); } static int build_hpet(struct vmctx *const ctx) { ACPI_TABLE_HPET hpet; struct basl_table *table; BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_HPET, - BASL_TABLE_ALIGNMENT, HPET_OFFSET)); + BASL_TABLE_ALIGNMENT)); memset(&hpet, 0, sizeof(hpet)); BASL_EXEC(basl_table_append_header(table, ACPI_SIG_HPET, 1, 1)); hpet.Id = htole32(hpet_capabilities); basl_fill_gas(&hpet.Address, ACPI_ADR_SPACE_SYSTEM_MEMORY, 0, 0, ACPI_GAS_ACCESS_WIDTH_LEGACY, BHYVE_ADDRESS_HPET); hpet.Flags = ACPI_HPET_PAGE_PROTECT4; BASL_EXEC(basl_table_append_content(table, &hpet, sizeof(hpet))); BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_HPET, ACPI_RSDT_ENTRY_SIZE)); BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_HPET, ACPI_XSDT_ENTRY_SIZE)); return (0); } static int build_madt(struct vmctx *const ctx) { ACPI_TABLE_MADT madt; ACPI_MADT_LOCAL_APIC madt_lapic; ACPI_MADT_IO_APIC madt_ioapic; ACPI_MADT_INTERRUPT_OVERRIDE madt_irq_override; ACPI_MADT_LOCAL_APIC_NMI madt_lapic_nmi; struct basl_table *table; BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_MADT, - BASL_TABLE_ALIGNMENT, MADT_OFFSET)); + BASL_TABLE_ALIGNMENT)); memset(&madt, 0, sizeof(madt)); BASL_EXEC(basl_table_append_header(table, ACPI_SIG_MADT, 1, 1)); madt.Address = htole32(BHYVE_ADDRESS_LAPIC); madt.Flags = htole32(ACPI_MADT_PCAT_COMPAT); BASL_EXEC(basl_table_append_content(table, &madt, sizeof(madt))); /* Local APIC for each CPU */ for (int i = 0; i < basl_ncpu; ++i) { memset(&madt_lapic, 0, sizeof(madt_lapic)); madt_lapic.Header.Type = ACPI_MADT_TYPE_LOCAL_APIC; madt_lapic.Header.Length = sizeof(madt_lapic); madt_lapic.ProcessorId = i; madt_lapic.Id = i; madt_lapic.LapicFlags = htole32(ACPI_MADT_ENABLED); BASL_EXEC(basl_table_append_bytes(table, &madt_lapic, sizeof(madt_lapic))); } /* I/O APIC */ memset(&madt_ioapic, 0, sizeof(madt_ioapic)); madt_ioapic.Header.Type = ACPI_MADT_TYPE_IO_APIC; madt_ioapic.Header.Length = sizeof(madt_ioapic); madt_ioapic.Address = htole32(BHYVE_ADDRESS_IOAPIC); BASL_EXEC( basl_table_append_bytes(table, &madt_ioapic, sizeof(madt_ioapic))); /* Legacy IRQ0 is connected to pin 2 of the I/O APIC */ memset(&madt_irq_override, 0, sizeof(madt_irq_override)); madt_irq_override.Header.Type = ACPI_MADT_TYPE_INTERRUPT_OVERRIDE; madt_irq_override.Header.Length = sizeof(madt_irq_override); madt_irq_override.GlobalIrq = htole32(2); madt_irq_override.IntiFlags = htole16( ACPI_MADT_POLARITY_ACTIVE_HIGH | ACPI_MADT_TRIGGER_EDGE); BASL_EXEC(basl_table_append_bytes(table, &madt_irq_override, sizeof(madt_irq_override))); memset(&madt_irq_override, 0, sizeof(madt_irq_override)); madt_irq_override.Header.Type = ACPI_MADT_TYPE_INTERRUPT_OVERRIDE; madt_irq_override.Header.Length = sizeof(madt_irq_override); madt_irq_override.SourceIrq = SCI_INT; madt_irq_override.GlobalIrq = htole32(SCI_INT); madt_irq_override.IntiFlags = htole16( ACPI_MADT_POLARITY_ACTIVE_LOW | ACPI_MADT_TRIGGER_LEVEL); BASL_EXEC(basl_table_append_bytes(table, &madt_irq_override, sizeof(madt_irq_override))); /* Local APIC NMI is conntected to LINT 1 on all CPUs */ memset(&madt_lapic_nmi, 0, sizeof(madt_lapic_nmi)); madt_lapic_nmi.Header.Type = ACPI_MADT_TYPE_LOCAL_APIC_NMI; madt_lapic_nmi.Header.Length = sizeof(madt_lapic_nmi); madt_lapic_nmi.ProcessorId = 0xFF; madt_lapic_nmi.IntiFlags = htole16( ACPI_MADT_POLARITY_ACTIVE_HIGH | ACPI_MADT_TRIGGER_EDGE); madt_lapic_nmi.Lint = 1; BASL_EXEC(basl_table_append_bytes(table, &madt_lapic_nmi, sizeof(madt_lapic_nmi))); BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_MADT, ACPI_RSDT_ENTRY_SIZE)); BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_MADT, ACPI_XSDT_ENTRY_SIZE)); return (0); } static int build_mcfg(struct vmctx *const ctx) { ACPI_TABLE_MCFG mcfg; ACPI_MCFG_ALLOCATION mcfg_allocation; struct basl_table *table; BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_MCFG, - BASL_TABLE_ALIGNMENT, MCFG_OFFSET)); + BASL_TABLE_ALIGNMENT)); memset(&mcfg, 0, sizeof(mcfg)); BASL_EXEC(basl_table_append_header(table, ACPI_SIG_MCFG, 1, 1)); BASL_EXEC(basl_table_append_content(table, &mcfg, sizeof(mcfg))); memset(&mcfg_allocation, 0, sizeof(mcfg_allocation)); mcfg_allocation.Address = htole64(pci_ecfg_base()); mcfg_allocation.EndBusNumber = 0xFF; BASL_EXEC(basl_table_append_bytes(table, &mcfg_allocation, sizeof(mcfg_allocation))); BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_MCFG, ACPI_RSDT_ENTRY_SIZE)); BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_MCFG, ACPI_XSDT_ENTRY_SIZE)); return (0); } static int build_rsdp(struct vmctx *const ctx) { ACPI_TABLE_RSDP rsdp; struct basl_table *table; BASL_EXEC(basl_table_create(&table, ctx, ACPI_RSDP_NAME, - BASL_TABLE_ALIGNMENT, 0)); + BASL_TABLE_ALIGNMENT)); memset(&rsdp, 0, sizeof(rsdp)); memcpy(rsdp.Signature, ACPI_SIG_RSDP, 8); rsdp.Checksum = 0; /* patched by basl */ memcpy(rsdp.OemId, "BHYVE ", ACPI_OEM_ID_SIZE); rsdp.Revision = 2; rsdp.RsdtPhysicalAddress = htole32(0); /* patched by basl */ rsdp.Length = htole32(0); /* patched by basl */ rsdp.XsdtPhysicalAddress = htole64(0); /* patched by basl */ rsdp.ExtendedChecksum = 0; /* patched by basl */ BASL_EXEC(basl_table_append_bytes(table, &rsdp, sizeof(rsdp))); BASL_EXEC(basl_table_add_checksum(table, offsetof(ACPI_TABLE_RSDP, Checksum), 0, 20)); BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_RSDT, offsetof(ACPI_TABLE_RSDP, RsdtPhysicalAddress), sizeof(rsdp.RsdtPhysicalAddress))); BASL_EXEC(basl_table_add_length(table, offsetof(ACPI_TABLE_RSDP, Length), sizeof(rsdp.Length))); BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_XSDT, offsetof(ACPI_TABLE_RSDP, XsdtPhysicalAddress), sizeof(rsdp.XsdtPhysicalAddress))); BASL_EXEC(basl_table_add_checksum(table, offsetof(ACPI_TABLE_RSDP, ExtendedChecksum), 0, BASL_TABLE_CHECKSUM_LEN_FULL_TABLE)); return (0); } static int build_rsdt(struct vmctx *const ctx) { - BASL_EXEC(basl_table_create(&rsdt, ctx, ACPI_SIG_RSDT, - BASL_TABLE_ALIGNMENT, RSDT_OFFSET)); + BASL_EXEC( + basl_table_create(&rsdt, ctx, ACPI_SIG_RSDT, BASL_TABLE_ALIGNMENT)); /* Header */ BASL_EXEC(basl_table_append_header(rsdt, ACPI_SIG_RSDT, 1, 1)); /* Pointers (added by other build_XXX funcs) */ return (0); } static int build_xsdt(struct vmctx *const ctx) { - BASL_EXEC(basl_table_create(&xsdt, ctx, ACPI_SIG_XSDT, - BASL_TABLE_ALIGNMENT, XSDT_OFFSET)); + BASL_EXEC( + basl_table_create(&xsdt, ctx, ACPI_SIG_XSDT, BASL_TABLE_ALIGNMENT)); /* Header */ BASL_EXEC(basl_table_append_header(xsdt, ACPI_SIG_XSDT, 1, 1)); /* Pointers (added by other build_XXX funcs) */ return (0); } int acpi_build(struct vmctx *ctx, int ncpu) { int err; basl_ncpu = ncpu; err = vm_get_hpet_capabilities(ctx, &hpet_capabilities); if (err != 0) return (err); /* * For debug, allow the user to have iasl compiler output sent * to stdout rather than /dev/null */ if (getenv("BHYVE_ACPI_VERBOSE_IASL")) basl_verbose_iasl = 1; /* * Allow the user to keep the generated ASL files for debugging * instead of deleting them following use */ if (getenv("BHYVE_ACPI_KEEPTMPS")) basl_keep_temps = 1; BASL_EXEC(basl_init()); BASL_EXEC(basl_make_templates()); /* * Generate ACPI tables and copy them into guest memory. * * According to UEFI Specification v6.3 chapter 5.1 the FADT should be * the first table pointed to by XSDT. For that reason, build it as the * first table after XSDT. */ BASL_EXEC(build_rsdp(ctx)); BASL_EXEC(build_rsdt(ctx)); BASL_EXEC(build_xsdt(ctx)); BASL_EXEC(build_fadt(ctx)); BASL_EXEC(build_madt(ctx)); BASL_EXEC(build_hpet(ctx)); BASL_EXEC(build_mcfg(ctx)); BASL_EXEC(build_facs(ctx)); BASL_EXEC(build_dsdt(ctx)); BASL_EXEC(basl_finish()); return (0); } diff --git a/usr.sbin/bhyve/basl.c b/usr.sbin/bhyve/basl.c index 3333ecbc870c..e002c3724ef0 100644 --- a/usr.sbin/bhyve/basl.c +++ b/usr.sbin/bhyve/basl.c @@ -1,586 +1,593 @@ /*- * SPDX-License-Identifier: BSD-2-Clause * * Copyright (c) 2022 Beckhoff Automation GmbH & Co. KG */ #include #include #include #include #include #include #include #include #include #include #include #include #include "basl.h" struct basl_table_checksum { STAILQ_ENTRY(basl_table_checksum) chain; uint32_t off; uint32_t start; uint32_t len; }; struct basl_table_length { STAILQ_ENTRY(basl_table_length) chain; uint32_t off; uint8_t size; }; struct basl_table_pointer { STAILQ_ENTRY(basl_table_pointer) chain; uint8_t src_signature[ACPI_NAMESEG_SIZE]; uint32_t off; uint8_t size; }; struct basl_table { STAILQ_ENTRY(basl_table) chain; struct vmctx *ctx; uint8_t fwcfg_name[QEMU_FWCFG_MAX_NAME]; void *data; uint32_t len; uint32_t off; uint32_t alignment; STAILQ_HEAD(basl_table_checksum_list, basl_table_checksum) checksums; STAILQ_HEAD(basl_table_length_list, basl_table_length) lengths; STAILQ_HEAD(basl_table_pointer_list, basl_table_pointer) pointers; }; static STAILQ_HEAD(basl_table_list, basl_table) basl_tables = STAILQ_HEAD_INITIALIZER( basl_tables); static __inline uint64_t basl_le_dec(void *pp, size_t len) { assert(len <= 8); switch (len) { case 1: return ((uint8_t *)pp)[0]; case 2: return le16dec(pp); case 4: return le32dec(pp); case 8: return le64dec(pp); } return 0; } static __inline void basl_le_enc(void *pp, uint64_t val, size_t len) { char buf[8]; assert(len <= 8); le64enc(buf, val); memcpy(pp, buf, len); } static int basl_dump_table(const struct basl_table *const table, const bool mem) { const ACPI_TABLE_HEADER *const header = table->data; const uint8_t *data; if (!mem) { data = table->data; } else { data = vm_map_gpa(table->ctx, BHYVE_ACPI_BASE + table->off, table->len); if (data == NULL) { return (ENOMEM); } } printf("%.4s @ %8x (%s)\n", header->Signature, BHYVE_ACPI_BASE + table->off, mem ? "Memory" : "FwCfg"); hexdump(data, table->len, NULL, 0); return (0); } static int __unused basl_dump(const bool mem) { struct basl_table *table; STAILQ_FOREACH(table, &basl_tables, chain) { BASL_EXEC(basl_dump_table(table, mem)); } return (0); } void basl_fill_gas(ACPI_GENERIC_ADDRESS *const gas, const uint8_t space_id, const uint8_t bit_width, const uint8_t bit_offset, const uint8_t access_width, const uint64_t address) { assert(gas != NULL); gas->SpaceId = space_id; gas->BitWidth = bit_width; gas->BitOffset = bit_offset; gas->AccessWidth = access_width; gas->Address = htole64(address); } static int -basl_finish_install_guest_tables(struct basl_table *const table) +basl_finish_install_guest_tables(struct basl_table *const table, uint32_t *const off) { void *gva; + table->off = roundup2(*off, table->alignment); + *off = table->off + table->len; + if (*off <= table->off) { + warnx("%s: invalid table length 0x%8x @ offset 0x%8x", __func__, + table->len, table->off); + return (EFAULT); + } + /* * Install ACPI tables directly in guest memory for use by guests which * do not boot via EFI. EFI ROMs provide a pointer to the firmware * generated ACPI tables instead, but it doesn't hurt to install the * tables always. */ gva = vm_map_gpa(table->ctx, BHYVE_ACPI_BASE + table->off, table->len); if (gva == NULL) { warnx("%s: could not map gpa [ 0x%16lx, 0x%16lx ]", __func__, (uint64_t)BHYVE_ACPI_BASE + table->off, (uint64_t)BHYVE_ACPI_BASE + table->off + table->len); return (ENOMEM); } memcpy(gva, table->data, table->len); return (0); } static int basl_finish_patch_checksums(struct basl_table *const table) { struct basl_table_checksum *checksum; STAILQ_FOREACH(checksum, &table->checksums, chain) { uint8_t *gva, *checksum_gva; uint64_t gpa; uint32_t len; uint8_t sum; len = checksum->len; if (len == BASL_TABLE_CHECKSUM_LEN_FULL_TABLE) { len = table->len; } assert(checksum->off < table->len); assert(checksum->start < table->len); assert(checksum->start + len <= table->len); /* * Install ACPI tables directly in guest memory for use by * guests which do not boot via EFI. EFI ROMs provide a pointer * to the firmware generated ACPI tables instead, but it doesn't * hurt to install the tables always. */ gpa = BHYVE_ACPI_BASE + table->off + checksum->start; if ((gpa < BHYVE_ACPI_BASE) || (gpa < BHYVE_ACPI_BASE + table->off)) { warnx("%s: invalid gpa (off 0x%8x start 0x%8x)", __func__, table->off, checksum->start); return (EFAULT); } gva = vm_map_gpa(table->ctx, gpa, len); if (gva == NULL) { warnx("%s: could not map gpa [ 0x%16lx, 0x%16lx ]", __func__, gpa, gpa + len); return (ENOMEM); } checksum_gva = gva + checksum->off; if (checksum_gva < gva) { warnx("%s: invalid checksum offset 0x%8x", __func__, checksum->off); return (EFAULT); } sum = 0; for (uint32_t i = 0; i < len; ++i) { sum += *(gva + i); } *checksum_gva = -sum; } return (0); } static struct basl_table * basl_get_table_by_signature(const uint8_t signature[ACPI_NAMESEG_SIZE]) { struct basl_table *table; STAILQ_FOREACH(table, &basl_tables, chain) { const ACPI_TABLE_HEADER *const header = (const ACPI_TABLE_HEADER *)table->data; if (strncmp(header->Signature, signature, sizeof(header->Signature)) == 0) { return (table); } } warnx("%s: %.4s not found", __func__, signature); return (NULL); } static int basl_finish_patch_pointers(struct basl_table *const table) { struct basl_table_pointer *pointer; STAILQ_FOREACH(pointer, &table->pointers, chain) { const struct basl_table *src_table; uint8_t *gva; uint64_t gpa, val; assert(pointer->off < table->len); assert(pointer->off + pointer->size <= table->len); src_table = basl_get_table_by_signature(pointer->src_signature); if (src_table == NULL) { warnx("%s: could not find ACPI table %.4s", __func__, pointer->src_signature); return (EFAULT); } /* * Install ACPI tables directly in guest memory for use by * guests which do not boot via EFI. EFI ROMs provide a pointer * to the firmware generated ACPI tables instead, but it doesn't * hurt to install the tables always. */ gpa = BHYVE_ACPI_BASE + table->off; if (gpa < BHYVE_ACPI_BASE) { warnx("%s: table offset of 0x%8x is too large", __func__, table->off); return (EFAULT); } gva = vm_map_gpa(table->ctx, gpa, table->len); if (gva == NULL) { warnx("%s: could not map gpa [ 0x%16lx, 0x%16lx ]", __func__, gpa, gpa + table->len); return (ENOMEM); } val = basl_le_dec(gva + pointer->off, pointer->size); val += BHYVE_ACPI_BASE + src_table->off; basl_le_enc(gva + pointer->off, val, pointer->size); } return (0); } static int basl_finish_set_length(struct basl_table *const table) { struct basl_table_length *length; STAILQ_FOREACH(length, &table->lengths, chain) { assert(length->off < table->len); assert(length->off + length->size <= table->len); basl_le_enc((uint8_t *)table->data + length->off, table->len, length->size); } return (0); } int basl_finish(void) { struct basl_table *table; + uint32_t off = 0; if (STAILQ_EMPTY(&basl_tables)) { warnx("%s: no ACPI tables found", __func__); return (EINVAL); } /* * We have to install all tables before we can patch them. Therefore, * use two loops. The first one installs all tables and the second one * patches them. */ STAILQ_FOREACH(table, &basl_tables, chain) { BASL_EXEC(basl_finish_set_length(table)); - BASL_EXEC(basl_finish_install_guest_tables(table)); + BASL_EXEC(basl_finish_install_guest_tables(table, &off)); } STAILQ_FOREACH(table, &basl_tables, chain) { BASL_EXEC(basl_finish_patch_pointers(table)); /* * Calculate the checksum as last step! */ BASL_EXEC(basl_finish_patch_checksums(table)); } return (0); } int basl_init(void) { return (0); } int basl_table_add_checksum(struct basl_table *const table, const uint32_t off, const uint32_t start, const uint32_t len) { struct basl_table_checksum *checksum; assert(table != NULL); checksum = calloc(1, sizeof(struct basl_table_checksum)); if (checksum == NULL) { warnx("%s: failed to allocate checksum", __func__); return (ENOMEM); } checksum->off = off; checksum->start = start; checksum->len = len; STAILQ_INSERT_TAIL(&table->checksums, checksum, chain); return (0); } int basl_table_add_length(struct basl_table *const table, const uint32_t off, const uint8_t size) { struct basl_table_length *length; assert(table != NULL); assert(size == 4 || size == 8); length = calloc(1, sizeof(struct basl_table_length)); if (length == NULL) { warnx("%s: failed to allocate length", __func__); return (ENOMEM); } length->off = off; length->size = size; STAILQ_INSERT_TAIL(&table->lengths, length, chain); return (0); } int basl_table_add_pointer(struct basl_table *const table, const uint8_t src_signature[ACPI_NAMESEG_SIZE], const uint32_t off, const uint8_t size) { struct basl_table_pointer *pointer; assert(table != NULL); assert(size == 4 || size == 8); pointer = calloc(1, sizeof(struct basl_table_pointer)); if (pointer == NULL) { warnx("%s: failed to allocate pointer", __func__); return (ENOMEM); } memcpy(pointer->src_signature, src_signature, sizeof(pointer->src_signature)); pointer->off = off; pointer->size = size; STAILQ_INSERT_TAIL(&table->pointers, pointer, chain); return (0); } int basl_table_append_bytes(struct basl_table *const table, const void *const bytes, const uint32_t len) { void *end; assert(table != NULL); assert(bytes != NULL); if (table->len + len <= table->len) { warnx("%s: table too large (table->len 0x%8x len 0x%8x)", __func__, table->len, len); return (EFAULT); } table->data = reallocf(table->data, table->len + len); if (table->data == NULL) { warnx("%s: failed to realloc table to length 0x%8x", __func__, table->len + len); table->len = 0; return (ENOMEM); } end = (uint8_t *)table->data + table->len; table->len += len; memcpy(end, bytes, len); return (0); } int basl_table_append_checksum(struct basl_table *const table, const uint32_t start, const uint32_t len) { assert(table != NULL); BASL_EXEC(basl_table_add_checksum(table, table->len, start, len)); BASL_EXEC(basl_table_append_int(table, 0, 1)); return (0); } int basl_table_append_content(struct basl_table *table, void *data, uint32_t len) { assert(data != NULL); assert(len >= sizeof(ACPI_TABLE_HEADER)); return (basl_table_append_bytes(table, (void *)((uintptr_t)(data) + sizeof(ACPI_TABLE_HEADER)), len - sizeof(ACPI_TABLE_HEADER))); } int basl_table_append_gas(struct basl_table *const table, const uint8_t space_id, const uint8_t bit_width, const uint8_t bit_offset, const uint8_t access_width, const uint64_t address) { ACPI_GENERIC_ADDRESS gas_le = { .SpaceId = space_id, .BitWidth = bit_width, .BitOffset = bit_offset, .AccessWidth = access_width, .Address = htole64(address), }; return (basl_table_append_bytes(table, &gas_le, sizeof(gas_le))); } int basl_table_append_header(struct basl_table *const table, const uint8_t signature[ACPI_NAMESEG_SIZE], const uint8_t revision, const uint32_t oem_revision) { ACPI_TABLE_HEADER header_le; /* + 1 is required for the null terminator */ char oem_table_id[ACPI_OEM_TABLE_ID_SIZE + 1]; assert(table != NULL); assert(table->len == 0); memcpy(header_le.Signature, signature, ACPI_NAMESEG_SIZE); header_le.Length = 0; /* patched by basl_finish */ header_le.Revision = revision; header_le.Checksum = 0; /* patched by basl_finish */ memcpy(header_le.OemId, "BHYVE ", ACPI_OEM_ID_SIZE); snprintf(oem_table_id, ACPI_OEM_TABLE_ID_SIZE, "BV%.4s ", signature); memcpy(header_le.OemTableId, oem_table_id, sizeof(header_le.OemTableId)); header_le.OemRevision = htole32(oem_revision); memcpy(header_le.AslCompilerId, "BASL", ACPI_NAMESEG_SIZE); header_le.AslCompilerRevision = htole32(0x20220504); BASL_EXEC( basl_table_append_bytes(table, &header_le, sizeof(header_le))); BASL_EXEC(basl_table_add_length(table, offsetof(ACPI_TABLE_HEADER, Length), sizeof(header_le.Length))); BASL_EXEC(basl_table_add_checksum(table, offsetof(ACPI_TABLE_HEADER, Checksum), 0, BASL_TABLE_CHECKSUM_LEN_FULL_TABLE)); return (0); } int basl_table_append_int(struct basl_table *const table, const uint64_t val, const uint8_t size) { char buf[8]; assert(size <= sizeof(val)); basl_le_enc(buf, val, size); return (basl_table_append_bytes(table, buf, size)); } int basl_table_append_length(struct basl_table *const table, const uint8_t size) { assert(table != NULL); assert(size <= sizeof(table->len)); BASL_EXEC(basl_table_add_length(table, table->len, size)); BASL_EXEC(basl_table_append_int(table, 0, size)); return (0); } int basl_table_append_pointer(struct basl_table *const table, const uint8_t src_signature[ACPI_NAMESEG_SIZE], const uint8_t size) { assert(table != NULL); assert(size == 4 || size == 8); BASL_EXEC(basl_table_add_pointer(table, src_signature, table->len, size)); BASL_EXEC(basl_table_append_int(table, 0, size)); return (0); } int basl_table_create(struct basl_table **const table, struct vmctx *ctx, - const uint8_t *const name, const uint32_t alignment, - const uint32_t off) + const uint8_t *const name, const uint32_t alignment) { struct basl_table *new_table; assert(table != NULL); new_table = calloc(1, sizeof(struct basl_table)); if (new_table == NULL) { warnx("%s: failed to allocate table", __func__); return (ENOMEM); } new_table->ctx = ctx; snprintf(new_table->fwcfg_name, sizeof(new_table->fwcfg_name), "etc/acpi/%s", name); new_table->alignment = alignment; - new_table->off = off; STAILQ_INIT(&new_table->checksums); STAILQ_INIT(&new_table->lengths); STAILQ_INIT(&new_table->pointers); STAILQ_INSERT_TAIL(&basl_tables, new_table, chain); *table = new_table; return (0); } diff --git a/usr.sbin/bhyve/basl.h b/usr.sbin/bhyve/basl.h index 9c7ba0c84229..71b3e6dc07fc 100644 --- a/usr.sbin/bhyve/basl.h +++ b/usr.sbin/bhyve/basl.h @@ -1,73 +1,73 @@ /*- * SPDX-License-Identifier: BSD-2-Clause * * Copyright (c) 2022 Beckhoff Automation GmbH & Co. KG */ #pragma once #pragma clang diagnostic push #pragma clang diagnostic ignored "-Wunused-parameter" #include #pragma clang diagnostic pop #define ACPI_GAS_ACCESS_WIDTH_LEGACY 0 #define ACPI_GAS_ACCESS_WIDTH_UNDEFINED 0 #define ACPI_GAS_ACCESS_WIDTH_BYTE 1 #define ACPI_GAS_ACCESS_WIDTH_WORD 2 #define ACPI_GAS_ACCESS_WIDTH_DWORD 3 #define ACPI_GAS_ACCESS_WIDTH_QWORD 4 #define BHYVE_ACPI_BASE 0xf2400 #define BASL_TABLE_ALIGNMENT 0x10 #define BASL_TABLE_ALIGNMENT_FACS 0x40 #define BASL_TABLE_CHECKSUM_LEN_FULL_TABLE (-1U) #define BASL_EXEC(x) \ do { \ const int error = (x); \ if (error) { \ warnc(error, \ "BASL failed @ %s:%d\n Failed to execute %s", \ __func__, __LINE__, #x); \ return (error); \ } \ } while (0) #define QEMU_FWCFG_MAX_NAME 56 struct basl_table; void basl_fill_gas(ACPI_GENERIC_ADDRESS *gas, uint8_t space_id, uint8_t bit_width, uint8_t bit_offset, uint8_t access_width, uint64_t address); int basl_finish(void); int basl_init(void); int basl_table_add_checksum(struct basl_table *const table, const uint32_t off, const uint32_t start, const uint32_t len); int basl_table_add_length(struct basl_table *const table, const uint32_t off, const uint8_t size); int basl_table_add_pointer(struct basl_table *const table, const uint8_t src_signature[ACPI_NAMESEG_SIZE], const uint32_t off, const uint8_t size); int basl_table_append_bytes(struct basl_table *table, const void *bytes, uint32_t len); int basl_table_append_checksum(struct basl_table *table, uint32_t start, uint32_t len); /* Add an ACPI_TABLE_* to basl without its header. */ int basl_table_append_content(struct basl_table *table, void *data, uint32_t len); int basl_table_append_gas(struct basl_table *table, uint8_t space_id, uint8_t bit_width, uint8_t bit_offset, uint8_t access_width, uint64_t address); int basl_table_append_header(struct basl_table *table, const uint8_t signature[ACPI_NAMESEG_SIZE], uint8_t revision, uint32_t oem_revision); int basl_table_append_int(struct basl_table *table, uint64_t val, uint8_t size); int basl_table_append_length(struct basl_table *table, uint8_t size); int basl_table_append_pointer(struct basl_table *table, const uint8_t src_signature[ACPI_NAMESEG_SIZE], uint8_t size); int basl_table_create(struct basl_table **table, struct vmctx *ctx, - const uint8_t *name, uint32_t alignment, uint32_t off); + const uint8_t *name, uint32_t alignment);