1/*
2 * Copyright (C) 2017 Marvell
3 *
4 * Thomas Petazzoni <thomas.petazzoni@free-electrons.com>
5 *
6 * This file is licensed under the terms of the GNU General Public
7 * License version 2. This program is licensed "as is" without any
8 * warranty of any kind, whether express or implied.
9 */
10
11#include <linux/io.h>
12#include <linux/irq.h>
13#include <linux/irqdomain.h>
14#include <linux/msi.h>
15#include <linux/of.h>
16#include <linux/of_irq.h>
17#include <linux/of_platform.h>
18#include <linux/platform_device.h>
19
20#include <dt-bindings/interrupt-controller/arm-gic.h>
21
22#define GICP_SETSPI_NSR_OFFSET 0x0
23#define GICP_CLRSPI_NSR_OFFSET 0x8
24
25struct mvebu_gicp_spi_range {
26 unsigned int start;
27 unsigned int count;
28};
29
30struct mvebu_gicp {
31 struct mvebu_gicp_spi_range *spi_ranges;
32 unsigned int spi_ranges_cnt;
33 unsigned int spi_cnt;
34 unsigned long *spi_bitmap;
35 spinlock_t spi_lock;
36 struct resource *res;
37 struct device *dev;
38};
39
40static int gicp_idx_to_spi(struct mvebu_gicp *gicp, int idx)
41{
42 int i;
43
44 for (i = 0; i < gicp->spi_ranges_cnt; i++) {
45 struct mvebu_gicp_spi_range *r = &gicp->spi_ranges[i];
46
47 if (idx < r->count)
48 return r->start + idx;
49
50 idx -= r->count;
51 }
52
53 return -EINVAL;
54}
55
56static void gicp_compose_msi_msg(struct irq_data *data, struct msi_msg *msg)
57{
58 struct mvebu_gicp *gicp = data->chip_data;
59 phys_addr_t setspi = gicp->res->start + GICP_SETSPI_NSR_OFFSET;
60 phys_addr_t clrspi = gicp->res->start + GICP_CLRSPI_NSR_OFFSET;
61
62 msg[0].data = data->hwirq;
63 msg[0].address_lo = lower_32_bits(setspi);
64 msg[0].address_hi = upper_32_bits(setspi);
65 msg[1].data = data->hwirq;
66 msg[1].address_lo = lower_32_bits(clrspi);
67 msg[1].address_hi = upper_32_bits(clrspi);
68}
69
70static struct irq_chip gicp_irq_chip = {
71 .name = "GICP",
72 .irq_mask = irq_chip_mask_parent,
73 .irq_unmask = irq_chip_unmask_parent,
74 .irq_eoi = irq_chip_eoi_parent,
75 .irq_set_affinity = irq_chip_set_affinity_parent,
76 .irq_set_type = irq_chip_set_type_parent,
77 .irq_compose_msi_msg = gicp_compose_msi_msg,
78};
79
80static int gicp_irq_domain_alloc(struct irq_domain *domain, unsigned int virq,
81 unsigned int nr_irqs, void *args)
82{
83 struct mvebu_gicp *gicp = domain->host_data;
84 struct irq_fwspec fwspec;
85 unsigned int hwirq;
86 int ret;
87
88 spin_lock(lock: &gicp->spi_lock);
89 hwirq = find_first_zero_bit(addr: gicp->spi_bitmap, size: gicp->spi_cnt);
90 if (hwirq == gicp->spi_cnt) {
91 spin_unlock(lock: &gicp->spi_lock);
92 return -ENOSPC;
93 }
94 __set_bit(hwirq, gicp->spi_bitmap);
95 spin_unlock(lock: &gicp->spi_lock);
96
97 fwspec.fwnode = domain->parent->fwnode;
98 fwspec.param_count = 3;
99 fwspec.param[0] = GIC_SPI;
100 fwspec.param[1] = gicp_idx_to_spi(gicp, idx: hwirq) - 32;
101 /*
102 * Assume edge rising for now, it will be properly set when
103 * ->set_type() is called
104 */
105 fwspec.param[2] = IRQ_TYPE_EDGE_RISING;
106
107 ret = irq_domain_alloc_irqs_parent(domain, irq_base: virq, nr_irqs: 1, arg: &fwspec);
108 if (ret) {
109 dev_err(gicp->dev, "Cannot allocate parent IRQ\n");
110 goto free_hwirq;
111 }
112
113 ret = irq_domain_set_hwirq_and_chip(domain, virq, hwirq,
114 chip: &gicp_irq_chip, chip_data: gicp);
115 if (ret)
116 goto free_irqs_parent;
117
118 return 0;
119
120free_irqs_parent:
121 irq_domain_free_irqs_parent(domain, irq_base: virq, nr_irqs);
122free_hwirq:
123 spin_lock(lock: &gicp->spi_lock);
124 __clear_bit(hwirq, gicp->spi_bitmap);
125 spin_unlock(lock: &gicp->spi_lock);
126 return ret;
127}
128
129static void gicp_irq_domain_free(struct irq_domain *domain,
130 unsigned int virq, unsigned int nr_irqs)
131{
132 struct mvebu_gicp *gicp = domain->host_data;
133 struct irq_data *d = irq_domain_get_irq_data(domain, virq);
134
135 if (d->hwirq >= gicp->spi_cnt) {
136 dev_err(gicp->dev, "Invalid hwirq %lu\n", d->hwirq);
137 return;
138 }
139
140 irq_domain_free_irqs_parent(domain, irq_base: virq, nr_irqs);
141
142 spin_lock(lock: &gicp->spi_lock);
143 __clear_bit(d->hwirq, gicp->spi_bitmap);
144 spin_unlock(lock: &gicp->spi_lock);
145}
146
147static const struct irq_domain_ops gicp_domain_ops = {
148 .alloc = gicp_irq_domain_alloc,
149 .free = gicp_irq_domain_free,
150};
151
152static struct irq_chip gicp_msi_irq_chip = {
153 .name = "GICP",
154 .irq_set_type = irq_chip_set_type_parent,
155 .flags = IRQCHIP_SUPPORTS_LEVEL_MSI,
156};
157
158static struct msi_domain_ops gicp_msi_ops = {
159};
160
161static struct msi_domain_info gicp_msi_domain_info = {
162 .flags = (MSI_FLAG_USE_DEF_DOM_OPS | MSI_FLAG_USE_DEF_CHIP_OPS |
163 MSI_FLAG_LEVEL_CAPABLE),
164 .ops = &gicp_msi_ops,
165 .chip = &gicp_msi_irq_chip,
166};
167
168static int mvebu_gicp_probe(struct platform_device *pdev)
169{
170 struct mvebu_gicp *gicp;
171 struct irq_domain *inner_domain, *plat_domain, *parent_domain;
172 struct device_node *node = pdev->dev.of_node;
173 struct device_node *irq_parent_dn;
174 int ret, i;
175
176 gicp = devm_kzalloc(dev: &pdev->dev, size: sizeof(*gicp), GFP_KERNEL);
177 if (!gicp)
178 return -ENOMEM;
179
180 gicp->dev = &pdev->dev;
181 spin_lock_init(&gicp->spi_lock);
182
183 gicp->res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
184 if (!gicp->res)
185 return -ENODEV;
186
187 ret = of_property_count_u32_elems(np: node, propname: "marvell,spi-ranges");
188 if (ret < 0)
189 return ret;
190
191 gicp->spi_ranges_cnt = ret / 2;
192
193 gicp->spi_ranges =
194 devm_kcalloc(dev: &pdev->dev,
195 n: gicp->spi_ranges_cnt,
196 size: sizeof(struct mvebu_gicp_spi_range),
197 GFP_KERNEL);
198 if (!gicp->spi_ranges)
199 return -ENOMEM;
200
201 for (i = 0; i < gicp->spi_ranges_cnt; i++) {
202 of_property_read_u32_index(np: node, propname: "marvell,spi-ranges",
203 index: i * 2,
204 out_value: &gicp->spi_ranges[i].start);
205
206 of_property_read_u32_index(np: node, propname: "marvell,spi-ranges",
207 index: i * 2 + 1,
208 out_value: &gicp->spi_ranges[i].count);
209
210 gicp->spi_cnt += gicp->spi_ranges[i].count;
211 }
212
213 gicp->spi_bitmap = devm_bitmap_zalloc(dev: &pdev->dev, nbits: gicp->spi_cnt, GFP_KERNEL);
214 if (!gicp->spi_bitmap)
215 return -ENOMEM;
216
217 irq_parent_dn = of_irq_find_parent(child: node);
218 if (!irq_parent_dn) {
219 dev_err(&pdev->dev, "failed to find parent IRQ node\n");
220 return -ENODEV;
221 }
222
223 parent_domain = irq_find_host(node: irq_parent_dn);
224 of_node_put(node: irq_parent_dn);
225 if (!parent_domain) {
226 dev_err(&pdev->dev, "failed to find parent IRQ domain\n");
227 return -ENODEV;
228 }
229
230 inner_domain = irq_domain_create_hierarchy(parent: parent_domain, flags: 0,
231 size: gicp->spi_cnt,
232 fwnode: of_node_to_fwnode(node),
233 ops: &gicp_domain_ops, host_data: gicp);
234 if (!inner_domain)
235 return -ENOMEM;
236
237
238 plat_domain = platform_msi_create_irq_domain(fwnode: of_node_to_fwnode(node),
239 info: &gicp_msi_domain_info,
240 parent: inner_domain);
241 if (!plat_domain) {
242 irq_domain_remove(host: inner_domain);
243 return -ENOMEM;
244 }
245
246 platform_set_drvdata(pdev, data: gicp);
247
248 return 0;
249}
250
251static const struct of_device_id mvebu_gicp_of_match[] = {
252 { .compatible = "marvell,ap806-gicp", },
253 {},
254};
255
256static struct platform_driver mvebu_gicp_driver = {
257 .probe = mvebu_gicp_probe,
258 .driver = {
259 .name = "mvebu-gicp",
260 .of_match_table = mvebu_gicp_of_match,
261 },
262};
263builtin_platform_driver(mvebu_gicp_driver);
264

source code of linux/drivers/irqchip/irq-mvebu-gicp.c