[linux-2.6-block.git] / drivers / irqchip / qcom-pdc.c

// SPDX-License-Identifier: GPL-2.0
/*
 * Copyright (c) 2017-2018, The Linux Foundation. All rights reserved.
 */

#include <linux/err.h>
#include <linux/init.h>
#include <linux/irq.h>
#include <linux/irqchip.h>
#include <linux/irqdomain.h>
#include <linux/io.h>
#include <linux/kernel.h>
#include <linux/of.h>
#include <linux/of_address.h>
#include <linux/of_device.h>
#include <linux/spinlock.h>
#include <linux/platform_device.h>
#include <linux/slab.h>
#include <linux/types.h>

#define PDC_MAX_IRQS		126

#define CLEAR_INTR(reg, intr)	(reg & ~(1 << intr))
#define ENABLE_INTR(reg, intr)	(reg | (1 << intr))

#define IRQ_ENABLE_BANK		0x10
#define IRQ_i_CFG		0x110

struct pdc_pin_region {
	u32 pin_base;
	u32 parent_base;
	u32 cnt;
};

static DEFINE_RAW_SPINLOCK(pdc_lock);
static void __iomem *pdc_base;
static struct pdc_pin_region *pdc_region;
static int pdc_region_cnt;

static void pdc_reg_write(int reg, u32 i, u32 val)
{
	writel_relaxed(val, pdc_base + reg + i * sizeof(u32));
}

static u32 pdc_reg_read(int reg, u32 i)
{
	return readl_relaxed(pdc_base + reg + i * sizeof(u32));
}

static void pdc_enable_intr(struct irq_data *d, bool on)
{
	int pin_out = d->hwirq;
	u32 index, mask;
	u32 enable;

	index = pin_out / 32;
	mask = pin_out % 32;

	raw_spin_lock(&pdc_lock);
	enable = pdc_reg_read(IRQ_ENABLE_BANK, index);
	enable = on ? ENABLE_INTR(enable, mask) : CLEAR_INTR(enable, mask);
	pdc_reg_write(IRQ_ENABLE_BANK, index, enable);
	raw_spin_unlock(&pdc_lock);
}

static void qcom_pdc_gic_mask(struct irq_data *d)
{
	pdc_enable_intr(d, false);
	irq_chip_mask_parent(d);
}

static void qcom_pdc_gic_unmask(struct irq_data *d)
{
	pdc_enable_intr(d, true);
	irq_chip_unmask_parent(d);
}

/*
 * GIC does not handle falling edge or active low. To allow falling edge and
 * active low interrupts to be handled at GIC, PDC has an inverter that inverts
 * falling edge into a rising edge and active low into an active high.
 * For the inverter to work, the polarity bit in the IRQ_CONFIG register has to
 * set as per the table below.
 * Level sensitive active low    LOW
 * Rising edge sensitive         NOT USED
 * Falling edge sensitive        LOW
 * Dual Edge sensitive           NOT USED
 * Level sensitive active High   HIGH
 * Falling Edge sensitive        NOT USED
 * Rising edge sensitive         HIGH
 * Dual Edge sensitive           HIGH
 */
enum pdc_irq_config_bits {
	PDC_LEVEL_LOW		= 0b000,
	PDC_EDGE_FALLING	= 0b010,
	PDC_LEVEL_HIGH		= 0b100,
	PDC_EDGE_RISING		= 0b110,
	PDC_EDGE_DUAL		= 0b111,
};

/**
 * qcom_pdc_gic_set_type: Configure PDC for the interrupt
 *
 * @d: the interrupt data
 * @type: the interrupt type
 *
 * If @type is edge triggered, forward that as Rising edge as PDC
 * takes care of converting falling edge to rising edge signal
 * If @type is level, then forward that as level high as PDC
 * takes care of converting falling edge to rising edge signal
 */
static int qcom_pdc_gic_set_type(struct irq_data *d, unsigned int type)
{
	int pin_out = d->hwirq;
	enum pdc_irq_config_bits pdc_type;

	switch (type) {
	case IRQ_TYPE_EDGE_RISING:
		pdc_type = PDC_EDGE_RISING;
		break;
	case IRQ_TYPE_EDGE_FALLING:
		pdc_type = PDC_EDGE_FALLING;
		type = IRQ_TYPE_EDGE_RISING;
		break;
	case IRQ_TYPE_EDGE_BOTH:
		pdc_type = PDC_EDGE_DUAL;
		type = IRQ_TYPE_EDGE_RISING;
		break;
	case IRQ_TYPE_LEVEL_HIGH:
		pdc_type = PDC_LEVEL_HIGH;
		break;
	case IRQ_TYPE_LEVEL_LOW:
		pdc_type = PDC_LEVEL_LOW;
		type = IRQ_TYPE_LEVEL_HIGH;
		break;
	default:
		WARN_ON(1);
		return -EINVAL;
	}

	pdc_reg_write(IRQ_i_CFG, pin_out, pdc_type);

	return irq_chip_set_type_parent(d, type);
}

