[deliverable/linux.git] / arch / powerpc / kvm / powerpc.c

/*
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License, version 2, as
 * published by the Free Software Foundation.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
 *
 * Copyright IBM Corp. 2007
 *
 * Authors: Hollis Blanchard <hollisb@us.ibm.com>
 *          Christian Ehrhardt <ehrhardt@linux.vnet.ibm.com>
 */

#include <linux/errno.h>
#include <linux/err.h>
#include <linux/kvm_host.h>
#include <linux/module.h>
#include <linux/vmalloc.h>
#include <linux/hrtimer.h>
#include <linux/fs.h>
#include <linux/slab.h>
#include <asm/cputable.h>
#include <asm/uaccess.h>
#include <asm/kvm_ppc.h>
#include <asm/tlbflush.h>
#include "timing.h"
#include "../mm/mmu_decl.h"

#define CREATE_TRACE_POINTS
#include "trace.h"

int kvm_arch_vcpu_runnable(struct kvm_vcpu *v)
{
	return !(v->arch.shared->msr & MSR_WE) ||
	       !!(v->arch.pending_exceptions);
}

int kvmppc_kvm_pv(struct kvm_vcpu *vcpu)
{
	int nr = kvmppc_get_gpr(vcpu, 11);
	int r;
	unsigned long __maybe_unused param1 = kvmppc_get_gpr(vcpu, 3);
	unsigned long __maybe_unused param2 = kvmppc_get_gpr(vcpu, 4);
	unsigned long __maybe_unused param3 = kvmppc_get_gpr(vcpu, 5);
	unsigned long __maybe_unused param4 = kvmppc_get_gpr(vcpu, 6);
	unsigned long r2 = 0;

	if (!(vcpu->arch.shared->msr & MSR_SF)) {
		/* 32 bit mode */
		param1 &= 0xffffffff;
		param2 &= 0xffffffff;
		param3 &= 0xffffffff;
		param4 &= 0xffffffff;
	}

	switch (nr) {
	case HC_VENDOR_KVM | KVM_HC_PPC_MAP_MAGIC_PAGE:
	{
		vcpu->arch.magic_page_pa = param1;
		vcpu->arch.magic_page_ea = param2;

		r2 = KVM_MAGIC_FEAT_SR;

		r = HC_EV_SUCCESS;
		break;
	}
	case HC_VENDOR_KVM | KVM_HC_FEATURES:
		r = HC_EV_SUCCESS;
#if defined(CONFIG_PPC_BOOK3S) || defined(CONFIG_KVM_E500)
		/* XXX Missing magic page on 44x */
		r2 |= (1 << KVM_FEATURE_MAGIC_PAGE);
#endif

		/* Second return value is in r4 */
		break;
	default:
		r = HC_EV_UNIMPLEMENTED;
		break;
	}

	kvmppc_set_gpr(vcpu, 4, r2);

	return r;
}

int kvmppc_emulate_mmio(struct kvm_run *run, struct kvm_vcpu *vcpu)
{
	enum emulation_result er;
	int r;

	er = kvmppc_emulate_instruction(run, vcpu);
	switch (er) {
	case EMULATE_DONE:
		/* Future optimization: only reload non-volatiles if they were
		 * actually modified. */
		r = RESUME_GUEST_NV;
		break;
	case EMULATE_DO_MMIO:
		run->exit_reason = KVM_EXIT_MMIO;
		/* We must reload nonvolatiles because "update" load/store
		 * instructions modify register state. */
		/* Future optimization: only reload non-volatiles if they were
		 * actually modified. */
		r = RESUME_HOST_NV;
		break;
	case EMULATE_FAIL:
		/* XXX Deliver Program interrupt to guest. */
		printk(KERN_EMERG "%s: emulation failed (%08x)\n", __func__,
		       kvmppc_get_last_inst(vcpu));
		r = RESUME_HOST;
		break;
	default:
		BUG();
	}

	return r;
}

int kvm_arch_hardware_enable(void *garbage)
{
	return 0;
}

void kvm_arch_hardware_disable(void *garbage)
{
}

int kvm_arch_hardware_setup(void)
{
	return 0;
}

void kvm_arch_hardware_unsetup(void)
{
}

void kvm_arch_check_processor_compat(void *rtn)
{
	*(int *)rtn = kvmppc_core_check_processor_compat();
}

int kvm_arch_init_vm(struct kvm *kvm)
{
	return 0;
}

void kvm_arch_destroy_vm(struct kvm *kvm)
{
	unsigned int i;
	struct kvm_vcpu *vcpu;

	kvm_for_each_vcpu(i, vcpu, kvm)
		kvm_arch_vcpu_free(vcpu);

	mutex_lock(&kvm->lock);
	for (i = 0; i < atomic_read(&kvm->online_vcpus); i++)
		kvm->vcpus[i] = NULL;

	atomic_set(&kvm->online_vcpus, 0);
	mutex_unlock(&kvm->lock);
}

void kvm_arch_sync_events(struct kvm *kvm)
{
}

int kvm_dev_ioctl_check_extension(long ext)
{
	int r;

	switch (ext) {
#ifdef CONFIG_BOOKE
	case KVM_CAP_PPC_BOOKE_SREGS:
#else
	case KVM_CAP_PPC_SEGSTATE:
#endif
	case KVM_CAP_PPC_PAIRED_SINGLES:
	case KVM_CAP_PPC_UNSET_IRQ:
	case KVM_CAP_PPC_IRQ_LEVEL:
	case KVM_CAP_ENABLE_CAP:
	case KVM_CAP_PPC_OSI:
	case KVM_CAP_PPC_GET_PVINFO:
		r = 1;
		break;
	case KVM_CAP_COALESCED_MMIO:
		r = KVM_COALESCED_MMIO_PAGE_OFFSET;
		break;
	default:
		r = 0;
		break;
	}
	return r;

}

long kvm_arch_dev_ioctl(struct file *filp,
                        unsigned int ioctl, unsigned long arg)
{
	return -EINVAL;
}

