arch/sparc/kernel/leon_pci.c

   1 /*
   2  * leon_pci.c: LEON Host PCI support
   3  *
   4  * Copyright (C) 2011 Aeroflex Gaisler AB, Daniel Hellstrom
   5  *
   6  * Code is partially derived from pcic.c
   7  */
   8
   9 #include <linux/of_device.h>
  10 #include <linux/kernel.h>
  11 #include <linux/pci.h>
  12 #include <linux/export.h>
  13 #include <asm/leon.h>
  14 #include <asm/leon_pci.h>
  15
  16 /* The LEON architecture does not rely on a BIOS or bootloader to setup
  17  * PCI for us. The Linux generic routines are used to setup resources,
  18  * reset values of confuration-space registers settings ae preseved.
  19  */
  20 void leon_pci_init(struct platform_device *ofdev, struct leon_pci_info *info)
  21 {
  22         struct pci_bus *root_bus;
  23
  24         root_bus = pci_scan_bus_parented(&ofdev->dev, 0, info->ops, info);
  25         if (root_bus) {
  26                 root_bus->resource[0] = &info->io_space;
  27                 root_bus->resource[1] = &info->mem_space;
  28                 root_bus->resource[2] = NULL;
  29
  30                 /* Init all PCI devices into PCI tree */
  31                 pci_bus_add_devices(root_bus);
  32
  33                 /* Setup IRQs of all devices using custom routines */
  34                 pci_fixup_irqs(pci_common_swizzle, info->map_irq);
  35
  36                 /* Assign devices with resources */
  37                 pci_assign_unassigned_resources();
  38         }
  39 }
  40
  41 /* PCI Memory and Prefetchable Memory is direct-mapped. However I/O Space is
  42  * accessed through a Window which is translated to low 64KB in PCI space, the
  43  * first 4KB is not used so 60KB is available.
  44  *
  45  * This function is used by generic code to translate resource addresses into
  46  * PCI addresses.
  47  */
  48 void pcibios_resource_to_bus(struct pci_dev *dev, struct pci_bus_region *region,
  49                              struct resource *res)
  50 {
  51         struct leon_pci_info *info = dev->bus->sysdata;
  52
  53         region->start = res->start;
  54         region->end = res->end;
  55
  56         if (res->flags & IORESOURCE_IO) {
  57                 region->start -= (info->io_space.start - 0x1000);
  58                 region->end -= (info->io_space.start - 0x1000);
  59         }
  60 }
  61 EXPORT_SYMBOL(pcibios_resource_to_bus);
  62
  63 /* see pcibios_resource_to_bus() comment */
  64 void pcibios_bus_to_resource(struct pci_dev *dev, struct resource *res,
  65                              struct pci_bus_region *region)
  66 {
  67         struct leon_pci_info *info = dev->bus->sysdata;
  68
  69         res->start = region->start;
  70         res->end = region->end;
  71
  72         if (res->flags & IORESOURCE_IO) {
  73                 res->start += (info->io_space.start - 0x1000);
  74                 res->end += (info->io_space.start - 0x1000);
  75         }
  76 }
  77 EXPORT_SYMBOL(pcibios_bus_to_resource);
  78
  79 void __devinit pcibios_fixup_bus(struct pci_bus *pbus)
  80 {
  81         struct pci_dev *dev;
  82         int i, has_io, has_mem;
  83         u16 cmd;
  84
  85         /* Generic PCI bus probing sets these to point at
  86          * &io{port,mem}_resouce which is wrong for us.
  87          */
  88         if (pbus->self == NULL) {
  89                 pbus->resource[0] = &info->io_space;
  90                 pbus->resource[1] = &info->mem_space;
  91                 pbus->resource[2] = NULL;
  92         }
  93
  94         list_for_each_entry(dev, &pbus->devices, bus_list) {
  95                 /*
  96                  * We can not rely on that the bootloader has enabled I/O
  97                  * or memory access to PCI devices. Instead we enable it here
  98                  * if the device has BARs of respective type.
  99                  */
 100                 has_io = has_mem = 0;
 101                 for (i = 0; i < PCI_ROM_RESOURCE; i++) {
 102                         unsigned long f = dev->resource[i].flags;
 103                         if (f & IORESOURCE_IO)
 104                                 has_io = 1;
 105                         else if (f & IORESOURCE_MEM)
 106                                 has_mem = 1;
 107                 }
 108                 /* ROM BARs are mapped into 32-bit memory space */
 109                 if (dev->resource[PCI_ROM_RESOURCE].end != 0) {
 110                         dev->resource[PCI_ROM_RESOURCE].flags |=
 111                                                         IORESOURCE_ROM_ENABLE;
 112                         has_mem = 1;
 113                 }
 114                 pci_bus_read_config_word(pbus, dev->devfn, PCI_COMMAND, &cmd);
 115                 if (has_io && !(cmd & PCI_COMMAND_IO)) {
 116 #ifdef CONFIG_PCI_DEBUG
 117                         printk(KERN_INFO "LEONPCI: Enabling I/O for dev %s\n",
 118                                          pci_name(dev));
 119 #endif
 120                         cmd |= PCI_COMMAND_IO;
 121                         pci_bus_write_config_word(pbus, dev->devfn, PCI_COMMAND,
 122                                                                         cmd);
 123                 }
 124                 if (has_mem && !(cmd & PCI_COMMAND_MEMORY)) {
 125 #ifdef CONFIG_PCI_DEBUG
 126                         printk(KERN_INFO "LEONPCI: Enabling MEMORY for dev"
 127                                          "%s\n", pci_name(dev));
 128 #endif
 129                         cmd |= PCI_COMMAND_MEMORY;
 130                         pci_bus_write_config_word(pbus, dev->devfn, PCI_COMMAND,
 131                                                                         cmd);
 132                 }
 133         }
 134 }
 135
 136 /*
 137  * Other archs parse arguments here.
 138  */
 139 char * __devinit pcibios_setup(char *str)
 140 {
 141         return str;
 142 }
 143
 144 resource_size_t pcibios_align_resource(void *data, const struct resource *res,
 145                                 resource_size_t size, resource_size_t align)
 146 {
 147         return res->start;
 148 }
 149
 150 int pcibios_enable_device(struct pci_dev *dev, int mask)
 151 {
 152         return pci_enable_resources(dev, mask);
 153 }
 154
 155 void __devinit pcibios_update_irq(struct pci_dev *dev, int irq)
 156 {
 157 #ifdef CONFIG_PCI_DEBUG
 158         printk(KERN_DEBUG "LEONPCI: Assigning IRQ %02d to %s\n", irq,
 159                 pci_name(dev));
 160 #endif
 161         pci_write_config_byte(dev, PCI_INTERRUPT_LINE, irq);
 162 }
 163
 164 /* in/out routines taken from pcic.c
 165  *
 166  * This probably belongs here rather than ioport.c because
 167  * we do not want this crud linked into SBus kernels.
 168  * Also, think for a moment about likes of floppy.c that
 169  * include architecture specific parts. They may want to redefine ins/outs.
 170  *
 171  * We do not use horrible macros here because we want to
 172  * advance pointer by sizeof(size).
 173  */
 174 void outsb(unsigned long addr, const void *src, unsigned long count)
 175 {
 176         while (count) {
 177                 count -= 1;
 178                 outb(*(const char *)src, addr);
 179                 src += 1;
 180                 /* addr += 1; */
 181         }
 182 }
 183 EXPORT_SYMBOL(outsb);
 184
 185 void outsw(unsigned long addr, const void *src, unsigned long count)
 186 {
 187         while (count) {
 188                 count -= 2;
 189                 outw(*(const short *)src, addr);
 190                 src += 2;
 191                 /* addr += 2; */
 192         }
 193 }
 194 EXPORT_SYMBOL(outsw);
 195
 196 void outsl(unsigned long addr, const void *src, unsigned long count)
 197 {
 198         while (count) {
 199                 count -= 4;
 200                 outl(*(const long *)src, addr);
 201                 src += 4;
 202                 /* addr += 4; */
 203         }
 204 }
 205 EXPORT_SYMBOL(outsl);
 206
 207 void insb(unsigned long addr, void *dst, unsigned long count)
 208 {
 209         while (count) {
 210                 count -= 1;
 211                 *(unsigned char *)dst = inb(addr);
 212                 dst += 1;
 213                 /* addr += 1; */
 214         }
 215 }
 216 EXPORT_SYMBOL(insb);
 217
 218 void insw(unsigned long addr, void *dst, unsigned long count)
 219 {
 220         while (count) {
 221                 count -= 2;
 222                 *(unsigned short *)dst = inw(addr);
 223                 dst += 2;
 224                 /* addr += 2; */
 225         }
 226 }
 227 EXPORT_SYMBOL(insw);
 228
 229 void insl(unsigned long addr, void *dst, unsigned long count)
 230 {
 231         while (count) {
 232                 count -= 4;
 233                 /*
 234                  * XXX I am sure we are in for an unaligned trap here.
 235                  */
 236                 *(unsigned long *)dst = inl(addr);
 237                 dst += 4;
 238                 /* addr += 4; */
 239         }
 240 }
 241 EXPORT_SYMBOL(insl);