Merge tag 'mmc-v4.20' of git://git.kernel.org/pub/scm/linux/kernel/git/ulfh/mmc
[sfrench/cifs-2.6.git] / drivers / pinctrl / mediatek / mtk-eint.c
1 // SPDX-License-Identifier: GPL-2.0
2 // Copyright (c) 2014-2018 MediaTek Inc.
3
4 /*
5  * Library for MediaTek External Interrupt Support
6  *
7  * Author: Maoguang Meng <maoguang.meng@mediatek.com>
8  *         Sean Wang <sean.wang@mediatek.com>
9  *
10  */
11
12 #include <linux/delay.h>
13 #include <linux/err.h>
14 #include <linux/gpio.h>
15 #include <linux/io.h>
16 #include <linux/irqchip/chained_irq.h>
17 #include <linux/irqdomain.h>
18 #include <linux/of_irq.h>
19 #include <linux/platform_device.h>
20
21 #include "mtk-eint.h"
22
23 #define MTK_EINT_EDGE_SENSITIVE           0
24 #define MTK_EINT_LEVEL_SENSITIVE          1
25 #define MTK_EINT_DBNC_SET_DBNC_BITS       4
26 #define MTK_EINT_DBNC_RST_BIT             (0x1 << 1)
27 #define MTK_EINT_DBNC_SET_EN              (0x1 << 0)
28
29 static const struct mtk_eint_regs mtk_generic_eint_regs = {
30         .stat      = 0x000,
31         .ack       = 0x040,
32         .mask      = 0x080,
33         .mask_set  = 0x0c0,
34         .mask_clr  = 0x100,
35         .sens      = 0x140,
36         .sens_set  = 0x180,
37         .sens_clr  = 0x1c0,
38         .soft      = 0x200,
39         .soft_set  = 0x240,
40         .soft_clr  = 0x280,
41         .pol       = 0x300,
42         .pol_set   = 0x340,
43         .pol_clr   = 0x380,
44         .dom_en    = 0x400,
45         .dbnc_ctrl = 0x500,
46         .dbnc_set  = 0x600,
47         .dbnc_clr  = 0x700,
48 };
49
50 static void __iomem *mtk_eint_get_offset(struct mtk_eint *eint,
51                                          unsigned int eint_num,
52                                          unsigned int offset)
53 {
54         unsigned int eint_base = 0;
55         void __iomem *reg;
56
57         if (eint_num >= eint->hw->ap_num)
58                 eint_base = eint->hw->ap_num;
59
60         reg = eint->base + offset + ((eint_num - eint_base) / 32) * 4;
61
62         return reg;
63 }
64
65 static unsigned int mtk_eint_can_en_debounce(struct mtk_eint *eint,
66                                              unsigned int eint_num)
67 {
68         unsigned int sens;
69         unsigned int bit = BIT(eint_num % 32);
70         void __iomem *reg = mtk_eint_get_offset(eint, eint_num,
71                                                 eint->regs->sens);
72
73         if (readl(reg) & bit)
74                 sens = MTK_EINT_LEVEL_SENSITIVE;
75         else
76                 sens = MTK_EINT_EDGE_SENSITIVE;
77
78         if (eint_num < eint->hw->db_cnt && sens != MTK_EINT_EDGE_SENSITIVE)
79                 return 1;
80         else
81                 return 0;
82 }
83
84 static int mtk_eint_flip_edge(struct mtk_eint *eint, int hwirq)
85 {
86         int start_level, curr_level;
87         unsigned int reg_offset;
88         u32 mask = BIT(hwirq & 0x1f);
89         u32 port = (hwirq >> 5) & eint->hw->port_mask;
90         void __iomem *reg = eint->base + (port << 2);
91
92         curr_level = eint->gpio_xlate->get_gpio_state(eint->pctl, hwirq);
93
94         do {
95                 start_level = curr_level;
96                 if (start_level)
97                         reg_offset = eint->regs->pol_clr;
98                 else
99                         reg_offset = eint->regs->pol_set;
100                 writel(mask, reg + reg_offset);
101
102                 curr_level = eint->gpio_xlate->get_gpio_state(eint->pctl,
103                                                               hwirq);
104         } while (start_level != curr_level);
105
106         return start_level;
107 }
108
109 static void mtk_eint_mask(struct irq_data *d)
110 {
111         struct mtk_eint *eint = irq_data_get_irq_chip_data(d);
112         u32 mask = BIT(d->hwirq & 0x1f);
113         void __iomem *reg = mtk_eint_get_offset(eint, d->hwirq,
114                                                 eint->regs->mask_set);
115
116         writel(mask, reg);
117 }
118
119 static void mtk_eint_unmask(struct irq_data *d)
120 {
121         struct mtk_eint *eint = irq_data_get_irq_chip_data(d);
122         u32 mask = BIT(d->hwirq & 0x1f);
123         void __iomem *reg = mtk_eint_get_offset(eint, d->hwirq,
124                                                 eint->regs->mask_clr);
125
126         writel(mask, reg);
127
128         if (eint->dual_edge[d->hwirq])
129                 mtk_eint_flip_edge(eint, d->hwirq);
130 }
131
132 static unsigned int mtk_eint_get_mask(struct mtk_eint *eint,
133                                       unsigned int eint_num)
134 {
135         unsigned int bit = BIT(eint_num % 32);
136         void __iomem *reg = mtk_eint_get_offset(eint, eint_num,
137                                                 eint->regs->mask);
138
139         return !!(readl(reg) & bit);
140 }
141
142 static void mtk_eint_ack(struct irq_data *d)
143 {
144         struct mtk_eint *eint = irq_data_get_irq_chip_data(d);
145         u32 mask = BIT(d->hwirq & 0x1f);
146         void __iomem *reg = mtk_eint_get_offset(eint, d->hwirq,
147                                                 eint->regs->ack);
148
149         writel(mask, reg);
150 }
151
152 static int mtk_eint_set_type(struct irq_data *d, unsigned int type)
153 {
154         struct mtk_eint *eint = irq_data_get_irq_chip_data(d);
155         u32 mask = BIT(d->hwirq & 0x1f);
156         void __iomem *reg;
157
158         if (((type & IRQ_TYPE_EDGE_BOTH) && (type & IRQ_TYPE_LEVEL_MASK)) ||
159             ((type & IRQ_TYPE_LEVEL_MASK) == IRQ_TYPE_LEVEL_MASK)) {
160                 dev_err(eint->dev,
161                         "Can't configure IRQ%d (EINT%lu) for type 0x%X\n",
162                         d->irq, d->hwirq, type);
163                 return -EINVAL;
164         }
165
166         if ((type & IRQ_TYPE_EDGE_BOTH) == IRQ_TYPE_EDGE_BOTH)
167                 eint->dual_edge[d->hwirq] = 1;
168         else
169                 eint->dual_edge[d->hwirq] = 0;
170
171         if (type & (IRQ_TYPE_LEVEL_LOW | IRQ_TYPE_EDGE_FALLING)) {
172                 reg = mtk_eint_get_offset(eint, d->hwirq, eint->regs->pol_clr);
173                 writel(mask, reg);
174         } else {
175                 reg = mtk_eint_get_offset(eint, d->hwirq, eint->regs->pol_set);
176                 writel(mask, reg);
177         }
178
179         if (type & (IRQ_TYPE_EDGE_RISING | IRQ_TYPE_EDGE_FALLING)) {
180                 reg = mtk_eint_get_offset(eint, d->hwirq, eint->regs->sens_clr);
181                 writel(mask, reg);
182         } else {
183                 reg = mtk_eint_get_offset(eint, d->hwirq, eint->regs->sens_set);
184                 writel(mask, reg);
185         }
186
187         if (eint->dual_edge[d->hwirq])
188                 mtk_eint_flip_edge(eint, d->hwirq);
189
190         return 0;
191 }
192
193 static int mtk_eint_irq_set_wake(struct irq_data *d, unsigned int on)
194 {
195         struct mtk_eint *eint = irq_data_get_irq_chip_data(d);
196         int shift = d->hwirq & 0x1f;
197         int reg = d->hwirq >> 5;
198
199         if (on)
200                 eint->wake_mask[reg] |= BIT(shift);
201         else
202                 eint->wake_mask[reg] &= ~BIT(shift);
203
204         return 0;
205 }
206
207 static void mtk_eint_chip_write_mask(const struct mtk_eint *eint,
208                                      void __iomem *base, u32 *buf)
209 {
210         int port;
211         void __iomem *reg;
212
213         for (port = 0; port < eint->hw->ports; port++) {
214                 reg = base + (port << 2);
215                 writel_relaxed(~buf[port], reg + eint->regs->mask_set);
216                 writel_relaxed(buf[port], reg + eint->regs->mask_clr);
217         }
218 }
219
220 static void mtk_eint_chip_read_mask(const struct mtk_eint *eint,
221                                     void __iomem *base, u32 *buf)
222 {
223         int port;
224         void __iomem *reg;
225
226         for (port = 0; port < eint->hw->ports; port++) {
227                 reg = base + eint->regs->mask + (port << 2);
228                 buf[port] = ~readl_relaxed(reg);
229                 /* Mask is 0 when irq is enabled, and 1 when disabled. */
230         }
231 }
232
233 static int mtk_eint_irq_request_resources(struct irq_data *d)
234 {
235         struct mtk_eint *eint = irq_data_get_irq_chip_data(d);
236         struct gpio_chip *gpio_c;
237         unsigned int gpio_n;
238         int err;
239
240         err = eint->gpio_xlate->get_gpio_n(eint->pctl, d->hwirq,
241                                            &gpio_n, &gpio_c);
242         if (err < 0) {
243                 dev_err(eint->dev, "Can not find pin\n");
244                 return err;
245         }
246
247         err = gpiochip_lock_as_irq(gpio_c, gpio_n);
248         if (err < 0) {
249                 dev_err(eint->dev, "unable to lock HW IRQ %lu for IRQ\n",
250                         irqd_to_hwirq(d));
251                 return err;
252         }
253
254         err = eint->gpio_xlate->set_gpio_as_eint(eint->pctl, d->hwirq);
255         if (err < 0) {
256                 dev_err(eint->dev, "Can not eint mode\n");
257                 return err;
258         }
259
260         return 0;
261 }
262
263 static void mtk_eint_irq_release_resources(struct irq_data *d)
264 {
265         struct mtk_eint *eint = irq_data_get_irq_chip_data(d);
266         struct gpio_chip *gpio_c;
267         unsigned int gpio_n;
268
269         eint->gpio_xlate->get_gpio_n(eint->pctl, d->hwirq, &gpio_n,
270                                      &gpio_c);
271
272         gpiochip_unlock_as_irq(gpio_c, gpio_n);
273 }
274
275 static struct irq_chip mtk_eint_irq_chip = {
276         .name = "mt-eint",
277         .irq_disable = mtk_eint_mask,
278         .irq_mask = mtk_eint_mask,
279         .irq_unmask = mtk_eint_unmask,
280         .irq_ack = mtk_eint_ack,
281         .irq_set_type = mtk_eint_set_type,
282         .irq_set_wake = mtk_eint_irq_set_wake,
283         .irq_request_resources = mtk_eint_irq_request_resources,
284         .irq_release_resources = mtk_eint_irq_release_resources,
285 };
286
287 static unsigned int mtk_eint_hw_init(struct mtk_eint *eint)
288 {
289         void __iomem *reg = eint->base + eint->regs->dom_en;
290         unsigned int i;
291
292         for (i = 0; i < eint->hw->ap_num; i += 32) {
293                 writel(0xffffffff, reg);
294                 reg += 4;
295         }
296
297         return 0;
298 }
299
300 static inline void
301 mtk_eint_debounce_process(struct mtk_eint *eint, int index)
302 {
303         unsigned int rst, ctrl_offset;
304         unsigned int bit, dbnc;
305
306         ctrl_offset = (index / 4) * 4 + eint->regs->dbnc_ctrl;
307         dbnc = readl(eint->base + ctrl_offset);
308         bit = MTK_EINT_DBNC_SET_EN << ((index % 4) * 8);
309         if ((bit & dbnc) > 0) {
310                 ctrl_offset = (index / 4) * 4 + eint->regs->dbnc_set;
311                 rst = MTK_EINT_DBNC_RST_BIT << ((index % 4) * 8);
312                 writel(rst, eint->base + ctrl_offset);
313         }
314 }
315
316 static void mtk_eint_irq_handler(struct irq_desc *desc)
317 {
318         struct irq_chip *chip = irq_desc_get_chip(desc);
319         struct mtk_eint *eint = irq_desc_get_handler_data(desc);
320         unsigned int status, eint_num;
321         int offset, index, virq;
322         void __iomem *reg =  mtk_eint_get_offset(eint, 0, eint->regs->stat);
323         int dual_edge, start_level, curr_level;
324
325         chained_irq_enter(chip, desc);
326         for (eint_num = 0; eint_num < eint->hw->ap_num; eint_num += 32,
327              reg += 4) {
328                 status = readl(reg);
329                 while (status) {
330                         offset = __ffs(status);
331                         index = eint_num + offset;
332                         virq = irq_find_mapping(eint->domain, index);
333                         status &= ~BIT(offset);
334
335                         dual_edge = eint->dual_edge[index];
336                         if (dual_edge) {
337                                 /*
338                                  * Clear soft-irq in case we raised it last
339                                  * time.
340                                  */
341                                 writel(BIT(offset), reg - eint->regs->stat +
342                                        eint->regs->soft_clr);
343
344                                 start_level =
345                                 eint->gpio_xlate->get_gpio_state(eint->pctl,
346                                                                  index);
347                         }
348
349                         generic_handle_irq(virq);
350
351                         if (dual_edge) {
352                                 curr_level = mtk_eint_flip_edge(eint, index);
353
354                                 /*
355                                  * If level changed, we might lost one edge
356                                  * interrupt, raised it through soft-irq.
357                                  */
358                                 if (start_level != curr_level)
359                                         writel(BIT(offset), reg -
360                                                eint->regs->stat +
361                                                eint->regs->soft_set);
362                         }
363
364                         if (index < eint->hw->db_cnt)
365                                 mtk_eint_debounce_process(eint, index);
366                 }
367         }
368         chained_irq_exit(chip, desc);
369 }
370
371 int mtk_eint_do_suspend(struct mtk_eint *eint)
372 {
373         mtk_eint_chip_read_mask(eint, eint->base, eint->cur_mask);
374         mtk_eint_chip_write_mask(eint, eint->base, eint->wake_mask);
375
376         return 0;
377 }
378
379 int mtk_eint_do_resume(struct mtk_eint *eint)
380 {
381         mtk_eint_chip_write_mask(eint, eint->base, eint->cur_mask);
382
383         return 0;
384 }
385
386 int mtk_eint_set_debounce(struct mtk_eint *eint, unsigned long eint_num,
387                           unsigned int debounce)
388 {
389         int virq, eint_offset;
390         unsigned int set_offset, bit, clr_bit, clr_offset, rst, i, unmask,
391                      dbnc;
392         static const unsigned int debounce_time[] = {500, 1000, 16000, 32000,
393                                                      64000, 128000, 256000};
394         struct irq_data *d;
395
396         virq = irq_find_mapping(eint->domain, eint_num);
397         eint_offset = (eint_num % 4) * 8;
398         d = irq_get_irq_data(virq);
399
400         set_offset = (eint_num / 4) * 4 + eint->regs->dbnc_set;
401         clr_offset = (eint_num / 4) * 4 + eint->regs->dbnc_clr;
402
403         if (!mtk_eint_can_en_debounce(eint, eint_num))
404                 return -EINVAL;
405
406         dbnc = ARRAY_SIZE(debounce_time);
407         for (i = 0; i < ARRAY_SIZE(debounce_time); i++) {
408                 if (debounce <= debounce_time[i]) {
409                         dbnc = i;
410                         break;
411                 }
412         }
413
414         if (!mtk_eint_get_mask(eint, eint_num)) {
415                 mtk_eint_mask(d);
416                 unmask = 1;
417         } else {
418                 unmask = 0;
419         }
420
421         clr_bit = 0xff << eint_offset;
422         writel(clr_bit, eint->base + clr_offset);
423
424         bit = ((dbnc << MTK_EINT_DBNC_SET_DBNC_BITS) | MTK_EINT_DBNC_SET_EN) <<
425                 eint_offset;
426         rst = MTK_EINT_DBNC_RST_BIT << eint_offset;
427         writel(rst | bit, eint->base + set_offset);
428
429         /*
430          * Delay a while (more than 2T) to wait for hw debounce counter reset
431          * work correctly.
432          */
433         udelay(1);
434         if (unmask == 1)
435                 mtk_eint_unmask(d);
436
437         return 0;
438 }
439
440 int mtk_eint_find_irq(struct mtk_eint *eint, unsigned long eint_n)
441 {
442         int irq;
443
444         irq = irq_find_mapping(eint->domain, eint_n);
445         if (!irq)
446                 return -EINVAL;
447
448         return irq;
449 }
450
451 int mtk_eint_do_init(struct mtk_eint *eint)
452 {
453         int i;
454
455         /* If clients don't assign a specific regs, let's use generic one */
456         if (!eint->regs)
457                 eint->regs = &mtk_generic_eint_regs;
458
459         eint->wake_mask = devm_kcalloc(eint->dev, eint->hw->ports,
460                                        sizeof(*eint->wake_mask), GFP_KERNEL);
461         if (!eint->wake_mask)
462                 return -ENOMEM;
463
464         eint->cur_mask = devm_kcalloc(eint->dev, eint->hw->ports,
465                                       sizeof(*eint->cur_mask), GFP_KERNEL);
466         if (!eint->cur_mask)
467                 return -ENOMEM;
468
469         eint->dual_edge = devm_kcalloc(eint->dev, eint->hw->ap_num,
470                                        sizeof(int), GFP_KERNEL);
471         if (!eint->dual_edge)
472                 return -ENOMEM;
473
474         eint->domain = irq_domain_add_linear(eint->dev->of_node,
475                                              eint->hw->ap_num,
476                                              &irq_domain_simple_ops, NULL);
477         if (!eint->domain)
478                 return -ENOMEM;
479
480         mtk_eint_hw_init(eint);
481         for (i = 0; i < eint->hw->ap_num; i++) {
482                 int virq = irq_create_mapping(eint->domain, i);
483
484                 irq_set_chip_and_handler(virq, &mtk_eint_irq_chip,
485                                          handle_level_irq);
486                 irq_set_chip_data(virq, eint);
487         }
488
489         irq_set_chained_handler_and_data(eint->irq, mtk_eint_irq_handler,
490                                          eint);
491
492         return 0;
493 }