[linux-block.git] / arch / powerpc / kvm / book3s_pr_papr.c

/*
 * Copyright (C) 2011. Freescale Inc. All rights reserved.
 *
 * Authors:
 *    Alexander Graf <agraf@suse.de>
 *    Paul Mackerras <paulus@samba.org>
 *
 * Description:
 *
 * Hypercall handling for running PAPR guests in PR KVM on Book 3S
 * processors.
 *
 * 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.
 */

#include <linux/anon_inodes.h>

#include <linux/uaccess.h>
#include <asm/kvm_ppc.h>
#include <asm/kvm_book3s.h>

#define HPTE_SIZE	16		/* bytes per HPT entry */

static unsigned long get_pteg_addr(struct kvm_vcpu *vcpu, long pte_index)
{
	struct kvmppc_vcpu_book3s *vcpu_book3s = to_book3s(vcpu);
	unsigned long pteg_addr;

	pte_index <<= 4;
	pte_index &= ((1 << ((vcpu_book3s->sdr1 & 0x1f) + 11)) - 1) << 7 | 0x70;
	pteg_addr = vcpu_book3s->sdr1 & 0xfffffffffffc0000ULL;
	pteg_addr |= pte_index;

	return pteg_addr;
}

static int kvmppc_h_pr_enter(struct kvm_vcpu *vcpu)
{
	long flags = kvmppc_get_gpr(vcpu, 4);
	long pte_index = kvmppc_get_gpr(vcpu, 5);
	__be64 pteg[2 * 8];
	__be64 *hpte;
	unsigned long pteg_addr, i;
	long int ret;

	i = pte_index & 7;
	pte_index &= ~7UL;
	pteg_addr = get_pteg_addr(vcpu, pte_index);

	mutex_lock(&vcpu->kvm->arch.hpt_mutex);
	copy_from_user(pteg, (void __user *)pteg_addr, sizeof(pteg));
	hpte = pteg;

	ret = H_PTEG_FULL;
	if (likely((flags & H_EXACT) == 0)) {
		for (i = 0; ; ++i) {
			if (i == 8)
				goto done;
			if ((be64_to_cpu(*hpte) & HPTE_V_VALID) == 0)
				break;
			hpte += 2;
		}
	} else {
		hpte += i * 2;
		if (*hpte & HPTE_V_VALID)
			goto done;
	}

	hpte[0] = cpu_to_be64(kvmppc_get_gpr(vcpu, 6));
	hpte[1] = cpu_to_be64(kvmppc_get_gpr(vcpu, 7));
	pteg_addr += i * HPTE_SIZE;
	copy_to_user((void __user *)pteg_addr, hpte, HPTE_SIZE);
	kvmppc_set_gpr(vcpu, 4, pte_index | i);
	ret = H_SUCCESS;

 done:
	mutex_unlock(&vcpu->kvm->arch.hpt_mutex);
	kvmppc_set_gpr(vcpu, 3, ret);

	return EMULATE_DONE;
}

static int kvmppc_h_pr_remove(struct kvm_vcpu *vcpu)
{
	unsigned long flags= kvmppc_get_gpr(vcpu, 4);
	unsigned long pte_index = kvmppc_get_gpr(vcpu, 5);
	unsigned long avpn = kvmppc_get_gpr(vcpu, 6);
	unsigned long v = 0, pteg, rb;
	unsigned long pte[2];
	long int ret;

	pteg = get_pteg_addr(vcpu, pte_index);
	mutex_lock(&vcpu->kvm->arch.hpt_mutex);
	copy_from_user(pte, (void __user *)pteg, sizeof(pte));
	pte[0] = be64_to_cpu((__force __be64)pte[0]);
	pte[1] = be64_to_cpu((__force __be64)pte[1]);

	ret = H_NOT_FOUND;
	if ((pte[0] & HPTE_V_VALID) == 0 ||
	    ((flags & H_AVPN) && (pte[0] & ~0x7fUL) != avpn) ||
	    ((flags & H_ANDCOND) && (pte[0] & avpn) != 0))
		goto done;

	copy_to_user((void __user *)pteg, &v, sizeof(v));

	rb = compute_tlbie_rb(pte[0], pte[1], pte_index);
	vcpu->arch.mmu.tlbie(vcpu, rb, rb & 1 ? true : false);

	ret = H_SUCCESS;
	kvmppc_set_gpr(vcpu, 4, pte[0]);
	kvmppc_set_gpr(vcpu, 5, pte[1]);

 done:
	mutex_unlock(&vcpu->kvm->arch.hpt_mutex);
	kvmppc_set_gpr(vcpu, 3, ret);

	return EMULATE_DONE;
}

