Rev 334 | Rev 370 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 334 | Rev 349 | ||
---|---|---|---|
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 <typedefs.h> |
31 | #include <arch/acpi/acpi.h> |
31 | #include <arch/acpi/acpi.h> |
32 | #include <arch/acpi/madt.h> |
32 | #include <arch/acpi/madt.h> |
33 | #include <arch/smp/apic.h> |
33 | #include <arch/smp/apic.h> |
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> |
39 | #include <mm/heap.h> |
40 | #include <memstr.h> |
40 | #include <memstr.h> |
41 | #include <sort.h> |
41 | #include <sort.h> |
42 | 42 | ||
43 | struct acpi_madt *acpi_madt = NULL; |
43 | struct acpi_madt *acpi_madt = NULL; |
44 | 44 | ||
45 | #ifdef __SMP__ |
45 | #ifdef __SMP__ |
46 | 46 | ||
47 | static void madt_l_apic_entry(struct madt_l_apic *la, __u32 index); |
47 | static void madt_l_apic_entry(struct madt_l_apic *la, __u32 index); |
48 | static void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index); |
48 | static void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index); |
49 | static int madt_cmp(void * a, void * b); |
49 | static int madt_cmp(void * a, void * b); |
50 | 50 | ||
51 | struct madt_l_apic *madt_l_apic_entries = NULL; |
51 | struct madt_l_apic *madt_l_apic_entries = NULL; |
52 | struct madt_io_apic *madt_io_apic_entries = NULL; |
52 | struct madt_io_apic *madt_io_apic_entries = NULL; |
53 | 53 | ||
54 | __u32 madt_l_apic_entry_index = 0; |
54 | __u32 madt_l_apic_entry_index = 0; |
55 | __u32 madt_io_apic_entry_index = 0; |
55 | __u32 madt_io_apic_entry_index = 0; |
56 | int madt_l_apic_entry_cnt = 0; |
56 | int madt_l_apic_entry_cnt = 0; |
57 | int madt_io_apic_entry_cnt = 0; |
57 | int madt_io_apic_entry_cnt = 0; |
58 | 58 | ||
59 | struct madt_apic_header * * madt_entries_index = NULL; |
59 | struct madt_apic_header * * madt_entries_index = NULL; |
60 | int madt_entries_index_cnt = 0; |
60 | int madt_entries_index_cnt = 0; |
61 | 61 | ||
62 | char *entry[] = { |
62 | char *entry[] = { |
63 | "L_APIC", |
63 | "L_APIC", |
64 | "IO_APIC", |
64 | "IO_APIC", |
65 | "INTR_SRC_OVRD", |
65 | "INTR_SRC_OVRD", |
66 | "NMI_SRC", |
66 | "NMI_SRC", |
67 | "L_APIC_NMI", |
67 | "L_APIC_NMI", |
68 | "L_APIC_ADDR_OVRD", |
68 | "L_APIC_ADDR_OVRD", |
69 | "IO_SAPIC", |
69 | "IO_SAPIC", |
70 | "L_SAPIC", |
70 | "L_SAPIC", |
71 | "PLATFORM_INTR_SRC" |
71 | "PLATFORM_INTR_SRC" |
72 | }; |
72 | }; |
73 | 73 | ||
74 | /* |
74 | /* |
75 | * ACPI MADT Implementation of SMP configuration interface. |
75 | * ACPI MADT Implementation of SMP configuration interface. |
76 | */ |
76 | */ |
77 | static count_t madt_cpu_count(void); |
77 | static count_t madt_cpu_count(void); |
78 | static bool madt_cpu_enabled(index_t i); |
78 | static bool madt_cpu_enabled(index_t i); |
79 | static bool madt_cpu_bootstrap(index_t i); |
79 | static bool madt_cpu_bootstrap(index_t i); |
80 | static __u8 madt_cpu_apic_id(index_t i); |
80 | static __u8 madt_cpu_apic_id(index_t i); |
81 | 81 | ||
82 | struct smp_config_operations madt_config_operations = { |
82 | struct smp_config_operations madt_config_operations = { |
83 | .cpu_count = madt_cpu_count, |
83 | .cpu_count = madt_cpu_count, |
84 | .cpu_enabled = madt_cpu_enabled, |
84 | .cpu_enabled = madt_cpu_enabled, |
85 | .cpu_bootstrap = madt_cpu_bootstrap, |
85 | .cpu_bootstrap = madt_cpu_bootstrap, |
86 | .cpu_apic_id = madt_cpu_apic_id |
86 | .cpu_apic_id = madt_cpu_apic_id |
87 | }; |
87 | }; |
88 | 88 | ||
89 | static count_t madt_cpu_count(void) |
89 | static count_t madt_cpu_count(void) |
90 | { |
90 | { |
91 | return madt_l_apic_entry_cnt; |
91 | return madt_l_apic_entry_cnt; |
92 | } |
92 | } |
93 | 93 | ||
94 | static bool madt_cpu_enabled(index_t i) |
94 | static bool madt_cpu_enabled(index_t i) |
95 | { |
95 | { |
96 | ASSERT(i < madt_l_apic_entry_cnt); |
96 | ASSERT(i < madt_l_apic_entry_cnt); |
97 | return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->flags & 0x1; |
97 | return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->flags & 0x1; |
98 | 98 | ||
99 | } |
99 | } |
100 | 100 | ||
101 | static bool madt_cpu_bootstrap(index_t i) |
101 | static bool madt_cpu_bootstrap(index_t i) |
102 | { |
102 | { |
103 | ASSERT(i < madt_l_apic_entry_cnt); |
103 | ASSERT(i < madt_l_apic_entry_cnt); |
104 | return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id == l_apic_id(); |
104 | return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id == l_apic_id(); |
105 | } |
105 | } |
106 | 106 | ||
107 | static __u8 madt_cpu_apic_id(index_t i) |
107 | static __u8 madt_cpu_apic_id(index_t i) |
108 | { |
108 | { |
109 | ASSERT(i < madt_l_apic_entry_cnt); |
109 | ASSERT(i < madt_l_apic_entry_cnt); |
110 | return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id; |
110 | return ((struct madt_l_apic *) madt_entries_index[madt_l_apic_entry_index + i])->apic_id; |
111 | } |
111 | } |
112 | 112 | ||
113 | int madt_cmp(void * a, void * b) |
113 | int madt_cmp(void * a, void * b) |
114 | { |
114 | { |
115 | return |
115 | return |
116 | (((struct madt_apic_header *) a)->type > ((struct madt_apic_header *) b)->type) ? |
116 | (((struct madt_apic_header *) a)->type > ((struct madt_apic_header *) b)->type) ? |
117 | 1 : |
117 | 1 : |
118 | ((((struct madt_apic_header *) a)->type < ((struct madt_apic_header *) b)->type) ? -1 : 0); |
118 | ((((struct madt_apic_header *) a)->type < ((struct madt_apic_header *) b)->type) ? -1 : 0); |
119 | } |
119 | } |
120 | 120 | ||
121 | void acpi_madt_parse(void) |
121 | void acpi_madt_parse(void) |
122 | { |
122 | { |
123 | - | ||
124 | - | ||
125 | struct madt_apic_header *end = (struct madt_apic_header *) (((__u8 *) acpi_madt) + acpi_madt->header.length); |
123 | struct madt_apic_header *end = (struct madt_apic_header *) (((__u8 *) acpi_madt) + acpi_madt->header.length); |
126 | struct madt_apic_header *h; |
124 | struct madt_apic_header *h; |
127 | 125 | ||
128 | l_apic = (__u32 *) (__native) acpi_madt->l_apic_address; |
126 | l_apic = (__u32 *) (__native) acpi_madt->l_apic_address; |
129 | 127 | ||
130 | /* calculate madt entries */ |
128 | /* calculate madt entries */ |
131 | for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header *) (((__u8 *) h) + h->length)) { |
129 | for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header *) (((__u8 *) h) + h->length)) { |
132 | madt_entries_index_cnt++; |
130 | madt_entries_index_cnt++; |
133 | } |
131 | } |
134 | 132 | ||
135 | /* create madt apic entries index array */ |
133 | /* create madt apic entries index array */ |
136 | madt_entries_index = (struct madt_apic_header * *) malloc(madt_entries_index_cnt * sizeof(struct madt_apic_header * *)); |
134 | madt_entries_index = (struct madt_apic_header * *) malloc(madt_entries_index_cnt * sizeof(struct madt_apic_header * *)); |
137 | 135 | ||
138 | __u32 index = 0; |
136 | __u32 index = 0; |
139 | 137 | ||
140 | for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header *) (((__u8 *) h) + h->length)) { |
138 | for (h = &acpi_madt->apic_header[0]; h < end; h = (struct madt_apic_header *) (((__u8 *) h) + h->length)) { |
141 | madt_entries_index[index++] = h; |
139 | madt_entries_index[index++] = h; |
142 | } |
140 | } |
143 | 141 | ||
144 | /* Quicksort MADT index structure */ |
142 | /* Quicksort MADT index structure */ |
145 | qsort(madt_entries_index, madt_entries_index_cnt, sizeof(__address), &madt_cmp); |
143 | qsort(madt_entries_index, madt_entries_index_cnt, sizeof(__address), &madt_cmp); |
146 | 144 | ||
147 | /* Parse MADT entries */ |
145 | /* Parse MADT entries */ |
148 | for (index = 0; index < madt_entries_index_cnt - 1; index++) { |
146 | for (index = 0; index < madt_entries_index_cnt - 1; index++) { |
149 | h = madt_entries_index[index]; |
147 | h = madt_entries_index[index]; |
150 | switch (h->type) { |
148 | switch (h->type) { |
151 | case MADT_L_APIC: |
149 | case MADT_L_APIC: |
152 | madt_l_apic_entry((struct madt_l_apic *) h, index); |
150 | madt_l_apic_entry((struct madt_l_apic *) h, index); |
153 | break; |
151 | break; |
154 | case MADT_IO_APIC: |
152 | case MADT_IO_APIC: |
155 | madt_io_apic_entry((struct madt_io_apic *) h, index); |
153 | madt_io_apic_entry((struct madt_io_apic *) h, index); |
156 | break; |
154 | break; |
157 | case MADT_INTR_SRC_OVRD: |
155 | case MADT_INTR_SRC_OVRD: |
158 | case MADT_NMI_SRC: |
156 | case MADT_NMI_SRC: |
159 | case MADT_L_APIC_NMI: |
157 | case MADT_L_APIC_NMI: |
160 | case MADT_L_APIC_ADDR_OVRD: |
158 | case MADT_L_APIC_ADDR_OVRD: |
161 | case MADT_IO_SAPIC: |
159 | case MADT_IO_SAPIC: |
162 | case MADT_L_SAPIC: |
160 | case MADT_L_SAPIC: |
163 | case MADT_PLATFORM_INTR_SRC: |
161 | case MADT_PLATFORM_INTR_SRC: |
164 | printf("MADT: skipping %s entry (type=%d)\n", entry[h->type], h->type); |
162 | printf("MADT: skipping %s entry (type=%d)\n", entry[h->type], h->type); |
165 | break; |
163 | break; |
166 | 164 | ||
167 | default: |
165 | default: |
168 | if (h->type >= MADT_RESERVED_SKIP_BEGIN && h->type <= MADT_RESERVED_SKIP_END) { |
166 | if (h->type >= MADT_RESERVED_SKIP_BEGIN && h->type <= MADT_RESERVED_SKIP_END) { |
169 | printf("MADT: skipping reserved entry (type=%d)\n", h->type); |
167 | printf("MADT: skipping reserved entry (type=%d)\n", h->type); |
170 | } |
168 | } |
171 | if (h->type >= MADT_RESERVED_OEM_BEGIN) { |
169 | if (h->type >= MADT_RESERVED_OEM_BEGIN) { |
172 | printf("MADT: skipping OEM entry (type=%d)\n", h->type); |
170 | printf("MADT: skipping OEM entry (type=%d)\n", h->type); |
173 | } |
171 | } |
174 | break; |
172 | break; |
175 | } |
173 | } |
176 | 174 | ||
177 | 175 | ||
178 | } |
176 | } |
179 | 177 | ||
180 | 178 | ||
181 | if (madt_l_apic_entry_cnt) |
179 | if (madt_l_apic_entry_cnt) |
182 | config.cpu_count = madt_l_apic_entry_cnt; |
180 | config.cpu_count = madt_l_apic_entry_cnt; |
183 | } |
181 | } |
184 | 182 | ||
185 | 183 | ||
186 | void madt_l_apic_entry(struct madt_l_apic *la, __u32 index) |
184 | void madt_l_apic_entry(struct madt_l_apic *la, __u32 index) |
187 | { |
185 | { |
188 | if (!madt_l_apic_entry_cnt++) { |
186 | if (!madt_l_apic_entry_cnt++) { |
189 | madt_l_apic_entry_index = index; |
187 | madt_l_apic_entry_index = index; |
190 | } |
188 | } |
191 | 189 | ||
192 | if (!(la->flags & 0x1)) { |
190 | if (!(la->flags & 0x1)) { |
193 | /* Processor is unusable, skip it. */ |
191 | /* Processor is unusable, skip it. */ |
194 | return; |
192 | return; |
195 | } |
193 | } |
196 | 194 | ||
197 | apic_id_mask |= 1<<la->apic_id; |
195 | apic_id_mask |= 1<<la->apic_id; |
198 | } |
196 | } |
199 | 197 | ||
200 | void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index) |
198 | void madt_io_apic_entry(struct madt_io_apic *ioa, __u32 index) |
201 | { |
199 | { |
202 | if (!madt_io_apic_entry_cnt++) { |
200 | if (!madt_io_apic_entry_cnt++) { |
203 | /* remember index of the first io apic entry */ |
201 | /* remember index of the first io apic entry */ |
204 | madt_io_apic_entry_index = index; |
202 | madt_io_apic_entry_index = index; |
205 | io_apic = (__u32 *) (__native) ioa->io_apic_address; |
203 | io_apic = (__u32 *) (__native) ioa->io_apic_address; |
206 | } else { |
204 | } else { |
207 | /* currently not supported */ |
205 | /* currently not supported */ |
208 | return; |
206 | return; |
209 | } |
207 | } |
210 | } |
208 | } |
211 | 209 | ||
212 | 210 | ||
213 | #endif /* __SMP__ */ |
211 | #endif /* __SMP__ */ |
214 | 212 |