Merge master.kernel.org:/pub/scm/linux/kernel/git/jejb/scsi-rc-fixes-2.6
[linux-2.6] / arch / i386 / kernel / acpi / boot.c
1 /*
2  *  boot.c - Architecture-Specific Low-Level ACPI Boot Support
3  *
4  *  Copyright (C) 2001, 2002 Paul Diefenbaugh <paul.s.diefenbaugh@intel.com>
5  *  Copyright (C) 2001 Jun Nakajima <jun.nakajima@intel.com>
6  *
7  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
8  *
9  *  This program is free software; you can redistribute it and/or modify
10  *  it under the terms of the GNU General Public License as published by
11  *  the Free Software Foundation; either version 2 of the License, or
12  *  (at your option) any later version.
13  *
14  *  This program is distributed in the hope that it will be useful,
15  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
16  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  *  GNU General Public License for more details.
18  *
19  *  You should have received a copy of the GNU General Public License
20  *  along with this program; if not, write to the Free Software
21  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
22  *
23  * ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
24  */
25
26 #include <linux/init.h>
27 #include <linux/config.h>
28 #include <linux/acpi.h>
29 #include <linux/efi.h>
30 #include <linux/module.h>
31 #include <linux/dmi.h>
32 #include <linux/irq.h>
33
34 #include <asm/pgtable.h>
35 #include <asm/io_apic.h>
36 #include <asm/apic.h>
37 #include <asm/io.h>
38 #include <asm/mpspec.h>
39
40 #ifdef  CONFIG_X86_64
41
42 extern void __init clustered_apic_check(void);
43
44 extern int gsi_irq_sharing(int gsi);
45 #include <asm/proto.h>
46
47 static inline int acpi_madt_oem_check(char *oem_id, char *oem_table_id) { return 0; }
48
49
50 #else                           /* X86 */
51
52 #ifdef  CONFIG_X86_LOCAL_APIC
53 #include <mach_apic.h>
54 #include <mach_mpparse.h>
55 #endif                          /* CONFIG_X86_LOCAL_APIC */
56
57 static inline int gsi_irq_sharing(int gsi) { return gsi; }
58
59 #endif                          /* X86 */
60
61 #define BAD_MADT_ENTRY(entry, end) (                                        \
62                 (!entry) || (unsigned long)entry + sizeof(*entry) > end ||  \
63                 ((acpi_table_entry_header *)entry)->length != sizeof(*entry))
64
65 #define PREFIX                  "ACPI: "
66
67 int acpi_noirq __initdata;      /* skip ACPI IRQ initialization */
68 int acpi_pci_disabled __initdata;       /* skip ACPI PCI scan and IRQ initialization */
69 int acpi_ht __initdata = 1;     /* enable HT */
70
71 int acpi_lapic;
72 int acpi_ioapic;
73 int acpi_strict;
74 EXPORT_SYMBOL(acpi_strict);
75
76 acpi_interrupt_flags acpi_sci_flags __initdata;
77 int acpi_sci_override_gsi __initdata;
78 int acpi_skip_timer_override __initdata;
79
80 #ifdef CONFIG_X86_LOCAL_APIC
81 static u64 acpi_lapic_addr __initdata = APIC_DEFAULT_PHYS_BASE;
82 #endif
83
84 #ifndef __HAVE_ARCH_CMPXCHG
85 #warning ACPI uses CMPXCHG, i486 and later hardware
86 #endif
87
88 #define MAX_MADT_ENTRIES        256
89 u8 x86_acpiid_to_apicid[MAX_MADT_ENTRIES] =
90     {[0 ... MAX_MADT_ENTRIES - 1] = 0xff };
91 EXPORT_SYMBOL(x86_acpiid_to_apicid);
92
93 /* --------------------------------------------------------------------------
94                               Boot-time Configuration
95    -------------------------------------------------------------------------- */
96
97 /*
98  * The default interrupt routing model is PIC (8259).  This gets
99  * overriden if IOAPICs are enumerated (below).
100  */
101 enum acpi_irq_model_id acpi_irq_model = ACPI_IRQ_MODEL_PIC;
102
103 #ifdef  CONFIG_X86_64
104
105 /* rely on all ACPI tables being in the direct mapping */
106 char *__acpi_map_table(unsigned long phys_addr, unsigned long size)
107 {
108         if (!phys_addr || !size)
109                 return NULL;
110
111         if (phys_addr+size <= (end_pfn_map << PAGE_SHIFT) + PAGE_SIZE)
112                 return __va(phys_addr);
113
114         return NULL;
115 }
116
117 #else
118
119 /*
120  * Temporarily use the virtual area starting from FIX_IO_APIC_BASE_END,
121  * to map the target physical address. The problem is that set_fixmap()
122  * provides a single page, and it is possible that the page is not
123  * sufficient.
124  * By using this area, we can map up to MAX_IO_APICS pages temporarily,
125  * i.e. until the next __va_range() call.
126  *
127  * Important Safety Note:  The fixed I/O APIC page numbers are *subtracted*
128  * from the fixed base.  That's why we start at FIX_IO_APIC_BASE_END and
129  * count idx down while incrementing the phys address.
130  */
131 char *__acpi_map_table(unsigned long phys, unsigned long size)
132 {
133         unsigned long base, offset, mapped_size;
134         int idx;
135
136         if (phys + size < 8 * 1024 * 1024)
137                 return __va(phys);
138
139         offset = phys & (PAGE_SIZE - 1);
140         mapped_size = PAGE_SIZE - offset;
141         set_fixmap(FIX_ACPI_END, phys);
142         base = fix_to_virt(FIX_ACPI_END);
143
144         /*
145          * Most cases can be covered by the below.
146          */
147         idx = FIX_ACPI_END;
148         while (mapped_size < size) {
149                 if (--idx < FIX_ACPI_BEGIN)
150                         return NULL;    /* cannot handle this */
151                 phys += PAGE_SIZE;
152                 set_fixmap(idx, phys);
153                 mapped_size += PAGE_SIZE;
154         }
155
156         return ((unsigned char *)base + offset);
157 }
158 #endif
159
160 #ifdef CONFIG_PCI_MMCONFIG
161 /* The physical address of the MMCONFIG aperture.  Set from ACPI tables. */
162 struct acpi_table_mcfg_config *pci_mmcfg_config;
163 int pci_mmcfg_config_num;
164
165 int __init acpi_parse_mcfg(unsigned long phys_addr, unsigned long size)
166 {
167         struct acpi_table_mcfg *mcfg;
168         unsigned long i;
169         int config_size;
170
171         if (!phys_addr || !size)
172                 return -EINVAL;
173
174         mcfg = (struct acpi_table_mcfg *)__acpi_map_table(phys_addr, size);
175         if (!mcfg) {
176                 printk(KERN_WARNING PREFIX "Unable to map MCFG\n");
177                 return -ENODEV;
178         }
179
180         /* how many config structures do we have */
181         pci_mmcfg_config_num = 0;
182         i = size - sizeof(struct acpi_table_mcfg);
183         while (i >= sizeof(struct acpi_table_mcfg_config)) {
184                 ++pci_mmcfg_config_num;
185                 i -= sizeof(struct acpi_table_mcfg_config);
186         };
187         if (pci_mmcfg_config_num == 0) {
188                 printk(KERN_ERR PREFIX "MMCONFIG has no entries\n");
189                 return -ENODEV;
190         }
191
192         config_size = pci_mmcfg_config_num * sizeof(*pci_mmcfg_config);
193         pci_mmcfg_config = kmalloc(config_size, GFP_KERNEL);
194         if (!pci_mmcfg_config) {
195                 printk(KERN_WARNING PREFIX
196                        "No memory for MCFG config tables\n");
197                 return -ENOMEM;
198         }
199
200         memcpy(pci_mmcfg_config, &mcfg->config, config_size);
201         for (i = 0; i < pci_mmcfg_config_num; ++i) {
202                 if (mcfg->config[i].base_reserved) {
203                         printk(KERN_ERR PREFIX
204                                "MMCONFIG not in low 4GB of memory\n");
205                         return -ENODEV;
206                 }
207         }
208
209         return 0;
210 }
211 #endif                          /* CONFIG_PCI_MMCONFIG */
212
213 #ifdef CONFIG_X86_LOCAL_APIC
214 static int __init acpi_parse_madt(unsigned long phys_addr, unsigned long size)
215 {
216         struct acpi_table_madt *madt = NULL;
217
218         if (!phys_addr || !size)
219                 return -EINVAL;
220
221         madt = (struct acpi_table_madt *)__acpi_map_table(phys_addr, size);
222         if (!madt) {
223                 printk(KERN_WARNING PREFIX "Unable to map MADT\n");
224                 return -ENODEV;
225         }
226
227         if (madt->lapic_address) {
228                 acpi_lapic_addr = (u64) madt->lapic_address;
229
230                 printk(KERN_DEBUG PREFIX "Local APIC address 0x%08x\n",
231                        madt->lapic_address);
232         }
233
234         acpi_madt_oem_check(madt->header.oem_id, madt->header.oem_table_id);
235
236         return 0;
237 }
238
239 static int __init
240 acpi_parse_lapic(acpi_table_entry_header * header, const unsigned long end)
241 {
242         struct acpi_table_lapic *processor = NULL;
243
244         processor = (struct acpi_table_lapic *)header;
245
246         if (BAD_MADT_ENTRY(processor, end))
247                 return -EINVAL;
248
249         acpi_table_print_madt_entry(header);
250
251         /* Record local apic id only when enabled */
252         if (processor->flags.enabled)
253                 x86_acpiid_to_apicid[processor->acpi_id] = processor->id;
254
255         /*
256          * We need to register disabled CPU as well to permit
257          * counting disabled CPUs. This allows us to size
258          * cpus_possible_map more accurately, to permit
259          * to not preallocating memory for all NR_CPUS
260          * when we use CPU hotplug.
261          */
262         mp_register_lapic(processor->id,        /* APIC ID */
263                           processor->flags.enabled);    /* Enabled? */
264
265         return 0;
266 }
267
268 static int __init
269 acpi_parse_lapic_addr_ovr(acpi_table_entry_header * header,
270                           const unsigned long end)
271 {
272         struct acpi_table_lapic_addr_ovr *lapic_addr_ovr = NULL;
273
274         lapic_addr_ovr = (struct acpi_table_lapic_addr_ovr *)header;
275
276         if (BAD_MADT_ENTRY(lapic_addr_ovr, end))
277                 return -EINVAL;
278
279         acpi_lapic_addr = lapic_addr_ovr->address;
280
281         return 0;
282 }
283
284 static int __init
285 acpi_parse_lapic_nmi(acpi_table_entry_header * header, const unsigned long end)
286 {
287         struct acpi_table_lapic_nmi *lapic_nmi = NULL;
288
289         lapic_nmi = (struct acpi_table_lapic_nmi *)header;
290
291         if (BAD_MADT_ENTRY(lapic_nmi, end))
292                 return -EINVAL;
293
294         acpi_table_print_madt_entry(header);
295
296         if (lapic_nmi->lint != 1)
297                 printk(KERN_WARNING PREFIX "NMI not connected to LINT 1!\n");
298
299         return 0;
300 }
301
302 #endif                          /*CONFIG_X86_LOCAL_APIC */
303
304 #ifdef CONFIG_X86_IO_APIC
305
306 static int __init
307 acpi_parse_ioapic(acpi_table_entry_header * header, const unsigned long end)
308 {
309         struct acpi_table_ioapic *ioapic = NULL;
310
311         ioapic = (struct acpi_table_ioapic *)header;
312
313         if (BAD_MADT_ENTRY(ioapic, end))
314                 return -EINVAL;
315
316         acpi_table_print_madt_entry(header);
317
318         mp_register_ioapic(ioapic->id,
319                            ioapic->address, ioapic->global_irq_base);
320
321         return 0;
322 }
323
324 /*
325  * Parse Interrupt Source Override for the ACPI SCI
326  */
327 static void acpi_sci_ioapic_setup(u32 gsi, u16 polarity, u16 trigger)
328 {
329         if (trigger == 0)       /* compatible SCI trigger is level */
330                 trigger = 3;
331
332         if (polarity == 0)      /* compatible SCI polarity is low */
333                 polarity = 3;
334
335         /* Command-line over-ride via acpi_sci= */
336         if (acpi_sci_flags.trigger)
337                 trigger = acpi_sci_flags.trigger;
338
339         if (acpi_sci_flags.polarity)
340                 polarity = acpi_sci_flags.polarity;
341
342         /*
343          * mp_config_acpi_legacy_irqs() already setup IRQs < 16
344          * If GSI is < 16, this will update its flags,
345          * else it will create a new mp_irqs[] entry.
346          */
347         mp_override_legacy_irq(gsi, polarity, trigger, gsi);
348
349         /*
350          * stash over-ride to indicate we've been here
351          * and for later update of acpi_fadt
352          */
353         acpi_sci_override_gsi = gsi;
354         return;
355 }
356
357 static int __init
358 acpi_parse_int_src_ovr(acpi_table_entry_header * header,
359                        const unsigned long end)
360 {
361         struct acpi_table_int_src_ovr *intsrc = NULL;
362
363         intsrc = (struct acpi_table_int_src_ovr *)header;
364
365         if (BAD_MADT_ENTRY(intsrc, end))
366                 return -EINVAL;
367
368         acpi_table_print_madt_entry(header);
369
370         if (intsrc->bus_irq == acpi_fadt.sci_int) {
371                 acpi_sci_ioapic_setup(intsrc->global_irq,
372                                       intsrc->flags.polarity,
373                                       intsrc->flags.trigger);
374                 return 0;
375         }
376
377         if (acpi_skip_timer_override &&
378             intsrc->bus_irq == 0 && intsrc->global_irq == 2) {
379                 printk(PREFIX "BIOS IRQ0 pin2 override ignored.\n");
380                 return 0;
381         }
382
383         mp_override_legacy_irq(intsrc->bus_irq,
384                                intsrc->flags.polarity,
385                                intsrc->flags.trigger, intsrc->global_irq);
386
387         return 0;
388 }
389
390 static int __init
391 acpi_parse_nmi_src(acpi_table_entry_header * header, const unsigned long end)
392 {
393         struct acpi_table_nmi_src *nmi_src = NULL;
394
395         nmi_src = (struct acpi_table_nmi_src *)header;
396
397         if (BAD_MADT_ENTRY(nmi_src, end))
398                 return -EINVAL;
399
400         acpi_table_print_madt_entry(header);
401
402         /* TBD: Support nimsrc entries? */
403
404         return 0;
405 }
406
407 #endif                          /* CONFIG_X86_IO_APIC */
408
409 /*
410  * acpi_pic_sci_set_trigger()
411  * 
412  * use ELCR to set PIC-mode trigger type for SCI
413  *
414  * If a PIC-mode SCI is not recognized or gives spurious IRQ7's
415  * it may require Edge Trigger -- use "acpi_sci=edge"
416  *
417  * Port 0x4d0-4d1 are ECLR1 and ECLR2, the Edge/Level Control Registers
418  * for the 8259 PIC.  bit[n] = 1 means irq[n] is Level, otherwise Edge.
419  * ECLR1 is IRQ's 0-7 (IRQ 0, 1, 2 must be 0)
420  * ECLR2 is IRQ's 8-15 (IRQ 8, 13 must be 0)
421  */
422
423 void __init acpi_pic_sci_set_trigger(unsigned int irq, u16 trigger)
424 {
425         unsigned int mask = 1 << irq;
426         unsigned int old, new;
427
428         /* Real old ELCR mask */
429         old = inb(0x4d0) | (inb(0x4d1) << 8);
430
431         /*
432          * If we use ACPI to set PCI irq's, then we should clear ELCR
433          * since we will set it correctly as we enable the PCI irq
434          * routing.
435          */
436         new = acpi_noirq ? old : 0;
437
438         /*
439          * Update SCI information in the ELCR, it isn't in the PCI
440          * routing tables..
441          */
442         switch (trigger) {
443         case 1:         /* Edge - clear */
444                 new &= ~mask;
445                 break;
446         case 3:         /* Level - set */
447                 new |= mask;
448                 break;
449         }
450
451         if (old == new)
452                 return;
453
454         printk(PREFIX "setting ELCR to %04x (from %04x)\n", new, old);
455         outb(new, 0x4d0);
456         outb(new >> 8, 0x4d1);
457 }
458
459 int acpi_gsi_to_irq(u32 gsi, unsigned int *irq)
460 {
461 #ifdef CONFIG_X86_IO_APIC
462         if (use_pci_vector() && !platform_legacy_irq(gsi))
463                 *irq = IO_APIC_VECTOR(gsi);
464         else
465 #endif
466                 *irq = gsi_irq_sharing(gsi);
467         return 0;
468 }
469
470 /*
471  * success: return IRQ number (>=0)
472  * failure: return < 0
473  */
474 int acpi_register_gsi(u32 gsi, int triggering, int polarity)
475 {
476         unsigned int irq;
477         unsigned int plat_gsi = gsi;
478
479 #ifdef CONFIG_PCI
480         /*
481          * Make sure all (legacy) PCI IRQs are set as level-triggered.
482          */
483         if (acpi_irq_model == ACPI_IRQ_MODEL_PIC) {
484                 extern void eisa_set_level_irq(unsigned int irq);
485
486                 if (triggering == ACPI_LEVEL_SENSITIVE)
487                         eisa_set_level_irq(gsi);
488         }
489 #endif
490
491 #ifdef CONFIG_X86_IO_APIC
492         if (acpi_irq_model == ACPI_IRQ_MODEL_IOAPIC) {
493                 plat_gsi = mp_register_gsi(gsi, triggering, polarity);
494         }
495 #endif
496         acpi_gsi_to_irq(plat_gsi, &irq);
497         return irq;
498 }
499
500 EXPORT_SYMBOL(acpi_register_gsi);
501
502 /*
503  *  ACPI based hotplug support for CPU
504  */
505 #ifdef CONFIG_ACPI_HOTPLUG_CPU
506 int acpi_map_lsapic(acpi_handle handle, int *pcpu)
507 {
508         /* TBD */
509         return -EINVAL;
510 }
511
512 EXPORT_SYMBOL(acpi_map_lsapic);
513
514 int acpi_unmap_lsapic(int cpu)
515 {
516         /* TBD */
517         return -EINVAL;
518 }
519
520 EXPORT_SYMBOL(acpi_unmap_lsapic);
521 #endif                          /* CONFIG_ACPI_HOTPLUG_CPU */
522
523 int acpi_register_ioapic(acpi_handle handle, u64 phys_addr, u32 gsi_base)
524 {
525         /* TBD */
526         return -EINVAL;
527 }
528
529 EXPORT_SYMBOL(acpi_register_ioapic);
530
531 int acpi_unregister_ioapic(acpi_handle handle, u32 gsi_base)
532 {
533         /* TBD */
534         return -EINVAL;
535 }
536
537 EXPORT_SYMBOL(acpi_unregister_ioapic);
538
539 static unsigned long __init
540 acpi_scan_rsdp(unsigned long start, unsigned long length)
541 {
542         unsigned long offset = 0;
543         unsigned long sig_len = sizeof("RSD PTR ") - 1;
544
545         /*
546          * Scan all 16-byte boundaries of the physical memory region for the
547          * RSDP signature.
548          */
549         for (offset = 0; offset < length; offset += 16) {
550                 if (strncmp((char *)(phys_to_virt(start) + offset), "RSD PTR ", sig_len))
551                         continue;
552                 return (start + offset);
553         }
554
555         return 0;
556 }
557
558 static int __init acpi_parse_sbf(unsigned long phys_addr, unsigned long size)
559 {
560         struct acpi_table_sbf *sb;
561
562         if (!phys_addr || !size)
563                 return -EINVAL;
564
565         sb = (struct acpi_table_sbf *)__acpi_map_table(phys_addr, size);
566         if (!sb) {
567                 printk(KERN_WARNING PREFIX "Unable to map SBF\n");
568                 return -ENODEV;
569         }
570
571         sbf_port = sb->sbf_cmos;        /* Save CMOS port */
572
573         return 0;
574 }
575
576 #ifdef CONFIG_HPET_TIMER
577
578 static int __init acpi_parse_hpet(unsigned long phys, unsigned long size)
579 {
580         struct acpi_table_hpet *hpet_tbl;
581
582         if (!phys || !size)
583                 return -EINVAL;
584
585         hpet_tbl = (struct acpi_table_hpet *)__acpi_map_table(phys, size);
586         if (!hpet_tbl) {
587                 printk(KERN_WARNING PREFIX "Unable to map HPET\n");
588                 return -ENODEV;
589         }
590
591         if (hpet_tbl->addr.space_id != ACPI_SPACE_MEM) {
592                 printk(KERN_WARNING PREFIX "HPET timers must be located in "
593                        "memory.\n");
594                 return -1;
595         }
596 #ifdef  CONFIG_X86_64
597         vxtime.hpet_address = hpet_tbl->addr.addrl |
598             ((long)hpet_tbl->addr.addrh << 32);
599
600         printk(KERN_INFO PREFIX "HPET id: %#x base: %#lx\n",
601                hpet_tbl->id, vxtime.hpet_address);
602 #else                           /* X86 */
603         {
604                 extern unsigned long hpet_address;
605
606                 hpet_address = hpet_tbl->addr.addrl;
607                 printk(KERN_INFO PREFIX "HPET id: %#x base: %#lx\n",
608                        hpet_tbl->id, hpet_address);
609         }
610 #endif                          /* X86 */
611
612         return 0;
613 }
614 #else
615 #define acpi_parse_hpet NULL
616 #endif
617
618 #ifdef CONFIG_X86_PM_TIMER
619 extern u32 pmtmr_ioport;
620 #endif
621
622 static int __init acpi_parse_fadt(unsigned long phys, unsigned long size)
623 {
624         struct fadt_descriptor_rev2 *fadt = NULL;
625
626         fadt = (struct fadt_descriptor_rev2 *)__acpi_map_table(phys, size);
627         if (!fadt) {
628                 printk(KERN_WARNING PREFIX "Unable to map FADT\n");
629                 return 0;
630         }
631         /* initialize sci_int early for INT_SRC_OVR MADT parsing */
632         acpi_fadt.sci_int = fadt->sci_int;
633
634         /* initialize rev and apic_phys_dest_mode for x86_64 genapic */
635         acpi_fadt.revision = fadt->revision;
636         acpi_fadt.force_apic_physical_destination_mode =
637             fadt->force_apic_physical_destination_mode;
638
639 #ifdef CONFIG_X86_PM_TIMER
640         /* detect the location of the ACPI PM Timer */
641         if (fadt->revision >= FADT2_REVISION_ID) {
642                 /* FADT rev. 2 */
643                 if (fadt->xpm_tmr_blk.address_space_id !=
644                     ACPI_ADR_SPACE_SYSTEM_IO)
645                         return 0;
646
647                 pmtmr_ioport = fadt->xpm_tmr_blk.address;
648                 /*
649                  * "X" fields are optional extensions to the original V1.0
650                  * fields, so we must selectively expand V1.0 fields if the
651                  * corresponding X field is zero.
652                  */
653                 if (!pmtmr_ioport)
654                         pmtmr_ioport = fadt->V1_pm_tmr_blk;
655         } else {
656                 /* FADT rev. 1 */
657                 pmtmr_ioport = fadt->V1_pm_tmr_blk;
658         }
659         if (pmtmr_ioport)
660                 printk(KERN_INFO PREFIX "PM-Timer IO Port: %#x\n",
661                        pmtmr_ioport);
662 #endif
663         return 0;
664 }
665
666 unsigned long __init acpi_find_rsdp(void)
667 {
668         unsigned long rsdp_phys = 0;
669
670         if (efi_enabled) {
671                 if (efi.acpi20)
672                         return __pa(efi.acpi20);
673                 else if (efi.acpi)
674                         return __pa(efi.acpi);
675         }
676         /*
677          * Scan memory looking for the RSDP signature. First search EBDA (low
678          * memory) paragraphs and then search upper memory (E0000-FFFFF).
679          */
680         rsdp_phys = acpi_scan_rsdp(0, 0x400);
681         if (!rsdp_phys)
682                 rsdp_phys = acpi_scan_rsdp(0xE0000, 0x20000);
683
684         return rsdp_phys;
685 }
686
687 #ifdef  CONFIG_X86_LOCAL_APIC
688 /*
689  * Parse LAPIC entries in MADT
690  * returns 0 on success, < 0 on error
691  */
692 static int __init acpi_parse_madt_lapic_entries(void)
693 {
694         int count;
695
696         /* 
697          * Note that the LAPIC address is obtained from the MADT (32-bit value)
698          * and (optionally) overriden by a LAPIC_ADDR_OVR entry (64-bit value).
699          */
700
701         count =
702             acpi_table_parse_madt(ACPI_MADT_LAPIC_ADDR_OVR,
703                                   acpi_parse_lapic_addr_ovr, 0);
704         if (count < 0) {
705                 printk(KERN_ERR PREFIX
706                        "Error parsing LAPIC address override entry\n");
707                 return count;
708         }
709
710         mp_register_lapic_address(acpi_lapic_addr);
711
712         count = acpi_table_parse_madt(ACPI_MADT_LAPIC, acpi_parse_lapic,
713                                       MAX_APICS);
714         if (!count) {
715                 printk(KERN_ERR PREFIX "No LAPIC entries present\n");
716                 /* TBD: Cleanup to allow fallback to MPS */
717                 return -ENODEV;
718         } else if (count < 0) {
719                 printk(KERN_ERR PREFIX "Error parsing LAPIC entry\n");
720                 /* TBD: Cleanup to allow fallback to MPS */
721                 return count;
722         }
723
724         count =
725             acpi_table_parse_madt(ACPI_MADT_LAPIC_NMI, acpi_parse_lapic_nmi, 0);
726         if (count < 0) {
727                 printk(KERN_ERR PREFIX "Error parsing LAPIC NMI entry\n");
728                 /* TBD: Cleanup to allow fallback to MPS */
729                 return count;
730         }
731         return 0;
732 }
733 #endif                          /* CONFIG_X86_LOCAL_APIC */
734
735 #ifdef  CONFIG_X86_IO_APIC
736 /*
737  * Parse IOAPIC related entries in MADT
738  * returns 0 on success, < 0 on error
739  */
740 static int __init acpi_parse_madt_ioapic_entries(void)
741 {
742         int count;
743
744         /*
745          * ACPI interpreter is required to complete interrupt setup,
746          * so if it is off, don't enumerate the io-apics with ACPI.
747          * If MPS is present, it will handle them,
748          * otherwise the system will stay in PIC mode
749          */
750         if (acpi_disabled || acpi_noirq) {
751                 return -ENODEV;
752         }
753
754         /*
755          * if "noapic" boot option, don't look for IO-APICs
756          */
757         if (skip_ioapic_setup) {
758                 printk(KERN_INFO PREFIX "Skipping IOAPIC probe "
759                        "due to 'noapic' option.\n");
760                 return -ENODEV;
761         }
762
763         count =
764             acpi_table_parse_madt(ACPI_MADT_IOAPIC, acpi_parse_ioapic,
765                                   MAX_IO_APICS);
766         if (!count) {
767                 printk(KERN_ERR PREFIX "No IOAPIC entries present\n");
768                 return -ENODEV;
769         } else if (count < 0) {
770                 printk(KERN_ERR PREFIX "Error parsing IOAPIC entry\n");
771                 return count;
772         }
773
774         count =
775             acpi_table_parse_madt(ACPI_MADT_INT_SRC_OVR, acpi_parse_int_src_ovr,
776                                   NR_IRQ_VECTORS);
777         if (count < 0) {
778                 printk(KERN_ERR PREFIX
779                        "Error parsing interrupt source overrides entry\n");
780                 /* TBD: Cleanup to allow fallback to MPS */
781                 return count;
782         }
783
784         /*
785          * If BIOS did not supply an INT_SRC_OVR for the SCI
786          * pretend we got one so we can set the SCI flags.
787          */
788         if (!acpi_sci_override_gsi)
789                 acpi_sci_ioapic_setup(acpi_fadt.sci_int, 0, 0);
790
791         /* Fill in identity legacy mapings where no override */
792         mp_config_acpi_legacy_irqs();
793
794         count =
795             acpi_table_parse_madt(ACPI_MADT_NMI_SRC, acpi_parse_nmi_src,
796                                   NR_IRQ_VECTORS);
797         if (count < 0) {
798                 printk(KERN_ERR PREFIX "Error parsing NMI SRC entry\n");
799                 /* TBD: Cleanup to allow fallback to MPS */
800                 return count;
801         }
802
803         return 0;
804 }
805 #else
806 static inline int acpi_parse_madt_ioapic_entries(void)
807 {
808         return -1;
809 }
810 #endif  /* !CONFIG_X86_IO_APIC */
811
812 static void __init acpi_process_madt(void)
813 {
814 #ifdef CONFIG_X86_LOCAL_APIC
815         int count, error;
816
817         count = acpi_table_parse(ACPI_APIC, acpi_parse_madt);
818         if (count >= 1) {
819
820                 /*
821                  * Parse MADT LAPIC entries
822                  */
823                 error = acpi_parse_madt_lapic_entries();
824                 if (!error) {
825                         acpi_lapic = 1;
826
827 #ifdef CONFIG_X86_GENERICARCH
828                         generic_bigsmp_probe();
829 #endif
830                         /*
831                          * Parse MADT IO-APIC entries
832                          */
833                         error = acpi_parse_madt_ioapic_entries();
834                         if (!error) {
835                                 acpi_irq_model = ACPI_IRQ_MODEL_IOAPIC;
836                                 acpi_irq_balance_set(NULL);
837                                 acpi_ioapic = 1;
838
839                                 smp_found_config = 1;
840                                 clustered_apic_check();
841                         }
842                 }
843                 if (error == -EINVAL) {
844                         /*
845                          * Dell Precision Workstation 410, 610 come here.
846                          */
847                         printk(KERN_ERR PREFIX
848                                "Invalid BIOS MADT, disabling ACPI\n");
849                         disable_acpi();
850                 }
851         }
852 #endif
853         return;
854 }
855
856 extern int acpi_force;
857
858 #ifdef __i386__
859
860 static int __init disable_acpi_irq(struct dmi_system_id *d)
861 {
862         if (!acpi_force) {
863                 printk(KERN_NOTICE "%s detected: force use of acpi=noirq\n",
864                        d->ident);
865                 acpi_noirq_set();
866         }
867         return 0;
868 }
869
870 static int __init disable_acpi_pci(struct dmi_system_id *d)
871 {
872         if (!acpi_force) {
873                 printk(KERN_NOTICE "%s detected: force use of pci=noacpi\n",
874                        d->ident);
875                 acpi_disable_pci();
876         }
877         return 0;
878 }
879
880 static int __init dmi_disable_acpi(struct dmi_system_id *d)
881 {
882         if (!acpi_force) {
883                 printk(KERN_NOTICE "%s detected: acpi off\n", d->ident);
884                 disable_acpi();
885         } else {
886                 printk(KERN_NOTICE
887                        "Warning: DMI blacklist says broken, but acpi forced\n");
888         }
889         return 0;
890 }
891
892 /*
893  * Limit ACPI to CPU enumeration for HT
894  */
895 static int __init force_acpi_ht(struct dmi_system_id *d)
896 {
897         if (!acpi_force) {
898                 printk(KERN_NOTICE "%s detected: force use of acpi=ht\n",
899                        d->ident);
900                 disable_acpi();
901                 acpi_ht = 1;
902         } else {
903                 printk(KERN_NOTICE
904                        "Warning: acpi=force overrules DMI blacklist: acpi=ht\n");
905         }
906         return 0;
907 }
908
909 /*
910  * If your system is blacklisted here, but you find that acpi=force
911  * works for you, please contact acpi-devel@sourceforge.net
912  */
913 static struct dmi_system_id __initdata acpi_dmi_table[] = {
914         /*
915          * Boxes that need ACPI disabled
916          */
917         {
918          .callback = dmi_disable_acpi,
919          .ident = "IBM Thinkpad",
920          .matches = {
921                      DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
922                      DMI_MATCH(DMI_BOARD_NAME, "2629H1G"),
923                      },
924          },
925
926         /*
927          * Boxes that need acpi=ht
928          */
929         {
930          .callback = force_acpi_ht,
931          .ident = "FSC Primergy T850",
932          .matches = {
933                      DMI_MATCH(DMI_SYS_VENDOR, "FUJITSU SIEMENS"),
934                      DMI_MATCH(DMI_PRODUCT_NAME, "PRIMERGY T850"),
935                      },
936          },
937         {
938          .callback = force_acpi_ht,
939          .ident = "DELL GX240",
940          .matches = {
941                      DMI_MATCH(DMI_BOARD_VENDOR, "Dell Computer Corporation"),
942                      DMI_MATCH(DMI_BOARD_NAME, "OptiPlex GX240"),
943                      },
944          },
945         {
946          .callback = force_acpi_ht,
947          .ident = "HP VISUALIZE NT Workstation",
948          .matches = {
949                      DMI_MATCH(DMI_BOARD_VENDOR, "Hewlett-Packard"),
950                      DMI_MATCH(DMI_PRODUCT_NAME, "HP VISUALIZE NT Workstation"),
951                      },
952          },
953         {
954          .callback = force_acpi_ht,
955          .ident = "Compaq Workstation W8000",
956          .matches = {
957                      DMI_MATCH(DMI_SYS_VENDOR, "Compaq"),
958                      DMI_MATCH(DMI_PRODUCT_NAME, "Workstation W8000"),
959                      },
960          },
961         {
962          .callback = force_acpi_ht,
963          .ident = "ASUS P4B266",
964          .matches = {
965                      DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC."),
966                      DMI_MATCH(DMI_BOARD_NAME, "P4B266"),
967                      },
968          },
969         {
970          .callback = force_acpi_ht,
971          .ident = "ASUS P2B-DS",
972          .matches = {
973                      DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC."),
974                      DMI_MATCH(DMI_BOARD_NAME, "P2B-DS"),
975                      },
976          },
977         {
978          .callback = force_acpi_ht,
979          .ident = "ASUS CUR-DLS",
980          .matches = {
981                      DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC."),
982                      DMI_MATCH(DMI_BOARD_NAME, "CUR-DLS"),
983                      },
984          },
985         {
986          .callback = force_acpi_ht,
987          .ident = "ABIT i440BX-W83977",
988          .matches = {
989                      DMI_MATCH(DMI_BOARD_VENDOR, "ABIT <http://www.abit.com>"),
990                      DMI_MATCH(DMI_BOARD_NAME, "i440BX-W83977 (BP6)"),
991                      },
992          },
993         {
994          .callback = force_acpi_ht,
995          .ident = "IBM Bladecenter",
996          .matches = {
997                      DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
998                      DMI_MATCH(DMI_BOARD_NAME, "IBM eServer BladeCenter HS20"),
999                      },
1000          },
1001         {
1002          .callback = force_acpi_ht,
1003          .ident = "IBM eServer xSeries 360",
1004          .matches = {
1005                      DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1006                      DMI_MATCH(DMI_BOARD_NAME, "eServer xSeries 360"),
1007                      },
1008          },
1009         {
1010          .callback = force_acpi_ht,
1011          .ident = "IBM eserver xSeries 330",
1012          .matches = {
1013                      DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1014                      DMI_MATCH(DMI_BOARD_NAME, "eserver xSeries 330"),
1015                      },
1016          },
1017         {
1018          .callback = force_acpi_ht,
1019          .ident = "IBM eserver xSeries 440",
1020          .matches = {
1021                      DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1022                      DMI_MATCH(DMI_PRODUCT_NAME, "eserver xSeries 440"),
1023                      },
1024          },
1025
1026         /*
1027          * Boxes that need ACPI PCI IRQ routing disabled
1028          */
1029         {
1030          .callback = disable_acpi_irq,
1031          .ident = "ASUS A7V",
1032          .matches = {
1033                      DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC"),
1034                      DMI_MATCH(DMI_BOARD_NAME, "<A7V>"),
1035                      /* newer BIOS, Revision 1011, does work */
1036                      DMI_MATCH(DMI_BIOS_VERSION,
1037                                "ASUS A7V ACPI BIOS Revision 1007"),
1038                      },
1039          },
1040
1041         /*
1042          * Boxes that need ACPI PCI IRQ routing and PCI scan disabled
1043          */
1044         {                       /* _BBN 0 bug */
1045          .callback = disable_acpi_pci,
1046          .ident = "ASUS PR-DLS",
1047          .matches = {
1048                      DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC."),
1049                      DMI_MATCH(DMI_BOARD_NAME, "PR-DLS"),
1050                      DMI_MATCH(DMI_BIOS_VERSION,
1051                                "ASUS PR-DLS ACPI BIOS Revision 1010"),
1052                      DMI_MATCH(DMI_BIOS_DATE, "03/21/2003")
1053                      },
1054          },
1055         {
1056          .callback = disable_acpi_pci,
1057          .ident = "Acer TravelMate 36x Laptop",
1058          .matches = {
1059                      DMI_MATCH(DMI_SYS_VENDOR, "Acer"),
1060                      DMI_MATCH(DMI_PRODUCT_NAME, "TravelMate 360"),
1061                      },
1062          },
1063         {}
1064 };
1065
1066 #endif                          /* __i386__ */
1067
1068 /*
1069  * acpi_boot_table_init() and acpi_boot_init()
1070  *  called from setup_arch(), always.
1071  *      1. checksums all tables
1072  *      2. enumerates lapics
1073  *      3. enumerates io-apics
1074  *
1075  * acpi_table_init() is separate to allow reading SRAT without
1076  * other side effects.
1077  *
1078  * side effects of acpi_boot_init:
1079  *      acpi_lapic = 1 if LAPIC found
1080  *      acpi_ioapic = 1 if IOAPIC found
1081  *      if (acpi_lapic && acpi_ioapic) smp_found_config = 1;
1082  *      if acpi_blacklisted() acpi_disabled = 1;
1083  *      acpi_irq_model=...
1084  *      ...
1085  *
1086  * return value: (currently ignored)
1087  *      0: success
1088  *      !0: failure
1089  */
1090
1091 int __init acpi_boot_table_init(void)
1092 {
1093         int error;
1094
1095 #ifdef __i386__
1096         dmi_check_system(acpi_dmi_table);
1097 #endif
1098
1099         /*
1100          * If acpi_disabled, bail out
1101          * One exception: acpi=ht continues far enough to enumerate LAPICs
1102          */
1103         if (acpi_disabled && !acpi_ht)
1104                 return 1;
1105
1106         /* 
1107          * Initialize the ACPI boot-time table parser.
1108          */
1109         error = acpi_table_init();
1110         if (error) {
1111                 disable_acpi();
1112                 return error;
1113         }
1114
1115         acpi_table_parse(ACPI_BOOT, acpi_parse_sbf);
1116
1117         /*
1118          * blacklist may disable ACPI entirely
1119          */
1120         error = acpi_blacklisted();
1121         if (error) {
1122                 if (acpi_force) {
1123                         printk(KERN_WARNING PREFIX "acpi=force override\n");
1124                 } else {
1125                         printk(KERN_WARNING PREFIX "Disabling ACPI support\n");
1126                         disable_acpi();
1127                         return error;
1128                 }
1129         }
1130
1131         return 0;
1132 }
1133
1134 int __init acpi_boot_init(void)
1135 {
1136         /*
1137          * If acpi_disabled, bail out
1138          * One exception: acpi=ht continues far enough to enumerate LAPICs
1139          */
1140         if (acpi_disabled && !acpi_ht)
1141                 return 1;
1142
1143         acpi_table_parse(ACPI_BOOT, acpi_parse_sbf);
1144
1145         /*
1146          * set sci_int and PM timer address
1147          */
1148         acpi_table_parse(ACPI_FADT, acpi_parse_fadt);
1149
1150         /*
1151          * Process the Multiple APIC Description Table (MADT), if present
1152          */
1153         acpi_process_madt();
1154
1155         acpi_table_parse(ACPI_HPET, acpi_parse_hpet);
1156
1157         return 0;
1158 }