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