Loading...
1// SPDX-License-Identifier: GPL-2.0-or-later
2/*
3 * acpi_tables.c - ACPI Boot-Time Table Parsing
4 *
5 * Copyright (C) 2001 Paul Diefenbaugh <paul.s.diefenbaugh@intel.com>
6 */
7
8/* Uncomment next line to get verbose printout */
9/* #define DEBUG */
10#define pr_fmt(fmt) "ACPI: " fmt
11
12#include <linux/init.h>
13#include <linux/kernel.h>
14#include <linux/smp.h>
15#include <linux/string.h>
16#include <linux/types.h>
17#include <linux/irq.h>
18#include <linux/errno.h>
19#include <linux/acpi.h>
20#include <linux/memblock.h>
21#include <linux/earlycpio.h>
22#include <linux/initrd.h>
23#include <linux/security.h>
24#include "internal.h"
25
26#ifdef CONFIG_ACPI_CUSTOM_DSDT
27#include CONFIG_ACPI_CUSTOM_DSDT_FILE
28#endif
29
30#define ACPI_MAX_TABLES 128
31
32static char *mps_inti_flags_polarity[] = { "dfl", "high", "res", "low" };
33static char *mps_inti_flags_trigger[] = { "dfl", "edge", "res", "level" };
34
35static struct acpi_table_desc initial_tables[ACPI_MAX_TABLES] __initdata;
36
37static int acpi_apic_instance __initdata;
38
39enum acpi_subtable_type {
40 ACPI_SUBTABLE_COMMON,
41 ACPI_SUBTABLE_HMAT,
42};
43
44struct acpi_subtable_entry {
45 union acpi_subtable_headers *hdr;
46 enum acpi_subtable_type type;
47};
48
49/*
50 * Disable table checksum verification for the early stage due to the size
51 * limitation of the current x86 early mapping implementation.
52 */
53static bool acpi_verify_table_checksum __initdata = false;
54
55void acpi_table_print_madt_entry(struct acpi_subtable_header *header)
56{
57 if (!header)
58 return;
59
60 switch (header->type) {
61
62 case ACPI_MADT_TYPE_LOCAL_APIC:
63 {
64 struct acpi_madt_local_apic *p =
65 (struct acpi_madt_local_apic *)header;
66 pr_debug("LAPIC (acpi_id[0x%02x] lapic_id[0x%02x] %s)\n",
67 p->processor_id, p->id,
68 (p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
69 }
70 break;
71
72 case ACPI_MADT_TYPE_LOCAL_X2APIC:
73 {
74 struct acpi_madt_local_x2apic *p =
75 (struct acpi_madt_local_x2apic *)header;
76 pr_debug("X2APIC (apic_id[0x%02x] uid[0x%02x] %s)\n",
77 p->local_apic_id, p->uid,
78 (p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
79 }
80 break;
81
82 case ACPI_MADT_TYPE_IO_APIC:
83 {
84 struct acpi_madt_io_apic *p =
85 (struct acpi_madt_io_apic *)header;
86 pr_debug("IOAPIC (id[0x%02x] address[0x%08x] gsi_base[%d])\n",
87 p->id, p->address, p->global_irq_base);
88 }
89 break;
90
91 case ACPI_MADT_TYPE_INTERRUPT_OVERRIDE:
92 {
93 struct acpi_madt_interrupt_override *p =
94 (struct acpi_madt_interrupt_override *)header;
95 pr_info("INT_SRC_OVR (bus %d bus_irq %d global_irq %d %s %s)\n",
96 p->bus, p->source_irq, p->global_irq,
97 mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
98 mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2]);
99 if (p->inti_flags &
100 ~(ACPI_MADT_POLARITY_MASK | ACPI_MADT_TRIGGER_MASK))
101 pr_info("INT_SRC_OVR unexpected reserved flags: 0x%x\n",
102 p->inti_flags &
103 ~(ACPI_MADT_POLARITY_MASK | ACPI_MADT_TRIGGER_MASK));
104 }
105 break;
106
107 case ACPI_MADT_TYPE_NMI_SOURCE:
108 {
109 struct acpi_madt_nmi_source *p =
110 (struct acpi_madt_nmi_source *)header;
111 pr_info("NMI_SRC (%s %s global_irq %d)\n",
112 mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
113 mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
114 p->global_irq);
115 }
116 break;
117
118 case ACPI_MADT_TYPE_LOCAL_APIC_NMI:
119 {
120 struct acpi_madt_local_apic_nmi *p =
121 (struct acpi_madt_local_apic_nmi *)header;
122 pr_info("LAPIC_NMI (acpi_id[0x%02x] %s %s lint[0x%x])\n",
123 p->processor_id,
124 mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK ],
125 mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
126 p->lint);
127 }
128 break;
129
130 case ACPI_MADT_TYPE_LOCAL_X2APIC_NMI:
131 {
132 u16 polarity, trigger;
133 struct acpi_madt_local_x2apic_nmi *p =
134 (struct acpi_madt_local_x2apic_nmi *)header;
135
136 polarity = p->inti_flags & ACPI_MADT_POLARITY_MASK;
137 trigger = (p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2;
138
139 pr_info("X2APIC_NMI (uid[0x%02x] %s %s lint[0x%x])\n",
140 p->uid,
141 mps_inti_flags_polarity[polarity],
142 mps_inti_flags_trigger[trigger],
143 p->lint);
144 }
145 break;
146
147 case ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE:
148 {
149 struct acpi_madt_local_apic_override *p =
150 (struct acpi_madt_local_apic_override *)header;
151 pr_info("LAPIC_ADDR_OVR (address[%p])\n",
152 (void *)(unsigned long)p->address);
153 }
154 break;
155
156 case ACPI_MADT_TYPE_IO_SAPIC:
157 {
158 struct acpi_madt_io_sapic *p =
159 (struct acpi_madt_io_sapic *)header;
160 pr_debug("IOSAPIC (id[0x%x] address[%p] gsi_base[%d])\n",
161 p->id, (void *)(unsigned long)p->address,
162 p->global_irq_base);
163 }
164 break;
165
166 case ACPI_MADT_TYPE_LOCAL_SAPIC:
167 {
168 struct acpi_madt_local_sapic *p =
169 (struct acpi_madt_local_sapic *)header;
170 pr_debug("LSAPIC (acpi_id[0x%02x] lsapic_id[0x%02x] lsapic_eid[0x%02x] %s)\n",
171 p->processor_id, p->id, p->eid,
172 (p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
173 }
174 break;
175
176 case ACPI_MADT_TYPE_INTERRUPT_SOURCE:
177 {
178 struct acpi_madt_interrupt_source *p =
179 (struct acpi_madt_interrupt_source *)header;
180 pr_info("PLAT_INT_SRC (%s %s type[0x%x] id[0x%04x] eid[0x%x] iosapic_vector[0x%x] global_irq[0x%x]\n",
181 mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
182 mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
183 p->type, p->id, p->eid, p->io_sapic_vector,
184 p->global_irq);
185 }
186 break;
187
188 case ACPI_MADT_TYPE_GENERIC_INTERRUPT:
189 {
190 struct acpi_madt_generic_interrupt *p =
191 (struct acpi_madt_generic_interrupt *)header;
192 pr_debug("GICC (acpi_id[0x%04x] address[%llx] MPIDR[0x%llx] %s)\n",
193 p->uid, p->base_address,
194 p->arm_mpidr,
195 (p->flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
196
197 }
198 break;
199
200 case ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR:
201 {
202 struct acpi_madt_generic_distributor *p =
203 (struct acpi_madt_generic_distributor *)header;
204 pr_debug("GIC Distributor (gic_id[0x%04x] address[%llx] gsi_base[%d])\n",
205 p->gic_id, p->base_address,
206 p->global_irq_base);
207 }
208 break;
209
210 default:
211 pr_warn("Found unsupported MADT entry (type = 0x%x)\n",
212 header->type);
213 break;
214 }
215}
216
217static unsigned long __init
218acpi_get_entry_type(struct acpi_subtable_entry *entry)
219{
220 switch (entry->type) {
221 case ACPI_SUBTABLE_COMMON:
222 return entry->hdr->common.type;
223 case ACPI_SUBTABLE_HMAT:
224 return entry->hdr->hmat.type;
225 }
226 return 0;
227}
228
229static unsigned long __init
230acpi_get_entry_length(struct acpi_subtable_entry *entry)
231{
232 switch (entry->type) {
233 case ACPI_SUBTABLE_COMMON:
234 return entry->hdr->common.length;
235 case ACPI_SUBTABLE_HMAT:
236 return entry->hdr->hmat.length;
237 }
238 return 0;
239}
240
241static unsigned long __init
242acpi_get_subtable_header_length(struct acpi_subtable_entry *entry)
243{
244 switch (entry->type) {
245 case ACPI_SUBTABLE_COMMON:
246 return sizeof(entry->hdr->common);
247 case ACPI_SUBTABLE_HMAT:
248 return sizeof(entry->hdr->hmat);
249 }
250 return 0;
251}
252
253static enum acpi_subtable_type __init
254acpi_get_subtable_type(char *id)
255{
256 if (strncmp(id, ACPI_SIG_HMAT, 4) == 0)
257 return ACPI_SUBTABLE_HMAT;
258 return ACPI_SUBTABLE_COMMON;
259}
260
261/**
262 * acpi_parse_entries_array - for each proc_num find a suitable subtable
263 *
264 * @id: table id (for debugging purposes)
265 * @table_size: size of the root table
266 * @table_header: where does the table start?
267 * @proc: array of acpi_subtable_proc struct containing entry id
268 * and associated handler with it
269 * @proc_num: how big proc is?
270 * @max_entries: how many entries can we process?
271 *
272 * For each proc_num find a subtable with proc->id and run proc->handler
273 * on it. Assumption is that there's only single handler for particular
274 * entry id.
275 *
276 * The table_size is not the size of the complete ACPI table (the length
277 * field in the header struct), but only the size of the root table; i.e.,
278 * the offset from the very first byte of the complete ACPI table, to the
279 * first byte of the very first subtable.
280 *
281 * On success returns sum of all matching entries for all proc handlers.
282 * Otherwise, -ENODEV or -EINVAL is returned.
283 */
284static int __init acpi_parse_entries_array(char *id, unsigned long table_size,
285 struct acpi_table_header *table_header,
286 struct acpi_subtable_proc *proc, int proc_num,
287 unsigned int max_entries)
288{
289 struct acpi_subtable_entry entry;
290 unsigned long table_end, subtable_len, entry_len;
291 int count = 0;
292 int errs = 0;
293 int i;
294
295 table_end = (unsigned long)table_header + table_header->length;
296
297 /* Parse all entries looking for a match. */
298
299 entry.type = acpi_get_subtable_type(id);
300 entry.hdr = (union acpi_subtable_headers *)
301 ((unsigned long)table_header + table_size);
302 subtable_len = acpi_get_subtable_header_length(&entry);
303
304 while (((unsigned long)entry.hdr) + subtable_len < table_end) {
305 if (max_entries && count >= max_entries)
306 break;
307
308 for (i = 0; i < proc_num; i++) {
309 if (acpi_get_entry_type(&entry) != proc[i].id)
310 continue;
311 if (!proc[i].handler ||
312 (!errs && proc[i].handler(entry.hdr, table_end))) {
313 errs++;
314 continue;
315 }
316
317 proc[i].count++;
318 break;
319 }
320 if (i != proc_num)
321 count++;
322
323 /*
324 * If entry->length is 0, break from this loop to avoid
325 * infinite loop.
326 */
327 entry_len = acpi_get_entry_length(&entry);
328 if (entry_len == 0) {
329 pr_err("[%4.4s:0x%02x] Invalid zero length\n", id, proc->id);
330 return -EINVAL;
331 }
332
333 entry.hdr = (union acpi_subtable_headers *)
334 ((unsigned long)entry.hdr + entry_len);
335 }
336
337 if (max_entries && count > max_entries) {
338 pr_warn("[%4.4s:0x%02x] found the maximum %i entries\n",
339 id, proc->id, count);
340 }
341
342 return errs ? -EINVAL : count;
343}
344
345int __init acpi_table_parse_entries_array(char *id,
346 unsigned long table_size,
347 struct acpi_subtable_proc *proc, int proc_num,
348 unsigned int max_entries)
349{
350 struct acpi_table_header *table_header = NULL;
351 int count;
352 u32 instance = 0;
353
354 if (acpi_disabled)
355 return -ENODEV;
356
357 if (!id)
358 return -EINVAL;
359
360 if (!table_size)
361 return -EINVAL;
362
363 if (!strncmp(id, ACPI_SIG_MADT, 4))
364 instance = acpi_apic_instance;
365
366 acpi_get_table(id, instance, &table_header);
367 if (!table_header) {
368 pr_warn("%4.4s not present\n", id);
369 return -ENODEV;
370 }
371
372 count = acpi_parse_entries_array(id, table_size, table_header,
373 proc, proc_num, max_entries);
374
375 acpi_put_table(table_header);
376 return count;
377}
378
379int __init acpi_table_parse_entries(char *id,
380 unsigned long table_size,
381 int entry_id,
382 acpi_tbl_entry_handler handler,
383 unsigned int max_entries)
384{
385 struct acpi_subtable_proc proc = {
386 .id = entry_id,
387 .handler = handler,
388 };
389
390 return acpi_table_parse_entries_array(id, table_size, &proc, 1,
391 max_entries);
392}
393
394int __init acpi_table_parse_madt(enum acpi_madt_type id,
395 acpi_tbl_entry_handler handler, unsigned int max_entries)
396{
397 return acpi_table_parse_entries(ACPI_SIG_MADT,
398 sizeof(struct acpi_table_madt), id,
399 handler, max_entries);
400}
401
402/**
403 * acpi_table_parse - find table with @id, run @handler on it
404 * @id: table id to find
405 * @handler: handler to run
406 *
407 * Scan the ACPI System Descriptor Table (STD) for a table matching @id,
408 * run @handler on it.
409 *
410 * Return 0 if table found, -errno if not.
411 */
412int __init acpi_table_parse(char *id, acpi_tbl_table_handler handler)
413{
414 struct acpi_table_header *table = NULL;
415
416 if (acpi_disabled)
417 return -ENODEV;
418
419 if (!id || !handler)
420 return -EINVAL;
421
422 if (strncmp(id, ACPI_SIG_MADT, 4) == 0)
423 acpi_get_table(id, acpi_apic_instance, &table);
424 else
425 acpi_get_table(id, 0, &table);
426
427 if (table) {
428 handler(table);
429 acpi_put_table(table);
430 return 0;
431 } else
432 return -ENODEV;
433}
434
435/*
436 * The BIOS is supposed to supply a single APIC/MADT,
437 * but some report two. Provide a knob to use either.
438 * (don't you wish instance 0 and 1 were not the same?)
439 */
440static void __init check_multiple_madt(void)
441{
442 struct acpi_table_header *table = NULL;
443
444 acpi_get_table(ACPI_SIG_MADT, 2, &table);
445 if (table) {
446 pr_warn("BIOS bug: multiple APIC/MADT found, using %d\n",
447 acpi_apic_instance);
448 pr_warn("If \"acpi_apic_instance=%d\" works better, "
449 "notify linux-acpi@vger.kernel.org\n",
450 acpi_apic_instance ? 0 : 2);
451 acpi_put_table(table);
452
453 } else
454 acpi_apic_instance = 0;
455
456 return;
457}
458
459static void acpi_table_taint(struct acpi_table_header *table)
460{
461 pr_warn("Override [%4.4s-%8.8s], this is unsafe: tainting kernel\n",
462 table->signature, table->oem_table_id);
463 add_taint(TAINT_OVERRIDDEN_ACPI_TABLE, LOCKDEP_NOW_UNRELIABLE);
464}
465
466#ifdef CONFIG_ACPI_TABLE_UPGRADE
467static u64 acpi_tables_addr;
468static int all_tables_size;
469
470/* Copied from acpica/tbutils.c:acpi_tb_checksum() */
471static u8 __init acpi_table_checksum(u8 *buffer, u32 length)
472{
473 u8 sum = 0;
474 u8 *end = buffer + length;
475
476 while (buffer < end)
477 sum = (u8) (sum + *(buffer++));
478 return sum;
479}
480
481/* All but ACPI_SIG_RSDP and ACPI_SIG_FACS: */
482static const char table_sigs[][ACPI_NAMESEG_SIZE] __initconst = {
483 ACPI_SIG_BERT, ACPI_SIG_BGRT, ACPI_SIG_CPEP, ACPI_SIG_ECDT,
484 ACPI_SIG_EINJ, ACPI_SIG_ERST, ACPI_SIG_HEST, ACPI_SIG_MADT,
485 ACPI_SIG_MSCT, ACPI_SIG_SBST, ACPI_SIG_SLIT, ACPI_SIG_SRAT,
486 ACPI_SIG_ASF, ACPI_SIG_BOOT, ACPI_SIG_DBGP, ACPI_SIG_DMAR,
487 ACPI_SIG_HPET, ACPI_SIG_IBFT, ACPI_SIG_IVRS, ACPI_SIG_MCFG,
488 ACPI_SIG_MCHI, ACPI_SIG_SLIC, ACPI_SIG_SPCR, ACPI_SIG_SPMI,
489 ACPI_SIG_TCPA, ACPI_SIG_UEFI, ACPI_SIG_WAET, ACPI_SIG_WDAT,
490 ACPI_SIG_WDDT, ACPI_SIG_WDRT, ACPI_SIG_DSDT, ACPI_SIG_FADT,
491 ACPI_SIG_PSDT, ACPI_SIG_RSDT, ACPI_SIG_XSDT, ACPI_SIG_SSDT,
492 ACPI_SIG_IORT, ACPI_SIG_NFIT, ACPI_SIG_HMAT, ACPI_SIG_PPTT,
493 ACPI_SIG_NHLT };
494
495#define ACPI_HEADER_SIZE sizeof(struct acpi_table_header)
496
497#define NR_ACPI_INITRD_TABLES 64
498static struct cpio_data __initdata acpi_initrd_files[NR_ACPI_INITRD_TABLES];
499static DECLARE_BITMAP(acpi_initrd_installed, NR_ACPI_INITRD_TABLES);
500
501#define MAP_CHUNK_SIZE (NR_FIX_BTMAPS << PAGE_SHIFT)
502
503void __init acpi_table_upgrade(void)
504{
505 void *data;
506 size_t size;
507 int sig, no, table_nr = 0, total_offset = 0;
508 long offset = 0;
509 struct acpi_table_header *table;
510 char cpio_path[32] = "kernel/firmware/acpi/";
511 struct cpio_data file;
512
513 if (IS_ENABLED(CONFIG_ACPI_TABLE_OVERRIDE_VIA_BUILTIN_INITRD)) {
514 data = __initramfs_start;
515 size = __initramfs_size;
516 } else {
517 data = (void *)initrd_start;
518 size = initrd_end - initrd_start;
519 }
520
521 if (data == NULL || size == 0)
522 return;
523
524 for (no = 0; no < NR_ACPI_INITRD_TABLES; no++) {
525 file = find_cpio_data(cpio_path, data, size, &offset);
526 if (!file.data)
527 break;
528
529 data += offset;
530 size -= offset;
531
532 if (file.size < sizeof(struct acpi_table_header)) {
533 pr_err("ACPI OVERRIDE: Table smaller than ACPI header [%s%s]\n",
534 cpio_path, file.name);
535 continue;
536 }
537
538 table = file.data;
539
540 for (sig = 0; sig < ARRAY_SIZE(table_sigs); sig++)
541 if (!memcmp(table->signature, table_sigs[sig], 4))
542 break;
543
544 if (sig >= ARRAY_SIZE(table_sigs)) {
545 pr_err("ACPI OVERRIDE: Unknown signature [%s%s]\n",
546 cpio_path, file.name);
547 continue;
548 }
549 if (file.size != table->length) {
550 pr_err("ACPI OVERRIDE: File length does not match table length [%s%s]\n",
551 cpio_path, file.name);
552 continue;
553 }
554 if (acpi_table_checksum(file.data, table->length)) {
555 pr_err("ACPI OVERRIDE: Bad table checksum [%s%s]\n",
556 cpio_path, file.name);
557 continue;
558 }
559
560 pr_info("%4.4s ACPI table found in initrd [%s%s][0x%x]\n",
561 table->signature, cpio_path, file.name, table->length);
562
563 all_tables_size += table->length;
564 acpi_initrd_files[table_nr].data = file.data;
565 acpi_initrd_files[table_nr].size = file.size;
566 table_nr++;
567 }
568 if (table_nr == 0)
569 return;
570
571 if (security_locked_down(LOCKDOWN_ACPI_TABLES)) {
572 pr_notice("kernel is locked down, ignoring table override\n");
573 return;
574 }
575
576 acpi_tables_addr =
577 memblock_find_in_range(0, ACPI_TABLE_UPGRADE_MAX_PHYS,
578 all_tables_size, PAGE_SIZE);
579 if (!acpi_tables_addr) {
580 WARN_ON(1);
581 return;
582 }
583 /*
584 * Only calling e820_add_reserve does not work and the
585 * tables are invalid (memory got used) later.
586 * memblock_reserve works as expected and the tables won't get modified.
587 * But it's not enough on X86 because ioremap will
588 * complain later (used by acpi_os_map_memory) that the pages
589 * that should get mapped are not marked "reserved".
590 * Both memblock_reserve and e820__range_add (via arch_reserve_mem_area)
591 * works fine.
592 */
593 memblock_reserve(acpi_tables_addr, all_tables_size);
594 arch_reserve_mem_area(acpi_tables_addr, all_tables_size);
595
596 /*
597 * early_ioremap only can remap 256k one time. If we map all
598 * tables one time, we will hit the limit. Need to map chunks
599 * one by one during copying the same as that in relocate_initrd().
600 */
601 for (no = 0; no < table_nr; no++) {
602 unsigned char *src_p = acpi_initrd_files[no].data;
603 phys_addr_t size = acpi_initrd_files[no].size;
604 phys_addr_t dest_addr = acpi_tables_addr + total_offset;
605 phys_addr_t slop, clen;
606 char *dest_p;
607
608 total_offset += size;
609
610 while (size) {
611 slop = dest_addr & ~PAGE_MASK;
612 clen = size;
613 if (clen > MAP_CHUNK_SIZE - slop)
614 clen = MAP_CHUNK_SIZE - slop;
615 dest_p = early_memremap(dest_addr & PAGE_MASK,
616 clen + slop);
617 memcpy(dest_p + slop, src_p, clen);
618 early_memunmap(dest_p, clen + slop);
619 src_p += clen;
620 dest_addr += clen;
621 size -= clen;
622 }
623 }
624}
625
626static acpi_status
627acpi_table_initrd_override(struct acpi_table_header *existing_table,
628 acpi_physical_address *address, u32 *length)
629{
630 int table_offset = 0;
631 int table_index = 0;
632 struct acpi_table_header *table;
633 u32 table_length;
634
635 *length = 0;
636 *address = 0;
637 if (!acpi_tables_addr)
638 return AE_OK;
639
640 while (table_offset + ACPI_HEADER_SIZE <= all_tables_size) {
641 table = acpi_os_map_memory(acpi_tables_addr + table_offset,
642 ACPI_HEADER_SIZE);
643 if (table_offset + table->length > all_tables_size) {
644 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
645 WARN_ON(1);
646 return AE_OK;
647 }
648
649 table_length = table->length;
650
651 /* Only override tables matched */
652 if (memcmp(existing_table->signature, table->signature, 4) ||
653 memcmp(table->oem_id, existing_table->oem_id,
654 ACPI_OEM_ID_SIZE) ||
655 memcmp(table->oem_table_id, existing_table->oem_table_id,
656 ACPI_OEM_TABLE_ID_SIZE)) {
657 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
658 goto next_table;
659 }
660 /*
661 * Mark the table to avoid being used in
662 * acpi_table_initrd_scan() and check the revision.
663 */
664 if (test_and_set_bit(table_index, acpi_initrd_installed) ||
665 existing_table->oem_revision >= table->oem_revision) {
666 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
667 goto next_table;
668 }
669
670 *length = table_length;
671 *address = acpi_tables_addr + table_offset;
672 pr_info("Table Upgrade: override [%4.4s-%6.6s-%8.8s]\n",
673 table->signature, table->oem_id,
674 table->oem_table_id);
675 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
676 break;
677
678next_table:
679 table_offset += table_length;
680 table_index++;
681 }
682 return AE_OK;
683}
684
685static void __init acpi_table_initrd_scan(void)
686{
687 int table_offset = 0;
688 int table_index = 0;
689 u32 table_length;
690 struct acpi_table_header *table;
691
692 if (!acpi_tables_addr)
693 return;
694
695 while (table_offset + ACPI_HEADER_SIZE <= all_tables_size) {
696 table = acpi_os_map_memory(acpi_tables_addr + table_offset,
697 ACPI_HEADER_SIZE);
698 if (table_offset + table->length > all_tables_size) {
699 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
700 WARN_ON(1);
701 return;
702 }
703
704 table_length = table->length;
705
706 /* Skip RSDT/XSDT which should only be used for override */
707 if (ACPI_COMPARE_NAMESEG(table->signature, ACPI_SIG_RSDT) ||
708 ACPI_COMPARE_NAMESEG(table->signature, ACPI_SIG_XSDT)) {
709 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
710 goto next_table;
711 }
712 /*
713 * Mark the table to avoid being used in
714 * acpi_table_initrd_override(). Though this is not possible
715 * because override is disabled in acpi_install_table().
716 */
717 if (test_and_set_bit(table_index, acpi_initrd_installed)) {
718 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
719 goto next_table;
720 }
721
722 pr_info("Table Upgrade: install [%4.4s-%6.6s-%8.8s]\n",
723 table->signature, table->oem_id,
724 table->oem_table_id);
725 acpi_os_unmap_memory(table, ACPI_HEADER_SIZE);
726 acpi_install_table(acpi_tables_addr + table_offset, TRUE);
727next_table:
728 table_offset += table_length;
729 table_index++;
730 }
731}
732#else
733static acpi_status
734acpi_table_initrd_override(struct acpi_table_header *existing_table,
735 acpi_physical_address *address,
736 u32 *table_length)
737{
738 *table_length = 0;
739 *address = 0;
740 return AE_OK;
741}
742
743static void __init acpi_table_initrd_scan(void)
744{
745}
746#endif /* CONFIG_ACPI_TABLE_UPGRADE */
747
748acpi_status
749acpi_os_physical_table_override(struct acpi_table_header *existing_table,
750 acpi_physical_address *address,
751 u32 *table_length)
752{
753 return acpi_table_initrd_override(existing_table, address,
754 table_length);
755}
756
757#ifdef CONFIG_ACPI_CUSTOM_DSDT
758static void *amlcode __attribute__ ((weakref("AmlCode")));
759static void *dsdt_amlcode __attribute__ ((weakref("dsdt_aml_code")));
760#endif
761
762acpi_status acpi_os_table_override(struct acpi_table_header *existing_table,
763 struct acpi_table_header **new_table)
764{
765 if (!existing_table || !new_table)
766 return AE_BAD_PARAMETER;
767
768 *new_table = NULL;
769
770#ifdef CONFIG_ACPI_CUSTOM_DSDT
771 if (!strncmp(existing_table->signature, "DSDT", 4)) {
772 *new_table = (struct acpi_table_header *)&amlcode;
773 if (!(*new_table))
774 *new_table = (struct acpi_table_header *)&dsdt_amlcode;
775 }
776#endif
777 if (*new_table != NULL)
778 acpi_table_taint(existing_table);
779 return AE_OK;
780}
781
782/*
783 * acpi_table_init()
784 *
785 * find RSDP, find and checksum SDT/XSDT.
786 * checksum all tables, print SDT/XSDT
787 *
788 * result: sdt_entry[] is initialized
789 */
790
791int __init acpi_table_init(void)
792{
793 acpi_status status;
794
795 if (acpi_verify_table_checksum) {
796 pr_info("Early table checksum verification enabled\n");
797 acpi_gbl_enable_table_validation = TRUE;
798 } else {
799 pr_info("Early table checksum verification disabled\n");
800 acpi_gbl_enable_table_validation = FALSE;
801 }
802
803 status = acpi_initialize_tables(initial_tables, ACPI_MAX_TABLES, 0);
804 if (ACPI_FAILURE(status))
805 return -EINVAL;
806 acpi_table_initrd_scan();
807
808 check_multiple_madt();
809 return 0;
810}
811
812static int __init acpi_parse_apic_instance(char *str)
813{
814 if (!str)
815 return -EINVAL;
816
817 if (kstrtoint(str, 0, &acpi_apic_instance))
818 return -EINVAL;
819
820 pr_notice("Shall use APIC/MADT table %d\n", acpi_apic_instance);
821
822 return 0;
823}
824early_param("acpi_apic_instance", acpi_parse_apic_instance);
825
826static int __init acpi_force_table_verification_setup(char *s)
827{
828 acpi_verify_table_checksum = true;
829
830 return 0;
831}
832early_param("acpi_force_table_verification", acpi_force_table_verification_setup);
833
834static int __init acpi_force_32bit_fadt_addr(char *s)
835{
836 pr_info("Forcing 32 Bit FADT addresses\n");
837 acpi_gbl_use32_bit_fadt_addresses = TRUE;
838
839 return 0;
840}
841early_param("acpi_force_32bit_fadt_addr", acpi_force_32bit_fadt_addr);
1/*
2 * acpi_tables.c - ACPI Boot-Time Table Parsing
3 *
4 * Copyright (C) 2001 Paul Diefenbaugh <paul.s.diefenbaugh@intel.com>
5 *
6 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
7 *
8 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
19 *
20 */
21
22/* Uncomment next line to get verbose printout */
23/* #define DEBUG */
24#define pr_fmt(fmt) "ACPI: " fmt
25
26#include <linux/init.h>
27#include <linux/kernel.h>
28#include <linux/smp.h>
29#include <linux/string.h>
30#include <linux/types.h>
31#include <linux/irq.h>
32#include <linux/errno.h>
33#include <linux/acpi.h>
34#include <linux/bootmem.h>
35#include "internal.h"
36
37#define ACPI_MAX_TABLES 128
38
39static char *mps_inti_flags_polarity[] = { "dfl", "high", "res", "low" };
40static char *mps_inti_flags_trigger[] = { "dfl", "edge", "res", "level" };
41
42static struct acpi_table_desc initial_tables[ACPI_MAX_TABLES] __initdata;
43
44static int acpi_apic_instance __initdata;
45
46/*
47 * Disable table checksum verification for the early stage due to the size
48 * limitation of the current x86 early mapping implementation.
49 */
50static bool acpi_verify_table_checksum __initdata = false;
51
52void acpi_table_print_madt_entry(struct acpi_subtable_header *header)
53{
54 if (!header)
55 return;
56
57 switch (header->type) {
58
59 case ACPI_MADT_TYPE_LOCAL_APIC:
60 {
61 struct acpi_madt_local_apic *p =
62 (struct acpi_madt_local_apic *)header;
63 pr_debug("LAPIC (acpi_id[0x%02x] lapic_id[0x%02x] %s)\n",
64 p->processor_id, p->id,
65 (p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
66 }
67 break;
68
69 case ACPI_MADT_TYPE_LOCAL_X2APIC:
70 {
71 struct acpi_madt_local_x2apic *p =
72 (struct acpi_madt_local_x2apic *)header;
73 pr_debug("X2APIC (apic_id[0x%02x] uid[0x%02x] %s)\n",
74 p->local_apic_id, p->uid,
75 (p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
76 }
77 break;
78
79 case ACPI_MADT_TYPE_IO_APIC:
80 {
81 struct acpi_madt_io_apic *p =
82 (struct acpi_madt_io_apic *)header;
83 pr_debug("IOAPIC (id[0x%02x] address[0x%08x] gsi_base[%d])\n",
84 p->id, p->address, p->global_irq_base);
85 }
86 break;
87
88 case ACPI_MADT_TYPE_INTERRUPT_OVERRIDE:
89 {
90 struct acpi_madt_interrupt_override *p =
91 (struct acpi_madt_interrupt_override *)header;
92 pr_info("INT_SRC_OVR (bus %d bus_irq %d global_irq %d %s %s)\n",
93 p->bus, p->source_irq, p->global_irq,
94 mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
95 mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2]);
96 if (p->inti_flags &
97 ~(ACPI_MADT_POLARITY_MASK | ACPI_MADT_TRIGGER_MASK))
98 pr_info("INT_SRC_OVR unexpected reserved flags: 0x%x\n",
99 p->inti_flags &
100 ~(ACPI_MADT_POLARITY_MASK | ACPI_MADT_TRIGGER_MASK));
101 }
102 break;
103
104 case ACPI_MADT_TYPE_NMI_SOURCE:
105 {
106 struct acpi_madt_nmi_source *p =
107 (struct acpi_madt_nmi_source *)header;
108 pr_info("NMI_SRC (%s %s global_irq %d)\n",
109 mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
110 mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
111 p->global_irq);
112 }
113 break;
114
115 case ACPI_MADT_TYPE_LOCAL_APIC_NMI:
116 {
117 struct acpi_madt_local_apic_nmi *p =
118 (struct acpi_madt_local_apic_nmi *)header;
119 pr_info("LAPIC_NMI (acpi_id[0x%02x] %s %s lint[0x%x])\n",
120 p->processor_id,
121 mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK ],
122 mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
123 p->lint);
124 }
125 break;
126
127 case ACPI_MADT_TYPE_LOCAL_X2APIC_NMI:
128 {
129 u16 polarity, trigger;
130 struct acpi_madt_local_x2apic_nmi *p =
131 (struct acpi_madt_local_x2apic_nmi *)header;
132
133 polarity = p->inti_flags & ACPI_MADT_POLARITY_MASK;
134 trigger = (p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2;
135
136 pr_info("X2APIC_NMI (uid[0x%02x] %s %s lint[0x%x])\n",
137 p->uid,
138 mps_inti_flags_polarity[polarity],
139 mps_inti_flags_trigger[trigger],
140 p->lint);
141 }
142 break;
143
144 case ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE:
145 {
146 struct acpi_madt_local_apic_override *p =
147 (struct acpi_madt_local_apic_override *)header;
148 pr_info("LAPIC_ADDR_OVR (address[%p])\n",
149 (void *)(unsigned long)p->address);
150 }
151 break;
152
153 case ACPI_MADT_TYPE_IO_SAPIC:
154 {
155 struct acpi_madt_io_sapic *p =
156 (struct acpi_madt_io_sapic *)header;
157 pr_debug("IOSAPIC (id[0x%x] address[%p] gsi_base[%d])\n",
158 p->id, (void *)(unsigned long)p->address,
159 p->global_irq_base);
160 }
161 break;
162
163 case ACPI_MADT_TYPE_LOCAL_SAPIC:
164 {
165 struct acpi_madt_local_sapic *p =
166 (struct acpi_madt_local_sapic *)header;
167 pr_debug("LSAPIC (acpi_id[0x%02x] lsapic_id[0x%02x] lsapic_eid[0x%02x] %s)\n",
168 p->processor_id, p->id, p->eid,
169 (p->lapic_flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
170 }
171 break;
172
173 case ACPI_MADT_TYPE_INTERRUPT_SOURCE:
174 {
175 struct acpi_madt_interrupt_source *p =
176 (struct acpi_madt_interrupt_source *)header;
177 pr_info("PLAT_INT_SRC (%s %s type[0x%x] id[0x%04x] eid[0x%x] iosapic_vector[0x%x] global_irq[0x%x]\n",
178 mps_inti_flags_polarity[p->inti_flags & ACPI_MADT_POLARITY_MASK],
179 mps_inti_flags_trigger[(p->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2],
180 p->type, p->id, p->eid, p->io_sapic_vector,
181 p->global_irq);
182 }
183 break;
184
185 case ACPI_MADT_TYPE_GENERIC_INTERRUPT:
186 {
187 struct acpi_madt_generic_interrupt *p =
188 (struct acpi_madt_generic_interrupt *)header;
189 pr_debug("GICC (acpi_id[0x%04x] address[%llx] MPIDR[0x%llx] %s)\n",
190 p->uid, p->base_address,
191 p->arm_mpidr,
192 (p->flags & ACPI_MADT_ENABLED) ? "enabled" : "disabled");
193
194 }
195 break;
196
197 case ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR:
198 {
199 struct acpi_madt_generic_distributor *p =
200 (struct acpi_madt_generic_distributor *)header;
201 pr_debug("GIC Distributor (gic_id[0x%04x] address[%llx] gsi_base[%d])\n",
202 p->gic_id, p->base_address,
203 p->global_irq_base);
204 }
205 break;
206
207 default:
208 pr_warn("Found unsupported MADT entry (type = 0x%x)\n",
209 header->type);
210 break;
211 }
212}
213
214/**
215 * acpi_parse_entries_array - for each proc_num find a suitable subtable
216 *
217 * @id: table id (for debugging purposes)
218 * @table_size: single entry size
219 * @table_header: where does the table start?
220 * @proc: array of acpi_subtable_proc struct containing entry id
221 * and associated handler with it
222 * @proc_num: how big proc is?
223 * @max_entries: how many entries can we process?
224 *
225 * For each proc_num find a subtable with proc->id and run proc->handler
226 * on it. Assumption is that there's only single handler for particular
227 * entry id.
228 *
229 * On success returns sum of all matching entries for all proc handlers.
230 * Otherwise, -ENODEV or -EINVAL is returned.
231 */
232static int __init
233acpi_parse_entries_array(char *id, unsigned long table_size,
234 struct acpi_table_header *table_header,
235 struct acpi_subtable_proc *proc, int proc_num,
236 unsigned int max_entries)
237{
238 struct acpi_subtable_header *entry;
239 unsigned long table_end;
240 int count = 0;
241 int i;
242
243 if (acpi_disabled)
244 return -ENODEV;
245
246 if (!id)
247 return -EINVAL;
248
249 if (!table_size)
250 return -EINVAL;
251
252 if (!table_header) {
253 pr_warn("%4.4s not present\n", id);
254 return -ENODEV;
255 }
256
257 table_end = (unsigned long)table_header + table_header->length;
258
259 /* Parse all entries looking for a match. */
260
261 entry = (struct acpi_subtable_header *)
262 ((unsigned long)table_header + table_size);
263
264 while (((unsigned long)entry) + sizeof(struct acpi_subtable_header) <
265 table_end) {
266 if (max_entries && count >= max_entries)
267 break;
268
269 for (i = 0; i < proc_num; i++) {
270 if (entry->type != proc[i].id)
271 continue;
272 if (!proc[i].handler ||
273 proc[i].handler(entry, table_end))
274 return -EINVAL;
275
276 proc->count++;
277 break;
278 }
279 if (i != proc_num)
280 count++;
281
282 /*
283 * If entry->length is 0, break from this loop to avoid
284 * infinite loop.
285 */
286 if (entry->length == 0) {
287 pr_err("[%4.4s:0x%02x] Invalid zero length\n", id, proc->id);
288 return -EINVAL;
289 }
290
291 entry = (struct acpi_subtable_header *)
292 ((unsigned long)entry + entry->length);
293 }
294
295 if (max_entries && count > max_entries) {
296 pr_warn("[%4.4s:0x%02x] ignored %i entries of %i found\n",
297 id, proc->id, count - max_entries, count);
298 }
299
300 return count;
301}
302
303int __init
304acpi_parse_entries(char *id,
305 unsigned long table_size,
306 acpi_tbl_entry_handler handler,
307 struct acpi_table_header *table_header,
308 int entry_id, unsigned int max_entries)
309{
310 struct acpi_subtable_proc proc = {
311 .id = entry_id,
312 .handler = handler,
313 };
314
315 return acpi_parse_entries_array(id, table_size, table_header,
316 &proc, 1, max_entries);
317}
318
319int __init
320acpi_table_parse_entries_array(char *id,
321 unsigned long table_size,
322 struct acpi_subtable_proc *proc, int proc_num,
323 unsigned int max_entries)
324{
325 struct acpi_table_header *table_header = NULL;
326 acpi_size tbl_size;
327 int count;
328 u32 instance = 0;
329
330 if (acpi_disabled)
331 return -ENODEV;
332
333 if (!id)
334 return -EINVAL;
335
336 if (!strncmp(id, ACPI_SIG_MADT, 4))
337 instance = acpi_apic_instance;
338
339 acpi_get_table_with_size(id, instance, &table_header, &tbl_size);
340 if (!table_header) {
341 pr_warn("%4.4s not present\n", id);
342 return -ENODEV;
343 }
344
345 count = acpi_parse_entries_array(id, table_size, table_header,
346 proc, proc_num, max_entries);
347
348 early_acpi_os_unmap_memory((char *)table_header, tbl_size);
349 return count;
350}
351
352int __init
353acpi_table_parse_entries(char *id,
354 unsigned long table_size,
355 int entry_id,
356 acpi_tbl_entry_handler handler,
357 unsigned int max_entries)
358{
359 struct acpi_subtable_proc proc = {
360 .id = entry_id,
361 .handler = handler,
362 };
363
364 return acpi_table_parse_entries_array(id, table_size, &proc, 1,
365 max_entries);
366}
367
368int __init
369acpi_table_parse_madt(enum acpi_madt_type id,
370 acpi_tbl_entry_handler handler, unsigned int max_entries)
371{
372 return acpi_table_parse_entries(ACPI_SIG_MADT,
373 sizeof(struct acpi_table_madt), id,
374 handler, max_entries);
375}
376
377/**
378 * acpi_table_parse - find table with @id, run @handler on it
379 * @id: table id to find
380 * @handler: handler to run
381 *
382 * Scan the ACPI System Descriptor Table (STD) for a table matching @id,
383 * run @handler on it.
384 *
385 * Return 0 if table found, -errno if not.
386 */
387int __init acpi_table_parse(char *id, acpi_tbl_table_handler handler)
388{
389 struct acpi_table_header *table = NULL;
390 acpi_size tbl_size;
391
392 if (acpi_disabled)
393 return -ENODEV;
394
395 if (!id || !handler)
396 return -EINVAL;
397
398 if (strncmp(id, ACPI_SIG_MADT, 4) == 0)
399 acpi_get_table_with_size(id, acpi_apic_instance, &table, &tbl_size);
400 else
401 acpi_get_table_with_size(id, 0, &table, &tbl_size);
402
403 if (table) {
404 handler(table);
405 early_acpi_os_unmap_memory(table, tbl_size);
406 return 0;
407 } else
408 return -ENODEV;
409}
410
411/*
412 * The BIOS is supposed to supply a single APIC/MADT,
413 * but some report two. Provide a knob to use either.
414 * (don't you wish instance 0 and 1 were not the same?)
415 */
416static void __init check_multiple_madt(void)
417{
418 struct acpi_table_header *table = NULL;
419 acpi_size tbl_size;
420
421 acpi_get_table_with_size(ACPI_SIG_MADT, 2, &table, &tbl_size);
422 if (table) {
423 pr_warn("BIOS bug: multiple APIC/MADT found, using %d\n",
424 acpi_apic_instance);
425 pr_warn("If \"acpi_apic_instance=%d\" works better, "
426 "notify linux-acpi@vger.kernel.org\n",
427 acpi_apic_instance ? 0 : 2);
428 early_acpi_os_unmap_memory(table, tbl_size);
429
430 } else
431 acpi_apic_instance = 0;
432
433 return;
434}
435
436/*
437 * acpi_table_init()
438 *
439 * find RSDP, find and checksum SDT/XSDT.
440 * checksum all tables, print SDT/XSDT
441 *
442 * result: sdt_entry[] is initialized
443 */
444
445int __init acpi_table_init(void)
446{
447 acpi_status status;
448
449 if (acpi_verify_table_checksum) {
450 pr_info("Early table checksum verification enabled\n");
451 acpi_gbl_verify_table_checksum = TRUE;
452 } else {
453 pr_info("Early table checksum verification disabled\n");
454 acpi_gbl_verify_table_checksum = FALSE;
455 }
456
457 status = acpi_initialize_tables(initial_tables, ACPI_MAX_TABLES, 0);
458 if (ACPI_FAILURE(status))
459 return -EINVAL;
460 acpi_initrd_initialize_tables();
461
462 check_multiple_madt();
463 return 0;
464}
465
466static int __init acpi_parse_apic_instance(char *str)
467{
468 if (!str)
469 return -EINVAL;
470
471 if (kstrtoint(str, 0, &acpi_apic_instance))
472 return -EINVAL;
473
474 pr_notice("Shall use APIC/MADT table %d\n", acpi_apic_instance);
475
476 return 0;
477}
478
479early_param("acpi_apic_instance", acpi_parse_apic_instance);
480
481static int __init acpi_force_table_verification_setup(char *s)
482{
483 acpi_verify_table_checksum = true;
484
485 return 0;
486}
487
488early_param("acpi_force_table_verification", acpi_force_table_verification_setup);
489
490static int __init acpi_force_32bit_fadt_addr(char *s)
491{
492 pr_info("Forcing 32 Bit FADT addresses\n");
493 acpi_gbl_use32_bit_fadt_addresses = TRUE;
494
495 return 0;
496}
497
498early_param("acpi_force_32bit_fadt_addr", acpi_force_32bit_fadt_addr);