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