arch/powerpc/kvm/e500_emulate.c

   1 /*
   2  * Copyright (C) 2008-2011 Freescale Semiconductor, Inc. All rights reserved.
   3  *
   4  * Author: Yu Liu, <yu.liu@freescale.com>
   5  *
   6  * Description:
   7  * This file is derived from arch/powerpc/kvm/44x_emulate.c,
   8  * by Hollis Blanchard <hollisb@us.ibm.com>.
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License, version 2, as
  12  * published by the Free Software Foundation.
  13  */
  14
  15 #include <asm/kvm_ppc.h>
  16 #include <asm/disassemble.h>
  17 #include <asm/dbell.h>
  18
  19 #include "booke.h"
  20 #include "e500.h"
  21
  22 #define XOP_DCBTLS  166
  23 #define XOP_MSGSND  206
  24 #define XOP_MSGCLR  238
  25 #define XOP_TLBIVAX 786
  26 #define XOP_TLBSX   914
  27 #define XOP_TLBRE   946
  28 #define XOP_TLBWE   978
  29 #define XOP_TLBILX  18
  30 #define XOP_EHPRIV  270
  31
  32 #ifdef CONFIG_KVM_E500MC
  33 static int dbell2prio(ulong param)
  34 {
  35         int msg = param & PPC_DBELL_TYPE_MASK;
  36         int prio = -1;
  37
  38         switch (msg) {
  39         case PPC_DBELL_TYPE(PPC_DBELL):
  40                 prio = BOOKE_IRQPRIO_DBELL;
  41                 break;
  42         case PPC_DBELL_TYPE(PPC_DBELL_CRIT):
  43                 prio = BOOKE_IRQPRIO_DBELL_CRIT;
  44                 break;
  45         default:
  46                 break;
  47         }
  48
  49         return prio;
  50 }
  51
  52 static int kvmppc_e500_emul_msgclr(struct kvm_vcpu *vcpu, int rb)
  53 {
  54         ulong param = vcpu->arch.gpr[rb];
  55         int prio = dbell2prio(param);
  56
  57         if (prio < 0)
  58                 return EMULATE_FAIL;
  59
  60         clear_bit(prio, &vcpu->arch.pending_exceptions);
  61         return EMULATE_DONE;
  62 }
  63
  64 static int kvmppc_e500_emul_msgsnd(struct kvm_vcpu *vcpu, int rb)
  65 {
  66         ulong param = vcpu->arch.gpr[rb];
  67         int prio = dbell2prio(rb);
  68         int pir = param & PPC_DBELL_PIR_MASK;
  69         int i;
  70         struct kvm_vcpu *cvcpu;
  71
  72         if (prio < 0)
  73                 return EMULATE_FAIL;
  74
  75         kvm_for_each_vcpu(i, cvcpu, vcpu->kvm) {
  76                 int cpir = cvcpu->arch.shared->pir;
  77                 if ((param & PPC_DBELL_MSG_BRDCAST) || (cpir == pir)) {
  78                         set_bit(prio, &cvcpu->arch.pending_exceptions);
  79                         kvm_vcpu_kick(cvcpu);
  80                 }
  81         }
  82
  83         return EMULATE_DONE;
  84 }
  85 #endif
  86
  87 static int kvmppc_e500_emul_ehpriv(struct kvm_run *run, struct kvm_vcpu *vcpu,
  88                                    unsigned int inst, int *advance)
  89 {
  90         int emulated = EMULATE_DONE;
  91
  92         switch (get_oc(inst)) {
  93         case EHPRIV_OC_DEBUG:
  94                 run->exit_reason = KVM_EXIT_DEBUG;
  95                 run->debug.arch.address = vcpu->arch.pc;
  96                 run->debug.arch.status = 0;
  97                 kvmppc_account_exit(vcpu, DEBUG_EXITS);
  98                 emulated = EMULATE_EXIT_USER;
  99                 *advance = 0;
 100                 break;
 101         default:
 102                 emulated = EMULATE_FAIL;
 103         }
 104         return emulated;
 105 }
 106
 107 static int kvmppc_e500_emul_dcbtls(struct kvm_vcpu *vcpu)
 108 {
 109         struct kvmppc_vcpu_e500 *vcpu_e500 = to_e500(vcpu);
 110
 111         /* Always fail to lock the cache */
 112         vcpu_e500->l1csr0 |= L1CSR0_CUL;
 113         return EMULATE_DONE;
 114 }
 115
 116 int kvmppc_core_emulate_op_e500(struct kvm_run *run, struct kvm_vcpu *vcpu,
 117                                 unsigned int inst, int *advance)
 118 {
 119         int emulated = EMULATE_DONE;
 120         int ra = get_ra(inst);
 121         int rb = get_rb(inst);
 122         int rt = get_rt(inst);
 123         gva_t ea;
 124
 125         switch (get_op(inst)) {
 126         case 31:
 127                 switch (get_xop(inst)) {
 128
 129                 case XOP_DCBTLS:
 130                         emulated = kvmppc_e500_emul_dcbtls(vcpu);
 131                         break;
 132
 133 #ifdef CONFIG_KVM_E500MC
 134                 case XOP_MSGSND:
 135                         emulated = kvmppc_e500_emul_msgsnd(vcpu, rb);
 136                         break;
 137
 138                 case XOP_MSGCLR:
 139                         emulated = kvmppc_e500_emul_msgclr(vcpu, rb);
 140                         break;
 141 #endif
 142
 143                 case XOP_TLBRE:
 144                         emulated = kvmppc_e500_emul_tlbre(vcpu);
 145                         break;
 146
 147                 case XOP_TLBWE:
 148                         emulated = kvmppc_e500_emul_tlbwe(vcpu);
 149                         break;
 150
 151                 case XOP_TLBSX:
 152                         ea = kvmppc_get_ea_indexed(vcpu, ra, rb);
 153                         emulated = kvmppc_e500_emul_tlbsx(vcpu, ea);
 154                         break;
 155
 156                 case XOP_TLBILX: {
 157                         int type = rt & 0x3;
 158                         ea = kvmppc_get_ea_indexed(vcpu, ra, rb);
 159                         emulated = kvmppc_e500_emul_tlbilx(vcpu, type, ea);
 160                         break;
 161                 }
 162
 163                 case XOP_TLBIVAX:
 164                         ea = kvmppc_get_ea_indexed(vcpu, ra, rb);
 165                         emulated = kvmppc_e500_emul_tlbivax(vcpu, ea);
 166                         break;
 167
 168                 case XOP_EHPRIV:
 169                         emulated = kvmppc_e500_emul_ehpriv(run, vcpu, inst,
 170                                                            advance);
 171                         break;
 172
 173                 default:
 174                         emulated = EMULATE_FAIL;
 175                 }
 176
 177                 break;
 178
 179         default:
 180                 emulated = EMULATE_FAIL;
 181         }
 182
 183         if (emulated == EMULATE_FAIL)
 184                 emulated = kvmppc_booke_emulate_op(run, vcpu, inst, advance);
 185
 186         return emulated;
 187 }
 188
 189 int kvmppc_core_emulate_mtspr_e500(struct kvm_vcpu *vcpu, int sprn, ulong spr_val)
 190 {
 191         struct kvmppc_vcpu_e500 *vcpu_e500 = to_e500(vcpu);
 192         int emulated = EMULATE_DONE;
 193
 194         switch (sprn) {
 195 #ifndef CONFIG_KVM_BOOKE_HV
 196         case SPRN_PID:
 197                 kvmppc_set_pid(vcpu, spr_val);
 198                 break;
 199         case SPRN_PID1:
 200                 if (spr_val != 0)
 201                         return EMULATE_FAIL;
 202                 vcpu_e500->pid[1] = spr_val;
 203                 break;
 204         case SPRN_PID2:
 205                 if (spr_val != 0)
 206                         return EMULATE_FAIL;
 207                 vcpu_e500->pid[2] = spr_val;
 208                 break;
 209         case SPRN_MAS0:
 210                 vcpu->arch.shared->mas0 = spr_val;
 211                 break;
 212         case SPRN_MAS1:
 213                 vcpu->arch.shared->mas1 = spr_val;
 214                 break;
 215         case SPRN_MAS2:
 216                 vcpu->arch.shared->mas2 = spr_val;
 217                 break;
 218         case SPRN_MAS3:
 219                 vcpu->arch.shared->mas7_3 &= ~(u64)0xffffffff;
 220                 vcpu->arch.shared->mas7_3 |= spr_val;
 221                 break;
 222         case SPRN_MAS4:
 223                 vcpu->arch.shared->mas4 = spr_val;
 224                 break;
 225         case SPRN_MAS6:
 226                 vcpu->arch.shared->mas6 = spr_val;
 227                 break;
 228         case SPRN_MAS7:
 229                 vcpu->arch.shared->mas7_3 &= (u64)0xffffffff;
 230                 vcpu->arch.shared->mas7_3 |= (u64)spr_val << 32;
 231                 break;
 232 #endif
 233         case SPRN_L1CSR0:
 234                 vcpu_e500->l1csr0 = spr_val;
 235                 vcpu_e500->l1csr0 &= ~(L1CSR0_DCFI | L1CSR0_CLFC);
 236                 break;
 237         case SPRN_L1CSR1:
 238                 vcpu_e500->l1csr1 = spr_val;
 239                 vcpu_e500->l1csr1 &= ~(L1CSR1_ICFI | L1CSR1_ICLFR);
 240                 break;
 241         case SPRN_HID0:
 242                 vcpu_e500->hid0 = spr_val;
 243                 break;
 244         case SPRN_HID1:
 245                 vcpu_e500->hid1 = spr_val;
 246                 break;
 247
 248         case SPRN_MMUCSR0:
 249                 emulated = kvmppc_e500_emul_mt_mmucsr0(vcpu_e500,
 250                                 spr_val);
 251                 break;
 252
 253         /* extra exceptions */
 254         case SPRN_IVOR32:
 255                 vcpu->arch.ivor[BOOKE_IRQPRIO_SPE_UNAVAIL] = spr_val;
 256                 break;
 257         case SPRN_IVOR33:
 258                 vcpu->arch.ivor[BOOKE_IRQPRIO_SPE_FP_DATA] = spr_val;
 259                 break;
 260         case SPRN_IVOR34:
 261                 vcpu->arch.ivor[BOOKE_IRQPRIO_SPE_FP_ROUND] = spr_val;
 262                 break;
 263         case SPRN_IVOR35:
 264                 vcpu->arch.ivor[BOOKE_IRQPRIO_PERFORMANCE_MONITOR] = spr_val;
 265                 break;
 266 #ifdef CONFIG_KVM_BOOKE_HV
 267         case SPRN_IVOR36:
 268                 vcpu->arch.ivor[BOOKE_IRQPRIO_DBELL] = spr_val;
 269                 break;
 270         case SPRN_IVOR37:
 271                 vcpu->arch.ivor[BOOKE_IRQPRIO_DBELL_CRIT] = spr_val;
 272                 break;
 273 #endif
 274         default:
 275                 emulated = kvmppc_booke_emulate_mtspr(vcpu, sprn, spr_val);
 276         }
 277
 278         return emulated;
 279 }
 280
 281 int kvmppc_core_emulate_mfspr_e500(struct kvm_vcpu *vcpu, int sprn, ulong *spr_val)
 282 {
 283         struct kvmppc_vcpu_e500 *vcpu_e500 = to_e500(vcpu);
 284         int emulated = EMULATE_DONE;
 285
 286         switch (sprn) {
 287 #ifndef CONFIG_KVM_BOOKE_HV
 288         case SPRN_PID:
 289                 *spr_val = vcpu_e500->pid[0];
 290                 break;
 291         case SPRN_PID1:
 292                 *spr_val = vcpu_e500->pid[1];
 293                 break;
 294         case SPRN_PID2:
 295                 *spr_val = vcpu_e500->pid[2];
 296                 break;
 297         case SPRN_MAS0:
 298                 *spr_val = vcpu->arch.shared->mas0;
 299                 break;
 300         case SPRN_MAS1:
 301                 *spr_val = vcpu->arch.shared->mas1;
 302                 break;
 303         case SPRN_MAS2:
 304                 *spr_val = vcpu->arch.shared->mas2;
 305                 break;
 306         case SPRN_MAS3:
 307                 *spr_val = (u32)vcpu->arch.shared->mas7_3;
 308                 break;
 309         case SPRN_MAS4:
 310                 *spr_val = vcpu->arch.shared->mas4;
 311                 break;
 312         case SPRN_MAS6:
 313                 *spr_val = vcpu->arch.shared->mas6;
 314                 break;
 315         case SPRN_MAS7:
 316                 *spr_val = vcpu->arch.shared->mas7_3 >> 32;
 317                 break;
 318 #endif
 319         case SPRN_DECAR:
 320                 *spr_val = vcpu->arch.decar;
 321                 break;
 322         case SPRN_TLB0CFG:
 323                 *spr_val = vcpu->arch.tlbcfg[0];
 324                 break;
 325         case SPRN_TLB1CFG:
 326                 *spr_val = vcpu->arch.tlbcfg[1];
 327                 break;
 328         case SPRN_TLB0PS:
 329                 if (!has_feature(vcpu, VCPU_FTR_MMU_V2))
 330                         return EMULATE_FAIL;
 331                 *spr_val = vcpu->arch.tlbps[0];
 332                 break;
 333         case SPRN_TLB1PS:
 334                 if (!has_feature(vcpu, VCPU_FTR_MMU_V2))
 335                         return EMULATE_FAIL;
 336                 *spr_val = vcpu->arch.tlbps[1];
 337                 break;
 338         case SPRN_L1CSR0:
 339                 *spr_val = vcpu_e500->l1csr0;
 340                 break;
 341         case SPRN_L1CSR1:
 342                 *spr_val = vcpu_e500->l1csr1;
 343                 break;
 344         case SPRN_HID0:
 345                 *spr_val = vcpu_e500->hid0;
 346                 break;
 347         case SPRN_HID1:
 348                 *spr_val = vcpu_e500->hid1;
 349                 break;
 350         case SPRN_SVR:
 351                 *spr_val = vcpu_e500->svr;
 352                 break;
 353
 354         case SPRN_MMUCSR0:
 355                 *spr_val = 0;
 356                 break;
 357
 358         case SPRN_MMUCFG:
 359                 *spr_val = vcpu->arch.mmucfg;
 360                 break;
 361         case SPRN_EPTCFG:
 362                 if (!has_feature(vcpu, VCPU_FTR_MMU_V2))
 363                         return EMULATE_FAIL;
 364                 /*
 365                  * Legacy Linux guests access EPTCFG register even if the E.PT
 366                  * category is disabled in the VM. Give them a chance to live.
 367                  */
 368                 *spr_val = vcpu->arch.eptcfg;
 369                 break;
 370
 371         /* extra exceptions */
 372         case SPRN_IVOR32:
 373                 *spr_val = vcpu->arch.ivor[BOOKE_IRQPRIO_SPE_UNAVAIL];
 374                 break;
 375         case SPRN_IVOR33:
 376                 *spr_val = vcpu->arch.ivor[BOOKE_IRQPRIO_SPE_FP_DATA];
 377                 break;
 378         case SPRN_IVOR34:
 379                 *spr_val = vcpu->arch.ivor[BOOKE_IRQPRIO_SPE_FP_ROUND];
 380                 break;
 381         case SPRN_IVOR35:
 382                 *spr_val = vcpu->arch.ivor[BOOKE_IRQPRIO_PERFORMANCE_MONITOR];
 383                 break;
 384 #ifdef CONFIG_KVM_BOOKE_HV
 385         case SPRN_IVOR36:
 386                 *spr_val = vcpu->arch.ivor[BOOKE_IRQPRIO_DBELL];
 387                 break;
 388         case SPRN_IVOR37:
 389                 *spr_val = vcpu->arch.ivor[BOOKE_IRQPRIO_DBELL_CRIT];
 390                 break;
 391 #endif
 392         default:
 393                 emulated = kvmppc_booke_emulate_mfspr(vcpu, sprn, spr_val);
 394         }
 395
 396         return emulated;
 397 }
 398