int kvm_arch_prepare_memory_region(struct kvm *kvm,
                                   struct kvm_memory_slot *memslot,
                                   struct kvm_memory_slot old,
                                   struct kvm_userspace_memory_region *mem,
                                   int user_alloc)
{
	return 0;
}

void kvm_arch_commit_memory_region(struct kvm *kvm,
               struct kvm_userspace_memory_region *mem,
               struct kvm_memory_slot old,
               int user_alloc)
{
       return;
}


void kvm_arch_flush_shadow(struct kvm *kvm)
{
}

struct kvm_vcpu *kvm_arch_vcpu_create(struct kvm *kvm, unsigned int id)
{
	struct kvm_vcpu *vcpu;
	vcpu = kvmppc_core_vcpu_create(kvm, id);
	if (!IS_ERR(vcpu))
		kvmppc_create_vcpu_debugfs(vcpu, id);
	return vcpu;
}

void kvm_arch_vcpu_free(struct kvm_vcpu *vcpu)
{
	/* Make sure we're not using the vcpu anymore */
	hrtimer_cancel(&vcpu->arch.dec_timer);
	tasklet_kill(&vcpu->arch.tasklet);

	kvmppc_remove_vcpu_debugfs(vcpu);
	kvmppc_core_vcpu_free(vcpu);
}

void kvm_arch_vcpu_destroy(struct kvm_vcpu *vcpu)
{
	kvm_arch_vcpu_free(vcpu);
}

int kvm_cpu_has_pending_timer(struct kvm_vcpu *vcpu)
{
	return kvmppc_core_pending_dec(vcpu);
}

static void kvmppc_decrementer_func(unsigned long data)
{
	struct kvm_vcpu *vcpu = (struct kvm_vcpu *)data;

	kvmppc_core_queue_dec(vcpu);

	if (waitqueue_active(&vcpu->wq)) {
		wake_up_interruptible(&vcpu->wq);
		vcpu->stat.halt_wakeup++;
	}
}

/*
 * low level hrtimer wake routine. Because this runs in hardirq context
 * we schedule a tasklet to do the real work.
 */
enum hrtimer_restart kvmppc_decrementer_wakeup(struct hrtimer *timer)
{
	struct kvm_vcpu *vcpu;

	vcpu = container_of(timer, struct kvm_vcpu, arch.dec_timer);
	tasklet_schedule(&vcpu->arch.tasklet);

	return HRTIMER_NORESTART;
}

int kvm_arch_vcpu_init(struct kvm_vcpu *vcpu)
{
	hrtimer_init(&vcpu->arch.dec_timer, CLOCK_REALTIME, HRTIMER_MODE_ABS);
	tasklet_init(&vcpu->arch.tasklet, kvmppc_decrementer_func, (ulong)vcpu);
	vcpu->arch.dec_timer.function = kvmppc_decrementer_wakeup;

#ifdef CONFIG_KVM_EXIT_TIMING
	mutex_init(&vcpu->arch.exit_timing_lock);
#endif

	return 0;
}

void kvm_arch_vcpu_uninit(struct kvm_vcpu *vcpu)
{
	kvmppc_mmu_destroy(vcpu);
}

void kvm_arch_vcpu_load(struct kvm_vcpu *vcpu, int cpu)
{
#ifdef CONFIG_BOOKE
	/*
	 * vrsave (formerly usprg0) isn't used by Linux, but may
	 * be used by the guest.
	 *
	 * On non-booke this is associated with Altivec and
	 * is handled by code in book3s.c.
	 */
	mtspr(SPRN_VRSAVE, vcpu->arch.vrsave);
#endif
	kvmppc_core_vcpu_load(vcpu, cpu);
}

void kvm_arch_vcpu_put(struct kvm_vcpu *vcpu)
{
	kvmppc_core_vcpu_put(vcpu);
#ifdef CONFIG_BOOKE
	vcpu->arch.vrsave = mfspr(SPRN_VRSAVE);
#endif
}

int kvm_arch_vcpu_ioctl_set_guest_debug(struct kvm_vcpu *vcpu,
                                        struct kvm_guest_debug *dbg)
{
	return -EINVAL;
}

static void kvmppc_complete_dcr_load(struct kvm_vcpu *vcpu,
                                     struct kvm_run *run)
{
	kvmppc_set_gpr(vcpu, vcpu->arch.io_gpr, run->dcr.data);
}

static void kvmppc_complete_mmio_load(struct kvm_vcpu *vcpu,
                                      struct kvm_run *run)
{
	u64 uninitialized_var(gpr);

	if (run->mmio.len > sizeof(gpr)) {
		printk(KERN_ERR "bad MMIO length: %d\n", run->mmio.len);
		return;
	}

	if (vcpu->arch.mmio_is_bigendian) {
		switch (run->mmio.len) {
		case 8: gpr = *(u64 *)run->mmio.data; break;
		case 4: gpr = *(u32 *)run->mmio.data; break;
		case 2: gpr = *(u16 *)run->mmio.data; break;
		case 1: gpr = *(u8 *)run->mmio.data; break;
		}
	} else {
		/* Convert BE data from userland back to LE. */
		switch (run->mmio.len) {
		case 4: gpr = ld_le32((u32 *)run->mmio.data); break;
		case 2: gpr = ld_le16((u16 *)run->mmio.data); break;
		case 1: gpr = *(u8 *)run->mmio.data; break;
		}
	}

	if (vcpu->arch.mmio_sign_extend) {
		switch (run->mmio.len) {
#ifdef CONFIG_PPC64
		case 4:
			gpr = (s64)(s32)gpr;
			break;
#endif
		case 2:
			gpr = (s64)(s16)gpr;
			break;
		case 1:
			gpr = (s64)(s8)gpr;
			break;
		}
	}

	kvmppc_set_gpr(vcpu, vcpu->arch.io_gpr, gpr);

