[linux-2.6-block.git] / drivers / irqchip / irq-renesas-intc-irqpin.c

/*
 * Renesas INTC External IRQ Pin Driver
 *
 *  Copyright (C) 2013 Magnus Damm
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 */

#include <linux/init.h>
#include <linux/of.h>
#include <linux/platform_device.h>
#include <linux/spinlock.h>
#include <linux/interrupt.h>
#include <linux/ioport.h>
#include <linux/io.h>
#include <linux/irq.h>
#include <linux/irqdomain.h>
#include <linux/err.h>
#include <linux/slab.h>
#include <linux/module.h>
#include <linux/platform_data/irq-renesas-intc-irqpin.h>

#define INTC_IRQPIN_MAX 8 /* maximum 8 interrupts per driver instance */

#define INTC_IRQPIN_REG_SENSE 0 /* ICRn */
#define INTC_IRQPIN_REG_PRIO 1 /* INTPRInn */
#define INTC_IRQPIN_REG_SOURCE 2 /* INTREQnn */
#define INTC_IRQPIN_REG_MASK 3 /* INTMSKnn */
#define INTC_IRQPIN_REG_CLEAR 4 /* INTMSKCLRnn */
#define INTC_IRQPIN_REG_NR 5

/* INTC external IRQ PIN hardware register access:
 *
 * SENSE is read-write 32-bit with 2-bits or 4-bits per IRQ (*)
 * PRIO is read-write 32-bit with 4-bits per IRQ (**)
 * SOURCE is read-only 32-bit or 8-bit with 1-bit per IRQ (***)
 * MASK is write-only 32-bit or 8-bit with 1-bit per IRQ (***)
 * CLEAR is write-only 32-bit or 8-bit with 1-bit per IRQ (***)
 *
 * (*) May be accessed by more than one driver instance - lock needed
 * (**) Read-modify-write access by one driver instance - lock needed
 * (***) Accessed by one driver instance only - no locking needed
 */

struct intc_irqpin_iomem {
	void __iomem *iomem;
	unsigned long (*read)(void __iomem *iomem);
	void (*write)(void __iomem *iomem, unsigned long data);
	int width;
};

struct intc_irqpin_irq {
	int hw_irq;
	int requested_irq;
	int domain_irq;
	struct intc_irqpin_priv *p;
};

struct intc_irqpin_priv {
	struct intc_irqpin_iomem iomem[INTC_IRQPIN_REG_NR];
	struct intc_irqpin_irq irq[INTC_IRQPIN_MAX];
	struct renesas_intc_irqpin_config config;
	unsigned int number_of_irqs;
	struct platform_device *pdev;
	struct irq_chip irq_chip;
	struct irq_domain *irq_domain;
	bool shared_irqs;
	u8 shared_irq_mask;
};

static unsigned long intc_irqpin_read32(void __iomem *iomem)
{
	return ioread32(iomem);
}

static unsigned long intc_irqpin_read8(void __iomem *iomem)
{
	return ioread8(iomem);
}

static void intc_irqpin_write32(void __iomem *iomem, unsigned long data)
{
	iowrite32(data, iomem);
}

static void intc_irqpin_write8(void __iomem *iomem, unsigned long data)
{
	iowrite8(data, iomem);
}

static inline unsigned long intc_irqpin_read(struct intc_irqpin_priv *p,
					     int reg)
{
	struct intc_irqpin_iomem *i = &p->iomem[reg];

	return i->read(i->iomem);
}

static inline void intc_irqpin_write(struct intc_irqpin_priv *p,
				     int reg, unsigned long data)
{
	struct intc_irqpin_iomem *i = &p->iomem[reg];

	i->write(i->iomem, data);
}

static inline unsigned long intc_irqpin_hwirq_mask(struct intc_irqpin_priv *p,
						   int reg, int hw_irq)
{
	return BIT((p->iomem[reg].width - 1) - hw_irq);
}

static inline void intc_irqpin_irq_write_hwirq(struct intc_irqpin_priv *p,
					       int reg, int hw_irq)
{
	intc_irqpin_write(p, reg, intc_irqpin_hwirq_mask(p, reg, hw_irq));
}

static DEFINE_RAW_SPINLOCK(intc_irqpin_lock); /* only used by slow path */

static void intc_irqpin_read_modify_write(struct intc_irqpin_priv *p,
					  int reg, int shift,
					  int width, int value)
{
	unsigned long flags;
	unsigned long tmp;

	raw_spin_lock_irqsave(&intc_irqpin_lock, flags);

	tmp = intc_irqpin_read(p, reg);
	tmp &= ~(((1 << width) - 1) << shift);
	tmp |= value << shift;
	intc_irqpin_write(p, reg, tmp);

	raw_spin_unlock_irqrestore(&intc_irqpin_lock, flags);
}

static void intc_irqpin_mask_unmask_prio(struct intc_irqpin_priv *p,
					 int irq, int do_mask)
{
	int bitfield_width = 4; /* PRIO assumed to have fixed bitfield width */
	int shift = (7 - irq) * bitfield_width; /* PRIO assumed to be 32-bit */

	intc_irqpin_read_modify_write(p, INTC_IRQPIN_REG_PRIO,
				      shift, bitfield_width,
				      do_mask ? 0 : (1 << bitfield_width) - 1);
}

