xref: /openbmc/linux/arch/mips/pci/pci-ar724x.c (revision 020c5260)
1 /*
2  *  Atheros AR724X PCI host controller driver
3  *
4  *  Copyright (C) 2011 René Bolldorf <xsecute@googlemail.com>
5  *  Copyright (C) 2009-2011 Gabor Juhos <juhosg@openwrt.org>
6  *
7  *  This program is free software; you can redistribute it and/or modify it
8  *  under the terms of the GNU General Public License version 2 as published
9  *  by the Free Software Foundation.
10  */
11 
12 #include <linux/irq.h>
13 #include <linux/pci.h>
14 #include <linux/init.h>
15 #include <linux/platform_device.h>
16 #include <asm/mach-ath79/ath79.h>
17 #include <asm/mach-ath79/ar71xx_regs.h>
18 
19 #define AR724X_PCI_REG_RESET		0x18
20 #define AR724X_PCI_REG_INT_STATUS	0x4c
21 #define AR724X_PCI_REG_INT_MASK		0x50
22 
23 #define AR724X_PCI_RESET_LINK_UP	BIT(0)
24 
25 #define AR724X_PCI_INT_DEV0		BIT(14)
26 
27 #define AR724X_PCI_IRQ_COUNT		1
28 
29 #define AR7240_BAR0_WAR_VALUE	0xffff
30 
31 #define AR724X_PCI_CMD_INIT	(PCI_COMMAND_MEMORY |		\
32 				 PCI_COMMAND_MASTER |		\
33 				 PCI_COMMAND_INVALIDATE |	\
34 				 PCI_COMMAND_PARITY |		\
35 				 PCI_COMMAND_SERR |		\
36 				 PCI_COMMAND_FAST_BACK)
37 
38 struct ar724x_pci_controller {
39 	void __iomem *devcfg_base;
40 	void __iomem *ctrl_base;
41 	void __iomem *crp_base;
42 
43 	int irq;
44 	int irq_base;
45 
46 	bool link_up;
47 	bool bar0_is_cached;
48 	u32  bar0_value;
49 
50 	struct pci_controller pci_controller;
51 	struct resource io_res;
52 	struct resource mem_res;
53 };
54 
55 static inline bool ar724x_pci_check_link(struct ar724x_pci_controller *apc)
56 {
57 	u32 reset;
58 
59 	reset = __raw_readl(apc->ctrl_base + AR724X_PCI_REG_RESET);
60 	return reset & AR724X_PCI_RESET_LINK_UP;
61 }
62 
63 static inline struct ar724x_pci_controller *
64 pci_bus_to_ar724x_controller(struct pci_bus *bus)
65 {
66 	struct pci_controller *hose;
67 
68 	hose = (struct pci_controller *) bus->sysdata;
69 	return container_of(hose, struct ar724x_pci_controller, pci_controller);
70 }
71 
72 static int ar724x_pci_local_write(struct ar724x_pci_controller *apc,
73 				  int where, int size, u32 value)
74 {
75 	void __iomem *base;
76 	u32 data;
77 	int s;
78 
79 	WARN_ON(where & (size - 1));
80 
81 	if (!apc->link_up)
82 		return PCIBIOS_DEVICE_NOT_FOUND;
83 
84 	base = apc->crp_base;
85 	data = __raw_readl(base + (where & ~3));
86 
87 	switch (size) {
88 	case 1:
89 		s = ((where & 3) * 8);
90 		data &= ~(0xff << s);
91 		data |= ((value & 0xff) << s);
92 		break;
93 	case 2:
94 		s = ((where & 2) * 8);
95 		data &= ~(0xffff << s);
96 		data |= ((value & 0xffff) << s);
97 		break;
98 	case 4:
99 		data = value;
100 		break;
101 	default:
102 		return PCIBIOS_BAD_REGISTER_NUMBER;
103 	}
104 
105 	__raw_writel(data, base + (where & ~3));
106 	/* flush write */
107 	__raw_readl(base + (where & ~3));
108 
109 	return PCIBIOS_SUCCESSFUL;
110 }
111 
112 static int ar724x_pci_read(struct pci_bus *bus, unsigned int devfn, int where,
113 			    int size, uint32_t *value)
114 {
115 	struct ar724x_pci_controller *apc;
116 	void __iomem *base;
117 	u32 data;
118 
119 	apc = pci_bus_to_ar724x_controller(bus);
120 	if (!apc->link_up)
121 		return PCIBIOS_DEVICE_NOT_FOUND;
122 
123 	if (devfn)
124 		return PCIBIOS_DEVICE_NOT_FOUND;
125 
126 	base = apc->devcfg_base;
127 	data = __raw_readl(base + (where & ~3));
128 
129 	switch (size) {
130 	case 1:
131 		if (where & 1)
132 			data >>= 8;
133 		if (where & 2)
134 			data >>= 16;
135 		data &= 0xff;
136 		break;
137 	case 2:
138 		if (where & 2)
139 			data >>= 16;
140 		data &= 0xffff;
141 		break;
142 	case 4:
143 		break;
144 	default:
145 		return PCIBIOS_BAD_REGISTER_NUMBER;
146 	}
147 
148 	if (where == PCI_BASE_ADDRESS_0 && size == 4 &&
149 	    apc->bar0_is_cached) {
150 		/* use the cached value */
151 		*value = apc->bar0_value;
152 	} else {
153 		*value = data;
154 	}
155 
156 	return PCIBIOS_SUCCESSFUL;
157 }
158 
159 static int ar724x_pci_write(struct pci_bus *bus, unsigned int devfn, int where,
160 			     int size, uint32_t value)
161 {
162 	struct ar724x_pci_controller *apc;
163 	void __iomem *base;
164 	u32 data;
165 	int s;
166 
167 	apc = pci_bus_to_ar724x_controller(bus);
168 	if (!apc->link_up)
169 		return PCIBIOS_DEVICE_NOT_FOUND;
170 
171 	if (devfn)
172 		return PCIBIOS_DEVICE_NOT_FOUND;
173 
174 	if (soc_is_ar7240() && where == PCI_BASE_ADDRESS_0 && size == 4) {
175 		if (value != 0xffffffff) {
176 			/*
177 			 * WAR for a hw issue. If the BAR0 register of the
178 			 * device is set to the proper base address, the
179 			 * memory space of the device is not accessible.
180 			 *
181 			 * Cache the intended value so it can be read back,
182 			 * and write a SoC specific constant value to the
183 			 * BAR0 register in order to make the device memory
184 			 * accessible.
185 			 */
186 			apc->bar0_is_cached = true;
187 			apc->bar0_value = value;
188 
189 			value = AR7240_BAR0_WAR_VALUE;
190 		} else {
191 			apc->bar0_is_cached = false;
192 		}
193 	}
194 
195 	base = apc->devcfg_base;
196 	data = __raw_readl(base + (where & ~3));
197 
198 	switch (size) {
199 	case 1:
200 		s = ((where & 3) * 8);
201 		data &= ~(0xff << s);
202 		data |= ((value & 0xff) << s);
203 		break;
204 	case 2:
205 		s = ((where & 2) * 8);
206 		data &= ~(0xffff << s);
207 		data |= ((value & 0xffff) << s);
208 		break;
209 	case 4:
210 		data = value;
211 		break;
212 	default:
213 		return PCIBIOS_BAD_REGISTER_NUMBER;
214 	}
215 
216 	__raw_writel(data, base + (where & ~3));
217 	/* flush write */
218 	__raw_readl(base + (where & ~3));
219 
220 	return PCIBIOS_SUCCESSFUL;
221 }
222 
223 static struct pci_ops ar724x_pci_ops = {
224 	.read	= ar724x_pci_read,
225 	.write	= ar724x_pci_write,
226 };
227 
228 static void ar724x_pci_irq_handler(struct irq_desc *desc)
229 {
230 	struct ar724x_pci_controller *apc;
231 	void __iomem *base;
232 	u32 pending;
233 
234 	apc = irq_desc_get_handler_data(desc);
235 	base = apc->ctrl_base;
236 
237 	pending = __raw_readl(base + AR724X_PCI_REG_INT_STATUS) &
238 		  __raw_readl(base + AR724X_PCI_REG_INT_MASK);
239 
240 	if (pending & AR724X_PCI_INT_DEV0)
241 		generic_handle_irq(apc->irq_base + 0);
242 
243 	else
244 		spurious_interrupt();
245 }
246 
247 static void ar724x_pci_irq_unmask(struct irq_data *d)
248 {
249 	struct ar724x_pci_controller *apc;
250 	void __iomem *base;
251 	int offset;
252 	u32 t;
253 
254 	apc = irq_data_get_irq_chip_data(d);
255 	base = apc->ctrl_base;
256 	offset = apc->irq_base - d->irq;
257 
258 	switch (offset) {
259 	case 0:
260 		t = __raw_readl(base + AR724X_PCI_REG_INT_MASK);
261 		__raw_writel(t | AR724X_PCI_INT_DEV0,
262 			     base + AR724X_PCI_REG_INT_MASK);
263 		/* flush write */
264 		__raw_readl(base + AR724X_PCI_REG_INT_MASK);
265 	}
266 }
267 
268 static void ar724x_pci_irq_mask(struct irq_data *d)
269 {
270 	struct ar724x_pci_controller *apc;
271 	void __iomem *base;
272 	int offset;
273 	u32 t;
274 
275 	apc = irq_data_get_irq_chip_data(d);
276 	base = apc->ctrl_base;
277 	offset = apc->irq_base - d->irq;
278 
279 	switch (offset) {
280 	case 0:
281 		t = __raw_readl(base + AR724X_PCI_REG_INT_MASK);
282 		__raw_writel(t & ~AR724X_PCI_INT_DEV0,
283 			     base + AR724X_PCI_REG_INT_MASK);
284 
285 		/* flush write */
286 		__raw_readl(base + AR724X_PCI_REG_INT_MASK);
287 
288 		t = __raw_readl(base + AR724X_PCI_REG_INT_STATUS);
289 		__raw_writel(t | AR724X_PCI_INT_DEV0,
290 			     base + AR724X_PCI_REG_INT_STATUS);
291 
292 		/* flush write */
293 		__raw_readl(base + AR724X_PCI_REG_INT_STATUS);
294 	}
295 }
296 
297 static struct irq_chip ar724x_pci_irq_chip = {
298 	.name		= "AR724X PCI ",
299 	.irq_mask	= ar724x_pci_irq_mask,
300 	.irq_unmask	= ar724x_pci_irq_unmask,
301 	.irq_mask_ack	= ar724x_pci_irq_mask,
302 };
303 
304 static void ar724x_pci_irq_init(struct ar724x_pci_controller *apc,
305 				int id)
306 {
307 	void __iomem *base;
308 	int i;
309 
310 	base = apc->ctrl_base;
311 
312 	__raw_writel(0, base + AR724X_PCI_REG_INT_MASK);
313 	__raw_writel(0, base + AR724X_PCI_REG_INT_STATUS);
314 
315 	apc->irq_base = ATH79_PCI_IRQ_BASE + (id * AR724X_PCI_IRQ_COUNT);
316 
317 	for (i = apc->irq_base;
318 	     i < apc->irq_base + AR724X_PCI_IRQ_COUNT; i++) {
319 		irq_set_chip_and_handler(i, &ar724x_pci_irq_chip,
320 					 handle_level_irq);
321 		irq_set_chip_data(i, apc);
322 	}
323 
324 	irq_set_chained_handler_and_data(apc->irq, ar724x_pci_irq_handler,
325 					 apc);
326 }
327 
328 static int ar724x_pci_probe(struct platform_device *pdev)
329 {
330 	struct ar724x_pci_controller *apc;
331 	struct resource *res;
332 	int id;
333 
334 	id = pdev->id;
335 	if (id == -1)
336 		id = 0;
337 
338 	apc = devm_kzalloc(&pdev->dev, sizeof(struct ar724x_pci_controller),
339 			    GFP_KERNEL);
340 	if (!apc)
341 		return -ENOMEM;
342 
343 	res = platform_get_resource_byname(pdev, IORESOURCE_MEM, "ctrl_base");
344 	apc->ctrl_base = devm_ioremap_resource(&pdev->dev, res);
345 	if (IS_ERR(apc->ctrl_base))
346 		return PTR_ERR(apc->ctrl_base);
347 
348 	res = platform_get_resource_byname(pdev, IORESOURCE_MEM, "cfg_base");
349 	apc->devcfg_base = devm_ioremap_resource(&pdev->dev, res);
350 	if (IS_ERR(apc->devcfg_base))
351 		return PTR_ERR(apc->devcfg_base);
352 
353 	res = platform_get_resource_byname(pdev, IORESOURCE_MEM, "crp_base");
354 	apc->crp_base = devm_ioremap_resource(&pdev->dev, res);
355 	if (IS_ERR(apc->crp_base))
356 		return PTR_ERR(apc->crp_base);
357 
358 	apc->irq = platform_get_irq(pdev, 0);
359 	if (apc->irq < 0)
360 		return -EINVAL;
361 
362 	res = platform_get_resource_byname(pdev, IORESOURCE_IO, "io_base");
363 	if (!res)
364 		return -EINVAL;
365 
366 	apc->io_res.parent = res;
367 	apc->io_res.name = "PCI IO space";
368 	apc->io_res.start = res->start;
369 	apc->io_res.end = res->end;
370 	apc->io_res.flags = IORESOURCE_IO;
371 
372 	res = platform_get_resource_byname(pdev, IORESOURCE_MEM, "mem_base");
373 	if (!res)
374 		return -EINVAL;
375 
376 	apc->mem_res.parent = res;
377 	apc->mem_res.name = "PCI memory space";
378 	apc->mem_res.start = res->start;
379 	apc->mem_res.end = res->end;
380 	apc->mem_res.flags = IORESOURCE_MEM;
381 
382 	apc->pci_controller.pci_ops = &ar724x_pci_ops;
383 	apc->pci_controller.io_resource = &apc->io_res;
384 	apc->pci_controller.mem_resource = &apc->mem_res;
385 
386 	apc->link_up = ar724x_pci_check_link(apc);
387 	if (!apc->link_up)
388 		dev_warn(&pdev->dev, "PCIe link is down\n");
389 
390 	ar724x_pci_irq_init(apc, id);
391 
392 	ar724x_pci_local_write(apc, PCI_COMMAND, 4, AR724X_PCI_CMD_INIT);
393 
394 	register_pci_controller(&apc->pci_controller);
395 
396 	return 0;
397 }
398 
399 static struct platform_driver ar724x_pci_driver = {
400 	.probe = ar724x_pci_probe,
401 	.driver = {
402 		.name = "ar724x-pci",
403 	},
404 };
405 
406 static int __init ar724x_pci_init(void)
407 {
408 	return platform_driver_register(&ar724x_pci_driver);
409 }
410 
411 postcore_initcall(ar724x_pci_init);
412