	switch (vcpu->arch.io_gpr & KVM_REG_EXT_MASK) {
	case KVM_REG_GPR:
		kvmppc_set_gpr(vcpu, vcpu->arch.io_gpr, gpr);
		break;
	case KVM_REG_FPR:
		vcpu->arch.fpr[vcpu->arch.io_gpr & KVM_REG_MASK] = gpr;
		break;
#ifdef CONFIG_PPC_BOOK3S
	case KVM_REG_QPR:
		vcpu->arch.qpr[vcpu->arch.io_gpr & KVM_REG_MASK] = gpr;
		break;
	case KVM_REG_FQPR:
		vcpu->arch.fpr[vcpu->arch.io_gpr & KVM_REG_MASK] = gpr;
		vcpu->arch.qpr[vcpu->arch.io_gpr & KVM_REG_MASK] = gpr;
		break;
#endif
	default:
		BUG();
	}
}

int kvmppc_handle_load(struct kvm_run *run, struct kvm_vcpu *vcpu,
                       unsigned int rt, unsigned int bytes, int is_bigendian)
{
	if (bytes > sizeof(run->mmio.data)) {
		printk(KERN_ERR "%s: bad MMIO length: %d\n", __func__,
		       run->mmio.len);
	}

	run->mmio.phys_addr = vcpu->arch.paddr_accessed;
	run->mmio.len = bytes;
	run->mmio.is_write = 0;

	vcpu->arch.io_gpr = rt;
	vcpu->arch.mmio_is_bigendian = is_bigendian;
	vcpu->mmio_needed = 1;
	vcpu->mmio_is_write = 0;
	vcpu->arch.mmio_sign_extend = 0;

	return EMULATE_DO_MMIO;
}

/* Same as above, but sign extends */
int kvmppc_handle_loads(struct kvm_run *run, struct kvm_vcpu *vcpu,
                        unsigned int rt, unsigned int bytes, int is_bigendian)
{
	int r;

	r = kvmppc_handle_load(run, vcpu, rt, bytes, is_bigendian);
	vcpu->arch.mmio_sign_extend = 1;

	return r;
}

int kvmppc_handle_store(struct kvm_run *run, struct kvm_vcpu *vcpu,
                        u64 val, unsigned int bytes, int is_bigendian)
{
	void *data = run->mmio.data;

	if (bytes > sizeof(run->mmio.data)) {
		printk(KERN_ERR "%s: bad MMIO length: %d\n", __func__,
		       run->mmio.len);
	}

	run->mmio.phys_addr = vcpu->arch.paddr_accessed;
	run->mmio.len = bytes;
	run->mmio.is_write = 1;
	vcpu->mmio_needed = 1;
	vcpu->mmio_is_write = 1;

	/* Store the value at the lowest bytes in 'data'. */
	if (is_bigendian) {
		switch (bytes) {
		case 8: *(u64 *)data = val; break;
		case 4: *(u32 *)data = val; break;
		case 2: *(u16 *)data = val; break;
		case 1: *(u8  *)data = val; break;
		}
	} else {
		/* Store LE value into 'data'. */
		switch (bytes) {
		case 4: st_le32(data, val); break;
		case 2: st_le16(data, val); break;
		case 1: *(u8 *)data = val; break;
		}
	}

	return EMULATE_DO_MMIO;
}

int kvm_arch_vcpu_ioctl_run(struct kvm_vcpu *vcpu, struct kvm_run *run)
{
	int r;
	sigset_t sigsaved;

	if (vcpu->sigset_active)
		sigprocmask(SIG_SETMASK, &vcpu->sigset, &sigsaved);

	if (vcpu->mmio_needed) {
		if (!vcpu->mmio_is_write)
			kvmppc_complete_mmio_load(vcpu, run);
		vcpu->mmio_needed = 0;
	} else if (vcpu->arch.dcr_needed) {
		if (!vcpu->arch.dcr_is_write)
			kvmppc_complete_dcr_load(vcpu, run);
		vcpu->arch.dcr_needed = 0;
	} else if (vcpu->arch.osi_needed) {
		u64 *gprs = run->osi.gprs;
		int i;

		for (i = 0; i < 32; i++)
			kvmppc_set_gpr(vcpu, i, gprs[i]);
		vcpu->arch.osi_needed = 0;
	}

	kvmppc_core_deliver_interrupts(vcpu);

	local_irq_disable();
	kvm_guest_enter();
	r = __kvmppc_vcpu_run(run, vcpu);
	kvm_guest_exit();
	local_irq_enable();

	if (vcpu->sigset_active)
		sigprocmask(SIG_SETMASK, &sigsaved, NULL);

	return r;
}

int kvm_vcpu_ioctl_interrupt(struct kvm_vcpu *vcpu, struct kvm_interrupt *irq)
{
	if (irq->irq == KVM_INTERRUPT_UNSET)
		kvmppc_core_dequeue_external(vcpu, irq);
	else
		kvmppc_core_queue_external(vcpu, irq);

	if (waitqueue_active(&vcpu->wq)) {
		wake_up_interruptible(&vcpu->wq);
		vcpu->stat.halt_wakeup++;
	}

	return 0;
}

static int kvm_vcpu_ioctl_enable_cap(struct kvm_vcpu *vcpu,
				     struct kvm_enable_cap *cap)
{
	int r;

	if (cap->flags)
		return -EINVAL;

	switch (cap->cap) {
	case KVM_CAP_PPC_OSI:
		r = 0;
		vcpu->arch.osi_enabled = true;
		break;
	default:
		r = -EINVAL;
		break;
	}

	return r;
}

int kvm_arch_vcpu_ioctl_get_mpstate(struct kvm_vcpu *vcpu,
                                    struct kvm_mp_state *mp_state)
{
	return -EINVAL;
}

int kvm_arch_vcpu_ioctl_set_mpstate(struct kvm_vcpu *vcpu,
                                    struct kvm_mp_state *mp_state)
{
	return -EINVAL;
}

