xref: /freebsd/usr.sbin/acpi/acpidump/acpi_user.c (revision 2c0d74e8e8303a902498ed62762d4fb008f0c008)
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