1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2012 NetApp, Inc. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY NETAPP, INC ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL NETAPP, INC OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 * 28 * $FreeBSD$ 29 */ 30 31 /* 32 * bhyve ACPI table generator. 33 * 34 * Create the minimal set of ACPI tables required to boot FreeBSD (and 35 * hopefully other o/s's). 36 * 37 * The tables are placed in the guest's ROM area just below 1MB physical, 38 * above the MPTable. 39 */ 40 41 #include <sys/cdefs.h> 42 __FBSDID("$FreeBSD$"); 43 44 #include <sys/param.h> 45 #include <sys/endian.h> 46 #include <sys/errno.h> 47 #include <sys/stat.h> 48 49 #include <err.h> 50 #include <paths.h> 51 #include <stdarg.h> 52 #include <stddef.h> 53 #include <stdio.h> 54 #include <stdlib.h> 55 #include <string.h> 56 #include <unistd.h> 57 58 #include <machine/vmm.h> 59 #include <vmmapi.h> 60 61 #include "bhyverun.h" 62 #include "acpi.h" 63 #include "basl.h" 64 #include "pci_emul.h" 65 #include "vmgenc.h" 66 67 #define BHYVE_ASL_TEMPLATE "bhyve.XXXXXXX" 68 #define BHYVE_ASL_SUFFIX ".aml" 69 #define BHYVE_ASL_COMPILER "/usr/sbin/iasl" 70 71 #define BHYVE_ADDRESS_IOAPIC 0xFEC00000 72 #define BHYVE_ADDRESS_HPET 0xFED00000 73 #define BHYVE_ADDRESS_LAPIC 0xFEE00000 74 75 static int basl_keep_temps; 76 static int basl_verbose_iasl; 77 static int basl_ncpu; 78 static uint32_t hpet_capabilities; 79 80 /* 81 * Contains the full pathname of the template to be passed 82 * to mkstemp/mktemps(3) 83 */ 84 static char basl_template[MAXPATHLEN]; 85 static char basl_stemplate[MAXPATHLEN]; 86 87 /* 88 * State for dsdt_line(), dsdt_indent(), and dsdt_unindent(). 89 */ 90 static FILE *dsdt_fp; 91 static int dsdt_indent_level; 92 static int dsdt_error; 93 94 static struct basl_table *rsdt; 95 static struct basl_table *xsdt; 96 97 struct basl_fio { 98 int fd; 99 FILE *fp; 100 char f_name[MAXPATHLEN]; 101 }; 102 103 #define EFPRINTF(...) \ 104 if (fprintf(__VA_ARGS__) < 0) goto err_exit 105 106 #define EFFLUSH(x) \ 107 if (fflush(x) != 0) goto err_exit 108 109 /* 110 * A list for additional ACPI devices like a TPM. 111 */ 112 struct acpi_device_list_entry { 113 SLIST_ENTRY(acpi_device_list_entry) chain; 114 const struct acpi_device *dev; 115 }; 116 static SLIST_HEAD(acpi_device_list, 117 acpi_device_list_entry) acpi_devices = SLIST_HEAD_INITIALIZER(acpi_devices); 118 119 int 120 acpi_tables_add_device(const struct acpi_device *const dev) 121 { 122 struct acpi_device_list_entry *const entry = calloc(1, sizeof(*entry)); 123 if (entry == NULL) { 124 return (ENOMEM); 125 } 126 127 entry->dev = dev; 128 SLIST_INSERT_HEAD(&acpi_devices, entry, chain); 129 130 return (0); 131 } 132 133 /* 134 * Helper routines for writing to the DSDT from other modules. 135 */ 136 void 137 dsdt_line(const char *fmt, ...) 138 { 139 va_list ap; 140 141 if (dsdt_error != 0) 142 return; 143 144 if (strcmp(fmt, "") != 0) { 145 if (dsdt_indent_level != 0) 146 EFPRINTF(dsdt_fp, "%*c", dsdt_indent_level * 2, ' '); 147 va_start(ap, fmt); 148 if (vfprintf(dsdt_fp, fmt, ap) < 0) { 149 va_end(ap); 150 goto err_exit; 151 } 152 va_end(ap); 153 } 154 EFPRINTF(dsdt_fp, "\n"); 155 return; 156 157 err_exit: 158 dsdt_error = errno; 159 } 160 161 void 162 dsdt_indent(int levels) 163 { 164 165 dsdt_indent_level += levels; 166 assert(dsdt_indent_level >= 0); 167 } 168 169 void 170 dsdt_unindent(int levels) 171 { 172 173 assert(dsdt_indent_level >= levels); 174 dsdt_indent_level -= levels; 175 } 176 177 void 178 dsdt_fixed_ioport(uint16_t iobase, uint16_t length) 179 { 180 181 dsdt_line("IO (Decode16,"); 182 dsdt_line(" 0x%04X, // Range Minimum", iobase); 183 dsdt_line(" 0x%04X, // Range Maximum", iobase); 184 dsdt_line(" 0x01, // Alignment"); 185 dsdt_line(" 0x%02X, // Length", length); 186 dsdt_line(" )"); 187 } 188 189 void 190 dsdt_fixed_irq(uint8_t irq) 191 { 192 193 dsdt_line("IRQNoFlags ()"); 194 dsdt_line(" {%d}", irq); 195 } 196 197 void 198 dsdt_fixed_mem32(uint32_t base, uint32_t length) 199 { 200 201 dsdt_line("Memory32Fixed (ReadWrite,"); 202 dsdt_line(" 0x%08X, // Address Base", base); 203 dsdt_line(" 0x%08X, // Address Length", length); 204 dsdt_line(" )"); 205 } 206 207 static int 208 basl_fwrite_dsdt(FILE *fp) 209 { 210 dsdt_fp = fp; 211 dsdt_error = 0; 212 dsdt_indent_level = 0; 213 214 dsdt_line("/*"); 215 dsdt_line(" * bhyve DSDT template"); 216 dsdt_line(" */"); 217 dsdt_line("DefinitionBlock (\"bhyve_dsdt.aml\", \"DSDT\", 2," 218 "\"BHYVE \", \"BVDSDT \", 0x00000001)"); 219 dsdt_line("{"); 220 dsdt_line(" Name (_S5, Package ()"); 221 dsdt_line(" {"); 222 dsdt_line(" 0x05,"); 223 dsdt_line(" Zero,"); 224 dsdt_line(" })"); 225 226 pci_write_dsdt(); 227 228 dsdt_line(""); 229 dsdt_line(" Scope (_SB.PC00)"); 230 dsdt_line(" {"); 231 dsdt_line(" Device (HPET)"); 232 dsdt_line(" {"); 233 dsdt_line(" Name (_HID, EISAID(\"PNP0103\"))"); 234 dsdt_line(" Name (_UID, 0)"); 235 dsdt_line(" Name (_CRS, ResourceTemplate ()"); 236 dsdt_line(" {"); 237 dsdt_indent(4); 238 dsdt_fixed_mem32(0xFED00000, 0x400); 239 dsdt_unindent(4); 240 dsdt_line(" })"); 241 dsdt_line(" }"); 242 dsdt_line(" }"); 243 244 vmgenc_write_dsdt(); 245 246 const struct acpi_device_list_entry *entry; 247 SLIST_FOREACH(entry, &acpi_devices, chain) { 248 BASL_EXEC(acpi_device_write_dsdt(entry->dev)); 249 } 250 251 dsdt_line("}"); 252 253 if (dsdt_error != 0) 254 return (dsdt_error); 255 256 EFFLUSH(fp); 257 258 return (0); 259 260 err_exit: 261 return (errno); 262 } 263 264 static int 265 basl_open(struct basl_fio *bf, int suffix) 266 { 267 int err; 268 269 err = 0; 270 271 if (suffix) { 272 strlcpy(bf->f_name, basl_stemplate, MAXPATHLEN); 273 bf->fd = mkstemps(bf->f_name, strlen(BHYVE_ASL_SUFFIX)); 274 } else { 275 strlcpy(bf->f_name, basl_template, MAXPATHLEN); 276 bf->fd = mkstemp(bf->f_name); 277 } 278 279 if (bf->fd > 0) { 280 bf->fp = fdopen(bf->fd, "w+"); 281 if (bf->fp == NULL) { 282 unlink(bf->f_name); 283 close(bf->fd); 284 } 285 } else { 286 err = 1; 287 } 288 289 return (err); 290 } 291 292 static void 293 basl_close(struct basl_fio *bf) 294 { 295 296 if (!basl_keep_temps) 297 unlink(bf->f_name); 298 fclose(bf->fp); 299 } 300 301 static int 302 basl_start(struct basl_fio *in, struct basl_fio *out) 303 { 304 int err; 305 306 err = basl_open(in, 0); 307 if (!err) { 308 err = basl_open(out, 1); 309 if (err) { 310 basl_close(in); 311 } 312 } 313 314 return (err); 315 } 316 317 static void 318 basl_end(struct basl_fio *in, struct basl_fio *out) 319 { 320 321 basl_close(in); 322 basl_close(out); 323 } 324 325 static int 326 basl_load(struct vmctx *ctx, int fd) 327 { 328 struct stat sb; 329 void *addr; 330 331 if (fstat(fd, &sb) < 0) 332 return (errno); 333 334 addr = calloc(1, sb.st_size); 335 if (addr == NULL) 336 return (EFAULT); 337 338 if (read(fd, addr, sb.st_size) < 0) 339 return (errno); 340 341 struct basl_table *table; 342 343 uint8_t name[ACPI_NAMESEG_SIZE + 1] = { 0 }; 344 memcpy(name, addr, sizeof(name) - 1 /* last char is '\0' */); 345 BASL_EXEC(basl_table_create(&table, ctx, name, BASL_TABLE_ALIGNMENT)); 346 BASL_EXEC(basl_table_append_bytes(table, addr, sb.st_size)); 347 348 return (0); 349 } 350 351 static int 352 basl_compile(struct vmctx *ctx, int (*fwrite_section)(FILE *)) 353 { 354 struct basl_fio io[2]; 355 static char iaslbuf[3*MAXPATHLEN + 10]; 356 const char *fmt; 357 int err; 358 359 err = basl_start(&io[0], &io[1]); 360 if (!err) { 361 err = (*fwrite_section)(io[0].fp); 362 363 if (!err) { 364 /* 365 * iasl sends the results of the compilation to 366 * stdout. Shut this down by using the shell to 367 * redirect stdout to /dev/null, unless the user 368 * has requested verbose output for debugging 369 * purposes 370 */ 371 fmt = basl_verbose_iasl ? 372 "%s -p %s %s" : 373 "/bin/sh -c \"%s -p %s %s\" 1> /dev/null"; 374 375 snprintf(iaslbuf, sizeof(iaslbuf), 376 fmt, 377 BHYVE_ASL_COMPILER, 378 io[1].f_name, io[0].f_name); 379 err = system(iaslbuf); 380 381 if (!err) { 382 /* 383 * Copy the aml output file into guest 384 * memory at the specified location 385 */ 386 err = basl_load(ctx, io[1].fd); 387 } 388 } 389 basl_end(&io[0], &io[1]); 390 } 391 392 return (err); 393 } 394 395 static int 396 basl_make_templates(void) 397 { 398 const char *tmpdir; 399 int err; 400 int len; 401 402 err = 0; 403 404 /* 405 * 406 */ 407 if ((tmpdir = getenv("BHYVE_TMPDIR")) == NULL || *tmpdir == '\0' || 408 (tmpdir = getenv("TMPDIR")) == NULL || *tmpdir == '\0') { 409 tmpdir = _PATH_TMP; 410 } 411 412 len = strlen(tmpdir); 413 414 if ((len + sizeof(BHYVE_ASL_TEMPLATE) + 1) < MAXPATHLEN) { 415 strcpy(basl_template, tmpdir); 416 while (len > 0 && basl_template[len - 1] == '/') 417 len--; 418 basl_template[len] = '/'; 419 strcpy(&basl_template[len + 1], BHYVE_ASL_TEMPLATE); 420 } else 421 err = E2BIG; 422 423 if (!err) { 424 /* 425 * len has been intialized (and maybe adjusted) above 426 */ 427 if ((len + sizeof(BHYVE_ASL_TEMPLATE) + 1 + 428 sizeof(BHYVE_ASL_SUFFIX)) < MAXPATHLEN) { 429 strcpy(basl_stemplate, tmpdir); 430 basl_stemplate[len] = '/'; 431 strcpy(&basl_stemplate[len + 1], BHYVE_ASL_TEMPLATE); 432 len = strlen(basl_stemplate); 433 strcpy(&basl_stemplate[len], BHYVE_ASL_SUFFIX); 434 } else 435 err = E2BIG; 436 } 437 438 return (err); 439 } 440 441 static int 442 build_dsdt(struct vmctx *const ctx) 443 { 444 BASL_EXEC(basl_compile(ctx, basl_fwrite_dsdt)); 445 446 return (0); 447 } 448 449 static int 450 build_facs(struct vmctx *const ctx) 451 { 452 ACPI_TABLE_FACS facs; 453 struct basl_table *table; 454 455 BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_FACS, 456 BASL_TABLE_ALIGNMENT_FACS)); 457 458 memset(&facs, 0, sizeof(facs)); 459 memcpy(facs.Signature, ACPI_SIG_FACS, ACPI_NAMESEG_SIZE); 460 facs.Length = sizeof(facs); 461 facs.Version = htole32(2); 462 BASL_EXEC(basl_table_append_bytes(table, &facs, sizeof(facs))); 463 464 return (0); 465 } 466 467 static int 468 build_fadt(struct vmctx *const ctx) 469 { 470 ACPI_TABLE_FADT fadt; 471 struct basl_table *table; 472 473 BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_FADT, 474 BASL_TABLE_ALIGNMENT)); 475 476 memset(&fadt, 0, sizeof(fadt)); 477 BASL_EXEC(basl_table_append_header(table, ACPI_SIG_FADT, 5, 1)); 478 fadt.Facs = htole32(0); /* patched by basl */ 479 fadt.Dsdt = htole32(0); /* patched by basl */ 480 fadt.SciInterrupt = htole16(SCI_INT); 481 fadt.SmiCommand = htole32(SMI_CMD); 482 fadt.AcpiEnable = BHYVE_ACPI_ENABLE; 483 fadt.AcpiDisable = BHYVE_ACPI_DISABLE; 484 fadt.Pm1aEventBlock = htole32(PM1A_EVT_ADDR); 485 fadt.Pm1aControlBlock = htole32(PM1A_CNT_ADDR); 486 fadt.PmTimerBlock = htole32(IO_PMTMR); 487 fadt.Gpe0Block = htole32(IO_GPE0_BLK); 488 fadt.Pm1EventLength = 4; 489 fadt.Pm1ControlLength = 2; 490 fadt.PmTimerLength = 4; 491 fadt.Gpe0BlockLength = IO_GPE0_LEN; 492 fadt.Century = 0x32; 493 fadt.BootFlags = htole16(ACPI_FADT_NO_VGA | ACPI_FADT_NO_ASPM); 494 fadt.Flags = htole32(ACPI_FADT_WBINVD | ACPI_FADT_C1_SUPPORTED | 495 ACPI_FADT_SLEEP_BUTTON | ACPI_FADT_32BIT_TIMER | 496 ACPI_FADT_RESET_REGISTER | ACPI_FADT_HEADLESS | 497 ACPI_FADT_APIC_PHYSICAL); 498 basl_fill_gas(&fadt.ResetRegister, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, 499 ACPI_GAS_ACCESS_WIDTH_BYTE, 0xCF9); 500 fadt.ResetValue = 6; 501 fadt.MinorRevision = 1; 502 fadt.XFacs = htole64(0); /* patched by basl */ 503 fadt.XDsdt = htole64(0); /* patched by basl */ 504 basl_fill_gas(&fadt.XPm1aEventBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0x20, 0, 505 ACPI_GAS_ACCESS_WIDTH_WORD, PM1A_EVT_ADDR); 506 basl_fill_gas(&fadt.XPm1bEventBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0, 0, 507 ACPI_GAS_ACCESS_WIDTH_UNDEFINED, 0); 508 basl_fill_gas(&fadt.XPm1aControlBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0x10, 509 0, ACPI_GAS_ACCESS_WIDTH_WORD, PM1A_CNT_ADDR); 510 basl_fill_gas(&fadt.XPm1bControlBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0, 0, 511 ACPI_GAS_ACCESS_WIDTH_UNDEFINED, 0); 512 basl_fill_gas(&fadt.XPm2ControlBlock, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, 513 ACPI_GAS_ACCESS_WIDTH_UNDEFINED, 0); 514 basl_fill_gas(&fadt.XPmTimerBlock, ACPI_ADR_SPACE_SYSTEM_IO, 0x20, 0, 515 ACPI_GAS_ACCESS_WIDTH_DWORD, IO_PMTMR); 516 basl_fill_gas(&fadt.XGpe0Block, ACPI_ADR_SPACE_SYSTEM_IO, 517 IO_GPE0_LEN * 8, 0, ACPI_GAS_ACCESS_WIDTH_BYTE, IO_GPE0_BLK); 518 basl_fill_gas(&fadt.XGpe1Block, ACPI_ADR_SPACE_SYSTEM_IO, 0, 0, 519 ACPI_GAS_ACCESS_WIDTH_UNDEFINED, 0); 520 basl_fill_gas(&fadt.SleepControl, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, 521 ACPI_GAS_ACCESS_WIDTH_BYTE, 0); 522 basl_fill_gas(&fadt.SleepStatus, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, 523 ACPI_GAS_ACCESS_WIDTH_BYTE, 0); 524 BASL_EXEC(basl_table_append_content(table, &fadt, sizeof(fadt))); 525 526 BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_FACS, 527 offsetof(ACPI_TABLE_FADT, Facs), sizeof(fadt.Facs))); 528 BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_DSDT, 529 offsetof(ACPI_TABLE_FADT, Dsdt), sizeof(fadt.Dsdt))); 530 BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_FACS, 531 offsetof(ACPI_TABLE_FADT, XFacs), sizeof(fadt.XFacs))); 532 BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_DSDT, 533 offsetof(ACPI_TABLE_FADT, XDsdt), sizeof(fadt.XDsdt))); 534 535 BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_FADT, 536 ACPI_RSDT_ENTRY_SIZE)); 537 BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_FADT, 538 ACPI_XSDT_ENTRY_SIZE)); 539 540 return (0); 541 } 542 543 static int 544 build_hpet(struct vmctx *const ctx) 545 { 546 ACPI_TABLE_HPET hpet; 547 struct basl_table *table; 548 549 BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_HPET, 550 BASL_TABLE_ALIGNMENT)); 551 552 memset(&hpet, 0, sizeof(hpet)); 553 BASL_EXEC(basl_table_append_header(table, ACPI_SIG_HPET, 1, 1)); 554 hpet.Id = htole32(hpet_capabilities); 555 basl_fill_gas(&hpet.Address, ACPI_ADR_SPACE_SYSTEM_MEMORY, 0, 0, 556 ACPI_GAS_ACCESS_WIDTH_LEGACY, BHYVE_ADDRESS_HPET); 557 hpet.Flags = ACPI_HPET_PAGE_PROTECT4; 558 BASL_EXEC(basl_table_append_content(table, &hpet, sizeof(hpet))); 559 560 BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_HPET, 561 ACPI_RSDT_ENTRY_SIZE)); 562 BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_HPET, 563 ACPI_XSDT_ENTRY_SIZE)); 564 565 return (0); 566 } 567 568 static int 569 build_madt(struct vmctx *const ctx) 570 { 571 ACPI_TABLE_MADT madt; 572 ACPI_MADT_LOCAL_APIC madt_lapic; 573 ACPI_MADT_IO_APIC madt_ioapic; 574 ACPI_MADT_INTERRUPT_OVERRIDE madt_irq_override; 575 ACPI_MADT_LOCAL_APIC_NMI madt_lapic_nmi; 576 struct basl_table *table; 577 578 BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_MADT, 579 BASL_TABLE_ALIGNMENT)); 580 581 memset(&madt, 0, sizeof(madt)); 582 BASL_EXEC(basl_table_append_header(table, ACPI_SIG_MADT, 1, 1)); 583 madt.Address = htole32(BHYVE_ADDRESS_LAPIC); 584 madt.Flags = htole32(ACPI_MADT_PCAT_COMPAT); 585 BASL_EXEC(basl_table_append_content(table, &madt, sizeof(madt))); 586 587 /* Local APIC for each CPU */ 588 for (int i = 0; i < basl_ncpu; ++i) { 589 memset(&madt_lapic, 0, sizeof(madt_lapic)); 590 madt_lapic.Header.Type = ACPI_MADT_TYPE_LOCAL_APIC; 591 madt_lapic.Header.Length = sizeof(madt_lapic); 592 madt_lapic.ProcessorId = i; 593 madt_lapic.Id = i; 594 madt_lapic.LapicFlags = htole32(ACPI_MADT_ENABLED); 595 BASL_EXEC(basl_table_append_bytes(table, &madt_lapic, 596 sizeof(madt_lapic))); 597 } 598 599 /* I/O APIC */ 600 memset(&madt_ioapic, 0, sizeof(madt_ioapic)); 601 madt_ioapic.Header.Type = ACPI_MADT_TYPE_IO_APIC; 602 madt_ioapic.Header.Length = sizeof(madt_ioapic); 603 madt_ioapic.Address = htole32(BHYVE_ADDRESS_IOAPIC); 604 BASL_EXEC( 605 basl_table_append_bytes(table, &madt_ioapic, sizeof(madt_ioapic))); 606 607 /* Legacy IRQ0 is connected to pin 2 of the I/O APIC */ 608 memset(&madt_irq_override, 0, sizeof(madt_irq_override)); 609 madt_irq_override.Header.Type = ACPI_MADT_TYPE_INTERRUPT_OVERRIDE; 610 madt_irq_override.Header.Length = sizeof(madt_irq_override); 611 madt_irq_override.GlobalIrq = htole32(2); 612 madt_irq_override.IntiFlags = htole16( 613 ACPI_MADT_POLARITY_ACTIVE_HIGH | ACPI_MADT_TRIGGER_EDGE); 614 BASL_EXEC(basl_table_append_bytes(table, &madt_irq_override, 615 sizeof(madt_irq_override))); 616 617 memset(&madt_irq_override, 0, sizeof(madt_irq_override)); 618 madt_irq_override.Header.Type = ACPI_MADT_TYPE_INTERRUPT_OVERRIDE; 619 madt_irq_override.Header.Length = sizeof(madt_irq_override); 620 madt_irq_override.SourceIrq = SCI_INT; 621 madt_irq_override.GlobalIrq = htole32(SCI_INT); 622 madt_irq_override.IntiFlags = htole16( 623 ACPI_MADT_POLARITY_ACTIVE_LOW | ACPI_MADT_TRIGGER_LEVEL); 624 BASL_EXEC(basl_table_append_bytes(table, &madt_irq_override, 625 sizeof(madt_irq_override))); 626 627 /* Local APIC NMI is conntected to LINT 1 on all CPUs */ 628 memset(&madt_lapic_nmi, 0, sizeof(madt_lapic_nmi)); 629 madt_lapic_nmi.Header.Type = ACPI_MADT_TYPE_LOCAL_APIC_NMI; 630 madt_lapic_nmi.Header.Length = sizeof(madt_lapic_nmi); 631 madt_lapic_nmi.ProcessorId = 0xFF; 632 madt_lapic_nmi.IntiFlags = htole16( 633 ACPI_MADT_POLARITY_ACTIVE_HIGH | ACPI_MADT_TRIGGER_EDGE); 634 madt_lapic_nmi.Lint = 1; 635 BASL_EXEC(basl_table_append_bytes(table, &madt_lapic_nmi, 636 sizeof(madt_lapic_nmi))); 637 638 BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_MADT, 639 ACPI_RSDT_ENTRY_SIZE)); 640 BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_MADT, 641 ACPI_XSDT_ENTRY_SIZE)); 642 643 return (0); 644 } 645 646 static int 647 build_mcfg(struct vmctx *const ctx) 648 { 649 ACPI_TABLE_MCFG mcfg; 650 ACPI_MCFG_ALLOCATION mcfg_allocation; 651 struct basl_table *table; 652 653 BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_MCFG, 654 BASL_TABLE_ALIGNMENT)); 655 656 memset(&mcfg, 0, sizeof(mcfg)); 657 BASL_EXEC(basl_table_append_header(table, ACPI_SIG_MCFG, 1, 1)); 658 BASL_EXEC(basl_table_append_content(table, &mcfg, sizeof(mcfg))); 659 660 memset(&mcfg_allocation, 0, sizeof(mcfg_allocation)); 661 mcfg_allocation.Address = htole64(pci_ecfg_base()); 662 mcfg_allocation.EndBusNumber = 0xFF; 663 BASL_EXEC(basl_table_append_bytes(table, &mcfg_allocation, 664 sizeof(mcfg_allocation))); 665 666 BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_MCFG, 667 ACPI_RSDT_ENTRY_SIZE)); 668 BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_MCFG, 669 ACPI_XSDT_ENTRY_SIZE)); 670 671 return (0); 672 } 673 674 static int 675 build_rsdp(struct vmctx *const ctx) 676 { 677 ACPI_TABLE_RSDP rsdp; 678 struct basl_table *table; 679 680 BASL_EXEC(basl_table_create(&table, ctx, ACPI_RSDP_NAME, 681 BASL_TABLE_ALIGNMENT)); 682 683 memset(&rsdp, 0, sizeof(rsdp)); 684 memcpy(rsdp.Signature, ACPI_SIG_RSDP, 8); 685 rsdp.Checksum = 0; /* patched by basl */ 686 memcpy(rsdp.OemId, "BHYVE ", ACPI_OEM_ID_SIZE); 687 rsdp.Revision = 2; 688 rsdp.RsdtPhysicalAddress = htole32(0); /* patched by basl */ 689 rsdp.Length = htole32(0); /* patched by basl */ 690 rsdp.XsdtPhysicalAddress = htole64(0); /* patched by basl */ 691 rsdp.ExtendedChecksum = 0; /* patched by basl */ 692 BASL_EXEC(basl_table_append_bytes(table, &rsdp, sizeof(rsdp))); 693 694 BASL_EXEC(basl_table_add_checksum(table, 695 offsetof(ACPI_TABLE_RSDP, Checksum), 0, 20)); 696 BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_RSDT, 697 offsetof(ACPI_TABLE_RSDP, RsdtPhysicalAddress), 698 sizeof(rsdp.RsdtPhysicalAddress))); 699 BASL_EXEC(basl_table_add_length(table, 700 offsetof(ACPI_TABLE_RSDP, Length), sizeof(rsdp.Length))); 701 BASL_EXEC(basl_table_add_pointer(table, ACPI_SIG_XSDT, 702 offsetof(ACPI_TABLE_RSDP, XsdtPhysicalAddress), 703 sizeof(rsdp.XsdtPhysicalAddress))); 704 BASL_EXEC(basl_table_add_checksum(table, 705 offsetof(ACPI_TABLE_RSDP, ExtendedChecksum), 0, 706 BASL_TABLE_CHECKSUM_LEN_FULL_TABLE)); 707 708 return (0); 709 } 710 711 static int 712 build_rsdt(struct vmctx *const ctx) 713 { 714 BASL_EXEC( 715 basl_table_create(&rsdt, ctx, ACPI_SIG_RSDT, BASL_TABLE_ALIGNMENT)); 716 717 /* Header */ 718 BASL_EXEC(basl_table_append_header(rsdt, ACPI_SIG_RSDT, 1, 1)); 719 /* Pointers (added by other build_XXX funcs) */ 720 721 return (0); 722 } 723 724 static int 725 build_spcr(struct vmctx *const ctx) 726 { 727 ACPI_TABLE_SPCR spcr; 728 struct basl_table *table; 729 730 BASL_EXEC(basl_table_create(&table, ctx, ACPI_SIG_SPCR, 731 BASL_TABLE_ALIGNMENT)); 732 733 memset(&spcr, 0, sizeof(spcr)); 734 BASL_EXEC(basl_table_append_header(table, ACPI_SIG_SPCR, 1, 1)); 735 spcr.InterfaceType = ACPI_DBG2_16550_COMPATIBLE; 736 basl_fill_gas(&spcr.SerialPort, ACPI_ADR_SPACE_SYSTEM_IO, 8, 0, 737 ACPI_GAS_ACCESS_WIDTH_LEGACY, 0x3F8); 738 spcr.InterruptType = ACPI_SPCR_INTERRUPT_TYPE_8259; 739 spcr.PcInterrupt = 4; 740 spcr.BaudRate = ACPI_SPCR_BAUD_RATE_115200; 741 spcr.Parity = ACPI_SPCR_PARITY_NO_PARITY; 742 spcr.StopBits = ACPI_SPCR_STOP_BITS_1; 743 spcr.FlowControl = 3; /* RTS/CTS | DCD */ 744 spcr.TerminalType = ACPI_SPCR_TERMINAL_TYPE_VT_UTF8; 745 BASL_EXEC(basl_table_append_content(table, &spcr, sizeof(spcr))); 746 747 BASL_EXEC(basl_table_append_pointer(rsdt, ACPI_SIG_SPCR, 748 ACPI_RSDT_ENTRY_SIZE)); 749 BASL_EXEC(basl_table_append_pointer(xsdt, ACPI_SIG_SPCR, 750 ACPI_XSDT_ENTRY_SIZE)); 751 752 return (0); 753 } 754 755 static int 756 build_xsdt(struct vmctx *const ctx) 757 { 758 BASL_EXEC( 759 basl_table_create(&xsdt, ctx, ACPI_SIG_XSDT, BASL_TABLE_ALIGNMENT)); 760 761 /* Header */ 762 BASL_EXEC(basl_table_append_header(xsdt, ACPI_SIG_XSDT, 1, 1)); 763 /* Pointers (added by other build_XXX funcs) */ 764 765 return (0); 766 } 767 768 int 769 acpi_build(struct vmctx *ctx, int ncpu) 770 { 771 int err; 772 773 basl_ncpu = ncpu; 774 775 err = vm_get_hpet_capabilities(ctx, &hpet_capabilities); 776 if (err != 0) 777 return (err); 778 779 /* 780 * For debug, allow the user to have iasl compiler output sent 781 * to stdout rather than /dev/null 782 */ 783 if (getenv("BHYVE_ACPI_VERBOSE_IASL")) 784 basl_verbose_iasl = 1; 785 786 /* 787 * Allow the user to keep the generated ASL files for debugging 788 * instead of deleting them following use 789 */ 790 if (getenv("BHYVE_ACPI_KEEPTMPS")) 791 basl_keep_temps = 1; 792 793 BASL_EXEC(basl_init()); 794 795 BASL_EXEC(basl_make_templates()); 796 797 /* 798 * Generate ACPI tables and copy them into guest memory. 799 * 800 * According to UEFI Specification v6.3 chapter 5.1 the FADT should be 801 * the first table pointed to by XSDT. For that reason, build it as the 802 * first table after XSDT. 803 */ 804 BASL_EXEC(build_rsdp(ctx)); 805 BASL_EXEC(build_rsdt(ctx)); 806 BASL_EXEC(build_xsdt(ctx)); 807 BASL_EXEC(build_fadt(ctx)); 808 BASL_EXEC(build_madt(ctx)); 809 BASL_EXEC(build_hpet(ctx)); 810 BASL_EXEC(build_mcfg(ctx)); 811 BASL_EXEC(build_facs(ctx)); 812 BASL_EXEC(build_spcr(ctx)); 813 814 /* Build ACPI device-specific tables such as a TPM2 table. */ 815 const struct acpi_device_list_entry *entry; 816 SLIST_FOREACH(entry, &acpi_devices, chain) { 817 BASL_EXEC(acpi_device_build_table(entry->dev)); 818 } 819 820 BASL_EXEC(build_dsdt(ctx)); 821 822 BASL_EXEC(basl_finish()); 823 824 return (0); 825 } 826