long kvm_arch_vcpu_ioctl(struct file *filp,
                         unsigned int ioctl, unsigned long arg)
{
	struct kvm_vcpu *vcpu = filp->private_data;
	void __user *argp = (void __user *)arg;
	long r;

	switch (ioctl) {
	case KVM_INTERRUPT: {
		struct kvm_interrupt irq;
		r = -EFAULT;
		if (copy_from_user(&irq, argp, sizeof(irq)))
			goto out;
		r = kvm_vcpu_ioctl_interrupt(vcpu, &irq);
		goto out;
	}

	case KVM_ENABLE_CAP:
	{
		struct kvm_enable_cap cap;
		r = -EFAULT;
		if (copy_from_user(&cap, argp, sizeof(cap)))
			goto out;
		r = kvm_vcpu_ioctl_enable_cap(vcpu, &cap);
		break;
	}
	default:
		r = -EINVAL;
	}

out:
	return r;
}

static int kvm_vm_ioctl_get_pvinfo(struct kvm_ppc_pvinfo *pvinfo)
{
	u32 inst_lis = 0x3c000000;
	u32 inst_ori = 0x60000000;
	u32 inst_nop = 0x60000000;
	u32 inst_sc = 0x44000002;
	u32 inst_imm_mask = 0xffff;

	/*
	 * The hypercall to get into KVM from within guest context is as
	 * follows:
	 *
	 *    lis r0, r0, KVM_SC_MAGIC_R0@h
	 *    ori r0, KVM_SC_MAGIC_R0@l
	 *    sc
	 *    nop
	 */
	pvinfo->hcall[0] = inst_lis | ((KVM_SC_MAGIC_R0 >> 16) & inst_imm_mask);
	pvinfo->hcall[1] = inst_ori | (KVM_SC_MAGIC_R0 & inst_imm_mask);
	pvinfo->hcall[2] = inst_sc;
	pvinfo->hcall[3] = inst_nop;

	return 0;
}

long kvm_arch_vm_ioctl(struct file *filp,
                       unsigned int ioctl, unsigned long arg)
{
	void __user *argp = (void __user *)arg;
	long r;

	switch (ioctl) {
	case KVM_PPC_GET_PVINFO: {
		struct kvm_ppc_pvinfo pvinfo;
		memset(&pvinfo, 0, sizeof(pvinfo));
		r = kvm_vm_ioctl_get_pvinfo(&pvinfo);
		if (copy_to_user(argp, &pvinfo, sizeof(pvinfo))) {
			r = -EFAULT;
			goto out;
		}

		break;
	}
	default:
		r = -ENOTTY;
	}

out:
	return r;
}

int kvm_arch_init(void *opaque)
{
	return 0;
}

void kvm_arch_exit(void)
{
}
Commit	Line	Data
bbf45ba5 HB	1	/*
	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.
	5	*
	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.
	10	*
	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.
	14	*
	15	* Copyright IBM Corp. 2007
	16	*
	17	* Authors: Hollis Blanchard <hollisb@us.ibm.com>
	18	* Christian Ehrhardt <ehrhardt@linux.vnet.ibm.com>
	19	*/
	20
	21	#include <linux/errno.h>
	22	#include <linux/err.h>
	23	#include <linux/kvm_host.h>
	24	#include <linux/module.h>
	25	#include <linux/vmalloc.h>
544c6761	26	#include <linux/hrtimer.h>
bbf45ba5	27	#include <linux/fs.h>
5a0e3ad6	28	#include <linux/slab.h>
bbf45ba5 HB	29	#include <asm/cputable.h>
	30	#include <asm/uaccess.h>
	31	#include <asm/kvm_ppc.h>
83aae4a8	32	#include <asm/tlbflush.h>
73e75b41	33	#include "timing.h"
fad7b9b5	34	#include "../mm/mmu_decl.h"
bbf45ba5	35
46f43c6e MT	36	#define CREATE_TRACE_POINTS
	37	#include "trace.h"
	38
bbf45ba5 HB	39	int kvm_arch_vcpu_runnable(struct kvm_vcpu *v)
bbf45ba5 HB	40	{
666e7252 AG	41	return !(v->arch.shared->msr & MSR_WE) \|\|
666e7252 AG	42	!!(v->arch.pending_exceptions);
bbf45ba5 HB	43	}
bbf45ba5 HB	44
2a342ed5 AG	45	int kvmppc_kvm_pv(struct kvm_vcpu *vcpu)
	46	{
	47	int nr = kvmppc_get_gpr(vcpu, 11);
	48	int r;
	49	unsigned long __maybe_unused param1 = kvmppc_get_gpr(vcpu, 3);
	50	unsigned long __maybe_unused param2 = kvmppc_get_gpr(vcpu, 4);
	51	unsigned long __maybe_unused param3 = kvmppc_get_gpr(vcpu, 5);
	52	unsigned long __maybe_unused param4 = kvmppc_get_gpr(vcpu, 6);
	53	unsigned long r2 = 0;
	54
	55	if (!(vcpu->arch.shared->msr & MSR_SF)) {
	56	/* 32 bit mode */
	57	param1 &= 0xffffffff;
	58	param2 &= 0xffffffff;
	59	param3 &= 0xffffffff;
	60	param4 &= 0xffffffff;
	61	}
	62
	63	switch (nr) {
5fc87407 AG	64	case HC_VENDOR_KVM \| KVM_HC_PPC_MAP_MAGIC_PAGE:
	65	{
	66	vcpu->arch.magic_page_pa = param1;
	67	vcpu->arch.magic_page_ea = param2;
	68
df1bfa25	69	r2 = KVM_MAGIC_FEAT_SR;
7508e16c	70
5fc87407 AG	71	r = HC_EV_SUCCESS;
	72	break;
	73	}
2a342ed5 AG	74	case HC_VENDOR_KVM \| KVM_HC_FEATURES:
2a342ed5 AG	75	r = HC_EV_SUCCESS;
a4cd8b23 SW	76	#if defined(CONFIG_PPC_BOOK3S) \|\| defined(CONFIG_KVM_E500)
a4cd8b23 SW	77	/* XXX Missing magic page on 44x */
5fc87407 AG	78	r2 \|= (1 << KVM_FEATURE_MAGIC_PAGE);
5fc87407 AG	79	#endif
2a342ed5 AG	80
2a342ed5 AG	81	/* Second return value is in r4 */
2a342ed5 AG	82	break;
	83	default:
	84	r = HC_EV_UNIMPLEMENTED;
	85	break;
	86	}
	87
7508e16c AG	88	kvmppc_set_gpr(vcpu, 4, r2);
7508e16c AG	89
2a342ed5 AG	90	return r;
2a342ed5 AG	91	}
bbf45ba5 HB	92
	93	int kvmppc_emulate_mmio(struct kvm_run run, struct kvm_vcpu vcpu)
	94	{
	95	enum emulation_result er;
	96	int r;
	97
	98	er = kvmppc_emulate_instruction(run, vcpu);
	99	switch (er) {
	100	case EMULATE_DONE:
	101	/* Future optimization: only reload non-volatiles if they were
	102	* actually modified. */
	103	r = RESUME_GUEST_NV;
	104	break;
	105	case EMULATE_DO_MMIO:
	106	run->exit_reason = KVM_EXIT_MMIO;
	107	/* We must reload nonvolatiles because "update" load/store
	108	* instructions modify register state. */
	109	/* Future optimization: only reload non-volatiles if they were
	110	* actually modified. */
	111	r = RESUME_HOST_NV;
	112	break;
	113	case EMULATE_FAIL:
	114	/* XXX Deliver Program interrupt to guest. */
	115	printk(KERN_EMERG "%s: emulation failed (%08x)\n", __func__,
c7f38f46	116	kvmppc_get_last_inst(vcpu));
bbf45ba5 HB	117	r = RESUME_HOST;
	118	break;
	119	default:
	120	BUG();
	121	}
	122
	123	return r;
	124	}
	125
