• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * PCIe host controller driver for Mobiveil PCIe Host controller
4  *
5  * Copyright (c) 2018 Mobiveil Inc.
6  * Author: Subrahmanya Lingappa <l.subrahmanya@mobiveil.co.in>
7  */
8 
9 #include <linux/delay.h>
10 #include <linux/init.h>
11 #include <linux/interrupt.h>
12 #include <linux/irq.h>
13 #include <linux/irqchip/chained_irq.h>
14 #include <linux/irqdomain.h>
15 #include <linux/kernel.h>
16 #include <linux/module.h>
17 #include <linux/msi.h>
18 #include <linux/of_address.h>
19 #include <linux/of_irq.h>
20 #include <linux/of_platform.h>
21 #include <linux/of_pci.h>
22 #include <linux/pci.h>
23 #include <linux/platform_device.h>
24 #include <linux/slab.h>
25 
26 #include "../pci.h"
27 
28 /* register offsets and bit positions */
29 
30 /*
31  * translation tables are grouped into windows, each window registers are
32  * grouped into blocks of 4 or 16 registers each
33  */
34 #define PAB_REG_BLOCK_SIZE		16
35 #define PAB_EXT_REG_BLOCK_SIZE		4
36 
37 #define PAB_REG_ADDR(offset, win)	\
38 	(offset + (win * PAB_REG_BLOCK_SIZE))
39 #define PAB_EXT_REG_ADDR(offset, win)	\
40 	(offset + (win * PAB_EXT_REG_BLOCK_SIZE))
41 
42 #define LTSSM_STATUS			0x0404
43 #define  LTSSM_STATUS_L0_MASK		0x3f
44 #define  LTSSM_STATUS_L0		0x2d
45 
46 #define PAB_CTRL			0x0808
47 #define  AMBA_PIO_ENABLE_SHIFT		0
48 #define  PEX_PIO_ENABLE_SHIFT		1
49 #define  PAGE_SEL_SHIFT			13
50 #define  PAGE_SEL_MASK			0x3f
51 #define  PAGE_LO_MASK			0x3ff
52 #define  PAGE_SEL_OFFSET_SHIFT		10
53 
54 #define PAB_AXI_PIO_CTRL		0x0840
55 #define  APIO_EN_MASK			0xf
56 
57 #define PAB_PEX_PIO_CTRL		0x08c0
58 #define  PIO_ENABLE_SHIFT		0
59 
60 #define PAB_INTP_AMBA_MISC_ENB		0x0b0c
61 #define PAB_INTP_AMBA_MISC_STAT		0x0b1c
62 #define  PAB_INTP_INTX_MASK		0x01e0
63 #define  PAB_INTP_MSI_MASK		0x8
64 
65 #define PAB_AXI_AMAP_CTRL(win)		PAB_REG_ADDR(0x0ba0, win)
66 #define  WIN_ENABLE_SHIFT		0
67 #define  WIN_TYPE_SHIFT			1
68 #define  WIN_TYPE_MASK			0x3
69 #define  WIN_SIZE_MASK			0xfffffc00
70 
71 #define PAB_EXT_AXI_AMAP_SIZE(win)	PAB_EXT_REG_ADDR(0xbaf0, win)
72 
73 #define PAB_EXT_AXI_AMAP_AXI_WIN(win)	PAB_EXT_REG_ADDR(0x80a0, win)
74 #define PAB_AXI_AMAP_AXI_WIN(win)	PAB_REG_ADDR(0x0ba4, win)
75 #define  AXI_WINDOW_ALIGN_MASK		3
76 
77 #define PAB_AXI_AMAP_PEX_WIN_L(win)	PAB_REG_ADDR(0x0ba8, win)
78 #define  PAB_BUS_SHIFT			24
79 #define  PAB_DEVICE_SHIFT		19
80 #define  PAB_FUNCTION_SHIFT		16
81 
82 #define PAB_AXI_AMAP_PEX_WIN_H(win)	PAB_REG_ADDR(0x0bac, win)
83 #define PAB_INTP_AXI_PIO_CLASS		0x474
84 
85 #define PAB_PEX_AMAP_CTRL(win)		PAB_REG_ADDR(0x4ba0, win)
86 #define  AMAP_CTRL_EN_SHIFT		0
87 #define  AMAP_CTRL_TYPE_SHIFT		1
88 #define  AMAP_CTRL_TYPE_MASK		3
89 
90 #define PAB_EXT_PEX_AMAP_SIZEN(win)	PAB_EXT_REG_ADDR(0xbef0, win)
91 #define PAB_EXT_PEX_AMAP_AXI_WIN(win)	PAB_EXT_REG_ADDR(0xb4a0, win)
92 #define PAB_PEX_AMAP_AXI_WIN(win)	PAB_REG_ADDR(0x4ba4, win)
93 #define PAB_PEX_AMAP_PEX_WIN_L(win)	PAB_REG_ADDR(0x4ba8, win)
94 #define PAB_PEX_AMAP_PEX_WIN_H(win)	PAB_REG_ADDR(0x4bac, win)
95 
96 /* starting offset of INTX bits in status register */
97 #define PAB_INTX_START			5
98 
99 /* supported number of MSI interrupts */
100 #define PCI_NUM_MSI			16
101 
102 /* MSI registers */
103 #define MSI_BASE_LO_OFFSET		0x04
104 #define MSI_BASE_HI_OFFSET		0x08
105 #define MSI_SIZE_OFFSET			0x0c
106 #define MSI_ENABLE_OFFSET		0x14
107 #define MSI_STATUS_OFFSET		0x18
108 #define MSI_DATA_OFFSET			0x20
109 #define MSI_ADDR_L_OFFSET		0x24
110 #define MSI_ADDR_H_OFFSET		0x28
111 
112 /* outbound and inbound window definitions */
113 #define WIN_NUM_0			0
114 #define WIN_NUM_1			1
115 #define CFG_WINDOW_TYPE			0
116 #define IO_WINDOW_TYPE			1
117 #define MEM_WINDOW_TYPE			2
118 #define IB_WIN_SIZE			((u64)256 * 1024 * 1024 * 1024)
119 #define MAX_PIO_WINDOWS			8
120 
121 /* Parameters for the waiting for link up routine */
122 #define LINK_WAIT_MAX_RETRIES		10
123 #define LINK_WAIT_MIN			90000
124 #define LINK_WAIT_MAX			100000
125 
126 #define PAGED_ADDR_BNDRY		0xc00
127 #define OFFSET_TO_PAGE_ADDR(off)	\
128 	((off & PAGE_LO_MASK) | PAGED_ADDR_BNDRY)
129 #define OFFSET_TO_PAGE_IDX(off)		\
130 	((off >> PAGE_SEL_OFFSET_SHIFT) & PAGE_SEL_MASK)
131 
132 struct mobiveil_msi {			/* MSI information */
133 	struct mutex lock;		/* protect bitmap variable */
134 	struct irq_domain *msi_domain;
135 	struct irq_domain *dev_domain;
136 	phys_addr_t msi_pages_phys;
137 	int num_of_vectors;
138 	DECLARE_BITMAP(msi_irq_in_use, PCI_NUM_MSI);
139 };
140 
141 struct mobiveil_pcie {
142 	struct platform_device *pdev;
143 	struct list_head resources;
144 	void __iomem *config_axi_slave_base;	/* endpoint config base */
145 	void __iomem *csr_axi_slave_base;	/* root port config base */
146 	void __iomem *apb_csr_base;	/* MSI register base */
147 	phys_addr_t pcie_reg_base;	/* Physical PCIe Controller Base */
148 	struct irq_domain *intx_domain;
149 	raw_spinlock_t intx_mask_lock;
150 	int irq;
151 	int apio_wins;
152 	int ppio_wins;
153 	int ob_wins_configured;		/* configured outbound windows */
154 	int ib_wins_configured;		/* configured inbound windows */
155 	struct resource *ob_io_res;
156 	char root_bus_nr;
157 	struct mobiveil_msi msi;
158 };
159 
160 /*
161  * mobiveil_pcie_sel_page - routine to access paged register
162  *
163  * Registers whose address greater than PAGED_ADDR_BNDRY (0xc00) are paged,
164  * for this scheme to work extracted higher 6 bits of the offset will be
165  * written to pg_sel field of PAB_CTRL register and rest of the lower 10
166  * bits enabled with PAGED_ADDR_BNDRY are used as offset of the register.
167  */
mobiveil_pcie_sel_page(struct mobiveil_pcie * pcie,u8 pg_idx)168 static void mobiveil_pcie_sel_page(struct mobiveil_pcie *pcie, u8 pg_idx)
169 {
170 	u32 val;
171 
172 	val = readl(pcie->csr_axi_slave_base + PAB_CTRL);
173 	val &= ~(PAGE_SEL_MASK << PAGE_SEL_SHIFT);
174 	val |= (pg_idx & PAGE_SEL_MASK) << PAGE_SEL_SHIFT;
175 
176 	writel(val, pcie->csr_axi_slave_base + PAB_CTRL);
177 }
178 
mobiveil_pcie_comp_addr(struct mobiveil_pcie * pcie,u32 off)179 static void *mobiveil_pcie_comp_addr(struct mobiveil_pcie *pcie, u32 off)
180 {
181 	if (off < PAGED_ADDR_BNDRY) {
182 		/* For directly accessed registers, clear the pg_sel field */
183 		mobiveil_pcie_sel_page(pcie, 0);
184 		return pcie->csr_axi_slave_base + off;
185 	}
186 
187 	mobiveil_pcie_sel_page(pcie, OFFSET_TO_PAGE_IDX(off));
188 	return pcie->csr_axi_slave_base + OFFSET_TO_PAGE_ADDR(off);
189 }
190 
mobiveil_pcie_read(void __iomem * addr,int size,u32 * val)191 static int mobiveil_pcie_read(void __iomem *addr, int size, u32 *val)
192 {
193 	if ((uintptr_t)addr & (size - 1)) {
194 		*val = 0;
195 		return PCIBIOS_BAD_REGISTER_NUMBER;
196 	}
197 
198 	switch (size) {
199 	case 4:
200 		*val = readl(addr);
201 		break;
202 	case 2:
203 		*val = readw(addr);
204 		break;
205 	case 1:
206 		*val = readb(addr);
207 		break;
208 	default:
209 		*val = 0;
210 		return PCIBIOS_BAD_REGISTER_NUMBER;
211 	}
212 
213 	return PCIBIOS_SUCCESSFUL;
214 }
215 
mobiveil_pcie_write(void __iomem * addr,int size,u32 val)216 static int mobiveil_pcie_write(void __iomem *addr, int size, u32 val)
217 {
218 	if ((uintptr_t)addr & (size - 1))
219 		return PCIBIOS_BAD_REGISTER_NUMBER;
220 
221 	switch (size) {
222 	case 4:
223 		writel(val, addr);
224 		break;
225 	case 2:
226 		writew(val, addr);
227 		break;
228 	case 1:
229 		writeb(val, addr);
230 		break;
231 	default:
232 		return PCIBIOS_BAD_REGISTER_NUMBER;
233 	}
234 
235 	return PCIBIOS_SUCCESSFUL;
236 }
237 
mobiveil_csr_read(struct mobiveil_pcie * pcie,u32 off,size_t size)238 static u32 mobiveil_csr_read(struct mobiveil_pcie *pcie, u32 off, size_t size)
239 {
240 	void *addr;
241 	u32 val;
242 	int ret;
243 
244 	addr = mobiveil_pcie_comp_addr(pcie, off);
245 
246 	ret = mobiveil_pcie_read(addr, size, &val);
247 	if (ret)
248 		dev_err(&pcie->pdev->dev, "read CSR address failed\n");
249 
250 	return val;
251 }
252 
mobiveil_csr_write(struct mobiveil_pcie * pcie,u32 val,u32 off,size_t size)253 static void mobiveil_csr_write(struct mobiveil_pcie *pcie, u32 val, u32 off,
254 			       size_t size)
255 {
256 	void *addr;
257 	int ret;
258 
259 	addr = mobiveil_pcie_comp_addr(pcie, off);
260 
261 	ret = mobiveil_pcie_write(addr, size, val);
262 	if (ret)
263 		dev_err(&pcie->pdev->dev, "write CSR address failed\n");
264 }
265 
mobiveil_csr_readl(struct mobiveil_pcie * pcie,u32 off)266 static u32 mobiveil_csr_readl(struct mobiveil_pcie *pcie, u32 off)
267 {
268 	return mobiveil_csr_read(pcie, off, 0x4);
269 }
270 
mobiveil_csr_writel(struct mobiveil_pcie * pcie,u32 val,u32 off)271 static void mobiveil_csr_writel(struct mobiveil_pcie *pcie, u32 val, u32 off)
272 {
273 	mobiveil_csr_write(pcie, val, off, 0x4);
274 }
275 
mobiveil_pcie_link_up(struct mobiveil_pcie * pcie)276 static bool mobiveil_pcie_link_up(struct mobiveil_pcie *pcie)
277 {
278 	return (mobiveil_csr_readl(pcie, LTSSM_STATUS) &
279 		LTSSM_STATUS_L0_MASK) == LTSSM_STATUS_L0;
280 }
281 
mobiveil_pcie_valid_device(struct pci_bus * bus,unsigned int devfn)282 static bool mobiveil_pcie_valid_device(struct pci_bus *bus, unsigned int devfn)
283 {
284 	struct mobiveil_pcie *pcie = bus->sysdata;
285 
286 	/* Only one device down on each root port */
287 	if ((bus->number == pcie->root_bus_nr) && (devfn > 0))
288 		return false;
289 
290 	/*
291 	 * Do not read more than one device on the bus directly
292 	 * attached to RC
293 	 */
294 	if ((bus->primary == pcie->root_bus_nr) && (PCI_SLOT(devfn) > 0))
295 		return false;
296 
297 	return true;
298 }
299 
300 /*
301  * mobiveil_pcie_map_bus - routine to get the configuration base of either
302  * root port or endpoint
303  */
mobiveil_pcie_map_bus(struct pci_bus * bus,unsigned int devfn,int where)304 static void __iomem *mobiveil_pcie_map_bus(struct pci_bus *bus,
305 					   unsigned int devfn, int where)
306 {
307 	struct mobiveil_pcie *pcie = bus->sysdata;
308 	u32 value;
309 
310 	if (!mobiveil_pcie_valid_device(bus, devfn))
311 		return NULL;
312 
313 	/* RC config access */
314 	if (bus->number == pcie->root_bus_nr)
315 		return pcie->csr_axi_slave_base + where;
316 
317 	/*
318 	 * EP config access (in Config/APIO space)
319 	 * Program PEX Address base (31..16 bits) with appropriate value
320 	 * (BDF) in PAB_AXI_AMAP_PEX_WIN_L0 Register.
321 	 * Relies on pci_lock serialization
322 	 */
323 	value = bus->number << PAB_BUS_SHIFT |
324 		PCI_SLOT(devfn) << PAB_DEVICE_SHIFT |
325 		PCI_FUNC(devfn) << PAB_FUNCTION_SHIFT;
326 
327 	mobiveil_csr_writel(pcie, value, PAB_AXI_AMAP_PEX_WIN_L(WIN_NUM_0));
328 
329 	return pcie->config_axi_slave_base + where;
330 }
331 
332 static struct pci_ops mobiveil_pcie_ops = {
333 	.map_bus = mobiveil_pcie_map_bus,
334 	.read = pci_generic_config_read,
335 	.write = pci_generic_config_write,
336 };
337 
mobiveil_pcie_isr(struct irq_desc * desc)338 static void mobiveil_pcie_isr(struct irq_desc *desc)
339 {
340 	struct irq_chip *chip = irq_desc_get_chip(desc);
341 	struct mobiveil_pcie *pcie = irq_desc_get_handler_data(desc);
342 	struct device *dev = &pcie->pdev->dev;
343 	struct mobiveil_msi *msi = &pcie->msi;
344 	u32 msi_data, msi_addr_lo, msi_addr_hi;
345 	u32 intr_status, msi_status;
346 	unsigned long shifted_status;
347 	u32 bit, virq, val, mask;
348 
349 	/*
350 	 * The core provides a single interrupt for both INTx/MSI messages.
351 	 * So we'll read both INTx and MSI status
352 	 */
353 
354 	chained_irq_enter(chip, desc);
355 
356 	/* read INTx status */
357 	val = mobiveil_csr_readl(pcie, PAB_INTP_AMBA_MISC_STAT);
358 	mask = mobiveil_csr_readl(pcie, PAB_INTP_AMBA_MISC_ENB);
359 	intr_status = val & mask;
360 
361 	/* Handle INTx */
362 	if (intr_status & PAB_INTP_INTX_MASK) {
363 		shifted_status = mobiveil_csr_readl(pcie,
364 						    PAB_INTP_AMBA_MISC_STAT);
365 		shifted_status &= PAB_INTP_INTX_MASK;
366 		shifted_status >>= PAB_INTX_START;
367 		do {
368 			for_each_set_bit(bit, &shifted_status, PCI_NUM_INTX) {
369 				virq = irq_find_mapping(pcie->intx_domain,
370 							bit + 1);
371 				if (virq)
372 					generic_handle_irq(virq);
373 				else
374 					dev_err_ratelimited(dev, "unexpected IRQ, INT%d\n",
375 							    bit);
376 
377 				/* clear interrupt handled */
378 				mobiveil_csr_writel(pcie,
379 						    1 << (PAB_INTX_START + bit),
380 						    PAB_INTP_AMBA_MISC_STAT);
381 			}
382 
383 			shifted_status = mobiveil_csr_readl(pcie,
384 							    PAB_INTP_AMBA_MISC_STAT);
385 			shifted_status &= PAB_INTP_INTX_MASK;
386 			shifted_status >>= PAB_INTX_START;
387 		} while (shifted_status != 0);
388 	}
389 
390 	/* read extra MSI status register */
391 	msi_status = readl_relaxed(pcie->apb_csr_base + MSI_STATUS_OFFSET);
392 
393 	/* handle MSI interrupts */
394 	while (msi_status & 1) {
395 		msi_data = readl_relaxed(pcie->apb_csr_base + MSI_DATA_OFFSET);
396 
397 		/*
398 		 * MSI_STATUS_OFFSET register gets updated to zero
399 		 * once we pop not only the MSI data but also address
400 		 * from MSI hardware FIFO. So keeping these following
401 		 * two dummy reads.
402 		 */
403 		msi_addr_lo = readl_relaxed(pcie->apb_csr_base +
404 					    MSI_ADDR_L_OFFSET);
405 		msi_addr_hi = readl_relaxed(pcie->apb_csr_base +
406 					    MSI_ADDR_H_OFFSET);
407 		dev_dbg(dev, "MSI registers, data: %08x, addr: %08x:%08x\n",
408 			msi_data, msi_addr_hi, msi_addr_lo);
409 
410 		virq = irq_find_mapping(msi->dev_domain, msi_data);
411 		if (virq)
412 			generic_handle_irq(virq);
413 
414 		msi_status = readl_relaxed(pcie->apb_csr_base +
415 					   MSI_STATUS_OFFSET);
416 	}
417 
418 	/* Clear the interrupt status */
419 	mobiveil_csr_writel(pcie, intr_status, PAB_INTP_AMBA_MISC_STAT);
420 	chained_irq_exit(chip, desc);
421 }
422 
mobiveil_pcie_parse_dt(struct mobiveil_pcie * pcie)423 static int mobiveil_pcie_parse_dt(struct mobiveil_pcie *pcie)
424 {
425 	struct device *dev = &pcie->pdev->dev;
426 	struct platform_device *pdev = pcie->pdev;
427 	struct device_node *node = dev->of_node;
428 	struct resource *res;
429 
430 	/* map config resource */
431 	res = platform_get_resource_byname(pdev, IORESOURCE_MEM,
432 					   "config_axi_slave");
433 	pcie->config_axi_slave_base = devm_pci_remap_cfg_resource(dev, res);
434 	if (IS_ERR(pcie->config_axi_slave_base))
435 		return PTR_ERR(pcie->config_axi_slave_base);
436 	pcie->ob_io_res = res;
437 
438 	/* map csr resource */
439 	res = platform_get_resource_byname(pdev, IORESOURCE_MEM,
440 					   "csr_axi_slave");
441 	pcie->csr_axi_slave_base = devm_pci_remap_cfg_resource(dev, res);
442 	if (IS_ERR(pcie->csr_axi_slave_base))
443 		return PTR_ERR(pcie->csr_axi_slave_base);
444 	pcie->pcie_reg_base = res->start;
445 
446 	/* map MSI config resource */
447 	res = platform_get_resource_byname(pdev, IORESOURCE_MEM, "apb_csr");
448 	pcie->apb_csr_base = devm_pci_remap_cfg_resource(dev, res);
449 	if (IS_ERR(pcie->apb_csr_base))
450 		return PTR_ERR(pcie->apb_csr_base);
451 
452 	/* read the number of windows requested */
453 	if (of_property_read_u32(node, "apio-wins", &pcie->apio_wins))
454 		pcie->apio_wins = MAX_PIO_WINDOWS;
455 
456 	if (of_property_read_u32(node, "ppio-wins", &pcie->ppio_wins))
457 		pcie->ppio_wins = MAX_PIO_WINDOWS;
458 
459 	pcie->irq = platform_get_irq(pdev, 0);
460 	if (pcie->irq <= 0) {
461 		dev_err(dev, "failed to map IRQ: %d\n", pcie->irq);
462 		return -ENODEV;
463 	}
464 
465 	return 0;
466 }
467 
program_ib_windows(struct mobiveil_pcie * pcie,int win_num,u64 cpu_addr,u64 pci_addr,u32 type,u64 size)468 static void program_ib_windows(struct mobiveil_pcie *pcie, int win_num,
469 			       u64 cpu_addr, u64 pci_addr, u32 type, u64 size)
470 {
471 	u32 value;
472 	u64 size64 = ~(size - 1);
473 
474 	if (win_num >= pcie->ppio_wins) {
475 		dev_err(&pcie->pdev->dev,
476 			"ERROR: max inbound windows reached !\n");
477 		return;
478 	}
479 
480 	value = mobiveil_csr_readl(pcie, PAB_PEX_AMAP_CTRL(win_num));
481 	value &= ~(AMAP_CTRL_TYPE_MASK << AMAP_CTRL_TYPE_SHIFT | WIN_SIZE_MASK);
482 	value |= type << AMAP_CTRL_TYPE_SHIFT | 1 << AMAP_CTRL_EN_SHIFT |
483 		 (lower_32_bits(size64) & WIN_SIZE_MASK);
484 	mobiveil_csr_writel(pcie, value, PAB_PEX_AMAP_CTRL(win_num));
485 
486 	mobiveil_csr_writel(pcie, upper_32_bits(size64),
487 			    PAB_EXT_PEX_AMAP_SIZEN(win_num));
488 
489 	mobiveil_csr_writel(pcie, lower_32_bits(cpu_addr),
490 			    PAB_PEX_AMAP_AXI_WIN(win_num));
491 	mobiveil_csr_writel(pcie, upper_32_bits(cpu_addr),
492 			    PAB_EXT_PEX_AMAP_AXI_WIN(win_num));
493 
494 	mobiveil_csr_writel(pcie, lower_32_bits(pci_addr),
495 			    PAB_PEX_AMAP_PEX_WIN_L(win_num));
496 	mobiveil_csr_writel(pcie, upper_32_bits(pci_addr),
497 			    PAB_PEX_AMAP_PEX_WIN_H(win_num));
498 
499 	pcie->ib_wins_configured++;
500 }
501 
502 /*
503  * routine to program the outbound windows
504  */
program_ob_windows(struct mobiveil_pcie * pcie,int win_num,u64 cpu_addr,u64 pci_addr,u32 type,u64 size)505 static void program_ob_windows(struct mobiveil_pcie *pcie, int win_num,
506 			       u64 cpu_addr, u64 pci_addr, u32 type, u64 size)
507 {
508 	u32 value;
509 	u64 size64 = ~(size - 1);
510 
511 	if (win_num >= pcie->apio_wins) {
512 		dev_err(&pcie->pdev->dev,
513 			"ERROR: max outbound windows reached !\n");
514 		return;
515 	}
516 
517 	/*
518 	 * program Enable Bit to 1, Type Bit to (00) base 2, AXI Window Size Bit
519 	 * to 4 KB in PAB_AXI_AMAP_CTRL register
520 	 */
521 	value = mobiveil_csr_readl(pcie, PAB_AXI_AMAP_CTRL(win_num));
522 	value &= ~(WIN_TYPE_MASK << WIN_TYPE_SHIFT | WIN_SIZE_MASK);
523 	value |= 1 << WIN_ENABLE_SHIFT | type << WIN_TYPE_SHIFT |
524 		 (lower_32_bits(size64) & WIN_SIZE_MASK);
525 	mobiveil_csr_writel(pcie, value, PAB_AXI_AMAP_CTRL(win_num));
526 
527 	mobiveil_csr_writel(pcie, upper_32_bits(size64),
528 			    PAB_EXT_AXI_AMAP_SIZE(win_num));
529 
530 	/*
531 	 * program AXI window base with appropriate value in
532 	 * PAB_AXI_AMAP_AXI_WIN0 register
533 	 */
534 	mobiveil_csr_writel(pcie,
535 			    lower_32_bits(cpu_addr) & (~AXI_WINDOW_ALIGN_MASK),
536 			    PAB_AXI_AMAP_AXI_WIN(win_num));
537 	mobiveil_csr_writel(pcie, upper_32_bits(cpu_addr),
538 			    PAB_EXT_AXI_AMAP_AXI_WIN(win_num));
539 
540 	mobiveil_csr_writel(pcie, lower_32_bits(pci_addr),
541 			    PAB_AXI_AMAP_PEX_WIN_L(win_num));
542 	mobiveil_csr_writel(pcie, upper_32_bits(pci_addr),
543 			    PAB_AXI_AMAP_PEX_WIN_H(win_num));
544 
545 	pcie->ob_wins_configured++;
546 }
547 
mobiveil_bringup_link(struct mobiveil_pcie * pcie)548 static int mobiveil_bringup_link(struct mobiveil_pcie *pcie)
549 {
550 	int retries;
551 
552 	/* check if the link is up or not */
553 	for (retries = 0; retries < LINK_WAIT_MAX_RETRIES; retries++) {
554 		if (mobiveil_pcie_link_up(pcie))
555 			return 0;
556 
557 		usleep_range(LINK_WAIT_MIN, LINK_WAIT_MAX);
558 	}
559 
560 	dev_err(&pcie->pdev->dev, "link never came up\n");
561 
562 	return -ETIMEDOUT;
563 }
564 
mobiveil_pcie_enable_msi(struct mobiveil_pcie * pcie)565 static void mobiveil_pcie_enable_msi(struct mobiveil_pcie *pcie)
566 {
567 	phys_addr_t msg_addr = pcie->pcie_reg_base;
568 	struct mobiveil_msi *msi = &pcie->msi;
569 
570 	pcie->msi.num_of_vectors = PCI_NUM_MSI;
571 	msi->msi_pages_phys = (phys_addr_t)msg_addr;
572 
573 	writel_relaxed(lower_32_bits(msg_addr),
574 		       pcie->apb_csr_base + MSI_BASE_LO_OFFSET);
575 	writel_relaxed(upper_32_bits(msg_addr),
576 		       pcie->apb_csr_base + MSI_BASE_HI_OFFSET);
577 	writel_relaxed(4096, pcie->apb_csr_base + MSI_SIZE_OFFSET);
578 	writel_relaxed(1, pcie->apb_csr_base + MSI_ENABLE_OFFSET);
579 }
580 
mobiveil_host_init(struct mobiveil_pcie * pcie)581 static int mobiveil_host_init(struct mobiveil_pcie *pcie)
582 {
583 	u32 value, pab_ctrl, type;
584 	struct resource_entry *win;
585 
586 	/* setup bus numbers */
587 	value = mobiveil_csr_readl(pcie, PCI_PRIMARY_BUS);
588 	value &= 0xff000000;
589 	value |= 0x00ff0100;
590 	mobiveil_csr_writel(pcie, value, PCI_PRIMARY_BUS);
591 
592 	/*
593 	 * program Bus Master Enable Bit in Command Register in PAB Config
594 	 * Space
595 	 */
596 	value = mobiveil_csr_readl(pcie, PCI_COMMAND);
597 	value |= PCI_COMMAND_IO | PCI_COMMAND_MEMORY | PCI_COMMAND_MASTER;
598 	mobiveil_csr_writel(pcie, value, PCI_COMMAND);
599 
600 	/*
601 	 * program PIO Enable Bit to 1 (and PEX PIO Enable to 1) in PAB_CTRL
602 	 * register
603 	 */
604 	pab_ctrl = mobiveil_csr_readl(pcie, PAB_CTRL);
605 	pab_ctrl |= (1 << AMBA_PIO_ENABLE_SHIFT) | (1 << PEX_PIO_ENABLE_SHIFT);
606 	mobiveil_csr_writel(pcie, pab_ctrl, PAB_CTRL);
607 
608 	mobiveil_csr_writel(pcie, (PAB_INTP_INTX_MASK | PAB_INTP_MSI_MASK),
609 			    PAB_INTP_AMBA_MISC_ENB);
610 
611 	/*
612 	 * program PIO Enable Bit to 1 and Config Window Enable Bit to 1 in
613 	 * PAB_AXI_PIO_CTRL Register
614 	 */
615 	value = mobiveil_csr_readl(pcie, PAB_AXI_PIO_CTRL);
616 	value |= APIO_EN_MASK;
617 	mobiveil_csr_writel(pcie, value, PAB_AXI_PIO_CTRL);
618 
619 	/* Enable PCIe PIO master */
620 	value = mobiveil_csr_readl(pcie, PAB_PEX_PIO_CTRL);
621 	value |= 1 << PIO_ENABLE_SHIFT;
622 	mobiveil_csr_writel(pcie, value, PAB_PEX_PIO_CTRL);
623 
624 	/*
625 	 * we'll program one outbound window for config reads and
626 	 * another default inbound window for all the upstream traffic
627 	 * rest of the outbound windows will be configured according to
628 	 * the "ranges" field defined in device tree
629 	 */
630 
631 	/* config outbound translation window */
632 	program_ob_windows(pcie, WIN_NUM_0, pcie->ob_io_res->start, 0,
633 			   CFG_WINDOW_TYPE, resource_size(pcie->ob_io_res));
634 
635 	/* memory inbound translation window */
636 	program_ib_windows(pcie, WIN_NUM_0, 0, 0, MEM_WINDOW_TYPE, IB_WIN_SIZE);
637 
638 	/* Get the I/O and memory ranges from DT */
639 	resource_list_for_each_entry(win, &pcie->resources) {
640 		if (resource_type(win->res) == IORESOURCE_MEM)
641 			type = MEM_WINDOW_TYPE;
642 		else if (resource_type(win->res) == IORESOURCE_IO)
643 			type = IO_WINDOW_TYPE;
644 		else
645 			continue;
646 
647 		/* configure outbound translation window */
648 		program_ob_windows(pcie, pcie->ob_wins_configured,
649 				   win->res->start,
650 				   win->res->start - win->offset,
651 				   type, resource_size(win->res));
652 	}
653 
654 	/* fixup for PCIe class register */
655 	value = mobiveil_csr_readl(pcie, PAB_INTP_AXI_PIO_CLASS);
656 	value &= 0xff;
657 	value |= (PCI_CLASS_BRIDGE_PCI << 16);
658 	mobiveil_csr_writel(pcie, value, PAB_INTP_AXI_PIO_CLASS);
659 
660 	/* setup MSI hardware registers */
661 	mobiveil_pcie_enable_msi(pcie);
662 
663 	return 0;
664 }
665 
mobiveil_mask_intx_irq(struct irq_data * data)666 static void mobiveil_mask_intx_irq(struct irq_data *data)
667 {
668 	struct irq_desc *desc = irq_to_desc(data->irq);
669 	struct mobiveil_pcie *pcie;
670 	unsigned long flags;
671 	u32 mask, shifted_val;
672 
673 	pcie = irq_desc_get_chip_data(desc);
674 	mask = 1 << ((data->hwirq + PAB_INTX_START) - 1);
675 	raw_spin_lock_irqsave(&pcie->intx_mask_lock, flags);
676 	shifted_val = mobiveil_csr_readl(pcie, PAB_INTP_AMBA_MISC_ENB);
677 	shifted_val &= ~mask;
678 	mobiveil_csr_writel(pcie, shifted_val, PAB_INTP_AMBA_MISC_ENB);
679 	raw_spin_unlock_irqrestore(&pcie->intx_mask_lock, flags);
680 }
681 
mobiveil_unmask_intx_irq(struct irq_data * data)682 static void mobiveil_unmask_intx_irq(struct irq_data *data)
683 {
684 	struct irq_desc *desc = irq_to_desc(data->irq);
685 	struct mobiveil_pcie *pcie;
686 	unsigned long flags;
687 	u32 shifted_val, mask;
688 
689 	pcie = irq_desc_get_chip_data(desc);
690 	mask = 1 << ((data->hwirq + PAB_INTX_START) - 1);
691 	raw_spin_lock_irqsave(&pcie->intx_mask_lock, flags);
692 	shifted_val = mobiveil_csr_readl(pcie, PAB_INTP_AMBA_MISC_ENB);
693 	shifted_val |= mask;
694 	mobiveil_csr_writel(pcie, shifted_val, PAB_INTP_AMBA_MISC_ENB);
695 	raw_spin_unlock_irqrestore(&pcie->intx_mask_lock, flags);
696 }
697 
698 static struct irq_chip intx_irq_chip = {
699 	.name = "mobiveil_pcie:intx",
700 	.irq_enable = mobiveil_unmask_intx_irq,
701 	.irq_disable = mobiveil_mask_intx_irq,
702 	.irq_mask = mobiveil_mask_intx_irq,
703 	.irq_unmask = mobiveil_unmask_intx_irq,
704 };
705 
706 /* routine to setup the INTx related data */
mobiveil_pcie_intx_map(struct irq_domain * domain,unsigned int irq,irq_hw_number_t hwirq)707 static int mobiveil_pcie_intx_map(struct irq_domain *domain, unsigned int irq,
708 				  irq_hw_number_t hwirq)
709 {
710 	irq_set_chip_and_handler(irq, &intx_irq_chip, handle_level_irq);
711 	irq_set_chip_data(irq, domain->host_data);
712 
713 	return 0;
714 }
715 
716 /* INTx domain operations structure */
717 static const struct irq_domain_ops intx_domain_ops = {
718 	.map = mobiveil_pcie_intx_map,
719 };
720 
721 static struct irq_chip mobiveil_msi_irq_chip = {
722 	.name = "Mobiveil PCIe MSI",
723 	.irq_mask = pci_msi_mask_irq,
724 	.irq_unmask = pci_msi_unmask_irq,
725 };
726 
727 static struct msi_domain_info mobiveil_msi_domain_info = {
728 	.flags	= (MSI_FLAG_USE_DEF_DOM_OPS | MSI_FLAG_USE_DEF_CHIP_OPS |
729 		   MSI_FLAG_PCI_MSIX),
730 	.chip	= &mobiveil_msi_irq_chip,
731 };
732 
mobiveil_compose_msi_msg(struct irq_data * data,struct msi_msg * msg)733 static void mobiveil_compose_msi_msg(struct irq_data *data, struct msi_msg *msg)
734 {
735 	struct mobiveil_pcie *pcie = irq_data_get_irq_chip_data(data);
736 	phys_addr_t addr = pcie->pcie_reg_base + (data->hwirq * sizeof(int));
737 
738 	msg->address_lo = lower_32_bits(addr);
739 	msg->address_hi = upper_32_bits(addr);
740 	msg->data = data->hwirq;
741 
742 	dev_dbg(&pcie->pdev->dev, "msi#%d address_hi %#x address_lo %#x\n",
743 		(int)data->hwirq, msg->address_hi, msg->address_lo);
744 }
745 
mobiveil_msi_set_affinity(struct irq_data * irq_data,const struct cpumask * mask,bool force)746 static int mobiveil_msi_set_affinity(struct irq_data *irq_data,
747 				     const struct cpumask *mask, bool force)
748 {
749 	return -EINVAL;
750 }
751 
752 static struct irq_chip mobiveil_msi_bottom_irq_chip = {
753 	.name			= "Mobiveil MSI",
754 	.irq_compose_msi_msg	= mobiveil_compose_msi_msg,
755 	.irq_set_affinity	= mobiveil_msi_set_affinity,
756 };
757 
mobiveil_irq_msi_domain_alloc(struct irq_domain * domain,unsigned int virq,unsigned int nr_irqs,void * args)758 static int mobiveil_irq_msi_domain_alloc(struct irq_domain *domain,
759 					 unsigned int virq,
760 					 unsigned int nr_irqs, void *args)
761 {
762 	struct mobiveil_pcie *pcie = domain->host_data;
763 	struct mobiveil_msi *msi = &pcie->msi;
764 	unsigned long bit;
765 
766 	WARN_ON(nr_irqs != 1);
767 	mutex_lock(&msi->lock);
768 
769 	bit = find_first_zero_bit(msi->msi_irq_in_use, msi->num_of_vectors);
770 	if (bit >= msi->num_of_vectors) {
771 		mutex_unlock(&msi->lock);
772 		return -ENOSPC;
773 	}
774 
775 	set_bit(bit, msi->msi_irq_in_use);
776 
777 	mutex_unlock(&msi->lock);
778 
779 	irq_domain_set_info(domain, virq, bit, &mobiveil_msi_bottom_irq_chip,
780 			    domain->host_data, handle_level_irq, NULL, NULL);
781 	return 0;
782 }
783 
mobiveil_irq_msi_domain_free(struct irq_domain * domain,unsigned int virq,unsigned int nr_irqs)784 static void mobiveil_irq_msi_domain_free(struct irq_domain *domain,
785 					 unsigned int virq,
786 					 unsigned int nr_irqs)
787 {
788 	struct irq_data *d = irq_domain_get_irq_data(domain, virq);
789 	struct mobiveil_pcie *pcie = irq_data_get_irq_chip_data(d);
790 	struct mobiveil_msi *msi = &pcie->msi;
791 
792 	mutex_lock(&msi->lock);
793 
794 	if (!test_bit(d->hwirq, msi->msi_irq_in_use))
795 		dev_err(&pcie->pdev->dev, "trying to free unused MSI#%lu\n",
796 			d->hwirq);
797 	else
798 		__clear_bit(d->hwirq, msi->msi_irq_in_use);
799 
800 	mutex_unlock(&msi->lock);
801 }
802 static const struct irq_domain_ops msi_domain_ops = {
803 	.alloc	= mobiveil_irq_msi_domain_alloc,
804 	.free	= mobiveil_irq_msi_domain_free,
805 };
806 
mobiveil_allocate_msi_domains(struct mobiveil_pcie * pcie)807 static int mobiveil_allocate_msi_domains(struct mobiveil_pcie *pcie)
808 {
809 	struct device *dev = &pcie->pdev->dev;
810 	struct fwnode_handle *fwnode = of_node_to_fwnode(dev->of_node);
811 	struct mobiveil_msi *msi = &pcie->msi;
812 
813 	mutex_init(&pcie->msi.lock);
814 	msi->dev_domain = irq_domain_add_linear(NULL, msi->num_of_vectors,
815 						&msi_domain_ops, pcie);
816 	if (!msi->dev_domain) {
817 		dev_err(dev, "failed to create IRQ domain\n");
818 		return -ENOMEM;
819 	}
820 
821 	msi->msi_domain = pci_msi_create_irq_domain(fwnode,
822 						    &mobiveil_msi_domain_info,
823 						    msi->dev_domain);
824 	if (!msi->msi_domain) {
825 		dev_err(dev, "failed to create MSI domain\n");
826 		irq_domain_remove(msi->dev_domain);
827 		return -ENOMEM;
828 	}
829 
830 	return 0;
831 }
832 
mobiveil_pcie_init_irq_domain(struct mobiveil_pcie * pcie)833 static int mobiveil_pcie_init_irq_domain(struct mobiveil_pcie *pcie)
834 {
835 	struct device *dev = &pcie->pdev->dev;
836 	struct device_node *node = dev->of_node;
837 	int ret;
838 
839 	/* setup INTx */
840 	pcie->intx_domain = irq_domain_add_linear(node, PCI_NUM_INTX,
841 						  &intx_domain_ops, pcie);
842 
843 	if (!pcie->intx_domain) {
844 		dev_err(dev, "Failed to get a INTx IRQ domain\n");
845 		return -ENOMEM;
846 	}
847 
848 	raw_spin_lock_init(&pcie->intx_mask_lock);
849 
850 	/* setup MSI */
851 	ret = mobiveil_allocate_msi_domains(pcie);
852 	if (ret)
853 		return ret;
854 
855 	return 0;
856 }
857 
mobiveil_pcie_probe(struct platform_device * pdev)858 static int mobiveil_pcie_probe(struct platform_device *pdev)
859 {
860 	struct mobiveil_pcie *pcie;
861 	struct pci_bus *bus;
862 	struct pci_bus *child;
863 	struct pci_host_bridge *bridge;
864 	struct device *dev = &pdev->dev;
865 	resource_size_t iobase;
866 	int ret;
867 
868 	/* allocate the PCIe port */
869 	bridge = devm_pci_alloc_host_bridge(dev, sizeof(*pcie));
870 	if (!bridge)
871 		return -ENOMEM;
872 
873 	pcie = pci_host_bridge_priv(bridge);
874 
875 	pcie->pdev = pdev;
876 
877 	ret = mobiveil_pcie_parse_dt(pcie);
878 	if (ret) {
879 		dev_err(dev, "Parsing DT failed, ret: %x\n", ret);
880 		return ret;
881 	}
882 
883 	INIT_LIST_HEAD(&pcie->resources);
884 
885 	/* parse the host bridge base addresses from the device tree file */
886 	ret = devm_of_pci_get_host_bridge_resources(dev, 0, 0xff,
887 						    &pcie->resources, &iobase);
888 	if (ret) {
889 		dev_err(dev, "Getting bridge resources failed\n");
890 		return ret;
891 	}
892 
893 	/*
894 	 * configure all inbound and outbound windows and prepare the RC for
895 	 * config access
896 	 */
897 	ret = mobiveil_host_init(pcie);
898 	if (ret) {
899 		dev_err(dev, "Failed to initialize host\n");
900 		goto error;
901 	}
902 
903 	/* initialize the IRQ domains */
904 	ret = mobiveil_pcie_init_irq_domain(pcie);
905 	if (ret) {
906 		dev_err(dev, "Failed creating IRQ Domain\n");
907 		goto error;
908 	}
909 
910 	irq_set_chained_handler_and_data(pcie->irq, mobiveil_pcie_isr, pcie);
911 
912 	ret = devm_request_pci_bus_resources(dev, &pcie->resources);
913 	if (ret)
914 		goto error;
915 
916 	/* Initialize bridge */
917 	list_splice_init(&pcie->resources, &bridge->windows);
918 	bridge->dev.parent = dev;
919 	bridge->sysdata = pcie;
920 	bridge->busnr = pcie->root_bus_nr;
921 	bridge->ops = &mobiveil_pcie_ops;
922 	bridge->map_irq = of_irq_parse_and_map_pci;
923 	bridge->swizzle_irq = pci_common_swizzle;
924 
925 	ret = mobiveil_bringup_link(pcie);
926 	if (ret) {
927 		dev_info(dev, "link bring-up failed\n");
928 		goto error;
929 	}
930 
931 	/* setup the kernel resources for the newly added PCIe root bus */
932 	ret = pci_scan_root_bus_bridge(bridge);
933 	if (ret)
934 		goto error;
935 
936 	bus = bridge->bus;
937 
938 	pci_assign_unassigned_bus_resources(bus);
939 	list_for_each_entry(child, &bus->children, node)
940 		pcie_bus_configure_settings(child);
941 	pci_bus_add_devices(bus);
942 
943 	return 0;
944 error:
945 	pci_free_resource_list(&pcie->resources);
946 	return ret;
947 }
948 
949 static const struct of_device_id mobiveil_pcie_of_match[] = {
950 	{.compatible = "mbvl,gpex40-pcie",},
951 	{},
952 };
953 
954 MODULE_DEVICE_TABLE(of, mobiveil_pcie_of_match);
955 
956 static struct platform_driver mobiveil_pcie_driver = {
957 	.probe = mobiveil_pcie_probe,
958 	.driver = {
959 		.name = "mobiveil-pcie",
960 		.of_match_table = mobiveil_pcie_of_match,
961 		.suppress_bind_attrs = true,
962 	},
963 };
964 
965 builtin_platform_driver(mobiveil_pcie_driver);
966 
967 MODULE_LICENSE("GPL v2");
968 MODULE_DESCRIPTION("Mobiveil PCIe host controller driver");
969 MODULE_AUTHOR("Subrahmanya Lingappa <l.subrahmanya@mobiveil.co.in>");
970