2 * Copyright (c) 1998 Doug Rabson
3 * Copyright (c) 2000 Mitsuru IWASAKI <iwasaki@FreeBSD.org>
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #include <sys/param.h>
31 #include <sys/endian.h>
46 #define BEGIN_COMMENT "/*\n"
47 #define END_COMMENT " */\n"
49 static void acpi_print_string(char *s, size_t length);
50 static void acpi_print_gas(ACPI_GENERIC_ADDRESS *gas);
51 static int acpi_get_fadt_revision(ACPI_TABLE_FADT *fadt);
52 static void acpi_handle_fadt(ACPI_TABLE_HEADER *fadt);
53 static void acpi_print_cpu(u_char cpu_id);
54 static void acpi_print_cpu_uid(uint32_t uid, char *uid_string);
55 static void acpi_print_local_apic(uint32_t apic_id, uint32_t flags);
56 static void acpi_print_io_apic(uint32_t apic_id, uint32_t int_base,
58 static void acpi_print_mps_flags(uint16_t flags);
59 static void acpi_print_intr(uint32_t intr, uint16_t mps_flags);
60 static void acpi_print_local_nmi(u_int lint, uint16_t mps_flags);
61 static void acpi_print_madt(ACPI_SUBTABLE_HEADER *mp);
62 static void acpi_handle_madt(ACPI_TABLE_HEADER *sdp);
63 static void acpi_handle_ecdt(ACPI_TABLE_HEADER *sdp);
64 static void acpi_handle_hpet(ACPI_TABLE_HEADER *sdp);
65 static void acpi_handle_mcfg(ACPI_TABLE_HEADER *sdp);
66 static void acpi_handle_slit(ACPI_TABLE_HEADER *sdp);
67 static void acpi_print_srat_cpu(uint32_t apic_id, uint32_t proximity_domain,
69 static void acpi_print_srat_memory(ACPI_SRAT_MEM_AFFINITY *mp);
70 static void acpi_print_srat(ACPI_SUBTABLE_HEADER *srat);
71 static void acpi_handle_srat(ACPI_TABLE_HEADER *sdp);
72 static void acpi_handle_tcpa(ACPI_TABLE_HEADER *sdp);
73 static void acpi_print_sdt(ACPI_TABLE_HEADER *sdp);
74 static void acpi_print_fadt(ACPI_TABLE_HEADER *sdp);
75 static void acpi_print_facs(ACPI_TABLE_FACS *facs);
76 static void acpi_print_dsdt(ACPI_TABLE_HEADER *dsdp);
77 static ACPI_TABLE_HEADER *acpi_map_sdt(vm_offset_t pa);
78 static void acpi_print_rsd_ptr(ACPI_TABLE_RSDP *rp);
79 static void acpi_handle_rsdt(ACPI_TABLE_HEADER *rsdp);
80 static void acpi_walk_subtables(ACPI_TABLE_HEADER *table, void *first,
81 void (*action)(ACPI_SUBTABLE_HEADER *));
83 /* Size of an address. 32-bit for ACPI 1.0, 64-bit for ACPI 2.0 and up. */
86 /* Strings used in the TCPA table */
87 static const char *tcpa_event_type_strings[] = {
88 "PREBOOT Certificate",
98 "Platform Config Flags",
102 "IPL Partition Data",
108 static const char *TCPA_pcclient_strings[] = {
112 "POST BIOS ROM Strings",
116 "Option ROM Execute",
117 "Option ROM Configurateion",
119 "Option ROM Microcode Update ",
120 "S-CRTM Version String",
126 #define PRINTFLAG_END() printflag_end()
128 static char pf_sep = '{';
142 printflag(uint64_t var, uint64_t mask, const char *name)
146 printf("%c%s", pf_sep, name);
152 acpi_print_string(char *s, size_t length)
156 /* Trim trailing spaces and NULLs */
157 while (length > 0 && (s[length - 1] == ' ' || s[length - 1] == '\0'))
167 acpi_print_gas(ACPI_GENERIC_ADDRESS *gas)
169 switch(gas->SpaceId) {
170 case ACPI_GAS_MEMORY:
171 if (gas->BitWidth <= 32)
172 printf("0x%08x:%u[%u] (Memory)",
173 (u_int)gas->Address, gas->BitOffset,
176 printf("0x%016jx:%u[%u] (Memory)",
177 (uintmax_t)gas->Address, gas->BitOffset,
181 printf("0x%02x:%u[%u] (IO)", (u_int)gas->Address,
182 gas->BitOffset, gas->BitWidth);
185 printf("%x:%x+0x%x (PCI)", (uint16_t)(gas->Address >> 32),
186 (uint16_t)((gas->Address >> 16) & 0xffff),
187 (uint16_t)gas->Address);
189 /* XXX How to handle these below? */
190 case ACPI_GAS_EMBEDDED:
191 printf("0x%x:%u[%u] (EC)", (uint16_t)gas->Address,
192 gas->BitOffset, gas->BitWidth);
195 printf("0x%x:%u[%u] (SMBus)", (uint16_t)gas->Address,
196 gas->BitOffset, gas->BitWidth);
199 case ACPI_GAS_PCIBAR:
200 case ACPI_GAS_DATATABLE:
203 printf("0x%016jx (?)", (uintmax_t)gas->Address);
208 /* The FADT revision indicates whether we use the DSDT or X_DSDT addresses. */
210 acpi_get_fadt_revision(ACPI_TABLE_FADT *fadt)
214 /* Set the FADT revision separately from the RSDP version. */
215 if (addr_size == 8) {
219 * A few systems (e.g., IBM T23) have an RSDP that claims
220 * revision 2 but the 64 bit addresses are invalid. If
221 * revision 2 and the 32 bit address is non-zero but the
222 * 32 and 64 bit versions don't match, prefer the 32 bit
223 * version for all subsequent tables.
225 if (fadt->Facs != 0 &&
226 (fadt->XFacs & 0xffffffff) != fadt->Facs)
230 return (fadt_revision);
234 acpi_handle_fadt(ACPI_TABLE_HEADER *sdp)
236 ACPI_TABLE_HEADER *dsdp;
237 ACPI_TABLE_FACS *facs;
238 ACPI_TABLE_FADT *fadt;
241 fadt = (ACPI_TABLE_FADT *)sdp;
242 acpi_print_fadt(sdp);
244 fadt_revision = acpi_get_fadt_revision(fadt);
245 if (fadt_revision == 1)
246 facs = (ACPI_TABLE_FACS *)acpi_map_sdt(fadt->Facs);
248 facs = (ACPI_TABLE_FACS *)acpi_map_sdt(fadt->XFacs);
249 if (memcmp(facs->Signature, ACPI_SIG_FACS, 4) != 0 || facs->Length < 64)
250 errx(1, "FACS is corrupt");
251 acpi_print_facs(facs);
253 if (fadt_revision == 1)
254 dsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(fadt->Dsdt);
256 dsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(fadt->XDsdt);
257 if (acpi_checksum(dsdp, dsdp->Length))
258 errx(1, "DSDT is corrupt");
259 acpi_print_dsdt(dsdp);
263 acpi_walk_subtables(ACPI_TABLE_HEADER *table, void *first,
264 void (*action)(ACPI_SUBTABLE_HEADER *))
266 ACPI_SUBTABLE_HEADER *subtable;
270 end = (char *)table + table->Length;
271 while ((char *)subtable < end) {
274 subtable = (ACPI_SUBTABLE_HEADER *)((char *)subtable +
280 acpi_print_cpu(u_char cpu_id)
283 printf("\tACPI CPU=");
287 printf("%d\n", (u_int)cpu_id);
291 acpi_print_cpu_uid(uint32_t uid, char *uid_string)
294 printf("\tUID=%d", uid);
295 if (uid_string != NULL)
296 printf(" (%s)", uid_string);
301 acpi_print_local_apic(uint32_t apic_id, uint32_t flags)
305 if (flags & ACPI_MADT_ENABLED)
310 printf("\tAPIC ID=%d\n", apic_id);
314 acpi_print_io_apic(uint32_t apic_id, uint32_t int_base, uint64_t apic_addr)
317 printf("\tAPIC ID=%d\n", apic_id);
318 printf("\tINT BASE=%d\n", int_base);
319 printf("\tADDR=0x%016jx\n", (uintmax_t)apic_addr);
323 acpi_print_mps_flags(uint16_t flags)
326 printf("\tFlags={Polarity=");
327 switch (flags & ACPI_MADT_POLARITY_MASK) {
328 case ACPI_MADT_POLARITY_CONFORMS:
329 printf("conforming");
331 case ACPI_MADT_POLARITY_ACTIVE_HIGH:
334 case ACPI_MADT_POLARITY_ACTIVE_LOW:
338 printf("0x%x", flags & ACPI_MADT_POLARITY_MASK);
341 printf(", Trigger=");
342 switch (flags & ACPI_MADT_TRIGGER_MASK) {
343 case ACPI_MADT_TRIGGER_CONFORMS:
344 printf("conforming");
346 case ACPI_MADT_TRIGGER_EDGE:
349 case ACPI_MADT_TRIGGER_LEVEL:
353 printf("0x%x", (flags & ACPI_MADT_TRIGGER_MASK) >> 2);
359 acpi_print_intr(uint32_t intr, uint16_t mps_flags)
362 printf("\tINTR=%d\n", intr);
363 acpi_print_mps_flags(mps_flags);
367 acpi_print_local_nmi(u_int lint, uint16_t mps_flags)
370 printf("\tLINT Pin=%d\n", lint);
371 acpi_print_mps_flags(mps_flags);
374 static const char *apic_types[] = { "Local APIC", "IO APIC", "INT Override",
375 "NMI", "Local APIC NMI",
376 "Local APIC Override", "IO SAPIC",
377 "Local SAPIC", "Platform Interrupt",
378 "Local X2APIC", "Local X2APIC NMI" };
379 static const char *platform_int_types[] = { "0 (unknown)", "PMI", "INIT",
380 "Corrected Platform Error" };
383 acpi_print_madt(ACPI_SUBTABLE_HEADER *mp)
385 ACPI_MADT_LOCAL_APIC *lapic;
386 ACPI_MADT_IO_APIC *ioapic;
387 ACPI_MADT_INTERRUPT_OVERRIDE *over;
388 ACPI_MADT_NMI_SOURCE *nmi;
389 ACPI_MADT_LOCAL_APIC_NMI *lapic_nmi;
390 ACPI_MADT_LOCAL_APIC_OVERRIDE *lapic_over;
391 ACPI_MADT_IO_SAPIC *iosapic;
392 ACPI_MADT_LOCAL_SAPIC *lsapic;
393 ACPI_MADT_INTERRUPT_SOURCE *isrc;
394 ACPI_MADT_LOCAL_X2APIC *x2apic;
395 ACPI_MADT_LOCAL_X2APIC_NMI *x2apic_nmi;
397 if (mp->Type < sizeof(apic_types) / sizeof(apic_types[0]))
398 printf("\tType=%s\n", apic_types[mp->Type]);
400 printf("\tType=%d (unknown)\n", mp->Type);
402 case ACPI_MADT_TYPE_LOCAL_APIC:
403 lapic = (ACPI_MADT_LOCAL_APIC *)mp;
404 acpi_print_cpu(lapic->ProcessorId);
405 acpi_print_local_apic(lapic->Id, lapic->LapicFlags);
407 case ACPI_MADT_TYPE_IO_APIC:
408 ioapic = (ACPI_MADT_IO_APIC *)mp;
409 acpi_print_io_apic(ioapic->Id, ioapic->GlobalIrqBase,
412 case ACPI_MADT_TYPE_INTERRUPT_OVERRIDE:
413 over = (ACPI_MADT_INTERRUPT_OVERRIDE *)mp;
414 printf("\tBUS=%d\n", (u_int)over->Bus);
415 printf("\tIRQ=%d\n", (u_int)over->SourceIrq);
416 acpi_print_intr(over->GlobalIrq, over->IntiFlags);
418 case ACPI_MADT_TYPE_NMI_SOURCE:
419 nmi = (ACPI_MADT_NMI_SOURCE *)mp;
420 acpi_print_intr(nmi->GlobalIrq, nmi->IntiFlags);
422 case ACPI_MADT_TYPE_LOCAL_APIC_NMI:
423 lapic_nmi = (ACPI_MADT_LOCAL_APIC_NMI *)mp;
424 acpi_print_cpu(lapic_nmi->ProcessorId);
425 acpi_print_local_nmi(lapic_nmi->Lint, lapic_nmi->IntiFlags);
427 case ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE:
428 lapic_over = (ACPI_MADT_LOCAL_APIC_OVERRIDE *)mp;
429 printf("\tLocal APIC ADDR=0x%016jx\n",
430 (uintmax_t)lapic_over->Address);
432 case ACPI_MADT_TYPE_IO_SAPIC:
433 iosapic = (ACPI_MADT_IO_SAPIC *)mp;
434 acpi_print_io_apic(iosapic->Id, iosapic->GlobalIrqBase,
437 case ACPI_MADT_TYPE_LOCAL_SAPIC:
438 lsapic = (ACPI_MADT_LOCAL_SAPIC *)mp;
439 acpi_print_cpu(lsapic->ProcessorId);
440 acpi_print_local_apic(lsapic->Id, lsapic->LapicFlags);
441 printf("\tAPIC EID=%d\n", (u_int)lsapic->Eid);
442 if (mp->Length > __offsetof(ACPI_MADT_LOCAL_SAPIC, Uid))
443 acpi_print_cpu_uid(lsapic->Uid, lsapic->UidString);
445 case ACPI_MADT_TYPE_INTERRUPT_SOURCE:
446 isrc = (ACPI_MADT_INTERRUPT_SOURCE *)mp;
447 if (isrc->Type < sizeof(platform_int_types) /
448 sizeof(platform_int_types[0]))
449 printf("\tType=%s\n", platform_int_types[isrc->Type]);
451 printf("\tType=%d (unknown)\n", isrc->Type);
452 printf("\tAPIC ID=%d\n", (u_int)isrc->Id);
453 printf("\tAPIC EID=%d\n", (u_int)isrc->Eid);
454 printf("\tSAPIC Vector=%d\n", (u_int)isrc->IoSapicVector);
455 acpi_print_intr(isrc->GlobalIrq, isrc->IntiFlags);
457 case ACPI_MADT_TYPE_LOCAL_X2APIC:
458 x2apic = (ACPI_MADT_LOCAL_X2APIC *)mp;
459 acpi_print_cpu_uid(x2apic->Uid, NULL);
460 acpi_print_local_apic(x2apic->LocalApicId, x2apic->LapicFlags);
462 case ACPI_MADT_TYPE_LOCAL_X2APIC_NMI:
463 x2apic_nmi = (ACPI_MADT_LOCAL_X2APIC_NMI *)mp;
464 acpi_print_cpu_uid(x2apic_nmi->Uid, NULL);
465 acpi_print_local_nmi(x2apic_nmi->Lint, x2apic_nmi->IntiFlags);
471 acpi_handle_madt(ACPI_TABLE_HEADER *sdp)
473 ACPI_TABLE_MADT *madt;
475 printf(BEGIN_COMMENT);
477 madt = (ACPI_TABLE_MADT *)sdp;
478 printf("\tLocal APIC ADDR=0x%08x\n", madt->Address);
480 if (madt->Flags & ACPI_MADT_PCAT_COMPAT)
483 acpi_walk_subtables(sdp, (madt + 1), acpi_print_madt);
488 acpi_handle_hpet(ACPI_TABLE_HEADER *sdp)
490 ACPI_TABLE_HPET *hpet;
492 printf(BEGIN_COMMENT);
494 hpet = (ACPI_TABLE_HPET *)sdp;
495 printf("\tHPET Number=%d\n", hpet->Sequence);
497 acpi_print_gas(&hpet->Address);
498 printf("\tHW Rev=0x%x\n", hpet->Id & ACPI_HPET_ID_HARDWARE_REV_ID);
499 printf("\tComparators=%d\n", (hpet->Id & ACPI_HPET_ID_COMPARATORS) >>
501 printf("\tCounter Size=%d\n", hpet->Id & ACPI_HPET_ID_COUNT_SIZE_CAP ?
503 printf("\tLegacy IRQ routing capable={");
504 if (hpet->Id & ACPI_HPET_ID_LEGACY_CAPABLE)
508 printf("\tPCI Vendor ID=0x%04x\n", hpet->Id >> 16);
509 printf("\tMinimal Tick=%d\n", hpet->MinimumTick);
514 acpi_handle_ecdt(ACPI_TABLE_HEADER *sdp)
516 ACPI_TABLE_ECDT *ecdt;
518 printf(BEGIN_COMMENT);
520 ecdt = (ACPI_TABLE_ECDT *)sdp;
521 printf("\tEC_CONTROL=");
522 acpi_print_gas(&ecdt->Control);
523 printf("\n\tEC_DATA=");
524 acpi_print_gas(&ecdt->Data);
525 printf("\n\tUID=%#x, ", ecdt->Uid);
526 printf("GPE_BIT=%#x\n", ecdt->Gpe);
527 printf("\tEC_ID=%s\n", ecdt->Id);
532 acpi_handle_mcfg(ACPI_TABLE_HEADER *sdp)
534 ACPI_TABLE_MCFG *mcfg;
535 ACPI_MCFG_ALLOCATION *alloc;
538 printf(BEGIN_COMMENT);
540 mcfg = (ACPI_TABLE_MCFG *)sdp;
541 entries = (sdp->Length - sizeof(ACPI_TABLE_MCFG)) /
542 sizeof(ACPI_MCFG_ALLOCATION);
543 alloc = (ACPI_MCFG_ALLOCATION *)(mcfg + 1);
544 for (i = 0; i < entries; i++, alloc++) {
546 printf("\tBase Address=0x%016jx\n", (uintmax_t)alloc->Address);
547 printf("\tSegment Group=0x%04x\n", alloc->PciSegment);
548 printf("\tStart Bus=%d\n", alloc->StartBusNumber);
549 printf("\tEnd Bus=%d\n", alloc->EndBusNumber);
555 acpi_handle_slit(ACPI_TABLE_HEADER *sdp)
557 ACPI_TABLE_SLIT *slit;
560 printf(BEGIN_COMMENT);
562 slit = (ACPI_TABLE_SLIT *)sdp;
563 printf("\tLocality Count=%ju\n", (uintmax_t)slit->LocalityCount);
565 for (i = 0; i < slit->LocalityCount; i++)
566 printf(" %3ju", (uintmax_t)i);
568 for (i = 0; i < slit->LocalityCount; i++)
571 for (i = 0; i < slit->LocalityCount; i++) {
572 printf("\t %3ju |", (uintmax_t)i);
573 for (j = 0; j < slit->LocalityCount; j++)
575 slit->Entry[i * slit->LocalityCount + j]);
582 acpi_print_srat_cpu(uint32_t apic_id, uint32_t proximity_domain,
587 if (flags & ACPI_SRAT_CPU_ENABLED)
592 printf("\tAPIC ID=%d\n", apic_id);
593 printf("\tProximity Domain=%d\n", proximity_domain);
597 acpi_tcpa_evname(struct TCPAevent *event)
599 struct TCPApc_event *pc_event;
600 char *eventname = NULL;
602 pc_event = (struct TCPApc_event *)(event + 1);
604 switch(event->event_type) {
613 case PLATFORM_CONFIG_FLAGS:
614 case TABLE_OF_DEVICES:
617 case IPL_PARTITION_DATA:
621 asprintf(&eventname, "%s",
622 tcpa_event_type_strings[event->event_type]);
626 eventname = calloc(event->event_size + 1, sizeof(char));
627 memcpy(eventname, pc_event, event->event_size);
631 switch (pc_event->event_id) {
636 case OPTION_ROM_EXEC:
637 case OPTION_ROM_CONFIG:
641 case OPTION_ROM_MICROCODE:
642 case S_CRTM_CONTENTS:
644 asprintf(&eventname, "%s",
645 TCPA_pcclient_strings[pc_event->event_id]);
649 asprintf(&eventname, "<unknown tag 0x%02x>",
656 asprintf(&eventname, "<unknown 0x%02x>", event->event_type);
664 acpi_print_tcpa(struct TCPAevent *event)
669 eventname = acpi_tcpa_evname(event);
671 printf("\t%d", event->pcr_index);
673 for (i = 0; i < 20; i++)
674 printf("%02x", event->pcr_value[i]);
675 printf(" [%s]\n", eventname ? eventname : "<unknown>");
681 acpi_handle_tcpa(ACPI_TABLE_HEADER *sdp)
683 struct TCPAbody *tcpa;
684 struct TCPAevent *event;
685 uintmax_t len, paddr;
686 unsigned char *vaddr = NULL;
687 unsigned char *vend = NULL;
689 printf(BEGIN_COMMENT);
691 tcpa = (struct TCPAbody *) sdp;
693 switch (tcpa->platform_class) {
694 case ACPI_TCPA_BIOS_CLIENT:
695 len = tcpa->client.log_max_len;
696 paddr = tcpa->client.log_start_addr;
699 case ACPI_TCPA_BIOS_SERVER:
700 len = tcpa->server.log_max_len;
701 paddr = tcpa->server.log_start_addr;
709 printf("\tClass %u Base Address 0x%jx Length %ju\n\n",
710 tcpa->platform_class, paddr, len);
713 printf("\tEmpty TCPA table\n");
717 if(sdp->Revision == 1){
718 printf("\tOLD TCPA spec log found. Dumping not supported.\n");
723 vaddr = (unsigned char *)acpi_map_physical(paddr, len);
726 while (vaddr != NULL) {
727 if ((vaddr + sizeof(struct TCPAevent) >= vend)||
728 (vaddr + sizeof(struct TCPAevent) < vaddr))
730 event = (struct TCPAevent *)(void *)vaddr;
731 if (vaddr + event->event_size >= vend)
733 if (vaddr + event->event_size < vaddr)
735 if (event->event_type == 0 && event->event_size == 0)
739 unsigned int i, j, k;
741 printf("\n\tsize %d\n\t\t%p ", event->event_size, vaddr);
742 for (j = 0, i = 0; i <
743 sizeof(struct TCPAevent) + event->event_size; i++) {
744 printf("%02x ", vaddr[i]);
745 if ((i+1) % 8 == 0) {
746 for (k = 0; k < 8; k++)
747 printf("%c", isprint(vaddr[j+k]) ?
749 printf("\n\t\t%p ", &vaddr[i + 1]);
755 acpi_print_tcpa(event);
757 vaddr += sizeof(struct TCPAevent) + event->event_size;
764 devscope_type2str(int type)
766 static char typebuf[16];
770 return ("PCI Endpoint Device");
772 return ("PCI Sub-Hierarchy");
778 snprintf(typebuf, sizeof(typebuf), "%d", type);
784 acpi_handle_dmar_devscope(void *addr, int remaining)
788 ACPI_DMAR_PCI_PATH *path, *pathend;
789 ACPI_DMAR_DEVICE_SCOPE *devscope = addr;
791 if (remaining < (int)sizeof(ACPI_DMAR_DEVICE_SCOPE))
794 if (remaining < devscope->Length)
798 printf("\t\tType=%s\n", devscope_type2str(devscope->EntryType));
799 printf("\t\tLength=%d\n", devscope->Length);
800 printf("\t\tEnumerationId=%d\n", devscope->EnumerationId);
801 printf("\t\tStartBusNumber=%d\n", devscope->Bus);
803 path = (ACPI_DMAR_PCI_PATH *)(devscope + 1);
804 pathlen = devscope->Length - sizeof(ACPI_DMAR_DEVICE_SCOPE);
805 pathend = path + pathlen / sizeof(ACPI_DMAR_PCI_PATH);
806 if (path < pathend) {
810 printf("%c%d:%d", sep, path->Device, path->Function);
813 } while (path < pathend);
817 return (devscope->Length);
821 acpi_handle_dmar_drhd(ACPI_DMAR_HARDWARE_UNIT *drhd)
824 int remaining, consumed;
827 printf("\tType=DRHD\n");
828 printf("\tLength=%d\n", drhd->Header.Length);
830 #define PRINTFLAG(var, flag) printflag((var), ACPI_DMAR_## flag, #flag)
833 PRINTFLAG(drhd->Flags, INCLUDE_ALL);
838 printf("\tSegment=%d\n", drhd->Segment);
839 printf("\tAddress=0x%016jx\n", (uintmax_t)drhd->Address);
841 remaining = drhd->Header.Length - sizeof(ACPI_DMAR_HARDWARE_UNIT);
843 printf("\tDevice Scope:");
844 while (remaining > 0) {
845 cp = (char *)drhd + drhd->Header.Length - remaining;
846 consumed = acpi_handle_dmar_devscope(cp, remaining);
850 remaining -= consumed;
855 acpi_handle_dmar_rmrr(ACPI_DMAR_RESERVED_MEMORY *rmrr)
858 int remaining, consumed;
861 printf("\tType=RMRR\n");
862 printf("\tLength=%d\n", rmrr->Header.Length);
863 printf("\tSegment=%d\n", rmrr->Segment);
864 printf("\tBaseAddress=0x%016jx\n", (uintmax_t)rmrr->BaseAddress);
865 printf("\tLimitAddress=0x%016jx\n", (uintmax_t)rmrr->EndAddress);
867 remaining = rmrr->Header.Length - sizeof(ACPI_DMAR_RESERVED_MEMORY);
869 printf("\tDevice Scope:");
870 while (remaining > 0) {
871 cp = (char *)rmrr + rmrr->Header.Length - remaining;
872 consumed = acpi_handle_dmar_devscope(cp, remaining);
876 remaining -= consumed;
881 acpi_handle_dmar_atsr(ACPI_DMAR_ATSR *atsr)
884 int remaining, consumed;
887 printf("\tType=ATSR\n");
888 printf("\tLength=%d\n", atsr->Header.Length);
890 #define PRINTFLAG(var, flag) printflag((var), ACPI_DMAR_## flag, #flag)
893 PRINTFLAG(atsr->Flags, ALL_PORTS);
898 printf("\tSegment=%d\n", atsr->Segment);
900 remaining = atsr->Header.Length - sizeof(ACPI_DMAR_ATSR);
902 printf("\tDevice Scope:");
903 while (remaining > 0) {
904 cp = (char *)atsr + atsr->Header.Length - remaining;
905 consumed = acpi_handle_dmar_devscope(cp, remaining);
909 remaining -= consumed;
914 acpi_handle_dmar_rhsa(ACPI_DMAR_RHSA *rhsa)
918 printf("\tType=RHSA\n");
919 printf("\tLength=%d\n", rhsa->Header.Length);
920 printf("\tBaseAddress=0x%016jx\n", (uintmax_t)rhsa->BaseAddress);
921 printf("\tProximityDomain=0x%08x\n", rhsa->ProximityDomain);
925 acpi_handle_dmar_remapping_structure(void *addr, int remaining)
927 ACPI_DMAR_HEADER *hdr = addr;
929 if (remaining < (int)sizeof(ACPI_DMAR_HEADER))
932 if (remaining < hdr->Length)
936 case ACPI_DMAR_TYPE_HARDWARE_UNIT:
937 acpi_handle_dmar_drhd(addr);
939 case ACPI_DMAR_TYPE_RESERVED_MEMORY:
940 acpi_handle_dmar_rmrr(addr);
942 case ACPI_DMAR_TYPE_ROOT_ATS:
943 acpi_handle_dmar_atsr(addr);
945 case ACPI_DMAR_TYPE_HARDWARE_AFFINITY:
946 acpi_handle_dmar_rhsa(addr);
950 printf("\tType=%d\n", hdr->Type);
951 printf("\tLength=%d\n", hdr->Length);
954 return (hdr->Length);
957 #ifndef ACPI_DMAR_X2APIC_OPT_OUT
958 #define ACPI_DMAR_X2APIC_OPT_OUT (0x2)
962 acpi_handle_dmar(ACPI_TABLE_HEADER *sdp)
965 int remaining, consumed;
966 ACPI_TABLE_DMAR *dmar;
968 printf(BEGIN_COMMENT);
970 dmar = (ACPI_TABLE_DMAR *)sdp;
971 printf("\tHost Address Width=%d\n", dmar->Width + 1);
973 #define PRINTFLAG(var, flag) printflag((var), ACPI_DMAR_## flag, #flag)
976 PRINTFLAG(dmar->Flags, INTR_REMAP);
977 PRINTFLAG(dmar->Flags, X2APIC_OPT_OUT);
982 remaining = sdp->Length - sizeof(ACPI_TABLE_DMAR);
983 while (remaining > 0) {
984 cp = (char *)sdp + sdp->Length - remaining;
985 consumed = acpi_handle_dmar_remapping_structure(cp, remaining);
989 remaining -= consumed;
996 acpi_print_srat_memory(ACPI_SRAT_MEM_AFFINITY *mp)
1000 if (mp->Flags & ACPI_SRAT_MEM_ENABLED)
1004 if (mp->Flags & ACPI_SRAT_MEM_HOT_PLUGGABLE)
1005 printf(",HOT_PLUGGABLE");
1006 if (mp->Flags & ACPI_SRAT_MEM_NON_VOLATILE)
1007 printf(",NON_VOLATILE");
1009 printf("\tBase Address=0x%016jx\n", (uintmax_t)mp->BaseAddress);
1010 printf("\tLength=0x%016jx\n", (uintmax_t)mp->Length);
1011 printf("\tProximity Domain=%d\n", mp->ProximityDomain);
1014 static const char *srat_types[] = { "CPU", "Memory", "X2APIC" };
1017 acpi_print_srat(ACPI_SUBTABLE_HEADER *srat)
1019 ACPI_SRAT_CPU_AFFINITY *cpu;
1020 ACPI_SRAT_X2APIC_CPU_AFFINITY *x2apic;
1022 if (srat->Type < sizeof(srat_types) / sizeof(srat_types[0]))
1023 printf("\tType=%s\n", srat_types[srat->Type]);
1025 printf("\tType=%d (unknown)\n", srat->Type);
1026 switch (srat->Type) {
1027 case ACPI_SRAT_TYPE_CPU_AFFINITY:
1028 cpu = (ACPI_SRAT_CPU_AFFINITY *)srat;
1029 acpi_print_srat_cpu(cpu->ApicId,
1030 cpu->ProximityDomainHi[2] << 24 |
1031 cpu->ProximityDomainHi[1] << 16 |
1032 cpu->ProximityDomainHi[0] << 0 |
1033 cpu->ProximityDomainLo, cpu->Flags);
1035 case ACPI_SRAT_TYPE_MEMORY_AFFINITY:
1036 acpi_print_srat_memory((ACPI_SRAT_MEM_AFFINITY *)srat);
1038 case ACPI_SRAT_TYPE_X2APIC_CPU_AFFINITY:
1039 x2apic = (ACPI_SRAT_X2APIC_CPU_AFFINITY *)srat;
1040 acpi_print_srat_cpu(x2apic->ApicId, x2apic->ProximityDomain,
1047 acpi_handle_srat(ACPI_TABLE_HEADER *sdp)
1049 ACPI_TABLE_SRAT *srat;
1051 printf(BEGIN_COMMENT);
1052 acpi_print_sdt(sdp);
1053 srat = (ACPI_TABLE_SRAT *)sdp;
1054 printf("\tTable Revision=%d\n", srat->TableRevision);
1055 acpi_walk_subtables(sdp, (srat + 1), acpi_print_srat);
1056 printf(END_COMMENT);
1060 acpi_print_sdt(ACPI_TABLE_HEADER *sdp)
1063 acpi_print_string(sdp->Signature, ACPI_NAME_SIZE);
1064 printf(": Length=%d, Revision=%d, Checksum=%d,\n",
1065 sdp->Length, sdp->Revision, sdp->Checksum);
1067 acpi_print_string(sdp->OemId, ACPI_OEM_ID_SIZE);
1068 printf(", OEM Table ID=");
1069 acpi_print_string(sdp->OemTableId, ACPI_OEM_TABLE_ID_SIZE);
1070 printf(", OEM Revision=0x%x,\n", sdp->OemRevision);
1071 printf("\tCreator ID=");
1072 acpi_print_string(sdp->AslCompilerId, ACPI_NAME_SIZE);
1073 printf(", Creator Revision=0x%x\n", sdp->AslCompilerRevision);
1077 acpi_print_rsdt(ACPI_TABLE_HEADER *rsdp)
1079 ACPI_TABLE_RSDT *rsdt;
1080 ACPI_TABLE_XSDT *xsdt;
1083 rsdt = (ACPI_TABLE_RSDT *)rsdp;
1084 xsdt = (ACPI_TABLE_XSDT *)rsdp;
1085 printf(BEGIN_COMMENT);
1086 acpi_print_sdt(rsdp);
1087 entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
1088 printf("\tEntries={ ");
1089 for (i = 0; i < entries; i++) {
1093 printf("0x%08x", le32toh(rsdt->TableOffsetEntry[i]));
1096 (uintmax_t)le64toh(xsdt->TableOffsetEntry[i]));
1099 printf(END_COMMENT);
1102 static const char *acpi_pm_profiles[] = {
1103 "Unspecified", "Desktop", "Mobile", "Workstation",
1104 "Enterprise Server", "SOHO Server", "Appliance PC"
1108 acpi_print_fadt(ACPI_TABLE_HEADER *sdp)
1110 ACPI_TABLE_FADT *fadt;
1113 fadt = (ACPI_TABLE_FADT *)sdp;
1114 printf(BEGIN_COMMENT);
1115 acpi_print_sdt(sdp);
1116 printf(" \tFACS=0x%x, DSDT=0x%x\n", fadt->Facs,
1118 printf("\tINT_MODEL=%s\n", fadt->Model ? "APIC" : "PIC");
1119 if (fadt->PreferredProfile >= sizeof(acpi_pm_profiles) / sizeof(char *))
1122 pm = acpi_pm_profiles[fadt->PreferredProfile];
1123 printf("\tPreferred_PM_Profile=%s (%d)\n", pm, fadt->PreferredProfile);
1124 printf("\tSCI_INT=%d\n", fadt->SciInterrupt);
1125 printf("\tSMI_CMD=0x%x, ", fadt->SmiCommand);
1126 printf("ACPI_ENABLE=0x%x, ", fadt->AcpiEnable);
1127 printf("ACPI_DISABLE=0x%x, ", fadt->AcpiDisable);
1128 printf("S4BIOS_REQ=0x%x\n", fadt->S4BiosRequest);
1129 printf("\tPSTATE_CNT=0x%x\n", fadt->PstateControl);
1130 printf("\tPM1a_EVT_BLK=0x%x-0x%x\n",
1131 fadt->Pm1aEventBlock,
1132 fadt->Pm1aEventBlock + fadt->Pm1EventLength - 1);
1133 if (fadt->Pm1bEventBlock != 0)
1134 printf("\tPM1b_EVT_BLK=0x%x-0x%x\n",
1135 fadt->Pm1bEventBlock,
1136 fadt->Pm1bEventBlock + fadt->Pm1EventLength - 1);
1137 printf("\tPM1a_CNT_BLK=0x%x-0x%x\n",
1138 fadt->Pm1aControlBlock,
1139 fadt->Pm1aControlBlock + fadt->Pm1ControlLength - 1);
1140 if (fadt->Pm1bControlBlock != 0)
1141 printf("\tPM1b_CNT_BLK=0x%x-0x%x\n",
1142 fadt->Pm1bControlBlock,
1143 fadt->Pm1bControlBlock + fadt->Pm1ControlLength - 1);
1144 if (fadt->Pm2ControlBlock != 0)
1145 printf("\tPM2_CNT_BLK=0x%x-0x%x\n",
1146 fadt->Pm2ControlBlock,
1147 fadt->Pm2ControlBlock + fadt->Pm2ControlLength - 1);
1148 printf("\tPM_TMR_BLK=0x%x-0x%x\n",
1150 fadt->PmTimerBlock + fadt->PmTimerLength - 1);
1151 if (fadt->Gpe0Block != 0)
1152 printf("\tGPE0_BLK=0x%x-0x%x\n",
1154 fadt->Gpe0Block + fadt->Gpe0BlockLength - 1);
1155 if (fadt->Gpe1Block != 0)
1156 printf("\tGPE1_BLK=0x%x-0x%x, GPE1_BASE=%d\n",
1158 fadt->Gpe1Block + fadt->Gpe1BlockLength - 1,
1160 if (fadt->CstControl != 0)
1161 printf("\tCST_CNT=0x%x\n", fadt->CstControl);
1162 printf("\tP_LVL2_LAT=%d us, P_LVL3_LAT=%d us\n",
1163 fadt->C2Latency, fadt->C3Latency);
1164 printf("\tFLUSH_SIZE=%d, FLUSH_STRIDE=%d\n",
1165 fadt->FlushSize, fadt->FlushStride);
1166 printf("\tDUTY_OFFSET=%d, DUTY_WIDTH=%d\n",
1167 fadt->DutyOffset, fadt->DutyWidth);
1168 printf("\tDAY_ALRM=%d, MON_ALRM=%d, CENTURY=%d\n",
1169 fadt->DayAlarm, fadt->MonthAlarm, fadt->Century);
1171 #define PRINTFLAG(var, flag) printflag((var), ACPI_FADT_## flag, #flag)
1173 printf("\tIAPC_BOOT_ARCH=");
1174 PRINTFLAG(fadt->BootFlags, LEGACY_DEVICES);
1175 PRINTFLAG(fadt->BootFlags, 8042);
1176 PRINTFLAG(fadt->BootFlags, NO_VGA);
1177 PRINTFLAG(fadt->BootFlags, NO_MSI);
1178 PRINTFLAG(fadt->BootFlags, NO_ASPM);
1182 PRINTFLAG(fadt->Flags, WBINVD);
1183 PRINTFLAG(fadt->Flags, WBINVD_FLUSH);
1184 PRINTFLAG(fadt->Flags, C1_SUPPORTED);
1185 PRINTFLAG(fadt->Flags, C2_MP_SUPPORTED);
1186 PRINTFLAG(fadt->Flags, POWER_BUTTON);
1187 PRINTFLAG(fadt->Flags, SLEEP_BUTTON);
1188 PRINTFLAG(fadt->Flags, FIXED_RTC);
1189 PRINTFLAG(fadt->Flags, S4_RTC_WAKE);
1190 PRINTFLAG(fadt->Flags, 32BIT_TIMER);
1191 PRINTFLAG(fadt->Flags, DOCKING_SUPPORTED);
1192 PRINTFLAG(fadt->Flags, RESET_REGISTER);
1193 PRINTFLAG(fadt->Flags, SEALED_CASE);
1194 PRINTFLAG(fadt->Flags, HEADLESS);
1195 PRINTFLAG(fadt->Flags, SLEEP_TYPE);
1196 PRINTFLAG(fadt->Flags, PCI_EXPRESS_WAKE);
1197 PRINTFLAG(fadt->Flags, PLATFORM_CLOCK);
1198 PRINTFLAG(fadt->Flags, S4_RTC_VALID);
1199 PRINTFLAG(fadt->Flags, REMOTE_POWER_ON);
1200 PRINTFLAG(fadt->Flags, APIC_CLUSTER);
1201 PRINTFLAG(fadt->Flags, APIC_PHYSICAL);
1206 if (fadt->Flags & ACPI_FADT_RESET_REGISTER) {
1207 printf("\tRESET_REG=");
1208 acpi_print_gas(&fadt->ResetRegister);
1209 printf(", RESET_VALUE=%#x\n", fadt->ResetValue);
1211 if (acpi_get_fadt_revision(fadt) > 1) {
1212 printf("\tX_FACS=0x%016jx, ", (uintmax_t)fadt->XFacs);
1213 printf("X_DSDT=0x%016jx\n", (uintmax_t)fadt->XDsdt);
1214 printf("\tX_PM1a_EVT_BLK=");
1215 acpi_print_gas(&fadt->XPm1aEventBlock);
1216 if (fadt->XPm1bEventBlock.Address != 0) {
1217 printf("\n\tX_PM1b_EVT_BLK=");
1218 acpi_print_gas(&fadt->XPm1bEventBlock);
1220 printf("\n\tX_PM1a_CNT_BLK=");
1221 acpi_print_gas(&fadt->XPm1aControlBlock);
1222 if (fadt->XPm1bControlBlock.Address != 0) {
1223 printf("\n\tX_PM1b_CNT_BLK=");
1224 acpi_print_gas(&fadt->XPm1bControlBlock);
1226 if (fadt->XPm2ControlBlock.Address != 0) {
1227 printf("\n\tX_PM2_CNT_BLK=");
1228 acpi_print_gas(&fadt->XPm2ControlBlock);
1230 printf("\n\tX_PM_TMR_BLK=");
1231 acpi_print_gas(&fadt->XPmTimerBlock);
1232 if (fadt->XGpe0Block.Address != 0) {
1233 printf("\n\tX_GPE0_BLK=");
1234 acpi_print_gas(&fadt->XGpe0Block);
1236 if (fadt->XGpe1Block.Address != 0) {
1237 printf("\n\tX_GPE1_BLK=");
1238 acpi_print_gas(&fadt->XGpe1Block);
1243 printf(END_COMMENT);
1247 acpi_print_facs(ACPI_TABLE_FACS *facs)
1249 printf(BEGIN_COMMENT);
1250 printf(" FACS:\tLength=%u, ", facs->Length);
1251 printf("HwSig=0x%08x, ", facs->HardwareSignature);
1252 printf("Firm_Wake_Vec=0x%08x\n", facs->FirmwareWakingVector);
1254 printf("\tGlobal_Lock=");
1255 if (facs->GlobalLock != 0) {
1256 if (facs->GlobalLock & ACPI_GLOCK_PENDING)
1258 if (facs->GlobalLock & ACPI_GLOCK_OWNED)
1264 if (facs->Flags & ACPI_FACS_S4_BIOS_PRESENT)
1268 if (facs->XFirmwareWakingVector != 0)
1269 printf("\tX_Firm_Wake_Vec=%016jx\n",
1270 (uintmax_t)facs->XFirmwareWakingVector);
1271 printf("\tVersion=%u\n", facs->Version);
1273 printf(END_COMMENT);
1277 acpi_print_dsdt(ACPI_TABLE_HEADER *dsdp)
1279 printf(BEGIN_COMMENT);
1280 acpi_print_sdt(dsdp);
1281 printf(END_COMMENT);
1285 acpi_checksum(void *p, size_t length)
1298 static ACPI_TABLE_HEADER *
1299 acpi_map_sdt(vm_offset_t pa)
1301 ACPI_TABLE_HEADER *sp;
1303 sp = acpi_map_physical(pa, sizeof(ACPI_TABLE_HEADER));
1304 sp = acpi_map_physical(pa, sp->Length);
1309 acpi_print_rsd_ptr(ACPI_TABLE_RSDP *rp)
1311 printf(BEGIN_COMMENT);
1312 printf(" RSD PTR: OEM=");
1313 acpi_print_string(rp->OemId, ACPI_OEM_ID_SIZE);
1314 printf(", ACPI_Rev=%s (%d)\n", rp->Revision < 2 ? "1.0x" : "2.0x",
1316 if (rp->Revision < 2) {
1317 printf("\tRSDT=0x%08x, cksum=%u\n", rp->RsdtPhysicalAddress,
1320 printf("\tXSDT=0x%016jx, length=%u, cksum=%u\n",
1321 (uintmax_t)rp->XsdtPhysicalAddress, rp->Length,
1322 rp->ExtendedChecksum);
1324 printf(END_COMMENT);
1328 acpi_handle_rsdt(ACPI_TABLE_HEADER *rsdp)
1330 ACPI_TABLE_HEADER *sdp;
1331 ACPI_TABLE_RSDT *rsdt;
1332 ACPI_TABLE_XSDT *xsdt;
1336 acpi_print_rsdt(rsdp);
1337 rsdt = (ACPI_TABLE_RSDT *)rsdp;
1338 xsdt = (ACPI_TABLE_XSDT *)rsdp;
1339 entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
1340 for (i = 0; i < entries; i++) {
1342 addr = le32toh(rsdt->TableOffsetEntry[i]);
1344 addr = le64toh(xsdt->TableOffsetEntry[i]);
1347 sdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(addr);
1348 if (acpi_checksum(sdp, sdp->Length)) {
1349 warnx("RSDT entry %d (sig %.4s) is corrupt", i,
1353 if (!memcmp(sdp->Signature, ACPI_SIG_FADT, 4))
1354 acpi_handle_fadt(sdp);
1355 else if (!memcmp(sdp->Signature, ACPI_SIG_MADT, 4))
1356 acpi_handle_madt(sdp);
1357 else if (!memcmp(sdp->Signature, ACPI_SIG_HPET, 4))
1358 acpi_handle_hpet(sdp);
1359 else if (!memcmp(sdp->Signature, ACPI_SIG_ECDT, 4))
1360 acpi_handle_ecdt(sdp);
1361 else if (!memcmp(sdp->Signature, ACPI_SIG_MCFG, 4))
1362 acpi_handle_mcfg(sdp);
1363 else if (!memcmp(sdp->Signature, ACPI_SIG_SLIT, 4))
1364 acpi_handle_slit(sdp);
1365 else if (!memcmp(sdp->Signature, ACPI_SIG_SRAT, 4))
1366 acpi_handle_srat(sdp);
1367 else if (!memcmp(sdp->Signature, ACPI_SIG_TCPA, 4))
1368 acpi_handle_tcpa(sdp);
1369 else if (!memcmp(sdp->Signature, ACPI_SIG_DMAR, 4))
1370 acpi_handle_dmar(sdp);
1372 printf(BEGIN_COMMENT);
1373 acpi_print_sdt(sdp);
1374 printf(END_COMMENT);
1380 sdt_load_devmem(void)
1382 ACPI_TABLE_RSDP *rp;
1383 ACPI_TABLE_HEADER *rsdp;
1385 rp = acpi_find_rsd_ptr();
1387 errx(1, "Can't find ACPI information");
1390 acpi_print_rsd_ptr(rp);
1391 if (rp->Revision < 2) {
1392 rsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(rp->RsdtPhysicalAddress);
1393 if (memcmp(rsdp->Signature, "RSDT", 4) != 0 ||
1394 acpi_checksum(rsdp, rsdp->Length) != 0)
1395 errx(1, "RSDT is corrupted");
1396 addr_size = sizeof(uint32_t);
1398 rsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(rp->XsdtPhysicalAddress);
1399 if (memcmp(rsdp->Signature, "XSDT", 4) != 0 ||
1400 acpi_checksum(rsdp, rsdp->Length) != 0)
1401 errx(1, "XSDT is corrupted");
1402 addr_size = sizeof(uint64_t);
1407 /* Write the DSDT to a file, concatenating any SSDTs (if present). */
1409 write_dsdt(int fd, ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdt)
1411 ACPI_TABLE_HEADER sdt;
1412 ACPI_TABLE_HEADER *ssdt;
1415 /* Create a new checksum to account for the DSDT and any SSDTs. */
1419 sum = acpi_checksum(dsdt + 1, dsdt->Length -
1420 sizeof(ACPI_TABLE_HEADER));
1421 ssdt = sdt_from_rsdt(rsdt, ACPI_SIG_SSDT, NULL);
1422 while (ssdt != NULL) {
1423 sdt.Length += ssdt->Length - sizeof(ACPI_TABLE_HEADER);
1424 sum += acpi_checksum(ssdt + 1,
1425 ssdt->Length - sizeof(ACPI_TABLE_HEADER));
1426 ssdt = sdt_from_rsdt(rsdt, ACPI_SIG_SSDT, ssdt);
1428 sum += acpi_checksum(&sdt, sizeof(ACPI_TABLE_HEADER));
1429 sdt.Checksum -= sum;
1432 /* Write out the DSDT header and body. */
1433 write(fd, &sdt, sizeof(ACPI_TABLE_HEADER));
1434 write(fd, dsdt + 1, dsdt->Length - sizeof(ACPI_TABLE_HEADER));
1436 /* Write out any SSDTs (if present.) */
1438 ssdt = sdt_from_rsdt(rsdt, "SSDT", NULL);
1439 while (ssdt != NULL) {
1440 write(fd, ssdt + 1, ssdt->Length -
1441 sizeof(ACPI_TABLE_HEADER));
1442 ssdt = sdt_from_rsdt(rsdt, "SSDT", ssdt);
1449 dsdt_save_file(char *outfile, ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdp)
1454 assert(outfile != NULL);
1455 mode = S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH;
1456 fd = open(outfile, O_WRONLY | O_CREAT | O_TRUNC, mode);
1458 perror("dsdt_save_file");
1461 write_dsdt(fd, rsdt, dsdp);
1466 aml_disassemble(ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdp)
1468 char buf[PATH_MAX], tmpstr[PATH_MAX], wrkdir[PATH_MAX];
1469 const char *iname = "/acpdump.din";
1470 const char *oname = "/acpdump.dsl";
1477 tmpdir = getenv("TMPDIR");
1480 if (realpath(tmpdir, buf) == NULL) {
1481 perror("realpath tmp dir");
1484 len = sizeof(wrkdir) - strlen(iname);
1485 if ((size_t)snprintf(wrkdir, len, "%s/acpidump.XXXXXX", buf) > len-1 ) {
1486 fprintf(stderr, "$TMPDIR too long\n");
1489 if (mkdtemp(wrkdir) == NULL) {
1490 perror("mkdtemp tmp working dir");
1493 assert((size_t)snprintf(tmpstr, sizeof(tmpstr), "%s%s", wrkdir, iname)
1494 <= sizeof(tmpstr) - 1);
1495 fd = open(tmpstr, O_CREAT | O_WRONLY, S_IRUSR | S_IWUSR);
1497 perror("iasl tmp file");
1500 write_dsdt(fd, rsdt, dsdp);
1503 /* Run iasl -d on the temp file */
1504 if ((pid = fork()) == 0) {
1505 close(STDOUT_FILENO);
1507 close(STDERR_FILENO);
1508 execl("/usr/sbin/iasl", "iasl", "-d", tmpstr, NULL);
1513 if (unlink(tmpstr) < 0) {
1522 fprintf(stderr, "iast exit status = %d\n", status);
1525 /* Dump iasl's output to stdout */
1526 assert((size_t)snprintf(tmpstr, sizeof(tmpstr), "%s%s", wrkdir, oname)
1527 <= sizeof(tmpstr) -1);
1528 fp = fopen(tmpstr, "r");
1529 if (unlink(tmpstr) < 0) {
1534 perror("iasl tmp file (read)");
1537 while ((len = fread(buf, 1, sizeof(buf), fp)) > 0)
1538 fwrite(buf, 1, len, stdout);
1542 if (rmdir(wrkdir) < 0)
1547 sdt_print_all(ACPI_TABLE_HEADER *rsdp)
1549 acpi_handle_rsdt(rsdp);
1552 /* Fetch a table matching the given signature via the RSDT. */
1554 sdt_from_rsdt(ACPI_TABLE_HEADER *rsdp, const char *sig, ACPI_TABLE_HEADER *last)
1556 ACPI_TABLE_HEADER *sdt;
1557 ACPI_TABLE_RSDT *rsdt;
1558 ACPI_TABLE_XSDT *xsdt;
1562 rsdt = (ACPI_TABLE_RSDT *)rsdp;
1563 xsdt = (ACPI_TABLE_XSDT *)rsdp;
1564 entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
1565 for (i = 0; i < entries; i++) {
1567 addr = le32toh(rsdt->TableOffsetEntry[i]);
1569 addr = le64toh(xsdt->TableOffsetEntry[i]);
1572 sdt = (ACPI_TABLE_HEADER *)acpi_map_sdt(addr);
1578 if (memcmp(sdt->Signature, sig, strlen(sig)))
1580 if (acpi_checksum(sdt, sdt->Length))
1581 errx(1, "RSDT entry %d is corrupt", i);
1589 dsdt_from_fadt(ACPI_TABLE_FADT *fadt)
1591 ACPI_TABLE_HEADER *sdt;
1593 /* Use the DSDT address if it is version 1, otherwise use XDSDT. */
1594 if (acpi_get_fadt_revision(fadt) == 1)
1595 sdt = (ACPI_TABLE_HEADER *)acpi_map_sdt(fadt->Dsdt);
1597 sdt = (ACPI_TABLE_HEADER *)acpi_map_sdt(fadt->XDsdt);
1598 if (acpi_checksum(sdt, sdt->Length))
1599 errx(1, "DSDT is corrupt\n");