static int intc_irqpin_set_sense(struct intc_irqpin_priv *p, int irq, int value)
{
	int bitfield_width = p->config.sense_bitfield_width;
	int shift = (7 - irq) * bitfield_width; /* SENSE assumed to be 32-bit */

	dev_dbg(&p->pdev->dev, "sense irq = %d, mode = %d\n", irq, value);

	if (value >= (1 << bitfield_width))
		return -EINVAL;

	intc_irqpin_read_modify_write(p, INTC_IRQPIN_REG_SENSE, shift,
				      bitfield_width, value);
	return 0;
}

static void intc_irqpin_dbg(struct intc_irqpin_irq *i, char *str)
{
	dev_dbg(&i->p->pdev->dev, "%s (%d:%d:%d)\n",
		str, i->requested_irq, i->hw_irq, i->domain_irq);
}

static void intc_irqpin_irq_enable(struct irq_data *d)
{
	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	int hw_irq = irqd_to_hwirq(d);

	intc_irqpin_dbg(&p->irq[hw_irq], "enable");
	intc_irqpin_irq_write_hwirq(p, INTC_IRQPIN_REG_CLEAR, hw_irq);
}

static void intc_irqpin_irq_disable(struct irq_data *d)
{
	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	int hw_irq = irqd_to_hwirq(d);

	intc_irqpin_dbg(&p->irq[hw_irq], "disable");
	intc_irqpin_irq_write_hwirq(p, INTC_IRQPIN_REG_MASK, hw_irq);
}

static void intc_irqpin_shared_irq_enable(struct irq_data *d)
{
	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	int hw_irq = irqd_to_hwirq(d);

	intc_irqpin_dbg(&p->irq[hw_irq], "shared enable");
	intc_irqpin_irq_write_hwirq(p, INTC_IRQPIN_REG_CLEAR, hw_irq);

	p->shared_irq_mask &= ~BIT(hw_irq);
}

static void intc_irqpin_shared_irq_disable(struct irq_data *d)
{
	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	int hw_irq = irqd_to_hwirq(d);

	intc_irqpin_dbg(&p->irq[hw_irq], "shared disable");
	intc_irqpin_irq_write_hwirq(p, INTC_IRQPIN_REG_MASK, hw_irq);

	p->shared_irq_mask |= BIT(hw_irq);
}

static void intc_irqpin_irq_enable_force(struct irq_data *d)
{
	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	int irq = p->irq[irqd_to_hwirq(d)].requested_irq;

	intc_irqpin_irq_enable(d);

	/* enable interrupt through parent interrupt controller,
	 * assumes non-shared interrupt with 1:1 mapping
	 * needed for busted IRQs on some SoCs like sh73a0
	 */
	irq_get_chip(irq)->irq_unmask(irq_get_irq_data(irq));
}

static void intc_irqpin_irq_disable_force(struct irq_data *d)
{
	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	int irq = p->irq[irqd_to_hwirq(d)].requested_irq;

	/* disable interrupt through parent interrupt controller,
	 * assumes non-shared interrupt with 1:1 mapping
	 * needed for busted IRQs on some SoCs like sh73a0
	 */
	irq_get_chip(irq)->irq_mask(irq_get_irq_data(irq));
	intc_irqpin_irq_disable(d);
}

#define INTC_IRQ_SENSE_VALID 0x10
#define INTC_IRQ_SENSE(x) (x + INTC_IRQ_SENSE_VALID)

static unsigned char intc_irqpin_sense[IRQ_TYPE_SENSE_MASK + 1] = {
	[IRQ_TYPE_EDGE_FALLING] = INTC_IRQ_SENSE(0x00),
	[IRQ_TYPE_EDGE_RISING] = INTC_IRQ_SENSE(0x01),
	[IRQ_TYPE_LEVEL_LOW] = INTC_IRQ_SENSE(0x02),
	[IRQ_TYPE_LEVEL_HIGH] = INTC_IRQ_SENSE(0x03),
	[IRQ_TYPE_EDGE_BOTH] = INTC_IRQ_SENSE(0x04),
};

static int intc_irqpin_irq_set_type(struct irq_data *d, unsigned int type)
{
	unsigned char value = intc_irqpin_sense[type & IRQ_TYPE_SENSE_MASK];
	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);

	if (!(value & INTC_IRQ_SENSE_VALID))
		return -EINVAL;

	return intc_irqpin_set_sense(p, irqd_to_hwirq(d),
				     value ^ INTC_IRQ_SENSE_VALID);
}

static irqreturn_t intc_irqpin_irq_handler(int irq, void *dev_id)
{
	struct intc_irqpin_irq *i = dev_id;
	struct intc_irqpin_priv *p = i->p;
	unsigned long bit;

	intc_irqpin_dbg(i, "demux1");
	bit = intc_irqpin_hwirq_mask(p, INTC_IRQPIN_REG_SOURCE, i->hw_irq);

	if (intc_irqpin_read(p, INTC_IRQPIN_REG_SOURCE) & bit) {
		intc_irqpin_write(p, INTC_IRQPIN_REG_SOURCE, ~bit);
		intc_irqpin_dbg(i, "demux2");
		generic_handle_irq(i->domain_irq);
		return IRQ_HANDLED;
	}
	return IRQ_NONE;
}

static irqreturn_t intc_irqpin_shared_irq_handler(int irq, void *dev_id)
{
	struct intc_irqpin_priv *p = dev_id;
	unsigned int reg_source = intc_irqpin_read(p, INTC_IRQPIN_REG_SOURCE);
	irqreturn_t status = IRQ_NONE;
	int k;

	for (k = 0; k < 8; k++) {
		if (reg_source & BIT(7 - k)) {
			if (BIT(k) & p->shared_irq_mask)
				continue;

			status |= intc_irqpin_irq_handler(irq, &p->irq[k]);
		}
	}

	return status;
}

