Subversion Repositories HelenOS-historic

Rev

Rev 268 | Rev 311 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 268 Rev 310
Line 34... Line 34...
34
#include <arch/smp/smp.h>
34
#include <arch/smp/smp.h>
35
#include <panic.h>
35
#include <panic.h>
36
#include <debug.h>
36
#include <debug.h>
37
#include <config.h>
37
#include <config.h>
38
#include <print.h>
38
#include <print.h>
-
 
39
#include <mm/heap.h>
-
 
40
#include <memstr.h>
39
 
41
 
40
struct acpi_madt *acpi_madt = NULL;
42
struct acpi_madt *acpi_madt = NULL;
41
 
43
 
42
#ifdef __SMP__
44
#ifdef __SMP__
43
 
45
 
44
/*
-
 
45
 * NOTE: it is currently not completely clear to the authors of SPARTAN whether
-
 
46
 * MADT can exist in such a form that entries of the same type are not consecutive.
-
 
47
 * Because of this uncertainity, some entry types are explicitly checked for
-
 
48
 * being consecutive with other entries of the same kind.
-
 
49
 */
-
 
50
 
-
 
51
static void madt_l_apic_entry(struct madt_l_apic *la, __u8 prev_type);
46
static void madt_l_apic_entry(struct madt_l_apic *la, __u32 index);
52
static void madt_io_apic_entry(struct madt_io_apic *ioa, __u8 prev_type);
47
static void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index);
53
 
48
 
54
struct madt_l_apic *madt_l_apic_entries = NULL;
49
struct madt_l_apic *madt_l_apic_entries = NULL;
55
struct madt_io_apic *madt_io_apic_entries = NULL;
50
struct madt_io_apic *madt_io_apic_entries = NULL;
56
 
51
 
-
 
52
__u32 madt_l_apic_entry_index = 0;
-
 
53
__u32 madt_io_apic_entry_index = 0;
57
int madt_l_apic_entry_cnt = 0;
54
int madt_l_apic_entry_cnt = 0;
58
int madt_io_apic_entry_cnt = 0;
55
int madt_io_apic_entry_cnt = 0;
59
 
56
 
-
 
57
struct madt_apic_header * * madt_entries_index = NULL;
-
 
58
int madt_entries_index_cnt = 0;
-
 
59
 
60
char *entry[] = {
60
char *entry[] = {
61
    "L_APIC",
61
    "L_APIC",
62
    "IO_APIC",
62
    "IO_APIC",
63
    "INTR_SRC_OVRD",
63
    "INTR_SRC_OVRD",
64
    "NMI_SRC",
64
    "NMI_SRC",
Line 90... Line 90...
90
}
90
}
91
 
91
 
92
static bool madt_cpu_enabled(index_t i)
92
static bool madt_cpu_enabled(index_t i)
93
{
93
{
94
    ASSERT(i < madt_l_apic_entry_cnt);
94
    ASSERT(i < madt_l_apic_entry_cnt);
95
    return madt_l_apic_entries[i].flags & 0x1;
95
    return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->flags & 0x1;
-
 
96
 
96
}
97
}
97
 
98
 
98
static bool madt_cpu_bootstrap(index_t i)
99
static bool madt_cpu_bootstrap(index_t i)
99
{
100
{
100
    ASSERT(i < madt_l_apic_entry_cnt);
101
    ASSERT(i < madt_l_apic_entry_cnt);
101
    return madt_l_apic_entries[i].apic_id == l_apic_id();
102
    return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id == l_apic_id();
102
}
103
}
103
 
104
 
104
static __u8 madt_cpu_apic_id(index_t i)
105
static __u8 madt_cpu_apic_id(index_t i)
105
{
106
{
106
    ASSERT(i < madt_l_apic_entry_cnt);
107
    ASSERT(i < madt_l_apic_entry_cnt);
107
    return madt_l_apic_entries[i].apic_id;
108
    return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id;
108
}
109
}
109
 
110
 
110
void acpi_madt_parse(void)
111
void acpi_madt_parse(void)
111
{
112
{
112
    struct madt_apic_header *end = (struct madt_apic_header *) (((__u8 *) acpi_madt) + acpi_madt->header.length);
113
    struct madt_apic_header *end = (struct madt_apic_header *) (((__u8 *) acpi_madt) + acpi_madt->header.length);
113
    struct madt_apic_header *h = &acpi_madt->apic_header[0];
114
    struct madt_apic_header *h;
114
    __u8 prev_type = 0; /* used to detect inconsecutive entries */
-
 
115
 
115
 
-
 
116
    /* calculate madt entries */
-
 
117
    for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header *) (((__u8 *) h) + h->length)) {
-
 
118
        madt_entries_index_cnt++;
-
 
119
    }
-
 
120
    printf("MADT: Found %d entries\n", madt_entries_index_cnt);
-
 
121
 
-
 
122
    /* create madt apic entries index array */
-
 
123
    madt_entries_index = (struct madt_apic_header * *) malloc(madt_entries_index_cnt * sizeof(struct madt_apic_header * *));
-
 
124
 
-
 
125
    __u32 index = 0;
-
 
126
 
-
 
127
    for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header *) (((__u8 *) h) + h->length)) {
-
 
128
        madt_entries_index[index++] = h;
-
 
129
    }
