Subversion Repositories HelenOS-historic

Rev

Rev 1266 | Rev 1704 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
33 jermar 1
/*
2
 * Copyright (C) 2005 Jakub Jermar
3
 * All rights reserved.
4
 *
5
 * Redistribution and use in source and binary forms, with or without
6
 * modification, are permitted provided that the following conditions
7
 * are met:
8
 *
9
 * - Redistributions of source code must retain the above copyright
10
 *   notice, this list of conditions and the following disclaimer.
11
 * - Redistributions in binary form must reproduce the above copyright
12
 *   notice, this list of conditions and the following disclaimer in the
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
15
 *   derived from this software without specific prior written permission.
16
 *
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
19
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
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
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
26
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
 */
28
 
1702 cejka 29
 /** @addtogroup genarch   
30
 * @{
31
 */
1266 jermar 32
/**
33
 * @file    madt.c
34
 * @brief   Multiple APIC Description Table (MADT) parsing.
35
 */
36
 
34 jermar 37
#include <arch/types.h>
129 jermar 38
#include <typedefs.h>
452 decky 39
#include <genarch/acpi/acpi.h>
40
#include <genarch/acpi/madt.h>
34 jermar 41
#include <arch/smp/apic.h>
129 jermar 42
#include <arch/smp/smp.h>
127 jermar 43
#include <panic.h>
129 jermar 44
#include <debug.h>
45
#include <config.h>
195 vana 46
#include <print.h>
814 palkovsky 47
#include <mm/slab.h>
310 bondari 48
#include <memstr.h>
331 bondari 49
#include <sort.h>
33 jermar 50
 
51
struct acpi_madt *acpi_madt = NULL;
34 jermar 52
 
458 decky 53
#ifdef CONFIG_SMP
34 jermar 54
 
512 jermar 55
/** Standard ISA IRQ map; can be overriden by Interrupt Source Override entries of MADT. */
56
int isa_irq_map[] = { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15 };
57
 
310 bondari 58
static void madt_l_apic_entry(struct madt_l_apic *la, __u32 index);
59
static void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index);
512 jermar 60
static void madt_intr_src_ovrd_entry(struct madt_intr_src_ovrd *override, __u32 index);
331 bondari 61
static int madt_cmp(void * a, void * b);
127 jermar 62
 
63
struct madt_l_apic *madt_l_apic_entries = NULL;
64
struct madt_io_apic *madt_io_apic_entries = NULL;
65
 
370 jermar 66
index_t madt_l_apic_entry_index = 0;
67
index_t madt_io_apic_entry_index = 0;
68
count_t madt_l_apic_entry_cnt = 0;
69
count_t madt_io_apic_entry_cnt = 0;
70
count_t cpu_count = 0;
127 jermar 71
 
310 bondari 72
struct madt_apic_header * * madt_entries_index = NULL;
73
int madt_entries_index_cnt = 0;
74
 
34 jermar 75
char *entry[] = {
76
    "L_APIC",
77
    "IO_APIC",
78
    "INTR_SRC_OVRD",
79
    "NMI_SRC",
80
    "L_APIC_NMI",
81
    "L_APIC_ADDR_OVRD",
82
    "IO_SAPIC",
83
    "L_SAPIC",
84
    "PLATFORM_INTR_SRC"
85
};
86
 
129 jermar 87
/*
88
 * ACPI MADT Implementation of SMP configuration interface.
89
 */
90
static count_t madt_cpu_count(void);
91
static bool madt_cpu_enabled(index_t i);
92
static bool madt_cpu_bootstrap(index_t i);
93
static __u8 madt_cpu_apic_id(index_t i);
512 jermar 94
static int madt_irq_to_pin(int irq);
129 jermar 95
 
96
struct smp_config_operations madt_config_operations = {
97
    .cpu_count = madt_cpu_count,
98
    .cpu_enabled = madt_cpu_enabled,
99
    .cpu_bootstrap = madt_cpu_bootstrap,
512 jermar 100
    .cpu_apic_id = madt_cpu_apic_id,
101
    .irq_to_pin = madt_irq_to_pin
129 jermar 102
};
103
 
512 jermar 104
count_t madt_cpu_count(void)
129 jermar 105
{
106
    return madt_l_apic_entry_cnt;
107
}
108
 
512 jermar 109
bool madt_cpu_enabled(index_t i)
129 jermar 110
{
111
    ASSERT(i < madt_l_apic_entry_cnt);
310 bondari 112
    return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->flags & 0x1;
113
 
129 jermar 114
}
115
 
512 jermar 116
bool madt_cpu_bootstrap(index_t i)
129 jermar 117
{
118
    ASSERT(i < madt_l_apic_entry_cnt);
310 bondari 119
    return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id == l_apic_id();
129 jermar 120
}
121
 
512 jermar 122
__u8 madt_cpu_apic_id(index_t i)
129 jermar 123
{
124
    ASSERT(i < madt_l_apic_entry_cnt);
310 bondari 125
    return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id;
129 jermar 126
}
127
 
512 jermar 128
int madt_irq_to_pin(int irq)
129
{
130
    ASSERT(irq < sizeof(isa_irq_map)/sizeof(int));
131
        return isa_irq_map[irq];
132
}
133
 