static int intc_irqpin_irq_domain_map(struct irq_domain *h, unsigned int virq,
				      irq_hw_number_t hw)
{
	struct intc_irqpin_priv *p = h->host_data;

	p->irq[hw].domain_irq = virq;
	p->irq[hw].hw_irq = hw;

	intc_irqpin_dbg(&p->irq[hw], "map");
	irq_set_chip_data(virq, h->host_data);
	irq_set_chip_and_handler(virq, &p->irq_chip, handle_level_irq);
	set_irq_flags(virq, IRQF_VALID); /* kill me now */
	return 0;
}

static struct irq_domain_ops intc_irqpin_irq_domain_ops = {
	.map	= intc_irqpin_irq_domain_map,
	.xlate  = irq_domain_xlate_twocell,
};

static int intc_irqpin_probe(struct platform_device *pdev)
{
	struct renesas_intc_irqpin_config *pdata = pdev->dev.platform_data;
	struct intc_irqpin_priv *p;
	struct intc_irqpin_iomem *i;
	struct resource *io[INTC_IRQPIN_REG_NR];
	struct resource *irq;
	struct irq_chip *irq_chip;
	void (*enable_fn)(struct irq_data *d);
	void (*disable_fn)(struct irq_data *d);
	const char *name = dev_name(&pdev->dev);
	int ref_irq;
	int ret;
	int k;

	p = devm_kzalloc(&pdev->dev, sizeof(*p), GFP_KERNEL);
	if (!p) {
		dev_err(&pdev->dev, "failed to allocate driver data\n");
		ret = -ENOMEM;
		goto err0;
	}

	/* deal with driver instance configuration */
	if (pdata) {
		memcpy(&p->config, pdata, sizeof(*pdata));
	} else {
		of_property_read_u32(pdev->dev.of_node, "sense-bitfield-width",
				     &p->config.sense_bitfield_width);
		p->config.control_parent = of_property_read_bool(pdev->dev.of_node,
								 "control-parent");
	}
	if (!p->config.sense_bitfield_width)
		p->config.sense_bitfield_width = 4; /* default to 4 bits */

	p->pdev = pdev;
	platform_set_drvdata(pdev, p);

	/* get hold of manadatory IOMEM */
	for (k = 0; k < INTC_IRQPIN_REG_NR; k++) {
		io[k] = platform_get_resource(pdev, IORESOURCE_MEM, k);
		if (!io[k]) {
			dev_err(&pdev->dev, "not enough IOMEM resources\n");
			ret = -EINVAL;
			goto err0;
		}
	}

	/* allow any number of IRQs between 1 and INTC_IRQPIN_MAX */
	for (k = 0; k < INTC_IRQPIN_MAX; k++) {
		irq = platform_get_resource(pdev, IORESOURCE_IRQ, k);
		if (!irq)
			break;

		p->irq[k].p = p;
		p->irq[k].requested_irq = irq->start;
	}

	p->number_of_irqs = k;
	if (p->number_of_irqs < 1) {
		dev_err(&pdev->dev, "not enough IRQ resources\n");
		ret = -EINVAL;
		goto err0;
	}

	/* ioremap IOMEM and setup read/write callbacks */
	for (k = 0; k < INTC_IRQPIN_REG_NR; k++) {
		i = &p->iomem[k];

		switch (resource_size(io[k])) {
		case 1:
			i->width = 8;
			i->read = intc_irqpin_read8;
			i->write = intc_irqpin_write8;
			break;
		case 4:
			i->width = 32;
			i->read = intc_irqpin_read32;
			i->write = intc_irqpin_write32;
			break;
		default:
			dev_err(&pdev->dev, "IOMEM size mismatch\n");
			ret = -EINVAL;
			goto err0;
		}

		i->iomem = devm_ioremap_nocache(&pdev->dev, io[k]->start,
						resource_size(io[k]));
		if (!i->iomem) {
			dev_err(&pdev->dev, "failed to remap IOMEM\n");
			ret = -ENXIO;
			goto err0;
		}
	}

	/* mask all interrupts using priority */
	for (k = 0; k < p->number_of_irqs; k++)
		intc_irqpin_mask_unmask_prio(p, k, 1);

	/* clear all pending interrupts */
	intc_irqpin_write(p, INTC_IRQPIN_REG_SOURCE, 0x0);

	/* scan for shared interrupt lines */
	ref_irq = p->irq[0].requested_irq;
	p->shared_irqs = true;
	for (k = 1; k < p->number_of_irqs; k++) {
		if (ref_irq != p->irq[k].requested_irq) {
			p->shared_irqs = false;
			break;
		}
	}

	/* use more severe masking method if requested */
	if (p->config.control_parent) {
		enable_fn = intc_irqpin_irq_enable_force;
		disable_fn = intc_irqpin_irq_disable_force;
	} else if (!p->shared_irqs) {
		enable_fn = intc_irqpin_irq_enable;
		disable_fn = intc_irqpin_irq_disable;
	} else {
		enable_fn = intc_irqpin_shared_irq_enable;
		disable_fn = intc_irqpin_shared_irq_disable;
	}

	irq_chip = &p->irq_chip;
	irq_chip->name = name;
	irq_chip->irq_mask = disable_fn;
	irq_chip->irq_unmask = enable_fn;
	irq_chip->irq_enable = enable_fn;
	irq_chip->irq_disable = disable_fn;
	irq_chip->irq_set_type = intc_irqpin_irq_set_type;
	irq_chip->flags	= IRQCHIP_SKIP_SET_WAKE;

	p->irq_domain = irq_domain_add_simple(pdev->dev.of_node,
					      p->number_of_irqs,
					      p->config.irq_base,
					      &intc_irqpin_irq_domain_ops, p);
	if (!p->irq_domain) {
		ret = -ENXIO;
		dev_err(&pdev->dev, "cannot initialize irq domain\n");
		goto err0;
	}

	if (p->shared_irqs) {
		/* request one shared interrupt */
		if (devm_request_irq(&pdev->dev, p->irq[0].requested_irq,
				intc_irqpin_shared_irq_handler,
				IRQF_SHARED, name, p)) {
			dev_err(&pdev->dev, "failed to request low IRQ\n");
			ret = -ENOENT;
			goto err1;
		}
	} else {
		/* request interrupts one by one */
		for (k = 0; k < p->number_of_irqs; k++) {
			if (devm_request_irq(&pdev->dev,
					p->irq[k].requested_irq,
					intc_irqpin_irq_handler,
					0, name, &p->irq[k])) {
				dev_err(&pdev->dev,
					"failed to request low IRQ\n");
				ret = -ENOENT;
				goto err1;
			}
		}
	}

	/* unmask all interrupts on prio level */
	for (k = 0; k < p->number_of_irqs; k++)
		intc_irqpin_mask_unmask_prio(p, k, 0);

	dev_info(&pdev->dev, "driving %d irqs\n", p->number_of_irqs);

	/* warn in case of mismatch if irq base is specified */
	if (p->config.irq_base) {
		if (p->config.irq_base != p->irq[0].domain_irq)
			dev_warn(&pdev->dev, "irq base mismatch (%d/%d)\n",
				 p->config.irq_base, p->irq[0].domain_irq);
	}

	return 0;

err1:
	irq_domain_remove(p->irq_domain);
err0:
	return ret;
}

