Subversion Repositories HelenOS-historic

Rev

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

Rev 127 Rev 129
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/types.h>
29
#include <arch/types.h>
-
 
30
#include <typedefs.h>
30
#include <arch/acpi/acpi.h>
31
#include <arch/acpi/acpi.h>
31
#include <arch/acpi/madt.h>
32
#include <arch/acpi/madt.h>
32
#include <arch/smp/apic.h>
33
#include <arch/smp/apic.h>
-
 
34
#include <arch/smp/smp.h>
33
#include <mm/page.h>
35
#include <mm/page.h>
34
#include <panic.h>
36
#include <panic.h>
-
 
37
#include <debug.h>
-
 
38
#include <config.h>
35
 
39
 
36
struct acpi_madt *acpi_madt = NULL;
40
struct acpi_madt *acpi_madt = NULL;
37
 
41
 
38
#ifdef __SMP__
42
#ifdef __SMP__
39
 
43
 
40
/*
44
/*
41
 * NOTE: it is currently not completely clear to the authors of SPARTAN whether
45
 * NOTE: it is currently not completely clear to the authors of SPARTAN whether
42
 * MADT can exist in such a form that entries of the same type are not consecutive.
46
 * MADT can exist in such a form that entries of the same type are not consecutive.
43
 * Because of this uncertainity, some entry types are explicitly checked for
47
 * Because of this uncertainity, some entry types are explicitly checked for
44
 * being consecutive with other entries of the same kind.
48
 * being consecutive with other entries of the same kind.
45
 */
49
 */
46
 
50
 
47
static void madt_l_apic_entry(struct madt_l_apic *la, __u8 prev_type);
51
static void madt_l_apic_entry(struct madt_l_apic *la, __u8 prev_type);
48
static void madt_io_apic_entry(struct madt_io_apic *ioa, __u8 prev_type);
52
static void madt_io_apic_entry(struct madt_io_apic *ioa, __u8 prev_type);
49
 
53
 
50
struct madt_l_apic *madt_l_apic_entries = NULL;
54
struct madt_l_apic *madt_l_apic_entries = NULL;
51
struct madt_io_apic *madt_io_apic_entries = NULL;
55
struct madt_io_apic *madt_io_apic_entries = NULL;
52
 
56
 
53
int madt_l_apic_entry_cnt = 0;
57
int madt_l_apic_entry_cnt = 0;
54
int madt_io_apic_entry_cnt = 0;
58
int madt_io_apic_entry_cnt = 0;
55
 
59
 
56
char *entry[] = {
60
char *entry[] = {
57
    "L_APIC",
61
    "L_APIC",
58
    "IO_APIC",
62
    "IO_APIC",
59
    "INTR_SRC_OVRD",
63
    "INTR_SRC_OVRD",
60
    "NMI_SRC",
64
    "NMI_SRC",
61
    "L_APIC_NMI",
65
    "L_APIC_NMI",
62
    "L_APIC_ADDR_OVRD",
66
    "L_APIC_ADDR_OVRD",
63
    "IO_SAPIC",
67
    "IO_SAPIC",
64
    "L_SAPIC",
68
    "L_SAPIC",
65
    "PLATFORM_INTR_SRC"
69
    "PLATFORM_INTR_SRC"
66
};
70
};
67
 
71
 
-
 
72
/*
-
 
73
 * ACPI MADT Implementation of SMP configuration interface.
-
 
74
 */
-
 
75
static count_t madt_cpu_count(void);
-
 
76
static bool madt_cpu_enabled(index_t i);
-
 
77
static bool madt_cpu_bootstrap(index_t i);
-
 
78
static __u8 madt_cpu_apic_id(index_t i);
-
 
79
 
-
 
80
struct smp_config_operations madt_config_operations = {
-
 
81
    .cpu_count = madt_cpu_count,
-
 
82
    .cpu_enabled = madt_cpu_enabled,
-
 
83
    .cpu_bootstrap = madt_cpu_bootstrap,
-
 
84
    .cpu_apic_id = madt_cpu_apic_id
-
 
85
};
-
 