static struct irq_chip qcom_pdc_gic_chip = {
	.name			= "PDC",
	.irq_eoi		= irq_chip_eoi_parent,
	.irq_mask		= qcom_pdc_gic_mask,
	.irq_unmask		= qcom_pdc_gic_unmask,
	.irq_retrigger		= irq_chip_retrigger_hierarchy,
	.irq_set_type		= qcom_pdc_gic_set_type,
	.flags			= IRQCHIP_MASK_ON_SUSPEND |
				  IRQCHIP_SET_TYPE_MASKED |
				  IRQCHIP_SKIP_SET_WAKE,
	.irq_set_vcpu_affinity	= irq_chip_set_vcpu_affinity_parent,
	.irq_set_affinity	= irq_chip_set_affinity_parent,
};

static irq_hw_number_t get_parent_hwirq(int pin)
{
	int i;
	struct pdc_pin_region *region;

	for (i = 0; i < pdc_region_cnt; i++) {
		region = &pdc_region[i];
		if (pin >= region->pin_base &&
		    pin < region->pin_base + region->cnt)
			return (region->parent_base + pin - region->pin_base);
	}

	WARN_ON(1);
	return ~0UL;
}

static int qcom_pdc_translate(struct irq_domain *d, struct irq_fwspec *fwspec,
			      unsigned long *hwirq, unsigned int *type)
{
	if (is_of_node(fwspec->fwnode)) {
		if (fwspec->param_count != 2)
			return -EINVAL;

		*hwirq = fwspec->param[0];
		*type = fwspec->param[1] & IRQ_TYPE_SENSE_MASK;
		return 0;
	}

	return -EINVAL;
}

static int qcom_pdc_alloc(struct irq_domain *domain, unsigned int virq,
			  unsigned int nr_irqs, void *data)
{
	struct irq_fwspec *fwspec = data;
	struct irq_fwspec parent_fwspec;
	irq_hw_number_t hwirq, parent_hwirq;
	unsigned int type;
	int ret;

	ret = qcom_pdc_translate(domain, fwspec, &hwirq, &type);
	if (ret)
		return -EINVAL;

	parent_hwirq = get_parent_hwirq(hwirq);
	if (parent_hwirq == ~0UL)
		return -EINVAL;

	ret  = irq_domain_set_hwirq_and_chip(domain, virq, hwirq,
					     &qcom_pdc_gic_chip, NULL);
	if (ret)
		return ret;

	if (type & IRQ_TYPE_EDGE_BOTH)
		type = IRQ_TYPE_EDGE_RISING;

	if (type & IRQ_TYPE_LEVEL_MASK)
		type = IRQ_TYPE_LEVEL_HIGH;

	parent_fwspec.fwnode      = domain->parent->fwnode;
	parent_fwspec.param_count = 3;
	parent_fwspec.param[0]    = 0;
	parent_fwspec.param[1]    = parent_hwirq;
	parent_fwspec.param[2]    = type;

	return irq_domain_alloc_irqs_parent(domain, virq, nr_irqs,
					    &parent_fwspec);
}

static const struct irq_domain_ops qcom_pdc_ops = {
	.translate	= qcom_pdc_translate,
	.alloc		= qcom_pdc_alloc,
	.free		= irq_domain_free_irqs_common,
};

static int pdc_setup_pin_mapping(struct device_node *np)
{
	int ret, n;

	n = of_property_count_elems_of_size(np, "qcom,pdc-ranges", sizeof(u32));
	if (n <= 0 || n % 3)
		return -EINVAL;

	pdc_region_cnt = n / 3;
	pdc_region = kcalloc(pdc_region_cnt, sizeof(*pdc_region), GFP_KERNEL);
	if (!pdc_region) {
		pdc_region_cnt = 0;
		return -ENOMEM;
	}

	for (n = 0; n < pdc_region_cnt; n++) {
		ret = of_property_read_u32_index(np, "qcom,pdc-ranges",
						 n * 3 + 0,
						 &pdc_region[n].pin_base);
		if (ret)
			return ret;
		ret = of_property_read_u32_index(np, "qcom,pdc-ranges",
						 n * 3 + 1,
						 &pdc_region[n].parent_base);
		if (ret)
			return ret;
		ret = of_property_read_u32_index(np, "qcom,pdc-ranges",
						 n * 3 + 2,
						 &pdc_region[n].cnt);
		if (ret)
			return ret;
	}

	return 0;
}

