acpi_user.c revision 65286 
1/*-
2 * Copyright (c) 1999 Doug Rabson
3 * Copyright (c) 2000 Mitsuru IWASAKI <iwasaki@FreeBSD.org>
4 * All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without
7 * modification, are permitted provided that the following conditions
8 * are met:
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.
14 *
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
25 * SUCH DAMAGE.
26 *
27 *	$Id: acpi_user.c,v 1.5 2000/08/09 14:47:52 iwasaki Exp $
28 *	$FreeBSD: head/usr.sbin/acpi/acpidump/acpi_user.c 65286 2000-08-31 14:42:32Z iwasaki $
29 */
30
31#include <sys/param.h>
32#include <sys/mman.h>
33#include <sys/queue.h>
34#include <sys/stat.h>
35#include <sys/acpi.h>
36
37#include <err.h>
38#include <fcntl.h>
39#include <stdlib.h>
40#include <string.h>
41#include <unistd.h>
42
43#include "acpidump.h"
44
45static int      acpi_mem_fd = -1;
46
47struct acpi_user_mapping {
48	LIST_ENTRY(acpi_user_mapping) link;
49	vm_offset_t     pa;
50	caddr_t         va;
51	size_t          size;
52};
53
54LIST_HEAD(acpi_user_mapping_list, acpi_user_mapping) maplist;
55
56static void
57acpi_user_init()
58{
59
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");
64		LIST_INIT(&maplist);
65	}
66}
67
68static struct acpi_user_mapping *
69acpi_user_find_mapping(vm_offset_t pa, size_t size)
70{
71	struct	acpi_user_mapping *map;
72
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)
76			return (map);
77	}
78
79	/* Then create a new one */
80	size = round_page(pa + size) - trunc_page(pa);
81	pa = trunc_page(pa);
82	map = malloc(sizeof(struct acpi_user_mapping));
83	if (!map)
84		errx(1, "out of memory");
85	map->pa = pa;
86	map->va = mmap(0, size, PROT_READ, MAP_SHARED, acpi_mem_fd, pa);
87	map->size = size;
88	if ((intptr_t) map->va == -1)
89		err(1, "can't map address");
90	LIST_INSERT_HEAD(&maplist, map, link);
91
92	return (map);
93}
94
95/*
96 * Public interfaces
97 */
98
99struct ACPIrsdp *
100acpi_find_rsd_ptr()
101{
102	int		i;
103	u_int8_t	buf[sizeof(struct ACPIrsdp)];
104
105	acpi_user_init();
106	for (i = 0; i < 1024 * 1024; i += 16) {
107		read(acpi_mem_fd, buf, 16);
108		if (!memcmp(buf, "RSD PTR ", 8)) {
109			/* Read the rest of the structure */
110			read(acpi_mem_fd, buf + 16, sizeof(struct ACPIrsdp) - 16);
111
112			/* Verify checksum before accepting it. */
113			if (acpi_checksum(buf, sizeof(struct ACPIrsdp)))
114				continue;
115			return (acpi_map_physical(i, sizeof(struct ACPIrsdp)));
116		}
117	}
118
119	return (0);
120}
121
122void *
123acpi_map_physical(vm_offset_t pa, size_t size)
124{
125	struct	acpi_user_mapping *map;
126
127	map = acpi_user_find_mapping(pa, size);
128	return (map->va + (pa - map->pa));
129}
130
131void
132acpi_load_dsdt(char *dumpfile, u_int8_t **dpp, u_int8_t **endp)
133{
134	u_int8_t	*dp;
135	u_int8_t	*end;
136	struct	stat sb;
137
138	if ((acpi_mem_fd = open(dumpfile, O_RDONLY)) == -1) {
139		errx(1, "opening %s\n", dumpfile);
140	}
141
142	LIST_INIT(&maplist);
143
144	if (fstat(acpi_mem_fd, &sb) == -1) {
145		errx(1, "fstat %s\n", dumpfile);
146	}
147
148	dp = mmap(0, sb.st_size, PROT_READ, MAP_PRIVATE, acpi_mem_fd, 0);
149	if (dp == NULL) {
150		errx(1, "mmap %s\n", dumpfile);
151	}
152
153	/*
154	 * Microsoft asl.exe generates 0x23 byte additional info.
155	 * at the begining of the file, so just ignore it.
156	 */
157        if (strncmp(dp, "DSDT", 4) == 0) {
158                dp += 0x23;
159		sb.st_size -= 0x23;
160        }
161
162	end = (u_int8_t *) dp + sb.st_size;
163	*dpp = dp;
164	*endp = end;
165}
166