[linux-2.6-block.git] / virt / kvm / arm / vgic-v2.c

/*
 * Copyright (C) 2012,2013 ARM Limited, All Rights Reserved.
 * Author: Marc Zyngier <marc.zyngier@arm.com>
 *
 * 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, see <http://www.gnu.org/licenses/>.
 */

#include <linux/cpu.h>
#include <linux/kvm.h>
#include <linux/kvm_host.h>
#include <linux/interrupt.h>
#include <linux/io.h>
#include <linux/of.h>
#include <linux/of_address.h>
#include <linux/of_irq.h>

#include <linux/irqchip/arm-gic.h>

#include <asm/kvm_emulate.h>
#include <asm/kvm_arm.h>
#include <asm/kvm_mmu.h>

static struct vgic_lr vgic_v2_get_lr(const struct kvm_vcpu *vcpu, int lr)
{
	struct vgic_lr lr_desc;
	u32 val = vcpu->arch.vgic_cpu.vgic_v2.vgic_lr[lr];

	lr_desc.irq	= val & GICH_LR_VIRTUALID;
	if (lr_desc.irq <= 15)
		lr_desc.source	= (val >> GICH_LR_PHYSID_CPUID_SHIFT) & 0x7;
	else
		lr_desc.source = 0;
	lr_desc.state	= 0;

	if (val & GICH_LR_PENDING_BIT)
		lr_desc.state |= LR_STATE_PENDING;
	if (val & GICH_LR_ACTIVE_BIT)
		lr_desc.state |= LR_STATE_ACTIVE;
	if (val & GICH_LR_EOI)
		lr_desc.state |= LR_EOI_INT;

	return lr_desc;
}

static void vgic_v2_set_lr(struct kvm_vcpu *vcpu, int lr,
			   struct vgic_lr lr_desc)
{
	u32 lr_val = (lr_desc.source << GICH_LR_PHYSID_CPUID_SHIFT) | lr_desc.irq;

	if (lr_desc.state & LR_STATE_PENDING)
		lr_val |= GICH_LR_PENDING_BIT;
	if (lr_desc.state & LR_STATE_ACTIVE)
		lr_val |= GICH_LR_ACTIVE_BIT;
	if (lr_desc.state & LR_EOI_INT)
		lr_val |= GICH_LR_EOI;

	vcpu->arch.vgic_cpu.vgic_v2.vgic_lr[lr] = lr_val;
}

static void vgic_v2_sync_lr_elrsr(struct kvm_vcpu *vcpu, int lr,
				  struct vgic_lr lr_desc)
{
	if (!(lr_desc.state & LR_STATE_MASK))
		vcpu->arch.vgic_cpu.vgic_v2.vgic_elrsr |= (1ULL << lr);
	else
		vcpu->arch.vgic_cpu.vgic_v2.vgic_elrsr &= ~(1ULL << lr);
}

static u64 vgic_v2_get_elrsr(const struct kvm_vcpu *vcpu)
{
	return vcpu->arch.vgic_cpu.vgic_v2.vgic_elrsr;
}

static u64 vgic_v2_get_eisr(const struct kvm_vcpu *vcpu)
{
	return vcpu->arch.vgic_cpu.vgic_v2.vgic_eisr;
}

static void vgic_v2_clear_eisr(struct kvm_vcpu *vcpu)
{
	vcpu->arch.vgic_cpu.vgic_v2.vgic_eisr = 0;
}

static u32 vgic_v2_get_interrupt_status(const struct kvm_vcpu *vcpu)
{
	u32 misr = vcpu->arch.vgic_cpu.vgic_v2.vgic_misr;
	u32 ret = 0;

	if (misr & GICH_MISR_EOI)
		ret |= INT_STATUS_EOI;
	if (misr & GICH_MISR_U)
		ret |= INT_STATUS_UNDERFLOW;

	return ret;
}

