[deliverable/linux.git] / arch / s390 / kvm / diag.c

/*
 * handling diagnose instructions
 *
 * Copyright IBM Corp. 2008, 2011
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License (version 2 only)
 * as published by the Free Software Foundation.
 *
 *    Author(s): Carsten Otte <cotte@de.ibm.com>
 *               Christian Borntraeger <borntraeger@de.ibm.com>
 */

#include <linux/kvm.h>
#include <linux/kvm_host.h>
#include "kvm-s390.h"

static int diag_release_pages(struct kvm_vcpu *vcpu)
{
	unsigned long start, end;
	unsigned long prefix  = vcpu->arch.sie_block->prefix;

	start = vcpu->run->s.regs.gprs[(vcpu->arch.sie_block->ipa & 0xf0) >> 4];
	end = vcpu->run->s.regs.gprs[vcpu->arch.sie_block->ipa & 0xf] + 4096;

	if (start & ~PAGE_MASK || end & ~PAGE_MASK || start > end
	    || start < 2 * PAGE_SIZE)
		return kvm_s390_inject_program_int(vcpu, PGM_SPECIFICATION);

	VCPU_EVENT(vcpu, 5, "diag release pages %lX %lX", start, end);
	vcpu->stat.diagnose_10++;

	/* we checked for start > end above */
	if (end < prefix || start >= prefix + 2 * PAGE_SIZE) {
		gmap_discard(start, end, vcpu->arch.gmap);
	} else {
		if (start < prefix)
			gmap_discard(start, prefix, vcpu->arch.gmap);
		if (end >= prefix)
			gmap_discard(prefix + 2 * PAGE_SIZE,
				     end, vcpu->arch.gmap);
	}
	return 0;
}

static int __diag_time_slice_end(struct kvm_vcpu *vcpu)
{
	VCPU_EVENT(vcpu, 5, "%s", "diag time slice end");
	vcpu->stat.diagnose_44++;
	kvm_vcpu_on_spin(vcpu);
	return 0;
}

static int __diag_time_slice_end_directed(struct kvm_vcpu *vcpu)
{
	struct kvm *kvm = vcpu->kvm;
	struct kvm_vcpu *tcpu;
	int tid;
	int i;

	tid = vcpu->run->s.regs.gprs[(vcpu->arch.sie_block->ipa & 0xf0) >> 4];
	vcpu->stat.diagnose_9c++;
	VCPU_EVENT(vcpu, 5, "diag time slice end directed to %d", tid);

	if (tid == vcpu->vcpu_id)
		return 0;

	kvm_for_each_vcpu(i, tcpu, kvm)
		if (tcpu->vcpu_id == tid) {
			kvm_vcpu_yield_to(tcpu);
			break;
		}

	return 0;
}

static int __diag_ipl_functions(struct kvm_vcpu *vcpu)
{
	unsigned int reg = vcpu->arch.sie_block->ipa & 0xf;
	unsigned long subcode = vcpu->run->s.regs.gprs[reg] & 0xffff;

	VCPU_EVENT(vcpu, 5, "diag ipl functions, subcode %lx", subcode);
	switch (subcode) {
	case 3:
		vcpu->run->s390_reset_flags = KVM_S390_RESET_CLEAR;
		break;
	case 4:
		vcpu->run->s390_reset_flags = 0;
		break;
	default:
		return -EOPNOTSUPP;
	}

	atomic_set_mask(CPUSTAT_STOPPED, &vcpu->arch.sie_block->cpuflags);
	vcpu->run->s390_reset_flags |= KVM_S390_RESET_SUBSYSTEM;
	vcpu->run->s390_reset_flags |= KVM_S390_RESET_IPL;
	vcpu->run->s390_reset_flags |= KVM_S390_RESET_CPU_INIT;
	vcpu->run->exit_reason = KVM_EXIT_S390_RESET;
	VCPU_EVENT(vcpu, 3, "requesting userspace resets %llx",
	  vcpu->run->s390_reset_flags);
	return -EREMOTE;
}

int kvm_s390_handle_diag(struct kvm_vcpu *vcpu)
{
	int code = (vcpu->arch.sie_block->ipb & 0xfff0000) >> 16;

	switch (code) {
	case 0x10:
		return diag_release_pages(vcpu);
	case 0x44:
		return __diag_time_slice_end(vcpu);
	case 0x9c:
		return __diag_time_slice_end_directed(vcpu);
	case 0x308:
		return __diag_ipl_functions(vcpu);
	default:
		return -EOPNOTSUPP;
	}
}
Commit	Line	Data
e28acfea	1	/*
a53c8fab	2	* handling diagnose instructions
e28acfea	3	*
a53c8fab	4	* Copyright IBM Corp. 2008, 2011
e28acfea CB	5	*
	6	* This program is free software; you can redistribute it and/or modify
	7	* it under the terms of the GNU General Public License (version 2 only)
	8	* as published by the Free Software Foundation.
	9	*
	10	* Author(s): Carsten Otte <cotte@de.ibm.com>
	11	* Christian Borntraeger <borntraeger@de.ibm.com>
	12	*/
	13
	14	#include <linux/kvm.h>
	15	#include <linux/kvm_host.h>
	16	#include "kvm-s390.h"
	17