/* Request defs for kvmppc_h_pr_bulk_remove() */
#define H_BULK_REMOVE_TYPE             0xc000000000000000ULL
#define   H_BULK_REMOVE_REQUEST        0x4000000000000000ULL
#define   H_BULK_REMOVE_RESPONSE       0x8000000000000000ULL
#define   H_BULK_REMOVE_END            0xc000000000000000ULL
#define H_BULK_REMOVE_CODE             0x3000000000000000ULL
#define   H_BULK_REMOVE_SUCCESS        0x0000000000000000ULL
#define   H_BULK_REMOVE_NOT_FOUND      0x1000000000000000ULL
#define   H_BULK_REMOVE_PARM           0x2000000000000000ULL
#define   H_BULK_REMOVE_HW             0x3000000000000000ULL
#define H_BULK_REMOVE_RC               0x0c00000000000000ULL
#define H_BULK_REMOVE_FLAGS            0x0300000000000000ULL
#define   H_BULK_REMOVE_ABSOLUTE       0x0000000000000000ULL
#define   H_BULK_REMOVE_ANDCOND        0x0100000000000000ULL
#define   H_BULK_REMOVE_AVPN           0x0200000000000000ULL
#define H_BULK_REMOVE_PTEX             0x00ffffffffffffffULL
#define H_BULK_REMOVE_MAX_BATCH        4

static int kvmppc_h_pr_bulk_remove(struct kvm_vcpu *vcpu)
{
	int i;
	int paramnr = 4;
	int ret = H_SUCCESS;

	mutex_lock(&vcpu->kvm->arch.hpt_mutex);
	for (i = 0; i < H_BULK_REMOVE_MAX_BATCH; i++) {
		unsigned long tsh = kvmppc_get_gpr(vcpu, paramnr+(2*i));
		unsigned long tsl = kvmppc_get_gpr(vcpu, paramnr+(2*i)+1);
		unsigned long pteg, rb, flags;
		unsigned long pte[2];
		unsigned long v = 0;

		if ((tsh & H_BULK_REMOVE_TYPE) == H_BULK_REMOVE_END) {
			break; /* Exit success */
		} else if ((tsh & H_BULK_REMOVE_TYPE) !=
			   H_BULK_REMOVE_REQUEST) {
			ret = H_PARAMETER;
			break; /* Exit fail */
		}

		tsh &= H_BULK_REMOVE_PTEX | H_BULK_REMOVE_FLAGS;
		tsh |= H_BULK_REMOVE_RESPONSE;

		if ((tsh & H_BULK_REMOVE_ANDCOND) &&
		    (tsh & H_BULK_REMOVE_AVPN)) {
			tsh |= H_BULK_REMOVE_PARM;
			kvmppc_set_gpr(vcpu, paramnr+(2*i), tsh);
			ret = H_PARAMETER;
			break; /* Exit fail */
		}

		pteg = get_pteg_addr(vcpu, tsh & H_BULK_REMOVE_PTEX);
		copy_from_user(pte, (void __user *)pteg, sizeof(pte));
		pte[0] = be64_to_cpu((__force __be64)pte[0]);
		pte[1] = be64_to_cpu((__force __be64)pte[1]);

		/* tsl = AVPN */
		flags = (tsh & H_BULK_REMOVE_FLAGS) >> 26;

		if ((pte[0] & HPTE_V_VALID) == 0 ||
		    ((flags & H_AVPN) && (pte[0] & ~0x7fUL) != tsl) ||
		    ((flags & H_ANDCOND) && (pte[0] & tsl) != 0)) {
			tsh |= H_BULK_REMOVE_NOT_FOUND;
		} else {
			/* Splat the pteg in (userland) hpt */
			copy_to_user((void __user *)pteg, &v, sizeof(v));

			rb = compute_tlbie_rb(pte[0], pte[1],
					      tsh & H_BULK_REMOVE_PTEX);
			vcpu->arch.mmu.tlbie(vcpu, rb, rb & 1 ? true : false);
			tsh |= H_BULK_REMOVE_SUCCESS;
			tsh |= (pte[1] & (HPTE_R_C | HPTE_R_R)) << 43;
		}
		kvmppc_set_gpr(vcpu, paramnr+(2*i), tsh);
	}
	mutex_unlock(&vcpu->kvm->arch.hpt_mutex);
	kvmppc_set_gpr(vcpu, 3, ret);

	return EMULATE_DONE;
}

static int kvmppc_h_pr_protect(struct kvm_vcpu *vcpu)
{
	unsigned long flags = kvmppc_get_gpr(vcpu, 4);
	unsigned long pte_index = kvmppc_get_gpr(vcpu, 5);
	unsigned long avpn = kvmppc_get_gpr(vcpu, 6);
	unsigned long rb, pteg, r, v;
	unsigned long pte[2];
	long int ret;

	pteg = get_pteg_addr(vcpu, pte_index);
	mutex_lock(&vcpu->kvm->arch.hpt_mutex);
	copy_from_user(pte, (void __user *)pteg, sizeof(pte));
	pte[0] = be64_to_cpu((__force __be64)pte[0]);
	pte[1] = be64_to_cpu((__force __be64)pte[1]);

	ret = H_NOT_FOUND;
	if ((pte[0] & HPTE_V_VALID) == 0 ||
	    ((flags & H_AVPN) && (pte[0] & ~0x7fUL) != avpn))
		goto done;

	v = pte[0];
	r = pte[1];
	r &= ~(HPTE_R_PP0 | HPTE_R_PP | HPTE_R_N | HPTE_R_KEY_HI |
	       HPTE_R_KEY_LO);
	r |= (flags << 55) & HPTE_R_PP0;
	r |= (flags << 48) & HPTE_R_KEY_HI;
	r |= flags & (HPTE_R_PP | HPTE_R_N | HPTE_R_KEY_LO);

	pte[1] = r;

	rb = compute_tlbie_rb(v, r, pte_index);
	vcpu->arch.mmu.tlbie(vcpu, rb, rb & 1 ? true : false);
	pte[0] = (__force u64)cpu_to_be64(pte[0]);
	pte[1] = (__force u64)cpu_to_be64(pte[1]);
	copy_to_user((void __user *)pteg, pte, sizeof(pte));
	ret = H_SUCCESS;

 done:
	mutex_unlock(&vcpu->kvm->arch.hpt_mutex);
	kvmppc_set_gpr(vcpu, 3, ret);

	return EMULATE_DONE;
}