86
 
-
 
87
static count_t madt_cpu_count(void)
-
 
88
{
-
 
89
    return madt_l_apic_entry_cnt;
-
 
90
}
-
 
91
 
-
 
92
static bool madt_cpu_enabled(index_t i)
-
 
93
{
-
 
94
    ASSERT(i < madt_l_apic_entry_cnt);
-
 
95
    return madt_l_apic_entries[i].flags & 0x1;
-
 
96
}
-
 
97
 
-
 
98
static bool madt_cpu_bootstrap(index_t i)
-
 
99
{
-
 
100
    ASSERT(i < madt_l_apic_entry_cnt);
-
 
101
    return madt_l_apic_entries[i].apic_id == l_apic_id();
-
 
102
}
-
 
103
 
-
 
104
static __u8 madt_cpu_apic_id(index_t i)
-
 
105
{
-
 
106
    ASSERT(i < madt_l_apic_entry_cnt);
-
 
107
    return madt_l_apic_entries[i].apic_id;
-
 
108
}
-
 
109
 
68
void acpi_madt_parse(void)
110
void acpi_madt_parse(void)
69
{
111
{
70
    struct madt_apic_header *end = (struct madt_apic_header *) (((__u8 *) acpi_madt) + acpi_madt->header.length);
112
    struct madt_apic_header *end = (struct madt_apic_header *) (((__u8 *) acpi_madt) + acpi_madt->header.length);
71
    struct madt_apic_header *h = &acpi_madt->apic_header[0];
113
    struct madt_apic_header *h = &acpi_madt->apic_header[0];
72
    __u8 prev_type = 0; /* used to detect incosecutive entries */
114
    __u8 prev_type = 0; /* used to detect incosecutive entries */
73
 
115
 
74
 
116
 
75
    l_apic = (__u32 *) acpi_madt->l_apic_address;
117
    l_apic = (__u32 *) acpi_madt->l_apic_address;
76
 
118
 
77
    while (h < end) {
119
    while (h < end) {
78
        switch (h->type) {
120
        switch (h->type) {
79
            case MADT_L_APIC:
121
            case MADT_L_APIC:
80
                madt_l_apic_entry((struct madt_l_apic *) h, prev_type);
122
                madt_l_apic_entry((struct madt_l_apic *) h, prev_type);
81
                break;
123
                break;
82
            case MADT_IO_APIC:
124
            case MADT_IO_APIC:
83
                madt_io_apic_entry((struct madt_io_apic *) h, prev_type);
125
                madt_io_apic_entry((struct madt_io_apic *) h, prev_type);
84
                break;
126
                break;
85
            case MADT_INTR_SRC_OVRD:
127
            case MADT_INTR_SRC_OVRD:
86
            case MADT_NMI_SRC:
128
            case MADT_NMI_SRC:
87
            case MADT_L_APIC_NMI:
129
            case MADT_L_APIC_NMI:
88
            case MADT_L_APIC_ADDR_OVRD:
130
            case MADT_L_APIC_ADDR_OVRD:
89
            case MADT_IO_SAPIC:
131
            case MADT_IO_SAPIC:
90
            case MADT_L_SAPIC:
132
            case MADT_L_SAPIC:
91
            case MADT_PLATFORM_INTR_SRC:
133
            case MADT_PLATFORM_INTR_SRC:
92
                printf("MADT: skipping %s entry (type=%d)\n", entry[h->type], h->type);
134
                printf("MADT: skipping %s entry (type=%d)\n", entry[h->type], h->type);
93
                break;
135
                break;
94
 
136
 
95
            default:
137
            default:
96
                if (h->type >= MADT_RESERVED_SKIP_BEGIN && h->type <= MADT_RESERVED_SKIP_END) {
138
                if (h->type >= MADT_RESERVED_SKIP_BEGIN && h->type <= MADT_RESERVED_SKIP_END) {
97
                    printf("MADT: skipping reserved entry (type=%d)\n", h->type);
139
                    printf("MADT: skipping reserved entry (type=%d)\n", h->type);
98
                }
140
                }
99
                if (h->type >= MADT_RESERVED_OEM_BEGIN) {
141
                if (h->type >= MADT_RESERVED_OEM_BEGIN) {
100
                    printf("MADT: skipping OEM entry (type=%d)\n", h->type);
142
                    printf("MADT: skipping OEM entry (type=%d)\n", h->type);
101
                }
143
                }
102
                break;
144
                break;
103
        }
145
        }
104
        prev_type = h->type;
146
        prev_type = h->type;
105
        h = (struct madt_apic_header *) (((__u8 *) h) + h->length);
147
        h = (struct madt_apic_header *) (((__u8 *) h) + h->length);
106
    }
148
    }
107
 
149
 
-
 
150
    if (madt_l_apic_entry_cnt)
-
 
151
        config.cpu_count = madt_l_apic_entry_cnt;
108
}
152
}
109
 