388186bc CB	18	static int diag_release_pages(struct kvm_vcpu *vcpu)
	19	{
	20	unsigned long start, end;
	21	unsigned long prefix = vcpu->arch.sie_block->prefix;
	22
5a32c1af CB	23	start = vcpu->run->s.regs.gprs[(vcpu->arch.sie_block->ipa & 0xf0) >> 4];
5a32c1af CB	24	end = vcpu->run->s.regs.gprs[vcpu->arch.sie_block->ipa & 0xf] + 4096;
388186bc CB	25
	26	if (start & ~PAGE_MASK \|\| end & ~PAGE_MASK \|\| start > end
	27	\|\| start < 2 * PAGE_SIZE)
	28	return kvm_s390_inject_program_int(vcpu, PGM_SPECIFICATION);
	29
	30	VCPU_EVENT(vcpu, 5, "diag release pages %lX %lX", start, end);
	31	vcpu->stat.diagnose_10++;
	32
	33	/* we checked for start > end above */
	34	if (end < prefix \|\| start >= prefix + 2 * PAGE_SIZE) {
	35	gmap_discard(start, end, vcpu->arch.gmap);
	36	} else {
	37	if (start < prefix)
	38	gmap_discard(start, prefix, vcpu->arch.gmap);
	39	if (end >= prefix)
	40	gmap_discard(prefix + 2 * PAGE_SIZE,
	41	end, vcpu->arch.gmap);
	42	}
	43	return 0;
	44	}
	45
e28acfea CB	46	static int __diag_time_slice_end(struct kvm_vcpu *vcpu)
	47	{
	48	VCPU_EVENT(vcpu, 5, "%s", "diag time slice end");
	49	vcpu->stat.diagnose_44++;
8733ac36	50	kvm_vcpu_on_spin(vcpu);
e28acfea CB	51	return 0;
	52	}
	53
41628d33 KW	54	static int __diag_time_slice_end_directed(struct kvm_vcpu *vcpu)
	55	{
	56	struct kvm *kvm = vcpu->kvm;
	57	struct kvm_vcpu *tcpu;
	58	int tid;
	59	int i;
	60
	61	tid = vcpu->run->s.regs.gprs[(vcpu->arch.sie_block->ipa & 0xf0) >> 4];
	62	vcpu->stat.diagnose_9c++;
	63	VCPU_EVENT(vcpu, 5, "diag time slice end directed to %d", tid);
	64
	65	if (tid == vcpu->vcpu_id)
	66	return 0;
	67
	68	kvm_for_each_vcpu(i, tcpu, kvm)
	69	if (tcpu->vcpu_id == tid) {
	70	kvm_vcpu_yield_to(tcpu);
	71	break;
	72	}
	73
	74	return 0;
	75	}
	76
e28acfea CB	77	static int __diag_ipl_functions(struct kvm_vcpu *vcpu)
	78	{
	79	unsigned int reg = vcpu->arch.sie_block->ipa & 0xf;
5a32c1af	80	unsigned long subcode = vcpu->run->s.regs.gprs[reg] & 0xffff;
e28acfea CB	81
	82	VCPU_EVENT(vcpu, 5, "diag ipl functions, subcode %lx", subcode);
	83	switch (subcode) {
	84	case 3:
	85	vcpu->run->s390_reset_flags = KVM_S390_RESET_CLEAR;
	86	break;
	87	case 4:
	88	vcpu->run->s390_reset_flags = 0;
	89	break;
	90	default:
b8e660b8	91	return -EOPNOTSUPP;
e28acfea CB	92	}
e28acfea CB	93
9e6dabef	94	atomic_set_mask(CPUSTAT_STOPPED, &vcpu->arch.sie_block->cpuflags);
e28acfea CB	95	vcpu->run->s390_reset_flags \|= KVM_S390_RESET_SUBSYSTEM;
	96	vcpu->run->s390_reset_flags \|= KVM_S390_RESET_IPL;
	97	vcpu->run->s390_reset_flags \|= KVM_S390_RESET_CPU_INIT;
	98	vcpu->run->exit_reason = KVM_EXIT_S390_RESET;
33e19115	99	VCPU_EVENT(vcpu, 3, "requesting userspace resets %llx",
e28acfea CB	100	vcpu->run->s390_reset_flags);
	101	return -EREMOTE;
	102	}
	103
	104	int kvm_s390_handle_diag(struct kvm_vcpu *vcpu)
	105	{
	106	int code = (vcpu->arch.sie_block->ipb & 0xfff0000) >> 16;
	107
	108	switch (code) {
388186bc CB	109	case 0x10:
388186bc CB	110	return diag_release_pages(vcpu);
e28acfea CB	111	case 0x44:
e28acfea CB	112	return __diag_time_slice_end(vcpu);
41628d33 KW	113	case 0x9c:
41628d33 KW	114	return __diag_time_slice_end_directed(vcpu);
e28acfea CB	115	case 0x308:
	116	return __diag_ipl_functions(vcpu);
	117	default:
b8e660b8	118	return -EOPNOTSUPP;
e28acfea CB	119	}
e28acfea CB	120	}