10474ae8	126	int kvm_arch_hardware_enable(void *garbage)
bbf45ba5	127	{
10474ae8	128	return 0;
bbf45ba5 HB	129	}
	130
	131	void kvm_arch_hardware_disable(void *garbage)
	132	{
	133	}
	134
	135	int kvm_arch_hardware_setup(void)
	136	{
	137	return 0;
	138	}
	139
	140	void kvm_arch_hardware_unsetup(void)
	141	{
	142	}
	143
	144	void kvm_arch_check_processor_compat(void *rtn)
	145	{
9dd921cf	146	(int )rtn = kvmppc_core_check_processor_compat();
bbf45ba5 HB	147	}
bbf45ba5 HB	148
d89f5eff	149	int kvm_arch_init_vm(struct kvm *kvm)
bbf45ba5	150	{
d89f5eff	151	return 0;
bbf45ba5 HB	152	}
bbf45ba5 HB	153
d89f5eff	154	void kvm_arch_destroy_vm(struct kvm *kvm)
bbf45ba5 HB	155	{
bbf45ba5 HB	156	unsigned int i;
988a2cae	157	struct kvm_vcpu *vcpu;
bbf45ba5	158
988a2cae GN	159	kvm_for_each_vcpu(i, vcpu, kvm)
	160	kvm_arch_vcpu_free(vcpu);
	161
	162	mutex_lock(&kvm->lock);
	163	for (i = 0; i < atomic_read(&kvm->online_vcpus); i++)
	164	kvm->vcpus[i] = NULL;
	165
	166	atomic_set(&kvm->online_vcpus, 0);
	167	mutex_unlock(&kvm->lock);
bbf45ba5 HB	168	}
bbf45ba5 HB	169
ad8ba2cd SY	170	void kvm_arch_sync_events(struct kvm *kvm)
	171	{
	172	}
	173
bbf45ba5 HB	174	int kvm_dev_ioctl_check_extension(long ext)
	175	{
	176	int r;
	177
	178	switch (ext) {
5ce941ee SW	179	#ifdef CONFIG_BOOKE
	180	case KVM_CAP_PPC_BOOKE_SREGS:
	181	#else
e15a1137	182	case KVM_CAP_PPC_SEGSTATE:
5ce941ee	183	#endif
c10207fe	184	case KVM_CAP_PPC_PAIRED_SINGLES:
18978768	185	case KVM_CAP_PPC_UNSET_IRQ:
7b4203e8	186	case KVM_CAP_PPC_IRQ_LEVEL:
71fbfd5f	187	case KVM_CAP_ENABLE_CAP:
ad0a048b	188	case KVM_CAP_PPC_OSI:
15711e9c	189	case KVM_CAP_PPC_GET_PVINFO:
e15a1137 AG	190	r = 1;
e15a1137 AG	191	break;
588968b6 LV	192	case KVM_CAP_COALESCED_MMIO:
	193	r = KVM_COALESCED_MMIO_PAGE_OFFSET;
	194	break;
bbf45ba5 HB	195	default:
	196	r = 0;
	197	break;
	198	}
	199	return r;
	200
	201	}
	202
	203	long kvm_arch_dev_ioctl(struct file *filp,
	204	unsigned int ioctl, unsigned long arg)
	205	{
	206	return -EINVAL;
	207	}
	208
f7784b8e MT	209	int kvm_arch_prepare_memory_region(struct kvm *kvm,
	210	struct kvm_memory_slot *memslot,
	211	struct kvm_memory_slot old,
	212	struct kvm_userspace_memory_region *mem,
	213	int user_alloc)
bbf45ba5 HB	214	{
	215	return 0;
	216	}
	217
f7784b8e MT	218	void kvm_arch_commit_memory_region(struct kvm *kvm,
	219	struct kvm_userspace_memory_region *mem,
	220	struct kvm_memory_slot old,
	221	int user_alloc)
	222	{
	223	return;
	224	}
	225
	226
34d4cb8f MT	227	void kvm_arch_flush_shadow(struct kvm *kvm)
	228	{
	229	}
	230