static int kvmppc_h_pr_put_tce(struct kvm_vcpu *vcpu)
{
	unsigned long liobn = kvmppc_get_gpr(vcpu, 4);
	unsigned long ioba = kvmppc_get_gpr(vcpu, 5);
	unsigned long tce = kvmppc_get_gpr(vcpu, 6);
	long rc;

	rc = kvmppc_h_put_tce(vcpu, liobn, ioba, tce);
	if (rc == H_TOO_HARD)
		return EMULATE_FAIL;
	kvmppc_set_gpr(vcpu, 3, rc);
	return EMULATE_DONE;
}

static int kvmppc_h_pr_logical_ci_load(struct kvm_vcpu *vcpu)
{
	long rc;

	rc = kvmppc_h_logical_ci_load(vcpu);
	if (rc == H_TOO_HARD)
		return EMULATE_FAIL;
	kvmppc_set_gpr(vcpu, 3, rc);
	return EMULATE_DONE;
}

static int kvmppc_h_pr_logical_ci_store(struct kvm_vcpu *vcpu)
{
	long rc;

	rc = kvmppc_h_logical_ci_store(vcpu);
	if (rc == H_TOO_HARD)
		return EMULATE_FAIL;
	kvmppc_set_gpr(vcpu, 3, rc);
	return EMULATE_DONE;
}

static int kvmppc_h_pr_put_tce_indirect(struct kvm_vcpu *vcpu)
{
	unsigned long liobn = kvmppc_get_gpr(vcpu, 4);
	unsigned long ioba = kvmppc_get_gpr(vcpu, 5);
	unsigned long tce = kvmppc_get_gpr(vcpu, 6);
	unsigned long npages = kvmppc_get_gpr(vcpu, 7);
	long rc;

	rc = kvmppc_h_put_tce_indirect(vcpu, liobn, ioba,
			tce, npages);
	if (rc == H_TOO_HARD)
		return EMULATE_FAIL;
	kvmppc_set_gpr(vcpu, 3, rc);
	return EMULATE_DONE;
}

static int kvmppc_h_pr_stuff_tce(struct kvm_vcpu *vcpu)
{
	unsigned long liobn = kvmppc_get_gpr(vcpu, 4);
	unsigned long ioba = kvmppc_get_gpr(vcpu, 5);
	unsigned long tce_value = kvmppc_get_gpr(vcpu, 6);
	unsigned long npages = kvmppc_get_gpr(vcpu, 7);
	long rc;

	rc = kvmppc_h_stuff_tce(vcpu, liobn, ioba, tce_value, npages);
	if (rc == H_TOO_HARD)
		return EMULATE_FAIL;
	kvmppc_set_gpr(vcpu, 3, rc);
	return EMULATE_DONE;
}

static int kvmppc_h_pr_xics_hcall(struct kvm_vcpu *vcpu, u32 cmd)
{
	long rc = kvmppc_xics_hcall(vcpu, cmd);
	kvmppc_set_gpr(vcpu, 3, rc);
	return EMULATE_DONE;
}

int kvmppc_h_pr(struct kvm_vcpu *vcpu, unsigned long cmd)
{
	int rc, idx;

	if (cmd <= MAX_HCALL_OPCODE &&
	    !test_bit(cmd/4, vcpu->kvm->arch.enabled_hcalls))
		return EMULATE_FAIL;

	switch (cmd) {
	case H_ENTER:
		return kvmppc_h_pr_enter(vcpu);
	case H_REMOVE:
		return kvmppc_h_pr_remove(vcpu);
	case H_PROTECT:
		return kvmppc_h_pr_protect(vcpu);
	case H_BULK_REMOVE:
		return kvmppc_h_pr_bulk_remove(vcpu);
	case H_PUT_TCE:
		return kvmppc_h_pr_put_tce(vcpu);
	case H_PUT_TCE_INDIRECT:
		return kvmppc_h_pr_put_tce_indirect(vcpu);
	case H_STUFF_TCE:
		return kvmppc_h_pr_stuff_tce(vcpu);
	case H_CEDE:
		kvmppc_set_msr_fast(vcpu, kvmppc_get_msr(vcpu) | MSR_EE);
		kvm_vcpu_block(vcpu);
		clear_bit(KVM_REQ_UNHALT, &vcpu->requests);
		vcpu->stat.halt_wakeup++;
		return EMULATE_DONE;
	case H_LOGICAL_CI_LOAD:
		return kvmppc_h_pr_logical_ci_load(vcpu);
	case H_LOGICAL_CI_STORE:
		return kvmppc_h_pr_logical_ci_store(vcpu);
	case H_XIRR:
	case H_CPPR:
	case H_EOI:
	case H_IPI:
	case H_IPOLL:
	case H_XIRR_X:
		if (kvmppc_xics_enabled(vcpu))
			return kvmppc_h_pr_xics_hcall(vcpu, cmd);
		break;
	case H_RTAS:
		if (list_empty(&vcpu->kvm->arch.rtas_tokens))
			break;
		idx = srcu_read_lock(&vcpu->kvm->srcu);
		rc = kvmppc_rtas_hcall(vcpu);
		srcu_read_unlock(&vcpu->kvm->srcu, idx);
		if (rc)
			break;
		kvmppc_set_gpr(vcpu, 3, 0);
		return EMULATE_DONE;
	}

	return EMULATE_FAIL;
}

