Linux Audio

Check our new training course

Loading...
v5.4
  1// SPDX-License-Identifier: GPL-2.0-only
  2/*
  3 *  Ralink RT3662/RT3883 SoC PCI support
  4 *
  5 *  Copyright (C) 2011-2013 Gabor Juhos <juhosg@openwrt.org>
  6 *
  7 *  Parts of this file are based on Ralink's 2.6.21 BSP
 
 
 
 
  8 */
  9
 10#include <linux/types.h>
 11#include <linux/pci.h>
 12#include <linux/io.h>
 13#include <linux/init.h>
 14#include <linux/delay.h>
 15#include <linux/interrupt.h>
 
 16#include <linux/of.h>
 17#include <linux/of_irq.h>
 18#include <linux/of_pci.h>
 19#include <linux/platform_device.h>
 20
 21#include <asm/mach-ralink/rt3883.h>
 22#include <asm/mach-ralink/ralink_regs.h>
 23
 24#define RT3883_MEMORY_BASE		0x00000000
 25#define RT3883_MEMORY_SIZE		0x02000000
 26
 27#define RT3883_PCI_REG_PCICFG		0x00
 28#define   RT3883_PCICFG_P2P_BR_DEVNUM_M 0xf
 29#define   RT3883_PCICFG_P2P_BR_DEVNUM_S 16
 30#define   RT3883_PCICFG_PCIRST		BIT(1)
 31#define RT3883_PCI_REG_PCIRAW		0x04
 32#define RT3883_PCI_REG_PCIINT		0x08
 33#define RT3883_PCI_REG_PCIENA		0x0c
 34
 35#define RT3883_PCI_REG_CFGADDR		0x20
 36#define RT3883_PCI_REG_CFGDATA		0x24
 37#define RT3883_PCI_REG_MEMBASE		0x28
 38#define RT3883_PCI_REG_IOBASE		0x2c
 39#define RT3883_PCI_REG_ARBCTL		0x80
 40
 41#define RT3883_PCI_REG_BASE(_x)		(0x1000 + (_x) * 0x1000)
 42#define RT3883_PCI_REG_BAR0SETUP(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x10)
 43#define RT3883_PCI_REG_IMBASEBAR0(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x18)
 44#define RT3883_PCI_REG_ID(_x)		(RT3883_PCI_REG_BASE((_x)) + 0x30)
 45#define RT3883_PCI_REG_CLASS(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x34)
 46#define RT3883_PCI_REG_SUBID(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x38)
 47#define RT3883_PCI_REG_STATUS(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x50)
 48
 49#define RT3883_PCI_MODE_NONE	0
 50#define RT3883_PCI_MODE_PCI	BIT(0)
 51#define RT3883_PCI_MODE_PCIE	BIT(1)
 52#define RT3883_PCI_MODE_BOTH	(RT3883_PCI_MODE_PCI | RT3883_PCI_MODE_PCIE)
 53
 54#define RT3883_PCI_IRQ_COUNT	32
 55
 56#define RT3883_P2P_BR_DEVNUM	1
 57
 58struct rt3883_pci_controller {
 59	void __iomem *base;
 60
 61	struct device_node *intc_of_node;
 62	struct irq_domain *irq_domain;
 63
 64	struct pci_controller pci_controller;
 65	struct resource io_res;
 66	struct resource mem_res;
 67
 68	bool pcie_ready;
 69};
 70
 71static inline struct rt3883_pci_controller *
 72pci_bus_to_rt3883_controller(struct pci_bus *bus)
 73{
 74	struct pci_controller *hose;
 75
 76	hose = (struct pci_controller *) bus->sysdata;
 77	return container_of(hose, struct rt3883_pci_controller, pci_controller);
 78}
 79
 80static inline u32 rt3883_pci_r32(struct rt3883_pci_controller *rpc,
 81				 unsigned reg)
 82{
 83	return ioread32(rpc->base + reg);
 84}
 85
 86static inline void rt3883_pci_w32(struct rt3883_pci_controller *rpc,
 87				  u32 val, unsigned reg)
 88{
 89	iowrite32(val, rpc->base + reg);
 90}
 91
 92static inline u32 rt3883_pci_get_cfgaddr(unsigned int bus, unsigned int slot,
 93					 unsigned int func, unsigned int where)
 94{
 95	return (bus << 16) | (slot << 11) | (func << 8) | (where & 0xfc) |
 96	       0x80000000;
 97}
 98
 99static u32 rt3883_pci_read_cfg32(struct rt3883_pci_controller *rpc,
100			       unsigned bus, unsigned slot,
101			       unsigned func, unsigned reg)
102{
103	unsigned long flags;
104	u32 address;
105	u32 ret;
106
107	address = rt3883_pci_get_cfgaddr(bus, slot, func, reg);
108
109	rt3883_pci_w32(rpc, address, RT3883_PCI_REG_CFGADDR);
110	ret = rt3883_pci_r32(rpc, RT3883_PCI_REG_CFGDATA);
111
112	return ret;
113}
114
115static void rt3883_pci_write_cfg32(struct rt3883_pci_controller *rpc,
116				 unsigned bus, unsigned slot,
117				 unsigned func, unsigned reg, u32 val)
118{
119	unsigned long flags;
120	u32 address;
121
122	address = rt3883_pci_get_cfgaddr(bus, slot, func, reg);
123
124	rt3883_pci_w32(rpc, address, RT3883_PCI_REG_CFGADDR);
125	rt3883_pci_w32(rpc, val, RT3883_PCI_REG_CFGDATA);
126}
127
128static void rt3883_pci_irq_handler(struct irq_desc *desc)
129{
130	struct rt3883_pci_controller *rpc;
131	u32 pending;
132
133	rpc = irq_desc_get_handler_data(desc);
134
135	pending = rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIINT) &
136		  rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
137
138	if (!pending) {
139		spurious_interrupt();
140		return;
141	}
142
143	while (pending) {
144		unsigned irq, bit = __ffs(pending);
145
146		irq = irq_find_mapping(rpc->irq_domain, bit);
147		generic_handle_irq(irq);
148
149		pending &= ~BIT(bit);
150	}
151}
152
153static void rt3883_pci_irq_unmask(struct irq_data *d)
154{
155	struct rt3883_pci_controller *rpc;
156	u32 t;
157
158	rpc = irq_data_get_irq_chip_data(d);
159
160	t = rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
161	rt3883_pci_w32(rpc, t | BIT(d->hwirq), RT3883_PCI_REG_PCIENA);
162	/* flush write */
163	rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
164}
165
166static void rt3883_pci_irq_mask(struct irq_data *d)
167{
168	struct rt3883_pci_controller *rpc;
169	u32 t;
170
171	rpc = irq_data_get_irq_chip_data(d);
172
173	t = rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
174	rt3883_pci_w32(rpc, t & ~BIT(d->hwirq), RT3883_PCI_REG_PCIENA);
175	/* flush write */
176	rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
177}
178
179static struct irq_chip rt3883_pci_irq_chip = {
180	.name		= "RT3883 PCI",
181	.irq_mask	= rt3883_pci_irq_mask,
182	.irq_unmask	= rt3883_pci_irq_unmask,
183	.irq_mask_ack	= rt3883_pci_irq_mask,
184};
185
186static int rt3883_pci_irq_map(struct irq_domain *d, unsigned int irq,
187			      irq_hw_number_t hw)
188{
189	irq_set_chip_and_handler(irq, &rt3883_pci_irq_chip, handle_level_irq);
190	irq_set_chip_data(irq, d->host_data);
191
192	return 0;
193}
194
195static const struct irq_domain_ops rt3883_pci_irq_domain_ops = {
196	.map = rt3883_pci_irq_map,
197	.xlate = irq_domain_xlate_onecell,
198};
199
200static int rt3883_pci_irq_init(struct device *dev,
201			       struct rt3883_pci_controller *rpc)
202{
203	int irq;
204
205	irq = irq_of_parse_and_map(rpc->intc_of_node, 0);
206	if (irq == 0) {
207		dev_err(dev, "%pOF has no IRQ", rpc->intc_of_node);
 
208		return -EINVAL;
209	}
210
211	/* disable all interrupts */
212	rt3883_pci_w32(rpc, 0, RT3883_PCI_REG_PCIENA);
213
214	rpc->irq_domain =
215		irq_domain_add_linear(rpc->intc_of_node, RT3883_PCI_IRQ_COUNT,
216				      &rt3883_pci_irq_domain_ops,
217				      rpc);
218	if (!rpc->irq_domain) {
219		dev_err(dev, "unable to add IRQ domain\n");
220		return -ENODEV;
221	}
222
223	irq_set_chained_handler_and_data(irq, rt3883_pci_irq_handler, rpc);
224
225	return 0;
226}
227
228static int rt3883_pci_config_read(struct pci_bus *bus, unsigned int devfn,
229				  int where, int size, u32 *val)
230{
231	struct rt3883_pci_controller *rpc;
232	unsigned long flags;
233	u32 address;
234	u32 data;
235
236	rpc = pci_bus_to_rt3883_controller(bus);
237
238	if (!rpc->pcie_ready && bus->number == 1)
239		return PCIBIOS_DEVICE_NOT_FOUND;
240
241	address = rt3883_pci_get_cfgaddr(bus->number, PCI_SLOT(devfn),
242					 PCI_FUNC(devfn), where);
243
244	rt3883_pci_w32(rpc, address, RT3883_PCI_REG_CFGADDR);
245	data = rt3883_pci_r32(rpc, RT3883_PCI_REG_CFGDATA);
246
247	switch (size) {
248	case 1:
249		*val = (data >> ((where & 3) << 3)) & 0xff;
250		break;
251	case 2:
252		*val = (data >> ((where & 3) << 3)) & 0xffff;
253		break;
254	case 4:
255		*val = data;
256		break;
257	}
258
259	return PCIBIOS_SUCCESSFUL;
260}
261
262static int rt3883_pci_config_write(struct pci_bus *bus, unsigned int devfn,
263				   int where, int size, u32 val)
264{
265	struct rt3883_pci_controller *rpc;
266	unsigned long flags;
267	u32 address;
268	u32 data;
269
270	rpc = pci_bus_to_rt3883_controller(bus);
271
272	if (!rpc->pcie_ready && bus->number == 1)
273		return PCIBIOS_DEVICE_NOT_FOUND;
274
275	address = rt3883_pci_get_cfgaddr(bus->number, PCI_SLOT(devfn),
276					 PCI_FUNC(devfn), where);
277
278	rt3883_pci_w32(rpc, address, RT3883_PCI_REG_CFGADDR);
279	data = rt3883_pci_r32(rpc, RT3883_PCI_REG_CFGDATA);
280
281	switch (size) {
282	case 1:
283		data = (data & ~(0xff << ((where & 3) << 3))) |
284		       (val << ((where & 3) << 3));
285		break;
286	case 2:
287		data = (data & ~(0xffff << ((where & 3) << 3))) |
288		       (val << ((where & 3) << 3));
289		break;
290	case 4:
291		data = val;
292		break;
293	}
294
295	rt3883_pci_w32(rpc, data, RT3883_PCI_REG_CFGDATA);
296
297	return PCIBIOS_SUCCESSFUL;
298}
299
300static struct pci_ops rt3883_pci_ops = {
301	.read	= rt3883_pci_config_read,
302	.write	= rt3883_pci_config_write,
303};
304
305static void rt3883_pci_preinit(struct rt3883_pci_controller *rpc, unsigned mode)
306{
307	u32 syscfg1;
308	u32 rstctrl;
309	u32 clkcfg1;
310	u32 t;
311
312	rstctrl = rt_sysc_r32(RT3883_SYSC_REG_RSTCTRL);
313	syscfg1 = rt_sysc_r32(RT3883_SYSC_REG_SYSCFG1);
314	clkcfg1 = rt_sysc_r32(RT3883_SYSC_REG_CLKCFG1);
315
316	if (mode & RT3883_PCI_MODE_PCIE) {
317		rstctrl |= RT3883_RSTCTRL_PCIE;
318		rt_sysc_w32(rstctrl, RT3883_SYSC_REG_RSTCTRL);
319
320		/* setup PCI PAD drive mode */
321		syscfg1 &= ~(0x30);
322		syscfg1 |= (2 << 4);
323		rt_sysc_w32(syscfg1, RT3883_SYSC_REG_SYSCFG1);
324
325		t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN0);
326		t &= ~BIT(31);
327		rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN0);
328
329		t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN1);
330		t &= 0x80ffffff;
331		rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN1);
332
333		t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN1);
334		t |= 0xa << 24;
335		rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN1);
336
337		t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN0);
338		t |= BIT(31);
339		rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN0);
340
341		msleep(50);
342
343		rstctrl &= ~RT3883_RSTCTRL_PCIE;
344		rt_sysc_w32(rstctrl, RT3883_SYSC_REG_RSTCTRL);
345	}
346
347	syscfg1 |= (RT3883_SYSCFG1_PCIE_RC_MODE | RT3883_SYSCFG1_PCI_HOST_MODE);
348
349	clkcfg1 &= ~(RT3883_CLKCFG1_PCI_CLK_EN | RT3883_CLKCFG1_PCIE_CLK_EN);
350
351	if (mode & RT3883_PCI_MODE_PCI) {
352		clkcfg1 |= RT3883_CLKCFG1_PCI_CLK_EN;
353		rstctrl &= ~RT3883_RSTCTRL_PCI;
354	}
355
356	if (mode & RT3883_PCI_MODE_PCIE) {
357		clkcfg1 |= RT3883_CLKCFG1_PCIE_CLK_EN;
358		rstctrl &= ~RT3883_RSTCTRL_PCIE;
359	}
360
361	rt_sysc_w32(syscfg1, RT3883_SYSC_REG_SYSCFG1);
362	rt_sysc_w32(rstctrl, RT3883_SYSC_REG_RSTCTRL);
363	rt_sysc_w32(clkcfg1, RT3883_SYSC_REG_CLKCFG1);
364
365	msleep(500);
366
367	/*
368	 * setup the device number of the P2P bridge
369	 * and de-assert the reset line
370	 */
371	t = (RT3883_P2P_BR_DEVNUM << RT3883_PCICFG_P2P_BR_DEVNUM_S);
372	rt3883_pci_w32(rpc, t, RT3883_PCI_REG_PCICFG);
373
374	/* flush write */
375	rt3883_pci_r32(rpc, RT3883_PCI_REG_PCICFG);
376	msleep(500);
377
378	if (mode & RT3883_PCI_MODE_PCIE) {
379		msleep(500);
380
381		t = rt3883_pci_r32(rpc, RT3883_PCI_REG_STATUS(1));
382
383		rpc->pcie_ready = t & BIT(0);
384
385		if (!rpc->pcie_ready) {
386			/* reset the PCIe block */
387			t = rt_sysc_r32(RT3883_SYSC_REG_RSTCTRL);
388			t |= RT3883_RSTCTRL_PCIE;
389			rt_sysc_w32(t, RT3883_SYSC_REG_RSTCTRL);
390			t &= ~RT3883_RSTCTRL_PCIE;
391			rt_sysc_w32(t, RT3883_SYSC_REG_RSTCTRL);
392
393			/* turn off PCIe clock */
394			t = rt_sysc_r32(RT3883_SYSC_REG_CLKCFG1);
395			t &= ~RT3883_CLKCFG1_PCIE_CLK_EN;
396			rt_sysc_w32(t, RT3883_SYSC_REG_CLKCFG1);
397
398			t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN0);
399			t &= ~0xf000c080;
400			rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN0);
401		}
402	}
403
404	/* enable PCI arbiter */
405	rt3883_pci_w32(rpc, 0x79, RT3883_PCI_REG_ARBCTL);
406}
407
408static int rt3883_pci_probe(struct platform_device *pdev)
409{
410	struct rt3883_pci_controller *rpc;
411	struct device *dev = &pdev->dev;
412	struct device_node *np = dev->of_node;
413	struct resource *res;
414	struct device_node *child;
415	u32 val;
416	int err;
417	int mode;
418
419	rpc = devm_kzalloc(dev, sizeof(*rpc), GFP_KERNEL);
420	if (!rpc)
421		return -ENOMEM;
422
423	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
424	rpc->base = devm_ioremap_resource(dev, res);
425	if (IS_ERR(rpc->base))
426		return PTR_ERR(rpc->base);
427
428	/* find the interrupt controller child node */
429	for_each_child_of_node(np, child) {
430		if (of_get_property(child, "interrupt-controller", NULL)) {
431			rpc->intc_of_node = child;
432			break;
433		}
434	}
435
436	if (!rpc->intc_of_node) {
437		dev_err(dev, "%pOF has no %s child node",
438			rpc->intc_of_node,
439			"interrupt controller");
440		return -EINVAL;
441	}
442
443	/* find the PCI host bridge child node */
444	for_each_child_of_node(np, child) {
445		if (of_node_is_type(child, "pci")) {
 
446			rpc->pci_controller.of_node = child;
447			break;
448		}
449	}
450
451	if (!rpc->pci_controller.of_node) {
452		dev_err(dev, "%pOF has no %s child node",
453			rpc->intc_of_node,
454			"PCI host bridge");
455		err = -EINVAL;
456		goto err_put_intc_node;
457	}
458
459	mode = RT3883_PCI_MODE_NONE;
460	for_each_available_child_of_node(rpc->pci_controller.of_node, child) {
461		int devfn;
462
463		if (!of_node_is_type(child, "pci"))
 
464			continue;
465
466		devfn = of_pci_get_devfn(child);
467		if (devfn < 0)
468			continue;
469
470		switch (PCI_SLOT(devfn)) {
471		case 1:
472			mode |= RT3883_PCI_MODE_PCIE;
473			break;
474
475		case 17:
476		case 18:
477			mode |= RT3883_PCI_MODE_PCI;
478			break;
479		}
480	}
481
482	if (mode == RT3883_PCI_MODE_NONE) {
483		dev_err(dev, "unable to determine PCI mode\n");
484		err = -EINVAL;
485		goto err_put_hb_node;
486	}
487
488	dev_info(dev, "mode:%s%s\n",
489		 (mode & RT3883_PCI_MODE_PCI) ? " PCI" : "",
490		 (mode & RT3883_PCI_MODE_PCIE) ? " PCIe" : "");
491
492	rt3883_pci_preinit(rpc, mode);
493
494	rpc->pci_controller.pci_ops = &rt3883_pci_ops;
495	rpc->pci_controller.io_resource = &rpc->io_res;
496	rpc->pci_controller.mem_resource = &rpc->mem_res;
497
498	/* Load PCI I/O and memory resources from DT */
499	pci_load_of_ranges(&rpc->pci_controller,
500			   rpc->pci_controller.of_node);
501
502	rt3883_pci_w32(rpc, rpc->mem_res.start, RT3883_PCI_REG_MEMBASE);
503	rt3883_pci_w32(rpc, rpc->io_res.start, RT3883_PCI_REG_IOBASE);
504
505	ioport_resource.start = rpc->io_res.start;
506	ioport_resource.end = rpc->io_res.end;
507
508	/* PCI */
509	rt3883_pci_w32(rpc, 0x03ff0000, RT3883_PCI_REG_BAR0SETUP(0));
510	rt3883_pci_w32(rpc, RT3883_MEMORY_BASE, RT3883_PCI_REG_IMBASEBAR0(0));
511	rt3883_pci_w32(rpc, 0x08021814, RT3883_PCI_REG_ID(0));
512	rt3883_pci_w32(rpc, 0x00800001, RT3883_PCI_REG_CLASS(0));
513	rt3883_pci_w32(rpc, 0x28801814, RT3883_PCI_REG_SUBID(0));
514
515	/* PCIe */
516	rt3883_pci_w32(rpc, 0x03ff0000, RT3883_PCI_REG_BAR0SETUP(1));
517	rt3883_pci_w32(rpc, RT3883_MEMORY_BASE, RT3883_PCI_REG_IMBASEBAR0(1));
518	rt3883_pci_w32(rpc, 0x08021814, RT3883_PCI_REG_ID(1));
519	rt3883_pci_w32(rpc, 0x06040001, RT3883_PCI_REG_CLASS(1));
520	rt3883_pci_w32(rpc, 0x28801814, RT3883_PCI_REG_SUBID(1));
521
522	err = rt3883_pci_irq_init(dev, rpc);
523	if (err)
524		goto err_put_hb_node;
525
526	/* PCIe */
527	val = rt3883_pci_read_cfg32(rpc, 0, 0x01, 0, PCI_COMMAND);
528	val |= PCI_COMMAND_IO | PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER;
529	rt3883_pci_write_cfg32(rpc, 0, 0x01, 0, PCI_COMMAND, val);
530
531	/* PCI */
532	val = rt3883_pci_read_cfg32(rpc, 0, 0x00, 0, PCI_COMMAND);
533	val |= PCI_COMMAND_IO | PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER;
534	rt3883_pci_write_cfg32(rpc, 0, 0x00, 0, PCI_COMMAND, val);
535
536	if (mode == RT3883_PCI_MODE_PCIE) {
537		rt3883_pci_w32(rpc, 0x03ff0001, RT3883_PCI_REG_BAR0SETUP(0));
538		rt3883_pci_w32(rpc, 0x03ff0001, RT3883_PCI_REG_BAR0SETUP(1));
539
540		rt3883_pci_write_cfg32(rpc, 0, RT3883_P2P_BR_DEVNUM, 0,
541				       PCI_BASE_ADDRESS_0,
542				       RT3883_MEMORY_BASE);
543		/* flush write */
544		rt3883_pci_read_cfg32(rpc, 0, RT3883_P2P_BR_DEVNUM, 0,
545				      PCI_BASE_ADDRESS_0);
546	} else {
547		rt3883_pci_write_cfg32(rpc, 0, RT3883_P2P_BR_DEVNUM, 0,
548				       PCI_IO_BASE, 0x00000101);
549	}
550
551	register_pci_controller(&rpc->pci_controller);
552
553	return 0;
554
555err_put_hb_node:
556	of_node_put(rpc->pci_controller.of_node);
557err_put_intc_node:
558	of_node_put(rpc->intc_of_node);
559	return err;
560}
561
562int pcibios_map_irq(const struct pci_dev *dev, u8 slot, u8 pin)
563{
564	return of_irq_parse_and_map_pci(dev, slot, pin);
565}
566
567int pcibios_plat_dev_init(struct pci_dev *dev)
568{
569	return 0;
570}
571
572static const struct of_device_id rt3883_pci_ids[] = {
573	{ .compatible = "ralink,rt3883-pci" },
574	{},
575};
 
