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
27 * $FreeBSD: src/usr.sbin/acpi/acpidump/acpi_user.c,v 1.12 2004/05/28 07:25:23 njl Exp $
28 * $DragonFly: src/usr.sbin/acpi/acpidump/acpi_user.c,v 1.1 2004/07/05 02:22:43 dillon Exp $
31 #include <sys/param.h>
33 #include <sys/queue.h>
35 #include <sys/sysctl.h>
45 static char machdep_acpi_root
[] = "machdep.acpi_root";
46 static int acpi_mem_fd
= -1;
48 struct acpi_user_mapping
{
49 LIST_ENTRY(acpi_user_mapping
) link
;
55 LIST_HEAD(acpi_user_mapping_list
, acpi_user_mapping
) maplist
;
61 if (acpi_mem_fd
== -1) {
62 acpi_mem_fd
= open("/dev/mem", O_RDONLY
);
63 if (acpi_mem_fd
== -1)
64 err(1, "opening /dev/mem");
69 static struct acpi_user_mapping
*
70 acpi_user_find_mapping(vm_offset_t pa
, size_t size
)
72 struct acpi_user_mapping
*map
;
74 /* First search for an existing mapping */
75 for (map
= LIST_FIRST(&maplist
); map
; map
= LIST_NEXT(map
, link
)) {
76 if (map
->pa
<= pa
&& map
->size
>= pa
+ size
- map
->pa
)
80 /* Then create a new one */
81 size
= round_page(pa
+ size
) - trunc_page(pa
);
83 map
= malloc(sizeof(struct acpi_user_mapping
));
85 errx(1, "out of memory");
87 map
->va
= mmap(0, size
, PROT_READ
, MAP_SHARED
, acpi_mem_fd
, pa
);
89 if ((intptr_t) map
->va
== -1)
90 err(1, "can't map address");
91 LIST_INSERT_HEAD(&maplist
, map
, link
);
96 static struct ACPIrsdp
*
97 acpi_get_rsdp(u_long addr
)
102 /* Read in the table signature and check it. */
103 pread(acpi_mem_fd
, &rsdp
, 8, addr
);
104 if (memcmp(rsdp
.signature
, "RSD PTR ", 8))
107 /* Read the entire table. */
108 pread(acpi_mem_fd
, &rsdp
, sizeof(rsdp
), addr
);
110 /* Run the checksum only over the version 1 header. */
111 if (acpi_checksum(&rsdp
, 20))
114 /* If the revision is 0, assume a version 1 length. */
115 if (rsdp
.revision
== 0)
120 /* XXX Should handle ACPI 2.0 RSDP extended checksum here. */
122 return (acpi_map_physical(addr
, len
));
125 static struct ACPIrsdp
*
126 acpi_scan_rsd_ptr(void)
128 #if defined(__i386__)
129 struct ACPIrsdp
*rsdp
;
133 * On ia32, scan physical memory for the RSD PTR if above failed.
134 * According to section 5.2.2 of the ACPI spec, we only consider
135 * two regions for the base address:
136 * 1. EBDA (1 KB area addressed by the 16 bit pointer at 0x40E
137 * 2. High memory (0xE0000 - 0xFFFFF)
139 addr
= RSDP_EBDA_PTR
;
140 pread(acpi_mem_fd
, &addr
, sizeof(uint16_t), addr
);
142 end
= addr
+ RSDP_EBDA_SIZE
;
143 for (; addr
< end
; addr
+= 16)
144 if ((rsdp
= acpi_get_rsdp(addr
)) != NULL
)
146 addr
= RSDP_HI_START
;
147 end
= addr
+ RSDP_HI_SIZE
;
148 for (; addr
< end
; addr
+= 16)
149 if ((rsdp
= acpi_get_rsdp(addr
)) != NULL
)
151 #endif /* __i386__ */
159 acpi_find_rsd_ptr(void)
161 struct ACPIrsdp
*rsdp
;
167 /* Attempt to use sysctl to find RSD PTR record. */
169 if (sysctlbyname(machdep_acpi_root
, &addr
, &len
, NULL
, 0) == 0) {
170 if ((rsdp
= acpi_get_rsdp(addr
)) != NULL
)
173 warnx("sysctl %s does not point to RSDP",
177 return (acpi_scan_rsd_ptr());
181 acpi_map_physical(vm_offset_t pa
, size_t size
)
183 struct acpi_user_mapping
*map
;
185 map
= acpi_user_find_mapping(pa
, size
);
186 return (map
->va
+ (pa
- map
->pa
));
190 dsdt_load_file(char *infile
)
196 if ((acpi_mem_fd
= open(infile
, O_RDONLY
)) == -1)
197 errx(1, "opening %s", infile
);
201 if (fstat(acpi_mem_fd
, &sb
) == -1)
202 errx(1, "fstat %s", infile
);
204 dp
= mmap(0, sb
.st_size
, PROT_READ
, MAP_PRIVATE
, acpi_mem_fd
, 0);
206 errx(1, "mmap %s", infile
);
208 sdt
= (struct ACPIsdt
*)dp
;
209 if (strncmp(dp
, "DSDT", 4) != 0 || acpi_checksum(sdt
, sdt
->len
) != 0)