331 bondari 134
int madt_cmp(void * a, void * b)
135
{
349 jermar 136
    return
137
        (((struct madt_apic_header *) a)->type > ((struct madt_apic_header *) b)->type) ?
138
        1 :
139
        ((((struct madt_apic_header *) a)->type < ((struct madt_apic_header *) b)->type) ? -1 : 0);
331 bondari 140
}
141
 
34 jermar 142
void acpi_madt_parse(void)
143
{
144
    struct madt_apic_header *end = (struct madt_apic_header *) (((__u8 *) acpi_madt) + acpi_madt->header.length);
310 bondari 145
    struct madt_apic_header *h;
311 bondari 146
 
147
        l_apic = (__u32 *) (__native) acpi_madt->l_apic_address;
34 jermar 148
 
310 bondari 149
    /* calculate madt entries */
150
    for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header *) (((__u8 *) h) + h->length)) {
151
        madt_entries_index_cnt++;
152
    }
127 jermar 153
 
310 bondari 154
    /* create madt apic entries index array */
822 palkovsky 155
    madt_entries_index = (struct madt_apic_header * *) malloc(madt_entries_index_cnt * sizeof(struct madt_apic_header * *), FRAME_ATOMIC);
156
    if (!madt_entries_index)
157
        panic("Memory allocation error.");
34 jermar 158
 
310 bondari 159
    __u32 index = 0;
160
 
161
    for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header *) (((__u8 *) h) + h->length)) {
162
        madt_entries_index[index++] = h;
163
    }
164
 
331 bondari 165
    /* Quicksort MADT index structure */
166
    qsort(madt_entries_index, madt_entries_index_cnt, sizeof(__address), &madt_cmp);
310 bondari 167
 
168
    /* Parse MADT entries */   
169
    for (index = 0; index < madt_entries_index_cnt - 1; index++) {
170
        h = madt_entries_index[index];
34 jermar 171
        switch (h->type) {
172
            case MADT_L_APIC:
310 bondari 173
                madt_l_apic_entry((struct madt_l_apic *) h, index);
127 jermar 174
                break;
34 jermar 175
            case MADT_IO_APIC:
310 bondari 176
                madt_io_apic_entry((struct madt_io_apic *) h, index);
127 jermar 177
                break;
34 jermar 178
            case MADT_INTR_SRC_OVRD:
512 jermar 179
                madt_intr_src_ovrd_entry((struct madt_intr_src_ovrd *) h, index);
180
                break;
34 jermar 181
            case MADT_NMI_SRC:
182
            case MADT_L_APIC_NMI:
183
            case MADT_L_APIC_ADDR_OVRD:
184
            case MADT_IO_SAPIC:
185
            case MADT_L_SAPIC:
186
            case MADT_PLATFORM_INTR_SRC:
1196 cejka 187
                printf("MADT: skipping %s entry (type=%zd)\n", entry[h->type], h->type);
34 jermar 188
                break;
189
 
190
            default:
191
                if (h->type >= MADT_RESERVED_SKIP_BEGIN && h->type <= MADT_RESERVED_SKIP_END) {
1196 cejka 192
                    printf("MADT: skipping reserved entry (type=%zd)\n", h->type);
34 jermar 193
                }
194
                if (h->type >= MADT_RESERVED_OEM_BEGIN) {
1196 cejka 195
                    printf("MADT: skipping OEM entry (type=%zd)\n", h->type);
34 jermar 196
                }
197
                break;
198
        }
310 bondari 199
 
200
 
34 jermar 201
    }
310 bondari 202
 
34 jermar 203
 
370 jermar 204
    if (cpu_count)
205
        config.cpu_count = cpu_count;
34 jermar 206
}
127 jermar 207
 
310 bondari 208
 
209
void madt_l_apic_entry(struct madt_l_apic *la, __u32 index)
127 jermar 210
{
310 bondari 211
    if (!madt_l_apic_entry_cnt++) {
212
        madt_l_apic_entry_index = index;
213
    }
127 jermar 214
 
215
    if (!(la->flags & 0x1)) {
216
        /* Processor is unusable, skip it. */
217
        return;
218
    }
370 jermar 219
 
220
    cpu_count++;   
127 jermar 221
    apic_id_mask |= 1<<la->apic_id;
222
}
223
 
310 bondari 224
void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index)
127 jermar 225
{
226
    if (!madt_io_apic_entry_cnt++) {
310 bondari 227
        /* remember index of the first io apic entry */
228
        madt_io_apic_entry_index = index;
268 palkovsky 229
        io_apic = (__u32 *) (__native) ioa->io_apic_address;
310 bondari 230
    } else {
127 jermar 231
        /* currently not supported */
232
        return;
233
    }
234
}
235
 
512 jermar 236
void madt_intr_src_ovrd_entry(struct madt_intr_src_ovrd *override, __u32 index)
237
{
238
    ASSERT(override->source < sizeof(isa_irq_map)/sizeof(int));
1196 cejka 239
    printf("MADT: ignoring %s entry: bus=%zd, source=%zd, global_int=%zd, flags=%#hX\n",
515 jermar 240
        entry[override->header.type], override->bus, override->source,
241
        override->global_int, override->flags);
512 jermar 242
}
127 jermar 243
 
458 decky 244
#endif /* CONFIG_SMP */
1702 cejka 245
 
246
 /** @}
247
 */
248