drivers/irqchip/irq-alpine-msi.c

   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
  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
  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
  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
  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
  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
 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
 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
 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
 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
 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);