bbf45ba5 HB	231	struct kvm_vcpu kvm_arch_vcpu_create(struct kvm kvm, unsigned int id)
bbf45ba5 HB	232	{
73e75b41 HB	233	struct kvm_vcpu *vcpu;
73e75b41 HB	234	vcpu = kvmppc_core_vcpu_create(kvm, id);
06056bfb WY	235	if (!IS_ERR(vcpu))
06056bfb WY	236	kvmppc_create_vcpu_debugfs(vcpu, id);
73e75b41	237	return vcpu;
bbf45ba5 HB	238	}
	239
	240	void kvm_arch_vcpu_free(struct kvm_vcpu *vcpu)
	241	{
a595405d AG	242	/* Make sure we're not using the vcpu anymore */
	243	hrtimer_cancel(&vcpu->arch.dec_timer);
	244	tasklet_kill(&vcpu->arch.tasklet);
	245
73e75b41	246	kvmppc_remove_vcpu_debugfs(vcpu);
db93f574	247	kvmppc_core_vcpu_free(vcpu);
bbf45ba5 HB	248	}
	249
	250	void kvm_arch_vcpu_destroy(struct kvm_vcpu *vcpu)
	251	{
	252	kvm_arch_vcpu_free(vcpu);
	253	}
	254
	255	int kvm_cpu_has_pending_timer(struct kvm_vcpu *vcpu)
	256	{
9dd921cf	257	return kvmppc_core_pending_dec(vcpu);
bbf45ba5 HB	258	}
	259
	260	static void kvmppc_decrementer_func(unsigned long data)
	261	{
	262	struct kvm_vcpu vcpu = (struct kvm_vcpu )data;
	263
9dd921cf	264	kvmppc_core_queue_dec(vcpu);
45c5eb67 HB	265
	266	if (waitqueue_active(&vcpu->wq)) {
	267	wake_up_interruptible(&vcpu->wq);
	268	vcpu->stat.halt_wakeup++;
	269	}
bbf45ba5 HB	270	}
bbf45ba5 HB	271
544c6761 AG	272	/*
	273	* low level hrtimer wake routine. Because this runs in hardirq context
	274	* we schedule a tasklet to do the real work.
	275	*/
	276	enum hrtimer_restart kvmppc_decrementer_wakeup(struct hrtimer *timer)
	277	{
	278	struct kvm_vcpu *vcpu;
	279
	280	vcpu = container_of(timer, struct kvm_vcpu, arch.dec_timer);
	281	tasklet_schedule(&vcpu->arch.tasklet);
	282
	283	return HRTIMER_NORESTART;
	284	}
	285
bbf45ba5 HB	286	int kvm_arch_vcpu_init(struct kvm_vcpu *vcpu)
bbf45ba5 HB	287	{
544c6761 AG	288	hrtimer_init(&vcpu->arch.dec_timer, CLOCK_REALTIME, HRTIMER_MODE_ABS);
	289	tasklet_init(&vcpu->arch.tasklet, kvmppc_decrementer_func, (ulong)vcpu);
	290	vcpu->arch.dec_timer.function = kvmppc_decrementer_wakeup;
bbf45ba5	291
09000adb BB	292	#ifdef CONFIG_KVM_EXIT_TIMING
	293	mutex_init(&vcpu->arch.exit_timing_lock);
	294	#endif
	295
bbf45ba5 HB	296	return 0;
	297	}
	298
	299	void kvm_arch_vcpu_uninit(struct kvm_vcpu *vcpu)
	300	{
ecc0981f	301	kvmppc_mmu_destroy(vcpu);
bbf45ba5 HB	302	}
	303
	304	void kvm_arch_vcpu_load(struct kvm_vcpu *vcpu, int cpu)
	305	{
eab17672 SW	306	#ifdef CONFIG_BOOKE
	307	/*
	308	* vrsave (formerly usprg0) isn't used by Linux, but may
	309	* be used by the guest.
	310	*
	311	* On non-booke this is associated with Altivec and
	312	* is handled by code in book3s.c.
	313	*/
	314	mtspr(SPRN_VRSAVE, vcpu->arch.vrsave);
	315	#endif
9dd921cf	316	kvmppc_core_vcpu_load(vcpu, cpu);
bbf45ba5 HB	317	}
	318
	319	void kvm_arch_vcpu_put(struct kvm_vcpu *vcpu)
	320	{
9dd921cf	321	kvmppc_core_vcpu_put(vcpu);
eab17672 SW	322	#ifdef CONFIG_BOOKE
	323	vcpu->arch.vrsave = mfspr(SPRN_VRSAVE);
	324	#endif
bbf45ba5 HB	325	}
bbf45ba5 HB	326
d0bfb940	327	int kvm_arch_vcpu_ioctl_set_guest_debug(struct kvm_vcpu *vcpu,
f5d0906b	328	struct kvm_guest_debug *dbg)
bbf45ba5	329	{
f5d0906b	330	return -EINVAL;
bbf45ba5 HB	331	}
	332
	333	static void kvmppc_complete_dcr_load(struct kvm_vcpu *vcpu,
	334	struct kvm_run *run)
	335	{
8e5b26b5	336	kvmppc_set_gpr(vcpu, vcpu->arch.io_gpr, run->dcr.data);
bbf45ba5 HB	337	}
	338
	339	static void kvmppc_complete_mmio_load(struct kvm_vcpu *vcpu,
	340	struct kvm_run *run)
	341	{
69b61833	342	u64 uninitialized_var(gpr);
bbf45ba5	343
8e5b26b5	344	if (run->mmio.len > sizeof(gpr)) {
bbf45ba5 HB	345	printk(KERN_ERR "bad MMIO length: %d\n", run->mmio.len);
	346	return;
	347	}
	348
	349	if (vcpu->arch.mmio_is_bigendian) {
	350	switch (run->mmio.len) {
b104d066	351	case 8: gpr = (u64 )run->mmio.data; break;
8e5b26b5 AG	352	case 4: gpr = (u32 )run->mmio.data; break;
	353	case 2: gpr = (u16 )run->mmio.data; break;
	354	case 1: gpr = (u8 )run->mmio.data; break;
bbf45ba5 HB	355	}
	356	} else {
	357	/* Convert BE data from userland back to LE. */
	358	switch (run->mmio.len) {
8e5b26b5 AG	359	case 4: gpr = ld_le32((u32 *)run->mmio.data); break;
	360	case 2: gpr = ld_le16((u16 *)run->mmio.data); break;
	361	case 1: gpr = (u8 )run->mmio.data; break;
bbf45ba5 HB	362	}
bbf45ba5 HB	363	}
8e5b26b5	364
3587d534 AG	365	if (vcpu->arch.mmio_sign_extend) {
	366	switch (run->mmio.len) {
	367	#ifdef CONFIG_PPC64
	368	case 4:
	369	gpr = (s64)(s32)gpr;
	370	break;
	371	#endif
	372	case 2:
	373	gpr = (s64)(s16)gpr;
	374	break;
	375	case 1:
	376	gpr = (s64)(s8)gpr;
	377	break;
	378	}
	379	}
	380
8e5b26b5	381	kvmppc_set_gpr(vcpu, vcpu->arch.io_gpr, gpr);
b104d066 AG	382
	383	switch (vcpu->arch.io_gpr & KVM_REG_EXT_MASK) {
	384	case KVM_REG_GPR:
	385	kvmppc_set_gpr(vcpu, vcpu->arch.io_gpr, gpr);
	386	break;
	387	case KVM_REG_FPR:
	388	vcpu->arch.fpr[vcpu->arch.io_gpr & KVM_REG_MASK] = gpr;
	389	break;
287d5611	390	#ifdef CONFIG_PPC_BOOK3S
b104d066 AG	391	case KVM_REG_QPR:
	392	vcpu->arch.qpr[vcpu->arch.io_gpr & KVM_REG_MASK] = gpr;
	393	break;
	394	case KVM_REG_FQPR:
	395	vcpu->arch.fpr[vcpu->arch.io_gpr & KVM_REG_MASK] = gpr;
	396	vcpu->arch.qpr[vcpu->arch.io_gpr & KVM_REG_MASK] = gpr;
	397	break;
287d5611	398	#endif
b104d066 AG	399	default:
	400	BUG();
	401	}
bbf45ba5 HB	402	}
	403
	404	int kvmppc_handle_load(struct kvm_run run, struct kvm_vcpu vcpu,
	405	unsigned int rt, unsigned int bytes, int is_bigendian)
	406	{
	407	if (bytes > sizeof(run->mmio.data)) {
	408	printk(KERN_ERR "%s: bad MMIO length: %d\n", __func__,
	409	run->mmio.len);
	410	}
	411
	412	run->mmio.phys_addr = vcpu->arch.paddr_accessed;
	413	run->mmio.len = bytes;
	414	run->mmio.is_write = 0;
	415
	416	vcpu->arch.io_gpr = rt;
	417	vcpu->arch.mmio_is_bigendian = is_bigendian;
	418	vcpu->mmio_needed = 1;
	419	vcpu->mmio_is_write = 0;
3587d534	420	vcpu->arch.mmio_sign_extend = 0;
bbf45ba5 HB	421
	422	return EMULATE_DO_MMIO;
	423	}
	424