static int qcom_pdc_init(struct device_node *node, struct device_node *parent)
{
	struct irq_domain *parent_domain, *pdc_domain;
	int ret;

	pdc_base = of_iomap(node, 0);
	if (!pdc_base) {
		pr_err("%pOF: unable to map PDC registers\n", node);
		return -ENXIO;
	}

	parent_domain = irq_find_host(parent);
	if (!parent_domain) {
		pr_err("%pOF: unable to find PDC's parent domain\n", node);
		ret = -ENXIO;
		goto fail;
	}

	ret = pdc_setup_pin_mapping(node);
	if (ret) {
		pr_err("%pOF: failed to init PDC pin-hwirq mapping\n", node);
		goto fail;
	}

	pdc_domain = irq_domain_create_hierarchy(parent_domain, 0, PDC_MAX_IRQS,
						 of_fwnode_handle(node),
						 &qcom_pdc_ops, NULL);
	if (!pdc_domain) {
		pr_err("%pOF: GIC domain add failed\n", node);
		ret = -ENOMEM;
		goto fail;
	}

	return 0;

fail:
	kfree(pdc_region);
	iounmap(pdc_base);
	return ret;
}

IRQCHIP_DECLARE(pdc_sdm845, "qcom,sdm845-pdc", qcom_pdc_init);
Commit	Line	Data
f55c73ae AS	1	// SPDX-License-Identifier: GPL-2.0
	2	/*
	3	* Copyright (c) 2017-2018, The Linux Foundation. All rights reserved.
	4	*/
	5
	6	#include <linux/err.h>
	7	#include <linux/init.h>
	8	#include <linux/irq.h>
	9	#include <linux/irqchip.h>
	10	#include <linux/irqdomain.h>
	11	#include <linux/io.h>
	12	#include <linux/kernel.h>
	13	#include <linux/of.h>
	14	#include <linux/of_address.h>
	15	#include <linux/of_device.h>
	16	#include <linux/spinlock.h>
	17	#include <linux/platform_device.h>
	18	#include <linux/slab.h>
	19	#include <linux/types.h>
	20
	21	#define PDC_MAX_IRQS 126
	22
	23	#define CLEAR_INTR(reg, intr) (reg & ~(1 << intr))
	24	#define ENABLE_INTR(reg, intr) (reg \| (1 << intr))
	25
	26	#define IRQ_ENABLE_BANK 0x10
	27	#define IRQ_i_CFG 0x110
	28
	29	struct pdc_pin_region {
	30	u32 pin_base;
	31	u32 parent_base;
	32	u32 cnt;
	33	};
	34
	35	static DEFINE_RAW_SPINLOCK(pdc_lock);
	36	static void __iomem *pdc_base;
	37	static struct pdc_pin_region *pdc_region;
	38	static int pdc_region_cnt;
	39
	40	static void pdc_reg_write(int reg, u32 i, u32 val)
	41	{
	42	writel_relaxed(val, pdc_base + reg + i * sizeof(u32));
	43	}
	44
	45	static u32 pdc_reg_read(int reg, u32 i)
	46	{
	47	return readl_relaxed(pdc_base + reg + i * sizeof(u32));
	48	}
	49
	50	static void pdc_enable_intr(struct irq_data *d, bool on)
	51	{
	52	int pin_out = d->hwirq;
	53	u32 index, mask;
	54	u32 enable;
	55
	56	index = pin_out / 32;
	57	mask = pin_out % 32;
	58
	59	raw_spin_lock(&pdc_lock);
	60	enable = pdc_reg_read(IRQ_ENABLE_BANK, index);
	61	enable = on ? ENABLE_INTR(enable, mask) : CLEAR_INTR(enable, mask);
	62	pdc_reg_write(IRQ_ENABLE_BANK, index, enable);
	63	raw_spin_unlock(&pdc_lock);
	64	}
