1e1e9a4bfSMitsuru IWASAKI /*- 2e1e9a4bfSMitsuru IWASAKI * Copyright (c) 1999 Doug Rabson 3e1e9a4bfSMitsuru IWASAKI * Copyright (c) 2000 Mitsuru IWASAKI <iwasaki@FreeBSD.org> 4e1e9a4bfSMitsuru IWASAKI * All rights reserved. 5e1e9a4bfSMitsuru IWASAKI * 6e1e9a4bfSMitsuru IWASAKI * Redistribution and use in source and binary forms, with or without 7e1e9a4bfSMitsuru IWASAKI * modification, are permitted provided that the following conditions 8e1e9a4bfSMitsuru IWASAKI * are met: 9e1e9a4bfSMitsuru IWASAKI * 1. Redistributions of source code must retain the above copyright 10e1e9a4bfSMitsuru IWASAKI * notice, this list of conditions and the following disclaimer. 11e1e9a4bfSMitsuru IWASAKI * 2. Redistributions in binary form must reproduce the above copyright 12e1e9a4bfSMitsuru IWASAKI * notice, this list of conditions and the following disclaimer in the 13e1e9a4bfSMitsuru IWASAKI * documentation and/or other materials provided with the distribution. 14e1e9a4bfSMitsuru IWASAKI * 15e1e9a4bfSMitsuru IWASAKI * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 16e1e9a4bfSMitsuru IWASAKI * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 17e1e9a4bfSMitsuru IWASAKI * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 18e1e9a4bfSMitsuru IWASAKI * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 19e1e9a4bfSMitsuru IWASAKI * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 20e1e9a4bfSMitsuru IWASAKI * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 21e1e9a4bfSMitsuru IWASAKI * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 22e1e9a4bfSMitsuru IWASAKI * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 23e1e9a4bfSMitsuru IWASAKI * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 24e1e9a4bfSMitsuru IWASAKI * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 25e1e9a4bfSMitsuru IWASAKI * SUCH DAMAGE. 26e1e9a4bfSMitsuru IWASAKI * 27e1e9a4bfSMitsuru IWASAKI * $FreeBSD$ 28e1e9a4bfSMitsuru IWASAKI */ 29e1e9a4bfSMitsuru IWASAKI 30e1e9a4bfSMitsuru IWASAKI #include <sys/param.h> 31e1e9a4bfSMitsuru IWASAKI #include <sys/mman.h> 32e1e9a4bfSMitsuru IWASAKI #include <sys/queue.h> 33e1e9a4bfSMitsuru IWASAKI #include <sys/stat.h> 34945137d9SNate Lawson #include <sys/sysctl.h> 35e1e9a4bfSMitsuru IWASAKI 36e1e9a4bfSMitsuru IWASAKI #include <err.h> 37e1e9a4bfSMitsuru IWASAKI #include <fcntl.h> 38e1e9a4bfSMitsuru IWASAKI #include <stdlib.h> 39e1e9a4bfSMitsuru IWASAKI #include <string.h> 40e1e9a4bfSMitsuru IWASAKI #include <unistd.h> 41e1e9a4bfSMitsuru IWASAKI 42e1e9a4bfSMitsuru IWASAKI #include "acpidump.h" 43e1e9a4bfSMitsuru IWASAKI 4400d30537SMarcel Moolenaar static char machdep_acpi_root[] = "machdep.acpi_root"; 45e1e9a4bfSMitsuru IWASAKI static int acpi_mem_fd = -1; 46e1e9a4bfSMitsuru IWASAKI 47e1e9a4bfSMitsuru IWASAKI struct acpi_user_mapping { 48e1e9a4bfSMitsuru IWASAKI LIST_ENTRY(acpi_user_mapping) link; 49e1e9a4bfSMitsuru IWASAKI vm_offset_t pa; 50e1e9a4bfSMitsuru IWASAKI caddr_t va; 51e1e9a4bfSMitsuru IWASAKI size_t size; 52e1e9a4bfSMitsuru IWASAKI }; 53e1e9a4bfSMitsuru IWASAKI 54e1e9a4bfSMitsuru IWASAKI LIST_HEAD(acpi_user_mapping_list, acpi_user_mapping) maplist; 55e1e9a4bfSMitsuru IWASAKI 56e1e9a4bfSMitsuru IWASAKI static void 57945137d9SNate Lawson acpi_user_init(void) 58e1e9a4bfSMitsuru IWASAKI { 59e1e9a4bfSMitsuru IWASAKI 60e1e9a4bfSMitsuru IWASAKI if (acpi_mem_fd == -1) { 61e1e9a4bfSMitsuru IWASAKI acpi_mem_fd = open("/dev/mem", O_RDONLY); 62e1e9a4bfSMitsuru IWASAKI if (acpi_mem_fd == -1) 63e1e9a4bfSMitsuru IWASAKI err(1, "opening /dev/mem"); 64e1e9a4bfSMitsuru IWASAKI LIST_INIT(&maplist); 65e1e9a4bfSMitsuru IWASAKI } 66e1e9a4bfSMitsuru IWASAKI } 67e1e9a4bfSMitsuru IWASAKI 68e1e9a4bfSMitsuru IWASAKI static struct acpi_user_mapping * 69e1e9a4bfSMitsuru IWASAKI acpi_user_find_mapping(vm_offset_t pa, size_t size) 70e1e9a4bfSMitsuru IWASAKI { 71e1e9a4bfSMitsuru IWASAKI struct acpi_user_mapping *map; 72e1e9a4bfSMitsuru IWASAKI 73e1e9a4bfSMitsuru IWASAKI /* First search for an existing mapping */ 74e1e9a4bfSMitsuru IWASAKI for (map = LIST_FIRST(&maplist); map; map = LIST_NEXT(map, link)) { 75e1e9a4bfSMitsuru IWASAKI if (map->pa <= pa && map->size >= pa + size - map->pa) 76e1e9a4bfSMitsuru IWASAKI return (map); 77e1e9a4bfSMitsuru IWASAKI } 78e1e9a4bfSMitsuru IWASAKI 79e1e9a4bfSMitsuru IWASAKI /* Then create a new one */ 80e1e9a4bfSMitsuru IWASAKI size = round_page(pa + size) - trunc_page(pa); 81e1e9a4bfSMitsuru IWASAKI pa = trunc_page(pa); 82e1e9a4bfSMitsuru IWASAKI map = malloc(sizeof(struct acpi_user_mapping)); 83e1e9a4bfSMitsuru IWASAKI if (!map) 84e1e9a4bfSMitsuru IWASAKI errx(1, "out of memory"); 85e1e9a4bfSMitsuru IWASAKI map->pa = pa; 86e1e9a4bfSMitsuru IWASAKI map->va = mmap(0, size, PROT_READ, MAP_SHARED, acpi_mem_fd, pa); 87e1e9a4bfSMitsuru IWASAKI map->size = size; 88e1e9a4bfSMitsuru IWASAKI if ((intptr_t) map->va == -1) 89e1e9a4bfSMitsuru IWASAKI err(1, "can't map address"); 90e1e9a4bfSMitsuru IWASAKI LIST_INSERT_HEAD(&maplist, map, link); 91e1e9a4bfSMitsuru IWASAKI 92e1e9a4bfSMitsuru IWASAKI return (map); 93e1e9a4bfSMitsuru IWASAKI } 94e1e9a4bfSMitsuru IWASAKI 958fc0f4c6SNate Lawson static struct ACPIrsdp * 968fc0f4c6SNate Lawson acpi_get_rsdp(u_long addr) 978fc0f4c6SNate Lawson { 988fc0f4c6SNate Lawson struct ACPIrsdp rsdp; 9907c8b2afSNate Lawson size_t len; 1008fc0f4c6SNate Lawson 1012ff84d14SNate Lawson /* Read in the table signature and check it. */ 1028fc0f4c6SNate Lawson pread(acpi_mem_fd, &rsdp, 8, addr); 1038fc0f4c6SNate Lawson if (memcmp(rsdp.signature, "RSD PTR ", 8)) 1048fc0f4c6SNate Lawson return (NULL); 1052ff84d14SNate Lawson 1068fc0f4c6SNate Lawson /* Read the entire table. */ 1072ff84d14SNate Lawson pread(acpi_mem_fd, &rsdp, sizeof(rsdp), addr); 1082ff84d14SNate Lawson 1092ff84d14SNate Lawson /* Run the checksum only over the version 1 header. */ 1102ff84d14SNate Lawson if (acpi_checksum(&rsdp, 20)) 1118fc0f4c6SNate Lawson return (NULL); 11207c8b2afSNate Lawson 11307c8b2afSNate Lawson /* If the revision is 0, assume a version 1 length. */ 1142ff84d14SNate Lawson if (rsdp.revision == 0) 11507c8b2afSNate Lawson len = 20; 11607c8b2afSNate Lawson else 11707c8b2afSNate Lawson len = rsdp.length; 1182ff84d14SNate Lawson 1192ff84d14SNate Lawson /* XXX Should handle ACPI 2.0 RSDP extended checksum here. */ 1202ff84d14SNate Lawson 12107c8b2afSNate Lawson return (acpi_map_physical(addr, len)); 1228fc0f4c6SNate Lawson } 1238fc0f4c6SNate Lawson 1242c0d74e8SNate Lawson static struct ACPIrsdp * 1252c0d74e8SNate Lawson acpi_scan_rsd_ptr(void) 1262c0d74e8SNate Lawson { 1272c0d74e8SNate Lawson #if defined(__i386__) 1282c0d74e8SNate Lawson struct ACPIrsdp *rsdp; 1292c0d74e8SNate Lawson u_long addr, end; 1302c0d74e8SNate Lawson 1312c0d74e8SNate Lawson /* 1322c0d74e8SNate Lawson * On ia32, scan physical memory for the RSD PTR if above failed. 1332c0d74e8SNate Lawson * According to section 5.2.2 of the ACPI spec, we only consider 1342c0d74e8SNate Lawson * two regions for the base address: 1352c0d74e8SNate Lawson * 1. EBDA (1 KB area addressed by the 16 bit pointer at 0x40E 1362c0d74e8SNate Lawson * 2. High memory (0xE0000 - 0xFFFFF) 1372c0d74e8SNate Lawson */ 1382c0d74e8SNate Lawson addr = RSDP_EBDA_PTR; 1392c0d74e8SNate Lawson pread(acpi_mem_fd, &addr, sizeof(uint16_t), addr); 1402c0d74e8SNate Lawson addr <<= 4; 1412c0d74e8SNate Lawson end = addr + RSDP_EBDA_SIZE; 1422c0d74e8SNate Lawson for (; addr < end; addr += 16) 1432c0d74e8SNate Lawson if ((rsdp = acpi_get_rsdp(addr)) != NULL) 1442c0d74e8SNate Lawson return (rsdp); 1452c0d74e8SNate Lawson for (addr = RSDP_HI_START; addr < RSDP_HI_END; addr += 16) 1462c0d74e8SNate Lawson if ((rsdp = acpi_get_rsdp(addr)) != NULL) 1472c0d74e8SNate Lawson return (rsdp); 1482c0d74e8SNate Lawson #endif /* __i386__ */ 1492c0d74e8SNate Lawson return (NULL); 1502c0d74e8SNate Lawson } 1512c0d74e8SNate Lawson 152e1e9a4bfSMitsuru IWASAKI /* 153e1e9a4bfSMitsuru IWASAKI * Public interfaces 154e1e9a4bfSMitsuru IWASAKI */ 155e1e9a4bfSMitsuru IWASAKI struct ACPIrsdp * 156476daaecSDag-Erling Smørgrav acpi_find_rsd_ptr(void) 157e1e9a4bfSMitsuru IWASAKI { 1588fc0f4c6SNate Lawson struct ACPIrsdp *rsdp; 15900d30537SMarcel Moolenaar u_long addr; 160945137d9SNate Lawson size_t len; 161e1e9a4bfSMitsuru IWASAKI 162e1e9a4bfSMitsuru IWASAKI acpi_user_init(); 163e1e9a4bfSMitsuru IWASAKI 1648fc0f4c6SNate Lawson /* Attempt to use sysctl to find RSD PTR record. */ 16500d30537SMarcel Moolenaar len = sizeof(addr); 16600d30537SMarcel Moolenaar if (sysctlbyname(machdep_acpi_root, &addr, &len, NULL, 0) == 0) { 1678fc0f4c6SNate Lawson if ((rsdp = acpi_get_rsdp(addr)) != NULL) 1688fc0f4c6SNate Lawson return (rsdp); 1698fc0f4c6SNate Lawson else 1708fc0f4c6SNate Lawson warnx("sysctl %s does not point to RSDP", 17100d30537SMarcel Moolenaar machdep_acpi_root); 17200d30537SMarcel Moolenaar } 17300d30537SMarcel Moolenaar 1742c0d74e8SNate Lawson return (acpi_scan_rsd_ptr()); 175e1e9a4bfSMitsuru IWASAKI } 176e1e9a4bfSMitsuru IWASAKI 177e1e9a4bfSMitsuru IWASAKI void * 178e1e9a4bfSMitsuru IWASAKI acpi_map_physical(vm_offset_t pa, size_t size) 179e1e9a4bfSMitsuru IWASAKI { 180e1e9a4bfSMitsuru IWASAKI struct acpi_user_mapping *map; 181e1e9a4bfSMitsuru IWASAKI 182e1e9a4bfSMitsuru IWASAKI map = acpi_user_find_mapping(pa, size); 183e1e9a4bfSMitsuru IWASAKI return (map->va + (pa - map->pa)); 184e1e9a4bfSMitsuru IWASAKI } 185e1e9a4bfSMitsuru IWASAKI 186945137d9SNate Lawson struct ACPIsdt * 187945137d9SNate Lawson dsdt_load_file(char *infile) 188e1e9a4bfSMitsuru IWASAKI { 189945137d9SNate Lawson struct ACPIsdt *sdt; 190945137d9SNate Lawson uint8_t *dp; 191e1e9a4bfSMitsuru IWASAKI struct stat sb; 192e1e9a4bfSMitsuru IWASAKI 193945137d9SNate Lawson if ((acpi_mem_fd = open(infile, O_RDONLY)) == -1) 194945137d9SNate Lawson errx(1, "opening %s", infile); 195e1e9a4bfSMitsuru IWASAKI 196e1e9a4bfSMitsuru IWASAKI LIST_INIT(&maplist); 197e1e9a4bfSMitsuru IWASAKI 198945137d9SNate Lawson if (fstat(acpi_mem_fd, &sb) == -1) 199945137d9SNate Lawson errx(1, "fstat %s", infile); 200e1e9a4bfSMitsuru IWASAKI 201e1e9a4bfSMitsuru IWASAKI dp = mmap(0, sb.st_size, PROT_READ, MAP_PRIVATE, acpi_mem_fd, 0); 202945137d9SNate Lawson if (dp == NULL) 203945137d9SNate Lawson errx(1, "mmap %s", infile); 204e1e9a4bfSMitsuru IWASAKI 205945137d9SNate Lawson sdt = (struct ACPIsdt *)dp; 206945137d9SNate Lawson if (strncmp(dp, "DSDT", 4) != 0 || acpi_checksum(sdt, sdt->len) != 0) 207945137d9SNate Lawson return (NULL); 208e1e9a4bfSMitsuru IWASAKI 209945137d9SNate Lawson return (sdt); 210e1e9a4bfSMitsuru IWASAKI } 211