1485a26ddcef11a47d0029f3ccecbb2fb196d4e9
[linux-2.6.git] / arch / x86 / pci / common.c
1 /*
2  *      Low-Level PCI Support for PC
3  *
4  *      (c) 1999--2000 Martin Mares <mj@ucw.cz>
5  */
6
7 #include <linux/sched.h>
8 #include <linux/pci.h>
9 #include <linux/ioport.h>
10 #include <linux/init.h>
11 #include <linux/dmi.h>
12
13 #include <asm/acpi.h>
14 #include <asm/segment.h>
15 #include <asm/io.h>
16 #include <asm/smp.h>
17
18 #include "pci.h"
19
20 unsigned int pci_probe = PCI_PROBE_BIOS | PCI_PROBE_CONF1 | PCI_PROBE_CONF2 |
21                                 PCI_PROBE_MMCONF;
22
23 unsigned int pci_early_dump_regs;
24 static int pci_bf_sort;
25 int pci_routeirq;
26 int noioapicquirk;
27 int noioapicreroute = 1;
28 int pcibios_last_bus = -1;
29 unsigned long pirq_table_addr;
30 struct pci_bus *pci_root_bus;
31 struct pci_raw_ops *raw_pci_ops;
32 struct pci_raw_ops *raw_pci_ext_ops;
33
34 int raw_pci_read(unsigned int domain, unsigned int bus, unsigned int devfn,
35                                                 int reg, int len, u32 *val)
36 {
37         if (domain == 0 && reg < 256 && raw_pci_ops)
38                 return raw_pci_ops->read(domain, bus, devfn, reg, len, val);
39         if (raw_pci_ext_ops)
40                 return raw_pci_ext_ops->read(domain, bus, devfn, reg, len, val);
41         return -EINVAL;
42 }
43
44 int raw_pci_write(unsigned int domain, unsigned int bus, unsigned int devfn,
45                                                 int reg, int len, u32 val)
46 {
47         if (domain == 0 && reg < 256 && raw_pci_ops)
48                 return raw_pci_ops->write(domain, bus, devfn, reg, len, val);
49         if (raw_pci_ext_ops)
50                 return raw_pci_ext_ops->write(domain, bus, devfn, reg, len, val);
51         return -EINVAL;
52 }
53
54 static int pci_read(struct pci_bus *bus, unsigned int devfn, int where, int size, u32 *value)
55 {
56         return raw_pci_read(pci_domain_nr(bus), bus->number,
57                                  devfn, where, size, value);
58 }
59
60 static int pci_write(struct pci_bus *bus, unsigned int devfn, int where, int size, u32 value)
61 {
62         return raw_pci_write(pci_domain_nr(bus), bus->number,
63                                   devfn, where, size, value);
64 }
65
66 struct pci_ops pci_root_ops = {
67         .read = pci_read,
68         .write = pci_write,
69 };
70
71 /*
72  * legacy, numa, and acpi all want to call pcibios_scan_root
73  * from their initcalls. This flag prevents that.
74  */
75 int pcibios_scanned;
76
77 /*
78  * This interrupt-safe spinlock protects all accesses to PCI
79  * configuration space.
80  */
81 DEFINE_SPINLOCK(pci_config_lock);
82
83 static int __devinit can_skip_ioresource_align(const struct dmi_system_id *d)
84 {
85         pci_probe |= PCI_CAN_SKIP_ISA_ALIGN;
86         printk(KERN_INFO "PCI: %s detected, can skip ISA alignment\n", d->ident);
87         return 0;
88 }
89
90 static struct dmi_system_id can_skip_pciprobe_dmi_table[] __devinitdata = {
91 /*
92  * Systems where PCI IO resource ISA alignment can be skipped
93  * when the ISA enable bit in the bridge control is not set
94  */
95         {
96                 .callback = can_skip_ioresource_align,
97                 .ident = "IBM System x3800",
98                 .matches = {
99                         DMI_MATCH(DMI_SYS_VENDOR, "IBM"),
100                         DMI_MATCH(DMI_PRODUCT_NAME, "x3800"),
101                 },
102         },
103         {
104                 .callback = can_skip_ioresource_align,
105                 .ident = "IBM System x3850",
106                 .matches = {
107                         DMI_MATCH(DMI_SYS_VENDOR, "IBM"),
108                         DMI_MATCH(DMI_PRODUCT_NAME, "x3850"),
109                 },
110         },
111         {
112                 .callback = can_skip_ioresource_align,
113                 .ident = "IBM System x3950",
114                 .matches = {
115                         DMI_MATCH(DMI_SYS_VENDOR, "IBM"),
116                         DMI_MATCH(DMI_PRODUCT_NAME, "x3950"),
117                 },
118         },
119         {}
120 };
121
122 void __init dmi_check_skip_isa_align(void)
123 {
124         dmi_check_system(can_skip_pciprobe_dmi_table);
125 }
126
127 static void __devinit pcibios_fixup_device_resources(struct pci_dev *dev)
128 {
129         struct resource *rom_r = &dev->resource[PCI_ROM_RESOURCE];
130
131         if (pci_probe & PCI_NOASSIGN_ROMS) {
132                 if (rom_r->parent)
133                         return;
134                 if (rom_r->start) {
135                         /* we deal with BIOS assigned ROM later */
136                         return;
137                 }
138                 rom_r->start = rom_r->end = rom_r->flags = 0;
139         }
140 }
141
142 /*
143  *  Called after each bus is probed, but before its children
144  *  are examined.
145  */
146
147 void __devinit  pcibios_fixup_bus(struct pci_bus *b)
148 {
149         struct pci_dev *dev;
150
151         pci_read_bridge_bases(b);
152         list_for_each_entry(dev, &b->devices, bus_list)
153                 pcibios_fixup_device_resources(dev);
154 }
155
156 /*
157  * Only use DMI information to set this if nothing was passed
158  * on the kernel command line (which was parsed earlier).
159  */
160
161 static int __devinit set_bf_sort(const struct dmi_system_id *d)
162 {
163         if (pci_bf_sort == pci_bf_sort_default) {
164                 pci_bf_sort = pci_dmi_bf;
165                 printk(KERN_INFO "PCI: %s detected, enabling pci=bfsort.\n", d->ident);
166         }
167         return 0;
168 }
169
170 /*
171  * Enable renumbering of PCI bus# ranges to reach all PCI busses (Cardbus)
172  */
173 #ifdef __i386__
174 static int __devinit assign_all_busses(const struct dmi_system_id *d)
175 {
176         pci_probe |= PCI_ASSIGN_ALL_BUSSES;
177         printk(KERN_INFO "%s detected: enabling PCI bus# renumbering"
178                         " (pci=assign-busses)\n", d->ident);
179         return 0;
180 }
181 #endif
182
183 static struct dmi_system_id __devinitdata pciprobe_dmi_table[] = {
184 #ifdef __i386__
185 /*
186  * Laptops which need pci=assign-busses to see Cardbus cards
187  */
188         {
189                 .callback = assign_all_busses,
190                 .ident = "Samsung X20 Laptop",
191                 .matches = {
192                         DMI_MATCH(DMI_SYS_VENDOR, "Samsung Electronics"),
193                         DMI_MATCH(DMI_PRODUCT_NAME, "SX20S"),
194                 },
195         },
196 #endif          /* __i386__ */
197         {
198                 .callback = set_bf_sort,
199                 .ident = "Dell PowerEdge 1950",
200                 .matches = {
201                         DMI_MATCH(DMI_SYS_VENDOR, "Dell"),
202                         DMI_MATCH(DMI_PRODUCT_NAME, "PowerEdge 1950"),
203                 },
204         },
205         {
206                 .callback = set_bf_sort,
207                 .ident = "Dell PowerEdge 1955",
208                 .matches = {
209                         DMI_MATCH(DMI_SYS_VENDOR, "Dell"),
210                         DMI_MATCH(DMI_PRODUCT_NAME, "PowerEdge 1955"),
211                 },
212         },
213         {
214                 .callback = set_bf_sort,
215                 .ident = "Dell PowerEdge 2900",
216                 .matches = {
217                         DMI_MATCH(DMI_SYS_VENDOR, "Dell"),
218                         DMI_MATCH(DMI_PRODUCT_NAME, "PowerEdge 2900"),
219                 },
220         },
221         {
222                 .callback = set_bf_sort,
223                 .ident = "Dell PowerEdge 2950",
224                 .matches = {
225                         DMI_MATCH(DMI_SYS_VENDOR, "Dell"),
226                         DMI_MATCH(DMI_PRODUCT_NAME, "PowerEdge 2950"),
227                 },
228         },
229         {
230                 .callback = set_bf_sort,
231                 .ident = "Dell PowerEdge R900",
232                 .matches = {
233                         DMI_MATCH(DMI_SYS_VENDOR, "Dell"),
234                         DMI_MATCH(DMI_PRODUCT_NAME, "PowerEdge R900"),
235                 },
236         },
237         {
238                 .callback = set_bf_sort,
239                 .ident = "HP ProLiant BL20p G3",
240                 .matches = {
241                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
242                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL20p G3"),
243                 },
244         },
245         {
246                 .callback = set_bf_sort,
247                 .ident = "HP ProLiant BL20p G4",
248                 .matches = {
249                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
250                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL20p G4"),
251                 },
252         },
253         {
254                 .callback = set_bf_sort,
255                 .ident = "HP ProLiant BL30p G1",
256                 .matches = {
257                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
258                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL30p G1"),
259                 },
260         },
261         {
262                 .callback = set_bf_sort,
263                 .ident = "HP ProLiant BL25p G1",
264                 .matches = {
265                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
266                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL25p G1"),
267                 },
268         },
269         {
270                 .callback = set_bf_sort,
271                 .ident = "HP ProLiant BL35p G1",
272                 .matches = {
273                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
274                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL35p G1"),
275                 },
276         },
277         {
278                 .callback = set_bf_sort,
279                 .ident = "HP ProLiant BL45p G1",
280                 .matches = {
281                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
282                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL45p G1"),
283                 },
284         },
285         {
286                 .callback = set_bf_sort,
287                 .ident = "HP ProLiant BL45p G2",
288                 .matches = {
289                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
290                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL45p G2"),
291                 },
292         },
293         {
294                 .callback = set_bf_sort,
295                 .ident = "HP ProLiant BL460c G1",
296                 .matches = {
297                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
298                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL460c G1"),
299                 },
300         },
301         {
302                 .callback = set_bf_sort,
303                 .ident = "HP ProLiant BL465c G1",
304                 .matches = {
305                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
306                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL465c G1"),
307                 },
308         },
309         {
310                 .callback = set_bf_sort,
311                 .ident = "HP ProLiant BL480c G1",
312                 .matches = {
313                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
314                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL480c G1"),
315                 },
316         },
317         {
318                 .callback = set_bf_sort,
319                 .ident = "HP ProLiant BL685c G1",
320                 .matches = {
321                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
322                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant BL685c G1"),
323                 },
324         },
325         {
326                 .callback = set_bf_sort,
327                 .ident = "HP ProLiant DL360",
328                 .matches = {
329                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
330                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant DL360"),
331                 },
332         },
333         {
334                 .callback = set_bf_sort,
335                 .ident = "HP ProLiant DL380",
336                 .matches = {
337                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
338                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant DL380"),
339                 },
340         },
341 #ifdef __i386__
342         {
343                 .callback = assign_all_busses,
344                 .ident = "Compaq EVO N800c",
345                 .matches = {
346                         DMI_MATCH(DMI_SYS_VENDOR, "Compaq"),
347                         DMI_MATCH(DMI_PRODUCT_NAME, "EVO N800c"),
348                 },
349         },
350 #endif
351         {
352                 .callback = set_bf_sort,
353                 .ident = "HP ProLiant DL385 G2",
354                 .matches = {
355                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
356                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant DL385 G2"),
357                 },
358         },
359         {
360                 .callback = set_bf_sort,
361                 .ident = "HP ProLiant DL585 G2",
362                 .matches = {
363                         DMI_MATCH(DMI_SYS_VENDOR, "HP"),
364                         DMI_MATCH(DMI_PRODUCT_NAME, "ProLiant DL585 G2"),
365                 },
366         },
367         {}
368 };
369
370 void __init dmi_check_pciprobe(void)
371 {
372         dmi_check_system(pciprobe_dmi_table);
373 }
374
375 struct pci_bus * __devinit pcibios_scan_root(int busnum)
376 {
377         struct pci_bus *bus = NULL;
378         struct pci_sysdata *sd;
379
380         while ((bus = pci_find_next_bus(bus)) != NULL) {
381                 if (bus->number == busnum) {
382                         /* Already scanned */
383                         return bus;
384                 }
385         }
386
387         /* Allocate per-root-bus (not per bus) arch-specific data.
388          * TODO: leak; this memory is never freed.
389          * It's arguable whether it's worth the trouble to care.
390          */
391         sd = kzalloc(sizeof(*sd), GFP_KERNEL);
392         if (!sd) {
393                 printk(KERN_ERR "PCI: OOM, not probing PCI bus %02x\n", busnum);
394                 return NULL;
395         }
396
397         sd->node = get_mp_bus_to_node(busnum);
398
399         printk(KERN_DEBUG "PCI: Probing PCI hardware (bus %02x)\n", busnum);
400         bus = pci_scan_bus_parented(NULL, busnum, &pci_root_ops, sd);
401         if (!bus)
402                 kfree(sd);
403
404         return bus;
405 }
406
407 extern u8 pci_cache_line_size;
408
409 int __init pcibios_init(void)
410 {
411         struct cpuinfo_x86 *c = &boot_cpu_data;
412
413         if (!raw_pci_ops) {
414                 printk(KERN_WARNING "PCI: System does not support PCI\n");
415                 return 0;
416         }
417
418         /*
419          * Assume PCI cacheline size of 32 bytes for all x86s except K7/K8
420          * and P4. It's also good for 386/486s (which actually have 16)
421          * as quite a few PCI devices do not support smaller values.
422          */
423         pci_cache_line_size = 32 >> 2;
424         if (c->x86 >= 6 && c->x86_vendor == X86_VENDOR_AMD)
425                 pci_cache_line_size = 64 >> 2;  /* K7 & K8 */
426         else if (c->x86 > 6 && c->x86_vendor == X86_VENDOR_INTEL)
427                 pci_cache_line_size = 128 >> 2; /* P4 */
428
429         pcibios_resource_survey();
430
431         if (pci_bf_sort >= pci_force_bf)
432                 pci_sort_breadthfirst();
433         return 0;
434 }
435
436 char * __devinit  pcibios_setup(char *str)
437 {
438         if (!strcmp(str, "off")) {
439                 pci_probe = 0;
440                 return NULL;
441         } else if (!strcmp(str, "bfsort")) {
442                 pci_bf_sort = pci_force_bf;
443                 return NULL;
444         } else if (!strcmp(str, "nobfsort")) {
445                 pci_bf_sort = pci_force_nobf;
446                 return NULL;
447         }
448 #ifdef CONFIG_PCI_BIOS
449         else if (!strcmp(str, "bios")) {
450                 pci_probe = PCI_PROBE_BIOS;
451                 return NULL;
452         } else if (!strcmp(str, "nobios")) {
453                 pci_probe &= ~PCI_PROBE_BIOS;
454                 return NULL;
455         } else if (!strcmp(str, "biosirq")) {
456                 pci_probe |= PCI_BIOS_IRQ_SCAN;
457                 return NULL;
458         } else if (!strncmp(str, "pirqaddr=", 9)) {
459                 pirq_table_addr = simple_strtoul(str+9, NULL, 0);
460                 return NULL;
461         }
462 #endif
463 #ifdef CONFIG_PCI_DIRECT
464         else if (!strcmp(str, "conf1")) {
465                 pci_probe = PCI_PROBE_CONF1 | PCI_NO_CHECKS;
466                 return NULL;
467         }
468         else if (!strcmp(str, "conf2")) {
469                 pci_probe = PCI_PROBE_CONF2 | PCI_NO_CHECKS;
470                 return NULL;
471         }
472 #endif
473 #ifdef CONFIG_PCI_MMCONFIG
474         else if (!strcmp(str, "nommconf")) {
475                 pci_probe &= ~PCI_PROBE_MMCONF;
476                 return NULL;
477         }
478         else if (!strcmp(str, "check_enable_amd_mmconf")) {
479                 pci_probe |= PCI_CHECK_ENABLE_AMD_MMCONF;
480                 return NULL;
481         }
482 #endif
483         else if (!strcmp(str, "noacpi")) {
484                 acpi_noirq_set();
485                 return NULL;
486         }
487         else if (!strcmp(str, "noearly")) {
488                 pci_probe |= PCI_PROBE_NOEARLY;
489                 return NULL;
490         }
491 #ifndef CONFIG_X86_VISWS
492         else if (!strcmp(str, "usepirqmask")) {
493                 pci_probe |= PCI_USE_PIRQ_MASK;
494                 return NULL;
495         } else if (!strncmp(str, "irqmask=", 8)) {
496                 pcibios_irq_mask = simple_strtol(str+8, NULL, 0);
497                 return NULL;
498         } else if (!strncmp(str, "lastbus=", 8)) {
499                 pcibios_last_bus = simple_strtol(str+8, NULL, 0);
500                 return NULL;
501         }
502 #endif
503         else if (!strcmp(str, "rom")) {
504                 pci_probe |= PCI_ASSIGN_ROMS;
505                 return NULL;
506         } else if (!strcmp(str, "norom")) {
507                 pci_probe |= PCI_NOASSIGN_ROMS;
508                 return NULL;
509         } else if (!strcmp(str, "assign-busses")) {
510                 pci_probe |= PCI_ASSIGN_ALL_BUSSES;
511                 return NULL;
512         } else if (!strcmp(str, "use_crs")) {
513                 pci_probe |= PCI_USE__CRS;
514                 return NULL;
515         } else if (!strcmp(str, "earlydump")) {
516                 pci_early_dump_regs = 1;
517                 return NULL;
518         } else if (!strcmp(str, "routeirq")) {
519                 pci_routeirq = 1;
520                 return NULL;
521         } else if (!strcmp(str, "skip_isa_align")) {
522                 pci_probe |= PCI_CAN_SKIP_ISA_ALIGN;
523                 return NULL;
524         } else if (!strcmp(str, "noioapicquirk")) {
525                 noioapicquirk = 1;
526                 return NULL;
527         } else if (!strcmp(str, "ioapicreroute")) {
528                 if (noioapicreroute != -1)
529                         noioapicreroute = 0;
530                 return NULL;
531         }
532         return str;
533 }
534
535 unsigned int pcibios_assign_all_busses(void)
536 {
537         return (pci_probe & PCI_ASSIGN_ALL_BUSSES) ? 1 : 0;
538 }
539
540 int pcibios_enable_device(struct pci_dev *dev, int mask)
541 {
542         int err;
543
544         if ((err = pci_enable_resources(dev, mask)) < 0)
545                 return err;
546
547         if (!dev->msi_enabled)
548                 return pcibios_enable_irq(dev);
549         return 0;
550 }
551
552 void pcibios_disable_device (struct pci_dev *dev)
553 {
554         if (!dev->msi_enabled && pcibios_disable_irq)
555                 pcibios_disable_irq(dev);
556 }
557
558 struct pci_bus * __devinit pci_scan_bus_on_node(int busno, struct pci_ops *ops, int node)
559 {
560         struct pci_bus *bus = NULL;
561         struct pci_sysdata *sd;
562
563         /*
564          * Allocate per-root-bus (not per bus) arch-specific data.
565          * TODO: leak; this memory is never freed.
566          * It's arguable whether it's worth the trouble to care.
567          */
568         sd = kzalloc(sizeof(*sd), GFP_KERNEL);
569         if (!sd) {
570                 printk(KERN_ERR "PCI: OOM, skipping PCI bus %02x\n", busno);
571                 return NULL;
572         }
573         sd->node = node;
574         bus = pci_scan_bus(busno, ops, sd);
575         if (!bus)
576                 kfree(sd);
577
578         return bus;
579 }
580
581 struct pci_bus * __devinit pci_scan_bus_with_sysdata(int busno)
582 {
583         return pci_scan_bus_on_node(busno, &pci_root_ops, -1);
584 }