Subversion Repositories HelenOS-historic

Rev

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

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