1 /*
2 * Annapurna Labs MSIX support services
3 *
4 * Copyright (C) 2016, Amazon.com, Inc. or its affiliates. All Rights Reserved.
5 *
6 * Antoine Tenart <antoine.tenart@free-electrons.com>
7 *
8 * This file is licensed under the terms of the GNU General Public
9 * License version 2. This program is licensed "as is" without any
10 * warranty of any kind, whether express or implied.
11 */
12
13 #define pr_fmt(fmt) KBUILD_MODNAME ": " fmt
14
15 #include <linux/irqchip.h>
16 #include <linux/irqchip/arm-gic.h>
17 #include <linux/msi.h>
18 #include <linux/of.h>
19 #include <linux/of_address.h>
20 #include <linux/of_irq.h>
21 #include <linux/of_pci.h>
22 #include <linux/pci.h>
23 #include <linux/slab.h>
24
25 #include <asm/irq.h>
26 #include <asm/msi.h>
27
28 /* MSIX message address format: local GIC target */
29 #define ALPINE_MSIX_SPI_TARGET_CLUSTER0 BIT(16)
30
31 struct alpine_msix_data {
32 spinlock_t msi_map_lock;
33 phys_addr_t addr;
34 u32 spi_first; /* The SGI number that MSIs start */
35 u32 num_spis; /* The number of SGIs for MSIs */
36 unsigned long *msi_map;
37 };
38
alpine_msix_mask_msi_irq(struct irq_data * d)39 static void alpine_msix_mask_msi_irq(struct irq_data *d)
40 {
41 pci_msi_mask_irq(d);
42 irq_chip_mask_parent(d);
43 }
44
alpine_msix_unmask_msi_irq(struct irq_data * d)45 static void alpine_msix_unmask_msi_irq(struct irq_data *d)
46 {
47 pci_msi_unmask_irq(d);
48 irq_chip_unmask_parent(d);
49 }
50
51 static struct irq_chip alpine_msix_irq_chip = {
52 .name = "MSIx",
53 .irq_mask = alpine_msix_mask_msi_irq,
54 .irq_unmask = alpine_msix_unmask_msi_irq,
55 .irq_eoi = irq_chip_eoi_parent,
56 .irq_set_affinity = irq_chip_set_affinity_parent,
57 };
58
alpine_msix_allocate_sgi(struct alpine_msix_data * priv,int num_req)59 static int alpine_msix_allocate_sgi(struct alpine_msix_data *priv, int num_req)
60 {
61 int first;
62
63 spin_lock(&priv->msi_map_lock);
64
65 first = bitmap_find_next_zero_area(priv->msi_map, priv->num_spis, 0,
66 num_req, 0);
67 if (first >= priv->num_spis) {
68 spin_unlock(&priv->msi_map_lock);
69 return -ENOSPC;
70 }
71
72 bitmap_set(priv->msi_map, first, num_req);
73
74 spin_unlock(&priv->msi_map_lock);
75
76 return priv->spi_first + first;
77 }
78
alpine_msix_free_sgi(struct alpine_msix_data * priv,unsigned sgi,int num_req)79 static void alpine_msix_free_sgi(struct alpine_msix_data *priv, unsigned sgi,
80 int num_req)
81 {
82 int first = sgi - priv->spi_first;
83
84 spin_lock(&priv->msi_map_lock);
85
86 bitmap_clear(priv->msi_map, first, num_req);
87
88 spin_unlock(&priv->msi_map_lock);
89 }
90
alpine_msix_compose_msi_msg(struct irq_data * data,struct msi_msg * msg)91 static void alpine_msix_compose_msi_msg(struct irq_data *data,
92 struct msi_msg *msg)
93 {
94 struct alpine_msix_data *priv = irq_data_get_irq_chip_data(data);
95 phys_addr_t msg_addr = priv->addr;
96
97 msg_addr |= (data->hwirq << 3);
98
99 msg->address_hi = upper_32_bits(msg_addr);
100 msg->address_lo = lower_32_bits(msg_addr);
101 msg->data = 0;
102 }
103
104 static struct msi_domain_info alpine_msix_domain_info = {
105 .flags = MSI_FLAG_USE_DEF_DOM_OPS | MSI_FLAG_USE_DEF_CHIP_OPS |
106 MSI_FLAG_PCI_MSIX,
107 .chip = &alpine_msix_irq_chip,
108 };
109
110 static struct irq_chip middle_irq_chip = {
111 .name = "alpine_msix_middle",
112 .irq_mask = irq_chip_mask_parent,
113 .irq_unmask = irq_chip_unmask_parent,
114 .irq_eoi = irq_chip_eoi_parent,
115 .irq_set_affinity = irq_chip_set_affinity_parent,
116 .irq_compose_msi_msg = alpine_msix_compose_msi_msg,
117 };
118
alpine_msix_gic_domain_alloc(struct irq_domain * domain,unsigned int virq,int sgi)119 static int alpine_msix_gic_domain_alloc(struct irq_domain *domain,
120 unsigned int virq, int sgi)
121 {
122 struct irq_fwspec fwspec;
123 struct irq_data *d;
124 int ret;
125
126 if (!is_of_node(domain->parent->fwnode))
127 return -EINVAL;
128
129 fwspec.fwnode = domain->parent->fwnode;
130 fwspec.param_count = 3;
131 fwspec.param[0] = 0;
132 fwspec.param[1] = sgi;
133 fwspec.param[2] = IRQ_TYPE_EDGE_RISING;
134
135 ret = irq_domain_alloc_irqs_parent(domain, virq, 1, &fwspec);
136 if (ret)
137 return ret;
138
139 d = irq_domain_get_irq_data(domain->parent, virq);
140 d->chip->irq_set_type(d, IRQ_TYPE_EDGE_RISING);
141
142 return 0;
143 }
144
alpine_msix_middle_domain_alloc(struct irq_domain * domain,unsigned int virq,unsigned int nr_irqs,void * args)145 static int alpine_msix_middle_domain_alloc(struct irq_domain *domain,
146 unsigned int virq,
147 unsigned int nr_irqs, void *args)
148 {
149 struct alpine_msix_data *priv = domain->host_data;
150 int sgi, err, i;
151
152 sgi = alpine_msix_allocate_sgi(priv, nr_irqs);
153 if (sgi < 0)
154 return sgi;
155
156 for (i = 0; i < nr_irqs; i++) {
157 err = alpine_msix_gic_domain_alloc(domain, virq + i, sgi + i);
158 if (err)
159 goto err_sgi;
160
161 irq_domain_set_hwirq_and_chip(domain, virq + i, sgi + i,
162 &middle_irq_chip, priv);
163 }
164
165 return 0;
166
167 err_sgi:
168 irq_domain_free_irqs_parent(domain, virq, i - 1);
169 alpine_msix_free_sgi(priv, sgi, nr_irqs);
170 return err;
171 }
172
alpine_msix_middle_domain_free(struct irq_domain * domain,unsigned int virq,unsigned int nr_irqs)173 static void alpine_msix_middle_domain_free(struct irq_domain *domain,
174 unsigned int virq,
175 unsigned int nr_irqs)
176 {
177 struct irq_data *d = irq_domain_get_irq_data(domain, virq);
178 struct alpine_msix_data *priv = irq_data_get_irq_chip_data(d);
179
180 irq_domain_free_irqs_parent(domain, virq, nr_irqs);
181 alpine_msix_free_sgi(priv, d->hwirq, nr_irqs);
182 }
183
184 static const struct irq_domain_ops alpine_msix_middle_domain_ops = {
185 .alloc = alpine_msix_middle_domain_alloc,
186 .free = alpine_msix_middle_domain_free,
187 };
188
alpine_msix_init_domains(struct alpine_msix_data * priv,struct device_node * node)189 static int alpine_msix_init_domains(struct alpine_msix_data *priv,
190 struct device_node *node)
191 {
192 struct irq_domain *middle_domain, *msi_domain, *gic_domain;
193 struct device_node *gic_node;
194
195 gic_node = of_irq_find_parent(node);
196 if (!gic_node) {
197 pr_err("Failed to find the GIC node\n");
198 return -ENODEV;
199 }
200
201 gic_domain = irq_find_host(gic_node);
202 of_node_put(gic_node);
203 if (!gic_domain) {
204 pr_err("Failed to find the GIC domain\n");
205 return -ENXIO;
206 }
207
208 middle_domain = irq_domain_add_hierarchy(gic_domain, 0, 0, NULL,
209 &alpine_msix_middle_domain_ops,
210 priv);
211 if (!middle_domain) {
212 pr_err("Failed to create the MSIX middle domain\n");
213 return -ENOMEM;
214 }
215
216 msi_domain = pci_msi_create_irq_domain(of_node_to_fwnode(node),
217 &alpine_msix_domain_info,
218 middle_domain);
219 if (!msi_domain) {
220 pr_err("Failed to create MSI domain\n");
221 irq_domain_remove(middle_domain);
222 return -ENOMEM;
223 }
224
225 return 0;
226 }
227
alpine_msix_init(struct device_node * node,struct device_node * parent)228 static int alpine_msix_init(struct device_node *node,
229 struct device_node *parent)
230 {
231 struct alpine_msix_data *priv;
232 struct resource res;
233 int ret;
234
235 priv = kzalloc(sizeof(*priv), GFP_KERNEL);
236 if (!priv)
237 return -ENOMEM;
238
239 spin_lock_init(&priv->msi_map_lock);
240
241 ret = of_address_to_resource(node, 0, &res);
242 if (ret) {
243 pr_err("Failed to allocate resource\n");
244 goto err_priv;
245 }
246
247 /*
248 * The 20 least significant bits of addr provide direct information
249 * regarding the interrupt destination.
250 *
251 * To select the primary GIC as the target GIC, bits [18:17] must be set
252 * to 0x0. In this case, bit 16 (SPI_TARGET_CLUSTER0) must be set.
253 */
254 priv->addr = res.start & GENMASK_ULL(63,20);
255 priv->addr |= ALPINE_MSIX_SPI_TARGET_CLUSTER0;
256
257 if (of_property_read_u32(node, "al,msi-base-spi", &priv->spi_first)) {
258 pr_err("Unable to parse MSI base\n");
259 ret = -EINVAL;
260 goto err_priv;
261 }
262
263 if (of_property_read_u32(node, "al,msi-num-spis", &priv->num_spis)) {
264 pr_err("Unable to parse MSI numbers\n");
265 ret = -EINVAL;
266 goto err_priv;
267 }
268
269 priv->msi_map = bitmap_zalloc(priv->num_spis, GFP_KERNEL);
270 if (!priv->msi_map) {
271 ret = -ENOMEM;
272 goto err_priv;
273 }
274
275 pr_debug("Registering %d msixs, starting at %d\n",
276 priv->num_spis, priv->spi_first);
277
278 ret = alpine_msix_init_domains(priv, node);
279 if (ret)
280 goto err_map;
281
282 return 0;
283
284 err_map:
285 bitmap_free(priv->msi_map);
286 err_priv:
287 kfree(priv);
288 return ret;
289 }
290 IRQCHIP_DECLARE(alpine_msix, "al,alpine-msix", alpine_msix_init);
291