acerhdf: Acer Aspire One fan control
[GitHub/mt8127/android_kernel_alcatel_ttab.git] / arch / x86 / 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/acpi.h>
28 #include <linux/acpi_pmtmr.h>
29 #include <linux/efi.h>
30 #include <linux/cpumask.h>
31 #include <linux/module.h>
32 #include <linux/dmi.h>
33 #include <linux/irq.h>
34 #include <linux/bootmem.h>
35 #include <linux/ioport.h>
36
37 #include <asm/pgtable.h>
38 #include <asm/io_apic.h>
39 #include <asm/apic.h>
40 #include <asm/io.h>
41 #include <asm/mpspec.h>
42 #include <asm/smp.h>
43
44 static int __initdata acpi_force = 0;
45 u32 acpi_rsdt_forced;
46 #ifdef CONFIG_ACPI
47 int acpi_disabled = 0;
48 #else
49 int acpi_disabled = 1;
50 #endif
51 EXPORT_SYMBOL(acpi_disabled);
52
53 #ifdef CONFIG_X86_64
54 # include <asm/proto.h>
55 #endif /* X86 */
56
57 #define BAD_MADT_ENTRY(entry, end) ( \
58 (!entry) || (unsigned long)entry + sizeof(*entry) > end || \
59 ((struct acpi_subtable_header *)entry)->length < sizeof(*entry))
60
61 #define PREFIX "ACPI: "
62
63 int acpi_noirq; /* skip ACPI IRQ initialization */
64 int acpi_pci_disabled; /* skip ACPI PCI scan and IRQ initialization */
65 EXPORT_SYMBOL(acpi_pci_disabled);
66 int acpi_ht __initdata = 1; /* enable HT */
67
68 int acpi_lapic;
69 int acpi_ioapic;
70 int acpi_strict;
71
72 u8 acpi_sci_flags __initdata;
73 int acpi_sci_override_gsi __initdata;
74 int acpi_skip_timer_override __initdata;
75 int acpi_use_timer_override __initdata;
76
77 #ifdef CONFIG_X86_LOCAL_APIC
78 static u64 acpi_lapic_addr __initdata = APIC_DEFAULT_PHYS_BASE;
79 #endif
80
81 #ifndef __HAVE_ARCH_CMPXCHG
82 #warning ACPI uses CMPXCHG, i486 and later hardware
83 #endif
84
85 /* --------------------------------------------------------------------------
86 Boot-time Configuration
87 -------------------------------------------------------------------------- */
88
89 /*
90 * The default interrupt routing model is PIC (8259). This gets
91 * overridden if IOAPICs are enumerated (below).
92 */
93 enum acpi_irq_model_id acpi_irq_model = ACPI_IRQ_MODEL_PIC;
94
95
96 /*
97 * Temporarily use the virtual area starting from FIX_IO_APIC_BASE_END,
98 * to map the target physical address. The problem is that set_fixmap()
99 * provides a single page, and it is possible that the page is not
100 * sufficient.
101 * By using this area, we can map up to MAX_IO_APICS pages temporarily,
102 * i.e. until the next __va_range() call.
103 *
104 * Important Safety Note: The fixed I/O APIC page numbers are *subtracted*
105 * from the fixed base. That's why we start at FIX_IO_APIC_BASE_END and
106 * count idx down while incrementing the phys address.
107 */
108 char *__init __acpi_map_table(unsigned long phys, unsigned long size)
109 {
110
111 if (!phys || !size)
112 return NULL;
113
114 return early_ioremap(phys, size);
115 }
116 void __init __acpi_unmap_table(char *map, unsigned long size)
117 {
118 if (!map || !size)
119 return;
120
121 early_iounmap(map, size);
122 }
123
124 #ifdef CONFIG_PCI_MMCONFIG
125
126 static int acpi_mcfg_64bit_base_addr __initdata = FALSE;
127
128 /* The physical address of the MMCONFIG aperture. Set from ACPI tables. */
129 struct acpi_mcfg_allocation *pci_mmcfg_config;
130 int pci_mmcfg_config_num;
131
132 static int __init acpi_mcfg_oem_check(struct acpi_table_mcfg *mcfg)
133 {
134 if (!strcmp(mcfg->header.oem_id, "SGI"))
135 acpi_mcfg_64bit_base_addr = TRUE;
136
137 return 0;
138 }
139
140 int __init acpi_parse_mcfg(struct acpi_table_header *header)
141 {
142 struct acpi_table_mcfg *mcfg;
143 unsigned long i;
144 int config_size;
145
146 if (!header)
147 return -EINVAL;
148
149 mcfg = (struct acpi_table_mcfg *)header;
150
151 /* how many config structures do we have */
152 pci_mmcfg_config_num = 0;
153 i = header->length - sizeof(struct acpi_table_mcfg);
154 while (i >= sizeof(struct acpi_mcfg_allocation)) {
155 ++pci_mmcfg_config_num;
156 i -= sizeof(struct acpi_mcfg_allocation);
157 };
158 if (pci_mmcfg_config_num == 0) {
159 printk(KERN_ERR PREFIX "MMCONFIG has no entries\n");
160 return -ENODEV;
161 }
162
163 config_size = pci_mmcfg_config_num * sizeof(*pci_mmcfg_config);
164 pci_mmcfg_config = kmalloc(config_size, GFP_KERNEL);
165 if (!pci_mmcfg_config) {
166 printk(KERN_WARNING PREFIX
167 "No memory for MCFG config tables\n");
168 return -ENOMEM;
169 }
170
171 memcpy(pci_mmcfg_config, &mcfg[1], config_size);
172
173 acpi_mcfg_oem_check(mcfg);
174
175 for (i = 0; i < pci_mmcfg_config_num; ++i) {
176 if ((pci_mmcfg_config[i].address > 0xFFFFFFFF) &&
177 !acpi_mcfg_64bit_base_addr) {
178 printk(KERN_ERR PREFIX
179 "MMCONFIG not in low 4GB of memory\n");
180 kfree(pci_mmcfg_config);
181 pci_mmcfg_config_num = 0;
182 return -ENODEV;
183 }
184 }
185
186 return 0;
187 }
188 #endif /* CONFIG_PCI_MMCONFIG */
189
190 #ifdef CONFIG_X86_LOCAL_APIC
191 static int __init acpi_parse_madt(struct acpi_table_header *table)
192 {
193 struct acpi_table_madt *madt = NULL;
194
195 if (!cpu_has_apic)
196 return -EINVAL;
197
198 madt = (struct acpi_table_madt *)table;
199 if (!madt) {
200 printk(KERN_WARNING PREFIX "Unable to map MADT\n");
201 return -ENODEV;
202 }
203
204 if (madt->address) {
205 acpi_lapic_addr = (u64) madt->address;
206
207 printk(KERN_DEBUG PREFIX "Local APIC address 0x%08x\n",
208 madt->address);
209 }
210
211 default_acpi_madt_oem_check(madt->header.oem_id,
212 madt->header.oem_table_id);
213
214 return 0;
215 }
216
217 static void __cpuinit acpi_register_lapic(int id, u8 enabled)
218 {
219 unsigned int ver = 0;
220
221 if (!enabled) {
222 ++disabled_cpus;
223 return;
224 }
225
226 if (boot_cpu_physical_apicid != -1U)
227 ver = apic_version[boot_cpu_physical_apicid];
228
229 generic_processor_info(id, ver);
230 }
231
232 static int __init
233 acpi_parse_x2apic(struct acpi_subtable_header *header, const unsigned long end)
234 {
235 struct acpi_madt_local_x2apic *processor = NULL;
236
237 processor = (struct acpi_madt_local_x2apic *)header;
238
239 if (BAD_MADT_ENTRY(processor, end))
240 return -EINVAL;
241
242 acpi_table_print_madt_entry(header);
243
244 #ifdef CONFIG_X86_X2APIC
245 /*
246 * We need to register disabled CPU as well to permit
247 * counting disabled CPUs. This allows us to size
248 * cpus_possible_map more accurately, to permit
249 * to not preallocating memory for all NR_CPUS
250 * when we use CPU hotplug.
251 */
252 acpi_register_lapic(processor->local_apic_id, /* APIC ID */
253 processor->lapic_flags & ACPI_MADT_ENABLED);
254 #else
255 printk(KERN_WARNING PREFIX "x2apic entry ignored\n");
256 #endif
257
258 return 0;
259 }
260
261 static int __init
262 acpi_parse_lapic(struct acpi_subtable_header * header, const unsigned long end)
263 {
264 struct acpi_madt_local_apic *processor = NULL;
265
266 processor = (struct acpi_madt_local_apic *)header;
267
268 if (BAD_MADT_ENTRY(processor, end))
269 return -EINVAL;
270
271 acpi_table_print_madt_entry(header);
272
273 /*
274 * We need to register disabled CPU as well to permit
275 * counting disabled CPUs. This allows us to size
276 * cpus_possible_map more accurately, to permit
277 * to not preallocating memory for all NR_CPUS
278 * when we use CPU hotplug.
279 */
280 acpi_register_lapic(processor->id, /* APIC ID */
281 processor->lapic_flags & ACPI_MADT_ENABLED);
282
283 return 0;
284 }
285
286 static int __init
287 acpi_parse_sapic(struct acpi_subtable_header *header, const unsigned long end)
288 {
289 struct acpi_madt_local_sapic *processor = NULL;
290
291 processor = (struct acpi_madt_local_sapic *)header;
292
293 if (BAD_MADT_ENTRY(processor, end))
294 return -EINVAL;
295
296 acpi_table_print_madt_entry(header);
297
298 acpi_register_lapic((processor->id << 8) | processor->eid,/* APIC ID */
299 processor->lapic_flags & ACPI_MADT_ENABLED);
300
301 return 0;
302 }
303
304 static int __init
305 acpi_parse_lapic_addr_ovr(struct acpi_subtable_header * header,
306 const unsigned long end)
307 {
308 struct acpi_madt_local_apic_override *lapic_addr_ovr = NULL;
309
310 lapic_addr_ovr = (struct acpi_madt_local_apic_override *)header;
311
312 if (BAD_MADT_ENTRY(lapic_addr_ovr, end))
313 return -EINVAL;
314
315 acpi_lapic_addr = lapic_addr_ovr->address;
316
317 return 0;
318 }
319
320 static int __init
321 acpi_parse_x2apic_nmi(struct acpi_subtable_header *header,
322 const unsigned long end)
323 {
324 struct acpi_madt_local_x2apic_nmi *x2apic_nmi = NULL;
325
326 x2apic_nmi = (struct acpi_madt_local_x2apic_nmi *)header;
327
328 if (BAD_MADT_ENTRY(x2apic_nmi, end))
329 return -EINVAL;
330
331 acpi_table_print_madt_entry(header);
332
333 if (x2apic_nmi->lint != 1)
334 printk(KERN_WARNING PREFIX "NMI not connected to LINT 1!\n");
335
336 return 0;
337 }
338
339 static int __init
340 acpi_parse_lapic_nmi(struct acpi_subtable_header * header, const unsigned long end)
341 {
342 struct acpi_madt_local_apic_nmi *lapic_nmi = NULL;
343
344 lapic_nmi = (struct acpi_madt_local_apic_nmi *)header;
345
346 if (BAD_MADT_ENTRY(lapic_nmi, end))
347 return -EINVAL;
348
349 acpi_table_print_madt_entry(header);
350
351 if (lapic_nmi->lint != 1)
352 printk(KERN_WARNING PREFIX "NMI not connected to LINT 1!\n");
353
354 return 0;
355 }
356
357 #endif /*CONFIG_X86_LOCAL_APIC */
358
359 #ifdef CONFIG_X86_IO_APIC
360
361 static int __init
362 acpi_parse_ioapic(struct acpi_subtable_header * header, const unsigned long end)
363 {
364 struct acpi_madt_io_apic *ioapic = NULL;
365
366 ioapic = (struct acpi_madt_io_apic *)header;
367
368 if (BAD_MADT_ENTRY(ioapic, end))
369 return -EINVAL;
370
371 acpi_table_print_madt_entry(header);
372
373 mp_register_ioapic(ioapic->id,
374 ioapic->address, ioapic->global_irq_base);
375
376 return 0;
377 }
378
379 /*
380 * Parse Interrupt Source Override for the ACPI SCI
381 */
382 static void __init acpi_sci_ioapic_setup(u32 gsi, u16 polarity, u16 trigger)
383 {
384 if (trigger == 0) /* compatible SCI trigger is level */
385 trigger = 3;
386
387 if (polarity == 0) /* compatible SCI polarity is low */
388 polarity = 3;
389
390 /* Command-line over-ride via acpi_sci= */
391 if (acpi_sci_flags & ACPI_MADT_TRIGGER_MASK)
392 trigger = (acpi_sci_flags & ACPI_MADT_TRIGGER_MASK) >> 2;
393
394 if (acpi_sci_flags & ACPI_MADT_POLARITY_MASK)
395 polarity = acpi_sci_flags & ACPI_MADT_POLARITY_MASK;
396
397 /*
398 * mp_config_acpi_legacy_irqs() already setup IRQs < 16
399 * If GSI is < 16, this will update its flags,
400 * else it will create a new mp_irqs[] entry.
401 */
402 mp_override_legacy_irq(gsi, polarity, trigger, gsi);
403
404 /*
405 * stash over-ride to indicate we've been here
406 * and for later update of acpi_gbl_FADT
407 */
408 acpi_sci_override_gsi = gsi;
409 return;
410 }
411
412 static int __init
413 acpi_parse_int_src_ovr(struct acpi_subtable_header * header,
414 const unsigned long end)
415 {
416 struct acpi_madt_interrupt_override *intsrc = NULL;
417
418 intsrc = (struct acpi_madt_interrupt_override *)header;
419
420 if (BAD_MADT_ENTRY(intsrc, end))
421 return -EINVAL;
422
423 acpi_table_print_madt_entry(header);
424
425 if (intsrc->source_irq == acpi_gbl_FADT.sci_interrupt) {
426 acpi_sci_ioapic_setup(intsrc->global_irq,
427 intsrc->inti_flags & ACPI_MADT_POLARITY_MASK,
428 (intsrc->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2);
429 return 0;
430 }
431
432 if (acpi_skip_timer_override &&
433 intsrc->source_irq == 0 && intsrc->global_irq == 2) {
434 printk(PREFIX "BIOS IRQ0 pin2 override ignored.\n");
435 return 0;
436 }
437
438 mp_override_legacy_irq(intsrc->source_irq,
439 intsrc->inti_flags & ACPI_MADT_POLARITY_MASK,
440 (intsrc->inti_flags & ACPI_MADT_TRIGGER_MASK) >> 2,
441 intsrc->global_irq);
442
443 return 0;
444 }
445
446 static int __init
447 acpi_parse_nmi_src(struct acpi_subtable_header * header, const unsigned long end)
448 {
449 struct acpi_madt_nmi_source *nmi_src = NULL;
450
451 nmi_src = (struct acpi_madt_nmi_source *)header;
452
453 if (BAD_MADT_ENTRY(nmi_src, end))
454 return -EINVAL;
455
456 acpi_table_print_madt_entry(header);
457
458 /* TBD: Support nimsrc entries? */
459
460 return 0;
461 }
462
463 #endif /* CONFIG_X86_IO_APIC */
464
465 /*
466 * acpi_pic_sci_set_trigger()
467 *
468 * use ELCR to set PIC-mode trigger type for SCI
469 *
470 * If a PIC-mode SCI is not recognized or gives spurious IRQ7's
471 * it may require Edge Trigger -- use "acpi_sci=edge"
472 *
473 * Port 0x4d0-4d1 are ECLR1 and ECLR2, the Edge/Level Control Registers
474 * for the 8259 PIC. bit[n] = 1 means irq[n] is Level, otherwise Edge.
475 * ECLR1 is IRQs 0-7 (IRQ 0, 1, 2 must be 0)
476 * ECLR2 is IRQs 8-15 (IRQ 8, 13 must be 0)
477 */
478
479 void __init acpi_pic_sci_set_trigger(unsigned int irq, u16 trigger)
480 {
481 unsigned int mask = 1 << irq;
482 unsigned int old, new;
483
484 /* Real old ELCR mask */
485 old = inb(0x4d0) | (inb(0x4d1) << 8);
486
487 /*
488 * If we use ACPI to set PCI IRQs, then we should clear ELCR
489 * since we will set it correctly as we enable the PCI irq
490 * routing.
491 */
492 new = acpi_noirq ? old : 0;
493
494 /*
495 * Update SCI information in the ELCR, it isn't in the PCI
496 * routing tables..
497 */
498 switch (trigger) {
499 case 1: /* Edge - clear */
500 new &= ~mask;
501 break;
502 case 3: /* Level - set */
503 new |= mask;
504 break;
505 }
506
507 if (old == new)
508 return;
509
510 printk(PREFIX "setting ELCR to %04x (from %04x)\n", new, old);
511 outb(new, 0x4d0);
512 outb(new >> 8, 0x4d1);
513 }
514
515 int acpi_gsi_to_irq(u32 gsi, unsigned int *irq)
516 {
517 *irq = gsi;
518 return 0;
519 }
520
521 /*
522 * success: return IRQ number (>=0)
523 * failure: return < 0
524 */
525 int acpi_register_gsi(u32 gsi, int triggering, int polarity)
526 {
527 unsigned int irq;
528 unsigned int plat_gsi = gsi;
529
530 #ifdef CONFIG_PCI
531 /*
532 * Make sure all (legacy) PCI IRQs are set as level-triggered.
533 */
534 if (acpi_irq_model == ACPI_IRQ_MODEL_PIC) {
535 if (triggering == ACPI_LEVEL_SENSITIVE)
536 eisa_set_level_irq(gsi);
537 }
538 #endif
539
540 #ifdef CONFIG_X86_IO_APIC
541 if (acpi_irq_model == ACPI_IRQ_MODEL_IOAPIC) {
542 plat_gsi = mp_register_gsi(gsi, triggering, polarity);
543 }
544 #endif
545 acpi_gsi_to_irq(plat_gsi, &irq);
546 return irq;
547 }
548
549 /*
550 * ACPI based hotplug support for CPU
551 */
552 #ifdef CONFIG_ACPI_HOTPLUG_CPU
553
554 static int __cpuinit _acpi_map_lsapic(acpi_handle handle, int *pcpu)
555 {
556 struct acpi_buffer buffer = { ACPI_ALLOCATE_BUFFER, NULL };
557 union acpi_object *obj;
558 struct acpi_madt_local_apic *lapic;
559 cpumask_var_t tmp_map, new_map;
560 u8 physid;
561 int cpu;
562 int retval = -ENOMEM;
563
564 if (ACPI_FAILURE(acpi_evaluate_object(handle, "_MAT", NULL, &buffer)))
565 return -EINVAL;
566
567 if (!buffer.length || !buffer.pointer)
568 return -EINVAL;
569
570 obj = buffer.pointer;
571 if (obj->type != ACPI_TYPE_BUFFER ||
572 obj->buffer.length < sizeof(*lapic)) {
573 kfree(buffer.pointer);
574 return -EINVAL;
575 }
576
577 lapic = (struct acpi_madt_local_apic *)obj->buffer.pointer;
578
579 if (lapic->header.type != ACPI_MADT_TYPE_LOCAL_APIC ||
580 !(lapic->lapic_flags & ACPI_MADT_ENABLED)) {
581 kfree(buffer.pointer);
582 return -EINVAL;
583 }
584
585 physid = lapic->id;
586
587 kfree(buffer.pointer);
588 buffer.length = ACPI_ALLOCATE_BUFFER;
589 buffer.pointer = NULL;
590
591 if (!alloc_cpumask_var(&tmp_map, GFP_KERNEL))
592 goto out;
593
594 if (!alloc_cpumask_var(&new_map, GFP_KERNEL))
595 goto free_tmp_map;
596
597 cpumask_copy(tmp_map, cpu_present_mask);
598 acpi_register_lapic(physid, lapic->lapic_flags & ACPI_MADT_ENABLED);
599
600 /*
601 * If mp_register_lapic successfully generates a new logical cpu
602 * number, then the following will get us exactly what was mapped
603 */
604 cpumask_andnot(new_map, cpu_present_mask, tmp_map);
605 if (cpumask_empty(new_map)) {
606 printk ("Unable to map lapic to logical cpu number\n");
607 retval = -EINVAL;
608 goto free_new_map;
609 }
610
611 cpu = cpumask_first(new_map);
612
613 *pcpu = cpu;
614 retval = 0;
615
616 free_new_map:
617 free_cpumask_var(new_map);
618 free_tmp_map:
619 free_cpumask_var(tmp_map);
620 out:
621 return retval;
622 }
623
624 /* wrapper to silence section mismatch warning */
625 int __ref acpi_map_lsapic(acpi_handle handle, int *pcpu)
626 {
627 return _acpi_map_lsapic(handle, pcpu);
628 }
629 EXPORT_SYMBOL(acpi_map_lsapic);
630
631 int acpi_unmap_lsapic(int cpu)
632 {
633 per_cpu(x86_cpu_to_apicid, cpu) = -1;
634 set_cpu_present(cpu, false);
635 num_processors--;
636
637 return (0);
638 }
639
640 EXPORT_SYMBOL(acpi_unmap_lsapic);
641 #endif /* CONFIG_ACPI_HOTPLUG_CPU */
642
643 int acpi_register_ioapic(acpi_handle handle, u64 phys_addr, u32 gsi_base)
644 {
645 /* TBD */
646 return -EINVAL;
647 }
648
649 EXPORT_SYMBOL(acpi_register_ioapic);
650
651 int acpi_unregister_ioapic(acpi_handle handle, u32 gsi_base)
652 {
653 /* TBD */
654 return -EINVAL;
655 }
656
657 EXPORT_SYMBOL(acpi_unregister_ioapic);
658
659 static int __init acpi_parse_sbf(struct acpi_table_header *table)
660 {
661 struct acpi_table_boot *sb;
662
663 sb = (struct acpi_table_boot *)table;
664 if (!sb) {
665 printk(KERN_WARNING PREFIX "Unable to map SBF\n");
666 return -ENODEV;
667 }
668
669 sbf_port = sb->cmos_index; /* Save CMOS port */
670
671 return 0;
672 }
673
674 #ifdef CONFIG_HPET_TIMER
675 #include <asm/hpet.h>
676
677 static struct __initdata resource *hpet_res;
678
679 static int __init acpi_parse_hpet(struct acpi_table_header *table)
680 {
681 struct acpi_table_hpet *hpet_tbl;
682
683 hpet_tbl = (struct acpi_table_hpet *)table;
684 if (!hpet_tbl) {
685 printk(KERN_WARNING PREFIX "Unable to map HPET\n");
686 return -ENODEV;
687 }
688
689 if (hpet_tbl->address.space_id != ACPI_SPACE_MEM) {
690 printk(KERN_WARNING PREFIX "HPET timers must be located in "
691 "memory.\n");
692 return -1;
693 }
694
695 hpet_address = hpet_tbl->address.address;
696
697 /*
698 * Some broken BIOSes advertise HPET at 0x0. We really do not
699 * want to allocate a resource there.
700 */
701 if (!hpet_address) {
702 printk(KERN_WARNING PREFIX
703 "HPET id: %#x base: %#lx is invalid\n",
704 hpet_tbl->id, hpet_address);
705 return 0;
706 }
707 #ifdef CONFIG_X86_64
708 /*
709 * Some even more broken BIOSes advertise HPET at
710 * 0xfed0000000000000 instead of 0xfed00000. Fix it up and add
711 * some noise:
712 */
713 if (hpet_address == 0xfed0000000000000UL) {
714 if (!hpet_force_user) {
715 printk(KERN_WARNING PREFIX "HPET id: %#x "
716 "base: 0xfed0000000000000 is bogus\n "
717 "try hpet=force on the kernel command line to "
718 "fix it up to 0xfed00000.\n", hpet_tbl->id);
719 hpet_address = 0;
720 return 0;
721 }
722 printk(KERN_WARNING PREFIX
723 "HPET id: %#x base: 0xfed0000000000000 fixed up "
724 "to 0xfed00000.\n", hpet_tbl->id);
725 hpet_address >>= 32;
726 }
727 #endif
728 printk(KERN_INFO PREFIX "HPET id: %#x base: %#lx\n",
729 hpet_tbl->id, hpet_address);
730
731 /*
732 * Allocate and initialize the HPET firmware resource for adding into
733 * the resource tree during the lateinit timeframe.
734 */
735 #define HPET_RESOURCE_NAME_SIZE 9
736 hpet_res = alloc_bootmem(sizeof(*hpet_res) + HPET_RESOURCE_NAME_SIZE);
737
738 hpet_res->name = (void *)&hpet_res[1];
739 hpet_res->flags = IORESOURCE_MEM;
740 snprintf((char *)hpet_res->name, HPET_RESOURCE_NAME_SIZE, "HPET %u",
741 hpet_tbl->sequence);
742
743 hpet_res->start = hpet_address;
744 hpet_res->end = hpet_address + (1 * 1024) - 1;
745
746 return 0;
747 }
748
749 /*
750 * hpet_insert_resource inserts the HPET resources used into the resource
751 * tree.
752 */
753 static __init int hpet_insert_resource(void)
754 {
755 if (!hpet_res)
756 return 1;
757
758 return insert_resource(&iomem_resource, hpet_res);
759 }
760
761 late_initcall(hpet_insert_resource);
762
763 #else
764 #define acpi_parse_hpet NULL
765 #endif
766
767 static int __init acpi_parse_fadt(struct acpi_table_header *table)
768 {
769
770 #ifdef CONFIG_X86_PM_TIMER
771 /* detect the location of the ACPI PM Timer */
772 if (acpi_gbl_FADT.header.revision >= FADT2_REVISION_ID) {
773 /* FADT rev. 2 */
774 if (acpi_gbl_FADT.xpm_timer_block.space_id !=
775 ACPI_ADR_SPACE_SYSTEM_IO)
776 return 0;
777
778 pmtmr_ioport = acpi_gbl_FADT.xpm_timer_block.address;
779 /*
780 * "X" fields are optional extensions to the original V1.0
781 * fields, so we must selectively expand V1.0 fields if the
782 * corresponding X field is zero.
783 */
784 if (!pmtmr_ioport)
785 pmtmr_ioport = acpi_gbl_FADT.pm_timer_block;
786 } else {
787 /* FADT rev. 1 */
788 pmtmr_ioport = acpi_gbl_FADT.pm_timer_block;
789 }
790 if (pmtmr_ioport)
791 printk(KERN_INFO PREFIX "PM-Timer IO Port: %#x\n",
792 pmtmr_ioport);
793 #endif
794 return 0;
795 }
796
797 #ifdef CONFIG_X86_LOCAL_APIC
798 /*
799 * Parse LAPIC entries in MADT
800 * returns 0 on success, < 0 on error
801 */
802
803 static void __init acpi_register_lapic_address(unsigned long address)
804 {
805 mp_lapic_addr = address;
806
807 set_fixmap_nocache(FIX_APIC_BASE, address);
808 if (boot_cpu_physical_apicid == -1U) {
809 boot_cpu_physical_apicid = read_apic_id();
810 apic_version[boot_cpu_physical_apicid] =
811 GET_APIC_VERSION(apic_read(APIC_LVR));
812 }
813 }
814
815 static int __init early_acpi_parse_madt_lapic_addr_ovr(void)
816 {
817 int count;
818
819 if (!cpu_has_apic)
820 return -ENODEV;
821
822 /*
823 * Note that the LAPIC address is obtained from the MADT (32-bit value)
824 * and (optionally) overriden by a LAPIC_ADDR_OVR entry (64-bit value).
825 */
826
827 count =
828 acpi_table_parse_madt(ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE,
829 acpi_parse_lapic_addr_ovr, 0);
830 if (count < 0) {
831 printk(KERN_ERR PREFIX
832 "Error parsing LAPIC address override entry\n");
833 return count;
834 }
835
836 acpi_register_lapic_address(acpi_lapic_addr);
837
838 return count;
839 }
840
841 static int __init acpi_parse_madt_lapic_entries(void)
842 {
843 int count;
844 int x2count = 0;
845
846 if (!cpu_has_apic)
847 return -ENODEV;
848
849 /*
850 * Note that the LAPIC address is obtained from the MADT (32-bit value)
851 * and (optionally) overriden by a LAPIC_ADDR_OVR entry (64-bit value).
852 */
853
854 count =
855 acpi_table_parse_madt(ACPI_MADT_TYPE_LOCAL_APIC_OVERRIDE,
856 acpi_parse_lapic_addr_ovr, 0);
857 if (count < 0) {
858 printk(KERN_ERR PREFIX
859 "Error parsing LAPIC address override entry\n");
860 return count;
861 }
862
863 acpi_register_lapic_address(acpi_lapic_addr);
864
865 count = acpi_table_parse_madt(ACPI_MADT_TYPE_LOCAL_SAPIC,
866 acpi_parse_sapic, MAX_APICS);
867
868 if (!count) {
869 x2count = acpi_table_parse_madt(ACPI_MADT_TYPE_LOCAL_X2APIC,
870 acpi_parse_x2apic, MAX_APICS);
871 count = acpi_table_parse_madt(ACPI_MADT_TYPE_LOCAL_APIC,
872 acpi_parse_lapic, MAX_APICS);
873 }
874 if (!count && !x2count) {
875 printk(KERN_ERR PREFIX "No LAPIC entries present\n");
876 /* TBD: Cleanup to allow fallback to MPS */
877 return -ENODEV;
878 } else if (count < 0 || x2count < 0) {
879 printk(KERN_ERR PREFIX "Error parsing LAPIC entry\n");
880 /* TBD: Cleanup to allow fallback to MPS */
881 return count;
882 }
883
884 x2count =
885 acpi_table_parse_madt(ACPI_MADT_TYPE_LOCAL_X2APIC_NMI,
886 acpi_parse_x2apic_nmi, 0);
887 count =
888 acpi_table_parse_madt(ACPI_MADT_TYPE_LOCAL_APIC_NMI, acpi_parse_lapic_nmi, 0);
889 if (count < 0 || x2count < 0) {
890 printk(KERN_ERR PREFIX "Error parsing LAPIC NMI entry\n");
891 /* TBD: Cleanup to allow fallback to MPS */
892 return count;
893 }
894 return 0;
895 }
896 #endif /* CONFIG_X86_LOCAL_APIC */
897
898 #ifdef CONFIG_X86_IO_APIC
899 #define MP_ISA_BUS 0
900
901 #ifdef CONFIG_X86_ES7000
902 extern int es7000_plat;
903 #endif
904
905 static struct {
906 int apic_id;
907 int gsi_base;
908 int gsi_end;
909 DECLARE_BITMAP(pin_programmed, MP_MAX_IOAPIC_PIN + 1);
910 } mp_ioapic_routing[MAX_IO_APICS];
911
912 int mp_find_ioapic(int gsi)
913 {
914 int i = 0;
915
916 /* Find the IOAPIC that manages this GSI. */
917 for (i = 0; i < nr_ioapics; i++) {
918 if ((gsi >= mp_ioapic_routing[i].gsi_base)
919 && (gsi <= mp_ioapic_routing[i].gsi_end))
920 return i;
921 }
922
923 printk(KERN_ERR "ERROR: Unable to locate IOAPIC for GSI %d\n", gsi);
924 return -1;
925 }
926
927 int mp_find_ioapic_pin(int ioapic, int gsi)
928 {
929 if (WARN_ON(ioapic == -1))
930 return -1;
931 if (WARN_ON(gsi > mp_ioapic_routing[ioapic].gsi_end))
932 return -1;
933
934 return gsi - mp_ioapic_routing[ioapic].gsi_base;
935 }
936
937 static u8 __init uniq_ioapic_id(u8 id)
938 {
939 #ifdef CONFIG_X86_32
940 if ((boot_cpu_data.x86_vendor == X86_VENDOR_INTEL) &&
941 !APIC_XAPIC(apic_version[boot_cpu_physical_apicid]))
942 return io_apic_get_unique_id(nr_ioapics, id);
943 else
944 return id;
945 #else
946 int i;
947 DECLARE_BITMAP(used, 256);
948 bitmap_zero(used, 256);
949 for (i = 0; i < nr_ioapics; i++) {
950 struct mpc_ioapic *ia = &mp_ioapics[i];
951 __set_bit(ia->apicid, used);
952 }
953 if (!test_bit(id, used))
954 return id;
955 return find_first_zero_bit(used, 256);
956 #endif
957 }
958
959 static int bad_ioapic(unsigned long address)
960 {
961 if (nr_ioapics >= MAX_IO_APICS) {
962 printk(KERN_ERR "ERROR: Max # of I/O APICs (%d) exceeded "
963 "(found %d)\n", MAX_IO_APICS, nr_ioapics);
964 panic("Recompile kernel with bigger MAX_IO_APICS!\n");
965 }
966 if (!address) {
967 printk(KERN_ERR "WARNING: Bogus (zero) I/O APIC address"
968 " found in table, skipping!\n");
969 return 1;
970 }
971 return 0;
972 }
973
974 void __init mp_register_ioapic(int id, u32 address, u32 gsi_base)
975 {
976 int idx = 0;
977
978 if (bad_ioapic(address))
979 return;
980
981 idx = nr_ioapics;
982
983 mp_ioapics[idx].type = MP_IOAPIC;
984 mp_ioapics[idx].flags = MPC_APIC_USABLE;
985 mp_ioapics[idx].apicaddr = address;
986
987 set_fixmap_nocache(FIX_IO_APIC_BASE_0 + idx, address);
988 mp_ioapics[idx].apicid = uniq_ioapic_id(id);
989 #ifdef CONFIG_X86_32
990 mp_ioapics[idx].apicver = io_apic_get_version(idx);
991 #else
992 mp_ioapics[idx].apicver = 0;
993 #endif
994 /*
995 * Build basic GSI lookup table to facilitate gsi->io_apic lookups
996 * and to prevent reprogramming of IOAPIC pins (PCI GSIs).
997 */
998 mp_ioapic_routing[idx].apic_id = mp_ioapics[idx].apicid;
999 mp_ioapic_routing[idx].gsi_base = gsi_base;
1000 mp_ioapic_routing[idx].gsi_end = gsi_base +
1001 io_apic_get_redir_entries(idx);
1002
1003 printk(KERN_INFO "IOAPIC[%d]: apic_id %d, version %d, address 0x%x, "
1004 "GSI %d-%d\n", idx, mp_ioapics[idx].apicid,
1005 mp_ioapics[idx].apicver, mp_ioapics[idx].apicaddr,
1006 mp_ioapic_routing[idx].gsi_base, mp_ioapic_routing[idx].gsi_end);
1007
1008 nr_ioapics++;
1009 }
1010
1011 int __init acpi_probe_gsi(void)
1012 {
1013 int idx;
1014 int gsi;
1015 int max_gsi = 0;
1016
1017 if (acpi_disabled)
1018 return 0;
1019
1020 if (!acpi_ioapic)
1021 return 0;
1022
1023 max_gsi = 0;
1024 for (idx = 0; idx < nr_ioapics; idx++) {
1025 gsi = mp_ioapic_routing[idx].gsi_end;
1026
1027 if (gsi > max_gsi)
1028 max_gsi = gsi;
1029 }
1030
1031 return max_gsi + 1;
1032 }
1033
1034 static void assign_to_mp_irq(struct mpc_intsrc *m,
1035 struct mpc_intsrc *mp_irq)
1036 {
1037 memcpy(mp_irq, m, sizeof(struct mpc_intsrc));
1038 }
1039
1040 static int mp_irq_cmp(struct mpc_intsrc *mp_irq,
1041 struct mpc_intsrc *m)
1042 {
1043 return memcmp(mp_irq, m, sizeof(struct mpc_intsrc));
1044 }
1045
1046 static void save_mp_irq(struct mpc_intsrc *m)
1047 {
1048 int i;
1049
1050 for (i = 0; i < mp_irq_entries; i++) {
1051 if (!mp_irq_cmp(&mp_irqs[i], m))
1052 return;
1053 }
1054
1055 assign_to_mp_irq(m, &mp_irqs[mp_irq_entries]);
1056 if (++mp_irq_entries == MAX_IRQ_SOURCES)
1057 panic("Max # of irq sources exceeded!!\n");
1058 }
1059
1060 void __init mp_override_legacy_irq(u8 bus_irq, u8 polarity, u8 trigger, u32 gsi)
1061 {
1062 int ioapic;
1063 int pin;
1064 struct mpc_intsrc mp_irq;
1065
1066 /*
1067 * Convert 'gsi' to 'ioapic.pin'.
1068 */
1069 ioapic = mp_find_ioapic(gsi);
1070 if (ioapic < 0)
1071 return;
1072 pin = mp_find_ioapic_pin(ioapic, gsi);
1073
1074 /*
1075 * TBD: This check is for faulty timer entries, where the override
1076 * erroneously sets the trigger to level, resulting in a HUGE
1077 * increase of timer interrupts!
1078 */
1079 if ((bus_irq == 0) && (trigger == 3))
1080 trigger = 1;
1081
1082 mp_irq.type = MP_INTSRC;
1083 mp_irq.irqtype = mp_INT;
1084 mp_irq.irqflag = (trigger << 2) | polarity;
1085 mp_irq.srcbus = MP_ISA_BUS;
1086 mp_irq.srcbusirq = bus_irq; /* IRQ */
1087 mp_irq.dstapic = mp_ioapics[ioapic].apicid; /* APIC ID */
1088 mp_irq.dstirq = pin; /* INTIN# */
1089
1090 save_mp_irq(&mp_irq);
1091 }
1092
1093 void __init mp_config_acpi_legacy_irqs(void)
1094 {
1095 int i;
1096 int ioapic;
1097 unsigned int dstapic;
1098 struct mpc_intsrc mp_irq;
1099
1100 #if defined (CONFIG_MCA) || defined (CONFIG_EISA)
1101 /*
1102 * Fabricate the legacy ISA bus (bus #31).
1103 */
1104 mp_bus_id_to_type[MP_ISA_BUS] = MP_BUS_ISA;
1105 #endif
1106 set_bit(MP_ISA_BUS, mp_bus_not_pci);
1107 pr_debug("Bus #%d is ISA\n", MP_ISA_BUS);
1108
1109 #ifdef CONFIG_X86_ES7000
1110 /*
1111 * Older generations of ES7000 have no legacy identity mappings
1112 */
1113 if (es7000_plat == 1)
1114 return;
1115 #endif
1116
1117 /*
1118 * Locate the IOAPIC that manages the ISA IRQs (0-15).
1119 */
1120 ioapic = mp_find_ioapic(0);
1121 if (ioapic < 0)
1122 return;
1123 dstapic = mp_ioapics[ioapic].apicid;
1124
1125 /*
1126 * Use the default configuration for the IRQs 0-15. Unless
1127 * overridden by (MADT) interrupt source override entries.
1128 */
1129 for (i = 0; i < 16; i++) {
1130 int idx;
1131
1132 for (idx = 0; idx < mp_irq_entries; idx++) {
1133 struct mpc_intsrc *irq = mp_irqs + idx;
1134
1135 /* Do we already have a mapping for this ISA IRQ? */
1136 if (irq->srcbus == MP_ISA_BUS && irq->srcbusirq == i)
1137 break;
1138
1139 /* Do we already have a mapping for this IOAPIC pin */
1140 if (irq->dstapic == dstapic && irq->dstirq == i)
1141 break;
1142 }
1143
1144 if (idx != mp_irq_entries) {
1145 printk(KERN_DEBUG "ACPI: IRQ%d used by override.\n", i);
1146 continue; /* IRQ already used */
1147 }
1148
1149 mp_irq.type = MP_INTSRC;
1150 mp_irq.irqflag = 0; /* Conforming */
1151 mp_irq.srcbus = MP_ISA_BUS;
1152 mp_irq.dstapic = dstapic;
1153 mp_irq.irqtype = mp_INT;
1154 mp_irq.srcbusirq = i; /* Identity mapped */
1155 mp_irq.dstirq = i;
1156
1157 save_mp_irq(&mp_irq);
1158 }
1159 }
1160
1161 int mp_register_gsi(u32 gsi, int triggering, int polarity)
1162 {
1163 int ioapic;
1164 int ioapic_pin;
1165 #ifdef CONFIG_X86_32
1166 #define MAX_GSI_NUM 4096
1167 #define IRQ_COMPRESSION_START 64
1168
1169 static int pci_irq = IRQ_COMPRESSION_START;
1170 /*
1171 * Mapping between Global System Interrupts, which
1172 * represent all possible interrupts, and IRQs
1173 * assigned to actual devices.
1174 */
1175 static int gsi_to_irq[MAX_GSI_NUM];
1176 #else
1177
1178 if (acpi_irq_model != ACPI_IRQ_MODEL_IOAPIC)
1179 return gsi;
1180 #endif
1181
1182 /* Don't set up the ACPI SCI because it's already set up */
1183 if (acpi_gbl_FADT.sci_interrupt == gsi)
1184 return gsi;
1185
1186 ioapic = mp_find_ioapic(gsi);
1187 if (ioapic < 0) {
1188 printk(KERN_WARNING "No IOAPIC for GSI %u\n", gsi);
1189 return gsi;
1190 }
1191
1192 ioapic_pin = mp_find_ioapic_pin(ioapic, gsi);
1193
1194 #ifdef CONFIG_X86_32
1195 if (ioapic_renumber_irq)
1196 gsi = ioapic_renumber_irq(ioapic, gsi);
1197 #endif
1198
1199 /*
1200 * Avoid pin reprogramming. PRTs typically include entries
1201 * with redundant pin->gsi mappings (but unique PCI devices);
1202 * we only program the IOAPIC on the first.
1203 */
1204 if (ioapic_pin > MP_MAX_IOAPIC_PIN) {
1205 printk(KERN_ERR "Invalid reference to IOAPIC pin "
1206 "%d-%d\n", mp_ioapic_routing[ioapic].apic_id,
1207 ioapic_pin);
1208 return gsi;
1209 }
1210 if (test_bit(ioapic_pin, mp_ioapic_routing[ioapic].pin_programmed)) {
1211 pr_debug("Pin %d-%d already programmed\n",
1212 mp_ioapic_routing[ioapic].apic_id, ioapic_pin);
1213 #ifdef CONFIG_X86_32
1214 return (gsi < IRQ_COMPRESSION_START ? gsi : gsi_to_irq[gsi]);
1215 #else
1216 return gsi;
1217 #endif
1218 }
1219
1220 set_bit(ioapic_pin, mp_ioapic_routing[ioapic].pin_programmed);
1221 #ifdef CONFIG_X86_32
1222 /*
1223 * For GSI >= 64, use IRQ compression
1224 */
1225 if ((gsi >= IRQ_COMPRESSION_START)
1226 && (triggering == ACPI_LEVEL_SENSITIVE)) {
1227 /*
1228 * For PCI devices assign IRQs in order, avoiding gaps
1229 * due to unused I/O APIC pins.
1230 */
1231 int irq = gsi;
1232 if (gsi < MAX_GSI_NUM) {
1233 /*
1234 * Retain the VIA chipset work-around (gsi > 15), but
1235 * avoid a problem where the 8254 timer (IRQ0) is setup
1236 * via an override (so it's not on pin 0 of the ioapic),
1237 * and at the same time, the pin 0 interrupt is a PCI
1238 * type. The gsi > 15 test could cause these two pins
1239 * to be shared as IRQ0, and they are not shareable.
1240 * So test for this condition, and if necessary, avoid
1241 * the pin collision.
1242 */
1243 gsi = pci_irq++;
1244 /*
1245 * Don't assign IRQ used by ACPI SCI
1246 */
1247 if (gsi == acpi_gbl_FADT.sci_interrupt)
1248 gsi = pci_irq++;
1249 gsi_to_irq[irq] = gsi;
1250 } else {
1251 printk(KERN_ERR "GSI %u is too high\n", gsi);
1252 return gsi;
1253 }
1254 }
1255 #endif
1256 io_apic_set_pci_routing(ioapic, ioapic_pin, gsi,
1257 triggering == ACPI_EDGE_SENSITIVE ? 0 : 1,
1258 polarity == ACPI_ACTIVE_HIGH ? 0 : 1);
1259 return gsi;
1260 }
1261
1262 int mp_config_acpi_gsi(unsigned char number, unsigned int devfn, u8 pin,
1263 u32 gsi, int triggering, int polarity)
1264 {
1265 #ifdef CONFIG_X86_MPPARSE
1266 struct mpc_intsrc mp_irq;
1267 int ioapic;
1268
1269 if (!acpi_ioapic)
1270 return 0;
1271
1272 /* print the entry should happen on mptable identically */
1273 mp_irq.type = MP_INTSRC;
1274 mp_irq.irqtype = mp_INT;
1275 mp_irq.irqflag = (triggering == ACPI_EDGE_SENSITIVE ? 4 : 0x0c) |
1276 (polarity == ACPI_ACTIVE_HIGH ? 1 : 3);
1277 mp_irq.srcbus = number;
1278 mp_irq.srcbusirq = (((devfn >> 3) & 0x1f) << 2) | ((pin - 1) & 3);
1279 ioapic = mp_find_ioapic(gsi);
1280 mp_irq.dstapic = mp_ioapic_routing[ioapic].apic_id;
1281 mp_irq.dstirq = mp_find_ioapic_pin(ioapic, gsi);
1282
1283 save_mp_irq(&mp_irq);
1284 #endif
1285 return 0;
1286 }
1287
1288 /*
1289 * Parse IOAPIC related entries in MADT
1290 * returns 0 on success, < 0 on error
1291 */
1292 static int __init acpi_parse_madt_ioapic_entries(void)
1293 {
1294 int count;
1295
1296 /*
1297 * ACPI interpreter is required to complete interrupt setup,
1298 * so if it is off, don't enumerate the io-apics with ACPI.
1299 * If MPS is present, it will handle them,
1300 * otherwise the system will stay in PIC mode
1301 */
1302 if (acpi_disabled || acpi_noirq) {
1303 return -ENODEV;
1304 }
1305
1306 if (!cpu_has_apic)
1307 return -ENODEV;
1308
1309 /*
1310 * if "noapic" boot option, don't look for IO-APICs
1311 */
1312 if (skip_ioapic_setup) {
1313 printk(KERN_INFO PREFIX "Skipping IOAPIC probe "
1314 "due to 'noapic' option.\n");
1315 return -ENODEV;
1316 }
1317
1318 count =
1319 acpi_table_parse_madt(ACPI_MADT_TYPE_IO_APIC, acpi_parse_ioapic,
1320 MAX_IO_APICS);
1321 if (!count) {
1322 printk(KERN_ERR PREFIX "No IOAPIC entries present\n");
1323 return -ENODEV;
1324 } else if (count < 0) {
1325 printk(KERN_ERR PREFIX "Error parsing IOAPIC entry\n");
1326 return count;
1327 }
1328
1329 count =
1330 acpi_table_parse_madt(ACPI_MADT_TYPE_INTERRUPT_OVERRIDE, acpi_parse_int_src_ovr,
1331 nr_irqs);
1332 if (count < 0) {
1333 printk(KERN_ERR PREFIX
1334 "Error parsing interrupt source overrides entry\n");
1335 /* TBD: Cleanup to allow fallback to MPS */
1336 return count;
1337 }
1338
1339 /*
1340 * If BIOS did not supply an INT_SRC_OVR for the SCI
1341 * pretend we got one so we can set the SCI flags.
1342 */
1343 if (!acpi_sci_override_gsi)
1344 acpi_sci_ioapic_setup(acpi_gbl_FADT.sci_interrupt, 0, 0);
1345
1346 /* Fill in identity legacy mapings where no override */
1347 mp_config_acpi_legacy_irqs();
1348
1349 count =
1350 acpi_table_parse_madt(ACPI_MADT_TYPE_NMI_SOURCE, acpi_parse_nmi_src,
1351 nr_irqs);
1352 if (count < 0) {
1353 printk(KERN_ERR PREFIX "Error parsing NMI SRC entry\n");
1354 /* TBD: Cleanup to allow fallback to MPS */
1355 return count;
1356 }
1357
1358 return 0;
1359 }
1360 #else
1361 static inline int acpi_parse_madt_ioapic_entries(void)
1362 {
1363 return -1;
1364 }
1365 #endif /* !CONFIG_X86_IO_APIC */
1366
1367 static void __init early_acpi_process_madt(void)
1368 {
1369 #ifdef CONFIG_X86_LOCAL_APIC
1370 int error;
1371
1372 if (!acpi_table_parse(ACPI_SIG_MADT, acpi_parse_madt)) {
1373
1374 /*
1375 * Parse MADT LAPIC entries
1376 */
1377 error = early_acpi_parse_madt_lapic_addr_ovr();
1378 if (!error) {
1379 acpi_lapic = 1;
1380 smp_found_config = 1;
1381 }
1382 if (error == -EINVAL) {
1383 /*
1384 * Dell Precision Workstation 410, 610 come here.
1385 */
1386 printk(KERN_ERR PREFIX
1387 "Invalid BIOS MADT, disabling ACPI\n");
1388 disable_acpi();
1389 }
1390 }
1391 #endif
1392 }
1393
1394 static void __init acpi_process_madt(void)
1395 {
1396 #ifdef CONFIG_X86_LOCAL_APIC
1397 int error;
1398
1399 if (!acpi_table_parse(ACPI_SIG_MADT, acpi_parse_madt)) {
1400
1401 /*
1402 * Parse MADT LAPIC entries
1403 */
1404 error = acpi_parse_madt_lapic_entries();
1405 if (!error) {
1406 acpi_lapic = 1;
1407
1408 #ifdef CONFIG_X86_BIGSMP
1409 generic_bigsmp_probe();
1410 #endif
1411 /*
1412 * Parse MADT IO-APIC entries
1413 */
1414 error = acpi_parse_madt_ioapic_entries();
1415 if (!error) {
1416 acpi_irq_model = ACPI_IRQ_MODEL_IOAPIC;
1417 acpi_ioapic = 1;
1418
1419 smp_found_config = 1;
1420 if (apic->setup_apic_routing)
1421 apic->setup_apic_routing();
1422 }
1423 }
1424 if (error == -EINVAL) {
1425 /*
1426 * Dell Precision Workstation 410, 610 come here.
1427 */
1428 printk(KERN_ERR PREFIX
1429 "Invalid BIOS MADT, disabling ACPI\n");
1430 disable_acpi();
1431 }
1432 } else {
1433 /*
1434 * ACPI found no MADT, and so ACPI wants UP PIC mode.
1435 * In the event an MPS table was found, forget it.
1436 * Boot with "acpi=off" to use MPS on such a system.
1437 */
1438 if (smp_found_config) {
1439 printk(KERN_WARNING PREFIX
1440 "No APIC-table, disabling MPS\n");
1441 smp_found_config = 0;
1442 }
1443 }
1444
1445 /*
1446 * ACPI supports both logical (e.g. Hyper-Threading) and physical
1447 * processors, where MPS only supports physical.
1448 */
1449 if (acpi_lapic && acpi_ioapic)
1450 printk(KERN_INFO "Using ACPI (MADT) for SMP configuration "
1451 "information\n");
1452 else if (acpi_lapic)
1453 printk(KERN_INFO "Using ACPI for processor (LAPIC) "
1454 "configuration information\n");
1455 #endif
1456 return;
1457 }
1458
1459 static int __init disable_acpi_irq(const struct dmi_system_id *d)
1460 {
1461 if (!acpi_force) {
1462 printk(KERN_NOTICE "%s detected: force use of acpi=noirq\n",
1463 d->ident);
1464 acpi_noirq_set();
1465 }
1466 return 0;
1467 }
1468
1469 static int __init disable_acpi_pci(const struct dmi_system_id *d)
1470 {
1471 if (!acpi_force) {
1472 printk(KERN_NOTICE "%s detected: force use of pci=noacpi\n",
1473 d->ident);
1474 acpi_disable_pci();
1475 }
1476 return 0;
1477 }
1478
1479 static int __init dmi_disable_acpi(const struct dmi_system_id *d)
1480 {
1481 if (!acpi_force) {
1482 printk(KERN_NOTICE "%s detected: acpi off\n", d->ident);
1483 disable_acpi();
1484 } else {
1485 printk(KERN_NOTICE
1486 "Warning: DMI blacklist says broken, but acpi forced\n");
1487 }
1488 return 0;
1489 }
1490
1491 /*
1492 * Limit ACPI to CPU enumeration for HT
1493 */
1494 static int __init force_acpi_ht(const struct dmi_system_id *d)
1495 {
1496 if (!acpi_force) {
1497 printk(KERN_NOTICE "%s detected: force use of acpi=ht\n",
1498 d->ident);
1499 disable_acpi();
1500 acpi_ht = 1;
1501 } else {
1502 printk(KERN_NOTICE
1503 "Warning: acpi=force overrules DMI blacklist: acpi=ht\n");
1504 }
1505 return 0;
1506 }
1507
1508 /*
1509 * Force ignoring BIOS IRQ0 pin2 override
1510 */
1511 static int __init dmi_ignore_irq0_timer_override(const struct dmi_system_id *d)
1512 {
1513 /*
1514 * The ati_ixp4x0_rev() early PCI quirk should have set
1515 * the acpi_skip_timer_override flag already:
1516 */
1517 if (!acpi_skip_timer_override) {
1518 WARN(1, KERN_ERR "ati_ixp4x0 quirk not complete.\n");
1519 pr_notice("%s detected: Ignoring BIOS IRQ0 pin2 override\n",
1520 d->ident);
1521 acpi_skip_timer_override = 1;
1522 }
1523 return 0;
1524 }
1525
1526 /*
1527 * If your system is blacklisted here, but you find that acpi=force
1528 * works for you, please contact linux-acpi@vger.kernel.org
1529 */
1530 static struct dmi_system_id __initdata acpi_dmi_table[] = {
1531 /*
1532 * Boxes that need ACPI disabled
1533 */
1534 {
1535 .callback = dmi_disable_acpi,
1536 .ident = "IBM Thinkpad",
1537 .matches = {
1538 DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1539 DMI_MATCH(DMI_BOARD_NAME, "2629H1G"),
1540 },
1541 },
1542
1543 /*
1544 * Boxes that need acpi=ht
1545 */
1546 {
1547 .callback = force_acpi_ht,
1548 .ident = "FSC Primergy T850",
1549 .matches = {
1550 DMI_MATCH(DMI_SYS_VENDOR, "FUJITSU SIEMENS"),
1551 DMI_MATCH(DMI_PRODUCT_NAME, "PRIMERGY T850"),
1552 },
1553 },
1554 {
1555 .callback = force_acpi_ht,
1556 .ident = "HP VISUALIZE NT Workstation",
1557 .matches = {
1558 DMI_MATCH(DMI_BOARD_VENDOR, "Hewlett-Packard"),
1559 DMI_MATCH(DMI_PRODUCT_NAME, "HP VISUALIZE NT Workstation"),
1560 },
1561 },
1562 {
1563 .callback = force_acpi_ht,
1564 .ident = "Compaq Workstation W8000",
1565 .matches = {
1566 DMI_MATCH(DMI_SYS_VENDOR, "Compaq"),
1567 DMI_MATCH(DMI_PRODUCT_NAME, "Workstation W8000"),
1568 },
1569 },
1570 {
1571 .callback = force_acpi_ht,
1572 .ident = "ASUS P4B266",
1573 .matches = {
1574 DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC."),
1575 DMI_MATCH(DMI_BOARD_NAME, "P4B266"),
1576 },
1577 },
1578 {
1579 .callback = force_acpi_ht,
1580 .ident = "ASUS P2B-DS",
1581 .matches = {
1582 DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC."),
1583 DMI_MATCH(DMI_BOARD_NAME, "P2B-DS"),
1584 },
1585 },
1586 {
1587 .callback = force_acpi_ht,
1588 .ident = "ASUS CUR-DLS",
1589 .matches = {
1590 DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC."),
1591 DMI_MATCH(DMI_BOARD_NAME, "CUR-DLS"),
1592 },
1593 },
1594 {
1595 .callback = force_acpi_ht,
1596 .ident = "ABIT i440BX-W83977",
1597 .matches = {
1598 DMI_MATCH(DMI_BOARD_VENDOR, "ABIT <http://www.abit.com>"),
1599 DMI_MATCH(DMI_BOARD_NAME, "i440BX-W83977 (BP6)"),
1600 },
1601 },
1602 {
1603 .callback = force_acpi_ht,
1604 .ident = "IBM Bladecenter",
1605 .matches = {
1606 DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1607 DMI_MATCH(DMI_BOARD_NAME, "IBM eServer BladeCenter HS20"),
1608 },
1609 },
1610 {
1611 .callback = force_acpi_ht,
1612 .ident = "IBM eServer xSeries 360",
1613 .matches = {
1614 DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1615 DMI_MATCH(DMI_BOARD_NAME, "eServer xSeries 360"),
1616 },
1617 },
1618 {
1619 .callback = force_acpi_ht,
1620 .ident = "IBM eserver xSeries 330",
1621 .matches = {
1622 DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1623 DMI_MATCH(DMI_BOARD_NAME, "eserver xSeries 330"),
1624 },
1625 },
1626 {
1627 .callback = force_acpi_ht,
1628 .ident = "IBM eserver xSeries 440",
1629 .matches = {
1630 DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1631 DMI_MATCH(DMI_PRODUCT_NAME, "eserver xSeries 440"),
1632 },
1633 },
1634
1635 /*
1636 * Boxes that need ACPI PCI IRQ routing disabled
1637 */
1638 {
1639 .callback = disable_acpi_irq,
1640 .ident = "ASUS A7V",
1641 .matches = {
1642 DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC"),
1643 DMI_MATCH(DMI_BOARD_NAME, "<A7V>"),
1644 /* newer BIOS, Revision 1011, does work */
1645 DMI_MATCH(DMI_BIOS_VERSION,
1646 "ASUS A7V ACPI BIOS Revision 1007"),
1647 },
1648 },
1649 {
1650 /*
1651 * Latest BIOS for IBM 600E (1.16) has bad pcinum
1652 * for LPC bridge, which is needed for the PCI
1653 * interrupt links to work. DSDT fix is in bug 5966.
1654 * 2645, 2646 model numbers are shared with 600/600E/600X
1655 */
1656 .callback = disable_acpi_irq,
1657 .ident = "IBM Thinkpad 600 Series 2645",
1658 .matches = {
1659 DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1660 DMI_MATCH(DMI_BOARD_NAME, "2645"),
1661 },
1662 },
1663 {
1664 .callback = disable_acpi_irq,
1665 .ident = "IBM Thinkpad 600 Series 2646",
1666 .matches = {
1667 DMI_MATCH(DMI_BOARD_VENDOR, "IBM"),
1668 DMI_MATCH(DMI_BOARD_NAME, "2646"),
1669 },
1670 },
1671 /*
1672 * Boxes that need ACPI PCI IRQ routing and PCI scan disabled
1673 */
1674 { /* _BBN 0 bug */
1675 .callback = disable_acpi_pci,
1676 .ident = "ASUS PR-DLS",
1677 .matches = {
1678 DMI_MATCH(DMI_BOARD_VENDOR, "ASUSTeK Computer INC."),
1679 DMI_MATCH(DMI_BOARD_NAME, "PR-DLS"),
1680 DMI_MATCH(DMI_BIOS_VERSION,
1681 "ASUS PR-DLS ACPI BIOS Revision 1010"),
1682 DMI_MATCH(DMI_BIOS_DATE, "03/21/2003")
1683 },
1684 },
1685 {
1686 .callback = disable_acpi_pci,
1687 .ident = "Acer TravelMate 36x Laptop",
1688 .matches = {
1689 DMI_MATCH(DMI_SYS_VENDOR, "Acer"),
1690 DMI_MATCH(DMI_PRODUCT_NAME, "TravelMate 360"),
1691 },
1692 },
1693 {}
1694 };
1695
1696 /* second table for DMI checks that should run after early-quirks */
1697 static struct dmi_system_id __initdata acpi_dmi_table_late[] = {
1698 /*
1699 * HP laptops which use a DSDT reporting as HP/SB400/10000,
1700 * which includes some code which overrides all temperature
1701 * trip points to 16C if the INTIN2 input of the I/O APIC
1702 * is enabled. This input is incorrectly designated the
1703 * ISA IRQ 0 via an interrupt source override even though
1704 * it is wired to the output of the master 8259A and INTIN0
1705 * is not connected at all. Force ignoring BIOS IRQ0 pin2
1706 * override in that cases.
1707 */
1708 {
1709 .callback = dmi_ignore_irq0_timer_override,
1710 .ident = "HP nx6115 laptop",
1711 .matches = {
1712 DMI_MATCH(DMI_SYS_VENDOR, "Hewlett-Packard"),
1713 DMI_MATCH(DMI_PRODUCT_NAME, "HP Compaq nx6115"),
1714 },
1715 },
1716 {
1717 .callback = dmi_ignore_irq0_timer_override,
1718 .ident = "HP NX6125 laptop",
1719 .matches = {
1720 DMI_MATCH(DMI_SYS_VENDOR, "Hewlett-Packard"),
1721 DMI_MATCH(DMI_PRODUCT_NAME, "HP Compaq nx6125"),
1722 },
1723 },
1724 {
1725 .callback = dmi_ignore_irq0_timer_override,
1726 .ident = "HP NX6325 laptop",
1727 .matches = {
1728 DMI_MATCH(DMI_SYS_VENDOR, "Hewlett-Packard"),
1729 DMI_MATCH(DMI_PRODUCT_NAME, "HP Compaq nx6325"),
1730 },
1731 },
1732 {
1733 .callback = dmi_ignore_irq0_timer_override,
1734 .ident = "HP 6715b laptop",
1735 .matches = {
1736 DMI_MATCH(DMI_SYS_VENDOR, "Hewlett-Packard"),
1737 DMI_MATCH(DMI_PRODUCT_NAME, "HP Compaq 6715b"),
1738 },
1739 },
1740 {}
1741 };
1742
1743 /*
1744 * acpi_boot_table_init() and acpi_boot_init()
1745 * called from setup_arch(), always.
1746 * 1. checksums all tables
1747 * 2. enumerates lapics
1748 * 3. enumerates io-apics
1749 *
1750 * acpi_table_init() is separate to allow reading SRAT without
1751 * other side effects.
1752 *
1753 * side effects of acpi_boot_init:
1754 * acpi_lapic = 1 if LAPIC found
1755 * acpi_ioapic = 1 if IOAPIC found
1756 * if (acpi_lapic && acpi_ioapic) smp_found_config = 1;
1757 * if acpi_blacklisted() acpi_disabled = 1;
1758 * acpi_irq_model=...
1759 * ...
1760 *
1761 * return value: (currently ignored)
1762 * 0: success
1763 * !0: failure
1764 */
1765
1766 int __init acpi_boot_table_init(void)
1767 {
1768 int error;
1769
1770 dmi_check_system(acpi_dmi_table);
1771
1772 /*
1773 * If acpi_disabled, bail out
1774 * One exception: acpi=ht continues far enough to enumerate LAPICs
1775 */
1776 if (acpi_disabled && !acpi_ht)
1777 return 1;
1778
1779 /*
1780 * Initialize the ACPI boot-time table parser.
1781 */
1782 error = acpi_table_init();
1783 if (error) {
1784 disable_acpi();
1785 return error;
1786 }
1787
1788 acpi_table_parse(ACPI_SIG_BOOT, acpi_parse_sbf);
1789
1790 /*
1791 * blacklist may disable ACPI entirely
1792 */
1793 error = acpi_blacklisted();
1794 if (error) {
1795 if (acpi_force) {
1796 printk(KERN_WARNING PREFIX "acpi=force override\n");
1797 } else {
1798 printk(KERN_WARNING PREFIX "Disabling ACPI support\n");
1799 disable_acpi();
1800 return error;
1801 }
1802 }
1803
1804 return 0;
1805 }
1806
1807 int __init early_acpi_boot_init(void)
1808 {
1809 /*
1810 * If acpi_disabled, bail out
1811 * One exception: acpi=ht continues far enough to enumerate LAPICs
1812 */
1813 if (acpi_disabled && !acpi_ht)
1814 return 1;
1815
1816 /*
1817 * Process the Multiple APIC Description Table (MADT), if present
1818 */
1819 early_acpi_process_madt();
1820
1821 return 0;
1822 }
1823
1824 int __init acpi_boot_init(void)
1825 {
1826 /* those are executed after early-quirks are executed */
1827 dmi_check_system(acpi_dmi_table_late);
1828
1829 /*
1830 * If acpi_disabled, bail out
1831 * One exception: acpi=ht continues far enough to enumerate LAPICs
1832 */
1833 if (acpi_disabled && !acpi_ht)
1834 return 1;
1835
1836 acpi_table_parse(ACPI_SIG_BOOT, acpi_parse_sbf);
1837
1838 /*
1839 * set sci_int and PM timer address
1840 */
1841 acpi_table_parse(ACPI_SIG_FADT, acpi_parse_fadt);
1842
1843 /*
1844 * Process the Multiple APIC Description Table (MADT), if present
1845 */
1846 acpi_process_madt();
1847
1848 acpi_table_parse(ACPI_SIG_HPET, acpi_parse_hpet);
1849
1850 return 0;
1851 }
1852
1853 static int __init parse_acpi(char *arg)
1854 {
1855 if (!arg)
1856 return -EINVAL;
1857
1858 /* "acpi=off" disables both ACPI table parsing and interpreter */
1859 if (strcmp(arg, "off") == 0) {
1860 disable_acpi();
1861 }
1862 /* acpi=force to over-ride black-list */
1863 else if (strcmp(arg, "force") == 0) {
1864 acpi_force = 1;
1865 acpi_ht = 1;
1866 acpi_disabled = 0;
1867 }
1868 /* acpi=strict disables out-of-spec workarounds */
1869 else if (strcmp(arg, "strict") == 0) {
1870 acpi_strict = 1;
1871 }
1872 /* Limit ACPI just to boot-time to enable HT */
1873 else if (strcmp(arg, "ht") == 0) {
1874 if (!acpi_force)
1875 disable_acpi();
1876 acpi_ht = 1;
1877 }
1878 /* acpi=rsdt use RSDT instead of XSDT */
1879 else if (strcmp(arg, "rsdt") == 0) {
1880 acpi_rsdt_forced = 1;
1881 }
1882 /* "acpi=noirq" disables ACPI interrupt routing */
1883 else if (strcmp(arg, "noirq") == 0) {
1884 acpi_noirq_set();
1885 } else {
1886 /* Core will printk when we return error. */
1887 return -EINVAL;
1888 }
1889 return 0;
1890 }
1891 early_param("acpi", parse_acpi);
1892
1893 /* FIXME: Using pci= for an ACPI parameter is a travesty. */
1894 static int __init parse_pci(char *arg)
1895 {
1896 if (arg && strcmp(arg, "noacpi") == 0)
1897 acpi_disable_pci();
1898 return 0;
1899 }
1900 early_param("pci", parse_pci);
1901
1902 int __init acpi_mps_check(void)
1903 {
1904 #if defined(CONFIG_X86_LOCAL_APIC) && !defined(CONFIG_X86_MPPARSE)
1905 /* mptable code is not built-in*/
1906 if (acpi_disabled || acpi_noirq) {
1907 printk(KERN_WARNING "MPS support code is not built-in.\n"
1908 "Using acpi=off or acpi=noirq or pci=noacpi "
1909 "may have problem\n");
1910 return 1;
1911 }
1912 #endif
1913 return 0;
1914 }
1915
1916 #ifdef CONFIG_X86_IO_APIC
1917 static int __init parse_acpi_skip_timer_override(char *arg)
1918 {
1919 acpi_skip_timer_override = 1;
1920 return 0;
1921 }
1922 early_param("acpi_skip_timer_override", parse_acpi_skip_timer_override);
1923
1924 static int __init parse_acpi_use_timer_override(char *arg)
1925 {
1926 acpi_use_timer_override = 1;
1927 return 0;
1928 }
1929 early_param("acpi_use_timer_override", parse_acpi_use_timer_override);
1930 #endif /* CONFIG_X86_IO_APIC */
1931
1932 static int __init setup_acpi_sci(char *s)
1933 {
1934 if (!s)
1935 return -EINVAL;
1936 if (!strcmp(s, "edge"))
1937 acpi_sci_flags = ACPI_MADT_TRIGGER_EDGE |
1938 (acpi_sci_flags & ~ACPI_MADT_TRIGGER_MASK);
1939 else if (!strcmp(s, "level"))
1940 acpi_sci_flags = ACPI_MADT_TRIGGER_LEVEL |
1941 (acpi_sci_flags & ~ACPI_MADT_TRIGGER_MASK);
1942 else if (!strcmp(s, "high"))
1943 acpi_sci_flags = ACPI_MADT_POLARITY_ACTIVE_HIGH |
1944 (acpi_sci_flags & ~ACPI_MADT_POLARITY_MASK);
1945 else if (!strcmp(s, "low"))
1946 acpi_sci_flags = ACPI_MADT_POLARITY_ACTIVE_LOW |
1947 (acpi_sci_flags & ~ACPI_MADT_POLARITY_MASK);
1948 else
1949 return -EINVAL;
1950 return 0;
1951 }
1952 early_param("acpi_sci", setup_acpi_sci);
1953
1954 int __acpi_acquire_global_lock(unsigned int *lock)
1955 {
1956 unsigned int old, new, val;
1957 do {
1958 old = *lock;
1959 new = (((old & ~0x3) + 2) + ((old >> 1) & 0x1));
1960 val = cmpxchg(lock, old, new);
1961 } while (unlikely (val != old));
1962 return (new < 3) ? -1 : 0;
1963 }
1964
1965 int __acpi_release_global_lock(unsigned int *lock)
1966 {
1967 unsigned int old, new, val;
1968 do {
1969 old = *lock;
1970 new = old & ~0x3;
1971 val = cmpxchg(lock, old, new);
1972 } while (unlikely (val != old));
1973 return old & 0x1;
1974 }