static int intc_irqpin_remove(struct platform_device *pdev)
{
	struct intc_irqpin_priv *p = platform_get_drvdata(pdev);

	irq_domain_remove(p->irq_domain);

	return 0;
}

static const struct of_device_id intc_irqpin_dt_ids[] = {
	{ .compatible = "renesas,intc-irqpin", },
	{},
};
MODULE_DEVICE_TABLE(of, intc_irqpin_dt_ids);

static struct platform_driver intc_irqpin_device_driver = {
	.probe		= intc_irqpin_probe,
	.remove		= intc_irqpin_remove,
	.driver		= {
		.name	= "renesas_intc_irqpin",
		.of_match_table = intc_irqpin_dt_ids,
		.owner  = THIS_MODULE,
	}
};

static int __init intc_irqpin_init(void)
{
	return platform_driver_register(&intc_irqpin_device_driver);
}
postcore_initcall(intc_irqpin_init);

static void __exit intc_irqpin_exit(void)
{
	platform_driver_unregister(&intc_irqpin_device_driver);
}
module_exit(intc_irqpin_exit);

MODULE_AUTHOR("Magnus Damm");
MODULE_DESCRIPTION("Renesas INTC External IRQ Pin Driver");
MODULE_LICENSE("GPL v2");
Commit	Line	Data
44358048 MD	1	/*
	2	* Renesas INTC External IRQ Pin Driver
	3	*
	4	* Copyright (C) 2013 Magnus Damm
	5	*
	6	* This program is free software; you can redistribute it and/or modify
	7	* it under the terms of the GNU General Public License as published by
	8	* the Free Software Foundation; either version 2 of the License
	9	*
	10	* This program is distributed in the hope that it will be useful,
	11	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	12	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	13	* GNU General Public License for more details.
	14	*
	15	* You should have received a copy of the GNU General Public License
	16	* along with this program; if not, write to the Free Software
	17	* Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	18	*/
	19
	20	#include <linux/init.h>