3587d534 AG	425	/* Same as above, but sign extends */
	426	int kvmppc_handle_loads(struct kvm_run run, struct kvm_vcpu vcpu,
	427	unsigned int rt, unsigned int bytes, int is_bigendian)
	428	{
	429	int r;
	430
	431	r = kvmppc_handle_load(run, vcpu, rt, bytes, is_bigendian);
	432	vcpu->arch.mmio_sign_extend = 1;
	433
	434	return r;
	435	}
	436
bbf45ba5	437	int kvmppc_handle_store(struct kvm_run run, struct kvm_vcpu vcpu,
b104d066	438	u64 val, unsigned int bytes, int is_bigendian)
bbf45ba5 HB	439	{
	440	void *data = run->mmio.data;
	441
	442	if (bytes > sizeof(run->mmio.data)) {
	443	printk(KERN_ERR "%s: bad MMIO length: %d\n", __func__,
	444	run->mmio.len);
	445	}
	446
	447	run->mmio.phys_addr = vcpu->arch.paddr_accessed;
	448	run->mmio.len = bytes;
	449	run->mmio.is_write = 1;
	450	vcpu->mmio_needed = 1;
	451	vcpu->mmio_is_write = 1;
	452
	453	/* Store the value at the lowest bytes in 'data'. */
	454	if (is_bigendian) {
	455	switch (bytes) {
b104d066	456	case 8: (u64 )data = val; break;
bbf45ba5 HB	457	case 4: (u32 )data = val; break;
	458	case 2: (u16 )data = val; break;
	459	case 1: (u8 )data = val; break;
	460	}
	461	} else {
	462	/* Store LE value into 'data'. */
	463	switch (bytes) {
	464	case 4: st_le32(data, val); break;
	465	case 2: st_le16(data, val); break;
	466	case 1: (u8 )data = val; break;
	467	}
	468	}
	469
	470	return EMULATE_DO_MMIO;
	471	}
	472
	473	int kvm_arch_vcpu_ioctl_run(struct kvm_vcpu vcpu, struct kvm_run run)
	474	{
	475	int r;
	476	sigset_t sigsaved;
	477
	478	if (vcpu->sigset_active)
	479	sigprocmask(SIG_SETMASK, &vcpu->sigset, &sigsaved);
	480
	481	if (vcpu->mmio_needed) {
	482	if (!vcpu->mmio_is_write)
	483	kvmppc_complete_mmio_load(vcpu, run);
	484	vcpu->mmio_needed = 0;
	485	} else if (vcpu->arch.dcr_needed) {
	486	if (!vcpu->arch.dcr_is_write)
	487	kvmppc_complete_dcr_load(vcpu, run);
	488	vcpu->arch.dcr_needed = 0;
ad0a048b AG	489	} else if (vcpu->arch.osi_needed) {
	490	u64 *gprs = run->osi.gprs;
	491	int i;
	492
	493	for (i = 0; i < 32; i++)
	494	kvmppc_set_gpr(vcpu, i, gprs[i]);
	495	vcpu->arch.osi_needed = 0;
bbf45ba5 HB	496	}
bbf45ba5 HB	497
9dd921cf	498	kvmppc_core_deliver_interrupts(vcpu);
bbf45ba5 HB	499
	500	local_irq_disable();
	501	kvm_guest_enter();
	502	r = __kvmppc_vcpu_run(run, vcpu);
	503	kvm_guest_exit();
	504	local_irq_enable();
	505
	506	if (vcpu->sigset_active)
	507	sigprocmask(SIG_SETMASK, &sigsaved, NULL);
	508
	509	return r;
	510	}
	511
	512	int kvm_vcpu_ioctl_interrupt(struct kvm_vcpu vcpu, struct kvm_interrupt irq)
	513	{
18978768 AG	514	if (irq->irq == KVM_INTERRUPT_UNSET)
	515	kvmppc_core_dequeue_external(vcpu, irq);
	516	else
	517	kvmppc_core_queue_external(vcpu, irq);
45c5eb67 HB	518
	519	if (waitqueue_active(&vcpu->wq)) {
	520	wake_up_interruptible(&vcpu->wq);
	521	vcpu->stat.halt_wakeup++;
	522	}
	523
bbf45ba5 HB	524	return 0;
	525	}
	526