int kvmppc_hcall_impl_pr(unsigned long cmd)
{
	switch (cmd) {
	case H_ENTER:
	case H_REMOVE:
	case H_PROTECT:
	case H_BULK_REMOVE:
	case H_PUT_TCE:
	case H_CEDE:
	case H_LOGICAL_CI_LOAD:
	case H_LOGICAL_CI_STORE:
#ifdef CONFIG_KVM_XICS
	case H_XIRR:
	case H_CPPR:
	case H_EOI:
	case H_IPI:
	case H_IPOLL:
	case H_XIRR_X:
#endif
		return 1;
	}
	return 0;
}

/*
 * List of hcall numbers to enable by default.
 * For compatibility with old userspace, we enable by default
 * all hcalls that were implemented before the hcall-enabling
 * facility was added.  Note this list should not include H_RTAS.
 */
static unsigned int default_hcall_list[] = {
	H_ENTER,
	H_REMOVE,
	H_PROTECT,
	H_BULK_REMOVE,
	H_PUT_TCE,
	H_CEDE,
#ifdef CONFIG_KVM_XICS
	H_XIRR,
	H_CPPR,
	H_EOI,
	H_IPI,
	H_IPOLL,
	H_XIRR_X,
#endif
	0
};

void kvmppc_pr_init_default_hcalls(struct kvm *kvm)
{
	int i;
	unsigned int hcall;

	for (i = 0; default_hcall_list[i]; ++i) {
		hcall = default_hcall_list[i];
		WARN_ON(!kvmppc_hcall_impl_pr(hcall));
		__set_bit(hcall / 4, kvm->arch.enabled_hcalls);
	}
}
Commit	Line	Data
0254f074 AG	1	/*
	2	* Copyright (C) 2011. Freescale Inc. All rights reserved.
	3	*
	4	* Authors:
	5	* Alexander Graf <agraf@suse.de>
	6	* Paul Mackerras <paulus@samba.org>
	7	*
	8	* Description:
	9	*
	10	* Hypercall handling for running PAPR guests in PR KVM on Book 3S
	11	* processors.
	12	*
	13	* This program is free software; you can redistribute it and/or modify
	14	* it under the terms of the GNU General Public License, version 2, as
	15	* published by the Free Software Foundation.
	16	*/
	17
f31e65e1 BH	18	#include <linux/anon_inodes.h>
f31e65e1 BH	19
7c0f6ba6	20	#include <linux/uaccess.h>
0254f074 AG	21	#include <asm/kvm_ppc.h>
	22	#include <asm/kvm_book3s.h>
	23
