WebSVN – HelenOS – Diff – /branches/tracing/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/tracing/kernel/genarch/src/acpi/acpi.c – Rev 4377 → 4692

Rev 4377		Rev 4692
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	{	53	{
54	(uint8_t *) "APIC",	54	(uint8_t *) "APIC",
55	(void *) &acpi_madt,	55	(void *) &acpi_madt,
56	"Multiple APIC Description Table"	56	"Multiple APIC Description Table"
57	}	57	}
58	};	58	};
59		59
60	static int rsdp_check(uint8_t *rsdp) {	60	static int rsdp_check(uint8_t *rsdp) {
61	struct acpi_rsdp r = (struct acpi_rsdp ) rsdp;	61	struct acpi_rsdp r = (struct acpi_rsdp ) rsdp;
62	uint8_t sum = 0;	62	uint8_t sum = 0;
63	unsigned int i;	63	unsigned int i;
64		64
65	for (i = 0; i < 20; i++)	65	for (i = 0; i < 20; i++)
66	sum = (uint8_t) (sum + rsdp[i]);	66	sum = (uint8_t) (sum + rsdp[i]);
67		67
68	if (sum)	68	if (sum)
69	return 0; /* bad checksum */	69	return 0; /* bad checksum */
70		70
71	if (r->revision == 0)	71	if (r->revision == 0)
72	return 1; /* ACPI 1.0 */	72	return 1; /* ACPI 1.0 */
73		73
74	for (; i < r->length; i++)	74	for (; i < r->length; i++)
75	sum = (uint8_t) (sum + rsdp[i]);	75	sum = (uint8_t) (sum + rsdp[i]);
76		76
77	return !sum;	77	return !sum;
78		78
79	}	79	}
80		80
81	int acpi_sdt_check(uint8_t *sdt)	81	int acpi_sdt_check(uint8_t *sdt)
82	{	82	{
83	struct acpi_sdt_header h = (struct acpi_sdt_header ) sdt;	83	struct acpi_sdt_header h = (struct acpi_sdt_header ) sdt;
84	uint8_t sum = 0;	84	uint8_t sum = 0;
85	unsigned int i;	85	unsigned int i;
86		86
87	for (i = 0; i < h->length; i++)	87	for (i = 0; i < h->length; i++)
88	sum = (uint8_t) (sum + sdt[i]);	88	sum = (uint8_t) (sum + sdt[i]);
89		89
90	return !sum;	90	return !sum;
91	}	91	}
92		92
93	static void map_sdt(struct acpi_sdt_header *sdt)	93	static void map_sdt(struct acpi_sdt_header *sdt)
94	{	94	{
95	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);
96	map_structure((uintptr_t) sdt, sdt->length);	96	map_structure((uintptr_t) sdt, sdt->length);
97	}	97	}
98		98
99	static void configure_via_rsdt(void)	99	static void configure_via_rsdt(void)
100	{	100	{
101	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);
102		102
103	for (i = 0; i < cnt; i++) {	103	for (i = 0; i < cnt; i++) {
104	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++) {
105	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];
106		106
107	map_sdt(h);	107	map_sdt(h);
108	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])) {
109	if (!acpi_sdt_check((uint8_t *) h))	109	if (!acpi_sdt_check((uint8_t *) h))
110	goto next;	110	goto next;
111	*signature_map[j].sdt_ptr = h;	111	*signature_map[j].sdt_ptr = h;
112	LOG("%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);
113	}	113	}
114	}	114	}
115	next:	115	next:
116	;	116	;
117	}	117	}
118	}	118	}
119		119
120	static void configure_via_xsdt(void)	120	static void configure_via_xsdt(void)
121	{	121	{
122	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);
123		123
124	for (i = 0; i < cnt; i++) {	124	for (i = 0; i < cnt; i++) {
125	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++) {
126	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]);
127		127
128	map_sdt(h);	128	map_sdt(h);
129	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])) {
130	if (!acpi_sdt_check((uint8_t *) h))	130	if (!acpi_sdt_check((uint8_t *) h))
131	goto next;	131	goto next;
132	*signature_map[j].sdt_ptr = h;	132	*signature_map[j].sdt_ptr = h;
133	LOG("%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);
134	}	134	}
135	}	135	}
136	next:	136	next:
137	;	137	;
138	}	138	}
139		139
140	}	140	}
141		141
142	void acpi_init(void)	142	void acpi_init(void)
143	{	143	{
144	uint8_t addr[2] = { NULL, (uint8_t ) PA2KA(0xe0000) };	144	uint8_t addr[2] = { NULL, (uint8_t ) PA2KA(0xe0000) };
145	int i, j, length[2] = { 1024, 128*1024 };	145	int i, j, length[2] = { 1024, 128*1024 };
146	uint64_t sig = (uint64_t ) RSDP_SIGNATURE;	146	uint64_t sig = (uint64_t ) RSDP_SIGNATURE;
147		147
148	/*	148	/*
149	* Find Root System Description Pointer	149	* Find Root System Description Pointer
150	* 1. search first 1K of EBDA	150	* 1. search first 1K of EBDA
151	* 2. search 128K starting at 0xe0000	151	* 2. search 128K starting at 0xe0000
152	*/	152	*/
153		153
154	addr[0] = (uint8_t *) PA2KA(ebda);	154	addr[0] = (uint8_t *) PA2KA(ebda);
155	for (i = (ebda ? 0 : 1); i < 2; i++) {	155	for (i = (ebda ? 0 : 1); i < 2; i++) {
156	for (j = 0; j < length[i]; j += 16) {	156	for (j = 0; j < length[i]; j += 16) {
157	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])) {
158	acpi_rsdp = (struct acpi_rsdp *) &addr[i][j];	158	acpi_rsdp = (struct acpi_rsdp *) &addr[i][j];
159	goto rsdp_found;	159	goto rsdp_found;
160	}	160	}
161	}	161	}
162	}	162	}
163		163
164	return;	164	return;
165		165
166	rsdp_found:	166	rsdp_found:
167	LOG("%p: ACPI Root System Description Pointer\n", acpi_rsdp);	167	LOG("%p: ACPI Root System Description Pointer\n", acpi_rsdp);
168		168
169	acpi_rsdt = (struct acpi_rsdt *) (unative_t) acpi_rsdp->rsdt_address;	169	acpi_rsdt = (struct acpi_rsdt *) (unative_t) acpi_rsdp->rsdt_address;
-		170	if (acpi_rsdp->revision)
170	if (acpi_rsdp->revision) acpi_xsdt = (struct acpi_xsdt *) ((uintptr_t) acpi_rsdp->xsdt_address);	171	acpi_xsdt = (struct acpi_xsdt *) ((uintptr_t) acpi_rsdp->xsdt_address);
171		172
-		173	if (acpi_rsdt)
172	if (acpi_rsdt) map_sdt((struct acpi_sdt_header *) acpi_rsdt);	174	map_sdt((struct acpi_sdt_header *) acpi_rsdt);
-		175	if (acpi_xsdt)
173	if (acpi_xsdt) map_sdt((struct acpi_sdt_header *) acpi_xsdt);	176	map_sdt((struct acpi_sdt_header *) acpi_xsdt);
174		177
175	if (acpi_rsdt && !acpi_sdt_check((uint8_t *) acpi_rsdt)) {	178	if (acpi_rsdt && !acpi_sdt_check((uint8_t *) acpi_rsdt)) {
176	printf("RSDT: bad checksum\n");	179	printf("RSDT: bad checksum\n");
177	return;	180	return;
178	}	181	}
179	if (acpi_xsdt && !acpi_sdt_check((uint8_t *) acpi_xsdt)) {	182	if (acpi_xsdt && !acpi_sdt_check((uint8_t *) acpi_xsdt)) {
180	printf("XSDT: bad checksum\n");	183	printf("XSDT: bad checksum\n");
181	return;	184	return;
182	}	185	}
183		186
-		187	if (acpi_xsdt)
184	if (acpi_xsdt) configure_via_xsdt();	188	configure_via_xsdt();
-		189	else if (acpi_rsdt)
185	else if (acpi_rsdt) configure_via_rsdt();	190	configure_via_rsdt();
186		191
187	}	192	}
188		193
189	/** @}	194	/** @}
190	*/	195	*/
191		196