static void vgic_v2_enable_underflow(struct kvm_vcpu *vcpu)
{
	vcpu->arch.vgic_cpu.vgic_v2.vgic_hcr |= GICH_HCR_UIE;
}

static void vgic_v2_disable_underflow(struct kvm_vcpu *vcpu)
{
	vcpu->arch.vgic_cpu.vgic_v2.vgic_hcr &= ~GICH_HCR_UIE;
}

static void vgic_v2_get_vmcr(struct kvm_vcpu *vcpu, struct vgic_vmcr *vmcrp)
{
	u32 vmcr = vcpu->arch.vgic_cpu.vgic_v2.vgic_vmcr;

	vmcrp->ctlr = (vmcr & GICH_VMCR_CTRL_MASK) >> GICH_VMCR_CTRL_SHIFT;
	vmcrp->abpr = (vmcr & GICH_VMCR_ALIAS_BINPOINT_MASK) >> GICH_VMCR_ALIAS_BINPOINT_SHIFT;
	vmcrp->bpr  = (vmcr & GICH_VMCR_BINPOINT_MASK) >> GICH_VMCR_BINPOINT_SHIFT;
	vmcrp->pmr  = (vmcr & GICH_VMCR_PRIMASK_MASK) >> GICH_VMCR_PRIMASK_SHIFT;
}

static void vgic_v2_set_vmcr(struct kvm_vcpu *vcpu, struct vgic_vmcr *vmcrp)
{
	u32 vmcr;

	vmcr  = (vmcrp->ctlr << GICH_VMCR_CTRL_SHIFT) & GICH_VMCR_CTRL_MASK;
	vmcr |= (vmcrp->abpr << GICH_VMCR_ALIAS_BINPOINT_SHIFT) & GICH_VMCR_ALIAS_BINPOINT_MASK;
	vmcr |= (vmcrp->bpr << GICH_VMCR_BINPOINT_SHIFT) & GICH_VMCR_BINPOINT_MASK;
	vmcr |= (vmcrp->pmr << GICH_VMCR_PRIMASK_SHIFT) & GICH_VMCR_PRIMASK_MASK;

	vcpu->arch.vgic_cpu.vgic_v2.vgic_vmcr = vmcr;
}

static void vgic_v2_enable(struct kvm_vcpu *vcpu)
{
	/*
	 * By forcing VMCR to zero, the GIC will restore the binary
	 * points to their reset values. Anything else resets to zero
	 * anyway.
	 */
	vcpu->arch.vgic_cpu.vgic_v2.vgic_vmcr = 0;

	/* Get the show on the road... */
	vcpu->arch.vgic_cpu.vgic_v2.vgic_hcr = GICH_HCR_EN;
}

static const struct vgic_ops vgic_v2_ops = {
	.get_lr			= vgic_v2_get_lr,
	.set_lr			= vgic_v2_set_lr,
	.sync_lr_elrsr		= vgic_v2_sync_lr_elrsr,
	.get_elrsr		= vgic_v2_get_elrsr,
	.get_eisr		= vgic_v2_get_eisr,
	.clear_eisr		= vgic_v2_clear_eisr,
	.get_interrupt_status	= vgic_v2_get_interrupt_status,
	.enable_underflow	= vgic_v2_enable_underflow,
	.disable_underflow	= vgic_v2_disable_underflow,
	.get_vmcr		= vgic_v2_get_vmcr,
	.set_vmcr		= vgic_v2_set_vmcr,
	.enable			= vgic_v2_enable,
};

static struct vgic_params vgic_v2_params;

/**
 * vgic_v2_probe - probe for a GICv2 compatible interrupt controller in DT
 * @node:	pointer to the DT node
 * @ops: 	address of a pointer to the GICv2 operations
 * @params:	address of a pointer to HW-specific parameters
 *
 * Returns 0 if a GICv2 has been found, with the low level operations
 * in *ops and the HW parameters in *params. Returns an error code
 * otherwise.
 */
