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 @ 2071 – Rev 1787 → 1888

Rev 1787		Rev 1888
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		-
30	/** @addtogroup genarch	29	/** @addtogroup genarch
31	* @{	30	* @{
32	*/	31	*/
33		32
34	/**	33	/**
35	* @file	34	* @file
36	* @brief Advanced Configuration and Power Interface (ACPI) initialization.	35	* @brief Advanced Configuration and Power Interface (ACPI) initialization.
37	*/	36	*/
38		37
39	#include <genarch/acpi/acpi.h>	38	#include <genarch/acpi/acpi.h>
40	#include <genarch/acpi/madt.h>	39	#include <genarch/acpi/madt.h>
41	#include <arch/bios/bios.h>	40	#include <arch/bios/bios.h>
42	#include <mm/as.h>	41	#include <mm/as.h>
43	#include <mm/page.h>	42	#include <mm/page.h>
44	#include <print.h>	43	#include <print.h>
45		44
46	#define RSDP_SIGNATURE "RSD PTR "	45	#define RSDP_SIGNATURE "RSD PTR "
47	#define RSDP_REVISION_OFFS 15	46	#define RSDP_REVISION_OFFS 15
48		47
49	struct acpi_rsdp *acpi_rsdp = NULL;	48	struct acpi_rsdp *acpi_rsdp = NULL;
50	struct acpi_rsdt *acpi_rsdt = NULL;	49	struct acpi_rsdt *acpi_rsdt = NULL;
51	struct acpi_xsdt *acpi_xsdt = NULL;	50	struct acpi_xsdt *acpi_xsdt = NULL;
52		51
53	struct acpi_signature_map signature_map[] = {	52	struct acpi_signature_map signature_map[] = {
54	{ (uint8_t )"APIC", (void ) &acpi_madt, "Multiple APIC Description Table" }	53	{ (uint8_t )"APIC", (void ) &acpi_madt, "Multiple APIC Description Table" }
55	};	54	};
56		55
57	static int rsdp_check(uint8_t *rsdp) {	56	static int rsdp_check(uint8_t *rsdp) {
58	struct acpi_rsdp r = (struct acpi_rsdp ) rsdp;	57	struct acpi_rsdp r = (struct acpi_rsdp ) rsdp;
59	uint8_t sum = 0;	58	uint8_t sum = 0;
60	int i;	59	int i;
61		60
62	for (i=0; i<20; i++)	61	for (i=0; i<20; i++)
63	sum += rsdp[i];	62	sum += rsdp[i];
64		63
65	if (sum)	64	if (sum)
66	return 0; /* bad checksum */	65	return 0; /* bad checksum */
67		66
68	if (r->revision == 0)	67	if (r->revision == 0)
69	return 1; /* ACPI 1.0 */	68	return 1; /* ACPI 1.0 */
70		69
71	for (; i<r->length; i++)	70	for (; i<r->length; i++)
72	sum += rsdp[i];	71	sum += rsdp[i];
73		72
74	return !sum;	73	return !sum;
75		74
76	}	75	}
77		76
78	int acpi_sdt_check(uint8_t *sdt)	77	int acpi_sdt_check(uint8_t *sdt)
79	{	78	{
80	struct acpi_sdt_header h = (struct acpi_sdt_header ) sdt;	79	struct acpi_sdt_header h = (struct acpi_sdt_header ) sdt;
81	uint8_t sum = 0;	80	uint8_t sum = 0;
82	int i;	81	int i;
83		82
84	for (i=0; i<h->length; i++)	83	for (i=0; i<h->length; i++)
85	sum += sdt[i];	84	sum += sdt[i];
86		85
87	return !sum;	86	return !sum;
88	}	87	}
89		88
90	static void map_sdt(struct acpi_sdt_header *sdt)	89	static void map_sdt(struct acpi_sdt_header *sdt)
91	{	90	{
92	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);
93	map_structure((uintptr_t) sdt, sdt->length);	92	map_structure((uintptr_t) sdt, sdt->length);
94	}	93	}
95		94
96	static void configure_via_rsdt(void)	95	static void configure_via_rsdt(void)
97	{	96	{
98	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);
99		98
100	for (i=0; i<cnt; i++) {	99	for (i=0; i<cnt; i++) {
101	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++) {
102	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];
103		102
104	map_sdt(h);	103	map_sdt(h);
105	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])) {
106	if (!acpi_sdt_check((uint8_t *) h))	105	if (!acpi_sdt_check((uint8_t *) h))
107	goto next;	106	goto next;
108	*signature_map[j].sdt_ptr = h;	107	*signature_map[j].sdt_ptr = h;
109	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);
110	}	109	}
111	}	110	}
112	next:	111	next:
113	;	112	;
114	}	113	}
115	}	114	}
116		115
117	static void configure_via_xsdt(void)	116	static void configure_via_xsdt(void)
118	{	117	{
119	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);
120		119
121	for (i=0; i<cnt; i++) {	120	for (i=0; i<cnt; i++) {
122	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++) {
123	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]);
124		123
125	map_sdt(h);	124	map_sdt(h);
126	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])) {
127	if (!acpi_sdt_check((uint8_t *) h))	126	if (!acpi_sdt_check((uint8_t *) h))
128	goto next;	127	goto next;
129	*signature_map[j].sdt_ptr = h;	128	*signature_map[j].sdt_ptr = h;
130	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);
131	}	130	}
132	}	131	}
133	next:	132	next:
134	;	133	;
135	}	134	}
136		135
137	}	136	}
138		137
139	void acpi_init(void)	138	void acpi_init(void)
140	{	139	{
141	uint8_t addr[2] = { NULL, (uint8_t ) PA2KA(0xe0000) };	140	uint8_t addr[2] = { NULL, (uint8_t ) PA2KA(0xe0000) };
142	int i, j, length[2] = { 1024, 128*1024 };	141	int i, j, length[2] = { 1024, 128*1024 };
143	uint64_t sig = (uint64_t ) RSDP_SIGNATURE;	142	uint64_t sig = (uint64_t ) RSDP_SIGNATURE;
144		143
145	/*	144	/*
146	* Find Root System Description Pointer	145	* Find Root System Description Pointer
147	* 1. search first 1K of EBDA	146	* 1. search first 1K of EBDA
148	* 2. search 128K starting at 0xe0000	147	* 2. search 128K starting at 0xe0000
149	*/	148	*/
150		149
151	addr[0] = (uint8_t *) PA2KA(ebda);	150	addr[0] = (uint8_t *) PA2KA(ebda);
152	for (i = (ebda ? 0 : 1); i < 2; i++) {	151	for (i = (ebda ? 0 : 1); i < 2; i++) {
153	for (j = 0; j < length[i]; j += 16) {	152	for (j = 0; j < length[i]; j += 16) {
154	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])) {
155	acpi_rsdp = (struct acpi_rsdp *) &addr[i][j];	154	acpi_rsdp = (struct acpi_rsdp *) &addr[i][j];
156	goto rsdp_found;	155	goto rsdp_found;
157	}	156	}
158	}	157	}
159	}	158	}
160		159
161	return;	160	return;
162		161
163	rsdp_found:	162	rsdp_found:
164	printf("%#zx: ACPI Root System Description Pointer\n", acpi_rsdp);	163	printf("%#zx: ACPI Root System Description Pointer\n", acpi_rsdp);
165		164
166	acpi_rsdt = (struct acpi_rsdt *) (unative_t) acpi_rsdp->rsdt_address;	165	acpi_rsdt = (struct acpi_rsdt *) (unative_t) acpi_rsdp->rsdt_address;
167	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);
168		167
169	if (acpi_rsdt) map_sdt((struct acpi_sdt_header *) acpi_rsdt);	168	if (acpi_rsdt) map_sdt((struct acpi_sdt_header *) acpi_rsdt);
170	if (acpi_xsdt) map_sdt((struct acpi_sdt_header *) acpi_xsdt);	169	if (acpi_xsdt) map_sdt((struct acpi_sdt_header *) acpi_xsdt);
171		170
172	if (acpi_rsdt && !acpi_sdt_check((uint8_t *) acpi_rsdt)) {	171	if (acpi_rsdt && !acpi_sdt_check((uint8_t *) acpi_rsdt)) {
173	printf("RSDT: %s\n", "bad checksum");	172	printf("RSDT: %s\n", "bad checksum");
174	return;	173	return;
175	}	174	}
176	if (acpi_xsdt && !acpi_sdt_check((uint8_t *) acpi_xsdt)) {	175	if (acpi_xsdt && !acpi_sdt_check((uint8_t *) acpi_xsdt)) {
177	printf("XSDT: %s\n", "bad checksum");	176	printf("XSDT: %s\n", "bad checksum");
178	return;	177	return;
179	}	178	}
180		179
181	if (acpi_xsdt) configure_via_xsdt();	180	if (acpi_xsdt) configure_via_xsdt();
182	else if (acpi_rsdt) configure_via_rsdt();	181	else if (acpi_rsdt) configure_via_rsdt();
183		182
184	}	183	}
185		184
186		-
187	/** @}	185	/** @}
188	*/	186	*/
189		-
190		187