Subversion Repositories HelenOS

Rev

Rev 3149 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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