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.
 */
 
#include <arch/acpi/acpi.h>
#include <arch/acpi/madt.h>
#include <arch/bios/bios.h>
 
#include <mm/page.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[] = {
    { "APIC", (struct acpi_sdt_header **) &acpi_madt, "Multiple APIC Description Table" }
};
 
int rsdp_check(__u8 *rsdp) {
    struct acpi_rsdp *r = (struct acpi_rsdp *) rsdp;
    __u8 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(__u8 *sdt)
{
    struct acpi_sdt_header *h = (struct acpi_sdt_header *) sdt;
    __u8 sum = 0;
    int i;
 
    for (i=0; i<h->length; i++)
        sum += sdt[i];
       
    return !sum;
}
 
void map_sdt(struct acpi_sdt_header *sdt)
{
    int i, cnt, length;
 
    map_page_to_frame((__address) sdt, (__address) sdt, PAGE_NOT_CACHEABLE, 0);
   
    length = sdt->length + ((__address) sdt) - ((__address) sdt)&0xfffff000;
    cnt = length/PAGE_SIZE + (length%PAGE_SIZE>0);
   
    for (i = 1; i < cnt; i++)
        map_page_to_frame(((__address) sdt) + i*PAGE_SIZE, ((__address) sdt) + i*PAGE_SIZE, PAGE_NOT_CACHEABLE, 0);
}
 
void acpi_init(void)
{
        __u8 *addr[2] = { NULL, (__u8 *) 0xe0000 };
        int i, j, length[2] = { 1024, 128*1024 };
    __u64 *sig = (__u64 *) RSDP_SIGNATURE;
 
        /*
     * Find Root System Description Pointer
         * 1. search first 1K of EBDA
         * 2. search 128K starting at 0xe0000
         */
 
    addr[0] = (__u8 *) ebda;
    for (i = (ebda ? 0 : 1); i < 2; i++) {
                for (j = 0; j < length[i]; j += 16) {
                        if (*((__u64 *) &addr[i][j]) == *sig && rsdp_check(&addr[i][j])) {
                                acpi_rsdp = (struct acpi_rsdp *) &addr[i][j];
                                goto rsdp_found;
                        }
                }
        }
 
        return;
 
rsdp_found:
        printf("%L: ACPI Root System Description Pointer\n", acpi_rsdp);
   
    acpi_rsdt = (struct acpi_rsdt *) acpi_rsdp->rsdt_address;
    if (acpi_rsdp->revision) acpi_xsdt = (struct acpi_xsdt *) ((__address) 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((__u8 *) acpi_rsdt)) {
        printf("RSDT: %s\n", "bad checksum");
        return;
    }
    if (acpi_xsdt && !acpi_sdt_check((__u8 *) acpi_xsdt)) {
        printf("XSDT: %s\n", "bad checksum");
        return;
    }
 
    if (acpi_xsdt) configure_via_xsdt();
    else if (acpi_rsdt) configure_via_rsdt();
 
}
 
void configure_via_rsdt(void)
{
    int i, j, cnt = (acpi_rsdt->header.length - sizeof(struct acpi_sdt_header))/sizeof(__u32);
   
    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 *) acpi_rsdt->entry[i];
       
                map_sdt(h);
            if (*((__u32 *) &h->signature[0])==*((__u32 *) &signature_map[j].signature[0])) {
                if (!acpi_sdt_check((__u8 *) h))
                    goto next;
                *signature_map[j].sdt_ptr = h;
                printf("%L: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);
            }
        }
next:
        ;
    }
}
 
void configure_via_xsdt(void)
{
    int i, j, cnt = (acpi_xsdt->header.length - sizeof(struct acpi_sdt_header))/sizeof(__u64);
   
    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 *) ((__address) acpi_rsdt->entry[i]);
 
            map_sdt(h);
            if (*((__u32 *) &h->signature[0])==*((__u32 *) &signature_map[j].signature[0])) {
                if (!acpi_sdt_check((__u8 *) h))
                    goto next;
                *signature_map[j].sdt_ptr = h;
                printf("%L: ACPI %s\n", *signature_map[j].sdt_ptr, signature_map[j].description);
            }
        }
next:
        ;
    }
 
}
 

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

Subversion Repositories HelenOS

(root)/trunk/kernel/genarch/src/acpi/acpi.c @ 4573 – Rev 33 → 34