576
577static struct platform_driver rt3883_pci_driver = {
578	.probe = rt3883_pci_probe,
579	.driver = {
580		.name = "rt3883-pci",
581		.of_match_table = of_match_ptr(rt3883_pci_ids),
582	},
583};
584
585static int __init rt3883_pci_init(void)
586{
587	return platform_driver_register(&rt3883_pci_driver);
588}
589
590postcore_initcall(rt3883_pci_init);
v4.6
 
  1/*
  2 *  Ralink RT3662/RT3883 SoC PCI support
  3 *
  4 *  Copyright (C) 2011-2013 Gabor Juhos <juhosg@openwrt.org>
  5 *
  6 *  Parts of this file are based on Ralink's 2.6.21 BSP
  7 *
  8 *  This program is free software; you can redistribute it and/or modify it
  9 *  under the terms of the GNU General Public License version 2 as published
 10 *  by the Free Software Foundation.
 11 */
 12
 13#include <linux/types.h>
 14#include <linux/pci.h>
 15#include <linux/io.h>
 16#include <linux/init.h>
 17#include <linux/delay.h>
 18#include <linux/interrupt.h>
 19#include <linux/module.h>
 20#include <linux/of.h>
 21#include <linux/of_irq.h>
 22#include <linux/of_pci.h>
 23#include <linux/platform_device.h>
 24
 25#include <asm/mach-ralink/rt3883.h>
 26#include <asm/mach-ralink/ralink_regs.h>
 27
 28#define RT3883_MEMORY_BASE		0x00000000
 29#define RT3883_MEMORY_SIZE		0x02000000
 30
 31#define RT3883_PCI_REG_PCICFG		0x00
 32#define   RT3883_PCICFG_P2P_BR_DEVNUM_M 0xf
 33#define   RT3883_PCICFG_P2P_BR_DEVNUM_S 16
 34#define   RT3883_PCICFG_PCIRST		BIT(1)
 35#define RT3883_PCI_REG_PCIRAW		0x04
 36#define RT3883_PCI_REG_PCIINT		0x08
 37#define RT3883_PCI_REG_PCIENA		0x0c
 38
 39#define RT3883_PCI_REG_CFGADDR		0x20
 40#define RT3883_PCI_REG_CFGDATA		0x24
 41#define RT3883_PCI_REG_MEMBASE		0x28
 42#define RT3883_PCI_REG_IOBASE		0x2c
 43#define RT3883_PCI_REG_ARBCTL		0x80
 44
 45#define RT3883_PCI_REG_BASE(_x)		(0x1000 + (_x) * 0x1000)
 46#define RT3883_PCI_REG_BAR0SETUP(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x10)
 47#define RT3883_PCI_REG_IMBASEBAR0(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x18)
 48#define RT3883_PCI_REG_ID(_x)		(RT3883_PCI_REG_BASE((_x)) + 0x30)
 49#define RT3883_PCI_REG_CLASS(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x34)
 50#define RT3883_PCI_REG_SUBID(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x38)
 51#define RT3883_PCI_REG_STATUS(_x)	(RT3883_PCI_REG_BASE((_x)) + 0x50)
 52
 53#define RT3883_PCI_MODE_NONE	0
 54#define RT3883_PCI_MODE_PCI	BIT(0)
 55#define RT3883_PCI_MODE_PCIE	BIT(1)
 56#define RT3883_PCI_MODE_BOTH	(RT3883_PCI_MODE_PCI | RT3883_PCI_MODE_PCIE)
 57
 58#define RT3883_PCI_IRQ_COUNT	32
 59
 60#define RT3883_P2P_BR_DEVNUM	1
 61
 62struct rt3883_pci_controller {
 63	void __iomem *base;
 64
 65	struct device_node *intc_of_node;
 66	struct irq_domain *irq_domain;
 67
 68	struct pci_controller pci_controller;
 69	struct resource io_res;
 70	struct resource mem_res;
 71
 72	bool pcie_ready;
 73};
 74
 75static inline struct rt3883_pci_controller *
 76pci_bus_to_rt3883_controller(struct pci_bus *bus)
 77{
 78	struct pci_controller *hose;
 79
 80	hose = (struct pci_controller *) bus->sysdata;
 81	return container_of(hose, struct rt3883_pci_controller, pci_controller);
 82}
 83
 84static inline u32 rt3883_pci_r32(struct rt3883_pci_controller *rpc,
 85				 unsigned reg)
 86{
 87	return ioread32(rpc->base + reg);
 88}
 89
 90static inline void rt3883_pci_w32(struct rt3883_pci_controller *rpc,
 91				  u32 val, unsigned reg)
 92{
 93	iowrite32(val, rpc->base + reg);
 94}
 95
 96static inline u32 rt3883_pci_get_cfgaddr(unsigned int bus, unsigned int slot,
 97					 unsigned int func, unsigned int where)
 98{
 99	return (bus << 16) | (slot << 11) | (func << 8) | (where & 0xfc) |
100	       0x80000000;
101}
102
103static u32 rt3883_pci_read_cfg32(struct rt3883_pci_controller *rpc,
104			       unsigned bus, unsigned slot,
105			       unsigned func, unsigned reg)
106{
107	unsigned long flags;
108	u32 address;
109	u32 ret;
110
111	address = rt3883_pci_get_cfgaddr(bus, slot, func, reg);
112
113	rt3883_pci_w32(rpc, address, RT3883_PCI_REG_CFGADDR);
114	ret = rt3883_pci_r32(rpc, RT3883_PCI_REG_CFGDATA);
115
116	return ret;
117}
118
119static void rt3883_pci_write_cfg32(struct rt3883_pci_controller *rpc,
120				 unsigned bus, unsigned slot,
121				 unsigned func, unsigned reg, u32 val)
122{
123	unsigned long flags;
124	u32 address;
125
126	address = rt3883_pci_get_cfgaddr(bus, slot, func, reg);
127
128	rt3883_pci_w32(rpc, address, RT3883_PCI_REG_CFGADDR);
129	rt3883_pci_w32(rpc, val, RT3883_PCI_REG_CFGDATA);
130}
131
132static void rt3883_pci_irq_handler(struct irq_desc *desc)
133{
134	struct rt3883_pci_controller *rpc;
135	u32 pending;
136
137	rpc = irq_desc_get_handler_data(desc);
138
139	pending = rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIINT) &
140		  rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
141
142	if (!pending) {
143		spurious_interrupt();
144		return;
145	}
146
147	while (pending) {
148		unsigned irq, bit = __ffs(pending);
149
150		irq = irq_find_mapping(rpc->irq_domain, bit);
151		generic_handle_irq(irq);
152
153		pending &= ~BIT(bit);
154	}
155}
156
157static void rt3883_pci_irq_unmask(struct irq_data *d)
158{
159	struct rt3883_pci_controller *rpc;
160	u32 t;
161
162	rpc = irq_data_get_irq_chip_data(d);
163
164	t = rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
165	rt3883_pci_w32(rpc, t | BIT(d->hwirq), RT3883_PCI_REG_PCIENA);
166	/* flush write */
167	rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
168}
169
170static void rt3883_pci_irq_mask(struct irq_data *d)
171{
172	struct rt3883_pci_controller *rpc;
173	u32 t;
174
175	rpc = irq_data_get_irq_chip_data(d);
176
177	t = rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
178	rt3883_pci_w32(rpc, t & ~BIT(d->hwirq), RT3883_PCI_REG_PCIENA);
179	/* flush write */
180	rt3883_pci_r32(rpc, RT3883_PCI_REG_PCIENA);
181}
182
183static struct irq_chip rt3883_pci_irq_chip = {
184	.name		= "RT3883 PCI",
185	.irq_mask	= rt3883_pci_irq_mask,
186	.irq_unmask	= rt3883_pci_irq_unmask,
187	.irq_mask_ack	= rt3883_pci_irq_mask,
188};
189
190static int rt3883_pci_irq_map(struct irq_domain *d, unsigned int irq,
191			      irq_hw_number_t hw)
192{
193	irq_set_chip_and_handler(irq, &rt3883_pci_irq_chip, handle_level_irq);
194	irq_set_chip_data(irq, d->host_data);
195
196	return 0;
197}
198
199static const struct irq_domain_ops rt3883_pci_irq_domain_ops = {
200	.map = rt3883_pci_irq_map,
201	.xlate = irq_domain_xlate_onecell,
202};
203
204static int rt3883_pci_irq_init(struct device *dev,
205			       struct rt3883_pci_controller *rpc)
206{
207	int irq;
208
209	irq = irq_of_parse_and_map(rpc->intc_of_node, 0);
210	if (irq == 0) {
211		dev_err(dev, "%s has no IRQ",
212			of_node_full_name(rpc->intc_of_node));
213		return -EINVAL;
214	}
215
216	/* disable all interrupts */
217	rt3883_pci_w32(rpc, 0, RT3883_PCI_REG_PCIENA);
218
219	rpc->irq_domain =
220		irq_domain_add_linear(rpc->intc_of_node, RT3883_PCI_IRQ_COUNT,
221				      &rt3883_pci_irq_domain_ops,
222				      rpc);
223	if (!rpc->irq_domain) {
224		dev_err(dev, "unable to add IRQ domain\n");
225		return -ENODEV;
226	}
227
228	irq_set_chained_handler_and_data(irq, rt3883_pci_irq_handler, rpc);
229
230	return 0;
231}
232
233static int rt3883_pci_config_read(struct pci_bus *bus, unsigned int devfn,
234				  int where, int size, u32 *val)
235{
236	struct rt3883_pci_controller *rpc;
237	unsigned long flags;
238	u32 address;
239	u32 data;
240
241	rpc = pci_bus_to_rt3883_controller(bus);
242
243	if (!rpc->pcie_ready && bus->number == 1)
244		return PCIBIOS_DEVICE_NOT_FOUND;
245
246	address = rt3883_pci_get_cfgaddr(bus->number, PCI_SLOT(devfn),
247					 PCI_FUNC(devfn), where);
248
249	rt3883_pci_w32(rpc, address, RT3883_PCI_REG_CFGADDR);
250	data = rt3883_pci_r32(rpc, RT3883_PCI_REG_CFGDATA);
251
252	switch (size) {
253	case 1:
254		*val = (data >> ((where & 3) << 3)) & 0xff;
255		break;
256	case 2:
257		*val = (data >> ((where & 3) << 3)) & 0xffff;
258		break;
259	case 4:
260		*val = data;
261		break;
262	}
263
264	return PCIBIOS_SUCCESSFUL;
265}
266
267static int rt3883_pci_config_write(struct pci_bus *bus, unsigned int devfn,
268				   int where, int size, u32 val)
269{
270	struct rt3883_pci_controller *rpc;
271	unsigned long flags;
272	u32 address;
273	u32 data;
274
275	rpc = pci_bus_to_rt3883_controller(bus);
276
277	if (!rpc->pcie_ready && bus->number == 1)
278		return PCIBIOS_DEVICE_NOT_FOUND;
279
280	address = rt3883_pci_get_cfgaddr(bus->number, PCI_SLOT(devfn),
281					 PCI_FUNC(devfn), where);
282
283	rt3883_pci_w32(rpc, address, RT3883_PCI_REG_CFGADDR);
284	data = rt3883_pci_r32(rpc, RT3883_PCI_REG_CFGDATA);
285
286	switch (size) {
287	case 1:
288		data = (data & ~(0xff << ((where & 3) << 3))) |
289		       (val << ((where & 3) << 3));
290		break;
291	case 2:
292		data = (data & ~(0xffff << ((where & 3) << 3))) |
293		       (val << ((where & 3) << 3));
294		break;
295	case 4:
296		data = val;
297		break;
298	}
299
300	rt3883_pci_w32(rpc, data, RT3883_PCI_REG_CFGDATA);
301
302	return PCIBIOS_SUCCESSFUL;
303}
304
305static struct pci_ops rt3883_pci_ops = {
306	.read	= rt3883_pci_config_read,
307	.write	= rt3883_pci_config_write,
308};
309
310static void rt3883_pci_preinit(struct rt3883_pci_controller *rpc, unsigned mode)
311{
312	u32 syscfg1;
313	u32 rstctrl;
314	u32 clkcfg1;
315	u32 t;
316
317	rstctrl = rt_sysc_r32(RT3883_SYSC_REG_RSTCTRL);
318	syscfg1 = rt_sysc_r32(RT3883_SYSC_REG_SYSCFG1);
319	clkcfg1 = rt_sysc_r32(RT3883_SYSC_REG_CLKCFG1);
320
321	if (mode & RT3883_PCI_MODE_PCIE) {
322		rstctrl |= RT3883_RSTCTRL_PCIE;
323		rt_sysc_w32(rstctrl, RT3883_SYSC_REG_RSTCTRL);
324
325		/* setup PCI PAD drive mode */
326		syscfg1 &= ~(0x30);
327		syscfg1 |= (2 << 4);
328		rt_sysc_w32(syscfg1, RT3883_SYSC_REG_SYSCFG1);
329
330		t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN0);
331		t &= ~BIT(31);
332		rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN0);
333
334		t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN1);
335		t &= 0x80ffffff;
336		rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN1);
337
338		t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN1);
339		t |= 0xa << 24;
340		rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN1);
341
342		t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN0);
343		t |= BIT(31);
344		rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN0);
345
346		msleep(50);
347
348		rstctrl &= ~RT3883_RSTCTRL_PCIE;
349		rt_sysc_w32(rstctrl, RT3883_SYSC_REG_RSTCTRL);
350	}
351
352	syscfg1 |= (RT3883_SYSCFG1_PCIE_RC_MODE | RT3883_SYSCFG1_PCI_HOST_MODE);
353
354	clkcfg1 &= ~(RT3883_CLKCFG1_PCI_CLK_EN | RT3883_CLKCFG1_PCIE_CLK_EN);
355
356	if (mode & RT3883_PCI_MODE_PCI) {
357		clkcfg1 |= RT3883_CLKCFG1_PCI_CLK_EN;
358		rstctrl &= ~RT3883_RSTCTRL_PCI;
359	}
360
361	if (mode & RT3883_PCI_MODE_PCIE) {
362		clkcfg1 |= RT3883_CLKCFG1_PCIE_CLK_EN;
363		rstctrl &= ~RT3883_RSTCTRL_PCIE;
364	}
365
366	rt_sysc_w32(syscfg1, RT3883_SYSC_REG_SYSCFG1);
367	rt_sysc_w32(rstctrl, RT3883_SYSC_REG_RSTCTRL);
368	rt_sysc_w32(clkcfg1, RT3883_SYSC_REG_CLKCFG1);
369
370	msleep(500);
371
372	/*
373	 * setup the device number of the P2P bridge
374	 * and de-assert the reset line
375	 */
376	t = (RT3883_P2P_BR_DEVNUM << RT3883_PCICFG_P2P_BR_DEVNUM_S);
377	rt3883_pci_w32(rpc, t, RT3883_PCI_REG_PCICFG);
378
379	/* flush write */
380	rt3883_pci_r32(rpc, RT3883_PCI_REG_PCICFG);
381	msleep(500);
382
383	if (mode & RT3883_PCI_MODE_PCIE) {
384		msleep(500);
385
386		t = rt3883_pci_r32(rpc, RT3883_PCI_REG_STATUS(1));
387
388		rpc->pcie_ready = t & BIT(0);
389
390		if (!rpc->pcie_ready) {
391			/* reset the PCIe block */
392			t = rt_sysc_r32(RT3883_SYSC_REG_RSTCTRL);
393			t |= RT3883_RSTCTRL_PCIE;
394			rt_sysc_w32(t, RT3883_SYSC_REG_RSTCTRL);
395			t &= ~RT3883_RSTCTRL_PCIE;
396			rt_sysc_w32(t, RT3883_SYSC_REG_RSTCTRL);
397
398			/* turn off PCIe clock */
399			t = rt_sysc_r32(RT3883_SYSC_REG_CLKCFG1);
400			t &= ~RT3883_CLKCFG1_PCIE_CLK_EN;
401			rt_sysc_w32(t, RT3883_SYSC_REG_CLKCFG1);
402
403			t = rt_sysc_r32(RT3883_SYSC_REG_PCIE_CLK_GEN0);
404			t &= ~0xf000c080;
405			rt_sysc_w32(t, RT3883_SYSC_REG_PCIE_CLK_GEN0);
406		}
407	}
408
409	/* enable PCI arbiter */
410	rt3883_pci_w32(rpc, 0x79, RT3883_PCI_REG_ARBCTL);
411}
412
413static int rt3883_pci_probe(struct platform_device *pdev)
414{
415	struct rt3883_pci_controller *rpc;
416	struct device *dev = &pdev->dev;
417	struct device_node *np = dev->of_node;
418	struct resource *res;
419	struct device_node *child;
420	u32 val;
421	int err;
422	int mode;
423
424	rpc = devm_kzalloc(dev, sizeof(*rpc), GFP_KERNEL);
425	if (!rpc)
426		return -ENOMEM;
427
428	res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
429	rpc->base = devm_ioremap_resource(dev, res);
430	if (IS_ERR(rpc->base))
431		return PTR_ERR(rpc->base);
432
433	/* find the interrupt controller child node */
434	for_each_child_of_node(np, child) {
435		if (of_get_property(child, "interrupt-controller", NULL)) {
436			rpc->intc_of_node = child;
437			break;
438		}
439	}
440
441	if (!rpc->intc_of_node) {
442		dev_err(dev, "%s has no %s child node",
443			of_node_full_name(rpc->intc_of_node),
444			"interrupt controller");
445		return -EINVAL;
446	}
447
448	/* find the PCI host bridge child node */
449	for_each_child_of_node(np, child) {
450		if (child->type &&
451		    of_node_cmp(child->type, "pci") == 0) {
452			rpc->pci_controller.of_node = child;
453			break;
454		}
455	}
456
457	if (!rpc->pci_controller.of_node) {
458		dev_err(dev, "%s has no %s child node",
459			of_node_full_name(rpc->intc_of_node),
460			"PCI host bridge");
461		err = -EINVAL;
462		goto err_put_intc_node;
463	}
464
465	mode = RT3883_PCI_MODE_NONE;
466	for_each_available_child_of_node(rpc->pci_controller.of_node, child) {
467		int devfn;
468
469		if (!child->type ||
470		    of_node_cmp(child->type, "pci") != 0)
471			continue;
472
473		devfn = of_pci_get_devfn(child);
474		if (devfn < 0)
475			continue;
476
477		switch (PCI_SLOT(devfn)) {
478		case 1:
479			mode |= RT3883_PCI_MODE_PCIE;
480			break;
481
482		case 17:
483		case 18:
484			mode |= RT3883_PCI_MODE_PCI;
485			break;
486		}
487	}
488
489	if (mode == RT3883_PCI_MODE_NONE) {
490		dev_err(dev, "unable to determine PCI mode\n");
491		err = -EINVAL;
492		goto err_put_hb_node;
493	}
494
495	dev_info(dev, "mode:%s%s\n",
496		 (mode & RT3883_PCI_MODE_PCI) ? " PCI" : "",
497		 (mode & RT3883_PCI_MODE_PCIE) ? " PCIe" : "");
498
499	rt3883_pci_preinit(rpc, mode);
500
501	rpc->pci_controller.pci_ops = &rt3883_pci_ops;
502	rpc->pci_controller.io_resource = &rpc->io_res;
503	rpc->pci_controller.mem_resource = &rpc->mem_res;
504
505	/* Load PCI I/O and memory resources from DT */
506	pci_load_of_ranges(&rpc->pci_controller,
507			   rpc->pci_controller.of_node);
508
509	rt3883_pci_w32(rpc, rpc->mem_res.start, RT3883_PCI_REG_MEMBASE);
510	rt3883_pci_w32(rpc, rpc->io_res.start, RT3883_PCI_REG_IOBASE);
511
512	ioport_resource.start = rpc->io_res.start;
513	ioport_resource.end = rpc->io_res.end;
514
515	/* PCI */
516	rt3883_pci_w32(rpc, 0x03ff0000, RT3883_PCI_REG_BAR0SETUP(0));
517	rt3883_pci_w32(rpc, RT3883_MEMORY_BASE, RT3883_PCI_REG_IMBASEBAR0(0));
518	rt3883_pci_w32(rpc, 0x08021814, RT3883_PCI_REG_ID(0));
519	rt3883_pci_w32(rpc, 0x00800001, RT3883_PCI_REG_CLASS(0));
520	rt3883_pci_w32(rpc, 0x28801814, RT3883_PCI_REG_SUBID(0));
521
522	/* PCIe */
523	rt3883_pci_w32(rpc, 0x03ff0000, RT3883_PCI_REG_BAR0SETUP(1));
524	rt3883_pci_w32(rpc, RT3883_MEMORY_BASE, RT3883_PCI_REG_IMBASEBAR0(1));
525	rt3883_pci_w32(rpc, 0x08021814, RT3883_PCI_REG_ID(1));
526	rt3883_pci_w32(rpc, 0x06040001, RT3883_PCI_REG_CLASS(1));
527	rt3883_pci_w32(rpc, 0x28801814, RT3883_PCI_REG_SUBID(1));
528
529	err = rt3883_pci_irq_init(dev, rpc);
530	if (err)
531		goto err_put_hb_node;
532
533	/* PCIe */
534	val = rt3883_pci_read_cfg32(rpc, 0, 0x01, 0, PCI_COMMAND);
535	val |= PCI_COMMAND_IO | PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER;
536	rt3883_pci_write_cfg32(rpc, 0, 0x01, 0, PCI_COMMAND, val);
537
538	/* PCI */
539	val = rt3883_pci_read_cfg32(rpc, 0, 0x00, 0, PCI_COMMAND);
540	val |= PCI_COMMAND_IO | PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER;
541	rt3883_pci_write_cfg32(rpc, 0, 0x00, 0, PCI_COMMAND, val);
542
543	if (mode == RT3883_PCI_MODE_PCIE) {
544		rt3883_pci_w32(rpc, 0x03ff0001, RT3883_PCI_REG_BAR0SETUP(0));
545		rt3883_pci_w32(rpc, 0x03ff0001, RT3883_PCI_REG_BAR0SETUP(1));
546
547		rt3883_pci_write_cfg32(rpc, 0, RT3883_P2P_BR_DEVNUM, 0,
548				       PCI_BASE_ADDRESS_0,
549				       RT3883_MEMORY_BASE);
550		/* flush write */
551		rt3883_pci_read_cfg32(rpc, 0, RT3883_P2P_BR_DEVNUM, 0,
552				      PCI_BASE_ADDRESS_0);
553	} else {
554		rt3883_pci_write_cfg32(rpc, 0, RT3883_P2P_BR_DEVNUM, 0,
555				       PCI_IO_BASE, 0x00000101);
556	}
557
558	register_pci_controller(&rpc->pci_controller);
559
560	return 0;
561
562err_put_hb_node:
563	of_node_put(rpc->pci_controller.of_node);
564err_put_intc_node:
565	of_node_put(rpc->intc_of_node);
566	return err;
567}
568
569int __init pcibios_map_irq(const struct pci_dev *dev, u8 slot, u8 pin)
570{
571	return of_irq_parse_and_map_pci(dev, slot, pin);
572}
573
574int pcibios_plat_dev_init(struct pci_dev *dev)
575{
576	return 0;
577}
578
579static const struct of_device_id rt3883_pci_ids[] = {
580	{ .compatible = "ralink,rt3883-pci" },
581	{},
582};
583MODULE_DEVICE_TABLE(of, rt3883_pci_ids);
584
585static struct platform_driver rt3883_pci_driver = {
586	.probe = rt3883_pci_probe,
587	.driver = {
588		.name = "rt3883-pci",
589		.of_match_table = of_match_ptr(rt3883_pci_ids),
590	},
591};
592
593static int __init rt3883_pci_init(void)
594{
595	return platform_driver_register(&rt3883_pci_driver);
596}
597
598postcore_initcall(rt3883_pci_init);