Merge ../linux-2.6/
[linux-2.6] / drivers / pci / setup-bus.c
1 /*
2  *      drivers/pci/setup-bus.c
3  *
4  * Extruded from code written by
5  *      Dave Rusling (david.rusling@reo.mts.dec.com)
6  *      David Mosberger (davidm@cs.arizona.edu)
7  *      David Miller (davem@redhat.com)
8  *
9  * Support routines for initializing a PCI subsystem.
10  */
11
12 /*
13  * Nov 2000, Ivan Kokshaysky <ink@jurassic.park.msu.ru>
14  *           PCI-PCI bridges cleanup, sorted resource allocation.
15  * Feb 2002, Ivan Kokshaysky <ink@jurassic.park.msu.ru>
16  *           Converted to allocation in 3 passes, which gives
17  *           tighter packing. Prefetchable range support.
18  */
19
20 #include <linux/init.h>
21 #include <linux/kernel.h>
22 #include <linux/module.h>
23 #include <linux/pci.h>
24 #include <linux/errno.h>
25 #include <linux/ioport.h>
26 #include <linux/cache.h>
27 #include <linux/slab.h>
28
29
30 #define DEBUG_CONFIG 1
31 #if DEBUG_CONFIG
32 #define DBG(x...)     printk(x)
33 #else
34 #define DBG(x...)
35 #endif
36
37 #define ROUND_UP(x, a)          (((x) + (a) - 1) & ~((a) - 1))
38
39 /*
40  * FIXME: IO should be max 256 bytes.  However, since we may
41  * have a P2P bridge below a cardbus bridge, we need 4K.
42  */
43 #define CARDBUS_IO_SIZE         (4096)
44 #define CARDBUS_MEM_SIZE        (32*1024*1024)
45
46 static void __devinit
47 pbus_assign_resources_sorted(struct pci_bus *bus)
48 {
49         struct pci_dev *dev;
50         struct resource *res;
51         struct resource_list head, *list, *tmp;
52         int idx;
53
54         bus->bridge_ctl &= ~PCI_BRIDGE_CTL_VGA;
55
56         head.next = NULL;
57         list_for_each_entry(dev, &bus->devices, bus_list) {
58                 u16 class = dev->class >> 8;
59
60                 /* Don't touch classless devices and host bridges.  */
61                 if (class == PCI_CLASS_NOT_DEFINED ||
62                     class == PCI_CLASS_BRIDGE_HOST)
63                         continue;
64
65                 if (class == PCI_CLASS_DISPLAY_VGA ||
66                     class == PCI_CLASS_NOT_DEFINED_VGA)
67                         bus->bridge_ctl |= PCI_BRIDGE_CTL_VGA;
68
69                 pdev_sort_resources(dev, &head);
70         }
71
72         for (list = head.next; list;) {
73                 res = list->res;
74                 idx = res - &list->dev->resource[0];
75                 if (pci_assign_resource(list->dev, idx)) {
76                         res->start = 0;
77                         res->end = 0;
78                         res->flags = 0;
79                 }
80                 tmp = list;
81                 list = list->next;
82                 kfree(tmp);
83         }
84 }
85
86 static void __devinit
87 pci_setup_cardbus(struct pci_bus *bus)
88 {
89         struct pci_dev *bridge = bus->self;
90         struct pci_bus_region region;
91
92         printk("PCI: Bus %d, cardbus bridge: %s\n",
93                 bus->number, pci_name(bridge));
94
95         pcibios_resource_to_bus(bridge, &region, bus->resource[0]);
96         if (bus->resource[0]->flags & IORESOURCE_IO) {
97                 /*
98                  * The IO resource is allocated a range twice as large as it
99                  * would normally need.  This allows us to set both IO regs.
100                  */
101                 printk("  IO window: %08lx-%08lx\n",
102                         region.start, region.end);
103                 pci_write_config_dword(bridge, PCI_CB_IO_BASE_0,
104                                         region.start);
105                 pci_write_config_dword(bridge, PCI_CB_IO_LIMIT_0,
106                                         region.end);
107         }
108
109         pcibios_resource_to_bus(bridge, &region, bus->resource[1]);
110         if (bus->resource[1]->flags & IORESOURCE_IO) {
111                 printk("  IO window: %08lx-%08lx\n",
112                         region.start, region.end);
113                 pci_write_config_dword(bridge, PCI_CB_IO_BASE_1,
114                                         region.start);
115                 pci_write_config_dword(bridge, PCI_CB_IO_LIMIT_1,
116                                         region.end);
117         }
118
119         pcibios_resource_to_bus(bridge, &region, bus->resource[2]);
120         if (bus->resource[2]->flags & IORESOURCE_MEM) {
121                 printk("  PREFETCH window: %08lx-%08lx\n",
122                         region.start, region.end);
123                 pci_write_config_dword(bridge, PCI_CB_MEMORY_BASE_0,
124                                         region.start);
125                 pci_write_config_dword(bridge, PCI_CB_MEMORY_LIMIT_0,
126                                         region.end);
127         }
128
129         pcibios_resource_to_bus(bridge, &region, bus->resource[3]);
130         if (bus->resource[3]->flags & IORESOURCE_MEM) {
131                 printk("  MEM window: %08lx-%08lx\n",
132                         region.start, region.end);
133                 pci_write_config_dword(bridge, PCI_CB_MEMORY_BASE_1,
134                                         region.start);
135                 pci_write_config_dword(bridge, PCI_CB_MEMORY_LIMIT_1,
136                                         region.end);
137         }
138 }
139
140 /* Initialize bridges with base/limit values we have collected.
141    PCI-to-PCI Bridge Architecture Specification rev. 1.1 (1998)
142    requires that if there is no I/O ports or memory behind the
143    bridge, corresponding range must be turned off by writing base
144    value greater than limit to the bridge's base/limit registers.
145
146    Note: care must be taken when updating I/O base/limit registers
147    of bridges which support 32-bit I/O. This update requires two
148    config space writes, so it's quite possible that an I/O window of
149    the bridge will have some undesirable address (e.g. 0) after the
150    first write. Ditto 64-bit prefetchable MMIO.  */
151 static void __devinit
152 pci_setup_bridge(struct pci_bus *bus)
153 {
154         struct pci_dev *bridge = bus->self;
155         struct pci_bus_region region;
156         u32 l, io_upper16;
157
158         DBG(KERN_INFO "PCI: Bridge: %s\n", pci_name(bridge));
159
160         /* Set up the top and bottom of the PCI I/O segment for this bus. */
161         pcibios_resource_to_bus(bridge, &region, bus->resource[0]);
162         if (bus->resource[0]->flags & IORESOURCE_IO) {
163                 pci_read_config_dword(bridge, PCI_IO_BASE, &l);
164                 l &= 0xffff0000;
165                 l |= (region.start >> 8) & 0x00f0;
166                 l |= region.end & 0xf000;
167                 /* Set up upper 16 bits of I/O base/limit. */
168                 io_upper16 = (region.end & 0xffff0000) | (region.start >> 16);
169                 DBG(KERN_INFO "  IO window: %04lx-%04lx\n",
170                                 region.start, region.end);
171         }
172         else {
173                 /* Clear upper 16 bits of I/O base/limit. */
174                 io_upper16 = 0;
175                 l = 0x00f0;
176                 DBG(KERN_INFO "  IO window: disabled.\n");
177         }
178         /* Temporarily disable the I/O range before updating PCI_IO_BASE. */
179         pci_write_config_dword(bridge, PCI_IO_BASE_UPPER16, 0x0000ffff);
180         /* Update lower 16 bits of I/O base/limit. */
181         pci_write_config_dword(bridge, PCI_IO_BASE, l);
182         /* Update upper 16 bits of I/O base/limit. */
183         pci_write_config_dword(bridge, PCI_IO_BASE_UPPER16, io_upper16);
184
185         /* Set up the top and bottom of the PCI Memory segment
186            for this bus. */
187         pcibios_resource_to_bus(bridge, &region, bus->resource[1]);
188         if (bus->resource[1]->flags & IORESOURCE_MEM) {
189                 l = (region.start >> 16) & 0xfff0;
190                 l |= region.end & 0xfff00000;
191                 DBG(KERN_INFO "  MEM window: %08lx-%08lx\n",
192                                 region.start, region.end);
193         }
194         else {
195                 l = 0x0000fff0;
196                 DBG(KERN_INFO "  MEM window: disabled.\n");
197         }
198         pci_write_config_dword(bridge, PCI_MEMORY_BASE, l);
199
200         /* Clear out the upper 32 bits of PREF limit.
201            If PCI_PREF_BASE_UPPER32 was non-zero, this temporarily
202            disables PREF range, which is ok. */
203         pci_write_config_dword(bridge, PCI_PREF_LIMIT_UPPER32, 0);
204
205         /* Set up PREF base/limit. */
206         pcibios_resource_to_bus(bridge, &region, bus->resource[2]);
207         if (bus->resource[2]->flags & IORESOURCE_PREFETCH) {
208                 l = (region.start >> 16) & 0xfff0;
209                 l |= region.end & 0xfff00000;
210                 DBG(KERN_INFO "  PREFETCH window: %08lx-%08lx\n",
211                                 region.start, region.end);
212         }
213         else {
214                 l = 0x0000fff0;
215                 DBG(KERN_INFO "  PREFETCH window: disabled.\n");
216         }
217         pci_write_config_dword(bridge, PCI_PREF_MEMORY_BASE, l);
218
219         /* Clear out the upper 32 bits of PREF base. */
220         pci_write_config_dword(bridge, PCI_PREF_BASE_UPPER32, 0);
221
222         pci_write_config_word(bridge, PCI_BRIDGE_CONTROL, bus->bridge_ctl);
223 }
224
225 /* Check whether the bridge supports optional I/O and
226    prefetchable memory ranges. If not, the respective
227    base/limit registers must be read-only and read as 0. */
228 static void __devinit
229 pci_bridge_check_ranges(struct pci_bus *bus)
230 {
231         u16 io;
232         u32 pmem;
233         struct pci_dev *bridge = bus->self;
234         struct resource *b_res;
235
236         b_res = &bridge->resource[PCI_BRIDGE_RESOURCES];
237         b_res[1].flags |= IORESOURCE_MEM;
238
239         pci_read_config_word(bridge, PCI_IO_BASE, &io);
240         if (!io) {
241                 pci_write_config_word(bridge, PCI_IO_BASE, 0xf0f0);
242                 pci_read_config_word(bridge, PCI_IO_BASE, &io);
243                 pci_write_config_word(bridge, PCI_IO_BASE, 0x0);
244         }
245         if (io)
246                 b_res[0].flags |= IORESOURCE_IO;
247         /*  DECchip 21050 pass 2 errata: the bridge may miss an address
248             disconnect boundary by one PCI data phase.
249             Workaround: do not use prefetching on this device. */
250         if (bridge->vendor == PCI_VENDOR_ID_DEC && bridge->device == 0x0001)
251                 return;
252         pci_read_config_dword(bridge, PCI_PREF_MEMORY_BASE, &pmem);
253         if (!pmem) {
254                 pci_write_config_dword(bridge, PCI_PREF_MEMORY_BASE,
255                                                0xfff0fff0);
256                 pci_read_config_dword(bridge, PCI_PREF_MEMORY_BASE, &pmem);
257                 pci_write_config_dword(bridge, PCI_PREF_MEMORY_BASE, 0x0);
258         }
259         if (pmem)
260                 b_res[2].flags |= IORESOURCE_MEM | IORESOURCE_PREFETCH;
261 }
262
263 /* Helper function for sizing routines: find first available
264    bus resource of a given type. Note: we intentionally skip
265    the bus resources which have already been assigned (that is,
266    have non-NULL parent resource). */
267 static struct resource * __devinit
268 find_free_bus_resource(struct pci_bus *bus, unsigned long type)
269 {
270         int i;
271         struct resource *r;
272         unsigned long type_mask = IORESOURCE_IO | IORESOURCE_MEM |
273                                   IORESOURCE_PREFETCH;
274
275         for (i = 0; i < PCI_BUS_NUM_RESOURCES; i++) {
276                 r = bus->resource[i];
277                 if (r == &ioport_resource || r == &iomem_resource)
278                         continue;
279                 if (r && (r->flags & type_mask) == type && !r->parent)
280                         return r;
281         }
282         return NULL;
283 }
284
285 /* Sizing the IO windows of the PCI-PCI bridge is trivial,
286    since these windows have 4K granularity and the IO ranges
287    of non-bridge PCI devices are limited to 256 bytes.
288    We must be careful with the ISA aliasing though. */
289 static void __devinit
290 pbus_size_io(struct pci_bus *bus)
291 {
292         struct pci_dev *dev;
293         struct resource *b_res = find_free_bus_resource(bus, IORESOURCE_IO);
294         unsigned long size = 0, size1 = 0;
295
296         if (!b_res)
297                 return;
298
299         list_for_each_entry(dev, &bus->devices, bus_list) {
300                 int i;
301
302                 for (i = 0; i < PCI_NUM_RESOURCES; i++) {
303                         struct resource *r = &dev->resource[i];
304                         unsigned long r_size;
305
306                         if (r->parent || !(r->flags & IORESOURCE_IO))
307                                 continue;
308                         r_size = r->end - r->start + 1;
309
310                         if (r_size < 0x400)
311                                 /* Might be re-aligned for ISA */
312                                 size += r_size;
313                         else
314                                 size1 += r_size;
315                 }
316         }
317 /* To be fixed in 2.5: we should have sort of HAVE_ISA
318    flag in the struct pci_bus. */
319 #if defined(CONFIG_ISA) || defined(CONFIG_EISA)
320         size = (size & 0xff) + ((size & ~0xffUL) << 2);
321 #endif
322         size = ROUND_UP(size + size1, 4096);
323         if (!size) {
324                 b_res->flags = 0;
325                 return;
326         }
327         /* Alignment of the IO window is always 4K */
328         b_res->start = 4096;
329         b_res->end = b_res->start + size - 1;
330 }
331
332 /* Calculate the size of the bus and minimal alignment which
333    guarantees that all child resources fit in this size. */
334 static int __devinit
335 pbus_size_mem(struct pci_bus *bus, unsigned long mask, unsigned long type)
336 {
337         struct pci_dev *dev;
338         unsigned long min_align, align, size;
339         unsigned long aligns[12];       /* Alignments from 1Mb to 2Gb */
340         int order, max_order;
341         struct resource *b_res = find_free_bus_resource(bus, type);
342
343         if (!b_res)
344                 return 0;
345
346         memset(aligns, 0, sizeof(aligns));
347         max_order = 0;
348         size = 0;
349
350         list_for_each_entry(dev, &bus->devices, bus_list) {
351                 int i;
352                 
353                 for (i = 0; i < PCI_NUM_RESOURCES; i++) {
354                         struct resource *r = &dev->resource[i];
355                         unsigned long r_size;
356
357                         if (r->parent || (r->flags & mask) != type)
358                                 continue;
359                         r_size = r->end - r->start + 1;
360                         /* For bridges size != alignment */
361                         align = (i < PCI_BRIDGE_RESOURCES) ? r_size : r->start;
362                         order = __ffs(align) - 20;
363                         if (order > 11) {
364                                 printk(KERN_WARNING "PCI: region %s/%d "
365                                        "too large: %lx-%lx\n",
366                                        pci_name(dev), i, r->start, r->end);
367                                 r->flags = 0;
368                                 continue;
369                         }
370                         size += r_size;
371                         if (order < 0)
372                                 order = 0;
373                         /* Exclude ranges with size > align from
374                            calculation of the alignment. */
375                         if (r_size == align)
376                                 aligns[order] += align;
377                         if (order > max_order)
378                                 max_order = order;
379                 }
380         }
381
382         align = 0;
383         min_align = 0;
384         for (order = 0; order <= max_order; order++) {
385                 unsigned long align1 = 1UL << (order + 20);
386
387                 if (!align)
388                         min_align = align1;
389                 else if (ROUND_UP(align + min_align, min_align) < align1)
390                         min_align = align1 >> 1;
391                 align += aligns[order];
392         }
393         size = ROUND_UP(size, min_align);
394         if (!size) {
395                 b_res->flags = 0;
396                 return 1;
397         }
398         b_res->start = min_align;
399         b_res->end = size + min_align - 1;
400         return 1;
401 }
402
403 static void __devinit
404 pci_bus_size_cardbus(struct pci_bus *bus)
405 {
406         struct pci_dev *bridge = bus->self;
407         struct resource *b_res = &bridge->resource[PCI_BRIDGE_RESOURCES];
408         u16 ctrl;
409
410         /*
411          * Reserve some resources for CardBus.  We reserve
412          * a fixed amount of bus space for CardBus bridges.
413          */
414         b_res[0].start = CARDBUS_IO_SIZE;
415         b_res[0].end = b_res[0].start + CARDBUS_IO_SIZE - 1;
416         b_res[0].flags |= IORESOURCE_IO;
417
418         b_res[1].start = CARDBUS_IO_SIZE;
419         b_res[1].end = b_res[1].start + CARDBUS_IO_SIZE - 1;
420         b_res[1].flags |= IORESOURCE_IO;
421
422         /*
423          * Check whether prefetchable memory is supported
424          * by this bridge.
425          */
426         pci_read_config_word(bridge, PCI_CB_BRIDGE_CONTROL, &ctrl);
427         if (!(ctrl & PCI_CB_BRIDGE_CTL_PREFETCH_MEM0)) {
428                 ctrl |= PCI_CB_BRIDGE_CTL_PREFETCH_MEM0;
429                 pci_write_config_word(bridge, PCI_CB_BRIDGE_CONTROL, ctrl);
430                 pci_read_config_word(bridge, PCI_CB_BRIDGE_CONTROL, &ctrl);
431         }
432
433         /*
434          * If we have prefetchable memory support, allocate
435          * two regions.  Otherwise, allocate one region of
436          * twice the size.
437          */
438         if (ctrl & PCI_CB_BRIDGE_CTL_PREFETCH_MEM0) {
439                 b_res[2].start = CARDBUS_MEM_SIZE;
440                 b_res[2].end = b_res[2].start + CARDBUS_MEM_SIZE - 1;
441                 b_res[2].flags |= IORESOURCE_MEM | IORESOURCE_PREFETCH;
442
443                 b_res[3].start = CARDBUS_MEM_SIZE;
444                 b_res[3].end = b_res[3].start + CARDBUS_MEM_SIZE - 1;
445                 b_res[3].flags |= IORESOURCE_MEM;
446         } else {
447                 b_res[3].start = CARDBUS_MEM_SIZE * 2;
448                 b_res[3].end = b_res[3].start + CARDBUS_MEM_SIZE * 2 - 1;
449                 b_res[3].flags |= IORESOURCE_MEM;
450         }
451 }
452
453 void __devinit
454 pci_bus_size_bridges(struct pci_bus *bus)
455 {
456         struct pci_dev *dev;
457         unsigned long mask, prefmask;
458
459         list_for_each_entry(dev, &bus->devices, bus_list) {
460                 struct pci_bus *b = dev->subordinate;
461                 if (!b)
462                         continue;
463
464                 switch (dev->class >> 8) {
465                 case PCI_CLASS_BRIDGE_CARDBUS:
466                         pci_bus_size_cardbus(b);
467                         break;
468
469                 case PCI_CLASS_BRIDGE_PCI:
470                 default:
471                         pci_bus_size_bridges(b);
472                         break;
473                 }
474         }
475
476         /* The root bus? */
477         if (!bus->self)
478                 return;
479
480         switch (bus->self->class >> 8) {
481         case PCI_CLASS_BRIDGE_CARDBUS:
482                 /* don't size cardbuses yet. */
483                 break;
484
485         case PCI_CLASS_BRIDGE_PCI:
486                 pci_bridge_check_ranges(bus);
487         default:
488                 pbus_size_io(bus);
489                 /* If the bridge supports prefetchable range, size it
490                    separately. If it doesn't, or its prefetchable window
491                    has already been allocated by arch code, try
492                    non-prefetchable range for both types of PCI memory
493                    resources. */
494                 mask = IORESOURCE_MEM;
495                 prefmask = IORESOURCE_MEM | IORESOURCE_PREFETCH;
496                 if (pbus_size_mem(bus, prefmask, prefmask))
497                         mask = prefmask; /* Success, size non-prefetch only. */
498                 pbus_size_mem(bus, mask, IORESOURCE_MEM);
499                 break;
500         }
501 }
502 EXPORT_SYMBOL(pci_bus_size_bridges);
503
504 void __devinit
505 pci_bus_assign_resources(struct pci_bus *bus)
506 {
507         struct pci_bus *b;
508         struct pci_dev *dev;
509
510         pbus_assign_resources_sorted(bus);
511
512         if (bus->bridge_ctl & PCI_BRIDGE_CTL_VGA) {
513                 /* Propagate presence of the VGA to upstream bridges */
514                 for (b = bus; b->parent; b = b->parent) {
515                         b->bridge_ctl |= PCI_BRIDGE_CTL_VGA;
516                 }
517         }
518         list_for_each_entry(dev, &bus->devices, bus_list) {
519                 b = dev->subordinate;
520                 if (!b)
521                         continue;
522
523                 pci_bus_assign_resources(b);
524
525                 switch (dev->class >> 8) {
526                 case PCI_CLASS_BRIDGE_PCI:
527                         pci_setup_bridge(b);
528                         break;
529
530                 case PCI_CLASS_BRIDGE_CARDBUS:
531                         pci_setup_cardbus(b);
532                         break;
533
534                 default:
535                         printk(KERN_INFO "PCI: not setting up bridge %s "
536                                "for bus %d\n", pci_name(dev), b->number);
537                         break;
538                 }
539         }
540 }
541 EXPORT_SYMBOL(pci_bus_assign_resources);
542
543 void __init
544 pci_assign_unassigned_resources(void)
545 {
546         struct pci_bus *bus;
547
548         /* Depth first, calculate sizes and alignments of all
549            subordinate buses. */
550         list_for_each_entry(bus, &pci_root_buses, node) {
551                 pci_bus_size_bridges(bus);
552         }
553         /* Depth last, allocate resources and update the hardware. */
554         list_for_each_entry(bus, &pci_root_buses, node) {
555                 pci_bus_assign_resources(bus);
556                 pci_enable_bridges(bus);
557         }
558 }