71fbfd5f AG	527	static int kvm_vcpu_ioctl_enable_cap(struct kvm_vcpu *vcpu,
	528	struct kvm_enable_cap *cap)
	529	{
	530	int r;
	531
	532	if (cap->flags)
	533	return -EINVAL;
	534
	535	switch (cap->cap) {
ad0a048b AG	536	case KVM_CAP_PPC_OSI:
	537	r = 0;
	538	vcpu->arch.osi_enabled = true;
	539	break;
71fbfd5f AG	540	default:
	541	r = -EINVAL;
	542	break;
	543	}
	544
	545	return r;
	546	}
	547
bbf45ba5 HB	548	int kvm_arch_vcpu_ioctl_get_mpstate(struct kvm_vcpu *vcpu,
	549	struct kvm_mp_state *mp_state)
	550	{
	551	return -EINVAL;
	552	}
	553
	554	int kvm_arch_vcpu_ioctl_set_mpstate(struct kvm_vcpu *vcpu,
	555	struct kvm_mp_state *mp_state)
	556	{
	557	return -EINVAL;
	558	}
	559
	560	long kvm_arch_vcpu_ioctl(struct file *filp,
	561	unsigned int ioctl, unsigned long arg)
	562	{
	563	struct kvm_vcpu *vcpu = filp->private_data;
	564	void __user argp = (void __user )arg;
	565	long r;
	566
93736624 AK	567	switch (ioctl) {
93736624 AK	568	case KVM_INTERRUPT: {
bbf45ba5 HB	569	struct kvm_interrupt irq;
	570	r = -EFAULT;
	571	if (copy_from_user(&irq, argp, sizeof(irq)))
93736624	572	goto out;
bbf45ba5	573	r = kvm_vcpu_ioctl_interrupt(vcpu, &irq);
93736624	574	goto out;
bbf45ba5	575	}
19483d14	576
71fbfd5f AG	577	case KVM_ENABLE_CAP:
	578	{
	579	struct kvm_enable_cap cap;
	580	r = -EFAULT;
	581	if (copy_from_user(&cap, argp, sizeof(cap)))
	582	goto out;
	583	r = kvm_vcpu_ioctl_enable_cap(vcpu, &cap);
	584	break;
	585	}
bbf45ba5 HB	586	default:
	587	r = -EINVAL;
	588	}
	589
	590	out:
	591	return r;
	592	}
	593
15711e9c AG	594	static int kvm_vm_ioctl_get_pvinfo(struct kvm_ppc_pvinfo *pvinfo)
	595	{
	596	u32 inst_lis = 0x3c000000;
	597	u32 inst_ori = 0x60000000;
	598	u32 inst_nop = 0x60000000;
	599	u32 inst_sc = 0x44000002;
	600	u32 inst_imm_mask = 0xffff;
	601
	602	/*
	603	* The hypercall to get into KVM from within guest context is as
	604	* follows:
	605	*
	606	* lis r0, r0, KVM_SC_MAGIC_R0@h
	607	* ori r0, KVM_SC_MAGIC_R0@l
	608	* sc
	609	* nop
	610	*/
	611	pvinfo->hcall[0] = inst_lis \| ((KVM_SC_MAGIC_R0 >> 16) & inst_imm_mask);
	612	pvinfo->hcall[1] = inst_ori \| (KVM_SC_MAGIC_R0 & inst_imm_mask);
	613	pvinfo->hcall[2] = inst_sc;
	614	pvinfo->hcall[3] = inst_nop;
	615
	616	return 0;
	617	}
	618
bbf45ba5 HB	619	long kvm_arch_vm_ioctl(struct file *filp,
	620	unsigned int ioctl, unsigned long arg)
	621	{
15711e9c	622	void __user argp = (void __user )arg;
bbf45ba5 HB	623	long r;
	624
	625	switch (ioctl) {
15711e9c AG	626	case KVM_PPC_GET_PVINFO: {
15711e9c AG	627	struct kvm_ppc_pvinfo pvinfo;
d8cdddcd	628	memset(&pvinfo, 0, sizeof(pvinfo));
15711e9c AG	629	r = kvm_vm_ioctl_get_pvinfo(&pvinfo);
	630	if (copy_to_user(argp, &pvinfo, sizeof(pvinfo))) {
	631	r = -EFAULT;
	632	goto out;
	633	}
	634
	635	break;
	636	}
bbf45ba5	637	default:
367e1319	638	r = -ENOTTY;
bbf45ba5 HB	639	}
bbf45ba5 HB	640
15711e9c	641	out:
bbf45ba5 HB	642	return r;
	643	}
	644
	645	int kvm_arch_init(void *opaque)
	646	{
	647	return 0;
	648	}
	649
	650	void kvm_arch_exit(void)
	651	{
	652	}