1 /*
2  * Generic Broadcom Set Top Box Level 2 Interrupt controller driver
3  *
4  * Copyright (C) 2014 Broadcom Corporation
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 version 2 as
8  * published by the Free Software Foundation.
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 
16 #define pr_fmt(fmt)	KBUILD_MODNAME	": " fmt
17 
18 #include <linux/init.h>
19 #include <linux/slab.h>
20 #include <linux/module.h>
21 #include <linux/kconfig.h>
22 #include <linux/platform_device.h>
23 #include <linux/spinlock.h>
24 #include <linux/of.h>
25 #include <linux/of_irq.h>
26 #include <linux/of_address.h>
27 #include <linux/of_platform.h>
28 #include <linux/interrupt.h>
29 #include <linux/irq.h>
30 #include <linux/io.h>
31 #include <linux/irqdomain.h>
32 #include <linux/irqchip.h>
33 #include <linux/irqchip/chained_irq.h>
34 
35 /* Register offsets in the L2 interrupt controller */
36 #define CPU_STATUS	0x00
37 #define CPU_SET		0x04
38 #define CPU_CLEAR	0x08
39 #define CPU_MASK_STATUS	0x0c
40 #define CPU_MASK_SET	0x10
41 #define CPU_MASK_CLEAR	0x14
42 
43 /* L2 intc private data structure */
44 struct brcmstb_l2_intc_data {
45 	int parent_irq;
46 	void __iomem *base;
47 	struct irq_domain *domain;
48 	bool can_wake;
49 	u32 saved_mask; /* for suspend/resume */
50 };
51 
52 static void brcmstb_l2_intc_irq_handle(struct irq_desc *desc)
53 {
54 	struct brcmstb_l2_intc_data *b = irq_desc_get_handler_data(desc);
55 	struct irq_chip_generic *gc = irq_get_domain_generic_chip(b->domain, 0);
56 	struct irq_chip *chip = irq_desc_get_chip(desc);
57 	unsigned int irq;
58 	u32 status;
59 
60 	chained_irq_enter(chip, desc);
61 
62 	status = irq_reg_readl(gc, CPU_STATUS) &
63 		~(irq_reg_readl(gc, CPU_MASK_STATUS));
64 
65 	if (status == 0) {
66 		raw_spin_lock(&desc->lock);
67 		handle_bad_irq(desc);
68 		raw_spin_unlock(&desc->lock);
69 		goto out;
70 	}
71 
72 	do {
73 		irq = ffs(status) - 1;
74 		/* ack at our level */
75 		irq_reg_writel(gc, 1 << irq, CPU_CLEAR);
76 		status &= ~(1 << irq);
77 		generic_handle_irq(irq_find_mapping(b->domain, irq));
78 	} while (status);
79 out:
80 	chained_irq_exit(chip, desc);
81 }
82 
83 static void brcmstb_l2_intc_suspend(struct irq_data *d)
84 {
85 	struct irq_chip_generic *gc = irq_data_get_irq_chip_data(d);
86 	struct brcmstb_l2_intc_data *b = gc->private;
87 
88 	irq_gc_lock(gc);
89 	/* Save the current mask */
90 	b->saved_mask = irq_reg_readl(gc, CPU_MASK_STATUS);
91 
92 	if (b->can_wake) {
93 		/* Program the wakeup mask */
94 		irq_reg_writel(gc, ~gc->wake_active, CPU_MASK_SET);
95 		irq_reg_writel(gc, gc->wake_active, CPU_MASK_CLEAR);
96 	}
97 	irq_gc_unlock(gc);
98 }
99 
100 static void brcmstb_l2_intc_resume(struct irq_data *d)
101 {
102 	struct irq_chip_generic *gc = irq_data_get_irq_chip_data(d);
103 	struct brcmstb_l2_intc_data *b = gc->private;
104 
105 	irq_gc_lock(gc);
106 	/* Clear unmasked non-wakeup interrupts */
107 	irq_reg_writel(gc, ~b->saved_mask & ~gc->wake_active, CPU_CLEAR);
108 
109 	/* Restore the saved mask */
110 	irq_reg_writel(gc, b->saved_mask, CPU_MASK_SET);
111 	irq_reg_writel(gc, ~b->saved_mask, CPU_MASK_CLEAR);
112 	irq_gc_unlock(gc);
113 }
114 
115 int __init brcmstb_l2_intc_of_init(struct device_node *np,
116 					struct device_node *parent)
117 {
118 	unsigned int clr = IRQ_NOREQUEST | IRQ_NOPROBE | IRQ_NOAUTOEN;
119 	struct brcmstb_l2_intc_data *data;
120 	struct irq_chip_generic *gc;
121 	struct irq_chip_type *ct;
122 	int ret;
123 	unsigned int flags;
124 
125 	data = kzalloc(sizeof(*data), GFP_KERNEL);
126 	if (!data)
127 		return -ENOMEM;
128 
129 	data->base = of_iomap(np, 0);
130 	if (!data->base) {
131 		pr_err("failed to remap intc L2 registers\n");
132 		ret = -ENOMEM;
133 		goto out_free;
134 	}
135 
136 	/* Disable all interrupts by default */
137 	writel(0xffffffff, data->base + CPU_MASK_SET);
138 
139 	/* Wakeup interrupts may be retained from S5 (cold boot) */
140 	data->can_wake = of_property_read_bool(np, "brcm,irq-can-wake");
141 	if (!data->can_wake)
142 		writel(0xffffffff, data->base + CPU_CLEAR);
143 
144 	data->parent_irq = irq_of_parse_and_map(np, 0);
145 	if (!data->parent_irq) {
146 		pr_err("failed to find parent interrupt\n");
147 		ret = -EINVAL;
148 		goto out_unmap;
149 	}
150 
151 	data->domain = irq_domain_add_linear(np, 32,
152 				&irq_generic_chip_ops, NULL);
153 	if (!data->domain) {
154 		ret = -ENOMEM;
155 		goto out_unmap;
156 	}
157 
158 	/* MIPS chips strapped for BE will automagically configure the
159 	 * peripheral registers for CPU-native byte order.
160 	 */
161 	flags = 0;
162 	if (IS_ENABLED(CONFIG_MIPS) && IS_ENABLED(CONFIG_CPU_BIG_ENDIAN))
163 		flags |= IRQ_GC_BE_IO;
164 
165 	/* Allocate a single Generic IRQ chip for this node */
166 	ret = irq_alloc_domain_generic_chips(data->domain, 32, 1,
167 				np->full_name, handle_edge_irq, clr, 0, flags);
168 	if (ret) {
169 		pr_err("failed to allocate generic irq chip\n");
170 		goto out_free_domain;
171 	}
172 
173 	/* Set the IRQ chaining logic */
174 	irq_set_chained_handler_and_data(data->parent_irq,
175 					 brcmstb_l2_intc_irq_handle, data);
176 
177 	gc = irq_get_domain_generic_chip(data->domain, 0);
178 	gc->reg_base = data->base;
179 	gc->private = data;
180 	ct = gc->chip_types;
181 
182 	ct->chip.irq_ack = irq_gc_ack_set_bit;
183 	ct->regs.ack = CPU_CLEAR;
184 
185 	ct->chip.irq_mask = irq_gc_mask_disable_reg;
186 	ct->regs.disable = CPU_MASK_SET;
187 
188 	ct->chip.irq_unmask = irq_gc_unmask_enable_reg;
189 	ct->regs.enable = CPU_MASK_CLEAR;
190 
191 	ct->chip.irq_suspend = brcmstb_l2_intc_suspend;
192 	ct->chip.irq_resume = brcmstb_l2_intc_resume;
193 
194 	if (data->can_wake) {
195 		/* This IRQ chip can wake the system, set all child interrupts
196 		 * in wake_enabled mask
197 		 */
198 		gc->wake_enabled = 0xffffffff;
199 		ct->chip.irq_set_wake = irq_gc_set_wake;
200 	}
201 
202 	pr_info("registered L2 intc (mem: 0x%p, parent irq: %d)\n",
203 			data->base, data->parent_irq);
204 
205 	return 0;
206 
207 out_free_domain:
208 	irq_domain_remove(data->domain);
209 out_unmap:
210 	iounmap(data->base);
211 out_free:
212 	kfree(data);
213 	return ret;
214 }
215 IRQCHIP_DECLARE(brcmstb_l2_intc, "brcm,l2-intc", brcmstb_l2_intc_of_init);
216