2 * Copyright 2011 Paul Mackerras, IBM Corp. <paulus@au1.ibm.com>
3 * Copyright (C) 2009. SUSE Linux Products GmbH. All rights reserved.
6 * Paul Mackerras <paulus@au1.ibm.com>
7 * Alexander Graf <agraf@suse.de>
8 * Kevin Wolf <mail@kevin-wolf.de>
10 * Description: KVM functions specific to running on Book 3S
11 * processors in hypervisor mode (specifically POWER7 and later).
13 * This file is derived from arch/powerpc/kvm/book3s.c,
14 * by Alexander Graf <agraf@suse.de>.
16 * This program is free software; you can redistribute it and/or modify
17 * it under the terms of the GNU General Public License, version 2, as
18 * published by the Free Software Foundation.
21 #include <linux/kvm_host.h>
22 #include <linux/err.h>
23 #include <linux/slab.h>
24 #include <linux/preempt.h>
25 #include <linux/sched.h>
26 #include <linux/delay.h>
27 #include <linux/export.h>
29 #include <linux/anon_inodes.h>
30 #include <linux/cpumask.h>
31 #include <linux/spinlock.h>
32 #include <linux/page-flags.h>
35 #include <asm/cputable.h>
36 #include <asm/cacheflush.h>
37 #include <asm/tlbflush.h>
38 #include <asm/uaccess.h>
40 #include <asm/kvm_ppc.h>
41 #include <asm/kvm_book3s.h>
42 #include <asm/mmu_context.h>
43 #include <asm/lppaca.h>
44 #include <asm/processor.h>
45 #include <asm/cputhreads.h>
47 #include <asm/hvcall.h>
48 #include <linux/gfp.h>
49 #include <linux/sched.h>
50 #include <linux/vmalloc.h>
51 #include <linux/highmem.h>
52 #include <linux/hugetlb.h>
54 /* #define EXIT_DEBUG */
55 /* #define EXIT_DEBUG_SIMPLE */
56 /* #define EXIT_DEBUG_INT */
58 static void kvmppc_end_cede(struct kvm_vcpu
*vcpu
);
59 static int kvmppc_hv_setup_rma(struct kvm_vcpu
*vcpu
);
61 void kvmppc_core_vcpu_load(struct kvm_vcpu
*vcpu
, int cpu
)
63 local_paca
->kvm_hstate
.kvm_vcpu
= vcpu
;
64 local_paca
->kvm_hstate
.kvm_vcore
= vcpu
->arch
.vcore
;
67 void kvmppc_core_vcpu_put(struct kvm_vcpu
*vcpu
)
71 void kvmppc_set_msr(struct kvm_vcpu
*vcpu
, u64 msr
)
73 vcpu
->arch
.shregs
.msr
= msr
;
74 kvmppc_end_cede(vcpu
);
77 void kvmppc_set_pvr(struct kvm_vcpu
*vcpu
, u32 pvr
)
82 void kvmppc_dump_regs(struct kvm_vcpu
*vcpu
)
86 pr_err("vcpu %p (%d):\n", vcpu
, vcpu
->vcpu_id
);
87 pr_err("pc = %.16lx msr = %.16llx trap = %x\n",
88 vcpu
->arch
.pc
, vcpu
->arch
.shregs
.msr
, vcpu
->arch
.trap
);
89 for (r
= 0; r
< 16; ++r
)
90 pr_err("r%2d = %.16lx r%d = %.16lx\n",
91 r
, kvmppc_get_gpr(vcpu
, r
),
92 r
+16, kvmppc_get_gpr(vcpu
, r
+16));
93 pr_err("ctr = %.16lx lr = %.16lx\n",
94 vcpu
->arch
.ctr
, vcpu
->arch
.lr
);
95 pr_err("srr0 = %.16llx srr1 = %.16llx\n",
96 vcpu
->arch
.shregs
.srr0
, vcpu
->arch
.shregs
.srr1
);
97 pr_err("sprg0 = %.16llx sprg1 = %.16llx\n",
98 vcpu
->arch
.shregs
.sprg0
, vcpu
->arch
.shregs
.sprg1
);
99 pr_err("sprg2 = %.16llx sprg3 = %.16llx\n",
100 vcpu
->arch
.shregs
.sprg2
, vcpu
->arch
.shregs
.sprg3
);
101 pr_err("cr = %.8x xer = %.16lx dsisr = %.8x\n",
102 vcpu
->arch
.cr
, vcpu
->arch
.xer
, vcpu
->arch
.shregs
.dsisr
);
103 pr_err("dar = %.16llx\n", vcpu
->arch
.shregs
.dar
);
104 pr_err("fault dar = %.16lx dsisr = %.8x\n",
105 vcpu
->arch
.fault_dar
, vcpu
->arch
.fault_dsisr
);
106 pr_err("SLB (%d entries):\n", vcpu
->arch
.slb_max
);
107 for (r
= 0; r
< vcpu
->arch
.slb_max
; ++r
)
108 pr_err(" ESID = %.16llx VSID = %.16llx\n",
109 vcpu
->arch
.slb
[r
].orige
, vcpu
->arch
.slb
[r
].origv
);
110 pr_err("lpcr = %.16lx sdr1 = %.16lx last_inst = %.8x\n",
111 vcpu
->kvm
->arch
.lpcr
, vcpu
->kvm
->arch
.sdr1
,
112 vcpu
->arch
.last_inst
);
115 struct kvm_vcpu
*kvmppc_find_vcpu(struct kvm
*kvm
, int id
)
118 struct kvm_vcpu
*v
, *ret
= NULL
;
120 mutex_lock(&kvm
->lock
);
121 kvm_for_each_vcpu(r
, v
, kvm
) {
122 if (v
->vcpu_id
== id
) {
127 mutex_unlock(&kvm
->lock
);
131 static void init_vpa(struct kvm_vcpu
*vcpu
, struct lppaca
*vpa
)
133 vpa
->shared_proc
= 1;
134 vpa
->yield_count
= 1;
137 static unsigned long do_h_register_vpa(struct kvm_vcpu
*vcpu
,
139 unsigned long vcpuid
, unsigned long vpa
)
141 struct kvm
*kvm
= vcpu
->kvm
;
142 unsigned long len
, nb
;
144 struct kvm_vcpu
*tvcpu
;
145 int err
= H_PARAMETER
;
147 tvcpu
= kvmppc_find_vcpu(kvm
, vcpuid
);
153 if (flags
== 0 || flags
== 4)
158 if (flags
>= 2 && !tvcpu
->arch
.vpa
)
160 /* registering new area; convert logical addr to real */
161 va
= kvmppc_pin_guest_page(kvm
, vpa
, &nb
);
165 len
= *(unsigned short *)(va
+ 4);
167 len
= *(unsigned int *)(va
+ 4);
171 case 1: /* register VPA */
175 kvmppc_unpin_guest_page(kvm
, vcpu
->arch
.vpa
);
176 tvcpu
->arch
.vpa
= va
;
179 case 2: /* register DTL */
184 kvmppc_unpin_guest_page(kvm
, vcpu
->arch
.dtl
);
185 tvcpu
->arch
.dtl
= va
;
186 tvcpu
->arch
.dtl_end
= va
+ len
;
188 case 3: /* register SLB shadow buffer */
191 if (tvcpu
->arch
.slb_shadow
)
192 kvmppc_unpin_guest_page(kvm
, vcpu
->arch
.slb_shadow
);
193 tvcpu
->arch
.slb_shadow
= va
;
198 case 5: /* unregister VPA */
199 if (tvcpu
->arch
.slb_shadow
|| tvcpu
->arch
.dtl
)
201 if (!tvcpu
->arch
.vpa
)
203 kvmppc_unpin_guest_page(kvm
, tvcpu
->arch
.vpa
);
204 tvcpu
->arch
.vpa
= NULL
;
206 case 6: /* unregister DTL */
207 if (!tvcpu
->arch
.dtl
)
209 kvmppc_unpin_guest_page(kvm
, tvcpu
->arch
.dtl
);
210 tvcpu
->arch
.dtl
= NULL
;
212 case 7: /* unregister SLB shadow buffer */
213 if (!tvcpu
->arch
.slb_shadow
)
215 kvmppc_unpin_guest_page(kvm
, tvcpu
->arch
.slb_shadow
);
216 tvcpu
->arch
.slb_shadow
= NULL
;
223 kvmppc_unpin_guest_page(kvm
, va
);
227 int kvmppc_pseries_do_hcall(struct kvm_vcpu
*vcpu
)
229 unsigned long req
= kvmppc_get_gpr(vcpu
, 3);
230 unsigned long target
, ret
= H_SUCCESS
;
231 struct kvm_vcpu
*tvcpu
;
235 ret
= kvmppc_virtmode_h_enter(vcpu
, kvmppc_get_gpr(vcpu
, 4),
236 kvmppc_get_gpr(vcpu
, 5),
237 kvmppc_get_gpr(vcpu
, 6),
238 kvmppc_get_gpr(vcpu
, 7));
243 target
= kvmppc_get_gpr(vcpu
, 4);
244 tvcpu
= kvmppc_find_vcpu(vcpu
->kvm
, target
);
249 tvcpu
->arch
.prodded
= 1;
251 if (vcpu
->arch
.ceded
) {
252 if (waitqueue_active(&vcpu
->wq
)) {
253 wake_up_interruptible(&vcpu
->wq
);
254 vcpu
->stat
.halt_wakeup
++;
261 ret
= do_h_register_vpa(vcpu
, kvmppc_get_gpr(vcpu
, 4),
262 kvmppc_get_gpr(vcpu
, 5),
263 kvmppc_get_gpr(vcpu
, 6));
268 kvmppc_set_gpr(vcpu
, 3, ret
);
269 vcpu
->arch
.hcall_needed
= 0;
273 static int kvmppc_handle_exit(struct kvm_run
*run
, struct kvm_vcpu
*vcpu
,
274 struct task_struct
*tsk
)
278 vcpu
->stat
.sum_exits
++;
280 run
->exit_reason
= KVM_EXIT_UNKNOWN
;
281 run
->ready_for_interrupt_injection
= 1;
282 switch (vcpu
->arch
.trap
) {
283 /* We're good on these - the host merely wanted to get our attention */
284 case BOOK3S_INTERRUPT_HV_DECREMENTER
:
285 vcpu
->stat
.dec_exits
++;
288 case BOOK3S_INTERRUPT_EXTERNAL
:
289 vcpu
->stat
.ext_intr_exits
++;
292 case BOOK3S_INTERRUPT_PERFMON
:
295 case BOOK3S_INTERRUPT_PROGRAM
:
299 * Normally program interrupts are delivered directly
300 * to the guest by the hardware, but we can get here
301 * as a result of a hypervisor emulation interrupt
302 * (e40) getting turned into a 700 by BML RTAS.
304 flags
= vcpu
->arch
.shregs
.msr
& 0x1f0000ull
;
305 kvmppc_core_queue_program(vcpu
, flags
);
309 case BOOK3S_INTERRUPT_SYSCALL
:
311 /* hcall - punt to userspace */
314 if (vcpu
->arch
.shregs
.msr
& MSR_PR
) {
315 /* sc 1 from userspace - reflect to guest syscall */
316 kvmppc_book3s_queue_irqprio(vcpu
, BOOK3S_INTERRUPT_SYSCALL
);
320 run
->papr_hcall
.nr
= kvmppc_get_gpr(vcpu
, 3);
321 for (i
= 0; i
< 9; ++i
)
322 run
->papr_hcall
.args
[i
] = kvmppc_get_gpr(vcpu
, 4 + i
);
323 run
->exit_reason
= KVM_EXIT_PAPR_HCALL
;
324 vcpu
->arch
.hcall_needed
= 1;
329 * We get these next two if the guest accesses a page which it thinks
330 * it has mapped but which is not actually present, either because
331 * it is for an emulated I/O device or because the corresonding
332 * host page has been paged out. Any other HDSI/HISI interrupts
333 * have been handled already.
335 case BOOK3S_INTERRUPT_H_DATA_STORAGE
:
336 r
= kvmppc_book3s_hv_page_fault(run
, vcpu
,
337 vcpu
->arch
.fault_dar
, vcpu
->arch
.fault_dsisr
);
339 case BOOK3S_INTERRUPT_H_INST_STORAGE
:
340 r
= kvmppc_book3s_hv_page_fault(run
, vcpu
,
341 kvmppc_get_pc(vcpu
), 0);
344 * This occurs if the guest executes an illegal instruction.
345 * We just generate a program interrupt to the guest, since
346 * we don't emulate any guest instructions at this stage.
348 case BOOK3S_INTERRUPT_H_EMUL_ASSIST
:
349 kvmppc_core_queue_program(vcpu
, 0x80000);
353 kvmppc_dump_regs(vcpu
);
354 printk(KERN_EMERG
"trap=0x%x | pc=0x%lx | msr=0x%llx\n",
355 vcpu
->arch
.trap
, kvmppc_get_pc(vcpu
),
356 vcpu
->arch
.shregs
.msr
);
365 int kvm_arch_vcpu_ioctl_get_sregs(struct kvm_vcpu
*vcpu
,
366 struct kvm_sregs
*sregs
)
370 sregs
->pvr
= vcpu
->arch
.pvr
;
372 memset(sregs
, 0, sizeof(struct kvm_sregs
));
373 for (i
= 0; i
< vcpu
->arch
.slb_max
; i
++) {
374 sregs
->u
.s
.ppc64
.slb
[i
].slbe
= vcpu
->arch
.slb
[i
].orige
;
375 sregs
->u
.s
.ppc64
.slb
[i
].slbv
= vcpu
->arch
.slb
[i
].origv
;
381 int kvm_arch_vcpu_ioctl_set_sregs(struct kvm_vcpu
*vcpu
,
382 struct kvm_sregs
*sregs
)
386 kvmppc_set_pvr(vcpu
, sregs
->pvr
);
389 for (i
= 0; i
< vcpu
->arch
.slb_nr
; i
++) {
390 if (sregs
->u
.s
.ppc64
.slb
[i
].slbe
& SLB_ESID_V
) {
391 vcpu
->arch
.slb
[j
].orige
= sregs
->u
.s
.ppc64
.slb
[i
].slbe
;
392 vcpu
->arch
.slb
[j
].origv
= sregs
->u
.s
.ppc64
.slb
[i
].slbv
;
396 vcpu
->arch
.slb_max
= j
;
401 int kvm_vcpu_ioctl_get_one_reg(struct kvm_vcpu
*vcpu
, struct kvm_one_reg
*reg
)
406 case KVM_REG_PPC_HIOR
:
407 r
= put_user(0, (u64 __user
*)reg
->addr
);
416 int kvm_vcpu_ioctl_set_one_reg(struct kvm_vcpu
*vcpu
, struct kvm_one_reg
*reg
)
421 case KVM_REG_PPC_HIOR
:
424 /* Only allow this to be set to zero */
425 r
= get_user(hior
, (u64 __user
*)reg
->addr
);
426 if (!r
&& (hior
!= 0))
437 int kvmppc_core_check_processor_compat(void)
439 if (cpu_has_feature(CPU_FTR_HVMODE
))
444 struct kvm_vcpu
*kvmppc_core_vcpu_create(struct kvm
*kvm
, unsigned int id
)
446 struct kvm_vcpu
*vcpu
;
449 struct kvmppc_vcore
*vcore
;
451 core
= id
/ threads_per_core
;
452 if (core
>= KVM_MAX_VCORES
)
456 vcpu
= kmem_cache_zalloc(kvm_vcpu_cache
, GFP_KERNEL
);
460 err
= kvm_vcpu_init(vcpu
, kvm
, id
);
464 vcpu
->arch
.shared
= &vcpu
->arch
.shregs
;
465 vcpu
->arch
.last_cpu
= -1;
466 vcpu
->arch
.mmcr
[0] = MMCR0_FC
;
467 vcpu
->arch
.ctrl
= CTRL_RUNLATCH
;
468 /* default to host PVR, since we can't spoof it */
469 vcpu
->arch
.pvr
= mfspr(SPRN_PVR
);
470 kvmppc_set_pvr(vcpu
, vcpu
->arch
.pvr
);
472 kvmppc_mmu_book3s_hv_init(vcpu
);
475 * We consider the vcpu stopped until we see the first run ioctl for it.
477 vcpu
->arch
.state
= KVMPPC_VCPU_STOPPED
;
479 init_waitqueue_head(&vcpu
->arch
.cpu_run
);
481 mutex_lock(&kvm
->lock
);
482 vcore
= kvm
->arch
.vcores
[core
];
484 vcore
= kzalloc(sizeof(struct kvmppc_vcore
), GFP_KERNEL
);
486 INIT_LIST_HEAD(&vcore
->runnable_threads
);
487 spin_lock_init(&vcore
->lock
);
488 init_waitqueue_head(&vcore
->wq
);
490 kvm
->arch
.vcores
[core
] = vcore
;
492 mutex_unlock(&kvm
->lock
);
497 spin_lock(&vcore
->lock
);
498 ++vcore
->num_threads
;
499 spin_unlock(&vcore
->lock
);
500 vcpu
->arch
.vcore
= vcore
;
502 vcpu
->arch
.cpu_type
= KVM_CPU_3S_64
;
503 kvmppc_sanity_check(vcpu
);
508 kmem_cache_free(kvm_vcpu_cache
, vcpu
);
513 void kvmppc_core_vcpu_free(struct kvm_vcpu
*vcpu
)
516 kvmppc_unpin_guest_page(vcpu
->kvm
, vcpu
->arch
.dtl
);
517 if (vcpu
->arch
.slb_shadow
)
518 kvmppc_unpin_guest_page(vcpu
->kvm
, vcpu
->arch
.slb_shadow
);
520 kvmppc_unpin_guest_page(vcpu
->kvm
, vcpu
->arch
.vpa
);
521 kvm_vcpu_uninit(vcpu
);
522 kmem_cache_free(kvm_vcpu_cache
, vcpu
);
525 static void kvmppc_set_timer(struct kvm_vcpu
*vcpu
)
527 unsigned long dec_nsec
, now
;
530 if (now
> vcpu
->arch
.dec_expires
) {
531 /* decrementer has already gone negative */
532 kvmppc_core_queue_dec(vcpu
);
533 kvmppc_core_prepare_to_enter(vcpu
);
536 dec_nsec
= (vcpu
->arch
.dec_expires
- now
) * NSEC_PER_SEC
538 hrtimer_start(&vcpu
->arch
.dec_timer
, ktime_set(0, dec_nsec
),
540 vcpu
->arch
.timer_running
= 1;
543 static void kvmppc_end_cede(struct kvm_vcpu
*vcpu
)
545 vcpu
->arch
.ceded
= 0;
546 if (vcpu
->arch
.timer_running
) {
547 hrtimer_try_to_cancel(&vcpu
->arch
.dec_timer
);
548 vcpu
->arch
.timer_running
= 0;
552 extern int __kvmppc_vcore_entry(struct kvm_run
*kvm_run
, struct kvm_vcpu
*vcpu
);
553 extern void xics_wake_cpu(int cpu
);
555 static void kvmppc_remove_runnable(struct kvmppc_vcore
*vc
,
556 struct kvm_vcpu
*vcpu
)
560 if (vcpu
->arch
.state
!= KVMPPC_VCPU_RUNNABLE
)
562 vcpu
->arch
.state
= KVMPPC_VCPU_BUSY_IN_HOST
;
565 /* decrement the physical thread id of each following vcpu */
567 list_for_each_entry_continue(v
, &vc
->runnable_threads
, arch
.run_list
)
569 list_del(&vcpu
->arch
.run_list
);
572 static void kvmppc_start_thread(struct kvm_vcpu
*vcpu
)
575 struct paca_struct
*tpaca
;
576 struct kvmppc_vcore
*vc
= vcpu
->arch
.vcore
;
578 if (vcpu
->arch
.timer_running
) {
579 hrtimer_try_to_cancel(&vcpu
->arch
.dec_timer
);
580 vcpu
->arch
.timer_running
= 0;
582 cpu
= vc
->pcpu
+ vcpu
->arch
.ptid
;
584 tpaca
->kvm_hstate
.kvm_vcpu
= vcpu
;
585 tpaca
->kvm_hstate
.kvm_vcore
= vc
;
586 tpaca
->kvm_hstate
.napping
= 0;
587 vcpu
->cpu
= vc
->pcpu
;
589 #if defined(CONFIG_PPC_ICP_NATIVE) && defined(CONFIG_SMP)
590 if (vcpu
->arch
.ptid
) {
591 tpaca
->cpu_start
= 0x80;
599 static void kvmppc_wait_for_nap(struct kvmppc_vcore
*vc
)
605 while (vc
->nap_count
< vc
->n_woken
) {
606 if (++i
>= 1000000) {
607 pr_err("kvmppc_wait_for_nap timeout %d %d\n",
608 vc
->nap_count
, vc
->n_woken
);
617 * Check that we are on thread 0 and that any other threads in
618 * this core are off-line.
620 static int on_primary_thread(void)
622 int cpu
= smp_processor_id();
623 int thr
= cpu_thread_in_core(cpu
);
627 while (++thr
< threads_per_core
)
628 if (cpu_online(cpu
+ thr
))
634 * Run a set of guest threads on a physical core.
635 * Called with vc->lock held.
637 static int kvmppc_run_core(struct kvmppc_vcore
*vc
)
639 struct kvm_vcpu
*vcpu
, *vcpu0
, *vnext
;
644 /* don't start if any threads have a signal pending */
645 list_for_each_entry(vcpu
, &vc
->runnable_threads
, arch
.run_list
)
646 if (signal_pending(vcpu
->arch
.run_task
))
650 * Make sure we are running on thread 0, and that
651 * secondary threads are offline.
652 * XXX we should also block attempts to bring any
653 * secondary threads online.
655 if (threads_per_core
> 1 && !on_primary_thread()) {
656 list_for_each_entry(vcpu
, &vc
->runnable_threads
, arch
.run_list
)
657 vcpu
->arch
.ret
= -EBUSY
;
662 * Assign physical thread IDs, first to non-ceded vcpus
663 * and then to ceded ones.
667 list_for_each_entry(vcpu
, &vc
->runnable_threads
, arch
.run_list
) {
668 if (!vcpu
->arch
.ceded
) {
671 vcpu
->arch
.ptid
= ptid
++;
675 return 0; /* nothing to run */
676 list_for_each_entry(vcpu
, &vc
->runnable_threads
, arch
.run_list
)
677 if (vcpu
->arch
.ceded
)
678 vcpu
->arch
.ptid
= ptid
++;
682 vc
->entry_exit_count
= 0;
683 vc
->vcore_state
= VCORE_RUNNING
;
685 vc
->pcpu
= smp_processor_id();
686 vc
->napping_threads
= 0;
687 list_for_each_entry(vcpu
, &vc
->runnable_threads
, arch
.run_list
)
688 kvmppc_start_thread(vcpu
);
691 spin_unlock(&vc
->lock
);
694 __kvmppc_vcore_entry(NULL
, vcpu0
);
696 spin_lock(&vc
->lock
);
697 /* disable sending of IPIs on virtual external irqs */
698 list_for_each_entry(vcpu
, &vc
->runnable_threads
, arch
.run_list
)
700 /* wait for secondary threads to finish writing their state to memory */
701 if (vc
->nap_count
< vc
->n_woken
)
702 kvmppc_wait_for_nap(vc
);
703 /* prevent other vcpu threads from doing kvmppc_start_thread() now */
704 vc
->vcore_state
= VCORE_EXITING
;
705 spin_unlock(&vc
->lock
);
707 /* make sure updates to secondary vcpu structs are visible now */
715 list_for_each_entry(vcpu
, &vc
->runnable_threads
, arch
.run_list
) {
716 /* cancel pending dec exception if dec is positive */
717 if (now
< vcpu
->arch
.dec_expires
&&
718 kvmppc_core_pending_dec(vcpu
))
719 kvmppc_core_dequeue_dec(vcpu
);
723 ret
= kvmppc_handle_exit(vcpu
->arch
.kvm_run
, vcpu
,
724 vcpu
->arch
.run_task
);
726 vcpu
->arch
.ret
= ret
;
729 if (vcpu
->arch
.ceded
) {
730 if (ret
!= RESUME_GUEST
)
731 kvmppc_end_cede(vcpu
);
733 kvmppc_set_timer(vcpu
);
737 spin_lock(&vc
->lock
);
739 vc
->vcore_state
= VCORE_INACTIVE
;
740 list_for_each_entry_safe(vcpu
, vnext
, &vc
->runnable_threads
,
742 if (vcpu
->arch
.ret
!= RESUME_GUEST
) {
743 kvmppc_remove_runnable(vc
, vcpu
);
744 wake_up(&vcpu
->arch
.cpu_run
);
752 * Wait for some other vcpu thread to execute us, and
753 * wake us up when we need to handle something in the host.
755 static void kvmppc_wait_for_exec(struct kvm_vcpu
*vcpu
, int wait_state
)
759 prepare_to_wait(&vcpu
->arch
.cpu_run
, &wait
, wait_state
);
760 if (vcpu
->arch
.state
== KVMPPC_VCPU_RUNNABLE
)
762 finish_wait(&vcpu
->arch
.cpu_run
, &wait
);
766 * All the vcpus in this vcore are idle, so wait for a decrementer
767 * or external interrupt to one of the vcpus. vc->lock is held.
769 static void kvmppc_vcore_blocked(struct kvmppc_vcore
*vc
)
775 prepare_to_wait(&vc
->wq
, &wait
, TASK_INTERRUPTIBLE
);
776 vc
->vcore_state
= VCORE_SLEEPING
;
777 spin_unlock(&vc
->lock
);
778 list_for_each_entry(v
, &vc
->runnable_threads
, arch
.run_list
) {
779 if (!v
->arch
.ceded
|| v
->arch
.pending_exceptions
) {
786 finish_wait(&vc
->wq
, &wait
);
787 spin_lock(&vc
->lock
);
788 vc
->vcore_state
= VCORE_INACTIVE
;
791 static int kvmppc_run_vcpu(struct kvm_run
*kvm_run
, struct kvm_vcpu
*vcpu
)
795 struct kvmppc_vcore
*vc
;
796 struct kvm_vcpu
*v
, *vn
;
798 kvm_run
->exit_reason
= 0;
799 vcpu
->arch
.ret
= RESUME_GUEST
;
803 * Synchronize with other threads in this virtual core
805 vc
= vcpu
->arch
.vcore
;
806 spin_lock(&vc
->lock
);
807 vcpu
->arch
.ceded
= 0;
808 vcpu
->arch
.run_task
= current
;
809 vcpu
->arch
.kvm_run
= kvm_run
;
810 prev_state
= vcpu
->arch
.state
;
811 vcpu
->arch
.state
= KVMPPC_VCPU_RUNNABLE
;
812 list_add_tail(&vcpu
->arch
.run_list
, &vc
->runnable_threads
);
816 * This happens the first time this is called for a vcpu.
817 * If the vcore is already running, we may be able to start
818 * this thread straight away and have it join in.
820 if (prev_state
== KVMPPC_VCPU_STOPPED
) {
821 if (vc
->vcore_state
== VCORE_RUNNING
&&
822 VCORE_EXIT_COUNT(vc
) == 0) {
823 vcpu
->arch
.ptid
= vc
->n_runnable
- 1;
824 kvmppc_start_thread(vcpu
);
827 } else if (prev_state
== KVMPPC_VCPU_BUSY_IN_HOST
)
830 while (vcpu
->arch
.state
== KVMPPC_VCPU_RUNNABLE
&&
831 !signal_pending(current
)) {
832 if (vc
->n_busy
|| vc
->vcore_state
!= VCORE_INACTIVE
) {
833 spin_unlock(&vc
->lock
);
834 kvmppc_wait_for_exec(vcpu
, TASK_INTERRUPTIBLE
);
835 spin_lock(&vc
->lock
);
839 list_for_each_entry(v
, &vc
->runnable_threads
, arch
.run_list
)
840 n_ceded
+= v
->arch
.ceded
;
841 if (n_ceded
== vc
->n_runnable
)
842 kvmppc_vcore_blocked(vc
);
846 list_for_each_entry_safe(v
, vn
, &vc
->runnable_threads
,
848 kvmppc_core_prepare_to_enter(v
);
849 if (signal_pending(v
->arch
.run_task
)) {
850 kvmppc_remove_runnable(vc
, v
);
851 v
->stat
.signal_exits
++;
852 v
->arch
.kvm_run
->exit_reason
= KVM_EXIT_INTR
;
853 v
->arch
.ret
= -EINTR
;
854 wake_up(&v
->arch
.cpu_run
);
859 if (signal_pending(current
)) {
860 if (vc
->vcore_state
== VCORE_RUNNING
||
861 vc
->vcore_state
== VCORE_EXITING
) {
862 spin_unlock(&vc
->lock
);
863 kvmppc_wait_for_exec(vcpu
, TASK_UNINTERRUPTIBLE
);
864 spin_lock(&vc
->lock
);
866 if (vcpu
->arch
.state
== KVMPPC_VCPU_RUNNABLE
) {
867 kvmppc_remove_runnable(vc
, vcpu
);
868 vcpu
->stat
.signal_exits
++;
869 kvm_run
->exit_reason
= KVM_EXIT_INTR
;
870 vcpu
->arch
.ret
= -EINTR
;
874 spin_unlock(&vc
->lock
);
875 return vcpu
->arch
.ret
;
878 int kvmppc_vcpu_run(struct kvm_run
*run
, struct kvm_vcpu
*vcpu
)
882 if (!vcpu
->arch
.sane
) {
883 run
->exit_reason
= KVM_EXIT_INTERNAL_ERROR
;
887 kvmppc_core_prepare_to_enter(vcpu
);
889 /* No need to go into the guest when all we'll do is come back out */
890 if (signal_pending(current
)) {
891 run
->exit_reason
= KVM_EXIT_INTR
;
895 /* On the first time here, set up VRMA or RMA */
896 if (!vcpu
->kvm
->arch
.rma_setup_done
) {
897 r
= kvmppc_hv_setup_rma(vcpu
);
902 flush_fp_to_thread(current
);
903 flush_altivec_to_thread(current
);
904 flush_vsx_to_thread(current
);
905 vcpu
->arch
.wqp
= &vcpu
->arch
.vcore
->wq
;
906 vcpu
->arch
.pgdir
= current
->mm
->pgd
;
909 r
= kvmppc_run_vcpu(run
, vcpu
);
911 if (run
->exit_reason
== KVM_EXIT_PAPR_HCALL
&&
912 !(vcpu
->arch
.shregs
.msr
& MSR_PR
)) {
913 r
= kvmppc_pseries_do_hcall(vcpu
);
914 kvmppc_core_prepare_to_enter(vcpu
);
916 } while (r
== RESUME_GUEST
);
920 static long kvmppc_stt_npages(unsigned long window_size
)
922 return ALIGN((window_size
>> SPAPR_TCE_SHIFT
)
923 * sizeof(u64
), PAGE_SIZE
) / PAGE_SIZE
;
926 static void release_spapr_tce_table(struct kvmppc_spapr_tce_table
*stt
)
928 struct kvm
*kvm
= stt
->kvm
;
931 mutex_lock(&kvm
->lock
);
932 list_del(&stt
->list
);
933 for (i
= 0; i
< kvmppc_stt_npages(stt
->window_size
); i
++)
934 __free_page(stt
->pages
[i
]);
936 mutex_unlock(&kvm
->lock
);
941 static int kvm_spapr_tce_fault(struct vm_area_struct
*vma
, struct vm_fault
*vmf
)
943 struct kvmppc_spapr_tce_table
*stt
= vma
->vm_file
->private_data
;
946 if (vmf
->pgoff
>= kvmppc_stt_npages(stt
->window_size
))
947 return VM_FAULT_SIGBUS
;
949 page
= stt
->pages
[vmf
->pgoff
];
955 static const struct vm_operations_struct kvm_spapr_tce_vm_ops
= {
956 .fault
= kvm_spapr_tce_fault
,
959 static int kvm_spapr_tce_mmap(struct file
*file
, struct vm_area_struct
*vma
)
961 vma
->vm_ops
= &kvm_spapr_tce_vm_ops
;
965 static int kvm_spapr_tce_release(struct inode
*inode
, struct file
*filp
)
967 struct kvmppc_spapr_tce_table
*stt
= filp
->private_data
;
969 release_spapr_tce_table(stt
);
973 static struct file_operations kvm_spapr_tce_fops
= {
974 .mmap
= kvm_spapr_tce_mmap
,
975 .release
= kvm_spapr_tce_release
,
978 long kvm_vm_ioctl_create_spapr_tce(struct kvm
*kvm
,
979 struct kvm_create_spapr_tce
*args
)
981 struct kvmppc_spapr_tce_table
*stt
= NULL
;
986 /* Check this LIOBN hasn't been previously allocated */
987 list_for_each_entry(stt
, &kvm
->arch
.spapr_tce_tables
, list
) {
988 if (stt
->liobn
== args
->liobn
)
992 npages
= kvmppc_stt_npages(args
->window_size
);
994 stt
= kzalloc(sizeof(*stt
) + npages
* sizeof(struct page
*),
999 stt
->liobn
= args
->liobn
;
1000 stt
->window_size
= args
->window_size
;
1003 for (i
= 0; i
< npages
; i
++) {
1004 stt
->pages
[i
] = alloc_page(GFP_KERNEL
| __GFP_ZERO
);
1011 mutex_lock(&kvm
->lock
);
1012 list_add(&stt
->list
, &kvm
->arch
.spapr_tce_tables
);
1014 mutex_unlock(&kvm
->lock
);
1016 return anon_inode_getfd("kvm-spapr-tce", &kvm_spapr_tce_fops
,
1021 for (i
= 0; i
< npages
; i
++)
1023 __free_page(stt
->pages
[i
]);
1030 /* Work out RMLS (real mode limit selector) field value for a given RMA size.
1031 Assumes POWER7 or PPC970. */
1032 static inline int lpcr_rmls(unsigned long rma_size
)
1035 case 32ul << 20: /* 32 MB */
1036 if (cpu_has_feature(CPU_FTR_ARCH_206
))
1037 return 8; /* only supported on POWER7 */
1039 case 64ul << 20: /* 64 MB */
1041 case 128ul << 20: /* 128 MB */
1043 case 256ul << 20: /* 256 MB */
1045 case 1ul << 30: /* 1 GB */
1047 case 16ul << 30: /* 16 GB */
1049 case 256ul << 30: /* 256 GB */
1056 static int kvm_rma_fault(struct vm_area_struct
*vma
, struct vm_fault
*vmf
)
1058 struct kvmppc_linear_info
*ri
= vma
->vm_file
->private_data
;
1061 if (vmf
->pgoff
>= ri
->npages
)
1062 return VM_FAULT_SIGBUS
;
1064 page
= pfn_to_page(ri
->base_pfn
+ vmf
->pgoff
);
1070 static const struct vm_operations_struct kvm_rma_vm_ops
= {
1071 .fault
= kvm_rma_fault
,
1074 static int kvm_rma_mmap(struct file
*file
, struct vm_area_struct
*vma
)
1076 vma
->vm_flags
|= VM_RESERVED
;
1077 vma
->vm_ops
= &kvm_rma_vm_ops
;
1081 static int kvm_rma_release(struct inode
*inode
, struct file
*filp
)
1083 struct kvmppc_linear_info
*ri
= filp
->private_data
;
1085 kvm_release_rma(ri
);
1089 static struct file_operations kvm_rma_fops
= {
1090 .mmap
= kvm_rma_mmap
,
1091 .release
= kvm_rma_release
,
1094 long kvm_vm_ioctl_allocate_rma(struct kvm
*kvm
, struct kvm_allocate_rma
*ret
)
1096 struct kvmppc_linear_info
*ri
;
1099 ri
= kvm_alloc_rma();
1103 fd
= anon_inode_getfd("kvm-rma", &kvm_rma_fops
, ri
, O_RDWR
);
1105 kvm_release_rma(ri
);
1107 ret
->rma_size
= ri
->npages
<< PAGE_SHIFT
;
1112 * Get (and clear) the dirty memory log for a memory slot.
1114 int kvm_vm_ioctl_get_dirty_log(struct kvm
*kvm
, struct kvm_dirty_log
*log
)
1116 struct kvm_memory_slot
*memslot
;
1120 mutex_lock(&kvm
->slots_lock
);
1123 if (log
->slot
>= KVM_MEMORY_SLOTS
)
1126 memslot
= id_to_memslot(kvm
->memslots
, log
->slot
);
1128 if (!memslot
->dirty_bitmap
)
1131 n
= kvm_dirty_bitmap_bytes(memslot
);
1132 memset(memslot
->dirty_bitmap
, 0, n
);
1134 r
= kvmppc_hv_get_dirty_log(kvm
, memslot
);
1139 if (copy_to_user(log
->dirty_bitmap
, memslot
->dirty_bitmap
, n
))
1144 mutex_unlock(&kvm
->slots_lock
);
1148 static unsigned long slb_pgsize_encoding(unsigned long psize
)
1150 unsigned long senc
= 0;
1152 if (psize
> 0x1000) {
1154 if (psize
== 0x10000)
1155 senc
|= SLB_VSID_LP_01
;
1160 int kvmppc_core_prepare_memory_region(struct kvm
*kvm
,
1161 struct kvm_userspace_memory_region
*mem
)
1163 unsigned long npages
;
1164 unsigned long *phys
;
1166 /* Allocate a slot_phys array */
1167 phys
= kvm
->arch
.slot_phys
[mem
->slot
];
1168 if (!kvm
->arch
.using_mmu_notifiers
&& !phys
) {
1169 npages
= mem
->memory_size
>> PAGE_SHIFT
;
1170 phys
= vzalloc(npages
* sizeof(unsigned long));
1173 kvm
->arch
.slot_phys
[mem
->slot
] = phys
;
1174 kvm
->arch
.slot_npages
[mem
->slot
] = npages
;
1180 static void unpin_slot(struct kvm
*kvm
, int slot_id
)
1182 unsigned long *physp
;
1183 unsigned long j
, npages
, pfn
;
1186 physp
= kvm
->arch
.slot_phys
[slot_id
];
1187 npages
= kvm
->arch
.slot_npages
[slot_id
];
1189 spin_lock(&kvm
->arch
.slot_phys_lock
);
1190 for (j
= 0; j
< npages
; j
++) {
1191 if (!(physp
[j
] & KVMPPC_GOT_PAGE
))
1193 pfn
= physp
[j
] >> PAGE_SHIFT
;
1194 page
= pfn_to_page(pfn
);
1196 page
= compound_head(page
);
1200 kvm
->arch
.slot_phys
[slot_id
] = NULL
;
1201 spin_unlock(&kvm
->arch
.slot_phys_lock
);
1206 void kvmppc_core_commit_memory_region(struct kvm
*kvm
,
1207 struct kvm_userspace_memory_region
*mem
)
1211 static int kvmppc_hv_setup_rma(struct kvm_vcpu
*vcpu
)
1214 struct kvm
*kvm
= vcpu
->kvm
;
1215 struct kvmppc_linear_info
*ri
= NULL
;
1217 struct kvm_memory_slot
*memslot
;
1218 struct vm_area_struct
*vma
;
1219 unsigned long lpcr
, senc
;
1220 unsigned long psize
, porder
;
1221 unsigned long rma_size
;
1223 unsigned long *physp
;
1224 unsigned long i
, npages
;
1226 mutex_lock(&kvm
->lock
);
1227 if (kvm
->arch
.rma_setup_done
)
1228 goto out
; /* another vcpu beat us to it */
1230 /* Look up the memslot for guest physical address 0 */
1231 memslot
= gfn_to_memslot(kvm
, 0);
1233 /* We must have some memory at 0 by now */
1235 if (!memslot
|| (memslot
->flags
& KVM_MEMSLOT_INVALID
))
1238 /* Look up the VMA for the start of this memory slot */
1239 hva
= memslot
->userspace_addr
;
1240 down_read(¤t
->mm
->mmap_sem
);
1241 vma
= find_vma(current
->mm
, hva
);
1242 if (!vma
|| vma
->vm_start
> hva
|| (vma
->vm_flags
& VM_IO
))
1245 psize
= vma_kernel_pagesize(vma
);
1246 porder
= __ilog2(psize
);
1248 /* Is this one of our preallocated RMAs? */
1249 if (vma
->vm_file
&& vma
->vm_file
->f_op
== &kvm_rma_fops
&&
1250 hva
== vma
->vm_start
)
1251 ri
= vma
->vm_file
->private_data
;
1253 up_read(¤t
->mm
->mmap_sem
);
1256 /* On POWER7, use VRMA; on PPC970, give up */
1258 if (cpu_has_feature(CPU_FTR_ARCH_201
)) {
1259 pr_err("KVM: CPU requires an RMO\n");
1263 /* We can handle 4k, 64k or 16M pages in the VRMA */
1265 if (!(psize
== 0x1000 || psize
== 0x10000 ||
1266 psize
== 0x1000000))
1269 /* Update VRMASD field in the LPCR */
1270 senc
= slb_pgsize_encoding(psize
);
1271 kvm
->arch
.vrma_slb_v
= senc
| SLB_VSID_B_1T
|
1272 (VRMA_VSID
<< SLB_VSID_SHIFT_1T
);
1273 lpcr
= kvm
->arch
.lpcr
& ~LPCR_VRMASD
;
1274 lpcr
|= senc
<< (LPCR_VRMASD_SH
- 4);
1275 kvm
->arch
.lpcr
= lpcr
;
1277 /* Create HPTEs in the hash page table for the VRMA */
1278 kvmppc_map_vrma(vcpu
, memslot
, porder
);
1281 /* Set up to use an RMO region */
1282 rma_size
= ri
->npages
;
1283 if (rma_size
> memslot
->npages
)
1284 rma_size
= memslot
->npages
;
1285 rma_size
<<= PAGE_SHIFT
;
1286 rmls
= lpcr_rmls(rma_size
);
1289 pr_err("KVM: Can't use RMA of 0x%lx bytes\n", rma_size
);
1292 atomic_inc(&ri
->use_count
);
1295 /* Update LPCR and RMOR */
1296 lpcr
= kvm
->arch
.lpcr
;
1297 if (cpu_has_feature(CPU_FTR_ARCH_201
)) {
1298 /* PPC970; insert RMLS value (split field) in HID4 */
1299 lpcr
&= ~((1ul << HID4_RMLS0_SH
) |
1300 (3ul << HID4_RMLS2_SH
));
1301 lpcr
|= ((rmls
>> 2) << HID4_RMLS0_SH
) |
1302 ((rmls
& 3) << HID4_RMLS2_SH
);
1303 /* RMOR is also in HID4 */
1304 lpcr
|= ((ri
->base_pfn
>> (26 - PAGE_SHIFT
)) & 0xffff)
1308 lpcr
&= ~(LPCR_VPM0
| LPCR_VRMA_L
);
1309 lpcr
|= rmls
<< LPCR_RMLS_SH
;
1310 kvm
->arch
.rmor
= kvm
->arch
.rma
->base_pfn
<< PAGE_SHIFT
;
1312 kvm
->arch
.lpcr
= lpcr
;
1313 pr_info("KVM: Using RMO at %lx size %lx (LPCR = %lx)\n",
1314 ri
->base_pfn
<< PAGE_SHIFT
, rma_size
, lpcr
);
1316 /* Initialize phys addrs of pages in RMO */
1317 npages
= ri
->npages
;
1318 porder
= __ilog2(npages
);
1319 physp
= kvm
->arch
.slot_phys
[memslot
->id
];
1320 spin_lock(&kvm
->arch
.slot_phys_lock
);
1321 for (i
= 0; i
< npages
; ++i
)
1322 physp
[i
] = ((ri
->base_pfn
+ i
) << PAGE_SHIFT
) + porder
;
1323 spin_unlock(&kvm
->arch
.slot_phys_lock
);
1326 /* Order updates to kvm->arch.lpcr etc. vs. rma_setup_done */
1328 kvm
->arch
.rma_setup_done
= 1;
1331 mutex_unlock(&kvm
->lock
);
1335 up_read(¤t
->mm
->mmap_sem
);
1339 int kvmppc_core_init_vm(struct kvm
*kvm
)
1344 /* Allocate hashed page table */
1345 r
= kvmppc_alloc_hpt(kvm
);
1349 INIT_LIST_HEAD(&kvm
->arch
.spapr_tce_tables
);
1351 kvm
->arch
.rma
= NULL
;
1353 kvm
->arch
.host_sdr1
= mfspr(SPRN_SDR1
);
1355 if (cpu_has_feature(CPU_FTR_ARCH_201
)) {
1356 /* PPC970; HID4 is effectively the LPCR */
1357 unsigned long lpid
= kvm
->arch
.lpid
;
1358 kvm
->arch
.host_lpid
= 0;
1359 kvm
->arch
.host_lpcr
= lpcr
= mfspr(SPRN_HID4
);
1360 lpcr
&= ~((3 << HID4_LPID1_SH
) | (0xful
<< HID4_LPID5_SH
));
1361 lpcr
|= ((lpid
>> 4) << HID4_LPID1_SH
) |
1362 ((lpid
& 0xf) << HID4_LPID5_SH
);
1364 /* POWER7; init LPCR for virtual RMA mode */
1365 kvm
->arch
.host_lpid
= mfspr(SPRN_LPID
);
1366 kvm
->arch
.host_lpcr
= lpcr
= mfspr(SPRN_LPCR
);
1367 lpcr
&= LPCR_PECE
| LPCR_LPES
;
1368 lpcr
|= (4UL << LPCR_DPFD_SH
) | LPCR_HDICE
|
1369 LPCR_VPM0
| LPCR_VPM1
;
1370 kvm
->arch
.vrma_slb_v
= SLB_VSID_B_1T
|
1371 (VRMA_VSID
<< SLB_VSID_SHIFT_1T
);
1373 kvm
->arch
.lpcr
= lpcr
;
1375 kvm
->arch
.using_mmu_notifiers
= !!cpu_has_feature(CPU_FTR_ARCH_206
);
1376 spin_lock_init(&kvm
->arch
.slot_phys_lock
);
1380 void kvmppc_core_destroy_vm(struct kvm
*kvm
)
1384 if (!kvm
->arch
.using_mmu_notifiers
)
1385 for (i
= 0; i
< KVM_MEM_SLOTS_NUM
; i
++)
1388 if (kvm
->arch
.rma
) {
1389 kvm_release_rma(kvm
->arch
.rma
);
1390 kvm
->arch
.rma
= NULL
;
1393 kvmppc_free_hpt(kvm
);
1394 WARN_ON(!list_empty(&kvm
->arch
.spapr_tce_tables
));
1397 /* These are stubs for now */
1398 void kvmppc_mmu_pte_pflush(struct kvm_vcpu
*vcpu
, ulong pa_start
, ulong pa_end
)
1402 /* We don't need to emulate any privileged instructions or dcbz */
1403 int kvmppc_core_emulate_op(struct kvm_run
*run
, struct kvm_vcpu
*vcpu
,
1404 unsigned int inst
, int *advance
)
1406 return EMULATE_FAIL
;
1409 int kvmppc_core_emulate_mtspr(struct kvm_vcpu
*vcpu
, int sprn
, int rs
)
1411 return EMULATE_FAIL
;
1414 int kvmppc_core_emulate_mfspr(struct kvm_vcpu
*vcpu
, int sprn
, int rt
)
1416 return EMULATE_FAIL
;
1419 static int kvmppc_book3s_hv_init(void)
1423 r
= kvm_init(NULL
, sizeof(struct kvm_vcpu
), 0, THIS_MODULE
);
1428 r
= kvmppc_mmu_hv_init();
1433 static void kvmppc_book3s_hv_exit(void)
1438 module_init(kvmppc_book3s_hv_init
);
1439 module_exit(kvmppc_book3s_hv_exit
);