153
 
110
void madt_l_apic_entry(struct madt_l_apic *la, __u8 prev_type)
154
void madt_l_apic_entry(struct madt_l_apic *la, __u8 prev_type)
111
{
155
{
112
    /* check for consecutiveness */
156
    /* check for consecutiveness */
113
    if (madt_l_apic_entry_cnt && prev_type != MADT_L_APIC)
157
    if (madt_l_apic_entry_cnt && prev_type != MADT_L_APIC)
114
    panic("%s entries are not consecuitve\n", entry[MADT_L_APIC]);
158
    panic("%s entries are not consecuitve\n", entry[MADT_L_APIC]);
115
 
159
 
116
    if (!madt_l_apic_entry_cnt++)
160
    if (!madt_l_apic_entry_cnt++)
117
        madt_l_apic_entries = la;
161
        madt_l_apic_entries = la;
118
       
162
       
119
    if (!(la->flags & 0x1)) {
163
    if (!(la->flags & 0x1)) {
120
        /* Processor is unusable, skip it. */
164
        /* Processor is unusable, skip it. */
121
        return;
165
        return;
122
    }
166
    }
123
       
167
       
124
    apic_id_mask |= 1<<la->apic_id;
168
    apic_id_mask |= 1<<la->apic_id;
125
}
169
}
126
 
170
 
127
void madt_io_apic_entry(struct madt_io_apic *ioa, __u8 prev_type)
171
void madt_io_apic_entry(struct madt_io_apic *ioa, __u8 prev_type)
128
{
172
{
129
    /* check for consecutiveness */
173
    /* check for consecutiveness */
130
    if (madt_io_apic_entry_cnt && prev_type != MADT_IO_APIC)
174
    if (madt_io_apic_entry_cnt && prev_type != MADT_IO_APIC)
131
    panic("%s entries are not consecuitve\n", entry[MADT_IO_APIC]);
175
    panic("%s entries are not consecuitve\n", entry[MADT_IO_APIC]);
132
 
176
 
133
    if (!madt_io_apic_entry_cnt++) {
177
    if (!madt_io_apic_entry_cnt++) {
134
        madt_io_apic_entries = ioa;
178
        madt_io_apic_entries = ioa;
135
        io_apic = (__u32 *) ioa->io_apic_address;
179
        io_apic = (__u32 *) ioa->io_apic_address;
136
        map_page_to_frame((__address) io_apic, (__address) io_apic, PAGE_NOT_CACHEABLE, 0);
180
        map_page_to_frame((__address) io_apic, (__address) io_apic, PAGE_NOT_CACHEABLE, 0);
137
    }
181
    }
138
    else {
182
    else {
139
        /* currently not supported */
183
        /* currently not supported */
140
        return;
184
        return;
141
    }
185
    }
142
}
186
}
143
 
187
 
144
 
188
 
145
#endif /* __SMP__ */
189
#endif /* __SMP__ */
146
 
190