894db164	21	#include <linux/of.h>
44358048 MD	22	#include <linux/platform_device.h>
	23	#include <linux/spinlock.h>
	24	#include <linux/interrupt.h>
	25	#include <linux/ioport.h>
	26	#include <linux/io.h>
	27	#include <linux/irq.h>
	28	#include <linux/irqdomain.h>
	29	#include <linux/err.h>
	30	#include <linux/slab.h>
	31	#include <linux/module.h>
	32	#include <linux/platform_data/irq-renesas-intc-irqpin.h>
	33
	34	#define INTC_IRQPIN_MAX 8 /* maximum 8 interrupts per driver instance */
	35
	36	#define INTC_IRQPIN_REG_SENSE 0 /* ICRn */
	37	#define INTC_IRQPIN_REG_PRIO 1 /* INTPRInn */
	38	#define INTC_IRQPIN_REG_SOURCE 2 /* INTREQnn */
	39	#define INTC_IRQPIN_REG_MASK 3 /* INTMSKnn */
	40	#define INTC_IRQPIN_REG_CLEAR 4 /* INTMSKCLRnn */
	41	#define INTC_IRQPIN_REG_NR 5
	42
	43	/* INTC external IRQ PIN hardware register access:
	44	*
	45	* SENSE is read-write 32-bit with 2-bits or 4-bits per IRQ (*)
	46	* PRIO is read-write 32-bit with 4-bits per IRQ (**)
	47	* SOURCE is read-only 32-bit or 8-bit with 1-bit per IRQ (***)
	48	* MASK is write-only 32-bit or 8-bit with 1-bit per IRQ (***)
	49	* CLEAR is write-only 32-bit or 8-bit with 1-bit per IRQ (***)
	50	*
	51	* (*) May be accessed by more than one driver instance - lock needed
	52	* (**) Read-modify-write access by one driver instance - lock needed
	53	* (***) Accessed by one driver instance only - no locking needed
	54	*/
	55
	56	struct intc_irqpin_iomem {
	57	void __iomem *iomem;
	58	unsigned long (read)(void __iomem iomem);
	59	void (write)(void __iomem iomem, unsigned long data);
	60	int width;
862d3098	61	};
44358048 MD	62
	63	struct intc_irqpin_irq {
	64	int hw_irq;
33f958f2 MD	65	int requested_irq;
33f958f2 MD	66	int domain_irq;
44358048	67	struct intc_irqpin_priv *p;
862d3098	68	};
44358048 MD	69
	70	struct intc_irqpin_priv {
	71	struct intc_irqpin_iomem iomem[INTC_IRQPIN_REG_NR];
	72	struct intc_irqpin_irq irq[INTC_IRQPIN_MAX];
	73	struct renesas_intc_irqpin_config config;
	74	unsigned int number_of_irqs;
	75	struct platform_device *pdev;
	76	struct irq_chip irq_chip;
	77	struct irq_domain *irq_domain;
427cc720 BH	78	bool shared_irqs;
427cc720 BH	79	u8 shared_irq_mask;
44358048 MD	80	};
	81
	82	static unsigned long intc_irqpin_read32(void __iomem *iomem)
	83	{
	84	return ioread32(iomem);
	85	}
	86
	87	static unsigned long intc_irqpin_read8(void __iomem *iomem)
	88	{
	89	return ioread8(iomem);
	90	}
	91
	92	static void intc_irqpin_write32(void __iomem *iomem, unsigned long data)
	93	{
	94	iowrite32(data, iomem);
	95	}
	96
	97	static void intc_irqpin_write8(void __iomem *iomem, unsigned long data)
	98	{
	99	iowrite8(data, iomem);
	100	}
	101
	102	static inline unsigned long intc_irqpin_read(struct intc_irqpin_priv *p,
	103	int reg)
	104	{
	105	struct intc_irqpin_iomem *i = &p->iomem[reg];
862d3098	106
44358048 MD	107	return i->read(i->iomem);
	108	}
	109
	110	static inline void intc_irqpin_write(struct intc_irqpin_priv *p,
	111	int reg, unsigned long data)
	112	{
	113	struct intc_irqpin_iomem *i = &p->iomem[reg];
862d3098	114
44358048 MD	115	i->write(i->iomem, data);
	116	}
	117
	118	static inline unsigned long intc_irqpin_hwirq_mask(struct intc_irqpin_priv *p,
	119	int reg, int hw_irq)
	120	{
	121	return BIT((p->iomem[reg].width - 1) - hw_irq);
	122	}
	123
	124	static inline void intc_irqpin_irq_write_hwirq(struct intc_irqpin_priv *p,
	125	int reg, int hw_irq)
	126	{
	127	intc_irqpin_write(p, reg, intc_irqpin_hwirq_mask(p, reg, hw_irq));
	128	}
	129
	130	static DEFINE_RAW_SPINLOCK(intc_irqpin_lock); /* only used by slow path */
	131
	132	static void intc_irqpin_read_modify_write(struct intc_irqpin_priv *p,
	133	int reg, int shift,
	134	int width, int value)
	135	{
	136	unsigned long flags;
	137	unsigned long tmp;
	138
	139	raw_spin_lock_irqsave(&intc_irqpin_lock, flags);
	140
	141	tmp = intc_irqpin_read(p, reg);
	142	tmp &= ~(((1 << width) - 1) << shift);
	143	tmp \|= value << shift;
	144	intc_irqpin_write(p, reg, tmp);
	145
	146	raw_spin_unlock_irqrestore(&intc_irqpin_lock, flags);
	147	}
	148
	149	static void intc_irqpin_mask_unmask_prio(struct intc_irqpin_priv *p,
	150	int irq, int do_mask)
	151	{
	152	int bitfield_width = 4; /* PRIO assumed to have fixed bitfield width */
	153	int shift = (7 - irq) * bitfield_width; /* PRIO assumed to be 32-bit */
	154
	155	intc_irqpin_read_modify_write(p, INTC_IRQPIN_REG_PRIO,
	156	shift, bitfield_width,
	157	do_mask ? 0 : (1 << bitfield_width) - 1);
	158	}
	159
	160	static int intc_irqpin_set_sense(struct intc_irqpin_priv *p, int irq, int value)
	161	{
	162	int bitfield_width = p->config.sense_bitfield_width;
	163	int shift = (7 - irq) * bitfield_width; /* SENSE assumed to be 32-bit */
	164
	165	dev_dbg(&p->pdev->dev, "sense irq = %d, mode = %d\n", irq, value);
	166
	167	if (value >= (1 << bitfield_width))
	168	return -EINVAL;
	169
	170	intc_irqpin_read_modify_write(p, INTC_IRQPIN_REG_SENSE, shift,
	171	bitfield_width, value);
	172	return 0;
	173	}
	174
	175	static void intc_irqpin_dbg(struct intc_irqpin_irq i, char str)
	176	{
	177	dev_dbg(&i->p->pdev->dev, "%s (%d:%d:%d)\n",
33f958f2	178	str, i->requested_irq, i->hw_irq, i->domain_irq);
44358048 MD	179	}
	180
	181	static void intc_irqpin_irq_enable(struct irq_data *d)
	182	{
	183	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	184	int hw_irq = irqd_to_hwirq(d);
	185
	186	intc_irqpin_dbg(&p->irq[hw_irq], "enable");
	187	intc_irqpin_irq_write_hwirq(p, INTC_IRQPIN_REG_CLEAR, hw_irq);
	188	}
	189
	190	static void intc_irqpin_irq_disable(struct irq_data *d)
	191	{
	192	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	193	int hw_irq = irqd_to_hwirq(d);
	194
	195	intc_irqpin_dbg(&p->irq[hw_irq], "disable");
	196	intc_irqpin_irq_write_hwirq(p, INTC_IRQPIN_REG_MASK, hw_irq);
	197	}
	198
