xref: /openbmc/linux/arch/x86/boot/compressed/acpi.c (revision bcd684aa)
1 // SPDX-License-Identifier: GPL-2.0
2 #define BOOT_CTYPE_H
3 #include "misc.h"
4 #include "error.h"
5 #include "../string.h"
6 
7 #include <linux/numa.h>
8 #include <linux/efi.h>
9 #include <asm/efi.h>
10 
11 /*
12  * Longest parameter of 'acpi=' is 'copy_dsdt', plus an extra '\0'
13  * for termination.
14  */
15 #define MAX_ACPI_ARG_LENGTH 10
16 
17 /*
18  * Immovable memory regions representation. Max amount of memory regions is
19  * MAX_NUMNODES*2.
20  */
21 struct mem_vector immovable_mem[MAX_NUMNODES*2];
22 
23 /*
24  * Search EFI system tables for RSDP.  If both ACPI_20_TABLE_GUID and
25  * ACPI_TABLE_GUID are found, take the former, which has more features.
26  */
27 static acpi_physical_address
28 __efi_get_rsdp_addr(unsigned long config_tables, unsigned int nr_tables,
29 		    bool efi_64)
30 {
31 	acpi_physical_address rsdp_addr = 0;
32 
33 #ifdef CONFIG_EFI
34 	int i;
35 
36 	/* Get EFI tables from systab. */
37 	for (i = 0; i < nr_tables; i++) {
38 		acpi_physical_address table;
39 		efi_guid_t guid;
40 
41 		if (efi_64) {
42 			efi_config_table_64_t *tbl = (efi_config_table_64_t *)config_tables + i;
43 
44 			guid  = tbl->guid;
45 			table = tbl->table;
46 
47 			if (!IS_ENABLED(CONFIG_X86_64) && table >> 32) {
48 				debug_putstr("Error getting RSDP address: EFI config table located above 4GB.\n");
49 				return 0;
50 			}
51 		} else {
52 			efi_config_table_32_t *tbl = (efi_config_table_32_t *)config_tables + i;
53 
54 			guid  = tbl->guid;
55 			table = tbl->table;
56 		}
57 
58 		if (!(efi_guidcmp(guid, ACPI_TABLE_GUID)))
59 			rsdp_addr = table;
60 		else if (!(efi_guidcmp(guid, ACPI_20_TABLE_GUID)))
61 			return table;
62 	}
63 #endif
64 	return rsdp_addr;
65 }
66 
67 /* EFI/kexec support is 64-bit only. */
68 #ifdef CONFIG_X86_64
69 static struct efi_setup_data *get_kexec_setup_data_addr(void)
70 {
71 	struct setup_data *data;
72 	u64 pa_data;
73 
74 	pa_data = boot_params->hdr.setup_data;
75 	while (pa_data) {
76 		data = (struct setup_data *)pa_data;
77 		if (data->type == SETUP_EFI)
78 			return (struct efi_setup_data *)(pa_data + sizeof(struct setup_data));
79 
80 		pa_data = data->next;
81 	}
82 	return NULL;
83 }
84 
85 static acpi_physical_address kexec_get_rsdp_addr(void)
86 {
87 	efi_system_table_64_t *systab;
88 	struct efi_setup_data *esd;
89 	struct efi_info *ei;
90 	char *sig;
91 
92 	esd = (struct efi_setup_data *)get_kexec_setup_data_addr();
93 	if (!esd)
94 		return 0;
95 
96 	if (!esd->tables) {
97 		debug_putstr("Wrong kexec SETUP_EFI data.\n");
98 		return 0;
99 	}
100 
101 	ei = &boot_params->efi_info;
102 	sig = (char *)&ei->efi_loader_signature;
103 	if (strncmp(sig, EFI64_LOADER_SIGNATURE, 4)) {
104 		debug_putstr("Wrong kexec EFI loader signature.\n");
105 		return 0;
106 	}
107 
108 	/* Get systab from boot params. */
109 	systab = (efi_system_table_64_t *) (ei->efi_systab | ((__u64)ei->efi_systab_hi << 32));
110 	if (!systab)
111 		error("EFI system table not found in kexec boot_params.");
112 
113 	return __efi_get_rsdp_addr((unsigned long)esd->tables, systab->nr_tables, true);
114 }
115 #else
116 static acpi_physical_address kexec_get_rsdp_addr(void) { return 0; }
117 #endif /* CONFIG_X86_64 */
118 
119 static acpi_physical_address efi_get_rsdp_addr(void)
120 {
121 #ifdef CONFIG_EFI
122 	unsigned long systab, config_tables;
123 	unsigned int nr_tables;
124 	struct efi_info *ei;
125 	bool efi_64;
126 	char *sig;
127 
128 	ei = &boot_params->efi_info;
129 	sig = (char *)&ei->efi_loader_signature;
130 
131 	if (!strncmp(sig, EFI64_LOADER_SIGNATURE, 4)) {
132 		efi_64 = true;
133 	} else if (!strncmp(sig, EFI32_LOADER_SIGNATURE, 4)) {
134 		efi_64 = false;
135 	} else {
136 		debug_putstr("Wrong EFI loader signature.\n");
137 		return 0;
138 	}
139 
140 	/* Get systab from boot params. */
141 #ifdef CONFIG_X86_64
142 	systab = ei->efi_systab | ((__u64)ei->efi_systab_hi << 32);
143 #else
144 	if (ei->efi_systab_hi || ei->efi_memmap_hi) {
145 		debug_putstr("Error getting RSDP address: EFI system table located above 4GB.\n");
146 		return 0;
147 	}
148 	systab = ei->efi_systab;
149 #endif
150 	if (!systab)
151 		error("EFI system table not found.");
152 
153 	/* Handle EFI bitness properly */
154 	if (efi_64) {
155 		efi_system_table_64_t *stbl = (efi_system_table_64_t *)systab;
156 
157 		config_tables	= stbl->tables;
158 		nr_tables	= stbl->nr_tables;
159 	} else {
160 		efi_system_table_32_t *stbl = (efi_system_table_32_t *)systab;
161 
162 		config_tables	= stbl->tables;
163 		nr_tables	= stbl->nr_tables;
164 	}
165 
166 	if (!config_tables)
167 		error("EFI config tables not found.");
168 
169 	return __efi_get_rsdp_addr(config_tables, nr_tables, efi_64);
170 #else
171 	return 0;
172 #endif
173 }
174 
175 static u8 compute_checksum(u8 *buffer, u32 length)
176 {
177 	u8 *end = buffer + length;
178 	u8 sum = 0;
179 
180 	while (buffer < end)
181 		sum += *(buffer++);
182 
183 	return sum;
184 }
185 
186 /* Search a block of memory for the RSDP signature. */
187 static u8 *scan_mem_for_rsdp(u8 *start, u32 length)
188 {
189 	struct acpi_table_rsdp *rsdp;
190 	u8 *address, *end;
191 
192 	end = start + length;
193 
194 	/* Search from given start address for the requested length */
195 	for (address = start; address < end; address += ACPI_RSDP_SCAN_STEP) {
196 		/*
197 		 * Both RSDP signature and checksum must be correct.
198 		 * Note: Sometimes there exists more than one RSDP in memory;
199 		 * the valid RSDP has a valid checksum, all others have an
200 		 * invalid checksum.
201 		 */
202 		rsdp = (struct acpi_table_rsdp *)address;
203 
204 		/* BAD Signature */
205 		if (!ACPI_VALIDATE_RSDP_SIG(rsdp->signature))
206 			continue;
207 
208 		/* Check the standard checksum */
209 		if (compute_checksum((u8 *)rsdp, ACPI_RSDP_CHECKSUM_LENGTH))
210 			continue;
211 
212 		/* Check extended checksum if table version >= 2 */
213 		if ((rsdp->revision >= 2) &&
214 		    (compute_checksum((u8 *)rsdp, ACPI_RSDP_XCHECKSUM_LENGTH)))
215 			continue;
216 
217 		/* Signature and checksum valid, we have found a real RSDP */
218 		return address;
219 	}
220 	return NULL;
221 }
222 
223 /* Search RSDP address in EBDA. */
224 static acpi_physical_address bios_get_rsdp_addr(void)
225 {
226 	unsigned long address;
227 	u8 *rsdp;
228 
229 	/* Get the location of the Extended BIOS Data Area (EBDA) */
230 	address = *(u16 *)ACPI_EBDA_PTR_LOCATION;
231 	address <<= 4;
232 
233 	/*
234 	 * Search EBDA paragraphs (EBDA is required to be a minimum of
235 	 * 1K length)
236 	 */
237 	if (address > 0x400) {
238 		rsdp = scan_mem_for_rsdp((u8 *)address, ACPI_EBDA_WINDOW_SIZE);
239 		if (rsdp)
240 			return (acpi_physical_address)(unsigned long)rsdp;
241 	}
242 
243 	/* Search upper memory: 16-byte boundaries in E0000h-FFFFFh */
244 	rsdp = scan_mem_for_rsdp((u8 *) ACPI_HI_RSDP_WINDOW_BASE,
245 					ACPI_HI_RSDP_WINDOW_SIZE);
246 	if (rsdp)
247 		return (acpi_physical_address)(unsigned long)rsdp;
248 
249 	return 0;
250 }
251 
252 /* Return RSDP address on success, otherwise 0. */
253 acpi_physical_address get_rsdp_addr(void)
254 {
255 	acpi_physical_address pa;
256 
257 	pa = boot_params->acpi_rsdp_addr;
258 
259 	/*
260 	 * Try to get EFI data from setup_data. This can happen when we're a
261 	 * kexec'ed kernel and kexec(1) has passed all the required EFI info to
262 	 * us.
263 	 */
264 	if (!pa)
265 		pa = kexec_get_rsdp_addr();
266 
267 	if (!pa)
268 		pa = efi_get_rsdp_addr();
269 
270 	if (!pa)
271 		pa = bios_get_rsdp_addr();
272 
273 	return pa;
274 }
275 
276 #if defined(CONFIG_RANDOMIZE_BASE) && defined(CONFIG_MEMORY_HOTREMOVE)
277 /*
278  * Max length of 64-bit hex address string is 19, prefix "0x" + 16 hex
279  * digits, and '\0' for termination.
280  */
281 #define MAX_ADDR_LEN 19
282 
283 static unsigned long get_cmdline_acpi_rsdp(void)
284 {
285 	unsigned long addr = 0;
286 
287 #ifdef CONFIG_KEXEC
288 	char val[MAX_ADDR_LEN] = { };
289 	int ret;
290 
291 	ret = cmdline_find_option("acpi_rsdp", val, MAX_ADDR_LEN);
292 	if (ret < 0)
293 		return 0;
294 
295 	if (boot_kstrtoul(val, 16, &addr))
296 		return 0;
297 #endif
298 	return addr;
299 }
300 
301 /* Compute SRAT address from RSDP. */
302 static unsigned long get_acpi_srat_table(void)
303 {
304 	unsigned long root_table, acpi_table;
305 	struct acpi_table_header *header;
306 	struct acpi_table_rsdp *rsdp;
307 	u32 num_entries, size, len;
308 	char arg[10];
309 	u8 *entry;
310 
311 	/*
312 	 * Check whether we were given an RSDP on the command line. We don't
313 	 * stash this in boot params because the kernel itself may have
314 	 * different ideas about whether to trust a command-line parameter.
315 	 */
316 	rsdp = (struct acpi_table_rsdp *)get_cmdline_acpi_rsdp();
317 	if (!rsdp)
318 		rsdp = (struct acpi_table_rsdp *)(long)
319 			boot_params->acpi_rsdp_addr;
320 
321 	if (!rsdp)
322 		return 0;
323 
324 	/* Get ACPI root table from RSDP.*/
325 	if (!(cmdline_find_option("acpi", arg, sizeof(arg)) == 4 &&
326 	    !strncmp(arg, "rsdt", 4)) &&
327 	    rsdp->xsdt_physical_address &&
328 	    rsdp->revision > 1) {
329 		root_table = rsdp->xsdt_physical_address;
330 		size = ACPI_XSDT_ENTRY_SIZE;
331 	} else {
332 		root_table = rsdp->rsdt_physical_address;
333 		size = ACPI_RSDT_ENTRY_SIZE;
334 	}
335 
336 	if (!root_table)
337 		return 0;
338 
339 	header = (struct acpi_table_header *)root_table;
340 	len = header->length;
341 	if (len < sizeof(struct acpi_table_header) + size)
342 		return 0;
343 
344 	num_entries = (len - sizeof(struct acpi_table_header)) / size;
345 	entry = (u8 *)(root_table + sizeof(struct acpi_table_header));
346 
347 	while (num_entries--) {
348 		if (size == ACPI_RSDT_ENTRY_SIZE)
349 			acpi_table = *(u32 *)entry;
350 		else
351 			acpi_table = *(u64 *)entry;
352 
353 		if (acpi_table) {
354 			header = (struct acpi_table_header *)acpi_table;
355 
356 			if (ACPI_COMPARE_NAMESEG(header->signature, ACPI_SIG_SRAT))
357 				return acpi_table;
358 		}
359 		entry += size;
360 	}
361 	return 0;
362 }
363 
364 /**
365  * count_immovable_mem_regions - Parse SRAT and cache the immovable
366  * memory regions into the immovable_mem array.
367  *
368  * Return the number of immovable memory regions on success, 0 on failure:
369  *
370  * - Too many immovable memory regions
371  * - ACPI off or no SRAT found
372  * - No immovable memory region found.
373  */
374 int count_immovable_mem_regions(void)
375 {
376 	unsigned long table_addr, table_end, table;
377 	struct acpi_subtable_header *sub_table;
378 	struct acpi_table_header *table_header;
379 	char arg[MAX_ACPI_ARG_LENGTH];
380 	int num = 0;
381 
382 	if (cmdline_find_option("acpi", arg, sizeof(arg)) == 3 &&
383 	    !strncmp(arg, "off", 3))
384 		return 0;
385 
386 	table_addr = get_acpi_srat_table();
387 	if (!table_addr)
388 		return 0;
389 
390 	table_header = (struct acpi_table_header *)table_addr;
391 	table_end = table_addr + table_header->length;
392 	table = table_addr + sizeof(struct acpi_table_srat);
393 
394 	while (table + sizeof(struct acpi_subtable_header) < table_end) {
395 
396 		sub_table = (struct acpi_subtable_header *)table;
397 		if (!sub_table->length) {
398 			debug_putstr("Invalid zero length SRAT subtable.\n");
399 			return 0;
400 		}
401 
402 		if (sub_table->type == ACPI_SRAT_TYPE_MEMORY_AFFINITY) {
403 			struct acpi_srat_mem_affinity *ma;
404 
405 			ma = (struct acpi_srat_mem_affinity *)sub_table;
406 			if (!(ma->flags & ACPI_SRAT_MEM_HOT_PLUGGABLE) && ma->length) {
407 				immovable_mem[num].start = ma->base_address;
408 				immovable_mem[num].size = ma->length;
409 				num++;
410 			}
411 
412 			if (num >= MAX_NUMNODES*2) {
413 				debug_putstr("Too many immovable memory regions, aborting.\n");
414 				return 0;
415 			}
416 		}
417 		table += sub_table->length;
418 	}
419 	return num;
420 }
421 #endif /* CONFIG_RANDOMIZE_BASE && CONFIG_MEMORY_HOTREMOVE */
422