WebSVN – HelenOS – Diff – /trunk/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;
    int i;
   
    for (i=0; i<20; i++)
        sum += rsdp[i];
       
    if (sum)   
        return 0; /* bad checksum */
 
    if (r->revision == 0)
        return 1; /* ACPI 1.0 */
       
    for (; i<r->length; i++)
        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;
    int i;
 
    for (i=0; i<h->length; i++)
        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);
    map_structure((uintptr_t) sdt, sdt->length);
}
 
static void configure_via_rsdt(void)
{
    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;
                printf("%#zx: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);
            }
        }
next:
        ;
    }
}
 
static void configure_via_xsdt(void)
{
    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;
                printf("%#zx: 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:
    printf("%#zx: 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: %s\n", "bad checksum");
        return;
    }
    if (acpi_xsdt && !acpi_sdt_check((uint8_t *) acpi_xsdt)) {
        printf("XSDT: %s\n", "bad checksum");
        return;
    }
 
    if (acpi_xsdt) configure_via_xsdt();
    else if (acpi_rsdt) configure_via_rsdt();
 
}
 
/** @}
 */
 

Subversion Repositories HelenOS

(root)/trunk/kernel/genarch/src/acpi/acpi.c – Rev 1888 → 2071

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