427cc720 BH	199	static void intc_irqpin_shared_irq_enable(struct irq_data *d)
	200	{
	201	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	202	int hw_irq = irqd_to_hwirq(d);
	203
	204	intc_irqpin_dbg(&p->irq[hw_irq], "shared enable");
	205	intc_irqpin_irq_write_hwirq(p, INTC_IRQPIN_REG_CLEAR, hw_irq);
	206
	207	p->shared_irq_mask &= ~BIT(hw_irq);
	208	}
	209
	210	static void intc_irqpin_shared_irq_disable(struct irq_data *d)
	211	{
	212	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	213	int hw_irq = irqd_to_hwirq(d);
	214
	215	intc_irqpin_dbg(&p->irq[hw_irq], "shared disable");
	216	intc_irqpin_irq_write_hwirq(p, INTC_IRQPIN_REG_MASK, hw_irq);
	217
	218	p->shared_irq_mask \|= BIT(hw_irq);
	219	}
	220
44358048 MD	221	static void intc_irqpin_irq_enable_force(struct irq_data *d)
	222	{
	223	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
33f958f2	224	int irq = p->irq[irqd_to_hwirq(d)].requested_irq;
44358048 MD	225
44358048 MD	226	intc_irqpin_irq_enable(d);
d1b6aecd MD	227
	228	/* enable interrupt through parent interrupt controller,
	229	* assumes non-shared interrupt with 1:1 mapping
	230	* needed for busted IRQs on some SoCs like sh73a0
	231	*/
44358048 MD	232	irq_get_chip(irq)->irq_unmask(irq_get_irq_data(irq));
	233	}
	234
	235	static void intc_irqpin_irq_disable_force(struct irq_data *d)
	236	{
	237	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
33f958f2	238	int irq = p->irq[irqd_to_hwirq(d)].requested_irq;
44358048	239
d1b6aecd MD	240	/* disable interrupt through parent interrupt controller,
	241	* assumes non-shared interrupt with 1:1 mapping
	242	* needed for busted IRQs on some SoCs like sh73a0
	243	*/
44358048 MD	244	irq_get_chip(irq)->irq_mask(irq_get_irq_data(irq));
	245	intc_irqpin_irq_disable(d);
	246	}
	247
	248	#define INTC_IRQ_SENSE_VALID 0x10
	249	#define INTC_IRQ_SENSE(x) (x + INTC_IRQ_SENSE_VALID)
	250
	251	static unsigned char intc_irqpin_sense[IRQ_TYPE_SENSE_MASK + 1] = {
	252	[IRQ_TYPE_EDGE_FALLING] = INTC_IRQ_SENSE(0x00),
	253	[IRQ_TYPE_EDGE_RISING] = INTC_IRQ_SENSE(0x01),
	254	[IRQ_TYPE_LEVEL_LOW] = INTC_IRQ_SENSE(0x02),
	255	[IRQ_TYPE_LEVEL_HIGH] = INTC_IRQ_SENSE(0x03),
	256	[IRQ_TYPE_EDGE_BOTH] = INTC_IRQ_SENSE(0x04),
	257	};
	258
	259	static int intc_irqpin_irq_set_type(struct irq_data *d, unsigned int type)
	260	{
	261	unsigned char value = intc_irqpin_sense[type & IRQ_TYPE_SENSE_MASK];
	262	struct intc_irqpin_priv *p = irq_data_get_irq_chip_data(d);
	263
	264	if (!(value & INTC_IRQ_SENSE_VALID))
	265	return -EINVAL;
	266
	267	return intc_irqpin_set_sense(p, irqd_to_hwirq(d),
	268	value ^ INTC_IRQ_SENSE_VALID);
	269	}
	270
	271	static irqreturn_t intc_irqpin_irq_handler(int irq, void *dev_id)
	272	{
	273	struct intc_irqpin_irq *i = dev_id;
	274	struct intc_irqpin_priv *p = i->p;
	275	unsigned long bit;
	276
	277	intc_irqpin_dbg(i, "demux1");
	278	bit = intc_irqpin_hwirq_mask(p, INTC_IRQPIN_REG_SOURCE, i->hw_irq);
	279
	280	if (intc_irqpin_read(p, INTC_IRQPIN_REG_SOURCE) & bit) {
	281	intc_irqpin_write(p, INTC_IRQPIN_REG_SOURCE, ~bit);
	282	intc_irqpin_dbg(i, "demux2");
33f958f2	283	generic_handle_irq(i->domain_irq);
44358048 MD	284	return IRQ_HANDLED;
	285	}
	286	return IRQ_NONE;
	287	}
	288
427cc720 BH	289	static irqreturn_t intc_irqpin_shared_irq_handler(int irq, void *dev_id)
	290	{
	291	struct intc_irqpin_priv *p = dev_id;
	292	unsigned int reg_source = intc_irqpin_read(p, INTC_IRQPIN_REG_SOURCE);
	293	irqreturn_t status = IRQ_NONE;
	294	int k;
	295
	296	for (k = 0; k < 8; k++) {
	297	if (reg_source & BIT(7 - k)) {
	298	if (BIT(k) & p->shared_irq_mask)
	299	continue;
	300
	301	status \|= intc_irqpin_irq_handler(irq, &p->irq[k]);
	302	}
	303	}
	304
	305	return status;
	306	}
	307
