arch/x86/pci/mmconfig_64.c

   1 /*
   2  * mmconfig.c - Low-level direct PCI config space access via MMCONFIG
   3  *
   4  * This is an 64bit optimized version that always keeps the full mmconfig
   5  * space mapped. This allows lockless config space operation.
   6  */
   7
   8 #include <linux/pci.h>
   9 #include <linux/init.h>
  10 #include <linux/acpi.h>
  11 #include <linux/bitmap.h>
  12 #include <asm/e820.h>
  13 #include <asm/pci_x86.h>
  14
  15 /* Static virtual mapping of the MMCONFIG aperture */
  16 struct mmcfg_virt {
  17         struct acpi_mcfg_allocation *cfg;
  18         char __iomem *virt;
  19 };
  20 static struct mmcfg_virt *pci_mmcfg_virt;
  21
  22 static char __iomem *get_virt(unsigned int seg, unsigned bus)
  23 {
  24         struct acpi_mcfg_allocation *cfg;
  25         int cfg_num;
  26
  27         for (cfg_num = 0; cfg_num < pci_mmcfg_config_num; cfg_num++) {
  28                 cfg = pci_mmcfg_virt[cfg_num].cfg;
  29                 if (cfg->pci_segment == seg &&
  30                     (cfg->start_bus_number <= bus) &&
  31                     (cfg->end_bus_number >= bus))
  32                         return pci_mmcfg_virt[cfg_num].virt;
  33         }
  34
  35         /* Fall back to type 0 */
  36         return NULL;
  37 }
  38
  39 static char __iomem *pci_dev_base(unsigned int seg, unsigned int bus, unsigned int devfn)
  40 {
  41         char __iomem *addr;
  42
  43         addr = get_virt(seg, bus);
  44         if (!addr)
  45                 return NULL;
  46         return addr + ((bus << 20) | (devfn << 12));
  47 }
  48
  49 static int pci_mmcfg_read(unsigned int seg, unsigned int bus,
  50                           unsigned int devfn, int reg, int len, u32 *value)
  51 {
  52         char __iomem *addr;
  53
  54         /* Why do we have this when nobody checks it. How about a BUG()!? -AK */
  55         if (unlikely((bus > 255) || (devfn > 255) || (reg > 4095))) {
  56 err:            *value = -1;
  57                 return -EINVAL;
  58         }
  59
  60         addr = pci_dev_base(seg, bus, devfn);
  61         if (!addr)
  62                 goto err;
  63
  64         switch (len) {
  65         case 1:
  66                 *value = mmio_config_readb(addr + reg);
  67                 break;
  68         case 2:
  69                 *value = mmio_config_readw(addr + reg);
  70                 break;
  71         case 4:
  72                 *value = mmio_config_readl(addr + reg);
  73                 break;
  74         }
  75
  76         return 0;
  77 }
  78
  79 static int pci_mmcfg_write(unsigned int seg, unsigned int bus,
  80                            unsigned int devfn, int reg, int len, u32 value)
  81 {
  82         char __iomem *addr;
  83
  84         /* Why do we have this when nobody checks it. How about a BUG()!? -AK */
  85         if (unlikely((bus > 255) || (devfn > 255) || (reg > 4095)))
  86                 return -EINVAL;
  87
  88         addr = pci_dev_base(seg, bus, devfn);
  89         if (!addr)
  90                 return -EINVAL;
  91
  92         switch (len) {
  93         case 1:
  94                 mmio_config_writeb(addr + reg, value);
  95                 break;
  96         case 2:
  97                 mmio_config_writew(addr + reg, value);
  98                 break;
  99         case 4:
 100                 mmio_config_writel(addr + reg, value);
 101                 break;
 102         }
 103
 104         return 0;
 105 }
 106
 107 static struct pci_raw_ops pci_mmcfg = {
 108         .read =         pci_mmcfg_read,
 109         .write =        pci_mmcfg_write,
 110 };
 111
 112 static void __iomem * __init mcfg_ioremap(struct acpi_mcfg_allocation *cfg)
 113 {
 114         void __iomem *addr;
 115         u64 start, size;
 116
 117         start = cfg->start_bus_number;
 118         start <<= 20;
 119         start += cfg->address;
 120         size = cfg->end_bus_number + 1 - cfg->start_bus_number;
 121         size <<= 20;
 122         addr = ioremap_nocache(start, size);
 123         if (addr) {
 124                 printk(KERN_INFO "PCI: Using MMCONFIG at %Lx - %Lx\n",
 125                        start, start + size - 1);
 126                 addr -= cfg->start_bus_number << 20;
 127         }
 128         return addr;
 129 }
 130
 131 int __init pci_mmcfg_arch_init(void)
 132 {
 133         int i;
 134         pci_mmcfg_virt = kzalloc(sizeof(*pci_mmcfg_virt) *
 135                                  pci_mmcfg_config_num, GFP_KERNEL);
 136         if (pci_mmcfg_virt == NULL) {
 137                 printk(KERN_ERR "PCI: Can not allocate memory for mmconfig structures\n");
 138                 return 0;
 139         }
 140
 141         for (i = 0; i < pci_mmcfg_config_num; ++i) {
 142                 pci_mmcfg_virt[i].cfg = &pci_mmcfg_config[i];
 143                 pci_mmcfg_virt[i].virt = mcfg_ioremap(&pci_mmcfg_config[i]);
 144                 if (!pci_mmcfg_virt[i].virt) {
 145                         printk(KERN_ERR "PCI: Cannot map mmconfig aperture for "
 146                                         "segment %d\n",
 147                                 pci_mmcfg_config[i].pci_segment);
 148                         pci_mmcfg_arch_free();
 149                         return 0;
 150                 }
 151         }
 152         raw_pci_ext_ops = &pci_mmcfg;
 153         return 1;
 154 }
 155
 156 void __init pci_mmcfg_arch_free(void)
 157 {
 158         int i;
 159
 160         if (pci_mmcfg_virt == NULL)
 161                 return;
 162
 163         for (i = 0; i < pci_mmcfg_config_num; ++i) {
 164                 if (pci_mmcfg_virt[i].virt) {
 165                         iounmap(pci_mmcfg_virt[i].virt + (pci_mmcfg_virt[i].cfg->start_bus_number << 20));
 166                         pci_mmcfg_virt[i].virt = NULL;
 167                         pci_mmcfg_virt[i].cfg = NULL;
 168                 }
 169         }
 170
 171         kfree(pci_mmcfg_virt);
 172         pci_mmcfg_virt = NULL;
 173 }