5cd92a95 PM	24	#define HPTE_SIZE 16 /* bytes per HPT entry */
5cd92a95 PM	25
0254f074 AG	26	static unsigned long get_pteg_addr(struct kvm_vcpu *vcpu, long pte_index)
	27	{
	28	struct kvmppc_vcpu_book3s *vcpu_book3s = to_book3s(vcpu);
	29	unsigned long pteg_addr;
	30
	31	pte_index <<= 4;
	32	pte_index &= ((1 << ((vcpu_book3s->sdr1 & 0x1f) + 11)) - 1) << 7 \| 0x70;
	33	pteg_addr = vcpu_book3s->sdr1 & 0xfffffffffffc0000ULL;
	34	pteg_addr \|= pte_index;
	35
	36	return pteg_addr;
	37	}
	38
	39	static int kvmppc_h_pr_enter(struct kvm_vcpu *vcpu)
	40	{
	41	long flags = kvmppc_get_gpr(vcpu, 4);
	42	long pte_index = kvmppc_get_gpr(vcpu, 5);
f396df35 AG	43	__be64 pteg[2 * 8];
	44	__be64 *hpte;
	45	unsigned long pteg_addr, i;
5cd92a95	46	long int ret;
0254f074	47
5cd92a95	48	i = pte_index & 7;
0254f074 AG	49	pte_index &= ~7UL;
	50	pteg_addr = get_pteg_addr(vcpu, pte_index);
	51
9308ab8e	52	mutex_lock(&vcpu->kvm->arch.hpt_mutex);
0254f074 AG	53	copy_from_user(pteg, (void __user *)pteg_addr, sizeof(pteg));
	54	hpte = pteg;
	55
5cd92a95	56	ret = H_PTEG_FULL;
0254f074	57	if (likely((flags & H_EXACT) == 0)) {
0254f074 AG	58	for (i = 0; ; ++i) {
0254f074 AG	59	if (i == 8)
5cd92a95	60	goto done;
1692aa3f	61	if ((be64_to_cpu(*hpte) & HPTE_V_VALID) == 0)
0254f074 AG	62	break;
	63	hpte += 2;
	64	}
	65	} else {
0254f074	66	hpte += i * 2;
5cd92a95 PM	67	if (*hpte & HPTE_V_VALID)
5cd92a95 PM	68	goto done;
0254f074 AG	69	}
0254f074 AG	70
1692aa3f AG	71	hpte[0] = cpu_to_be64(kvmppc_get_gpr(vcpu, 6));
1692aa3f AG	72	hpte[1] = cpu_to_be64(kvmppc_get_gpr(vcpu, 7));
5cd92a95 PM	73	pteg_addr += i * HPTE_SIZE;
5cd92a95 PM	74	copy_to_user((void __user *)pteg_addr, hpte, HPTE_SIZE);
0254f074	75	kvmppc_set_gpr(vcpu, 4, pte_index \| i);
5cd92a95 PM	76	ret = H_SUCCESS;
	77
	78	done:
9308ab8e	79	mutex_unlock(&vcpu->kvm->arch.hpt_mutex);
5cd92a95	80	kvmppc_set_gpr(vcpu, 3, ret);
0254f074 AG	81
	82	return EMULATE_DONE;
	83	}
	84
	85	static int kvmppc_h_pr_remove(struct kvm_vcpu *vcpu)
	86	{
	87	unsigned long flags= kvmppc_get_gpr(vcpu, 4);
	88	unsigned long pte_index = kvmppc_get_gpr(vcpu, 5);
	89	unsigned long avpn = kvmppc_get_gpr(vcpu, 6);
	90	unsigned long v = 0, pteg, rb;
	91	unsigned long pte[2];
9308ab8e	92	long int ret;
0254f074 AG	93
0254f074 AG	94	pteg = get_pteg_addr(vcpu, pte_index);
9308ab8e	95	mutex_lock(&vcpu->kvm->arch.hpt_mutex);
0254f074	96	copy_from_user(pte, (void __user *)pteg, sizeof(pte));
f396df35 AG	97	pte[0] = be64_to_cpu((__force __be64)pte[0]);
f396df35 AG	98	pte[1] = be64_to_cpu((__force __be64)pte[1]);
0254f074	99
9308ab8e	100	ret = H_NOT_FOUND;
0254f074 AG	101	if ((pte[0] & HPTE_V_VALID) == 0 \|\|
0254f074 AG	102	((flags & H_AVPN) && (pte[0] & ~0x7fUL) != avpn) \|\|
9308ab8e PM	103	((flags & H_ANDCOND) && (pte[0] & avpn) != 0))
9308ab8e PM	104	goto done;
0254f074 AG	105
	106	copy_to_user((void __user *)pteg, &v, sizeof(v));
	107
	108	rb = compute_tlbie_rb(pte[0], pte[1], pte_index);
	109	vcpu->arch.mmu.tlbie(vcpu, rb, rb & 1 ? true : false);
	110
9308ab8e	111	ret = H_SUCCESS;
0254f074 AG	112	kvmppc_set_gpr(vcpu, 4, pte[0]);
	113	kvmppc_set_gpr(vcpu, 5, pte[1]);
	114
9308ab8e PM	115	done:
	116	mutex_unlock(&vcpu->kvm->arch.hpt_mutex);
	117	kvmppc_set_gpr(vcpu, 3, ret);
	118
0254f074 AG	119	return EMULATE_DONE;
	120	}
	121