int vgic_v2_probe(struct device_node *vgic_node,
		  const struct vgic_ops **ops,
		  const struct vgic_params **params)
{
	int ret;
	struct resource vctrl_res;
	struct resource vcpu_res;
	struct vgic_params *vgic = &vgic_v2_params;

	vgic->maint_irq = irq_of_parse_and_map(vgic_node, 0);
	if (!vgic->maint_irq) {
		kvm_err("error getting vgic maintenance irq from DT\n");
		ret = -ENXIO;
		goto out;
	}

	ret = of_address_to_resource(vgic_node, 2, &vctrl_res);
	if (ret) {
		kvm_err("Cannot obtain GICH resource\n");
		goto out;
	}

	vgic->vctrl_base = of_iomap(vgic_node, 2);
	if (!vgic->vctrl_base) {
		kvm_err("Cannot ioremap GICH\n");
		ret = -ENOMEM;
		goto out;
	}

	vgic->nr_lr = readl_relaxed(vgic->vctrl_base + GICH_VTR);
	vgic->nr_lr = (vgic->nr_lr & 0x3f) + 1;

	ret = create_hyp_io_mappings(vgic->vctrl_base,
				     vgic->vctrl_base + resource_size(&vctrl_res),
				     vctrl_res.start);
	if (ret) {
		kvm_err("Cannot map VCTRL into hyp\n");
		goto out_unmap;
	}

	if (of_address_to_resource(vgic_node, 3, &vcpu_res)) {
		kvm_err("Cannot obtain GICV resource\n");
		ret = -ENXIO;
		goto out_unmap;
	}

	if (!PAGE_ALIGNED(vcpu_res.start)) {
		kvm_err("GICV physical address 0x%llx not page aligned\n",
			(unsigned long long)vcpu_res.start);
		ret = -ENXIO;
		goto out_unmap;
	}

	if (!PAGE_ALIGNED(resource_size(&vcpu_res))) {
		kvm_err("GICV size 0x%llx not a multiple of page size 0x%lx\n",
			(unsigned long long)resource_size(&vcpu_res),
			PAGE_SIZE);
		ret = -ENXIO;
		goto out_unmap;
	}

	vgic->can_emulate_gicv2 = true;
	kvm_register_device_ops(&kvm_arm_vgic_v2_ops, KVM_DEV_TYPE_ARM_VGIC_V2);

	vgic->vcpu_base = vcpu_res.start;

	kvm_info("%s@%llx IRQ%d\n", vgic_node->name,
		 vctrl_res.start, vgic->maint_irq);

	vgic->type = VGIC_V2;
	vgic->max_gic_vcpus = VGIC_V2_MAX_CPUS;
	*ops = &vgic_v2_ops;
	*params = vgic;
	goto out;

out_unmap:
	iounmap(vgic->vctrl_base);
out:
	of_node_put(vgic_node);
	return ret;
}
Commit	Line	Data
8f186d52 MZ	1	/*
	2	* Copyright (C) 2012,2013 ARM Limited, All Rights Reserved.
	3	* Author: Marc Zyngier <marc.zyngier@arm.com>
	4	*
	5	* This program is free software; you can redistribute it and/or modify
	6	* it under the terms of the GNU General Public License version 2 as
	7	* published by the Free Software Foundation.
	8	*
	9	* This program is distributed in the hope that it will be useful,
	10	* but WITHOUT ANY WARRANTY; without even the implied warranty of
	11	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	12	* GNU General Public License for more details.
	13	*
	14	* You should have received a copy of the GNU General Public License
	15	* along with this program. If not, see <http://www.gnu.org/licenses/>.
	16	*/
	17
	18	#include <linux/cpu.h>
	19	#include <linux/kvm.h>
	20	#include <linux/kvm_host.h>
	21	#include <linux/interrupt.h>
	22	#include <linux/io.h>
	23	#include <linux/of.h>
	24	#include <linux/of_address.h>
	25	#include <linux/of_irq.h>
	26
	27	#include <linux/irqchip/arm-gic.h>
	28
	29	#include <asm/kvm_emulate.h>
	30	#include <asm/kvm_arm.h>
	31	#include <asm/kvm_mmu.h>
	32
	33	static struct vgic_lr vgic_v2_get_lr(const struct kvm_vcpu *vcpu, int lr)
	34	{
	35	struct vgic_lr lr_desc;
	36	u32 val = vcpu->arch.vgic_cpu.vgic_v2.vgic_lr[lr];
	37
	38	lr_desc.irq = val & GICH_LR_VIRTUALID;
	39	if (lr_desc.irq <= 15)
	40	lr_desc.source = (val >> GICH_LR_PHYSID_CPUID_SHIFT) & 0x7;
	41	else
	42	lr_desc.source = 0;
	43	lr_desc.state = 0;
	44
	45	if (val & GICH_LR_PENDING_BIT)
	46	lr_desc.state \|= LR_STATE_PENDING;
	47	if (val & GICH_LR_ACTIVE_BIT)
	48	lr_desc.state \|= LR_STATE_ACTIVE;
	49	if (val & GICH_LR_EOI)
	50	lr_desc.state \|= LR_EOI_INT;
	51
	52	return lr_desc;
	53	}
	54
	55	static void vgic_v2_set_lr(struct kvm_vcpu *vcpu, int lr,
	56	struct vgic_lr lr_desc)
	57	{
	58	u32 lr_val = (lr_desc.source << GICH_LR_PHYSID_CPUID_SHIFT) \| lr_desc.irq;
	59
	60	if (lr_desc.state & LR_STATE_PENDING)
	61	lr_val \|= GICH_LR_PENDING_BIT;
	62	if (lr_desc.state & LR_STATE_ACTIVE)
	63	lr_val \|= GICH_LR_ACTIVE_BIT;
	64	if (lr_desc.state & LR_EOI_INT)
65	lr_val \|= GICH_LR_EOI;
66
67	vcpu->arch.vgic_cpu.vgic_v2.vgic_lr[lr] = lr_val;
68	}
69
70	static void vgic_v2_sync_lr_elrsr(struct kvm_vcpu *vcpu, int lr,
71	struct vgic_lr lr_desc)
72	{
73	if (!(lr_desc.state & LR_STATE_MASK))
2df36a5d	74	vcpu->arch.vgic_cpu.vgic_v2.vgic_elrsr \|= (1ULL << lr);
ae705930 CD	75	else
ae705930 CD	76	vcpu->arch.vgic_cpu.vgic_v2.vgic_elrsr &= ~(1ULL << lr);
8f186d52 MZ	77	}
	78
	79	static u64 vgic_v2_get_elrsr(const struct kvm_vcpu *vcpu)
	80	{
2df36a5d	81	return vcpu->arch.vgic_cpu.vgic_v2.vgic_elrsr;
8f186d52 MZ	82	}
	83
	84	static u64 vgic_v2_get_eisr(const struct kvm_vcpu *vcpu)
	85	{
2df36a5d	86	return vcpu->arch.vgic_cpu.vgic_v2.vgic_eisr;
8f186d52 MZ	87	}
8f186d52 MZ	88
ae705930 CD	89	static void vgic_v2_clear_eisr(struct kvm_vcpu *vcpu)
	90	{
	91	vcpu->arch.vgic_cpu.vgic_v2.vgic_eisr = 0;
	92	}
	93
