arch/mips/kvm/mips.c

   1 /*
   2  * This file is subject to the terms and conditions of the GNU General Public
   3  * License.  See the file "COPYING" in the main directory of this archive
   4  * for more details.
   5  *
   6  * KVM/MIPS: MIPS specific KVM APIs
   7  *
   8  * Copyright (C) 2012  MIPS Technologies, Inc.  All rights reserved.
   9  * Authors: Sanjay Lal <sanjayl@kymasys.com>
  10  */
  11
  12 #include <linux/errno.h>
  13 #include <linux/err.h>
  14 #include <linux/module.h>
  15 #include <linux/vmalloc.h>
  16 #include <linux/fs.h>
  17 #include <linux/bootmem.h>
  18 #include <asm/fpu.h>
  19 #include <asm/page.h>
  20 #include <asm/cacheflush.h>
  21 #include <asm/mmu_context.h>
  22 #include <asm/pgtable.h>
  23
  24 #include <linux/kvm_host.h>
  25
  26 #include "interrupt.h"
  27 #include "commpage.h"
  28
  29 #define CREATE_TRACE_POINTS
  30 #include "trace.h"
  31
  32 #ifndef VECTORSPACING
  33 #define VECTORSPACING 0x100     /* for EI/VI mode */
  34 #endif
  35
  36 #define VCPU_STAT(x) offsetof(struct kvm_vcpu, stat.x)
  37 struct kvm_stats_debugfs_item debugfs_entries[] = {
  38         { "wait",         VCPU_STAT(wait_exits),         KVM_STAT_VCPU },
  39         { "cache",        VCPU_STAT(cache_exits),        KVM_STAT_VCPU },
  40         { "signal",       VCPU_STAT(signal_exits),       KVM_STAT_VCPU },
  41         { "interrupt",    VCPU_STAT(int_exits),          KVM_STAT_VCPU },
  42         { "cop_unsuable", VCPU_STAT(cop_unusable_exits), KVM_STAT_VCPU },
  43         { "tlbmod",       VCPU_STAT(tlbmod_exits),       KVM_STAT_VCPU },
  44         { "tlbmiss_ld",   VCPU_STAT(tlbmiss_ld_exits),   KVM_STAT_VCPU },
  45         { "tlbmiss_st",   VCPU_STAT(tlbmiss_st_exits),   KVM_STAT_VCPU },
  46         { "addrerr_st",   VCPU_STAT(addrerr_st_exits),   KVM_STAT_VCPU },
  47         { "addrerr_ld",   VCPU_STAT(addrerr_ld_exits),   KVM_STAT_VCPU },
  48         { "syscall",      VCPU_STAT(syscall_exits),      KVM_STAT_VCPU },
  49         { "resvd_inst",   VCPU_STAT(resvd_inst_exits),   KVM_STAT_VCPU },
  50         { "break_inst",   VCPU_STAT(break_inst_exits),   KVM_STAT_VCPU },
  51         { "trap_inst",    VCPU_STAT(trap_inst_exits),    KVM_STAT_VCPU },
  52         { "flush_dcache", VCPU_STAT(flush_dcache_exits), KVM_STAT_VCPU },
  53         { "halt_successful_poll", VCPU_STAT(halt_successful_poll), KVM_STAT_VCPU },
  54         { "halt_wakeup",  VCPU_STAT(halt_wakeup),        KVM_STAT_VCPU },
  55         {NULL}
  56 };
  57
  58 static int kvm_mips_reset_vcpu(struct kvm_vcpu *vcpu)
  59 {
  60         int i;
  61
  62         for_each_possible_cpu(i) {
  63                 vcpu->arch.guest_kernel_asid[i] = 0;
  64                 vcpu->arch.guest_user_asid[i] = 0;
  65         }
  66
  67         return 0;
  68 }
  69
  70 /*
  71  * XXXKYMA: We are simulatoring a processor that has the WII bit set in
  72  * Config7, so we are "runnable" if interrupts are pending
  73  */
  74 int kvm_arch_vcpu_runnable(struct kvm_vcpu *vcpu)
  75 {
  76         return !!(vcpu->arch.pending_exceptions);
  77 }
  78
  79 int kvm_arch_vcpu_should_kick(struct kvm_vcpu *vcpu)
  80 {
  81         return 1;
  82 }
  83
  84 int kvm_arch_hardware_enable(void)
  85 {
  86         return 0;
  87 }
  88
  89 int kvm_arch_hardware_setup(void)
  90 {
  91         return 0;
  92 }
  93
  94 void kvm_arch_check_processor_compat(void *rtn)
  95 {
  96         *(int *)rtn = 0;
  97 }
  98
  99 static void kvm_mips_init_tlbs(struct kvm *kvm)
 100 {
 101         unsigned long wired;
 102
 103         /*
 104          * Add a wired entry to the TLB, it is used to map the commpage to
 105          * the Guest kernel
 106          */
 107         wired = read_c0_wired();
 108         write_c0_wired(wired + 1);
 109         mtc0_tlbw_hazard();
 110         kvm->arch.commpage_tlb = wired;
 111
 112         kvm_debug("[%d] commpage TLB: %d\n", smp_processor_id(),
 113                   kvm->arch.commpage_tlb);
 114 }
 115
 116 static void kvm_mips_init_vm_percpu(void *arg)
 117 {
 118         struct kvm *kvm = (struct kvm *)arg;
 119
 120         kvm_mips_init_tlbs(kvm);
 121         kvm_mips_callbacks->vm_init(kvm);
 122
 123 }
 124
 125 int kvm_arch_init_vm(struct kvm *kvm, unsigned long type)
 126 {
 127         if (atomic_inc_return(&kvm_mips_instance) == 1) {
 128                 kvm_debug("%s: 1st KVM instance, setup host TLB parameters\n",
 129                           __func__);
 130                 on_each_cpu(kvm_mips_init_vm_percpu, kvm, 1);
 131         }
 132
 133         return 0;
 134 }
 135
 136 void kvm_mips_free_vcpus(struct kvm *kvm)
 137 {
 138         unsigned int i;
 139         struct kvm_vcpu *vcpu;
 140
 141         /* Put the pages we reserved for the guest pmap */
 142         for (i = 0; i < kvm->arch.guest_pmap_npages; i++) {
 143                 if (kvm->arch.guest_pmap[i] != KVM_INVALID_PAGE)
 144                         kvm_mips_release_pfn_clean(kvm->arch.guest_pmap[i]);
 145         }
 146         kfree(kvm->arch.guest_pmap);
 147
 148         kvm_for_each_vcpu(i, vcpu, kvm) {
 149                 kvm_arch_vcpu_free(vcpu);
 150         }
 151
 152         mutex_lock(&kvm->lock);
 153
 154         for (i = 0; i < atomic_read(&kvm->online_vcpus); i++)
 155                 kvm->vcpus[i] = NULL;
 156
 157         atomic_set(&kvm->online_vcpus, 0);
 158
 159         mutex_unlock(&kvm->lock);
 160 }
 161
 162 static void kvm_mips_uninit_tlbs(void *arg)
 163 {
 164         /* Restore wired count */
 165         write_c0_wired(0);
 166         mtc0_tlbw_hazard();
 167         /* Clear out all the TLBs */
 168         kvm_local_flush_tlb_all();
 169 }
 170
 171 void kvm_arch_destroy_vm(struct kvm *kvm)
 172 {
 173         kvm_mips_free_vcpus(kvm);
 174
 175         /* If this is the last instance, restore wired count */
 176         if (atomic_dec_return(&kvm_mips_instance) == 0) {
 177                 kvm_debug("%s: last KVM instance, restoring TLB parameters\n",
 178                           __func__);
 179                 on_each_cpu(kvm_mips_uninit_tlbs, NULL, 1);
 180         }
 181 }
 182
 183 long kvm_arch_dev_ioctl(struct file *filp, unsigned int ioctl,
 184                         unsigned long arg)
 185 {
 186         return -ENOIOCTLCMD;
 187 }
 188
 189 int kvm_arch_create_memslot(struct kvm *kvm, struct kvm_memory_slot *slot,
 190                             unsigned long npages)
 191 {
 192         return 0;
 193 }
 194
 195 int kvm_arch_prepare_memory_region(struct kvm *kvm,
 196                                    struct kvm_memory_slot *memslot,
 197                                    struct kvm_userspace_memory_region *mem,
 198                                    enum kvm_mr_change change)
 199 {
 200         return 0;
 201 }
 202
 203 void kvm_arch_commit_memory_region(struct kvm *kvm,
 204                                    struct kvm_userspace_memory_region *mem,
 205                                    const struct kvm_memory_slot *old,
 206                                    enum kvm_mr_change change)
 207 {
 208         unsigned long npages = 0;
 209         int i;
 210
 211         kvm_debug("%s: kvm: %p slot: %d, GPA: %llx, size: %llx, QVA: %llx\n",
 212                   __func__, kvm, mem->slot, mem->guest_phys_addr,
 213                   mem->memory_size, mem->userspace_addr);
 214
 215         /* Setup Guest PMAP table */
 216         if (!kvm->arch.guest_pmap) {
 217                 if (mem->slot == 0)
 218                         npages = mem->memory_size >> PAGE_SHIFT;
 219
 220                 if (npages) {
 221                         kvm->arch.guest_pmap_npages = npages;
 222                         kvm->arch.guest_pmap =
 223                             kzalloc(npages * sizeof(unsigned long), GFP_KERNEL);
 224
 225                         if (!kvm->arch.guest_pmap) {
 226                                 kvm_err("Failed to allocate guest PMAP");
 227                                 return;
 228                         }
 229
 230                         kvm_debug("Allocated space for Guest PMAP Table (%ld pages) @ %p\n",
 231                                   npages, kvm->arch.guest_pmap);
 232
 233                         /* Now setup the page table */
 234                         for (i = 0; i < npages; i++)
 235                                 kvm->arch.guest_pmap[i] = KVM_INVALID_PAGE;
 236                 }
 237         }
 238 }
 239
 240 struct kvm_vcpu *kvm_arch_vcpu_create(struct kvm *kvm, unsigned int id)
 241 {
 242         int err, size, offset;
 243         void *gebase;
 244         int i;
 245
 246         struct kvm_vcpu *vcpu = kzalloc(sizeof(struct kvm_vcpu), GFP_KERNEL);
 247
 248         if (!vcpu) {
 249                 err = -ENOMEM;
 250                 goto out;
 251         }
 252
 253         err = kvm_vcpu_init(vcpu, kvm, id);
 254
 255         if (err)
 256                 goto out_free_cpu;
 257
 258         kvm_debug("kvm @ %p: create cpu %d at %p\n", kvm, id, vcpu);
 259
 260         /*
 261          * Allocate space for host mode exception handlers that handle
 262          * guest mode exits
 263          */
 264         if (cpu_has_veic || cpu_has_vint)
 265                 size = 0x200 + VECTORSPACING * 64;
 266         else
 267                 size = 0x4000;
 268
 269         /* Save Linux EBASE */
 270         vcpu->arch.host_ebase = (void *)read_c0_ebase();
 271
 272         gebase = kzalloc(ALIGN(size, PAGE_SIZE), GFP_KERNEL);
 273
 274         if (!gebase) {
 275                 err = -ENOMEM;
 276                 goto out_free_cpu;
 277         }
 278         kvm_debug("Allocated %d bytes for KVM Exception Handlers @ %p\n",
 279                   ALIGN(size, PAGE_SIZE), gebase);
 280
 281         /* Save new ebase */
 282         vcpu->arch.guest_ebase = gebase;
 283
 284         /* Copy L1 Guest Exception handler to correct offset */
 285
 286         /* TLB Refill, EXL = 0 */
 287         memcpy(gebase, mips32_exception,
 288                mips32_exceptionEnd - mips32_exception);
 289
 290         /* General Exception Entry point */
 291         memcpy(gebase + 0x180, mips32_exception,
 292                mips32_exceptionEnd - mips32_exception);
 293
 294         /* For vectored interrupts poke the exception code @ all offsets 0-7 */
 295         for (i = 0; i < 8; i++) {
 296                 kvm_debug("L1 Vectored handler @ %p\n",
 297                           gebase + 0x200 + (i * VECTORSPACING));
 298                 memcpy(gebase + 0x200 + (i * VECTORSPACING), mips32_exception,
 299                        mips32_exceptionEnd - mips32_exception);
 300         }
 301
 302         /* General handler, relocate to unmapped space for sanity's sake */
 303         offset = 0x2000;
 304         kvm_debug("Installing KVM Exception handlers @ %p, %#x bytes\n",
 305                   gebase + offset,
 306                   mips32_GuestExceptionEnd - mips32_GuestException);
 307
 308         memcpy(gebase + offset, mips32_GuestException,
 309                mips32_GuestExceptionEnd - mips32_GuestException);
 310
 311         /* Invalidate the icache for these ranges */
 312         local_flush_icache_range((unsigned long)gebase,
 313                                 (unsigned long)gebase + ALIGN(size, PAGE_SIZE));
 314
 315         /*
 316          * Allocate comm page for guest kernel, a TLB will be reserved for
 317          * mapping GVA @ 0xFFFF8000 to this page
 318          */
 319         vcpu->arch.kseg0_commpage = kzalloc(PAGE_SIZE << 1, GFP_KERNEL);
 320
 321         if (!vcpu->arch.kseg0_commpage) {
 322                 err = -ENOMEM;
 323                 goto out_free_gebase;
 324         }
 325
 326         kvm_debug("Allocated COMM page @ %p\n", vcpu->arch.kseg0_commpage);
 327         kvm_mips_commpage_init(vcpu);
 328
 329         /* Init */
 330         vcpu->arch.last_sched_cpu = -1;
 331
 332         /* Start off the timer */
 333         kvm_mips_init_count(vcpu);
 334
 335         return vcpu;
 336
 337 out_free_gebase:
 338         kfree(gebase);
 339
 340 out_free_cpu:
 341         kfree(vcpu);
 342
 343 out:
 344         return ERR_PTR(err);
 345 }
 346
 347 void kvm_arch_vcpu_free(struct kvm_vcpu *vcpu)
 348 {
 349         hrtimer_cancel(&vcpu->arch.comparecount_timer);
 350
 351         kvm_vcpu_uninit(vcpu);
 352
 353         kvm_mips_dump_stats(vcpu);
 354
 355         kfree(vcpu->arch.guest_ebase);
 356         kfree(vcpu->arch.kseg0_commpage);
 357         kfree(vcpu);
 358 }
 359
 360 void kvm_arch_vcpu_destroy(struct kvm_vcpu *vcpu)
 361 {
 362         kvm_arch_vcpu_free(vcpu);
 363 }
 364
 365 int kvm_arch_vcpu_ioctl_set_guest_debug(struct kvm_vcpu *vcpu,
 366                                         struct kvm_guest_debug *dbg)
 367 {
 368         return -ENOIOCTLCMD;
 369 }
 370
 371 int kvm_arch_vcpu_ioctl_run(struct kvm_vcpu *vcpu, struct kvm_run *run)
 372 {
 373         int r = 0;
 374         sigset_t sigsaved;
 375
 376         if (vcpu->sigset_active)
 377                 sigprocmask(SIG_SETMASK, &vcpu->sigset, &sigsaved);
 378
 379         if (vcpu->mmio_needed) {
 380                 if (!vcpu->mmio_is_write)
 381                         kvm_mips_complete_mmio_load(vcpu, run);
 382                 vcpu->mmio_needed = 0;
 383         }
 384
 385         lose_fpu(1);
 386
 387         local_irq_disable();
 388         /* Check if we have any exceptions/interrupts pending */
 389         kvm_mips_deliver_interrupts(vcpu,
 390                                     kvm_read_c0_guest_cause(vcpu->arch.cop0));
 391
 392         kvm_guest_enter();
 393
 394         /* Disable hardware page table walking while in guest */
 395         htw_stop();
 396
 397         r = __kvm_mips_vcpu_run(run, vcpu);
 398
 399         /* Re-enable HTW before enabling interrupts */
 400         htw_start();
 401
 402         kvm_guest_exit();
 403         local_irq_enable();
 404
 405         if (vcpu->sigset_active)
 406                 sigprocmask(SIG_SETMASK, &sigsaved, NULL);
 407
 408         return r;
 409 }
 410
 411 int kvm_vcpu_ioctl_interrupt(struct kvm_vcpu *vcpu,
 412                              struct kvm_mips_interrupt *irq)
 413 {
 414         int intr = (int)irq->irq;
 415         struct kvm_vcpu *dvcpu = NULL;
 416
 417         if (intr == 3 || intr == -3 || intr == 4 || intr == -4)
 418                 kvm_debug("%s: CPU: %d, INTR: %d\n", __func__, irq->cpu,
 419                           (int)intr);
 420
 421         if (irq->cpu == -1)
 422                 dvcpu = vcpu;
 423         else
 424                 dvcpu = vcpu->kvm->vcpus[irq->cpu];
 425
 426         if (intr == 2 || intr == 3 || intr == 4) {
 427                 kvm_mips_callbacks->queue_io_int(dvcpu, irq);
 428
 429         } else if (intr == -2 || intr == -3 || intr == -4) {
 430                 kvm_mips_callbacks->dequeue_io_int(dvcpu, irq);
 431         } else {
 432                 kvm_err("%s: invalid interrupt ioctl (%d:%d)\n", __func__,
 433                         irq->cpu, irq->irq);
 434                 return -EINVAL;
 435         }
 436
 437         dvcpu->arch.wait = 0;
 438
 439         if (waitqueue_active(&dvcpu->wq))
 440                 wake_up_interruptible(&dvcpu->wq);
 441
 442         return 0;
 443 }
 444
 445 int kvm_arch_vcpu_ioctl_get_mpstate(struct kvm_vcpu *vcpu,
 446                                     struct kvm_mp_state *mp_state)
 447 {
 448         return -ENOIOCTLCMD;
 449 }
 450
 451 int kvm_arch_vcpu_ioctl_set_mpstate(struct kvm_vcpu *vcpu,
 452                                     struct kvm_mp_state *mp_state)
 453 {
 454         return -ENOIOCTLCMD;
 455 }
 456
 457 static u64 kvm_mips_get_one_regs[] = {
 458         KVM_REG_MIPS_R0,
 459         KVM_REG_MIPS_R1,
 460         KVM_REG_MIPS_R2,
 461         KVM_REG_MIPS_R3,
 462         KVM_REG_MIPS_R4,
 463         KVM_REG_MIPS_R5,
 464         KVM_REG_MIPS_R6,
 465         KVM_REG_MIPS_R7,
 466         KVM_REG_MIPS_R8,
 467         KVM_REG_MIPS_R9,
 468         KVM_REG_MIPS_R10,
 469         KVM_REG_MIPS_R11,
 470         KVM_REG_MIPS_R12,
 471         KVM_REG_MIPS_R13,
 472         KVM_REG_MIPS_R14,
 473         KVM_REG_MIPS_R15,
 474         KVM_REG_MIPS_R16,
 475         KVM_REG_MIPS_R17,
 476         KVM_REG_MIPS_R18,
 477         KVM_REG_MIPS_R19,
 478         KVM_REG_MIPS_R20,
 479         KVM_REG_MIPS_R21,
 480         KVM_REG_MIPS_R22,
 481         KVM_REG_MIPS_R23,
 482         KVM_REG_MIPS_R24,
 483         KVM_REG_MIPS_R25,
 484         KVM_REG_MIPS_R26,
 485         KVM_REG_MIPS_R27,
 486         KVM_REG_MIPS_R28,
 487         KVM_REG_MIPS_R29,
 488         KVM_REG_MIPS_R30,
 489         KVM_REG_MIPS_R31,
 490
 491         KVM_REG_MIPS_HI,
 492         KVM_REG_MIPS_LO,
 493         KVM_REG_MIPS_PC,
 494
 495         KVM_REG_MIPS_CP0_INDEX,
 496         KVM_REG_MIPS_CP0_CONTEXT,
 497         KVM_REG_MIPS_CP0_USERLOCAL,
 498         KVM_REG_MIPS_CP0_PAGEMASK,
 499         KVM_REG_MIPS_CP0_WIRED,
 500         KVM_REG_MIPS_CP0_HWRENA,
 501         KVM_REG_MIPS_CP0_BADVADDR,
 502         KVM_REG_MIPS_CP0_COUNT,
 503         KVM_REG_MIPS_CP0_ENTRYHI,
 504         KVM_REG_MIPS_CP0_COMPARE,
 505         KVM_REG_MIPS_CP0_STATUS,
 506         KVM_REG_MIPS_CP0_CAUSE,
 507         KVM_REG_MIPS_CP0_EPC,
 508         KVM_REG_MIPS_CP0_CONFIG,
 509         KVM_REG_MIPS_CP0_CONFIG1,
 510         KVM_REG_MIPS_CP0_CONFIG2,
 511         KVM_REG_MIPS_CP0_CONFIG3,
 512         KVM_REG_MIPS_CP0_CONFIG7,
 513         KVM_REG_MIPS_CP0_ERROREPC,
 514
 515         KVM_REG_MIPS_COUNT_CTL,
 516         KVM_REG_MIPS_COUNT_RESUME,
 517         KVM_REG_MIPS_COUNT_HZ,
 518 };
 519
 520 static int kvm_mips_get_reg(struct kvm_vcpu *vcpu,
 521                             const struct kvm_one_reg *reg)
 522 {
 523         struct mips_coproc *cop0 = vcpu->arch.cop0;
 524         int ret;
 525         s64 v;
 526
 527         switch (reg->id) {
 528         case KVM_REG_MIPS_R0 ... KVM_REG_MIPS_R31:
 529                 v = (long)vcpu->arch.gprs[reg->id - KVM_REG_MIPS_R0];
 530                 break;
 531         case KVM_REG_MIPS_HI:
 532                 v = (long)vcpu->arch.hi;
 533                 break;
 534         case KVM_REG_MIPS_LO:
 535                 v = (long)vcpu->arch.lo;
 536                 break;
 537         case KVM_REG_MIPS_PC:
 538                 v = (long)vcpu->arch.pc;
 539                 break;
 540
 541         case KVM_REG_MIPS_CP0_INDEX:
 542                 v = (long)kvm_read_c0_guest_index(cop0);
 543                 break;
 544         case KVM_REG_MIPS_CP0_CONTEXT:
 545                 v = (long)kvm_read_c0_guest_context(cop0);
 546                 break;
 547         case KVM_REG_MIPS_CP0_USERLOCAL:
 548                 v = (long)kvm_read_c0_guest_userlocal(cop0);
 549                 break;
 550         case KVM_REG_MIPS_CP0_PAGEMASK:
 551                 v = (long)kvm_read_c0_guest_pagemask(cop0);
 552                 break;
 553         case KVM_REG_MIPS_CP0_WIRED:
 554                 v = (long)kvm_read_c0_guest_wired(cop0);
 555                 break;
 556         case KVM_REG_MIPS_CP0_HWRENA:
 557                 v = (long)kvm_read_c0_guest_hwrena(cop0);
 558                 break;
 559         case KVM_REG_MIPS_CP0_BADVADDR:
 560                 v = (long)kvm_read_c0_guest_badvaddr(cop0);
 561                 break;
 562         case KVM_REG_MIPS_CP0_ENTRYHI:
 563                 v = (long)kvm_read_c0_guest_entryhi(cop0);
 564                 break;
 565         case KVM_REG_MIPS_CP0_COMPARE:
 566                 v = (long)kvm_read_c0_guest_compare(cop0);
 567                 break;
 568         case KVM_REG_MIPS_CP0_STATUS:
 569                 v = (long)kvm_read_c0_guest_status(cop0);
 570                 break;
 571         case KVM_REG_MIPS_CP0_CAUSE:
 572                 v = (long)kvm_read_c0_guest_cause(cop0);
 573                 break;
 574         case KVM_REG_MIPS_CP0_EPC:
 575                 v = (long)kvm_read_c0_guest_epc(cop0);
 576                 break;
 577         case KVM_REG_MIPS_CP0_ERROREPC:
 578                 v = (long)kvm_read_c0_guest_errorepc(cop0);
 579                 break;
 580         case KVM_REG_MIPS_CP0_CONFIG:
 581                 v = (long)kvm_read_c0_guest_config(cop0);
 582                 break;
 583         case KVM_REG_MIPS_CP0_CONFIG1:
 584                 v = (long)kvm_read_c0_guest_config1(cop0);
 585                 break;
 586         case KVM_REG_MIPS_CP0_CONFIG2:
 587                 v = (long)kvm_read_c0_guest_config2(cop0);
 588                 break;
 589         case KVM_REG_MIPS_CP0_CONFIG3:
 590                 v = (long)kvm_read_c0_guest_config3(cop0);
 591                 break;
 592         case KVM_REG_MIPS_CP0_CONFIG7:
 593                 v = (long)kvm_read_c0_guest_config7(cop0);
 594                 break;
 595         /* registers to be handled specially */
 596         case KVM_REG_MIPS_CP0_COUNT:
 597         case KVM_REG_MIPS_COUNT_CTL:
 598         case KVM_REG_MIPS_COUNT_RESUME:
 599         case KVM_REG_MIPS_COUNT_HZ:
 600                 ret = kvm_mips_callbacks->get_one_reg(vcpu, reg, &v);
 601                 if (ret)
 602                         return ret;
 603                 break;
 604         default:
 605                 return -EINVAL;
 606         }
 607         if ((reg->id & KVM_REG_SIZE_MASK) == KVM_REG_SIZE_U64) {
 608                 u64 __user *uaddr64 = (u64 __user *)(long)reg->addr;
 609
 610                 return put_user(v, uaddr64);
 611         } else if ((reg->id & KVM_REG_SIZE_MASK) == KVM_REG_SIZE_U32) {
 612                 u32 __user *uaddr32 = (u32 __user *)(long)reg->addr;
 613                 u32 v32 = (u32)v;
 614
 615                 return put_user(v32, uaddr32);
 616         } else {
 617                 return -EINVAL;
 618         }
 619 }
 620
 621 static int kvm_mips_set_reg(struct kvm_vcpu *vcpu,
 622                             const struct kvm_one_reg *reg)
 623 {
 624         struct mips_coproc *cop0 = vcpu->arch.cop0;
 625         u64 v;
 626
 627         if ((reg->id & KVM_REG_SIZE_MASK) == KVM_REG_SIZE_U64) {
 628                 u64 __user *uaddr64 = (u64 __user *)(long)reg->addr;
 629
 630                 if (get_user(v, uaddr64) != 0)
 631                         return -EFAULT;
 632         } else if ((reg->id & KVM_REG_SIZE_MASK) == KVM_REG_SIZE_U32) {
 633                 u32 __user *uaddr32 = (u32 __user *)(long)reg->addr;
 634                 s32 v32;
 635
 636                 if (get_user(v32, uaddr32) != 0)
 637                         return -EFAULT;
 638                 v = (s64)v32;
 639         } else {
 640                 return -EINVAL;
 641         }
 642
 643         switch (reg->id) {
 644         case KVM_REG_MIPS_R0:
 645                 /* Silently ignore requests to set $0 */
 646                 break;
 647         case KVM_REG_MIPS_R1 ... KVM_REG_MIPS_R31:
 648                 vcpu->arch.gprs[reg->id - KVM_REG_MIPS_R0] = v;
 649                 break;
 650         case KVM_REG_MIPS_HI:
 651                 vcpu->arch.hi = v;
 652                 break;
 653         case KVM_REG_MIPS_LO:
 654                 vcpu->arch.lo = v;
 655                 break;
 656         case KVM_REG_MIPS_PC:
 657                 vcpu->arch.pc = v;
 658                 break;
 659
 660         case KVM_REG_MIPS_CP0_INDEX:
 661                 kvm_write_c0_guest_index(cop0, v);
 662                 break;
 663         case KVM_REG_MIPS_CP0_CONTEXT:
 664                 kvm_write_c0_guest_context(cop0, v);
 665                 break;
 666         case KVM_REG_MIPS_CP0_USERLOCAL:
 667                 kvm_write_c0_guest_userlocal(cop0, v);
 668                 break;
 669         case KVM_REG_MIPS_CP0_PAGEMASK:
 670                 kvm_write_c0_guest_pagemask(cop0, v);
 671                 break;
 672         case KVM_REG_MIPS_CP0_WIRED:
 673                 kvm_write_c0_guest_wired(cop0, v);
 674                 break;
 675         case KVM_REG_MIPS_CP0_HWRENA:
 676                 kvm_write_c0_guest_hwrena(cop0, v);
 677                 break;
 678         case KVM_REG_MIPS_CP0_BADVADDR:
 679                 kvm_write_c0_guest_badvaddr(cop0, v);
 680                 break;
 681         case KVM_REG_MIPS_CP0_ENTRYHI:
 682                 kvm_write_c0_guest_entryhi(cop0, v);
 683                 break;
 684         case KVM_REG_MIPS_CP0_STATUS:
 685                 kvm_write_c0_guest_status(cop0, v);
 686                 break;
 687         case KVM_REG_MIPS_CP0_EPC:
 688                 kvm_write_c0_guest_epc(cop0, v);
 689                 break;
 690         case KVM_REG_MIPS_CP0_ERROREPC:
 691                 kvm_write_c0_guest_errorepc(cop0, v);
 692                 break;
 693         /* registers to be handled specially */
 694         case KVM_REG_MIPS_CP0_COUNT:
 695         case KVM_REG_MIPS_CP0_COMPARE:
 696         case KVM_REG_MIPS_CP0_CAUSE:
 697         case KVM_REG_MIPS_COUNT_CTL:
 698         case KVM_REG_MIPS_COUNT_RESUME:
 699         case KVM_REG_MIPS_COUNT_HZ:
 700                 return kvm_mips_callbacks->set_one_reg(vcpu, reg, v);
 701         default:
 702                 return -EINVAL;
 703         }
 704         return 0;
 705 }
 706
 707 long kvm_arch_vcpu_ioctl(struct file *filp, unsigned int ioctl,
 708                          unsigned long arg)
 709 {
 710         struct kvm_vcpu *vcpu = filp->private_data;
 711         void __user *argp = (void __user *)arg;
 712         long r;
 713
 714         switch (ioctl) {
 715         case KVM_SET_ONE_REG:
 716         case KVM_GET_ONE_REG: {
 717                 struct kvm_one_reg reg;
 718
 719                 if (copy_from_user(&reg, argp, sizeof(reg)))
 720                         return -EFAULT;
 721                 if (ioctl == KVM_SET_ONE_REG)
 722                         return kvm_mips_set_reg(vcpu, &reg);
 723                 else
 724                         return kvm_mips_get_reg(vcpu, &reg);
 725         }
 726         case KVM_GET_REG_LIST: {
 727                 struct kvm_reg_list __user *user_list = argp;
 728                 u64 __user *reg_dest;
 729                 struct kvm_reg_list reg_list;
 730                 unsigned n;
 731
 732                 if (copy_from_user(&reg_list, user_list, sizeof(reg_list)))
 733                         return -EFAULT;
 734                 n = reg_list.n;
 735                 reg_list.n = ARRAY_SIZE(kvm_mips_get_one_regs);
 736                 if (copy_to_user(user_list, &reg_list, sizeof(reg_list)))
 737                         return -EFAULT;
 738                 if (n < reg_list.n)
 739                         return -E2BIG;
 740                 reg_dest = user_list->reg;
 741                 if (copy_to_user(reg_dest, kvm_mips_get_one_regs,
 742                                  sizeof(kvm_mips_get_one_regs)))
 743                         return -EFAULT;
 744                 return 0;
 745         }
 746         case KVM_NMI:
 747                 /* Treat the NMI as a CPU reset */
 748                 r = kvm_mips_reset_vcpu(vcpu);
 749                 break;
 750         case KVM_INTERRUPT:
 751                 {
 752                         struct kvm_mips_interrupt irq;
 753
 754                         r = -EFAULT;
 755                         if (copy_from_user(&irq, argp, sizeof(irq)))
 756                                 goto out;
 757
 758                         kvm_debug("[%d] %s: irq: %d\n", vcpu->vcpu_id, __func__,
 759                                   irq.irq);
 760
 761                         r = kvm_vcpu_ioctl_interrupt(vcpu, &irq);
 762                         break;
 763                 }
 764         default:
 765                 r = -ENOIOCTLCMD;
 766         }
 767
 768 out:
 769         return r;
 770 }
 771
 772 /* Get (and clear) the dirty memory log for a memory slot. */
 773 int kvm_vm_ioctl_get_dirty_log(struct kvm *kvm, struct kvm_dirty_log *log)
 774 {
 775         struct kvm_memory_slot *memslot;
 776         unsigned long ga, ga_end;
 777         int is_dirty = 0;
 778         int r;
 779         unsigned long n;
 780
 781         mutex_lock(&kvm->slots_lock);
 782
 783         r = kvm_get_dirty_log(kvm, log, &is_dirty);
 784         if (r)
 785                 goto out;
 786
 787         /* If nothing is dirty, don't bother messing with page tables. */
 788         if (is_dirty) {
 789                 memslot = &kvm->memslots->memslots[log->slot];
 790
 791                 ga = memslot->base_gfn << PAGE_SHIFT;
 792                 ga_end = ga + (memslot->npages << PAGE_SHIFT);
 793
 794                 kvm_info("%s: dirty, ga: %#lx, ga_end %#lx\n", __func__, ga,
 795                          ga_end);
 796
 797                 n = kvm_dirty_bitmap_bytes(memslot);
 798                 memset(memslot->dirty_bitmap, 0, n);
 799         }
 800
 801         r = 0;
 802 out:
 803         mutex_unlock(&kvm->slots_lock);
 804         return r;
 805
 806 }
 807
 808 long kvm_arch_vm_ioctl(struct file *filp, unsigned int ioctl, unsigned long arg)
 809 {
 810         long r;
 811
 812         switch (ioctl) {
 813         default:
 814                 r = -ENOIOCTLCMD;
 815         }
 816
 817         return r;
 818 }
 819
 820 int kvm_arch_init(void *opaque)
 821 {
 822         if (kvm_mips_callbacks) {
 823                 kvm_err("kvm: module already exists\n");
 824                 return -EEXIST;
 825         }
 826
 827         return kvm_mips_emulation_init(&kvm_mips_callbacks);
 828 }
 829
 830 void kvm_arch_exit(void)
 831 {
 832         kvm_mips_callbacks = NULL;
 833 }
 834
 835 int kvm_arch_vcpu_ioctl_get_sregs(struct kvm_vcpu *vcpu,
 836                                   struct kvm_sregs *sregs)
 837 {
 838         return -ENOIOCTLCMD;
 839 }
 840
 841 int kvm_arch_vcpu_ioctl_set_sregs(struct kvm_vcpu *vcpu,
 842                                   struct kvm_sregs *sregs)
 843 {
 844         return -ENOIOCTLCMD;
 845 }
 846
 847 void kvm_arch_vcpu_postcreate(struct kvm_vcpu *vcpu)
 848 {
 849 }
 850
 851 int kvm_arch_vcpu_ioctl_get_fpu(struct kvm_vcpu *vcpu, struct kvm_fpu *fpu)
 852 {
 853         return -ENOIOCTLCMD;
 854 }
 855
 856 int kvm_arch_vcpu_ioctl_set_fpu(struct kvm_vcpu *vcpu, struct kvm_fpu *fpu)
 857 {
 858         return -ENOIOCTLCMD;
 859 }
 860
 861 int kvm_arch_vcpu_fault(struct kvm_vcpu *vcpu, struct vm_fault *vmf)
 862 {
 863         return VM_FAULT_SIGBUS;
 864 }
 865
 866 int kvm_vm_ioctl_check_extension(struct kvm *kvm, long ext)
 867 {
 868         int r;
 869
 870         switch (ext) {
 871         case KVM_CAP_ONE_REG:
 872                 r = 1;
 873                 break;
 874         case KVM_CAP_COALESCED_MMIO:
 875                 r = KVM_COALESCED_MMIO_PAGE_OFFSET;
 876                 break;
 877         default:
 878                 r = 0;
 879                 break;
 880         }
 881         return r;
 882 }
 883
 884 int kvm_cpu_has_pending_timer(struct kvm_vcpu *vcpu)
 885 {
 886         return kvm_mips_pending_timer(vcpu);
 887 }
 888
 889 int kvm_arch_vcpu_dump_regs(struct kvm_vcpu *vcpu)
 890 {
 891         int i;
 892         struct mips_coproc *cop0;
 893
 894         if (!vcpu)
 895                 return -1;
 896
 897         kvm_debug("VCPU Register Dump:\n");
 898         kvm_debug("\tpc = 0x%08lx\n", vcpu->arch.pc);
 899         kvm_debug("\texceptions: %08lx\n", vcpu->arch.pending_exceptions);
 900
 901         for (i = 0; i < 32; i += 4) {
 902                 kvm_debug("\tgpr%02d: %08lx %08lx %08lx %08lx\n", i,
 903                        vcpu->arch.gprs[i],
 904                        vcpu->arch.gprs[i + 1],
 905                        vcpu->arch.gprs[i + 2], vcpu->arch.gprs[i + 3]);
 906         }
 907         kvm_debug("\thi: 0x%08lx\n", vcpu->arch.hi);
 908         kvm_debug("\tlo: 0x%08lx\n", vcpu->arch.lo);
 909
 910         cop0 = vcpu->arch.cop0;
 911         kvm_debug("\tStatus: 0x%08lx, Cause: 0x%08lx\n",
 912                   kvm_read_c0_guest_status(cop0),
 913                   kvm_read_c0_guest_cause(cop0));
 914
 915         kvm_debug("\tEPC: 0x%08lx\n", kvm_read_c0_guest_epc(cop0));
 916
 917         return 0;
 918 }
 919
 920 int kvm_arch_vcpu_ioctl_set_regs(struct kvm_vcpu *vcpu, struct kvm_regs *regs)
 921 {
 922         int i;
 923
 924         for (i = 1; i < ARRAY_SIZE(vcpu->arch.gprs); i++)
 925                 vcpu->arch.gprs[i] = regs->gpr[i];
 926         vcpu->arch.gprs[0] = 0; /* zero is special, and cannot be set. */
 927         vcpu->arch.hi = regs->hi;
 928         vcpu->arch.lo = regs->lo;
 929         vcpu->arch.pc = regs->pc;
 930
 931         return 0;
 932 }
 933
 934 int kvm_arch_vcpu_ioctl_get_regs(struct kvm_vcpu *vcpu, struct kvm_regs *regs)
 935 {
 936         int i;
 937
 938         for (i = 0; i < ARRAY_SIZE(vcpu->arch.gprs); i++)
 939                 regs->gpr[i] = vcpu->arch.gprs[i];
 940
 941         regs->hi = vcpu->arch.hi;
 942         regs->lo = vcpu->arch.lo;
 943         regs->pc = vcpu->arch.pc;
 944
 945         return 0;
 946 }
 947
 948 static void kvm_mips_comparecount_func(unsigned long data)
 949 {
 950         struct kvm_vcpu *vcpu = (struct kvm_vcpu *)data;
 951
 952         kvm_mips_callbacks->queue_timer_int(vcpu);
 953
 954         vcpu->arch.wait = 0;
 955         if (waitqueue_active(&vcpu->wq))
 956                 wake_up_interruptible(&vcpu->wq);
 957 }
 958
 959 /* low level hrtimer wake routine */
 960 static enum hrtimer_restart kvm_mips_comparecount_wakeup(struct hrtimer *timer)
 961 {
 962         struct kvm_vcpu *vcpu;
 963
 964         vcpu = container_of(timer, struct kvm_vcpu, arch.comparecount_timer);
 965         kvm_mips_comparecount_func((unsigned long) vcpu);
 966         return kvm_mips_count_timeout(vcpu);
 967 }
 968
 969 int kvm_arch_vcpu_init(struct kvm_vcpu *vcpu)
 970 {
 971         kvm_mips_callbacks->vcpu_init(vcpu);
 972         hrtimer_init(&vcpu->arch.comparecount_timer, CLOCK_MONOTONIC,
 973                      HRTIMER_MODE_REL);
 974         vcpu->arch.comparecount_timer.function = kvm_mips_comparecount_wakeup;
 975         return 0;
 976 }
 977
 978 int kvm_arch_vcpu_ioctl_translate(struct kvm_vcpu *vcpu,
 979                                   struct kvm_translation *tr)
 980 {
 981         return 0;
 982 }
 983
 984 /* Initial guest state */
 985 int kvm_arch_vcpu_setup(struct kvm_vcpu *vcpu)
 986 {
 987         return kvm_mips_callbacks->vcpu_setup(vcpu);
 988 }
 989
 990 static void kvm_mips_set_c0_status(void)
 991 {
 992         uint32_t status = read_c0_status();
 993
 994         if (cpu_has_dsp)
 995                 status |= (ST0_MX);
 996
 997         write_c0_status(status);
 998         ehb();
 999 }
