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