3aaefef2 ME	122	/* Request defs for kvmppc_h_pr_bulk_remove() */
	123	#define H_BULK_REMOVE_TYPE 0xc000000000000000ULL
	124	#define H_BULK_REMOVE_REQUEST 0x4000000000000000ULL
	125	#define H_BULK_REMOVE_RESPONSE 0x8000000000000000ULL
	126	#define H_BULK_REMOVE_END 0xc000000000000000ULL
	127	#define H_BULK_REMOVE_CODE 0x3000000000000000ULL
	128	#define H_BULK_REMOVE_SUCCESS 0x0000000000000000ULL
	129	#define H_BULK_REMOVE_NOT_FOUND 0x1000000000000000ULL
	130	#define H_BULK_REMOVE_PARM 0x2000000000000000ULL
	131	#define H_BULK_REMOVE_HW 0x3000000000000000ULL
	132	#define H_BULK_REMOVE_RC 0x0c00000000000000ULL
	133	#define H_BULK_REMOVE_FLAGS 0x0300000000000000ULL
	134	#define H_BULK_REMOVE_ABSOLUTE 0x0000000000000000ULL
	135	#define H_BULK_REMOVE_ANDCOND 0x0100000000000000ULL
	136	#define H_BULK_REMOVE_AVPN 0x0200000000000000ULL
	137	#define H_BULK_REMOVE_PTEX 0x00ffffffffffffffULL
	138	#define H_BULK_REMOVE_MAX_BATCH 4
	139
	140	static int kvmppc_h_pr_bulk_remove(struct kvm_vcpu *vcpu)
	141	{
	142	int i;
	143	int paramnr = 4;
	144	int ret = H_SUCCESS;
	145
9308ab8e	146	mutex_lock(&vcpu->kvm->arch.hpt_mutex);
3aaefef2 ME	147	for (i = 0; i < H_BULK_REMOVE_MAX_BATCH; i++) {
	148	unsigned long tsh = kvmppc_get_gpr(vcpu, paramnr+(2*i));
	149	unsigned long tsl = kvmppc_get_gpr(vcpu, paramnr+(2*i)+1);
	150	unsigned long pteg, rb, flags;
	151	unsigned long pte[2];
	152	unsigned long v = 0;
	153
	154	if ((tsh & H_BULK_REMOVE_TYPE) == H_BULK_REMOVE_END) {
	155	break; /* Exit success */
	156	} else if ((tsh & H_BULK_REMOVE_TYPE) !=
	157	H_BULK_REMOVE_REQUEST) {
	158	ret = H_PARAMETER;
	159	break; /* Exit fail */
	160	}
	161
	162	tsh &= H_BULK_REMOVE_PTEX \| H_BULK_REMOVE_FLAGS;
	163	tsh \|= H_BULK_REMOVE_RESPONSE;
	164
	165	if ((tsh & H_BULK_REMOVE_ANDCOND) &&
	166	(tsh & H_BULK_REMOVE_AVPN)) {
	167	tsh \|= H_BULK_REMOVE_PARM;
	168	kvmppc_set_gpr(vcpu, paramnr+(2*i), tsh);
	169	ret = H_PARAMETER;
	170	break; /* Exit fail */
	171	}
	172
	173	pteg = get_pteg_addr(vcpu, tsh & H_BULK_REMOVE_PTEX);
	174	copy_from_user(pte, (void __user *)pteg, sizeof(pte));
f396df35 AG	175	pte[0] = be64_to_cpu((__force __be64)pte[0]);
f396df35 AG	176	pte[1] = be64_to_cpu((__force __be64)pte[1]);
3aaefef2 ME	177
	178	/* tsl = AVPN */
	179	flags = (tsh & H_BULK_REMOVE_FLAGS) >> 26;
	180
	181	if ((pte[0] & HPTE_V_VALID) == 0 \|\|
	182	((flags & H_AVPN) && (pte[0] & ~0x7fUL) != tsl) \|\|
	183	((flags & H_ANDCOND) && (pte[0] & tsl) != 0)) {
	184	tsh \|= H_BULK_REMOVE_NOT_FOUND;
	185	} else {
	186	/* Splat the pteg in (userland) hpt */
	187	copy_to_user((void __user *)pteg, &v, sizeof(v));
	188
	189	rb = compute_tlbie_rb(pte[0], pte[1],
	190	tsh & H_BULK_REMOVE_PTEX);
	191	vcpu->arch.mmu.tlbie(vcpu, rb, rb & 1 ? true : false);
	192	tsh \|= H_BULK_REMOVE_SUCCESS;
	193	tsh \|= (pte[1] & (HPTE_R_C \| HPTE_R_R)) << 43;
	194	}
	195	kvmppc_set_gpr(vcpu, paramnr+(2*i), tsh);
	196	}
9308ab8e	197	mutex_unlock(&vcpu->kvm->arch.hpt_mutex);
3aaefef2 ME	198	kvmppc_set_gpr(vcpu, 3, ret);
	199
	200	return EMULATE_DONE;
	201	}
	202