1000
1001 /*
1002  * Return value is in the form (errcode<<2 | RESUME_FLAG_HOST | RESUME_FLAG_NV)
1003  */
1004 int kvm_mips_handle_exit(struct kvm_run *run, struct kvm_vcpu *vcpu)
1005 {
1006         uint32_t cause = vcpu->arch.host_cp0_cause;
1007         uint32_t exccode = (cause >> CAUSEB_EXCCODE) & 0x1f;
1008         uint32_t __user *opc = (uint32_t __user *) vcpu->arch.pc;
1009         unsigned long badvaddr = vcpu->arch.host_cp0_badvaddr;
1010         enum emulation_result er = EMULATE_DONE;
1011         int ret = RESUME_GUEST;
1012
1013         /* re-enable HTW before enabling interrupts */
1014         htw_start();
1015
1016         /* Set a default exit reason */
1017         run->exit_reason = KVM_EXIT_UNKNOWN;
1018         run->ready_for_interrupt_injection = 1;
1019
1020         /*
1021          * Set the appropriate status bits based on host CPU features,
1022          * before we hit the scheduler
1023          */
1024         kvm_mips_set_c0_status();
1025
1026         local_irq_enable();
1027
1028         kvm_debug("kvm_mips_handle_exit: cause: %#x, PC: %p, kvm_run: %p, kvm_vcpu: %p\n",
1029                         cause, opc, run, vcpu);
1030
1031         /*
1032          * Do a privilege check, if in UM most of these exit conditions end up
1033          * causing an exception to be delivered to the Guest Kernel
1034          */
1035         er = kvm_mips_check_privilege(cause, opc, run, vcpu);
1036         if (er == EMULATE_PRIV_FAIL) {
1037                 goto skip_emul;
1038         } else if (er == EMULATE_FAIL) {
1039                 run->exit_reason = KVM_EXIT_INTERNAL_ERROR;
1040                 ret = RESUME_HOST;
1041                 goto skip_emul;
1042         }
1043
1044         switch (exccode) {
1045         case T_INT:
1046                 kvm_debug("[%d]T_INT @ %p\n", vcpu->vcpu_id, opc);
1047
1048                 ++vcpu->stat.int_exits;
1049                 trace_kvm_exit(vcpu, INT_EXITS);
1050
1051                 if (need_resched())
1052                         cond_resched();
1053
1054                 ret = RESUME_GUEST;
1055                 break;
1056
1057         case T_COP_UNUSABLE:
1058                 kvm_debug("T_COP_UNUSABLE: @ PC: %p\n", opc);
1059
1060                 ++vcpu->stat.cop_unusable_exits;
1061                 trace_kvm_exit(vcpu, COP_UNUSABLE_EXITS);
1062                 ret = kvm_mips_callbacks->handle_cop_unusable(vcpu);
1063                 /* XXXKYMA: Might need to return to user space */
1064                 if (run->exit_reason == KVM_EXIT_IRQ_WINDOW_OPEN)
1065                         ret = RESUME_HOST;
1066                 break;
1067
1068         case T_TLB_MOD:
1069                 ++vcpu->stat.tlbmod_exits;
1070                 trace_kvm_exit(vcpu, TLBMOD_EXITS);
1071                 ret = kvm_mips_callbacks->handle_tlb_mod(vcpu);
1072                 break;
1073
1074         case T_TLB_ST_MISS:
1075                 kvm_debug("TLB ST fault:  cause %#x, status %#lx, PC: %p, BadVaddr: %#lx\n",
1076                           cause, kvm_read_c0_guest_status(vcpu->arch.cop0), opc,
1077                           badvaddr);
1078
1079                 ++vcpu->stat.tlbmiss_st_exits;
1080                 trace_kvm_exit(vcpu, TLBMISS_ST_EXITS);
1081                 ret = kvm_mips_callbacks->handle_tlb_st_miss(vcpu);
1082                 break;
1083
1084         case T_TLB_LD_MISS:
1085                 kvm_debug("TLB LD fault: cause %#x, PC: %p, BadVaddr: %#lx\n",
1086                           cause, opc, badvaddr);
1087
1088                 ++vcpu->stat.tlbmiss_ld_exits;
1089                 trace_kvm_exit(vcpu, TLBMISS_LD_EXITS);
1090                 ret = kvm_mips_callbacks->handle_tlb_ld_miss(vcpu);
1091                 break;
1092
1093         case T_ADDR_ERR_ST:
1094                 ++vcpu->stat.addrerr_st_exits;
1095                 trace_kvm_exit(vcpu, ADDRERR_ST_EXITS);
1096                 ret = kvm_mips_callbacks->handle_addr_err_st(vcpu);
1097                 break;
1098
1099         case T_ADDR_ERR_LD:
1100                 ++vcpu->stat.addrerr_ld_exits;
1101                 trace_kvm_exit(vcpu, ADDRERR_LD_EXITS);
1102                 ret = kvm_mips_callbacks->handle_addr_err_ld(vcpu);
1103                 break;
1104
1105         case T_SYSCALL:
1106                 ++vcpu->stat.syscall_exits;
1107                 trace_kvm_exit(vcpu, SYSCALL_EXITS);
1108                 ret = kvm_mips_callbacks->handle_syscall(vcpu);
1109                 break;
1110
1111         case T_RES_INST:
1112                 ++vcpu->stat.resvd_inst_exits;
1113                 trace_kvm_exit(vcpu, RESVD_INST_EXITS);
1114                 ret = kvm_mips_callbacks->handle_res_inst(vcpu);
1115                 break;
1116
1117         case T_BREAK:
1118                 ++vcpu->stat.break_inst_exits;
1119                 trace_kvm_exit(vcpu, BREAK_INST_EXITS);
1120                 ret = kvm_mips_callbacks->handle_break(vcpu);
1121                 break;
1122
1123         case T_TRAP:
1124                 ++vcpu->stat.trap_inst_exits;
1125                 trace_kvm_exit(vcpu, TRAP_INST_EXITS);
1126                 ret = kvm_mips_callbacks->handle_trap(vcpu);
1127                 break;
1128
1129         case T_MSADIS:
1130                 ret = kvm_mips_callbacks->handle_msa_disabled(vcpu);
1131                 break;
1132
1133         default:
1134                 kvm_err("Exception Code: %d, not yet handled, @ PC: %p, inst: 0x%08x  BadVaddr: %#lx Status: %#lx\n",
1135                         exccode, opc, kvm_get_inst(opc, vcpu), badvaddr,
1136                         kvm_read_c0_guest_status(vcpu->arch.cop0));
1137                 kvm_arch_vcpu_dump_regs(vcpu);
1138                 run->exit_reason = KVM_EXIT_INTERNAL_ERROR;
1139                 ret = RESUME_HOST;
1140                 break;
1141
1142         }
1143
1144 skip_emul:
1145         local_irq_disable();
1146
1147         if (er == EMULATE_DONE && !(ret & RESUME_HOST))
1148                 kvm_mips_deliver_interrupts(vcpu, cause);
1149
1150         if (!(ret & RESUME_HOST)) {
1151                 /* Only check for signals if not already exiting to userspace */
1152                 if (signal_pending(current)) {
1153                         run->exit_reason = KVM_EXIT_INTR;
1154                         ret = (-EINTR << 2) | RESUME_HOST;
1155                         ++vcpu->stat.signal_exits;
1156                         trace_kvm_exit(vcpu, SIGNAL_EXITS);
1157                 }
1158         }
1159
1160         /* Disable HTW before returning to guest or host */
1161         htw_stop();
1162
1163         return ret;
1164 }
1165
1166 int __init kvm_mips_init(void)
1167 {
1168         int ret;
1169
1170         ret = kvm_init(NULL, sizeof(struct kvm_vcpu), 0, THIS_MODULE);
1171
1172         if (ret)
1173                 return ret;
1174
1175         /*
1176          * On MIPS, kernel modules are executed from "mapped space", which
1177          * requires TLBs. The TLB handling code is statically linked with
1178          * the rest of the kernel (tlb.c) to avoid the possibility of
1179          * double faulting. The issue is that the TLB code references
1180          * routines that are part of the the KVM module, which are only
1181          * available once the module is loaded.
1182          */
1183         kvm_mips_gfn_to_pfn = gfn_to_pfn;
1184         kvm_mips_release_pfn_clean = kvm_release_pfn_clean;
1185         kvm_mips_is_error_pfn = is_error_pfn;
1186
1187         pr_info("KVM/MIPS Initialized\n");
1188         return 0;
1189 }
1190
1191 void __exit kvm_mips_exit(void)
1192 {
1193         kvm_exit();
1194
1195         kvm_mips_gfn_to_pfn = NULL;
1196         kvm_mips_release_pfn_clean = NULL;
1197         kvm_mips_is_error_pfn = NULL;
1198
1199         pr_info("KVM/MIPS unloaded\n");
1200 }
1201
1202 module_init(kvm_mips_init);
1203 module_exit(kvm_mips_exit);
1204
1205 EXPORT_TRACEPOINT_SYMBOL(kvm_exit);