drivers/pci/setup-res.c

   1 /*
   2  *      drivers/pci/setup-res.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 /* fixed for multiple pci buses, 1999 Andrea Arcangeli <andrea@suse.de> */
  13
  14 /*
  15  * Nov 2000, Ivan Kokshaysky <ink@jurassic.park.msu.ru>
  16  *           Resource sorting
  17  */
  18
  19 #include <linux/init.h>
  20 #include <linux/kernel.h>
  21 #include <linux/pci.h>
  22 #include <linux/errno.h>
  23 #include <linux/ioport.h>
  24 #include <linux/cache.h>
  25 #include <linux/slab.h>
  26 #include "pci.h"
  27
  28 #define DEBUG_CONFIG 0
  29 #if DEBUG_CONFIG
  30 # define DBGC(args)     printk args
  31 #else
  32 # define DBGC(args)
  33 #endif
  34
  35
  36 static void
  37 pci_update_resource(struct pci_dev *dev, struct resource *res, int resno)
  38 {
  39         struct pci_bus_region region;
  40         u32 new, check, mask;
  41         int reg;
  42
  43         pcibios_resource_to_bus(dev, &region, res);
  44
  45         DBGC((KERN_ERR "  got res [%lx:%lx] bus [%lx:%lx] flags %lx for "
  46               "BAR %d of %s\n", res->start, res->end,
  47               region.start, region.end, res->flags,
  48               resno, pci_name(dev)));
  49
  50         new = region.start | (res->flags & PCI_REGION_FLAG_MASK);
  51         if (res->flags & IORESOURCE_IO)
  52                 mask = (u32)PCI_BASE_ADDRESS_IO_MASK;
  53         else
  54                 mask = (u32)PCI_BASE_ADDRESS_MEM_MASK;
  55
  56         if (resno < 6) {
  57                 reg = PCI_BASE_ADDRESS_0 + 4 * resno;
  58         } else if (resno == PCI_ROM_RESOURCE) {
  59                 new |= res->flags & PCI_ROM_ADDRESS_ENABLE;
  60                 reg = dev->rom_base_reg;
  61         } else {
  62                 /* Hmm, non-standard resource. */
  63                 BUG();
  64                 return;         /* kill uninitialised var warning */
  65         }
  66
  67         pci_write_config_dword(dev, reg, new);
  68         pci_read_config_dword(dev, reg, &check);
  69
  70         if ((new ^ check) & mask) {
  71                 printk(KERN_ERR "PCI: Error while updating region "
  72                        "%s/%d (%08x != %08x)\n", pci_name(dev), resno,
  73                        new, check);
  74         }
  75
  76         if ((new & (PCI_BASE_ADDRESS_SPACE|PCI_BASE_ADDRESS_MEM_TYPE_MASK)) ==
  77             (PCI_BASE_ADDRESS_SPACE_MEMORY|PCI_BASE_ADDRESS_MEM_TYPE_64)) {
  78                 new = 0; /* currently everyone zeros the high address */
  79                 pci_write_config_dword(dev, reg + 4, new);
  80                 pci_read_config_dword(dev, reg + 4, &check);
  81                 if (check != new) {
  82                         printk(KERN_ERR "PCI: Error updating region "
  83                                "%s/%d (high %08x != %08x)\n",
  84                                pci_name(dev), resno, new, check);
  85                 }
  86         }
  87         res->flags &= ~IORESOURCE_UNSET;
  88         DBGC((KERN_INFO "PCI: moved device %s resource %d (%lx) to %x\n",
  89                 dev->slot_name, resno, res->flags,
  90                 new & ~PCI_REGION_FLAG_MASK));
  91 }
  92
  93 int __init
  94 pci_claim_resource(struct pci_dev *dev, int resource)
  95 {
  96         struct resource *res = &dev->resource[resource];
  97         struct resource *root = NULL;
  98         char *dtype = resource < PCI_BRIDGE_RESOURCES ? "device" : "bridge";
  99         int err;
 100
 101         if (res->flags & IORESOURCE_IO)
 102                 root = &ioport_resource;
 103         if (res->flags & IORESOURCE_MEM)
 104                 root = &iomem_resource;
 105
 106         err = -EINVAL;
 107         if (root != NULL)
 108                 err = insert_resource(root, res);
 109
 110         if (err) {
 111                 printk(KERN_ERR "PCI: %s region %d of %s %s [%lx:%lx]\n",
 112                        root ? "Address space collision on" :
 113                               "No parent found for",
 114                        resource, dtype, pci_name(dev), res->start, res->end);
 115         }
 116
 117         return err;
 118 }
 119
 120 int pci_assign_resource(struct pci_dev *dev, int resno)
 121 {
 122         struct pci_bus *bus = dev->bus;
 123         struct resource *res = dev->resource + resno;
 124         unsigned long size, min, align;
 125         int ret;
 126
 127         size = res->end - res->start + 1;
 128         min = (res->flags & IORESOURCE_IO) ? PCIBIOS_MIN_IO : PCIBIOS_MIN_MEM;
 129         /* The bridge resources are special, as their
 130            size != alignment. Sizing routines return
 131            required alignment in the "start" field. */
 132         align = (resno < PCI_BRIDGE_RESOURCES) ? size : res->start;
 133
 134         /* First, try exact prefetching match.. */
 135         ret = pci_bus_alloc_resource(bus, res, size, align, min,
 136                                      IORESOURCE_PREFETCH,
 137                                      pcibios_align_resource, dev);
 138
 139         if (ret < 0 && (res->flags & IORESOURCE_PREFETCH)) {
 140                 /*
 141                  * That failed.
 142                  *
 143                  * But a prefetching area can handle a non-prefetching
 144                  * window (it will just not perform as well).
 145                  */
 146                 ret = pci_bus_alloc_resource(bus, res, size, align, min, 0,
 147                                              pcibios_align_resource, dev);
 148         }
 149
 150         if (ret) {
 151                 printk(KERN_ERR "PCI: Failed to allocate %s resource #%d:%lx@%lx for %s\n",
 152                        res->flags & IORESOURCE_IO ? "I/O" : "mem",
 153                        resno, size, res->start, pci_name(dev));
 154         } else if (resno < PCI_BRIDGE_RESOURCES) {
 155                 pci_update_resource(dev, res, resno);
 156         }
 157
 158         return ret;
 159 }
 160
 161 /* Sort resources by alignment */
 162 void __devinit
 163 pdev_sort_resources(struct pci_dev *dev, struct resource_list *head)
 164 {
 165         int i;
 166
 167         for (i = 0; i < PCI_NUM_RESOURCES; i++) {
 168                 struct resource *r;
 169                 struct resource_list *list, *tmp;
 170                 unsigned long r_align;
 171
 172                 r = &dev->resource[i];
 173                 r_align = r->end - r->start;
 174
 175                 if (!(r->flags) || r->parent)
 176                         continue;
 177                 if (!r_align) {
 178                         printk(KERN_WARNING "PCI: Ignore bogus resource %d "
 179                                             "[%lx:%lx] of %s\n",
 180                                             i, r->start, r->end, pci_name(dev));
 181                         continue;
 182                 }
 183                 r_align = (i < PCI_BRIDGE_RESOURCES) ? r_align + 1 : r->start;
 184                 for (list = head; ; list = list->next) {
 185                         unsigned long align = 0;
 186                         struct resource_list *ln = list->next;
 187                         int idx;
 188
 189                         if (ln) {
 190                                 idx = ln->res - &ln->dev->resource[0];
 191                                 align = (idx < PCI_BRIDGE_RESOURCES) ?
 192                                         ln->res->end - ln->res->start + 1 :
 193                                         ln->res->start;
 194                         }
 195                         if (r_align > align) {
 196                                 tmp = kmalloc(sizeof(*tmp), GFP_KERNEL);
 197                                 if (!tmp)
 198                                         panic("pdev_sort_resources(): "
 199                                               "kmalloc() failed!\n");
 200                                 tmp->next = ln;
 201                                 tmp->res = r;
 202                                 tmp->dev = dev;
 203                                 list->next = tmp;
 204                                 break;
 205                         }
 206                 }
 207         }
 208 }