0254f074 AG	203	static int kvmppc_h_pr_protect(struct kvm_vcpu *vcpu)
	204	{
	205	unsigned long flags = kvmppc_get_gpr(vcpu, 4);
	206	unsigned long pte_index = kvmppc_get_gpr(vcpu, 5);
	207	unsigned long avpn = kvmppc_get_gpr(vcpu, 6);
	208	unsigned long rb, pteg, r, v;
	209	unsigned long pte[2];
9308ab8e	210	long int ret;
0254f074 AG	211
0254f074 AG	212	pteg = get_pteg_addr(vcpu, pte_index);
9308ab8e	213	mutex_lock(&vcpu->kvm->arch.hpt_mutex);
0254f074	214	copy_from_user(pte, (void __user *)pteg, sizeof(pte));
f396df35 AG	215	pte[0] = be64_to_cpu((__force __be64)pte[0]);
f396df35 AG	216	pte[1] = be64_to_cpu((__force __be64)pte[1]);
0254f074	217
9308ab8e	218	ret = H_NOT_FOUND;
0254f074	219	if ((pte[0] & HPTE_V_VALID) == 0 \|\|
9308ab8e PM	220	((flags & H_AVPN) && (pte[0] & ~0x7fUL) != avpn))
9308ab8e PM	221	goto done;
0254f074 AG	222
	223	v = pte[0];
	224	r = pte[1];
	225	r &= ~(HPTE_R_PP0 \| HPTE_R_PP \| HPTE_R_N \| HPTE_R_KEY_HI \|
	226	HPTE_R_KEY_LO);
	227	r \|= (flags << 55) & HPTE_R_PP0;
	228	r \|= (flags << 48) & HPTE_R_KEY_HI;
	229	r \|= flags & (HPTE_R_PP \| HPTE_R_N \| HPTE_R_KEY_LO);
	230
	231	pte[1] = r;
	232
	233	rb = compute_tlbie_rb(v, r, pte_index);
	234	vcpu->arch.mmu.tlbie(vcpu, rb, rb & 1 ? true : false);
f396df35 AG	235	pte[0] = (__force u64)cpu_to_be64(pte[0]);
f396df35 AG	236	pte[1] = (__force u64)cpu_to_be64(pte[1]);
0254f074	237	copy_to_user((void __user *)pteg, pte, sizeof(pte));
9308ab8e	238	ret = H_SUCCESS;
0254f074	239
9308ab8e PM	240	done:
	241	mutex_unlock(&vcpu->kvm->arch.hpt_mutex);
	242	kvmppc_set_gpr(vcpu, 3, ret);
0254f074 AG	243
	244	return EMULATE_DONE;
	245	}
	246
f31e65e1 BH	247	static int kvmppc_h_pr_put_tce(struct kvm_vcpu *vcpu)
	248	{
	249	unsigned long liobn = kvmppc_get_gpr(vcpu, 4);
	250	unsigned long ioba = kvmppc_get_gpr(vcpu, 5);
	251	unsigned long tce = kvmppc_get_gpr(vcpu, 6);
	252	long rc;
	253
	254	rc = kvmppc_h_put_tce(vcpu, liobn, ioba, tce);
	255	if (rc == H_TOO_HARD)
	256	return EMULATE_FAIL;
	257	kvmppc_set_gpr(vcpu, 3, rc);
	258	return EMULATE_DONE;
	259	}
	260
99342cf8 DG	261	static int kvmppc_h_pr_logical_ci_load(struct kvm_vcpu *vcpu)
	262	{
	263	long rc;
	264
	265	rc = kvmppc_h_logical_ci_load(vcpu);
	266	if (rc == H_TOO_HARD)
	267	return EMULATE_FAIL;
	268	kvmppc_set_gpr(vcpu, 3, rc);
	269	return EMULATE_DONE;
	270	}
	271
	272	static int kvmppc_h_pr_logical_ci_store(struct kvm_vcpu *vcpu)
	273	{
	274	long rc;
	275
	276	rc = kvmppc_h_logical_ci_store(vcpu);
	277	if (rc == H_TOO_HARD)
	278	return EMULATE_FAIL;
	279	kvmppc_set_gpr(vcpu, 3, rc);
	280	return EMULATE_DONE;
	281	}
	282
d3695aa4 AK	283	static int kvmppc_h_pr_put_tce_indirect(struct kvm_vcpu *vcpu)
	284	{
	285	unsigned long liobn = kvmppc_get_gpr(vcpu, 4);
	286	unsigned long ioba = kvmppc_get_gpr(vcpu, 5);
	287	unsigned long tce = kvmppc_get_gpr(vcpu, 6);
	288	unsigned long npages = kvmppc_get_gpr(vcpu, 7);
	289	long rc;
	290
	291	rc = kvmppc_h_put_tce_indirect(vcpu, liobn, ioba,
	292	tce, npages);
	293	if (rc == H_TOO_HARD)
	294	return EMULATE_FAIL;
	295	kvmppc_set_gpr(vcpu, 3, rc);
	296	return EMULATE_DONE;
	297	}
	298
	299	static int kvmppc_h_pr_stuff_tce(struct kvm_vcpu *vcpu)
	300	{
	301	unsigned long liobn = kvmppc_get_gpr(vcpu, 4);
	302	unsigned long ioba = kvmppc_get_gpr(vcpu, 5);
	303	unsigned long tce_value = kvmppc_get_gpr(vcpu, 6);
	304	unsigned long npages = kvmppc_get_gpr(vcpu, 7);
	305	long rc;
	306
	307	rc = kvmppc_h_stuff_tce(vcpu, liobn, ioba, tce_value, npages);
	308	if (rc == H_TOO_HARD)
	309	return EMULATE_FAIL;
	310	kvmppc_set_gpr(vcpu, 3, rc);
	311	return EMULATE_DONE;
	312	}
	313
bc5ad3f3 BH	314	static int kvmppc_h_pr_xics_hcall(struct kvm_vcpu *vcpu, u32 cmd)
	315	{
	316	long rc = kvmppc_xics_hcall(vcpu, cmd);
	317	kvmppc_set_gpr(vcpu, 3, rc);
	318	return EMULATE_DONE;
	319	}
	320
