2 * Copyright (c) 1999 Doug Rabson
3 * Copyright (c) 2000 Mitsuru IWASAKI <iwasaki@FreeBSD.org>
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
9 * 1. Redistributions of source code must retain the above copyright
10 * notice, this list of conditions and the following disclaimer.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
30 #include <sys/param.h>
32 #include <sys/queue.h>
34 #include <sys/sysctl.h>
44 static char machdep_acpi_root[] = "machdep.acpi_root";
45 static int acpi_mem_fd = -1;
47 struct acpi_user_mapping {
48 LIST_ENTRY(acpi_user_mapping) link;
54 LIST_HEAD(acpi_user_mapping_list, acpi_user_mapping) maplist;
60 if (acpi_mem_fd == -1) {
61 acpi_mem_fd = open("/dev/mem", O_RDONLY);
62 if (acpi_mem_fd == -1)
63 err(1, "opening /dev/mem");
68 static struct acpi_user_mapping *
69 acpi_user_find_mapping(vm_offset_t pa, size_t size)
71 struct acpi_user_mapping *map;
73 /* First search for an existing mapping */
74 for (map = LIST_FIRST(&maplist); map; map = LIST_NEXT(map, link)) {
75 if (map->pa <= pa && map->size >= pa + size - map->pa)
79 /* Then create a new one */
80 size = round_page(pa + size) - trunc_page(pa);
82 map = malloc(sizeof(struct acpi_user_mapping));
84 errx(1, "out of memory");
86 map->va = mmap(0, size, PROT_READ, MAP_SHARED, acpi_mem_fd, pa);
88 if ((intptr_t) map->va == -1)
89 err(1, "can't map address");
90 LIST_INSERT_HEAD(&maplist, map, link);
95 static struct ACPIrsdp *
96 acpi_get_rsdp(u_long addr)
101 /* Read in the table signature and check it. */
102 pread(acpi_mem_fd, &rsdp, 8, addr);
103 if (memcmp(rsdp.signature, "RSD PTR ", 8))
106 /* Read the entire table. */
107 pread(acpi_mem_fd, &rsdp, sizeof(rsdp), addr);
109 /* Run the checksum only over the version 1 header. */
110 if (acpi_checksum(&rsdp, 20))
113 /* If the revision is 0, assume a version 1 length. */
114 if (rsdp.revision == 0)
119 /* XXX Should handle ACPI 2.0 RSDP extended checksum here. */
121 return (acpi_map_physical(addr, len));
124 static struct ACPIrsdp *
125 acpi_scan_rsd_ptr(void)
127 #if defined(__i386__)
128 struct ACPIrsdp *rsdp;
132 * On ia32, scan physical memory for the RSD PTR if above failed.
133 * According to section 5.2.2 of the ACPI spec, we only consider
134 * two regions for the base address:
135 * 1. EBDA (1 KB area addressed by the 16 bit pointer at 0x40E
136 * 2. High memory (0xE0000 - 0xFFFFF)
138 addr = RSDP_EBDA_PTR;
139 pread(acpi_mem_fd, &addr, sizeof(uint16_t), addr);
141 end = addr + RSDP_EBDA_SIZE;
142 for (; addr < end; addr += 16)
143 if ((rsdp = acpi_get_rsdp(addr)) != NULL)
145 addr = RSDP_HI_START;
146 end = addr + RSDP_HI_SIZE;
147 for (; addr < end; addr += 16)
148 if ((rsdp = acpi_get_rsdp(addr)) != NULL)
150 #endif /* __i386__ */
158 acpi_find_rsd_ptr(void)
160 struct ACPIrsdp *rsdp;
166 /* Attempt to use sysctl to find RSD PTR record. */
168 if (sysctlbyname(machdep_acpi_root, &addr, &len, NULL, 0) == 0) {
169 if ((rsdp = acpi_get_rsdp(addr)) != NULL)
172 warnx("sysctl %s does not point to RSDP",
176 return (acpi_scan_rsd_ptr());
180 acpi_map_physical(vm_offset_t pa, size_t size)
182 struct acpi_user_mapping *map;
184 map = acpi_user_find_mapping(pa, size);
185 return (map->va + (pa - map->pa));
189 dsdt_load_file(char *infile)
195 if ((acpi_mem_fd = open(infile, O_RDONLY)) == -1)
196 errx(1, "opening %s", infile);
200 if (fstat(acpi_mem_fd, &sb) == -1)
201 errx(1, "fstat %s", infile);
203 dp = mmap(0, sb.st_size, PROT_READ, MAP_PRIVATE, acpi_mem_fd, 0);
205 errx(1, "mmap %s", infile);
207 sdt = (struct ACPIsdt *)dp;
208 if (strncmp(dp, "DSDT", 4) != 0 || acpi_checksum(sdt, sdt->len) != 0)