Subversion Repositories HelenOS

Rev

Rev 1965 | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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