Merge git://git.kernel.org/pub/scm/linux/kernel/git/gregkh/pci-2.6
[sfrench/cifs-2.6.git] / drivers / pci / probe.c
1 /*
2  * probe.c - PCI detection and setup code
3  */
4
5 #include <linux/kernel.h>
6 #include <linux/delay.h>
7 #include <linux/init.h>
8 #include <linux/pci.h>
9 #include <linux/slab.h>
10 #include <linux/module.h>
11 #include <linux/cpumask.h>
12 #include "pci.h"
13
14 #define CARDBUS_LATENCY_TIMER   176     /* secondary latency timer */
15 #define CARDBUS_RESERVE_BUSNR   3
16 #define PCI_CFG_SPACE_SIZE      256
17 #define PCI_CFG_SPACE_EXP_SIZE  4096
18
19 /* Ugh.  Need to stop exporting this to modules. */
20 LIST_HEAD(pci_root_buses);
21 EXPORT_SYMBOL(pci_root_buses);
22
23 LIST_HEAD(pci_devices);
24
25 /*
26  * Some device drivers need know if pci is initiated.
27  * Basically, we think pci is not initiated when there
28  * is no device in list of pci_devices.
29  */
30 int no_pci_devices(void)
31 {
32         return list_empty(&pci_devices);
33 }
34
35 EXPORT_SYMBOL(no_pci_devices);
36
37 #ifdef HAVE_PCI_LEGACY
38 /**
39  * pci_create_legacy_files - create legacy I/O port and memory files
40  * @b: bus to create files under
41  *
42  * Some platforms allow access to legacy I/O port and ISA memory space on
43  * a per-bus basis.  This routine creates the files and ties them into
44  * their associated read, write and mmap files from pci-sysfs.c
45  */
46 static void pci_create_legacy_files(struct pci_bus *b)
47 {
48         b->legacy_io = kzalloc(sizeof(struct bin_attribute) * 2,
49                                GFP_ATOMIC);
50         if (b->legacy_io) {
51                 b->legacy_io->attr.name = "legacy_io";
52                 b->legacy_io->size = 0xffff;
53                 b->legacy_io->attr.mode = S_IRUSR | S_IWUSR;
54                 b->legacy_io->read = pci_read_legacy_io;
55                 b->legacy_io->write = pci_write_legacy_io;
56                 class_device_create_bin_file(&b->class_dev, b->legacy_io);
57
58                 /* Allocated above after the legacy_io struct */
59                 b->legacy_mem = b->legacy_io + 1;
60                 b->legacy_mem->attr.name = "legacy_mem";
61                 b->legacy_mem->size = 1024*1024;
62                 b->legacy_mem->attr.mode = S_IRUSR | S_IWUSR;
63                 b->legacy_mem->mmap = pci_mmap_legacy_mem;
64                 class_device_create_bin_file(&b->class_dev, b->legacy_mem);
65         }
66 }
67
68 void pci_remove_legacy_files(struct pci_bus *b)
69 {
70         if (b->legacy_io) {
71                 class_device_remove_bin_file(&b->class_dev, b->legacy_io);
72                 class_device_remove_bin_file(&b->class_dev, b->legacy_mem);
73                 kfree(b->legacy_io); /* both are allocated here */
74         }
75 }
76 #else /* !HAVE_PCI_LEGACY */
77 static inline void pci_create_legacy_files(struct pci_bus *bus) { return; }
78 void pci_remove_legacy_files(struct pci_bus *bus) { return; }
79 #endif /* HAVE_PCI_LEGACY */
80
81 /*
82  * PCI Bus Class Devices
83  */
84 static ssize_t pci_bus_show_cpuaffinity(struct class_device *class_dev,
85                                         char *buf)
86 {
87         int ret;
88         cpumask_t cpumask;
89
90         cpumask = pcibus_to_cpumask(to_pci_bus(class_dev));
91         ret = cpumask_scnprintf(buf, PAGE_SIZE, cpumask);
92         if (ret < PAGE_SIZE)
93                 buf[ret++] = '\n';
94         return ret;
95 }
96 CLASS_DEVICE_ATTR(cpuaffinity, S_IRUGO, pci_bus_show_cpuaffinity, NULL);
97
98 /*
99  * PCI Bus Class
100  */
101 static void release_pcibus_dev(struct class_device *class_dev)
102 {
103         struct pci_bus *pci_bus = to_pci_bus(class_dev);
104
105         if (pci_bus->bridge)
106                 put_device(pci_bus->bridge);
107         kfree(pci_bus);
108 }
109
110 static struct class pcibus_class = {
111         .name           = "pci_bus",
112         .release        = &release_pcibus_dev,
113 };
114
115 static int __init pcibus_class_init(void)
116 {
117         return class_register(&pcibus_class);
118 }
119 postcore_initcall(pcibus_class_init);
120
121 /*
122  * Translate the low bits of the PCI base
123  * to the resource type
124  */
125 static inline unsigned int pci_calc_resource_flags(unsigned int flags)
126 {
127         if (flags & PCI_BASE_ADDRESS_SPACE_IO)
128                 return IORESOURCE_IO;
129
130         if (flags & PCI_BASE_ADDRESS_MEM_PREFETCH)
131                 return IORESOURCE_MEM | IORESOURCE_PREFETCH;
132
133         return IORESOURCE_MEM;
134 }
135
136 /*
137  * Find the extent of a PCI decode..
138  */
139 static u32 pci_size(u32 base, u32 maxbase, u32 mask)
140 {
141         u32 size = mask & maxbase;      /* Find the significant bits */
142         if (!size)
143                 return 0;
144
145         /* Get the lowest of them to find the decode size, and
146            from that the extent.  */
147         size = (size & ~(size-1)) - 1;
148
149         /* base == maxbase can be valid only if the BAR has
150            already been programmed with all 1s.  */
151         if (base == maxbase && ((base | size) & mask) != mask)
152                 return 0;
153
154         return size;
155 }
156
157 static u64 pci_size64(u64 base, u64 maxbase, u64 mask)
158 {
159         u64 size = mask & maxbase;      /* Find the significant bits */
160         if (!size)
161                 return 0;
162
163         /* Get the lowest of them to find the decode size, and
164            from that the extent.  */
165         size = (size & ~(size-1)) - 1;
166
167         /* base == maxbase can be valid only if the BAR has
168            already been programmed with all 1s.  */
169         if (base == maxbase && ((base | size) & mask) != mask)
170                 return 0;
171
172         return size;
173 }
174
175 static inline int is_64bit_memory(u32 mask)
176 {
177         if ((mask & (PCI_BASE_ADDRESS_SPACE|PCI_BASE_ADDRESS_MEM_TYPE_MASK)) ==
178             (PCI_BASE_ADDRESS_SPACE_MEMORY|PCI_BASE_ADDRESS_MEM_TYPE_64))
179                 return 1;
180         return 0;
181 }
182
183 static void pci_read_bases(struct pci_dev *dev, unsigned int howmany, int rom)
184 {
185         unsigned int pos, reg, next;
186         u32 l, sz;
187         struct resource *res;
188
189         for(pos=0; pos<howmany; pos = next) {
190                 u64 l64;
191                 u64 sz64;
192                 u32 raw_sz;
193
194                 next = pos+1;
195                 res = &dev->resource[pos];
196                 res->name = pci_name(dev);
197                 reg = PCI_BASE_ADDRESS_0 + (pos << 2);
198                 pci_read_config_dword(dev, reg, &l);
199                 pci_write_config_dword(dev, reg, ~0);
200                 pci_read_config_dword(dev, reg, &sz);
201                 pci_write_config_dword(dev, reg, l);
202                 if (!sz || sz == 0xffffffff)
203                         continue;
204                 if (l == 0xffffffff)
205                         l = 0;
206                 raw_sz = sz;
207                 if ((l & PCI_BASE_ADDRESS_SPACE) ==
208                                 PCI_BASE_ADDRESS_SPACE_MEMORY) {
209                         sz = pci_size(l, sz, (u32)PCI_BASE_ADDRESS_MEM_MASK);
210                         /*
211                          * For 64bit prefetchable memory sz could be 0, if the
212                          * real size is bigger than 4G, so we need to check
213                          * szhi for that.
214                          */
215                         if (!is_64bit_memory(l) && !sz)
216                                 continue;
217                         res->start = l & PCI_BASE_ADDRESS_MEM_MASK;
218                         res->flags |= l & ~PCI_BASE_ADDRESS_MEM_MASK;
219                 } else {
220                         sz = pci_size(l, sz, PCI_BASE_ADDRESS_IO_MASK & 0xffff);
221                         if (!sz)
222                                 continue;
223                         res->start = l & PCI_BASE_ADDRESS_IO_MASK;
224                         res->flags |= l & ~PCI_BASE_ADDRESS_IO_MASK;
225                 }
226                 res->end = res->start + (unsigned long) sz;
227                 res->flags |= pci_calc_resource_flags(l);
228                 if (is_64bit_memory(l)) {
229                         u32 szhi, lhi;
230
231                         pci_read_config_dword(dev, reg+4, &lhi);
232                         pci_write_config_dword(dev, reg+4, ~0);
233                         pci_read_config_dword(dev, reg+4, &szhi);
234                         pci_write_config_dword(dev, reg+4, lhi);
235                         sz64 = ((u64)szhi << 32) | raw_sz;
236                         l64 = ((u64)lhi << 32) | l;
237                         sz64 = pci_size64(l64, sz64, PCI_BASE_ADDRESS_MEM_MASK);
238                         next++;
239 #if BITS_PER_LONG == 64
240                         if (!sz64) {
241                                 res->start = 0;
242                                 res->end = 0;
243                                 res->flags = 0;
244                                 continue;
245                         }
246                         res->start = l64 & PCI_BASE_ADDRESS_MEM_MASK;
247                         res->end = res->start + sz64;
248 #else
249                         if (sz64 > 0x100000000ULL) {
250                                 printk(KERN_ERR "PCI: Unable to handle 64-bit "
251                                         "BAR for device %s\n", pci_name(dev));
252                                 res->start = 0;
253                                 res->flags = 0;
254                         } else if (lhi) {
255                                 /* 64-bit wide address, treat as disabled */
256                                 pci_write_config_dword(dev, reg,
257                                         l & ~(u32)PCI_BASE_ADDRESS_MEM_MASK);
258                                 pci_write_config_dword(dev, reg+4, 0);
259                                 res->start = 0;
260                                 res->end = sz;
261                         }
262 #endif
263                 }
264         }
265         if (rom) {
266                 dev->rom_base_reg = rom;
267                 res = &dev->resource[PCI_ROM_RESOURCE];
268                 res->name = pci_name(dev);
269                 pci_read_config_dword(dev, rom, &l);
270                 pci_write_config_dword(dev, rom, ~PCI_ROM_ADDRESS_ENABLE);
271                 pci_read_config_dword(dev, rom, &sz);
272                 pci_write_config_dword(dev, rom, l);
273                 if (l == 0xffffffff)
274                         l = 0;
275                 if (sz && sz != 0xffffffff) {
276                         sz = pci_size(l, sz, (u32)PCI_ROM_ADDRESS_MASK);
277                         if (sz) {
278                                 res->flags = (l & IORESOURCE_ROM_ENABLE) |
279                                   IORESOURCE_MEM | IORESOURCE_PREFETCH |
280                                   IORESOURCE_READONLY | IORESOURCE_CACHEABLE;
281                                 res->start = l & PCI_ROM_ADDRESS_MASK;
282                                 res->end = res->start + (unsigned long) sz;
283                         }
284                 }
285         }
286 }
287
288 void pci_read_bridge_bases(struct pci_bus *child)
289 {
290         struct pci_dev *dev = child->self;
291         u8 io_base_lo, io_limit_lo;
292         u16 mem_base_lo, mem_limit_lo;
293         unsigned long base, limit;
294         struct resource *res;
295         int i;
296
297         if (!dev)               /* It's a host bus, nothing to read */
298                 return;
299
300         if (dev->transparent) {
301                 printk(KERN_INFO "PCI: Transparent bridge - %s\n", pci_name(dev));
302                 for(i = 3; i < PCI_BUS_NUM_RESOURCES; i++)
303                         child->resource[i] = child->parent->resource[i - 3];
304         }
305
306         for(i=0; i<3; i++)
307                 child->resource[i] = &dev->resource[PCI_BRIDGE_RESOURCES+i];
308
309         res = child->resource[0];
310         pci_read_config_byte(dev, PCI_IO_BASE, &io_base_lo);
311         pci_read_config_byte(dev, PCI_IO_LIMIT, &io_limit_lo);
312         base = (io_base_lo & PCI_IO_RANGE_MASK) << 8;
313         limit = (io_limit_lo & PCI_IO_RANGE_MASK) << 8;
314
315         if ((io_base_lo & PCI_IO_RANGE_TYPE_MASK) == PCI_IO_RANGE_TYPE_32) {
316                 u16 io_base_hi, io_limit_hi;
317                 pci_read_config_word(dev, PCI_IO_BASE_UPPER16, &io_base_hi);
318                 pci_read_config_word(dev, PCI_IO_LIMIT_UPPER16, &io_limit_hi);
319                 base |= (io_base_hi << 16);
320                 limit |= (io_limit_hi << 16);
321         }
322
323         if (base <= limit) {
324                 res->flags = (io_base_lo & PCI_IO_RANGE_TYPE_MASK) | IORESOURCE_IO;
325                 if (!res->start)
326                         res->start = base;
327                 if (!res->end)
328                         res->end = limit + 0xfff;
329         }
330
331         res = child->resource[1];
332         pci_read_config_word(dev, PCI_MEMORY_BASE, &mem_base_lo);
333         pci_read_config_word(dev, PCI_MEMORY_LIMIT, &mem_limit_lo);
334         base = (mem_base_lo & PCI_MEMORY_RANGE_MASK) << 16;
335         limit = (mem_limit_lo & PCI_MEMORY_RANGE_MASK) << 16;
336         if (base <= limit) {
337                 res->flags = (mem_base_lo & PCI_MEMORY_RANGE_TYPE_MASK) | IORESOURCE_MEM;
338                 res->start = base;
339                 res->end = limit + 0xfffff;
340         }
341
342         res = child->resource[2];
343         pci_read_config_word(dev, PCI_PREF_MEMORY_BASE, &mem_base_lo);
344         pci_read_config_word(dev, PCI_PREF_MEMORY_LIMIT, &mem_limit_lo);
345         base = (mem_base_lo & PCI_PREF_RANGE_MASK) << 16;
346         limit = (mem_limit_lo & PCI_PREF_RANGE_MASK) << 16;
347
348         if ((mem_base_lo & PCI_PREF_RANGE_TYPE_MASK) == PCI_PREF_RANGE_TYPE_64) {
349                 u32 mem_base_hi, mem_limit_hi;
350                 pci_read_config_dword(dev, PCI_PREF_BASE_UPPER32, &mem_base_hi);
351                 pci_read_config_dword(dev, PCI_PREF_LIMIT_UPPER32, &mem_limit_hi);
352
353                 /*
354                  * Some bridges set the base > limit by default, and some
355                  * (broken) BIOSes do not initialize them.  If we find
356                  * this, just assume they are not being used.
357                  */
358                 if (mem_base_hi <= mem_limit_hi) {
359 #if BITS_PER_LONG == 64
360                         base |= ((long) mem_base_hi) << 32;
361                         limit |= ((long) mem_limit_hi) << 32;
362 #else
363                         if (mem_base_hi || mem_limit_hi) {
364                                 printk(KERN_ERR "PCI: Unable to handle 64-bit address space for bridge %s\n", pci_name(dev));
365                                 return;
366                         }
367 #endif
368                 }
369         }
370         if (base <= limit) {
371                 res->flags = (mem_base_lo & PCI_MEMORY_RANGE_TYPE_MASK) | IORESOURCE_MEM | IORESOURCE_PREFETCH;
372                 res->start = base;
373                 res->end = limit + 0xfffff;
374         }
375 }
376
377 static struct pci_bus * pci_alloc_bus(void)
378 {
379         struct pci_bus *b;
380
381         b = kzalloc(sizeof(*b), GFP_KERNEL);
382         if (b) {
383                 INIT_LIST_HEAD(&b->node);
384                 INIT_LIST_HEAD(&b->children);
385                 INIT_LIST_HEAD(&b->devices);
386         }
387         return b;
388 }
389
390 static struct pci_bus * __devinit
391 pci_alloc_child_bus(struct pci_bus *parent, struct pci_dev *bridge, int busnr)
392 {
393         struct pci_bus *child;
394         int i;
395         int retval;
396
397         /*
398          * Allocate a new bus, and inherit stuff from the parent..
399          */
400         child = pci_alloc_bus();
401         if (!child)
402                 return NULL;
403
404         child->self = bridge;
405         child->parent = parent;
406         child->ops = parent->ops;
407         child->sysdata = parent->sysdata;
408         child->bus_flags = parent->bus_flags;
409         child->bridge = get_device(&bridge->dev);
410
411         child->class_dev.class = &pcibus_class;
412         sprintf(child->class_dev.class_id, "%04x:%02x", pci_domain_nr(child), busnr);
413         retval = class_device_register(&child->class_dev);
414         if (retval)
415                 goto error_register;
416         retval = class_device_create_file(&child->class_dev,
417                                           &class_device_attr_cpuaffinity);
418         if (retval)
419                 goto error_file_create;
420
421         /*
422          * Set up the primary, secondary and subordinate
423          * bus numbers.
424          */
425         child->number = child->secondary = busnr;
426         child->primary = parent->secondary;
427         child->subordinate = 0xff;
428
429         /* Set up default resource pointers and names.. */
430         for (i = 0; i < 4; i++) {
431                 child->resource[i] = &bridge->resource[PCI_BRIDGE_RESOURCES+i];
432                 child->resource[i]->name = child->name;
433         }
434         bridge->subordinate = child;
435
436         return child;
437
438 error_file_create:
439         class_device_unregister(&child->class_dev);
440 error_register:
441         kfree(child);
442         return NULL;
443 }
444
445 struct pci_bus *pci_add_new_bus(struct pci_bus *parent, struct pci_dev *dev, int busnr)
446 {
447         struct pci_bus *child;
448
449         child = pci_alloc_child_bus(parent, dev, busnr);
450         if (child) {
451                 down_write(&pci_bus_sem);
452                 list_add_tail(&child->node, &parent->children);
453                 up_write(&pci_bus_sem);
454         }
455         return child;
456 }
457
458 static void pci_enable_crs(struct pci_dev *dev)
459 {
460         u16 cap, rpctl;
461         int rpcap = pci_find_capability(dev, PCI_CAP_ID_EXP);
462         if (!rpcap)
463                 return;
464
465         pci_read_config_word(dev, rpcap + PCI_CAP_FLAGS, &cap);
466         if (((cap & PCI_EXP_FLAGS_TYPE) >> 4) != PCI_EXP_TYPE_ROOT_PORT)
467                 return;
468
469         pci_read_config_word(dev, rpcap + PCI_EXP_RTCTL, &rpctl);
470         rpctl |= PCI_EXP_RTCTL_CRSSVE;
471         pci_write_config_word(dev, rpcap + PCI_EXP_RTCTL, rpctl);
472 }
473
474 static void pci_fixup_parent_subordinate_busnr(struct pci_bus *child, int max)
475 {
476         struct pci_bus *parent = child->parent;
477
478         /* Attempts to fix that up are really dangerous unless
479            we're going to re-assign all bus numbers. */
480         if (!pcibios_assign_all_busses())
481                 return;
482
483         while (parent->parent && parent->subordinate < max) {
484                 parent->subordinate = max;
485                 pci_write_config_byte(parent->self, PCI_SUBORDINATE_BUS, max);
486                 parent = parent->parent;
487         }
488 }
489
490 unsigned int pci_scan_child_bus(struct pci_bus *bus);
491
492 /*
493  * If it's a bridge, configure it and scan the bus behind it.
494  * For CardBus bridges, we don't scan behind as the devices will
495  * be handled by the bridge driver itself.
496  *
497  * We need to process bridges in two passes -- first we scan those
498  * already configured by the BIOS and after we are done with all of
499  * them, we proceed to assigning numbers to the remaining buses in
500  * order to avoid overlaps between old and new bus numbers.
501  */
502 int pci_scan_bridge(struct pci_bus *bus, struct pci_dev * dev, int max, int pass)
503 {
504         struct pci_bus *child;
505         int is_cardbus = (dev->hdr_type == PCI_HEADER_TYPE_CARDBUS);
506         u32 buses, i, j = 0;
507         u16 bctl;
508
509         pci_read_config_dword(dev, PCI_PRIMARY_BUS, &buses);
510
511         pr_debug("PCI: Scanning behind PCI bridge %s, config %06x, pass %d\n",
512                  pci_name(dev), buses & 0xffffff, pass);
513
514         /* Disable MasterAbortMode during probing to avoid reporting
515            of bus errors (in some architectures) */ 
516         pci_read_config_word(dev, PCI_BRIDGE_CONTROL, &bctl);
517         pci_write_config_word(dev, PCI_BRIDGE_CONTROL,
518                               bctl & ~PCI_BRIDGE_CTL_MASTER_ABORT);
519
520         pci_enable_crs(dev);
521
522         if ((buses & 0xffff00) && !pcibios_assign_all_busses() && !is_cardbus) {
523                 unsigned int cmax, busnr;
524                 /*
525                  * Bus already configured by firmware, process it in the first
526                  * pass and just note the configuration.
527                  */
528                 if (pass)
529                         goto out;
530                 busnr = (buses >> 8) & 0xFF;
531
532                 /*
533                  * If we already got to this bus through a different bridge,
534                  * ignore it.  This can happen with the i450NX chipset.
535                  */
536                 if (pci_find_bus(pci_domain_nr(bus), busnr)) {
537                         printk(KERN_INFO "PCI: Bus %04x:%02x already known\n",
538                                         pci_domain_nr(bus), busnr);
539                         goto out;
540                 }
541
542                 child = pci_add_new_bus(bus, dev, busnr);
543                 if (!child)
544                         goto out;
545                 child->primary = buses & 0xFF;
546                 child->subordinate = (buses >> 16) & 0xFF;
547                 child->bridge_ctl = bctl;
548
549                 cmax = pci_scan_child_bus(child);
550                 if (cmax > max)
551                         max = cmax;
552                 if (child->subordinate > max)
553                         max = child->subordinate;
554         } else {
555                 /*
556                  * We need to assign a number to this bus which we always
557                  * do in the second pass.
558                  */
559                 if (!pass) {
560                         if (pcibios_assign_all_busses())
561                                 /* Temporarily disable forwarding of the
562                                    configuration cycles on all bridges in
563                                    this bus segment to avoid possible
564                                    conflicts in the second pass between two
565                                    bridges programmed with overlapping
566                                    bus ranges. */
567                                 pci_write_config_dword(dev, PCI_PRIMARY_BUS,
568                                                        buses & ~0xffffff);
569                         goto out;
570                 }
571
572                 /* Clear errors */
573                 pci_write_config_word(dev, PCI_STATUS, 0xffff);
574
575                 /* Prevent assigning a bus number that already exists.
576                  * This can happen when a bridge is hot-plugged */
577                 if (pci_find_bus(pci_domain_nr(bus), max+1))
578                         goto out;
579                 child = pci_add_new_bus(bus, dev, ++max);
580                 buses = (buses & 0xff000000)
581                       | ((unsigned int)(child->primary)     <<  0)
582                       | ((unsigned int)(child->secondary)   <<  8)
583                       | ((unsigned int)(child->subordinate) << 16);
584
585                 /*
586                  * yenta.c forces a secondary latency timer of 176.
587                  * Copy that behaviour here.
588                  */
589                 if (is_cardbus) {
590                         buses &= ~0xff000000;
591                         buses |= CARDBUS_LATENCY_TIMER << 24;
592                 }
593                         
594                 /*
595                  * We need to blast all three values with a single write.
596                  */
597                 pci_write_config_dword(dev, PCI_PRIMARY_BUS, buses);
598
599                 if (!is_cardbus) {
600                         child->bridge_ctl = bctl;
601                         /*
602                          * Adjust subordinate busnr in parent buses.
603                          * We do this before scanning for children because
604                          * some devices may not be detected if the bios
605                          * was lazy.
606                          */
607                         pci_fixup_parent_subordinate_busnr(child, max);
608                         /* Now we can scan all subordinate buses... */
609                         max = pci_scan_child_bus(child);
610                         /*
611                          * now fix it up again since we have found
612                          * the real value of max.
613                          */
614                         pci_fixup_parent_subordinate_busnr(child, max);
615                 } else {
616                         /*
617                          * For CardBus bridges, we leave 4 bus numbers
618                          * as cards with a PCI-to-PCI bridge can be
619                          * inserted later.
620                          */
621                         for (i=0; i<CARDBUS_RESERVE_BUSNR; i++) {
622                                 struct pci_bus *parent = bus;
623                                 if (pci_find_bus(pci_domain_nr(bus),
624                                                         max+i+1))
625                                         break;
626                                 while (parent->parent) {
627                                         if ((!pcibios_assign_all_busses()) &&
628                                             (parent->subordinate > max) &&
629                                             (parent->subordinate <= max+i)) {
630                                                 j = 1;
631                                         }
632                                         parent = parent->parent;
633                                 }
634                                 if (j) {
635                                         /*
636                                          * Often, there are two cardbus bridges
637                                          * -- try to leave one valid bus number
638                                          * for each one.
639                                          */
640                                         i /= 2;
641                                         break;
642                                 }
643                         }
644                         max += i;
645                         pci_fixup_parent_subordinate_busnr(child, max);
646                 }
647                 /*
648                  * Set the subordinate bus number to its real value.
649                  */
650                 child->subordinate = max;
651                 pci_write_config_byte(dev, PCI_SUBORDINATE_BUS, max);
652         }
653
654         sprintf(child->name, (is_cardbus ? "PCI CardBus #%02x" : "PCI Bus #%02x"), child->number);
655
656         /* Has only triggered on CardBus, fixup is in yenta_socket */
657         while (bus->parent) {
658                 if ((child->subordinate > bus->subordinate) ||
659                     (child->number > bus->subordinate) ||
660                     (child->number < bus->number) ||
661                     (child->subordinate < bus->number)) {
662                         pr_debug("PCI: Bus #%02x (-#%02x) is %s"
663                                 "hidden behind%s bridge #%02x (-#%02x)\n",
664                                 child->number, child->subordinate,
665                                 (bus->number > child->subordinate &&
666                                  bus->subordinate < child->number) ?
667                                         "wholly " : " partially",
668                                 bus->self->transparent ? " transparent" : " ",
669                                 bus->number, bus->subordinate);
670                 }
671                 bus = bus->parent;
672         }
673
674 out:
675         pci_write_config_word(dev, PCI_BRIDGE_CONTROL, bctl);
676
677         return max;
678 }
679
680 /*
681  * Read interrupt line and base address registers.
682  * The architecture-dependent code can tweak these, of course.
683  */
684 static void pci_read_irq(struct pci_dev *dev)
685 {
686         unsigned char irq;
687
688         pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &irq);
689         dev->pin = irq;
690         if (irq)
691                 pci_read_config_byte(dev, PCI_INTERRUPT_LINE, &irq);
692         dev->irq = irq;
693 }
694
695 #define LEGACY_IO_RESOURCE      (IORESOURCE_IO | IORESOURCE_PCI_FIXED)
696
697 /**
698  * pci_setup_device - fill in class and map information of a device
699  * @dev: the device structure to fill
700  *
701  * Initialize the device structure with information about the device's 
702  * vendor,class,memory and IO-space addresses,IRQ lines etc.
703  * Called at initialisation of the PCI subsystem and by CardBus services.
704  * Returns 0 on success and -1 if unknown type of device (not normal, bridge
705  * or CardBus).
706  */
707 static int pci_setup_device(struct pci_dev * dev)
708 {
709         u32 class;
710
711         sprintf(pci_name(dev), "%04x:%02x:%02x.%d", pci_domain_nr(dev->bus),
712                 dev->bus->number, PCI_SLOT(dev->devfn), PCI_FUNC(dev->devfn));
713
714         pci_read_config_dword(dev, PCI_CLASS_REVISION, &class);
715         dev->revision = class & 0xff;
716         class >>= 8;                                /* upper 3 bytes */
717         dev->class = class;
718         class >>= 8;
719
720         pr_debug("PCI: Found %s [%04x/%04x] %06x %02x\n", pci_name(dev),
721                  dev->vendor, dev->device, class, dev->hdr_type);
722
723         /* "Unknown power state" */
724         dev->current_state = PCI_UNKNOWN;
725
726         /* Early fixups, before probing the BARs */
727         pci_fixup_device(pci_fixup_early, dev);
728         class = dev->class >> 8;
729
730         switch (dev->hdr_type) {                    /* header type */
731         case PCI_HEADER_TYPE_NORMAL:                /* standard header */
732                 if (class == PCI_CLASS_BRIDGE_PCI)
733                         goto bad;
734                 pci_read_irq(dev);
735                 pci_read_bases(dev, 6, PCI_ROM_ADDRESS);
736                 pci_read_config_word(dev, PCI_SUBSYSTEM_VENDOR_ID, &dev->subsystem_vendor);
737                 pci_read_config_word(dev, PCI_SUBSYSTEM_ID, &dev->subsystem_device);
738
739                 /*
740                  *      Do the ugly legacy mode stuff here rather than broken chip
741                  *      quirk code. Legacy mode ATA controllers have fixed
742                  *      addresses. These are not always echoed in BAR0-3, and
743                  *      BAR0-3 in a few cases contain junk!
744                  */
745                 if (class == PCI_CLASS_STORAGE_IDE) {
746                         u8 progif;
747                         pci_read_config_byte(dev, PCI_CLASS_PROG, &progif);
748                         if ((progif & 1) == 0) {
749                                 dev->resource[0].start = 0x1F0;
750                                 dev->resource[0].end = 0x1F7;
751                                 dev->resource[0].flags = LEGACY_IO_RESOURCE;
752                                 dev->resource[1].start = 0x3F6;
753                                 dev->resource[1].end = 0x3F6;
754                                 dev->resource[1].flags = LEGACY_IO_RESOURCE;
755                         }
756                         if ((progif & 4) == 0) {
757                                 dev->resource[2].start = 0x170;
758                                 dev->resource[2].end = 0x177;
759                                 dev->resource[2].flags = LEGACY_IO_RESOURCE;
760                                 dev->resource[3].start = 0x376;
761                                 dev->resource[3].end = 0x376;
762                                 dev->resource[3].flags = LEGACY_IO_RESOURCE;
763                         }
764                 }
765                 break;
766
767         case PCI_HEADER_TYPE_BRIDGE:                /* bridge header */
768                 if (class != PCI_CLASS_BRIDGE_PCI)
769                         goto bad;
770                 /* The PCI-to-PCI bridge spec requires that subtractive
771                    decoding (i.e. transparent) bridge must have programming
772                    interface code of 0x01. */ 
773                 pci_read_irq(dev);
774                 dev->transparent = ((dev->class & 0xff) == 1);
775                 pci_read_bases(dev, 2, PCI_ROM_ADDRESS1);
776                 break;
777
778         case PCI_HEADER_TYPE_CARDBUS:               /* CardBus bridge header */
779                 if (class != PCI_CLASS_BRIDGE_CARDBUS)
780                         goto bad;
781                 pci_read_irq(dev);
782                 pci_read_bases(dev, 1, 0);
783                 pci_read_config_word(dev, PCI_CB_SUBSYSTEM_VENDOR_ID, &dev->subsystem_vendor);
784                 pci_read_config_word(dev, PCI_CB_SUBSYSTEM_ID, &dev->subsystem_device);
785                 break;
786
787         default:                                    /* unknown header */
788                 printk(KERN_ERR "PCI: device %s has unknown header type %02x, ignoring.\n",
789                         pci_name(dev), dev->hdr_type);
790                 return -1;
791
792         bad:
793                 printk(KERN_ERR "PCI: %s: class %x doesn't match header type %02x. Ignoring class.\n",
794                        pci_name(dev), class, dev->hdr_type);
795                 dev->class = PCI_CLASS_NOT_DEFINED;
796         }
797
798         /* We found a fine healthy device, go go go... */
799         return 0;
800 }
801
802 /**
803  * pci_release_dev - free a pci device structure when all users of it are finished.
804  * @dev: device that's been disconnected
805  *
806  * Will be called only by the device core when all users of this pci device are
807  * done.
808  */
809 static void pci_release_dev(struct device *dev)
810 {
811         struct pci_dev *pci_dev;
812
813         pci_dev = to_pci_dev(dev);
814         kfree(pci_dev);
815 }
816
817 static void set_pcie_port_type(struct pci_dev *pdev)
818 {
819         int pos;
820         u16 reg16;
821
822         pos = pci_find_capability(pdev, PCI_CAP_ID_EXP);
823         if (!pos)
824                 return;
825         pdev->is_pcie = 1;
826         pci_read_config_word(pdev, pos + PCI_EXP_FLAGS, &reg16);
827         pdev->pcie_type = (reg16 & PCI_EXP_FLAGS_TYPE) >> 4;
828 }
829
830 /**
831  * pci_cfg_space_size - get the configuration space size of the PCI device.
832  * @dev: PCI device
833  *
834  * Regular PCI devices have 256 bytes, but PCI-X 2 and PCI Express devices
835  * have 4096 bytes.  Even if the device is capable, that doesn't mean we can
836  * access it.  Maybe we don't have a way to generate extended config space
837  * accesses, or the device is behind a reverse Express bridge.  So we try
838  * reading the dword at 0x100 which must either be 0 or a valid extended
839  * capability header.
840  */
841 int pci_cfg_space_size(struct pci_dev *dev)
842 {
843         int pos;
844         u32 status;
845
846         pos = pci_find_capability(dev, PCI_CAP_ID_EXP);
847         if (!pos) {
848                 pos = pci_find_capability(dev, PCI_CAP_ID_PCIX);
849                 if (!pos)
850                         goto fail;
851
852                 pci_read_config_dword(dev, pos + PCI_X_STATUS, &status);
853                 if (!(status & (PCI_X_STATUS_266MHZ | PCI_X_STATUS_533MHZ)))
854                         goto fail;
855         }
856
857         if (pci_read_config_dword(dev, 256, &status) != PCIBIOS_SUCCESSFUL)
858                 goto fail;
859         if (status == 0xffffffff)
860                 goto fail;
861
862         return PCI_CFG_SPACE_EXP_SIZE;
863
864  fail:
865         return PCI_CFG_SPACE_SIZE;
866 }
867
868 static void pci_release_bus_bridge_dev(struct device *dev)
869 {
870         kfree(dev);
871 }
872
873 struct pci_dev *alloc_pci_dev(void)
874 {
875         struct pci_dev *dev;
876
877         dev = kzalloc(sizeof(struct pci_dev), GFP_KERNEL);
878         if (!dev)
879                 return NULL;
880
881         INIT_LIST_HEAD(&dev->global_list);
882         INIT_LIST_HEAD(&dev->bus_list);
883
884         pci_msi_init_pci_dev(dev);
885
886         return dev;
887 }
888 EXPORT_SYMBOL(alloc_pci_dev);
889
890 /*
891  * Read the config data for a PCI device, sanity-check it
892  * and fill in the dev structure...
893  */
894 static struct pci_dev * __devinit
895 pci_scan_device(struct pci_bus *bus, int devfn)
896 {
897         struct pci_dev *dev;
898         u32 l;
899         u8 hdr_type;
900         int delay = 1;
901
902         if (pci_bus_read_config_dword(bus, devfn, PCI_VENDOR_ID, &l))
903                 return NULL;
904
905         /* some broken boards return 0 or ~0 if a slot is empty: */
906         if (l == 0xffffffff || l == 0x00000000 ||
907             l == 0x0000ffff || l == 0xffff0000)
908                 return NULL;
909
910         /* Configuration request Retry Status */
911         while (l == 0xffff0001) {
912                 msleep(delay);
913                 delay *= 2;
914                 if (pci_bus_read_config_dword(bus, devfn, PCI_VENDOR_ID, &l))
915                         return NULL;
916                 /* Card hasn't responded in 60 seconds?  Must be stuck. */
917                 if (delay > 60 * 1000) {
918                         printk(KERN_WARNING "Device %04x:%02x:%02x.%d not "
919                                         "responding\n", pci_domain_nr(bus),
920                                         bus->number, PCI_SLOT(devfn),
921                                         PCI_FUNC(devfn));
922                         return NULL;
923                 }
924         }
925
926         if (pci_bus_read_config_byte(bus, devfn, PCI_HEADER_TYPE, &hdr_type))
927                 return NULL;
928
929         dev = alloc_pci_dev();
930         if (!dev)
931                 return NULL;
932
933         dev->bus = bus;
934         dev->sysdata = bus->sysdata;
935         dev->dev.parent = bus->bridge;
936         dev->dev.bus = &pci_bus_type;
937         dev->devfn = devfn;
938         dev->hdr_type = hdr_type & 0x7f;
939         dev->multifunction = !!(hdr_type & 0x80);
940         dev->vendor = l & 0xffff;
941         dev->device = (l >> 16) & 0xffff;
942         dev->cfg_size = pci_cfg_space_size(dev);
943         dev->error_state = pci_channel_io_normal;
944         set_pcie_port_type(dev);
945
946         /* Assume 32-bit PCI; let 64-bit PCI cards (which are far rarer)
947            set this higher, assuming the system even supports it.  */
948         dev->dma_mask = 0xffffffff;
949         if (pci_setup_device(dev) < 0) {
950                 kfree(dev);
951                 return NULL;
952         }
953
954         return dev;
955 }
956
957 void pci_device_add(struct pci_dev *dev, struct pci_bus *bus)
958 {
959         device_initialize(&dev->dev);
960         dev->dev.release = pci_release_dev;
961         pci_dev_get(dev);
962
963         set_dev_node(&dev->dev, pcibus_to_node(bus));
964         dev->dev.dma_mask = &dev->dma_mask;
965         dev->dev.coherent_dma_mask = 0xffffffffull;
966
967         /* Fix up broken headers */
968         pci_fixup_device(pci_fixup_header, dev);
969
970         /*
971          * Add the device to our list of discovered devices
972          * and the bus list for fixup functions, etc.
973          */
974         INIT_LIST_HEAD(&dev->global_list);
975         down_write(&pci_bus_sem);
976         list_add_tail(&dev->bus_list, &bus->devices);
977         up_write(&pci_bus_sem);
978 }
979
980 struct pci_dev *pci_scan_single_device(struct pci_bus *bus, int devfn)
981 {
982         struct pci_dev *dev;
983
984         dev = pci_scan_device(bus, devfn);
985         if (!dev)
986                 return NULL;
987
988         pci_device_add(dev, bus);
989
990         return dev;
991 }
992
993 /**
994  * pci_scan_slot - scan a PCI slot on a bus for devices.
995  * @bus: PCI bus to scan
996  * @devfn: slot number to scan (must have zero function.)
997  *
998  * Scan a PCI slot on the specified PCI bus for devices, adding
999  * discovered devices to the @bus->devices list.  New devices
1000  * will have an empty dev->global_list head.
1001  */
1002 int pci_scan_slot(struct pci_bus *bus, int devfn)
1003 {
1004         int func, nr = 0;
1005         int scan_all_fns;
1006
1007         scan_all_fns = pcibios_scan_all_fns(bus, devfn);
1008
1009         for (func = 0; func < 8; func++, devfn++) {
1010                 struct pci_dev *dev;
1011
1012                 dev = pci_scan_single_device(bus, devfn);
1013                 if (dev) {
1014                         nr++;
1015
1016                         /*
1017                          * If this is a single function device,
1018                          * don't scan past the first function.
1019                          */
1020                         if (!dev->multifunction) {
1021                                 if (func > 0) {
1022                                         dev->multifunction = 1;
1023                                 } else {
1024                                         break;
1025                                 }
1026                         }
1027                 } else {
1028                         if (func == 0 && !scan_all_fns)
1029                                 break;
1030                 }
1031         }
1032         return nr;
1033 }
1034
1035 unsigned int pci_scan_child_bus(struct pci_bus *bus)
1036 {
1037         unsigned int devfn, pass, max = bus->secondary;
1038         struct pci_dev *dev;
1039
1040         pr_debug("PCI: Scanning bus %04x:%02x\n", pci_domain_nr(bus), bus->number);
1041
1042         /* Go find them, Rover! */
1043         for (devfn = 0; devfn < 0x100; devfn += 8)
1044                 pci_scan_slot(bus, devfn);
1045
1046         /*
1047          * After performing arch-dependent fixup of the bus, look behind
1048          * all PCI-to-PCI bridges on this bus.
1049          */
1050         pr_debug("PCI: Fixups for bus %04x:%02x\n", pci_domain_nr(bus), bus->number);
1051         pcibios_fixup_bus(bus);
1052         for (pass=0; pass < 2; pass++)
1053                 list_for_each_entry(dev, &bus->devices, bus_list) {
1054                         if (dev->hdr_type == PCI_HEADER_TYPE_BRIDGE ||
1055                             dev->hdr_type == PCI_HEADER_TYPE_CARDBUS)
1056                                 max = pci_scan_bridge(bus, dev, max, pass);
1057                 }
1058
1059         /*
1060          * We've scanned the bus and so we know all about what's on
1061          * the other side of any bridges that may be on this bus plus
1062          * any devices.
1063          *
1064          * Return how far we've got finding sub-buses.
1065          */
1066         pr_debug("PCI: Bus scan for %04x:%02x returning with max=%02x\n",
1067                 pci_domain_nr(bus), bus->number, max);
1068         return max;
1069 }
1070
1071 unsigned int __devinit pci_do_scan_bus(struct pci_bus *bus)
1072 {
1073         unsigned int max;
1074
1075         max = pci_scan_child_bus(bus);
1076
1077         /*
1078          * Make the discovered devices available.
1079          */
1080         pci_bus_add_devices(bus);
1081
1082         return max;
1083 }
1084
1085 struct pci_bus * pci_create_bus(struct device *parent,
1086                 int bus, struct pci_ops *ops, void *sysdata)
1087 {
1088         int error;
1089         struct pci_bus *b;
1090         struct device *dev;
1091
1092         b = pci_alloc_bus();
1093         if (!b)
1094                 return NULL;
1095
1096         dev = kmalloc(sizeof(*dev), GFP_KERNEL);
1097         if (!dev){
1098                 kfree(b);
1099                 return NULL;
1100         }
1101
1102         b->sysdata = sysdata;
1103         b->ops = ops;
1104
1105         if (pci_find_bus(pci_domain_nr(b), bus)) {
1106                 /* If we already got to this bus through a different bridge, ignore it */
1107                 pr_debug("PCI: Bus %04x:%02x already known\n", pci_domain_nr(b), bus);
1108                 goto err_out;
1109         }
1110
1111         down_write(&pci_bus_sem);
1112         list_add_tail(&b->node, &pci_root_buses);
1113         up_write(&pci_bus_sem);
1114
1115         memset(dev, 0, sizeof(*dev));
1116         dev->parent = parent;
1117         dev->release = pci_release_bus_bridge_dev;
1118         sprintf(dev->bus_id, "pci%04x:%02x", pci_domain_nr(b), bus);
1119         error = device_register(dev);
1120         if (error)
1121                 goto dev_reg_err;
1122         b->bridge = get_device(dev);
1123
1124         b->class_dev.class = &pcibus_class;
1125         sprintf(b->class_dev.class_id, "%04x:%02x", pci_domain_nr(b), bus);
1126         error = class_device_register(&b->class_dev);
1127         if (error)
1128                 goto class_dev_reg_err;
1129         error = class_device_create_file(&b->class_dev, &class_device_attr_cpuaffinity);
1130         if (error)
1131                 goto class_dev_create_file_err;
1132
1133         /* Create legacy_io and legacy_mem files for this bus */
1134         pci_create_legacy_files(b);
1135
1136         error = sysfs_create_link(&b->class_dev.kobj, &b->bridge->kobj, "bridge");
1137         if (error)
1138                 goto sys_create_link_err;
1139
1140         b->number = b->secondary = bus;
1141         b->resource[0] = &ioport_resource;
1142         b->resource[1] = &iomem_resource;
1143
1144         return b;
1145
1146 sys_create_link_err:
1147         class_device_remove_file(&b->class_dev, &class_device_attr_cpuaffinity);
1148 class_dev_create_file_err:
1149         class_device_unregister(&b->class_dev);
1150 class_dev_reg_err:
1151         device_unregister(dev);
1152 dev_reg_err:
1153         down_write(&pci_bus_sem);
1154         list_del(&b->node);
1155         up_write(&pci_bus_sem);
1156 err_out:
1157         kfree(dev);
1158         kfree(b);
1159         return NULL;
1160 }
1161 EXPORT_SYMBOL_GPL(pci_create_bus);
1162
1163 struct pci_bus *pci_scan_bus_parented(struct device *parent,
1164                 int bus, struct pci_ops *ops, void *sysdata)
1165 {
1166         struct pci_bus *b;
1167
1168         b = pci_create_bus(parent, bus, ops, sysdata);
1169         if (b)
1170                 b->subordinate = pci_scan_child_bus(b);
1171         return b;
1172 }
1173 EXPORT_SYMBOL(pci_scan_bus_parented);
1174
1175 #ifdef CONFIG_HOTPLUG
1176 EXPORT_SYMBOL(pci_add_new_bus);
1177 EXPORT_SYMBOL(pci_do_scan_bus);
1178 EXPORT_SYMBOL(pci_scan_slot);
1179 EXPORT_SYMBOL(pci_scan_bridge);
1180 EXPORT_SYMBOL(pci_scan_single_device);
1181 EXPORT_SYMBOL_GPL(pci_scan_child_bus);
1182 #endif
1183
1184 static int __init pci_sort_bf_cmp(const struct pci_dev *a, const struct pci_dev *b)
1185 {
1186         if      (pci_domain_nr(a->bus) < pci_domain_nr(b->bus)) return -1;
1187         else if (pci_domain_nr(a->bus) > pci_domain_nr(b->bus)) return  1;
1188
1189         if      (a->bus->number < b->bus->number) return -1;
1190         else if (a->bus->number > b->bus->number) return  1;
1191
1192         if      (a->devfn < b->devfn) return -1;
1193         else if (a->devfn > b->devfn) return  1;
1194
1195         return 0;
1196 }
1197
1198 /*
1199  * Yes, this forcably breaks the klist abstraction temporarily.  It
1200  * just wants to sort the klist, not change reference counts and
1201  * take/drop locks rapidly in the process.  It does all this while
1202  * holding the lock for the list, so objects can't otherwise be
1203  * added/removed while we're swizzling.
1204  */
1205 static void __init pci_insertion_sort_klist(struct pci_dev *a, struct list_head *list)
1206 {
1207         struct list_head *pos;
1208         struct klist_node *n;
1209         struct device *dev;
1210         struct pci_dev *b;
1211
1212         list_for_each(pos, list) {
1213                 n = container_of(pos, struct klist_node, n_node);
1214                 dev = container_of(n, struct device, knode_bus);
1215                 b = to_pci_dev(dev);
1216                 if (pci_sort_bf_cmp(a, b) <= 0) {
1217                         list_move_tail(&a->dev.knode_bus.n_node, &b->dev.knode_bus.n_node);
1218                         return;
1219                 }
1220         }
1221         list_move_tail(&a->dev.knode_bus.n_node, list);
1222 }
1223
1224 static void __init pci_sort_breadthfirst_klist(void)
1225 {
1226         LIST_HEAD(sorted_devices);
1227         struct list_head *pos, *tmp;
1228         struct klist_node *n;
1229         struct device *dev;
1230         struct pci_dev *pdev;
1231
1232         spin_lock(&pci_bus_type.klist_devices.k_lock);
1233         list_for_each_safe(pos, tmp, &pci_bus_type.klist_devices.k_list) {
1234                 n = container_of(pos, struct klist_node, n_node);
1235                 dev = container_of(n, struct device, knode_bus);
1236                 pdev = to_pci_dev(dev);
1237                 pci_insertion_sort_klist(pdev, &sorted_devices);
1238         }
1239         list_splice(&sorted_devices, &pci_bus_type.klist_devices.k_list);
1240         spin_unlock(&pci_bus_type.klist_devices.k_lock);
1241 }
1242
1243 static void __init pci_insertion_sort_devices(struct pci_dev *a, struct list_head *list)
1244 {
1245         struct pci_dev *b;
1246
1247         list_for_each_entry(b, list, global_list) {
1248                 if (pci_sort_bf_cmp(a, b) <= 0) {
1249                         list_move_tail(&a->global_list, &b->global_list);
1250                         return;
1251                 }
1252         }
1253         list_move_tail(&a->global_list, list);
1254 }
1255
1256 static void __init pci_sort_breadthfirst_devices(void)
1257 {
1258         LIST_HEAD(sorted_devices);
1259         struct pci_dev *dev, *tmp;
1260
1261         down_write(&pci_bus_sem);
1262         list_for_each_entry_safe(dev, tmp, &pci_devices, global_list) {
1263                 pci_insertion_sort_devices(dev, &sorted_devices);
1264         }
1265         list_splice(&sorted_devices, &pci_devices);
1266         up_write(&pci_bus_sem);
1267 }
1268
1269 void __init pci_sort_breadthfirst(void)
1270 {
1271         pci_sort_breadthfirst_devices();
1272         pci_sort_breadthfirst_klist();
1273 }
1274