1/*-
2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3 *
4 * Copyright (c) 1998 Doug Rabson
5 * Copyright (c) 2000 Mitsuru IWASAKI <iwasaki@FreeBSD.org>
6 * Copyright (c) 2020 Alexander Motin <mav@FreeBSD.org>
7 * All rights reserved.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 *    notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 *    notice, this list of conditions and the following disclaimer in the
16 *    documentation and/or other materials provided with the distribution.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 * SUCH DAMAGE.
29 *
30 *	$FreeBSD$
31 */
32
33#include <sys/param.h>
34#include <sys/endian.h>
35#include <sys/stat.h>
36#include <sys/wait.h>
37#include <assert.h>
38#include <err.h>
39#include <fcntl.h>
40#include <paths.h>
41#include <stdio.h>
42#include <stdint.h>
43#include <stdlib.h>
44#include <string.h>
45#include <unistd.h>
46#include <uuid.h>
47
48#include "acpidump.h"
49
50#define BEGIN_COMMENT	"/*\n"
51#define END_COMMENT	" */\n"
52
53static void	acpi_print_string(char *s, size_t length);
54static void	acpi_print_gas(ACPI_GENERIC_ADDRESS *gas);
55static int	acpi_get_fadt_revision(ACPI_TABLE_FADT *fadt);
56static void	acpi_handle_fadt(ACPI_TABLE_HEADER *fadt);
57static void	acpi_print_cpu(u_char cpu_id);
58static void	acpi_print_cpu_uid(uint32_t uid, char *uid_string);
59static void	acpi_print_local_apic(uint32_t apic_id, uint32_t flags);
60static void	acpi_print_io_apic(uint32_t apic_id, uint32_t int_base,
61		    uint64_t apic_addr);
62static void	acpi_print_mps_flags(uint16_t flags);
63static void	acpi_print_intr(uint32_t intr, uint16_t mps_flags);
64static void	acpi_print_local_nmi(u_int lint, uint16_t mps_flags);
65static void	acpi_print_madt(ACPI_SUBTABLE_HEADER *mp);
66static void	acpi_handle_madt(ACPI_TABLE_HEADER *sdp);
67static void	acpi_handle_ecdt(ACPI_TABLE_HEADER *sdp);
68static void	acpi_handle_hpet(ACPI_TABLE_HEADER *sdp);
69static void	acpi_handle_mcfg(ACPI_TABLE_HEADER *sdp);
70static void	acpi_handle_slit(ACPI_TABLE_HEADER *sdp);
71static void	acpi_handle_wddt(ACPI_TABLE_HEADER *sdp);
72static void	acpi_handle_lpit(ACPI_TABLE_HEADER *sdp);
73static void	acpi_print_srat_cpu(uint32_t apic_id, uint32_t proximity_domain,
74		    uint32_t flags);
75static void	acpi_print_srat_memory(ACPI_SRAT_MEM_AFFINITY *mp);
76static void	acpi_print_srat(ACPI_SUBTABLE_HEADER *srat);
77static void	acpi_handle_srat(ACPI_TABLE_HEADER *sdp);
78static void	acpi_handle_tcpa(ACPI_TABLE_HEADER *sdp);
79static void	acpi_print_nfit(ACPI_NFIT_HEADER *nfit);
80static void	acpi_handle_nfit(ACPI_TABLE_HEADER *sdp);
81static void	acpi_print_sdt(ACPI_TABLE_HEADER *sdp);
82static void	acpi_print_fadt(ACPI_TABLE_HEADER *sdp);
83static void	acpi_print_facs(ACPI_TABLE_FACS *facs);
84static void	acpi_print_dsdt(ACPI_TABLE_HEADER *dsdp);
85static ACPI_TABLE_HEADER *acpi_map_sdt(vm_offset_t pa);
86static void	acpi_print_rsd_ptr(ACPI_TABLE_RSDP *rp);
87static void	acpi_handle_rsdt(ACPI_TABLE_HEADER *rsdp);
88static void	acpi_walk_subtables(ACPI_TABLE_HEADER *table, void *first,
89		    void (*action)(ACPI_SUBTABLE_HEADER *));
90static void	acpi_walk_nfit(ACPI_TABLE_HEADER *table, void *first,
91		    void (*action)(ACPI_NFIT_HEADER *));
92
93/* Size of an address. 32-bit for ACPI 1.0, 64-bit for ACPI 2.0 and up. */
94static int addr_size;
95
96/* Strings used in the TCPA table */
97static const char *tcpa_event_type_strings[] = {
98	"PREBOOT Certificate",
99	"POST Code",
100	"Unused",
101	"No Action",
102	"Separator",
103	"Action",
104	"Event Tag",
105	"S-CRTM Contents",
106	"S-CRTM Version",
107	"CPU Microcode",
108	"Platform Config Flags",
109	"Table of Devices",
110	"Compact Hash",
111	"IPL",
112	"IPL Partition Data",
113	"Non-Host Code",
114	"Non-Host Config",
115	"Non-Host Info"
116};
117
118static const char *TCPA_pcclient_strings[] = {
119	"<undefined>",
120	"SMBIOS",
121	"BIS Certificate",
122	"POST BIOS ROM Strings",
123	"ESCD",
124	"CMOS",
125	"NVRAM",
126	"Option ROM Execute",
127	"Option ROM Configurateion",
128	"<undefined>",
129	"Option ROM Microcode Update ",
130	"S-CRTM Version String",
131	"S-CRTM Contents",
132	"POST Contents",
133	"Table of Devices",
134};
135
136#define	PRINTFLAG_END()		printflag_end()
137
138static char pf_sep = '{';
139
140static void
141printflag_end(void)
142{
143
144	if (pf_sep != '{') {
145		printf("}");
146		pf_sep = '{';
147	}
148	printf("\n");
149}
150
151static void
152printflag(uint64_t var, uint64_t mask, const char *name)
153{
154
155	if (var & mask) {
156		printf("%c%s", pf_sep, name);
157		pf_sep = ',';
158	}
159}
160
161static void
162acpi_print_string(char *s, size_t length)
163{
164	int	c;
165
166	/* Trim trailing spaces and NULLs */
167	while (length > 0 && (s[length - 1] == ' ' || s[length - 1] == '\0'))
168		length--;
169
170	while (length--) {
171		c = *s++;
172		putchar(c);
173	}
174}
175
176static void
177acpi_print_gas(ACPI_GENERIC_ADDRESS *gas)
178{
179	switch(gas->SpaceId) {
180	case ACPI_GAS_MEMORY:
181		printf("0x%016jx:%u[%u] (Memory)", (uintmax_t)gas->Address,
182		    gas->BitOffset, gas->BitWidth);
183		break;
184	case ACPI_GAS_IO:
185		printf("0x%02jx:%u[%u] (IO)", (uintmax_t)gas->Address,
186		    gas->BitOffset, gas->BitWidth);
187		break;
188	case ACPI_GAS_PCI:
189		printf("%x:%x+0x%x:%u[%u] (PCI)", (uint16_t)(gas->Address >> 32),
190		       (uint16_t)((gas->Address >> 16) & 0xffff),
191		       (uint16_t)gas->Address, gas->BitOffset, gas->BitWidth);
192		break;
193	/* XXX How to handle these below? */
194	case ACPI_GAS_EMBEDDED:
195		printf("0x%x:%u[%u] (EC)", (uint16_t)gas->Address,
196		       gas->BitOffset, gas->BitWidth);
197		break;
198	case ACPI_GAS_SMBUS:
199		printf("0x%x:%u[%u] (SMBus)", (uint16_t)gas->Address,
200		       gas->BitOffset, gas->BitWidth);
201		break;
202	case ACPI_GAS_CMOS:
203	case ACPI_GAS_PCIBAR:
204	case ACPI_GAS_DATATABLE:
205	case ACPI_GAS_FIXED:
206	default:
207		printf("0x%016jx (?)", (uintmax_t)gas->Address);
208		break;
209	}
210}
211
212/* The FADT revision indicates whether we use the DSDT or X_DSDT addresses. */
213static int
214acpi_get_fadt_revision(ACPI_TABLE_FADT *fadt)
215{
216	int fadt_revision;
217
218	/* Set the FADT revision separately from the RSDP version. */
219	if (addr_size == 8) {
220		fadt_revision = 2;
221
222		/*
223		 * A few systems (e.g., IBM T23) have an RSDP that claims
224		 * revision 2 but the 64 bit addresses are invalid.  If
225		 * revision 2 and the 32 bit address is non-zero but the
226		 * 32 and 64 bit versions don't match, prefer the 32 bit
227		 * version for all subsequent tables.
228		 */
229		if (fadt->Facs != 0 &&
230		    (fadt->XFacs & 0xffffffff) != fadt->Facs)
231			fadt_revision = 1;
232	} else
233		fadt_revision = 1;
234	return (fadt_revision);
235}
236
237static void
238acpi_handle_fadt(ACPI_TABLE_HEADER *sdp)
239{
240	ACPI_TABLE_HEADER *dsdp;
241	ACPI_TABLE_FACS	*facs;
242	ACPI_TABLE_FADT *fadt;
243	int		fadt_revision;
244
245	fadt = (ACPI_TABLE_FADT *)sdp;
246	acpi_print_fadt(sdp);
247
248	fadt_revision = acpi_get_fadt_revision(fadt);
249	if (fadt_revision == 1)
250		facs = (ACPI_TABLE_FACS *)acpi_map_sdt(fadt->Facs);
251	else
252		facs = (ACPI_TABLE_FACS *)acpi_map_sdt(fadt->XFacs);
253	if (memcmp(facs->Signature, ACPI_SIG_FACS, 4) != 0 || facs->Length < 64)
254		errx(1, "FACS is corrupt");
255	acpi_print_facs(facs);
256
257	if (fadt_revision == 1)
258		dsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(fadt->Dsdt);
259	else
260		dsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(fadt->XDsdt);
261	if (acpi_checksum(dsdp, dsdp->Length))
262		errx(1, "DSDT is corrupt");
263	acpi_print_dsdt(dsdp);
264}
265
266static void
267acpi_walk_subtables(ACPI_TABLE_HEADER *table, void *first,
268    void (*action)(ACPI_SUBTABLE_HEADER *))
269{
270	ACPI_SUBTABLE_HEADER *subtable;
271	char *end;
272
273	subtable = first;
274	end = (char *)table + table->Length;
275	while ((char *)subtable < end) {
276		printf("\n");
277		if (subtable->Length < sizeof(ACPI_SUBTABLE_HEADER)) {
278			warnx("invalid subtable length %u", subtable->Length);
279			return;
280		}
281		action(subtable);
282		subtable = (ACPI_SUBTABLE_HEADER *)((char *)subtable +
283		    subtable->Length);
284	}
285}
286
287static void
288acpi_walk_nfit(ACPI_TABLE_HEADER *table, void *first,
289    void (*action)(ACPI_NFIT_HEADER *))
290{
291	ACPI_NFIT_HEADER *subtable;
292	char *end;
293
294	subtable = first;
295	end = (char *)table + table->Length;
296	while ((char *)subtable < end) {
297		printf("\n");
298		if (subtable->Length < sizeof(ACPI_NFIT_HEADER)) {
299			warnx("invalid subtable length %u", subtable->Length);
300			return;
301		}
302		action(subtable);
303		subtable = (ACPI_NFIT_HEADER *)((char *)subtable +
304		    subtable->Length);
305	}
306}
307
308static void
309acpi_print_cpu(u_char cpu_id)
310{
311
312	printf("\tACPI CPU=");
313	if (cpu_id == 0xff)
314		printf("ALL\n");
315	else
316		printf("%d\n", (u_int)cpu_id);
317}
318
319static void
320acpi_print_cpu_uid(uint32_t uid, char *uid_string)
321{
322
323	printf("\tUID=%d", uid);
324	if (uid_string != NULL)
325		printf(" (%s)", uid_string);
326	printf("\n");
327}
328
329static void
330acpi_print_local_apic(uint32_t apic_id, uint32_t flags)
331{
332
333	printf("\tFlags={");
334	if (flags & ACPI_MADT_ENABLED)
335		printf("ENABLED");
336	else
337		printf("DISABLED");
338	printf("}\n");
339	printf("\tAPIC ID=%d\n", apic_id);
340}
341
342static void
343acpi_print_io_apic(uint32_t apic_id, uint32_t int_base, uint64_t apic_addr)
344{
345
346	printf("\tAPIC ID=%d\n", apic_id);
347	printf("\tINT BASE=%d\n", int_base);
348	printf("\tADDR=0x%016jx\n", (uintmax_t)apic_addr);
349}
350
351static void
352acpi_print_mps_flags(uint16_t flags)
353{
354
355	printf("\tFlags={Polarity=");
356	switch (flags & ACPI_MADT_POLARITY_MASK) {
357	case ACPI_MADT_POLARITY_CONFORMS:
358		printf("conforming");
359		break;
360	case ACPI_MADT_POLARITY_ACTIVE_HIGH:
361		printf("active-hi");
362		break;
363	case ACPI_MADT_POLARITY_ACTIVE_LOW:
364		printf("active-lo");
365		break;
366	default:
367		printf("0x%x", flags & ACPI_MADT_POLARITY_MASK);
368		break;
369	}
370	printf(", Trigger=");
371	switch (flags & ACPI_MADT_TRIGGER_MASK) {
372	case ACPI_MADT_TRIGGER_CONFORMS:
373		printf("conforming");
374		break;
375	case ACPI_MADT_TRIGGER_EDGE:
376		printf("edge");
377		break;
378	case ACPI_MADT_TRIGGER_LEVEL:
379		printf("level");
380		break;
381	default:
382		printf("0x%x", (flags & ACPI_MADT_TRIGGER_MASK) >> 2);
383	}
384	printf("}\n");
385}
386
387static void
388acpi_print_gicc_flags(uint32_t flags)
389{
390
391	printf("\tFlags={Performance intr=");
392	if (flags & ACPI_MADT_PERFORMANCE_IRQ_MODE)
393		printf("edge");
394	else
395		printf("level");
396	printf(", VGIC intr=");
397	if (flags & ACPI_MADT_VGIC_IRQ_MODE)
398		printf("edge");
399	else
400		printf("level");
401	printf("}\n");
402}
403
404static void
405acpi_print_intr(uint32_t intr, uint16_t mps_flags)
406{
407
408	printf("\tINTR=%d\n", intr);
409	acpi_print_mps_flags(mps_flags);
410}
411
412static void
413acpi_print_local_nmi(u_int lint, uint16_t mps_flags)
414{
415
416	printf("\tLINT Pin=%d\n", lint);
417	acpi_print_mps_flags(mps_flags);
418}
419
420static const char *apic_types[] = {
421    [ACPI_MADT_TYPE_LOCAL_APIC] = "Local APIC",
422    [ACPI_MADT_TYPE_IO_APIC] = "IO APIC",
423    [ACPI_MADT_TYPE_INTERRUPT_OVERRIDE] = "INT Override",
424    [ACPI_MADT_TYPE_NMI_SOURCE] = "NMI",
425    [ACPI_MADT_TYPE_LOCAL_APIC_NMI] = "Local APIC NMI",
426    [ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE] = "Local APIC Override",
427    [ACPI_MADT_TYPE_IO_SAPIC] = "IO SAPIC",
428    [ACPI_MADT_TYPE_LOCAL_SAPIC] = "Local SAPIC",
429    [ACPI_MADT_TYPE_INTERRUPT_SOURCE] = "Platform Interrupt",
430    [ACPI_MADT_TYPE_LOCAL_X2APIC] = "Local X2APIC",
431    [ACPI_MADT_TYPE_LOCAL_X2APIC_NMI] = "Local X2APIC NMI",
432    [ACPI_MADT_TYPE_GENERIC_INTERRUPT] = "GIC CPU Interface Structure",
433    [ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR] = "GIC Distributor Structure",
434    [ACPI_MADT_TYPE_GENERIC_MSI_FRAME] = "GICv2m MSI Frame",
435    [ACPI_MADT_TYPE_GENERIC_REDISTRIBUTOR] = "GIC Redistributor Structure",
436    [ACPI_MADT_TYPE_GENERIC_TRANSLATOR] = "GIC ITS Structure"
437};
438
439static const char *platform_int_types[] = { "0 (unknown)", "PMI", "INIT",
440					    "Corrected Platform Error" };
441
442static void
443acpi_print_madt(ACPI_SUBTABLE_HEADER *mp)
444{
445	ACPI_MADT_LOCAL_APIC *lapic;
446	ACPI_MADT_IO_APIC *ioapic;
447	ACPI_MADT_INTERRUPT_OVERRIDE *over;
448	ACPI_MADT_NMI_SOURCE *nmi;
449	ACPI_MADT_LOCAL_APIC_NMI *lapic_nmi;
450	ACPI_MADT_LOCAL_APIC_OVERRIDE *lapic_over;
451	ACPI_MADT_IO_SAPIC *iosapic;
452	ACPI_MADT_LOCAL_SAPIC *lsapic;
453	ACPI_MADT_INTERRUPT_SOURCE *isrc;
454	ACPI_MADT_LOCAL_X2APIC *x2apic;
455	ACPI_MADT_LOCAL_X2APIC_NMI *x2apic_nmi;
456	ACPI_MADT_GENERIC_INTERRUPT *gicc;
457	ACPI_MADT_GENERIC_DISTRIBUTOR *gicd;
458	ACPI_MADT_GENERIC_REDISTRIBUTOR *gicr;
459	ACPI_MADT_GENERIC_TRANSLATOR *gict;
460
461	if (mp->Type < nitems(apic_types))
462		printf("\tType=%s\n", apic_types[mp->Type]);
463	else
464		printf("\tType=%d (unknown)\n", mp->Type);
465	switch (mp->Type) {
466	case ACPI_MADT_TYPE_LOCAL_APIC:
467		lapic = (ACPI_MADT_LOCAL_APIC *)mp;
468		acpi_print_cpu(lapic->ProcessorId);
469		acpi_print_local_apic(lapic->Id, lapic->LapicFlags);
470		break;
471	case ACPI_MADT_TYPE_IO_APIC:
472		ioapic = (ACPI_MADT_IO_APIC *)mp;
473		acpi_print_io_apic(ioapic->Id, ioapic->GlobalIrqBase,
474		    ioapic->Address);
475		break;
476	case ACPI_MADT_TYPE_INTERRUPT_OVERRIDE:
477		over = (ACPI_MADT_INTERRUPT_OVERRIDE *)mp;
478		printf("\tBUS=%d\n", (u_int)over->Bus);
479		printf("\tIRQ=%d\n", (u_int)over->SourceIrq);
480		acpi_print_intr(over->GlobalIrq, over->IntiFlags);
481		break;
482	case ACPI_MADT_TYPE_NMI_SOURCE:
483		nmi = (ACPI_MADT_NMI_SOURCE *)mp;
484		acpi_print_intr(nmi->GlobalIrq, nmi->IntiFlags);
485		break;
486	case ACPI_MADT_TYPE_LOCAL_APIC_NMI:
487		lapic_nmi = (ACPI_MADT_LOCAL_APIC_NMI *)mp;
488		acpi_print_cpu(lapic_nmi->ProcessorId);
489		acpi_print_local_nmi(lapic_nmi->Lint, lapic_nmi->IntiFlags);
490		break;
491	case ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE:
492		lapic_over = (ACPI_MADT_LOCAL_APIC_OVERRIDE *)mp;
493		printf("\tLocal APIC ADDR=0x%016jx\n",
494		    (uintmax_t)lapic_over->Address);
495		break;
496	case ACPI_MADT_TYPE_IO_SAPIC:
497		iosapic = (ACPI_MADT_IO_SAPIC *)mp;
498		acpi_print_io_apic(iosapic->Id, iosapic->GlobalIrqBase,
499		    iosapic->Address);
500		break;
501	case ACPI_MADT_TYPE_LOCAL_SAPIC:
502		lsapic = (ACPI_MADT_LOCAL_SAPIC *)mp;
503		acpi_print_cpu(lsapic->ProcessorId);
504		acpi_print_local_apic(lsapic->Id, lsapic->LapicFlags);
505		printf("\tAPIC EID=%d\n", (u_int)lsapic->Eid);
506		if (mp->Length > __offsetof(ACPI_MADT_LOCAL_SAPIC, Uid))
507			acpi_print_cpu_uid(lsapic->Uid, lsapic->UidString);
508		break;
509	case ACPI_MADT_TYPE_INTERRUPT_SOURCE:
510		isrc = (ACPI_MADT_INTERRUPT_SOURCE *)mp;
511		if (isrc->Type < nitems(platform_int_types))
512			printf("\tType=%s\n", platform_int_types[isrc->Type]);
513		else
514			printf("\tType=%d (unknown)\n", isrc->Type);
515		printf("\tAPIC ID=%d\n", (u_int)isrc->Id);
516		printf("\tAPIC EID=%d\n", (u_int)isrc->Eid);
517		printf("\tSAPIC Vector=%d\n", (u_int)isrc->IoSapicVector);
518		acpi_print_intr(isrc->GlobalIrq, isrc->IntiFlags);
519		break;
520	case ACPI_MADT_TYPE_LOCAL_X2APIC:
521		x2apic = (ACPI_MADT_LOCAL_X2APIC *)mp;
522		acpi_print_cpu_uid(x2apic->Uid, NULL);
523		acpi_print_local_apic(x2apic->LocalApicId, x2apic->LapicFlags);
524		break;
525	case ACPI_MADT_TYPE_LOCAL_X2APIC_NMI:
526		x2apic_nmi = (ACPI_MADT_LOCAL_X2APIC_NMI *)mp;
527		acpi_print_cpu_uid(x2apic_nmi->Uid, NULL);
528		acpi_print_local_nmi(x2apic_nmi->Lint, x2apic_nmi->IntiFlags);
529		break;
530	case ACPI_MADT_TYPE_GENERIC_INTERRUPT:
531		gicc = (ACPI_MADT_GENERIC_INTERRUPT *)mp;
532		acpi_print_cpu_uid(gicc->Uid, NULL);
533		printf("\tCPU INTERFACE=%x\n", gicc->CpuInterfaceNumber);
534		acpi_print_gicc_flags(gicc->Flags);
535		printf("\tParking Protocol Version=%x\n", gicc->ParkingVersion);
536		printf("\tPERF INTR=%d\n", gicc->PerformanceInterrupt);
537		printf("\tParked ADDR=%016jx\n",
538		    (uintmax_t)gicc->ParkedAddress);
539		printf("\tBase ADDR=%016jx\n", (uintmax_t)gicc->BaseAddress);
540		printf("\tGICV=%016jx\n", (uintmax_t)gicc->GicvBaseAddress);
541		printf("\tGICH=%016jx\n", (uintmax_t)gicc->GichBaseAddress);
542		printf("\tVGIC INTR=%d\n", gicc->VgicInterrupt);
543		printf("\tGICR ADDR=%016jx\n",
544		    (uintmax_t)gicc->GicrBaseAddress);
545		printf("\tMPIDR=%jx\n", (uintmax_t)gicc->ArmMpidr);
546		printf("\tEfficency Class=%d\n", (u_int)gicc->EfficiencyClass);
547		break;
548	case ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR:
549		gicd = (ACPI_MADT_GENERIC_DISTRIBUTOR *)mp;
550		printf("\tGIC ID=%d\n", (u_int)gicd->GicId);
551		printf("\tBase ADDR=%016jx\n", (uintmax_t)gicd->BaseAddress);
552		printf("\tVector Base=%d\n", gicd->GlobalIrqBase);
553		printf("\tGIC VERSION=%d\n", (u_int)gicd->Version);
554		break;
555	case ACPI_MADT_TYPE_GENERIC_REDISTRIBUTOR:
556		gicr = (ACPI_MADT_GENERIC_REDISTRIBUTOR *)mp;
557		printf("\tBase ADDR=%016jx\n", (uintmax_t)gicr->BaseAddress);
558		printf("\tLength=%08x\n", gicr->Length);
559		break;
560	case ACPI_MADT_TYPE_GENERIC_TRANSLATOR:
561		gict = (ACPI_MADT_GENERIC_TRANSLATOR *)mp;
562		printf("\tGIC ITS ID=%d\n", gict->TranslationId);
563		printf("\tBase ADDR=%016jx\n", (uintmax_t)gict->BaseAddress);
564		break;
565	}
566}
567
568static void
569acpi_handle_madt(ACPI_TABLE_HEADER *sdp)
570{
571	ACPI_TABLE_MADT *madt;
572
573	printf(BEGIN_COMMENT);
574	acpi_print_sdt(sdp);
575	madt = (ACPI_TABLE_MADT *)sdp;
576	printf("\tLocal APIC ADDR=0x%08x\n", madt->Address);
577	printf("\tFlags={");
578	if (madt->Flags & ACPI_MADT_PCAT_COMPAT)
579		printf("PC-AT");
580	printf("}\n");
581	acpi_walk_subtables(sdp, (madt + 1), acpi_print_madt);
582	printf(END_COMMENT);
583}
584
585static void
586acpi_handle_bert(ACPI_TABLE_HEADER *sdp)
587{
588	ACPI_TABLE_BERT *bert;
589
590	printf(BEGIN_COMMENT);
591	acpi_print_sdt(sdp);
592	bert = (ACPI_TABLE_BERT *)sdp;
593	printf("\tRegionLength=%d\n", bert->RegionLength);
594	printf("\tAddress=0x%016jx\n", bert->Address);
595	printf(END_COMMENT);
596}
597
598static void
599acpi_print_whea(ACPI_WHEA_HEADER *w)
600{
601
602	printf("\n\tAction=%d\n", w->Action);
603	printf("\tInstruction=%d\n", w->Instruction);
604	printf("\tFlags=%02x\n", w->Flags);
605	printf("\tRegisterRegion=");
606	acpi_print_gas(&w->RegisterRegion);
607	printf("\n\tValue=0x%016jx\n", w->Value);
608	printf("\tMask=0x%016jx\n", w->Mask);
609}
610
611static void
612acpi_handle_einj(ACPI_TABLE_HEADER *sdp)
613{
614	ACPI_TABLE_EINJ *einj;
615	ACPI_WHEA_HEADER *w;
616	u_int i;
617
618	printf(BEGIN_COMMENT);
619	acpi_print_sdt(sdp);
620	einj = (ACPI_TABLE_EINJ *)sdp;
621	printf("\tHeaderLength=%d\n", einj->HeaderLength);
622	printf("\tFlags=0x%02x\n", einj->Flags);
623	printf("\tEntries=%d\n", einj->Entries);
624	w = (ACPI_WHEA_HEADER *)(einj + 1);
625	for (i = 0; i < MIN(einj->Entries, (sdp->Length -
626	    sizeof(ACPI_TABLE_EINJ)) / sizeof(ACPI_WHEA_HEADER)); i++)
627		acpi_print_whea(w + i);
628	printf(END_COMMENT);
629}
630
631static void
632acpi_handle_erst(ACPI_TABLE_HEADER *sdp)
633{
634	ACPI_TABLE_ERST *erst;
635	ACPI_WHEA_HEADER *w;
636	u_int i;
637
638	printf(BEGIN_COMMENT);
639	acpi_print_sdt(sdp);
640	erst = (ACPI_TABLE_ERST *)sdp;
641	printf("\tHeaderLength=%d\n", erst->HeaderLength);
642	printf("\tEntries=%d\n", erst->Entries);
643	w = (ACPI_WHEA_HEADER *)(erst + 1);
644	for (i = 0; i < MIN(erst->Entries, (sdp->Length -
645	    sizeof(ACPI_TABLE_ERST)) / sizeof(ACPI_WHEA_HEADER)); i++)
646		acpi_print_whea(w + i);
647	printf(END_COMMENT);
648}
649
650static void
651acpi_print_hest_bank(ACPI_HEST_IA_ERROR_BANK *b)
652{
653
654	printf("\tBank:\n");
655	printf("\t\tBankNumber=%d\n", b->BankNumber);
656	printf("\t\tClearStatusOnInit=%d\n", b->ClearStatusOnInit);
657	printf("\t\tStatusFormat=%d\n", b->StatusFormat);
658	printf("\t\tControlRegister=%x\n", b->ControlRegister);
659	printf("\t\tControlData=%jx\n", b->ControlData);
660	printf("\t\tStatusRegister=%x\n", b->StatusRegister);
661	printf("\t\tAddressRegister=%x\n", b->AddressRegister);
662	printf("\t\tMiscRegister=%x\n", b->MiscRegister);
663}
664
665static void
666acpi_print_hest_notify(ACPI_HEST_NOTIFY *n)
667{
668
669	printf("\t\tType=%d\n", n->Type);
670	printf("\t\tLength=%d\n", n->Length);
671	printf("\t\tConfigWriteEnable=%04x\n", n->ConfigWriteEnable);
672	printf("\t\tPollInterval=%d\n", n->PollInterval);
673	printf("\t\tVector=%d\n", n->Vector);
674	printf("\t\tPollingThresholdValue=%d\n", n->PollingThresholdValue);
675	printf("\t\tPollingThresholdWindow=%d\n", n->PollingThresholdWindow);
676	printf("\t\tErrorThresholdValue=%d\n", n->ErrorThresholdValue);
677	printf("\t\tErrorThresholdWindow=%d\n", n->ErrorThresholdWindow);
678}
679
680static void
681acpi_print_hest_aer(ACPI_HEST_AER_COMMON *a)
682{
683
684	printf("\tFlags=%02x\n", a->Flags);
685	printf("\tEnabled=%d\n", a->Enabled);
686	printf("\tRecordsToPreallocate=%d\n", a->RecordsToPreallocate);
687	printf("\tMaxSectionsPerRecord=%d\n", a->MaxSectionsPerRecord);
688	printf("\tBus=%d\n", a->Bus);
689	printf("\tDevice=%d\n", a->Device);
690	printf("\tFunction=%d\n", a->Function);
691	printf("\tDeviceControl=%d\n", a->DeviceControl);
692	printf("\tUncorrectableMask=%d\n", a->UncorrectableMask);
693	printf("\tUncorrectableSeverity=%d\n", a->UncorrectableSeverity);
694	printf("\tCorrectableMask=%d\n", a->CorrectableMask);
695	printf("\tAdvancedCapabilities=%d\n", a->AdvancedCapabilities);
696}
697
698static int
699acpi_handle_hest_structure(void *addr, int remaining)
700{
701	ACPI_HEST_HEADER *hdr = addr;
702	int i;
703
704	if (remaining < (int)sizeof(ACPI_HEST_HEADER))
705		return (-1);
706
707	printf("\n\tType=%d\n", hdr->Type);
708	printf("\tSourceId=%d\n", hdr->SourceId);
709	switch (hdr->Type) {
710	case ACPI_HEST_TYPE_IA32_CHECK: {
711		ACPI_HEST_IA_MACHINE_CHECK *s = addr;
712		printf("\tFlags=%02x\n", s->Flags);
713		printf("\tEnabled=%d\n", s->Enabled);
714		printf("\tRecordsToPreallocate=%d\n", s->RecordsToPreallocate);
715		printf("\tMaxSectionsPerRecord=%d\n", s->MaxSectionsPerRecord);
716		printf("\tGlobalCapabilityData=%jd\n", s->GlobalCapabilityData);
717		printf("\tGlobalControlData=%jd\n", s->GlobalControlData);
718		printf("\tNumHardwareBanks=%d\n", s->NumHardwareBanks);
719		for (i = 0; i < s->NumHardwareBanks; i++) {
720			acpi_print_hest_bank((ACPI_HEST_IA_ERROR_BANK *)
721			    (s + 1) + i);
722		}
723		return (sizeof(*s) + s->NumHardwareBanks *
724		    sizeof(ACPI_HEST_IA_ERROR_BANK));
725	}
726	case ACPI_HEST_TYPE_IA32_CORRECTED_CHECK: {
727		ACPI_HEST_IA_CORRECTED *s = addr;
728		printf("\tFlags=%02x\n", s->Flags);
729		printf("\tEnabled=%d\n", s->Enabled);
730		printf("\tRecordsToPreallocate=%d\n", s->RecordsToPreallocate);
731		printf("\tMaxSectionsPerRecord=%d\n", s->MaxSectionsPerRecord);
732		printf("\tNotify:\n");
733		acpi_print_hest_notify(&s->Notify);
734		printf("\tNumHardwareBanks=%d\n", s->NumHardwareBanks);
735		for (i = 0; i < s->NumHardwareBanks; i++) {
736			acpi_print_hest_bank((ACPI_HEST_IA_ERROR_BANK *)
737			    (s + 1) + i);
738		}
739		return (sizeof(*s) + s->NumHardwareBanks *
740		    sizeof(ACPI_HEST_IA_ERROR_BANK));
741	}
742	case ACPI_HEST_TYPE_IA32_NMI: {
743		ACPI_HEST_IA_NMI *s = addr;
744		printf("\tRecordsToPreallocate=%d\n", s->RecordsToPreallocate);
745		printf("\tMaxSectionsPerRecord=%d\n", s->MaxSectionsPerRecord);
746		printf("\tMaxRawDataLength=%d\n", s->MaxRawDataLength);
747		return (sizeof(*s));
748	}
749	case ACPI_HEST_TYPE_AER_ROOT_PORT: {
750		ACPI_HEST_AER_ROOT *s = addr;
751		acpi_print_hest_aer(&s->Aer);
752		printf("\tRootErrorCommand=%d\n", s->RootErrorCommand);
753		return (sizeof(*s));
754	}
755	case ACPI_HEST_TYPE_AER_ENDPOINT: {
756		ACPI_HEST_AER *s = addr;
757		acpi_print_hest_aer(&s->Aer);
758		return (sizeof(*s));
759	}
760	case ACPI_HEST_TYPE_AER_BRIDGE: {
761		ACPI_HEST_AER_BRIDGE *s = addr;
762		acpi_print_hest_aer(&s->Aer);
763		printf("\tUncorrectableMask2=%d\n", s->UncorrectableMask2);
764		printf("\tUncorrectableSeverity2=%d\n", s->UncorrectableSeverity2);
765		printf("\tAdvancedCapabilities2=%d\n", s->AdvancedCapabilities2);
766		return (sizeof(*s));
767	}
768	case ACPI_HEST_TYPE_GENERIC_ERROR: {
769		ACPI_HEST_GENERIC *s = addr;
770		printf("\tRelatedSourceId=%d\n", s->RelatedSourceId);
771		printf("\tEnabled=%d\n", s->Enabled);
772		printf("\tRecordsToPreallocate=%d\n", s->RecordsToPreallocate);
773		printf("\tMaxSectionsPerRecord=%d\n", s->MaxSectionsPerRecord);
774		printf("\tMaxRawDataLength=%d\n", s->MaxRawDataLength);
775		printf("\tErrorStatusAddress=");
776		acpi_print_gas(&s->ErrorStatusAddress);
777		printf("\n");
778		printf("\tNotify:\n");
779		acpi_print_hest_notify(&s->Notify);
780		printf("\tErrorBlockLength=%d\n", s->ErrorBlockLength);
781		return (sizeof(*s));
782	}
783	case ACPI_HEST_TYPE_GENERIC_ERROR_V2: {
784		ACPI_HEST_GENERIC_V2 *s = addr;
785		printf("\tRelatedSourceId=%d\n", s->RelatedSourceId);
786		printf("\tEnabled=%d\n", s->Enabled);
787		printf("\tRecordsToPreallocate=%d\n", s->RecordsToPreallocate);
788		printf("\tMaxSectionsPerRecord=%d\n", s->MaxSectionsPerRecord);
789		printf("\tMaxRawDataLength=%d\n", s->MaxRawDataLength);
790		printf("\tErrorStatusAddress=");
791		acpi_print_gas(&s->ErrorStatusAddress);
792		printf("\n");
793		printf("\tNotify:\n");
794		acpi_print_hest_notify(&s->Notify);
795		printf("\tErrorBlockLength=%d\n", s->ErrorBlockLength);
796		printf("\tReadAckRegister=");
797		acpi_print_gas(&s->ReadAckRegister);
798		printf("\n");
799		printf("\tReadAckPreserve=%jd\n", s->ReadAckPreserve);
800		printf("\tReadAckWrite=%jd\n", s->ReadAckWrite);
801		return (sizeof(*s));
802	}
803	case ACPI_HEST_TYPE_IA32_DEFERRED_CHECK: {
804		ACPI_HEST_IA_DEFERRED_CHECK *s = addr;
805		printf("\tFlags=%02x\n", s->Flags);
806		printf("\tEnabled=%d\n", s->Enabled);
807		printf("\tRecordsToPreallocate=%d\n", s->RecordsToPreallocate);
808		printf("\tMaxSectionsPerRecord=%d\n", s->MaxSectionsPerRecord);
809		printf("\tNotify:\n");
810		acpi_print_hest_notify(&s->Notify);
811		printf("\tNumHardwareBanks=%d\n", s->NumHardwareBanks);
812		for (i = 0; i < s->NumHardwareBanks; i++) {
813			acpi_print_hest_bank((ACPI_HEST_IA_ERROR_BANK *)
814			    (s + 1) + i);
815		}
816		return (sizeof(*s) + s->NumHardwareBanks *
817		    sizeof(ACPI_HEST_IA_ERROR_BANK));
818	}
819	default:
820		return (-1);
821	}
822}
823
824static void
825acpi_handle_hest(ACPI_TABLE_HEADER *sdp)
826{
827	char *cp;
828	int remaining, consumed;
829	ACPI_TABLE_HEST *hest;
830
831	printf(BEGIN_COMMENT);
832	acpi_print_sdt(sdp);
833	hest = (ACPI_TABLE_HEST *)sdp;
834	printf("\tErrorSourceCount=%d\n", hest->ErrorSourceCount);
835
836	remaining = sdp->Length - sizeof(ACPI_TABLE_HEST);
837	while (remaining > 0) {
838		cp = (char *)sdp + sdp->Length - remaining;
839		consumed = acpi_handle_hest_structure(cp, remaining);
840		if (consumed <= 0)
841			break;
842		else
843			remaining -= consumed;
844	}
845	printf(END_COMMENT);
846}
847
848static void
849acpi_handle_hpet(ACPI_TABLE_HEADER *sdp)
850{
851	ACPI_TABLE_HPET *hpet;
852
853	printf(BEGIN_COMMENT);
854	acpi_print_sdt(sdp);
855	hpet = (ACPI_TABLE_HPET *)sdp;
856	printf("\tHPET Number=%d\n", hpet->Sequence);
857	printf("\tADDR=");
858	acpi_print_gas(&hpet->Address);
859	printf("\n\tHW Rev=0x%x\n", hpet->Id & ACPI_HPET_ID_HARDWARE_REV_ID);
860	printf("\tComparators=%d\n", (hpet->Id & ACPI_HPET_ID_COMPARATORS) >>
861	    8);
862	printf("\tCounter Size=%d\n", hpet->Id & ACPI_HPET_ID_COUNT_SIZE_CAP ?
863	    1 : 0);
864	printf("\tLegacy IRQ routing capable={");
865	if (hpet->Id & ACPI_HPET_ID_LEGACY_CAPABLE)
866		printf("TRUE}\n");
867	else
868		printf("FALSE}\n");
869	printf("\tPCI Vendor ID=0x%04x\n", hpet->Id >> 16);
870	printf("\tMinimal Tick=%d\n", hpet->MinimumTick);
871	printf("\tFlags=0x%02x\n", hpet->Flags);
872	printf(END_COMMENT);
873}
874
875static void
876acpi_handle_ecdt(ACPI_TABLE_HEADER *sdp)
877{
878	ACPI_TABLE_ECDT *ecdt;
879
880	printf(BEGIN_COMMENT);
881	acpi_print_sdt(sdp);
882	ecdt = (ACPI_TABLE_ECDT *)sdp;
883	printf("\tEC_CONTROL=");
884	acpi_print_gas(&ecdt->Control);
885	printf("\n\tEC_DATA=");
886	acpi_print_gas(&ecdt->Data);
887	printf("\n\tUID=%#x, ", ecdt->Uid);
888	printf("GPE_BIT=%#x\n", ecdt->Gpe);
889	printf("\tEC_ID=%s\n", ecdt->Id);
890	printf(END_COMMENT);
891}
892
893static void
894acpi_handle_mcfg(ACPI_TABLE_HEADER *sdp)
895{
896	ACPI_TABLE_MCFG *mcfg;
897	ACPI_MCFG_ALLOCATION *alloc;
898	u_int i, entries;
899
900	printf(BEGIN_COMMENT);
901	acpi_print_sdt(sdp);
902	mcfg = (ACPI_TABLE_MCFG *)sdp;
903	entries = (sdp->Length - sizeof(ACPI_TABLE_MCFG)) /
904	    sizeof(ACPI_MCFG_ALLOCATION);
905	alloc = (ACPI_MCFG_ALLOCATION *)(mcfg + 1);
906	for (i = 0; i < entries; i++, alloc++) {
907		printf("\n");
908		printf("\tBase Address=0x%016jx\n", (uintmax_t)alloc->Address);
909		printf("\tSegment Group=0x%04x\n", alloc->PciSegment);
910		printf("\tStart Bus=%d\n", alloc->StartBusNumber);
911		printf("\tEnd Bus=%d\n", alloc->EndBusNumber);
912	}
913	printf(END_COMMENT);
914}
915
916static void
917acpi_handle_slit(ACPI_TABLE_HEADER *sdp)
918{
919	ACPI_TABLE_SLIT *slit;
920	UINT64 i, j;
921
922	printf(BEGIN_COMMENT);
923	acpi_print_sdt(sdp);
924	slit = (ACPI_TABLE_SLIT *)sdp;
925	printf("\tLocality Count=%ju\n", (uintmax_t)slit->LocalityCount);
926	printf("\n\t      ");
927	for (i = 0; i < slit->LocalityCount; i++)
928		printf(" %3ju", (uintmax_t)i);
929	printf("\n\t     +");
930	for (i = 0; i < slit->LocalityCount; i++)
931		printf("----");
932	printf("\n");
933	for (i = 0; i < slit->LocalityCount; i++) {
934		printf("\t %3ju |", (uintmax_t)i);
935		for (j = 0; j < slit->LocalityCount; j++)
936			printf(" %3d",
937			    slit->Entry[i * slit->LocalityCount + j]);
938		printf("\n");
939	}
940	printf(END_COMMENT);
941}
942
943static void
944acpi_handle_wddt(ACPI_TABLE_HEADER *sdp)
945{
946	ACPI_TABLE_WDDT *wddt;
947
948	printf(BEGIN_COMMENT);
949	acpi_print_sdt(sdp);
950	wddt = (ACPI_TABLE_WDDT *)sdp;
951	printf("\tSpecVersion=0x%04x, TableVersion=0x%04x\n",
952	    wddt->SpecVersion, wddt->TableVersion);
953	printf("\tPciVendorId=0x%04x, Address=", wddt->PciVendorId);
954	acpi_print_gas(&wddt->Address);
955	printf("\n\tMaxCount=%u, MinCount=%u, Period=%ums\n",
956	    wddt->MaxCount, wddt->MinCount, wddt->Period);
957
958#define	PRINTFLAG(var, flag)	printflag((var), ACPI_WDDT_## flag, #flag)
959	printf("\tStatus=");
960	PRINTFLAG(wddt->Status, AVAILABLE);
961	PRINTFLAG(wddt->Status, ACTIVE);
962	PRINTFLAG(wddt->Status, TCO_OS_OWNED);
963	PRINTFLAG(wddt->Status, USER_RESET);
964	PRINTFLAG(wddt->Status, WDT_RESET);
965	PRINTFLAG(wddt->Status, POWER_FAIL);
966	PRINTFLAG(wddt->Status, UNKNOWN_RESET);
967	PRINTFLAG_END();
968	printf("\tCapability=");
969	PRINTFLAG(wddt->Capability, AUTO_RESET);
970	PRINTFLAG(wddt->Capability, ALERT_SUPPORT);
971	PRINTFLAG_END();
972#undef PRINTFLAG
973
974	printf(END_COMMENT);
975}
976
977static void
978acpi_print_native_lpit(ACPI_LPIT_NATIVE *nl)
979{
980	printf("\tEntryTrigger=");
981	acpi_print_gas(&nl->EntryTrigger);
982	printf("\n\tResidency=%u\n", nl->Residency);
983	printf("\tLatency=%u\n", nl->Latency);
984	if (nl->Header.Flags & ACPI_LPIT_NO_COUNTER)
985		printf("\tResidencyCounter=Not Present");
986	else {
987		printf("\tResidencyCounter=");
988		acpi_print_gas(&nl->ResidencyCounter);
989		printf("\n");
990	}
991	if (nl->CounterFrequency)
992		printf("\tCounterFrequency=%ju\n", nl->CounterFrequency);
993	else
994		printf("\tCounterFrequency=TSC\n");
995}
996
997static void
998acpi_print_lpit(ACPI_LPIT_HEADER *lpit)
999{
1000	if (lpit->Type == ACPI_LPIT_TYPE_NATIVE_CSTATE)
1001		printf("\tType=ACPI_LPIT_TYPE_NATIVE_CSTATE\n");
1002	else
1003		warnx("unknown LPIT type %u", lpit->Type);
1004
1005	printf("\tLength=%u\n", lpit->Length);
1006	printf("\tUniqueId=0x%04x\n", lpit->UniqueId);
1007#define	PRINTFLAG(var, flag)	printflag((var), ACPI_LPIT_## flag, #flag)
1008	printf("\tFlags=");
1009	PRINTFLAG(lpit->Flags, STATE_DISABLED);
1010	PRINTFLAG_END();
1011#undef PRINTFLAG
1012
1013	if (lpit->Type == ACPI_LPIT_TYPE_NATIVE_CSTATE)
1014		return acpi_print_native_lpit((ACPI_LPIT_NATIVE *)lpit);
1015}
1016
1017static void
1018acpi_walk_lpit(ACPI_TABLE_HEADER *table, void *first,
1019    void (*action)(ACPI_LPIT_HEADER *))
1020{
1021	ACPI_LPIT_HEADER *subtable;
1022	char *end;
1023
1024	subtable = first;
1025	end = (char *)table + table->Length;
1026	while ((char *)subtable < end) {
1027		printf("\n");
1028		if (subtable->Length < sizeof(ACPI_LPIT_HEADER)) {
1029			warnx("invalid subtable length %u", subtable->Length);
1030			return;
1031		}
1032		action(subtable);
1033		subtable = (ACPI_LPIT_HEADER *)((char *)subtable +
1034		    subtable->Length);
1035	}
1036}
1037
1038static void
1039acpi_handle_lpit(ACPI_TABLE_HEADER *sdp)
1040{
1041	ACPI_TABLE_LPIT *lpit;
1042
1043	printf(BEGIN_COMMENT);
1044	acpi_print_sdt(sdp);
1045	lpit = (ACPI_TABLE_LPIT *)sdp;
1046	acpi_walk_lpit(sdp, (lpit + 1), acpi_print_lpit);
1047
1048	printf(END_COMMENT);
1049}
1050
1051static void
1052acpi_print_srat_cpu(uint32_t apic_id, uint32_t proximity_domain,
1053    uint32_t flags)
1054{
1055
1056	printf("\tFlags={");
1057	if (flags & ACPI_SRAT_CPU_ENABLED)
1058		printf("ENABLED");
1059	else
1060		printf("DISABLED");
1061	printf("}\n");
1062	printf("\tAPIC ID=%d\n", apic_id);
1063	printf("\tProximity Domain=%d\n", proximity_domain);
1064}
1065
1066static char *
1067acpi_tcpa_evname(struct TCPAevent *event)
1068{
1069	struct TCPApc_event *pc_event;
1070	char *eventname = NULL;
1071
1072	pc_event = (struct TCPApc_event *)(event + 1);
1073
1074	switch(event->event_type) {
1075	case PREBOOT:
1076	case POST_CODE:
1077	case UNUSED:
1078	case NO_ACTION:
1079	case SEPARATOR:
1080	case SCRTM_CONTENTS:
1081	case SCRTM_VERSION:
1082	case CPU_MICROCODE:
1083	case PLATFORM_CONFIG_FLAGS:
1084	case TABLE_OF_DEVICES:
1085	case COMPACT_HASH:
1086	case IPL:
1087	case IPL_PARTITION_DATA:
1088	case NONHOST_CODE:
1089	case NONHOST_CONFIG:
1090	case NONHOST_INFO:
1091		asprintf(&eventname, "%s",
1092		    tcpa_event_type_strings[event->event_type]);
1093		break;
1094
1095	case ACTION:
1096		eventname = calloc(event->event_size + 1, sizeof(char));
1097		memcpy(eventname, pc_event, event->event_size);
1098		break;
1099
1100	case EVENT_TAG:
1101		switch (pc_event->event_id) {
1102		case SMBIOS:
1103		case BIS_CERT:
1104		case CMOS:
1105		case NVRAM:
1106		case OPTION_ROM_EXEC:
1107		case OPTION_ROM_CONFIG:
1108		case S_CRTM_VERSION:
1109		case POST_BIOS_ROM:
1110		case ESCD:
1111		case OPTION_ROM_MICROCODE:
1112		case S_CRTM_CONTENTS:
1113		case POST_CONTENTS:
1114			asprintf(&eventname, "%s",
1115			    TCPA_pcclient_strings[pc_event->event_id]);
1116			break;
1117
1118		default:
1119			asprintf(&eventname, "<unknown tag 0x%02x>",
1120			    pc_event->event_id);
1121			break;
1122		}
1123		break;
1124
1125	default:
1126		asprintf(&eventname, "<unknown 0x%02x>", event->event_type);
1127		break;
1128	}
1129
1130	return eventname;
1131}
1132
1133static void
1134acpi_print_tcpa(struct TCPAevent *event)
1135{
1136	int i;
1137	char *eventname;
1138
1139	eventname = acpi_tcpa_evname(event);
1140
1141	printf("\t%d", event->pcr_index);
1142	printf(" 0x");
1143	for (i = 0; i < 20; i++)
1144		printf("%02x", event->pcr_value[i]);
1145	printf(" [%s]\n", eventname ? eventname : "<unknown>");
1146
1147	free(eventname);
1148}
1149
1150static void
1151acpi_handle_tcpa(ACPI_TABLE_HEADER *sdp)
1152{
1153	struct TCPAbody *tcpa;
1154	struct TCPAevent *event;
1155	uintmax_t len, paddr;
1156	unsigned char *vaddr = NULL;
1157	unsigned char *vend = NULL;
1158
1159	printf(BEGIN_COMMENT);
1160	acpi_print_sdt(sdp);
1161	tcpa = (struct TCPAbody *) sdp;
1162
1163	switch (tcpa->platform_class) {
1164	case ACPI_TCPA_BIOS_CLIENT:
1165		len = tcpa->client.log_max_len;
1166		paddr = tcpa->client.log_start_addr;
1167		break;
1168
1169	case ACPI_TCPA_BIOS_SERVER:
1170		len = tcpa->server.log_max_len;
1171		paddr = tcpa->server.log_start_addr;
1172		break;
1173
1174	default:
1175		printf("XXX");
1176		printf(END_COMMENT);
1177		return;
1178	}
1179	printf("\tClass %u Base Address 0x%jx Length %ju\n\n",
1180	    tcpa->platform_class, paddr, len);
1181
1182	if (len == 0) {
1183		printf("\tEmpty TCPA table\n");
1184		printf(END_COMMENT);
1185		return;
1186	}
1187	if(sdp->Revision == 1){
1188		printf("\tOLD TCPA spec log found. Dumping not supported.\n");
1189		printf(END_COMMENT);
1190		return;
1191	}
1192
1193	vaddr = (unsigned char *)acpi_map_physical(paddr, len);
1194	vend = vaddr + len;
1195
1196	while (vaddr != NULL) {
1197		if ((vaddr + sizeof(struct TCPAevent) >= vend)||
1198		    (vaddr + sizeof(struct TCPAevent) < vaddr))
1199			break;
1200		event = (struct TCPAevent *)(void *)vaddr;
1201		if (vaddr + event->event_size >= vend)
1202			break;
1203		if (vaddr + event->event_size < vaddr)
1204			break;
1205		if (event->event_type == 0 && event->event_size == 0)
1206			break;
1207#if 0
1208		{
1209		unsigned int i, j, k;
1210
1211		printf("\n\tsize %d\n\t\t%p ", event->event_size, vaddr);
1212		for (j = 0, i = 0; i <
1213		    sizeof(struct TCPAevent) + event->event_size; i++) {
1214			printf("%02x ", vaddr[i]);
1215			if ((i+1) % 8 == 0) {
1216				for (k = 0; k < 8; k++)
1217					printf("%c", isprint(vaddr[j+k]) ?
1218					    vaddr[j+k] : '.');
1219				printf("\n\t\t%p ", &vaddr[i + 1]);
1220				j = i + 1;
1221			}
1222		}
1223		printf("\n"); }
1224#endif
1225		acpi_print_tcpa(event);
1226
1227		vaddr += sizeof(struct TCPAevent) + event->event_size;
1228	}
1229
1230	printf(END_COMMENT);
1231}
1232static void acpi_handle_tpm2(ACPI_TABLE_HEADER *sdp)
1233{
1234	ACPI_TABLE_TPM2 *tpm2;
1235
1236	printf (BEGIN_COMMENT);
1237	acpi_print_sdt(sdp);
1238	tpm2 = (ACPI_TABLE_TPM2 *) sdp;
1239	printf ("\t\tControlArea=%jx\n", tpm2->ControlAddress);
1240	printf ("\t\tStartMethod=%x\n", tpm2->StartMethod);
1241	printf (END_COMMENT);
1242}
1243
1244static const char *
1245devscope_type2str(int type)
1246{
1247	static char typebuf[16];
1248
1249	switch (type) {
1250	case 1:
1251		return ("PCI Endpoint Device");
1252	case 2:
1253		return ("PCI Sub-Hierarchy");
1254	case 3:
1255		return ("IOAPIC");
1256	case 4:
1257		return ("HPET");
1258	default:
1259		snprintf(typebuf, sizeof(typebuf), "%d", type);
1260		return (typebuf);
1261	}
1262}
1263
1264static int
1265acpi_handle_dmar_devscope(void *addr, int remaining)
1266{
1267	char sep;
1268	int pathlen;
1269	ACPI_DMAR_PCI_PATH *path, *pathend;
1270	ACPI_DMAR_DEVICE_SCOPE *devscope = addr;
1271
1272	if (remaining < (int)sizeof(ACPI_DMAR_DEVICE_SCOPE))
1273		return (-1);
1274
1275	if (remaining < devscope->Length)
1276		return (-1);
1277
1278	printf("\n");
1279	printf("\t\tType=%s\n", devscope_type2str(devscope->EntryType));
1280	printf("\t\tLength=%d\n", devscope->Length);
1281	printf("\t\tEnumerationId=%d\n", devscope->EnumerationId);
1282	printf("\t\tStartBusNumber=%d\n", devscope->Bus);
1283
1284	path = (ACPI_DMAR_PCI_PATH *)(devscope + 1);
1285	pathlen = devscope->Length - sizeof(ACPI_DMAR_DEVICE_SCOPE);
1286	pathend = path + pathlen / sizeof(ACPI_DMAR_PCI_PATH);
1287	if (path < pathend) {
1288		sep = '{';
1289		printf("\t\tPath=");
1290		do {
1291			printf("%c%d:%d", sep, path->Device, path->Function);
1292			sep=',';
1293			path++;
1294		} while (path < pathend);
1295		printf("}\n");
1296	}
1297
1298	return (devscope->Length);
1299}
1300
1301static void
1302acpi_handle_dmar_drhd(ACPI_DMAR_HARDWARE_UNIT *drhd)
1303{
1304	char *cp;
1305	int remaining, consumed;
1306
1307	printf("\n");
1308	printf("\tType=DRHD\n");
1309	printf("\tLength=%d\n", drhd->Header.Length);
1310
1311#define	PRINTFLAG(var, flag)	printflag((var), ACPI_DMAR_## flag, #flag)
1312
1313	printf("\tFlags=");
1314	PRINTFLAG(drhd->Flags, INCLUDE_ALL);
1315	PRINTFLAG_END();
1316
1317#undef PRINTFLAG
1318
1319	printf("\tSegment=%d\n", drhd->Segment);
1320	printf("\tAddress=0x%016jx\n", (uintmax_t)drhd->Address);
1321
1322	remaining = drhd->Header.Length - sizeof(ACPI_DMAR_HARDWARE_UNIT);
1323	if (remaining > 0)
1324		printf("\tDevice Scope:");
1325	while (remaining > 0) {
1326		cp = (char *)drhd + drhd->Header.Length - remaining;
1327		consumed = acpi_handle_dmar_devscope(cp, remaining);
1328		if (consumed <= 0)
1329			break;
1330		else
1331			remaining -= consumed;
1332	}
1333}
1334
1335static void
1336acpi_handle_dmar_rmrr(ACPI_DMAR_RESERVED_MEMORY *rmrr)
1337{
1338	char *cp;
1339	int remaining, consumed;
1340
1341	printf("\n");
1342	printf("\tType=RMRR\n");
1343	printf("\tLength=%d\n", rmrr->Header.Length);
1344	printf("\tSegment=%d\n", rmrr->Segment);
1345	printf("\tBaseAddress=0x%016jx\n", (uintmax_t)rmrr->BaseAddress);
1346	printf("\tLimitAddress=0x%016jx\n", (uintmax_t)rmrr->EndAddress);
1347
1348	remaining = rmrr->Header.Length - sizeof(ACPI_DMAR_RESERVED_MEMORY);
1349	if (remaining > 0)
1350		printf("\tDevice Scope:");
1351	while (remaining > 0) {
1352		cp = (char *)rmrr + rmrr->Header.Length - remaining;
1353		consumed = acpi_handle_dmar_devscope(cp, remaining);
1354		if (consumed <= 0)
1355			break;
1356		else
1357			remaining -= consumed;
1358	}
1359}
1360
1361static void
1362acpi_handle_dmar_atsr(ACPI_DMAR_ATSR *atsr)
1363{
1364	char *cp;
1365	int remaining, consumed;
1366
1367	printf("\n");
1368	printf("\tType=ATSR\n");
1369	printf("\tLength=%d\n", atsr->Header.Length);
1370
1371#define	PRINTFLAG(var, flag)	printflag((var), ACPI_DMAR_## flag, #flag)
1372
1373	printf("\tFlags=");
1374	PRINTFLAG(atsr->Flags, ALL_PORTS);
1375	PRINTFLAG_END();
1376
1377#undef PRINTFLAG
1378
1379	printf("\tSegment=%d\n", atsr->Segment);
1380
1381	remaining = atsr->Header.Length - sizeof(ACPI_DMAR_ATSR);
1382	if (remaining > 0)
1383		printf("\tDevice Scope:");
1384	while (remaining > 0) {
1385		cp = (char *)atsr + atsr->Header.Length - remaining;
1386		consumed = acpi_handle_dmar_devscope(cp, remaining);
1387		if (consumed <= 0)
1388			break;
1389		else
1390			remaining -= consumed;
1391	}
1392}
1393
1394static void
1395acpi_handle_dmar_rhsa(ACPI_DMAR_RHSA *rhsa)
1396{
1397
1398	printf("\n");
1399	printf("\tType=RHSA\n");
1400	printf("\tLength=%d\n", rhsa->Header.Length);
1401	printf("\tBaseAddress=0x%016jx\n", (uintmax_t)rhsa->BaseAddress);
1402	printf("\tProximityDomain=0x%08x\n", rhsa->ProximityDomain);
1403}
1404
1405static int
1406acpi_handle_dmar_remapping_structure(void *addr, int remaining)
1407{
1408	ACPI_DMAR_HEADER *hdr = addr;
1409
1410	if (remaining < (int)sizeof(ACPI_DMAR_HEADER))
1411		return (-1);
1412
1413	if (remaining < hdr->Length)
1414		return (-1);
1415
1416	switch (hdr->Type) {
1417	case ACPI_DMAR_TYPE_HARDWARE_UNIT:
1418		acpi_handle_dmar_drhd(addr);
1419		break;
1420	case ACPI_DMAR_TYPE_RESERVED_MEMORY:
1421		acpi_handle_dmar_rmrr(addr);
1422		break;
1423	case ACPI_DMAR_TYPE_ROOT_ATS:
1424		acpi_handle_dmar_atsr(addr);
1425		break;
1426	case ACPI_DMAR_TYPE_HARDWARE_AFFINITY:
1427		acpi_handle_dmar_rhsa(addr);
1428		break;
1429	default:
1430		printf("\n");
1431		printf("\tType=%d\n", hdr->Type);
1432		printf("\tLength=%d\n", hdr->Length);
1433		break;
1434	}
1435	return (hdr->Length);
1436}
1437
1438#ifndef ACPI_DMAR_X2APIC_OPT_OUT
1439#define	ACPI_DMAR_X2APIC_OPT_OUT	(0x2)
1440#endif
1441
1442static void
1443acpi_handle_dmar(ACPI_TABLE_HEADER *sdp)
1444{
1445	char *cp;
1446	int remaining, consumed;
1447	ACPI_TABLE_DMAR *dmar;
1448
1449	printf(BEGIN_COMMENT);
1450	acpi_print_sdt(sdp);
1451	dmar = (ACPI_TABLE_DMAR *)sdp;
1452	printf("\tHost Address Width=%d\n", dmar->Width + 1);
1453
1454#define PRINTFLAG(var, flag)	printflag((var), ACPI_DMAR_## flag, #flag)
1455
1456	printf("\tFlags=");
1457	PRINTFLAG(dmar->Flags, INTR_REMAP);
1458	PRINTFLAG(dmar->Flags, X2APIC_OPT_OUT);
1459	PRINTFLAG_END();
1460
1461#undef PRINTFLAG
1462
1463	remaining = sdp->Length - sizeof(ACPI_TABLE_DMAR);
1464	while (remaining > 0) {
1465		cp = (char *)sdp + sdp->Length - remaining;
1466		consumed = acpi_handle_dmar_remapping_structure(cp, remaining);
1467		if (consumed <= 0)
1468			break;
1469		else
1470			remaining -= consumed;
1471	}
1472
1473	printf(END_COMMENT);
1474}
1475
1476static void
1477acpi_print_srat_memory(ACPI_SRAT_MEM_AFFINITY *mp)
1478{
1479
1480	printf("\tFlags={");
1481	if (mp->Flags & ACPI_SRAT_MEM_ENABLED)
1482		printf("ENABLED");
1483	else
1484		printf("DISABLED");
1485	if (mp->Flags & ACPI_SRAT_MEM_HOT_PLUGGABLE)
1486		printf(",HOT_PLUGGABLE");
1487	if (mp->Flags & ACPI_SRAT_MEM_NON_VOLATILE)
1488		printf(",NON_VOLATILE");
1489	printf("}\n");
1490	printf("\tBase Address=0x%016jx\n", (uintmax_t)mp->BaseAddress);
1491	printf("\tLength=0x%016jx\n", (uintmax_t)mp->Length);
1492	printf("\tProximity Domain=%d\n", mp->ProximityDomain);
1493}
1494
1495static const char *srat_types[] = {
1496    [ACPI_SRAT_TYPE_CPU_AFFINITY] = "CPU",
1497    [ACPI_SRAT_TYPE_MEMORY_AFFINITY] = "Memory",
1498    [ACPI_SRAT_TYPE_X2APIC_CPU_AFFINITY] = "X2APIC",
1499    [ACPI_SRAT_TYPE_GICC_AFFINITY] = "GICC",
1500    [ACPI_SRAT_TYPE_GIC_ITS_AFFINITY] = "GIC ITS",
1501};
1502
1503static void
1504acpi_print_srat(ACPI_SUBTABLE_HEADER *srat)
1505{
1506	ACPI_SRAT_CPU_AFFINITY *cpu;
1507	ACPI_SRAT_X2APIC_CPU_AFFINITY *x2apic;
1508	ACPI_SRAT_GICC_AFFINITY *gic;
1509
1510	if (srat->Type < nitems(srat_types))
1511		printf("\tType=%s\n", srat_types[srat->Type]);
1512	else
1513		printf("\tType=%d (unknown)\n", srat->Type);
1514	switch (srat->Type) {
1515	case ACPI_SRAT_TYPE_CPU_AFFINITY:
1516		cpu = (ACPI_SRAT_CPU_AFFINITY *)srat;
1517		acpi_print_srat_cpu(cpu->ApicId,
1518		    cpu->ProximityDomainHi[2] << 24 |
1519		    cpu->ProximityDomainHi[1] << 16 |
1520		    cpu->ProximityDomainHi[0] << 0 |
1521		    cpu->ProximityDomainLo, cpu->Flags);
1522		break;
1523	case ACPI_SRAT_TYPE_MEMORY_AFFINITY:
1524		acpi_print_srat_memory((ACPI_SRAT_MEM_AFFINITY *)srat);
1525		break;
1526	case ACPI_SRAT_TYPE_X2APIC_CPU_AFFINITY:
1527		x2apic = (ACPI_SRAT_X2APIC_CPU_AFFINITY *)srat;
1528		acpi_print_srat_cpu(x2apic->ApicId, x2apic->ProximityDomain,
1529		    x2apic->Flags);
1530		break;
1531	case ACPI_SRAT_TYPE_GICC_AFFINITY:
1532		gic = (ACPI_SRAT_GICC_AFFINITY *)srat;
1533		acpi_print_srat_cpu(gic->AcpiProcessorUid, gic->ProximityDomain,
1534		    gic->Flags);
1535		break;
1536	}
1537}
1538
1539static void
1540acpi_handle_srat(ACPI_TABLE_HEADER *sdp)
1541{
1542	ACPI_TABLE_SRAT *srat;
1543
1544	printf(BEGIN_COMMENT);
1545	acpi_print_sdt(sdp);
1546	srat = (ACPI_TABLE_SRAT *)sdp;
1547	printf("\tTable Revision=%d\n", srat->TableRevision);
1548	acpi_walk_subtables(sdp, (srat + 1), acpi_print_srat);
1549	printf(END_COMMENT);
1550}
1551
1552static const char *nfit_types[] = {
1553    [ACPI_NFIT_TYPE_SYSTEM_ADDRESS] = "System Address",
1554    [ACPI_NFIT_TYPE_MEMORY_MAP] = "Memory Map",
1555    [ACPI_NFIT_TYPE_INTERLEAVE] = "Interleave",
1556    [ACPI_NFIT_TYPE_SMBIOS] = "SMBIOS",
1557    [ACPI_NFIT_TYPE_CONTROL_REGION] = "Control Region",
1558    [ACPI_NFIT_TYPE_DATA_REGION] = "Data Region",
1559    [ACPI_NFIT_TYPE_FLUSH_ADDRESS] = "Flush Address",
1560    [ACPI_NFIT_TYPE_CAPABILITIES] = "Platform Capabilities"
1561};
1562
1563
1564static void
1565acpi_print_nfit(ACPI_NFIT_HEADER *nfit)
1566{
1567	char *uuidstr;
1568	uint32_t status;
1569
1570	ACPI_NFIT_SYSTEM_ADDRESS *sysaddr;
1571	ACPI_NFIT_MEMORY_MAP *mmap;
1572	ACPI_NFIT_INTERLEAVE *ileave;
1573	ACPI_NFIT_SMBIOS *smbios;
1574	ACPI_NFIT_CONTROL_REGION *ctlreg;
1575	ACPI_NFIT_DATA_REGION *datareg;
1576	ACPI_NFIT_FLUSH_ADDRESS *fladdr;
1577	ACPI_NFIT_CAPABILITIES *caps;
1578
1579	if (nfit->Type < nitems(nfit_types))
1580		printf("\tType=%s\n", nfit_types[nfit->Type]);
1581	else
1582		printf("\tType=%u (unknown)\n", nfit->Type);
1583	switch (nfit->Type) {
1584	case ACPI_NFIT_TYPE_SYSTEM_ADDRESS:
1585		sysaddr = (ACPI_NFIT_SYSTEM_ADDRESS *)nfit;
1586		printf("\tRangeIndex=%u\n", (u_int)sysaddr->RangeIndex);
1587		printf("\tProximityDomain=%u\n",
1588		    (u_int)sysaddr->ProximityDomain);
1589		uuid_to_string((uuid_t *)(sysaddr->RangeGuid),
1590		    &uuidstr, &status);
1591		if (status != uuid_s_ok)
1592			errx(1, "uuid_to_string: status=%u", status);
1593		printf("\tRangeGuid=%s\n", uuidstr);
1594		free(uuidstr);
1595		printf("\tAddress=0x%016jx\n", (uintmax_t)sysaddr->Address);
1596		printf("\tLength=0x%016jx\n", (uintmax_t)sysaddr->Length);
1597		printf("\tMemoryMapping=0x%016jx\n",
1598		    (uintmax_t)sysaddr->MemoryMapping);
1599
1600#define PRINTFLAG(var, flag)	printflag((var), ACPI_NFIT_## flag, #flag)
1601
1602		printf("\tFlags=");
1603		PRINTFLAG(sysaddr->Flags, ADD_ONLINE_ONLY);
1604		PRINTFLAG(sysaddr->Flags, PROXIMITY_VALID);
1605		PRINTFLAG_END();
1606
1607#undef PRINTFLAG
1608
1609		break;
1610	case ACPI_NFIT_TYPE_MEMORY_MAP:
1611		mmap = (ACPI_NFIT_MEMORY_MAP *)nfit;
1612		printf("\tDeviceHandle=0x%x\n", (u_int)mmap->DeviceHandle);
1613		printf("\tPhysicalId=0x%04x\n", (u_int)mmap->PhysicalId);
1614		printf("\tRegionId=%u\n", (u_int)mmap->RegionId);
1615		printf("\tRangeIndex=%u\n", (u_int)mmap->RangeIndex);
1616		printf("\tRegionIndex=%u\n", (u_int)mmap->RegionIndex);
1617		printf("\tRegionSize=0x%016jx\n", (uintmax_t)mmap->RegionSize);
1618		printf("\tRegionOffset=0x%016jx\n",
1619		    (uintmax_t)mmap->RegionOffset);
1620		printf("\tAddress=0x%016jx\n", (uintmax_t)mmap->Address);
1621		printf("\tInterleaveIndex=%u\n", (u_int)mmap->InterleaveIndex);
1622		printf("\tInterleaveWays=%u\n", (u_int)mmap->InterleaveWays);
1623
1624#define PRINTFLAG(var, flag)	printflag((var), ACPI_NFIT_MEM_## flag, #flag)
1625
1626		printf("\tFlags=");
1627		PRINTFLAG(mmap->Flags, SAVE_FAILED);
1628		PRINTFLAG(mmap->Flags, RESTORE_FAILED);
1629		PRINTFLAG(mmap->Flags, FLUSH_FAILED);
1630		PRINTFLAG(mmap->Flags, NOT_ARMED);
1631		PRINTFLAG(mmap->Flags, HEALTH_OBSERVED);
1632		PRINTFLAG(mmap->Flags, HEALTH_ENABLED);
1633		PRINTFLAG(mmap->Flags, MAP_FAILED);
1634		PRINTFLAG_END();
1635
1636#undef PRINTFLAG
1637
1638		break;
1639	case ACPI_NFIT_TYPE_INTERLEAVE:
1640		ileave = (ACPI_NFIT_INTERLEAVE *)nfit;
1641		printf("\tInterleaveIndex=%u\n",
1642		    (u_int)ileave->InterleaveIndex);
1643		printf("\tLineCount=%u\n", (u_int)ileave->LineCount);
1644		printf("\tLineSize=%u\n", (u_int)ileave->LineSize);
1645		/* XXX ileave->LineOffset[i] output is not supported */
1646		break;
1647	case ACPI_NFIT_TYPE_SMBIOS:
1648		smbios = (ACPI_NFIT_SMBIOS *)nfit;
1649		/* XXX smbios->Data[x] output is not supported */
1650		break;
1651	case ACPI_NFIT_TYPE_CONTROL_REGION:
1652		ctlreg = (ACPI_NFIT_CONTROL_REGION *)nfit;
1653		printf("\tRegionIndex=%u\n", (u_int)ctlreg->RegionIndex);
1654		printf("\tVendorId=0x%04x\n", (u_int)ctlreg->VendorId);
1655		printf("\tDeviceId=0x%04x\n", (u_int)ctlreg->DeviceId);
1656		printf("\tRevisionId=0x%02x\n", (u_int)ctlreg->RevisionId);
1657		printf("\tSubsystemVendorId=0x%04x\n",
1658		    (u_int)ctlreg->SubsystemVendorId);
1659		printf("\tSubsystemDeviceId=0x%04x\n",
1660		    (u_int)ctlreg->SubsystemDeviceId);
1661		printf("\tSubsystemRevisionId=0x%02x\n",
1662		    (u_int)ctlreg->SubsystemRevisionId);
1663		printf("\tValidFields=0x%02x\n", (u_int)ctlreg->ValidFields);
1664		printf("\tManufacturingLocation=0x%02x\n",
1665		    (u_int)ctlreg->ManufacturingLocation);
1666		printf("\tManufacturingDate=%04x\n",
1667		    (u_int)be16toh(ctlreg->ManufacturingDate));
1668		printf("\tSerialNumber=%08X\n",
1669		    (u_int)be32toh(ctlreg->SerialNumber));
1670		printf("\tCode=0x%04x\n", (u_int)ctlreg->Code);
1671		printf("\tWindows=%u\n", (u_int)ctlreg->Windows);
1672		printf("\tWindowSize=0x%016jx\n",
1673		    (uintmax_t)ctlreg->WindowSize);
1674		printf("\tCommandOffset=0x%016jx\n",
1675		    (uintmax_t)ctlreg->CommandOffset);
1676		printf("\tCommandSize=0x%016jx\n",
1677		    (uintmax_t)ctlreg->CommandSize);
1678		printf("\tStatusOffset=0x%016jx\n",
1679		    (uintmax_t)ctlreg->StatusOffset);
1680		printf("\tStatusSize=0x%016jx\n",
1681		    (uintmax_t)ctlreg->StatusSize);
1682
1683#define PRINTFLAG(var, flag)	printflag((var), ACPI_NFIT_## flag, #flag)
1684
1685		printf("\tFlags=");
1686		PRINTFLAG(ctlreg->Flags, CONTROL_BUFFERED);
1687		PRINTFLAG_END();
1688
1689#undef PRINTFLAG
1690
1691		break;
1692	case ACPI_NFIT_TYPE_DATA_REGION:
1693		datareg = (ACPI_NFIT_DATA_REGION *)nfit;
1694		printf("\tRegionIndex=%u\n", (u_int)datareg->RegionIndex);
1695		printf("\tWindows=%u\n", (u_int)datareg->Windows);
1696		printf("\tOffset=0x%016jx\n", (uintmax_t)datareg->Offset);
1697		printf("\tSize=0x%016jx\n", (uintmax_t)datareg->Size);
1698		printf("\tCapacity=0x%016jx\n", (uintmax_t)datareg->Capacity);
1699		printf("\tStartAddress=0x%016jx\n",
1700		    (uintmax_t)datareg->StartAddress);
1701		break;
1702	case ACPI_NFIT_TYPE_FLUSH_ADDRESS:
1703		fladdr = (ACPI_NFIT_FLUSH_ADDRESS *)nfit;
1704		printf("\tDeviceHandle=%u\n", (u_int)fladdr->DeviceHandle);
1705		printf("\tHintCount=%u\n", (u_int)fladdr->HintCount);
1706		/* XXX fladdr->HintAddress[i] output is not supported */
1707		break;
1708	case ACPI_NFIT_TYPE_CAPABILITIES:
1709		caps = (ACPI_NFIT_CAPABILITIES *)nfit;
1710		printf("\tHighestCapability=%u\n", (u_int)caps->HighestCapability);
1711
1712#define PRINTFLAG(var, flag)	printflag((var), ACPI_NFIT_CAPABILITY_## flag, #flag)
1713
1714		printf("\tCapabilities=");
1715		PRINTFLAG(caps->Capabilities, CACHE_FLUSH);
1716		PRINTFLAG(caps->Capabilities, MEM_FLUSH);
1717		PRINTFLAG(caps->Capabilities, MEM_MIRRORING);
1718		PRINTFLAG_END();
1719
1720#undef PRINTFLAG
1721		break;
1722	}
1723}
1724
1725static void
1726acpi_handle_nfit(ACPI_TABLE_HEADER *sdp)
1727{
1728	ACPI_TABLE_NFIT *nfit;
1729
1730	printf(BEGIN_COMMENT);
1731	acpi_print_sdt(sdp);
1732	nfit = (ACPI_TABLE_NFIT *)sdp;
1733	acpi_walk_nfit(sdp, (nfit + 1), acpi_print_nfit);
1734	printf(END_COMMENT);
1735}
1736
1737static void
1738acpi_print_sdt(ACPI_TABLE_HEADER *sdp)
1739{
1740	printf("  ");
1741	acpi_print_string(sdp->Signature, ACPI_NAMESEG_SIZE);
1742	printf(": Length=%d, Revision=%d, Checksum=%d,\n",
1743	       sdp->Length, sdp->Revision, sdp->Checksum);
1744	printf("\tOEMID=");
1745	acpi_print_string(sdp->OemId, ACPI_OEM_ID_SIZE);
1746	printf(", OEM Table ID=");
1747	acpi_print_string(sdp->OemTableId, ACPI_OEM_TABLE_ID_SIZE);
1748	printf(", OEM Revision=0x%x,\n", sdp->OemRevision);
1749	printf("\tCreator ID=");
1750	acpi_print_string(sdp->AslCompilerId, ACPI_NAMESEG_SIZE);
1751	printf(", Creator Revision=0x%x\n", sdp->AslCompilerRevision);
1752}
1753
1754static void
1755acpi_print_rsdt(ACPI_TABLE_HEADER *rsdp)
1756{
1757	ACPI_TABLE_RSDT *rsdt;
1758	ACPI_TABLE_XSDT *xsdt;
1759	int	i, entries;
1760
1761	rsdt = (ACPI_TABLE_RSDT *)rsdp;
1762	xsdt = (ACPI_TABLE_XSDT *)rsdp;
1763	printf(BEGIN_COMMENT);
1764	acpi_print_sdt(rsdp);
1765	entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
1766	printf("\tEntries={ ");
1767	for (i = 0; i < entries; i++) {
1768		if (i > 0)
1769			printf(", ");
1770		if (addr_size == 4)
1771			printf("0x%08x", le32toh(rsdt->TableOffsetEntry[i]));
1772		else
1773			printf("0x%016jx",
1774			    (uintmax_t)le64toh(xsdt->TableOffsetEntry[i]));
1775	}
1776	printf(" }\n");
1777	printf(END_COMMENT);
1778}
1779
1780static const char *acpi_pm_profiles[] = {
1781	"Unspecified", "Desktop", "Mobile", "Workstation",
1782	"Enterprise Server", "SOHO Server", "Appliance PC"
1783};
1784
1785static void
1786acpi_print_fadt(ACPI_TABLE_HEADER *sdp)
1787{
1788	ACPI_TABLE_FADT *fadt;
1789	const char *pm;
1790
1791	fadt = (ACPI_TABLE_FADT *)sdp;
1792	printf(BEGIN_COMMENT);
1793	acpi_print_sdt(sdp);
1794	printf(" \tFACS=0x%x, DSDT=0x%x\n", fadt->Facs,
1795	       fadt->Dsdt);
1796	printf("\tINT_MODEL=%s\n", fadt->Model ? "APIC" : "PIC");
1797	if (fadt->PreferredProfile >= sizeof(acpi_pm_profiles) / sizeof(char *))
1798		pm = "Reserved";
1799	else
1800		pm = acpi_pm_profiles[fadt->PreferredProfile];
1801	printf("\tPreferred_PM_Profile=%s (%d)\n", pm, fadt->PreferredProfile);
1802	printf("\tSCI_INT=%d\n", fadt->SciInterrupt);
1803	printf("\tSMI_CMD=0x%x, ", fadt->SmiCommand);
1804	printf("ACPI_ENABLE=0x%x, ", fadt->AcpiEnable);
1805	printf("ACPI_DISABLE=0x%x, ", fadt->AcpiDisable);
1806	printf("S4BIOS_REQ=0x%x\n", fadt->S4BiosRequest);
1807	printf("\tPSTATE_CNT=0x%x\n", fadt->PstateControl);
1808	printf("\tPM1a_EVT_BLK=0x%x-0x%x\n",
1809	       fadt->Pm1aEventBlock,
1810	       fadt->Pm1aEventBlock + fadt->Pm1EventLength - 1);
1811	if (fadt->Pm1bEventBlock != 0)
1812		printf("\tPM1b_EVT_BLK=0x%x-0x%x\n",
1813		       fadt->Pm1bEventBlock,
1814		       fadt->Pm1bEventBlock + fadt->Pm1EventLength - 1);
1815	printf("\tPM1a_CNT_BLK=0x%x-0x%x\n",
1816	       fadt->Pm1aControlBlock,
1817	       fadt->Pm1aControlBlock + fadt->Pm1ControlLength - 1);
1818	if (fadt->Pm1bControlBlock != 0)
1819		printf("\tPM1b_CNT_BLK=0x%x-0x%x\n",
1820		       fadt->Pm1bControlBlock,
1821		       fadt->Pm1bControlBlock + fadt->Pm1ControlLength - 1);
1822	if (fadt->Pm2ControlBlock != 0)
1823		printf("\tPM2_CNT_BLK=0x%x-0x%x\n",
1824		       fadt->Pm2ControlBlock,
1825		       fadt->Pm2ControlBlock + fadt->Pm2ControlLength - 1);
1826	printf("\tPM_TMR_BLK=0x%x-0x%x\n",
1827	       fadt->PmTimerBlock,
1828	       fadt->PmTimerBlock + fadt->PmTimerLength - 1);
1829	if (fadt->Gpe0Block != 0)
1830		printf("\tGPE0_BLK=0x%x-0x%x\n",
1831		       fadt->Gpe0Block,
1832		       fadt->Gpe0Block + fadt->Gpe0BlockLength - 1);
1833	if (fadt->Gpe1Block != 0)
1834		printf("\tGPE1_BLK=0x%x-0x%x, GPE1_BASE=%d\n",
1835		       fadt->Gpe1Block,
1836		       fadt->Gpe1Block + fadt->Gpe1BlockLength - 1,
1837		       fadt->Gpe1Base);
1838	if (fadt->CstControl != 0)
1839		printf("\tCST_CNT=0x%x\n", fadt->CstControl);
1840	printf("\tP_LVL2_LAT=%d us, P_LVL3_LAT=%d us\n",
1841	       fadt->C2Latency, fadt->C3Latency);
1842	printf("\tFLUSH_SIZE=%d, FLUSH_STRIDE=%d\n",
1843	       fadt->FlushSize, fadt->FlushStride);
1844	printf("\tDUTY_OFFSET=%d, DUTY_WIDTH=%d\n",
1845	       fadt->DutyOffset, fadt->DutyWidth);
1846	printf("\tDAY_ALRM=%d, MON_ALRM=%d, CENTURY=%d\n",
1847	       fadt->DayAlarm, fadt->MonthAlarm, fadt->Century);
1848
1849#define PRINTFLAG(var, flag)	printflag((var), ACPI_FADT_## flag, #flag)
1850
1851	printf("\tIAPC_BOOT_ARCH=");
1852	PRINTFLAG(fadt->BootFlags, LEGACY_DEVICES);
1853	PRINTFLAG(fadt->BootFlags, 8042);
1854	PRINTFLAG(fadt->BootFlags, NO_VGA);
1855	PRINTFLAG(fadt->BootFlags, NO_MSI);
1856	PRINTFLAG(fadt->BootFlags, NO_ASPM);
1857	PRINTFLAG(fadt->BootFlags, NO_CMOS_RTC);
1858	PRINTFLAG_END();
1859
1860	printf("\tFlags=");
1861	PRINTFLAG(fadt->Flags, WBINVD);
1862	PRINTFLAG(fadt->Flags, WBINVD_FLUSH);
1863	PRINTFLAG(fadt->Flags, C1_SUPPORTED);
1864	PRINTFLAG(fadt->Flags, C2_MP_SUPPORTED);
1865	PRINTFLAG(fadt->Flags, POWER_BUTTON);
1866	PRINTFLAG(fadt->Flags, SLEEP_BUTTON);
1867	PRINTFLAG(fadt->Flags, FIXED_RTC);
1868	PRINTFLAG(fadt->Flags, S4_RTC_WAKE);
1869	PRINTFLAG(fadt->Flags, 32BIT_TIMER);
1870	PRINTFLAG(fadt->Flags, DOCKING_SUPPORTED);
1871	PRINTFLAG(fadt->Flags, RESET_REGISTER);
1872	PRINTFLAG(fadt->Flags, SEALED_CASE);
1873	PRINTFLAG(fadt->Flags, HEADLESS);
1874	PRINTFLAG(fadt->Flags, SLEEP_TYPE);
1875	PRINTFLAG(fadt->Flags, PCI_EXPRESS_WAKE);
1876	PRINTFLAG(fadt->Flags, PLATFORM_CLOCK);
1877	PRINTFLAG(fadt->Flags, S4_RTC_VALID);
1878	PRINTFLAG(fadt->Flags, REMOTE_POWER_ON);
1879	PRINTFLAG(fadt->Flags, APIC_CLUSTER);
1880	PRINTFLAG(fadt->Flags, APIC_PHYSICAL);
1881	PRINTFLAG(fadt->Flags, HW_REDUCED);
1882	PRINTFLAG(fadt->Flags, LOW_POWER_S0);
1883	PRINTFLAG_END();
1884
1885#undef PRINTFLAG
1886
1887	if (fadt->Flags & ACPI_FADT_RESET_REGISTER) {
1888		printf("\tRESET_REG=");
1889		acpi_print_gas(&fadt->ResetRegister);
1890		printf(", RESET_VALUE=%#x\n", fadt->ResetValue);
1891	}
1892	if (acpi_get_fadt_revision(fadt) > 1) {
1893		printf("\tX_FACS=0x%016jx, ", (uintmax_t)fadt->XFacs);
1894		printf("X_DSDT=0x%016jx\n", (uintmax_t)fadt->XDsdt);
1895		printf("\tX_PM1a_EVT_BLK=");
1896		acpi_print_gas(&fadt->XPm1aEventBlock);
1897		if (fadt->XPm1bEventBlock.Address != 0) {
1898			printf("\n\tX_PM1b_EVT_BLK=");
1899			acpi_print_gas(&fadt->XPm1bEventBlock);
1900		}
1901		printf("\n\tX_PM1a_CNT_BLK=");
1902		acpi_print_gas(&fadt->XPm1aControlBlock);
1903		if (fadt->XPm1bControlBlock.Address != 0) {
1904			printf("\n\tX_PM1b_CNT_BLK=");
1905			acpi_print_gas(&fadt->XPm1bControlBlock);
1906		}
1907		if (fadt->XPm2ControlBlock.Address != 0) {
1908			printf("\n\tX_PM2_CNT_BLK=");
1909			acpi_print_gas(&fadt->XPm2ControlBlock);
1910		}
1911		printf("\n\tX_PM_TMR_BLK=");
1912		acpi_print_gas(&fadt->XPmTimerBlock);
1913		if (fadt->XGpe0Block.Address != 0) {
1914			printf("\n\tX_GPE0_BLK=");
1915			acpi_print_gas(&fadt->XGpe0Block);
1916		}
1917		if (fadt->XGpe1Block.Address != 0) {
1918			printf("\n\tX_GPE1_BLK=");
1919			acpi_print_gas(&fadt->XGpe1Block);
1920		}
1921		printf("\n");
1922	}
1923
1924	printf(END_COMMENT);
1925}
1926
1927static void
1928acpi_print_facs(ACPI_TABLE_FACS *facs)
1929{
1930	printf(BEGIN_COMMENT);
1931	printf("  FACS:\tLength=%u, ", facs->Length);
1932	printf("HwSig=0x%08x, ", facs->HardwareSignature);
1933	printf("Firm_Wake_Vec=0x%08x\n", facs->FirmwareWakingVector);
1934
1935	printf("\tGlobal_Lock=");
1936	if (facs->GlobalLock != 0) {
1937		if (facs->GlobalLock & ACPI_GLOCK_PENDING)
1938			printf("PENDING,");
1939		if (facs->GlobalLock & ACPI_GLOCK_OWNED)
1940			printf("OWNED");
1941	}
1942	printf("\n");
1943
1944	printf("\tFlags=");
1945	if (facs->Flags & ACPI_FACS_S4_BIOS_PRESENT)
1946		printf("S4BIOS");
1947	printf("\n");
1948
1949	if (facs->XFirmwareWakingVector != 0)
1950		printf("\tX_Firm_Wake_Vec=%016jx\n",
1951		    (uintmax_t)facs->XFirmwareWakingVector);
1952	printf("\tVersion=%u\n", facs->Version);
1953
1954	printf(END_COMMENT);
1955}
1956
1957static void
1958acpi_print_dsdt(ACPI_TABLE_HEADER *dsdp)
1959{
1960	printf(BEGIN_COMMENT);
1961	acpi_print_sdt(dsdp);
1962	printf(END_COMMENT);
1963}
1964
1965int
1966acpi_checksum(void *p, size_t length)
1967{
1968	uint8_t *bp;
1969	uint8_t sum;
1970
1971	bp = p;
1972	sum = 0;
1973	while (length--)
1974		sum += *bp++;
1975
1976	return (sum);
1977}
1978
1979static ACPI_TABLE_HEADER *
1980acpi_map_sdt(vm_offset_t pa)
1981{
1982	ACPI_TABLE_HEADER *sp;
1983
1984	sp = acpi_map_physical(pa, sizeof(ACPI_TABLE_HEADER));
1985	sp = acpi_map_physical(pa, sp->Length);
1986	return (sp);
1987}
1988
1989static void
1990acpi_print_rsd_ptr(ACPI_TABLE_RSDP *rp)
1991{
1992	printf(BEGIN_COMMENT);
1993	printf("  RSD PTR: OEM=");
1994	acpi_print_string(rp->OemId, ACPI_OEM_ID_SIZE);
1995	printf(", ACPI_Rev=%s (%d)\n", rp->Revision < 2 ? "1.0x" : "2.0x",
1996	       rp->Revision);
1997	if (rp->Revision < 2) {
1998		printf("\tRSDT=0x%08x, cksum=%u\n", rp->RsdtPhysicalAddress,
1999		    rp->Checksum);
2000	} else {
2001		printf("\tXSDT=0x%016jx, length=%u, cksum=%u\n",
2002		    (uintmax_t)rp->XsdtPhysicalAddress, rp->Length,
2003		    rp->ExtendedChecksum);
2004	}
2005	printf(END_COMMENT);
2006}
2007
2008static void
2009acpi_handle_rsdt(ACPI_TABLE_HEADER *rsdp)
2010{
2011	ACPI_TABLE_HEADER *sdp;
2012	ACPI_TABLE_RSDT *rsdt;
2013	ACPI_TABLE_XSDT *xsdt;
2014	vm_offset_t addr;
2015	int entries, i;
2016
2017	acpi_print_rsdt(rsdp);
2018	rsdt = (ACPI_TABLE_RSDT *)rsdp;
2019	xsdt = (ACPI_TABLE_XSDT *)rsdp;
2020	entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
2021	for (i = 0; i < entries; i++) {
2022		if (addr_size == 4)
2023			addr = le32toh(rsdt->TableOffsetEntry[i]);
2024		else
2025			addr = le64toh(xsdt->TableOffsetEntry[i]);
2026		if (addr == 0)
2027			continue;
2028		sdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(addr);
2029		if (acpi_checksum(sdp, sdp->Length)) {
2030			warnx("RSDT entry %d (sig %.4s) is corrupt", i,
2031			    sdp->Signature);
2032			continue;
2033		}
2034		if (!memcmp(sdp->Signature, ACPI_SIG_BERT, 4))
2035			acpi_handle_bert(sdp);
2036		else if (!memcmp(sdp->Signature, ACPI_SIG_EINJ, 4))
2037			acpi_handle_einj(sdp);
2038		else if (!memcmp(sdp->Signature, ACPI_SIG_ERST, 4))
2039			acpi_handle_erst(sdp);
2040		else if (!memcmp(sdp->Signature, ACPI_SIG_FADT, 4))
2041			acpi_handle_fadt(sdp);
2042		else if (!memcmp(sdp->Signature, ACPI_SIG_MADT, 4))
2043			acpi_handle_madt(sdp);
2044		else if (!memcmp(sdp->Signature, ACPI_SIG_HEST, 4))
2045			acpi_handle_hest(sdp);
2046		else if (!memcmp(sdp->Signature, ACPI_SIG_HPET, 4))
2047			acpi_handle_hpet(sdp);
2048		else if (!memcmp(sdp->Signature, ACPI_SIG_ECDT, 4))
2049			acpi_handle_ecdt(sdp);
2050		else if (!memcmp(sdp->Signature, ACPI_SIG_MCFG, 4))
2051			acpi_handle_mcfg(sdp);
2052		else if (!memcmp(sdp->Signature, ACPI_SIG_SLIT, 4))
2053			acpi_handle_slit(sdp);
2054		else if (!memcmp(sdp->Signature, ACPI_SIG_SRAT, 4))
2055			acpi_handle_srat(sdp);
2056		else if (!memcmp(sdp->Signature, ACPI_SIG_TCPA, 4))
2057			acpi_handle_tcpa(sdp);
2058		else if (!memcmp(sdp->Signature, ACPI_SIG_DMAR, 4))
2059			acpi_handle_dmar(sdp);
2060		else if (!memcmp(sdp->Signature, ACPI_SIG_NFIT, 4))
2061			acpi_handle_nfit(sdp);
2062		else if (!memcmp(sdp->Signature, ACPI_SIG_WDDT, 4))
2063			acpi_handle_wddt(sdp);
2064		else if (!memcmp(sdp->Signature, ACPI_SIG_LPIT, 4))
2065			acpi_handle_lpit(sdp);
2066		else if (!memcmp(sdp->Signature, ACPI_SIG_TPM2, 4))
2067			acpi_handle_tpm2(sdp);
2068		else {
2069			printf(BEGIN_COMMENT);
2070			acpi_print_sdt(sdp);
2071			printf(END_COMMENT);
2072		}
2073	}
2074}
2075
2076ACPI_TABLE_HEADER *
2077sdt_load_devmem(void)
2078{
2079	ACPI_TABLE_RSDP *rp;
2080	ACPI_TABLE_HEADER *rsdp;
2081
2082	rp = acpi_find_rsd_ptr();
2083	if (!rp)
2084		errx(1, "Can't find ACPI information");
2085
2086	if (tflag)
2087		acpi_print_rsd_ptr(rp);
2088	if (rp->Revision < 2) {
2089		rsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(rp->RsdtPhysicalAddress);
2090		if (memcmp(rsdp->Signature, "RSDT", 4) != 0 ||
2091		    acpi_checksum(rsdp, rsdp->Length) != 0)
2092			errx(1, "RSDT is corrupted");
2093		addr_size = sizeof(uint32_t);
2094	} else {
2095		rsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(rp->XsdtPhysicalAddress);
2096		if (memcmp(rsdp->Signature, "XSDT", 4) != 0 ||
2097		    acpi_checksum(rsdp, rsdp->Length) != 0)
2098			errx(1, "XSDT is corrupted");
2099		addr_size = sizeof(uint64_t);
2100	}
2101	return (rsdp);
2102}
2103
2104/* Write the DSDT to a file, concatenating any SSDTs (if present). */
2105static int
2106write_dsdt(int fd, ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdt)
2107{
2108	ACPI_TABLE_HEADER sdt;
2109	ACPI_TABLE_HEADER *ssdt;
2110	uint8_t sum;
2111
2112	/* Create a new checksum to account for the DSDT and any SSDTs. */
2113	sdt = *dsdt;
2114	if (rsdt != NULL) {
2115		sdt.Checksum = 0;
2116		sum = acpi_checksum(dsdt + 1, dsdt->Length -
2117		    sizeof(ACPI_TABLE_HEADER));
2118		ssdt = sdt_from_rsdt(rsdt, ACPI_SIG_SSDT, NULL);
2119		while (ssdt != NULL) {
2120			sdt.Length += ssdt->Length - sizeof(ACPI_TABLE_HEADER);
2121			sum += acpi_checksum(ssdt + 1,
2122			    ssdt->Length - sizeof(ACPI_TABLE_HEADER));
2123			ssdt = sdt_from_rsdt(rsdt, ACPI_SIG_SSDT, ssdt);
2124		}
2125		sum += acpi_checksum(&sdt, sizeof(ACPI_TABLE_HEADER));
2126		sdt.Checksum -= sum;
2127	}
2128
2129	/* Write out the DSDT header and body. */
2130	write(fd, &sdt, sizeof(ACPI_TABLE_HEADER));
2131	write(fd, dsdt + 1, dsdt->Length - sizeof(ACPI_TABLE_HEADER));
2132
2133	/* Write out any SSDTs (if present.) */
2134	if (rsdt != NULL) {
2135		ssdt = sdt_from_rsdt(rsdt, "SSDT", NULL);
2136		while (ssdt != NULL) {
2137			write(fd, ssdt + 1, ssdt->Length -
2138			    sizeof(ACPI_TABLE_HEADER));
2139			ssdt = sdt_from_rsdt(rsdt, "SSDT", ssdt);
2140		}
2141	}
2142	return (0);
2143}
2144
2145void
2146dsdt_save_file(char *outfile, ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdp)
2147{
2148	int	fd;
2149	mode_t	mode;
2150
2151	assert(outfile != NULL);
2152	mode = S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH;
2153	fd = open(outfile, O_WRONLY | O_CREAT | O_TRUNC, mode);
2154	if (fd == -1) {
2155		perror("dsdt_save_file");
2156		return;
2157	}
2158	write_dsdt(fd, rsdt, dsdp);
2159	close(fd);
2160}
2161
2162void
2163aml_disassemble(ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdp)
2164{
2165	char buf[PATH_MAX], tmpstr[PATH_MAX], wrkdir[PATH_MAX];
2166	const char *iname = "/acpdump.din";
2167	const char *oname = "/acpdump.dsl";
2168	const char *tmpdir;
2169	FILE *fp;
2170	size_t len;
2171	int fd, status;
2172	pid_t pid;
2173
2174	tmpdir = getenv("TMPDIR");
2175	if (tmpdir == NULL)
2176		tmpdir = _PATH_TMP;
2177	if (realpath(tmpdir, buf) == NULL) {
2178		perror("realpath tmp dir");
2179		return;
2180	}
2181	len = sizeof(wrkdir) - strlen(iname);
2182	if ((size_t)snprintf(wrkdir, len, "%s/acpidump.XXXXXX", buf) > len-1 ) {
2183		fprintf(stderr, "$TMPDIR too long\n");
2184		return;
2185	}
2186	if  (mkdtemp(wrkdir) == NULL) {
2187		perror("mkdtemp tmp working dir");
2188		return;
2189	}
2190	len = (size_t)snprintf(tmpstr, sizeof(tmpstr), "%s%s", wrkdir, iname);
2191	assert(len <= sizeof(tmpstr) - 1);
2192	fd = open(tmpstr, O_CREAT | O_WRONLY, S_IRUSR | S_IWUSR);
2193	if (fd < 0) {
2194		perror("iasl tmp file");
2195		return;
2196	}
2197	write_dsdt(fd, rsdt, dsdp);
2198	close(fd);
2199
2200	/* Run iasl -d on the temp file */
2201	if ((pid = fork()) == 0) {
2202		close(STDOUT_FILENO);
2203		if (vflag == 0)
2204			close(STDERR_FILENO);
2205		execl("/usr/sbin/iasl", "iasl", "-d", tmpstr, NULL);
2206		err(1, "exec");
2207	}
2208	if (pid > 0)
2209		wait(&status);
2210	if (unlink(tmpstr) < 0) {
2211		perror("unlink");
2212		goto out;
2213	}
2214	if (pid < 0) {
2215		perror("fork");
2216		goto out;
2217	}
2218	if (status != 0) {
2219		fprintf(stderr, "iast exit status = %d\n", status);
2220	}
2221
2222	/* Dump iasl's output to stdout */
2223	len = (size_t)snprintf(tmpstr, sizeof(tmpstr), "%s%s", wrkdir, oname);
2224	assert(len <= sizeof(tmpstr) - 1);
2225	fp = fopen(tmpstr, "r");
2226	if (unlink(tmpstr) < 0) {
2227		perror("unlink");
2228		goto out;
2229	}
2230	if (fp == NULL) {
2231		perror("iasl tmp file (read)");
2232		goto out;
2233	}
2234	while ((len = fread(buf, 1, sizeof(buf), fp)) > 0)
2235		fwrite(buf, 1, len, stdout);
2236	fclose(fp);
2237
2238    out:
2239	if (rmdir(wrkdir) < 0)
2240		perror("rmdir");
2241}
2242
2243void
2244sdt_print_all(ACPI_TABLE_HEADER *rsdp)
2245{
2246	acpi_handle_rsdt(rsdp);
2247}
2248
2249/* Fetch a table matching the given signature via the RSDT. */
2250ACPI_TABLE_HEADER *
2251sdt_from_rsdt(ACPI_TABLE_HEADER *rsdp, const char *sig, ACPI_TABLE_HEADER *last)
2252{
2253	ACPI_TABLE_HEADER *sdt;
2254	ACPI_TABLE_RSDT *rsdt;
2255	ACPI_TABLE_XSDT *xsdt;
2256	vm_offset_t addr;
2257	int entries, i;
2258
2259	rsdt = (ACPI_TABLE_RSDT *)rsdp;
2260	xsdt = (ACPI_TABLE_XSDT *)rsdp;
2261	entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
2262	for (i = 0; i < entries; i++) {
2263		if (addr_size == 4)
2264			addr = le32toh(rsdt->TableOffsetEntry[i]);
2265		else
2266			addr = le64toh(xsdt->TableOffsetEntry[i]);
2267		if (addr == 0)
2268			continue;
2269		sdt = (ACPI_TABLE_HEADER *)acpi_map_sdt(addr);
2270		if (last != NULL) {
2271			if (sdt == last)
2272				last = NULL;
2273			continue;
2274		}
2275		if (memcmp(sdt->Signature, sig, strlen(sig)))
2276			continue;
2277		if (acpi_checksum(sdt, sdt->Length))
2278			errx(1, "RSDT entry %d is corrupt", i);
2279		return (sdt);
2280	}
2281
2282	return (NULL);
2283}
2284
2285ACPI_TABLE_HEADER *
2286dsdt_from_fadt(ACPI_TABLE_FADT *fadt)
2287{
2288	ACPI_TABLE_HEADER	*sdt;
2289
2290	/* Use the DSDT address if it is version 1, otherwise use XDSDT. */
2291	if (acpi_get_fadt_revision(fadt) == 1)
2292		sdt = (ACPI_TABLE_HEADER *)acpi_map_sdt(fadt->Dsdt);
2293	else
2294		sdt = (ACPI_TABLE_HEADER *)acpi_map_sdt(fadt->XDsdt);
2295	if (acpi_checksum(sdt, sdt->Length))
2296		errx(1, "DSDT is corrupt\n");
2297	return (sdt);
2298}
2299