WebSVN – HelenOS – Diff – /branches/dynload/kernel/genarch/src/acpi/acpi.c


/*
 * Copyright (c) 2005 Jakub Jermar
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 *
 * - Redistributions of source code must retain the above copyright
 *   notice, this list of conditions and the following disclaimer.
 * - Redistributions in binary form must reproduce the above copyright
 *   notice, this list of conditions and the following disclaimer in the
 *   documentation and/or other materials provided with the distribution.
 * - The name of the author may not be used to endorse or promote products
 *   derived from this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 */
 
/** @addtogroup genarch
 * @{
 */
 
/**
 * @file
 * @brief   Advanced Configuration and Power Interface (ACPI) initialization.
 */
 
#include <genarch/acpi/acpi.h>
#include <genarch/acpi/madt.h>
#include <arch/bios/bios.h>
#include <mm/as.h>
#include <mm/page.h>
#include <print.h>
 
#define RSDP_SIGNATURE      "RSD PTR "
#define RSDP_REVISION_OFFS  15
 
struct acpi_rsdp *acpi_rsdp = NULL;
struct acpi_rsdt *acpi_rsdt = NULL;
struct acpi_xsdt *acpi_xsdt = NULL;
 
struct acpi_signature_map signature_map[] = {
    {
        (uint8_t *) "APIC",
        (void *) &acpi_madt,
        "Multiple APIC Description Table"
    }
};
 
static int rsdp_check(uint8_t *rsdp) {
    struct acpi_rsdp *r = (struct acpi_rsdp *) rsdp;
    uint8_t sum = 0;
    unsigned int i;
   
    for (i = 0; i < 20; i++)
        sum = (uint8_t) (sum + rsdp[i]);
       
    if (sum)   
        return 0; /* bad checksum */
 
    if (r->revision == 0)
        return 1; /* ACPI 1.0 */
       
    for (; i < r->length; i++)
        sum = (uint8_t) (sum + rsdp[i]);
       
    return !sum;
   
}
 
int acpi_sdt_check(uint8_t *sdt)
{
    struct acpi_sdt_header *h = (struct acpi_sdt_header *) sdt;
    uint8_t sum = 0;
    unsigned int i;
 
    for (i = 0; i < h->length; i++)
        sum = (uint8_t) (sum + sdt[i]);
       
    return !sum;
}
 
static void map_sdt(struct acpi_sdt_header *sdt)
{
    page_mapping_insert(AS_KERNEL, (uintptr_t) sdt, (uintptr_t) sdt, PAGE_NOT_CACHEABLE | PAGE_WRITE);
    map_structure((uintptr_t) sdt, sdt->length);
}
 
