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 configuration-space register settings are preserved.
19 *
20 * PCI Memory and Prefetchable Memory is direct-mapped. However I/O Space is
21 * accessed through a Window which is translated to low 64KB in PCI space, the
22 * first 4KB is not used so 60KB is available.
23 */
leon_pci_init(struct platform_device * ofdev,struct leon_pci_info * info)24 void leon_pci_init(struct platform_device *ofdev, struct leon_pci_info *info)
25 {
26 LIST_HEAD(resources);
27 struct pci_bus *root_bus;
28
29 pci_add_resource_offset(&resources, &info->io_space,
30 info->io_space.start - 0x1000);
31 pci_add_resource(&resources, &info->mem_space);
32
33 root_bus = pci_scan_root_bus(&ofdev->dev, 0, info->ops, info,
34 &resources);
35 if (root_bus) {
36 /* Setup IRQs of all devices using custom routines */
37 pci_fixup_irqs(pci_common_swizzle, info->map_irq);
38
39 /* Assign devices with resources */
40 pci_assign_unassigned_resources();
41 } else {
42 pci_free_resource_list(&resources);
43 }
44 }
45
pcibios_fixup_bus(struct pci_bus * pbus)46 void __devinit pcibios_fixup_bus(struct pci_bus *pbus)
47 {
48 struct pci_dev *dev;
49 int i, has_io, has_mem;
50 u16 cmd;
51
52 list_for_each_entry(dev, &pbus->devices, bus_list) {
53 /*
54 * We can not rely on that the bootloader has enabled I/O
55 * or memory access to PCI devices. Instead we enable it here
56 * if the device has BARs of respective type.
57 */
58 has_io = has_mem = 0;
59 for (i = 0; i < PCI_ROM_RESOURCE; i++) {
60 unsigned long f = dev->resource[i].flags;
61 if (f & IORESOURCE_IO)
62 has_io = 1;
63 else if (f & IORESOURCE_MEM)
64 has_mem = 1;
65 }
66 /* ROM BARs are mapped into 32-bit memory space */
67 if (dev->resource[PCI_ROM_RESOURCE].end != 0) {
68 dev->resource[PCI_ROM_RESOURCE].flags |=
69 IORESOURCE_ROM_ENABLE;
70 has_mem = 1;
71 }
72 pci_bus_read_config_word(pbus, dev->devfn, PCI_COMMAND, &cmd);
73 if (has_io && !(cmd & PCI_COMMAND_IO)) {
74 #ifdef CONFIG_PCI_DEBUG
75 printk(KERN_INFO "LEONPCI: Enabling I/O for dev %s\n",
76 pci_name(dev));
77 #endif
78 cmd |= PCI_COMMAND_IO;
79 pci_bus_write_config_word(pbus, dev->devfn, PCI_COMMAND,
80 cmd);
81 }
82 if (has_mem && !(cmd & PCI_COMMAND_MEMORY)) {
83 #ifdef CONFIG_PCI_DEBUG
84 printk(KERN_INFO "LEONPCI: Enabling MEMORY for dev"
85 "%s\n", pci_name(dev));
86 #endif
87 cmd |= PCI_COMMAND_MEMORY;
88 pci_bus_write_config_word(pbus, dev->devfn, PCI_COMMAND,
89 cmd);
90 }
91 }
92 }
93
94 /*
95 * Other archs parse arguments here.
96 */
pcibios_setup(char * str)97 char * __devinit pcibios_setup(char *str)
98 {
99 return str;
100 }
101
pcibios_align_resource(void * data,const struct resource * res,resource_size_t size,resource_size_t align)102 resource_size_t pcibios_align_resource(void *data, const struct resource *res,
103 resource_size_t size, resource_size_t align)
104 {
105 return res->start;
106 }
107
pcibios_enable_device(struct pci_dev * dev,int mask)108 int pcibios_enable_device(struct pci_dev *dev, int mask)
109 {
110 return pci_enable_resources(dev, mask);
111 }
112
pcibios_update_irq(struct pci_dev * dev,int irq)113 void __devinit pcibios_update_irq(struct pci_dev *dev, int irq)
114 {
115 #ifdef CONFIG_PCI_DEBUG
116 printk(KERN_DEBUG "LEONPCI: Assigning IRQ %02d to %s\n", irq,
117 pci_name(dev));
118 #endif
119 pci_write_config_byte(dev, PCI_INTERRUPT_LINE, irq);
120 }
121
122 /* in/out routines taken from pcic.c
123 *
124 * This probably belongs here rather than ioport.c because
125 * we do not want this crud linked into SBus kernels.
126 * Also, think for a moment about likes of floppy.c that
127 * include architecture specific parts. They may want to redefine ins/outs.
128 *
129 * We do not use horrible macros here because we want to
130 * advance pointer by sizeof(size).
131 */
outsb(unsigned long addr,const void * src,unsigned long count)132 void outsb(unsigned long addr, const void *src, unsigned long count)
133 {
134 while (count) {
135 count -= 1;
136 outb(*(const char *)src, addr);
137 src += 1;
138 /* addr += 1; */
139 }
140 }
141 EXPORT_SYMBOL(outsb);
142
outsw(unsigned long addr,const void * src,unsigned long count)143 void outsw(unsigned long addr, const void *src, unsigned long count)
144 {
145 while (count) {
146 count -= 2;
147 outw(*(const short *)src, addr);
148 src += 2;
149 /* addr += 2; */
150 }
151 }
152 EXPORT_SYMBOL(outsw);
153
outsl(unsigned long addr,const void * src,unsigned long count)154 void outsl(unsigned long addr, const void *src, unsigned long count)
155 {
156 while (count) {
157 count -= 4;
158 outl(*(const long *)src, addr);
159 src += 4;
160 /* addr += 4; */
161 }
162 }
163 EXPORT_SYMBOL(outsl);
164
insb(unsigned long addr,void * dst,unsigned long count)165 void insb(unsigned long addr, void *dst, unsigned long count)
166 {
167 while (count) {
168 count -= 1;
169 *(unsigned char *)dst = inb(addr);
170 dst += 1;
171 /* addr += 1; */
172 }
173 }
174 EXPORT_SYMBOL(insb);
175
insw(unsigned long addr,void * dst,unsigned long count)176 void insw(unsigned long addr, void *dst, unsigned long count)
177 {
178 while (count) {
179 count -= 2;
180 *(unsigned short *)dst = inw(addr);
181 dst += 2;
182 /* addr += 2; */
183 }
184 }
185 EXPORT_SYMBOL(insw);
186
insl(unsigned long addr,void * dst,unsigned long count)187 void insl(unsigned long addr, void *dst, unsigned long count)
188 {
189 while (count) {
190 count -= 4;
191 /*
192 * XXX I am sure we are in for an unaligned trap here.
193 */
194 *(unsigned long *)dst = inl(addr);
195 dst += 4;
196 /* addr += 4; */
197 }
198 }
199 EXPORT_SYMBOL(insl);
200