1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  *  Copyright (C) 2002 ARM Limited, All Rights Reserved.
4  *
5  * Interrupt architecture for the GIC:
6  *
7  * o There is one Interrupt Distributor, which receives interrupts
8  *   from system devices and sends them to the Interrupt Controllers.
9  *
10  * o There is one CPU Interface per CPU, which sends interrupts sent
11  *   by the Distributor, and interrupts generated locally, to the
12  *   associated CPU. The base address of the CPU interface is usually
13  *   aliased so that the same address points to different chips depending
14  *   on the CPU it is accessed from.
15  *
16  * Note that IRQs 0-31 are special - they are local to each CPU.
17  * As such, the enable set/clear, pending set/clear and active bit
18  * registers are banked per-cpu for these sources.
19  */
20 #include <linux/init.h>
21 #include <linux/kernel.h>
22 #include <linux/err.h>
23 #include <linux/module.h>
24 #include <linux/list.h>
25 #include <linux/smp.h>
26 #include <linux/cpu.h>
27 #include <linux/cpu_pm.h>
28 #include <linux/cpumask.h>
29 #include <linux/io.h>
30 #include <linux/of.h>
31 #include <linux/of_address.h>
32 #include <linux/of_irq.h>
33 #include <linux/acpi.h>
34 #include <linux/irqdomain.h>
35 #include <linux/interrupt.h>
36 #include <linux/percpu.h>
37 #include <linux/slab.h>
38 #include <linux/irqchip.h>
39 #include <linux/irqchip/chained_irq.h>
40 #include <linux/irqchip/arm-gic.h>
41 
42 #include <asm/cputype.h>
43 #include <asm/irq.h>
44 #include <asm/exception.h>
45 #include <asm/smp_plat.h>
46 #include <asm/virt.h>
47 
48 #include "irq-gic-common.h"
49 
50 #ifdef CONFIG_ARM64
51 #include <asm/cpufeature.h>
52 
gic_check_cpu_features(void)53 static void gic_check_cpu_features(void)
54 {
55 	WARN_TAINT_ONCE(this_cpu_has_cap(ARM64_HAS_SYSREG_GIC_CPUIF),
56 			TAINT_CPU_OUT_OF_SPEC,
57 			"GICv3 system registers enabled, broken firmware!\n");
58 }
59 #else
60 #define gic_check_cpu_features()	do { } while(0)
61 #endif
62 
63 union gic_base {
64 	void __iomem *common_base;
65 	void __percpu * __iomem *percpu_base;
66 };
67 
68 struct gic_chip_data {
69 	struct irq_chip chip;
70 	union gic_base dist_base;
71 	union gic_base cpu_base;
72 	void __iomem *raw_dist_base;
73 	void __iomem *raw_cpu_base;
74 	u32 percpu_offset;
75 #if defined(CONFIG_CPU_PM) || defined(CONFIG_ARM_GIC_PM)
76 	u32 saved_spi_enable[DIV_ROUND_UP(1020, 32)];
77 	u32 saved_spi_active[DIV_ROUND_UP(1020, 32)];
78 	u32 saved_spi_conf[DIV_ROUND_UP(1020, 16)];
79 	u32 saved_spi_target[DIV_ROUND_UP(1020, 4)];
80 	u32 __percpu *saved_ppi_enable;
81 	u32 __percpu *saved_ppi_active;
82 	u32 __percpu *saved_ppi_conf;
83 #endif
84 	struct irq_domain *domain;
85 	unsigned int gic_irqs;
86 };
87 
88 #ifdef CONFIG_BL_SWITCHER
89 
90 static DEFINE_RAW_SPINLOCK(cpu_map_lock);
91 
92 #define gic_lock_irqsave(f)		\
93 	raw_spin_lock_irqsave(&cpu_map_lock, (f))
94 #define gic_unlock_irqrestore(f)	\
95 	raw_spin_unlock_irqrestore(&cpu_map_lock, (f))
96 
97 #define gic_lock()			raw_spin_lock(&cpu_map_lock)
98 #define gic_unlock()			raw_spin_unlock(&cpu_map_lock)
99 
100 #else
101 
102 #define gic_lock_irqsave(f)		do { (void)(f); } while(0)
103 #define gic_unlock_irqrestore(f)	do { (void)(f); } while(0)
104 
105 #define gic_lock()			do { } while(0)
106 #define gic_unlock()			do { } while(0)
107 
108 #endif
109 
110 /*
111  * The GIC mapping of CPU interfaces does not necessarily match
112  * the logical CPU numbering.  Let's use a mapping as returned
113  * by the GIC itself.
114  */
115 #define NR_GIC_CPU_IF 8
116 static u8 gic_cpu_map[NR_GIC_CPU_IF] __read_mostly;
117 
118 static DEFINE_STATIC_KEY_TRUE(supports_deactivate_key);
119 
120 static struct gic_chip_data gic_data[CONFIG_ARM_GIC_MAX_NR] __read_mostly;
121 
122 static struct gic_kvm_info gic_v2_kvm_info;
123 
124 static DEFINE_PER_CPU(u32, sgi_intid);
125 
126 #ifdef CONFIG_GIC_NON_BANKED
127 static DEFINE_STATIC_KEY_FALSE(frankengic_key);
128 
enable_frankengic(void)129 static void enable_frankengic(void)
130 {
131 	static_branch_enable(&frankengic_key);
132 }
133 
__get_base(union gic_base * base)134 static inline void __iomem *__get_base(union gic_base *base)
135 {
136 	if (static_branch_unlikely(&frankengic_key))
137 		return raw_cpu_read(*base->percpu_base);
138 
139 	return base->common_base;
140 }
141 
142 #define gic_data_dist_base(d)	__get_base(&(d)->dist_base)
143 #define gic_data_cpu_base(d)	__get_base(&(d)->cpu_base)
144 #else
145 #define gic_data_dist_base(d)	((d)->dist_base.common_base)
146 #define gic_data_cpu_base(d)	((d)->cpu_base.common_base)
147 #define enable_frankengic()	do { } while(0)
148 #endif
149 
gic_dist_base(struct irq_data * d)150 static inline void __iomem *gic_dist_base(struct irq_data *d)
151 {
152 	struct gic_chip_data *gic_data = irq_data_get_irq_chip_data(d);
153 	return gic_data_dist_base(gic_data);
154 }
155 
gic_cpu_base(struct irq_data * d)156 static inline void __iomem *gic_cpu_base(struct irq_data *d)
157 {
158 	struct gic_chip_data *gic_data = irq_data_get_irq_chip_data(d);
159 	return gic_data_cpu_base(gic_data);
160 }
161 
gic_irq(struct irq_data * d)162 static inline unsigned int gic_irq(struct irq_data *d)
163 {
164 	return d->hwirq;
165 }
166 
cascading_gic_irq(struct irq_data * d)167 static inline bool cascading_gic_irq(struct irq_data *d)
168 {
169 	void *data = irq_data_get_irq_handler_data(d);
170 
171 	/*
172 	 * If handler_data is set, this is a cascading interrupt, and
173 	 * it cannot possibly be forwarded.
174 	 */
175 	return data != NULL;
176 }
177 
178 /*
179  * Routines to acknowledge, disable and enable interrupts
180  */
gic_poke_irq(struct irq_data * d,u32 offset)181 static void gic_poke_irq(struct irq_data *d, u32 offset)
182 {
183 	u32 mask = 1 << (gic_irq(d) % 32);
184 	writel_relaxed(mask, gic_dist_base(d) + offset + (gic_irq(d) / 32) * 4);
185 }
186 
gic_peek_irq(struct irq_data * d,u32 offset)187 static int gic_peek_irq(struct irq_data *d, u32 offset)
188 {
189 	u32 mask = 1 << (gic_irq(d) % 32);
190 	return !!(readl_relaxed(gic_dist_base(d) + offset + (gic_irq(d) / 32) * 4) & mask);
191 }
192 
gic_mask_irq(struct irq_data * d)193 static void gic_mask_irq(struct irq_data *d)
194 {
195 	gic_poke_irq(d, GIC_DIST_ENABLE_CLEAR);
196 }
197 
gic_eoimode1_mask_irq(struct irq_data * d)198 static void gic_eoimode1_mask_irq(struct irq_data *d)
199 {
200 	gic_mask_irq(d);
201 	/*
202 	 * When masking a forwarded interrupt, make sure it is
203 	 * deactivated as well.
204 	 *
205 	 * This ensures that an interrupt that is getting
206 	 * disabled/masked will not get "stuck", because there is
207 	 * noone to deactivate it (guest is being terminated).
208 	 */
209 	if (irqd_is_forwarded_to_vcpu(d))
210 		gic_poke_irq(d, GIC_DIST_ACTIVE_CLEAR);
211 }
212 
gic_unmask_irq(struct irq_data * d)213 static void gic_unmask_irq(struct irq_data *d)
214 {
215 	gic_poke_irq(d, GIC_DIST_ENABLE_SET);
216 }
217 
gic_eoi_irq(struct irq_data * d)218 static void gic_eoi_irq(struct irq_data *d)
219 {
220 	u32 hwirq = gic_irq(d);
221 
222 	if (hwirq < 16)
223 		hwirq = this_cpu_read(sgi_intid);
224 
225 	writel_relaxed(hwirq, gic_cpu_base(d) + GIC_CPU_EOI);
226 }
227 
gic_eoimode1_eoi_irq(struct irq_data * d)228 static void gic_eoimode1_eoi_irq(struct irq_data *d)
229 {
230 	u32 hwirq = gic_irq(d);
231 
232 	/* Do not deactivate an IRQ forwarded to a vcpu. */
233 	if (irqd_is_forwarded_to_vcpu(d))
234 		return;
235 
236 	if (hwirq < 16)
237 		hwirq = this_cpu_read(sgi_intid);
238 
239 	writel_relaxed(hwirq, gic_cpu_base(d) + GIC_CPU_DEACTIVATE);
240 }
241 
gic_irq_set_irqchip_state(struct irq_data * d,enum irqchip_irq_state which,bool val)242 static int gic_irq_set_irqchip_state(struct irq_data *d,
243 				     enum irqchip_irq_state which, bool val)
244 {
245 	u32 reg;
246 
247 	switch (which) {
248 	case IRQCHIP_STATE_PENDING:
249 		reg = val ? GIC_DIST_PENDING_SET : GIC_DIST_PENDING_CLEAR;
250 		break;
251 
252 	case IRQCHIP_STATE_ACTIVE:
253 		reg = val ? GIC_DIST_ACTIVE_SET : GIC_DIST_ACTIVE_CLEAR;
254 		break;
255 
256 	case IRQCHIP_STATE_MASKED:
257 		reg = val ? GIC_DIST_ENABLE_CLEAR : GIC_DIST_ENABLE_SET;
258 		break;
259 
260 	default:
261 		return -EINVAL;
262 	}
263 
264 	gic_poke_irq(d, reg);
265 	return 0;
266 }
267 
gic_irq_get_irqchip_state(struct irq_data * d,enum irqchip_irq_state which,bool * val)268 static int gic_irq_get_irqchip_state(struct irq_data *d,
269 				      enum irqchip_irq_state which, bool *val)
270 {
271 	switch (which) {
272 	case IRQCHIP_STATE_PENDING:
273 		*val = gic_peek_irq(d, GIC_DIST_PENDING_SET);
274 		break;
275 
276 	case IRQCHIP_STATE_ACTIVE:
277 		*val = gic_peek_irq(d, GIC_DIST_ACTIVE_SET);
278 		break;
279 
280 	case IRQCHIP_STATE_MASKED:
281 		*val = !gic_peek_irq(d, GIC_DIST_ENABLE_SET);
282 		break;
283 
284 	default:
285 		return -EINVAL;
286 	}
287 
288 	return 0;
289 }
290 
gic_set_type(struct irq_data * d,unsigned int type)291 static int gic_set_type(struct irq_data *d, unsigned int type)
292 {
293 	void __iomem *base = gic_dist_base(d);
294 	unsigned int gicirq = gic_irq(d);
295 	int ret;
296 
297 	/* Interrupt configuration for SGIs can't be changed */
298 	if (gicirq < 16)
299 		return type != IRQ_TYPE_EDGE_RISING ? -EINVAL : 0;
300 
301 	/* SPIs have restrictions on the supported types */
302 	if (gicirq >= 32 && type != IRQ_TYPE_LEVEL_HIGH &&
303 			    type != IRQ_TYPE_EDGE_RISING)
304 		return -EINVAL;
305 
306 	ret = gic_configure_irq(gicirq, type, base + GIC_DIST_CONFIG, NULL);
307 	if (ret && gicirq < 32) {
308 		/* Misconfigured PPIs are usually not fatal */
309 		pr_warn("GIC: PPI%d is secure or misconfigured\n", gicirq - 16);
310 		ret = 0;
311 	}
312 
313 	return ret;
314 }
315 
gic_irq_set_vcpu_affinity(struct irq_data * d,void * vcpu)316 static int gic_irq_set_vcpu_affinity(struct irq_data *d, void *vcpu)
317 {
318 	/* Only interrupts on the primary GIC can be forwarded to a vcpu. */
319 	if (cascading_gic_irq(d) || gic_irq(d) < 16)
320 		return -EINVAL;
321 
322 	if (vcpu)
323 		irqd_set_forwarded_to_vcpu(d);
324 	else
325 		irqd_clr_forwarded_to_vcpu(d);
326 	return 0;
327 }
328 
gic_retrigger(struct irq_data * data)329 static int gic_retrigger(struct irq_data *data)
330 {
331 	return !gic_irq_set_irqchip_state(data, IRQCHIP_STATE_PENDING, true);
332 }
333 
gic_handle_irq(struct pt_regs * regs)334 static void __exception_irq_entry gic_handle_irq(struct pt_regs *regs)
335 {
336 	u32 irqstat, irqnr;
337 	struct gic_chip_data *gic = &gic_data[0];
338 	void __iomem *cpu_base = gic_data_cpu_base(gic);
339 
340 	do {
341 		irqstat = readl_relaxed(cpu_base + GIC_CPU_INTACK);
342 		irqnr = irqstat & GICC_IAR_INT_ID_MASK;
343 
344 		if (unlikely(irqnr >= 1020))
345 			break;
346 
347 		if (static_branch_likely(&supports_deactivate_key))
348 			writel_relaxed(irqstat, cpu_base + GIC_CPU_EOI);
349 		isb();
350 
351 		/*
352 		 * Ensure any shared data written by the CPU sending the IPI
353 		 * is read after we've read the ACK register on the GIC.
354 		 *
355 		 * Pairs with the write barrier in gic_ipi_send_mask
356 		 */
357 		if (irqnr <= 15) {
358 			smp_rmb();
359 
360 			/*
361 			 * The GIC encodes the source CPU in GICC_IAR,
362 			 * leading to the deactivation to fail if not
363 			 * written back as is to GICC_EOI.  Stash the INTID
364 			 * away for gic_eoi_irq() to write back.  This only
365 			 * works because we don't nest SGIs...
366 			 */
367 			this_cpu_write(sgi_intid, irqstat);
368 		}
369 
370 		handle_domain_irq(gic->domain, irqnr, regs);
371 	} while (1);
372 }
373 
gic_handle_cascade_irq(struct irq_desc * desc)374 static void gic_handle_cascade_irq(struct irq_desc *desc)
375 {
376 	struct gic_chip_data *chip_data = irq_desc_get_handler_data(desc);
377 	struct irq_chip *chip = irq_desc_get_chip(desc);
378 	unsigned int cascade_irq, gic_irq;
379 	unsigned long status;
380 
381 	chained_irq_enter(chip, desc);
382 
383 	status = readl_relaxed(gic_data_cpu_base(chip_data) + GIC_CPU_INTACK);
384 
385 	gic_irq = (status & GICC_IAR_INT_ID_MASK);
386 	if (gic_irq == GICC_INT_SPURIOUS)
387 		goto out;
388 
389 	cascade_irq = irq_find_mapping(chip_data->domain, gic_irq);
390 	if (unlikely(gic_irq < 32 || gic_irq > 1020)) {
391 		handle_bad_irq(desc);
392 	} else {
393 		isb();
394 		generic_handle_irq(cascade_irq);
395 	}
396 
397  out:
398 	chained_irq_exit(chip, desc);
399 }
400 
401 static const struct irq_chip gic_chip = {
402 	.irq_mask		= gic_mask_irq,
403 	.irq_unmask		= gic_unmask_irq,
404 	.irq_eoi		= gic_eoi_irq,
405 	.irq_set_type		= gic_set_type,
406 	.irq_retrigger          = gic_retrigger,
407 	.irq_get_irqchip_state	= gic_irq_get_irqchip_state,
408 	.irq_set_irqchip_state	= gic_irq_set_irqchip_state,
409 	.flags			= IRQCHIP_SET_TYPE_MASKED |
410 				  IRQCHIP_SKIP_SET_WAKE |
411 				  IRQCHIP_MASK_ON_SUSPEND,
412 };
413 
gic_cascade_irq(unsigned int gic_nr,unsigned int irq)414 void __init gic_cascade_irq(unsigned int gic_nr, unsigned int irq)
415 {
416 	BUG_ON(gic_nr >= CONFIG_ARM_GIC_MAX_NR);
417 	irq_set_chained_handler_and_data(irq, gic_handle_cascade_irq,
418 					 &gic_data[gic_nr]);
419 }
420 
gic_get_cpumask(struct gic_chip_data * gic)421 static u8 gic_get_cpumask(struct gic_chip_data *gic)
422 {
423 	void __iomem *base = gic_data_dist_base(gic);
424 	u32 mask, i;
425 
426 	for (i = mask = 0; i < 32; i += 4) {
427 		mask = readl_relaxed(base + GIC_DIST_TARGET + i);
428 		mask |= mask >> 16;
429 		mask |= mask >> 8;
430 		if (mask)
431 			break;
432 	}
433 
434 	if (!mask && num_possible_cpus() > 1)
435 		pr_crit("GIC CPU mask not found - kernel will fail to boot.\n");
436 
437 	return mask;
438 }
439 
gic_check_gicv2(void __iomem * base)440 static bool gic_check_gicv2(void __iomem *base)
441 {
442 	u32 val = readl_relaxed(base + GIC_CPU_IDENT);
443 	return (val & 0xff0fff) == 0x02043B;
444 }
445 
gic_cpu_if_up(struct gic_chip_data * gic)446 static void gic_cpu_if_up(struct gic_chip_data *gic)
447 {
448 	void __iomem *cpu_base = gic_data_cpu_base(gic);
449 	u32 bypass = 0;
450 	u32 mode = 0;
451 	int i;
452 
453 	if (gic == &gic_data[0] && static_branch_likely(&supports_deactivate_key))
454 		mode = GIC_CPU_CTRL_EOImodeNS;
455 
456 	if (gic_check_gicv2(cpu_base))
457 		for (i = 0; i < 4; i++)
458 			writel_relaxed(0, cpu_base + GIC_CPU_ACTIVEPRIO + i * 4);
459 
460 	/*
461 	* Preserve bypass disable bits to be written back later
462 	*/
463 	bypass = readl(cpu_base + GIC_CPU_CTRL);
464 	bypass &= GICC_DIS_BYPASS_MASK;
465 
466 	writel_relaxed(bypass | mode | GICC_ENABLE, cpu_base + GIC_CPU_CTRL);
467 }
468 
469 
gic_dist_init(struct gic_chip_data * gic)470 static void gic_dist_init(struct gic_chip_data *gic)
471 {
472 	unsigned int i;
473 	u32 cpumask;
474 	unsigned int gic_irqs = gic->gic_irqs;
475 	void __iomem *base = gic_data_dist_base(gic);
476 
477 	writel_relaxed(GICD_DISABLE, base + GIC_DIST_CTRL);
478 
479 	/*
480 	 * Set all global interrupts to this CPU only.
481 	 */
482 	cpumask = gic_get_cpumask(gic);
483 	cpumask |= cpumask << 8;
484 	cpumask |= cpumask << 16;
485 	for (i = 32; i < gic_irqs; i += 4)
486 		writel_relaxed(cpumask, base + GIC_DIST_TARGET + i * 4 / 4);
487 
488 	gic_dist_config(base, gic_irqs, NULL);
489 
490 	writel_relaxed(GICD_ENABLE, base + GIC_DIST_CTRL);
491 }
492 
gic_cpu_init(struct gic_chip_data * gic)493 static int gic_cpu_init(struct gic_chip_data *gic)
494 {
495 	void __iomem *dist_base = gic_data_dist_base(gic);
496 	void __iomem *base = gic_data_cpu_base(gic);
497 	unsigned int cpu_mask, cpu = smp_processor_id();
498 	int i;
499 
500 	/*
501 	 * Setting up the CPU map is only relevant for the primary GIC
502 	 * because any nested/secondary GICs do not directly interface
503 	 * with the CPU(s).
504 	 */
505 	if (gic == &gic_data[0]) {
506 		/*
507 		 * Get what the GIC says our CPU mask is.
508 		 */
509 		if (WARN_ON(cpu >= NR_GIC_CPU_IF))
510 			return -EINVAL;
511 
512 		gic_check_cpu_features();
513 		cpu_mask = gic_get_cpumask(gic);
514 		gic_cpu_map[cpu] = cpu_mask;
515 
516 		/*
517 		 * Clear our mask from the other map entries in case they're
518 		 * still undefined.
519 		 */
520 		for (i = 0; i < NR_GIC_CPU_IF; i++)
521 			if (i != cpu)
522 				gic_cpu_map[i] &= ~cpu_mask;
523 	}
524 
525 	gic_cpu_config(dist_base, 32, NULL);
526 
527 	writel_relaxed(GICC_INT_PRI_THRESHOLD, base + GIC_CPU_PRIMASK);
528 	gic_cpu_if_up(gic);
529 
530 	return 0;
531 }
532 
gic_cpu_if_down(unsigned int gic_nr)533 int gic_cpu_if_down(unsigned int gic_nr)
534 {
535 	void __iomem *cpu_base;
536 	u32 val = 0;
537 
538 	if (gic_nr >= CONFIG_ARM_GIC_MAX_NR)
539 		return -EINVAL;
540 
541 	cpu_base = gic_data_cpu_base(&gic_data[gic_nr]);
542 	val = readl(cpu_base + GIC_CPU_CTRL);
543 	val &= ~GICC_ENABLE;
544 	writel_relaxed(val, cpu_base + GIC_CPU_CTRL);
545 
546 	return 0;
547 }
548 
549 #if defined(CONFIG_CPU_PM) || defined(CONFIG_ARM_GIC_PM)
550 /*
551  * Saves the GIC distributor registers during suspend or idle.  Must be called
552  * with interrupts disabled but before powering down the GIC.  After calling
553  * this function, no interrupts will be delivered by the GIC, and another
554  * platform-specific wakeup source must be enabled.
555  */
gic_dist_save(struct gic_chip_data * gic)556 void gic_dist_save(struct gic_chip_data *gic)
557 {
558 	unsigned int gic_irqs;
559 	void __iomem *dist_base;
560 	int i;
561 
562 	if (WARN_ON(!gic))
563 		return;
564 
565 	gic_irqs = gic->gic_irqs;
566 	dist_base = gic_data_dist_base(gic);
567 
568 	if (!dist_base)
569 		return;
570 
571 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 16); i++)
572 		gic->saved_spi_conf[i] =
573 			readl_relaxed(dist_base + GIC_DIST_CONFIG + i * 4);
574 
575 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 4); i++)
576 		gic->saved_spi_target[i] =
577 			readl_relaxed(dist_base + GIC_DIST_TARGET + i * 4);
578 
579 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 32); i++)
580 		gic->saved_spi_enable[i] =
581 			readl_relaxed(dist_base + GIC_DIST_ENABLE_SET + i * 4);
582 
583 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 32); i++)
584 		gic->saved_spi_active[i] =
585 			readl_relaxed(dist_base + GIC_DIST_ACTIVE_SET + i * 4);
586 }
587 
588 /*
589  * Restores the GIC distributor registers during resume or when coming out of
590  * idle.  Must be called before enabling interrupts.  If a level interrupt
591  * that occurred while the GIC was suspended is still present, it will be
592  * handled normally, but any edge interrupts that occurred will not be seen by
593  * the GIC and need to be handled by the platform-specific wakeup source.
594  */
gic_dist_restore(struct gic_chip_data * gic)595 void gic_dist_restore(struct gic_chip_data *gic)
596 {
597 	unsigned int gic_irqs;
598 	unsigned int i;
599 	void __iomem *dist_base;
600 
601 	if (WARN_ON(!gic))
602 		return;
603 
604 	gic_irqs = gic->gic_irqs;
605 	dist_base = gic_data_dist_base(gic);
606 
607 	if (!dist_base)
608 		return;
609 
610 	writel_relaxed(GICD_DISABLE, dist_base + GIC_DIST_CTRL);
611 
612 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 16); i++)
613 		writel_relaxed(gic->saved_spi_conf[i],
614 			dist_base + GIC_DIST_CONFIG + i * 4);
615 
616 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 4); i++)
617 		writel_relaxed(GICD_INT_DEF_PRI_X4,
618 			dist_base + GIC_DIST_PRI + i * 4);
619 
620 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 4); i++)
621 		writel_relaxed(gic->saved_spi_target[i],
622 			dist_base + GIC_DIST_TARGET + i * 4);
623 
624 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 32); i++) {
625 		writel_relaxed(GICD_INT_EN_CLR_X32,
626 			dist_base + GIC_DIST_ENABLE_CLEAR + i * 4);
627 		writel_relaxed(gic->saved_spi_enable[i],
628 			dist_base + GIC_DIST_ENABLE_SET + i * 4);
629 	}
630 
631 	for (i = 0; i < DIV_ROUND_UP(gic_irqs, 32); i++) {
632 		writel_relaxed(GICD_INT_EN_CLR_X32,
633 			dist_base + GIC_DIST_ACTIVE_CLEAR + i * 4);
634 		writel_relaxed(gic->saved_spi_active[i],
635 			dist_base + GIC_DIST_ACTIVE_SET + i * 4);
636 	}
637 
638 	writel_relaxed(GICD_ENABLE, dist_base + GIC_DIST_CTRL);
639 }
640 
gic_cpu_save(struct gic_chip_data * gic)641 void gic_cpu_save(struct gic_chip_data *gic)
642 {
643 	int i;
644 	u32 *ptr;
645 	void __iomem *dist_base;
646 	void __iomem *cpu_base;
647 
648 	if (WARN_ON(!gic))
649 		return;
650 
651 	dist_base = gic_data_dist_base(gic);
652 	cpu_base = gic_data_cpu_base(gic);
653 
654 	if (!dist_base || !cpu_base)
655 		return;
656 
657 	ptr = raw_cpu_ptr(gic->saved_ppi_enable);
658 	for (i = 0; i < DIV_ROUND_UP(32, 32); i++)
659 		ptr[i] = readl_relaxed(dist_base + GIC_DIST_ENABLE_SET + i * 4);
660 
661 	ptr = raw_cpu_ptr(gic->saved_ppi_active);
662 	for (i = 0; i < DIV_ROUND_UP(32, 32); i++)
663 		ptr[i] = readl_relaxed(dist_base + GIC_DIST_ACTIVE_SET + i * 4);
664 
665 	ptr = raw_cpu_ptr(gic->saved_ppi_conf);
666 	for (i = 0; i < DIV_ROUND_UP(32, 16); i++)
667 		ptr[i] = readl_relaxed(dist_base + GIC_DIST_CONFIG + i * 4);
668 
669 }
670 
gic_cpu_restore(struct gic_chip_data * gic)671 void gic_cpu_restore(struct gic_chip_data *gic)
672 {
673 	int i;
674 	u32 *ptr;
675 	void __iomem *dist_base;
676 	void __iomem *cpu_base;
677 
678 	if (WARN_ON(!gic))
679 		return;
680 
681 	dist_base = gic_data_dist_base(gic);
682 	cpu_base = gic_data_cpu_base(gic);
683 
684 	if (!dist_base || !cpu_base)
685 		return;
686 
687 	ptr = raw_cpu_ptr(gic->saved_ppi_enable);
688 	for (i = 0; i < DIV_ROUND_UP(32, 32); i++) {
689 		writel_relaxed(GICD_INT_EN_CLR_X32,
690 			       dist_base + GIC_DIST_ENABLE_CLEAR + i * 4);
691 		writel_relaxed(ptr[i], dist_base + GIC_DIST_ENABLE_SET + i * 4);
692 	}
693 
694 	ptr = raw_cpu_ptr(gic->saved_ppi_active);
695 	for (i = 0; i < DIV_ROUND_UP(32, 32); i++) {
696 		writel_relaxed(GICD_INT_EN_CLR_X32,
697 			       dist_base + GIC_DIST_ACTIVE_CLEAR + i * 4);
698 		writel_relaxed(ptr[i], dist_base + GIC_DIST_ACTIVE_SET + i * 4);
699 	}
700 
701 	ptr = raw_cpu_ptr(gic->saved_ppi_conf);
702 	for (i = 0; i < DIV_ROUND_UP(32, 16); i++)
703 		writel_relaxed(ptr[i], dist_base + GIC_DIST_CONFIG + i * 4);
704 
705 	for (i = 0; i < DIV_ROUND_UP(32, 4); i++)
706 		writel_relaxed(GICD_INT_DEF_PRI_X4,
707 					dist_base + GIC_DIST_PRI + i * 4);
708 
709 	writel_relaxed(GICC_INT_PRI_THRESHOLD, cpu_base + GIC_CPU_PRIMASK);
710 	gic_cpu_if_up(gic);
711 }
712 
gic_notifier(struct notifier_block * self,unsigned long cmd,void * v)713 static int gic_notifier(struct notifier_block *self, unsigned long cmd,	void *v)
714 {
715 	int i;
716 
717 	for (i = 0; i < CONFIG_ARM_GIC_MAX_NR; i++) {
718 		switch (cmd) {
719 		case CPU_PM_ENTER:
720 			gic_cpu_save(&gic_data[i]);
721 			break;
722 		case CPU_PM_ENTER_FAILED:
723 		case CPU_PM_EXIT:
724 			gic_cpu_restore(&gic_data[i]);
725 			break;
726 		case CPU_CLUSTER_PM_ENTER:
727 			gic_dist_save(&gic_data[i]);
728 			break;
729 		case CPU_CLUSTER_PM_ENTER_FAILED:
730 		case CPU_CLUSTER_PM_EXIT:
731 			gic_dist_restore(&gic_data[i]);
732 			break;
733 		}
734 	}
735 
736 	return NOTIFY_OK;
737 }
738 
739 static struct notifier_block gic_notifier_block = {
740 	.notifier_call = gic_notifier,
741 };
742 
gic_pm_init(struct gic_chip_data * gic)743 static int gic_pm_init(struct gic_chip_data *gic)
744 {
745 	gic->saved_ppi_enable = __alloc_percpu(DIV_ROUND_UP(32, 32) * 4,
746 		sizeof(u32));
747 	if (WARN_ON(!gic->saved_ppi_enable))
748 		return -ENOMEM;
749 
750 	gic->saved_ppi_active = __alloc_percpu(DIV_ROUND_UP(32, 32) * 4,
751 		sizeof(u32));
752 	if (WARN_ON(!gic->saved_ppi_active))
753 		goto free_ppi_enable;
754 
755 	gic->saved_ppi_conf = __alloc_percpu(DIV_ROUND_UP(32, 16) * 4,
756 		sizeof(u32));
757 	if (WARN_ON(!gic->saved_ppi_conf))
758 		goto free_ppi_active;
759 
760 	if (gic == &gic_data[0])
761 		cpu_pm_register_notifier(&gic_notifier_block);
762 
763 	return 0;
764 
765 free_ppi_active:
766 	free_percpu(gic->saved_ppi_active);
767 free_ppi_enable:
768 	free_percpu(gic->saved_ppi_enable);
769 
770 	return -ENOMEM;
771 }
772 #else
gic_pm_init(struct gic_chip_data * gic)773 static int gic_pm_init(struct gic_chip_data *gic)
774 {
775 	return 0;
776 }
777 #endif
778 
779 #ifdef CONFIG_SMP
gic_set_affinity(struct irq_data * d,const struct cpumask * mask_val,bool force)780 static int gic_set_affinity(struct irq_data *d, const struct cpumask *mask_val,
781 			    bool force)
782 {
783 	void __iomem *reg = gic_dist_base(d) + GIC_DIST_TARGET + gic_irq(d);
784 	unsigned int cpu;
785 
786 	if (!force)
787 		cpu = cpumask_any_and(mask_val, cpu_online_mask);
788 	else
789 		cpu = cpumask_first(mask_val);
790 
791 	if (cpu >= NR_GIC_CPU_IF || cpu >= nr_cpu_ids)
792 		return -EINVAL;
793 
794 	writeb_relaxed(gic_cpu_map[cpu], reg);
795 	irq_data_update_effective_affinity(d, cpumask_of(cpu));
796 
797 	return IRQ_SET_MASK_OK_DONE;
798 }
799 
gic_ipi_send_mask(struct irq_data * d,const struct cpumask * mask)800 static void gic_ipi_send_mask(struct irq_data *d, const struct cpumask *mask)
801 {
802 	int cpu;
803 	unsigned long flags, map = 0;
804 
805 	if (unlikely(nr_cpu_ids == 1)) {
806 		/* Only one CPU? let's do a self-IPI... */
807 		writel_relaxed(2 << 24 | d->hwirq,
808 			       gic_data_dist_base(&gic_data[0]) + GIC_DIST_SOFTINT);
809 		return;
810 	}
811 
812 	gic_lock_irqsave(flags);
813 
814 	/* Convert our logical CPU mask into a physical one. */
815 	for_each_cpu(cpu, mask)
816 		map |= gic_cpu_map[cpu];
817 
818 	/*
819 	 * Ensure that stores to Normal memory are visible to the
820 	 * other CPUs before they observe us issuing the IPI.
821 	 */
822 	dmb(ishst);
823 
824 	/* this always happens on GIC0 */
825 	writel_relaxed(map << 16 | d->hwirq, gic_data_dist_base(&gic_data[0]) + GIC_DIST_SOFTINT);
826 
827 	gic_unlock_irqrestore(flags);
828 }
829 
gic_starting_cpu(unsigned int cpu)830 static int gic_starting_cpu(unsigned int cpu)
831 {
832 	gic_cpu_init(&gic_data[0]);
833 	return 0;
834 }
835 
gic_smp_init(void)836 static __init void gic_smp_init(void)
837 {
838 	struct irq_fwspec sgi_fwspec = {
839 		.fwnode		= gic_data[0].domain->fwnode,
840 		.param_count	= 1,
841 	};
842 	int base_sgi;
843 
844 	cpuhp_setup_state_nocalls(CPUHP_AP_IRQ_GIC_STARTING,
845 				  "irqchip/arm/gic:starting",
846 				  gic_starting_cpu, NULL);
847 
848 	base_sgi = __irq_domain_alloc_irqs(gic_data[0].domain, -1, 8,
849 					   NUMA_NO_NODE, &sgi_fwspec,
850 					   false, NULL);
851 	if (WARN_ON(base_sgi <= 0))
852 		return;
853 
854 	set_smp_ipi_range(base_sgi, 8);
855 }
856 #else
857 #define gic_smp_init()		do { } while(0)
858 #define gic_set_affinity	NULL
859 #define gic_ipi_send_mask	NULL
860 #endif
861 
862 #ifdef CONFIG_BL_SWITCHER
863 /*
864  * gic_send_sgi - send a SGI directly to given CPU interface number
865  *
866  * cpu_id: the ID for the destination CPU interface
867  * irq: the IPI number to send a SGI for
868  */
gic_send_sgi(unsigned int cpu_id,unsigned int irq)869 void gic_send_sgi(unsigned int cpu_id, unsigned int irq)
870 {
871 	BUG_ON(cpu_id >= NR_GIC_CPU_IF);
872 	cpu_id = 1 << cpu_id;
873 	/* this always happens on GIC0 */
874 	writel_relaxed((cpu_id << 16) | irq, gic_data_dist_base(&gic_data[0]) + GIC_DIST_SOFTINT);
875 }
876 
877 /*
878  * gic_get_cpu_id - get the CPU interface ID for the specified CPU
879  *
880  * @cpu: the logical CPU number to get the GIC ID for.
881  *
882  * Return the CPU interface ID for the given logical CPU number,
883  * or -1 if the CPU number is too large or the interface ID is
884  * unknown (more than one bit set).
885  */
gic_get_cpu_id(unsigned int cpu)886 int gic_get_cpu_id(unsigned int cpu)
887 {
888 	unsigned int cpu_bit;
889 
890 	if (cpu >= NR_GIC_CPU_IF)
891 		return -1;
892 	cpu_bit = gic_cpu_map[cpu];
893 	if (cpu_bit & (cpu_bit - 1))
894 		return -1;
895 	return __ffs(cpu_bit);
896 }
897 
898 /*
899  * gic_migrate_target - migrate IRQs to another CPU interface
900  *
901  * @new_cpu_id: the CPU target ID to migrate IRQs to
902  *
903  * Migrate all peripheral interrupts with a target matching the current CPU
904  * to the interface corresponding to @new_cpu_id.  The CPU interface mapping
905  * is also updated.  Targets to other CPU interfaces are unchanged.
906  * This must be called with IRQs locally disabled.
907  */
gic_migrate_target(unsigned int new_cpu_id)908 void gic_migrate_target(unsigned int new_cpu_id)
909 {
910 	unsigned int cur_cpu_id, gic_irqs, gic_nr = 0;
911 	void __iomem *dist_base;
912 	int i, ror_val, cpu = smp_processor_id();
913 	u32 val, cur_target_mask, active_mask;
914 
915 	BUG_ON(gic_nr >= CONFIG_ARM_GIC_MAX_NR);
916 
917 	dist_base = gic_data_dist_base(&gic_data[gic_nr]);
918 	if (!dist_base)
919 		return;
920 	gic_irqs = gic_data[gic_nr].gic_irqs;
921 
922 	cur_cpu_id = __ffs(gic_cpu_map[cpu]);
923 	cur_target_mask = 0x01010101 << cur_cpu_id;
924 	ror_val = (cur_cpu_id - new_cpu_id) & 31;
925 
926 	gic_lock();
927 
928 	/* Update the target interface for this logical CPU */
929 	gic_cpu_map[cpu] = 1 << new_cpu_id;
930 
931 	/*
932 	 * Find all the peripheral interrupts targeting the current
933 	 * CPU interface and migrate them to the new CPU interface.
934 	 * We skip DIST_TARGET 0 to 7 as they are read-only.
935 	 */
936 	for (i = 8; i < DIV_ROUND_UP(gic_irqs, 4); i++) {
937 		val = readl_relaxed(dist_base + GIC_DIST_TARGET + i * 4);
938 		active_mask = val & cur_target_mask;
939 		if (active_mask) {
940 			val &= ~active_mask;
941 			val |= ror32(active_mask, ror_val);
942 			writel_relaxed(val, dist_base + GIC_DIST_TARGET + i*4);
943 		}
944 	}
945 
946 	gic_unlock();
947 
948 	/*
949 	 * Now let's migrate and clear any potential SGIs that might be
950 	 * pending for us (cur_cpu_id).  Since GIC_DIST_SGI_PENDING_SET
951 	 * is a banked register, we can only forward the SGI using
952 	 * GIC_DIST_SOFTINT.  The original SGI source is lost but Linux
953 	 * doesn't use that information anyway.
954 	 *
955 	 * For the same reason we do not adjust SGI source information
956 	 * for previously sent SGIs by us to other CPUs either.
957 	 */
958 	for (i = 0; i < 16; i += 4) {
959 		int j;
960 		val = readl_relaxed(dist_base + GIC_DIST_SGI_PENDING_SET + i);
961 		if (!val)
962 			continue;
963 		writel_relaxed(val, dist_base + GIC_DIST_SGI_PENDING_CLEAR + i);
964 		for (j = i; j < i + 4; j++) {
965 			if (val & 0xff)
966 				writel_relaxed((1 << (new_cpu_id + 16)) | j,
967 						dist_base + GIC_DIST_SOFTINT);
968 			val >>= 8;
969 		}
970 	}
971 }
972 
973 /*
974  * gic_get_sgir_physaddr - get the physical address for the SGI register
975  *
976  * REturn the physical address of the SGI register to be used
977  * by some early assembly code when the kernel is not yet available.
978  */
979 static unsigned long gic_dist_physaddr;
980 
gic_get_sgir_physaddr(void)981 unsigned long gic_get_sgir_physaddr(void)
982 {
983 	if (!gic_dist_physaddr)
984 		return 0;
985 	return gic_dist_physaddr + GIC_DIST_SOFTINT;
986 }
987 
gic_init_physaddr(struct device_node * node)988 static void __init gic_init_physaddr(struct device_node *node)
989 {
990 	struct resource res;
991 	if (of_address_to_resource(node, 0, &res) == 0) {
992 		gic_dist_physaddr = res.start;
993 		pr_info("GIC physical location is %#lx\n", gic_dist_physaddr);
994 	}
995 }
996 
997 #else
998 #define gic_init_physaddr(node)  do { } while (0)
999 #endif
1000 
gic_irq_domain_map(struct irq_domain * d,unsigned int irq,irq_hw_number_t hw)1001 static int gic_irq_domain_map(struct irq_domain *d, unsigned int irq,
1002 				irq_hw_number_t hw)
1003 {
1004 	struct gic_chip_data *gic = d->host_data;
1005 	struct irq_data *irqd = irq_desc_get_irq_data(irq_to_desc(irq));
1006 
1007 	switch (hw) {
1008 	case 0 ... 15:
1009 		irq_set_percpu_devid(irq);
1010 		irq_domain_set_info(d, irq, hw, &gic->chip, d->host_data,
1011 				    handle_percpu_devid_fasteoi_ipi,
1012 				    NULL, NULL);
1013 		break;
1014 	case 16 ... 31:
1015 		irq_set_percpu_devid(irq);
1016 		irq_domain_set_info(d, irq, hw, &gic->chip, d->host_data,
1017 				    handle_percpu_devid_irq, NULL, NULL);
1018 		break;
1019 	default:
1020 		irq_domain_set_info(d, irq, hw, &gic->chip, d->host_data,
1021 				    handle_fasteoi_irq, NULL, NULL);
1022 		irq_set_probe(irq);
1023 		irqd_set_single_target(irqd);
1024 		break;
1025 	}
1026 
1027 	/* Prevents SW retriggers which mess up the ACK/EOI ordering */
1028 	irqd_set_handle_enforce_irqctx(irqd);
1029 	return 0;
1030 }
1031 
gic_irq_domain_unmap(struct irq_domain * d,unsigned int irq)1032 static void gic_irq_domain_unmap(struct irq_domain *d, unsigned int irq)
1033 {
1034 }
1035 
gic_irq_domain_translate(struct irq_domain * d,struct irq_fwspec * fwspec,unsigned long * hwirq,unsigned int * type)1036 static int gic_irq_domain_translate(struct irq_domain *d,
1037 				    struct irq_fwspec *fwspec,
1038 				    unsigned long *hwirq,
1039 				    unsigned int *type)
1040 {
1041 	if (fwspec->param_count == 1 && fwspec->param[0] < 16) {
1042 		*hwirq = fwspec->param[0];
1043 		*type = IRQ_TYPE_EDGE_RISING;
1044 		return 0;
1045 	}
1046 
1047 	if (is_of_node(fwspec->fwnode)) {
1048 		if (fwspec->param_count < 3)
1049 			return -EINVAL;
1050 
1051 		switch (fwspec->param[0]) {
1052 		case 0:			/* SPI */
1053 			*hwirq = fwspec->param[1] + 32;
1054 			break;
1055 		case 1:			/* PPI */
1056 			*hwirq = fwspec->param[1] + 16;
1057 			break;
1058 		default:
1059 			return -EINVAL;
1060 		}
1061 
1062 		*type = fwspec->param[2] & IRQ_TYPE_SENSE_MASK;
1063 
1064 		/* Make it clear that broken DTs are... broken */
1065 		WARN_ON(*type == IRQ_TYPE_NONE);
1066 		return 0;
1067 	}
1068 
1069 	if (is_fwnode_irqchip(fwspec->fwnode)) {
1070 		if(fwspec->param_count != 2)
1071 			return -EINVAL;
1072 
1073 		*hwirq = fwspec->param[0];
1074 		*type = fwspec->param[1];
1075 
1076 		WARN_ON(*type == IRQ_TYPE_NONE);
1077 		return 0;
1078 	}
1079 
1080 	return -EINVAL;
1081 }
1082 
gic_irq_domain_alloc(struct irq_domain * domain,unsigned int virq,unsigned int nr_irqs,void * arg)1083 static int gic_irq_domain_alloc(struct irq_domain *domain, unsigned int virq,
1084 				unsigned int nr_irqs, void *arg)
1085 {
1086 	int i, ret;
1087 	irq_hw_number_t hwirq;
1088 	unsigned int type = IRQ_TYPE_NONE;
1089 	struct irq_fwspec *fwspec = arg;
1090 
1091 	ret = gic_irq_domain_translate(domain, fwspec, &hwirq, &type);
1092 	if (ret)
1093 		return ret;
1094 
1095 	for (i = 0; i < nr_irqs; i++) {
1096 		ret = gic_irq_domain_map(domain, virq + i, hwirq + i);
1097 		if (ret)
1098 			return ret;
1099 	}
1100 
1101 	return 0;
1102 }
1103 
1104 static const struct irq_domain_ops gic_irq_domain_hierarchy_ops = {
1105 	.translate = gic_irq_domain_translate,
1106 	.alloc = gic_irq_domain_alloc,
1107 	.free = irq_domain_free_irqs_top,
1108 };
1109 
1110 static const struct irq_domain_ops gic_irq_domain_ops = {
1111 	.map = gic_irq_domain_map,
1112 	.unmap = gic_irq_domain_unmap,
1113 };
1114 
gic_init_chip(struct gic_chip_data * gic,struct device * dev,const char * name,bool use_eoimode1)1115 static void gic_init_chip(struct gic_chip_data *gic, struct device *dev,
1116 			  const char *name, bool use_eoimode1)
1117 {
1118 	/* Initialize irq_chip */
1119 	gic->chip = gic_chip;
1120 	gic->chip.name = name;
1121 	gic->chip.parent_device = dev;
1122 
1123 	if (use_eoimode1) {
1124 		gic->chip.irq_mask = gic_eoimode1_mask_irq;
1125 		gic->chip.irq_eoi = gic_eoimode1_eoi_irq;
1126 		gic->chip.irq_set_vcpu_affinity = gic_irq_set_vcpu_affinity;
1127 	}
1128 
1129 	if (gic == &gic_data[0]) {
1130 		gic->chip.irq_set_affinity = gic_set_affinity;
1131 		gic->chip.ipi_send_mask = gic_ipi_send_mask;
1132 	}
1133 }
1134 
gic_init_bases(struct gic_chip_data * gic,struct fwnode_handle * handle)1135 static int gic_init_bases(struct gic_chip_data *gic,
1136 			  struct fwnode_handle *handle)
1137 {
1138 	int gic_irqs, ret;
1139 
1140 	if (IS_ENABLED(CONFIG_GIC_NON_BANKED) && gic->percpu_offset) {
1141 		/* Frankein-GIC without banked registers... */
1142 		unsigned int cpu;
1143 
1144 		gic->dist_base.percpu_base = alloc_percpu(void __iomem *);
1145 		gic->cpu_base.percpu_base = alloc_percpu(void __iomem *);
1146 		if (WARN_ON(!gic->dist_base.percpu_base ||
1147 			    !gic->cpu_base.percpu_base)) {
1148 			ret = -ENOMEM;
1149 			goto error;
1150 		}
1151 
1152 		for_each_possible_cpu(cpu) {
1153 			u32 mpidr = cpu_logical_map(cpu);
1154 			u32 core_id = MPIDR_AFFINITY_LEVEL(mpidr, 0);
1155 			unsigned long offset = gic->percpu_offset * core_id;
1156 			*per_cpu_ptr(gic->dist_base.percpu_base, cpu) =
1157 				gic->raw_dist_base + offset;
1158 			*per_cpu_ptr(gic->cpu_base.percpu_base, cpu) =
1159 				gic->raw_cpu_base + offset;
1160 		}
1161 
1162 		enable_frankengic();
1163 	} else {
1164 		/* Normal, sane GIC... */
1165 		WARN(gic->percpu_offset,
1166 		     "GIC_NON_BANKED not enabled, ignoring %08x offset!",
1167 		     gic->percpu_offset);
1168 		gic->dist_base.common_base = gic->raw_dist_base;
1169 		gic->cpu_base.common_base = gic->raw_cpu_base;
1170 	}
1171 
1172 	/*
1173 	 * Find out how many interrupts are supported.
1174 	 * The GIC only supports up to 1020 interrupt sources.
1175 	 */
1176 	gic_irqs = readl_relaxed(gic_data_dist_base(gic) + GIC_DIST_CTR) & 0x1f;
1177 	gic_irqs = (gic_irqs + 1) * 32;
1178 	if (gic_irqs > 1020)
1179 		gic_irqs = 1020;
1180 	gic->gic_irqs = gic_irqs;
1181 
1182 	if (handle) {		/* DT/ACPI */
1183 		gic->domain = irq_domain_create_linear(handle, gic_irqs,
1184 						       &gic_irq_domain_hierarchy_ops,
1185 						       gic);
1186 	} else {		/* Legacy support */
1187 		/*
1188 		 * For primary GICs, skip over SGIs.
1189 		 * No secondary GIC support whatsoever.
1190 		 */
1191 		int irq_base;
1192 
1193 		gic_irqs -= 16; /* calculate # of irqs to allocate */
1194 
1195 		irq_base = irq_alloc_descs(16, 16, gic_irqs,
1196 					   numa_node_id());
1197 		if (irq_base < 0) {
1198 			WARN(1, "Cannot allocate irq_descs @ IRQ16, assuming pre-allocated\n");
1199 			irq_base = 16;
1200 		}
1201 
1202 		gic->domain = irq_domain_add_legacy(NULL, gic_irqs, irq_base,
1203 						    16, &gic_irq_domain_ops, gic);
1204 	}
1205 
1206 	if (WARN_ON(!gic->domain)) {
1207 		ret = -ENODEV;
1208 		goto error;
1209 	}
1210 
1211 	gic_dist_init(gic);
1212 	ret = gic_cpu_init(gic);
1213 	if (ret)
1214 		goto error;
1215 
1216 	ret = gic_pm_init(gic);
1217 	if (ret)
1218 		goto error;
1219 
1220 	return 0;
1221 
1222 error:
1223 	if (IS_ENABLED(CONFIG_GIC_NON_BANKED) && gic->percpu_offset) {
1224 		free_percpu(gic->dist_base.percpu_base);
1225 		free_percpu(gic->cpu_base.percpu_base);
1226 	}
1227 
1228 	return ret;
1229 }
1230 
__gic_init_bases(struct gic_chip_data * gic,struct fwnode_handle * handle)1231 static int __init __gic_init_bases(struct gic_chip_data *gic,
1232 				   struct fwnode_handle *handle)
1233 {
1234 	char *name;
1235 	int i, ret;
1236 
1237 	if (WARN_ON(!gic || gic->domain))
1238 		return -EINVAL;
1239 
1240 	if (gic == &gic_data[0]) {
1241 		/*
1242 		 * Initialize the CPU interface map to all CPUs.
1243 		 * It will be refined as each CPU probes its ID.
1244 		 * This is only necessary for the primary GIC.
1245 		 */
1246 		for (i = 0; i < NR_GIC_CPU_IF; i++)
1247 			gic_cpu_map[i] = 0xff;
1248 
1249 		set_handle_irq(gic_handle_irq);
1250 		if (static_branch_likely(&supports_deactivate_key))
1251 			pr_info("GIC: Using split EOI/Deactivate mode\n");
1252 	}
1253 
1254 	if (static_branch_likely(&supports_deactivate_key) && gic == &gic_data[0]) {
1255 		name = kasprintf(GFP_KERNEL, "GICv2");
1256 		gic_init_chip(gic, NULL, name, true);
1257 	} else {
1258 		name = kasprintf(GFP_KERNEL, "GIC-%d", (int)(gic-&gic_data[0]));
1259 		gic_init_chip(gic, NULL, name, false);
1260 	}
1261 
1262 	ret = gic_init_bases(gic, handle);
1263 	if (ret)
1264 		kfree(name);
1265 	else if (gic == &gic_data[0])
1266 		gic_smp_init();
1267 
1268 	return ret;
1269 }
1270 
gic_init(void __iomem * dist_base,void __iomem * cpu_base)1271 void __init gic_init(void __iomem *dist_base, void __iomem *cpu_base)
1272 {
1273 	struct gic_chip_data *gic;
1274 
1275 	/*
1276 	 * Non-DT/ACPI systems won't run a hypervisor, so let's not
1277 	 * bother with these...
1278 	 */
1279 	static_branch_disable(&supports_deactivate_key);
1280 
1281 	gic = &gic_data[0];
1282 	gic->raw_dist_base = dist_base;
1283 	gic->raw_cpu_base = cpu_base;
1284 
1285 	__gic_init_bases(gic, NULL);
1286 }
1287 
gic_teardown(struct gic_chip_data * gic)1288 static void gic_teardown(struct gic_chip_data *gic)
1289 {
1290 	if (WARN_ON(!gic))
1291 		return;
1292 
1293 	if (gic->raw_dist_base)
1294 		iounmap(gic->raw_dist_base);
1295 	if (gic->raw_cpu_base)
1296 		iounmap(gic->raw_cpu_base);
1297 }
1298 
1299 #ifdef CONFIG_OF
1300 static int gic_cnt __initdata;
1301 static bool gicv2_force_probe;
1302 
gicv2_force_probe_cfg(char * buf)1303 static int __init gicv2_force_probe_cfg(char *buf)
1304 {
1305 	return strtobool(buf, &gicv2_force_probe);
1306 }
1307 early_param("irqchip.gicv2_force_probe", gicv2_force_probe_cfg);
1308 
gic_check_eoimode(struct device_node * node,void __iomem ** base)1309 static bool gic_check_eoimode(struct device_node *node, void __iomem **base)
1310 {
1311 	struct resource cpuif_res;
1312 
1313 	of_address_to_resource(node, 1, &cpuif_res);
1314 
1315 	if (!is_hyp_mode_available())
1316 		return false;
1317 	if (resource_size(&cpuif_res) < SZ_8K) {
1318 		void __iomem *alt;
1319 		/*
1320 		 * Check for a stupid firmware that only exposes the
1321 		 * first page of a GICv2.
1322 		 */
1323 		if (!gic_check_gicv2(*base))
1324 			return false;
1325 
1326 		if (!gicv2_force_probe) {
1327 			pr_warn("GIC: GICv2 detected, but range too small and irqchip.gicv2_force_probe not set\n");
1328 			return false;
1329 		}
1330 
1331 		alt = ioremap(cpuif_res.start, SZ_8K);
1332 		if (!alt)
1333 			return false;
1334 		if (!gic_check_gicv2(alt + SZ_4K)) {
1335 			/*
1336 			 * The first page was that of a GICv2, and
1337 			 * the second was *something*. Let's trust it
1338 			 * to be a GICv2, and update the mapping.
1339 			 */
1340 			pr_warn("GIC: GICv2 at %pa, but range is too small (broken DT?), assuming 8kB\n",
1341 				&cpuif_res.start);
1342 			iounmap(*base);
1343 			*base = alt;
1344 			return true;
1345 		}
1346 
1347 		/*
1348 		 * We detected *two* initial GICv2 pages in a
1349 		 * row. Could be a GICv2 aliased over two 64kB
1350 		 * pages. Update the resource, map the iospace, and
1351 		 * pray.
1352 		 */
1353 		iounmap(alt);
1354 		alt = ioremap(cpuif_res.start, SZ_128K);
1355 		if (!alt)
1356 			return false;
1357 		pr_warn("GIC: Aliased GICv2 at %pa, trying to find the canonical range over 128kB\n",
1358 			&cpuif_res.start);
1359 		cpuif_res.end = cpuif_res.start + SZ_128K -1;
1360 		iounmap(*base);
1361 		*base = alt;
1362 	}
1363 	if (resource_size(&cpuif_res) == SZ_128K) {
1364 		/*
1365 		 * Verify that we have the first 4kB of a GICv2
1366 		 * aliased over the first 64kB by checking the
1367 		 * GICC_IIDR register on both ends.
1368 		 */
1369 		if (!gic_check_gicv2(*base) ||
1370 		    !gic_check_gicv2(*base + 0xf000))
1371 			return false;
1372 
1373 		/*
1374 		 * Move the base up by 60kB, so that we have a 8kB
1375 		 * contiguous region, which allows us to use GICC_DIR
1376 		 * at its normal offset. Please pass me that bucket.
1377 		 */
1378 		*base += 0xf000;
1379 		cpuif_res.start += 0xf000;
1380 		pr_warn("GIC: Adjusting CPU interface base to %pa\n",
1381 			&cpuif_res.start);
1382 	}
1383 
1384 	return true;
1385 }
1386 
gic_of_setup(struct gic_chip_data * gic,struct device_node * node)1387 static int gic_of_setup(struct gic_chip_data *gic, struct device_node *node)
1388 {
1389 	if (!gic || !node)
1390 		return -EINVAL;
1391 
1392 	gic->raw_dist_base = of_iomap(node, 0);
1393 	if (WARN(!gic->raw_dist_base, "unable to map gic dist registers\n"))
1394 		goto error;
1395 
1396 	gic->raw_cpu_base = of_iomap(node, 1);
1397 	if (WARN(!gic->raw_cpu_base, "unable to map gic cpu registers\n"))
1398 		goto error;
1399 
1400 	if (of_property_read_u32(node, "cpu-offset", &gic->percpu_offset))
1401 		gic->percpu_offset = 0;
1402 
1403 	return 0;
1404 
1405 error:
1406 	gic_teardown(gic);
1407 
1408 	return -ENOMEM;
1409 }
1410 
gic_of_init_child(struct device * dev,struct gic_chip_data ** gic,int irq)1411 int gic_of_init_child(struct device *dev, struct gic_chip_data **gic, int irq)
1412 {
1413 	int ret;
1414 
1415 	if (!dev || !dev->of_node || !gic || !irq)
1416 		return -EINVAL;
1417 
1418 	*gic = devm_kzalloc(dev, sizeof(**gic), GFP_KERNEL);
1419 	if (!*gic)
1420 		return -ENOMEM;
1421 
1422 	gic_init_chip(*gic, dev, dev->of_node->name, false);
1423 
1424 	ret = gic_of_setup(*gic, dev->of_node);
1425 	if (ret)
1426 		return ret;
1427 
1428 	ret = gic_init_bases(*gic, &dev->of_node->fwnode);
1429 	if (ret) {
1430 		gic_teardown(*gic);
1431 		return ret;
1432 	}
1433 
1434 	irq_set_chained_handler_and_data(irq, gic_handle_cascade_irq, *gic);
1435 
1436 	return 0;
1437 }
1438 
gic_of_setup_kvm_info(struct device_node * node)1439 static void __init gic_of_setup_kvm_info(struct device_node *node)
1440 {
1441 	int ret;
1442 	struct resource *vctrl_res = &gic_v2_kvm_info.vctrl;
1443 	struct resource *vcpu_res = &gic_v2_kvm_info.vcpu;
1444 
1445 	gic_v2_kvm_info.type = GIC_V2;
1446 
1447 	gic_v2_kvm_info.maint_irq = irq_of_parse_and_map(node, 0);
1448 	if (!gic_v2_kvm_info.maint_irq)
1449 		return;
1450 
1451 	ret = of_address_to_resource(node, 2, vctrl_res);
1452 	if (ret)
1453 		return;
1454 
1455 	ret = of_address_to_resource(node, 3, vcpu_res);
1456 	if (ret)
1457 		return;
1458 
1459 	if (static_branch_likely(&supports_deactivate_key))
1460 		gic_set_kvm_info(&gic_v2_kvm_info);
1461 }
1462 
1463 int __init
gic_of_init(struct device_node * node,struct device_node * parent)1464 gic_of_init(struct device_node *node, struct device_node *parent)
1465 {
1466 	struct gic_chip_data *gic;
1467 	int irq, ret;
1468 
1469 	if (WARN_ON(!node))
1470 		return -ENODEV;
1471 
1472 	if (WARN_ON(gic_cnt >= CONFIG_ARM_GIC_MAX_NR))
1473 		return -EINVAL;
1474 
1475 	gic = &gic_data[gic_cnt];
1476 
1477 	ret = gic_of_setup(gic, node);
1478 	if (ret)
1479 		return ret;
1480 
1481 	/*
1482 	 * Disable split EOI/Deactivate if either HYP is not available
1483 	 * or the CPU interface is too small.
1484 	 */
1485 	if (gic_cnt == 0 && !gic_check_eoimode(node, &gic->raw_cpu_base))
1486 		static_branch_disable(&supports_deactivate_key);
1487 
1488 	ret = __gic_init_bases(gic, &node->fwnode);
1489 	if (ret) {
1490 		gic_teardown(gic);
1491 		return ret;
1492 	}
1493 
1494 	if (!gic_cnt) {
1495 		gic_init_physaddr(node);
1496 		gic_of_setup_kvm_info(node);
1497 	}
1498 
1499 	if (parent) {
1500 		irq = irq_of_parse_and_map(node, 0);
1501 		gic_cascade_irq(gic_cnt, irq);
1502 	}
1503 
1504 	if (IS_ENABLED(CONFIG_ARM_GIC_V2M))
1505 		gicv2m_init(&node->fwnode, gic_data[gic_cnt].domain);
1506 
1507 	gic_cnt++;
1508 	return 0;
1509 }
1510 IRQCHIP_DECLARE(gic_400, "arm,gic-400", gic_of_init);
1511 IRQCHIP_DECLARE(arm11mp_gic, "arm,arm11mp-gic", gic_of_init);
1512 IRQCHIP_DECLARE(arm1176jzf_dc_gic, "arm,arm1176jzf-devchip-gic", gic_of_init);
1513 IRQCHIP_DECLARE(cortex_a15_gic, "arm,cortex-a15-gic", gic_of_init);
1514 IRQCHIP_DECLARE(cortex_a9_gic, "arm,cortex-a9-gic", gic_of_init);
1515 IRQCHIP_DECLARE(cortex_a7_gic, "arm,cortex-a7-gic", gic_of_init);
1516 IRQCHIP_DECLARE(msm_8660_qgic, "qcom,msm-8660-qgic", gic_of_init);
1517 IRQCHIP_DECLARE(msm_qgic2, "qcom,msm-qgic2", gic_of_init);
1518 IRQCHIP_DECLARE(pl390, "arm,pl390", gic_of_init);
1519 #else
gic_of_init_child(struct device * dev,struct gic_chip_data ** gic,int irq)1520 int gic_of_init_child(struct device *dev, struct gic_chip_data **gic, int irq)
1521 {
1522 	return -ENOTSUPP;
1523 }
1524 #endif
1525 
1526 #ifdef CONFIG_ACPI
1527 static struct
1528 {
1529 	phys_addr_t cpu_phys_base;
1530 	u32 maint_irq;
1531 	int maint_irq_mode;
1532 	phys_addr_t vctrl_base;
1533 	phys_addr_t vcpu_base;
1534 } acpi_data __initdata;
1535 
1536 static int __init
gic_acpi_parse_madt_cpu(union acpi_subtable_headers * header,const unsigned long end)1537 gic_acpi_parse_madt_cpu(union acpi_subtable_headers *header,
1538 			const unsigned long end)
1539 {
1540 	struct acpi_madt_generic_interrupt *processor;
1541 	phys_addr_t gic_cpu_base;
1542 	static int cpu_base_assigned;
1543 
1544 	processor = (struct acpi_madt_generic_interrupt *)header;
1545 
1546 	if (BAD_MADT_GICC_ENTRY(processor, end))
1547 		return -EINVAL;
1548 
1549 	/*
1550 	 * There is no support for non-banked GICv1/2 register in ACPI spec.
1551 	 * All CPU interface addresses have to be the same.
1552 	 */
1553 	gic_cpu_base = processor->base_address;
1554 	if (cpu_base_assigned && gic_cpu_base != acpi_data.cpu_phys_base)
1555 		return -EINVAL;
1556 
1557 	acpi_data.cpu_phys_base = gic_cpu_base;
1558 	acpi_data.maint_irq = processor->vgic_interrupt;
1559 	acpi_data.maint_irq_mode = (processor->flags & ACPI_MADT_VGIC_IRQ_MODE) ?
1560 				    ACPI_EDGE_SENSITIVE : ACPI_LEVEL_SENSITIVE;
1561 	acpi_data.vctrl_base = processor->gich_base_address;
1562 	acpi_data.vcpu_base = processor->gicv_base_address;
1563 
1564 	cpu_base_assigned = 1;
1565 	return 0;
1566 }
1567 
1568 /* The things you have to do to just *count* something... */
acpi_dummy_func(union acpi_subtable_headers * header,const unsigned long end)1569 static int __init acpi_dummy_func(union acpi_subtable_headers *header,
1570 				  const unsigned long end)
1571 {
1572 	return 0;
1573 }
1574 
acpi_gic_redist_is_present(void)1575 static bool __init acpi_gic_redist_is_present(void)
1576 {
1577 	return acpi_table_parse_madt(ACPI_MADT_TYPE_GENERIC_REDISTRIBUTOR,
1578 				     acpi_dummy_func, 0) > 0;
1579 }
1580 
gic_validate_dist(struct acpi_subtable_header * header,struct acpi_probe_entry * ape)1581 static bool __init gic_validate_dist(struct acpi_subtable_header *header,
1582 				     struct acpi_probe_entry *ape)
1583 {
1584 	struct acpi_madt_generic_distributor *dist;
1585 	dist = (struct acpi_madt_generic_distributor *)header;
1586 
1587 	return (dist->version == ape->driver_data &&
1588 		(dist->version != ACPI_MADT_GIC_VERSION_NONE ||
1589 		 !acpi_gic_redist_is_present()));
1590 }
1591 
1592 #define ACPI_GICV2_DIST_MEM_SIZE	(SZ_4K)
1593 #define ACPI_GIC_CPU_IF_MEM_SIZE	(SZ_8K)
1594 #define ACPI_GICV2_VCTRL_MEM_SIZE	(SZ_4K)
1595 #define ACPI_GICV2_VCPU_MEM_SIZE	(SZ_8K)
1596 
gic_acpi_setup_kvm_info(void)1597 static void __init gic_acpi_setup_kvm_info(void)
1598 {
1599 	int irq;
1600 	struct resource *vctrl_res = &gic_v2_kvm_info.vctrl;
1601 	struct resource *vcpu_res = &gic_v2_kvm_info.vcpu;
1602 
1603 	gic_v2_kvm_info.type = GIC_V2;
1604 
1605 	if (!acpi_data.vctrl_base)
1606 		return;
1607 
1608 	vctrl_res->flags = IORESOURCE_MEM;
1609 	vctrl_res->start = acpi_data.vctrl_base;
1610 	vctrl_res->end = vctrl_res->start + ACPI_GICV2_VCTRL_MEM_SIZE - 1;
1611 
1612 	if (!acpi_data.vcpu_base)
1613 		return;
1614 
1615 	vcpu_res->flags = IORESOURCE_MEM;
1616 	vcpu_res->start = acpi_data.vcpu_base;
1617 	vcpu_res->end = vcpu_res->start + ACPI_GICV2_VCPU_MEM_SIZE - 1;
1618 
1619 	irq = acpi_register_gsi(NULL, acpi_data.maint_irq,
1620 				acpi_data.maint_irq_mode,
1621 				ACPI_ACTIVE_HIGH);
1622 	if (irq <= 0)
1623 		return;
1624 
1625 	gic_v2_kvm_info.maint_irq = irq;
1626 
1627 	gic_set_kvm_info(&gic_v2_kvm_info);
1628 }
1629 
gic_v2_acpi_init(union acpi_subtable_headers * header,const unsigned long end)1630 static int __init gic_v2_acpi_init(union acpi_subtable_headers *header,
1631 				   const unsigned long end)
1632 {
1633 	struct acpi_madt_generic_distributor *dist;
1634 	struct fwnode_handle *domain_handle;
1635 	struct gic_chip_data *gic = &gic_data[0];
1636 	int count, ret;
1637 
1638 	/* Collect CPU base addresses */
1639 	count = acpi_table_parse_madt(ACPI_MADT_TYPE_GENERIC_INTERRUPT,
1640 				      gic_acpi_parse_madt_cpu, 0);
1641 	if (count <= 0) {
1642 		pr_err("No valid GICC entries exist\n");
1643 		return -EINVAL;
1644 	}
1645 
1646 	gic->raw_cpu_base = ioremap(acpi_data.cpu_phys_base, ACPI_GIC_CPU_IF_MEM_SIZE);
1647 	if (!gic->raw_cpu_base) {
1648 		pr_err("Unable to map GICC registers\n");
1649 		return -ENOMEM;
1650 	}
1651 
1652 	dist = (struct acpi_madt_generic_distributor *)header;
1653 	gic->raw_dist_base = ioremap(dist->base_address,
1654 				     ACPI_GICV2_DIST_MEM_SIZE);
1655 	if (!gic->raw_dist_base) {
1656 		pr_err("Unable to map GICD registers\n");
1657 		gic_teardown(gic);
1658 		return -ENOMEM;
1659 	}
1660 
1661 	/*
1662 	 * Disable split EOI/Deactivate if HYP is not available. ACPI
1663 	 * guarantees that we'll always have a GICv2, so the CPU
1664 	 * interface will always be the right size.
1665 	 */
1666 	if (!is_hyp_mode_available())
1667 		static_branch_disable(&supports_deactivate_key);
1668 
1669 	/*
1670 	 * Initialize GIC instance zero (no multi-GIC support).
1671 	 */
1672 	domain_handle = irq_domain_alloc_fwnode(&dist->base_address);
1673 	if (!domain_handle) {
1674 		pr_err("Unable to allocate domain handle\n");
1675 		gic_teardown(gic);
1676 		return -ENOMEM;
1677 	}
1678 
1679 	ret = __gic_init_bases(gic, domain_handle);
1680 	if (ret) {
1681 		pr_err("Failed to initialise GIC\n");
1682 		irq_domain_free_fwnode(domain_handle);
1683 		gic_teardown(gic);
1684 		return ret;
1685 	}
1686 
1687 	acpi_set_irq_model(ACPI_IRQ_MODEL_GIC, domain_handle);
1688 
1689 	if (IS_ENABLED(CONFIG_ARM_GIC_V2M))
1690 		gicv2m_init(NULL, gic_data[0].domain);
1691 
1692 	if (static_branch_likely(&supports_deactivate_key))
1693 		gic_acpi_setup_kvm_info();
1694 
1695 	return 0;
1696 }
1697 IRQCHIP_ACPI_DECLARE(gic_v2, ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR,
1698 		     gic_validate_dist, ACPI_MADT_GIC_VERSION_V2,
1699 		     gic_v2_acpi_init);
1700 IRQCHIP_ACPI_DECLARE(gic_v2_maybe, ACPI_MADT_TYPE_GENERIC_DISTRIBUTOR,
1701 		     gic_validate_dist, ACPI_MADT_GIC_VERSION_NONE,
1702 		     gic_v2_acpi_init);
1703 #endif
1704