2 * ARM Generic/Distributed Interrupt Controller
4 * Copyright (c) 2006-2007 CodeSourcery.
5 * Written by Paul Brook
7 * This code is licensed under the GPL.
10 /* This file contains implementation code for the RealView EB interrupt
11 * controller, MPCore distributed interrupt controller and ARMv7-M
12 * Nested Vectored Interrupt Controller.
13 * It is compiled in two ways:
14 * (1) as a standalone file to produce a sysbus device which is a GIC
15 * that can be used on the realview board and as one of the builtin
16 * private peripherals for the ARM MP CPUs (11MPCore, A9, etc)
17 * (2) by being directly #included into armv7m_nvic.c to produce the
22 #include "arm_gic_internal.h"
27 #define DPRINTF(fmt, ...) \
28 do { fprintf(stderr, "arm_gic: " fmt , ## __VA_ARGS__); } while (0)
30 #define DPRINTF(fmt, ...) do {} while(0)
33 static const uint8_t gic_id
[] = {
34 0x90, 0x13, 0x04, 0x00, 0x0d, 0xf0, 0x05, 0xb1
37 #define NUM_CPU(s) ((s)->num_cpu)
39 static inline int gic_get_current_cpu(GICState
*s
)
42 return cpu_single_env
->cpu_index
;
47 /* TODO: Many places that call this routine could be optimized. */
48 /* Update interrupt status after enabled or pending bits have been changed. */
49 void gic_update(GICState
*s
)
58 for (cpu
= 0; cpu
< NUM_CPU(s
); cpu
++) {
60 s
->current_pending
[cpu
] = 1023;
61 if (!s
->enabled
|| !s
->cpu_enabled
[cpu
]) {
62 qemu_irq_lower(s
->parent_irq
[cpu
]);
67 for (irq
= 0; irq
< s
->num_irq
; irq
++) {
68 if (GIC_TEST_ENABLED(irq
, cm
) && GIC_TEST_PENDING(irq
, cm
)) {
69 if (GIC_GET_PRIORITY(irq
, cpu
) < best_prio
) {
70 best_prio
= GIC_GET_PRIORITY(irq
, cpu
);
76 if (best_prio
<= s
->priority_mask
[cpu
]) {
77 s
->current_pending
[cpu
] = best_irq
;
78 if (best_prio
< s
->running_priority
[cpu
]) {
79 DPRINTF("Raised pending IRQ %d\n", best_irq
);
83 qemu_set_irq(s
->parent_irq
[cpu
], level
);
87 void gic_set_pending_private(GICState
*s
, int cpu
, int irq
)
91 if (GIC_TEST_PENDING(irq
, cm
))
94 DPRINTF("Set %d pending cpu %d\n", irq
, cpu
);
95 GIC_SET_PENDING(irq
, cm
);
99 /* Process a change in an external IRQ input. */
100 static void gic_set_irq(void *opaque
, int irq
, int level
)
102 /* Meaning of the 'irq' parameter:
103 * [0..N-1] : external interrupts
104 * [N..N+31] : PPI (internal) interrupts for CPU 0
105 * [N+32..N+63] : PPI (internal interrupts for CPU 1
108 GICState
*s
= (GICState
*)opaque
;
110 if (irq
< (s
->num_irq
- GIC_INTERNAL
)) {
111 /* The first external input line is internal interrupt 32. */
114 target
= GIC_TARGET(irq
);
117 irq
-= (s
->num_irq
- GIC_INTERNAL
);
118 cpu
= irq
/ GIC_INTERNAL
;
124 if (level
== GIC_TEST_LEVEL(irq
, cm
)) {
129 GIC_SET_LEVEL(irq
, cm
);
130 if (GIC_TEST_TRIGGER(irq
) || GIC_TEST_ENABLED(irq
, cm
)) {
131 DPRINTF("Set %d pending mask %x\n", irq
, target
);
132 GIC_SET_PENDING(irq
, target
);
135 GIC_CLEAR_LEVEL(irq
, cm
);
140 static void gic_set_running_irq(GICState
*s
, int cpu
, int irq
)
142 s
->running_irq
[cpu
] = irq
;
144 s
->running_priority
[cpu
] = 0x100;
146 s
->running_priority
[cpu
] = GIC_GET_PRIORITY(irq
, cpu
);
151 uint32_t gic_acknowledge_irq(GICState
*s
, int cpu
)
155 new_irq
= s
->current_pending
[cpu
];
157 || GIC_GET_PRIORITY(new_irq
, cpu
) >= s
->running_priority
[cpu
]) {
158 DPRINTF("ACK no pending IRQ\n");
161 s
->last_active
[new_irq
][cpu
] = s
->running_irq
[cpu
];
162 /* Clear pending flags for both level and edge triggered interrupts.
163 Level triggered IRQs will be reasserted once they become inactive. */
164 GIC_CLEAR_PENDING(new_irq
, GIC_TEST_MODEL(new_irq
) ? ALL_CPU_MASK
: cm
);
165 gic_set_running_irq(s
, cpu
, new_irq
);
166 DPRINTF("ACK %d\n", new_irq
);
170 void gic_complete_irq(GICState
*s
, int cpu
, int irq
)
174 DPRINTF("EOI %d\n", irq
);
175 if (irq
>= s
->num_irq
) {
176 /* This handles two cases:
177 * 1. If software writes the ID of a spurious interrupt [ie 1023]
178 * to the GICC_EOIR, the GIC ignores that write.
179 * 2. If software writes the number of a non-existent interrupt
180 * this must be a subcase of "value written does not match the last
181 * valid interrupt value read from the Interrupt Acknowledge
182 * register" and so this is UNPREDICTABLE. We choose to ignore it.
186 if (s
->running_irq
[cpu
] == 1023)
187 return; /* No active IRQ. */
188 /* Mark level triggered interrupts as pending if they are still
190 if (!GIC_TEST_TRIGGER(irq
) && GIC_TEST_ENABLED(irq
, cm
)
191 && GIC_TEST_LEVEL(irq
, cm
) && (GIC_TARGET(irq
) & cm
) != 0) {
192 DPRINTF("Set %d pending mask %x\n", irq
, cm
);
193 GIC_SET_PENDING(irq
, cm
);
196 if (irq
!= s
->running_irq
[cpu
]) {
197 /* Complete an IRQ that is not currently running. */
198 int tmp
= s
->running_irq
[cpu
];
199 while (s
->last_active
[tmp
][cpu
] != 1023) {
200 if (s
->last_active
[tmp
][cpu
] == irq
) {
201 s
->last_active
[tmp
][cpu
] = s
->last_active
[irq
][cpu
];
204 tmp
= s
->last_active
[tmp
][cpu
];
210 /* Complete the current running IRQ. */
211 gic_set_running_irq(s
, cpu
, s
->last_active
[s
->running_irq
[cpu
]][cpu
]);
215 static uint32_t gic_dist_readb(void *opaque
, hwaddr offset
)
217 GICState
*s
= (GICState
*)opaque
;
225 cpu
= gic_get_current_cpu(s
);
227 if (offset
< 0x100) {
231 return ((s
->num_irq
/ 32) - 1) | ((NUM_CPU(s
) - 1) << 5);
234 if (offset
>= 0x80) {
235 /* Interrupt Security , RAZ/WI */
239 } else if (offset
< 0x200) {
240 /* Interrupt Set/Clear Enable. */
242 irq
= (offset
- 0x100) * 8;
244 irq
= (offset
- 0x180) * 8;
246 if (irq
>= s
->num_irq
)
249 for (i
= 0; i
< 8; i
++) {
250 if (GIC_TEST_ENABLED(irq
+ i
, cm
)) {
254 } else if (offset
< 0x300) {
255 /* Interrupt Set/Clear Pending. */
257 irq
= (offset
- 0x200) * 8;
259 irq
= (offset
- 0x280) * 8;
261 if (irq
>= s
->num_irq
)
264 mask
= (irq
< GIC_INTERNAL
) ? cm
: ALL_CPU_MASK
;
265 for (i
= 0; i
< 8; i
++) {
266 if (GIC_TEST_PENDING(irq
+ i
, mask
)) {
270 } else if (offset
< 0x400) {
271 /* Interrupt Active. */
272 irq
= (offset
- 0x300) * 8 + GIC_BASE_IRQ
;
273 if (irq
>= s
->num_irq
)
276 mask
= (irq
< GIC_INTERNAL
) ? cm
: ALL_CPU_MASK
;
277 for (i
= 0; i
< 8; i
++) {
278 if (GIC_TEST_ACTIVE(irq
+ i
, mask
)) {
282 } else if (offset
< 0x800) {
283 /* Interrupt Priority. */
284 irq
= (offset
- 0x400) + GIC_BASE_IRQ
;
285 if (irq
>= s
->num_irq
)
287 res
= GIC_GET_PRIORITY(irq
, cpu
);
288 } else if (offset
< 0xc00) {
289 /* Interrupt CPU Target. */
290 if (s
->num_cpu
== 1 && s
->revision
!= REV_11MPCORE
) {
291 /* For uniprocessor GICs these RAZ/WI */
294 irq
= (offset
- 0x800) + GIC_BASE_IRQ
;
295 if (irq
>= s
->num_irq
) {
298 if (irq
>= 29 && irq
<= 31) {
301 res
= GIC_TARGET(irq
);
304 } else if (offset
< 0xf00) {
305 /* Interrupt Configuration. */
306 irq
= (offset
- 0xc00) * 2 + GIC_BASE_IRQ
;
307 if (irq
>= s
->num_irq
)
310 for (i
= 0; i
< 4; i
++) {
311 if (GIC_TEST_MODEL(irq
+ i
))
312 res
|= (1 << (i
* 2));
313 if (GIC_TEST_TRIGGER(irq
+ i
))
314 res
|= (2 << (i
* 2));
316 } else if (offset
< 0xfe0) {
318 } else /* offset >= 0xfe0 */ {
322 res
= gic_id
[(offset
- 0xfe0) >> 2];
327 qemu_log_mask(LOG_GUEST_ERROR
,
328 "gic_dist_readb: Bad offset %x\n", (int)offset
);
332 static uint32_t gic_dist_readw(void *opaque
, hwaddr offset
)
335 val
= gic_dist_readb(opaque
, offset
);
336 val
|= gic_dist_readb(opaque
, offset
+ 1) << 8;
340 static uint32_t gic_dist_readl(void *opaque
, hwaddr offset
)
343 val
= gic_dist_readw(opaque
, offset
);
344 val
|= gic_dist_readw(opaque
, offset
+ 2) << 16;
348 static void gic_dist_writeb(void *opaque
, hwaddr offset
,
351 GICState
*s
= (GICState
*)opaque
;
356 cpu
= gic_get_current_cpu(s
);
357 if (offset
< 0x100) {
359 s
->enabled
= (value
& 1);
360 DPRINTF("Distribution %sabled\n", s
->enabled
? "En" : "Dis");
361 } else if (offset
< 4) {
363 } else if (offset
>= 0x80) {
364 /* Interrupt Security Registers, RAZ/WI */
368 } else if (offset
< 0x180) {
369 /* Interrupt Set Enable. */
370 irq
= (offset
- 0x100) * 8 + GIC_BASE_IRQ
;
371 if (irq
>= s
->num_irq
)
375 for (i
= 0; i
< 8; i
++) {
376 if (value
& (1 << i
)) {
377 int mask
= (irq
< GIC_INTERNAL
) ? (1 << cpu
) : GIC_TARGET(irq
);
378 int cm
= (irq
< GIC_INTERNAL
) ? (1 << cpu
) : ALL_CPU_MASK
;
380 if (!GIC_TEST_ENABLED(irq
+ i
, cm
)) {
381 DPRINTF("Enabled IRQ %d\n", irq
+ i
);
383 GIC_SET_ENABLED(irq
+ i
, cm
);
384 /* If a raised level triggered IRQ enabled then mark
386 if (GIC_TEST_LEVEL(irq
+ i
, mask
)
387 && !GIC_TEST_TRIGGER(irq
+ i
)) {
388 DPRINTF("Set %d pending mask %x\n", irq
+ i
, mask
);
389 GIC_SET_PENDING(irq
+ i
, mask
);
393 } else if (offset
< 0x200) {
394 /* Interrupt Clear Enable. */
395 irq
= (offset
- 0x180) * 8 + GIC_BASE_IRQ
;
396 if (irq
>= s
->num_irq
)
400 for (i
= 0; i
< 8; i
++) {
401 if (value
& (1 << i
)) {
402 int cm
= (irq
< GIC_INTERNAL
) ? (1 << cpu
) : ALL_CPU_MASK
;
404 if (GIC_TEST_ENABLED(irq
+ i
, cm
)) {
405 DPRINTF("Disabled IRQ %d\n", irq
+ i
);
407 GIC_CLEAR_ENABLED(irq
+ i
, cm
);
410 } else if (offset
< 0x280) {
411 /* Interrupt Set Pending. */
412 irq
= (offset
- 0x200) * 8 + GIC_BASE_IRQ
;
413 if (irq
>= s
->num_irq
)
418 for (i
= 0; i
< 8; i
++) {
419 if (value
& (1 << i
)) {
420 GIC_SET_PENDING(irq
+ i
, GIC_TARGET(irq
));
423 } else if (offset
< 0x300) {
424 /* Interrupt Clear Pending. */
425 irq
= (offset
- 0x280) * 8 + GIC_BASE_IRQ
;
426 if (irq
>= s
->num_irq
)
428 for (i
= 0; i
< 8; i
++) {
429 /* ??? This currently clears the pending bit for all CPUs, even
430 for per-CPU interrupts. It's unclear whether this is the
432 if (value
& (1 << i
)) {
433 GIC_CLEAR_PENDING(irq
+ i
, ALL_CPU_MASK
);
436 } else if (offset
< 0x400) {
437 /* Interrupt Active. */
439 } else if (offset
< 0x800) {
440 /* Interrupt Priority. */
441 irq
= (offset
- 0x400) + GIC_BASE_IRQ
;
442 if (irq
>= s
->num_irq
)
444 if (irq
< GIC_INTERNAL
) {
445 s
->priority1
[irq
][cpu
] = value
;
447 s
->priority2
[irq
- GIC_INTERNAL
] = value
;
449 } else if (offset
< 0xc00) {
450 /* Interrupt CPU Target. RAZ/WI on uniprocessor GICs, with the
451 * annoying exception of the 11MPCore's GIC.
453 if (s
->num_cpu
!= 1 || s
->revision
== REV_11MPCORE
) {
454 irq
= (offset
- 0x800) + GIC_BASE_IRQ
;
455 if (irq
>= s
->num_irq
) {
460 } else if (irq
< GIC_INTERNAL
) {
461 value
= ALL_CPU_MASK
;
463 s
->irq_target
[irq
] = value
& ALL_CPU_MASK
;
465 } else if (offset
< 0xf00) {
466 /* Interrupt Configuration. */
467 irq
= (offset
- 0xc00) * 4 + GIC_BASE_IRQ
;
468 if (irq
>= s
->num_irq
)
470 if (irq
< GIC_INTERNAL
)
472 for (i
= 0; i
< 4; i
++) {
473 if (value
& (1 << (i
* 2))) {
474 GIC_SET_MODEL(irq
+ i
);
476 GIC_CLEAR_MODEL(irq
+ i
);
478 if (value
& (2 << (i
* 2))) {
479 GIC_SET_TRIGGER(irq
+ i
);
481 GIC_CLEAR_TRIGGER(irq
+ i
);
485 /* 0xf00 is only handled for 32-bit writes. */
491 qemu_log_mask(LOG_GUEST_ERROR
,
492 "gic_dist_writeb: Bad offset %x\n", (int)offset
);
495 static void gic_dist_writew(void *opaque
, hwaddr offset
,
498 gic_dist_writeb(opaque
, offset
, value
& 0xff);
499 gic_dist_writeb(opaque
, offset
+ 1, value
>> 8);
502 static void gic_dist_writel(void *opaque
, hwaddr offset
,
505 GICState
*s
= (GICState
*)opaque
;
506 if (offset
== 0xf00) {
511 cpu
= gic_get_current_cpu(s
);
513 switch ((value
>> 24) & 3) {
515 mask
= (value
>> 16) & ALL_CPU_MASK
;
518 mask
= ALL_CPU_MASK
^ (1 << cpu
);
524 DPRINTF("Bad Soft Int target filter\n");
528 GIC_SET_PENDING(irq
, mask
);
532 gic_dist_writew(opaque
, offset
, value
& 0xffff);
533 gic_dist_writew(opaque
, offset
+ 2, value
>> 16);
536 static const MemoryRegionOps gic_dist_ops
= {
538 .read
= { gic_dist_readb
, gic_dist_readw
, gic_dist_readl
, },
539 .write
= { gic_dist_writeb
, gic_dist_writew
, gic_dist_writel
, },
541 .endianness
= DEVICE_NATIVE_ENDIAN
,
544 static uint32_t gic_cpu_read(GICState
*s
, int cpu
, int offset
)
547 case 0x00: /* Control */
548 return s
->cpu_enabled
[cpu
];
549 case 0x04: /* Priority mask */
550 return s
->priority_mask
[cpu
];
551 case 0x08: /* Binary Point */
552 /* ??? Not implemented. */
554 case 0x0c: /* Acknowledge */
555 return gic_acknowledge_irq(s
, cpu
);
556 case 0x14: /* Running Priority */
557 return s
->running_priority
[cpu
];
558 case 0x18: /* Highest Pending Interrupt */
559 return s
->current_pending
[cpu
];
561 qemu_log_mask(LOG_GUEST_ERROR
,
562 "gic_cpu_read: Bad offset %x\n", (int)offset
);
567 static void gic_cpu_write(GICState
*s
, int cpu
, int offset
, uint32_t value
)
570 case 0x00: /* Control */
571 s
->cpu_enabled
[cpu
] = (value
& 1);
572 DPRINTF("CPU %d %sabled\n", cpu
, s
->cpu_enabled
[cpu
] ? "En" : "Dis");
574 case 0x04: /* Priority mask */
575 s
->priority_mask
[cpu
] = (value
& 0xff);
577 case 0x08: /* Binary Point */
578 /* ??? Not implemented. */
580 case 0x10: /* End Of Interrupt */
581 return gic_complete_irq(s
, cpu
, value
& 0x3ff);
583 qemu_log_mask(LOG_GUEST_ERROR
,
584 "gic_cpu_write: Bad offset %x\n", (int)offset
);
590 /* Wrappers to read/write the GIC CPU interface for the current CPU */
591 static uint64_t gic_thiscpu_read(void *opaque
, hwaddr addr
,
594 GICState
*s
= (GICState
*)opaque
;
595 return gic_cpu_read(s
, gic_get_current_cpu(s
), addr
);
598 static void gic_thiscpu_write(void *opaque
, hwaddr addr
,
599 uint64_t value
, unsigned size
)
601 GICState
*s
= (GICState
*)opaque
;
602 gic_cpu_write(s
, gic_get_current_cpu(s
), addr
, value
);
605 /* Wrappers to read/write the GIC CPU interface for a specific CPU.
606 * These just decode the opaque pointer into GICState* + cpu id.
608 static uint64_t gic_do_cpu_read(void *opaque
, hwaddr addr
,
611 GICState
**backref
= (GICState
**)opaque
;
612 GICState
*s
= *backref
;
613 int id
= (backref
- s
->backref
);
614 return gic_cpu_read(s
, id
, addr
);
617 static void gic_do_cpu_write(void *opaque
, hwaddr addr
,
618 uint64_t value
, unsigned size
)
620 GICState
**backref
= (GICState
**)opaque
;
621 GICState
*s
= *backref
;
622 int id
= (backref
- s
->backref
);
623 gic_cpu_write(s
, id
, addr
, value
);
626 static const MemoryRegionOps gic_thiscpu_ops
= {
627 .read
= gic_thiscpu_read
,
628 .write
= gic_thiscpu_write
,
629 .endianness
= DEVICE_NATIVE_ENDIAN
,
632 static const MemoryRegionOps gic_cpu_ops
= {
633 .read
= gic_do_cpu_read
,
634 .write
= gic_do_cpu_write
,
635 .endianness
= DEVICE_NATIVE_ENDIAN
,
638 void gic_init_irqs_and_distributor(GICState
*s
, int num_irq
)
642 i
= s
->num_irq
- GIC_INTERNAL
;
643 /* For the GIC, also expose incoming GPIO lines for PPIs for each CPU.
644 * GPIO array layout is thus:
646 * [N..N+31] PPIs for CPU 0
647 * [N+32..N+63] PPIs for CPU 1
650 if (s
->revision
!= REV_NVIC
) {
651 i
+= (GIC_INTERNAL
* s
->num_cpu
);
653 qdev_init_gpio_in(&s
->busdev
.qdev
, gic_set_irq
, i
);
654 for (i
= 0; i
< NUM_CPU(s
); i
++) {
655 sysbus_init_irq(&s
->busdev
, &s
->parent_irq
[i
]);
657 memory_region_init_io(&s
->iomem
, &gic_dist_ops
, s
, "gic_dist", 0x1000);
660 static int arm_gic_init(SysBusDevice
*dev
)
662 /* Device instance init function for the GIC sysbus device */
664 GICState
*s
= FROM_SYSBUS(GICState
, dev
);
665 ARMGICClass
*agc
= ARM_GIC_GET_CLASS(s
);
667 agc
->parent_init(dev
);
669 gic_init_irqs_and_distributor(s
, s
->num_irq
);
671 /* Memory regions for the CPU interfaces (NVIC doesn't have these):
672 * a region for "CPU interface for this core", then a region for
673 * "CPU interface for core 0", "for core 1", ...
674 * NB that the memory region size of 0x100 applies for the 11MPCore
675 * and also cores following the GIC v1 spec (ie A9).
676 * GIC v2 defines a larger memory region (0x1000) so this will need
677 * to be extended when we implement A15.
679 memory_region_init_io(&s
->cpuiomem
[0], &gic_thiscpu_ops
, s
,
681 for (i
= 0; i
< NUM_CPU(s
); i
++) {
683 memory_region_init_io(&s
->cpuiomem
[i
+1], &gic_cpu_ops
, &s
->backref
[i
],
687 sysbus_init_mmio(dev
, &s
->iomem
);
688 /* cpu interfaces (one for "current cpu" plus one per cpu) */
689 for (i
= 0; i
<= NUM_CPU(s
); i
++) {
690 sysbus_init_mmio(dev
, &s
->cpuiomem
[i
]);
695 static void arm_gic_class_init(ObjectClass
*klass
, void *data
)
697 DeviceClass
*dc
= DEVICE_CLASS(klass
);
698 SysBusDeviceClass
*sbc
= SYS_BUS_DEVICE_CLASS(klass
);
699 ARMGICClass
*agc
= ARM_GIC_CLASS(klass
);
700 agc
->parent_init
= sbc
->init
;
701 sbc
->init
= arm_gic_init
;
705 static TypeInfo arm_gic_info
= {
706 .name
= TYPE_ARM_GIC
,
707 .parent
= TYPE_ARM_GIC_COMMON
,
708 .instance_size
= sizeof(GICState
),
709 .class_init
= arm_gic_class_init
,
710 .class_size
= sizeof(ARMGICClass
),
713 static void arm_gic_register_types(void)
715 type_register_static(&arm_gic_info
);
718 type_init(arm_gic_register_types
)