arch/s390/kvm/intercept.c

   1 /*
   2  * intercept.c - in-kernel handling for sie intercepts
   3  *
   4  * Copyright IBM Corp. 2008
   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_host.h>
  15 #include <linux/errno.h>
  16 #include <linux/pagemap.h>
  17
  18 #include <asm/kvm_host.h>
  19
  20 #include "kvm-s390.h"
  21 #include "gaccess.h"
  22
  23 static int handle_lctlg(struct kvm_vcpu *vcpu)
  24 {
  25         int reg1 = (vcpu->arch.sie_block->ipa & 0x00f0) >> 4;
  26         int reg3 = vcpu->arch.sie_block->ipa & 0x000f;
  27         int base2 = vcpu->arch.sie_block->ipb >> 28;
  28         int disp2 = ((vcpu->arch.sie_block->ipb & 0x0fff0000) >> 16) +
  29                         ((vcpu->arch.sie_block->ipb & 0xff00) << 4);
  30         u64 useraddr;
  31         int reg, rc;
  32
  33         vcpu->stat.instruction_lctlg++;
  34         if ((vcpu->arch.sie_block->ipb & 0xff) != 0x2f)
  35                 return -ENOTSUPP;
  36
  37         useraddr = disp2;
  38         if (base2)
  39                 useraddr += vcpu->arch.guest_gprs[base2];
  40
  41         if (useraddr & 7)
  42                 return kvm_s390_inject_program_int(vcpu, PGM_SPECIFICATION);
  43
  44         reg = reg1;
  45
  46         VCPU_EVENT(vcpu, 5, "lctlg r1:%x, r3:%x,b2:%x,d2:%x", reg1, reg3, base2,
  47                    disp2);
  48
  49         do {
  50                 rc = get_guest_u64(vcpu, useraddr,
  51                                    &vcpu->arch.sie_block->gcr[reg]);
  52                 if (rc == -EFAULT) {
  53                         kvm_s390_inject_program_int(vcpu, PGM_ADDRESSING);
  54                         break;
  55                 }
  56                 useraddr += 8;
  57                 if (reg == reg3)
  58                         break;
  59                 reg = (reg + 1) % 16;
  60         } while (1);
  61         return 0;
  62 }
  63
  64 static int handle_lctl(struct kvm_vcpu *vcpu)
  65 {
  66         int reg1 = (vcpu->arch.sie_block->ipa & 0x00f0) >> 4;
  67         int reg3 = vcpu->arch.sie_block->ipa & 0x000f;
  68         int base2 = vcpu->arch.sie_block->ipb >> 28;
  69         int disp2 = ((vcpu->arch.sie_block->ipb & 0x0fff0000) >> 16);
  70         u64 useraddr;
  71         u32 val = 0;
  72         int reg, rc;
  73
  74         vcpu->stat.instruction_lctl++;
  75
  76         useraddr = disp2;
  77         if (base2)
  78                 useraddr += vcpu->arch.guest_gprs[base2];
  79
  80         if (useraddr & 3)
  81                 return kvm_s390_inject_program_int(vcpu, PGM_SPECIFICATION);
  82
  83         VCPU_EVENT(vcpu, 5, "lctl r1:%x, r3:%x,b2:%x,d2:%x", reg1, reg3, base2,
  84                    disp2);
  85
  86         reg = reg1;
  87         do {
  88                 rc = get_guest_u32(vcpu, useraddr, &val);
  89                 if (rc == -EFAULT) {
  90                         kvm_s390_inject_program_int(vcpu, PGM_ADDRESSING);
  91                         break;
  92                 }
  93                 vcpu->arch.sie_block->gcr[reg] &= 0xffffffff00000000ul;
  94                 vcpu->arch.sie_block->gcr[reg] |= val;
  95                 useraddr += 4;
  96                 if (reg == reg3)
  97                         break;
  98                 reg = (reg + 1) % 16;
  99         } while (1);
 100         return 0;
 101 }
 102
 103 static intercept_handler_t instruction_handlers[256] = {
 104         [0x83] = kvm_s390_handle_diag,
 105         [0xae] = kvm_s390_handle_sigp,
 106         [0xb2] = kvm_s390_handle_b2,
 107         [0xb7] = handle_lctl,
 108         [0xeb] = handle_lctlg,
 109 };
 110
 111 static int handle_noop(struct kvm_vcpu *vcpu)
 112 {
 113         switch (vcpu->arch.sie_block->icptcode) {
 114         case 0x0:
 115                 vcpu->stat.exit_null++;
 116                 break;
 117         case 0x10:
 118                 vcpu->stat.exit_external_request++;
 119                 break;
 120         case 0x14:
 121                 vcpu->stat.exit_external_interrupt++;
 122                 break;
 123         default:
 124                 break; /* nothing */
 125         }
 126         return 0;
 127 }
 128
 129 static int handle_stop(struct kvm_vcpu *vcpu)
 130 {
 131         int rc;
 132
 133         vcpu->stat.exit_stop_request++;
 134         atomic_clear_mask(CPUSTAT_RUNNING, &vcpu->arch.sie_block->cpuflags);
 135         spin_lock_bh(&vcpu->arch.local_int.lock);
 136         if (vcpu->arch.local_int.action_bits & ACTION_STORE_ON_STOP) {
 137                 vcpu->arch.local_int.action_bits &= ~ACTION_STORE_ON_STOP;
 138                 rc = __kvm_s390_vcpu_store_status(vcpu,
 139                                                   KVM_S390_STORE_STATUS_NOADDR);
 140                 if (rc >= 0)
 141                         rc = -ENOTSUPP;
 142         }
 143
 144         if (vcpu->arch.local_int.action_bits & ACTION_STOP_ON_STOP) {
 145                 vcpu->arch.local_int.action_bits &= ~ACTION_STOP_ON_STOP;
 146                 VCPU_EVENT(vcpu, 3, "%s", "cpu stopped");
 147                 rc = -ENOTSUPP;
 148         } else
 149                 rc = 0;
 150         spin_unlock_bh(&vcpu->arch.local_int.lock);
 151         return rc;
 152 }
 153
 154 static int handle_validity(struct kvm_vcpu *vcpu)
 155 {
 156         int viwhy = vcpu->arch.sie_block->ipb >> 16;
 157         int rc;
 158
 159         vcpu->stat.exit_validity++;
 160         if ((viwhy == 0x37) && (vcpu->arch.sie_block->prefix
 161                 <= vcpu->kvm->arch.guest_memsize - 2*PAGE_SIZE)){
 162                 rc = fault_in_pages_writeable((char __user *)
 163                          vcpu->kvm->arch.guest_origin +
 164                          vcpu->arch.sie_block->prefix,
 165                          2*PAGE_SIZE);
 166                 if (rc)
 167                         /* user will receive sigsegv, exit to user */
 168                         rc = -ENOTSUPP;
 169         } else
 170                 rc = -ENOTSUPP;
 171
 172         if (rc)
 173                 VCPU_EVENT(vcpu, 2, "unhandled validity intercept code %d",
 174                            viwhy);
 175         return rc;
 176 }
 177
 178 static int handle_instruction(struct kvm_vcpu *vcpu)
 179 {
 180         intercept_handler_t handler;
 181
 182         vcpu->stat.exit_instruction++;
 183         handler = instruction_handlers[vcpu->arch.sie_block->ipa >> 8];
 184         if (handler)
 185                 return handler(vcpu);
 186         return -ENOTSUPP;
 187 }
 188
 189 static int handle_prog(struct kvm_vcpu *vcpu)
 190 {
 191         vcpu->stat.exit_program_interruption++;
 192         return kvm_s390_inject_program_int(vcpu, vcpu->arch.sie_block->iprcc);
 193 }
 194
 195 static int handle_instruction_and_prog(struct kvm_vcpu *vcpu)
 196 {
 197         int rc, rc2;
 198
 199         vcpu->stat.exit_instr_and_program++;
 200         rc = handle_instruction(vcpu);
 201         rc2 = handle_prog(vcpu);
 202
 203         if (rc == -ENOTSUPP)
 204                 vcpu->arch.sie_block->icptcode = 0x04;
 205         if (rc)
 206                 return rc;
 207         return rc2;
 208 }
 209
 210 static const intercept_handler_t intercept_funcs[0x48 >> 2] = {
 211         [0x00 >> 2] = handle_noop,
 212         [0x04 >> 2] = handle_instruction,
 213         [0x08 >> 2] = handle_prog,
 214         [0x0C >> 2] = handle_instruction_and_prog,
 215         [0x10 >> 2] = handle_noop,
 216         [0x14 >> 2] = handle_noop,
 217         [0x1C >> 2] = kvm_s390_handle_wait,
 218         [0x20 >> 2] = handle_validity,
 219         [0x28 >> 2] = handle_stop,
 220 };
 221
 222 int kvm_handle_sie_intercept(struct kvm_vcpu *vcpu)
 223 {
 224         intercept_handler_t func;
 225         u8 code = vcpu->arch.sie_block->icptcode;
 226
 227         if (code & 3 || code > 0x48)
 228                 return -ENOTSUPP;
 229         func = intercept_funcs[code >> 2];
 230         if (func)
 231                 return func(vcpu);
 232         return -ENOTSUPP;
 233 }