KVM: fix cleanup_srcu_struct on vm destruction
[linux-2.6.git] / arch / powerpc / kvm / powerpc.c
1 /*
2  * This program is free software; you can redistribute it and/or modify
3  * it under the terms of the GNU General Public License, version 2, as
4  * published by the Free Software Foundation.
5  *
6  * This program is distributed in the hope that it will be useful,
7  * but WITHOUT ANY WARRANTY; without even the implied warranty of
8  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
9  * GNU General Public License for more details.
10  *
11  * You should have received a copy of the GNU General Public License
12  * along with this program; if not, write to the Free Software
13  * Foundation, 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
14  *
15  * Copyright IBM Corp. 2007
16  *
17  * Authors: Hollis Blanchard <hollisb@us.ibm.com>
18  *          Christian Ehrhardt <ehrhardt@linux.vnet.ibm.com>
19  */
20
21 #include <linux/errno.h>
22 #include <linux/err.h>
23 #include <linux/kvm_host.h>
24 #include <linux/module.h>
25 #include <linux/vmalloc.h>
26 #include <linux/hrtimer.h>
27 #include <linux/fs.h>
28 #include <asm/cputable.h>
29 #include <asm/uaccess.h>
30 #include <asm/kvm_ppc.h>
31 #include <asm/tlbflush.h>
32 #include "timing.h"
33 #include "../mm/mmu_decl.h"
34
35 #define CREATE_TRACE_POINTS
36 #include "trace.h"
37
38 gfn_t unalias_gfn(struct kvm *kvm, gfn_t gfn)
39 {
40         return gfn;
41 }
42
43 int kvm_arch_vcpu_runnable(struct kvm_vcpu *v)
44 {
45         return !(v->arch.msr & MSR_WE) || !!(v->arch.pending_exceptions);
46 }
47
48
49 int kvmppc_emulate_mmio(struct kvm_run *run, struct kvm_vcpu *vcpu)
50 {
51         enum emulation_result er;
52         int r;
53
54         er = kvmppc_emulate_instruction(run, vcpu);
55         switch (er) {
56         case EMULATE_DONE:
57                 /* Future optimization: only reload non-volatiles if they were
58                  * actually modified. */
59                 r = RESUME_GUEST_NV;
60                 break;
61         case EMULATE_DO_MMIO:
62                 run->exit_reason = KVM_EXIT_MMIO;
63                 /* We must reload nonvolatiles because "update" load/store
64                  * instructions modify register state. */
65                 /* Future optimization: only reload non-volatiles if they were
66                  * actually modified. */
67                 r = RESUME_HOST_NV;
68                 break;
69         case EMULATE_FAIL:
70                 /* XXX Deliver Program interrupt to guest. */
71                 printk(KERN_EMERG "%s: emulation failed (%08x)\n", __func__,
72                        vcpu->arch.last_inst);
73                 r = RESUME_HOST;
74                 break;
75         default:
76                 BUG();
77         }
78
79         return r;
80 }
81
82 int kvm_arch_hardware_enable(void *garbage)
83 {
84         return 0;
85 }
86
87 void kvm_arch_hardware_disable(void *garbage)
88 {
89 }
90
91 int kvm_arch_hardware_setup(void)
92 {
93         return 0;
94 }
95
96 void kvm_arch_hardware_unsetup(void)
97 {
98 }
99
100 void kvm_arch_check_processor_compat(void *rtn)
101 {
102         *(int *)rtn = kvmppc_core_check_processor_compat();
103 }
104
105 struct kvm *kvm_arch_create_vm(void)
106 {
107         struct kvm *kvm;
108
109         kvm = kzalloc(sizeof(struct kvm), GFP_KERNEL);
110         if (!kvm)
111                 return ERR_PTR(-ENOMEM);
112
113         return kvm;
114 }
115
116 static void kvmppc_free_vcpus(struct kvm *kvm)
117 {
118         unsigned int i;
119         struct kvm_vcpu *vcpu;
120
121         kvm_for_each_vcpu(i, vcpu, kvm)
122                 kvm_arch_vcpu_free(vcpu);
123
124         mutex_lock(&kvm->lock);
125         for (i = 0; i < atomic_read(&kvm->online_vcpus); i++)
126                 kvm->vcpus[i] = NULL;
127
128         atomic_set(&kvm->online_vcpus, 0);
129         mutex_unlock(&kvm->lock);
130 }
131
132 void kvm_arch_sync_events(struct kvm *kvm)
133 {
134 }
135
136 void kvm_arch_destroy_vm(struct kvm *kvm)
137 {
138         kvmppc_free_vcpus(kvm);
139         kvm_free_physmem(kvm);
140         cleanup_srcu_struct(&kvm->srcu);
141         kfree(kvm);
142 }
143
144 int kvm_dev_ioctl_check_extension(long ext)
145 {
146         int r;
147
148         switch (ext) {
149         case KVM_CAP_PPC_SEGSTATE:
150                 r = 1;
151                 break;
152         case KVM_CAP_COALESCED_MMIO:
153                 r = KVM_COALESCED_MMIO_PAGE_OFFSET;
154                 break;
155         default:
156                 r = 0;
157                 break;
158         }
159         return r;
160
161 }
162
163 long kvm_arch_dev_ioctl(struct file *filp,
164                         unsigned int ioctl, unsigned long arg)
165 {
166         return -EINVAL;
167 }
168
169 int kvm_arch_prepare_memory_region(struct kvm *kvm,
170                                    struct kvm_memory_slot *memslot,
171                                    struct kvm_memory_slot old,
172                                    struct kvm_userspace_memory_region *mem,
173                                    int user_alloc)
174 {
175         return 0;
176 }
177
178 void kvm_arch_commit_memory_region(struct kvm *kvm,
179                struct kvm_userspace_memory_region *mem,
180                struct kvm_memory_slot old,
181                int user_alloc)
182 {
183        return;
184 }
185
186
187 void kvm_arch_flush_shadow(struct kvm *kvm)
188 {
189 }
190
191 struct kvm_vcpu *kvm_arch_vcpu_create(struct kvm *kvm, unsigned int id)
192 {
193         struct kvm_vcpu *vcpu;
194         vcpu = kvmppc_core_vcpu_create(kvm, id);
195         kvmppc_create_vcpu_debugfs(vcpu, id);
196         return vcpu;
197 }
198
199 void kvm_arch_vcpu_free(struct kvm_vcpu *vcpu)
200 {
201         kvmppc_remove_vcpu_debugfs(vcpu);
202         kvmppc_core_vcpu_free(vcpu);
203 }
204
205 void kvm_arch_vcpu_destroy(struct kvm_vcpu *vcpu)
206 {
207         kvm_arch_vcpu_free(vcpu);
208 }
209
210 int kvm_cpu_has_pending_timer(struct kvm_vcpu *vcpu)
211 {
212         return kvmppc_core_pending_dec(vcpu);
213 }
214
215 static void kvmppc_decrementer_func(unsigned long data)
216 {
217         struct kvm_vcpu *vcpu = (struct kvm_vcpu *)data;
218
219         kvmppc_core_queue_dec(vcpu);
220
221         if (waitqueue_active(&vcpu->wq)) {
222                 wake_up_interruptible(&vcpu->wq);
223                 vcpu->stat.halt_wakeup++;
224         }
225 }
226
227 /*
228  * low level hrtimer wake routine. Because this runs in hardirq context
229  * we schedule a tasklet to do the real work.
230  */
231 enum hrtimer_restart kvmppc_decrementer_wakeup(struct hrtimer *timer)
232 {
233         struct kvm_vcpu *vcpu;
234
235         vcpu = container_of(timer, struct kvm_vcpu, arch.dec_timer);
236         tasklet_schedule(&vcpu->arch.tasklet);
237
238         return HRTIMER_NORESTART;
239 }
240
241 int kvm_arch_vcpu_init(struct kvm_vcpu *vcpu)
242 {
243         hrtimer_init(&vcpu->arch.dec_timer, CLOCK_REALTIME, HRTIMER_MODE_ABS);
244         tasklet_init(&vcpu->arch.tasklet, kvmppc_decrementer_func, (ulong)vcpu);
245         vcpu->arch.dec_timer.function = kvmppc_decrementer_wakeup;
246
247         return 0;
248 }
249
250 void kvm_arch_vcpu_uninit(struct kvm_vcpu *vcpu)
251 {
252         kvmppc_mmu_destroy(vcpu);
253 }
254
255 void kvm_arch_vcpu_load(struct kvm_vcpu *vcpu, int cpu)
256 {
257         kvmppc_core_vcpu_load(vcpu, cpu);
258 }
259
260 void kvm_arch_vcpu_put(struct kvm_vcpu *vcpu)
261 {
262         kvmppc_core_vcpu_put(vcpu);
263 }
264
265 int kvm_arch_vcpu_ioctl_set_guest_debug(struct kvm_vcpu *vcpu,
266                                         struct kvm_guest_debug *dbg)
267 {
268         return -EINVAL;
269 }
270
271 static void kvmppc_complete_dcr_load(struct kvm_vcpu *vcpu,
272                                      struct kvm_run *run)
273 {
274         kvmppc_set_gpr(vcpu, vcpu->arch.io_gpr, run->dcr.data);
275 }
276
277 static void kvmppc_complete_mmio_load(struct kvm_vcpu *vcpu,
278                                       struct kvm_run *run)
279 {
280         ulong gpr;
281
282         if (run->mmio.len > sizeof(gpr)) {
283                 printk(KERN_ERR "bad MMIO length: %d\n", run->mmio.len);
284                 return;
285         }
286
287         if (vcpu->arch.mmio_is_bigendian) {
288                 switch (run->mmio.len) {
289                 case 4: gpr = *(u32 *)run->mmio.data; break;
290                 case 2: gpr = *(u16 *)run->mmio.data; break;
291                 case 1: gpr = *(u8 *)run->mmio.data; break;
292                 }
293         } else {
294                 /* Convert BE data from userland back to LE. */
295                 switch (run->mmio.len) {
296                 case 4: gpr = ld_le32((u32 *)run->mmio.data); break;
297                 case 2: gpr = ld_le16((u16 *)run->mmio.data); break;
298                 case 1: gpr = *(u8 *)run->mmio.data; break;
299                 }
300         }
301
302         kvmppc_set_gpr(vcpu, vcpu->arch.io_gpr, gpr);
303 }
304
305 int kvmppc_handle_load(struct kvm_run *run, struct kvm_vcpu *vcpu,
306                        unsigned int rt, unsigned int bytes, int is_bigendian)
307 {
308         if (bytes > sizeof(run->mmio.data)) {
309                 printk(KERN_ERR "%s: bad MMIO length: %d\n", __func__,
310                        run->mmio.len);
311         }
312
313         run->mmio.phys_addr = vcpu->arch.paddr_accessed;
314         run->mmio.len = bytes;
315         run->mmio.is_write = 0;
316
317         vcpu->arch.io_gpr = rt;
318         vcpu->arch.mmio_is_bigendian = is_bigendian;
319         vcpu->mmio_needed = 1;
320         vcpu->mmio_is_write = 0;
321
322         return EMULATE_DO_MMIO;
323 }
324
325 int kvmppc_handle_store(struct kvm_run *run, struct kvm_vcpu *vcpu,
326                         u32 val, unsigned int bytes, int is_bigendian)
327 {
328         void *data = run->mmio.data;
329
330         if (bytes > sizeof(run->mmio.data)) {
331                 printk(KERN_ERR "%s: bad MMIO length: %d\n", __func__,
332                        run->mmio.len);
333         }
334
335         run->mmio.phys_addr = vcpu->arch.paddr_accessed;
336         run->mmio.len = bytes;
337         run->mmio.is_write = 1;
338         vcpu->mmio_needed = 1;
339         vcpu->mmio_is_write = 1;
340
341         /* Store the value at the lowest bytes in 'data'. */
342         if (is_bigendian) {
343                 switch (bytes) {
344                 case 4: *(u32 *)data = val; break;
345                 case 2: *(u16 *)data = val; break;
346                 case 1: *(u8  *)data = val; break;
347                 }
348         } else {
349                 /* Store LE value into 'data'. */
350                 switch (bytes) {
351                 case 4: st_le32(data, val); break;
352                 case 2: st_le16(data, val); break;
353                 case 1: *(u8 *)data = val; break;
354                 }
355         }
356
357         return EMULATE_DO_MMIO;
358 }
359
360 int kvm_arch_vcpu_ioctl_run(struct kvm_vcpu *vcpu, struct kvm_run *run)
361 {
362         int r;
363         sigset_t sigsaved;
364
365         vcpu_load(vcpu);
366
367         if (vcpu->sigset_active)
368                 sigprocmask(SIG_SETMASK, &vcpu->sigset, &sigsaved);
369
370         if (vcpu->mmio_needed) {
371                 if (!vcpu->mmio_is_write)
372                         kvmppc_complete_mmio_load(vcpu, run);
373                 vcpu->mmio_needed = 0;
374         } else if (vcpu->arch.dcr_needed) {
375                 if (!vcpu->arch.dcr_is_write)
376                         kvmppc_complete_dcr_load(vcpu, run);
377                 vcpu->arch.dcr_needed = 0;
378         }
379
380         kvmppc_core_deliver_interrupts(vcpu);
381
382         local_irq_disable();
383         kvm_guest_enter();
384         r = __kvmppc_vcpu_run(run, vcpu);
385         kvm_guest_exit();
386         local_irq_enable();
387
388         if (vcpu->sigset_active)
389                 sigprocmask(SIG_SETMASK, &sigsaved, NULL);
390
391         vcpu_put(vcpu);
392
393         return r;
394 }
395
396 int kvm_vcpu_ioctl_interrupt(struct kvm_vcpu *vcpu, struct kvm_interrupt *irq)
397 {
398         kvmppc_core_queue_external(vcpu, irq);
399
400         if (waitqueue_active(&vcpu->wq)) {
401                 wake_up_interruptible(&vcpu->wq);
402                 vcpu->stat.halt_wakeup++;
403         }
404
405         return 0;
406 }
407
408 int kvm_arch_vcpu_ioctl_get_mpstate(struct kvm_vcpu *vcpu,
409                                     struct kvm_mp_state *mp_state)
410 {
411         return -EINVAL;
412 }
413
414 int kvm_arch_vcpu_ioctl_set_mpstate(struct kvm_vcpu *vcpu,
415                                     struct kvm_mp_state *mp_state)
416 {
417         return -EINVAL;
418 }
419
420 long kvm_arch_vcpu_ioctl(struct file *filp,
421                          unsigned int ioctl, unsigned long arg)
422 {
423         struct kvm_vcpu *vcpu = filp->private_data;
424         void __user *argp = (void __user *)arg;
425         long r;
426
427         switch (ioctl) {
428         case KVM_INTERRUPT: {
429                 struct kvm_interrupt irq;
430                 r = -EFAULT;
431                 if (copy_from_user(&irq, argp, sizeof(irq)))
432                         goto out;
433                 r = kvm_vcpu_ioctl_interrupt(vcpu, &irq);
434                 break;
435         }
436         default:
437                 r = -EINVAL;
438         }
439
440 out:
441         return r;
442 }
443
444 long kvm_arch_vm_ioctl(struct file *filp,
445                        unsigned int ioctl, unsigned long arg)
446 {
447         long r;
448
449         switch (ioctl) {
450         default:
451                 r = -ENOTTY;
452         }
453
454         return r;
455 }
456
457 int kvm_arch_init(void *opaque)
458 {
459         return 0;
460 }
461
462 void kvm_arch_exit(void)
463 {
464 }