8f186d52 MZ	94	static u32 vgic_v2_get_interrupt_status(const struct kvm_vcpu *vcpu)
	95	{
	96	u32 misr = vcpu->arch.vgic_cpu.vgic_v2.vgic_misr;
	97	u32 ret = 0;
	98
	99	if (misr & GICH_MISR_EOI)
	100	ret \|= INT_STATUS_EOI;
	101	if (misr & GICH_MISR_U)
	102	ret \|= INT_STATUS_UNDERFLOW;
	103
	104	return ret;
	105	}
	106
	107	static void vgic_v2_enable_underflow(struct kvm_vcpu *vcpu)
	108	{
	109	vcpu->arch.vgic_cpu.vgic_v2.vgic_hcr \|= GICH_HCR_UIE;
	110	}
	111
	112	static void vgic_v2_disable_underflow(struct kvm_vcpu *vcpu)
	113	{
	114	vcpu->arch.vgic_cpu.vgic_v2.vgic_hcr &= ~GICH_HCR_UIE;
	115	}
	116
	117	static void vgic_v2_get_vmcr(struct kvm_vcpu vcpu, struct vgic_vmcr vmcrp)
	118	{
	119	u32 vmcr = vcpu->arch.vgic_cpu.vgic_v2.vgic_vmcr;
	120
	121	vmcrp->ctlr = (vmcr & GICH_VMCR_CTRL_MASK) >> GICH_VMCR_CTRL_SHIFT;
	122	vmcrp->abpr = (vmcr & GICH_VMCR_ALIAS_BINPOINT_MASK) >> GICH_VMCR_ALIAS_BINPOINT_SHIFT;
	123	vmcrp->bpr = (vmcr & GICH_VMCR_BINPOINT_MASK) >> GICH_VMCR_BINPOINT_SHIFT;
	124	vmcrp->pmr = (vmcr & GICH_VMCR_PRIMASK_MASK) >> GICH_VMCR_PRIMASK_SHIFT;
	125	}
	126
	127	static void vgic_v2_set_vmcr(struct kvm_vcpu vcpu, struct vgic_vmcr vmcrp)
	128	{
	129	u32 vmcr;
	130
	131	vmcr = (vmcrp->ctlr << GICH_VMCR_CTRL_SHIFT) & GICH_VMCR_CTRL_MASK;
	132	vmcr \|= (vmcrp->abpr << GICH_VMCR_ALIAS_BINPOINT_SHIFT) & GICH_VMCR_ALIAS_BINPOINT_MASK;
	133	vmcr \|= (vmcrp->bpr << GICH_VMCR_BINPOINT_SHIFT) & GICH_VMCR_BINPOINT_MASK;
	134	vmcr \|= (vmcrp->pmr << GICH_VMCR_PRIMASK_SHIFT) & GICH_VMCR_PRIMASK_MASK;
	135
	136	vcpu->arch.vgic_cpu.vgic_v2.vgic_vmcr = vmcr;
	137	}
	138
	139	static void vgic_v2_enable(struct kvm_vcpu *vcpu)
	140	{
	141	/*
	142	* By forcing VMCR to zero, the GIC will restore the binary
	143	* points to their reset values. Anything else resets to zero
	144	* anyway.
	145	*/
	146	vcpu->arch.vgic_cpu.vgic_v2.vgic_vmcr = 0;
	147
	148	/* Get the show on the road... */
	149	vcpu->arch.vgic_cpu.vgic_v2.vgic_hcr = GICH_HCR_EN;
	150	}
	151
	152	static const struct vgic_ops vgic_v2_ops = {
	153	.get_lr = vgic_v2_get_lr,
	154	.set_lr = vgic_v2_set_lr,
	155	.sync_lr_elrsr = vgic_v2_sync_lr_elrsr,
	156	.get_elrsr = vgic_v2_get_elrsr,
	157	.get_eisr = vgic_v2_get_eisr,
ae705930	158	.clear_eisr = vgic_v2_clear_eisr,
8f186d52 MZ	159	.get_interrupt_status = vgic_v2_get_interrupt_status,
	160	.enable_underflow = vgic_v2_enable_underflow,
	161	.disable_underflow = vgic_v2_disable_underflow,
	162	.get_vmcr = vgic_v2_get_vmcr,
	163	.set_vmcr = vgic_v2_set_vmcr,
	164	.enable = vgic_v2_enable,
	165	};
	166
	167	static struct vgic_params vgic_v2_params;
	168
	169	/**
	170	* vgic_v2_probe - probe for a GICv2 compatible interrupt controller in DT
	171	* @node: pointer to the DT node
	172	* @ops: address of a pointer to the GICv2 operations
	173	* @params: address of a pointer to HW-specific parameters
	174	*
	175	* Returns 0 if a GICv2 has been found, with the low level operations
	176	* in ops and the HW parameters in params. Returns an error code
	177	* otherwise.
	178	*/
	179	int vgic_v2_probe(struct device_node *vgic_node,
	180	const struct vgic_ops **ops,
	181	const struct vgic_params **params)
	182	{
	183	int ret;
	184	struct resource vctrl_res;
	185	struct resource vcpu_res;
	186	struct vgic_params *vgic = &vgic_v2_params;
	187
	188	vgic->maint_irq = irq_of_parse_and_map(vgic_node, 0);
	189	if (!vgic->maint_irq) {
	190	kvm_err("error getting vgic maintenance irq from DT\n");
	191	ret = -ENXIO;
	192	goto out;
	193	}
	194
	195	ret = of_address_to_resource(vgic_node, 2, &vctrl_res);
	196	if (ret) {
	197	kvm_err("Cannot obtain GICH resource\n");
	198	goto out;
	199	}
	200
	201	vgic->vctrl_base = of_iomap(vgic_node, 2);
	202	if (!vgic->vctrl_base) {
	203	kvm_err("Cannot ioremap GICH\n");
	204	ret = -ENOMEM;
	205	goto out;
	206	}
	207
	208	vgic->nr_lr = readl_relaxed(vgic->vctrl_base + GICH_VTR);
	209	vgic->nr_lr = (vgic->nr_lr & 0x3f) + 1;
	210
	211	ret = create_hyp_io_mappings(vgic->vctrl_base,
	212	vgic->vctrl_base + resource_size(&vctrl_res),
	213	vctrl_res.start);
	214	if (ret) {
	215	kvm_err("Cannot map VCTRL into hyp\n");
	216	goto out_unmap;
	217	}
	218
	219	if (of_address_to_resource(vgic_node, 3, &vcpu_res)) {
	220	kvm_err("Cannot obtain GICV resource\n");
	221	ret = -ENXIO;
	222	goto out_unmap;
223	}
5d576866 PB	224
	225	if (!PAGE_ALIGNED(vcpu_res.start)) {
	226	kvm_err("GICV physical address 0x%llx not page aligned\n",
	227	(unsigned long long)vcpu_res.start);
	228	ret = -ENXIO;
	229	goto out_unmap;
	230	}
	231
	232	if (!PAGE_ALIGNED(resource_size(&vcpu_res))) {
	233	kvm_err("GICV size 0x%llx not a multiple of page size 0x%lx\n",
	234	(unsigned long long)resource_size(&vcpu_res),
	235	PAGE_SIZE);
	236	ret = -ENXIO;
	237	goto out_unmap;
	238	}
	239
b5d84ff6	240	vgic->can_emulate_gicv2 = true;
ea2f83a7 AP	241	kvm_register_device_ops(&kvm_arm_vgic_v2_ops, KVM_DEV_TYPE_ARM_VGIC_V2);
ea2f83a7 AP	242
8f186d52 MZ	243	vgic->vcpu_base = vcpu_res.start;
	244
	245	kvm_info("%s@%llx IRQ%d\n", vgic_node->name,
	246	vctrl_res.start, vgic->maint_irq);
	247
1a9b1305	248	vgic->type = VGIC_V2;
3caa2d8c	249	vgic->max_gic_vcpus = VGIC_V2_MAX_CPUS;
8f186d52 MZ	250	*ops = &vgic_v2_ops;
	251	*params = vgic;
	252	goto out;
	253
	254	out_unmap:
	255	iounmap(vgic->vctrl_base);
	256	out:
	257	of_node_put(vgic_node);
	258	return ret;
	259	}