44358048 MD	308	static int intc_irqpin_irq_domain_map(struct irq_domain *h, unsigned int virq,
	309	irq_hw_number_t hw)
	310	{
	311	struct intc_irqpin_priv *p = h->host_data;
	312
33f958f2 MD	313	p->irq[hw].domain_irq = virq;
	314	p->irq[hw].hw_irq = hw;
	315
44358048 MD	316	intc_irqpin_dbg(&p->irq[hw], "map");
	317	irq_set_chip_data(virq, h->host_data);
	318	irq_set_chip_and_handler(virq, &p->irq_chip, handle_level_irq);
	319	set_irq_flags(virq, IRQF_VALID); /* kill me now */
	320	return 0;
	321	}
	322
	323	static struct irq_domain_ops intc_irqpin_irq_domain_ops = {
	324	.map = intc_irqpin_irq_domain_map,
9d833bbe	325	.xlate = irq_domain_xlate_twocell,
44358048 MD	326	};
	327
	328	static int intc_irqpin_probe(struct platform_device *pdev)
	329	{
	330	struct renesas_intc_irqpin_config *pdata = pdev->dev.platform_data;
	331	struct intc_irqpin_priv *p;
	332	struct intc_irqpin_iomem *i;
	333	struct resource *io[INTC_IRQPIN_REG_NR];
	334	struct resource *irq;
	335	struct irq_chip *irq_chip;
	336	void (enable_fn)(struct irq_data d);
	337	void (disable_fn)(struct irq_data d);
	338	const char *name = dev_name(&pdev->dev);
427cc720	339	int ref_irq;
44358048 MD	340	int ret;
	341	int k;
	342
08eba5ba	343	p = devm_kzalloc(&pdev->dev, sizeof(*p), GFP_KERNEL);
44358048 MD	344	if (!p) {
	345	dev_err(&pdev->dev, "failed to allocate driver data\n");
	346	ret = -ENOMEM;
	347	goto err0;
	348	}
	349
	350	/* deal with driver instance configuration */
c4fa4946	351	if (pdata) {
44358048	352	memcpy(&p->config, pdata, sizeof(*pdata));
c4fa4946	353	} else {
894db164 GL	354	of_property_read_u32(pdev->dev.of_node, "sense-bitfield-width",
894db164 GL	355	&p->config.sense_bitfield_width);
c4fa4946 GL	356	p->config.control_parent = of_property_read_bool(pdev->dev.of_node,
	357	"control-parent");
	358	}
44358048 MD	359	if (!p->config.sense_bitfield_width)
	360	p->config.sense_bitfield_width = 4; /* default to 4 bits */
	361
	362	p->pdev = pdev;
	363	platform_set_drvdata(pdev, p);
	364
	365	/* get hold of manadatory IOMEM */
	366	for (k = 0; k < INTC_IRQPIN_REG_NR; k++) {
	367	io[k] = platform_get_resource(pdev, IORESOURCE_MEM, k);
	368	if (!io[k]) {
	369	dev_err(&pdev->dev, "not enough IOMEM resources\n");
	370	ret = -EINVAL;
08eba5ba	371	goto err0;
44358048 MD	372	}
	373	}
	374
	375	/* allow any number of IRQs between 1 and INTC_IRQPIN_MAX */
	376	for (k = 0; k < INTC_IRQPIN_MAX; k++) {
	377	irq = platform_get_resource(pdev, IORESOURCE_IRQ, k);
	378	if (!irq)
	379	break;
	380
44358048	381	p->irq[k].p = p;
33f958f2	382	p->irq[k].requested_irq = irq->start;
44358048 MD	383	}
	384
	385	p->number_of_irqs = k;
	386	if (p->number_of_irqs < 1) {
	387	dev_err(&pdev->dev, "not enough IRQ resources\n");
	388	ret = -EINVAL;
08eba5ba	389	goto err0;
44358048 MD	390	}
	391
	392	/* ioremap IOMEM and setup read/write callbacks */
	393	for (k = 0; k < INTC_IRQPIN_REG_NR; k++) {
	394	i = &p->iomem[k];
	395
	396	switch (resource_size(io[k])) {
	397	case 1:
	398	i->width = 8;
	399	i->read = intc_irqpin_read8;
	400	i->write = intc_irqpin_write8;
	401	break;
	402	case 4:
	403	i->width = 32;
	404	i->read = intc_irqpin_read32;
	405	i->write = intc_irqpin_write32;
	406	break;
	407	default:
	408	dev_err(&pdev->dev, "IOMEM size mismatch\n");
	409	ret = -EINVAL;
08eba5ba	410	goto err0;
44358048 MD	411	}
44358048 MD	412
08eba5ba MD	413	i->iomem = devm_ioremap_nocache(&pdev->dev, io[k]->start,
08eba5ba MD	414	resource_size(io[k]));
44358048 MD	415	if (!i->iomem) {
	416	dev_err(&pdev->dev, "failed to remap IOMEM\n");
	417	ret = -ENXIO;
08eba5ba	418	goto err0;
44358048 MD	419	}
	420	}
	421
	422	/* mask all interrupts using priority */
	423	for (k = 0; k < p->number_of_irqs; k++)
	424	intc_irqpin_mask_unmask_prio(p, k, 1);
	425
427cc720 BH	426	/* clear all pending interrupts */
	427	intc_irqpin_write(p, INTC_IRQPIN_REG_SOURCE, 0x0);
	428
	429	/* scan for shared interrupt lines */
	430	ref_irq = p->irq[0].requested_irq;
	431	p->shared_irqs = true;
	432	for (k = 1; k < p->number_of_irqs; k++) {
	433	if (ref_irq != p->irq[k].requested_irq) {
	434	p->shared_irqs = false;
	435	break;
	436	}
	437	}
	438
44358048 MD	439	/* use more severe masking method if requested */
	440	if (p->config.control_parent) {
	441	enable_fn = intc_irqpin_irq_enable_force;
	442	disable_fn = intc_irqpin_irq_disable_force;
427cc720	443	} else if (!p->shared_irqs) {
44358048 MD	444	enable_fn = intc_irqpin_irq_enable;
44358048 MD	445	disable_fn = intc_irqpin_irq_disable;
427cc720 BH	446	} else {
	447	enable_fn = intc_irqpin_shared_irq_enable;
	448	disable_fn = intc_irqpin_shared_irq_disable;
44358048 MD	449	}
	450
	451	irq_chip = &p->irq_chip;
	452	irq_chip->name = name;
	453	irq_chip->irq_mask = disable_fn;
	454	irq_chip->irq_unmask = enable_fn;
	455	irq_chip->irq_enable = enable_fn;
	456	irq_chip->irq_disable = disable_fn;
	457	irq_chip->irq_set_type = intc_irqpin_irq_set_type;
	458	irq_chip->flags = IRQCHIP_SKIP_SET_WAKE;
	459
	460	p->irq_domain = irq_domain_add_simple(pdev->dev.of_node,
	461	p->number_of_irqs,
	462	p->config.irq_base,
	463	&intc_irqpin_irq_domain_ops, p);
	464	if (!p->irq_domain) {
	465	ret = -ENXIO;
	466	dev_err(&pdev->dev, "cannot initialize irq domain\n");
08eba5ba	467	goto err0;
44358048 MD	468	}
44358048 MD	469
427cc720 BH	470	if (p->shared_irqs) {
	471	/* request one shared interrupt */
	472	if (devm_request_irq(&pdev->dev, p->irq[0].requested_irq,
	473	intc_irqpin_shared_irq_handler,
	474	IRQF_SHARED, name, p)) {
44358048 MD	475	dev_err(&pdev->dev, "failed to request low IRQ\n");
44358048 MD	476	ret = -ENOENT;
08eba5ba	477	goto err1;
44358048	478	}
427cc720 BH	479	} else {
	480	/* request interrupts one by one */
	481	for (k = 0; k < p->number_of_irqs; k++) {
	482	if (devm_request_irq(&pdev->dev,
	483	p->irq[k].requested_irq,
	484	intc_irqpin_irq_handler,
	485	0, name, &p->irq[k])) {
	486	dev_err(&pdev->dev,
	487	"failed to request low IRQ\n");
	488	ret = -ENOENT;
	489	goto err1;
	490	}
	491	}
44358048 MD	492	}
44358048 MD	493
427cc720 BH	494	/* unmask all interrupts on prio level */
	495	for (k = 0; k < p->number_of_irqs; k++)
	496	intc_irqpin_mask_unmask_prio(p, k, 0);
	497
44358048 MD	498	dev_info(&pdev->dev, "driving %d irqs\n", p->number_of_irqs);
	499
	500	/* warn in case of mismatch if irq base is specified */
	501	if (p->config.irq_base) {
33f958f2	502	if (p->config.irq_base != p->irq[0].domain_irq)
44358048	503	dev_warn(&pdev->dev, "irq base mismatch (%d/%d)\n",
33f958f2	504	p->config.irq_base, p->irq[0].domain_irq);
44358048	505	}
862d3098	506
44358048 MD	507	return 0;
44358048 MD	508
44358048	509	err1:
08eba5ba	510	irq_domain_remove(p->irq_domain);
44358048 MD	511	err0:
	512	return ret;
	513	}
	514
	515	static int intc_irqpin_remove(struct platform_device *pdev)
	516	{
	517	struct intc_irqpin_priv *p = platform_get_drvdata(pdev);
44358048 MD	518
	519	irq_domain_remove(p->irq_domain);
	520
44358048 MD	521	return 0;
	522	}
	523
