4 * Copyright (c) 2004-2005 Fabrice Bellard
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, see <http://www.gnu.org/licenses/>
19 #include "qemu-thread.h"
20 #include "apic_internal.h"
24 #include "host-utils.h"
27 #include "apic-msidef.h"
29 #define MAX_APIC_WORDS 8
31 #define SYNC_FROM_VAPIC 0x1
32 #define SYNC_TO_VAPIC 0x2
33 #define SYNC_ISR_IRR_TO_VAPIC 0x4
35 static APICCommonState
*local_apics
[MAX_APICS
+ 1];
37 static void apic_set_irq(APICCommonState
*s
, int vector_num
, int trigger_mode
);
38 static void apic_update_irq(APICCommonState
*s
);
39 static void apic_get_delivery_bitmask(uint32_t *deliver_bitmask
,
40 uint8_t dest
, uint8_t dest_mode
);
42 /* Find first bit starting from msb */
43 static int fls_bit(uint32_t value
)
45 return 31 - clz32(value
);
48 /* Find first bit starting from lsb */
49 static int ffs_bit(uint32_t value
)
54 static inline void set_bit(uint32_t *tab
, int index
)
58 mask
= 1 << (index
& 0x1f);
62 static inline void reset_bit(uint32_t *tab
, int index
)
66 mask
= 1 << (index
& 0x1f);
70 static inline int get_bit(uint32_t *tab
, int index
)
74 mask
= 1 << (index
& 0x1f);
75 return !!(tab
[i
] & mask
);
78 /* return -1 if no bit is set */
79 static int get_highest_priority_int(uint32_t *tab
)
82 for (i
= 7; i
>= 0; i
--) {
84 return i
* 32 + fls_bit(tab
[i
]);
90 static void apic_sync_vapic(APICCommonState
*s
, int sync_type
)
92 VAPICState vapic_state
;
97 if (!s
->vapic_paddr
) {
100 if (sync_type
& SYNC_FROM_VAPIC
) {
101 cpu_physical_memory_rw(s
->vapic_paddr
, (void *)&vapic_state
,
102 sizeof(vapic_state
), 0);
103 s
->tpr
= vapic_state
.tpr
;
105 if (sync_type
& (SYNC_TO_VAPIC
| SYNC_ISR_IRR_TO_VAPIC
)) {
106 start
= offsetof(VAPICState
, isr
);
107 length
= offsetof(VAPICState
, enabled
) - offsetof(VAPICState
, isr
);
109 if (sync_type
& SYNC_TO_VAPIC
) {
110 assert(qemu_cpu_is_self(&s
->cpu
->env
));
112 vapic_state
.tpr
= s
->tpr
;
113 vapic_state
.enabled
= 1;
115 length
= sizeof(VAPICState
);
118 vector
= get_highest_priority_int(s
->isr
);
122 vapic_state
.isr
= vector
& 0xf0;
124 vapic_state
.zero
= 0;
126 vector
= get_highest_priority_int(s
->irr
);
130 vapic_state
.irr
= vector
& 0xff;
132 cpu_physical_memory_write_rom(s
->vapic_paddr
+ start
,
133 ((void *)&vapic_state
) + start
, length
);
137 static void apic_vapic_base_update(APICCommonState
*s
)
139 apic_sync_vapic(s
, SYNC_TO_VAPIC
);
142 static void apic_local_deliver(APICCommonState
*s
, int vector
)
144 uint32_t lvt
= s
->lvt
[vector
];
147 trace_apic_local_deliver(vector
, (lvt
>> 8) & 7);
149 if (lvt
& APIC_LVT_MASKED
)
152 switch ((lvt
>> 8) & 7) {
154 cpu_interrupt(&s
->cpu
->env
, CPU_INTERRUPT_SMI
);
158 cpu_interrupt(&s
->cpu
->env
, CPU_INTERRUPT_NMI
);
162 cpu_interrupt(&s
->cpu
->env
, CPU_INTERRUPT_HARD
);
166 trigger_mode
= APIC_TRIGGER_EDGE
;
167 if ((vector
== APIC_LVT_LINT0
|| vector
== APIC_LVT_LINT1
) &&
168 (lvt
& APIC_LVT_LEVEL_TRIGGER
))
169 trigger_mode
= APIC_TRIGGER_LEVEL
;
170 apic_set_irq(s
, lvt
& 0xff, trigger_mode
);
174 void apic_deliver_pic_intr(DeviceState
*d
, int level
)
176 APICCommonState
*s
= DO_UPCAST(APICCommonState
, busdev
.qdev
, d
);
179 apic_local_deliver(s
, APIC_LVT_LINT0
);
181 uint32_t lvt
= s
->lvt
[APIC_LVT_LINT0
];
183 switch ((lvt
>> 8) & 7) {
185 if (!(lvt
& APIC_LVT_LEVEL_TRIGGER
))
187 reset_bit(s
->irr
, lvt
& 0xff);
190 cpu_reset_interrupt(&s
->cpu
->env
, CPU_INTERRUPT_HARD
);
196 static void apic_external_nmi(APICCommonState
*s
)
198 apic_local_deliver(s
, APIC_LVT_LINT1
);
201 #define foreach_apic(apic, deliver_bitmask, code) \
203 int __i, __j, __mask;\
204 for(__i = 0; __i < MAX_APIC_WORDS; __i++) {\
205 __mask = deliver_bitmask[__i];\
207 for(__j = 0; __j < 32; __j++) {\
208 if (__mask & (1 << __j)) {\
209 apic = local_apics[__i * 32 + __j];\
219 static void apic_bus_deliver(const uint32_t *deliver_bitmask
,
220 uint8_t delivery_mode
, uint8_t vector_num
,
221 uint8_t trigger_mode
)
223 APICCommonState
*apic_iter
;
225 switch (delivery_mode
) {
227 /* XXX: search for focus processor, arbitration */
231 for(i
= 0; i
< MAX_APIC_WORDS
; i
++) {
232 if (deliver_bitmask
[i
]) {
233 d
= i
* 32 + ffs_bit(deliver_bitmask
[i
]);
238 apic_iter
= local_apics
[d
];
240 apic_set_irq(apic_iter
, vector_num
, trigger_mode
);
250 foreach_apic(apic_iter
, deliver_bitmask
,
251 cpu_interrupt(&apic_iter
->cpu
->env
, CPU_INTERRUPT_SMI
)
256 foreach_apic(apic_iter
, deliver_bitmask
,
257 cpu_interrupt(&apic_iter
->cpu
->env
, CPU_INTERRUPT_NMI
)
262 /* normal INIT IPI sent to processors */
263 foreach_apic(apic_iter
, deliver_bitmask
,
264 cpu_interrupt(&apic_iter
->cpu
->env
,
270 /* handled in I/O APIC code */
277 foreach_apic(apic_iter
, deliver_bitmask
,
278 apic_set_irq(apic_iter
, vector_num
, trigger_mode
) );
281 void apic_deliver_irq(uint8_t dest
, uint8_t dest_mode
, uint8_t delivery_mode
,
282 uint8_t vector_num
, uint8_t trigger_mode
)
284 uint32_t deliver_bitmask
[MAX_APIC_WORDS
];
286 trace_apic_deliver_irq(dest
, dest_mode
, delivery_mode
, vector_num
,
289 apic_get_delivery_bitmask(deliver_bitmask
, dest
, dest_mode
);
290 apic_bus_deliver(deliver_bitmask
, delivery_mode
, vector_num
, trigger_mode
);
293 static void apic_set_base(APICCommonState
*s
, uint64_t val
)
295 s
->apicbase
= (val
& 0xfffff000) |
296 (s
->apicbase
& (MSR_IA32_APICBASE_BSP
| MSR_IA32_APICBASE_ENABLE
));
297 /* if disabled, cannot be enabled again */
298 if (!(val
& MSR_IA32_APICBASE_ENABLE
)) {
299 s
->apicbase
&= ~MSR_IA32_APICBASE_ENABLE
;
300 cpu_clear_apic_feature(&s
->cpu
->env
);
301 s
->spurious_vec
&= ~APIC_SV_ENABLE
;
305 static void apic_set_tpr(APICCommonState
*s
, uint8_t val
)
307 /* Updates from cr8 are ignored while the VAPIC is active */
308 if (!s
->vapic_paddr
) {
314 static uint8_t apic_get_tpr(APICCommonState
*s
)
316 apic_sync_vapic(s
, SYNC_FROM_VAPIC
);
320 static int apic_get_ppr(APICCommonState
*s
)
325 isrv
= get_highest_priority_int(s
->isr
);
336 static int apic_get_arb_pri(APICCommonState
*s
)
338 /* XXX: arbitration */
344 * <0 - low prio interrupt,
346 * >0 - interrupt number
348 static int apic_irq_pending(APICCommonState
*s
)
351 irrv
= get_highest_priority_int(s
->irr
);
355 ppr
= apic_get_ppr(s
);
356 if (ppr
&& (irrv
& 0xf0) <= (ppr
& 0xf0)) {
363 /* signal the CPU if an irq is pending */
364 static void apic_update_irq(APICCommonState
*s
)
366 if (!(s
->spurious_vec
& APIC_SV_ENABLE
)) {
369 if (!qemu_cpu_is_self(&s
->cpu
->env
)) {
370 cpu_interrupt(&s
->cpu
->env
, CPU_INTERRUPT_POLL
);
371 } else if (apic_irq_pending(s
) > 0) {
372 cpu_interrupt(&s
->cpu
->env
, CPU_INTERRUPT_HARD
);
376 void apic_poll_irq(DeviceState
*d
)
378 APICCommonState
*s
= APIC_COMMON(d
);
380 apic_sync_vapic(s
, SYNC_FROM_VAPIC
);
384 static void apic_set_irq(APICCommonState
*s
, int vector_num
, int trigger_mode
)
386 apic_report_irq_delivered(!get_bit(s
->irr
, vector_num
));
388 set_bit(s
->irr
, vector_num
);
390 set_bit(s
->tmr
, vector_num
);
392 reset_bit(s
->tmr
, vector_num
);
393 if (s
->vapic_paddr
) {
394 apic_sync_vapic(s
, SYNC_ISR_IRR_TO_VAPIC
);
396 * The vcpu thread needs to see the new IRR before we pull its current
397 * TPR value. That way, if we miss a lowering of the TRP, the guest
398 * has the chance to notice the new IRR and poll for IRQs on its own.
401 apic_sync_vapic(s
, SYNC_FROM_VAPIC
);
406 static void apic_eoi(APICCommonState
*s
)
409 isrv
= get_highest_priority_int(s
->isr
);
412 reset_bit(s
->isr
, isrv
);
413 if (!(s
->spurious_vec
& APIC_SV_DIRECTED_IO
) && get_bit(s
->tmr
, isrv
)) {
414 ioapic_eoi_broadcast(isrv
);
416 apic_sync_vapic(s
, SYNC_FROM_VAPIC
| SYNC_TO_VAPIC
);
420 static int apic_find_dest(uint8_t dest
)
422 APICCommonState
*apic
= local_apics
[dest
];
425 if (apic
&& apic
->id
== dest
)
426 return dest
; /* shortcut in case apic->id == apic->idx */
428 for (i
= 0; i
< MAX_APICS
; i
++) {
429 apic
= local_apics
[i
];
430 if (apic
&& apic
->id
== dest
)
439 static void apic_get_delivery_bitmask(uint32_t *deliver_bitmask
,
440 uint8_t dest
, uint8_t dest_mode
)
442 APICCommonState
*apic_iter
;
445 if (dest_mode
== 0) {
447 memset(deliver_bitmask
, 0xff, MAX_APIC_WORDS
* sizeof(uint32_t));
449 int idx
= apic_find_dest(dest
);
450 memset(deliver_bitmask
, 0x00, MAX_APIC_WORDS
* sizeof(uint32_t));
452 set_bit(deliver_bitmask
, idx
);
455 /* XXX: cluster mode */
456 memset(deliver_bitmask
, 0x00, MAX_APIC_WORDS
* sizeof(uint32_t));
457 for(i
= 0; i
< MAX_APICS
; i
++) {
458 apic_iter
= local_apics
[i
];
460 if (apic_iter
->dest_mode
== 0xf) {
461 if (dest
& apic_iter
->log_dest
)
462 set_bit(deliver_bitmask
, i
);
463 } else if (apic_iter
->dest_mode
== 0x0) {
464 if ((dest
& 0xf0) == (apic_iter
->log_dest
& 0xf0) &&
465 (dest
& apic_iter
->log_dest
& 0x0f)) {
466 set_bit(deliver_bitmask
, i
);
476 static void apic_startup(APICCommonState
*s
, int vector_num
)
478 s
->sipi_vector
= vector_num
;
479 cpu_interrupt(&s
->cpu
->env
, CPU_INTERRUPT_SIPI
);
482 void apic_sipi(DeviceState
*d
)
484 APICCommonState
*s
= DO_UPCAST(APICCommonState
, busdev
.qdev
, d
);
486 cpu_reset_interrupt(&s
->cpu
->env
, CPU_INTERRUPT_SIPI
);
488 if (!s
->wait_for_sipi
)
490 cpu_x86_load_seg_cache_sipi(&s
->cpu
->env
, s
->sipi_vector
);
491 s
->wait_for_sipi
= 0;
494 static void apic_deliver(DeviceState
*d
, uint8_t dest
, uint8_t dest_mode
,
495 uint8_t delivery_mode
, uint8_t vector_num
,
496 uint8_t trigger_mode
)
498 APICCommonState
*s
= DO_UPCAST(APICCommonState
, busdev
.qdev
, d
);
499 uint32_t deliver_bitmask
[MAX_APIC_WORDS
];
500 int dest_shorthand
= (s
->icr
[0] >> 18) & 3;
501 APICCommonState
*apic_iter
;
503 switch (dest_shorthand
) {
505 apic_get_delivery_bitmask(deliver_bitmask
, dest
, dest_mode
);
508 memset(deliver_bitmask
, 0x00, sizeof(deliver_bitmask
));
509 set_bit(deliver_bitmask
, s
->idx
);
512 memset(deliver_bitmask
, 0xff, sizeof(deliver_bitmask
));
515 memset(deliver_bitmask
, 0xff, sizeof(deliver_bitmask
));
516 reset_bit(deliver_bitmask
, s
->idx
);
520 switch (delivery_mode
) {
523 int trig_mode
= (s
->icr
[0] >> 15) & 1;
524 int level
= (s
->icr
[0] >> 14) & 1;
525 if (level
== 0 && trig_mode
== 1) {
526 foreach_apic(apic_iter
, deliver_bitmask
,
527 apic_iter
->arb_id
= apic_iter
->id
);
534 foreach_apic(apic_iter
, deliver_bitmask
,
535 apic_startup(apic_iter
, vector_num
) );
539 apic_bus_deliver(deliver_bitmask
, delivery_mode
, vector_num
, trigger_mode
);
542 static bool apic_check_pic(APICCommonState
*s
)
544 if (!apic_accept_pic_intr(&s
->busdev
.qdev
) || !pic_get_output(isa_pic
)) {
547 apic_deliver_pic_intr(&s
->busdev
.qdev
, 1);
551 int apic_get_interrupt(DeviceState
*d
)
553 APICCommonState
*s
= DO_UPCAST(APICCommonState
, busdev
.qdev
, d
);
556 /* if the APIC is installed or enabled, we let the 8259 handle the
560 if (!(s
->spurious_vec
& APIC_SV_ENABLE
))
563 apic_sync_vapic(s
, SYNC_FROM_VAPIC
);
564 intno
= apic_irq_pending(s
);
567 apic_sync_vapic(s
, SYNC_TO_VAPIC
);
569 } else if (intno
< 0) {
570 apic_sync_vapic(s
, SYNC_TO_VAPIC
);
571 return s
->spurious_vec
& 0xff;
573 reset_bit(s
->irr
, intno
);
574 set_bit(s
->isr
, intno
);
575 apic_sync_vapic(s
, SYNC_TO_VAPIC
);
577 /* re-inject if there is still a pending PIC interrupt */
585 int apic_accept_pic_intr(DeviceState
*d
)
587 APICCommonState
*s
= DO_UPCAST(APICCommonState
, busdev
.qdev
, d
);
593 lvt0
= s
->lvt
[APIC_LVT_LINT0
];
595 if ((s
->apicbase
& MSR_IA32_APICBASE_ENABLE
) == 0 ||
596 (lvt0
& APIC_LVT_MASKED
) == 0)
602 static uint32_t apic_get_current_count(APICCommonState
*s
)
606 d
= (qemu_get_clock_ns(vm_clock
) - s
->initial_count_load_time
) >>
608 if (s
->lvt
[APIC_LVT_TIMER
] & APIC_LVT_TIMER_PERIODIC
) {
610 val
= s
->initial_count
- (d
% ((uint64_t)s
->initial_count
+ 1));
612 if (d
>= s
->initial_count
)
615 val
= s
->initial_count
- d
;
620 static void apic_timer_update(APICCommonState
*s
, int64_t current_time
)
622 if (apic_next_timer(s
, current_time
)) {
623 qemu_mod_timer(s
->timer
, s
->next_time
);
625 qemu_del_timer(s
->timer
);
629 static void apic_timer(void *opaque
)
631 APICCommonState
*s
= opaque
;
633 apic_local_deliver(s
, APIC_LVT_TIMER
);
634 apic_timer_update(s
, s
->next_time
);
637 static uint32_t apic_mem_readb(void *opaque
, hwaddr addr
)
642 static uint32_t apic_mem_readw(void *opaque
, hwaddr addr
)
647 static void apic_mem_writeb(void *opaque
, hwaddr addr
, uint32_t val
)
651 static void apic_mem_writew(void *opaque
, hwaddr addr
, uint32_t val
)
655 static uint32_t apic_mem_readl(void *opaque
, hwaddr addr
)
662 d
= cpu_get_current_apic();
666 s
= DO_UPCAST(APICCommonState
, busdev
.qdev
, d
);
668 index
= (addr
>> 4) & 0xff;
673 case 0x03: /* version */
674 val
= 0x11 | ((APIC_LVT_NB
- 1) << 16); /* version 0x11 */
677 apic_sync_vapic(s
, SYNC_FROM_VAPIC
);
678 if (apic_report_tpr_access
) {
679 cpu_report_tpr_access(&s
->cpu
->env
, TPR_ACCESS_READ
);
684 val
= apic_get_arb_pri(s
);
688 val
= apic_get_ppr(s
);
694 val
= s
->log_dest
<< 24;
697 val
= s
->dest_mode
<< 28;
700 val
= s
->spurious_vec
;
703 val
= s
->isr
[index
& 7];
706 val
= s
->tmr
[index
& 7];
709 val
= s
->irr
[index
& 7];
716 val
= s
->icr
[index
& 1];
719 val
= s
->lvt
[index
- 0x32];
722 val
= s
->initial_count
;
725 val
= apic_get_current_count(s
);
728 val
= s
->divide_conf
;
731 s
->esr
|= ESR_ILLEGAL_ADDRESS
;
735 trace_apic_mem_readl(addr
, val
);
739 static void apic_send_msi(hwaddr addr
, uint32_t data
)
741 uint8_t dest
= (addr
& MSI_ADDR_DEST_ID_MASK
) >> MSI_ADDR_DEST_ID_SHIFT
;
742 uint8_t vector
= (data
& MSI_DATA_VECTOR_MASK
) >> MSI_DATA_VECTOR_SHIFT
;
743 uint8_t dest_mode
= (addr
>> MSI_ADDR_DEST_MODE_SHIFT
) & 0x1;
744 uint8_t trigger_mode
= (data
>> MSI_DATA_TRIGGER_SHIFT
) & 0x1;
745 uint8_t delivery
= (data
>> MSI_DATA_DELIVERY_MODE_SHIFT
) & 0x7;
746 /* XXX: Ignore redirection hint. */
747 apic_deliver_irq(dest
, dest_mode
, delivery
, vector
, trigger_mode
);
750 static void apic_mem_writel(void *opaque
, hwaddr addr
, uint32_t val
)
754 int index
= (addr
>> 4) & 0xff;
755 if (addr
> 0xfff || !index
) {
756 /* MSI and MMIO APIC are at the same memory location,
757 * but actually not on the global bus: MSI is on PCI bus
758 * APIC is connected directly to the CPU.
759 * Mapping them on the global bus happens to work because
760 * MSI registers are reserved in APIC MMIO and vice versa. */
761 apic_send_msi(addr
, val
);
765 d
= cpu_get_current_apic();
769 s
= DO_UPCAST(APICCommonState
, busdev
.qdev
, d
);
771 trace_apic_mem_writel(addr
, val
);
780 if (apic_report_tpr_access
) {
781 cpu_report_tpr_access(&s
->cpu
->env
, TPR_ACCESS_WRITE
);
784 apic_sync_vapic(s
, SYNC_TO_VAPIC
);
794 s
->log_dest
= val
>> 24;
797 s
->dest_mode
= val
>> 28;
800 s
->spurious_vec
= val
& 0x1ff;
810 apic_deliver(d
, (s
->icr
[1] >> 24) & 0xff, (s
->icr
[0] >> 11) & 1,
811 (s
->icr
[0] >> 8) & 7, (s
->icr
[0] & 0xff),
812 (s
->icr
[0] >> 15) & 1);
819 int n
= index
- 0x32;
821 if (n
== APIC_LVT_TIMER
) {
822 apic_timer_update(s
, qemu_get_clock_ns(vm_clock
));
823 } else if (n
== APIC_LVT_LINT0
&& apic_check_pic(s
)) {
829 s
->initial_count
= val
;
830 s
->initial_count_load_time
= qemu_get_clock_ns(vm_clock
);
831 apic_timer_update(s
, s
->initial_count_load_time
);
838 s
->divide_conf
= val
& 0xb;
839 v
= (s
->divide_conf
& 3) | ((s
->divide_conf
>> 1) & 4);
840 s
->count_shift
= (v
+ 1) & 7;
844 s
->esr
|= ESR_ILLEGAL_ADDRESS
;
849 static void apic_pre_save(APICCommonState
*s
)
851 apic_sync_vapic(s
, SYNC_FROM_VAPIC
);
854 static void apic_post_load(APICCommonState
*s
)
856 if (s
->timer_expiry
!= -1) {
857 qemu_mod_timer(s
->timer
, s
->timer_expiry
);
859 qemu_del_timer(s
->timer
);
863 static const MemoryRegionOps apic_io_ops
= {
865 .read
= { apic_mem_readb
, apic_mem_readw
, apic_mem_readl
, },
866 .write
= { apic_mem_writeb
, apic_mem_writew
, apic_mem_writel
, },
868 .endianness
= DEVICE_NATIVE_ENDIAN
,
871 static void apic_init(APICCommonState
*s
)
873 memory_region_init_io(&s
->io_memory
, &apic_io_ops
, s
, "apic-msi",
876 s
->timer
= qemu_new_timer_ns(vm_clock
, apic_timer
, s
);
877 local_apics
[s
->idx
] = s
;
879 msi_supported
= true;
882 static void apic_class_init(ObjectClass
*klass
, void *data
)
884 APICCommonClass
*k
= APIC_COMMON_CLASS(klass
);
887 k
->set_base
= apic_set_base
;
888 k
->set_tpr
= apic_set_tpr
;
889 k
->get_tpr
= apic_get_tpr
;
890 k
->vapic_base_update
= apic_vapic_base_update
;
891 k
->external_nmi
= apic_external_nmi
;
892 k
->pre_save
= apic_pre_save
;
893 k
->post_load
= apic_post_load
;
896 static TypeInfo apic_info
= {
898 .instance_size
= sizeof(APICCommonState
),
899 .parent
= TYPE_APIC_COMMON
,
900 .class_init
= apic_class_init
,
903 static void apic_register_types(void)
905 type_register_static(&apic_info
);
908 type_init(apic_register_types
)