drivers/irqchip/irq-gic-v3.c

   1 /*
   2  * Copyright (C) 2013-2017 ARM Limited, All Rights Reserved.
   3  * Author: Marc Zyngier <marc.zyngier@arm.com>
   4  *
   5  * This program is free software; you can redistribute it and/or modify
   6  * it under the terms of the GNU General Public License version 2 as
   7  * published by the Free Software Foundation.
   8  *
   9  * This program is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  * GNU General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU General Public License
  15  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  16  */
  17
  18 #define pr_fmt(fmt)     "GICv3: " fmt
  19
  20 #include <linux/acpi.h>
  21 #include <linux/cpu.h>
  22 #include <linux/cpu_pm.h>
  23 #include <linux/delay.h>
  24 #include <linux/interrupt.h>
  25 #include <linux/irqdomain.h>
  26 #include <linux/of.h>
  27 #include <linux/of_address.h>
  28 #include <linux/of_irq.h>
  29 #include <linux/percpu.h>
  30 #include <linux/slab.h>
  31
  32 #include <linux/irqchip.h>
  33 #include <linux/irqchip/arm-gic-common.h>
  34 #include <linux/irqchip/arm-gic-v3.h>
  35 #include <linux/irqchip/irq-partition-percpu.h>
  36
  37 #include <asm/cputype.h>
  38 #include <asm/exception.h>
  39 #include <asm/smp_plat.h>
  40 #include <asm/virt.h>
  41
  42 #include "irq-gic-common.h"
  43
  44 struct redist_region {
  45         void __iomem            *redist_base;
  46         phys_addr_t             phys_base;
  47         bool                    single_redist;
  48 };
  49
  50 struct gic_chip_data {
  51         struct fwnode_handle    *fwnode;
  52         void __iomem            *dist_base;
  53         struct redist_region    *redist_regions;
  54         struct rdists           rdists;
  55         struct irq_domain       *domain;
  56         u64                     redist_stride;
  57         u32                     nr_redist_regions;
  58         unsigned int            irq_nr;
  59         struct partition_desc   *ppi_descs[16];
  60 };
  61
  62 static struct gic_chip_data gic_data __read_mostly;
  63 static struct static_key supports_deactivate = STATIC_KEY_INIT_TRUE;
  64
  65 static struct gic_kvm_info gic_v3_kvm_info;
  66
  67 #define gic_data_rdist()                (this_cpu_ptr(gic_data.rdists.rdist))
  68 #define gic_data_rdist_rd_base()        (gic_data_rdist()->rd_base)
  69 #define gic_data_rdist_sgi_base()       (gic_data_rdist_rd_base() + SZ_64K)
  70
  71 /* Our default, arbitrary priority value. Linux only uses one anyway. */
  72 #define DEFAULT_PMR_VALUE       0xf0
  73
  74 static inline unsigned int gic_irq(struct irq_data *d)
  75 {
  76         return d->hwirq;
  77 }
  78
  79 static inline int gic_irq_in_rdist(struct irq_data *d)
  80 {
  81         return gic_irq(d) < 32;
  82 }
  83
  84 static inline void __iomem *gic_dist_base(struct irq_data *d)
  85 {
  86         if (gic_irq_in_rdist(d))        /* SGI+PPI -> SGI_base for this CPU */
  87                 return gic_data_rdist_sgi_base();
  88
  89         if (d->hwirq <= 1023)           /* SPI -> dist_base */
  90                 return gic_data.dist_base;
  91
  92         return NULL;
  93 }
  94
  95 static void gic_do_wait_for_rwp(void __iomem *base)
  96 {
  97         u32 count = 1000000;    /* 1s! */
  98
  99         while (readl_relaxed(base + GICD_CTLR) & GICD_CTLR_RWP) {
 100                 count--;
 101                 if (!count) {
 102                         pr_err_ratelimited("RWP timeout, gone fishing\n");
 103                         return;
 104                 }
 105                 cpu_relax();
 106                 udelay(1);
 107         };
 108 }
 109
 110 /* Wait for completion of a distributor change */
 111 static void gic_dist_wait_for_rwp(void)
 112 {
 113         gic_do_wait_for_rwp(gic_data.dist_base);
 114 }
 115
 116 /* Wait for completion of a redistributor change */
 117 static void gic_redist_wait_for_rwp(void)
 118 {
 119         gic_do_wait_for_rwp(gic_data_rdist_rd_base());
 120 }
 121
 122 #ifdef CONFIG_ARM64
 123
 124 static u64 __maybe_unused gic_read_iar(void)
 125 {
 126         if (cpus_have_const_cap(ARM64_WORKAROUND_CAVIUM_23154))
 127                 return gic_read_iar_cavium_thunderx();
 128         else
 129                 return gic_read_iar_common();
 130 }
 131 #endif
 132
 133 static void gic_enable_redist(bool enable)
 134 {
 135         void __iomem *rbase;
 136         u32 count = 1000000;    /* 1s! */
 137         u32 val;
 138
 139         rbase = gic_data_rdist_rd_base();
 140
 141         val = readl_relaxed(rbase + GICR_WAKER);
 142         if (enable)
 143                 /* Wake up this CPU redistributor */
 144                 val &= ~GICR_WAKER_ProcessorSleep;
 145         else
 146                 val |= GICR_WAKER_ProcessorSleep;
 147         writel_relaxed(val, rbase + GICR_WAKER);
 148
 149         if (!enable) {          /* Check that GICR_WAKER is writeable */
 150                 val = readl_relaxed(rbase + GICR_WAKER);
 151                 if (!(val & GICR_WAKER_ProcessorSleep))
 152                         return; /* No PM support in this redistributor */
 153         }
 154
 155         while (--count) {
 156                 val = readl_relaxed(rbase + GICR_WAKER);
 157                 if (enable ^ (bool)(val & GICR_WAKER_ChildrenAsleep))
 158                         break;
 159                 cpu_relax();
 160                 udelay(1);
 161         };
 162         if (!count)
 163                 pr_err_ratelimited("redistributor failed to %s...\n",
 164                                    enable ? "wakeup" : "sleep");
 165 }
 166
 167 /*
 168  * Routines to disable, enable, EOI and route interrupts
 169  */
 170 static int gic_peek_irq(struct irq_data *d, u32 offset)
 171 {
 172         u32 mask = 1 << (gic_irq(d) % 32);
 173         void __iomem *base;
 174
 175         if (gic_irq_in_rdist(d))
 176                 base = gic_data_rdist_sgi_base();
 177         else
 178                 base = gic_data.dist_base;
 179
 180         return !!(readl_relaxed(base + offset + (gic_irq(d) / 32) * 4) & mask);
 181 }
 182
 183 static void gic_poke_irq(struct irq_data *d, u32 offset)
 184 {
 185         u32 mask = 1 << (gic_irq(d) % 32);
 186         void (*rwp_wait)(void);
 187         void __iomem *base;
 188
 189         if (gic_irq_in_rdist(d)) {
 190                 base = gic_data_rdist_sgi_base();
 191                 rwp_wait = gic_redist_wait_for_rwp;
 192         } else {
 193                 base = gic_data.dist_base;
 194                 rwp_wait = gic_dist_wait_for_rwp;
 195         }
 196
 197         writel_relaxed(mask, base + offset + (gic_irq(d) / 32) * 4);
 198         rwp_wait();
 199 }
 200
 201 static void gic_mask_irq(struct irq_data *d)
 202 {
 203         gic_poke_irq(d, GICD_ICENABLER);
 204 }
 205
 206 static void gic_eoimode1_mask_irq(struct irq_data *d)
 207 {
 208         gic_mask_irq(d);
 209         /*
 210          * When masking a forwarded interrupt, make sure it is
 211          * deactivated as well.
 212          *
 213          * This ensures that an interrupt that is getting
 214          * disabled/masked will not get "stuck", because there is
 215          * noone to deactivate it (guest is being terminated).
 216          */
 217         if (irqd_is_forwarded_to_vcpu(d))
 218                 gic_poke_irq(d, GICD_ICACTIVER);
 219 }
 220
 221 static void gic_unmask_irq(struct irq_data *d)
 222 {
 223         gic_poke_irq(d, GICD_ISENABLER);
 224 }
 225
 226 static int gic_irq_set_irqchip_state(struct irq_data *d,
 227                                      enum irqchip_irq_state which, bool val)
 228 {
 229         u32 reg;
 230
 231         if (d->hwirq >= gic_data.irq_nr) /* PPI/SPI only */
 232                 return -EINVAL;
 233
 234         switch (which) {
 235         case IRQCHIP_STATE_PENDING:
 236                 reg = val ? GICD_ISPENDR : GICD_ICPENDR;
 237                 break;
 238
 239         case IRQCHIP_STATE_ACTIVE:
 240                 reg = val ? GICD_ISACTIVER : GICD_ICACTIVER;
 241                 break;
 242
 243         case IRQCHIP_STATE_MASKED:
 244                 reg = val ? GICD_ICENABLER : GICD_ISENABLER;
 245                 break;
 246
 247         default:
 248                 return -EINVAL;
 249         }
 250
 251         gic_poke_irq(d, reg);
 252         return 0;
 253 }
 254
 255 static int gic_irq_get_irqchip_state(struct irq_data *d,
 256                                      enum irqchip_irq_state which, bool *val)
 257 {
 258         if (d->hwirq >= gic_data.irq_nr) /* PPI/SPI only */
 259                 return -EINVAL;
 260
 261         switch (which) {
 262         case IRQCHIP_STATE_PENDING:
 263                 *val = gic_peek_irq(d, GICD_ISPENDR);
 264                 break;
 265
 266         case IRQCHIP_STATE_ACTIVE:
 267                 *val = gic_peek_irq(d, GICD_ISACTIVER);
 268                 break;
 269
 270         case IRQCHIP_STATE_MASKED:
 271                 *val = !gic_peek_irq(d, GICD_ISENABLER);
 272                 break;
 273
 274         default:
 275                 return -EINVAL;
 276         }
 277
 278         return 0;
 279 }
 280
 281 static void gic_eoi_irq(struct irq_data *d)
 282 {
 283         gic_write_eoir(gic_irq(d));
 284 }
 285
 286 static void gic_eoimode1_eoi_irq(struct irq_data *d)
 287 {
 288         /*
 289          * No need to deactivate an LPI, or an interrupt that
 290          * is is getting forwarded to a vcpu.
 291          */
 292         if (gic_irq(d) >= 8192 || irqd_is_forwarded_to_vcpu(d))
 293                 return;
 294         gic_write_dir(gic_irq(d));
 295 }
 296
 297 static int gic_set_type(struct irq_data *d, unsigned int type)
 298 {
 299         unsigned int irq = gic_irq(d);
 300         void (*rwp_wait)(void);
 301         void __iomem *base;
 302
 303         /* Interrupt configuration for SGIs can't be changed */
 304         if (irq < 16)
 305                 return -EINVAL;
 306
 307         /* SPIs have restrictions on the supported types */
 308         if (irq >= 32 && type != IRQ_TYPE_LEVEL_HIGH &&
 309                          type != IRQ_TYPE_EDGE_RISING)
 310                 return -EINVAL;
 311
 312         if (gic_irq_in_rdist(d)) {
 313                 base = gic_data_rdist_sgi_base();
 314                 rwp_wait = gic_redist_wait_for_rwp;
 315         } else {
 316                 base = gic_data.dist_base;
 317                 rwp_wait = gic_dist_wait_for_rwp;
 318         }
 319
 320         return gic_configure_irq(irq, type, base, rwp_wait);
 321 }
 322
 323 static int gic_irq_set_vcpu_affinity(struct irq_data *d, void *vcpu)
 324 {
 325         if (vcpu)
 326                 irqd_set_forwarded_to_vcpu(d);
 327         else
 328                 irqd_clr_forwarded_to_vcpu(d);
 329         return 0;
 330 }
 331
 332 static u64 gic_mpidr_to_affinity(unsigned long mpidr)
 333 {
 334         u64 aff;
 335
 336         aff = ((u64)MPIDR_AFFINITY_LEVEL(mpidr, 3) << 32 |
 337                MPIDR_AFFINITY_LEVEL(mpidr, 2) << 16 |
 338                MPIDR_AFFINITY_LEVEL(mpidr, 1) << 8  |
 339                MPIDR_AFFINITY_LEVEL(mpidr, 0));
 340
 341         return aff;
 342 }
 343
 344 static asmlinkage void __exception_irq_entry gic_handle_irq(struct pt_regs *regs)
 345 {
 346         u32 irqnr;
 347
 348         do {
 349                 irqnr = gic_read_iar();
 350
 351                 if (likely(irqnr > 15 && irqnr < 1020) || irqnr >= 8192) {
 352                         int err;
 353
 354                         if (static_key_true(&supports_deactivate))
 355                                 gic_write_eoir(irqnr);
 356                         else
 357                                 isb();
 358
 359                         err = handle_domain_irq(gic_data.domain, irqnr, regs);
 360                         if (err) {
 361                                 WARN_ONCE(true, "Unexpected interrupt received!\n");
 362                                 if (static_key_true(&supports_deactivate)) {
 363                                         if (irqnr < 8192)
 364                                                 gic_write_dir(irqnr);
 365                                 } else {
 366                                         gic_write_eoir(irqnr);
 367                                 }
 368                         }
 369                         continue;
 370                 }
 371                 if (irqnr < 16) {
 372                         gic_write_eoir(irqnr);
 373                         if (static_key_true(&supports_deactivate))
 374                                 gic_write_dir(irqnr);
 375 #ifdef CONFIG_SMP
 376                         /*
 377                          * Unlike GICv2, we don't need an smp_rmb() here.
 378                          * The control dependency from gic_read_iar to
 379                          * the ISB in gic_write_eoir is enough to ensure
 380                          * that any shared data read by handle_IPI will
 381                          * be read after the ACK.
 382                          */
 383                         handle_IPI(irqnr, regs);
 384 #else
 385                         WARN_ONCE(true, "Unexpected SGI received!\n");
 386 #endif
 387                         continue;
 388                 }
 389         } while (irqnr != ICC_IAR1_EL1_SPURIOUS);
 390 }
 391
 392 static void __init gic_dist_init(void)
 393 {
 394         unsigned int i;
 395         u64 affinity;
 396         void __iomem *base = gic_data.dist_base;
 397
 398         /* Disable the distributor */
 399         writel_relaxed(0, base + GICD_CTLR);
 400         gic_dist_wait_for_rwp();
 401
 402         /*
 403          * Configure SPIs as non-secure Group-1. This will only matter
 404          * if the GIC only has a single security state. This will not
 405          * do the right thing if the kernel is running in secure mode,
 406          * but that's not the intended use case anyway.
 407          */
 408         for (i = 32; i < gic_data.irq_nr; i += 32)
 409                 writel_relaxed(~0, base + GICD_IGROUPR + i / 8);
 410
 411         gic_dist_config(base, gic_data.irq_nr, gic_dist_wait_for_rwp);
 412
 413         /* Enable distributor with ARE, Group1 */
 414         writel_relaxed(GICD_CTLR_ARE_NS | GICD_CTLR_ENABLE_G1A | GICD_CTLR_ENABLE_G1,
 415                        base + GICD_CTLR);
 416
 417         /*
 418          * Set all global interrupts to the boot CPU only. ARE must be
 419          * enabled.
 420          */
 421         affinity = gic_mpidr_to_affinity(cpu_logical_map(smp_processor_id()));
 422         for (i = 32; i < gic_data.irq_nr; i++)
 423                 gic_write_irouter(affinity, base + GICD_IROUTER + i * 8);
 424 }
 425
 426 static int gic_iterate_rdists(int (*fn)(struct redist_region *, void __iomem *))
 427 {
 428         int ret = -ENODEV;
 429         int i;
 430
 431         for (i = 0; i < gic_data.nr_redist_regions; i++) {
 432                 void __iomem *ptr = gic_data.redist_regions[i].redist_base;
 433                 u64 typer;
 434                 u32 reg;
 435
 436                 reg = readl_relaxed(ptr + GICR_PIDR2) & GIC_PIDR2_ARCH_MASK;
 437                 if (reg != GIC_PIDR2_ARCH_GICv3 &&
 438                     reg != GIC_PIDR2_ARCH_GICv4) { /* We're in trouble... */
 439                         pr_warn("No redistributor present @%p\n", ptr);
 440                         break;
 441                 }
 442
 443                 do {
 444                         typer = gic_read_typer(ptr + GICR_TYPER);
 445                         ret = fn(gic_data.redist_regions + i, ptr);
 446                         if (!ret)
 447                                 return 0;
 448
 449                         if (gic_data.redist_regions[i].single_redist)
 450                                 break;
 451
 452                         if (gic_data.redist_stride) {
 453                                 ptr += gic_data.redist_stride;
 454                         } else {
 455                                 ptr += SZ_64K * 2; /* Skip RD_base + SGI_base */
 456                                 if (typer & GICR_TYPER_VLPIS)
 457                                         ptr += SZ_64K * 2; /* Skip VLPI_base + reserved page */
 458                         }
 459                 } while (!(typer & GICR_TYPER_LAST));
 460         }
 461
 462         return ret ? -ENODEV : 0;
 463 }
 464
 465 static int __gic_populate_rdist(struct redist_region *region, void __iomem *ptr)
 466 {
 467         unsigned long mpidr = cpu_logical_map(smp_processor_id());
 468         u64 typer;
 469         u32 aff;
 470
 471         /*
 472          * Convert affinity to a 32bit value that can be matched to
 473          * GICR_TYPER bits [63:32].
 474          */
 475         aff = (MPIDR_AFFINITY_LEVEL(mpidr, 3) << 24 |
 476                MPIDR_AFFINITY_LEVEL(mpidr, 2) << 16 |
 477                MPIDR_AFFINITY_LEVEL(mpidr, 1) << 8 |
 478                MPIDR_AFFINITY_LEVEL(mpidr, 0));
 479
 480         typer = gic_read_typer(ptr + GICR_TYPER);
 481         if ((typer >> 32) == aff) {
 482                 u64 offset = ptr - region->redist_base;
 483                 gic_data_rdist_rd_base() = ptr;
 484                 gic_data_rdist()->phys_base = region->phys_base + offset;
 485
 486                 pr_info("CPU%d: found redistributor %lx region %d:%pa\n",
 487                         smp_processor_id(), mpidr,
 488                         (int)(region - gic_data.redist_regions),
 489                         &gic_data_rdist()->phys_base);
 490                 return 0;
 491         }
 492
 493         /* Try next one */
 494         return 1;
 495 }
 496
 497 static int gic_populate_rdist(void)
 498 {
 499         if (gic_iterate_rdists(__gic_populate_rdist) == 0)
 500                 return 0;
 501
 502         /* We couldn't even deal with ourselves... */
 503         WARN(true, "CPU%d: mpidr %lx has no re-distributor!\n",
 504              smp_processor_id(),
 505              (unsigned long)cpu_logical_map(smp_processor_id()));
 506         return -ENODEV;
 507 }
 508
 509 static int __gic_update_vlpi_properties(struct redist_region *region,
 510                                         void __iomem *ptr)
 511 {
 512         u64 typer = gic_read_typer(ptr + GICR_TYPER);
 513         gic_data.rdists.has_vlpis &= !!(typer & GICR_TYPER_VLPIS);
 514         gic_data.rdists.has_direct_lpi &= !!(typer & GICR_TYPER_DirectLPIS);
 515
 516         return 1;
 517 }
 518
 519 static void gic_update_vlpi_properties(void)
 520 {
 521         gic_iterate_rdists(__gic_update_vlpi_properties);
 522         pr_info("%sVLPI support, %sdirect LPI support\n",
 523                 !gic_data.rdists.has_vlpis ? "no " : "",
 524                 !gic_data.rdists.has_direct_lpi ? "no " : "");
 525 }
 526
 527 static void gic_cpu_sys_reg_init(void)
 528 {
 529         /*
 530          * Need to check that the SRE bit has actually been set. If
 531          * not, it means that SRE is disabled at EL2. We're going to
 532          * die painfully, and there is nothing we can do about it.
 533          *
 534          * Kindly inform the luser.
 535          */
 536         if (!gic_enable_sre())
 537                 pr_err("GIC: unable to set SRE (disabled at EL2), panic ahead\n");
 538
 539         /* Set priority mask register */
 540         gic_write_pmr(DEFAULT_PMR_VALUE);
 541
 542         /*
 543          * Some firmwares hand over to the kernel with the BPR changed from
 544          * its reset value (and with a value large enough to prevent
 545          * any pre-emptive interrupts from working at all). Writing a zero
 546          * to BPR restores is reset value.
 547          */
 548         gic_write_bpr1(0);
 549
 550         if (static_key_true(&supports_deactivate)) {
 551                 /* EOI drops priority only (mode 1) */
 552                 gic_write_ctlr(ICC_CTLR_EL1_EOImode_drop);
 553         } else {
 554                 /* EOI deactivates interrupt too (mode 0) */
 555                 gic_write_ctlr(ICC_CTLR_EL1_EOImode_drop_dir);
 556         }
 557
 558         /* ... and let's hit the road... */
 559         gic_write_grpen1(1);
 560 }
 561
 562 static int gic_dist_supports_lpis(void)
 563 {
 564         return !!(readl_relaxed(gic_data.dist_base + GICD_TYPER) & GICD_TYPER_LPIS);
 565 }
 566
 567 static void gic_cpu_init(void)
 568 {
 569         void __iomem *rbase;
 570
 571         /* Register ourselves with the rest of the world */
 572         if (gic_populate_rdist())
 573                 return;
 574
 575         gic_enable_redist(true);
 576
 577         rbase = gic_data_rdist_sgi_base();
 578
 579         /* Configure SGIs/PPIs as non-secure Group-1 */
 580         writel_relaxed(~0, rbase + GICR_IGROUPR0);
 581
 582         gic_cpu_config(rbase, gic_redist_wait_for_rwp);
 583
 584         /* Give LPIs a spin */
 585         if (IS_ENABLED(CONFIG_ARM_GIC_V3_ITS) && gic_dist_supports_lpis())
 586                 its_cpu_init();
 587
 588         /* initialise system registers */
 589         gic_cpu_sys_reg_init();
 590 }
 591
 592 #ifdef CONFIG_SMP
 593
 594 static int gic_starting_cpu(unsigned int cpu)
 595 {
 596         gic_cpu_init();
 597         return 0;
 598 }
 599
 600 static u16 gic_compute_target_list(int *base_cpu, const struct cpumask *mask,
 601                                    unsigned long cluster_id)
 602 {
 603         int next_cpu, cpu = *base_cpu;
 604         unsigned long mpidr = cpu_logical_map(cpu);
 605         u16 tlist = 0;
 606
 607         while (cpu < nr_cpu_ids) {
 608                 /*
 609                  * If we ever get a cluster of more than 16 CPUs, just
 610                  * scream and skip that CPU.
 611                  */
 612                 if (WARN_ON((mpidr & 0xff) >= 16))
 613                         goto out;
 614
 615                 tlist |= 1 << (mpidr & 0xf);
 616
 617                 next_cpu = cpumask_next(cpu, mask);
 618                 if (next_cpu >= nr_cpu_ids)
 619                         goto out;
 620                 cpu = next_cpu;
 621
 622                 mpidr = cpu_logical_map(cpu);
 623
 624                 if (cluster_id != (mpidr & ~0xffUL)) {
 625                         cpu--;
 626                         goto out;
 627                 }
 628         }
 629 out:
 630         *base_cpu = cpu;
 631         return tlist;
 632 }
 633
 634 #define MPIDR_TO_SGI_AFFINITY(cluster_id, level) \
 635         (MPIDR_AFFINITY_LEVEL(cluster_id, level) \
 636                 << ICC_SGI1R_AFFINITY_## level ##_SHIFT)
 637
 638 static void gic_send_sgi(u64 cluster_id, u16 tlist, unsigned int irq)
 639 {
 640         u64 val;
 641
 642         val = (MPIDR_TO_SGI_AFFINITY(cluster_id, 3)     |
 643                MPIDR_TO_SGI_AFFINITY(cluster_id, 2)     |
 644                irq << ICC_SGI1R_SGI_ID_SHIFT            |
 645                MPIDR_TO_SGI_AFFINITY(cluster_id, 1)     |
 646                tlist << ICC_SGI1R_TARGET_LIST_SHIFT);
 647
 648         pr_devel("CPU%d: ICC_SGI1R_EL1 %llx\n", smp_processor_id(), val);
 649         gic_write_sgi1r(val);
 650 }
 651
 652 static void gic_raise_softirq(const struct cpumask *mask, unsigned int irq)
 653 {
 654         int cpu;
 655
 656         if (WARN_ON(irq >= 16))
 657                 return;
 658
 659         /*
 660          * Ensure that stores to Normal memory are visible to the
 661          * other CPUs before issuing the IPI.
 662          */
 663         wmb();
 664
 665         for_each_cpu(cpu, mask) {
 666                 unsigned long cluster_id = cpu_logical_map(cpu) & ~0xffUL;
 667                 u16 tlist;
 668
 669                 tlist = gic_compute_target_list(&cpu, mask, cluster_id);
 670                 gic_send_sgi(cluster_id, tlist, irq);
 671         }
 672
 673         /* Force the above writes to ICC_SGI1R_EL1 to be executed */
 674         isb();
 675 }
 676
 677 static void gic_smp_init(void)
 678 {
 679         set_smp_cross_call(gic_raise_softirq);
 680         cpuhp_setup_state_nocalls(CPUHP_AP_IRQ_GIC_STARTING,
 681                                   "irqchip/arm/gicv3:starting",
 682                                   gic_starting_cpu, NULL);
 683 }
 684
 685 static int gic_set_affinity(struct irq_data *d, const struct cpumask *mask_val,
 686                             bool force)
 687 {
 688         unsigned int cpu;
 689         void __iomem *reg;
 690         int enabled;
 691         u64 val;
 692
 693         if (force)
 694                 cpu = cpumask_first(mask_val);
 695         else
 696                 cpu = cpumask_any_and(mask_val, cpu_online_mask);
 697
 698         if (cpu >= nr_cpu_ids)
 699                 return -EINVAL;
 700
 701         if (gic_irq_in_rdist(d))
 702                 return -EINVAL;
 703
 704         /* If interrupt was enabled, disable it first */
 705         enabled = gic_peek_irq(d, GICD_ISENABLER);
 706         if (enabled)
 707                 gic_mask_irq(d);
 708
 709         reg = gic_dist_base(d) + GICD_IROUTER + (gic_irq(d) * 8);
 710         val = gic_mpidr_to_affinity(cpu_logical_map(cpu));
 711
 712         gic_write_irouter(val, reg);
 713
 714         /*
 715          * If the interrupt was enabled, enabled it again. Otherwise,
 716          * just wait for the distributor to have digested our changes.
 717          */
 718         if (enabled)
 719                 gic_unmask_irq(d);
 720         else
 721                 gic_dist_wait_for_rwp();
 722
 723         irq_data_update_effective_affinity(d, cpumask_of(cpu));
 724
 725         return IRQ_SET_MASK_OK_DONE;
 726 }
 727 #else
 728 #define gic_set_affinity        NULL
 729 #define gic_smp_init()          do { } while(0)
 730 #endif
 731
 732 #ifdef CONFIG_CPU_PM
 733 /* Check whether it's single security state view */
 734 static bool gic_dist_security_disabled(void)
 735 {
 736         return readl_relaxed(gic_data.dist_base + GICD_CTLR) & GICD_CTLR_DS;
 737 }
 738
 739 static int gic_cpu_pm_notifier(struct notifier_block *self,
 740                                unsigned long cmd, void *v)
 741 {
 742         if (cmd == CPU_PM_EXIT) {
 743                 if (gic_dist_security_disabled())
 744                         gic_enable_redist(true);
 745                 gic_cpu_sys_reg_init();
 746         } else if (cmd == CPU_PM_ENTER && gic_dist_security_disabled()) {
 747                 gic_write_grpen1(0);
 748                 gic_enable_redist(false);
 749         }
 750         return NOTIFY_OK;
 751 }
 752
 753 static struct notifier_block gic_cpu_pm_notifier_block = {
 754         .notifier_call = gic_cpu_pm_notifier,
 755 };
 756
 757 static void gic_cpu_pm_init(void)
 758 {
 759         cpu_pm_register_notifier(&gic_cpu_pm_notifier_block);
 760 }
 761
 762 #else
 763 static inline void gic_cpu_pm_init(void) { }
 764 #endif /* CONFIG_CPU_PM */
 765
 766 static struct irq_chip gic_chip = {
 767         .name                   = "GICv3",
 768         .irq_mask               = gic_mask_irq,
 769         .irq_unmask             = gic_unmask_irq,
 770         .irq_eoi                = gic_eoi_irq,
 771         .irq_set_type           = gic_set_type,
 772         .irq_set_affinity       = gic_set_affinity,
 773         .irq_get_irqchip_state  = gic_irq_get_irqchip_state,
 774         .irq_set_irqchip_state  = gic_irq_set_irqchip_state,
 775         .flags                  = IRQCHIP_SET_TYPE_MASKED,
 776 };
 777
 778 static struct irq_chip gic_eoimode1_chip = {
 779         .name                   = "GICv3",
 780         .irq_mask               = gic_eoimode1_mask_irq,
 781         .irq_unmask             = gic_unmask_irq,
 782         .irq_eoi                = gic_eoimode1_eoi_irq,
 783         .irq_set_type           = gic_set_type,
 784         .irq_set_affinity       = gic_set_affinity,
 785         .irq_get_irqchip_state  = gic_irq_get_irqchip_state,
 786         .irq_set_irqchip_state  = gic_irq_set_irqchip_state,
 787         .irq_set_vcpu_affinity  = gic_irq_set_vcpu_affinity,
 788         .flags                  = IRQCHIP_SET_TYPE_MASKED,
 789 };
 790
 791 #define GIC_ID_NR               (1U << gic_data.rdists.id_bits)
 792
 793 static int gic_irq_domain_map(struct irq_domain *d, unsigned int irq,
 794                               irq_hw_number_t hw)
 795 {
 796         struct irq_chip *chip = &gic_chip;
 797
 798         if (static_key_true(&supports_deactivate))
 799                 chip = &gic_eoimode1_chip;
 800
 801         /* SGIs are private to the core kernel */
 802         if (hw < 16)
 803                 return -EPERM;
 804         /* Nothing here */
 805         if (hw >= gic_data.irq_nr && hw < 8192)
 806                 return -EPERM;
 807         /* Off limits */
 808         if (hw >= GIC_ID_NR)
 809                 return -EPERM;
 810
 811         /* PPIs */
 812         if (hw < 32) {
 813                 irq_set_percpu_devid(irq);
 814                 irq_domain_set_info(d, irq, hw, chip, d->host_data,
 815                                     handle_percpu_devid_irq, NULL, NULL);
 816                 irq_set_status_flags(irq, IRQ_NOAUTOEN);
 817         }
 818         /* SPIs */
 819         if (hw >= 32 && hw < gic_data.irq_nr) {
 820                 irq_domain_set_info(d, irq, hw, chip, d->host_data,
 821                                     handle_fasteoi_irq, NULL, NULL);
 822                 irq_set_probe(irq);
 823                 irqd_set_single_target(irq_desc_get_irq_data(irq_to_desc(irq)));
 824         }
 825         /* LPIs */
 826         if (hw >= 8192 && hw < GIC_ID_NR) {
 827                 if (!gic_dist_supports_lpis())
 828                         return -EPERM;
 829                 irq_domain_set_info(d, irq, hw, chip, d->host_data,
 830                                     handle_fasteoi_irq, NULL, NULL);
 831         }
 832
 833         return 0;
 834 }
 835
 836 static int gic_irq_domain_translate(struct irq_domain *d,
 837                                     struct irq_fwspec *fwspec,
 838                                     unsigned long *hwirq,
 839                                     unsigned int *type)
 840 {
 841         if (is_of_node(fwspec->fwnode)) {
 842                 if (fwspec->param_count < 3)
 843                         return -EINVAL;
 844
 845                 switch (fwspec->param[0]) {
 846                 case 0:                 /* SPI */
 847                         *hwirq = fwspec->param[1] + 32;
 848                         break;
 849                 case 1:                 /* PPI */
 850                         *hwirq = fwspec->param[1] + 16;
 851                         break;
 852                 case GIC_IRQ_TYPE_LPI:  /* LPI */
 853                         *hwirq = fwspec->param[1];
 854                         break;
 855                 default:
 856                         return -EINVAL;
 857                 }
 858
 859                 *type = fwspec->param[2] & IRQ_TYPE_SENSE_MASK;
 860                 return 0;
 861         }
 862
 863         if (is_fwnode_irqchip(fwspec->fwnode)) {
 864                 if(fwspec->param_count != 2)
 865                         return -EINVAL;
 866
 867                 *hwirq = fwspec->param[0];
 868                 *type = fwspec->param[1];
 869                 return 0;
 870         }
 871
 872         return -EINVAL;
 873 }
 874
 875 static int gic_irq_domain_alloc(struct irq_domain *domain, unsigned int virq,
 876                                 unsigned int nr_irqs, void *arg)
 877 {
 878         int i, ret;
 879         irq_hw_number_t hwirq;
 880         unsigned int type = IRQ_TYPE_NONE;
 881         struct irq_fwspec *fwspec = arg;
 882
 883         ret = gic_irq_domain_translate(domain, fwspec, &hwirq, &type);
 884         if (ret)
 885                 return ret;
 886
 887         for (i = 0; i < nr_irqs; i++) {
 888                 ret = gic_irq_domain_map(domain, virq + i, hwirq + i);
 889                 if (ret)
 890                         return ret;
 891         }
 892
 893         return 0;
 894 }
 895
 896 static void gic_irq_domain_free(struct irq_domain *domain, unsigned int virq,
 897                                 unsigned int nr_irqs)
 898 {
 899         int i;
 900
 901         for (i = 0; i < nr_irqs; i++) {
 902                 struct irq_data *d = irq_domain_get_irq_data(domain, virq + i);
 903                 irq_set_handler(virq + i, NULL);
 904                 irq_domain_reset_irq_data(d);
 905         }
 906 }
 907
 908 static int gic_irq_domain_select(struct irq_domain *d,
 909                                  struct irq_fwspec *fwspec,
 910                                  enum irq_domain_bus_token bus_token)
 911 {
 912         /* Not for us */
 913         if (fwspec->fwnode != d->fwnode)
 914                 return 0;
 915
 916         /* If this is not DT, then we have a single domain */
 917         if (!is_of_node(fwspec->fwnode))
 918                 return 1;
 919
 920         /*
 921          * If this is a PPI and we have a 4th (non-null) parameter,
 922          * then we need to match the partition domain.
 923          */
 924         if (fwspec->param_count >= 4 &&
 925             fwspec->param[0] == 1 && fwspec->param[3] != 0)
 926                 return d == partition_get_domain(gic_data.ppi_descs[fwspec->param[1]]);
 927
 928         return d == gic_data.domain;
 929 }
 930
 931 static const struct irq_domain_ops gic_irq_domain_ops = {
 932         .translate = gic_irq_domain_translate,
 933         .alloc = gic_irq_domain_alloc,
 934         .free = gic_irq_domain_free,
 935         .select = gic_irq_domain_select,
 936 };
 937
 938 static int partition_domain_translate(struct irq_domain *d,
 939                                       struct irq_fwspec *fwspec,
 940                                       unsigned long *hwirq,
 941                                       unsigned int *type)
 942 {
 943         struct device_node *np;
 944         int ret;
 945
 946         np = of_find_node_by_phandle(fwspec->param[3]);
 947         if (WARN_ON(!np))
 948                 return -EINVAL;
 949
 950         ret = partition_translate_id(gic_data.ppi_descs[fwspec->param[1]],
 951                                      of_node_to_fwnode(np));
 952         if (ret < 0)
 953                 return ret;
 954
 955         *hwirq = ret;
 956         *type = fwspec->param[2] & IRQ_TYPE_SENSE_MASK;
 957
 958         return 0;
 959 }
 960
 961 static const struct irq_domain_ops partition_domain_ops = {
 962         .translate = partition_domain_translate,
 963         .select = gic_irq_domain_select,
 964 };
 965
 966 static int __init gic_init_bases(void __iomem *dist_base,
 967                                  struct redist_region *rdist_regs,
 968                                  u32 nr_redist_regions,
 969                                  u64 redist_stride,
 970                                  struct fwnode_handle *handle)
 971 {
 972         u32 typer;
 973         int gic_irqs;
 974         int err;
 975
 976         if (!is_hyp_mode_available())
 977                 static_key_slow_dec(&supports_deactivate);
 978
 979         if (static_key_true(&supports_deactivate))
 980                 pr_info("GIC: Using split EOI/Deactivate mode\n");
 981
 982         gic_data.fwnode = handle;
 983         gic_data.dist_base = dist_base;
 984         gic_data.redist_regions = rdist_regs;
 985         gic_data.nr_redist_regions = nr_redist_regions;
 986         gic_data.redist_stride = redist_stride;
 987
 988         /*
 989          * Find out how many interrupts are supported.
 990          * The GIC only supports up to 1020 interrupt sources (SGI+PPI+SPI)
 991          */
 992         typer = readl_relaxed(gic_data.dist_base + GICD_TYPER);
 993         gic_data.rdists.id_bits = GICD_TYPER_ID_BITS(typer);
 994         gic_irqs = GICD_TYPER_IRQS(typer);
 995         if (gic_irqs > 1020)
 996                 gic_irqs = 1020;
 997         gic_data.irq_nr = gic_irqs;
 998
 999         gic_data.domain = irq_domain_create_tree(handle, &gic_irq_domain_ops,
1000                                                  &gic_data);
1001         gic_data.rdists.rdist = alloc_percpu(typeof(*gic_data.rdists.rdist));
1002         gic_data.rdists.has_vlpis = true;
1003         gic_data.rdists.has_direct_lpi = true;
1004
1005         if (WARN_ON(!gic_data.domain) || WARN_ON(!gic_data.rdists.rdist)) {
1006                 err = -ENOMEM;
1007                 goto out_free;
1008         }
1009
1010         set_handle_irq(gic_handle_irq);
1011
1012         gic_update_vlpi_properties();
1013
1014         if (IS_ENABLED(CONFIG_ARM_GIC_V3_ITS) && gic_dist_supports_lpis())
1015                 its_init(handle, &gic_data.rdists, gic_data.domain);
1016
1017         gic_smp_init();
1018         gic_dist_init();
1019         gic_cpu_init();
1020         gic_cpu_pm_init();
1021
1022         return 0;
1023
1024 out_free:
1025         if (gic_data.domain)
1026                 irq_domain_remove(gic_data.domain);
1027         free_percpu(gic_data.rdists.rdist);
1028         return err;
1029 }
1030
1031 static int __init gic_validate_dist_version(void __iomem *dist_base)
1032 {
1033         u32 reg = readl_relaxed(dist_base + GICD_PIDR2) & GIC_PIDR2_ARCH_MASK;
1034
1035         if (reg != GIC_PIDR2_ARCH_GICv3 && reg != GIC_PIDR2_ARCH_GICv4)
1036                 return -ENODEV;
1037
1038         return 0;
1039 }
1040
1041 static int get_cpu_number(struct device_node *dn)
1042 {
1043         const __be32 *cell;
1044         u64 hwid;
1045         int cpu;
1046
1047         cell = of_get_property(dn, "reg", NULL);
1048         if (!cell)
1049                 return -1;
1050
1051         hwid = of_read_number(cell, of_n_addr_cells(dn));
1052
1053         /*
1054          * Non affinity bits must be set to 0 in the DT
1055          */
1056         if (hwid & ~MPIDR_HWID_BITMASK)
1057                 return -1;
1058
1059         for_each_possible_cpu(cpu)
1060                 if (cpu_logical_map(cpu) == hwid)
1061                         return cpu;
1062
1063         return -1;
1064 }
1065
1066 /* Create all possible partitions at boot time */
1067 static void __init gic_populate_ppi_partitions(struct device_node *gic_node)
1068 {
1069         struct device_node *parts_node, *child_part;
1070         int part_idx = 0, i;
1071         int nr_parts;
1072         struct partition_affinity *parts;
1073
1074         parts_node = of_get_child_by_name(gic_node, "ppi-partitions");
1075         if (!parts_node)
1076                 return;
1077
1078         nr_parts = of_get_child_count(parts_node);
1079
1080         if (!nr_parts)
1081                 goto out_put_node;
1082
1083         parts = kzalloc(sizeof(*parts) * nr_parts, GFP_KERNEL);
1084         if (WARN_ON(!parts))
1085                 goto out_put_node;
1086
1087         for_each_child_of_node(parts_node, child_part) {
1088                 struct partition_affinity *part;
1089                 int n;
1090
1091                 part = &parts[part_idx];
1092
1093                 part->partition_id = of_node_to_fwnode(child_part);
1094
1095                 pr_info("GIC: PPI partition %s[%d] { ",
1096                         child_part->name, part_idx);
1097
1098                 n = of_property_count_elems_of_size(child_part, "affinity",
1099                                                     sizeof(u32));
1100                 WARN_ON(n <= 0);
1101
1102                 for (i = 0; i < n; i++) {
1103                         int err, cpu;
1104                         u32 cpu_phandle;
1105                         struct device_node *cpu_node;
1106
1107                         err = of_property_read_u32_index(child_part, "affinity",
1108                                                          i, &cpu_phandle);
1109                         if (WARN_ON(err))
1110                                 continue;
1111
1112                         cpu_node = of_find_node_by_phandle(cpu_phandle);
1113                         if (WARN_ON(!cpu_node))
1114                                 continue;
1115
1116                         cpu = get_cpu_number(cpu_node);
1117                         if (WARN_ON(cpu == -1))
1118                                 continue;
1119
1120                         pr_cont("%pOF[%d] ", cpu_node, cpu);
1121
1122                         cpumask_set_cpu(cpu, &part->mask);
1123                 }
1124
1125                 pr_cont("}\n");
1126                 part_idx++;
1127         }
1128
1129         for (i = 0; i < 16; i++) {
1130                 unsigned int irq;
1131                 struct partition_desc *desc;
1132                 struct irq_fwspec ppi_fwspec = {
1133                         .fwnode         = gic_data.fwnode,
1134                         .param_count    = 3,
1135                         .param          = {
1136                                 [0]     = 1,
1137                                 [1]     = i,
1138                                 [2]     = IRQ_TYPE_NONE,
1139                         },
1140                 };
1141
1142                 irq = irq_create_fwspec_mapping(&ppi_fwspec);
1143                 if (WARN_ON(!irq))
1144                         continue;
1145                 desc = partition_create_desc(gic_data.fwnode, parts, nr_parts,
1146                                              irq, &partition_domain_ops);
1147                 if (WARN_ON(!desc))
1148                         continue;
1149
1150                 gic_data.ppi_descs[i] = desc;
1151         }
1152
1153 out_put_node:
1154         of_node_put(parts_node);
1155 }
1156
1157 static void __init gic_of_setup_kvm_info(struct device_node *node)
1158 {
1159         int ret;
1160         struct resource r;
1161         u32 gicv_idx;
1162
1163         gic_v3_kvm_info.type = GIC_V3;
1164
1165         gic_v3_kvm_info.maint_irq = irq_of_parse_and_map(node, 0);
1166         if (!gic_v3_kvm_info.maint_irq)
1167                 return;
1168
1169         if (of_property_read_u32(node, "#redistributor-regions",
1170                                  &gicv_idx))
1171                 gicv_idx = 1;
1172
1173         gicv_idx += 3;  /* Also skip GICD, GICC, GICH */
1174         ret = of_address_to_resource(node, gicv_idx, &r);
1175         if (!ret)
1176                 gic_v3_kvm_info.vcpu = r;
1177
1178         gic_v3_kvm_info.has_v4 = gic_data.rdists.has_vlpis;
1179         gic_set_kvm_info(&gic_v3_kvm_info);
1180 }
1181
1182 static int __init gic_of_init(struct device_node *node, struct device_node *parent)
1183 {
1184         void __iomem *dist_base;
1185         struct redist_region *rdist_regs;
1186         u64 redist_stride;
1187         u32 nr_redist_regions;
1188         int err, i;
1189
1190         dist_base = of_iomap(node, 0);
1191         if (!dist_base) {
1192                 pr_err("%pOF: unable to map gic dist registers\n", node);
1193                 return -ENXIO;
1194         }
1195
1196         err = gic_validate_dist_version(dist_base);
1197         if (err) {
1198                 pr_err("%pOF: no distributor detected, giving up\n", node);
1199                 goto out_unmap_dist;
1200         }
1201
1202         if (of_property_read_u32(node, "#redistributor-regions", &nr_redist_regions))
1203                 nr_redist_regions = 1;
1204
1205         rdist_regs = kzalloc(sizeof(*rdist_regs) * nr_redist_regions, GFP_KERNEL);
1206         if (!rdist_regs) {
1207                 err = -ENOMEM;
1208                 goto out_unmap_dist;
1209         }
1210
1211         for (i = 0; i < nr_redist_regions; i++) {
1212                 struct resource res;
1213                 int ret;
1214
1215                 ret = of_address_to_resource(node, 1 + i, &res);
1216                 rdist_regs[i].redist_base = of_iomap(node, 1 + i);
1217                 if (ret || !rdist_regs[i].redist_base) {
1218                         pr_err("%pOF: couldn't map region %d\n", node, i);
1219                         err = -ENODEV;
1220                         goto out_unmap_rdist;
1221                 }
1222                 rdist_regs[i].phys_base = res.start;
1223         }
1224
1225         if (of_property_read_u64(node, "redistributor-stride", &redist_stride))
1226                 redist_stride = 0;
1227
1228         err = gic_init_bases(dist_base, rdist_regs, nr_redist_regions,
1229                              redist_stride, &node->fwnode);
1230         if (err)
1231                 goto out_unmap_rdist;
1232
1233         gic_populate_ppi_partitions(node);
1234         gic_of_setup_kvm_info(node);
1235         return 0;
1236
1237 out_unmap_rdist:
1238         for (i = 0; i < nr_redist_regions; i++)
1239                 if (rdist_regs[i].redist_base)
1240                         iounmap(rdist_regs[i].redist_base);
1241         kfree(rdist_regs);
1242 out_unmap_dist:
1243         iounmap(dist_base);
1244         return err;
1245 }
1246
1247 IRQCHIP_DECLARE(gic_v3, "arm,gic-v3", gic_of_init);
1248
1249 #ifdef CONFIG_ACPI
1250 static struct
1251 {
1252         void __iomem *dist_base;
1253         struct redist_region *redist_regs;
1254         u32 nr_redist_regions;
1255         bool single_redist;
1256         int enabled_rdists;
1257         u32 maint_irq;
1258         int maint_irq_mode;
1259         phys_addr_t vcpu_base;
1260 } acpi_data __initdata;
1261
1262 static void __init
1263 gic_acpi_register_redist(phys_addr_t phys_base, void __iomem *redist_base)
1264 {
1265         static int count = 0;
1266
1267         acpi_data.redist_regs[count].phys_base = phys_base;
1268         acpi_data.redist_regs[count].redist_base = redist_base;
1269         acpi_data.redist_regs[count].single_redist = acpi_data.single_redist;
1270         count++;
1271 }
1272
1273 static int __init
1274 gic_acpi_parse_madt_redist(struct acpi_subtable_header *header,
1275                            const unsigned long end)
1276 {
1277         struct acpi_madt_generic_redistributor *redist =
1278                         (struct acpi_madt_generic_redistributor *)header;
1279         void __iomem *redist_base;
1280
1281         redist_base = ioremap(redist->base_address, redist->length);
1282         if (!redist_base) {
1283                 pr_err("Couldn't map GICR region @%llx\n", redist->base_address);
1284                 return -ENOMEM;
1285         }
1286
1287         gic_acpi_register_redist(redist->base_address, redist_base);
1288         return 0;
1289 }
1290
1291 static int __init
1292 gic_acpi_parse_madt_gicc(struct acpi_subtable_header *header,
1293                          const unsigned long end)
1294 {
1295         struct acpi_madt_generic_interrupt *gicc =
1296                                 (struct acpi_madt_generic_interrupt *)header;
1297         u32 reg = readl_relaxed(acpi_data.dist_base + GICD_PIDR2) & GIC_PIDR2_ARCH_MASK;
1298         u32 size = reg == GIC_PIDR2_ARCH_GICv4 ? SZ_64K * 4 : SZ_64K * 2;
1299         void __iomem *redist_base;
1300
1301         /* GICC entry which has !ACPI_MADT_ENABLED is not unusable so skip */
1302         if (!(gicc->flags & ACPI_MADT_ENABLED))
1303                 return 0;
1304
1305         redist_base = ioremap(gicc->gicr_base_address, size);
1306         if (!redist_base)
1307                 return -ENOMEM;
1308
1309         gic_acpi_register_redist(gicc->gicr_base_address, redist_base);
1310         return 0;
1311 }
1312
1313 static int __init gic_acpi_collect_gicr_base(void)
1314 {
1315         acpi_tbl_entry_handler redist_parser;
1316         enum acpi_madt_type type;
1317
1318         if (acpi_data.single_redist) {
1319                 type = ACPI_MADT_TYPE_GENERIC_INTERRUPT;
1320                 redist_parser = gic_acpi_parse_madt_gicc;
1321         } else {
1322                 type = ACPI_MADT_TYPE_GENERIC_REDISTRIBUTOR;
1323                 redist_parser = gic_acpi_parse_madt_redist;
1324         }
1325
1326         /* Collect redistributor base addresses in GICR entries */
1327         if (acpi_table_parse_madt(type, redist_parser, 0) > 0)
1328                 return 0;
1329
1330         pr_info("No valid GICR entries exist\n");
1331         return -ENODEV;
1332 }
1333
1334 static int __init gic_acpi_match_gicr(struct acpi_subtable_header *header,
1335                                   const unsigned long end)
1336 {
1337         /* Subtable presence means that redist exists, that's it */
1338         return 0;
1339 }
1340
1341 static int __init gic_acpi_match_gicc(struct acpi_subtable_header *header,
1342                                       const unsigned long end)
1343 {
1344         struct acpi_madt_generic_interrupt *gicc =
1345                                 (struct acpi_madt_generic_interrupt *)header;
1346
1347         /*
1348          * If GICC is enabled and has valid gicr base address, then it means
1349          * GICR base is presented via GICC
1350          */
1351         if ((gicc->flags & ACPI_MADT_ENABLED) && gicc->gicr_base_address) {
1352                 acpi_data.enabled_rdists++;
1353                 return 0;
1354         }
1355
1356         /*
1357          * It's perfectly valid firmware can pass disabled GICC entry, driver
1358          * should not treat as errors, skip the entry instead of probe fail.
1359          */
1360         if (!(gicc->flags & ACPI_MADT_ENABLED))
1361                 return 0;
1362
1363         return -ENODEV;
1364 }
1365
1366 static int __init gic_acpi_count_gicr_regions(void)
1367 {
1368         int count;
1369
1370         /*
1371          * Count how many redistributor regions we have. It is not allowed
1372          * to mix redistributor description, GICR and GICC subtables have to be
1373          * mutually exclusive.
1374          */
1375         count = acpi_table_parse_madt(ACPI_MADT_TYPE_GENERIC_REDISTRIBUTOR,
1376                                       gic_acpi_match_gicr, 0);
1377         if (count > 0) {
1378                 acpi_data.single_redist = false;
1379                 return count;
1380         }
1381
1382         count = acpi_table_parse_madt(ACPI_MADT_TYPE_GENERIC_INTERRUPT,
1383                                       gic_acpi_match_gicc, 0);
1384         if (count > 0) {
1385                 acpi_data.single_redist = true;
1386                 count = acpi_data.enabled_rdists;
1387         }
1388
1389         return count;
1390 }
1391
1392 static bool __init acpi_validate_gic_table(struct acpi_subtable_header *header,
1393                                            struct acpi_probe_entry *ape)
1394 {
1395         struct acpi_madt_generic_distributor *dist;
1396         int count;
1397
1398         dist = (struct acpi_madt_generic_distributor *)header;
1399         if (dist->version != ape->driver_data)
1400                 return false;
1401
1402         /* We need to do that exercise anyway, the sooner the better */
1403         count = gic_acpi_count_gicr_regions();
1404         if (count <= 0)
1405                 return false;
1406
1407         acpi_data.nr_redist_regions = count;
1408         return true;
1409 }
1410
1411 static int __init gic_acpi_parse_virt_madt_gicc(struct acpi_subtable_header *header,
1412                                                 const unsigned long end)
1413 {
1414         struct acpi_madt_generic_interrupt *gicc =
1415                 (struct acpi_madt_generic_interrupt *)header;
1416         int maint_irq_mode;
1417         static int first_madt = true;
1418
1419         /* Skip unusable CPUs */
1420         if (!(gicc->flags & ACPI_MADT_ENABLED))
1421                 return 0;
1422
1423         maint_irq_mode = (gicc->flags & ACPI_MADT_VGIC_IRQ_MODE) ?
1424                 ACPI_EDGE_SENSITIVE : ACPI_LEVEL_SENSITIVE;
1425
1426         if (first_madt) {
1427                 first_madt = false;
1428
1429                 acpi_data.maint_irq = gicc->vgic_interrupt;
1430                 acpi_data.maint_irq_mode = maint_irq_mode;
1431                 acpi_data.vcpu_base = gicc->gicv_base_address;
1432
1433                 return 0;
1434         }
1435
1436         /*
1437          * The maintenance interrupt and GICV should be the same for every CPU
1438          */
1439         if ((acpi_data.maint_irq != gicc->vgic_interrupt) ||
1440             (acpi_data.maint_irq_mode != maint_irq_mode) ||
1441             (acpi_data.vcpu_base != gicc->gicv_base_address))
1442                 return -EINVAL;
1443
1444         return 0;
1445 }
1446
1447 static bool __init gic_acpi_collect_virt_info(void)
1448 {
1449         int count;
1450
1451         count = acpi_table_parse_madt(ACPI_MADT_TYPE_GENERIC_INTERRUPT,
1452                                       gic_acpi_parse_virt_madt_gicc, 0);
1453
1454         return (count > 0);
1455 }
1456
1457 #define ACPI_GICV3_DIST_MEM_SIZE (SZ_64K)
1458 #define ACPI_GICV2_VCTRL_MEM_SIZE       (SZ_4K)
1459 #define ACPI_GICV2_VCPU_MEM_SIZE        (SZ_8K)
1460
1461 static void __init gic_acpi_setup_kvm_info(void)
1462 {
1463         int irq;
1464
1465         if (!gic_acpi_collect_virt_info()) {
1466                 pr_warn("Unable to get hardware information used for virtualization\n");
1467                 return;
1468         }
1469
1470         gic_v3_kvm_info.type = GIC_V3;
1471
1472         irq = acpi_register_gsi(NULL, acpi_data.maint_irq,
1473                                 acpi_data.maint_irq_mode,
1474                                 ACPI_ACTIVE_HIGH);
1475         if (irq <= 0)
1476                 return;
1477
1478         gic_v3_kvm_info.maint_irq = irq;
1479
1480         if (acpi_data.vcpu_base) {
1481                 struct resource *vcpu = &gic_v3_kvm_info.vcpu;
1482
1483                 vcpu->flags = IORESOURCE_MEM;
1484                 vcpu->start = acpi_data.vcpu_base;
1485                 vcpu->end = vcpu->start + ACPI_GICV2_VCPU_MEM_SIZE - 1;
1486         }
1487
1488         gic_v3_kvm_info.has_v4 = gic_data.rdists.has_vlpis;
1489         gic_set_kvm_info(&gic_v3_kvm_info);
1490 }
1491
1492 static int __init
1493 gic_acpi_init(struct acpi_subtable_header *header, const unsigned long end)
1494 {
1495         struct acpi_madt_generic_distributor *dist;
1496         struct fwnode_handle *domain_handle;
1497         size_t size;
1498         int i, err;
1499
1500         /* Get distributor base address */
1501         dist = (struct acpi_madt_generic_distributor *)header;
1502         acpi_data.dist_base = ioremap(dist->base_address,
1503                                       ACPI_GICV3_DIST_MEM_SIZE);
1504         if (!acpi_data.dist_base) {
1505                 pr_err("Unable to map GICD registers\n");
1506                 return -ENOMEM;
1507         }
1508
1509         err = gic_validate_dist_version(acpi_data.dist_base);
1510         if (err) {
1511                 pr_err("No distributor detected at @%p, giving up",
1512                        acpi_data.dist_base);
1513                 goto out_dist_unmap;
1514         }
1515
1516         size = sizeof(*acpi_data.redist_regs) * acpi_data.nr_redist_regions;
1517         acpi_data.redist_regs = kzalloc(size, GFP_KERNEL);
1518         if (!acpi_data.redist_regs) {
1519                 err = -ENOMEM;
1520                 goto out_dist_unmap;
1521         }
1522
1523         err = gic_acpi_collect_gicr_base();
1524         if (err)
1525                 goto out_redist_unmap;
1526
1527         domain_handle = irq_domain_alloc_fwnode(acpi_data.dist_base);
1528         if (!domain_handle) {
1529                 err = -ENOMEM;
1530                 goto out_redist_unmap;
1531         }
1532
1533         err = gic_init_bases(acpi_data.dist_base, acpi_data.redist_regs,
1534                              acpi_data.nr_redist_regions, 0, domain_handle);
1535         if (err)
1536                 goto out_fwhandle_free;
1537
1538         acpi_set_irq_model(ACPI_IRQ_MODEL_GIC, domain_handle);
1539         gic_acpi_setup_kvm_info();
1540
1541         return 0;
1542
1543 out_fwhandle_free:
1544         irq_domain_free_fwnode(domain_handle);
1545 out_redist_unmap:
1546         for (i = 0; i < acpi_data.nr_redist_regions; i++)
1547                 if (acpi_data.redist_regs[i].redist_base)
1548                         iounmap(acpi_data.redist_regs[i].redist_base);
1549         kfree(acpi_data.redist_regs);
1550 out_dist_unmap:
1551         iounmap(acpi_data.dist_base);
1552         return err;
1553 }
1554 IRQCHIP_ACPI_DECLARE(gic_v3, ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR,
1555                      acpi_validate_gic_table, ACPI_MADT_GIC_VERSION_V3,
1556                      gic_acpi_init);
1557 IRQCHIP_ACPI_DECLARE(gic_v4, ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR,
1558                      acpi_validate_gic_table, ACPI_MADT_GIC_VERSION_V4,
1559                      gic_acpi_init);
1560 IRQCHIP_ACPI_DECLARE(gic_v3_or_v4, ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR,
1561                      acpi_validate_gic_table, ACPI_MADT_GIC_VERSION_NONE,
1562                      gic_acpi_init);
1563 #endif