1 /*-
2 * Copyright (c) 2001 Mitsuru IWASAKI
3 * Copyright (c) 2015 The FreeBSD Foundation
4 * All rights reserved.
5 *
6 * This software was developed by Andrew Turner under
7 * sponsorship from the FreeBSD Foundation.
8 *
9 * Redistribution and use in source and binary forms, with or without
10 * modification, are permitted provided that the following conditions
11 * are met:
12 * 1. Redistributions of source code must retain the above copyright
13 * notice, this list of conditions and the following disclaimer.
14 * 2. Redistributions in binary form must reproduce the above copyright
15 * notice, this list of conditions and the following disclaimer in the
16 * documentation and/or other materials provided with the distribution.
17 *
18 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 * SUCH DAMAGE.
29 */
30
31 #include <sys/cdefs.h>
32 #include <sys/param.h>
33 #include <sys/bus.h>
34 #include <sys/kernel.h>
35
36 #include <vm/vm.h>
37 #include <vm/pmap.h>
38
39 #include <machine/machdep.h>
40
41 #include <contrib/dev/acpica/include/acpi.h>
42 #include <contrib/dev/acpica/include/accommon.h>
43 #include <contrib/dev/acpica/include/actables.h>
44
45 #include <dev/acpica/acpivar.h>
46
47 extern struct bus_space memmap_bus;
48
49 int
acpi_machdep_init(device_t dev)50 acpi_machdep_init(device_t dev)
51 {
52
53 return (0);
54 }
55
56 int
acpi_machdep_quirks(int * quirks)57 acpi_machdep_quirks(int *quirks)
58 {
59
60 return (0);
61 }
62
63 static void *
map_table(vm_paddr_t pa,const char * sig)64 map_table(vm_paddr_t pa, const char *sig)
65 {
66 ACPI_TABLE_HEADER *header;
67 vm_size_t length;
68 void *table;
69
70 header = pmap_mapbios(pa, sizeof(ACPI_TABLE_HEADER));
71 if (strncmp(header->Signature, sig, ACPI_NAMESEG_SIZE) != 0) {
72 pmap_unmapbios(header, sizeof(ACPI_TABLE_HEADER));
73 return (NULL);
74 }
75 length = header->Length;
76 pmap_unmapbios(header, sizeof(ACPI_TABLE_HEADER));
77
78 table = pmap_mapbios(pa, length);
79 if (ACPI_FAILURE(AcpiUtChecksum(table, length))) {
80 if (bootverbose)
81 printf("ACPI: Failed checksum for table %s\n", sig);
82 #if (ACPI_CHECKSUM_ABORT)
83 pmap_unmapbios(table, length);
84 return (NULL);
85 #endif
86 }
87 return (table);
88 }
89
90 /*
91 * See if a given ACPI table is the requested table. Returns the
92 * length of the table if it matches or zero on failure.
93 */
94 static int
probe_table(vm_paddr_t address,const char * sig)95 probe_table(vm_paddr_t address, const char *sig)
96 {
97 ACPI_TABLE_HEADER *table;
98
99 table = pmap_mapbios(address, sizeof(ACPI_TABLE_HEADER));
100 if (table == NULL) {
101 if (bootverbose)
102 printf("ACPI: Failed to map table at 0x%jx\n",
103 (uintmax_t)address);
104 return (0);
105 }
106
107 if (strncmp(table->Signature, sig, ACPI_NAMESEG_SIZE) != 0) {
108 pmap_unmapbios(table, sizeof(ACPI_TABLE_HEADER));
109 return (0);
110 }
111 pmap_unmapbios(table, sizeof(ACPI_TABLE_HEADER));
112 return (1);
113 }
114
115 /* Unmap a table previously mapped via acpi_map_table(). */
116 void
acpi_unmap_table(void * table)117 acpi_unmap_table(void *table)
118 {
119 ACPI_TABLE_HEADER *header;
120
121 header = (ACPI_TABLE_HEADER *)table;
122 pmap_unmapbios(table, header->Length);
123 }
124
125 /*
126 * Try to map a table at a given physical address previously returned
127 * by acpi_find_table().
128 */
129 void *
acpi_map_table(vm_paddr_t pa,const char * sig)130 acpi_map_table(vm_paddr_t pa, const char *sig)
131 {
132
133 return (map_table(pa, sig));
134 }
135
136 /*
137 * Return the physical address of the requested table or zero if one
138 * is not found.
139 */
140 vm_paddr_t
acpi_find_table(const char * sig)141 acpi_find_table(const char *sig)
142 {
143 ACPI_PHYSICAL_ADDRESS rsdp_ptr;
144 ACPI_TABLE_RSDP *rsdp;
145 ACPI_TABLE_XSDT *xsdt;
146 ACPI_TABLE_HEADER *table;
147 vm_paddr_t addr;
148 int i, count;
149
150 if (resource_disabled("acpi", 0))
151 return (0);
152
153 /*
154 * Map in the RSDP. Since ACPI uses AcpiOsMapMemory() which in turn
155 * calls pmap_mapbios() to find the RSDP, we assume that we can use
156 * pmap_mapbios() to map the RSDP.
157 */
158 if ((rsdp_ptr = AcpiOsGetRootPointer()) == 0)
159 return (0);
160 rsdp = pmap_mapbios(rsdp_ptr, sizeof(ACPI_TABLE_RSDP));
161 if (rsdp == NULL) {
162 printf("ACPI: Failed to map RSDP\n");
163 return (0);
164 }
165
166 addr = 0;
167 if (rsdp->Revision >= 2 && rsdp->XsdtPhysicalAddress != 0) {
168 /*
169 * AcpiOsGetRootPointer only verifies the checksum for
170 * the version 1.0 portion of the RSDP. Version 2.0 has
171 * an additional checksum that we verify first.
172 */
173 if (AcpiUtChecksum((UINT8 *)rsdp, ACPI_RSDP_XCHECKSUM_LENGTH)) {
174 printf("ACPI: RSDP failed extended checksum\n");
175 pmap_unmapbios(rsdp, sizeof(ACPI_TABLE_RSDP));
176 return (0);
177 }
178 xsdt = map_table(rsdp->XsdtPhysicalAddress, ACPI_SIG_XSDT);
179 if (xsdt == NULL) {
180 printf("ACPI: Failed to map XSDT\n");
181 pmap_unmapbios(rsdp, sizeof(ACPI_TABLE_RSDP));
182 return (0);
183 }
184 count = (xsdt->Header.Length - sizeof(ACPI_TABLE_HEADER)) /
185 sizeof(UINT64);
186 for (i = 0; i < count; i++)
187 if (probe_table(xsdt->TableOffsetEntry[i], sig)) {
188 addr = xsdt->TableOffsetEntry[i];
189 break;
190 }
191 acpi_unmap_table(xsdt);
192 } else {
193 printf("ACPI: Unsupported RSDP version %d and XSDT %#lx\n",
194 rsdp->Revision, rsdp->XsdtPhysicalAddress);
195 }
196 pmap_unmapbios(rsdp, sizeof(ACPI_TABLE_RSDP));
197
198 if (addr == 0)
199 return (0);
200
201 /*
202 * Verify that we can map the full table and that its checksum is
203 * correct, etc.
204 */
205 table = map_table(addr, sig);
206 if (table == NULL)
207 return (0);
208 acpi_unmap_table(table);
209
210 return (addr);
211 }
212
213 int
acpi_map_addr(struct acpi_generic_address * addr,bus_space_tag_t * tag,bus_space_handle_t * handle,bus_size_t size)214 acpi_map_addr(struct acpi_generic_address *addr, bus_space_tag_t *tag,
215 bus_space_handle_t *handle, bus_size_t size)
216 {
217 bus_addr_t phys;
218
219 /* Check if the device is Memory mapped */
220 if (addr->SpaceId != 0)
221 return (ENXIO);
222
223 phys = addr->Address;
224 *tag = &memmap_bus;
225
226 return (bus_space_map(*tag, phys, size, 0, handle));
227 }
228
229 #if MAXMEMDOM > 1
230 static void
parse_pxm_tables(void * dummy)231 parse_pxm_tables(void *dummy)
232 {
233 uint64_t mmfr0, parange;
234
235 /* Only parse ACPI tables when booting via ACPI */
236 if (arm64_bus_method != ARM64_BUS_ACPI)
237 return;
238
239 if (!get_kernel_reg(ID_AA64MMFR0_EL1, &mmfr0)) {
240 /* chosen arbitrarily */
241 mmfr0 = ID_AA64MMFR0_PARange_1T;
242 }
243
244 switch (ID_AA64MMFR0_PARange_VAL(mmfr0)) {
245 case ID_AA64MMFR0_PARange_4G:
246 parange = (vm_paddr_t)4 << 30 /* GiB */;
247 break;
248 case ID_AA64MMFR0_PARange_64G:
249 parange = (vm_paddr_t)64 << 30 /* GiB */;
250 break;
251 case ID_AA64MMFR0_PARange_1T:
252 parange = (vm_paddr_t)1 << 40 /* TiB */;
253 break;
254 case ID_AA64MMFR0_PARange_4T:
255 parange = (vm_paddr_t)4 << 40 /* TiB */;
256 break;
257 case ID_AA64MMFR0_PARange_16T:
258 parange = (vm_paddr_t)16 << 40 /* TiB */;
259 break;
260 case ID_AA64MMFR0_PARange_256T:
261 parange = (vm_paddr_t)256 << 40 /* TiB */;
262 break;
263 case ID_AA64MMFR0_PARange_4P:
264 parange = (vm_paddr_t)4 << 50 /* PiB */;
265 break;
266 default:
267 /* chosen arbitrarily */
268 parange = (vm_paddr_t)1 << 40 /* TiB */;
269 printf("Unknown value for PARange in mmfr0 (%#lx)\n", mmfr0);
270 break;
271 }
272
273 acpi_pxm_init(MAXCPU, parange);
274 acpi_pxm_parse_tables();
275 acpi_pxm_set_mem_locality();
276 }
277 SYSINIT(parse_pxm_tables, SI_SUB_VM - 1, SI_ORDER_FIRST, parse_pxm_tables,
278 NULL);
279 #endif
280