116
 
130
 
117
    l_apic = (__u32 *) (__native) acpi_madt->l_apic_address;
-
 
118
 
131
 
-
 
132
    /* Bublesort madt index. Quicksort later. */
-
 
133
    bool done = false;
-
 
134
 
119
    while (h < end) {
135
    while (!done) {
-
 
136
        done = true;
-
 
137
        for (index = 0; index < madt_entries_index_cnt - 1; index++) {
-
 
138
            if (madt_entries_index[index]->type > madt_entries_index[index + 1]->type) {
-
 
139
                h = madt_entries_index[index];
-
 
140
                madt_entries_index[index] = madt_entries_index[index + 1];
-
 
141
                madt_entries_index[index + 1] = h;
-
 
142
                done = false;
-
 
143
            }
-
 
144
            }
-
 
145
   
-
 
146
    }
-
 
147
       
-
 
148
 
-
 
149
    /* Parse MADT entries */   
-
 
150
    for (index = 0; index < madt_entries_index_cnt - 1; index++) {
-
 
151
        h = madt_entries_index[index];
120
        switch (h->type) {
152
        switch (h->type) {
121
            case MADT_L_APIC:
153
            case MADT_L_APIC:
122
                madt_l_apic_entry((struct madt_l_apic *) h, prev_type);
154
                madt_l_apic_entry((struct madt_l_apic *) h, index);
123
                break;
155
                break;
124
            case MADT_IO_APIC:
156
            case MADT_IO_APIC:
125
                madt_io_apic_entry((struct madt_io_apic *) h, prev_type);
157
                madt_io_apic_entry((struct madt_io_apic *) h, index);
126
                break;
158
                break;
127
            case MADT_INTR_SRC_OVRD:
159
            case MADT_INTR_SRC_OVRD:
128
            case MADT_NMI_SRC:
160
            case MADT_NMI_SRC:
129
            case MADT_L_APIC_NMI:
161
            case MADT_L_APIC_NMI:
130
            case MADT_L_APIC_ADDR_OVRD:
162
            case MADT_L_APIC_ADDR_OVRD:
Line 141... Line 173...
141
                if (h->type >= MADT_RESERVED_OEM_BEGIN) {
173
                if (h->type >= MADT_RESERVED_OEM_BEGIN) {
142
                    printf("MADT: skipping OEM entry (type=%d)\n", h->type);
174
                    printf("MADT: skipping OEM entry (type=%d)\n", h->type);
143
                }
175
                }
144
                break;
176
                break;
145
        }
177
        }
146
        prev_type = h->type;
178
   
147
        h = (struct madt_apic_header *) (((__u8 *) h) + h->length);
-
 
-
 
179
   
148
    }
180
    }
-
 
181
   
149
 
182
 
150
    if (madt_l_apic_entry_cnt)
183
    if (madt_l_apic_entry_cnt)
151
        config.cpu_count = madt_l_apic_entry_cnt;
184
        config.cpu_count = madt_l_apic_entry_cnt;
152
}
185
}
153
 
186
 
154
void madt_l_apic_entry(struct madt_l_apic *la, __u8 prev_type)
-
 
155
{
-
 
156
    /* check for consecutiveness */
-
 
157
    if (madt_l_apic_entry_cnt && prev_type != MADT_L_APIC)
-
 
158
    panic("%s entries are not consecuitve\n", entry[MADT_L_APIC]);
-
 
159
 
187
 
-
 
188
void madt_l_apic_entry(struct madt_l_apic *la, __u32 index)
-
 
189
{
160
    if (!madt_l_apic_entry_cnt++)
190
    if (!madt_l_apic_entry_cnt++) {
161
        madt_l_apic_entries = la;
191
        madt_l_apic_entry_index = index;
-
 
192
    }
162
       
193
       
163
    if (!(la->flags & 0x1)) {
194
    if (!(la->flags & 0x1)) {
164
        /* Processor is unusable, skip it. */
195
        /* Processor is unusable, skip it. */
165
        return;
196
        return;
166
    }
197
    }
167
       
198
       
168
    apic_id_mask |= 1<<la->apic_id;
199
    apic_id_mask |= 1<<la->apic_id;
169
}
200
}
170
 
201
 
171
void madt_io_apic_entry(struct madt_io_apic *ioa, __u8 prev_type)
202
void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index)
172
{
203
{
173
    /* check for consecutiveness */
-
 
174
    if (madt_io_apic_entry_cnt && prev_type != MADT_IO_APIC)
-
 
175
    panic("%s entries are not consecuitve\n", entry[MADT_IO_APIC]);
-
 
176
 
-
 
177
    if (!madt_io_apic_entry_cnt++) {
204
    if (!madt_io_apic_entry_cnt++) {
-
 
205
        /* remember index of the first io apic entry */
178
        madt_io_apic_entries = ioa;
206
        madt_io_apic_entry_index = index;
-
 
207
        /* ????!!!! */
179
        io_apic = (__u32 *) (__native) ioa->io_apic_address;
208
        io_apic = (__u32 *) (__native) ioa->io_apic_address;
180
    }
-
 
181
    else {
209
    } else {
182
        /* currently not supported */
210
        /* currently not supported */
183
        return;
211
        return;
184
    }
212
    }
185
}
213
}
186
 
214