KVM: stats: Support linear and logarithmic histogram statistics
[linux-2.6-microblaze.git] / arch / powerpc / kvm / book3s.c
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3  * Copyright (C) 2009. SUSE Linux Products GmbH. All rights reserved.
4  *
5  * Authors:
6  *    Alexander Graf <agraf@suse.de>
7  *    Kevin Wolf <mail@kevin-wolf.de>
8  *
9  * Description:
10  * This file is derived from arch/powerpc/kvm/44x.c,
11  * by Hollis Blanchard <hollisb@us.ibm.com>.
12  */
13
14 #include <linux/kvm_host.h>
15 #include <linux/err.h>
16 #include <linux/export.h>
17 #include <linux/slab.h>
18 #include <linux/module.h>
19 #include <linux/miscdevice.h>
20 #include <linux/gfp.h>
21 #include <linux/sched.h>
22 #include <linux/vmalloc.h>
23 #include <linux/highmem.h>
24
25 #include <asm/reg.h>
26 #include <asm/cputable.h>
27 #include <asm/cacheflush.h>
28 #include <linux/uaccess.h>
29 #include <asm/io.h>
30 #include <asm/kvm_ppc.h>
31 #include <asm/kvm_book3s.h>
32 #include <asm/mmu_context.h>
33 #include <asm/page.h>
34 #include <asm/xive.h>
35
36 #include "book3s.h"
37 #include "trace.h"
38
39 /* #define EXIT_DEBUG */
40
41 const struct _kvm_stats_desc kvm_vm_stats_desc[] = {
42         KVM_GENERIC_VM_STATS(),
43         STATS_DESC_ICOUNTER(VM, num_2M_pages),
44         STATS_DESC_ICOUNTER(VM, num_1G_pages)
45 };
46
47 const struct kvm_stats_header kvm_vm_stats_header = {
48         .name_size = KVM_STATS_NAME_SIZE,
49         .num_desc = ARRAY_SIZE(kvm_vm_stats_desc),
50         .id_offset = sizeof(struct kvm_stats_header),
51         .desc_offset = sizeof(struct kvm_stats_header) + KVM_STATS_NAME_SIZE,
52         .data_offset = sizeof(struct kvm_stats_header) + KVM_STATS_NAME_SIZE +
53                        sizeof(kvm_vm_stats_desc),
54 };
55
56 const struct _kvm_stats_desc kvm_vcpu_stats_desc[] = {
57         KVM_GENERIC_VCPU_STATS(),
58         STATS_DESC_COUNTER(VCPU, sum_exits),
59         STATS_DESC_COUNTER(VCPU, mmio_exits),
60         STATS_DESC_COUNTER(VCPU, signal_exits),
61         STATS_DESC_COUNTER(VCPU, light_exits),
62         STATS_DESC_COUNTER(VCPU, itlb_real_miss_exits),
63         STATS_DESC_COUNTER(VCPU, itlb_virt_miss_exits),
64         STATS_DESC_COUNTER(VCPU, dtlb_real_miss_exits),
65         STATS_DESC_COUNTER(VCPU, dtlb_virt_miss_exits),
66         STATS_DESC_COUNTER(VCPU, syscall_exits),
67         STATS_DESC_COUNTER(VCPU, isi_exits),
68         STATS_DESC_COUNTER(VCPU, dsi_exits),
69         STATS_DESC_COUNTER(VCPU, emulated_inst_exits),
70         STATS_DESC_COUNTER(VCPU, dec_exits),
71         STATS_DESC_COUNTER(VCPU, ext_intr_exits),
72         STATS_DESC_TIME_NSEC(VCPU, halt_wait_ns),
73         STATS_DESC_COUNTER(VCPU, halt_successful_wait),
74         STATS_DESC_COUNTER(VCPU, dbell_exits),
75         STATS_DESC_COUNTER(VCPU, gdbell_exits),
76         STATS_DESC_COUNTER(VCPU, ld),
77         STATS_DESC_COUNTER(VCPU, st),
78         STATS_DESC_COUNTER(VCPU, pf_storage),
79         STATS_DESC_COUNTER(VCPU, pf_instruc),
80         STATS_DESC_COUNTER(VCPU, sp_storage),
81         STATS_DESC_COUNTER(VCPU, sp_instruc),
82         STATS_DESC_COUNTER(VCPU, queue_intr),
83         STATS_DESC_COUNTER(VCPU, ld_slow),
84         STATS_DESC_COUNTER(VCPU, st_slow),
85         STATS_DESC_COUNTER(VCPU, pthru_all),
86         STATS_DESC_COUNTER(VCPU, pthru_host),
87         STATS_DESC_COUNTER(VCPU, pthru_bad_aff)
88 };
89
90 const struct kvm_stats_header kvm_vcpu_stats_header = {
91         .name_size = KVM_STATS_NAME_SIZE,
92         .num_desc = ARRAY_SIZE(kvm_vcpu_stats_desc),
93         .id_offset = sizeof(struct kvm_stats_header),
94         .desc_offset = sizeof(struct kvm_stats_header) + KVM_STATS_NAME_SIZE,
95         .data_offset = sizeof(struct kvm_stats_header) + KVM_STATS_NAME_SIZE +
96                        sizeof(kvm_vcpu_stats_desc),
97 };
98
99 static inline void kvmppc_update_int_pending(struct kvm_vcpu *vcpu,
100                         unsigned long pending_now, unsigned long old_pending)
101 {
102         if (is_kvmppc_hv_enabled(vcpu->kvm))
103                 return;
104         if (pending_now)
105                 kvmppc_set_int_pending(vcpu, 1);
106         else if (old_pending)
107                 kvmppc_set_int_pending(vcpu, 0);
108 }
109
110 static inline bool kvmppc_critical_section(struct kvm_vcpu *vcpu)
111 {
112         ulong crit_raw;
113         ulong crit_r1;
114         bool crit;
115
116         if (is_kvmppc_hv_enabled(vcpu->kvm))
117                 return false;
118
119         crit_raw = kvmppc_get_critical(vcpu);
120         crit_r1 = kvmppc_get_gpr(vcpu, 1);
121
122         /* Truncate crit indicators in 32 bit mode */
123         if (!(kvmppc_get_msr(vcpu) & MSR_SF)) {
124                 crit_raw &= 0xffffffff;
125                 crit_r1 &= 0xffffffff;
126         }
127
128         /* Critical section when crit == r1 */
129         crit = (crit_raw == crit_r1);
130         /* ... and we're in supervisor mode */
131         crit = crit && !(kvmppc_get_msr(vcpu) & MSR_PR);
132
133         return crit;
134 }
135
136 void kvmppc_inject_interrupt(struct kvm_vcpu *vcpu, int vec, u64 flags)
137 {
138         vcpu->kvm->arch.kvm_ops->inject_interrupt(vcpu, vec, flags);
139 }
140
141 static int kvmppc_book3s_vec2irqprio(unsigned int vec)
142 {
143         unsigned int prio;
144
145         switch (vec) {
146         case 0x100: prio = BOOK3S_IRQPRIO_SYSTEM_RESET;         break;
147         case 0x200: prio = BOOK3S_IRQPRIO_MACHINE_CHECK;        break;
148         case 0x300: prio = BOOK3S_IRQPRIO_DATA_STORAGE;         break;
149         case 0x380: prio = BOOK3S_IRQPRIO_DATA_SEGMENT;         break;
150         case 0x400: prio = BOOK3S_IRQPRIO_INST_STORAGE;         break;
151         case 0x480: prio = BOOK3S_IRQPRIO_INST_SEGMENT;         break;
152         case 0x500: prio = BOOK3S_IRQPRIO_EXTERNAL;             break;
153         case 0x600: prio = BOOK3S_IRQPRIO_ALIGNMENT;            break;
154         case 0x700: prio = BOOK3S_IRQPRIO_PROGRAM;              break;
155         case 0x800: prio = BOOK3S_IRQPRIO_FP_UNAVAIL;           break;
156         case 0x900: prio = BOOK3S_IRQPRIO_DECREMENTER;          break;
157         case 0xc00: prio = BOOK3S_IRQPRIO_SYSCALL;              break;
158         case 0xd00: prio = BOOK3S_IRQPRIO_DEBUG;                break;
159         case 0xf20: prio = BOOK3S_IRQPRIO_ALTIVEC;              break;
160         case 0xf40: prio = BOOK3S_IRQPRIO_VSX;                  break;
161         case 0xf60: prio = BOOK3S_IRQPRIO_FAC_UNAVAIL;          break;
162         default:    prio = BOOK3S_IRQPRIO_MAX;                  break;
163         }
164
165         return prio;
166 }
167
168 void kvmppc_book3s_dequeue_irqprio(struct kvm_vcpu *vcpu,
169                                           unsigned int vec)
170 {
171         unsigned long old_pending = vcpu->arch.pending_exceptions;
172
173         clear_bit(kvmppc_book3s_vec2irqprio(vec),
174                   &vcpu->arch.pending_exceptions);
175
176         kvmppc_update_int_pending(vcpu, vcpu->arch.pending_exceptions,
177                                   old_pending);
178 }
179
180 void kvmppc_book3s_queue_irqprio(struct kvm_vcpu *vcpu, unsigned int vec)
181 {
182         vcpu->stat.queue_intr++;
183
184         set_bit(kvmppc_book3s_vec2irqprio(vec),
185                 &vcpu->arch.pending_exceptions);
186 #ifdef EXIT_DEBUG
187         printk(KERN_INFO "Queueing interrupt %x\n", vec);
188 #endif
189 }
190 EXPORT_SYMBOL_GPL(kvmppc_book3s_queue_irqprio);
191
192 void kvmppc_core_queue_machine_check(struct kvm_vcpu *vcpu, ulong flags)
193 {
194         /* might as well deliver this straight away */
195         kvmppc_inject_interrupt(vcpu, BOOK3S_INTERRUPT_MACHINE_CHECK, flags);
196 }
197 EXPORT_SYMBOL_GPL(kvmppc_core_queue_machine_check);
198
199 void kvmppc_core_queue_syscall(struct kvm_vcpu *vcpu)
200 {
201         kvmppc_inject_interrupt(vcpu, BOOK3S_INTERRUPT_SYSCALL, 0);
202 }
203 EXPORT_SYMBOL(kvmppc_core_queue_syscall);
204
205 void kvmppc_core_queue_program(struct kvm_vcpu *vcpu, ulong flags)
206 {
207         /* might as well deliver this straight away */
208         kvmppc_inject_interrupt(vcpu, BOOK3S_INTERRUPT_PROGRAM, flags);
209 }
210 EXPORT_SYMBOL_GPL(kvmppc_core_queue_program);
211
212 void kvmppc_core_queue_fpunavail(struct kvm_vcpu *vcpu)
213 {
214         /* might as well deliver this straight away */
215         kvmppc_inject_interrupt(vcpu, BOOK3S_INTERRUPT_FP_UNAVAIL, 0);
216 }
217
218 void kvmppc_core_queue_vec_unavail(struct kvm_vcpu *vcpu)
219 {
220         /* might as well deliver this straight away */
221         kvmppc_inject_interrupt(vcpu, BOOK3S_INTERRUPT_ALTIVEC, 0);
222 }
223
224 void kvmppc_core_queue_vsx_unavail(struct kvm_vcpu *vcpu)
225 {
226         /* might as well deliver this straight away */
227         kvmppc_inject_interrupt(vcpu, BOOK3S_INTERRUPT_VSX, 0);
228 }
229
230 void kvmppc_core_queue_dec(struct kvm_vcpu *vcpu)
231 {
232         kvmppc_book3s_queue_irqprio(vcpu, BOOK3S_INTERRUPT_DECREMENTER);
233 }
234 EXPORT_SYMBOL_GPL(kvmppc_core_queue_dec);
235
236 int kvmppc_core_pending_dec(struct kvm_vcpu *vcpu)
237 {
238         return test_bit(BOOK3S_IRQPRIO_DECREMENTER, &vcpu->arch.pending_exceptions);
239 }
240 EXPORT_SYMBOL_GPL(kvmppc_core_pending_dec);
241
242 void kvmppc_core_dequeue_dec(struct kvm_vcpu *vcpu)
243 {
244         kvmppc_book3s_dequeue_irqprio(vcpu, BOOK3S_INTERRUPT_DECREMENTER);
245 }
246 EXPORT_SYMBOL_GPL(kvmppc_core_dequeue_dec);
247
248 void kvmppc_core_queue_external(struct kvm_vcpu *vcpu,
249                                 struct kvm_interrupt *irq)
250 {
251         /*
252          * This case (KVM_INTERRUPT_SET) should never actually arise for
253          * a pseries guest (because pseries guests expect their interrupt
254          * controllers to continue asserting an external interrupt request
255          * until it is acknowledged at the interrupt controller), but is
256          * included to avoid ABI breakage and potentially for other
257          * sorts of guest.
258          *
259          * There is a subtlety here: HV KVM does not test the
260          * external_oneshot flag in the code that synthesizes
261          * external interrupts for the guest just before entering
262          * the guest.  That is OK even if userspace did do a
263          * KVM_INTERRUPT_SET on a pseries guest vcpu, because the
264          * caller (kvm_vcpu_ioctl_interrupt) does a kvm_vcpu_kick()
265          * which ends up doing a smp_send_reschedule(), which will
266          * pull the guest all the way out to the host, meaning that
267          * we will call kvmppc_core_prepare_to_enter() before entering
268          * the guest again, and that will handle the external_oneshot
269          * flag correctly.
270          */
271         if (irq->irq == KVM_INTERRUPT_SET)
272                 vcpu->arch.external_oneshot = 1;
273
274         kvmppc_book3s_queue_irqprio(vcpu, BOOK3S_INTERRUPT_EXTERNAL);
275 }
276
277 void kvmppc_core_dequeue_external(struct kvm_vcpu *vcpu)
278 {
279         kvmppc_book3s_dequeue_irqprio(vcpu, BOOK3S_INTERRUPT_EXTERNAL);
280 }
281
282 void kvmppc_core_queue_data_storage(struct kvm_vcpu *vcpu, ulong dar,
283                                     ulong flags)
284 {
285         kvmppc_set_dar(vcpu, dar);
286         kvmppc_set_dsisr(vcpu, flags);
287         kvmppc_inject_interrupt(vcpu, BOOK3S_INTERRUPT_DATA_STORAGE, 0);
288 }
289 EXPORT_SYMBOL_GPL(kvmppc_core_queue_data_storage);
290
291 void kvmppc_core_queue_inst_storage(struct kvm_vcpu *vcpu, ulong flags)
292 {
293         kvmppc_inject_interrupt(vcpu, BOOK3S_INTERRUPT_INST_STORAGE, flags);
294 }
295 EXPORT_SYMBOL_GPL(kvmppc_core_queue_inst_storage);
296
297 static int kvmppc_book3s_irqprio_deliver(struct kvm_vcpu *vcpu,
298                                          unsigned int priority)
299 {
300         int deliver = 1;
301         int vec = 0;
302         bool crit = kvmppc_critical_section(vcpu);
303
304         switch (priority) {
305         case BOOK3S_IRQPRIO_DECREMENTER:
306                 deliver = (kvmppc_get_msr(vcpu) & MSR_EE) && !crit;
307                 vec = BOOK3S_INTERRUPT_DECREMENTER;
308                 break;
309         case BOOK3S_IRQPRIO_EXTERNAL:
310                 deliver = (kvmppc_get_msr(vcpu) & MSR_EE) && !crit;
311                 vec = BOOK3S_INTERRUPT_EXTERNAL;
312                 break;
313         case BOOK3S_IRQPRIO_SYSTEM_RESET:
314                 vec = BOOK3S_INTERRUPT_SYSTEM_RESET;
315                 break;
316         case BOOK3S_IRQPRIO_MACHINE_CHECK:
317                 vec = BOOK3S_INTERRUPT_MACHINE_CHECK;
318                 break;
319         case BOOK3S_IRQPRIO_DATA_STORAGE:
320                 vec = BOOK3S_INTERRUPT_DATA_STORAGE;
321                 break;
322         case BOOK3S_IRQPRIO_INST_STORAGE:
323                 vec = BOOK3S_INTERRUPT_INST_STORAGE;
324                 break;
325         case BOOK3S_IRQPRIO_DATA_SEGMENT:
326                 vec = BOOK3S_INTERRUPT_DATA_SEGMENT;
327                 break;
328         case BOOK3S_IRQPRIO_INST_SEGMENT:
329                 vec = BOOK3S_INTERRUPT_INST_SEGMENT;
330                 break;
331         case BOOK3S_IRQPRIO_ALIGNMENT:
332                 vec = BOOK3S_INTERRUPT_ALIGNMENT;
333                 break;
334         case BOOK3S_IRQPRIO_PROGRAM:
335                 vec = BOOK3S_INTERRUPT_PROGRAM;
336                 break;
337         case BOOK3S_IRQPRIO_VSX:
338                 vec = BOOK3S_INTERRUPT_VSX;
339                 break;
340         case BOOK3S_IRQPRIO_ALTIVEC:
341                 vec = BOOK3S_INTERRUPT_ALTIVEC;
342                 break;
343         case BOOK3S_IRQPRIO_FP_UNAVAIL:
344                 vec = BOOK3S_INTERRUPT_FP_UNAVAIL;
345                 break;
346         case BOOK3S_IRQPRIO_SYSCALL:
347                 vec = BOOK3S_INTERRUPT_SYSCALL;
348                 break;
349         case BOOK3S_IRQPRIO_DEBUG:
350                 vec = BOOK3S_INTERRUPT_TRACE;
351                 break;
352         case BOOK3S_IRQPRIO_PERFORMANCE_MONITOR:
353                 vec = BOOK3S_INTERRUPT_PERFMON;
354                 break;
355         case BOOK3S_IRQPRIO_FAC_UNAVAIL:
356                 vec = BOOK3S_INTERRUPT_FAC_UNAVAIL;
357                 break;
358         default:
359                 deliver = 0;
360                 printk(KERN_ERR "KVM: Unknown interrupt: 0x%x\n", priority);
361                 break;
362         }
363
364 #if 0
365         printk(KERN_INFO "Deliver interrupt 0x%x? %x\n", vec, deliver);
366 #endif
367
368         if (deliver)
369                 kvmppc_inject_interrupt(vcpu, vec, 0);
370
371         return deliver;
372 }
373
374 /*
375  * This function determines if an irqprio should be cleared once issued.
376  */
377 static bool clear_irqprio(struct kvm_vcpu *vcpu, unsigned int priority)
378 {
379         switch (priority) {
380                 case BOOK3S_IRQPRIO_DECREMENTER:
381                         /* DEC interrupts get cleared by mtdec */
382                         return false;
383                 case BOOK3S_IRQPRIO_EXTERNAL:
384                         /*
385                          * External interrupts get cleared by userspace
386                          * except when set by the KVM_INTERRUPT ioctl with
387                          * KVM_INTERRUPT_SET (not KVM_INTERRUPT_SET_LEVEL).
388                          */
389                         if (vcpu->arch.external_oneshot) {
390                                 vcpu->arch.external_oneshot = 0;
391                                 return true;
392                         }
393                         return false;
394         }
395
396         return true;
397 }
398
399 int kvmppc_core_prepare_to_enter(struct kvm_vcpu *vcpu)
400 {
401         unsigned long *pending = &vcpu->arch.pending_exceptions;
402         unsigned long old_pending = vcpu->arch.pending_exceptions;
403         unsigned int priority;
404
405 #ifdef EXIT_DEBUG
406         if (vcpu->arch.pending_exceptions)
407                 printk(KERN_EMERG "KVM: Check pending: %lx\n", vcpu->arch.pending_exceptions);
408 #endif
409         priority = __ffs(*pending);
410         while (priority < BOOK3S_IRQPRIO_MAX) {
411                 if (kvmppc_book3s_irqprio_deliver(vcpu, priority) &&
412                     clear_irqprio(vcpu, priority)) {
413                         clear_bit(priority, &vcpu->arch.pending_exceptions);
414                         break;
415                 }
416
417                 priority = find_next_bit(pending,
418                                          BITS_PER_BYTE * sizeof(*pending),
419                                          priority + 1);
420         }
421
422         /* Tell the guest about our interrupt status */
423         kvmppc_update_int_pending(vcpu, *pending, old_pending);
424
425         return 0;
426 }
427 EXPORT_SYMBOL_GPL(kvmppc_core_prepare_to_enter);
428
429 kvm_pfn_t kvmppc_gpa_to_pfn(struct kvm_vcpu *vcpu, gpa_t gpa, bool writing,
430                         bool *writable)
431 {
432         ulong mp_pa = vcpu->arch.magic_page_pa & KVM_PAM;
433         gfn_t gfn = gpa >> PAGE_SHIFT;
434
435         if (!(kvmppc_get_msr(vcpu) & MSR_SF))
436                 mp_pa = (uint32_t)mp_pa;
437
438         /* Magic page override */
439         gpa &= ~0xFFFULL;
440         if (unlikely(mp_pa) && unlikely((gpa & KVM_PAM) == mp_pa)) {
441                 ulong shared_page = ((ulong)vcpu->arch.shared) & PAGE_MASK;
442                 kvm_pfn_t pfn;
443
444                 pfn = (kvm_pfn_t)virt_to_phys((void*)shared_page) >> PAGE_SHIFT;
445                 get_page(pfn_to_page(pfn));
446                 if (writable)
447                         *writable = true;
448                 return pfn;
449         }
450
451         return gfn_to_pfn_prot(vcpu->kvm, gfn, writing, writable);
452 }
453 EXPORT_SYMBOL_GPL(kvmppc_gpa_to_pfn);
454
455 int kvmppc_xlate(struct kvm_vcpu *vcpu, ulong eaddr, enum xlate_instdata xlid,
456                  enum xlate_readwrite xlrw, struct kvmppc_pte *pte)
457 {
458         bool data = (xlid == XLATE_DATA);
459         bool iswrite = (xlrw == XLATE_WRITE);
460         int relocated = (kvmppc_get_msr(vcpu) & (data ? MSR_DR : MSR_IR));
461         int r;
462
463         if (relocated) {
464                 r = vcpu->arch.mmu.xlate(vcpu, eaddr, pte, data, iswrite);
465         } else {
466                 pte->eaddr = eaddr;
467                 pte->raddr = eaddr & KVM_PAM;
468                 pte->vpage = VSID_REAL | eaddr >> 12;
469                 pte->may_read = true;
470                 pte->may_write = true;
471                 pte->may_execute = true;
472                 r = 0;
473
474                 if ((kvmppc_get_msr(vcpu) & (MSR_IR | MSR_DR)) == MSR_DR &&
475                     !data) {
476                         if ((vcpu->arch.hflags & BOOK3S_HFLAG_SPLIT_HACK) &&
477                             ((eaddr & SPLIT_HACK_MASK) == SPLIT_HACK_OFFS))
478                         pte->raddr &= ~SPLIT_HACK_MASK;
479                 }
480         }
481
482         return r;
483 }
484
485 int kvmppc_load_last_inst(struct kvm_vcpu *vcpu,
486                 enum instruction_fetch_type type, u32 *inst)
487 {
488         ulong pc = kvmppc_get_pc(vcpu);
489         int r;
490
491         if (type == INST_SC)
492                 pc -= 4;
493
494         r = kvmppc_ld(vcpu, &pc, sizeof(u32), inst, false);
495         if (r == EMULATE_DONE)
496                 return r;
497         else
498                 return EMULATE_AGAIN;
499 }
500 EXPORT_SYMBOL_GPL(kvmppc_load_last_inst);
501
502 int kvmppc_subarch_vcpu_init(struct kvm_vcpu *vcpu)
503 {
504         return 0;
505 }
506
507 void kvmppc_subarch_vcpu_uninit(struct kvm_vcpu *vcpu)
508 {
509 }
510
511 int kvm_arch_vcpu_ioctl_get_sregs(struct kvm_vcpu *vcpu,
512                                   struct kvm_sregs *sregs)
513 {
514         int ret;
515
516         vcpu_load(vcpu);
517         ret = vcpu->kvm->arch.kvm_ops->get_sregs(vcpu, sregs);
518         vcpu_put(vcpu);
519
520         return ret;
521 }
522
523 int kvm_arch_vcpu_ioctl_set_sregs(struct kvm_vcpu *vcpu,
524                                   struct kvm_sregs *sregs)
525 {
526         int ret;
527
528         vcpu_load(vcpu);
529         ret = vcpu->kvm->arch.kvm_ops->set_sregs(vcpu, sregs);
530         vcpu_put(vcpu);
531
532         return ret;
533 }
534
535 int kvm_arch_vcpu_ioctl_get_regs(struct kvm_vcpu *vcpu, struct kvm_regs *regs)
536 {
537         int i;
538
539         regs->pc = kvmppc_get_pc(vcpu);
540         regs->cr = kvmppc_get_cr(vcpu);
541         regs->ctr = kvmppc_get_ctr(vcpu);
542         regs->lr = kvmppc_get_lr(vcpu);
543         regs->xer = kvmppc_get_xer(vcpu);
544         regs->msr = kvmppc_get_msr(vcpu);
545         regs->srr0 = kvmppc_get_srr0(vcpu);
546         regs->srr1 = kvmppc_get_srr1(vcpu);
547         regs->pid = vcpu->arch.pid;
548         regs->sprg0 = kvmppc_get_sprg0(vcpu);
549         regs->sprg1 = kvmppc_get_sprg1(vcpu);
550         regs->sprg2 = kvmppc_get_sprg2(vcpu);
551         regs->sprg3 = kvmppc_get_sprg3(vcpu);
552         regs->sprg4 = kvmppc_get_sprg4(vcpu);
553         regs->sprg5 = kvmppc_get_sprg5(vcpu);
554         regs->sprg6 = kvmppc_get_sprg6(vcpu);
555         regs->sprg7 = kvmppc_get_sprg7(vcpu);
556
557         for (i = 0; i < ARRAY_SIZE(regs->gpr); i++)
558                 regs->gpr[i] = kvmppc_get_gpr(vcpu, i);
559
560         return 0;
561 }
562
563 int kvm_arch_vcpu_ioctl_set_regs(struct kvm_vcpu *vcpu, struct kvm_regs *regs)
564 {
565         int i;
566
567         kvmppc_set_pc(vcpu, regs->pc);
568         kvmppc_set_cr(vcpu, regs->cr);
569         kvmppc_set_ctr(vcpu, regs->ctr);
570         kvmppc_set_lr(vcpu, regs->lr);
571         kvmppc_set_xer(vcpu, regs->xer);
572         kvmppc_set_msr(vcpu, regs->msr);
573         kvmppc_set_srr0(vcpu, regs->srr0);
574         kvmppc_set_srr1(vcpu, regs->srr1);
575         kvmppc_set_sprg0(vcpu, regs->sprg0);
576         kvmppc_set_sprg1(vcpu, regs->sprg1);
577         kvmppc_set_sprg2(vcpu, regs->sprg2);
578         kvmppc_set_sprg3(vcpu, regs->sprg3);
579         kvmppc_set_sprg4(vcpu, regs->sprg4);
580         kvmppc_set_sprg5(vcpu, regs->sprg5);
581         kvmppc_set_sprg6(vcpu, regs->sprg6);
582         kvmppc_set_sprg7(vcpu, regs->sprg7);
583
584         for (i = 0; i < ARRAY_SIZE(regs->gpr); i++)
585                 kvmppc_set_gpr(vcpu, i, regs->gpr[i]);
586
587         return 0;
588 }
589
590 int kvm_arch_vcpu_ioctl_get_fpu(struct kvm_vcpu *vcpu, struct kvm_fpu *fpu)
591 {
592         return -EOPNOTSUPP;
593 }
594
595 int kvm_arch_vcpu_ioctl_set_fpu(struct kvm_vcpu *vcpu, struct kvm_fpu *fpu)
596 {
597         return -EOPNOTSUPP;
598 }
599
600 int kvmppc_get_one_reg(struct kvm_vcpu *vcpu, u64 id,
601                         union kvmppc_one_reg *val)
602 {
603         int r = 0;
604         long int i;
605
606         r = vcpu->kvm->arch.kvm_ops->get_one_reg(vcpu, id, val);
607         if (r == -EINVAL) {
608                 r = 0;
609                 switch (id) {
610                 case KVM_REG_PPC_DAR:
611                         *val = get_reg_val(id, kvmppc_get_dar(vcpu));
612                         break;
613                 case KVM_REG_PPC_DSISR:
614                         *val = get_reg_val(id, kvmppc_get_dsisr(vcpu));
615                         break;
616                 case KVM_REG_PPC_FPR0 ... KVM_REG_PPC_FPR31:
617                         i = id - KVM_REG_PPC_FPR0;
618                         *val = get_reg_val(id, VCPU_FPR(vcpu, i));
619                         break;
620                 case KVM_REG_PPC_FPSCR:
621                         *val = get_reg_val(id, vcpu->arch.fp.fpscr);
622                         break;
623 #ifdef CONFIG_VSX
624                 case KVM_REG_PPC_VSR0 ... KVM_REG_PPC_VSR31:
625                         if (cpu_has_feature(CPU_FTR_VSX)) {
626                                 i = id - KVM_REG_PPC_VSR0;
627                                 val->vsxval[0] = vcpu->arch.fp.fpr[i][0];
628                                 val->vsxval[1] = vcpu->arch.fp.fpr[i][1];
629                         } else {
630                                 r = -ENXIO;
631                         }
632                         break;
633 #endif /* CONFIG_VSX */
634                 case KVM_REG_PPC_DEBUG_INST:
635                         *val = get_reg_val(id, INS_TW);
636                         break;
637 #ifdef CONFIG_KVM_XICS
638                 case KVM_REG_PPC_ICP_STATE:
639                         if (!vcpu->arch.icp && !vcpu->arch.xive_vcpu) {
640                                 r = -ENXIO;
641                                 break;
642                         }
643                         if (xics_on_xive())
644                                 *val = get_reg_val(id, kvmppc_xive_get_icp(vcpu));
645                         else
646                                 *val = get_reg_val(id, kvmppc_xics_get_icp(vcpu));
647                         break;
648 #endif /* CONFIG_KVM_XICS */
649 #ifdef CONFIG_KVM_XIVE
650                 case KVM_REG_PPC_VP_STATE:
651                         if (!vcpu->arch.xive_vcpu) {
652                                 r = -ENXIO;
653                                 break;
654                         }
655                         if (xive_enabled())
656                                 r = kvmppc_xive_native_get_vp(vcpu, val);
657                         else
658                                 r = -ENXIO;
659                         break;
660 #endif /* CONFIG_KVM_XIVE */
661                 case KVM_REG_PPC_FSCR:
662                         *val = get_reg_val(id, vcpu->arch.fscr);
663                         break;
664                 case KVM_REG_PPC_TAR:
665                         *val = get_reg_val(id, vcpu->arch.tar);
666                         break;
667                 case KVM_REG_PPC_EBBHR:
668                         *val = get_reg_val(id, vcpu->arch.ebbhr);
669                         break;
670                 case KVM_REG_PPC_EBBRR:
671                         *val = get_reg_val(id, vcpu->arch.ebbrr);
672                         break;
673                 case KVM_REG_PPC_BESCR:
674                         *val = get_reg_val(id, vcpu->arch.bescr);
675                         break;
676                 case KVM_REG_PPC_IC:
677                         *val = get_reg_val(id, vcpu->arch.ic);
678                         break;
679                 default:
680                         r = -EINVAL;
681                         break;
682                 }
683         }
684
685         return r;
686 }
687
688 int kvmppc_set_one_reg(struct kvm_vcpu *vcpu, u64 id,
689                         union kvmppc_one_reg *val)
690 {
691         int r = 0;
692         long int i;
693
694         r = vcpu->kvm->arch.kvm_ops->set_one_reg(vcpu, id, val);
695         if (r == -EINVAL) {
696                 r = 0;
697                 switch (id) {
698                 case KVM_REG_PPC_DAR:
699                         kvmppc_set_dar(vcpu, set_reg_val(id, *val));
700                         break;
701                 case KVM_REG_PPC_DSISR:
702                         kvmppc_set_dsisr(vcpu, set_reg_val(id, *val));
703                         break;
704                 case KVM_REG_PPC_FPR0 ... KVM_REG_PPC_FPR31:
705                         i = id - KVM_REG_PPC_FPR0;
706                         VCPU_FPR(vcpu, i) = set_reg_val(id, *val);
707                         break;
708                 case KVM_REG_PPC_FPSCR:
709                         vcpu->arch.fp.fpscr = set_reg_val(id, *val);
710                         break;
711 #ifdef CONFIG_VSX
712                 case KVM_REG_PPC_VSR0 ... KVM_REG_PPC_VSR31:
713                         if (cpu_has_feature(CPU_FTR_VSX)) {
714                                 i = id - KVM_REG_PPC_VSR0;
715                                 vcpu->arch.fp.fpr[i][0] = val->vsxval[0];
716                                 vcpu->arch.fp.fpr[i][1] = val->vsxval[1];
717                         } else {
718                                 r = -ENXIO;
719                         }
720                         break;
721 #endif /* CONFIG_VSX */
722 #ifdef CONFIG_KVM_XICS
723                 case KVM_REG_PPC_ICP_STATE:
724                         if (!vcpu->arch.icp && !vcpu->arch.xive_vcpu) {
725                                 r = -ENXIO;
726                                 break;
727                         }
728                         if (xics_on_xive())
729                                 r = kvmppc_xive_set_icp(vcpu, set_reg_val(id, *val));
730                         else
731                                 r = kvmppc_xics_set_icp(vcpu, set_reg_val(id, *val));
732                         break;
733 #endif /* CONFIG_KVM_XICS */
734 #ifdef CONFIG_KVM_XIVE
735                 case KVM_REG_PPC_VP_STATE:
736                         if (!vcpu->arch.xive_vcpu) {
737                                 r = -ENXIO;
738                                 break;
739                         }
740                         if (xive_enabled())
741                                 r = kvmppc_xive_native_set_vp(vcpu, val);
742                         else
743                                 r = -ENXIO;
744                         break;
745 #endif /* CONFIG_KVM_XIVE */
746                 case KVM_REG_PPC_FSCR:
747                         vcpu->arch.fscr = set_reg_val(id, *val);
748                         break;
749                 case KVM_REG_PPC_TAR:
750                         vcpu->arch.tar = set_reg_val(id, *val);
751                         break;
752                 case KVM_REG_PPC_EBBHR:
753                         vcpu->arch.ebbhr = set_reg_val(id, *val);
754                         break;
755                 case KVM_REG_PPC_EBBRR:
756                         vcpu->arch.ebbrr = set_reg_val(id, *val);
757                         break;
758                 case KVM_REG_PPC_BESCR:
759                         vcpu->arch.bescr = set_reg_val(id, *val);
760                         break;
761                 case KVM_REG_PPC_IC:
762                         vcpu->arch.ic = set_reg_val(id, *val);
763                         break;
764                 default:
765                         r = -EINVAL;
766                         break;
767                 }
768         }
769
770         return r;
771 }
772
773 void kvmppc_core_vcpu_load(struct kvm_vcpu *vcpu, int cpu)
774 {
775         vcpu->kvm->arch.kvm_ops->vcpu_load(vcpu, cpu);
776 }
777
778 void kvmppc_core_vcpu_put(struct kvm_vcpu *vcpu)
779 {
780         vcpu->kvm->arch.kvm_ops->vcpu_put(vcpu);
781 }
782
783 void kvmppc_set_msr(struct kvm_vcpu *vcpu, u64 msr)
784 {
785         vcpu->kvm->arch.kvm_ops->set_msr(vcpu, msr);
786 }
787 EXPORT_SYMBOL_GPL(kvmppc_set_msr);
788
789 int kvmppc_vcpu_run(struct kvm_vcpu *vcpu)
790 {
791         return vcpu->kvm->arch.kvm_ops->vcpu_run(vcpu);
792 }
793
794 int kvm_arch_vcpu_ioctl_translate(struct kvm_vcpu *vcpu,
795                                   struct kvm_translation *tr)
796 {
797         return 0;
798 }
799
800 int kvm_arch_vcpu_ioctl_set_guest_debug(struct kvm_vcpu *vcpu,
801                                         struct kvm_guest_debug *dbg)
802 {
803         vcpu_load(vcpu);
804         vcpu->guest_debug = dbg->control;
805         vcpu_put(vcpu);
806         return 0;
807 }
808
809 void kvmppc_decrementer_func(struct kvm_vcpu *vcpu)
810 {
811         kvmppc_core_queue_dec(vcpu);
812         kvm_vcpu_kick(vcpu);
813 }
814
815 int kvmppc_core_vcpu_create(struct kvm_vcpu *vcpu)
816 {
817         return vcpu->kvm->arch.kvm_ops->vcpu_create(vcpu);
818 }
819
820 void kvmppc_core_vcpu_free(struct kvm_vcpu *vcpu)
821 {
822         vcpu->kvm->arch.kvm_ops->vcpu_free(vcpu);
823 }
824
825 int kvmppc_core_check_requests(struct kvm_vcpu *vcpu)
826 {
827         return vcpu->kvm->arch.kvm_ops->check_requests(vcpu);
828 }
829
830 void kvm_arch_sync_dirty_log(struct kvm *kvm, struct kvm_memory_slot *memslot)
831 {
832
833 }
834
835 int kvm_vm_ioctl_get_dirty_log(struct kvm *kvm, struct kvm_dirty_log *log)
836 {
837         return kvm->arch.kvm_ops->get_dirty_log(kvm, log);
838 }
839
840 void kvmppc_core_free_memslot(struct kvm *kvm, struct kvm_memory_slot *slot)
841 {
842         kvm->arch.kvm_ops->free_memslot(slot);
843 }
844
845 void kvmppc_core_flush_memslot(struct kvm *kvm, struct kvm_memory_slot *memslot)
846 {
847         kvm->arch.kvm_ops->flush_memslot(kvm, memslot);
848 }
849
850 int kvmppc_core_prepare_memory_region(struct kvm *kvm,
851                                 struct kvm_memory_slot *memslot,
852                                 const struct kvm_userspace_memory_region *mem,
853                                 enum kvm_mr_change change)
854 {
855         return kvm->arch.kvm_ops->prepare_memory_region(kvm, memslot, mem,
856                                                         change);
857 }
858
859 void kvmppc_core_commit_memory_region(struct kvm *kvm,
860                                 const struct kvm_userspace_memory_region *mem,
861                                 const struct kvm_memory_slot *old,
862                                 const struct kvm_memory_slot *new,
863                                 enum kvm_mr_change change)
864 {
865         kvm->arch.kvm_ops->commit_memory_region(kvm, mem, old, new, change);
866 }
867
868 bool kvm_unmap_gfn_range(struct kvm *kvm, struct kvm_gfn_range *range)
869 {
870         return kvm->arch.kvm_ops->unmap_gfn_range(kvm, range);
871 }
872
873 bool kvm_age_gfn(struct kvm *kvm, struct kvm_gfn_range *range)
874 {
875         return kvm->arch.kvm_ops->age_gfn(kvm, range);
876 }
877
878 bool kvm_test_age_gfn(struct kvm *kvm, struct kvm_gfn_range *range)
879 {
880         return kvm->arch.kvm_ops->test_age_gfn(kvm, range);
881 }
882
883 bool kvm_set_spte_gfn(struct kvm *kvm, struct kvm_gfn_range *range)
884 {
885         return kvm->arch.kvm_ops->set_spte_gfn(kvm, range);
886 }
887
888 int kvmppc_core_init_vm(struct kvm *kvm)
889 {
890
891 #ifdef CONFIG_PPC64
892         INIT_LIST_HEAD_RCU(&kvm->arch.spapr_tce_tables);
893         INIT_LIST_HEAD(&kvm->arch.rtas_tokens);
894         mutex_init(&kvm->arch.rtas_token_lock);
895 #endif
896
897         return kvm->arch.kvm_ops->init_vm(kvm);
898 }
899
900 void kvmppc_core_destroy_vm(struct kvm *kvm)
901 {
902         kvm->arch.kvm_ops->destroy_vm(kvm);
903
904 #ifdef CONFIG_PPC64
905         kvmppc_rtas_tokens_free(kvm);
906         WARN_ON(!list_empty(&kvm->arch.spapr_tce_tables));
907 #endif
908
909 #ifdef CONFIG_KVM_XICS
910         /*
911          * Free the XIVE and XICS devices which are not directly freed by the
912          * device 'release' method
913          */
914         kfree(kvm->arch.xive_devices.native);
915         kvm->arch.xive_devices.native = NULL;
916         kfree(kvm->arch.xive_devices.xics_on_xive);
917         kvm->arch.xive_devices.xics_on_xive = NULL;
918         kfree(kvm->arch.xics_device);
919         kvm->arch.xics_device = NULL;
920 #endif /* CONFIG_KVM_XICS */
921 }
922
923 int kvmppc_h_logical_ci_load(struct kvm_vcpu *vcpu)
924 {
925         unsigned long size = kvmppc_get_gpr(vcpu, 4);
926         unsigned long addr = kvmppc_get_gpr(vcpu, 5);
927         u64 buf;
928         int srcu_idx;
929         int ret;
930
931         if (!is_power_of_2(size) || (size > sizeof(buf)))
932                 return H_TOO_HARD;
933
934         srcu_idx = srcu_read_lock(&vcpu->kvm->srcu);
935         ret = kvm_io_bus_read(vcpu, KVM_MMIO_BUS, addr, size, &buf);
936         srcu_read_unlock(&vcpu->kvm->srcu, srcu_idx);
937         if (ret != 0)
938                 return H_TOO_HARD;
939
940         switch (size) {
941         case 1:
942                 kvmppc_set_gpr(vcpu, 4, *(u8 *)&buf);
943                 break;
944
945         case 2:
946                 kvmppc_set_gpr(vcpu, 4, be16_to_cpu(*(__be16 *)&buf));
947                 break;
948
949         case 4:
950                 kvmppc_set_gpr(vcpu, 4, be32_to_cpu(*(__be32 *)&buf));
951                 break;
952
953         case 8:
954                 kvmppc_set_gpr(vcpu, 4, be64_to_cpu(*(__be64 *)&buf));
955                 break;
956
957         default:
958                 BUG();
959         }
960
961         return H_SUCCESS;
962 }
963 EXPORT_SYMBOL_GPL(kvmppc_h_logical_ci_load);
964
965 int kvmppc_h_logical_ci_store(struct kvm_vcpu *vcpu)
966 {
967         unsigned long size = kvmppc_get_gpr(vcpu, 4);
968         unsigned long addr = kvmppc_get_gpr(vcpu, 5);
969         unsigned long val = kvmppc_get_gpr(vcpu, 6);
970         u64 buf;
971         int srcu_idx;
972         int ret;
973
974         switch (size) {
975         case 1:
976                 *(u8 *)&buf = val;
977                 break;
978
979         case 2:
980                 *(__be16 *)&buf = cpu_to_be16(val);
981                 break;
982
983         case 4:
984                 *(__be32 *)&buf = cpu_to_be32(val);
985                 break;
986
987         case 8:
988                 *(__be64 *)&buf = cpu_to_be64(val);
989                 break;
990
991         default:
992                 return H_TOO_HARD;
993         }
994
995         srcu_idx = srcu_read_lock(&vcpu->kvm->srcu);
996         ret = kvm_io_bus_write(vcpu, KVM_MMIO_BUS, addr, size, &buf);
997         srcu_read_unlock(&vcpu->kvm->srcu, srcu_idx);
998         if (ret != 0)
999                 return H_TOO_HARD;
1000
1001         return H_SUCCESS;
1002 }
1003 EXPORT_SYMBOL_GPL(kvmppc_h_logical_ci_store);
1004
1005 int kvmppc_core_check_processor_compat(void)
1006 {
1007         /*
1008          * We always return 0 for book3s. We check
1009          * for compatibility while loading the HV
1010          * or PR module
1011          */
1012         return 0;
1013 }
1014
1015 int kvmppc_book3s_hcall_implemented(struct kvm *kvm, unsigned long hcall)
1016 {
1017         return kvm->arch.kvm_ops->hcall_implemented(hcall);
1018 }
1019
1020 #ifdef CONFIG_KVM_XICS
1021 int kvm_set_irq(struct kvm *kvm, int irq_source_id, u32 irq, int level,
1022                 bool line_status)
1023 {
1024         if (xics_on_xive())
1025                 return kvmppc_xive_set_irq(kvm, irq_source_id, irq, level,
1026                                            line_status);
1027         else
1028                 return kvmppc_xics_set_irq(kvm, irq_source_id, irq, level,
1029                                            line_status);
1030 }
1031
1032 int kvm_arch_set_irq_inatomic(struct kvm_kernel_irq_routing_entry *irq_entry,
1033                               struct kvm *kvm, int irq_source_id,
1034                               int level, bool line_status)
1035 {
1036         return kvm_set_irq(kvm, irq_source_id, irq_entry->gsi,
1037                            level, line_status);
1038 }
1039 static int kvmppc_book3s_set_irq(struct kvm_kernel_irq_routing_entry *e,
1040                                  struct kvm *kvm, int irq_source_id, int level,
1041                                  bool line_status)
1042 {
1043         return kvm_set_irq(kvm, irq_source_id, e->gsi, level, line_status);
1044 }
1045
1046 int kvm_irq_map_gsi(struct kvm *kvm,
1047                     struct kvm_kernel_irq_routing_entry *entries, int gsi)
1048 {
1049         entries->gsi = gsi;
1050         entries->type = KVM_IRQ_ROUTING_IRQCHIP;
1051         entries->set = kvmppc_book3s_set_irq;
1052         entries->irqchip.irqchip = 0;
1053         entries->irqchip.pin = gsi;
1054         return 1;
1055 }
1056
1057 int kvm_irq_map_chip_pin(struct kvm *kvm, unsigned irqchip, unsigned pin)
1058 {
1059         return pin;
1060 }
1061
1062 #endif /* CONFIG_KVM_XICS */
1063
1064 static int kvmppc_book3s_init(void)
1065 {
1066         int r;
1067
1068         r = kvm_init(NULL, sizeof(struct kvm_vcpu), 0, THIS_MODULE);
1069         if (r)
1070                 return r;
1071 #ifdef CONFIG_KVM_BOOK3S_32_HANDLER
1072         r = kvmppc_book3s_init_pr();
1073 #endif
1074
1075 #ifdef CONFIG_KVM_XICS
1076 #ifdef CONFIG_KVM_XIVE
1077         if (xics_on_xive()) {
1078                 kvm_register_device_ops(&kvm_xive_ops, KVM_DEV_TYPE_XICS);
1079                 if (kvmppc_xive_native_supported())
1080                         kvm_register_device_ops(&kvm_xive_native_ops,
1081                                                 KVM_DEV_TYPE_XIVE);
1082         } else
1083 #endif
1084                 kvm_register_device_ops(&kvm_xics_ops, KVM_DEV_TYPE_XICS);
1085 #endif
1086         return r;
1087 }
1088
1089 static void kvmppc_book3s_exit(void)
1090 {
1091 #ifdef CONFIG_KVM_BOOK3S_32_HANDLER
1092         kvmppc_book3s_exit_pr();
1093 #endif
1094         kvm_exit();
1095 }
1096
1097 module_init(kvmppc_book3s_init);
1098 module_exit(kvmppc_book3s_exit);
1099
1100 /* On 32bit this is our one and only kernel module */
1101 #ifdef CONFIG_KVM_BOOK3S_32_HANDLER
1102 MODULE_ALIAS_MISCDEV(KVM_MINOR);
1103 MODULE_ALIAS("devname:kvm");
1104 #endif