static void configure_via_rsdt(void)
{
    unsigned int i, j, cnt = (acpi_rsdt->header.length - sizeof(struct acpi_sdt_header)) / sizeof(uint32_t);
   
    for (i = 0; i < cnt; i++) {
        for (j = 0; j < sizeof(signature_map) / sizeof(struct acpi_signature_map); j++) {
            struct acpi_sdt_header *h = (struct acpi_sdt_header *) (unative_t) acpi_rsdt->entry[i];
       
            map_sdt(h);
            if (*((uint32_t *) &h->signature[0]) == *((uint32_t *) &signature_map[j].signature[0])) {
                if (!acpi_sdt_check((uint8_t *) h))
                    goto next;
                *signature_map[j].sdt_ptr = h;
                LOG("%p: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);
            }
        }
next:
        ;
    }
}
 
static void configure_via_xsdt(void)
{
    unsigned int i, j, cnt = (acpi_xsdt->header.length - sizeof(struct acpi_sdt_header)) / sizeof(uint64_t);
   
    for (i = 0; i < cnt; i++) {
        for (j = 0; j < sizeof(signature_map) / sizeof(struct acpi_signature_map); j++) {
            struct acpi_sdt_header *h = (struct acpi_sdt_header *) ((uintptr_t) acpi_rsdt->entry[i]);
 
            map_sdt(h);
            if (*((uint32_t *) &h->signature[0]) == *((uint32_t *) &signature_map[j].signature[0])) {
                if (!acpi_sdt_check((uint8_t *) h))
                    goto next;
                *signature_map[j].sdt_ptr = h;
                LOG("%p: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);
            }
        }
next:
        ;
    }
 
}
 
void acpi_init(void)
{
    uint8_t *addr[2] = { NULL, (uint8_t *) PA2KA(0xe0000) };
    int i, j, length[2] = { 1024, 128*1024 };
    uint64_t *sig = (uint64_t *) RSDP_SIGNATURE;
 
    /*
     * Find Root System Description Pointer
     * 1. search first 1K of EBDA
     * 2. search 128K starting at 0xe0000
     */
 
    addr[0] = (uint8_t *) PA2KA(ebda);
    for (i = (ebda ? 0 : 1); i < 2; i++) {
        for (j = 0; j < length[i]; j += 16) {
            if (*((uint64_t *) &addr[i][j]) == *sig && rsdp_check(&addr[i][j])) {
                acpi_rsdp = (struct acpi_rsdp *) &addr[i][j];
                goto rsdp_found;
            }
        }
    }
 
    return;
 
rsdp_found:
    LOG("%p: ACPI Root System Description Pointer\n", acpi_rsdp);
 
    acpi_rsdt = (struct acpi_rsdt *) (unative_t) acpi_rsdp->rsdt_address;
    if (acpi_rsdp->revision) acpi_xsdt = (struct acpi_xsdt *) ((uintptr_t) acpi_rsdp->xsdt_address);
 
    if (acpi_rsdt) map_sdt((struct acpi_sdt_header *) acpi_rsdt);
    if (acpi_xsdt) map_sdt((struct acpi_sdt_header *) acpi_xsdt);  
 
    if (acpi_rsdt && !acpi_sdt_check((uint8_t *) acpi_rsdt)) {
        printf("RSDT: bad checksum\n");
        return;
    }
    if (acpi_xsdt && !acpi_sdt_check((uint8_t *) acpi_xsdt)) {
        printf("XSDT: bad checksum\n");
        return;
    }
 
    if (acpi_xsdt) configure_via_xsdt();
    else if (acpi_rsdt) configure_via_rsdt();
 
}
 
/** @}
 */
 

Subversion Repositories HelenOS

(root)/branches/dynload/kernel/genarch/src/acpi/acpi.c @ 4758 – Rev 3149 → 4337

Rev 3149		Rev 4337
1	/*	1	/*
2	* Copyright (c) 2005 Jakub Jermar	2	* Copyright (c) 2005 Jakub Jermar
3	* All rights reserved.	3	* All rights reserved.
4	*	4	*
5	* Redistribution and use in source and binary forms, with or without	5	* Redistribution and use in source and binary forms, with or without
6	* modification, are permitted provided that the following conditions	6	* modification, are permitted provided that the following conditions
7	* are met:	7	* are met:
8	*	8	*
9	* - Redistributions of source code must retain the above copyright	9	* - Redistributions of source code must retain the above copyright
10	* notice, this list of conditions and the following disclaimer.	10	* notice, this list of conditions and the following disclaimer.
11	* - Redistributions in binary form must reproduce the above copyright	11	* - Redistributions in binary form must reproduce the above copyright
12	* notice, this list of conditions and the following disclaimer in the	12	* notice, this list of conditions and the following disclaimer in the
13	* documentation and/or other materials provided with the distribution.	13	* documentation and/or other materials provided with the distribution.
14	* - The name of the author may not be used to endorse or promote products	14	* - The name of the author may not be used to endorse or promote products
15	* derived from this software without specific prior written permission.	15	* derived from this software without specific prior written permission.
16	*	16	*
17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR	17	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES	18	* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.	19	* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,	20	* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT	21	* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,	22	* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY	23	* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT	24	* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF	25	* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.	26	* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27	*/	27	*/
28		28
29	/** @addtogroup genarch	29	/** @addtogroup genarch
30	* @{	30	* @{
31	*/	31	*/
32		32
33	/**	33	/**
34	* @file	34	* @file
35	* @brief Advanced Configuration and Power Interface (ACPI) initialization.	35	* @brief Advanced Configuration and Power Interface (ACPI) initialization.
36	*/	36	*/
37		37
38	#include <genarch/acpi/acpi.h>	38	#include <genarch/acpi/acpi.h>
39	#include <genarch/acpi/madt.h>	39	#include <genarch/acpi/madt.h>
40	#include <arch/bios/bios.h>	40	#include <arch/bios/bios.h>
41	#include <mm/as.h>	41	#include <mm/as.h>
42	#include <mm/page.h>	42	#include <mm/page.h>
43	#include <print.h>	43	#include <print.h>
44		44
45	#define RSDP_SIGNATURE "RSD PTR "	45	#define RSDP_SIGNATURE "RSD PTR "
46	#define RSDP_REVISION_OFFS 15	46	#define RSDP_REVISION_OFFS 15
47		47
48	struct acpi_rsdp *acpi_rsdp = NULL;	48	struct acpi_rsdp *acpi_rsdp = NULL;
49	struct acpi_rsdt *acpi_rsdt = NULL;	49	struct acpi_rsdt *acpi_rsdt = NULL;
50	struct acpi_xsdt *acpi_xsdt = NULL;	50	struct acpi_xsdt *acpi_xsdt = NULL;
51		51
52	struct acpi_signature_map signature_map[] = {	52	struct acpi_signature_map signature_map[] = {
-		53	{
-		54	(uint8_t *) "APIC",
-		55	(void *) &acpi_madt,
53	{ (uint8_t )"APIC", (void ) &acpi_madt, "Multiple APIC Description Table" }	56	"Multiple APIC Description Table"
-		57	}
54	};	58	};
55		59
56	static int rsdp_check(uint8_t *rsdp) {	60	static int rsdp_check(uint8_t *rsdp) {
57	struct acpi_rsdp r = (struct acpi_rsdp ) rsdp;	61	struct acpi_rsdp r = (struct acpi_rsdp ) rsdp;
58	uint8_t sum = 0;	62	uint8_t sum = 0;
59	unsigned int i;	63	unsigned int i;
60		64
61	for (i = 0; i < 20; i++)	65	for (i = 0; i < 20; i++)
62	sum = (uint8_t) (sum + rsdp[i]);	66	sum = (uint8_t) (sum + rsdp[i]);
63		67
64	if (sum)	68	if (sum)
65	return 0; /* bad checksum */	69	return 0; /* bad checksum */
66		70
67	if (r->revision == 0)	71	if (r->revision == 0)
68	return 1; /* ACPI 1.0 */	72	return 1; /* ACPI 1.0 */
69		73
70	for (; i < r->length; i++)	74	for (; i < r->length; i++)
71	sum = (uint8_t) (sum + rsdp[i]);	75	sum = (uint8_t) (sum + rsdp[i]);
72		76
73	return !sum;	77	return !sum;
74		78
75	}	79	}
76		80
77	int acpi_sdt_check(uint8_t *sdt)	81	int acpi_sdt_check(uint8_t *sdt)
78	{	82	{
79	struct acpi_sdt_header h = (struct acpi_sdt_header ) sdt;	83	struct acpi_sdt_header h = (struct acpi_sdt_header ) sdt;
80	uint8_t sum = 0;	84	uint8_t sum = 0;
81	unsigned int i;	85	unsigned int i;
82		86
83	for (i = 0; i < h->length; i++)	87	for (i = 0; i < h->length; i++)
84	sum = (uint8_t) (sum + sdt[i]);	88	sum = (uint8_t) (sum + sdt[i]);
85		89
86	return !sum;	90	return !sum;
87	}	91	}
88		92
89	static void map_sdt(struct acpi_sdt_header *sdt)	93	static void map_sdt(struct acpi_sdt_header *sdt)
90	{	94	{
91	page_mapping_insert(AS_KERNEL, (uintptr_t) sdt, (uintptr_t) sdt, PAGE_NOT_CACHEABLE \| PAGE_WRITE);	95	page_mapping_insert(AS_KERNEL, (uintptr_t) sdt, (uintptr_t) sdt, PAGE_NOT_CACHEABLE \| PAGE_WRITE);
92	map_structure((uintptr_t) sdt, sdt->length);	96	map_structure((uintptr_t) sdt, sdt->length);
93	}	97	}
94		98
95	static void configure_via_rsdt(void)	99	static void configure_via_rsdt(void)
96	{	100	{
97	unsigned int i, j, cnt = (acpi_rsdt->header.length - sizeof(struct acpi_sdt_header)) / sizeof(uint32_t);	101	unsigned int i, j, cnt = (acpi_rsdt->header.length - sizeof(struct acpi_sdt_header)) / sizeof(uint32_t);
98		102
99	for (i = 0; i < cnt; i++) {	103	for (i = 0; i < cnt; i++) {
100	for (j = 0; j < sizeof(signature_map) / sizeof(struct acpi_signature_map); j++) {	104	for (j = 0; j < sizeof(signature_map) / sizeof(struct acpi_signature_map); j++) {
101	struct acpi_sdt_header h = (struct acpi_sdt_header ) (unative_t) acpi_rsdt->entry[i];	105	struct acpi_sdt_header h = (struct acpi_sdt_header ) (unative_t) acpi_rsdt->entry[i];
102		106
103	map_sdt(h);	107	map_sdt(h);
104	if (((uint32_t ) &h->signature[0]) == ((uint32_t ) &signature_map[j].signature[0])) {	108	if (((uint32_t ) &h->signature[0]) == ((uint32_t ) &signature_map[j].signature[0])) {
105	if (!acpi_sdt_check((uint8_t *) h))	109	if (!acpi_sdt_check((uint8_t *) h))
106	goto next;	110	goto next;
107	*signature_map[j].sdt_ptr = h;	111	*signature_map[j].sdt_ptr = h;
108	printf("%p: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);	112	LOG("%p: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);
109	}	113	}
110	}	114	}
111	next:	115	next:
112	;	116	;
113	}	117	}
114	}	118	}
115		119
116	static void configure_via_xsdt(void)	120	static void configure_via_xsdt(void)
117	{	121	{
118	unsigned int i, j, cnt = (acpi_xsdt->header.length - sizeof(struct acpi_sdt_header)) / sizeof(uint64_t);	122	unsigned int i, j, cnt = (acpi_xsdt->header.length - sizeof(struct acpi_sdt_header)) / sizeof(uint64_t);
119		123
120	for (i = 0; i < cnt; i++) {	124	for (i = 0; i < cnt; i++) {
121	for (j = 0; j < sizeof(signature_map) / sizeof(struct acpi_signature_map); j++) {	125	for (j = 0; j < sizeof(signature_map) / sizeof(struct acpi_signature_map); j++) {
122	struct acpi_sdt_header h = (struct acpi_sdt_header ) ((uintptr_t) acpi_rsdt->entry[i]);	126	struct acpi_sdt_header h = (struct acpi_sdt_header ) ((uintptr_t) acpi_rsdt->entry[i]);
123		127
124	map_sdt(h);	128	map_sdt(h);
125	if (((uint32_t ) &h->signature[0]) == ((uint32_t ) &signature_map[j].signature[0])) {	129	if (((uint32_t ) &h->signature[0]) == ((uint32_t ) &signature_map[j].signature[0])) {
126	if (!acpi_sdt_check((uint8_t *) h))	130	if (!acpi_sdt_check((uint8_t *) h))
127	goto next;	131	goto next;
128	*signature_map[j].sdt_ptr = h;	132	*signature_map[j].sdt_ptr = h;
129	printf("%p: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);	133	LOG("%p: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);
130	}	134	}
131	}	135	}
132	next:	136	next:
133	;	137	;
134	}	138	}
135		139
136	}	140	}
137		141
138	void acpi_init(void)	142	void acpi_init(void)
139	{	143	{
140	uint8_t addr[2] = { NULL, (uint8_t ) PA2KA(0xe0000) };	144	uint8_t addr[2] = { NULL, (uint8_t ) PA2KA(0xe0000) };
141	int i, j, length[2] = { 1024, 128*1024 };	145	int i, j, length[2] = { 1024, 128*1024 };
142	uint64_t sig = (uint64_t ) RSDP_SIGNATURE;	146	uint64_t sig = (uint64_t ) RSDP_SIGNATURE;
143		147
144	/*	148	/*
145	* Find Root System Description Pointer	149	* Find Root System Description Pointer
146	* 1. search first 1K of EBDA	150	* 1. search first 1K of EBDA
147	* 2. search 128K starting at 0xe0000	151	* 2. search 128K starting at 0xe0000
148	*/	152	*/
149		153
150	addr[0] = (uint8_t *) PA2KA(ebda);	154	addr[0] = (uint8_t *) PA2KA(ebda);
151	for (i = (ebda ? 0 : 1); i < 2; i++) {	155	for (i = (ebda ? 0 : 1); i < 2; i++) {
152	for (j = 0; j < length[i]; j += 16) {	156	for (j = 0; j < length[i]; j += 16) {
153	if (((uint64_t ) &addr[i][j]) == *sig && rsdp_check(&addr[i][j])) {	157	if (((uint64_t ) &addr[i][j]) == *sig && rsdp_check(&addr[i][j])) {
154	acpi_rsdp = (struct acpi_rsdp *) &addr[i][j];	158	acpi_rsdp = (struct acpi_rsdp *) &addr[i][j];
155	goto rsdp_found;	159	goto rsdp_found;
156	}	160	}
157	}	161	}
158	}	162	}
159		163
160	return;	164	return;
161		165
162	rsdp_found:	166	rsdp_found:
163	printf("%p: ACPI Root System Description Pointer\n", acpi_rsdp);	167	LOG("%p: ACPI Root System Description Pointer\n", acpi_rsdp);
164		168
165	acpi_rsdt = (struct acpi_rsdt *) (unative_t) acpi_rsdp->rsdt_address;	169	acpi_rsdt = (struct acpi_rsdt *) (unative_t) acpi_rsdp->rsdt_address;
166	if (acpi_rsdp->revision) acpi_xsdt = (struct acpi_xsdt *) ((uintptr_t) acpi_rsdp->xsdt_address);	170	if (acpi_rsdp->revision) acpi_xsdt = (struct acpi_xsdt *) ((uintptr_t) acpi_rsdp->xsdt_address);
167		171
168	if (acpi_rsdt) map_sdt((struct acpi_sdt_header *) acpi_rsdt);	172	if (acpi_rsdt) map_sdt((struct acpi_sdt_header *) acpi_rsdt);
169	if (acpi_xsdt) map_sdt((struct acpi_sdt_header *) acpi_xsdt);	173	if (acpi_xsdt) map_sdt((struct acpi_sdt_header *) acpi_xsdt);
170		174
171	if (acpi_rsdt && !acpi_sdt_check((uint8_t *) acpi_rsdt)) {	175	if (acpi_rsdt && !acpi_sdt_check((uint8_t *) acpi_rsdt)) {
172	printf("RSDT: bad checksum\n");	176	printf("RSDT: bad checksum\n");
173	return;	177	return;
174	}	178	}
175	if (acpi_xsdt && !acpi_sdt_check((uint8_t *) acpi_xsdt)) {	179	if (acpi_xsdt && !acpi_sdt_check((uint8_t *) acpi_xsdt)) {
176	printf("XSDT: bad checksum\n");	180	printf("XSDT: bad checksum\n");
177	return;	181	return;
178	}	182	}
179		183
180	if (acpi_xsdt) configure_via_xsdt();	184	if (acpi_xsdt) configure_via_xsdt();
181	else if (acpi_rsdt) configure_via_rsdt();	185	else if (acpi_rsdt) configure_via_rsdt();
182		186
183	}	187	}
184		188
185	/** @}	189	/** @}
186	*/	190	*/
187		191