2 * This program is free software; you can redistribute it and/or modify
3 * it under the terms of the GNU General Public License, version 2, as
4 * published by the Free Software Foundation.
6 * This program is distributed in the hope that it will be useful,
7 * but WITHOUT ANY WARRANTY; without even the implied warranty of
8 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
9 * GNU General Public License for more details.
11 * You should have received a copy of the GNU General Public License
12 * along with this program; if not, write to the Free Software
13 * Foundation, 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
15 * Copyright IBM Corp. 2007
17 * Authors: Hollis Blanchard <hollisb@us.ibm.com>
18 * Christian Ehrhardt <ehrhardt@linux.vnet.ibm.com>
21 #include <linux/errno.h>
22 #include <linux/err.h>
23 #include <linux/kvm_host.h>
24 #include <linux/gfp.h>
25 #include <linux/module.h>
26 #include <linux/vmalloc.h>
29 #include <asm/cputable.h>
30 #include <asm/uaccess.h>
31 #include <asm/kvm_ppc.h>
33 #include <asm/cacheflush.h>
37 unsigned long kvmppc_booke_handlers
;
39 #define VM_STAT(x) offsetof(struct kvm, stat.x), KVM_STAT_VM
40 #define VCPU_STAT(x) offsetof(struct kvm_vcpu, stat.x), KVM_STAT_VCPU
42 struct kvm_stats_debugfs_item debugfs_entries
[] = {
43 { "mmio", VCPU_STAT(mmio_exits
) },
44 { "dcr", VCPU_STAT(dcr_exits
) },
45 { "sig", VCPU_STAT(signal_exits
) },
46 { "itlb_r", VCPU_STAT(itlb_real_miss_exits
) },
47 { "itlb_v", VCPU_STAT(itlb_virt_miss_exits
) },
48 { "dtlb_r", VCPU_STAT(dtlb_real_miss_exits
) },
49 { "dtlb_v", VCPU_STAT(dtlb_virt_miss_exits
) },
50 { "sysc", VCPU_STAT(syscall_exits
) },
51 { "isi", VCPU_STAT(isi_exits
) },
52 { "dsi", VCPU_STAT(dsi_exits
) },
53 { "inst_emu", VCPU_STAT(emulated_inst_exits
) },
54 { "dec", VCPU_STAT(dec_exits
) },
55 { "ext_intr", VCPU_STAT(ext_intr_exits
) },
56 { "halt_wakeup", VCPU_STAT(halt_wakeup
) },
60 /* TODO: use vcpu_printf() */
61 void kvmppc_dump_vcpu(struct kvm_vcpu
*vcpu
)
65 printk("pc: %08lx msr: %08lx\n", vcpu
->arch
.pc
, vcpu
->arch
.msr
);
66 printk("lr: %08lx ctr: %08lx\n", vcpu
->arch
.lr
, vcpu
->arch
.ctr
);
67 printk("srr0: %08lx srr1: %08lx\n", vcpu
->arch
.srr0
, vcpu
->arch
.srr1
);
69 printk("exceptions: %08lx\n", vcpu
->arch
.pending_exceptions
);
71 for (i
= 0; i
< 32; i
+= 4) {
72 printk("gpr%02d: %08lx %08lx %08lx %08lx\n", i
,
73 kvmppc_get_gpr(vcpu
, i
),
74 kvmppc_get_gpr(vcpu
, i
+1),
75 kvmppc_get_gpr(vcpu
, i
+2),
76 kvmppc_get_gpr(vcpu
, i
+3));
80 static void kvmppc_booke_queue_irqprio(struct kvm_vcpu
*vcpu
,
81 unsigned int priority
)
83 set_bit(priority
, &vcpu
->arch
.pending_exceptions
);
86 static void kvmppc_core_queue_dtlb_miss(struct kvm_vcpu
*vcpu
,
87 ulong dear_flags
, ulong esr_flags
)
89 vcpu
->arch
.queued_dear
= dear_flags
;
90 vcpu
->arch
.queued_esr
= esr_flags
;
91 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_DTLB_MISS
);
94 static void kvmppc_core_queue_data_storage(struct kvm_vcpu
*vcpu
,
95 ulong dear_flags
, ulong esr_flags
)
97 vcpu
->arch
.queued_dear
= dear_flags
;
98 vcpu
->arch
.queued_esr
= esr_flags
;
99 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_DATA_STORAGE
);
102 static void kvmppc_core_queue_inst_storage(struct kvm_vcpu
*vcpu
,
105 vcpu
->arch
.queued_esr
= esr_flags
;
106 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_INST_STORAGE
);
109 void kvmppc_core_queue_program(struct kvm_vcpu
*vcpu
, ulong esr_flags
)
111 vcpu
->arch
.queued_esr
= esr_flags
;
112 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_PROGRAM
);
115 void kvmppc_core_queue_dec(struct kvm_vcpu
*vcpu
)
117 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_DECREMENTER
);
120 int kvmppc_core_pending_dec(struct kvm_vcpu
*vcpu
)
122 return test_bit(BOOKE_IRQPRIO_DECREMENTER
, &vcpu
->arch
.pending_exceptions
);
125 void kvmppc_core_dequeue_dec(struct kvm_vcpu
*vcpu
)
127 clear_bit(BOOKE_IRQPRIO_DECREMENTER
, &vcpu
->arch
.pending_exceptions
);
130 void kvmppc_core_queue_external(struct kvm_vcpu
*vcpu
,
131 struct kvm_interrupt
*irq
)
133 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_EXTERNAL
);
136 /* Deliver the interrupt of the corresponding priority, if possible. */
137 static int kvmppc_booke_irqprio_deliver(struct kvm_vcpu
*vcpu
,
138 unsigned int priority
)
142 bool update_esr
= false, update_dear
= false;
145 case BOOKE_IRQPRIO_DTLB_MISS
:
146 case BOOKE_IRQPRIO_DATA_STORAGE
:
149 case BOOKE_IRQPRIO_INST_STORAGE
:
150 case BOOKE_IRQPRIO_PROGRAM
:
153 case BOOKE_IRQPRIO_ITLB_MISS
:
154 case BOOKE_IRQPRIO_SYSCALL
:
155 case BOOKE_IRQPRIO_FP_UNAVAIL
:
156 case BOOKE_IRQPRIO_SPE_UNAVAIL
:
157 case BOOKE_IRQPRIO_SPE_FP_DATA
:
158 case BOOKE_IRQPRIO_SPE_FP_ROUND
:
159 case BOOKE_IRQPRIO_AP_UNAVAIL
:
160 case BOOKE_IRQPRIO_ALIGNMENT
:
162 msr_mask
= MSR_CE
|MSR_ME
|MSR_DE
;
164 case BOOKE_IRQPRIO_CRITICAL
:
165 case BOOKE_IRQPRIO_WATCHDOG
:
166 allowed
= vcpu
->arch
.msr
& MSR_CE
;
169 case BOOKE_IRQPRIO_MACHINE_CHECK
:
170 allowed
= vcpu
->arch
.msr
& MSR_ME
;
173 case BOOKE_IRQPRIO_EXTERNAL
:
174 case BOOKE_IRQPRIO_DECREMENTER
:
175 case BOOKE_IRQPRIO_FIT
:
176 allowed
= vcpu
->arch
.msr
& MSR_EE
;
177 msr_mask
= MSR_CE
|MSR_ME
|MSR_DE
;
179 case BOOKE_IRQPRIO_DEBUG
:
180 allowed
= vcpu
->arch
.msr
& MSR_DE
;
186 vcpu
->arch
.srr0
= vcpu
->arch
.pc
;
187 vcpu
->arch
.srr1
= vcpu
->arch
.msr
;
188 vcpu
->arch
.pc
= vcpu
->arch
.ivpr
| vcpu
->arch
.ivor
[priority
];
189 if (update_esr
== true)
190 vcpu
->arch
.esr
= vcpu
->arch
.queued_esr
;
191 if (update_dear
== true)
192 vcpu
->arch
.dear
= vcpu
->arch
.queued_dear
;
193 kvmppc_set_msr(vcpu
, vcpu
->arch
.msr
& msr_mask
);
195 clear_bit(priority
, &vcpu
->arch
.pending_exceptions
);
201 /* Check pending exceptions and deliver one, if possible. */
202 void kvmppc_core_deliver_interrupts(struct kvm_vcpu
*vcpu
)
204 unsigned long *pending
= &vcpu
->arch
.pending_exceptions
;
205 unsigned int priority
;
207 priority
= __ffs(*pending
);
208 while (priority
<= BOOKE_IRQPRIO_MAX
) {
209 if (kvmppc_booke_irqprio_deliver(vcpu
, priority
))
212 priority
= find_next_bit(pending
,
213 BITS_PER_BYTE
* sizeof(*pending
),
221 * Return value is in the form (errcode<<2 | RESUME_FLAG_HOST | RESUME_FLAG_NV)
223 int kvmppc_handle_exit(struct kvm_run
*run
, struct kvm_vcpu
*vcpu
,
224 unsigned int exit_nr
)
226 enum emulation_result er
;
229 /* update before a new last_exit_type is rewritten */
230 kvmppc_update_timing_stats(vcpu
);
234 run
->exit_reason
= KVM_EXIT_UNKNOWN
;
235 run
->ready_for_interrupt_injection
= 1;
238 case BOOKE_INTERRUPT_MACHINE_CHECK
:
239 printk("MACHINE CHECK: %lx\n", mfspr(SPRN_MCSR
));
240 kvmppc_dump_vcpu(vcpu
);
244 case BOOKE_INTERRUPT_EXTERNAL
:
245 kvmppc_account_exit(vcpu
, EXT_INTR_EXITS
);
251 case BOOKE_INTERRUPT_DECREMENTER
:
252 /* Since we switched IVPR back to the host's value, the host
253 * handled this interrupt the moment we enabled interrupts.
254 * Now we just offer it a chance to reschedule the guest. */
255 kvmppc_account_exit(vcpu
, DEC_EXITS
);
261 case BOOKE_INTERRUPT_PROGRAM
:
262 if (vcpu
->arch
.msr
& MSR_PR
) {
263 /* Program traps generated by user-level software must be handled
264 * by the guest kernel. */
265 kvmppc_core_queue_program(vcpu
, vcpu
->arch
.fault_esr
);
267 kvmppc_account_exit(vcpu
, USR_PR_INST
);
271 er
= kvmppc_emulate_instruction(run
, vcpu
);
274 /* don't overwrite subtypes, just account kvm_stats */
275 kvmppc_account_exit_stat(vcpu
, EMULATED_INST_EXITS
);
276 /* Future optimization: only reload non-volatiles if
277 * they were actually modified by emulation. */
281 run
->exit_reason
= KVM_EXIT_DCR
;
285 /* XXX Deliver Program interrupt to guest. */
286 printk(KERN_CRIT
"%s: emulation at %lx failed (%08x)\n",
287 __func__
, vcpu
->arch
.pc
, vcpu
->arch
.last_inst
);
288 /* For debugging, encode the failing instruction and
289 * report it to userspace. */
290 run
->hw
.hardware_exit_reason
= ~0ULL << 32;
291 run
->hw
.hardware_exit_reason
|= vcpu
->arch
.last_inst
;
299 case BOOKE_INTERRUPT_FP_UNAVAIL
:
300 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_FP_UNAVAIL
);
301 kvmppc_account_exit(vcpu
, FP_UNAVAIL
);
305 case BOOKE_INTERRUPT_SPE_UNAVAIL
:
306 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_SPE_UNAVAIL
);
310 case BOOKE_INTERRUPT_SPE_FP_DATA
:
311 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_SPE_FP_DATA
);
315 case BOOKE_INTERRUPT_SPE_FP_ROUND
:
316 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_SPE_FP_ROUND
);
320 case BOOKE_INTERRUPT_DATA_STORAGE
:
321 kvmppc_core_queue_data_storage(vcpu
, vcpu
->arch
.fault_dear
,
322 vcpu
->arch
.fault_esr
);
323 kvmppc_account_exit(vcpu
, DSI_EXITS
);
327 case BOOKE_INTERRUPT_INST_STORAGE
:
328 kvmppc_core_queue_inst_storage(vcpu
, vcpu
->arch
.fault_esr
);
329 kvmppc_account_exit(vcpu
, ISI_EXITS
);
333 case BOOKE_INTERRUPT_SYSCALL
:
334 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_SYSCALL
);
335 kvmppc_account_exit(vcpu
, SYSCALL_EXITS
);
339 case BOOKE_INTERRUPT_DTLB_MISS
: {
340 unsigned long eaddr
= vcpu
->arch
.fault_dear
;
345 /* Check the guest TLB. */
346 gtlb_index
= kvmppc_mmu_dtlb_index(vcpu
, eaddr
);
347 if (gtlb_index
< 0) {
348 /* The guest didn't have a mapping for it. */
349 kvmppc_core_queue_dtlb_miss(vcpu
,
350 vcpu
->arch
.fault_dear
,
351 vcpu
->arch
.fault_esr
);
352 kvmppc_mmu_dtlb_miss(vcpu
);
353 kvmppc_account_exit(vcpu
, DTLB_REAL_MISS_EXITS
);
358 gpaddr
= kvmppc_mmu_xlate(vcpu
, gtlb_index
, eaddr
);
359 gfn
= gpaddr
>> PAGE_SHIFT
;
361 if (kvm_is_visible_gfn(vcpu
->kvm
, gfn
)) {
362 /* The guest TLB had a mapping, but the shadow TLB
363 * didn't, and it is RAM. This could be because:
364 * a) the entry is mapping the host kernel, or
365 * b) the guest used a large mapping which we're faking
366 * Either way, we need to satisfy the fault without
367 * invoking the guest. */
368 kvmppc_mmu_map(vcpu
, eaddr
, gpaddr
, gtlb_index
);
369 kvmppc_account_exit(vcpu
, DTLB_VIRT_MISS_EXITS
);
372 /* Guest has mapped and accessed a page which is not
374 vcpu
->arch
.paddr_accessed
= gpaddr
;
375 r
= kvmppc_emulate_mmio(run
, vcpu
);
376 kvmppc_account_exit(vcpu
, MMIO_EXITS
);
382 case BOOKE_INTERRUPT_ITLB_MISS
: {
383 unsigned long eaddr
= vcpu
->arch
.pc
;
390 /* Check the guest TLB. */
391 gtlb_index
= kvmppc_mmu_itlb_index(vcpu
, eaddr
);
392 if (gtlb_index
< 0) {
393 /* The guest didn't have a mapping for it. */
394 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_ITLB_MISS
);
395 kvmppc_mmu_itlb_miss(vcpu
);
396 kvmppc_account_exit(vcpu
, ITLB_REAL_MISS_EXITS
);
400 kvmppc_account_exit(vcpu
, ITLB_VIRT_MISS_EXITS
);
402 gpaddr
= kvmppc_mmu_xlate(vcpu
, gtlb_index
, eaddr
);
403 gfn
= gpaddr
>> PAGE_SHIFT
;
405 if (kvm_is_visible_gfn(vcpu
->kvm
, gfn
)) {
406 /* The guest TLB had a mapping, but the shadow TLB
407 * didn't. This could be because:
408 * a) the entry is mapping the host kernel, or
409 * b) the guest used a large mapping which we're faking
410 * Either way, we need to satisfy the fault without
411 * invoking the guest. */
412 kvmppc_mmu_map(vcpu
, eaddr
, gpaddr
, gtlb_index
);
414 /* Guest mapped and leaped at non-RAM! */
415 kvmppc_booke_queue_irqprio(vcpu
, BOOKE_IRQPRIO_MACHINE_CHECK
);
421 case BOOKE_INTERRUPT_DEBUG
: {
424 vcpu
->arch
.pc
= mfspr(SPRN_CSRR0
);
426 /* clear IAC events in DBSR register */
427 dbsr
= mfspr(SPRN_DBSR
);
428 dbsr
&= DBSR_IAC1
| DBSR_IAC2
| DBSR_IAC3
| DBSR_IAC4
;
429 mtspr(SPRN_DBSR
, dbsr
);
431 run
->exit_reason
= KVM_EXIT_DEBUG
;
432 kvmppc_account_exit(vcpu
, DEBUG_EXITS
);
438 printk(KERN_EMERG
"exit_nr %d\n", exit_nr
);
444 kvmppc_core_deliver_interrupts(vcpu
);
446 if (!(r
& RESUME_HOST
)) {
447 /* To avoid clobbering exit_reason, only check for signals if
448 * we aren't already exiting to userspace for some other
450 if (signal_pending(current
)) {
451 run
->exit_reason
= KVM_EXIT_INTR
;
452 r
= (-EINTR
<< 2) | RESUME_HOST
| (r
& RESUME_FLAG_NV
);
453 kvmppc_account_exit(vcpu
, SIGNAL_EXITS
);
460 /* Initial guest state: 16MB mapping 0 -> 0, PC = 0, MSR = 0, R1 = 16MB */
461 int kvm_arch_vcpu_setup(struct kvm_vcpu
*vcpu
)
465 kvmppc_set_gpr(vcpu
, 1, (16<<20) - 8); /* -8 for the callee-save LR slot */
467 vcpu
->arch
.shadow_pid
= 1;
469 /* Eye-catching number so we know if the guest takes an interrupt
470 * before it's programmed its own IVPR. */
471 vcpu
->arch
.ivpr
= 0x55550000;
473 kvmppc_init_timing_stats(vcpu
);
475 return kvmppc_core_vcpu_setup(vcpu
);
478 int kvm_arch_vcpu_ioctl_get_regs(struct kvm_vcpu
*vcpu
, struct kvm_regs
*regs
)
484 regs
->pc
= vcpu
->arch
.pc
;
485 regs
->cr
= kvmppc_get_cr(vcpu
);
486 regs
->ctr
= vcpu
->arch
.ctr
;
487 regs
->lr
= vcpu
->arch
.lr
;
488 regs
->xer
= kvmppc_get_xer(vcpu
);
489 regs
->msr
= vcpu
->arch
.msr
;
490 regs
->srr0
= vcpu
->arch
.srr0
;
491 regs
->srr1
= vcpu
->arch
.srr1
;
492 regs
->pid
= vcpu
->arch
.pid
;
493 regs
->sprg0
= vcpu
->arch
.sprg0
;
494 regs
->sprg1
= vcpu
->arch
.sprg1
;
495 regs
->sprg2
= vcpu
->arch
.sprg2
;
496 regs
->sprg3
= vcpu
->arch
.sprg3
;
497 regs
->sprg5
= vcpu
->arch
.sprg4
;
498 regs
->sprg6
= vcpu
->arch
.sprg5
;
499 regs
->sprg7
= vcpu
->arch
.sprg6
;
501 for (i
= 0; i
< ARRAY_SIZE(regs
->gpr
); i
++)
502 regs
->gpr
[i
] = kvmppc_get_gpr(vcpu
, i
);
509 int kvm_arch_vcpu_ioctl_set_regs(struct kvm_vcpu
*vcpu
, struct kvm_regs
*regs
)
515 vcpu
->arch
.pc
= regs
->pc
;
516 kvmppc_set_cr(vcpu
, regs
->cr
);
517 vcpu
->arch
.ctr
= regs
->ctr
;
518 vcpu
->arch
.lr
= regs
->lr
;
519 kvmppc_set_xer(vcpu
, regs
->xer
);
520 kvmppc_set_msr(vcpu
, regs
->msr
);
521 vcpu
->arch
.srr0
= regs
->srr0
;
522 vcpu
->arch
.srr1
= regs
->srr1
;
523 vcpu
->arch
.sprg0
= regs
->sprg0
;
524 vcpu
->arch
.sprg1
= regs
->sprg1
;
525 vcpu
->arch
.sprg2
= regs
->sprg2
;
526 vcpu
->arch
.sprg3
= regs
->sprg3
;
527 vcpu
->arch
.sprg5
= regs
->sprg4
;
528 vcpu
->arch
.sprg6
= regs
->sprg5
;
529 vcpu
->arch
.sprg7
= regs
->sprg6
;
531 for (i
= 0; i
< ARRAY_SIZE(regs
->gpr
); i
++)
532 kvmppc_set_gpr(vcpu
, i
, regs
->gpr
[i
]);
539 int kvm_arch_vcpu_ioctl_get_sregs(struct kvm_vcpu
*vcpu
,
540 struct kvm_sregs
*sregs
)
545 int kvm_arch_vcpu_ioctl_set_sregs(struct kvm_vcpu
*vcpu
,
546 struct kvm_sregs
*sregs
)
551 int kvm_arch_vcpu_ioctl_get_fpu(struct kvm_vcpu
*vcpu
, struct kvm_fpu
*fpu
)
556 int kvm_arch_vcpu_ioctl_set_fpu(struct kvm_vcpu
*vcpu
, struct kvm_fpu
*fpu
)
561 int kvm_arch_vcpu_ioctl_translate(struct kvm_vcpu
*vcpu
,
562 struct kvm_translation
*tr
)
567 r
= kvmppc_core_vcpu_translate(vcpu
, tr
);
572 int kvm_vm_ioctl_get_dirty_log(struct kvm
*kvm
, struct kvm_dirty_log
*log
)
577 int __init
kvmppc_booke_init(void)
579 unsigned long ivor
[16];
580 unsigned long max_ivor
= 0;
583 /* We install our own exception handlers by hijacking IVPR. IVPR must
584 * be 16-bit aligned, so we need a 64KB allocation. */
585 kvmppc_booke_handlers
= __get_free_pages(GFP_KERNEL
| __GFP_ZERO
,
587 if (!kvmppc_booke_handlers
)
590 /* XXX make sure our handlers are smaller than Linux's */
592 /* Copy our interrupt handlers to match host IVORs. That way we don't
593 * have to swap the IVORs on every guest/host transition. */
594 ivor
[0] = mfspr(SPRN_IVOR0
);
595 ivor
[1] = mfspr(SPRN_IVOR1
);
596 ivor
[2] = mfspr(SPRN_IVOR2
);
597 ivor
[3] = mfspr(SPRN_IVOR3
);
598 ivor
[4] = mfspr(SPRN_IVOR4
);
599 ivor
[5] = mfspr(SPRN_IVOR5
);
600 ivor
[6] = mfspr(SPRN_IVOR6
);
601 ivor
[7] = mfspr(SPRN_IVOR7
);
602 ivor
[8] = mfspr(SPRN_IVOR8
);
603 ivor
[9] = mfspr(SPRN_IVOR9
);
604 ivor
[10] = mfspr(SPRN_IVOR10
);
605 ivor
[11] = mfspr(SPRN_IVOR11
);
606 ivor
[12] = mfspr(SPRN_IVOR12
);
607 ivor
[13] = mfspr(SPRN_IVOR13
);
608 ivor
[14] = mfspr(SPRN_IVOR14
);
609 ivor
[15] = mfspr(SPRN_IVOR15
);
611 for (i
= 0; i
< 16; i
++) {
612 if (ivor
[i
] > max_ivor
)
615 memcpy((void *)kvmppc_booke_handlers
+ ivor
[i
],
616 kvmppc_handlers_start
+ i
* kvmppc_handler_len
,
619 flush_icache_range(kvmppc_booke_handlers
,
620 kvmppc_booke_handlers
+ max_ivor
+ kvmppc_handler_len
);
625 void __exit
kvmppc_booke_exit(void)
627 free_pages(kvmppc_booke_handlers
, VCPU_SIZE_ORDER
);