2 * QEMU PowerPC pSeries Logical Partition (aka sPAPR) hardware System Emulator
4 * PAPR Virtualized Interrupt System, aka ICS/ICP aka xics
6 * Copyright (c) 2010,2011 David Gibson, IBM Corporation.
8 * Permission is hereby granted, free of charge, to any person obtaining a copy
9 * of this software and associated documentation files (the "Software"), to deal
10 * in the Software without restriction, including without limitation the rights
11 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12 * copies of the Software, and to permit persons to whom the Software is
13 * furnished to do so, subject to the following conditions:
15 * The above copyright notice and this permission notice shall be included in
16 * all copies or substantial portions of the Software.
18 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
28 #include "qemu/osdep.h"
29 #include "qapi/error.h"
30 #include "qemu-common.h"
34 #include "qemu/timer.h"
35 #include "hw/ppc/xics.h"
36 #include "qemu/error-report.h"
37 #include "qapi/visitor.h"
38 #include "monitor/monitor.h"
39 #include "hw/intc/intc.h"
41 void icp_pic_print_info(ICPState
*icp
, Monitor
*mon
)
43 ICPStateClass
*icpc
= ICP_GET_CLASS(icp
);
44 int cpu_index
= icp
->cs
? icp
->cs
->cpu_index
: -1;
50 if (icpc
->synchronize_state
) {
51 icpc
->synchronize_state(icp
);
54 monitor_printf(mon
, "CPU %d XIRR=%08x (%p) PP=%02x MFRR=%02x\n",
55 cpu_index
, icp
->xirr
, icp
->xirr_owner
,
56 icp
->pending_priority
, icp
->mfrr
);
59 void ics_pic_print_info(ICSState
*ics
, Monitor
*mon
)
61 ICSStateClass
*icsc
= ICS_BASE_GET_CLASS(ics
);
64 monitor_printf(mon
, "ICS %4x..%4x %p\n",
65 ics
->offset
, ics
->offset
+ ics
->nr_irqs
- 1, ics
);
71 if (icsc
->synchronize_state
) {
72 icsc
->synchronize_state(ics
);
75 for (i
= 0; i
< ics
->nr_irqs
; i
++) {
76 ICSIRQState
*irq
= ics
->irqs
+ i
;
78 if (!(irq
->flags
& XICS_FLAGS_IRQ_MASK
)) {
81 monitor_printf(mon
, " %4x %s %02x %02x\n",
83 (irq
->flags
& XICS_FLAGS_IRQ_LSI
) ?
85 irq
->priority
, irq
->status
);
90 * ICP: Presentation layer
93 #define XISR_MASK 0x00ffffff
94 #define CPPR_MASK 0xff000000
96 #define XISR(icp) (((icp)->xirr) & XISR_MASK)
97 #define CPPR(icp) (((icp)->xirr) >> 24)
99 static void ics_reject(ICSState
*ics
, uint32_t nr
)
101 ICSStateClass
*k
= ICS_BASE_GET_CLASS(ics
);
108 void ics_resend(ICSState
*ics
)
110 ICSStateClass
*k
= ICS_BASE_GET_CLASS(ics
);
117 static void ics_eoi(ICSState
*ics
, int nr
)
119 ICSStateClass
*k
= ICS_BASE_GET_CLASS(ics
);
126 static void icp_check_ipi(ICPState
*icp
)
128 if (XISR(icp
) && (icp
->pending_priority
<= icp
->mfrr
)) {
132 trace_xics_icp_check_ipi(icp
->cs
->cpu_index
, icp
->mfrr
);
134 if (XISR(icp
) && icp
->xirr_owner
) {
135 ics_reject(icp
->xirr_owner
, XISR(icp
));
138 icp
->xirr
= (icp
->xirr
& ~XISR_MASK
) | XICS_IPI
;
139 icp
->pending_priority
= icp
->mfrr
;
140 icp
->xirr_owner
= NULL
;
141 qemu_irq_raise(icp
->output
);
144 void icp_resend(ICPState
*icp
)
146 XICSFabric
*xi
= icp
->xics
;
147 XICSFabricClass
*xic
= XICS_FABRIC_GET_CLASS(xi
);
149 if (icp
->mfrr
< CPPR(icp
)) {
156 void icp_set_cppr(ICPState
*icp
, uint8_t cppr
)
161 old_cppr
= CPPR(icp
);
162 icp
->xirr
= (icp
->xirr
& ~CPPR_MASK
) | (cppr
<< 24);
164 if (cppr
< old_cppr
) {
165 if (XISR(icp
) && (cppr
<= icp
->pending_priority
)) {
166 old_xisr
= XISR(icp
);
167 icp
->xirr
&= ~XISR_MASK
; /* Clear XISR */
168 icp
->pending_priority
= 0xff;
169 qemu_irq_lower(icp
->output
);
170 if (icp
->xirr_owner
) {
171 ics_reject(icp
->xirr_owner
, old_xisr
);
172 icp
->xirr_owner
= NULL
;
182 void icp_set_mfrr(ICPState
*icp
, uint8_t mfrr
)
185 if (mfrr
< CPPR(icp
)) {
190 uint32_t icp_accept(ICPState
*icp
)
192 uint32_t xirr
= icp
->xirr
;
194 qemu_irq_lower(icp
->output
);
195 icp
->xirr
= icp
->pending_priority
<< 24;
196 icp
->pending_priority
= 0xff;
197 icp
->xirr_owner
= NULL
;
199 trace_xics_icp_accept(xirr
, icp
->xirr
);
204 uint32_t icp_ipoll(ICPState
*icp
, uint32_t *mfrr
)
212 void icp_eoi(ICPState
*icp
, uint32_t xirr
)
214 XICSFabric
*xi
= icp
->xics
;
215 XICSFabricClass
*xic
= XICS_FABRIC_GET_CLASS(xi
);
219 /* Send EOI -> ICS */
220 icp
->xirr
= (icp
->xirr
& ~CPPR_MASK
) | (xirr
& CPPR_MASK
);
221 trace_xics_icp_eoi(icp
->cs
->cpu_index
, xirr
, icp
->xirr
);
222 irq
= xirr
& XISR_MASK
;
224 ics
= xic
->ics_get(xi
, irq
);
233 static void icp_irq(ICSState
*ics
, int server
, int nr
, uint8_t priority
)
235 ICPState
*icp
= xics_icp_get(ics
->xics
, server
);
237 trace_xics_icp_irq(server
, nr
, priority
);
239 if ((priority
>= CPPR(icp
))
240 || (XISR(icp
) && (icp
->pending_priority
<= priority
))) {
243 if (XISR(icp
) && icp
->xirr_owner
) {
244 ics_reject(icp
->xirr_owner
, XISR(icp
));
245 icp
->xirr_owner
= NULL
;
247 icp
->xirr
= (icp
->xirr
& ~XISR_MASK
) | (nr
& XISR_MASK
);
248 icp
->xirr_owner
= ics
;
249 icp
->pending_priority
= priority
;
250 trace_xics_icp_raise(icp
->xirr
, icp
->pending_priority
);
251 qemu_irq_raise(icp
->output
);
255 static int icp_dispatch_pre_save(void *opaque
)
257 ICPState
*icp
= opaque
;
258 ICPStateClass
*info
= ICP_GET_CLASS(icp
);
260 if (info
->pre_save
) {
267 static int icp_dispatch_post_load(void *opaque
, int version_id
)
269 ICPState
*icp
= opaque
;
270 ICPStateClass
*info
= ICP_GET_CLASS(icp
);
272 if (info
->post_load
) {
273 return info
->post_load(icp
, version_id
);
279 static const VMStateDescription vmstate_icp_server
= {
280 .name
= "icp/server",
282 .minimum_version_id
= 1,
283 .pre_save
= icp_dispatch_pre_save
,
284 .post_load
= icp_dispatch_post_load
,
285 .fields
= (VMStateField
[]) {
287 VMSTATE_UINT32(xirr
, ICPState
),
288 VMSTATE_UINT8(pending_priority
, ICPState
),
289 VMSTATE_UINT8(mfrr
, ICPState
),
290 VMSTATE_END_OF_LIST()
294 static void icp_reset(DeviceState
*dev
)
296 ICPState
*icp
= ICP(dev
);
299 icp
->pending_priority
= 0xff;
302 /* Make all outputs are deasserted */
303 qemu_set_irq(icp
->output
, 0);
306 static void icp_reset_handler(void *dev
)
308 DeviceClass
*dc
= DEVICE_GET_CLASS(dev
);
313 static void icp_realize(DeviceState
*dev
, Error
**errp
)
315 ICPState
*icp
= ICP(dev
);
321 obj
= object_property_get_link(OBJECT(dev
), ICP_PROP_XICS
, &err
);
323 error_propagate(errp
, err
);
324 error_prepend(errp
, "required link '" ICP_PROP_XICS
"' not found: ");
328 icp
->xics
= XICS_FABRIC(obj
);
330 obj
= object_property_get_link(OBJECT(dev
), ICP_PROP_CPU
, &err
);
332 error_propagate(errp
, err
);
333 error_prepend(errp
, "required link '" ICP_PROP_CPU
"' not found: ");
337 cpu
= POWERPC_CPU(obj
);
341 switch (PPC_INPUT(env
)) {
342 case PPC_FLAGS_INPUT_POWER7
:
343 icp
->output
= env
->irq_inputs
[POWER7_INPUT_INT
];
346 case PPC_FLAGS_INPUT_970
:
347 icp
->output
= env
->irq_inputs
[PPC970_INPUT_INT
];
351 error_setg(errp
, "XICS interrupt controller does not support this CPU bus model");
355 qemu_register_reset(icp_reset_handler
, dev
);
356 vmstate_register(NULL
, icp
->cs
->cpu_index
, &vmstate_icp_server
, icp
);
359 static void icp_unrealize(DeviceState
*dev
, Error
**errp
)
361 ICPState
*icp
= ICP(dev
);
363 vmstate_unregister(NULL
, &vmstate_icp_server
, icp
);
364 qemu_unregister_reset(icp_reset_handler
, dev
);
367 static void icp_class_init(ObjectClass
*klass
, void *data
)
369 DeviceClass
*dc
= DEVICE_CLASS(klass
);
371 dc
->realize
= icp_realize
;
372 dc
->unrealize
= icp_unrealize
;
373 dc
->reset
= icp_reset
;
376 static const TypeInfo icp_info
= {
378 .parent
= TYPE_DEVICE
,
379 .instance_size
= sizeof(ICPState
),
380 .class_init
= icp_class_init
,
381 .class_size
= sizeof(ICPStateClass
),
384 Object
*icp_create(Object
*cpu
, const char *type
, XICSFabric
*xi
, Error
**errp
)
386 Error
*local_err
= NULL
;
389 obj
= object_new(type
);
390 object_property_add_child(cpu
, type
, obj
, &error_abort
);
392 object_property_add_const_link(obj
, ICP_PROP_XICS
, OBJECT(xi
),
394 object_property_add_const_link(obj
, ICP_PROP_CPU
, cpu
, &error_abort
);
395 object_property_set_bool(obj
, true, "realized", &local_err
);
397 object_unparent(obj
);
398 error_propagate(errp
, local_err
);
408 static void ics_simple_resend_msi(ICSState
*ics
, int srcno
)
410 ICSIRQState
*irq
= ics
->irqs
+ srcno
;
412 /* FIXME: filter by server#? */
413 if (irq
->status
& XICS_STATUS_REJECTED
) {
414 irq
->status
&= ~XICS_STATUS_REJECTED
;
415 if (irq
->priority
!= 0xff) {
416 icp_irq(ics
, irq
->server
, srcno
+ ics
->offset
, irq
->priority
);
421 static void ics_simple_resend_lsi(ICSState
*ics
, int srcno
)
423 ICSIRQState
*irq
= ics
->irqs
+ srcno
;
425 if ((irq
->priority
!= 0xff)
426 && (irq
->status
& XICS_STATUS_ASSERTED
)
427 && !(irq
->status
& XICS_STATUS_SENT
)) {
428 irq
->status
|= XICS_STATUS_SENT
;
429 icp_irq(ics
, irq
->server
, srcno
+ ics
->offset
, irq
->priority
);
433 static void ics_simple_set_irq_msi(ICSState
*ics
, int srcno
, int val
)
435 ICSIRQState
*irq
= ics
->irqs
+ srcno
;
437 trace_xics_ics_simple_set_irq_msi(srcno
, srcno
+ ics
->offset
);
440 if (irq
->priority
== 0xff) {
441 irq
->status
|= XICS_STATUS_MASKED_PENDING
;
442 trace_xics_masked_pending();
444 icp_irq(ics
, irq
->server
, srcno
+ ics
->offset
, irq
->priority
);
449 static void ics_simple_set_irq_lsi(ICSState
*ics
, int srcno
, int val
)
451 ICSIRQState
*irq
= ics
->irqs
+ srcno
;
453 trace_xics_ics_simple_set_irq_lsi(srcno
, srcno
+ ics
->offset
);
455 irq
->status
|= XICS_STATUS_ASSERTED
;
457 irq
->status
&= ~XICS_STATUS_ASSERTED
;
459 ics_simple_resend_lsi(ics
, srcno
);
462 static void ics_simple_set_irq(void *opaque
, int srcno
, int val
)
464 ICSState
*ics
= (ICSState
*)opaque
;
466 if (ics
->irqs
[srcno
].flags
& XICS_FLAGS_IRQ_LSI
) {
467 ics_simple_set_irq_lsi(ics
, srcno
, val
);
469 ics_simple_set_irq_msi(ics
, srcno
, val
);
473 static void ics_simple_write_xive_msi(ICSState
*ics
, int srcno
)
475 ICSIRQState
*irq
= ics
->irqs
+ srcno
;
477 if (!(irq
->status
& XICS_STATUS_MASKED_PENDING
)
478 || (irq
->priority
== 0xff)) {
482 irq
->status
&= ~XICS_STATUS_MASKED_PENDING
;
483 icp_irq(ics
, irq
->server
, srcno
+ ics
->offset
, irq
->priority
);
486 static void ics_simple_write_xive_lsi(ICSState
*ics
, int srcno
)
488 ics_simple_resend_lsi(ics
, srcno
);
491 void ics_simple_write_xive(ICSState
*ics
, int srcno
, int server
,
492 uint8_t priority
, uint8_t saved_priority
)
494 ICSIRQState
*irq
= ics
->irqs
+ srcno
;
496 irq
->server
= server
;
497 irq
->priority
= priority
;
498 irq
->saved_priority
= saved_priority
;
500 trace_xics_ics_simple_write_xive(ics
->offset
+ srcno
, srcno
, server
,
503 if (ics
->irqs
[srcno
].flags
& XICS_FLAGS_IRQ_LSI
) {
504 ics_simple_write_xive_lsi(ics
, srcno
);
506 ics_simple_write_xive_msi(ics
, srcno
);
510 static void ics_simple_reject(ICSState
*ics
, uint32_t nr
)
512 ICSIRQState
*irq
= ics
->irqs
+ nr
- ics
->offset
;
514 trace_xics_ics_simple_reject(nr
, nr
- ics
->offset
);
515 if (irq
->flags
& XICS_FLAGS_IRQ_MSI
) {
516 irq
->status
|= XICS_STATUS_REJECTED
;
517 } else if (irq
->flags
& XICS_FLAGS_IRQ_LSI
) {
518 irq
->status
&= ~XICS_STATUS_SENT
;
522 static void ics_simple_resend(ICSState
*ics
)
526 for (i
= 0; i
< ics
->nr_irqs
; i
++) {
527 /* FIXME: filter by server#? */
528 if (ics
->irqs
[i
].flags
& XICS_FLAGS_IRQ_LSI
) {
529 ics_simple_resend_lsi(ics
, i
);
531 ics_simple_resend_msi(ics
, i
);
536 static void ics_simple_eoi(ICSState
*ics
, uint32_t nr
)
538 int srcno
= nr
- ics
->offset
;
539 ICSIRQState
*irq
= ics
->irqs
+ srcno
;
541 trace_xics_ics_simple_eoi(nr
);
543 if (ics
->irqs
[srcno
].flags
& XICS_FLAGS_IRQ_LSI
) {
544 irq
->status
&= ~XICS_STATUS_SENT
;
548 static void ics_simple_reset(DeviceState
*dev
)
550 ICSStateClass
*icsc
= ICS_BASE_GET_CLASS(dev
);
552 icsc
->parent_reset(dev
);
555 static void ics_simple_reset_handler(void *dev
)
557 ics_simple_reset(dev
);
560 static void ics_simple_realize(DeviceState
*dev
, Error
**errp
)
562 ICSState
*ics
= ICS_SIMPLE(dev
);
563 ICSStateClass
*icsc
= ICS_BASE_GET_CLASS(ics
);
564 Error
*local_err
= NULL
;
566 icsc
->parent_realize(dev
, &local_err
);
568 error_propagate(errp
, local_err
);
572 ics
->qirqs
= qemu_allocate_irqs(ics_simple_set_irq
, ics
, ics
->nr_irqs
);
574 qemu_register_reset(ics_simple_reset_handler
, ics
);
577 static void ics_simple_class_init(ObjectClass
*klass
, void *data
)
579 DeviceClass
*dc
= DEVICE_CLASS(klass
);
580 ICSStateClass
*isc
= ICS_BASE_CLASS(klass
);
582 device_class_set_parent_realize(dc
, ics_simple_realize
,
583 &isc
->parent_realize
);
584 device_class_set_parent_reset(dc
, ics_simple_reset
,
587 isc
->reject
= ics_simple_reject
;
588 isc
->resend
= ics_simple_resend
;
589 isc
->eoi
= ics_simple_eoi
;
592 static const TypeInfo ics_simple_info
= {
593 .name
= TYPE_ICS_SIMPLE
,
594 .parent
= TYPE_ICS_BASE
,
595 .instance_size
= sizeof(ICSState
),
596 .class_init
= ics_simple_class_init
,
597 .class_size
= sizeof(ICSStateClass
),
600 static void ics_base_reset(DeviceState
*dev
)
602 ICSState
*ics
= ICS_BASE(dev
);
604 uint8_t flags
[ics
->nr_irqs
];
606 for (i
= 0; i
< ics
->nr_irqs
; i
++) {
607 flags
[i
] = ics
->irqs
[i
].flags
;
610 memset(ics
->irqs
, 0, sizeof(ICSIRQState
) * ics
->nr_irqs
);
612 for (i
= 0; i
< ics
->nr_irqs
; i
++) {
613 ics
->irqs
[i
].priority
= 0xff;
614 ics
->irqs
[i
].saved_priority
= 0xff;
615 ics
->irqs
[i
].flags
= flags
[i
];
619 static void ics_base_realize(DeviceState
*dev
, Error
**errp
)
621 ICSState
*ics
= ICS_BASE(dev
);
625 obj
= object_property_get_link(OBJECT(dev
), ICS_PROP_XICS
, &err
);
627 error_propagate(errp
, err
);
628 error_prepend(errp
, "required link '" ICS_PROP_XICS
"' not found: ");
631 ics
->xics
= XICS_FABRIC(obj
);
634 error_setg(errp
, "Number of interrupts needs to be greater 0");
637 ics
->irqs
= g_malloc0(ics
->nr_irqs
* sizeof(ICSIRQState
));
640 static void ics_base_instance_init(Object
*obj
)
642 ICSState
*ics
= ICS_BASE(obj
);
644 ics
->offset
= XICS_IRQ_BASE
;
647 static int ics_base_dispatch_pre_save(void *opaque
)
649 ICSState
*ics
= opaque
;
650 ICSStateClass
*info
= ICS_BASE_GET_CLASS(ics
);
652 if (info
->pre_save
) {
659 static int ics_base_dispatch_post_load(void *opaque
, int version_id
)
661 ICSState
*ics
= opaque
;
662 ICSStateClass
*info
= ICS_BASE_GET_CLASS(ics
);
664 if (info
->post_load
) {
665 return info
->post_load(ics
, version_id
);
671 static const VMStateDescription vmstate_ics_base_irq
= {
674 .minimum_version_id
= 1,
675 .fields
= (VMStateField
[]) {
676 VMSTATE_UINT32(server
, ICSIRQState
),
677 VMSTATE_UINT8(priority
, ICSIRQState
),
678 VMSTATE_UINT8(saved_priority
, ICSIRQState
),
679 VMSTATE_UINT8(status
, ICSIRQState
),
680 VMSTATE_UINT8(flags
, ICSIRQState
),
681 VMSTATE_END_OF_LIST()
685 static const VMStateDescription vmstate_ics_base
= {
688 .minimum_version_id
= 1,
689 .pre_save
= ics_base_dispatch_pre_save
,
690 .post_load
= ics_base_dispatch_post_load
,
691 .fields
= (VMStateField
[]) {
693 VMSTATE_UINT32_EQUAL(nr_irqs
, ICSState
, NULL
),
695 VMSTATE_STRUCT_VARRAY_POINTER_UINT32(irqs
, ICSState
, nr_irqs
,
696 vmstate_ics_base_irq
,
698 VMSTATE_END_OF_LIST()
702 static Property ics_base_properties
[] = {
703 DEFINE_PROP_UINT32("nr-irqs", ICSState
, nr_irqs
, 0),
704 DEFINE_PROP_END_OF_LIST(),
707 static void ics_base_class_init(ObjectClass
*klass
, void *data
)
709 DeviceClass
*dc
= DEVICE_CLASS(klass
);
711 dc
->realize
= ics_base_realize
;
712 dc
->props
= ics_base_properties
;
713 dc
->reset
= ics_base_reset
;
714 dc
->vmsd
= &vmstate_ics_base
;
717 static const TypeInfo ics_base_info
= {
718 .name
= TYPE_ICS_BASE
,
719 .parent
= TYPE_DEVICE
,
721 .instance_size
= sizeof(ICSState
),
722 .instance_init
= ics_base_instance_init
,
723 .class_init
= ics_base_class_init
,
724 .class_size
= sizeof(ICSStateClass
),
727 static const TypeInfo xics_fabric_info
= {
728 .name
= TYPE_XICS_FABRIC
,
729 .parent
= TYPE_INTERFACE
,
730 .class_size
= sizeof(XICSFabricClass
),
736 ICPState
*xics_icp_get(XICSFabric
*xi
, int server
)
738 XICSFabricClass
*xic
= XICS_FABRIC_GET_CLASS(xi
);
740 return xic
->icp_get(xi
, server
);
743 void ics_set_irq_type(ICSState
*ics
, int srcno
, bool lsi
)
745 assert(!(ics
->irqs
[srcno
].flags
& XICS_FLAGS_IRQ_MASK
));
747 ics
->irqs
[srcno
].flags
|=
748 lsi
? XICS_FLAGS_IRQ_LSI
: XICS_FLAGS_IRQ_MSI
;
751 static void xics_register_types(void)
753 type_register_static(&ics_simple_info
);
754 type_register_static(&ics_base_info
);
755 type_register_static(&icp_info
);
756 type_register_static(&xics_fabric_info
);
759 type_init(xics_register_types
)