0254f074 AG	321	int kvmppc_h_pr(struct kvm_vcpu *vcpu, unsigned long cmd)
0254f074 AG	322	{
ef1af2e2 PM	323	int rc, idx;
ef1af2e2 PM	324
699a0ea0 PM	325	if (cmd <= MAX_HCALL_OPCODE &&
	326	!test_bit(cmd/4, vcpu->kvm->arch.enabled_hcalls))
	327	return EMULATE_FAIL;
	328
0254f074 AG	329	switch (cmd) {
	330	case H_ENTER:
	331	return kvmppc_h_pr_enter(vcpu);
	332	case H_REMOVE:
	333	return kvmppc_h_pr_remove(vcpu);
	334	case H_PROTECT:
	335	return kvmppc_h_pr_protect(vcpu);
	336	case H_BULK_REMOVE:
3aaefef2	337	return kvmppc_h_pr_bulk_remove(vcpu);
f31e65e1 BH	338	case H_PUT_TCE:
f31e65e1 BH	339	return kvmppc_h_pr_put_tce(vcpu);
d3695aa4 AK	340	case H_PUT_TCE_INDIRECT:
	341	return kvmppc_h_pr_put_tce_indirect(vcpu);
	342	case H_STUFF_TCE:
	343	return kvmppc_h_pr_stuff_tce(vcpu);
0254f074	344	case H_CEDE:
5deb8e7a	345	kvmppc_set_msr_fast(vcpu, kvmppc_get_msr(vcpu) \| MSR_EE);
0254f074	346	kvm_vcpu_block(vcpu);
966cd0f3	347	clear_bit(KVM_REQ_UNHALT, &vcpu->requests);
0254f074 AG	348	vcpu->stat.halt_wakeup++;
0254f074 AG	349	return EMULATE_DONE;
99342cf8 DG	350	case H_LOGICAL_CI_LOAD:
	351	return kvmppc_h_pr_logical_ci_load(vcpu);
	352	case H_LOGICAL_CI_STORE:
	353	return kvmppc_h_pr_logical_ci_store(vcpu);
bc5ad3f3 BH	354	case H_XIRR:
	355	case H_CPPR:
	356	case H_EOI:
	357	case H_IPI:
8e44ddc3 PM	358	case H_IPOLL:
8e44ddc3 PM	359	case H_XIRR_X:
bc5ad3f3 BH	360	if (kvmppc_xics_enabled(vcpu))
	361	return kvmppc_h_pr_xics_hcall(vcpu, cmd);
	362	break;
8e591cb7 ME	363	case H_RTAS:
8e591cb7 ME	364	if (list_empty(&vcpu->kvm->arch.rtas_tokens))
ef1af2e2 PM	365	break;
	366	idx = srcu_read_lock(&vcpu->kvm->srcu);
	367	rc = kvmppc_rtas_hcall(vcpu);
	368	srcu_read_unlock(&vcpu->kvm->srcu, idx);
	369	if (rc)
8e591cb7 ME	370	break;
	371	kvmppc_set_gpr(vcpu, 3, 0);
	372	return EMULATE_DONE;
0254f074 AG	373	}
	374
	375	return EMULATE_FAIL;
	376	}
699a0ea0	377
ae2113a4 PM	378	int kvmppc_hcall_impl_pr(unsigned long cmd)
	379	{
	380	switch (cmd) {
	381	case H_ENTER:
	382	case H_REMOVE:
	383	case H_PROTECT:
	384	case H_BULK_REMOVE:
	385	case H_PUT_TCE:
	386	case H_CEDE:
99342cf8 DG	387	case H_LOGICAL_CI_LOAD:
99342cf8 DG	388	case H_LOGICAL_CI_STORE:
ae2113a4 PM	389	#ifdef CONFIG_KVM_XICS
	390	case H_XIRR:
	391	case H_CPPR:
	392	case H_EOI:
	393	case H_IPI:
	394	case H_IPOLL:
	395	case H_XIRR_X:
	396	#endif
	397	return 1;
	398	}
	399	return 0;
	400	}
699a0ea0 PM	401
	402	/*
	403	* List of hcall numbers to enable by default.
	404	* For compatibility with old userspace, we enable by default
	405	* all hcalls that were implemented before the hcall-enabling
	406	* facility was added. Note this list should not include H_RTAS.
	407	*/
	408	static unsigned int default_hcall_list[] = {
	409	H_ENTER,
	410	H_REMOVE,
	411	H_PROTECT,
	412	H_BULK_REMOVE,
	413	H_PUT_TCE,
	414	H_CEDE,
	415	#ifdef CONFIG_KVM_XICS
	416	H_XIRR,
	417	H_CPPR,
	418	H_EOI,
	419	H_IPI,
	420	H_IPOLL,
	421	H_XIRR_X,
	422	#endif
	423	0
	424	};
	425
	426	void kvmppc_pr_init_default_hcalls(struct kvm *kvm)
	427	{
	428	int i;
ae2113a4	429	unsigned int hcall;
699a0ea0	430
ae2113a4 PM	431	for (i = 0; default_hcall_list[i]; ++i) {
	432	hcall = default_hcall_list[i];
	433	WARN_ON(!kvmppc_hcall_impl_pr(hcall));
	434	__set_bit(hcall / 4, kvm->arch.enabled_hcalls);
	435	}
699a0ea0	436	}