d8f7249c2dd0bf3b1750f2e5456370e97150bbb6
[dragonfly.git] / sys / platform / pc64 / acpica / acpi_madt.c
1 /*
2  * Copyright (c) 2009 The DragonFly Project.  All rights reserved.
3  * 
4  * This code is derived from software contributed to The DragonFly Project
5  * by Sepherosa Ziehau <sepherosa@gmail.com>
6  * 
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in
15  *    the documentation and/or other materials provided with the
16  *    distribution.
17  * 3. Neither the name of The DragonFly Project nor the names of its
18  *    contributors may be used to endorse or promote products derived
19  *    from this software without specific, prior written permission.
20  * 
21  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
22  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
23  * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
24  * FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE
25  * COPYRIGHT HOLDERS OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
26  * INCIDENTAL, SPECIAL, EXEMPLARY OR CONSEQUENTIAL DAMAGES (INCLUDING,
27  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
28  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
29  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
30  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
31  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  */
34
35 #include <sys/param.h>
36 #include <sys/bus.h>
37 #include <sys/kernel.h>
38 #include <sys/systm.h>
39
40 #include <machine_base/isa/isa_intr.h>
41 #include <machine_base/apic/lapic.h>
42 #include <machine_base/apic/ioapic.h>
43 #include <machine_base/apic/apicvar.h>
44
45 #include "acpi_sdt.h"
46 #include "acpi_sdt_var.h"
47 #include "acpi_sci_var.h"
48
49 extern int naps;
50
51 #define MADT_VPRINTF(fmt, arg...) \
52 do { \
53         if (bootverbose) \
54                 kprintf("ACPI MADT: " fmt , ##arg); \
55 } while (0)
56
57 /* Multiple APIC Description Table */
58 struct acpi_madt {
59         struct acpi_sdth        madt_hdr;
60         uint32_t                madt_lapic_addr;
61         uint32_t                madt_flags;
62         uint8_t                 madt_ents[1];
63 } __packed;
64
65 /* Common parts of MADT APIC structure */
66 struct acpi_madt_ent {
67         uint8_t                 me_type;        /* MADT_ENT_ */
68         uint8_t                 me_len;
69 } __packed;
70
71 #define MADT_ENT_LAPIC          0
72 #define MADT_ENT_IOAPIC         1
73 #define MADT_ENT_INTSRC         2
74 #define MADT_ENT_LAPIC_ADDR     5
75
76 /* MADT Processor Local APIC */
77 struct acpi_madt_lapic {
78         struct acpi_madt_ent    ml_hdr;
79         uint8_t                 ml_cpu_id;
80         uint8_t                 ml_apic_id;
81         uint32_t                ml_flags;       /* MADT_LAPIC_ */
82 } __packed;
83
84 #define MADT_LAPIC_ENABLED      0x1
85
86 /* MADT I/O APIC */
87 struct acpi_madt_ioapic {
88         struct acpi_madt_ent    mio_hdr;
89         uint8_t                 mio_apic_id;
90         uint8_t                 mio_reserved;
91         uint32_t                mio_addr;
92         uint32_t                mio_gsi_base;
93 } __packed;
94
95 /* MADT Interrupt Source Override */
96 struct acpi_madt_intsrc {
97         struct acpi_madt_ent    mint_hdr;
98         uint8_t                 mint_bus;       /* MADT_INT_BUS_ */
99         uint8_t                 mint_src;
100         uint32_t                mint_gsi;
101         uint16_t                mint_flags;     /* MADT_INT_ */
102 } __packed;
103
104 #define MADT_INT_BUS_ISA        0
105
106 #define MADT_INT_POLA_MASK      0x3
107 #define MADT_INT_POLA_SHIFT     0
108 #define MADT_INT_POLA_CONFORM   0
109 #define MADT_INT_POLA_HIGH      1
110 #define MADT_INT_POLA_RSVD      2
111 #define MADT_INT_POLA_LOW       3
112 #define MADT_INT_TRIG_MASK      0xc
113 #define MADT_INT_TRIG_SHIFT     2
114 #define MADT_INT_TRIG_CONFORM   0
115 #define MADT_INT_TRIG_EDGE      1
116 #define MADT_INT_TRIG_RSVD      2
117 #define MADT_INT_TRIG_LEVEL     3
118
119 /* MADT Local APIC Address Override */
120 struct acpi_madt_lapic_addr {
121         struct acpi_madt_ent    mla_hdr;
122         uint16_t                mla_reserved;
123         uint64_t                mla_lapic_addr;
124 } __packed;
125
126 typedef int                     (*madt_iter_t)(void *,
127                                     const struct acpi_madt_ent *);
128
129 static int                      madt_check(vm_paddr_t);
130 static int                      madt_iterate_entries(struct acpi_madt *,
131                                     madt_iter_t, void *);
132
133 static vm_paddr_t               madt_lapic_pass1(void);
134 static int                      madt_lapic_pass2(int);
135
136 static int                      madt_lapic_enumerate(struct lapic_enumerator *);
137 static int                      madt_lapic_probe(struct lapic_enumerator *);
138
139 static void                     madt_ioapic_enumerate(
140                                     struct ioapic_enumerator *);
141 static int                      madt_ioapic_probe(struct ioapic_enumerator *);
142
143 static vm_paddr_t               madt_phyaddr;
144
145 static void
146 madt_probe(void)
147 {
148         vm_paddr_t madt_paddr;
149
150         KKASSERT(madt_phyaddr == 0);
151
152         madt_paddr = sdt_search(ACPI_MADT_SIG);
153         if (madt_paddr == 0) {
154                 kprintf("madt_probe: can't locate MADT\n");
155                 return;
156         }
157
158         /* Preliminary checks */
159         if (madt_check(madt_paddr)) {
160                 kprintf("madt_probe: madt_check failed\n");
161                 return;
162         }
163
164         madt_phyaddr = madt_paddr;
165 }
166 SYSINIT(madt_probe, SI_BOOT2_PRESMP, SI_ORDER_SECOND, madt_probe, 0);
167
168 static int
169 madt_check(vm_paddr_t madt_paddr)
170 {
171         struct acpi_madt *madt;
172         int error = 0;
173
174         KKASSERT(madt_paddr != 0);
175
176         madt = sdt_sdth_map(madt_paddr);
177         KKASSERT(madt != NULL);
178
179         /*
180          * MADT in ACPI specification 1.0 - 5.0
181          */
182         if (madt->madt_hdr.sdth_rev < 1 || madt->madt_hdr.sdth_rev > 3) {
183                 kprintf("madt_check: unknown MADT revision %d\n",
184                         madt->madt_hdr.sdth_rev);
185         }
186
187         if (madt->madt_hdr.sdth_len <
188             sizeof(*madt) - sizeof(madt->madt_ents)) {
189                 kprintf("madt_check: invalid MADT length %u\n",
190                         madt->madt_hdr.sdth_len);
191                 error = EINVAL;
192                 goto back;
193         }
194 back:
195         sdt_sdth_unmap(&madt->madt_hdr);
196         return error;
197 }
198
199 static int
200 madt_iterate_entries(struct acpi_madt *madt, madt_iter_t func, void *arg)
201 {
202         int size, cur, error;
203
204         size = madt->madt_hdr.sdth_len -
205                (sizeof(*madt) - sizeof(madt->madt_ents));
206         cur = 0;
207         error = 0;
208
209         while (size - cur > sizeof(struct acpi_madt_ent)) {
210                 const struct acpi_madt_ent *ent;
211
212                 ent = (const struct acpi_madt_ent *)&madt->madt_ents[cur];
213                 if (ent->me_len < sizeof(*ent)) {
214                         kprintf("madt_iterate_entries: invalid MADT "
215                                 "entry len %d\n", ent->me_len);
216                         error = EINVAL;
217                         break;
218                 }
219                 if (ent->me_len > (size - cur)) {
220                         kprintf("madt_iterate_entries: invalid MADT "
221                                 "entry len %d, > table length\n", ent->me_len);
222                         error = EINVAL;
223                         break;
224                 }
225
226                 cur += ent->me_len;
227
228                 /*
229                  * Only Local APIC, I/O APIC and Interrupt Source Override
230                  * are defined in ACPI specification 1.0 - 5.0
231                  */
232                 switch (ent->me_type) {
233                 case MADT_ENT_LAPIC:
234                         if (ent->me_len < sizeof(struct acpi_madt_lapic)) {
235                                 kprintf("madt_iterate_entries: invalid MADT "
236                                         "lapic entry len %d\n", ent->me_len);
237                                 error = EINVAL;
238                         }
239                         break;
240
241                 case MADT_ENT_IOAPIC:
242                         if (ent->me_len < sizeof(struct acpi_madt_ioapic)) {
243                                 kprintf("madt_iterate_entries: invalid MADT "
244                                         "ioapic entry len %d\n", ent->me_len);
245                                 error = EINVAL;
246                         }
247                         break;
248
249                 case MADT_ENT_INTSRC:
250                         if (ent->me_len < sizeof(struct acpi_madt_intsrc)) {
251                                 kprintf("madt_iterate_entries: invalid MADT "
252                                         "intsrc entry len %d\n",
253                                         ent->me_len);
254                                 error = EINVAL;
255                         }
256                         break;
257                 }
258                 if (error)
259                         break;
260
261                 error = func(arg, ent);
262                 if (error)
263                         break;
264         }
265         return error;
266 }
267
268 static int
269 madt_lapic_pass1_callback(void *xarg, const struct acpi_madt_ent *ent)
270 {
271         const struct acpi_madt_lapic_addr *lapic_addr_ent;
272         uint64_t *addr64 = xarg;
273
274         if (ent->me_type != MADT_ENT_LAPIC_ADDR)
275                 return 0;
276         if (ent->me_len < sizeof(*lapic_addr_ent)) {
277                 kprintf("madt_lapic_pass1: "
278                         "invalid LAPIC address override length\n");
279                 return 0;
280         }
281         lapic_addr_ent = (const struct acpi_madt_lapic_addr *)ent;
282
283         *addr64 = lapic_addr_ent->mla_lapic_addr;
284         return 0;
285 }
286
287 static vm_paddr_t
288 madt_lapic_pass1(void)
289 {
290         struct acpi_madt *madt;
291         vm_paddr_t lapic_addr;
292         uint64_t lapic_addr64;
293         int error;
294
295         KKASSERT(madt_phyaddr != 0);
296
297         madt = sdt_sdth_map(madt_phyaddr);
298         KKASSERT(madt != NULL);
299
300         MADT_VPRINTF("LAPIC address 0x%x, flags %#x\n",
301                      madt->madt_lapic_addr, madt->madt_flags);
302         lapic_addr = madt->madt_lapic_addr;
303
304         lapic_addr64 = 0;
305         error = madt_iterate_entries(madt, madt_lapic_pass1_callback,
306                                      &lapic_addr64);
307         if (error)
308                 panic("madt_iterate_entries(pass1) failed");
309
310         if (lapic_addr64 != 0) {
311                 kprintf("ACPI MADT: 64bits lapic address 0x%lx\n",
312                         lapic_addr64);
313                 lapic_addr = lapic_addr64;
314         }
315
316         sdt_sdth_unmap(&madt->madt_hdr);
317
318         return lapic_addr;
319 }
320
321 struct madt_lapic_pass2_cbarg {
322         int     cpu;
323         int     bsp_found;
324         int     bsp_apic_id;
325 };
326
327 static int
328 madt_lapic_pass2_callback(void *xarg, const struct acpi_madt_ent *ent)
329 {
330         const struct acpi_madt_lapic *lapic_ent;
331         struct madt_lapic_pass2_cbarg *arg = xarg;
332
333         if (ent->me_type != MADT_ENT_LAPIC)
334                 return 0;
335
336         lapic_ent = (const struct acpi_madt_lapic *)ent;
337         if (lapic_ent->ml_flags & MADT_LAPIC_ENABLED) {
338                 MADT_VPRINTF("cpu id %d, apic id %d\n",
339                              lapic_ent->ml_cpu_id, lapic_ent->ml_apic_id);
340                 if (lapic_ent->ml_apic_id == arg->bsp_apic_id) {
341                         lapic_set_cpuid(0, lapic_ent->ml_apic_id);
342                         arg->bsp_found = 1;
343                 } else {
344                         lapic_set_cpuid(arg->cpu, lapic_ent->ml_apic_id);
345                         arg->cpu++;
346                 }
347         }
348         return 0;
349 }
350
351 static int
352 madt_lapic_pass2(int bsp_apic_id)
353 {
354         struct acpi_madt *madt;
355         struct madt_lapic_pass2_cbarg arg;
356         int error;
357
358         MADT_VPRINTF("BSP apic id %d\n", bsp_apic_id);
359
360         KKASSERT(madt_phyaddr != 0);
361
362         madt = sdt_sdth_map(madt_phyaddr);
363         KKASSERT(madt != NULL);
364
365         bzero(&arg, sizeof(arg));
366         arg.cpu = 1;
367         arg.bsp_apic_id = bsp_apic_id;
368
369         error = madt_iterate_entries(madt, madt_lapic_pass2_callback, &arg);
370         if (error)
371                 panic("madt_iterate_entries(pass2) failed");
372
373         KKASSERT(arg.bsp_found);
374         naps = arg.cpu - 1; /* exclude BSP */
375
376         sdt_sdth_unmap(&madt->madt_hdr);
377
378         return 0;
379 }
380
381 struct madt_lapic_probe_cbarg {
382         int             cpu_count;
383         vm_paddr_t      lapic_addr;
384 };
385
386 static int
387 madt_lapic_probe_callback(void *xarg, const struct acpi_madt_ent *ent)
388 {
389         struct madt_lapic_probe_cbarg *arg = xarg;
390
391         if (ent->me_type == MADT_ENT_LAPIC) {
392                 const struct acpi_madt_lapic *lapic_ent;
393
394                 lapic_ent = (const struct acpi_madt_lapic *)ent;
395                 if (lapic_ent->ml_flags & MADT_LAPIC_ENABLED) {
396                         arg->cpu_count++;
397                         if (lapic_ent->ml_apic_id == APICID_MAX) {
398                                 kprintf("madt_lapic_probe: "
399                                     "invalid LAPIC apic id %d\n",
400                                     lapic_ent->ml_apic_id);
401                                 return EINVAL;
402                         }
403                 }
404         } else if (ent->me_type == MADT_ENT_LAPIC_ADDR) {
405                 const struct acpi_madt_lapic_addr *lapic_addr_ent;
406
407                 if (ent->me_len < sizeof(*lapic_addr_ent)) {
408                         kprintf("madt_lapic_probe: "
409                                 "invalid LAPIC address override length\n");
410                         return 0;
411                 }
412                 lapic_addr_ent = (const struct acpi_madt_lapic_addr *)ent;
413
414                 if (lapic_addr_ent->mla_lapic_addr != 0)
415                         arg->lapic_addr = lapic_addr_ent->mla_lapic_addr;
416         }
417         return 0;
418 }
419
420 static int
421 madt_lapic_probe(struct lapic_enumerator *e)
422 {
423         struct madt_lapic_probe_cbarg arg;
424         struct acpi_madt *madt;
425         int error;
426
427         if (madt_phyaddr == 0)
428                 return ENXIO;
429
430         madt = sdt_sdth_map(madt_phyaddr);
431         KKASSERT(madt != NULL);
432
433         bzero(&arg, sizeof(arg));
434         arg.lapic_addr = madt->madt_lapic_addr;
435
436         error = madt_iterate_entries(madt, madt_lapic_probe_callback, &arg);
437         if (!error) {
438                 if (arg.cpu_count == 0) {
439                         kprintf("madt_lapic_probe: no CPU is found\n");
440                         error = EOPNOTSUPP;
441                 }
442                 if (arg.lapic_addr == 0) {
443                         kprintf("madt_lapic_probe: zero LAPIC address\n");
444                         error = EOPNOTSUPP;
445                 }
446         }
447
448         sdt_sdth_unmap(&madt->madt_hdr);
449         return error;
450 }
451
452 static int
453 madt_lapic_enumerate(struct lapic_enumerator *e)
454 {
455         vm_paddr_t lapic_addr;
456         int bsp_apic_id;
457
458         KKASSERT(madt_phyaddr != 0);
459
460         lapic_addr = madt_lapic_pass1();
461         if (lapic_addr == 0)
462                 panic("madt_lapic_enumerate: no local apic");
463
464         lapic_map(lapic_addr);
465
466         bsp_apic_id = APIC_ID(lapic->id);
467         if (bsp_apic_id == APICID_MAX) {
468                 /*
469                  * XXX
470                  * Some old brain dead BIOS will set BSP's LAPIC apic id
471                  * to 255, though all LAPIC entries in MADT are valid.
472                  */
473                 kprintf("%s invalid BSP LAPIC apic id %d\n", __func__,
474                     bsp_apic_id);
475                 return EINVAL;
476         }
477
478         if (madt_lapic_pass2(bsp_apic_id))
479                 panic("madt_lapic_enumerate: madt_lapic_pass2 failed");
480
481         return 0;
482 }
483
484 static struct lapic_enumerator  madt_lapic_enumerator = {
485         .lapic_prio = LAPIC_ENUM_PRIO_MADT,
486         .lapic_probe = madt_lapic_probe,
487         .lapic_enumerate = madt_lapic_enumerate
488 };
489
490 static void
491 madt_lapic_enum_register(void)
492 {
493         int prio;
494
495         prio = LAPIC_ENUM_PRIO_MADT;
496         kgetenv_int("hw.madt_lapic_prio", &prio);
497         madt_lapic_enumerator.lapic_prio = prio;
498
499         lapic_enumerator_register(&madt_lapic_enumerator);
500 }
501 SYSINIT(madt_lapic, SI_BOOT2_PRESMP, SI_ORDER_ANY, madt_lapic_enum_register, 0);
502
503 struct madt_ioapic_probe_cbarg {
504         int     ioapic_cnt;
505         int     gsi_base0;
506 };
507
508 static int
509 madt_ioapic_probe_callback(void *xarg, const struct acpi_madt_ent *ent)
510 {
511         struct madt_ioapic_probe_cbarg *arg = xarg;
512
513         if (ent->me_type == MADT_ENT_INTSRC) {
514                 const struct acpi_madt_intsrc *intsrc_ent;
515                 int trig, pola;
516
517                 intsrc_ent = (const struct acpi_madt_intsrc *)ent;
518
519                 if (intsrc_ent->mint_src >= ISA_IRQ_CNT) {
520                         kprintf("madt_ioapic_probe: invalid intsrc irq (%d)\n",
521                                 intsrc_ent->mint_src);
522                         return EINVAL;
523                 }
524
525                 if (intsrc_ent->mint_bus != MADT_INT_BUS_ISA) {
526                         kprintf("ACPI MADT: warning intsrc irq %d "
527                                 "bus is not ISA (%d)\n",
528                                 intsrc_ent->mint_src, intsrc_ent->mint_bus);
529                 }
530
531                 trig = (intsrc_ent->mint_flags & MADT_INT_TRIG_MASK) >>
532                        MADT_INT_TRIG_SHIFT;
533                 if (trig == MADT_INT_TRIG_RSVD) {
534                         kprintf("ACPI MADT: warning invalid intsrc irq %d "
535                                 "trig, reserved\n", intsrc_ent->mint_src);
536                 } else if (trig == MADT_INT_TRIG_LEVEL) {
537                         MADT_VPRINTF("warning invalid intsrc irq %d "
538                             "trig, level\n", intsrc_ent->mint_src);
539                 }
540
541                 pola = (intsrc_ent->mint_flags & MADT_INT_POLA_MASK) >>
542                        MADT_INT_POLA_SHIFT;
543                 if (pola == MADT_INT_POLA_RSVD) {
544                         kprintf("ACPI MADT: warning invalid intsrc irq %d "
545                                 "pola, reserved\n", intsrc_ent->mint_src);
546                 } else if (pola == MADT_INT_POLA_LOW) {
547                         MADT_VPRINTF("warning invalid intsrc irq %d "
548                             "pola, low\n", intsrc_ent->mint_src);
549                 }
550         } else if (ent->me_type == MADT_ENT_IOAPIC) {
551                 const struct acpi_madt_ioapic *ioapic_ent;
552
553                 ioapic_ent = (const struct acpi_madt_ioapic *)ent;
554                 if (ioapic_ent->mio_addr == 0) {
555                         kprintf("madt_ioapic_probe: zero IOAPIC address\n");
556                         return EINVAL;
557                 }
558                 if (ioapic_ent->mio_apic_id == APICID_MAX) {
559                         kprintf("madt_ioapic_probe: "
560                             "invalid IOAPIC apic id %d\n",
561                             ioapic_ent->mio_apic_id);
562                         return EINVAL;
563                 }
564
565                 arg->ioapic_cnt++;
566                 if (ioapic_ent->mio_gsi_base == 0)
567                         arg->gsi_base0 = 1;
568         }
569         return 0;
570 }
571
572 static int
573 madt_ioapic_probe(struct ioapic_enumerator *e)
574 {
575         struct madt_ioapic_probe_cbarg arg;
576         struct acpi_madt *madt;
577         int error;
578
579         if (madt_phyaddr == 0)
580                 return ENXIO;
581
582         madt = sdt_sdth_map(madt_phyaddr);
583         KKASSERT(madt != NULL);
584
585         bzero(&arg, sizeof(arg));
586
587         error = madt_iterate_entries(madt, madt_ioapic_probe_callback, &arg);
588         if (!error) {
589                 if (arg.ioapic_cnt == 0) {
590                         kprintf("madt_ioapic_probe: no IOAPIC\n");
591                         error = ENXIO;
592                 }
593                 if (!arg.gsi_base0) {
594                         kprintf("madt_ioapic_probe: no GSI base 0\n");
595                         error = EINVAL;
596                 }
597         }
598
599         sdt_sdth_unmap(&madt->madt_hdr);
600         return error;
601 }
602
603 static int
604 madt_ioapic_enum_callback(void *xarg, const struct acpi_madt_ent *ent)
605 {
606         if (ent->me_type == MADT_ENT_INTSRC) {
607                 const struct acpi_madt_intsrc *intsrc_ent;
608                 enum intr_trigger trig;
609                 enum intr_polarity pola;
610                 int ent_trig, ent_pola;
611
612                 intsrc_ent = (const struct acpi_madt_intsrc *)ent;
613
614                 KKASSERT(intsrc_ent->mint_src < ISA_IRQ_CNT);
615                 if (intsrc_ent->mint_bus != MADT_INT_BUS_ISA)
616                         return 0;
617
618                 ent_trig = (intsrc_ent->mint_flags & MADT_INT_TRIG_MASK) >>
619                     MADT_INT_TRIG_SHIFT;
620                 if (ent_trig == MADT_INT_TRIG_RSVD)
621                         return 0;
622                 else if (ent_trig == MADT_INT_TRIG_LEVEL)
623                         trig = INTR_TRIGGER_LEVEL;
624                 else
625                         trig = INTR_TRIGGER_EDGE;
626
627                 ent_pola = (intsrc_ent->mint_flags & MADT_INT_POLA_MASK) >>
628                     MADT_INT_POLA_SHIFT;
629                 if (ent_pola == MADT_INT_POLA_RSVD)
630                         return 0;
631                 else if (ent_pola == MADT_INT_POLA_LOW)
632                         pola = INTR_POLARITY_LOW;
633                 else
634                         pola = INTR_POLARITY_HIGH;
635
636                 if (intsrc_ent->mint_src == acpi_sci_irqno()) {
637                         acpi_sci_setmode1(trig, pola);
638                         MADT_VPRINTF("SCI irq %d, first test %s/%s\n",
639                             intsrc_ent->mint_src,
640                             intr_str_trigger(trig), intr_str_polarity(pola));
641                 }
642
643                 /*
644                  * We ignore the polarity and trigger changes, since
645                  * most of them are wrong or useless at best.
646                  */
647                 if (intsrc_ent->mint_src == intsrc_ent->mint_gsi) {
648                         /* Nothing changed */
649                         return 0;
650                 }
651                 trig = INTR_TRIGGER_EDGE;
652                 pola = INTR_POLARITY_HIGH;
653
654                 MADT_VPRINTF("INTSRC irq %d -> gsi %u %s/%s\n",
655                              intsrc_ent->mint_src, intsrc_ent->mint_gsi,
656                              intr_str_trigger(trig), intr_str_polarity(pola));
657                 ioapic_intsrc(intsrc_ent->mint_src, intsrc_ent->mint_gsi,
658                               trig, pola);
659         } else if (ent->me_type == MADT_ENT_IOAPIC) {
660                 const struct acpi_madt_ioapic *ioapic_ent;
661                 uint32_t ver;
662                 void *addr;
663                 int npin;
664
665                 ioapic_ent = (const struct acpi_madt_ioapic *)ent;
666                 MADT_VPRINTF("IOAPIC addr 0x%08x, apic id %d, gsi base %u\n",
667                              ioapic_ent->mio_addr, ioapic_ent->mio_apic_id,
668                              ioapic_ent->mio_gsi_base);
669
670                 addr = ioapic_map(ioapic_ent->mio_addr);
671
672                 ver = ioapic_read(addr, IOAPIC_VER);
673                 npin = ((ver & IOART_VER_MAXREDIR) >> MAXREDIRSHIFT) + 1;
674
675                 ioapic_add(addr, ioapic_ent->mio_gsi_base, npin);
676         }
677         return 0;
678 }
679
680 static void
681 madt_ioapic_enumerate(struct ioapic_enumerator *e)
682 {
683         struct acpi_madt *madt;
684         int error;
685
686         KKASSERT(madt_phyaddr != 0);
687
688         madt = sdt_sdth_map(madt_phyaddr);
689         KKASSERT(madt != NULL);
690
691         error = madt_iterate_entries(madt, madt_ioapic_enum_callback, NULL);
692         if (error)
693                 panic("madt_ioapic_enumerate failed");
694
695         sdt_sdth_unmap(&madt->madt_hdr);
696 }
697
698 static struct ioapic_enumerator madt_ioapic_enumerator = {
699         .ioapic_prio = IOAPIC_ENUM_PRIO_MADT,
700         .ioapic_probe = madt_ioapic_probe,
701         .ioapic_enumerate = madt_ioapic_enumerate
702 };
703
704 static void
705 madt_ioapic_enum_register(void)
706 {
707         int prio;
708
709         prio = IOAPIC_ENUM_PRIO_MADT;
710         kgetenv_int("hw.madt_ioapic_prio", &prio);
711         madt_ioapic_enumerator.ioapic_prio = prio;
712
713         ioapic_enumerator_register(&madt_ioapic_enumerator);
714 }
715 SYSINIT(madt_ioapic, SI_BOOT2_PRESMP, SI_ORDER_ANY,
716         madt_ioapic_enum_register, 0);