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