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