2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
4 * Copyright (c) 1999 Doug Rabson
5 * Copyright (c) 2000 Mitsuru IWASAKI <iwasaki@FreeBSD.org>
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
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.
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
32 #include <sys/param.h>
34 #include <sys/queue.h>
36 #include <sys/sysctl.h>
47 static char hint_acpi_0_rsdp[] = "hint.acpi.0.rsdp";
48 static char machdep_acpi_root[] = "machdep.acpi_root";
49 static int acpi_mem_fd = -1;
51 struct acpi_user_mapping {
52 LIST_ENTRY(acpi_user_mapping) link;
58 static LIST_HEAD(acpi_user_mapping_list, acpi_user_mapping) maplist;
64 if (acpi_mem_fd == -1) {
65 acpi_mem_fd = open("/dev/mem", O_RDONLY);
66 if (acpi_mem_fd == -1)
67 err(1, "opening /dev/mem");
72 static struct acpi_user_mapping *
73 acpi_user_find_mapping(vm_offset_t pa, size_t size)
75 struct acpi_user_mapping *map;
77 /* First search for an existing mapping */
78 for (map = LIST_FIRST(&maplist); map; map = LIST_NEXT(map, link)) {
79 if (map->pa <= pa && map->size >= pa + size - map->pa)
83 /* Then create a new one */
84 size = round_page(pa + size) - trunc_page(pa);
86 map = malloc(sizeof(struct acpi_user_mapping));
88 errx(1, "out of memory");
90 map->va = mmap(0, size, PROT_READ, MAP_SHARED, acpi_mem_fd, pa);
92 if ((intptr_t) map->va == -1)
93 err(1, "can't map address");
94 LIST_INSERT_HEAD(&maplist, map, link);
99 static ACPI_TABLE_RSDP *
100 acpi_get_rsdp(u_long addr)
102 ACPI_TABLE_RSDP rsdp;
105 /* Read in the table signature and check it. */
106 pread(acpi_mem_fd, &rsdp, 8, addr);
107 if (memcmp(rsdp.Signature, "RSD PTR ", 8))
110 /* Read the entire table. */
111 pread(acpi_mem_fd, &rsdp, sizeof(rsdp), addr);
113 /* Check the standard checksum. */
114 if (acpi_checksum(&rsdp, ACPI_RSDP_CHECKSUM_LENGTH) != 0)
117 /* Check extended checksum if table version >= 2. */
118 if (rsdp.Revision >= 2 &&
119 acpi_checksum(&rsdp, ACPI_RSDP_XCHECKSUM_LENGTH) != 0)
122 /* If the revision is 0, assume a version 1 length. */
123 if (rsdp.Revision == 0)
124 len = sizeof(ACPI_RSDP_COMMON);
128 return (acpi_map_physical(addr, len));
131 static ACPI_TABLE_RSDP *
132 acpi_scan_rsd_ptr(void)
134 #if defined(__amd64__) || defined(__i386__)
135 ACPI_TABLE_RSDP *rsdp;
139 * On ia32, scan physical memory for the RSD PTR if above failed.
140 * According to section 5.2.2 of the ACPI spec, we only consider
141 * two regions for the base address:
142 * 1. EBDA (1 KB area addressed by the 16 bit pointer at 0x40E
143 * 2. High memory (0xE0000 - 0xFFFFF)
145 addr = ACPI_EBDA_PTR_LOCATION;
146 pread(acpi_mem_fd, &addr, sizeof(uint16_t), addr);
148 end = addr + ACPI_EBDA_WINDOW_SIZE;
149 for (; addr < end; addr += 16)
150 if ((rsdp = acpi_get_rsdp(addr)) != NULL)
152 addr = ACPI_HI_RSDP_WINDOW_BASE;
153 end = addr + ACPI_HI_RSDP_WINDOW_SIZE;
154 for (; addr < end; addr += 16)
155 if ((rsdp = acpi_get_rsdp(addr)) != NULL)
157 #endif /* __amd64__ || __i386__ */
165 acpi_find_rsd_ptr(void)
167 ACPI_TABLE_RSDP *rsdp;
176 /* Attempt to use kenv or sysctl to find RSD PTR record. */
177 if (kenv(KENV_GET, hint_acpi_0_rsdp, buf, 20) > 0)
178 addr = strtoul(buf, NULL, 0);
181 if (sysctlbyname(machdep_acpi_root, &addr, &len, NULL, 0) != 0)
184 if (addr != 0 && (rsdp = acpi_get_rsdp(addr)) != NULL)
187 return (acpi_scan_rsd_ptr());
191 acpi_map_physical(vm_offset_t pa, size_t size)
193 struct acpi_user_mapping *map;
195 map = acpi_user_find_mapping(pa, size);
196 return (map->va + (pa - map->pa));
200 dsdt_load_file(char *infile)
202 ACPI_TABLE_HEADER *sdt;
206 if ((acpi_mem_fd = open(infile, O_RDONLY)) == -1)
207 errx(1, "opening %s", infile);
211 if (fstat(acpi_mem_fd, &sb) == -1)
212 errx(1, "fstat %s", infile);
214 dp = mmap(0, sb.st_size, PROT_READ, MAP_PRIVATE, acpi_mem_fd, 0);
216 errx(1, "mmap %s", infile);
218 sdt = (ACPI_TABLE_HEADER *)dp;
219 if (strncmp(dp, ACPI_SIG_DSDT, 4) != 0 ||
220 acpi_checksum(sdt, sdt->Length) != 0)