65
66	static void qcom_pdc_gic_mask(struct irq_data *d)
67	{
68	pdc_enable_intr(d, false);
69	irq_chip_mask_parent(d);
70	}
71
72	static void qcom_pdc_gic_unmask(struct irq_data *d)
73	{
74	pdc_enable_intr(d, true);
75	irq_chip_unmask_parent(d);
76	}
77
78	/*
79	* GIC does not handle falling edge or active low. To allow falling edge and
80	* active low interrupts to be handled at GIC, PDC has an inverter that inverts
81	* falling edge into a rising edge and active low into an active high.
82	* For the inverter to work, the polarity bit in the IRQ_CONFIG register has to
83	* set as per the table below.
84	* Level sensitive active low LOW
85	* Rising edge sensitive NOT USED
86	* Falling edge sensitive LOW
87	* Dual Edge sensitive NOT USED
88	* Level sensitive active High HIGH
89	* Falling Edge sensitive NOT USED
90	* Rising edge sensitive HIGH
91	* Dual Edge sensitive HIGH
92	*/
93	enum pdc_irq_config_bits {
94	PDC_LEVEL_LOW = 0b000,
95	PDC_EDGE_FALLING = 0b010,
96	PDC_LEVEL_HIGH = 0b100,
97	PDC_EDGE_RISING = 0b110,
98	PDC_EDGE_DUAL = 0b111,
99	};
100
101	/**
102	* qcom_pdc_gic_set_type: Configure PDC for the interrupt
103	*
104	* @d: the interrupt data
105	* @type: the interrupt type
106	*
107	* If @type is edge triggered, forward that as Rising edge as PDC
108	* takes care of converting falling edge to rising edge signal
109	* If @type is level, then forward that as level high as PDC
110	* takes care of converting falling edge to rising edge signal
111	*/
112	static int qcom_pdc_gic_set_type(struct irq_data *d, unsigned int type)
113	{
114	int pin_out = d->hwirq;
115	enum pdc_irq_config_bits pdc_type;
116
117	switch (type) {
118	case IRQ_TYPE_EDGE_RISING:
119	pdc_type = PDC_EDGE_RISING;
120	break;
121	case IRQ_TYPE_EDGE_FALLING:
122	pdc_type = PDC_EDGE_FALLING;
123	type = IRQ_TYPE_EDGE_RISING;
124	break;
125	case IRQ_TYPE_EDGE_BOTH:
126	pdc_type = PDC_EDGE_DUAL;
7bae48b2	127	type = IRQ_TYPE_EDGE_RISING;
f55c73ae AS	128	break;
	129	case IRQ_TYPE_LEVEL_HIGH:
	130	pdc_type = PDC_LEVEL_HIGH;
	131	break;
	132	case IRQ_TYPE_LEVEL_LOW:
	133	pdc_type = PDC_LEVEL_LOW;
	134	type = IRQ_TYPE_LEVEL_HIGH;
	135	break;
	136	default:
	137	WARN_ON(1);
	138	return -EINVAL;
	139	}
	140
	141	pdc_reg_write(IRQ_i_CFG, pin_out, pdc_type);
	142
	143	return irq_chip_set_type_parent(d, type);
	144	}
	145
	146	static struct irq_chip qcom_pdc_gic_chip = {
	147	.name = "PDC",
	148	.irq_eoi = irq_chip_eoi_parent,
	149	.irq_mask = qcom_pdc_gic_mask,
	150	.irq_unmask = qcom_pdc_gic_unmask,
	151	.irq_retrigger = irq_chip_retrigger_hierarchy,
	152	.irq_set_type = qcom_pdc_gic_set_type,
	153	.flags = IRQCHIP_MASK_ON_SUSPEND \|
	154	IRQCHIP_SET_TYPE_MASKED \|
	155	IRQCHIP_SKIP_SET_WAKE,
	156	.irq_set_vcpu_affinity = irq_chip_set_vcpu_affinity_parent,
	157	.irq_set_affinity = irq_chip_set_affinity_parent,
	158	};
	159
	160	static irq_hw_number_t get_parent_hwirq(int pin)
	161	{
	162	int i;
	163	struct pdc_pin_region *region;
	164
	165	for (i = 0; i < pdc_region_cnt; i++) {
	166	region = &pdc_region[i];
	167	if (pin >= region->pin_base &&
	168	pin < region->pin_base + region->cnt)
	169	return (region->parent_base + pin - region->pin_base);
	170	}
	171
	172	WARN_ON(1);
	173	return ~0UL;
	174	}
	175
	176	static int qcom_pdc_translate(struct irq_domain d, struct irq_fwspec fwspec,
	177	unsigned long hwirq, unsigned int type)
	178	{
	179	if (is_of_node(fwspec->fwnode)) {
	180	if (fwspec->param_count != 2)
	181	return -EINVAL;
	182
	183	*hwirq = fwspec->param[0];
	184	*type = fwspec->param[1] & IRQ_TYPE_SENSE_MASK;
	185	return 0;
	186	}
	187
	188	return -EINVAL;
	189	}
	190
	191	static int qcom_pdc_alloc(struct irq_domain *domain, unsigned int virq,
192	unsigned int nr_irqs, void *data)
193	{
194	struct irq_fwspec *fwspec = data;
195	struct irq_fwspec parent_fwspec;
196	irq_hw_number_t hwirq, parent_hwirq;
197	unsigned int type;
198	int ret;
199
200	ret = qcom_pdc_translate(domain, fwspec, &hwirq, &type);
201	if (ret)
202	return -EINVAL;
203
204	parent_hwirq = get_parent_hwirq(hwirq);
205	if (parent_hwirq == ~0UL)
206	return -EINVAL;
207
208	ret = irq_domain_set_hwirq_and_chip(domain, virq, hwirq,
209	&qcom_pdc_gic_chip, NULL);
210	if (ret)
211	return ret;
212
213	if (type & IRQ_TYPE_EDGE_BOTH)
214	type = IRQ_TYPE_EDGE_RISING;
215
216	if (type & IRQ_TYPE_LEVEL_MASK)
217	type = IRQ_TYPE_LEVEL_HIGH;
218
219	parent_fwspec.fwnode = domain->parent->fwnode;
220	parent_fwspec.param_count = 3;
221	parent_fwspec.param[0] = 0;
222	parent_fwspec.param[1] = parent_hwirq;
223	parent_fwspec.param[2] = type;
224
225	return irq_domain_alloc_irqs_parent(domain, virq, nr_irqs,
226	&parent_fwspec);
227	}
228
229	static const struct irq_domain_ops qcom_pdc_ops = {
230	.translate = qcom_pdc_translate,
231	.alloc = qcom_pdc_alloc,
232	.free = irq_domain_free_irqs_common,
233	};
234
235	static int pdc_setup_pin_mapping(struct device_node *np)
236	{
237	int ret, n;
238
239	n = of_property_count_elems_of_size(np, "qcom,pdc-ranges", sizeof(u32));
240	if (n <= 0 \|\| n % 3)
241	return -EINVAL;
242
243	pdc_region_cnt = n / 3;
244	pdc_region = kcalloc(pdc_region_cnt, sizeof(*pdc_region), GFP_KERNEL);
245	if (!pdc_region) {
246	pdc_region_cnt = 0;
247	return -ENOMEM;
248	}
249
250	for (n = 0; n < pdc_region_cnt; n++) {
251	ret = of_property_read_u32_index(np, "qcom,pdc-ranges",
252	n * 3 + 0,
253	&pdc_region[n].pin_base);
254	if (ret)
255	return ret;
256	ret = of_property_read_u32_index(np, "qcom,pdc-ranges",
257	n * 3 + 1,
258	&pdc_region[n].parent_base);
259	if (ret)
260	return ret;
261	ret = of_property_read_u32_index(np, "qcom,pdc-ranges",
262	n * 3 + 2,
263	&pdc_region[n].cnt);
264	if (ret)
265	return ret;
266	}
267
268	return 0;
269	}
270
271	static int qcom_pdc_init(struct device_node node, struct device_node parent)
272	{
273	struct irq_domain parent_domain, pdc_domain;
274	int ret;
275
276	pdc_base = of_iomap(node, 0);
277	if (!pdc_base) {
278	pr_err("%pOF: unable to map PDC registers\n", node);
279	return -ENXIO;
280	}
281
282	parent_domain = irq_find_host(parent);
283	if (!parent_domain) {
284	pr_err("%pOF: unable to find PDC's parent domain\n", node);
285	ret = -ENXIO;
286	goto fail;
287	}
288
289	ret = pdc_setup_pin_mapping(node);
290	if (ret) {
291	pr_err("%pOF: failed to init PDC pin-hwirq mapping\n", node);
292	goto fail;
293	}
294
295	pdc_domain = irq_domain_create_hierarchy(parent_domain, 0, PDC_MAX_IRQS,
296	of_fwnode_handle(node),
297	&qcom_pdc_ops, NULL);
298	if (!pdc_domain) {
299	pr_err("%pOF: GIC domain add failed\n", node);
300	ret = -ENOMEM;
301	goto fail;
302	}
303
304	return 0;
305
306	fail:
307	kfree(pdc_region);
308	iounmap(pdc_base);
309	return ret;
310	}
311
312	IRQCHIP_DECLARE(pdc_sdm845, "qcom,sdm845-pdc", qcom_pdc_init);