1 /*
2 * Copyright 2015-2016 Vladimir Zapolskiy <vz@mleia.com>
3 *
4 * The code contained herein is licensed under the GNU General Public
5 * License. You may obtain a copy of the GNU General Public License
6 * Version 2 or later at the following locations:
7 *
8 * http://www.opensource.org/licenses/gpl-license.html
9 * http://www.gnu.org/copyleft/gpl.html
10 */
11
12 #define pr_fmt(fmt) "%s: " fmt, __func__
13
14 #include <linux/io.h>
15 #include <linux/irqchip.h>
16 #include <linux/irqchip/chained_irq.h>
17 #include <linux/of_address.h>
18 #include <linux/of_irq.h>
19 #include <linux/of_platform.h>
20 #include <linux/slab.h>
21 #include <asm/exception.h>
22
23 #define LPC32XX_INTC_MASK 0x00
24 #define LPC32XX_INTC_RAW 0x04
25 #define LPC32XX_INTC_STAT 0x08
26 #define LPC32XX_INTC_POL 0x0C
27 #define LPC32XX_INTC_TYPE 0x10
28 #define LPC32XX_INTC_FIQ 0x14
29
30 #define NR_LPC32XX_IC_IRQS 32
31
32 struct lpc32xx_irq_chip {
33 void __iomem *base;
34 struct irq_domain *domain;
35 struct irq_chip chip;
36 };
37
38 static struct lpc32xx_irq_chip *lpc32xx_mic_irqc;
39
lpc32xx_ic_read(struct lpc32xx_irq_chip * ic,u32 reg)40 static inline u32 lpc32xx_ic_read(struct lpc32xx_irq_chip *ic, u32 reg)
41 {
42 return readl_relaxed(ic->base + reg);
43 }
44
lpc32xx_ic_write(struct lpc32xx_irq_chip * ic,u32 reg,u32 val)45 static inline void lpc32xx_ic_write(struct lpc32xx_irq_chip *ic,
46 u32 reg, u32 val)
47 {
48 writel_relaxed(val, ic->base + reg);
49 }
50
lpc32xx_irq_mask(struct irq_data * d)51 static void lpc32xx_irq_mask(struct irq_data *d)
52 {
53 struct lpc32xx_irq_chip *ic = irq_data_get_irq_chip_data(d);
54 u32 val, mask = BIT(d->hwirq);
55
56 val = lpc32xx_ic_read(ic, LPC32XX_INTC_MASK) & ~mask;
57 lpc32xx_ic_write(ic, LPC32XX_INTC_MASK, val);
58 }
59
lpc32xx_irq_unmask(struct irq_data * d)60 static void lpc32xx_irq_unmask(struct irq_data *d)
61 {
62 struct lpc32xx_irq_chip *ic = irq_data_get_irq_chip_data(d);
63 u32 val, mask = BIT(d->hwirq);
64
65 val = lpc32xx_ic_read(ic, LPC32XX_INTC_MASK) | mask;
66 lpc32xx_ic_write(ic, LPC32XX_INTC_MASK, val);
67 }
68
lpc32xx_irq_ack(struct irq_data * d)69 static void lpc32xx_irq_ack(struct irq_data *d)
70 {
71 struct lpc32xx_irq_chip *ic = irq_data_get_irq_chip_data(d);
72 u32 mask = BIT(d->hwirq);
73
74 lpc32xx_ic_write(ic, LPC32XX_INTC_RAW, mask);
75 }
76
lpc32xx_irq_set_type(struct irq_data * d,unsigned int type)77 static int lpc32xx_irq_set_type(struct irq_data *d, unsigned int type)
78 {
79 struct lpc32xx_irq_chip *ic = irq_data_get_irq_chip_data(d);
80 u32 val, mask = BIT(d->hwirq);
81 bool high, edge;
82
83 switch (type) {
84 case IRQ_TYPE_EDGE_RISING:
85 edge = true;
86 high = true;
87 break;
88 case IRQ_TYPE_EDGE_FALLING:
89 edge = true;
90 high = false;
91 break;
92 case IRQ_TYPE_LEVEL_HIGH:
93 edge = false;
94 high = true;
95 break;
96 case IRQ_TYPE_LEVEL_LOW:
97 edge = false;
98 high = false;
99 break;
100 default:
101 pr_info("unsupported irq type %d\n", type);
102 return -EINVAL;
103 }
104
105 irqd_set_trigger_type(d, type);
106
107 val = lpc32xx_ic_read(ic, LPC32XX_INTC_POL);
108 if (high)
109 val |= mask;
110 else
111 val &= ~mask;
112 lpc32xx_ic_write(ic, LPC32XX_INTC_POL, val);
113
114 val = lpc32xx_ic_read(ic, LPC32XX_INTC_TYPE);
115 if (edge) {
116 val |= mask;
117 irq_set_handler_locked(d, handle_edge_irq);
118 } else {
119 val &= ~mask;
120 irq_set_handler_locked(d, handle_level_irq);
121 }
122 lpc32xx_ic_write(ic, LPC32XX_INTC_TYPE, val);
123
124 return 0;
125 }
126
lpc32xx_handle_irq(struct pt_regs * regs)127 static void __exception_irq_entry lpc32xx_handle_irq(struct pt_regs *regs)
128 {
129 struct lpc32xx_irq_chip *ic = lpc32xx_mic_irqc;
130 u32 hwirq = lpc32xx_ic_read(ic, LPC32XX_INTC_STAT), irq;
131
132 while (hwirq) {
133 irq = __ffs(hwirq);
134 hwirq &= ~BIT(irq);
135 handle_domain_irq(lpc32xx_mic_irqc->domain, irq, regs);
136 }
137 }
138
lpc32xx_sic_handler(struct irq_desc * desc)139 static void lpc32xx_sic_handler(struct irq_desc *desc)
140 {
141 struct lpc32xx_irq_chip *ic = irq_desc_get_handler_data(desc);
142 struct irq_chip *chip = irq_desc_get_chip(desc);
143 u32 hwirq = lpc32xx_ic_read(ic, LPC32XX_INTC_STAT), irq;
144
145 chained_irq_enter(chip, desc);
146
147 while (hwirq) {
148 irq = __ffs(hwirq);
149 hwirq &= ~BIT(irq);
150 generic_handle_irq(irq_find_mapping(ic->domain, irq));
151 }
152
153 chained_irq_exit(chip, desc);
154 }
155
lpc32xx_irq_domain_map(struct irq_domain * id,unsigned int virq,irq_hw_number_t hw)156 static int lpc32xx_irq_domain_map(struct irq_domain *id, unsigned int virq,
157 irq_hw_number_t hw)
158 {
159 struct lpc32xx_irq_chip *ic = id->host_data;
160
161 irq_set_chip_data(virq, ic);
162 irq_set_chip_and_handler(virq, &ic->chip, handle_level_irq);
163 irq_set_status_flags(virq, IRQ_LEVEL);
164 irq_set_noprobe(virq);
165
166 return 0;
167 }
168
lpc32xx_irq_domain_unmap(struct irq_domain * id,unsigned int virq)169 static void lpc32xx_irq_domain_unmap(struct irq_domain *id, unsigned int virq)
170 {
171 irq_set_chip_and_handler(virq, NULL, NULL);
172 }
173
174 static const struct irq_domain_ops lpc32xx_irq_domain_ops = {
175 .map = lpc32xx_irq_domain_map,
176 .unmap = lpc32xx_irq_domain_unmap,
177 .xlate = irq_domain_xlate_twocell,
178 };
179
lpc32xx_of_ic_init(struct device_node * node,struct device_node * parent)180 static int __init lpc32xx_of_ic_init(struct device_node *node,
181 struct device_node *parent)
182 {
183 struct lpc32xx_irq_chip *irqc;
184 bool is_mic = of_device_is_compatible(node, "nxp,lpc3220-mic");
185 const __be32 *reg = of_get_property(node, "reg", NULL);
186 u32 parent_irq, i, addr = reg ? be32_to_cpu(*reg) : 0;
187
188 irqc = kzalloc(sizeof(*irqc), GFP_KERNEL);
189 if (!irqc)
190 return -ENOMEM;
191
192 irqc->base = of_iomap(node, 0);
193 if (!irqc->base) {
194 pr_err("%pOF: unable to map registers\n", node);
195 kfree(irqc);
196 return -EINVAL;
197 }
198
199 irqc->chip.irq_ack = lpc32xx_irq_ack;
200 irqc->chip.irq_mask = lpc32xx_irq_mask;
201 irqc->chip.irq_unmask = lpc32xx_irq_unmask;
202 irqc->chip.irq_set_type = lpc32xx_irq_set_type;
203 if (is_mic)
204 irqc->chip.name = kasprintf(GFP_KERNEL, "%08x.mic", addr);
205 else
206 irqc->chip.name = kasprintf(GFP_KERNEL, "%08x.sic", addr);
207
208 irqc->domain = irq_domain_add_linear(node, NR_LPC32XX_IC_IRQS,
209 &lpc32xx_irq_domain_ops, irqc);
210 if (!irqc->domain) {
211 pr_err("unable to add irq domain\n");
212 iounmap(irqc->base);
213 kfree(irqc->chip.name);
214 kfree(irqc);
215 return -ENODEV;
216 }
217
218 if (is_mic) {
219 lpc32xx_mic_irqc = irqc;
220 set_handle_irq(lpc32xx_handle_irq);
221 } else {
222 for (i = 0; i < of_irq_count(node); i++) {
223 parent_irq = irq_of_parse_and_map(node, i);
224 if (parent_irq)
225 irq_set_chained_handler_and_data(parent_irq,
226 lpc32xx_sic_handler, irqc);
227 }
228 }
229
230 lpc32xx_ic_write(irqc, LPC32XX_INTC_MASK, 0x00);
231 lpc32xx_ic_write(irqc, LPC32XX_INTC_POL, 0x00);
232 lpc32xx_ic_write(irqc, LPC32XX_INTC_TYPE, 0x00);
233
234 return 0;
235 }
236
237 IRQCHIP_DECLARE(nxp_lpc32xx_mic, "nxp,lpc3220-mic", lpc32xx_of_ic_init);
238 IRQCHIP_DECLARE(nxp_lpc32xx_sic, "nxp,lpc3220-sic", lpc32xx_of_ic_init);
239