9d833bbe MD	524	static const struct of_device_id intc_irqpin_dt_ids[] = {
	525	{ .compatible = "renesas,intc-irqpin", },
	526	{},
	527	};
	528	MODULE_DEVICE_TABLE(of, intc_irqpin_dt_ids);
	529
44358048 MD	530	static struct platform_driver intc_irqpin_device_driver = {
	531	.probe = intc_irqpin_probe,
	532	.remove = intc_irqpin_remove,
	533	.driver = {
	534	.name = "renesas_intc_irqpin",
9d833bbe MD	535	.of_match_table = intc_irqpin_dt_ids,
9d833bbe MD	536	.owner = THIS_MODULE,
44358048 MD	537	}
	538	};
	539
	540	static int __init intc_irqpin_init(void)
	541	{
	542	return platform_driver_register(&intc_irqpin_device_driver);
	543	}
	544	postcore_initcall(intc_irqpin_init);
	545
	546	static void __exit intc_irqpin_exit(void)
	547	{
	548	platform_driver_unregister(&intc_irqpin_device_driver);
	549	}
	550	module_exit(intc_irqpin_exit);
	551
	552	MODULE_AUTHOR("Magnus Damm");
	553	MODULE_DESCRIPTION("Renesas INTC External IRQ Pin Driver");
	554	MODULE_LICENSE("GPL v2");