1 /* $NetBSD: acpi.c,v 1.56 2024/05/12 23:00:21 msaitoh Exp $ */
2 
3 /*-
4  * Copyright (c) 1998 Doug Rabson
5  * Copyright (c) 2000 Mitsuru IWASAKI <iwasaki@FreeBSD.org>
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  *        $FreeBSD: head/usr.sbin/acpi/acpidump/acpi.c 321299 2017-07-20 17:36:17Z emaste $
30  */
31 
32 #include <sys/cdefs.h>
33 __RCSID("$NetBSD: acpi.c,v 1.56 2024/05/12 23:00:21 msaitoh Exp $");
34 
35 #include <sys/param.h>
36 #include <sys/endian.h>
37 #include <sys/stat.h>
38 #include <sys/wait.h>
39 #include <assert.h>
40 #include <err.h>
41 #include <fcntl.h>
42 #include <paths.h>
43 #include <stdbool.h>
44 #include <stdio.h>
45 #include <stdint.h>
46 #include <stdlib.h>
47 #include <string.h>
48 #include <unistd.h>
49 #include <stddef.h>
50 #include <uuid.h>
51 
52 #include "acpidump.h"
53 
54 #define BEGIN_COMMENT         "/*\n"
55 #define END_COMMENT " */\n"
56 
57 /* Commonly used helper functions */
58 static void         acpi_print_string(char *s, size_t length);
59 static void         acpi_print_tabs(unsigned int n);
60 static void         acpi_dump_bytes(uint8_t *p, uint32_t len, unsigned int ntabs);
61 static void         acpi_dump_table(ACPI_TABLE_HEADER *sdp);
62 static void         acpi_print_gas(ACPI_GENERIC_ADDRESS *gas);
63 static void         acpi_print_pci(uint16_t vendorid, uint16_t deviceid,
64                         uint8_t seg, uint8_t bus, uint8_t device, uint8_t func);
65 static void         acpi_print_pci_sbdf(uint8_t seg, uint8_t bus, uint8_t device,
66                         uint8_t func);
67 #ifdef notyet
68 static void         acpi_print_hest_generic_status(ACPI_HEST_GENERIC_STATUS *);
69 static void         acpi_print_hest_generic_data(ACPI_HEST_GENERIC_DATA *);
70 #endif
71 static void         acpi_print_whea(ACPI_WHEA_HEADER *whea,
72                         void (*print_action)(ACPI_WHEA_HEADER *),
73                         void (*print_ins)(ACPI_WHEA_HEADER *),
74                         void (*print_flags)(ACPI_WHEA_HEADER *));
75 static uint64_t     acpi_select_address(uint32_t, uint64_t);
76 
77 /* Handlers for each table */
78 static void         acpi_handle_fadt(ACPI_TABLE_HEADER *fadt);
79 static void         acpi_print_cpu(u_char cpu_id);
80 static void         acpi_print_cpu_uid(uint32_t uid, char *uid_string);
81 static void         acpi_print_local_apic(uint32_t apic_id, uint32_t flags);
82 static void         acpi_print_io_apic(uint32_t apic_id, uint32_t int_base,
83                         uint64_t apic_addr);
84 static void         acpi_print_mps_flags(uint16_t flags);
85 static void         acpi_print_intr(uint32_t intr, uint16_t mps_flags);
86 static void         acpi_print_local_nmi(u_int local_int, uint16_t mps_flags);
87 static void         acpi_print_madt(ACPI_SUBTABLE_HEADER *mp);
88 static void         acpi_handle_bert(ACPI_TABLE_HEADER *sdp);
89 static void         acpi_handle_bgrt(ACPI_TABLE_HEADER *sdp);
90 static void         acpi_handle_boot(ACPI_TABLE_HEADER *sdp);
91 static void         acpi_handle_cpep(ACPI_TABLE_HEADER *sdp);
92 static void         acpi_handle_csrt(ACPI_TABLE_HEADER *sdp);
93 static void         acpi_handle_dbgp(ACPI_TABLE_HEADER *sdp);
94 static void         acpi_handle_dbg2(ACPI_TABLE_HEADER *sdp);
95 static void         acpi_handle_einj(ACPI_TABLE_HEADER *sdp);
96 static void         acpi_handle_erst(ACPI_TABLE_HEADER *sdp);
97 static void         acpi_handle_gtdt(ACPI_TABLE_HEADER *sdp);
98 static void         acpi_handle_hest(ACPI_TABLE_HEADER *sdp);
99 static void         acpi_handle_iort(ACPI_TABLE_HEADER *sdp);
100 static void         acpi_handle_lpit(ACPI_TABLE_HEADER *sdp);
101 static void         acpi_handle_madt(ACPI_TABLE_HEADER *sdp);
102 static void         acpi_handle_msct(ACPI_TABLE_HEADER *sdp);
103 static void         acpi_handle_ecdt(ACPI_TABLE_HEADER *sdp);
104 static void         acpi_handle_hpet(ACPI_TABLE_HEADER *sdp);
105 static void         acpi_handle_mcfg(ACPI_TABLE_HEADER *sdp);
106 static void         acpi_handle_pcct(ACPI_TABLE_HEADER *sdp);
107 static void         acpi_handle_pptt(ACPI_TABLE_HEADER *sdp);
108 static void         acpi_handle_sbst(ACPI_TABLE_HEADER *sdp);
109 static void         acpi_handle_slit(ACPI_TABLE_HEADER *sdp);
110 static void         acpi_handle_spcr(ACPI_TABLE_HEADER *sdp);
111 static void         acpi_handle_spmi(ACPI_TABLE_HEADER *sdp);
112 static void         acpi_print_srat_cpu(uint8_t type, uint32_t apic_id,
113                         uint32_t proximity_domain,
114                         uint32_t flags, uint32_t clockdomain, uint8_t sapic_eid);
115 static void         acpi_print_srat_memory(ACPI_SRAT_MEM_AFFINITY *mp);
116 static void         acpi_print_srat(ACPI_SUBTABLE_HEADER *srat);
117 static void         acpi_handle_srat(ACPI_TABLE_HEADER *sdp);
118 static void         acpi_handle_tcpa(ACPI_TABLE_HEADER *sdp);
119 static void         acpi_handle_tpm2(ACPI_TABLE_HEADER *sdp);
120 static void         acpi_print_nfit(ACPI_NFIT_HEADER *nfit);
121 static void         acpi_handle_nfit(ACPI_TABLE_HEADER *sdp);
122 static void         acpi_handle_uefi(ACPI_TABLE_HEADER *sdp);
123 static void         acpi_handle_waet(ACPI_TABLE_HEADER *sdp);
124 static void         acpi_handle_wdat(ACPI_TABLE_HEADER *sdp);
125 static void         acpi_handle_wddt(ACPI_TABLE_HEADER *sdp);
126 static void         acpi_handle_wdrt(ACPI_TABLE_HEADER *sdp);
127 static void         acpi_print_sdt(ACPI_TABLE_HEADER *sdp);
128 static void         acpi_print_fadt(ACPI_TABLE_HEADER *sdp);
129 static void         acpi_print_facs(ACPI_TABLE_FACS *facs);
130 static void         acpi_print_dsdt(ACPI_TABLE_HEADER *dsdp);
131 static ACPI_TABLE_HEADER *acpi_map_sdt(vm_offset_t pa);
132 static void         acpi_print_rsd_ptr(ACPI_TABLE_RSDP *rp);
133 static void         acpi_handle_rsdt(ACPI_TABLE_HEADER *rsdp);
134 static void         acpi_walk_subtables(ACPI_TABLE_HEADER *table, void *first,
135                         void (*action)(ACPI_SUBTABLE_HEADER *));
136 static void         acpi_walk_nfit(ACPI_TABLE_HEADER *table, void *first,
137                         void (*action)(ACPI_NFIT_HEADER *));
138 
139 /* Size of an address. 32-bit for ACPI 1.0, 64-bit for ACPI 2.0 and up. */
140 static int addr_size;
141 
142 /* Strings used in the TCPA table */
143 static const char *tcpa_event_type_strings[] = {
144           "PREBOOT Certificate",
145           "POST Code",
146           "Unused",
147           "No Action",
148           "Separator",
149           "Action",
150           "Event Tag",
151           "S-CRTM Contents",
152           "S-CRTM Version",
153           "CPU Microcode",
154           "Platform Config Flags",
155           "Table of Devices",
156           "Compact Hash",
157           "IPL",
158           "IPL Partition Data",
159           "Non-Host Code",
160           "Non-Host Config",
161           "Non-Host Info"
162 };
163 
164 static const char *TCPA_pcclient_strings[] = {
165           "<undefined>",
166           "SMBIOS",
167           "BIS Certificate",
168           "POST BIOS ROM Strings",
169           "ESCD",
170           "CMOS",
171           "NVRAM",
172           "Option ROM Execute",
173           "Option ROM Configurateion",
174           "<undefined>",
175           "Option ROM Microcode Update ",
176           "S-CRTM Version String",
177           "S-CRTM Contents",
178           "POST Contents",
179           "Table of Devices",
180 };
181 
182 #define   PRINTFLAG_END()               printflag_end()
183 
184 static char pf_sep = '{';
185 
186 static void
printflag_end(void)187 printflag_end(void)
188 {
189 
190           if (pf_sep == ',') {
191                     printf("}");
192           } else if (pf_sep == '{') {
193                     printf("{}");
194           }
195           pf_sep = '{';
196           printf("\n");
197 }
198 
199 static void
printflag(uint64_t var,uint64_t mask,const char * name)200 printflag(uint64_t var, uint64_t mask, const char *name)
201 {
202 
203           if (var & mask) {
204                     printf("%c%s", pf_sep, name);
205                     pf_sep = ',';
206           }
207 }
208 
209 static void
acpi_print_string(char * s,size_t length)210 acpi_print_string(char *s, size_t length)
211 {
212           int       c;
213 
214           /* Trim trailing spaces and NULLs */
215           while (length > 0 && (s[length - 1] == ' ' || s[length - 1] == '\0'))
216                     length--;
217 
218           while (length--) {
219                     c = *s++;
220                     if (c == '\0')
221                               return;
222                     putchar(c);
223           }
224 }
225 
226 static void
acpi_print_gas(ACPI_GENERIC_ADDRESS * gas)227 acpi_print_gas(ACPI_GENERIC_ADDRESS *gas)
228 {
229           switch (gas->SpaceId) {
230           case ACPI_ADR_SPACE_SYSTEM_MEMORY:
231                     if (gas->BitWidth <= 32)
232                               printf("0x%08x:%u[%u] (Memory)",
233                                   (u_int)gas->Address, gas->BitOffset,
234                                   gas->BitWidth);
235                     else
236                               printf("0x%016jx:%u[%u] (Memory)",
237                                   (uintmax_t)gas->Address, gas->BitOffset,
238                                   gas->BitWidth);
239                     break;
240           case ACPI_ADR_SPACE_SYSTEM_IO:
241                     printf("0x%02x:%u[%u] (IO)", (u_int)gas->Address,
242                         gas->BitOffset, gas->BitWidth);
243                     break;
244           case ACPI_ADR_SPACE_PCI_CONFIG:
245                     printf("%x:%x+0x%x (PCI)", (uint16_t)(gas->Address >> 32),
246                            (uint16_t)((gas->Address >> 16) & 0xffff),
247                            (uint16_t)gas->Address);
248                     break;
249           /* XXX How to handle these below? */
250           case ACPI_ADR_SPACE_EC:
251                     printf("0x%x:%u[%u] (EC)", (uint16_t)gas->Address,
252                            gas->BitOffset, gas->BitWidth);
253                     break;
254           case ACPI_ADR_SPACE_SMBUS:
255                     printf("0x%x:%u[%u] (SMBus)", (uint16_t)gas->Address,
256                            gas->BitOffset, gas->BitWidth);
257                     break;
258           case ACPI_ADR_SPACE_CMOS:
259           case ACPI_ADR_SPACE_PCI_BAR_TARGET:
260           case ACPI_ADR_SPACE_IPMI:
261           case ACPI_ADR_SPACE_GPIO:
262           case ACPI_ADR_SPACE_GSBUS:
263           case ACPI_ADR_SPACE_PLATFORM_COMM:
264           case ACPI_ADR_SPACE_FIXED_HARDWARE:
265           default:
266                     printf("0x%016jx (SpaceID=%hhu)", (uintmax_t)gas->Address,
267                         gas->SpaceId);
268                     break;
269           }
270 }
271 
272 static void
acpi_print_pci(uint16_t vendorid,uint16_t deviceid,uint8_t seg,uint8_t bus,uint8_t device,uint8_t func)273 acpi_print_pci(uint16_t vendorid, uint16_t deviceid,
274     uint8_t seg, uint8_t bus, uint8_t device, uint8_t func)
275 {
276           if (vendorid == 0xffff && deviceid == 0xffff) {
277                     printf("\tPCI Device=NONE\n");
278                     return;
279           }
280 
281           printf("\tPCI device={\n");
282           printf("\t\tVendor=0x%x\n", vendorid);
283           printf("\t\tDevice=0x%x\n", deviceid);
284           printf("\n");
285           printf("\t\tSegment Group=%d\n", seg);
286           printf("\t\tBus=%d\n", bus);
287           printf("\t\tDevice=%d\n", device);
288           printf("\t\tFunction=%d\n", func);
289           printf("\t}\n");
290 }
291 
292 static void
acpi_print_pci_sbdf(uint8_t seg,uint8_t bus,uint8_t device,uint8_t func)293 acpi_print_pci_sbdf(uint8_t seg, uint8_t bus, uint8_t device, uint8_t func)
294 {
295           if (bus == 0xff && device == 0xff && func == 0xff) {
296                     printf("\tPCI Device=NONE\n");
297                     return;
298           }
299 
300           printf("\tPCI device={\n");
301           printf("\t\tSegment Group=%d\n", seg);
302           printf("\t\tBus=%d\n", bus);
303           printf("\t\tDevice=%d\n", device);
304           printf("\t\tFunction=%d\n", func);
305           printf("\t}\n");
306 }
307 
308 #ifdef notyet
309 static void
acpi_print_hest_errorseverity(uint32_t error)310 acpi_print_hest_errorseverity(uint32_t error)
311 {
312           printf("\tError Severity={ ");
313           switch (error) {
314           case 0:
315                     printf("Recoverable");
316                     break;
317           case 1:
318                     printf("Fatal");
319                     break;
320           case 2:
321                     printf("Corrected");
322                     break;
323           case 3:
324                     printf("None");
325                     break;
326           default:
327                     printf("%d (reserved)", error);
328                     break;
329           }
330           printf("}\n");
331 }
332 #endif
333 
334 static void
acpi_print_hest_errorbank(ACPI_HEST_IA_ERROR_BANK * bank)335 acpi_print_hest_errorbank(ACPI_HEST_IA_ERROR_BANK *bank)
336 {
337           printf("\n");
338           printf("\tBank Number=%d\n", bank->BankNumber);
339           printf("\tClear Status On Init={%s}\n",
340                     bank->ClearStatusOnInit ? "NO" : "YES");
341           printf("\tStatus Data Format={ ");
342           switch (bank->StatusFormat) {
343           case 0:
344                     printf("IA32 MCA");
345                     break;
346           case 1:
347                     printf("EMT64 MCA");
348                     break;
349           case 2:
350                     printf("AMD64 MCA");
351                     break;
352           }
353           printf(" }\n");
354 
355           if (bank->ControlRegister)
356                     printf("\tControl Register=0x%x\n", bank->ControlRegister);
357           printf("\tControl Init Data=0x%"PRIx64"\n", bank->ControlData);
358           printf("\tStatus MSR=0x%x\n", bank->StatusRegister);
359           printf("\tAddress MSR=0x%x\n", bank->AddressRegister);
360           printf("\tMisc MSR=0x%x\n", bank->MiscRegister);
361 }
362 
363 static void
acpi_print_hest_header(ACPI_HEST_HEADER * hest)364 acpi_print_hest_header(ACPI_HEST_HEADER *hest)
365 {
366           printf("\tType={");
367           switch (hest->Type) {
368           case ACPI_HEST_TYPE_IA32_CHECK:
369                     printf("IA32 Machine Check Exception");
370                     break;
371           case ACPI_HEST_TYPE_IA32_CORRECTED_CHECK:
372                     printf("IA32 Corrected Machine Check");
373                     break;
374           case ACPI_HEST_TYPE_IA32_NMI:
375                     printf("IA32 Non-Maskable Interrupt");
376                     break;
377           case ACPI_HEST_TYPE_NOT_USED3:
378           case ACPI_HEST_TYPE_NOT_USED4:
379           case ACPI_HEST_TYPE_NOT_USED5:
380                     printf("unused type: %d", hest->Type);
381                     break;
382           case ACPI_HEST_TYPE_AER_ROOT_PORT:
383                     printf("PCI Express Root Port AER");
384                     break;
385           case ACPI_HEST_TYPE_AER_ENDPOINT:
386                     printf("PCI Express Endpoint AER");
387                     break;
388           case ACPI_HEST_TYPE_AER_BRIDGE:
389                     printf("PCI Express/PCI-X Bridge AER");
390                     break;
391           case ACPI_HEST_TYPE_GENERIC_ERROR:
392                     printf("Generic Hardware Error Source");
393                     break;
394           case ACPI_HEST_TYPE_GENERIC_ERROR_V2:
395                     printf("Generic Hardware Error Source version 2");
396                     break;
397           case ACPI_HEST_TYPE_RESERVED:
398           default:
399                     printf("Reserved (%d)", hest->Type);
400                     break;
401           }
402           printf("}\n");
403           printf("\tSourceId=%d\n", hest->SourceId);
404 }
405 
406 static void
acpi_print_hest_aer_common(ACPI_HEST_AER_COMMON * data)407 acpi_print_hest_aer_common(ACPI_HEST_AER_COMMON *data)
408 {
409 
410 #define PRINTFLAG(var, flag)  printflag((var), ACPI_HEST_## flag, #flag)
411 
412           printf("\tFlags=");
413           PRINTFLAG(data->Flags, FIRMWARE_FIRST);
414           PRINTFLAG(data->Flags, GLOBAL);
415           PRINTFLAG(data->Flags, GHES_ASSIST);
416           PRINTFLAG_END();
417 
418 #undef PRINTFLAG
419 
420           printf("\tEnabled={ %s ", data->Flags ? "YES" : "NO");
421           if (data->Flags & ACPI_HEST_FIRMWARE_FIRST)
422                     printf("(ignored) ");
423           printf("}\n");
424           printf("\tNumber of Record to pre-allocate=%d\n",
425                     data->RecordsToPreallocate);
426           printf("\tMax. Sections per Record=%d\n", data->MaxSectionsPerRecord);
427           if (!(data->Flags & ACPI_HEST_GLOBAL))
428                     acpi_print_pci_sbdf(0, data->Bus, data->Device, data->Function);
429           printf("\tDevice Control=0x%x\n", data->DeviceControl);
430           printf("\tUncorrectable Error Mask Register=0x%x\n",
431                     data->UncorrectableMask);
432           printf("\tUncorrectable Error Severity Register=0x%x\n",
433                     data->UncorrectableSeverity);
434           printf("\tCorrectable Error Mask Register=0x%x\n",
435                     data->CorrectableMask);
436           printf("\tAdvanced Capabilities Register=0x%x\n",
437                     data->AdvancedCapabilities);
438 }
439 
440 static void
acpi_print_hest_notify(ACPI_HEST_NOTIFY * notify)441 acpi_print_hest_notify(ACPI_HEST_NOTIFY *notify)
442 {
443           printf("\tHW Error Notification={\n");
444           printf("\t\tType={");
445           switch (notify->Type) {
446           case ACPI_HEST_NOTIFY_POLLED:
447                     printf("POLLED");
448                     break;
449           case ACPI_HEST_NOTIFY_EXTERNAL:
450                     printf("EXTERN");
451                     break;
452           case ACPI_HEST_NOTIFY_LOCAL:
453                     printf("LOCAL");
454                     break;
455           case ACPI_HEST_NOTIFY_SCI:
456                     printf("SCI");
457                     break;
458           case ACPI_HEST_NOTIFY_NMI:
459                     printf("NMI");
460                     break;
461           case ACPI_HEST_NOTIFY_CMCI:
462                     printf("CMCI");
463                     break;
464           case ACPI_HEST_NOTIFY_MCE:
465                     printf("MCE");
466                     break;
467           case ACPI_HEST_NOTIFY_GPIO:
468                     printf("GPIO-Signal");
469                     break;
470           case ACPI_HEST_NOTIFY_SEA:
471                     printf("ARMv8 SEA");
472                     break;
473           case ACPI_HEST_NOTIFY_SEI:
474                     printf("ARMv8 SEI");
475                     break;
476           case ACPI_HEST_NOTIFY_GSIV:
477                     printf("External Interrupt - GSIV");
478                     break;
479           case ACPI_HEST_NOTIFY_RESERVED:
480                     printf("RESERVED");
481                     break;
482           default:
483                     printf("%d (reserved)", notify->Type);
484                     break;
485           }
486           printf("}\n");
487 
488           printf("\t\tLength=%d\n", notify->Length);
489 
490 #define PRINTFLAG(var, flag)  printflag((var), ACPI_HEST_## flag, #flag)
491 
492           printf("\t\tConfig Write Enable=");
493           PRINTFLAG(notify->ConfigWriteEnable, TYPE);
494           PRINTFLAG(notify->ConfigWriteEnable, POLL_INTERVAL);
495           PRINTFLAG(notify->ConfigWriteEnable, POLL_THRESHOLD_VALUE);
496           PRINTFLAG(notify->ConfigWriteEnable, POLL_THRESHOLD_WINDOW);
497           PRINTFLAG(notify->ConfigWriteEnable, ERR_THRESHOLD_VALUE);
498           PRINTFLAG(notify->ConfigWriteEnable, ERR_THRESHOLD_WINDOW);
499           PRINTFLAG_END();
500 
501 #undef PRINTFLAG
502 
503           printf("\t\tPoll Interval=%d msec\n", notify->PollInterval);
504           printf("\t\tInterrupt Vector=%d\n", notify->Vector);
505           printf("\t\tSwitch To Polling Threshold Value=%d\n",
506                     notify->PollingThresholdValue);
507           printf("\t\tSwitch To Polling Threshold Window=%d msec\n",
508                     notify->PollingThresholdWindow);
509           printf("\t\tError Threshold Value=%d\n",
510                     notify->ErrorThresholdValue);
511           printf("\t\tError Threshold Window=%d msec\n",
512                     notify->ErrorThresholdWindow);
513           printf("\t}\n");
514 }
515 
516 #ifdef notyet
517 static void
acpi_print_hest_generic_status(ACPI_HEST_GENERIC_STATUS * data)518 acpi_print_hest_generic_status(ACPI_HEST_GENERIC_STATUS *data)
519 {
520           uint32_t i, pos, entries;
521           ACPI_HEST_GENERIC_DATA *gen;
522 
523           entries = data->BlockStatus & ACPI_HEST_ERROR_ENTRY_COUNT;
524 
525           printf("\tGeneric Error Status={\n");
526           printf("\t\tBlock Status={ ");
527           if (data->BlockStatus & ACPI_HEST_UNCORRECTABLE)
528                     printf("UNCORRECTABLE");
529           if (data->BlockStatus & ACPI_HEST_CORRECTABLE)
530                     printf("CORRECTABLE");
531           if (data->BlockStatus & ACPI_HEST_MULTIPLE_UNCORRECTABLE)
532                     printf("MULTIPLE UNCORRECTABLE");
533           if (data->BlockStatus & ACPI_HEST_MULTIPLE_CORRECTABLE)
534                     printf("MULTIPLE CORRECTABLE");
535           printf(" }\n");
536           printf("\t\tEntry Count=%d\n", entries);
537           printf("\t\tRaw Data Offset=%d\n", data->RawDataOffset);
538           printf("\t\tRaw Data Length=%d\n", data->RawDataLength);
539           printf("\t\tData Length=%d\n", data->DataLength);
540           printf("\t");
541           acpi_print_hest_errorseverity(data->ErrorSeverity);
542           printf("\t}\n");
543 
544           pos = sizeof(ACPI_HEST_GENERIC_STATUS);
545           for (i = 0; i < entries; i++) {
546                     gen = (ACPI_HEST_GENERIC_DATA *)((char *)data + pos);
547                     acpi_print_hest_generic_data(gen);
548                     pos += sizeof(ACPI_HEST_GENERIC_DATA);
549           }
550 }
551 #endif
552 
553 #ifdef notyet
554 static void
acpi_print_hest_generic_data(ACPI_HEST_GENERIC_DATA * data)555 acpi_print_hest_generic_data(ACPI_HEST_GENERIC_DATA *data)
556 {
557           printf("\tGeneric Error Data={\n");
558           printf("\t\tSectionType=");
559           acpi_print_string((char *)data->SectionType, sizeof(data->SectionType));
560           printf("\n\t");
561           acpi_print_hest_errorseverity(data->ErrorSeverity);
562           printf("\t\tRevision=0x%x\n", data->Revision);
563           printf("\t\tValidation Bits=0x%x\n", data->ValidationBits);
564           printf("\t\tFlags=0x%x\n", data->Flags);
565           printf("\t\tData Length=%d\n", data->ErrorDataLength);
566           printf("\t\tField Replication Unit Id=");
567           acpi_print_string((char *)data->FruId, sizeof(data->FruId));
568           printf("\n");
569           printf("\t\tField Replication Unit=");
570           acpi_print_string((char *)data->FruText, sizeof(data->FruText));
571           printf("\n");
572           printf("\t}\n");
573 }
574 #endif
575 
576 static void
acpi_print_whea(ACPI_WHEA_HEADER * whea,void (* print_action)(ACPI_WHEA_HEADER *),void (* print_ins)(ACPI_WHEA_HEADER *),void (* print_flags)(ACPI_WHEA_HEADER *))577 acpi_print_whea(ACPI_WHEA_HEADER *whea,
578     void (*print_action)(ACPI_WHEA_HEADER *),
579     void (*print_ins)(ACPI_WHEA_HEADER *),
580     void (*print_flags)(ACPI_WHEA_HEADER *))
581 {
582           printf("\n");
583 
584           print_action(whea);
585           print_ins(whea);
586           if (print_flags)
587                     print_flags(whea);
588           printf("\tRegisterRegion=");
589           acpi_print_gas(&whea->RegisterRegion);
590           printf("\n");
591           printf("\tMASK=0x%08"PRIx64"\n", whea->Mask);
592 }
593 
594 static void
acpi_print_hest_ia32_check(ACPI_HEST_IA_MACHINE_CHECK * data)595 acpi_print_hest_ia32_check(ACPI_HEST_IA_MACHINE_CHECK *data)
596 {
597           uint32_t i, pos;
598           ACPI_HEST_IA_ERROR_BANK *bank;
599 
600           acpi_print_hest_header(&data->Header);
601           printf("\tFlags={ ");
602           if (data->Flags & ACPI_HEST_FIRMWARE_FIRST)
603                     printf("FIRMWARE_FIRST");
604           printf(" }\n");
605           printf("\tEnabled={ %s }\n", data->Enabled ? "YES" : "NO");
606           printf("\tNumber of Record to pre-allocate=%d\n",
607                     data->RecordsToPreallocate);
608           printf("\tMax Sections per Record=%d\n",
609                     data->MaxSectionsPerRecord);
610           printf("\tGlobal Capability Init Data=0x%"PRIx64"\n",
611                     data->GlobalCapabilityData);
612           printf("\tGlobal Control Init Data=0x%"PRIx64"\n",
613                     data->GlobalControlData);
614           printf("\tNumber of Hardware Error Reporting Banks=%d\n",
615                     data->NumHardwareBanks);
616 
617           pos = sizeof(ACPI_HEST_IA_MACHINE_CHECK);
618           for (i = 0; i < data->NumHardwareBanks; i++) {
619                     bank = (ACPI_HEST_IA_ERROR_BANK *)((char *)data + pos);
620                     acpi_print_hest_errorbank(bank);
621                     pos += sizeof(ACPI_HEST_IA_ERROR_BANK);
622           }
623 }
624 
625 static void
acpi_print_hest_ia32_correctedcheck(ACPI_HEST_IA_CORRECTED * data)626 acpi_print_hest_ia32_correctedcheck(ACPI_HEST_IA_CORRECTED *data)
627 {
628           uint32_t i, pos;
629           ACPI_HEST_IA_ERROR_BANK *bank;
630 
631           acpi_print_hest_header(&data->Header);
632           printf("\tFlags={ ");
633           if (data->Flags & ACPI_HEST_FIRMWARE_FIRST)
634                     printf("FIRMWARE_FIRST");
635           printf(" }\n");
636           printf("\tEnabled={ %s }\n", data->Enabled ? "YES" : "NO");
637           printf("\tNumber of Record to pre-allocate=%d\n",
638                     data->RecordsToPreallocate);
639           printf("\tMax Sections per Record=%d\n",
640                     data->MaxSectionsPerRecord);
641           acpi_print_hest_notify(&data->Notify);
642 
643           printf("\tNumber of Hardware Error Reporting Banks=%d\n",
644                     data->NumHardwareBanks);
645 
646           pos = sizeof(ACPI_HEST_IA_MACHINE_CHECK);
647           for (i = 0; i < data->NumHardwareBanks; i++) {
648                     bank = (ACPI_HEST_IA_ERROR_BANK *)((char *)data + pos);
649                     acpi_print_hest_errorbank(bank);
650                     pos += sizeof(ACPI_HEST_IA_ERROR_BANK);
651           }
652 }
653 
654 static void
acpi_print_hest_ia32_nmi(ACPI_HEST_IA_NMI * data)655 acpi_print_hest_ia32_nmi(ACPI_HEST_IA_NMI *data)
656 {
657           acpi_print_hest_header(&data->Header);
658           printf("\tNumber of Record to pre-allocate=%d\n",
659                     data->RecordsToPreallocate);
660           printf("\tMax Sections per Record=%d\n",
661                     data->MaxSectionsPerRecord);
662           printf("\tMax Raw Data Length=%d\n",
663                     data->MaxRawDataLength);
664 }
665 
666 static void
acpi_print_hest_aer_root(ACPI_HEST_AER_ROOT * data)667 acpi_print_hest_aer_root(ACPI_HEST_AER_ROOT *data)
668 {
669           acpi_print_hest_header(&data->Header);
670           acpi_print_hest_aer_common(&data->Aer);
671           printf("Root Error Command Register=0x%x\n", data->RootErrorCommand);
672 }
673 
674 static void
acpi_print_hest_aer_endpoint(ACPI_HEST_AER * data)675 acpi_print_hest_aer_endpoint(ACPI_HEST_AER *data)
676 {
677           acpi_print_hest_header(&data->Header);
678           acpi_print_hest_aer_common(&data->Aer);
679 }
680 
681 static void
acpi_print_hest_aer_bridge(ACPI_HEST_AER_BRIDGE * data)682 acpi_print_hest_aer_bridge(ACPI_HEST_AER_BRIDGE *data)
683 {
684           acpi_print_hest_header(&data->Header);
685           acpi_print_hest_aer_common(&data->Aer);
686 
687           printf("\tSecondary Uncorrectable Error Mask Register=0x%x\n",
688                     data->UncorrectableMask2);
689           printf("\tSecondary Uncorrectable Error Severity Register=0x%x\n",
690                     data->UncorrectableSeverity2);
691           printf("\tSecondory Advanced Capabilities Register=0x%x\n",
692                     data->AdvancedCapabilities2);
693 }
694 
695 static void
acpi_print_hest_generic(ACPI_HEST_GENERIC * data)696 acpi_print_hest_generic(ACPI_HEST_GENERIC *data)
697 {
698           acpi_print_hest_header(&data->Header);
699           if (data->RelatedSourceId != 0xffff)
700                     printf("\tReleated SourceId=%d\n", data->RelatedSourceId);
701           printf("\tEnabled={%s}\n", data->Enabled ? "YES" : "NO");
702           printf("\tNumber of Records to pre-allocate=%u\n",
703                     data->RecordsToPreallocate);
704           printf("\tMax Sections per Record=%u\n", data->MaxSectionsPerRecord);
705           printf("\tMax Raw Data Length=%u\n", data->MaxRawDataLength);
706           printf("\tError Status Address=");
707           acpi_print_gas(&data->ErrorStatusAddress);
708           printf("\n");
709           acpi_print_hest_notify(&data->Notify);
710           printf("\tError Block Length=%u\n", data->ErrorBlockLength);
711 }
712 
713 static void
acpi_print_hest_generic_v2(ACPI_HEST_GENERIC_V2 * data)714 acpi_print_hest_generic_v2(ACPI_HEST_GENERIC_V2 *data)
715 {
716 
717           /* The first 64 bytes are the same as ACPI_HEST_GENERIC */
718           acpi_print_hest_generic((ACPI_HEST_GENERIC *)data);
719 
720           printf("\tError Status Address");
721           acpi_print_gas(&data->ReadAckRegister);
722           printf("\n\tRead Ack Preserve=0x%016jx\n",
723               (uintmax_t)data->ReadAckPreserve);
724           printf("\tRead Ack Write=0x%016jx\n",
725               (uintmax_t)data->ReadAckWrite);
726 }
727 
728 static void
acpi_handle_hest(ACPI_TABLE_HEADER * sdp)729 acpi_handle_hest(ACPI_TABLE_HEADER *sdp)
730 {
731           ACPI_TABLE_HEST *hest;
732           ACPI_HEST_HEADER *subhest;
733           uint32_t i, pos;
734 
735           printf(BEGIN_COMMENT);
736           acpi_print_sdt(sdp);
737           hest = (ACPI_TABLE_HEST *)sdp;
738 
739           printf("\tError Source Count=%d\n", hest->ErrorSourceCount);
740           pos = sizeof(ACPI_TABLE_HEST);
741           for (i = 0; i < hest->ErrorSourceCount; i++) {
742                     subhest = (ACPI_HEST_HEADER *)((char *)hest + pos);
743                     printf("\n");
744 
745                     switch (subhest->Type) {
746                     case ACPI_HEST_TYPE_IA32_CHECK:
747                               acpi_print_hest_ia32_check(
748                                         (ACPI_HEST_IA_MACHINE_CHECK *)subhest);
749                               pos += sizeof(ACPI_HEST_IA_MACHINE_CHECK);
750                               break;
751 
752                     case ACPI_HEST_TYPE_IA32_CORRECTED_CHECK:
753                               acpi_print_hest_ia32_correctedcheck(
754                                         (ACPI_HEST_IA_CORRECTED *)subhest);
755                               pos += sizeof(ACPI_HEST_IA_CORRECTED);
756                               break;
757 
758                     case ACPI_HEST_TYPE_IA32_NMI:
759                               acpi_print_hest_ia32_nmi(
760                                         (ACPI_HEST_IA_NMI *)subhest);
761                               pos += sizeof(ACPI_HEST_IA_NMI);
762                               break;
763 
764                     case ACPI_HEST_TYPE_NOT_USED3:
765                     case ACPI_HEST_TYPE_NOT_USED4:
766                     case ACPI_HEST_TYPE_NOT_USED5:
767                               pos += sizeof(ACPI_HEST_HEADER);
768                               break;
769 
770                     case ACPI_HEST_TYPE_AER_ROOT_PORT:
771                               acpi_print_hest_aer_root((ACPI_HEST_AER_ROOT *)subhest);
772                               pos += sizeof(ACPI_HEST_AER_ROOT);
773                               break;
774 
775                     case ACPI_HEST_TYPE_AER_ENDPOINT:
776                               acpi_print_hest_aer_endpoint((ACPI_HEST_AER *)subhest);
777                               pos += sizeof(ACPI_HEST_AER);
778                               break;
779 
780                     case ACPI_HEST_TYPE_AER_BRIDGE:
781                               acpi_print_hest_aer_bridge((ACPI_HEST_AER_BRIDGE *)subhest);
782                               pos += sizeof(ACPI_HEST_AER_BRIDGE);
783                               break;
784 
785                     case ACPI_HEST_TYPE_GENERIC_ERROR:
786                               acpi_print_hest_generic((ACPI_HEST_GENERIC *)subhest);
787                               pos += sizeof(ACPI_HEST_GENERIC);
788                               break;
789 
790                     case ACPI_HEST_TYPE_GENERIC_ERROR_V2:
791                               acpi_print_hest_generic_v2(
792                                         (ACPI_HEST_GENERIC_V2 *)subhest);
793                               pos += sizeof(ACPI_HEST_GENERIC_V2);
794                               break;
795 
796                     case ACPI_HEST_TYPE_RESERVED:
797                     default:
798                               pos += sizeof(ACPI_HEST_HEADER);
799                               break;
800                     }
801           }
802 
803           printf(END_COMMENT);
804 }
805 
806 static uint64_t
acpi_select_address(uint32_t addr32,uint64_t addr64)807 acpi_select_address(uint32_t addr32, uint64_t addr64)
808 {
809 
810           if (addr64 == 0)
811                     return addr32;
812 
813           if ((addr32 != 0) && ((addr64 & 0xfffffff) != addr32)) {
814                     /*
815                      * A few systems (e.g., IBM T23) have an RSDP that claims
816                      * revision 2 but the 64 bit addresses are invalid.  If
817                      * revision 2 and the 32 bit address is non-zero but the
818                      * 32 and 64 bit versions don't match, prefer the 32 bit
819                      * version for all subsequent tables.
820                      */
821                     return addr32;
822           }
823 
824           return addr64;
825 }
826 
827 static void
acpi_handle_fadt(ACPI_TABLE_HEADER * sdp)828 acpi_handle_fadt(ACPI_TABLE_HEADER *sdp)
829 {
830           ACPI_TABLE_HEADER *dsdp;
831           ACPI_TABLE_FACS     *facs;
832           ACPI_TABLE_FADT *fadt;
833 
834           fadt = (ACPI_TABLE_FADT *)sdp;
835           acpi_print_fadt(sdp);
836 
837           if (acpi_select_address(fadt->Facs, fadt->XFacs) == 0) {
838                     if ((fadt->Flags & ACPI_FADT_HW_REDUCED) == 0)
839                               errx(EXIT_FAILURE, "Missing FACS and HW_REDUCED_ACPI flag not set in FADT");
840           } else if ((fadt->Flags & ACPI_FADT_HW_REDUCED) == 0) {
841                     facs = (ACPI_TABLE_FACS *)acpi_map_sdt(
842                               acpi_select_address(fadt->Facs, fadt->XFacs));
843                     if (memcmp(facs->Signature, ACPI_SIG_FACS, 4) != 0 || facs->Length < 64)
844                               errx(EXIT_FAILURE, "FACS is corrupt");
845                     acpi_print_facs(facs);
846           }
847 
848           dsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(
849                     acpi_select_address(fadt->Dsdt, fadt->XDsdt));
850           if (memcmp(dsdp->Signature, ACPI_SIG_DSDT, 4) != 0)
851                     errx(EXIT_FAILURE, "DSDT signature mismatch");
852           if (acpi_checksum(dsdp, dsdp->Length))
853                     errx(EXIT_FAILURE, "DSDT is corrupt");
854           acpi_print_dsdt(dsdp);
855 }
856 
857 static void
acpi_walk_subtables(ACPI_TABLE_HEADER * table,void * first,void (* action)(ACPI_SUBTABLE_HEADER *))858 acpi_walk_subtables(ACPI_TABLE_HEADER *table, void *first,
859     void (*action)(ACPI_SUBTABLE_HEADER *))
860 {
861           ACPI_SUBTABLE_HEADER *subtable;
862           char *end;
863 
864           subtable = first;
865           end = (char *)table + table->Length;
866           while ((char *)subtable < end) {
867                     printf("\n");
868                     if (subtable->Length < sizeof(ACPI_SUBTABLE_HEADER)) {
869                               warnx("invalid subtable length %u", subtable->Length);
870                               return;
871                     }
872                     action(subtable);
873                     subtable = (ACPI_SUBTABLE_HEADER *)((char *)subtable +
874                         subtable->Length);
875           }
876 }
877 
878 static void
acpi_walk_nfit(ACPI_TABLE_HEADER * table,void * first,void (* action)(ACPI_NFIT_HEADER *))879 acpi_walk_nfit(ACPI_TABLE_HEADER *table, void *first,
880     void (*action)(ACPI_NFIT_HEADER *))
881 {
882           ACPI_NFIT_HEADER *subtable;
883           char *end;
884 
885           subtable = first;
886           end = (char *)table + table->Length;
887           while ((char *)subtable < end) {
888                     printf("\n");
889                     if (subtable->Length < sizeof(ACPI_NFIT_HEADER)) {
890                               warnx("invalid subtable length %u", subtable->Length);
891                               return;
892                     }
893                     action(subtable);
894                     subtable = (ACPI_NFIT_HEADER *)((char *)subtable +
895                         subtable->Length);
896           }
897 }
898 
899 static void
acpi_print_cpu(u_char cpu_id)900 acpi_print_cpu(u_char cpu_id)
901 {
902 
903           printf("\tACPI CPU=");
904           if (cpu_id == 0xff)
905                     printf("ALL\n");
906           else
907                     printf("%d\n", (u_int)cpu_id);
908 }
909 
910 static void
acpi_print_cpu_uid(uint32_t uid,char * uid_string)911 acpi_print_cpu_uid(uint32_t uid, char *uid_string)
912 {
913 
914           printf("\tUID=%d", uid);
915           if (uid_string != NULL)
916                     printf(" (%s)", uid_string);
917           printf("\n");
918 }
919 
920 static void
acpi_print_local_apic(uint32_t apic_id,uint32_t flags)921 acpi_print_local_apic(uint32_t apic_id, uint32_t flags)
922 {
923 
924           printf("\tFlags={");
925           if (flags & ACPI_MADT_ENABLED)
926                     printf("ENABLED");
927           else
928                     printf("DISABLED");
929           printf("}\n");
930           printf("\tAPIC ID=%d\n", apic_id);
931 }
932 
933 static void
acpi_print_io_apic(uint32_t apic_id,uint32_t int_base,uint64_t apic_addr)934 acpi_print_io_apic(uint32_t apic_id, uint32_t int_base, uint64_t apic_addr)
935 {
936 
937           printf("\tAPIC ID=%d\n", apic_id);
938           printf("\tINT BASE=%d\n", int_base);
939           printf("\tADDR=0x%016jx\n", (uintmax_t)apic_addr);
940 }
941 
942 static void
acpi_print_mps_flags(uint16_t flags)943 acpi_print_mps_flags(uint16_t flags)
944 {
945 
946           printf("\tFlags={Polarity=");
947           switch (flags & ACPI_MADT_POLARITY_MASK) {
948           case ACPI_MADT_POLARITY_CONFORMS:
949                     printf("conforming");
950                     break;
951           case ACPI_MADT_POLARITY_ACTIVE_HIGH:
952                     printf("active-hi");
953                     break;
954           case ACPI_MADT_POLARITY_ACTIVE_LOW:
955                     printf("active-lo");
956                     break;
957           default:
958                     printf("0x%x", flags & ACPI_MADT_POLARITY_MASK);
959                     break;
960           }
961           printf(", Trigger=");
962           switch (flags & ACPI_MADT_TRIGGER_MASK) {
963           case ACPI_MADT_TRIGGER_CONFORMS:
964                     printf("conforming");
965                     break;
966           case ACPI_MADT_TRIGGER_EDGE:
967                     printf("edge");
968                     break;
969           case ACPI_MADT_TRIGGER_LEVEL:
970                     printf("level");
971                     break;
972           default:
973                     printf("0x%x", (flags & ACPI_MADT_TRIGGER_MASK) >> 2);
974           }
975           printf("}\n");
976 }
977 
978 static void
acpi_print_gicc_flags(uint32_t flags)979 acpi_print_gicc_flags(uint32_t flags)
980 {
981 
982           printf("\tFlags={");
983           if (flags & ACPI_MADT_ENABLED)
984                     printf("enabled");
985           else
986                     printf("disabled");
987           printf(", Performance intr=");
988           if (flags & ACPI_MADT_PERFORMANCE_IRQ_MODE)
989                     printf("edge");
990           else
991                     printf("level");
992           printf(", VGIC intr=");
993           if (flags & ACPI_MADT_VGIC_IRQ_MODE)
994                     printf("edge");
995           else
996                     printf("level");
997           printf("}\n");
998 }
999 
1000 static void
acpi_print_intr(uint32_t intr,uint16_t mps_flags)1001 acpi_print_intr(uint32_t intr, uint16_t mps_flags)
1002 {
1003 
1004           printf("\tINTR=%d\n", intr);
1005           acpi_print_mps_flags(mps_flags);
1006 }
1007 
1008 static void
acpi_print_local_nmi(u_int local_int,uint16_t mps_flags)1009 acpi_print_local_nmi(u_int local_int, uint16_t mps_flags)
1010 {
1011 
1012           printf("\tLINT Pin=%d\n", local_int);
1013           acpi_print_mps_flags(mps_flags);
1014 }
1015 
1016 static const char *apic_types[] = {
1017     [ACPI_MADT_TYPE_LOCAL_APIC] = "Local APIC",
1018     [ACPI_MADT_TYPE_IO_APIC] = "IO APIC",
1019     [ACPI_MADT_TYPE_INTERRUPT_OVERRIDE] = "INT Override",
1020     [ACPI_MADT_TYPE_NMI_SOURCE] = "NMI",
1021     [ACPI_MADT_TYPE_LOCAL_APIC_NMI] = "Local APIC NMI",
1022     [ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE] = "Local APIC Override",
1023     [ACPI_MADT_TYPE_IO_SAPIC] = "IO SAPIC",
1024     [ACPI_MADT_TYPE_LOCAL_SAPIC] = "Local SAPIC",
1025     [ACPI_MADT_TYPE_INTERRUPT_SOURCE] = "Platform Interrupt",
1026     [ACPI_MADT_TYPE_LOCAL_X2APIC] = "Local X2APIC",
1027     [ACPI_MADT_TYPE_LOCAL_X2APIC_NMI] = "Local X2APIC NMI",
1028     [ACPI_MADT_TYPE_GENERIC_INTERRUPT] = "GIC CPU Interface Structure",
1029     [ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR] = "GIC Distributor Structure",
1030     [ACPI_MADT_TYPE_GENERIC_MSI_FRAME] = "GICv2m MSI Frame",
1031     [ACPI_MADT_TYPE_GENERIC_REDISTRIBUTOR] = "GIC Redistributor Structure",
1032     [ACPI_MADT_TYPE_GENERIC_TRANSLATOR] = "GIC ITS Structure"
1033 };
1034 
1035 static const char *platform_int_types[] = { "0 (unknown)", "PMI", "INIT",
1036                                                       "Corrected Platform Error" };
1037 
1038 static void
acpi_print_gicm_flags(ACPI_MADT_GENERIC_MSI_FRAME * gicm)1039 acpi_print_gicm_flags(ACPI_MADT_GENERIC_MSI_FRAME *gicm)
1040 {
1041           uint32_t flags = gicm->Flags;
1042 
1043           printf("\tFLAGS={");
1044           if (flags & ACPI_MADT_OVERRIDE_SPI_VALUES)
1045                     printf("SPI Count/Base Select");
1046           printf("}\n");
1047 }
1048 
1049 static void
acpi_print_madt(ACPI_SUBTABLE_HEADER * mp)1050 acpi_print_madt(ACPI_SUBTABLE_HEADER *mp)
1051 {
1052           ACPI_MADT_LOCAL_APIC *lapic;
1053           ACPI_MADT_IO_APIC *ioapic;
1054           ACPI_MADT_INTERRUPT_OVERRIDE *over;
1055           ACPI_MADT_NMI_SOURCE *nmi;
1056           ACPI_MADT_LOCAL_APIC_NMI *lapic_nmi;
1057           ACPI_MADT_LOCAL_APIC_OVERRIDE *lapic_over;
1058           ACPI_MADT_IO_SAPIC *iosapic;
1059           ACPI_MADT_LOCAL_SAPIC *lsapic;
1060           ACPI_MADT_INTERRUPT_SOURCE *isrc;
1061           ACPI_MADT_LOCAL_X2APIC *x2apic;
1062           ACPI_MADT_LOCAL_X2APIC_NMI *x2apic_nmi;
1063           ACPI_MADT_GENERIC_INTERRUPT *gicc;
1064           ACPI_MADT_GENERIC_DISTRIBUTOR *gicd;
1065           ACPI_MADT_GENERIC_MSI_FRAME *gicm;
1066           ACPI_MADT_GENERIC_REDISTRIBUTOR *gicr;
1067           ACPI_MADT_GENERIC_TRANSLATOR *gict;
1068 
1069           if (mp->Type < __arraycount(apic_types))
1070                     printf("\tType=%s\n", apic_types[mp->Type]);
1071           else
1072                     printf("\tType=%d (unknown)\n", mp->Type);
1073           switch (mp->Type) {
1074           case ACPI_MADT_TYPE_LOCAL_APIC:
1075                     lapic = (ACPI_MADT_LOCAL_APIC *)mp;
1076                     acpi_print_cpu(lapic->ProcessorId);
1077                     acpi_print_local_apic(lapic->Id, lapic->LapicFlags);
1078                     break;
1079           case ACPI_MADT_TYPE_IO_APIC:
1080                     ioapic = (ACPI_MADT_IO_APIC *)mp;
1081                     acpi_print_io_apic(ioapic->Id, ioapic->GlobalIrqBase,
1082                         ioapic->Address);
1083                     break;
1084           case ACPI_MADT_TYPE_INTERRUPT_OVERRIDE:
1085                     over = (ACPI_MADT_INTERRUPT_OVERRIDE *)mp;
1086                     printf("\tBUS=%d\n", (u_int)over->Bus);
1087                     printf("\tIRQ=%d\n", (u_int)over->SourceIrq);
1088                     acpi_print_intr(over->GlobalIrq, over->IntiFlags);
1089                     break;
1090           case ACPI_MADT_TYPE_NMI_SOURCE:
1091                     nmi = (ACPI_MADT_NMI_SOURCE *)mp;
1092                     acpi_print_intr(nmi->GlobalIrq, nmi->IntiFlags);
1093                     break;
1094           case ACPI_MADT_TYPE_LOCAL_APIC_NMI:
1095                     lapic_nmi = (ACPI_MADT_LOCAL_APIC_NMI *)mp;
1096                     acpi_print_cpu(lapic_nmi->ProcessorId);
1097                     acpi_print_local_nmi(lapic_nmi->Lint, lapic_nmi->IntiFlags);
1098                     break;
1099           case ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE:
1100                     lapic_over = (ACPI_MADT_LOCAL_APIC_OVERRIDE *)mp;
1101                     printf("\tLocal APIC ADDR=0x%016jx\n",
1102                         (uintmax_t)lapic_over->Address);
1103                     break;
1104           case ACPI_MADT_TYPE_IO_SAPIC:
1105                     iosapic = (ACPI_MADT_IO_SAPIC *)mp;
1106                     acpi_print_io_apic(iosapic->Id, iosapic->GlobalIrqBase,
1107                         iosapic->Address);
1108                     break;
1109           case ACPI_MADT_TYPE_LOCAL_SAPIC:
1110                     lsapic = (ACPI_MADT_LOCAL_SAPIC *)mp;
1111                     acpi_print_cpu(lsapic->ProcessorId);
1112                     acpi_print_local_apic(lsapic->Id, lsapic->LapicFlags);
1113                     printf("\tAPIC EID=%d\n", (u_int)lsapic->Eid);
1114                     if (mp->Length > offsetof(ACPI_MADT_LOCAL_SAPIC, Uid))
1115                               acpi_print_cpu_uid(lsapic->Uid, lsapic->UidString);
1116                     break;
1117           case ACPI_MADT_TYPE_INTERRUPT_SOURCE:
1118                     isrc = (ACPI_MADT_INTERRUPT_SOURCE *)mp;
1119                     if (isrc->Type < __arraycount(platform_int_types))
1120                               printf("\tType=%s\n", platform_int_types[isrc->Type]);
1121                     else
1122                               printf("\tType=%d (unknown)\n", isrc->Type);
1123                     printf("\tAPIC ID=%d\n", (u_int)isrc->Id);
1124                     printf("\tAPIC EID=%d\n", (u_int)isrc->Eid);
1125                     printf("\tSAPIC Vector=%d\n", (u_int)isrc->IoSapicVector);
1126                     acpi_print_intr(isrc->GlobalIrq, isrc->IntiFlags);
1127                     break;
1128           case ACPI_MADT_TYPE_LOCAL_X2APIC:
1129                     x2apic = (ACPI_MADT_LOCAL_X2APIC *)mp;
1130                     acpi_print_cpu_uid(x2apic->Uid, NULL);
1131                     acpi_print_local_apic(x2apic->LocalApicId, x2apic->LapicFlags);
1132                     break;
1133           case ACPI_MADT_TYPE_LOCAL_X2APIC_NMI:
1134                     x2apic_nmi = (ACPI_MADT_LOCAL_X2APIC_NMI *)mp;
1135                     acpi_print_cpu_uid(x2apic_nmi->Uid, NULL);
1136                     acpi_print_local_nmi(x2apic_nmi->Lint, x2apic_nmi->IntiFlags);
1137                     break;
1138           case ACPI_MADT_TYPE_GENERIC_INTERRUPT:
1139                     gicc = (ACPI_MADT_GENERIC_INTERRUPT *)mp;
1140                     acpi_print_cpu_uid(gicc->Uid, NULL);
1141                     printf("\tCPU INTERFACE=%x\n", gicc->CpuInterfaceNumber);
1142                     acpi_print_gicc_flags(gicc->Flags);
1143                     printf("\tParking Protocol Version=%x\n", gicc->ParkingVersion);
1144                     printf("\tPERF INTR=%d\n", gicc->PerformanceInterrupt);
1145                     printf("\tParked ADDR=%016jx\n",
1146                         (uintmax_t)gicc->ParkedAddress);
1147                     printf("\tBase ADDR=%016jx\n", (uintmax_t)gicc->BaseAddress);
1148                     printf("\tGICV=%016jx\n", (uintmax_t)gicc->GicvBaseAddress);
1149                     printf("\tGICH=%016jx\n", (uintmax_t)gicc->GichBaseAddress);
1150                     printf("\tVGIC INTR=%d\n", gicc->VgicInterrupt);
1151                     printf("\tGICR ADDR=%016jx\n",
1152                         (uintmax_t)gicc->GicrBaseAddress);
1153                     printf("\tMPIDR=%jx\n", (uintmax_t)gicc->ArmMpidr);
1154                     printf("\tEfficiency Class=%d\n", (u_int)gicc->EfficiencyClass);
1155                     break;
1156           case ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR:
1157                     gicd = (ACPI_MADT_GENERIC_DISTRIBUTOR *)mp;
1158                     printf("\tGIC ID=%d\n", (u_int)gicd->GicId);
1159                     printf("\tBase ADDR=%016jx\n", (uintmax_t)gicd->BaseAddress);
1160                     printf("\tVector Base=%d\n", gicd->GlobalIrqBase);
1161                     printf("\tGIC VERSION=%d\n", (u_int)gicd->Version);
1162                     break;
1163           case ACPI_MADT_TYPE_GENERIC_MSI_FRAME:
1164                     gicm = (ACPI_MADT_GENERIC_MSI_FRAME*)mp;
1165                     printf("\tBase ADDR=%016jx\n", (uintmax_t)gicm->BaseAddress);
1166                     acpi_print_gicm_flags(gicm);
1167                     printf("\tSPI Count=%u\n", gicm->SpiCount);
1168                     printf("\tSPI Base=%u\n", gicm->SpiBase);
1169                     break;
1170           case ACPI_MADT_TYPE_GENERIC_REDISTRIBUTOR:
1171                     gicr = (ACPI_MADT_GENERIC_REDISTRIBUTOR *)mp;
1172                     printf("\tBase ADDR=%016jx\n", (uintmax_t)gicr->BaseAddress);
1173                     printf("\tLength=%08x\n", gicr->Length);
1174                     break;
1175           case ACPI_MADT_TYPE_GENERIC_TRANSLATOR:
1176                     gict = (ACPI_MADT_GENERIC_TRANSLATOR *)mp;
1177                     printf("\tGIC ITS ID=%d\n", gict->TranslationId);
1178                     printf("\tBase ADDR=%016jx\n", (uintmax_t)gict->BaseAddress);
1179                     break;
1180           }
1181 }
1182 
1183 #ifdef notyet
1184 static void
acpi_print_bert_region(ACPI_BERT_REGION * region)1185 acpi_print_bert_region(ACPI_BERT_REGION *region)
1186 {
1187           uint32_t i, pos, entries;
1188           ACPI_HEST_GENERIC_DATA *data;
1189 
1190           printf("\n");
1191           printf("\tBlockStatus={ ");
1192 
1193           if (region->BlockStatus & ACPI_BERT_UNCORRECTABLE)
1194                     printf("Uncorrectable");
1195           if (region->BlockStatus & ACPI_BERT_CORRECTABLE)
1196                     printf("Correctable");
1197           if (region->BlockStatus & ACPI_BERT_MULTIPLE_UNCORRECTABLE)
1198                     printf("Multiple Uncorrectable");
1199           if (region->BlockStatus & ACPI_BERT_MULTIPLE_CORRECTABLE)
1200                     printf("Multiple Correctable");
1201           entries = region->BlockStatus & ACPI_BERT_ERROR_ENTRY_COUNT;
1202           printf(", Error Entry Count=%d", entries);
1203           printf("}\n");
1204 
1205           printf("\tRaw Data Offset=0x%x\n", region->RawDataOffset);
1206           printf("\tRaw Data Length=0x%x\n", region->RawDataLength);
1207           printf("\tData Length=0x%x\n", region->DataLength);
1208 
1209           acpi_print_hest_errorseverity(region->ErrorSeverity);
1210 
1211           pos = sizeof(ACPI_BERT_REGION);
1212           for (i = 0; i < entries; i++) {
1213                     data = (ACPI_HEST_GENERIC_DATA *)((char *)region + pos);
1214                     acpi_print_hest_generic_data(data);
1215                     pos += sizeof(ACPI_HEST_GENERIC_DATA);
1216           }
1217 }
1218 #endif
1219 
1220 static void
acpi_handle_bert(ACPI_TABLE_HEADER * sdp)1221 acpi_handle_bert(ACPI_TABLE_HEADER *sdp)
1222 {
1223           ACPI_TABLE_BERT *bert;
1224 
1225           printf(BEGIN_COMMENT);
1226           acpi_print_sdt(sdp);
1227           bert = (ACPI_TABLE_BERT *)sdp;
1228 
1229           printf("\tLength of Boot Error Region=%d bytes\n", bert->RegionLength);
1230           printf("\tPhysical Address of Region=0x%"PRIx64"\n", bert->Address);
1231 
1232           printf(END_COMMENT);
1233 }
1234 
1235 static void
acpi_handle_bgrt(ACPI_TABLE_HEADER * sdp)1236 acpi_handle_bgrt(ACPI_TABLE_HEADER *sdp)
1237 {
1238           ACPI_TABLE_BGRT *bgrt;
1239           unsigned int degree;
1240 
1241           printf(BEGIN_COMMENT);
1242           acpi_print_sdt(sdp);
1243           bgrt = (ACPI_TABLE_BGRT *)sdp;
1244 
1245           printf("\tVersion=%hu\n", bgrt->Version);
1246           degree = ((unsigned int)(bgrt->Status & ACPI_BGRT_ORIENTATION_OFFSET)
1247               >> 1) * 90;
1248           printf("\tDegree=%u\n", degree);
1249           printf("\tDisplayed=%u\n", bgrt->Status & ACPI_BGRT_DISPLAYED);
1250           printf("\tImage Type=");
1251           switch (bgrt->ImageType) {
1252           case 0:
1253                     printf("Bitmap\n");
1254                     break;
1255           default:
1256                     printf("reserved (0x%hhx)\n", bgrt->ImageType);
1257                     break;
1258           }
1259           printf("\tImage Address=0x%"PRIx64"\n", bgrt->ImageAddress);
1260           printf("\tImage Offset X=0x%08x\n", bgrt->ImageOffsetX);
1261           printf("\tImage Offset Y=0x%08x\n", bgrt->ImageOffsetY);
1262 
1263           printf(END_COMMENT);
1264 }
1265 
1266 static void
acpi_handle_boot(ACPI_TABLE_HEADER * sdp)1267 acpi_handle_boot(ACPI_TABLE_HEADER *sdp)
1268 {
1269           ACPI_TABLE_BOOT *boot;
1270 
1271           printf(BEGIN_COMMENT);
1272           acpi_print_sdt(sdp);
1273           boot = (ACPI_TABLE_BOOT *)sdp;
1274           printf("\tCMOS Index=0x%02x\n", boot->CmosIndex);
1275           printf(END_COMMENT);
1276 }
1277 
1278 static void
acpi_handle_cpep(ACPI_TABLE_HEADER * sdp)1279 acpi_handle_cpep(ACPI_TABLE_HEADER *sdp)
1280 {
1281           ACPI_TABLE_CPEP *cpep;
1282           ACPI_CPEP_POLLING *poll;
1283           uint32_t cpep_pos;
1284 
1285           printf(BEGIN_COMMENT);
1286           acpi_print_sdt(sdp);
1287           cpep = (ACPI_TABLE_CPEP *)sdp;
1288 
1289           cpep_pos = sizeof(ACPI_TABLE_CPEP);
1290           while (cpep_pos < sdp->Length) {
1291                     poll = (ACPI_CPEP_POLLING *)((char *)cpep + cpep_pos);
1292                     acpi_print_cpu(poll->Id);
1293                     printf("\tACPI CPU EId=%d\n", poll->Eid);
1294                     printf("\tPoll Interval=%d msec\n", poll->Interval);
1295                     cpep_pos += sizeof(ACPI_CPEP_POLLING);
1296           }
1297           printf(END_COMMENT);
1298 }
1299 
1300 static void
acpi_print_csrt_resource_group(ACPI_CSRT_GROUP * grp)1301 acpi_print_csrt_resource_group(ACPI_CSRT_GROUP *grp)
1302 {
1303           ACPI_CSRT_DESCRIPTOR *desc;
1304 
1305           printf("\tLength=%u\n", grp->Length);
1306           printf("\tVendorId=");
1307           acpi_print_string((char *)&grp->VendorId, 4);
1308           printf("\n");
1309           if (grp->SubvendorId != 0) {
1310                     printf("\tSubvendorId=");
1311                     acpi_print_string((char *)&grp->SubvendorId, 4);
1312                     printf("\n");
1313           }
1314           printf("\tDeviceId=0x%08x\n", grp->DeviceId);
1315           if (grp->SubdeviceId != 0)
1316                     printf("\tSubdeviceId=0x%08x\n", grp->SubdeviceId);
1317           printf("\tRevision=%hu\n", grp->Revision);
1318           printf("\tSharedInfoLength=%u\n", grp->SharedInfoLength);
1319 
1320           /* Next is Shared Info */
1321           if (grp->SharedInfoLength != 0) {
1322                     printf("\tShared Info ");
1323                     acpi_dump_bytes((uint8_t *)(grp + 1),
1324                         grp->SharedInfoLength, 1);
1325           }
1326 
1327           /* And then, Resource Descriptors */
1328           desc = (ACPI_CSRT_DESCRIPTOR *)
1329               ((vaddr_t)(grp + 1) + grp->SharedInfoLength);
1330           while (desc < (ACPI_CSRT_DESCRIPTOR *)((vaddr_t)grp + grp->Length)) {
1331                     bool unknownsubytpe = false;
1332                     printf("\n\tLength=%u\n", desc->Length);
1333                     printf("\tResource Type=");
1334                     switch (desc->Type) {
1335                     case ACPI_CSRT_TYPE_INTERRUPT:
1336                               printf("Interrupt");
1337                               switch (desc->Subtype) {
1338                               case ACPI_CSRT_XRUPT_LINE:
1339                                         printf("(Interrupt line)\n");
1340                                         break;
1341                               case ACPI_CSRT_XRUPT_CONTROLLER:
1342                                         printf("(Interrupt controller)\n");
1343                                         break;
1344                               default:
1345                                         unknownsubytpe = true;
1346                                         break;
1347                               }
1348                               break;
1349                     case ACPI_CSRT_TYPE_TIMER:
1350                               printf("Timer");
1351                               switch (desc->Subtype) {
1352                               case ACPI_CSRT_TIMER:
1353                                         printf("\n");
1354                                         break;
1355                               default:
1356                                         unknownsubytpe = true;
1357                                         break;
1358                               }
1359                               break;
1360                     case ACPI_CSRT_TYPE_DMA:
1361                               printf("DMA");
1362                               switch (desc->Subtype) {
1363                               case ACPI_CSRT_DMA_CHANNEL:
1364                                         printf("(DMA channel)\n");
1365                                         break;
1366                               case ACPI_CSRT_DMA_CONTROLLER:
1367                                         printf("(DMA controller)\n");
1368                                         break;
1369                               default:
1370                                         unknownsubytpe = true;
1371                                         break;
1372                               }
1373                               break;
1374                     case 0x0004: /* XXX Platform Security */
1375                               printf("Platform Security");
1376                               switch (desc->Subtype) {
1377                               case 0x0001:
1378                                         printf("\n");
1379                                         /* Platform Security */
1380                                         break;
1381                               default:
1382                                         unknownsubytpe = true;
1383                                         break;
1384                               }
1385                               break;
1386                     default:
1387                               printf("Unknown (%hx)\n", desc->Type);
1388                               break;
1389                     }
1390                     if (unknownsubytpe)
1391                               printf("(unknown subtype(%hx))\n", desc->Subtype);
1392 
1393                     printf("\tUID=0x%08x\n", desc->Uid);
1394                     printf("\tVendor defined info ");
1395                     acpi_dump_bytes((uint8_t *)(desc + 1),
1396                         desc->Length - sizeof(ACPI_CSRT_DESCRIPTOR), 1);
1397 
1398                     /* Next */
1399                     desc = (ACPI_CSRT_DESCRIPTOR *)((vaddr_t)desc + desc->Length);
1400           }
1401 }
1402 
1403 static void
acpi_handle_csrt(ACPI_TABLE_HEADER * sdp)1404 acpi_handle_csrt(ACPI_TABLE_HEADER *sdp)
1405 {
1406           ACPI_CSRT_GROUP *grp;
1407           uint totallen = sdp->Length;
1408 
1409           printf(BEGIN_COMMENT);
1410           acpi_print_sdt(sdp);
1411           grp = (ACPI_CSRT_GROUP *)(sdp + 1);
1412 
1413           while (grp < (ACPI_CSRT_GROUP *)((vaddr_t)sdp + totallen)) {
1414                     printf("\n");
1415                     acpi_print_csrt_resource_group(grp);
1416 
1417                     /* Next */
1418                     grp = (ACPI_CSRT_GROUP *)((vaddr_t)grp + grp->Length);
1419           }
1420 
1421           printf(END_COMMENT);
1422 }
1423 
1424 static void
acpi_handle_dbgp(ACPI_TABLE_HEADER * sdp)1425 acpi_handle_dbgp(ACPI_TABLE_HEADER *sdp)
1426 {
1427           ACPI_TABLE_DBGP *dbgp;
1428 
1429           printf(BEGIN_COMMENT);
1430           acpi_print_sdt(sdp);
1431           dbgp = (ACPI_TABLE_DBGP *)sdp;
1432           printf("\tType={");
1433           switch (dbgp->Type) {
1434           case 0:
1435                     printf("full 16550");
1436                     break;
1437           case 1:
1438                     printf("subset of 16550");
1439                     break;
1440           }
1441           printf("}\n");
1442           printf("\tDebugPort=");
1443           acpi_print_gas(&dbgp->DebugPort);
1444           printf("\n");
1445           printf(END_COMMENT);
1446 }
1447 
1448 /* This function is used by DBG2 and SPCR. */
1449 static void
acpi_print_dbg2_serial_subtype(uint16_t subtype)1450 acpi_print_dbg2_serial_subtype(uint16_t subtype)
1451 {
1452 
1453           switch (subtype) {
1454           case ACPI_DBG2_16550_COMPATIBLE:
1455                     printf("Fully 16550 compatible\n");
1456                     break;
1457           case ACPI_DBG2_16550_SUBSET:
1458                     printf("16550 subset with DBGP Rev. 1\n");
1459                     break;
1460           case ACPI_DBG2_ARM_PL011:
1461                     printf("ARM PL011\n");
1462                     break;
1463           case ACPI_DBG2_ARM_SBSA_32BIT:
1464                     printf("ARM SBSA 32bit only\n");
1465                     break;
1466           case ACPI_DBG2_ARM_SBSA_GENERIC:
1467                     printf("ARM SBSA Generic\n");
1468                     break;
1469           case ACPI_DBG2_ARM_DCC:
1470                     printf("ARM DCC\n");
1471                     break;
1472           case ACPI_DBG2_BCM2835:
1473                     printf("BCM2835\n");
1474                     break;
1475           default:
1476                     printf("reserved (%04hx)\n", subtype);
1477                     break;
1478           }
1479 }
1480 
1481 static void
acpi_print_dbg2_device(ACPI_DBG2_DEVICE * dev)1482 acpi_print_dbg2_device(ACPI_DBG2_DEVICE *dev)
1483 {
1484 
1485           printf("\t\tRevision=%u\n", dev->Revision);
1486           printf("\t\tLength=%u\n", dev->Length);
1487           printf("\t\tRegisterCount=%u\n", dev->RegisterCount);
1488 
1489           printf("\t\tNamepath=");
1490           acpi_print_string((char *)((vaddr_t)dev + dev->NamepathOffset),
1491               dev->NamepathLength);
1492           printf("\n");
1493 
1494           if (dev->OemDataLength) {
1495                     printf("\t\tOemDataLength=%u\n", dev->OemDataLength);
1496                     printf("\t\tOemDataOffset=%u\n", dev->OemDataOffset);
1497                     /* XXX need dump */
1498           }
1499 
1500           printf("\t\tPortType=");
1501           switch (dev->PortType) {
1502           case ACPI_DBG2_SERIAL_PORT:
1503                     printf("Serial\n" "\t\tPortSubtype=");
1504                     acpi_print_dbg2_serial_subtype(dev->PortSubtype);
1505                     break;
1506           case ACPI_DBG2_1394_PORT:
1507                     printf("IEEE1394\n" "\t\tPortSubtype=");
1508                     if (dev->PortSubtype == ACPI_DBG2_1394_STANDARD)
1509                               printf("Standard\n");
1510                     else
1511                               printf("reserved (%04hx)\n", dev->PortSubtype);
1512                     break;
1513           case ACPI_DBG2_USB_PORT:
1514                     printf("USB\n" "\t\tPortSubtype=");
1515                     switch (dev->PortSubtype) {
1516                     case ACPI_DBG2_USB_XHCI:
1517                               printf("XHCIn");
1518                               break;
1519                     case ACPI_DBG2_USB_EHCI:
1520                               printf("EHCI\n");
1521                               break;
1522                     default:
1523                               printf("reserved (%04hx)\n", dev->PortSubtype);
1524                               break;
1525                     }
1526                     break;
1527           case ACPI_DBG2_NET_PORT:
1528                     printf("Net\n" "\t\tPciVendorID=%04x\n", dev->PortSubtype);
1529                     break;
1530           default:
1531                     printf("reserved (%04hx)\n", dev->PortType);
1532                     printf("\t\tPortSubtype=reserved (%04hx)\n", dev->PortSubtype);
1533                     break;
1534           }
1535 
1536           printf("\t\tBaseAddressOffset=0x%04x\n", dev->BaseAddressOffset);
1537           printf("\t\tAddressSizeOffset=0x%04x\n", dev->AddressSizeOffset);
1538 }
1539 
1540 static void
acpi_handle_dbg2(ACPI_TABLE_HEADER * sdp)1541 acpi_handle_dbg2(ACPI_TABLE_HEADER *sdp)
1542 {
1543           ACPI_TABLE_DBG2 *dbg2;
1544           ACPI_DBG2_DEVICE *device;
1545           unsigned int i;
1546 
1547           printf(BEGIN_COMMENT);
1548           acpi_print_sdt(sdp);
1549           dbg2 = (ACPI_TABLE_DBG2 *)sdp;
1550 
1551           printf("\tCount=%u\n", dbg2->InfoCount);
1552           device = (ACPI_DBG2_DEVICE *)((vaddr_t)sdp + dbg2->InfoOffset);
1553           for (i = 0; i < dbg2->InfoCount; i++) {
1554                     printf("\tDevice %u={\n", i);
1555                     acpi_print_dbg2_device(device);
1556                     printf("\t}\n");
1557                     device++;
1558           }
1559 
1560           printf(END_COMMENT);
1561 }
1562 
1563 static void
acpi_print_einj_action(ACPI_WHEA_HEADER * whea)1564 acpi_print_einj_action(ACPI_WHEA_HEADER *whea)
1565 {
1566           printf("\tACTION={");
1567           switch (whea->Action) {
1568           case ACPI_EINJ_BEGIN_OPERATION:
1569                     printf("Begin Operation");
1570                     break;
1571           case ACPI_EINJ_GET_TRIGGER_TABLE:
1572                     printf("Get Trigger Table");
1573                     break;
1574           case ACPI_EINJ_SET_ERROR_TYPE:
1575                     printf("Set Error Type");
1576                     break;
1577           case ACPI_EINJ_GET_ERROR_TYPE:
1578                     printf("Get Error Type");
1579                     break;
1580           case ACPI_EINJ_END_OPERATION:
1581                     printf("End Operation");
1582                     break;
1583           case ACPI_EINJ_EXECUTE_OPERATION:
1584                     printf("Execute Operation");
1585                     break;
1586           case ACPI_EINJ_CHECK_BUSY_STATUS:
1587                     printf("Check Busy Status");
1588                     break;
1589           case ACPI_EINJ_GET_COMMAND_STATUS:
1590                     printf("Get Command Status");
1591                     break;
1592           case ACPI_EINJ_SET_ERROR_TYPE_WITH_ADDRESS:
1593                     printf("Set Error Type With Address");
1594                     break;
1595           case ACPI_EINJ_GET_EXECUTE_TIMINGS:
1596                     printf("Get Execute Operation Timings");
1597                     break;
1598           case ACPI_EINJ_ACTION_RESERVED:
1599                     printf("Preserved");
1600                     break;
1601           case ACPI_EINJ_TRIGGER_ERROR:
1602                     printf("Trigger Error");
1603                     break;
1604           default:
1605                     printf("%d", whea->Action);
1606                     break;
1607           }
1608           printf("}\n");
1609 }
1610 
1611 static void
acpi_print_einj_instruction(ACPI_WHEA_HEADER * whea)1612 acpi_print_einj_instruction(ACPI_WHEA_HEADER *whea)
1613 {
1614           uint32_t ins = whea->Instruction;
1615 
1616           printf("\tINSTRUCTION={");
1617           switch (ins) {
1618           case ACPI_EINJ_READ_REGISTER:
1619                     printf("Read Register");
1620                     break;
1621           case ACPI_EINJ_READ_REGISTER_VALUE:
1622                     printf("Read Register Value");
1623                     break;
1624           case ACPI_EINJ_WRITE_REGISTER:
1625                     printf("Write Register");
1626                     break;
1627           case ACPI_EINJ_WRITE_REGISTER_VALUE:
1628                     printf("Write Register Value");
1629                     break;
1630           case ACPI_EINJ_NOOP:
1631                     printf("Noop");
1632                     break;
1633           case ACPI_EINJ_INSTRUCTION_RESERVED:
1634                     printf("Reserved");
1635                     break;
1636           default:
1637                     printf("%d", ins);
1638                     break;
1639           }
1640           printf("}\n");
1641 }
1642 
1643 static void
acpi_print_einj_flags(ACPI_WHEA_HEADER * whea)1644 acpi_print_einj_flags(ACPI_WHEA_HEADER *whea)
1645 {
1646           uint32_t flags = whea->Flags;
1647 
1648           printf("\tFLAGS={");
1649           if (flags & ACPI_EINJ_PRESERVE)
1650                     printf("PRESERVED");
1651           printf("}\n");
1652 }
1653 
1654 static void
acpi_handle_einj(ACPI_TABLE_HEADER * sdp)1655 acpi_handle_einj(ACPI_TABLE_HEADER *sdp)
1656 {
1657           ACPI_TABLE_EINJ *einj;
1658           ACPI_EINJ_ENTRY *einj_entry;
1659           uint32_t einj_pos;
1660           u_int i;
1661 
1662           printf(BEGIN_COMMENT);
1663           acpi_print_sdt(sdp);
1664           einj = (ACPI_TABLE_EINJ *)sdp;
1665 
1666           printf("\tHeader Length=%d\n", einj->HeaderLength);
1667           printf("\tFlags=0x%x\n", einj->Flags);
1668           printf("\tEntries=%d\n", einj->Entries);
1669 
1670           einj_pos = sizeof(ACPI_TABLE_EINJ);
1671           for (i = 0; i < einj->Entries; i++) {
1672                     einj_entry = (ACPI_EINJ_ENTRY *)((char *)einj + einj_pos);
1673                     acpi_print_whea(&einj_entry->WheaHeader,
1674                         acpi_print_einj_action, acpi_print_einj_instruction,
1675                         acpi_print_einj_flags);
1676                     einj_pos += sizeof(ACPI_EINJ_ENTRY);
1677           }
1678           printf(END_COMMENT);
1679 }
1680 
1681 static void
acpi_print_erst_action(ACPI_WHEA_HEADER * whea)1682 acpi_print_erst_action(ACPI_WHEA_HEADER *whea)
1683 {
1684           printf("\tACTION={");
1685           switch (whea->Action) {
1686           case ACPI_ERST_BEGIN_WRITE:
1687                     printf("Begin Write");
1688                     break;
1689           case ACPI_ERST_BEGIN_READ:
1690                     printf("Begin Read");
1691                     break;
1692           case ACPI_ERST_BEGIN_CLEAR:
1693                     printf("Begin Clear");
1694                     break;
1695           case ACPI_ERST_END:
1696                     printf("End");
1697                     break;
1698           case ACPI_ERST_SET_RECORD_OFFSET:
1699                     printf("Set Record Offset");
1700                     break;
1701           case ACPI_ERST_EXECUTE_OPERATION:
1702                     printf("Execute Operation");
1703                     break;
1704           case ACPI_ERST_CHECK_BUSY_STATUS:
1705                     printf("Check Busy Status");
1706                     break;
1707           case ACPI_ERST_GET_COMMAND_STATUS:
1708                     printf("Get Command Status");
1709                     break;
1710           case ACPI_ERST_GET_RECORD_ID:
1711                     printf("Get Record ID");
1712                     break;
1713           case ACPI_ERST_SET_RECORD_ID:
1714                     printf("Set Record ID");
1715                     break;
1716           case ACPI_ERST_GET_RECORD_COUNT:
1717                     printf("Get Record Count");
1718                     break;
1719           case ACPI_ERST_BEGIN_DUMMY_WRIITE:
1720                     printf("Begin Dummy Write");
1721                     break;
1722           case ACPI_ERST_NOT_USED:
1723                     printf("Unused");
1724                     break;
1725           case ACPI_ERST_GET_ERROR_RANGE:
1726                     printf("Get Error Range");
1727                     break;
1728           case ACPI_ERST_GET_ERROR_LENGTH:
1729                     printf("Get Error Length");
1730                     break;
1731           case ACPI_ERST_GET_ERROR_ATTRIBUTES:
1732                     printf("Get Error Attributes");
1733                     break;
1734           case ACPI_ERST_EXECUTE_TIMINGS:
1735                     printf("Execute Operation Timings");
1736                     break;
1737           case ACPI_ERST_ACTION_RESERVED:
1738                     printf("Reserved");
1739                     break;
1740           default:
1741                     printf("%d", whea->Action);
1742                     break;
1743           }
1744           printf("}\n");
1745 }
1746 
1747 static void
acpi_print_erst_instruction(ACPI_WHEA_HEADER * whea)1748 acpi_print_erst_instruction(ACPI_WHEA_HEADER *whea)
1749 {
1750           printf("\tINSTRUCTION={");
1751           switch (whea->Instruction) {
1752           case ACPI_ERST_READ_REGISTER:
1753                     printf("Read Register");
1754                     break;
1755           case ACPI_ERST_READ_REGISTER_VALUE:
1756                     printf("Read Register Value");
1757                     break;
1758           case ACPI_ERST_WRITE_REGISTER:
1759                     printf("Write Register");
1760                     break;
1761           case ACPI_ERST_WRITE_REGISTER_VALUE:
1762                     printf("Write Register Value");
1763                     break;
1764           case ACPI_ERST_NOOP:
1765                     printf("Noop");
1766                     break;
1767           case ACPI_ERST_LOAD_VAR1:
1768                     printf("Load Var1");
1769                     break;
1770           case ACPI_ERST_LOAD_VAR2:
1771                     printf("Load Var2");
1772                     break;
1773           case ACPI_ERST_STORE_VAR1:
1774                     printf("Store Var1");
1775                     break;
1776           case ACPI_ERST_ADD:
1777                     printf("Add");
1778                     break;
1779           case ACPI_ERST_SUBTRACT:
1780                     printf("Subtract");
1781                     break;
1782           case ACPI_ERST_ADD_VALUE:
1783                     printf("Add Value");
1784                     break;
1785           case ACPI_ERST_SUBTRACT_VALUE:
1786                     printf("Subtract Value");
1787                     break;
1788           case ACPI_ERST_STALL:
1789                     printf("Stall");
1790                     break;
1791           case ACPI_ERST_STALL_WHILE_TRUE:
1792                     printf("Stall While True");
1793                     break;
1794           case ACPI_ERST_SKIP_NEXT_IF_TRUE:
1795                     printf("Skip Next If True");
1796                     break;
1797           case ACPI_ERST_GOTO:
1798                     printf("Goto");
1799                     break;
1800           case ACPI_ERST_SET_SRC_ADDRESS_BASE:
1801                     printf("Set Src Address Base");
1802                     break;
1803           case ACPI_ERST_SET_DST_ADDRESS_BASE:
1804                     printf("Set Dst Address Base");
1805                     break;
1806           case ACPI_ERST_MOVE_DATA:
1807                     printf("Move Data");
1808                     break;
1809           case ACPI_ERST_INSTRUCTION_RESERVED:
1810                     printf("Reserved");
1811                     break;
1812           default:
1813                     printf("%d (reserved)", whea->Instruction);
1814                     break;
1815           }
1816           printf("}\n");
1817 }
1818 
1819 static void
acpi_print_erst_flags(ACPI_WHEA_HEADER * whea)1820 acpi_print_erst_flags(ACPI_WHEA_HEADER *whea)
1821 {
1822           uint32_t flags = whea->Flags;
1823 
1824           printf("\tFLAGS={");
1825           if (flags & ACPI_ERST_PRESERVE)
1826                     printf("PRESERVED");
1827           printf("}\n");
1828 }
1829 
1830 static void
acpi_handle_erst(ACPI_TABLE_HEADER * sdp)1831 acpi_handle_erst(ACPI_TABLE_HEADER *sdp)
1832 {
1833           ACPI_TABLE_ERST *erst;
1834           ACPI_ERST_ENTRY *erst_entry;
1835           uint32_t erst_pos;
1836           u_int i;
1837 
1838           printf(BEGIN_COMMENT);
1839           acpi_print_sdt(sdp);
1840           erst = (ACPI_TABLE_ERST *)sdp;
1841 
1842           printf("\tHeader Length=%d\n", erst->HeaderLength);
1843           printf("\tEntries=%d\n", erst->Entries);
1844 
1845           erst_pos = sizeof(ACPI_TABLE_ERST);
1846           for (i = 0; i < erst->Entries; i++) {
1847                     erst_entry = (ACPI_ERST_ENTRY *)((char *)erst + erst_pos);
1848                     acpi_print_whea(&erst_entry->WheaHeader,
1849                         acpi_print_erst_action, acpi_print_erst_instruction,
1850                         acpi_print_erst_flags);
1851                     erst_pos += sizeof(ACPI_ERST_ENTRY);
1852           }
1853           printf(END_COMMENT);
1854 }
1855 
1856 static void
acpi_print_gtd_timer(const char * name,uint32_t interrupt,uint32_t flags)1857 acpi_print_gtd_timer(const char *name, uint32_t interrupt, uint32_t flags)
1858 {
1859 
1860           printf("\t%s Timer GSIV=%d\n", name, interrupt);
1861           printf("\t%s Flags={Mode=", name);
1862           if (flags & ACPI_GTDT_INTERRUPT_MODE)
1863                     printf("edge");
1864           else
1865                     printf("level");
1866           printf(", Polarity=");
1867           if (flags & ACPI_GTDT_INTERRUPT_POLARITY)
1868                     printf("active-lo");
1869           else
1870                     printf("active-hi");
1871           if (flags & ACPI_GTDT_ALWAYS_ON)
1872                     printf(", always-on");
1873           printf("}\n");
1874 }
1875 
1876 static void
acpi_print_gtd_block_timer_flags(const char * name,uint32_t interrupt,uint32_t flags)1877 acpi_print_gtd_block_timer_flags(const char *name, uint32_t interrupt,
1878     uint32_t flags)
1879 {
1880 
1881           printf("\t\t%s Timer GSIV=%d\n", name, interrupt);
1882           printf("\t\t%s Timer Flags={Mode=", name);
1883           if (flags & ACPI_GTDT_GT_IRQ_MODE)
1884                     printf("Secure");
1885           else
1886                     printf("Non-Secure");
1887           printf(", Polarity=");
1888           if (flags & ACPI_GTDT_GT_IRQ_POLARITY)
1889                     printf("active-lo");
1890           else
1891                     printf("active-hi");
1892           printf("}\n");
1893 }
1894 
1895 static void
acpi_print_gtblock(ACPI_GTDT_TIMER_BLOCK * gtblock)1896 acpi_print_gtblock(ACPI_GTDT_TIMER_BLOCK *gtblock)
1897 {
1898           ACPI_GTDT_TIMER_ENTRY *entry;
1899           unsigned int i;
1900 
1901           printf("\tType=GT Block\n");
1902           printf("\tLength=%d\n", gtblock->Header.Length);
1903           /* XXX might not 8byte aligned */
1904           printf("\tBlockAddress=%016jx\n",
1905               (uintmax_t)gtblock->BlockAddress);
1906 
1907           printf("\tGT Block Timer Count=%d\n", gtblock->TimerCount);
1908           entry = (ACPI_GTDT_TIMER_ENTRY *)((vaddr_t)gtblock
1909               + gtblock->TimerOffset);
1910           for (i = 0; i < gtblock->TimerCount; i++) {
1911                     printf("\n");
1912                     if (entry >= (ACPI_GTDT_TIMER_ENTRY *)((vaddr_t)gtblock
1913                         + gtblock->Header.Length)) {
1914                               printf("\\ttWrong Timer entry\n");
1915                               break;
1916                     }
1917                     printf("\t\tFrame Number=%d\n", entry->FrameNumber);
1918                     /* XXX might not 8byte aligned */
1919                     printf("\t\tBaseAddress=%016jx\n",
1920                         (uintmax_t)entry->BaseAddress);
1921                     /* XXX might not 8byte aligned */
1922                     printf("\t\tEl0BaseAddress=%016jx\n",
1923                         (uintmax_t)entry->El0BaseAddress);
1924 
1925                     acpi_print_gtd_block_timer_flags("Physical",
1926                         entry->TimerInterrupt, entry->TimerFlags);
1927                     acpi_print_gtd_block_timer_flags("Virtual",
1928                         entry->VirtualTimerInterrupt, entry->VirtualTimerFlags);
1929 
1930                     printf("\t\tCommon Flags={Mode=");
1931                     if (entry->CommonFlags & ACPI_GTDT_GT_IS_SECURE_TIMER)
1932                               printf("Secure");
1933                     else
1934                               printf("Non-Secure");
1935                     if (entry->CommonFlags & ACPI_GTDT_GT_ALWAYS_ON)
1936                               printf(", always-on");
1937                     printf("}\n");
1938 
1939                     entry++;
1940           }
1941 }
1942 
1943 static void
acpi_print_sbsa_watchdog(ACPI_GTDT_WATCHDOG * wdog)1944 acpi_print_sbsa_watchdog(ACPI_GTDT_WATCHDOG *wdog)
1945 {
1946 
1947           printf("\tType=Watchdog GT\n");
1948           printf("\tLength=%d\n", wdog->Header.Length);
1949           /* XXX might not 8byte aligned */
1950           printf("\tRefreshFrameAddress=%016jx\n",
1951               (uintmax_t)wdog->RefreshFrameAddress);
1952           /* XXX might not 8byte aligned */
1953           printf("\tControlFrameAddress=%016jx\n",
1954               (uintmax_t)wdog->ControlFrameAddress);
1955           printf("\tGSIV=%d\n", wdog->TimerInterrupt);
1956 
1957           printf("\tFlags={Mode=");
1958           if (wdog->TimerFlags & ACPI_GTDT_WATCHDOG_IRQ_MODE)
1959                     printf("edge");
1960           else
1961                     printf("level");
1962           printf(", Polarity=");
1963           if (wdog->TimerFlags & ACPI_GTDT_WATCHDOG_IRQ_POLARITY)
1964                     printf("active-lo");
1965           else
1966                     printf("active-hi");
1967           if (wdog->TimerFlags & ACPI_GTDT_WATCHDOG_SECURE)
1968                     printf(", Secure");
1969           else
1970                     printf(", Non-Secure");
1971           printf("}\n");
1972 }
1973 
1974 static void
acpi_handle_gtdt(ACPI_TABLE_HEADER * sdp)1975 acpi_handle_gtdt(ACPI_TABLE_HEADER *sdp)
1976 {
1977           ACPI_TABLE_GTDT *gtdt;
1978           ACPI_GTDT_HEADER *hdr;
1979           u_int i;
1980 
1981           printf(BEGIN_COMMENT);
1982           acpi_print_sdt(sdp);
1983           gtdt = (ACPI_TABLE_GTDT *)sdp;
1984 
1985           printf("\tCounterBlockAddresss=%016jx\n",
1986               (uintmax_t)gtdt->CounterBlockAddresss); /* XXX not 8byte aligned */
1987           printf("\tCounterReadBlockAddress=%016jx\n",
1988               (uintmax_t)gtdt->CounterReadBlockAddress);
1989 
1990 #define PRINTTIMER(gtdt, name) acpi_print_gtd_timer(        \
1991                     #name, (gtdt)-> name## Interrupt,       \
1992           (gtdt)-> name ## Flags)
1993 
1994           PRINTTIMER(gtdt, SecureEl1);
1995           PRINTTIMER(gtdt, NonSecureEl1);
1996           PRINTTIMER(gtdt, VirtualTimer);
1997           PRINTTIMER(gtdt, NonSecureEl2);
1998 
1999 #undef PRINTTIMER
2000 
2001           printf("\tPlatform Timer Count=%d\n", gtdt->PlatformTimerCount);
2002 
2003           hdr = (ACPI_GTDT_HEADER *)((vaddr_t)sdp + gtdt->PlatformTimerOffset);
2004           for (i = 0; i < gtdt->PlatformTimerCount; i++) {
2005                     printf("\n");
2006                     if (hdr >= (ACPI_GTDT_HEADER *)((vaddr_t)sdp + sdp->Length)) {
2007                               printf("\tWrong GTDT header"
2008                                   "(type = %hhu, length = %hu)\n",
2009                                   hdr->Type, hdr->Length);
2010                               break;
2011                     }
2012 
2013                     switch (hdr->Type) {
2014                     case ACPI_GTDT_TYPE_TIMER_BLOCK:
2015                               acpi_print_gtblock((ACPI_GTDT_TIMER_BLOCK *)hdr);
2016                               break;
2017                     case ACPI_GTDT_TYPE_WATCHDOG:
2018                               acpi_print_sbsa_watchdog((ACPI_GTDT_WATCHDOG *)hdr);
2019                               break;
2020                     default:
2021                               printf("\tUnknown Platform Timer Type"
2022                                   "(type = %hhu, length = %hu)\n",
2023                                   hdr->Type, hdr->Length);
2024                               break;
2025                     }
2026                     /* Next */
2027                     hdr = (ACPI_GTDT_HEADER *)((vaddr_t)hdr + hdr->Length);
2028           }
2029           printf(END_COMMENT);
2030 }
2031 
2032 static void
acpi_handle_madt(ACPI_TABLE_HEADER * sdp)2033 acpi_handle_madt(ACPI_TABLE_HEADER *sdp)
2034 {
2035           ACPI_TABLE_MADT *madt;
2036 
2037           printf(BEGIN_COMMENT);
2038           acpi_print_sdt(sdp);
2039           madt = (ACPI_TABLE_MADT *)sdp;
2040           printf("\tLocal APIC ADDR=0x%08x\n", madt->Address);
2041           printf("\tFlags={");
2042           if (madt->Flags & ACPI_MADT_PCAT_COMPAT)
2043                     printf("PC-AT");
2044           printf("}\n");
2045           acpi_walk_subtables(sdp, (madt + 1), acpi_print_madt);
2046           printf(END_COMMENT);
2047 }
2048 
2049 static void
acpi_handle_hpet(ACPI_TABLE_HEADER * sdp)2050 acpi_handle_hpet(ACPI_TABLE_HEADER *sdp)
2051 {
2052           ACPI_TABLE_HPET *hpet;
2053 
2054           printf(BEGIN_COMMENT);
2055           acpi_print_sdt(sdp);
2056           hpet = (ACPI_TABLE_HPET *)sdp;
2057           printf("\tHPET Number=%d\n", hpet->Sequence);
2058           printf("\tADDR=");
2059           acpi_print_gas(&hpet->Address);
2060           printf("\n\tHW Rev=0x%x\n", hpet->Id & ACPI_HPET_ID_HARDWARE_REV_ID);
2061           printf("\tComparators=%d\n", (hpet->Id & ACPI_HPET_ID_COMPARATORS) >>
2062               8);
2063           printf("\tCounter Size=%d\n", hpet->Id & ACPI_HPET_ID_COUNT_SIZE_CAP ?
2064               1 : 0);
2065           printf("\tLegacy IRQ routing capable={");
2066           if (hpet->Id & ACPI_HPET_ID_LEGACY_CAPABLE)
2067                     printf("TRUE}\n");
2068           else
2069                     printf("FALSE}\n");
2070           printf("\tPCI Vendor ID=0x%04x\n", hpet->Id >> 16);
2071           printf("\tMinimal Tick=%d\n", hpet->MinimumTick);
2072           printf("\tFlags=0x%02x\n", hpet->Flags);
2073           printf(END_COMMENT);
2074 }
2075 
2076 /*
2077  * IORT
2078  * I/O Remapping Table
2079  */
2080 
2081 static void acpi_print_iort_its_group(ACPI_IORT_NODE *);
2082 static void acpi_print_iort_named_component(ACPI_IORT_NODE *);
2083 static void acpi_print_iort_root_complex(ACPI_IORT_NODE *);
2084 static void acpi_print_iort_smmuv1v2(ACPI_IORT_NODE *);
2085 static void acpi_print_iort_smmuv3(ACPI_IORT_NODE *);
2086 
2087 struct iort_node_list {
2088           uint8_t   Type;
2089           const char *gname;
2090           void (*func)(ACPI_IORT_NODE *);
2091 } iort_node_list [] = {
2092 #define NDMAC(name) ACPI_IORT_NODE_## name
2093 #define PRFN(name)  acpi_print_iort_## name
2094           { NDMAC(ITS_GROUP),    "ITS group",       PRFN(its_group)},
2095           { NDMAC(NAMED_COMPONENT),  "Named component", PRFN(named_component)},
2096           { NDMAC(PCI_ROOT_COMPLEX), "Root complex",    PRFN(root_complex)},
2097           { NDMAC(SMMU),                   "SMMUv1 or v2",    PRFN(smmuv1v2)},
2098           { NDMAC(SMMU_V3),      "SMMUv3",              PRFN(smmuv3)},
2099           { 255, NULL, NULL},
2100 #undef NDMAC
2101 #undef PRFN
2102 };
2103 
2104 static void
acpi_print_iort_memory_access(ACPI_IORT_MEMORY_ACCESS * memacc)2105 acpi_print_iort_memory_access(ACPI_IORT_MEMORY_ACCESS *memacc)
2106 {
2107 
2108           printf("\tMemory Access={\n");
2109           printf("\t\tCacheCoherency=");
2110           switch (memacc->CacheCoherency) {
2111           case ACPI_IORT_NODE_COHERENT:
2112                     printf("Fully coherent\n");
2113                     break;
2114           case ACPI_IORT_NODE_NOT_COHERENT:
2115                     printf("Not coherent\n");
2116                     break;
2117           default:
2118                     printf("reserved (%u)\n", memacc->CacheCoherency);
2119                     break;
2120           }
2121           printf("\t\tAllocation Hints=");
2122 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_IORT_HT_## flag, #flag)
2123                     PRINTFLAG(memacc->Hints, TRANSIENT);
2124                     PRINTFLAG(memacc->Hints, WRITE);
2125                     PRINTFLAG(memacc->Hints, READ);
2126                     PRINTFLAG(memacc->Hints, OVERRIDE);
2127                     PRINTFLAG_END();
2128 #undef PRINTFLAG
2129           printf("\t\tMemory Access Flags=");
2130 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_IORT_MF_## flag, #flag)
2131                     PRINTFLAG(memacc->MemoryFlags, COHERENCY);
2132                     PRINTFLAG(memacc->MemoryFlags, ATTRIBUTES);
2133                     PRINTFLAG_END();
2134 #undef PRINTFLAG
2135           printf("\t}\n");
2136 }
2137 
2138 static void
acpi_print_iort_its_group(ACPI_IORT_NODE * node)2139 acpi_print_iort_its_group(ACPI_IORT_NODE *node)
2140 {
2141           ACPI_IORT_ITS_GROUP *itsg = (ACPI_IORT_ITS_GROUP *)node->NodeData;
2142           uint32_t *idp;
2143           unsigned int i;
2144 
2145           idp = itsg->Identifiers;
2146           for (i = 0; i < itsg->ItsCount; i++)
2147                     printf("\tGIC ITS ID=%d\n", idp[i]);
2148 }
2149 
2150 static void
acpi_print_iort_named_component(ACPI_IORT_NODE * node)2151 acpi_print_iort_named_component(ACPI_IORT_NODE *node)
2152 {
2153           ACPI_IORT_NAMED_COMPONENT *ncomp
2154               = (ACPI_IORT_NAMED_COMPONENT *)node->NodeData;
2155 
2156 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_IORT_NC_## flag, #flag)
2157           printf("\tNode Flags={PASID_BITS=%u",
2158               (ncomp->NodeFlags & ACPI_IORT_NC_PASID_BITS) >> 1);
2159           pf_sep = ',';
2160           PRINTFLAG(ncomp->NodeFlags, STALL_SUPPORTED);
2161           PRINTFLAG_END();
2162 #undef PRINTFLAG
2163           acpi_print_iort_memory_access(
2164                     (ACPI_IORT_MEMORY_ACCESS *)&ncomp->MemoryProperties);
2165           printf("\tMemory address size=%hhu\n", ncomp->MemoryAddressLimit);
2166           printf("\tDevice object Name=%s\n", ncomp->DeviceName);
2167 }
2168 
2169 static void
acpi_print_iort_root_complex(ACPI_IORT_NODE * node)2170 acpi_print_iort_root_complex(ACPI_IORT_NODE *node)
2171 {
2172           ACPI_IORT_ROOT_COMPLEX *rcmp
2173               = (ACPI_IORT_ROOT_COMPLEX *)node->NodeData;
2174 
2175           acpi_print_iort_memory_access(
2176                     (ACPI_IORT_MEMORY_ACCESS *)&rcmp->MemoryProperties);
2177           printf("\tATS Attribute=%s\n",
2178               (rcmp->AtsAttribute & ACPI_IORT_ATS_SUPPORTED)
2179               ? "supported" : "not supported");
2180           printf("\tPCI Segment=%u\n", rcmp->PciSegmentNumber);
2181           printf("\tMemory address size limit=%hhu\n", rcmp->MemoryAddressLimit);
2182 }
2183 
2184 static void
acpi_print_iort_smmuv1v2_intflags(uint32_t flags)2185 acpi_print_iort_smmuv1v2_intflags(uint32_t flags)
2186 {
2187 
2188           printf("{Mode=");
2189           if (flags & 0x01)
2190                     printf("edge");
2191           else
2192                     printf("level");
2193           printf("}\n");
2194 }
2195 
2196 static void
acpi_print_iort_smmuv1v2(ACPI_IORT_NODE * node)2197 acpi_print_iort_smmuv1v2(ACPI_IORT_NODE *node)
2198 {
2199           ACPI_IORT_SMMU *smmu = (ACPI_IORT_SMMU *)node->NodeData;
2200           ACPI_IORT_SMMU_GSI *gsi;
2201           uint64_t *iarray;
2202           unsigned int i;
2203 
2204           printf("\tBase Address=%016jx\n", (uintmax_t)smmu->BaseAddress);
2205           printf("\tSpan=%016jx\n", (uintmax_t)smmu->Span);
2206           printf("\tModel=");
2207           switch (smmu->Model) {
2208           case ACPI_IORT_SMMU_V1:
2209                     printf("Generic SMMUv1\n");
2210                     break;
2211           case ACPI_IORT_SMMU_V2:
2212                     printf("Generic SMMUv2\n");
2213                     break;
2214           case ACPI_IORT_SMMU_CORELINK_MMU400:
2215                     printf("Arm Corelink MMU-400\n");
2216                     break;
2217           case ACPI_IORT_SMMU_CORELINK_MMU500:
2218                     printf("Arm Corelink MMU-500\n");
2219                     break;
2220           case ACPI_IORT_SMMU_CORELINK_MMU401:
2221                     printf("Arm Corelink MMU-401\n");
2222                     break;
2223           case ACPI_IORT_SMMU_CAVIUM_THUNDERX:
2224                     printf("Cavium ThunderX SMMUv2\n");
2225                     break;
2226           default:
2227                     printf("reserved (%u)\n", smmu->Model);
2228                     break;
2229           }
2230 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_IORT_SMMU_## flag, #flag)
2231           printf("\tFlags=");
2232           PRINTFLAG(smmu->Flags, DVM_SUPPORTED);
2233           PRINTFLAG(smmu->Flags, COHERENT_WALK);
2234           PRINTFLAG_END();
2235 #undef PRINTFLAG
2236 
2237           gsi = (ACPI_IORT_SMMU_GSI *)((vaddr_t)node
2238               + smmu->GlobalInterruptOffset);
2239           printf("\tNSgIrpt=%u\n", gsi->NSgIrpt);
2240           printf("\tNSgIrptFlags=");
2241           acpi_print_iort_smmuv1v2_intflags(gsi->NSgIrptFlags);
2242           printf("\tNSgCfgIrpt=%u\n", gsi->NSgCfgIrpt);
2243           printf("\tNSgCfgIrptFlags=");
2244           acpi_print_iort_smmuv1v2_intflags(gsi->NSgCfgIrptFlags);
2245 
2246           if (smmu->ContextInterruptCount != 0) {
2247                     iarray = (uint64_t *)((vaddr_t)node
2248                         + smmu->ContextInterruptOffset);
2249                     printf("\tContext Interrupts={\n");
2250                     for (i = 0; i < smmu->ContextInterruptCount; i++) {
2251                               printf("\t\tGSIV=%u\n",
2252                                   (uint32_t)(iarray[i] & 0xffffffff));
2253                               printf("\t\tFlags=%u\n", (uint32_t)(iarray[i] >> 32));
2254                     }
2255           }
2256           if (smmu->PmuInterruptCount != 0) {
2257                     iarray = (uint64_t *)((vaddr_t)node
2258                         + smmu->PmuInterruptOffset);
2259                     printf("\tPmu Interrupts={\n");
2260                     for (i = 0; i < smmu->PmuInterruptCount; i++) {
2261                               printf("\t\tGSIV=%u\n",
2262                                   (uint32_t)(iarray[i] & 0xffffffff));
2263                               printf("\t\tFlags=%u\n", (uint32_t)(iarray[i] >> 32));
2264                     }
2265           }
2266 }
2267 
2268 static void
acpi_print_iort_smmuv3(ACPI_IORT_NODE * node)2269 acpi_print_iort_smmuv3(ACPI_IORT_NODE *node)
2270 {
2271           ACPI_IORT_SMMU_V3 *smmu = (ACPI_IORT_SMMU_V3 *)node->NodeData;
2272           uint8_t httuo;
2273 
2274           printf("\tBase Address=%016jx\n", (uintmax_t)smmu->BaseAddress);
2275 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_IORT_SMMU_V3_## flag, \
2276               #flag)
2277           httuo = __SHIFTOUT(smmu->Flags, ACPI_IORT_SMMU_V3_HTTU_OVERRIDE);
2278           printf("\tFlags={HTTU Override=%hhx", httuo);
2279           pf_sep = ',';
2280           PRINTFLAG(smmu->Flags, HTTU_OVERRIDE);
2281           PRINTFLAG(smmu->Flags, COHACC_OVERRIDE);
2282           PRINTFLAG(smmu->Flags, PXM_VALID);
2283           PRINTFLAG_END();
2284 #undef PRINTFLAG
2285           printf("\tVATOS Address=%016jx\n", (uintmax_t)smmu->VatosAddress);
2286           printf("\tModel=");
2287           switch (smmu->Model) {
2288           case ACPI_IORT_SMMU_V3_GENERIC:
2289                     printf("Generic SMMUv3\n");
2290                     break;
2291           case ACPI_IORT_SMMU_V3_HISILICON_HI161X:
2292                     printf("HiSilicon Hi161x SMMU-v3\n");
2293                     break;
2294           case ACPI_IORT_SMMU_V3_CAVIUM_CN99XX:
2295                     printf("Cavium CN99xx SMMU-v3\n");
2296                     break;
2297           default:
2298                     printf("reserved (%u)\n", smmu->Model);
2299                     break;
2300           }
2301 
2302           printf("\tEvent GSIV=%u\n", smmu->EventGsiv);
2303           printf("\tPRI GSIV=%u\n", smmu->PriGsiv);
2304           printf("\tGERR GSIV=%u\n", smmu->GerrGsiv);
2305           printf("\tSync GSIV=%u\n", smmu->SyncGsiv);
2306           printf("\tProximity domain=%u\n", smmu->Pxm);
2307 
2308           /* XXX should we print the referred contents? */
2309           printf("\tDevice ID mapping index=%u\n", smmu->IdMappingIndex);
2310 }
2311 
2312 static void
acpi_print_iort_node(ACPI_IORT_NODE * node)2313 acpi_print_iort_node(ACPI_IORT_NODE *node)
2314 {
2315           ACPI_IORT_ID_MAPPING *mapping;
2316           uint32_t offset;
2317           int datasize;
2318           bool dodump = false;
2319           struct iort_node_list *list;
2320           unsigned int i;
2321 
2322           printf("\tLength=%hu\n", node->Length);
2323           printf("\tRevision=%hhu\n", node->Revision);
2324           printf("\tType=");
2325 
2326           datasize = node->MappingOffset - offsetof(ACPI_IORT_NODE, NodeData);
2327           if (datasize != 0)
2328                     dodump = true;
2329 
2330           for (list = iort_node_list; list->gname != NULL; list++) {
2331                     if (node->Type == list->Type) {
2332                               printf("%s\n", list->gname);
2333                               if (dodump)
2334                                         (*list->func)(node);
2335                               break;
2336                     }
2337           }
2338           if (list->gname == NULL)
2339                     printf("reserved (0x%hhx)\n", node->Type);
2340 
2341           printf("\tMappingCount=%u\n", node->MappingCount);
2342           if (node->MappingCount == 0)
2343                     return;
2344 
2345           offset = node->MappingOffset;
2346           printf("\tMapping offset=%u\n", offset);
2347           for (i = 0; i < node->MappingCount; i++) {
2348                     mapping = (ACPI_IORT_ID_MAPPING *)((vaddr_t)node + offset);
2349                     printf("\tMapping={\n");
2350                     printf("\t\tInput base=%u\n", mapping->InputBase);
2351                     printf("\t\tCount=%u\n", mapping->IdCount);
2352                     printf("\t\tOutput base=%u\n", mapping->OutputBase);
2353                     printf("\t\tOutput reference offset=%u\n",
2354                         mapping->OutputReference);
2355 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_IORT_ID_## flag, #flag)
2356                     printf("\t\tFlags=");
2357                     PRINTFLAG(mapping->Flags, SINGLE_MAPPING);
2358                     PRINTFLAG_END();
2359 #undef PRINTFLAG
2360                     printf("\t}\n");
2361                     offset += sizeof(ACPI_IORT_ID_MAPPING);
2362           }
2363 }
2364 
2365 static void
acpi_handle_iort(ACPI_TABLE_HEADER * sdp)2366 acpi_handle_iort(ACPI_TABLE_HEADER *sdp)
2367 {
2368           ACPI_TABLE_IORT *iort;
2369           ACPI_IORT_NODE *node;
2370           unsigned int i;
2371 
2372           printf(BEGIN_COMMENT);
2373           acpi_print_sdt(sdp);
2374           iort = (ACPI_TABLE_IORT *)sdp;
2375           printf("\tIORT Nodes=%u\n", iort->NodeCount);
2376           printf("\tNode offset=%u\n", iort->NodeOffset);
2377 
2378           node = (ACPI_IORT_NODE *)((vaddr_t)iort + iort->NodeOffset);
2379           for (i = 0; i < iort->NodeCount; i++) {
2380                     printf("\n");
2381                     acpi_print_iort_node(node);
2382 
2383                     /* Next */
2384                     node = (ACPI_IORT_NODE *)((vaddr_t)node + node->Length);
2385           }
2386 
2387           printf(END_COMMENT);
2388 }
2389 
2390 static void
acpi_print_native_lpit(ACPI_LPIT_NATIVE * nl)2391 acpi_print_native_lpit(ACPI_LPIT_NATIVE *nl)
2392 {
2393           printf("\tEntryTrigger=");
2394           acpi_print_gas(&nl->EntryTrigger);
2395           printf("\n\tResidency=%u\n", nl->Residency);
2396           printf("\tLatency=%u\n", nl->Latency);
2397           if (nl->Header.Flags & ACPI_LPIT_NO_COUNTER)
2398                     printf("\tResidencyCounter=Not Present");
2399           else {
2400                     printf("\tResidencyCounter=");
2401                     acpi_print_gas(&nl->ResidencyCounter);
2402                     printf("\n");
2403           }
2404           if (nl->CounterFrequency)
2405                     printf("\tCounterFrequency=%ju\n", nl->CounterFrequency);
2406           else
2407                     printf("\tCounterFrequency=TSC\n");
2408 }
2409 
2410 static void
acpi_print_lpit(ACPI_LPIT_HEADER * lpit)2411 acpi_print_lpit(ACPI_LPIT_HEADER *lpit)
2412 {
2413           if (lpit->Type == ACPI_LPIT_TYPE_NATIVE_CSTATE)
2414                     printf("\tType=ACPI_LPIT_TYPE_NATIVE_CSTATE\n");
2415           else
2416                     warnx("unknown LPIT type %u", lpit->Type);
2417 
2418           printf("\tLength=%u\n", lpit->Length);
2419           printf("\tUniqueId=0x%04x\n", lpit->UniqueId);
2420 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_LPIT_## flag, #flag)
2421           printf("\tFlags=");
2422           PRINTFLAG(lpit->Flags, STATE_DISABLED);
2423           PRINTFLAG_END();
2424 #undef PRINTFLAG
2425 
2426           if (lpit->Type == ACPI_LPIT_TYPE_NATIVE_CSTATE)
2427                     acpi_print_native_lpit((ACPI_LPIT_NATIVE *)lpit);
2428 }
2429 
2430 static void
acpi_walk_lpit(ACPI_TABLE_HEADER * table,void * first,void (* action)(ACPI_LPIT_HEADER *))2431 acpi_walk_lpit(ACPI_TABLE_HEADER *table, void *first,
2432     void (*action)(ACPI_LPIT_HEADER *))
2433 {
2434           ACPI_LPIT_HEADER *subtable;
2435           char *end;
2436 
2437           subtable = first;
2438           end = (char *)table + table->Length;
2439           while ((char *)subtable < end) {
2440                     printf("\n");
2441                     if (subtable->Length < sizeof(ACPI_LPIT_HEADER)) {
2442                               warnx("invalid subtable length %u", subtable->Length);
2443                               return;
2444                     }
2445                     action(subtable);
2446                     subtable = (ACPI_LPIT_HEADER *)((char *)subtable +
2447                         subtable->Length);
2448           }
2449 }
2450 
2451 static void
acpi_handle_lpit(ACPI_TABLE_HEADER * sdp)2452 acpi_handle_lpit(ACPI_TABLE_HEADER *sdp)
2453 {
2454           ACPI_TABLE_LPIT *lpit;
2455 
2456           printf(BEGIN_COMMENT);
2457           acpi_print_sdt(sdp);
2458           lpit = (ACPI_TABLE_LPIT *)sdp;
2459           acpi_walk_lpit(sdp, (lpit + 1), acpi_print_lpit);
2460 
2461           printf(END_COMMENT);
2462 }
2463 
2464 static void
acpi_handle_msct(ACPI_TABLE_HEADER * sdp)2465 acpi_handle_msct(ACPI_TABLE_HEADER *sdp)
2466 {
2467           ACPI_TABLE_MSCT *msct;
2468           ACPI_MSCT_PROXIMITY *msctentry;
2469           uint32_t pos;
2470 
2471           printf(BEGIN_COMMENT);
2472           acpi_print_sdt(sdp);
2473           msct = (ACPI_TABLE_MSCT *)sdp;
2474 
2475           printf("\tProximity Offset=0x%x\n", msct->ProximityOffset);
2476           printf("\tMax Proximity Domains=%d\n", msct->MaxProximityDomains);
2477           printf("\tMax Clock Domains=%d\n", msct->MaxClockDomains);
2478           printf("\tMax Physical Address=0x%"PRIx64"\n", msct->MaxAddress);
2479 
2480           pos = msct->ProximityOffset;
2481           while (pos < msct->Header.Length) {
2482                     msctentry = (ACPI_MSCT_PROXIMITY *)((char *)msct + pos);
2483                     pos += msctentry->Length;
2484 
2485                     printf("\n");
2486                     printf("\tRevision=%d\n", msctentry->Revision);
2487                     printf("\tLength=%d\n", msctentry->Length);
2488                     printf("\tRange Start=%d\n", msctentry->RangeStart);
2489                     printf("\tRange End=%d\n", msctentry->RangeEnd);
2490                     printf("\tProcessor Capacity=%d\n",
2491                         msctentry->ProcessorCapacity);
2492                     printf("\tMemory Capacity=0x%"PRIx64" byte\n",
2493                         msctentry->MemoryCapacity);
2494           }
2495 
2496           printf(END_COMMENT);
2497 }
2498 
2499 static void
acpi_handle_ecdt(ACPI_TABLE_HEADER * sdp)2500 acpi_handle_ecdt(ACPI_TABLE_HEADER *sdp)
2501 {
2502           ACPI_TABLE_ECDT *ecdt;
2503 
2504           printf(BEGIN_COMMENT);
2505           acpi_print_sdt(sdp);
2506           ecdt = (ACPI_TABLE_ECDT *)sdp;
2507           printf("\tEC_CONTROL=");
2508           acpi_print_gas(&ecdt->Control);
2509           printf("\n\tEC_DATA=");
2510           acpi_print_gas(&ecdt->Data);
2511           printf("\n\tUID=%#x, ", ecdt->Uid);
2512           printf("GPE_BIT=%#x\n", ecdt->Gpe);
2513           printf("\tEC_ID=%s\n", ecdt->Id);
2514           printf(END_COMMENT);
2515 }
2516 
2517 static void
acpi_handle_mcfg(ACPI_TABLE_HEADER * sdp)2518 acpi_handle_mcfg(ACPI_TABLE_HEADER *sdp)
2519 {
2520           ACPI_TABLE_MCFG *mcfg;
2521           ACPI_MCFG_ALLOCATION *alloc;
2522           u_int i, entries;
2523 
2524           printf(BEGIN_COMMENT);
2525           acpi_print_sdt(sdp);
2526           mcfg = (ACPI_TABLE_MCFG *)sdp;
2527           entries = (sdp->Length - sizeof(ACPI_TABLE_MCFG)) /
2528               sizeof(ACPI_MCFG_ALLOCATION);
2529           alloc = (ACPI_MCFG_ALLOCATION *)(mcfg + 1);
2530           for (i = 0; i < entries; i++, alloc++) {
2531                     printf("\n");
2532                     printf("\tBase Address=0x%016jx\n", (uintmax_t)alloc->Address);
2533                     printf("\tSegment Group=0x%04x\n", alloc->PciSegment);
2534                     printf("\tStart Bus=%d\n", alloc->StartBusNumber);
2535                     printf("\tEnd Bus=%d\n", alloc->EndBusNumber);
2536           }
2537           printf(END_COMMENT);
2538 }
2539 
2540 static void
acpi_print_pcct_subspace(ACPI_PCCT_SUBSPACE * subspace)2541 acpi_print_pcct_subspace(ACPI_PCCT_SUBSPACE *subspace)
2542 {
2543           printf("\tType=Generic Subspace\n");
2544           printf("\tBase Address=0x%016jx\n", subspace->BaseAddress);
2545           printf("\tLength=%jd\n", subspace->Length);
2546           printf("\tDoorbell Address=");
2547           acpi_print_gas(&subspace->DoorbellRegister);
2548           printf("\n");
2549           printf("\tDoorbell Preserve=0x%016jx\n", subspace->PreserveMask);
2550           printf("\tDoorbell Write=0x%016jx\n", subspace->WriteMask);
2551           printf("\tLatency=%u us\n", subspace->Latency);
2552           printf("\tMax Access Rate=%u\n", subspace->MaxAccessRate);
2553           printf("\tMin Turnaround Time=%u us\n", subspace->MinTurnaroundTime);
2554 }
2555 
2556 static void
acpi_print_pcct_hw_reduced(ACPI_PCCT_HW_REDUCED * subspace)2557 acpi_print_pcct_hw_reduced(ACPI_PCCT_HW_REDUCED *subspace)
2558 {
2559           printf("\tType=HW-reduced Subspace\n");
2560           printf("\tPlatform Interrupt=%u", subspace->PlatformInterrupt);
2561           if (subspace->Flags & ACPI_PCCT_INTERRUPT_POLARITY) {
2562                     printf(", Edge triggered");
2563           } else {
2564                     printf(", Level triggered");
2565           }
2566           if (subspace->Flags & ACPI_PCCT_INTERRUPT_MODE) {
2567                     printf(", Active low");
2568           } else {
2569                     printf(", Active high");
2570           }
2571           printf("\n");
2572           printf("\tBase Address=0x%016jx\n", subspace->BaseAddress);
2573           printf("\tLength=%jd\n", subspace->Length);
2574           printf("\tDoorbell Register=");
2575           acpi_print_gas(&subspace->DoorbellRegister);
2576           printf("\n");
2577           printf("\tDoorbell Preserve=0x%016jx\n", subspace->PreserveMask);
2578           printf("\tDoorbell Write=0x%016jx\n", subspace->WriteMask);
2579           printf("\tLatency=%u us\n", subspace->Latency);
2580           printf("\tMax Access Rate=%u\n", subspace->MaxAccessRate);
2581           printf("\tMin Turnaround Time=%u us\n", subspace->MinTurnaroundTime);
2582 }
2583 
2584 static void
acpi_print_pcct_hw_reduced_type2(ACPI_PCCT_HW_REDUCED_TYPE2 * subspace)2585 acpi_print_pcct_hw_reduced_type2(ACPI_PCCT_HW_REDUCED_TYPE2 *subspace)
2586 {
2587           printf("\tType=HW-reduced Subspace Type 2\n");
2588           printf("\tPlatform Interrupt=%u", subspace->PlatformInterrupt);
2589           if (subspace->Flags & ACPI_PCCT_INTERRUPT_POLARITY) {
2590                     printf(", Edge triggered");
2591           } else {
2592                     printf(", Level triggered");
2593           }
2594           if (subspace->Flags & ACPI_PCCT_INTERRUPT_MODE) {
2595                     printf(", Active low");
2596           } else {
2597                     printf(", Active high");
2598           }
2599           printf("\n");
2600           printf("\tBase Address=0x%016jx\n", subspace->BaseAddress);
2601           printf("\tLength=%jd\n", subspace->Length);
2602           printf("\tDoorbell Register=");
2603           acpi_print_gas(&subspace->DoorbellRegister);
2604           printf("\n");
2605           printf("\tDoorbell Preserve=0x%016jx\n", subspace->PreserveMask);
2606           printf("\tDoorbell Write=0x%016jx\n", subspace->WriteMask);
2607           printf("\tLatency=%u us\n", subspace->Latency);
2608           printf("\tMax Access Rate=%u\n", subspace->MaxAccessRate);
2609           printf("\tMin Turnaround Time=%u us\n", subspace->MinTurnaroundTime);
2610           printf("\tPlatform Interrupt Ack Register=");
2611           acpi_print_gas(&subspace->PlatformAckRegister);
2612           printf("\n");
2613           printf("\tPlatform Interrupt Ack Preserve=0x%016jx\n", subspace->AckPreserveMask);
2614           printf("\tPlatform Interrupt Ack Write=0x%016jx\n", subspace->AckWriteMask);
2615 }
2616 
2617 static void
acpi_print_pcct_ext_pcc_master(ACPI_PCCT_EXT_PCC_MASTER * subspace)2618 acpi_print_pcct_ext_pcc_master(ACPI_PCCT_EXT_PCC_MASTER *subspace)
2619 {
2620           printf("\tType=Extended PCC Master Subspace\n");
2621           printf("\tPlatform Interrupt=%u", subspace->PlatformInterrupt);
2622           if (subspace->Flags & ACPI_PCCT_INTERRUPT_POLARITY) {
2623                     printf(", Edge triggered");
2624           } else {
2625                     printf(", Level triggered");
2626           }
2627           if (subspace->Flags & ACPI_PCCT_INTERRUPT_MODE) {
2628                     printf(", Active low");
2629           } else {
2630                     printf(", Active high");
2631           }
2632           printf("\n");
2633           printf("\tBase Address=0x%016jx\n", subspace->BaseAddress);
2634           printf("\tLength=%d\n", subspace->Length);
2635           printf("\tDoorbell Register=");
2636           acpi_print_gas(&subspace->DoorbellRegister);
2637           printf("\n");
2638           printf("\tDoorbell Preserve=0x%016jx\n", subspace->PreserveMask);
2639           printf("\tDoorbell Write=0x%016jx\n", subspace->WriteMask);
2640           printf("\tLatency=%u us\n", subspace->Latency);
2641           printf("\tMax Access Rate=%u\n", subspace->MaxAccessRate);
2642           printf("\tMin Turnaround Time=%u us\n", subspace->MinTurnaroundTime);
2643           printf("\tPlatform Interrupt Ack Register=");
2644           acpi_print_gas(&subspace->PlatformAckRegister);
2645           printf("\n");
2646           printf("\tPlatform Interrupt Ack Preserve=0x%016jx\n", subspace->AckPreserveMask);
2647           printf("\tPlatform Interrupt Ack Set=0x%016jx\n", subspace->AckSetMask);
2648           printf("\tCommand Complete Register=");
2649           acpi_print_gas(&subspace->CmdCompleteRegister);
2650           printf("\n");
2651           printf("\tCommand Complete Mask=0x%016jx\n", subspace->CmdCompleteMask);
2652           printf("\tCommand Update Register=");
2653           acpi_print_gas(&subspace->CmdUpdateRegister);
2654           printf("\n");
2655           printf("\tCommand Update Preserve Mask=0x%016jx\n", subspace->CmdUpdatePreserveMask);
2656           printf("\tCommand Update Set Mask=0x%016jx\n", subspace->CmdUpdateSetMask);
2657           printf("\tError Status Register=");
2658           acpi_print_gas(&subspace->ErrorStatusRegister);
2659           printf("\n");
2660           printf("\tError Status Mask=0x%016jx\n", subspace->ErrorStatusMask);
2661 }
2662 
2663 static void
acpi_print_pcct_ext_pcc_slave(ACPI_PCCT_EXT_PCC_SLAVE * subspace)2664 acpi_print_pcct_ext_pcc_slave(ACPI_PCCT_EXT_PCC_SLAVE *subspace)
2665 {
2666           printf("\tType=Extended PCC Slave Subspace\n");
2667           printf("\tPlatform Interrupt=%u", subspace->PlatformInterrupt);
2668           if (subspace->Flags & ACPI_PCCT_INTERRUPT_POLARITY) {
2669                     printf(", Edge triggered");
2670           } else {
2671                     printf(", Level triggered");
2672           }
2673           if (subspace->Flags & ACPI_PCCT_INTERRUPT_MODE) {
2674                     printf(", Active low");
2675           } else {
2676                     printf(", Active high");
2677           }
2678           printf("\n");
2679           printf("\tBase Address=0x%016jx\n", subspace->BaseAddress);
2680           printf("\tLength=%d\n", subspace->Length);
2681           printf("\tDoorbell Register=");
2682           acpi_print_gas(&subspace->DoorbellRegister);
2683           printf("\n");
2684           printf("\tDoorbell Preserve=0x%016jx\n", subspace->PreserveMask);
2685           printf("\tDoorbell Write=0x%016jx\n", subspace->WriteMask);
2686           printf("\tLatency=%u us\n", subspace->Latency);
2687           printf("\tMax Access Rate=%u\n", subspace->MaxAccessRate);
2688           printf("\tMin Turnaround Time=%u us\n", subspace->MinTurnaroundTime);
2689           printf("\tPlatform Interrupt Ack Register=");
2690           acpi_print_gas(&subspace->PlatformAckRegister);
2691           printf("\n");
2692           printf("\tPlatform Interrupt Ack Preserve=0x%016jx\n", subspace->AckPreserveMask);
2693           printf("\tPlatform Interrupt Ack Set=0x%016jx\n", subspace->AckSetMask);
2694           printf("\tCommand Complete Register=");
2695           acpi_print_gas(&subspace->CmdCompleteRegister);
2696           printf("\n");
2697           printf("\tCommand Complete Mask=0x%016jx\n", subspace->CmdCompleteMask);
2698           printf("\tCommand Update Register=");
2699           acpi_print_gas(&subspace->CmdUpdateRegister);
2700           printf("\n");
2701           printf("\tCommand Update Preserve Mask=0x%016jx\n", subspace->CmdUpdatePreserveMask);
2702           printf("\tCommand Update Set Mask=0x%016jx\n", subspace->CmdUpdateSetMask);
2703           printf("\tError Status Register=");
2704           acpi_print_gas(&subspace->ErrorStatusRegister);
2705           printf("\n");
2706           printf("\tError Status Mask=0x%016jx\n", subspace->ErrorStatusMask);
2707 }
2708 
2709 static void
acpi_print_pcct(ACPI_SUBTABLE_HEADER * hdr)2710 acpi_print_pcct(ACPI_SUBTABLE_HEADER *hdr)
2711 {
2712           switch (hdr->Type) {
2713           case ACPI_PCCT_TYPE_GENERIC_SUBSPACE:
2714                     acpi_print_pcct_subspace((ACPI_PCCT_SUBSPACE *)hdr);
2715                     break;
2716           case ACPI_PCCT_TYPE_HW_REDUCED_SUBSPACE:
2717                     acpi_print_pcct_hw_reduced((ACPI_PCCT_HW_REDUCED *)hdr);
2718                     break;
2719           case ACPI_PCCT_TYPE_HW_REDUCED_SUBSPACE_TYPE2:
2720                     acpi_print_pcct_hw_reduced_type2((ACPI_PCCT_HW_REDUCED_TYPE2 *)hdr);
2721                     break;
2722           case ACPI_PCCT_TYPE_EXT_PCC_MASTER_SUBSPACE:
2723                     acpi_print_pcct_ext_pcc_master((ACPI_PCCT_EXT_PCC_MASTER *)hdr);
2724                     break;
2725           case ACPI_PCCT_TYPE_EXT_PCC_SLAVE_SUBSPACE:
2726                     acpi_print_pcct_ext_pcc_slave((ACPI_PCCT_EXT_PCC_SLAVE *)hdr);
2727                     break;
2728           default:
2729                     printf("\tUnknown structure"
2730                         "(type = %hhu, length = %hhu)\n",
2731                         hdr->Type, hdr->Length);
2732                     break;
2733           }
2734 }
2735 
2736 static void
acpi_handle_pcct(ACPI_TABLE_HEADER * sdp)2737 acpi_handle_pcct(ACPI_TABLE_HEADER *sdp)
2738 {
2739           ACPI_TABLE_PCCT *pcct;
2740 
2741           printf(BEGIN_COMMENT);
2742           acpi_print_sdt(sdp);
2743 
2744           pcct = (ACPI_TABLE_PCCT *)sdp;
2745 #define PRINTFLAG(var, flag)  printflag((var), ACPI_PCCT_## flag, #flag)
2746           printf("\tFlags=");
2747           PRINTFLAG(pcct->Flags, DOORBELL);
2748           PRINTFLAG_END();
2749 #undef PRINTFLAG
2750 
2751           acpi_walk_subtables(sdp, (pcct + 1), acpi_print_pcct);
2752 
2753           printf(END_COMMENT);
2754 }
2755 
2756 static void
acpi_print_pptt_processor(ACPI_PPTT_PROCESSOR * processor)2757 acpi_print_pptt_processor(ACPI_PPTT_PROCESSOR *processor)
2758 {
2759           uint32_t *private;
2760           unsigned int i;
2761 
2762           printf("\tType=processor\n");
2763           printf("\tLength=%d\n", processor->Header.Length);
2764 #define PRINTFLAG(var, flag)  printflag((var), ACPI_PPTT_## flag, #flag)
2765 
2766           printf("\tFlags=");
2767           PRINTFLAG(processor->Flags, PHYSICAL_PACKAGE);
2768           PRINTFLAG(processor->Flags, ACPI_PROCESSOR_ID_VALID);
2769           PRINTFLAG_END();
2770 
2771 #undef PRINTFLAG
2772           printf("\tParent=%08x\n", processor->Parent);
2773           printf("\tACPI Processor ID=0x%08x\n", processor->AcpiProcessorId);
2774           printf("\tprivate resources=%d\n", processor->NumberOfPrivResources);
2775 
2776           private = (uint32_t *)(processor + 1);
2777           for (i = 0; i < processor->NumberOfPrivResources; i++)
2778                     printf("\tprivate resources%d=%08x\n", i, private[i]);
2779 }
2780 
2781 static void
acpi_print_pptt_cache(ACPI_PPTT_CACHE * cache)2782 acpi_print_pptt_cache(ACPI_PPTT_CACHE *cache)
2783 {
2784 
2785           printf("\tType=cache\n");
2786           printf("\tLength=%d\n", cache->Header.Length);
2787 
2788 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_PPTT_## flag, #flag)
2789           printf("\tFlags=");
2790           PRINTFLAG(cache->Flags, SIZE_PROPERTY_VALID);
2791           PRINTFLAG(cache->Flags, NUMBER_OF_SETS_VALID);
2792           PRINTFLAG(cache->Flags, ASSOCIATIVITY_VALID);
2793           PRINTFLAG(cache->Flags, ALLOCATION_TYPE_VALID);
2794           PRINTFLAG(cache->Flags, CACHE_TYPE_VALID);
2795           PRINTFLAG(cache->Flags, WRITE_POLICY_VALID);
2796           PRINTFLAG(cache->Flags, LINE_SIZE_VALID);
2797           PRINTFLAG_END();
2798 #undef PRINTFLAG
2799 
2800           printf("\tNextLevel=0x%08x\n", cache->NextLevelOfCache);
2801           if (cache->Flags & ACPI_PPTT_SIZE_PROPERTY_VALID)
2802                     printf("\tSize=%d\n", cache->Size);
2803           if (cache->Flags & ACPI_PPTT_NUMBER_OF_SETS_VALID)
2804                     printf("\tSets=%d\n", cache->NumberOfSets);
2805           if (cache->Flags & ACPI_PPTT_ASSOCIATIVITY_VALID)
2806                     printf("\tAssociativity=%d\n", cache->Associativity);
2807           if (cache->Flags & ACPI_PPTT_ALLOCATION_TYPE_VALID) {
2808                     printf("\tAllocation type=");
2809                     switch (cache->Attributes & ACPI_PPTT_MASK_ALLOCATION_TYPE) {
2810                     case ACPI_PPTT_CACHE_READ_ALLOCATE:
2811                               printf("Read allocate\n");
2812                               break;
2813                     case ACPI_PPTT_CACHE_WRITE_ALLOCATE:
2814                               printf("Write allocate\n");
2815                               break;
2816                     case ACPI_PPTT_CACHE_RW_ALLOCATE:
2817                     case ACPI_PPTT_CACHE_RW_ALLOCATE_ALT:
2818                               printf("Read and Write allocate\n");
2819                               break;
2820                     }
2821           }
2822           if (cache->Flags & ACPI_PPTT_CACHE_TYPE_VALID) {
2823                     printf("\tCache type=");
2824                     switch (cache->Attributes & ACPI_PPTT_MASK_CACHE_TYPE) {
2825                     case ACPI_PPTT_CACHE_TYPE_DATA:
2826                               printf("Data\n");
2827                               break;
2828                     case ACPI_PPTT_CACHE_TYPE_INSTR:
2829                               printf("Instruction\n");
2830                               break;
2831                     case ACPI_PPTT_CACHE_TYPE_UNIFIED:
2832                     case ACPI_PPTT_CACHE_TYPE_UNIFIED_ALT:
2833                               printf("Unified\n");
2834                               break;
2835                     }
2836           }
2837           if (cache->Flags & ACPI_PPTT_WRITE_POLICY_VALID)
2838                     printf("\tWrite Policy=Write %s \n",
2839                         (cache->Attributes & ACPI_PPTT_MASK_WRITE_POLICY) ?
2840                         "through" : "back");
2841 
2842           if (cache->Flags & ACPI_PPTT_LINE_SIZE_VALID)
2843                     printf("\tLine size=%d\n", cache->LineSize);
2844 }
2845 
2846 static void
acpi_print_pptt_id(ACPI_PPTT_ID * id)2847 acpi_print_pptt_id(ACPI_PPTT_ID *id)
2848 {
2849 
2850           printf("\tType=id\n");
2851           printf("\tLength=%d\n", id->Header.Length);
2852 
2853           printf("\tVENDOR_ID=");
2854           acpi_print_string((char *)&id->VendorId, 4);
2855           printf("\n");
2856 
2857           printf("\tLEVEL_1_ID=%016" PRIx64 "\n", id->Level1Id);
2858           printf("\tLEVEL_2_ID=%016" PRIx64 "\n", id->Level2Id);
2859           printf("\tMajor=%hu", id->MajorRev);
2860           printf("\tMinor=%hu", id->MinorRev);
2861           printf("\tSpin=%hu", id->SpinRev);
2862 }
2863 
2864 static void
acpi_print_pptt(ACPI_SUBTABLE_HEADER * hdr)2865 acpi_print_pptt(ACPI_SUBTABLE_HEADER *hdr)
2866 {
2867           switch (hdr->Type) {
2868           case ACPI_PPTT_TYPE_PROCESSOR:
2869                     acpi_print_pptt_processor((ACPI_PPTT_PROCESSOR *)hdr);
2870                     break;
2871           case ACPI_PPTT_TYPE_CACHE:
2872                     acpi_print_pptt_cache((ACPI_PPTT_CACHE *)hdr);
2873                     break;
2874           case ACPI_PPTT_TYPE_ID:
2875                     acpi_print_pptt_id((ACPI_PPTT_ID *)hdr);
2876                     break;
2877           default:
2878                     printf("\tUnknown structure"
2879                         "(type = %hhu, length = %hhu)\n",
2880                         hdr->Type, hdr->Length);
2881                     break;
2882           }
2883 }
2884 
2885 static void
acpi_handle_pptt(ACPI_TABLE_HEADER * sdp)2886 acpi_handle_pptt(ACPI_TABLE_HEADER *sdp)
2887 {
2888           ACPI_TABLE_PPTT *pptt;
2889 
2890           printf(BEGIN_COMMENT);
2891           acpi_print_sdt(sdp);
2892 
2893           pptt = (ACPI_TABLE_PPTT *)sdp;
2894           acpi_walk_subtables(sdp, (pptt + 1), acpi_print_pptt);
2895 
2896           printf(END_COMMENT);
2897 }
2898 
2899 static void
acpi_handle_sbst(ACPI_TABLE_HEADER * sdp)2900 acpi_handle_sbst(ACPI_TABLE_HEADER *sdp)
2901 {
2902           ACPI_TABLE_SBST *sbst;
2903 
2904           printf(BEGIN_COMMENT);
2905           acpi_print_sdt(sdp);
2906           sbst = (ACPI_TABLE_SBST *)sdp;
2907 
2908           printf("\tWarning Level=%d mWh\n", sbst->WarningLevel);
2909           printf("\tLow Level=%d mWh\n", sbst->LowLevel);
2910           printf("\tCritical Level=%d mWh\n", sbst->CriticalLevel);
2911 
2912           printf(END_COMMENT);
2913 }
2914 
2915 static void
acpi_handle_slit(ACPI_TABLE_HEADER * sdp)2916 acpi_handle_slit(ACPI_TABLE_HEADER *sdp)
2917 {
2918           ACPI_TABLE_SLIT *slit;
2919           u_int idx;
2920           uint64_t cnt;
2921 
2922           printf(BEGIN_COMMENT);
2923           acpi_print_sdt(sdp);
2924           slit = (ACPI_TABLE_SLIT *)sdp;
2925 
2926           cnt = slit->LocalityCount * slit->LocalityCount;
2927           printf("\tLocalityCount=%ju\n", (uintmax_t)slit->LocalityCount);
2928           printf("\tEntry=\n\t");
2929           for (idx = 0; idx < cnt; idx++) {
2930                     printf("%u ", slit->Entry[idx]);
2931                     if ((idx % slit->LocalityCount) == (slit->LocalityCount - 1)) {
2932                               printf("\n");
2933                               if (idx < cnt - 1)
2934                                         printf("\t");
2935                     }
2936           }
2937 
2938           printf(END_COMMENT);
2939 }
2940 
2941 static void
acpi_handle_spcr(ACPI_TABLE_HEADER * sdp)2942 acpi_handle_spcr(ACPI_TABLE_HEADER *sdp)
2943 {
2944           ACPI_TABLE_SPCR *spcr;
2945 
2946           printf(BEGIN_COMMENT);
2947           acpi_print_sdt(sdp);
2948           spcr = (ACPI_TABLE_SPCR *)sdp;
2949 
2950           printf("\n\tInterface Type=");
2951           switch (sdp->Revision) {
2952           case 1:
2953                     printf("full 16550%s\n",
2954                         (spcr->InterfaceType == 1) ?
2955                         "(must also accept writing FCR register)" : "");
2956                     break;
2957           case 2:
2958                     acpi_print_dbg2_serial_subtype(spcr->InterfaceType);
2959                     break;
2960           default:
2961                     printf("unknown Revision\n");
2962                     break;
2963           }
2964 
2965           printf("\tSerial Port=");
2966           acpi_print_gas(&spcr->SerialPort);
2967           printf("\n\tInterrupt Type={");
2968           if (spcr->InterruptType & 0x1) {
2969                     printf("\n\t\tdual-8259 IRQ=");
2970                     switch (spcr->PcInterrupt) {
2971                     case 2 ... 7:
2972                     case 9 ... 12:
2973                     case 14 ... 15:
2974                               printf("%d", spcr->PcInterrupt);
2975                               break;
2976                     default:
2977                               printf("%d (invalid entry)", spcr->PcInterrupt);
2978                               break;
2979                     }
2980           }
2981           if (spcr->InterruptType & 0x2) {
2982                     printf("\n\t\tIO APIC={ GSI=%d }", spcr->Interrupt);
2983           }
2984           if (spcr->InterruptType & 0x4) {
2985                     printf("\n\t\tIO SAPIC={ GSI=%d }", spcr->Interrupt);
2986           }
2987           if (spcr->InterruptType & 0x8) {
2988                     printf("\n\t\tARMH GIC={ GSI=%d }", spcr->Interrupt);
2989           }
2990           printf("\n\t}\n");
2991 
2992           printf("\tBaud Rate=");
2993           switch (spcr->BaudRate) {
2994           case 3:
2995                     printf("9600");
2996                     break;
2997           case 4:
2998                     printf("19200");
2999                     break;
3000           case 6:
3001                     printf("57600");
3002                     break;
3003           case 7:
3004                     printf("115200");
3005                     break;
3006           default:
3007                     printf("unknown speed index %d", spcr->BaudRate);
3008                     break;
3009           }
3010           printf("\n\tParity={");
3011           switch (spcr->Parity) {
3012           case 0:
3013                     printf("OFF");
3014                     break;
3015           default:
3016                     printf("ON");
3017                     break;
3018           }
3019           printf("}\n");
3020 
3021           printf("\tStop Bits={");
3022           switch (spcr->StopBits) {
3023           case 1:
3024                     printf("ON");
3025                     break;
3026           default:
3027                     printf("OFF");
3028                     break;
3029           }
3030           printf("}\n");
3031 
3032           printf("\tFlow Control={");
3033           if (spcr->FlowControl & 0x1)
3034                     printf("DCD, ");
3035           if (spcr->FlowControl & 0x2)
3036                     printf("RTS/CTS hardware, ");
3037           if (spcr->FlowControl & 0x4)
3038                     printf("XON/XOFF software");
3039           printf("}\n");
3040 
3041           printf("\tTerminal=");
3042           switch (spcr->TerminalType) {
3043           case 0:
3044                     printf("VT100");
3045                     break;
3046           case 1:
3047                     printf("VT100+");
3048                     break;
3049           case 2:
3050                     printf("VT-UTF8");
3051                     break;
3052           case 3:
3053                     printf("ANSI");
3054                     break;
3055           default:
3056                     printf("unknown type %d", spcr->TerminalType);
3057                     break;
3058           }
3059           printf("\n");
3060 
3061           acpi_print_pci(spcr->PciVendorId, spcr->PciDeviceId,
3062               spcr->PciSegment, spcr->PciBus, spcr->PciDevice, spcr->PciFunction);
3063 
3064           printf("\tPCI Flags={");
3065           if (spcr->PciFlags & ACPI_SPCR_DO_NOT_DISABLE)
3066                     printf("DONOT_DISABLE");
3067           printf("}\n");
3068 
3069           printf(END_COMMENT);
3070 }
3071 
3072 static void
acpi_handle_spmi(ACPI_TABLE_HEADER * sdp)3073 acpi_handle_spmi(ACPI_TABLE_HEADER *sdp)
3074 {
3075           ACPI_TABLE_SPMI *spmi;
3076 
3077           printf(BEGIN_COMMENT);
3078           acpi_print_sdt(sdp);
3079           spmi = (ACPI_TABLE_SPMI *)sdp;
3080 
3081           printf("\tInterface Type=");
3082           switch (spmi->InterfaceType) {
3083           case ACPI_SPMI_KEYBOARD:
3084                     printf("Keyboard Controller Stype (KCS)");
3085                     break;
3086           case ACPI_SPMI_SMI:
3087                     printf("Server Management Interface Chip (SMIC)");
3088                     break;
3089           case ACPI_SPMI_BLOCK_TRANSFER:
3090                     printf("Block Transfer (BT)");
3091                     break;
3092           case ACPI_SPMI_SMBUS:
3093                     printf("SMBus System Interface (SSIF)");
3094                     break;
3095           default:
3096                     printf("Reserved(%d)", spmi->InterfaceType);
3097                     break;
3098           }
3099           printf("\n\tSpecRevision=%d.%d", spmi->SpecRevision >> 8,
3100                     spmi->SpecRevision & 0xff);
3101 
3102           printf("\n\tInterrupt Type={");
3103           if (spmi->InterruptType & 0x1) {
3104                     printf("\n\t\tSCI triggered GPE=%d", spmi->GpeNumber);
3105           }
3106           if (spmi->InterruptType & 0x2) {
3107                     printf("\n\t\tIO APIC/SAPIC={ GSI=%d }", spmi->Interrupt);
3108           }
3109           printf("\n\t}\n");
3110 
3111           printf("\tBase Address=");
3112           acpi_print_gas(&spmi->IpmiRegister);
3113           printf("\n");
3114 
3115           if ((spmi->PciDeviceFlag & 0x01) != 0)
3116                     acpi_print_pci_sbdf(spmi->PciSegment, spmi->PciBus,
3117                         spmi->PciDevice, spmi->PciFunction);
3118 
3119           printf(END_COMMENT);
3120 }
3121 
3122 static void
acpi_print_srat_cpu(uint8_t type,uint32_t apic_id,uint32_t proximity_domain,uint32_t flags,uint32_t clockdomain,uint8_t sapic_eid)3123 acpi_print_srat_cpu(uint8_t type, uint32_t apic_id, uint32_t proximity_domain,
3124     uint32_t flags, uint32_t clockdomain, uint8_t sapic_eid)
3125 {
3126 
3127           printf("\tFlags={");
3128           if (flags & ACPI_SRAT_CPU_ENABLED)
3129                     printf("ENABLED");
3130           else
3131                     printf("DISABLED");
3132           printf("}\n");
3133           printf("\t%s ID=%d\n",
3134               (type == ACPI_SRAT_TYPE_GIC_ITS_AFFINITY) ? "ITS" : "APIC",
3135               apic_id);
3136           if (type == ACPI_SRAT_TYPE_CPU_AFFINITY)
3137                     printf("\tSAPIC EID=%d\n", sapic_eid);
3138           printf("\tProximity Domain=%d\n", proximity_domain);
3139           if (type != ACPI_SRAT_TYPE_GIC_ITS_AFFINITY)
3140                     printf("\tClock Domain=%d\n", clockdomain);
3141 }
3142 
3143 static void
acpi_print_srat_memory(ACPI_SRAT_MEM_AFFINITY * mp)3144 acpi_print_srat_memory(ACPI_SRAT_MEM_AFFINITY *mp)
3145 {
3146 
3147           printf("\tFlags={");
3148           if (mp->Flags & ACPI_SRAT_MEM_ENABLED)
3149                     printf("ENABLED");
3150           else
3151                     printf("DISABLED");
3152           if (mp->Flags & ACPI_SRAT_MEM_HOT_PLUGGABLE)
3153                     printf(",HOT_PLUGGABLE");
3154           if (mp->Flags & ACPI_SRAT_MEM_NON_VOLATILE)
3155                     printf(",NON_VOLATILE");
3156           printf("}\n");
3157           printf("\tBase Address=0x%016jx\n", (uintmax_t)mp->BaseAddress);
3158           printf("\tLength=0x%016jx\n", (uintmax_t)mp->Length);
3159           printf("\tProximity Domain=%d\n", mp->ProximityDomain);
3160 }
3161 
3162 static const char *srat_types[] = {
3163     [ACPI_SRAT_TYPE_CPU_AFFINITY] = "CPU",
3164     [ACPI_SRAT_TYPE_MEMORY_AFFINITY] = "Memory",
3165     [ACPI_SRAT_TYPE_X2APIC_CPU_AFFINITY] = "X2APIC",
3166     [ACPI_SRAT_TYPE_GICC_AFFINITY] = "GICC",
3167     [ACPI_SRAT_TYPE_GIC_ITS_AFFINITY] = "GIC ITS",
3168 };
3169 
3170 static void
acpi_print_srat(ACPI_SUBTABLE_HEADER * srat)3171 acpi_print_srat(ACPI_SUBTABLE_HEADER *srat)
3172 {
3173           ACPI_SRAT_CPU_AFFINITY *cpu;
3174           ACPI_SRAT_X2APIC_CPU_AFFINITY *x2apic;
3175           ACPI_SRAT_GICC_AFFINITY *gicc;
3176           ACPI_SRAT_GIC_ITS_AFFINITY *gici;
3177 
3178           if (srat->Type < __arraycount(srat_types))
3179                     printf("\tType=%s\n", srat_types[srat->Type]);
3180           else
3181                     printf("\tType=%d (unknown)\n", srat->Type);
3182           switch (srat->Type) {
3183           case ACPI_SRAT_TYPE_CPU_AFFINITY:
3184                     cpu = (ACPI_SRAT_CPU_AFFINITY *)srat;
3185                     acpi_print_srat_cpu(srat->Type, cpu->ApicId,
3186                         cpu->ProximityDomainHi[2] << 24 |
3187                         cpu->ProximityDomainHi[1] << 16 |
3188                         cpu->ProximityDomainHi[0] << 0 |
3189                         cpu->ProximityDomainLo,
3190                         cpu->Flags, cpu->ClockDomain, cpu->LocalSapicEid);
3191                     break;
3192           case ACPI_SRAT_TYPE_MEMORY_AFFINITY:
3193                     acpi_print_srat_memory((ACPI_SRAT_MEM_AFFINITY *)srat);
3194                     break;
3195           case ACPI_SRAT_TYPE_X2APIC_CPU_AFFINITY:
3196                     x2apic = (ACPI_SRAT_X2APIC_CPU_AFFINITY *)srat;
3197                     acpi_print_srat_cpu(srat->Type, x2apic->ApicId,
3198                         x2apic->ProximityDomain,
3199                         x2apic->Flags, x2apic->ClockDomain, 0 /* dummy */);
3200                     break;
3201           case ACPI_SRAT_TYPE_GICC_AFFINITY:
3202                     gicc = (ACPI_SRAT_GICC_AFFINITY *)srat;
3203                     acpi_print_srat_cpu(srat->Type, gicc->AcpiProcessorUid,
3204                         gicc->ProximityDomain,
3205                         gicc->Flags, gicc->ClockDomain, 0 /* dummy */);
3206                     break;
3207           case ACPI_SRAT_TYPE_GIC_ITS_AFFINITY:
3208                     gici = (ACPI_SRAT_GIC_ITS_AFFINITY *)srat;
3209                     acpi_print_srat_cpu(srat->Type, gici->ItsId,
3210                         gici->ProximityDomain,
3211                         0 /* dummy */, 0 /* dummy */, 0 /* dummy */);
3212                     break;
3213           }
3214 }
3215 
3216 static void
acpi_handle_srat(ACPI_TABLE_HEADER * sdp)3217 acpi_handle_srat(ACPI_TABLE_HEADER *sdp)
3218 {
3219           ACPI_TABLE_SRAT *srat;
3220 
3221           printf(BEGIN_COMMENT);
3222           acpi_print_sdt(sdp);
3223           srat = (ACPI_TABLE_SRAT *)sdp;
3224           printf("\tTable Revision=%d\n", srat->TableRevision);
3225           acpi_walk_subtables(sdp, (srat + 1), acpi_print_srat);
3226           printf(END_COMMENT);
3227 }
3228 
3229 static const char *nfit_types[] = {
3230     [ACPI_NFIT_TYPE_SYSTEM_ADDRESS] = "System Address",
3231     [ACPI_NFIT_TYPE_MEMORY_MAP] = "Memory Map",
3232     [ACPI_NFIT_TYPE_INTERLEAVE] = "Interleave",
3233     [ACPI_NFIT_TYPE_SMBIOS] = "SMBIOS",
3234     [ACPI_NFIT_TYPE_CONTROL_REGION] = "Control Region",
3235     [ACPI_NFIT_TYPE_DATA_REGION] = "Data Region",
3236     [ACPI_NFIT_TYPE_FLUSH_ADDRESS] = "Flush Address"
3237 };
3238 
3239 
3240 static void
acpi_print_nfit(ACPI_NFIT_HEADER * nfit)3241 acpi_print_nfit(ACPI_NFIT_HEADER *nfit)
3242 {
3243           char *uuidstr;
3244           uint32_t status;
3245 
3246           ACPI_NFIT_SYSTEM_ADDRESS *sysaddr;
3247           ACPI_NFIT_MEMORY_MAP *mmap;
3248           ACPI_NFIT_INTERLEAVE *ileave;
3249           ACPI_NFIT_SMBIOS *smbios __unused;
3250           ACPI_NFIT_CONTROL_REGION *ctlreg;
3251           ACPI_NFIT_DATA_REGION *datareg;
3252           ACPI_NFIT_FLUSH_ADDRESS *fladdr;
3253 
3254           if (nfit->Type < __arraycount(nfit_types))
3255                     printf("\tType=%s\n", nfit_types[nfit->Type]);
3256           else
3257                     printf("\tType=%u (unknown)\n", nfit->Type);
3258           switch (nfit->Type) {
3259           case ACPI_NFIT_TYPE_SYSTEM_ADDRESS:
3260                     sysaddr = (ACPI_NFIT_SYSTEM_ADDRESS *)nfit;
3261                     printf("\tRangeIndex=%u\n", (u_int)sysaddr->RangeIndex);
3262                     printf("\tProximityDomain=%u\n",
3263                         (u_int)sysaddr->ProximityDomain);
3264                     uuid_to_string((uuid_t *)(sysaddr->RangeGuid),
3265                         &uuidstr, &status);
3266                     if (status != uuid_s_ok)
3267                               errx(1, "uuid_to_string: status=%u", status);
3268                     printf("\tRangeGuid=%s\n", uuidstr);
3269                     free(uuidstr);
3270                     printf("\tAddress=0x%016jx\n", (uintmax_t)sysaddr->Address);
3271                     printf("\tLength=0x%016jx\n", (uintmax_t)sysaddr->Length);
3272                     printf("\tMemoryMapping=0x%016jx\n",
3273                         (uintmax_t)sysaddr->MemoryMapping);
3274 
3275 #define PRINTFLAG(var, flag)  printflag((var), ACPI_NFIT_## flag, #flag)
3276 
3277                     printf("\tFlags=");
3278                     PRINTFLAG(sysaddr->Flags, ADD_ONLINE_ONLY);
3279                     PRINTFLAG(sysaddr->Flags, PROXIMITY_VALID);
3280                     PRINTFLAG_END();
3281 
3282 #undef PRINTFLAG
3283 
3284                     break;
3285           case ACPI_NFIT_TYPE_MEMORY_MAP:
3286                     mmap = (ACPI_NFIT_MEMORY_MAP *)nfit;
3287                     printf("\tDeviceHandle=%u\n", (u_int)mmap->DeviceHandle);
3288                     printf("\tPhysicalId=%u\n", (u_int)mmap->PhysicalId);
3289                     printf("\tRegionId=%u\n", (u_int)mmap->RegionId);
3290                     printf("\tRangeIndex=%u\n", (u_int)mmap->RangeIndex);
3291                     printf("\tRegionIndex=%u\n", (u_int)mmap->RegionIndex);
3292                     printf("\tRegionSize=0x%016jx\n", (uintmax_t)mmap->RegionSize);
3293                     printf("\tRegionOffset=0x%016jx\n",
3294                         (uintmax_t)mmap->RegionOffset);
3295                     printf("\tAddress=0x%016jx\n", (uintmax_t)mmap->Address);
3296                     printf("\tInterleaveIndex=%u\n", (u_int)mmap->InterleaveIndex);
3297                     printf("\tInterleaveWays=%u\n", (u_int)mmap->InterleaveWays);
3298 
3299 #define PRINTFLAG(var, flag)  printflag((var), ACPI_NFIT_MEM_## flag, #flag)
3300 
3301                     printf("\tFlags=");
3302                     PRINTFLAG(mmap->Flags, SAVE_FAILED);
3303                     PRINTFLAG(mmap->Flags, RESTORE_FAILED);
3304                     PRINTFLAG(mmap->Flags, FLUSH_FAILED);
3305                     PRINTFLAG(mmap->Flags, NOT_ARMED);
3306                     PRINTFLAG(mmap->Flags, HEALTH_OBSERVED);
3307                     PRINTFLAG(mmap->Flags, HEALTH_ENABLED);
3308                     PRINTFLAG(mmap->Flags, MAP_FAILED);
3309                     PRINTFLAG_END();
3310 
3311 #undef PRINTFLAG
3312 
3313                     break;
3314           case ACPI_NFIT_TYPE_INTERLEAVE:
3315                     ileave = (ACPI_NFIT_INTERLEAVE *)nfit;
3316                     printf("\tInterleaveIndex=%u\n",
3317                         (u_int)ileave->InterleaveIndex);
3318                     printf("\tLineCount=%u\n", (u_int)ileave->LineCount);
3319                     printf("\tLineSize=%u\n", (u_int)ileave->LineSize);
3320                     /* XXX ileave->LineOffset[i] output is not supported */
3321                     break;
3322           case ACPI_NFIT_TYPE_SMBIOS:
3323                     smbios = (ACPI_NFIT_SMBIOS *)nfit;
3324                     /* XXX smbios->Data[x] output is not supported */
3325                     break;
3326           case ACPI_NFIT_TYPE_CONTROL_REGION:
3327                     ctlreg = (ACPI_NFIT_CONTROL_REGION *)nfit;
3328                     printf("\tRegionIndex=%u\n", (u_int)ctlreg->RegionIndex);
3329                     printf("\tVendorId=0x%04x\n", (u_int)ctlreg->VendorId);
3330                     printf("\tDeviceId=0x%04x\n", (u_int)ctlreg->DeviceId);
3331                     printf("\tRevisionId=%u\n", (u_int)ctlreg->RevisionId);
3332                     printf("\tSubsystemVendorId=0x%04x\n",
3333                         (u_int)ctlreg->SubsystemVendorId);
3334                     printf("\tSubsystemDeviceId=0x%04x\n",
3335                         (u_int)ctlreg->SubsystemDeviceId);
3336                     printf("\tSubsystemRevisionId=%u\n",
3337                         (u_int)ctlreg->SubsystemRevisionId);
3338                     printf("\tValidFields=%02x\n", (u_int)ctlreg->ValidFields);
3339                     printf("\tManufacturingLocation=%u\n",
3340                         (u_int)ctlreg->ManufacturingLocation);
3341                     printf("\tManufacturingDate=%u\n",
3342                         (u_int)ctlreg->ManufacturingDate);
3343                     printf("\tSerialNumber=%u\n",
3344                         (u_int)ctlreg->SerialNumber);
3345                     printf("\tCode=0x%04x\n", (u_int)ctlreg->Code);
3346                     printf("\tWindows=%u\n", (u_int)ctlreg->Windows);
3347                     printf("\tWindowSize=0x%016jx\n",
3348                         (uintmax_t)ctlreg->WindowSize);
3349                     printf("\tCommandOffset=0x%016jx\n",
3350                         (uintmax_t)ctlreg->CommandOffset);
3351                     printf("\tCommandSize=0x%016jx\n",
3352                         (uintmax_t)ctlreg->CommandSize);
3353                     printf("\tStatusOffset=0x%016jx\n",
3354                         (uintmax_t)ctlreg->StatusOffset);
3355                     printf("\tStatusSize=0x%016jx\n",
3356                         (uintmax_t)ctlreg->StatusSize);
3357 
3358 #define PRINTFLAG(var, flag)  printflag((var), ACPI_NFIT_## flag, #flag)
3359 
3360                     printf("\tFlags=");
3361                     PRINTFLAG(ctlreg->Flags, CONTROL_BUFFERED);
3362                     PRINTFLAG_END();
3363 
3364 #undef PRINTFLAG
3365 
3366                     break;
3367           case ACPI_NFIT_TYPE_DATA_REGION:
3368                     datareg = (ACPI_NFIT_DATA_REGION *)nfit;
3369                     printf("\tRegionIndex=%u\n", (u_int)datareg->RegionIndex);
3370                     printf("\tWindows=%u\n", (u_int)datareg->Windows);
3371                     printf("\tOffset=0x%016jx\n", (uintmax_t)datareg->Offset);
3372                     printf("\tSize=0x%016jx\n", (uintmax_t)datareg->Size);
3373                     printf("\tCapacity=0x%016jx\n", (uintmax_t)datareg->Capacity);
3374                     printf("\tStartAddress=0x%016jx\n",
3375                         (uintmax_t)datareg->StartAddress);
3376                     break;
3377           case ACPI_NFIT_TYPE_FLUSH_ADDRESS:
3378                     fladdr = (ACPI_NFIT_FLUSH_ADDRESS *)nfit;
3379                     printf("\tDeviceHandle=%u\n", (u_int)fladdr->DeviceHandle);
3380                     printf("\tHintCount=%u\n", (u_int)fladdr->HintCount);
3381                     /* XXX fladdr->HintAddress[i] output is not supported */
3382                     break;
3383           }
3384 }
3385 
3386 static void
acpi_handle_nfit(ACPI_TABLE_HEADER * sdp)3387 acpi_handle_nfit(ACPI_TABLE_HEADER *sdp)
3388 {
3389           ACPI_TABLE_NFIT *nfit;
3390 
3391           printf(BEGIN_COMMENT);
3392           acpi_print_sdt(sdp);
3393           nfit = (ACPI_TABLE_NFIT *)sdp;
3394           acpi_walk_nfit(sdp, (nfit + 1), acpi_print_nfit);
3395           printf(END_COMMENT);
3396 }
3397 
3398 static char *
acpi_tcpa_evname(struct TCPAevent * event)3399 acpi_tcpa_evname(struct TCPAevent *event)
3400 {
3401           struct TCPApc_event *pc_event;
3402           char *eventname = NULL;
3403 
3404           pc_event = (struct TCPApc_event *)(event + 1);
3405 
3406           switch (event->event_type) {
3407           case PREBOOT:
3408           case POST_CODE:
3409           case UNUSED:
3410           case NO_ACTION:
3411           case SEPARATOR:
3412           case SCRTM_CONTENTS:
3413           case SCRTM_VERSION:
3414           case CPU_MICROCODE:
3415           case PLATFORM_CONFIG_FLAGS:
3416           case TABLE_OF_DEVICES:
3417           case COMPACT_HASH:
3418           case IPL:
3419           case IPL_PARTITION_DATA:
3420           case NONHOST_CODE:
3421           case NONHOST_CONFIG:
3422           case NONHOST_INFO:
3423                     asprintf(&eventname, "%s",
3424                         tcpa_event_type_strings[event->event_type]);
3425                     break;
3426 
3427           case ACTION:
3428                     eventname = calloc(event->event_size + 1, sizeof(char));
3429                     memcpy(eventname, pc_event, event->event_size);
3430                     break;
3431 
3432           case EVENT_TAG:
3433                     switch (pc_event->event_id) {
3434                     case SMBIOS:
3435                     case BIS_CERT:
3436                     case CMOS:
3437                     case NVRAM:
3438                     case OPTION_ROM_EXEC:
3439                     case OPTION_ROM_CONFIG:
3440                     case S_CRTM_VERSION:
3441                     case POST_BIOS_ROM:
3442                     case ESCD:
3443                     case OPTION_ROM_MICROCODE:
3444                     case S_CRTM_CONTENTS:
3445                     case POST_CONTENTS:
3446                               asprintf(&eventname, "%s",
3447                                   TCPA_pcclient_strings[pc_event->event_id]);
3448                               break;
3449 
3450                     default:
3451                               asprintf(&eventname, "<unknown tag 0x%02x>",
3452                                   pc_event->event_id);
3453                               break;
3454                     }
3455                     break;
3456 
3457           default:
3458                     asprintf(&eventname, "<unknown 0x%02x>", event->event_type);
3459                     break;
3460           }
3461 
3462           return eventname;
3463 }
3464 
3465 static void
acpi_print_tcpa(struct TCPAevent * event)3466 acpi_print_tcpa(struct TCPAevent *event)
3467 {
3468           int i;
3469           char *eventname;
3470 
3471           eventname = acpi_tcpa_evname(event);
3472 
3473           printf("\t%d", event->pcr_index);
3474           printf(" 0x");
3475           for (i = 0; i < 20; i++)
3476                     printf("%02x", event->pcr_value[i]);
3477           printf(" [%s]\n", eventname ? eventname : "<unknown>");
3478 
3479           free(eventname);
3480 }
3481 
3482 static void
acpi_handle_tcpa(ACPI_TABLE_HEADER * sdp)3483 acpi_handle_tcpa(ACPI_TABLE_HEADER *sdp)
3484 {
3485           struct TCPAbody *tcpa;
3486           struct TCPAevent *event;
3487           uintmax_t len, paddr;
3488           unsigned char *vaddr = NULL;
3489           unsigned char *vend = NULL;
3490 
3491           printf(BEGIN_COMMENT);
3492           acpi_print_sdt(sdp);
3493           tcpa = (struct TCPAbody *) sdp;
3494 
3495           switch (tcpa->platform_class) {
3496           case ACPI_TCPA_BIOS_CLIENT:
3497                     len = tcpa->client.log_max_len;
3498                     paddr = tcpa->client.log_start_addr;
3499                     break;
3500 
3501           case ACPI_TCPA_BIOS_SERVER:
3502                     len = tcpa->server.log_max_len;
3503                     paddr = tcpa->server.log_start_addr;
3504                     break;
3505 
3506           default:
3507                     printf("XXX");
3508                     printf(END_COMMENT);
3509                     return;
3510           }
3511           printf("\tClass %u Base Address 0x%jx Length %ju\n\n",
3512               tcpa->platform_class, paddr, len);
3513 
3514           if (len == 0) {
3515                     printf("\tEmpty TCPA table\n");
3516                     printf(END_COMMENT);
3517                     return;
3518           }
3519           if (sdp->Revision == 1) {
3520                     printf("\tOLD TCPA spec log found. Dumping not supported.\n");
3521                     printf(END_COMMENT);
3522                     return;
3523           }
3524 
3525           vaddr = (unsigned char *)acpi_map_physical(paddr, len);
3526           vend = vaddr + len;
3527 
3528           while (vaddr != NULL) {
3529                     if ((vaddr + sizeof(struct TCPAevent) >= vend)||
3530                         (vaddr + sizeof(struct TCPAevent) < vaddr))
3531                               break;
3532                     event = (struct TCPAevent *)(void *)vaddr;
3533                     if (vaddr + event->event_size >= vend)
3534                               break;
3535                     if (vaddr + event->event_size < vaddr)
3536                               break;
3537                     if (event->event_type == 0 && event->event_size == 0)
3538                               break;
3539 #if 0
3540                     {
3541                     unsigned int i, j, k;
3542 
3543                     printf("\n\tsize %d\n\t\t%p ", event->event_size, vaddr);
3544                     for (j = 0, i = 0; i <
3545                         sizeof(struct TCPAevent) + event->event_size; i++) {
3546                               printf("%02x ", vaddr[i]);
3547                               if ((i+1) % 8 == 0) {
3548                                         for (k = 0; k < 8; k++)
3549                                                   printf("%c", isprint(vaddr[j+k]) ?
3550                                                       vaddr[j+k] : '.');
3551                                         printf("\n\t\t%p ", &vaddr[i + 1]);
3552                                         j = i + 1;
3553                               }
3554                     }
3555                     printf("\n"); }
3556 #endif
3557                     acpi_print_tcpa(event);
3558 
3559                     vaddr += sizeof(struct TCPAevent) + event->event_size;
3560           }
3561 
3562           printf(END_COMMENT);
3563 }
3564 
3565 static void
acpi_handle_tpm2(ACPI_TABLE_HEADER * sdp)3566 acpi_handle_tpm2(ACPI_TABLE_HEADER *sdp)
3567 {
3568           ACPI_TABLE_TPM2 *tpm2;
3569           const char *class;
3570 
3571           printf(BEGIN_COMMENT);
3572 
3573           acpi_print_sdt(sdp);
3574           tpm2 = (ACPI_TABLE_TPM2 *)sdp;
3575 
3576           if (tpm2->PlatformClass == 0) {
3577                     class = "Client";
3578           } else if (tpm2->PlatformClass == 1) {
3579                     class = "Server";
3580           } else {
3581                     class = "Unknown";
3582           }
3583           printf("\tClass=%s (%u)\n", class, tpm2->PlatformClass);
3584           printf("\tControl Address=0x%"PRIx64"\n", tpm2->ControlAddress);
3585           printf("\tStart Method=%u\n", tpm2->StartMethod);
3586 
3587           printf(END_COMMENT);
3588 }
3589 
3590 static const char *
devscope_type2str(int type)3591 devscope_type2str(int type)
3592 {
3593           static char typebuf[16];
3594 
3595           switch (type) {
3596           case 1:
3597                     return ("PCI Endpoint Device");
3598           case 2:
3599                     return ("PCI Sub-Hierarchy");
3600           case 3:
3601                     return ("IOAPIC");
3602           case 4:
3603                     return ("HPET");
3604           case 5:
3605                     return ("ACPI Name space");
3606           default:
3607                     snprintf(typebuf, sizeof(typebuf), "%d", type);
3608                     return (typebuf);
3609           }
3610 }
3611 
3612 static int
acpi_handle_dmar_devscope(void * addr,int remaining)3613 acpi_handle_dmar_devscope(void *addr, int remaining)
3614 {
3615           char sep;
3616           int pathlen;
3617           ACPI_DMAR_PCI_PATH *path, *pathend;
3618           ACPI_DMAR_DEVICE_SCOPE *devscope = addr;
3619 
3620           if (remaining < (int)sizeof(ACPI_DMAR_DEVICE_SCOPE))
3621                     return (-1);
3622 
3623           if (remaining < devscope->Length)
3624                     return (-1);
3625 
3626           printf("\n");
3627           printf("\t\tType=%s\n", devscope_type2str(devscope->EntryType));
3628           printf("\t\tLength=%d\n", devscope->Length);
3629           printf("\t\tEnumerationId=%d\n", devscope->EnumerationId);
3630           printf("\t\tStartBusNumber=%d\n", devscope->Bus);
3631 
3632           path = (ACPI_DMAR_PCI_PATH *)(devscope + 1);
3633           pathlen = devscope->Length - sizeof(ACPI_DMAR_DEVICE_SCOPE);
3634           pathend = path + pathlen / sizeof(ACPI_DMAR_PCI_PATH);
3635           if (path < pathend) {
3636                     sep = '{';
3637                     printf("\t\tPath=");
3638                     do {
3639                               printf("%c%d:%d", sep, path->Device, path->Function);
3640                               sep=',';
3641                               path++;
3642                     } while (path < pathend);
3643                     printf("}\n");
3644           }
3645 
3646           return (devscope->Length);
3647 }
3648 
3649 static void
acpi_handle_dmar_drhd(ACPI_DMAR_HARDWARE_UNIT * drhd)3650 acpi_handle_dmar_drhd(ACPI_DMAR_HARDWARE_UNIT *drhd)
3651 {
3652           char *cp;
3653           int remaining, consumed;
3654 
3655           printf("\n");
3656           printf("\tType=DRHD\n");
3657           printf("\tLength=%d\n", drhd->Header.Length);
3658 
3659 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_DMAR_## flag, #flag)
3660 
3661           printf("\tFlags=");
3662           PRINTFLAG(drhd->Flags, INCLUDE_ALL);
3663           PRINTFLAG_END();
3664 
3665 #undef PRINTFLAG
3666 
3667           printf("\tSegment=%d\n", drhd->Segment);
3668           printf("\tAddress=0x%016jx\n", (uintmax_t)drhd->Address);
3669 
3670           remaining = drhd->Header.Length - sizeof(ACPI_DMAR_HARDWARE_UNIT);
3671           if (remaining > 0)
3672                     printf("\tDevice Scope:");
3673           while (remaining > 0) {
3674                     cp = (char *)drhd + drhd->Header.Length - remaining;
3675                     consumed = acpi_handle_dmar_devscope(cp, remaining);
3676                     if (consumed <= 0)
3677                               break;
3678                     else
3679                               remaining -= consumed;
3680           }
3681 }
3682 
3683 static void
acpi_handle_dmar_rmrr(ACPI_DMAR_RESERVED_MEMORY * rmrr)3684 acpi_handle_dmar_rmrr(ACPI_DMAR_RESERVED_MEMORY *rmrr)
3685 {
3686           char *cp;
3687           int remaining, consumed;
3688 
3689           printf("\n");
3690           printf("\tType=RMRR\n");
3691           printf("\tLength=%d\n", rmrr->Header.Length);
3692           printf("\tSegment=%d\n", rmrr->Segment);
3693           printf("\tBaseAddress=0x%016jx\n", (uintmax_t)rmrr->BaseAddress);
3694           printf("\tLimitAddress=0x%016jx\n", (uintmax_t)rmrr->EndAddress);
3695 
3696           remaining = rmrr->Header.Length - sizeof(ACPI_DMAR_RESERVED_MEMORY);
3697           if (remaining > 0)
3698                     printf("\tDevice Scope:");
3699           while (remaining > 0) {
3700                     cp = (char *)rmrr + rmrr->Header.Length - remaining;
3701                     consumed = acpi_handle_dmar_devscope(cp, remaining);
3702                     if (consumed <= 0)
3703                               break;
3704                     else
3705                               remaining -= consumed;
3706           }
3707 }
3708 
3709 static void
acpi_handle_dmar_atsr(ACPI_DMAR_ATSR * atsr)3710 acpi_handle_dmar_atsr(ACPI_DMAR_ATSR *atsr)
3711 {
3712           char *cp;
3713           int remaining, consumed;
3714 
3715           printf("\n");
3716           printf("\tType=ATSR\n");
3717           printf("\tLength=%d\n", atsr->Header.Length);
3718 
3719 #define   PRINTFLAG(var, flag)          printflag((var), ACPI_DMAR_## flag, #flag)
3720 
3721           printf("\tFlags=");
3722           PRINTFLAG(atsr->Flags, ALL_PORTS);
3723           PRINTFLAG_END();
3724 
3725 #undef PRINTFLAG
3726 
3727           printf("\tSegment=%d\n", atsr->Segment);
3728 
3729           remaining = atsr->Header.Length - sizeof(ACPI_DMAR_ATSR);
3730           if (remaining > 0)
3731                     printf("\tDevice Scope:");
3732           while (remaining > 0) {
3733                     cp = (char *)atsr + atsr->Header.Length - remaining;
3734                     consumed = acpi_handle_dmar_devscope(cp, remaining);
3735                     if (consumed <= 0)
3736                               break;
3737                     else
3738                               remaining -= consumed;
3739           }
3740 }
3741 
3742 static void
acpi_handle_dmar_rhsa(ACPI_DMAR_RHSA * rhsa)3743 acpi_handle_dmar_rhsa(ACPI_DMAR_RHSA *rhsa)
3744 {
3745 
3746           printf("\n");
3747           printf("\tType=RHSA\n");
3748           printf("\tLength=%d\n", rhsa->Header.Length);
3749           printf("\tBaseAddress=0x%016jx\n", (uintmax_t)rhsa->BaseAddress);
3750           printf("\tProximityDomain=0x%08x\n", rhsa->ProximityDomain);
3751 }
3752 
3753 static void
acpi_handle_dmar_andd(ACPI_DMAR_ANDD * andd)3754 acpi_handle_dmar_andd(ACPI_DMAR_ANDD *andd)
3755 {
3756 
3757           printf("\n");
3758           printf("\tType=ANDD\n");
3759           printf("\tLength=%d\n", andd->Header.Length);
3760           printf("\tDeviceNumber=%d\n", andd->DeviceNumber);
3761           printf("\tDeviceName=0x%s\n", andd->DeviceName);
3762 }
3763 
3764 static int
acpi_handle_dmar_remapping_structure(void * addr,int remaining)3765 acpi_handle_dmar_remapping_structure(void *addr, int remaining)
3766 {
3767           ACPI_DMAR_HEADER *hdr = addr;
3768 
3769           if (remaining < (int)sizeof(ACPI_DMAR_HEADER))
3770                     return (-1);
3771 
3772           if (remaining < hdr->Length)
3773                     return (-1);
3774 
3775           switch (hdr->Type) {
3776           case ACPI_DMAR_TYPE_HARDWARE_UNIT:
3777                     acpi_handle_dmar_drhd(addr);
3778                     break;
3779           case ACPI_DMAR_TYPE_RESERVED_MEMORY:
3780                     acpi_handle_dmar_rmrr(addr);
3781                     break;
3782           case ACPI_DMAR_TYPE_ROOT_ATS:
3783                     acpi_handle_dmar_atsr(addr);
3784                     break;
3785           case ACPI_DMAR_TYPE_HARDWARE_AFFINITY:
3786                     acpi_handle_dmar_rhsa(addr);
3787                     break;
3788           case ACPI_DMAR_TYPE_NAMESPACE:
3789                     acpi_handle_dmar_andd(addr);
3790                     break;
3791           default:
3792                     printf("\n");
3793                     printf("\tType=%d\n", hdr->Type);
3794                     printf("\tLength=%d\n", hdr->Length);
3795                     break;
3796           }
3797           return (hdr->Length);
3798 }
3799 
3800 #ifndef ACPI_DMAR_X2APIC_OPT_OUT
3801 #define   ACPI_DMAR_X2APIC_OPT_OUT      (0x2)
3802 #endif
3803 
3804 static void
acpi_handle_dmar(ACPI_TABLE_HEADER * sdp)3805 acpi_handle_dmar(ACPI_TABLE_HEADER *sdp)
3806 {
3807           char *cp;
3808           int remaining, consumed;
3809           ACPI_TABLE_DMAR *dmar;
3810 
3811           printf(BEGIN_COMMENT);
3812           acpi_print_sdt(sdp);
3813           dmar = (ACPI_TABLE_DMAR *)sdp;
3814           printf("\tHost Address Width=%d\n", dmar->Width + 1);
3815 
3816 #define PRINTFLAG(var, flag)  printflag((var), ACPI_DMAR_## flag, #flag)
3817 
3818           printf("\tFlags=");
3819           PRINTFLAG(dmar->Flags, INTR_REMAP);
3820           PRINTFLAG(dmar->Flags, X2APIC_OPT_OUT);
3821           PRINTFLAG(dmar->Flags, X2APIC_MODE);
3822           PRINTFLAG_END();
3823 
3824 #undef PRINTFLAG
3825 
3826           remaining = sdp->Length - sizeof(ACPI_TABLE_DMAR);
3827           while (remaining > 0) {
3828                     cp = (char *)sdp + sdp->Length - remaining;
3829                     consumed = acpi_handle_dmar_remapping_structure(cp, remaining);
3830                     if (consumed <= 0)
3831                               break;
3832                     else
3833                               remaining -= consumed;
3834           }
3835 
3836           printf(END_COMMENT);
3837 }
3838 
3839 static void
acpi_handle_uefi(ACPI_TABLE_HEADER * sdp)3840 acpi_handle_uefi(ACPI_TABLE_HEADER *sdp)
3841 {
3842           ACPI_TABLE_UEFI *uefi;
3843           char *uuidstr;
3844           uint32_t status;
3845 
3846           printf(BEGIN_COMMENT);
3847           acpi_print_sdt(sdp);
3848           uefi = (ACPI_TABLE_UEFI *)sdp;
3849 
3850           uuid_to_string((uuid_t *)(uefi->Identifier),
3851               &uuidstr, &status);
3852           if (status != uuid_s_ok)
3853                     errx(1, "uuid_to_string: status=%u", status);
3854           printf("\tUUID=%s\n", uuidstr);
3855           free(uuidstr);
3856 
3857           printf("\tDataOffset=%04hx\n", uefi->DataOffset);
3858           /* XXX need write */
3859 
3860           printf(END_COMMENT);
3861 }
3862 
3863 static void
acpi_handle_waet(ACPI_TABLE_HEADER * sdp)3864 acpi_handle_waet(ACPI_TABLE_HEADER *sdp)
3865 {
3866           ACPI_TABLE_WAET *waet;
3867 
3868           printf(BEGIN_COMMENT);
3869           acpi_print_sdt(sdp);
3870           waet = (ACPI_TABLE_WAET *)sdp;
3871 
3872           printf("\tRTC Timer={");
3873           if (waet->Flags & ACPI_WAET_RTC_NO_ACK)
3874                     printf("No ACK required");
3875           else
3876                     printf("default behaviour");
3877           printf("}\n");
3878           printf("\t ACPI PM Timer={");
3879           if (waet->Flags & ACPI_WAET_TIMER_ONE_READ)
3880                     printf("One Read sufficient");
3881           else
3882                     printf("default behaviour");
3883           printf("}\n");
3884 
3885           printf(END_COMMENT);
3886 }
3887 
3888 static void
acpi_print_wdat_action(ACPI_WHEA_HEADER * whea)3889 acpi_print_wdat_action(ACPI_WHEA_HEADER *whea)
3890 {
3891           printf("\tACTION={");
3892           switch (whea->Action) {
3893           case ACPI_WDAT_RESET:
3894                     printf("RESET");
3895                     break;
3896           case ACPI_WDAT_GET_CURRENT_COUNTDOWN:
3897                     printf("GET_CURRENT_COUNTDOWN");
3898                     break;
3899           case ACPI_WDAT_GET_COUNTDOWN:
3900                     printf("GET_COUNTDOWN");
3901                     break;
3902           case ACPI_WDAT_SET_COUNTDOWN:
3903                     printf("SET_COUNTDOWN");
3904                     break;
3905           case ACPI_WDAT_GET_RUNNING_STATE:
3906                     printf("GET_RUNNING_STATE");
3907                     break;
3908           case ACPI_WDAT_SET_RUNNING_STATE:
3909                     printf("SET_RUNNING_STATE");
3910                     break;
3911           case ACPI_WDAT_GET_STOPPED_STATE:
3912                     printf("GET_STOPPED_STATE");
3913                     break;
3914           case ACPI_WDAT_SET_STOPPED_STATE:
3915                     printf("SET_STOPPED_STATE");
3916                     break;
3917           case ACPI_WDAT_GET_REBOOT:
3918                     printf("GET_REBOOT");
3919                     break;
3920           case ACPI_WDAT_SET_REBOOT:
3921                     printf("SET_REBOOT");
3922                     break;
3923           case ACPI_WDAT_GET_SHUTDOWN:
3924                     printf("GET_SHUTDOWN");
3925                     break;
3926           case ACPI_WDAT_SET_SHUTDOWN:
3927                     printf("SET_SHUTDOWN");
3928                     break;
3929           case ACPI_WDAT_GET_STATUS:
3930                     printf("GET_STATUS");
3931                     break;
3932           case ACPI_WDAT_SET_STATUS:
3933                     printf("SET_STATUS");
3934                     break;
3935           case ACPI_WDAT_ACTION_RESERVED:
3936                     printf("ACTION_RESERVED");
3937                     break;
3938           default:
3939                     printf("%d", whea->Action);
3940                     break;
3941           }
3942           printf("}\n");
3943 }
3944 
3945 static void
acpi_print_wdat_instruction(ACPI_WHEA_HEADER * whea)3946 acpi_print_wdat_instruction(ACPI_WHEA_HEADER *whea)
3947 {
3948           uint32_t ins;
3949 
3950           ins = whea->Instruction & ~ACPI_WDAT_PRESERVE_REGISTER;
3951 
3952           printf("\tINSTRUCTION={");
3953           switch (ins) {
3954           case ACPI_WDAT_READ_VALUE:
3955                     printf("READ_VALUE");
3956                     break;
3957           case ACPI_WDAT_READ_COUNTDOWN:
3958                     printf("READ_COUNTDOWN");
3959                     break;
3960           case ACPI_WDAT_WRITE_VALUE:
3961                     printf("WRITE_VALUE");
3962                     break;
3963           case ACPI_WDAT_WRITE_COUNTDOWN:
3964                     printf("WRITE_COUNTDOWN");
3965                     break;
3966           case ACPI_WDAT_INSTRUCTION_RESERVED:
3967                     printf("INSTRUCTION_RESERVED");
3968                     break;
3969           default:
3970                     printf("%d", ins);
3971                     break;
3972           }
3973 
3974           if (whea->Instruction & ACPI_WDAT_PRESERVE_REGISTER)
3975                     printf(", Preserve Register");
3976 
3977           printf("}\n");
3978 }
3979 
3980 static void
acpi_handle_wdat(ACPI_TABLE_HEADER * sdp)3981 acpi_handle_wdat(ACPI_TABLE_HEADER *sdp)
3982 {
3983           ACPI_TABLE_WDAT *wdat;
3984           ACPI_WHEA_HEADER *whea;
3985           ACPI_WDAT_ENTRY *wdat_pos;
3986           u_int i;
3987 
3988           printf(BEGIN_COMMENT);
3989           acpi_print_sdt(sdp);
3990           wdat = (ACPI_TABLE_WDAT *)sdp;
3991 
3992           printf("\tHeader Length=%d\n", wdat->HeaderLength);
3993 
3994           acpi_print_pci_sbdf(wdat->PciSegment, wdat->PciBus, wdat->PciDevice,
3995               wdat->PciFunction);
3996           printf("\n\tTimer Counter Period=%d msec\n", wdat->TimerPeriod);
3997           printf("\tTimer Maximum Counter Value=%d\n", wdat->MaxCount);
3998           printf("\tTimer Minimum Counter Value=%d\n", wdat->MinCount);
3999 
4000           printf("\tFlags={");
4001           if (wdat->Flags & ACPI_WDAT_ENABLED)
4002                     printf("ENABLED");
4003           if (wdat->Flags & ACPI_WDAT_STOPPED)
4004                     printf(", STOPPED");
4005           printf("}\n");
4006 
4007           wdat_pos = (ACPI_WDAT_ENTRY *)((char *)wdat + sizeof(ACPI_TABLE_WDAT));
4008 
4009           for (i = 0; i < wdat->Entries; i++) {
4010                     whea = (ACPI_WHEA_HEADER *)wdat_pos;
4011                     acpi_print_whea(whea,
4012                         acpi_print_wdat_action, acpi_print_wdat_instruction,
4013                         NULL);
4014                     wdat_pos++;
4015           }
4016           printf(END_COMMENT);
4017 }
4018 
4019 static void
acpi_handle_wddt(ACPI_TABLE_HEADER * sdp)4020 acpi_handle_wddt(ACPI_TABLE_HEADER *sdp)
4021 {
4022           ACPI_TABLE_WDDT *wddt;
4023 
4024           printf(BEGIN_COMMENT);
4025           acpi_print_sdt(sdp);
4026           wddt = (ACPI_TABLE_WDDT *)sdp;
4027 
4028           printf("\tSpecVersion=%04hx\n", wddt->SpecVersion);
4029           printf("\tTableVersion=%04hx\n", wddt->TableVersion);
4030           printf("\tPciVendorID=%04hx\n", wddt->PciVendorId);
4031           printf("\tAddress=");
4032           acpi_print_gas(&wddt->Address);
4033           printf("\n\tTimer Maximum Counter Value=%d\n", wddt->MaxCount);
4034           printf("\tTimer Minimum Counter Value=%d\n", wddt->MinCount);
4035           printf("\tTimer Counter Period=%d\n", wddt->Period);
4036 
4037 #define PRINTFLAG(var, flag)  printflag((var), ACPI_WDDT_## flag, #flag)
4038 
4039           printf("\tStatus=");
4040           PRINTFLAG(wddt->Status, AVAILABLE);
4041           PRINTFLAG(wddt->Status, ACTIVE);
4042           PRINTFLAG(wddt->Status, TCO_OS_OWNED);
4043           PRINTFLAG(wddt->Status, USER_RESET);
4044           PRINTFLAG(wddt->Status, WDT_RESET);
4045           PRINTFLAG(wddt->Status, POWER_FAIL);
4046           PRINTFLAG(wddt->Status, UNKNOWN_RESET);
4047           PRINTFLAG_END();
4048 
4049           printf("\tCapability=");
4050           PRINTFLAG(wddt->Capability, AUTO_RESET);
4051           PRINTFLAG(wddt->Capability, ALERT_SUPPORT);
4052           PRINTFLAG_END();
4053 
4054 #undef PRINTFLAG
4055 
4056           printf(END_COMMENT);
4057 }
4058 
4059 static void
acpi_handle_wdrt(ACPI_TABLE_HEADER * sdp)4060 acpi_handle_wdrt(ACPI_TABLE_HEADER *sdp)
4061 {
4062           ACPI_TABLE_WDRT *wdrt;
4063 
4064           printf(BEGIN_COMMENT);
4065           acpi_print_sdt(sdp);
4066           wdrt = (ACPI_TABLE_WDRT *)sdp;
4067 
4068           printf("\tControl Register=");
4069           acpi_print_gas(&wdrt->ControlRegister);
4070           printf("\n\tCount Register=");
4071           acpi_print_gas(&wdrt->CountRegister);
4072           printf("\n");
4073           acpi_print_pci(wdrt->PciVendorId, wdrt->PciDeviceId,
4074               wdrt->PciSegment, wdrt->PciBus, wdrt->PciDevice, wdrt->PciFunction);
4075 
4076           /* Value must be >= 511 and < 65535 */
4077           printf("\tMaxCount=%d", wdrt->MaxCount);
4078           if (wdrt->MaxCount < 511)
4079                     printf(" (Out of Range. Valid range: 511 <= maxcount < 65535)");
4080           printf("\n");
4081 
4082           printf("\tUnit={");
4083           switch (wdrt->Units) {
4084           case 0:
4085                     printf("1 seconds/count");
4086                     break;
4087           case 1:
4088                     printf("100 milliseconds/count");
4089                     break;
4090           case 2:
4091                     printf("10 milliseconds/count");
4092                     break;
4093           default:
4094                     printf("%d", wdrt->Units);
4095                     break;
4096           }
4097           printf("}\n");
4098 
4099           printf(END_COMMENT);
4100 }
4101 
4102 static void
acpi_print_sdt(ACPI_TABLE_HEADER * sdp)4103 acpi_print_sdt(ACPI_TABLE_HEADER *sdp)
4104 {
4105           printf("  ");
4106           acpi_print_string(sdp->Signature, ACPI_NAMESEG_SIZE);
4107           printf(": Length=%d, Revision=%d, Checksum=%d",
4108                  sdp->Length, sdp->Revision, sdp->Checksum);
4109           if (acpi_checksum(sdp, sdp->Length))
4110                     printf(" (Incorrect)");
4111           printf(",\n\tOEMID=");
4112           acpi_print_string(sdp->OemId, ACPI_OEM_ID_SIZE);
4113           printf(", OEM Table ID=");
4114           acpi_print_string(sdp->OemTableId, ACPI_OEM_TABLE_ID_SIZE);
4115           printf(", OEM Revision=0x%x,\n", sdp->OemRevision);
4116           printf("\tCreator ID=");
4117           acpi_print_string(sdp->AslCompilerId, ACPI_NAMESEG_SIZE);
4118           printf(", Creator Revision=0x%x\n", sdp->AslCompilerRevision);
4119 }
4120 
4121 void
acpi_print_tabs(unsigned int n)4122 acpi_print_tabs(unsigned int n)
4123 {
4124 
4125           while (n-- > 0)
4126                     printf("\t");
4127 }
4128 
4129 static void
acpi_dump_bytes(uint8_t * p,uint32_t len,unsigned int ntabs)4130 acpi_dump_bytes(uint8_t *p, uint32_t len, unsigned int ntabs)
4131 {
4132           unsigned int i;
4133 
4134           acpi_print_tabs(ntabs);
4135           printf("Data={");
4136           for (i = 0; i < len; i++) {
4137                     if (cflag) {
4138                               if (i % 64 == 0) {
4139                                         printf("\n");
4140                                         acpi_print_tabs(ntabs);
4141                                         printf(" ");
4142                               }else if (i % 16 == 0)
4143                                         printf(" ");
4144                               printf("%c", (p[i] >= ' ' && p[i] <= '~') ? p[i] : '.');
4145                     } else {
4146                               if (i % 16 == 0) {
4147                                         printf("\n");
4148                                         acpi_print_tabs(ntabs + 1);
4149                               } else if (i % 8 == 0)
4150                                         printf("   ");
4151                               printf(" %02x", p[i]);
4152                     }
4153           }
4154           printf("\n");
4155           acpi_print_tabs(ntabs);
4156           printf("}\n");
4157 }
4158 
4159 /* Dump data which has ACPI_TABLE_HEADER */
4160 static void
acpi_dump_table(ACPI_TABLE_HEADER * sdp)4161 acpi_dump_table(ACPI_TABLE_HEADER *sdp)
4162 {
4163 
4164           acpi_dump_bytes((uint8_t *)sdp, sdp->Length, 1);
4165 }
4166 
4167 static void
acpi_print_rsdt(ACPI_TABLE_HEADER * rsdp)4168 acpi_print_rsdt(ACPI_TABLE_HEADER *rsdp)
4169 {
4170           ACPI_TABLE_RSDT *rsdt;
4171           ACPI_TABLE_XSDT *xsdt;
4172           int       i, entries;
4173 
4174           rsdt = (ACPI_TABLE_RSDT *)rsdp;
4175           xsdt = (ACPI_TABLE_XSDT *)rsdp;
4176           printf(BEGIN_COMMENT);
4177           acpi_print_sdt(rsdp);
4178           entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
4179           printf("\tEntries={ ");
4180           for (i = 0; i < entries; i++) {
4181                     if (i > 0)
4182                               printf(", ");
4183                     if (addr_size == 4)
4184                               printf("0x%08x", le32toh(rsdt->TableOffsetEntry[i]));
4185                     else
4186                               printf("0x%016jx",
4187                                   (uintmax_t)le64toh(xsdt->TableOffsetEntry[i]));
4188           }
4189           printf(" }\n");
4190           printf(END_COMMENT);
4191 }
4192 
4193 static const char *acpi_pm_profiles[] = {
4194           "Unspecified", "Desktop", "Mobile", "Workstation",
4195           "Enterprise Server", "SOHO Server", "Appliance PC",
4196           "Performance Server", "Tablet"
4197 };
4198 
4199 static void
acpi_print_fadt(ACPI_TABLE_HEADER * sdp)4200 acpi_print_fadt(ACPI_TABLE_HEADER *sdp)
4201 {
4202           ACPI_TABLE_FADT *fadt;
4203           const char *pm;
4204 
4205           fadt = (ACPI_TABLE_FADT *)sdp;
4206           printf(BEGIN_COMMENT);
4207           acpi_print_sdt(sdp);
4208           printf(" \tFACS=0x%x, DSDT=0x%x\n", fadt->Facs,
4209                  fadt->Dsdt);
4210           /* XXX ACPI 2.0 eliminated this */
4211           printf("\tINT_MODEL=%s\n", fadt->Model ? "APIC" : "PIC");
4212           if (fadt->PreferredProfile >= sizeof(acpi_pm_profiles) / sizeof(char *))
4213                     pm = "Reserved";
4214           else
4215                     pm = acpi_pm_profiles[fadt->PreferredProfile];
4216           printf("\tPreferred_PM_Profile=%s (%d)\n", pm, fadt->PreferredProfile);
4217           printf("\tSCI_INT=%d\n", fadt->SciInterrupt);
4218           printf("\tSMI_CMD=0x%x, ", fadt->SmiCommand);
4219           printf("ACPI_ENABLE=0x%x, ", fadt->AcpiEnable);
4220           printf("ACPI_DISABLE=0x%x, ", fadt->AcpiDisable);
4221           printf("S4BIOS_REQ=0x%x\n", fadt->S4BiosRequest);
4222           printf("\tPSTATE_CNT=0x%x\n", fadt->PstateControl);
4223           printf("\tPM1a_EVT_BLK=0x%x-0x%x\n",
4224                  fadt->Pm1aEventBlock,
4225                  fadt->Pm1aEventBlock + fadt->Pm1EventLength - 1);
4226           if (fadt->Pm1bEventBlock != 0)
4227                     printf("\tPM1b_EVT_BLK=0x%x-0x%x\n",
4228                            fadt->Pm1bEventBlock,
4229                            fadt->Pm1bEventBlock + fadt->Pm1EventLength - 1);
4230           printf("\tPM1a_CNT_BLK=0x%x-0x%x\n",
4231                  fadt->Pm1aControlBlock,
4232                  fadt->Pm1aControlBlock + fadt->Pm1ControlLength - 1);
4233           if (fadt->Pm1bControlBlock != 0)
4234                     printf("\tPM1b_CNT_BLK=0x%x-0x%x\n",
4235                            fadt->Pm1bControlBlock,
4236                            fadt->Pm1bControlBlock + fadt->Pm1ControlLength - 1);
4237           if (fadt->Pm2ControlBlock != 0)
4238                     printf("\tPM2_CNT_BLK=0x%x-0x%x\n",
4239                            fadt->Pm2ControlBlock,
4240                            fadt->Pm2ControlBlock + fadt->Pm2ControlLength - 1);
4241           if (fadt->PmTimerBlock != 0)
4242                     printf("\tPM_TMR_BLK=0x%x-0x%x\n",
4243                         fadt->PmTimerBlock,
4244                         fadt->PmTimerBlock + fadt->PmTimerLength - 1);
4245           if (fadt->Gpe0Block != 0)
4246                     printf("\tGPE0_BLK=0x%x-0x%x\n",
4247                            fadt->Gpe0Block,
4248                            fadt->Gpe0Block + fadt->Gpe0BlockLength - 1);
4249           if (fadt->Gpe1Block != 0)
4250                     printf("\tGPE1_BLK=0x%x-0x%x, GPE1_BASE=%d\n",
4251                            fadt->Gpe1Block,
4252                            fadt->Gpe1Block + fadt->Gpe1BlockLength - 1,
4253                            fadt->Gpe1Base);
4254           if (fadt->CstControl != 0)
4255                     printf("\tCST_CNT=0x%x\n", fadt->CstControl);
4256           printf("\tP_LVL2_LAT=%d us, P_LVL3_LAT=%d us\n",
4257                  fadt->C2Latency, fadt->C3Latency);
4258           printf("\tFLUSH_SIZE=%d, FLUSH_STRIDE=%d\n",
4259                  fadt->FlushSize, fadt->FlushStride);
4260           printf("\tDUTY_OFFSET=%d, DUTY_WIDTH=%d\n",
4261                  fadt->DutyOffset, fadt->DutyWidth);
4262           printf("\tDAY_ALRM=%d, MON_ALRM=%d, CENTURY=%d\n",
4263                  fadt->DayAlarm, fadt->MonthAlarm, fadt->Century);
4264 
4265 #define PRINTFLAG(var, flag)  printflag((var), ACPI_FADT_## flag, #flag)
4266 
4267           printf("\tIAPC_BOOT_ARCH=");
4268           PRINTFLAG(fadt->BootFlags, LEGACY_DEVICES);
4269           PRINTFLAG(fadt->BootFlags, 8042);
4270           PRINTFLAG(fadt->BootFlags, NO_VGA);
4271           PRINTFLAG(fadt->BootFlags, NO_MSI);
4272           PRINTFLAG(fadt->BootFlags, NO_ASPM);
4273           PRINTFLAG(fadt->BootFlags, NO_CMOS_RTC);
4274           PRINTFLAG_END();
4275 
4276           printf("\tFlags=");
4277           PRINTFLAG(fadt->Flags, WBINVD);
4278           PRINTFLAG(fadt->Flags, WBINVD_FLUSH);
4279           PRINTFLAG(fadt->Flags, C1_SUPPORTED);
4280           PRINTFLAG(fadt->Flags, C2_MP_SUPPORTED);
4281           PRINTFLAG(fadt->Flags, POWER_BUTTON);
4282           PRINTFLAG(fadt->Flags, SLEEP_BUTTON);
4283           PRINTFLAG(fadt->Flags, FIXED_RTC);
4284           PRINTFLAG(fadt->Flags, S4_RTC_WAKE);
4285           PRINTFLAG(fadt->Flags, 32BIT_TIMER);
4286           PRINTFLAG(fadt->Flags, DOCKING_SUPPORTED);
4287           PRINTFLAG(fadt->Flags, RESET_REGISTER);
4288           PRINTFLAG(fadt->Flags, SEALED_CASE);
4289           PRINTFLAG(fadt->Flags, HEADLESS);
4290           PRINTFLAG(fadt->Flags, SLEEP_TYPE);
4291           PRINTFLAG(fadt->Flags, PCI_EXPRESS_WAKE);
4292           PRINTFLAG(fadt->Flags, PLATFORM_CLOCK);
4293           PRINTFLAG(fadt->Flags, S4_RTC_VALID);
4294           PRINTFLAG(fadt->Flags, REMOTE_POWER_ON);
4295           PRINTFLAG(fadt->Flags, APIC_CLUSTER);
4296           PRINTFLAG(fadt->Flags, APIC_PHYSICAL);
4297           PRINTFLAG(fadt->Flags, HW_REDUCED);
4298           PRINTFLAG(fadt->Flags, LOW_POWER_S0);
4299           PRINTFLAG_END();
4300 
4301           if (sdp->Length < ACPI_FADT_V2_SIZE)
4302                     goto out;
4303 
4304           if (fadt->Flags & ACPI_FADT_RESET_REGISTER) {
4305                     printf("\tRESET_REG=");
4306                     acpi_print_gas(&fadt->ResetRegister);
4307                     printf(", RESET_VALUE=%#x\n", fadt->ResetValue);
4308           }
4309 
4310           printf("\tArmBootFlags=");
4311           PRINTFLAG(fadt->ArmBootFlags, PSCI_COMPLIANT);
4312           PRINTFLAG(fadt->ArmBootFlags, PSCI_USE_HVC);
4313           PRINTFLAG_END();
4314 
4315 #undef PRINTFLAG
4316 
4317           printf("\tMinorRevision=%u\n", fadt->MinorRevision);
4318 
4319           if (sdp->Length < ACPI_FADT_V3_SIZE)
4320                     goto out;
4321 
4322           printf("\tX_FACS=0x%016jx, ", (uintmax_t)fadt->XFacs);
4323           printf("X_DSDT=0x%016jx\n", (uintmax_t)fadt->XDsdt);
4324           printf("\tX_PM1a_EVT_BLK=");
4325           acpi_print_gas(&fadt->XPm1aEventBlock);
4326           if (fadt->XPm1bEventBlock.Address != 0) {
4327                     printf("\n\tX_PM1b_EVT_BLK=");
4328                     acpi_print_gas(&fadt->XPm1bEventBlock);
4329           }
4330           printf("\n\tX_PM1a_CNT_BLK=");
4331           acpi_print_gas(&fadt->XPm1aControlBlock);
4332           if (fadt->XPm1bControlBlock.Address != 0) {
4333                     printf("\n\tX_PM1b_CNT_BLK=");
4334                     acpi_print_gas(&fadt->XPm1bControlBlock);
4335           }
4336           if (fadt->XPm2ControlBlock.Address != 0) {
4337                     printf("\n\tX_PM2_CNT_BLK=");
4338                     acpi_print_gas(&fadt->XPm2ControlBlock);
4339           }
4340           if (fadt->XPmTimerBlock.Address != 0) {
4341                     printf("\n\tX_PM_TMR_BLK=");
4342                     acpi_print_gas(&fadt->XPmTimerBlock);
4343           }
4344           if (fadt->XGpe0Block.Address != 0) {
4345                     printf("\n\tX_GPE0_BLK=");
4346                     acpi_print_gas(&fadt->XGpe0Block);
4347           }
4348           if (fadt->XGpe1Block.Address != 0) {
4349                     printf("\n\tX_GPE1_BLK=");
4350                     acpi_print_gas(&fadt->XGpe1Block);
4351           }
4352           printf("\n");
4353 
4354           if (sdp->Length < ACPI_FADT_V5_SIZE)
4355                     goto out;
4356 
4357           if (fadt->SleepControl.Address != 0) {
4358                     printf("\tSleepControl=");
4359                     acpi_print_gas(&fadt->SleepControl);
4360                     printf("\n");
4361           }
4362           if (fadt->SleepStatus.Address != 0) {
4363                     printf("\n\tSleepStatus=");
4364                     acpi_print_gas(&fadt->SleepStatus);
4365                     printf("\n");
4366           }
4367 
4368           if (sdp->Length < ACPI_FADT_V6_SIZE)
4369                     goto out;
4370 
4371           printf("\tHypervisorId=0x%016"PRIx64"\n", fadt->HypervisorId);
4372 
4373 out:
4374           printf(END_COMMENT);
4375 }
4376 
4377 static void
acpi_print_facs(ACPI_TABLE_FACS * facs)4378 acpi_print_facs(ACPI_TABLE_FACS *facs)
4379 {
4380           printf(BEGIN_COMMENT);
4381           printf("  FACS:\tLength=%u, ", facs->Length);
4382           printf("HwSig=0x%08x, ", facs->HardwareSignature);
4383           printf("Firm_Wake_Vec=0x%08x\n", facs->FirmwareWakingVector);
4384 
4385 #define PRINTFLAG(var, flag)  printflag((var), ACPI_GLOCK_## flag, #flag)
4386 
4387           printf("\tGlobal_Lock=");
4388           PRINTFLAG(facs->GlobalLock, PENDING);
4389           PRINTFLAG(facs->GlobalLock, OWNED);
4390           PRINTFLAG_END();
4391 
4392 #undef PRINTFLAG
4393 
4394 #define PRINTFLAG(var, flag)  printflag((var), ACPI_FACS_## flag, #flag)
4395 
4396           printf("\tFlags=");
4397           PRINTFLAG(facs->Flags, S4_BIOS_PRESENT);
4398           PRINTFLAG(facs->Flags, 64BIT_WAKE);
4399           PRINTFLAG_END();
4400 
4401 #undef PRINTFLAG
4402 
4403           if (facs->XFirmwareWakingVector != 0)
4404                     printf("\tX_Firm_Wake_Vec=%016jx\n",
4405                         (uintmax_t)facs->XFirmwareWakingVector);
4406           printf("\tVersion=%u\n", facs->Version);
4407 
4408           printf("\tOspmFlags={");
4409           if (facs->OspmFlags & ACPI_FACS_64BIT_ENVIRONMENT)
4410                     printf("64BIT_WAKE");
4411           printf("}\n");
4412 
4413           printf(END_COMMENT);
4414 }
4415 
4416 static void
acpi_print_dsdt(ACPI_TABLE_HEADER * dsdp)4417 acpi_print_dsdt(ACPI_TABLE_HEADER *dsdp)
4418 {
4419           printf(BEGIN_COMMENT);
4420           acpi_print_sdt(dsdp);
4421           printf(END_COMMENT);
4422 }
4423 
4424 int
acpi_checksum(void * p,size_t length)4425 acpi_checksum(void *p, size_t length)
4426 {
4427           uint8_t *bp;
4428           uint8_t sum;
4429 
4430           bp = p;
4431           sum = 0;
4432           while (length--)
4433                     sum += *bp++;
4434 
4435           return (sum);
4436 }
4437 
4438 static ACPI_TABLE_HEADER *
acpi_map_sdt(vm_offset_t pa)4439 acpi_map_sdt(vm_offset_t pa)
4440 {
4441           ACPI_TABLE_HEADER *sp;
4442 
4443           sp = acpi_map_physical(pa, sizeof(ACPI_TABLE_HEADER));
4444           sp = acpi_map_physical(pa, sp->Length);
4445           return (sp);
4446 }
4447 
4448 static void
acpi_print_rsd_ptr(ACPI_TABLE_RSDP * rp)4449 acpi_print_rsd_ptr(ACPI_TABLE_RSDP *rp)
4450 {
4451           printf(BEGIN_COMMENT);
4452           printf("  RSD PTR: OEM=");
4453           acpi_print_string(rp->OemId, ACPI_OEM_ID_SIZE);
4454           printf(", ACPI_Rev=%s (%d)\n", rp->Revision < 2 ? "1.0x" : "2.0x",
4455                  rp->Revision);
4456           if (rp->Revision < 2) {
4457                     printf("\tRSDT=0x%08x, cksum=%u\n", rp->RsdtPhysicalAddress,
4458                         rp->Checksum);
4459           } else {
4460                     printf("\tXSDT=0x%016jx, length=%u, cksum=%u\n",
4461                         (uintmax_t)rp->XsdtPhysicalAddress, rp->Length,
4462                         rp->ExtendedChecksum);
4463           }
4464           printf(END_COMMENT);
4465 }
4466 
4467 static void
acpi_handle_rsdt(ACPI_TABLE_HEADER * rsdp)4468 acpi_handle_rsdt(ACPI_TABLE_HEADER *rsdp)
4469 {
4470           ACPI_TABLE_HEADER *sdp;
4471           ACPI_TABLE_RSDT *rsdt;
4472           ACPI_TABLE_XSDT *xsdt;
4473           vm_offset_t addr = 0;
4474           int entries, i;
4475 
4476           acpi_print_rsdt(rsdp);
4477           rsdt = (ACPI_TABLE_RSDT *)rsdp;
4478           xsdt = (ACPI_TABLE_XSDT *)rsdp;
4479           entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
4480           for (i = 0; i < entries; i++) {
4481                     if (addr_size == 4)
4482                               addr = le32toh(rsdt->TableOffsetEntry[i]);
4483                     else
4484                               addr = le64toh(xsdt->TableOffsetEntry[i]);
4485                     if (addr == 0)
4486                               continue;
4487                     sdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(addr);
4488                     if (acpi_checksum(sdp, sdp->Length)) {
4489                               warnx("RSDT entry %d (sig %.4s) is corrupt", i,
4490                                   sdp->Signature);
4491                               if (sflag)
4492                                         continue;
4493                     }
4494                     if (!memcmp(sdp->Signature, ACPI_SIG_FADT, 4))
4495                               acpi_handle_fadt(sdp);
4496                     else if (!memcmp(sdp->Signature, ACPI_SIG_BERT, 4))
4497                               acpi_handle_bert(sdp);
4498                     else if (!memcmp(sdp->Signature, ACPI_SIG_BGRT, 4))
4499                               acpi_handle_bgrt(sdp);
4500                     else if (!memcmp(sdp->Signature, ACPI_SIG_BOOT, 4))
4501                               acpi_handle_boot(sdp);
4502                     else if (!memcmp(sdp->Signature, ACPI_SIG_CPEP, 4))
4503                               acpi_handle_cpep(sdp);
4504                     else if (!memcmp(sdp->Signature, ACPI_SIG_CSRT, 4))
4505                               acpi_handle_csrt(sdp);
4506                     else if (!memcmp(sdp->Signature, ACPI_SIG_DBGP, 4))
4507                               acpi_handle_dbgp(sdp);
4508                     else if (!memcmp(sdp->Signature, ACPI_SIG_DBG2, 4))
4509                               acpi_handle_dbg2(sdp);
4510                     else if (!memcmp(sdp->Signature, ACPI_SIG_DMAR, 4))
4511                               acpi_handle_dmar(sdp);
4512                     else if (!memcmp(sdp->Signature, ACPI_SIG_EINJ, 4))
4513                               acpi_handle_einj(sdp);
4514                     else if (!memcmp(sdp->Signature, ACPI_SIG_ERST, 4))
4515                               acpi_handle_erst(sdp);
4516                     else if (!memcmp(sdp->Signature, ACPI_SIG_GTDT, 4))
4517                               acpi_handle_gtdt(sdp);
4518                     else if (!memcmp(sdp->Signature, ACPI_SIG_MADT, 4))
4519                               acpi_handle_madt(sdp);
4520                     else if (!memcmp(sdp->Signature, ACPI_SIG_MSCT, 4))
4521                               acpi_handle_msct(sdp);
4522                     else if (!memcmp(sdp->Signature, ACPI_SIG_HEST, 4))
4523                               acpi_handle_hest(sdp);
4524                     else if (!memcmp(sdp->Signature, ACPI_SIG_HPET, 4))
4525                               acpi_handle_hpet(sdp);
4526                     else if (!memcmp(sdp->Signature, ACPI_SIG_IORT, 4))
4527                               acpi_handle_iort(sdp);
4528                     else if (!memcmp(sdp->Signature, ACPI_SIG_ECDT, 4))
4529                               acpi_handle_ecdt(sdp);
4530                     else if (!memcmp(sdp->Signature, ACPI_SIG_LPIT, 4))
4531                               acpi_handle_lpit(sdp);
4532                     else if (!memcmp(sdp->Signature, ACPI_SIG_MCFG, 4))
4533                               acpi_handle_mcfg(sdp);
4534                     else if (!memcmp(sdp->Signature, ACPI_SIG_PCCT, 4))
4535                               acpi_handle_pcct(sdp);
4536                     else if (!memcmp(sdp->Signature, ACPI_SIG_PPTT, 4))
4537                               acpi_handle_pptt(sdp);
4538                     else if (!memcmp(sdp->Signature, ACPI_SIG_SBST, 4))
4539                               acpi_handle_sbst(sdp);
4540                     else if (!memcmp(sdp->Signature, ACPI_SIG_SLIT, 4))
4541                               acpi_handle_slit(sdp);
4542                     else if (!memcmp(sdp->Signature, ACPI_SIG_SPCR, 4))
4543                               acpi_handle_spcr(sdp);
4544                     else if (!memcmp(sdp->Signature, ACPI_SIG_SPMI, 4))
4545                               acpi_handle_spmi(sdp);
4546                     else if (!memcmp(sdp->Signature, ACPI_SIG_SRAT, 4))
4547                               acpi_handle_srat(sdp);
4548                     else if (!memcmp(sdp->Signature, ACPI_SIG_TCPA, 4))
4549                               acpi_handle_tcpa(sdp);
4550                     else if (!memcmp(sdp->Signature, ACPI_SIG_TPM2, 4))
4551                               acpi_handle_tpm2(sdp);
4552                     else if (!memcmp(sdp->Signature, ACPI_SIG_NFIT, 4))
4553                               acpi_handle_nfit(sdp);
4554                     else if (!memcmp(sdp->Signature, ACPI_SIG_UEFI, 4))
4555                               acpi_handle_uefi(sdp);
4556                     else if (!memcmp(sdp->Signature, ACPI_SIG_WAET, 4))
4557                               acpi_handle_waet(sdp);
4558                     else if (!memcmp(sdp->Signature, ACPI_SIG_WDAT, 4))
4559                               acpi_handle_wdat(sdp);
4560                     else if (!memcmp(sdp->Signature, ACPI_SIG_WDDT, 4))
4561                               acpi_handle_wddt(sdp);
4562                     else if (!memcmp(sdp->Signature, ACPI_SIG_WDRT, 4))
4563                               acpi_handle_wdrt(sdp);
4564                     else {
4565                               printf(BEGIN_COMMENT);
4566                               acpi_print_sdt(sdp);
4567                               printf("\n");
4568                               acpi_dump_table(sdp);
4569                               printf(END_COMMENT);
4570                     }
4571           }
4572 }
4573 
4574 ACPI_TABLE_HEADER *
sdt_load_devmem(void)4575 sdt_load_devmem(void)
4576 {
4577           ACPI_TABLE_RSDP *rp;
4578           ACPI_TABLE_HEADER *rsdp;
4579 
4580           rp = acpi_find_rsd_ptr();
4581           if (!rp)
4582                     errx(EXIT_FAILURE, "Can't find ACPI information");
4583 
4584           if (tflag)
4585                     acpi_print_rsd_ptr(rp);
4586           if (rp->Revision < 2) {
4587                     rsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(rp->RsdtPhysicalAddress);
4588                     if (memcmp(rsdp->Signature, "RSDT", 4) != 0 ||
4589                         acpi_checksum(rsdp, rsdp->Length) != 0)
4590                               errx(EXIT_FAILURE, "RSDT is corrupted");
4591                     addr_size = sizeof(uint32_t);
4592           } else {
4593                     rsdp = (ACPI_TABLE_HEADER *)acpi_map_sdt(rp->XsdtPhysicalAddress);
4594                     if (memcmp(rsdp->Signature, "XSDT", 4) != 0 ||
4595                         acpi_checksum(rsdp, rsdp->Length) != 0)
4596                               errx(EXIT_FAILURE, "XSDT is corrupted");
4597                     addr_size = sizeof(uint64_t);
4598           }
4599           return (rsdp);
4600 }
4601 
4602 /* Write the DSDT to a file, concatenating any SSDTs (if present). */
4603 static int
write_dsdt(int fd,ACPI_TABLE_HEADER * rsdt,ACPI_TABLE_HEADER * dsdt)4604 write_dsdt(int fd, ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdt)
4605 {
4606           ACPI_TABLE_HEADER sdt;
4607           ACPI_TABLE_HEADER *ssdt;
4608           uint8_t sum;
4609 
4610           /* Create a new checksum to account for the DSDT and any SSDTs. */
4611           sdt = *dsdt;
4612           if (rsdt != NULL) {
4613                     sdt.Checksum = 0;
4614                     sum = acpi_checksum(dsdt + 1, dsdt->Length -
4615                         sizeof(ACPI_TABLE_HEADER));
4616                     ssdt = sdt_from_rsdt(rsdt, ACPI_SIG_SSDT, NULL);
4617                     while (ssdt != NULL) {
4618                               sdt.Length += ssdt->Length - sizeof(ACPI_TABLE_HEADER);
4619                               sum += acpi_checksum(ssdt + 1,
4620                                   ssdt->Length - sizeof(ACPI_TABLE_HEADER));
4621                               ssdt = sdt_from_rsdt(rsdt, ACPI_SIG_SSDT, ssdt);
4622                     }
4623                     sum += acpi_checksum(&sdt, sizeof(ACPI_TABLE_HEADER));
4624                     sdt.Checksum -= sum;
4625           }
4626 
4627           /* Write out the DSDT header and body. */
4628           write(fd, &sdt, sizeof(ACPI_TABLE_HEADER));
4629           write(fd, dsdt + 1, dsdt->Length - sizeof(ACPI_TABLE_HEADER));
4630 
4631           /* Write out any SSDTs (if present.) */
4632           if (rsdt != NULL) {
4633                     ssdt = sdt_from_rsdt(rsdt, ACPI_SIG_SSDT, NULL);
4634                     while (ssdt != NULL) {
4635                               write(fd, ssdt + 1, ssdt->Length -
4636                                   sizeof(ACPI_TABLE_HEADER));
4637                               ssdt = sdt_from_rsdt(rsdt, ACPI_SIG_SSDT, ssdt);
4638                     }
4639           }
4640           return (0);
4641 }
4642 
4643 void
dsdt_save_file(char * outfile,ACPI_TABLE_HEADER * rsdt,ACPI_TABLE_HEADER * dsdp)4644 dsdt_save_file(char *outfile, ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdp)
4645 {
4646           int       fd;
4647           mode_t    mode;
4648 
4649           assert(outfile != NULL);
4650           mode = S_IRUSR | S_IWUSR | S_IRGRP | S_IROTH;
4651           fd = open(outfile, O_WRONLY | O_CREAT | O_TRUNC, mode);
4652           if (fd == -1) {
4653                     perror("dsdt_save_file");
4654                     return;
4655           }
4656           write_dsdt(fd, rsdt, dsdp);
4657           close(fd);
4658 }
4659 
4660 void
aml_disassemble(ACPI_TABLE_HEADER * rsdt,ACPI_TABLE_HEADER * dsdp)4661 aml_disassemble(ACPI_TABLE_HEADER *rsdt, ACPI_TABLE_HEADER *dsdp)
4662 {
4663           char buf[MAXPATHLEN], tmpstr[MAXPATHLEN], wrkdir[MAXPATHLEN];
4664           const char *iname = "/acpdump.din";
4665           const char *oname = "/acpdump.dsl";
4666           const char *tmpdir;
4667           FILE *fp;
4668           size_t len;
4669           int fd, status;
4670           pid_t pid;
4671 
4672           if (rsdt == NULL)
4673                     errx(EXIT_FAILURE, "aml_disassemble: invalid rsdt");
4674           if (dsdp == NULL)
4675                     errx(EXIT_FAILURE, "aml_disassemble: invalid dsdp");
4676 
4677           tmpdir = getenv("TMPDIR");
4678           if (tmpdir == NULL)
4679                     tmpdir = _PATH_TMP;
4680           if (realpath(tmpdir, buf) == NULL) {
4681                     perror("realpath tmp dir");
4682                     return;
4683           }
4684           len = sizeof(wrkdir) - strlen(iname);
4685           if ((size_t)snprintf(wrkdir, len, "%s/acpidump.XXXXXX", buf) > len-1 ) {
4686                     fprintf(stderr, "$TMPDIR too long\n");
4687                     return;
4688           }
4689           if  (mkdtemp(wrkdir) == NULL) {
4690                     perror("mkdtemp tmp working dir");
4691                     return;
4692           }
4693           len = (size_t)snprintf(tmpstr, sizeof(tmpstr), "%s%s", wrkdir, iname);
4694           assert(len <= sizeof(tmpstr) - 1);
4695           fd = open(tmpstr, O_CREAT | O_WRONLY, S_IRUSR | S_IWUSR);
4696           if (fd < 0) {
4697                     perror("iasl tmp file");
4698                     return;
4699           }
4700           write_dsdt(fd, rsdt, dsdp);
4701           close(fd);
4702 
4703           /* Run iasl -d on the temp file */
4704           if ((pid = fork()) == 0) {
4705                     close(STDOUT_FILENO);
4706                     if (vflag == 0)
4707                               close(STDERR_FILENO);
4708                     execl("/usr/bin/iasl", "iasl", "-d", tmpstr, NULL);
4709                     err(EXIT_FAILURE, "exec");
4710           }
4711           if (pid > 0)
4712                     wait(&status);
4713           if (unlink(tmpstr) < 0) {
4714                     perror("unlink");
4715                     goto out;
4716           }
4717           if (pid < 0) {
4718                     perror("fork");
4719                     goto out;
4720           }
4721           if (status != 0) {
4722                     fprintf(stderr, "iasl exit status = %d\n", status);
4723           }
4724 
4725           /* Dump iasl's output to stdout */
4726           len = (size_t)snprintf(tmpstr, sizeof(tmpstr), "%s%s", wrkdir, oname);
4727           assert(len <= sizeof(tmpstr) - 1);
4728           fp = fopen(tmpstr, "r");
4729           if (unlink(tmpstr) < 0) {
4730                     perror("unlink");
4731                     goto out;
4732           }
4733           if (fp == NULL) {
4734                     perror("iasl tmp file (read)");
4735                     goto out;
4736           }
4737           while ((len = fread(buf, 1, sizeof(buf), fp)) > 0)
4738                     fwrite(buf, 1, len, stdout);
4739           fclose(fp);
4740 
4741     out:
4742           if (rmdir(wrkdir) < 0)
4743                     perror("rmdir");
4744 }
4745 
4746 void
sdt_print_all(ACPI_TABLE_HEADER * rsdp)4747 sdt_print_all(ACPI_TABLE_HEADER *rsdp)
4748 {
4749           acpi_handle_rsdt(rsdp);
4750 }
4751 
4752 /* Fetch a table matching the given signature via the RSDT. */
4753 ACPI_TABLE_HEADER *
sdt_from_rsdt(ACPI_TABLE_HEADER * rsdp,const char * sig,ACPI_TABLE_HEADER * last)4754 sdt_from_rsdt(ACPI_TABLE_HEADER *rsdp, const char *sig, ACPI_TABLE_HEADER *last)
4755 {
4756           ACPI_TABLE_HEADER *sdt;
4757           ACPI_TABLE_RSDT *rsdt;
4758           ACPI_TABLE_XSDT *xsdt;
4759           vm_offset_t addr = 0;
4760           int entries, i;
4761 
4762           rsdt = (ACPI_TABLE_RSDT *)rsdp;
4763           xsdt = (ACPI_TABLE_XSDT *)rsdp;
4764           entries = (rsdp->Length - sizeof(ACPI_TABLE_HEADER)) / addr_size;
4765           for (i = 0; i < entries; i++) {
4766                     if (addr_size == 4)
4767                               addr = le32toh(rsdt->TableOffsetEntry[i]);
4768                     else
4769                               addr = le64toh(xsdt->TableOffsetEntry[i]);
4770                     if (addr == 0)
4771                               continue;
4772                     sdt = (ACPI_TABLE_HEADER *)acpi_map_sdt(addr);
4773                     if (last != NULL) {
4774                               if (sdt == last)
4775                                         last = NULL;
4776                               continue;
4777                     }
4778                     if (memcmp(sdt->Signature, sig, strlen(sig)))
4779                               continue;
4780                     if (acpi_checksum(sdt, sdt->Length))
4781                               errx(EXIT_FAILURE, "RSDT entry %d is corrupt", i);
4782                     return (sdt);
4783           }
4784 
4785           return (NULL);
4786 }
4787 
4788 ACPI_TABLE_HEADER *
dsdt_from_fadt(ACPI_TABLE_FADT * fadt)4789 dsdt_from_fadt(ACPI_TABLE_FADT *fadt)
4790 {
4791           ACPI_TABLE_HEADER   *sdt;
4792 
4793           /* Use the DSDT address if it is version 1, otherwise use XDSDT. */
4794           sdt = (ACPI_TABLE_HEADER *)acpi_map_sdt(
4795                     acpi_select_address(fadt->Dsdt, fadt->XDsdt));
4796           if (acpi_checksum(sdt, sdt->Length))
4797                     errx(EXIT_FAILURE, "DSDT is corrupt");
4798           return (sdt);
4799 }
4800