Merge branch 'core-fixes-for-linus' of git://git.kernel.org/pub/scm/linux/kernel...
[linux-2.6] / arch / powerpc / kvm / emulate.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  */
19
20 #include <linux/jiffies.h>
21 #include <linux/timer.h>
22 #include <linux/types.h>
23 #include <linux/string.h>
24 #include <linux/kvm_host.h>
25
26 #include <asm/reg.h>
27 #include <asm/time.h>
28 #include <asm/byteorder.h>
29 #include <asm/kvm_ppc.h>
30 #include <asm/disassemble.h>
31 #include "timing.h"
32
33 #define OP_TRAP 3
34
35 #define OP_31_XOP_LWZX      23
36 #define OP_31_XOP_LBZX      87
37 #define OP_31_XOP_STWX      151
38 #define OP_31_XOP_STBX      215
39 #define OP_31_XOP_STBUX     247
40 #define OP_31_XOP_LHZX      279
41 #define OP_31_XOP_LHZUX     311
42 #define OP_31_XOP_MFSPR     339
43 #define OP_31_XOP_STHX      407
44 #define OP_31_XOP_STHUX     439
45 #define OP_31_XOP_MTSPR     467
46 #define OP_31_XOP_DCBI      470
47 #define OP_31_XOP_LWBRX     534
48 #define OP_31_XOP_TLBSYNC   566
49 #define OP_31_XOP_STWBRX    662
50 #define OP_31_XOP_LHBRX     790
51 #define OP_31_XOP_STHBRX    918
52
53 #define OP_LWZ  32
54 #define OP_LWZU 33
55 #define OP_LBZ  34
56 #define OP_LBZU 35
57 #define OP_STW  36
58 #define OP_STWU 37
59 #define OP_STB  38
60 #define OP_STBU 39
61 #define OP_LHZ  40
62 #define OP_LHZU 41
63 #define OP_STH  44
64 #define OP_STHU 45
65
66 void kvmppc_emulate_dec(struct kvm_vcpu *vcpu)
67 {
68         if (vcpu->arch.tcr & TCR_DIE) {
69                 /* The decrementer ticks at the same rate as the timebase, so
70                  * that's how we convert the guest DEC value to the number of
71                  * host ticks. */
72                 unsigned long nr_jiffies;
73
74                 nr_jiffies = vcpu->arch.dec / tb_ticks_per_jiffy;
75                 mod_timer(&vcpu->arch.dec_timer,
76                           get_jiffies_64() + nr_jiffies);
77         } else {
78                 del_timer(&vcpu->arch.dec_timer);
79         }
80 }
81
82 /* XXX to do:
83  * lhax
84  * lhaux
85  * lswx
86  * lswi
87  * stswx
88  * stswi
89  * lha
90  * lhau
91  * lmw
92  * stmw
93  *
94  * XXX is_bigendian should depend on MMU mapping or MSR[LE]
95  */
96 /* XXX Should probably auto-generate instruction decoding for a particular core
97  * from opcode tables in the future. */
98 int kvmppc_emulate_instruction(struct kvm_run *run, struct kvm_vcpu *vcpu)
99 {
100         u32 inst = vcpu->arch.last_inst;
101         u32 ea;
102         int ra;
103         int rb;
104         int rs;
105         int rt;
106         int sprn;
107         enum emulation_result emulated = EMULATE_DONE;
108         int advance = 1;
109
110         /* this default type might be overwritten by subcategories */
111         kvmppc_set_exit_type(vcpu, EMULATED_INST_EXITS);
112
113         switch (get_op(inst)) {
114         case OP_TRAP:
115                 vcpu->arch.esr |= ESR_PTR;
116                 kvmppc_core_queue_program(vcpu);
117                 advance = 0;
118                 break;
119
120         case 31:
121                 switch (get_xop(inst)) {
122
123                 case OP_31_XOP_LWZX:
124                         rt = get_rt(inst);
125                         emulated = kvmppc_handle_load(run, vcpu, rt, 4, 1);
126                         break;
127
128                 case OP_31_XOP_LBZX:
129                         rt = get_rt(inst);
130                         emulated = kvmppc_handle_load(run, vcpu, rt, 1, 1);
131                         break;
132
133                 case OP_31_XOP_STWX:
134                         rs = get_rs(inst);
135                         emulated = kvmppc_handle_store(run, vcpu,
136                                                        vcpu->arch.gpr[rs],
137                                                        4, 1);
138                         break;
139
140                 case OP_31_XOP_STBX:
141                         rs = get_rs(inst);
142                         emulated = kvmppc_handle_store(run, vcpu,
143                                                        vcpu->arch.gpr[rs],
144                                                        1, 1);
145                         break;
146
147                 case OP_31_XOP_STBUX:
148                         rs = get_rs(inst);
149                         ra = get_ra(inst);
150                         rb = get_rb(inst);
151
152                         ea = vcpu->arch.gpr[rb];
153                         if (ra)
154                                 ea += vcpu->arch.gpr[ra];
155
156                         emulated = kvmppc_handle_store(run, vcpu,
157                                                        vcpu->arch.gpr[rs],
158                                                        1, 1);
159                         vcpu->arch.gpr[rs] = ea;
160                         break;
161
162                 case OP_31_XOP_LHZX:
163                         rt = get_rt(inst);
164                         emulated = kvmppc_handle_load(run, vcpu, rt, 2, 1);
165                         break;
166
167                 case OP_31_XOP_LHZUX:
168                         rt = get_rt(inst);
169                         ra = get_ra(inst);
170                         rb = get_rb(inst);
171
172                         ea = vcpu->arch.gpr[rb];
173                         if (ra)
174                                 ea += vcpu->arch.gpr[ra];
175
176                         emulated = kvmppc_handle_load(run, vcpu, rt, 2, 1);
177                         vcpu->arch.gpr[ra] = ea;
178                         break;
179
180                 case OP_31_XOP_MFSPR:
181                         sprn = get_sprn(inst);
182                         rt = get_rt(inst);
183
184                         switch (sprn) {
185                         case SPRN_SRR0:
186                                 vcpu->arch.gpr[rt] = vcpu->arch.srr0; break;
187                         case SPRN_SRR1:
188                                 vcpu->arch.gpr[rt] = vcpu->arch.srr1; break;
189                         case SPRN_PVR:
190                                 vcpu->arch.gpr[rt] = vcpu->arch.pvr; break;
191
192                         /* Note: mftb and TBRL/TBWL are user-accessible, so
193                          * the guest can always access the real TB anyways.
194                          * In fact, we probably will never see these traps. */
195                         case SPRN_TBWL:
196                                 vcpu->arch.gpr[rt] = mftbl(); break;
197                         case SPRN_TBWU:
198                                 vcpu->arch.gpr[rt] = mftbu(); break;
199
200                         case SPRN_SPRG0:
201                                 vcpu->arch.gpr[rt] = vcpu->arch.sprg0; break;
202                         case SPRN_SPRG1:
203                                 vcpu->arch.gpr[rt] = vcpu->arch.sprg1; break;
204                         case SPRN_SPRG2:
205                                 vcpu->arch.gpr[rt] = vcpu->arch.sprg2; break;
206                         case SPRN_SPRG3:
207                                 vcpu->arch.gpr[rt] = vcpu->arch.sprg3; break;
208                         /* Note: SPRG4-7 are user-readable, so we don't get
209                          * a trap. */
210
211                         default:
212                                 emulated = kvmppc_core_emulate_mfspr(vcpu, sprn, rt);
213                                 if (emulated == EMULATE_FAIL) {
214                                         printk("mfspr: unknown spr %x\n", sprn);
215                                         vcpu->arch.gpr[rt] = 0;
216                                 }
217                                 break;
218                         }
219                         break;
220
221                 case OP_31_XOP_STHX:
222                         rs = get_rs(inst);
223                         ra = get_ra(inst);
224                         rb = get_rb(inst);
225
226                         emulated = kvmppc_handle_store(run, vcpu,
227                                                        vcpu->arch.gpr[rs],
228                                                        2, 1);
229                         break;
230
231                 case OP_31_XOP_STHUX:
232                         rs = get_rs(inst);
233                         ra = get_ra(inst);
234                         rb = get_rb(inst);
235
236                         ea = vcpu->arch.gpr[rb];
237                         if (ra)
238                                 ea += vcpu->arch.gpr[ra];
239
240                         emulated = kvmppc_handle_store(run, vcpu,
241                                                        vcpu->arch.gpr[rs],
242                                                        2, 1);
243                         vcpu->arch.gpr[ra] = ea;
244                         break;
245
246                 case OP_31_XOP_MTSPR:
247                         sprn = get_sprn(inst);
248                         rs = get_rs(inst);
249                         switch (sprn) {
250                         case SPRN_SRR0:
251                                 vcpu->arch.srr0 = vcpu->arch.gpr[rs]; break;
252                         case SPRN_SRR1:
253                                 vcpu->arch.srr1 = vcpu->arch.gpr[rs]; break;
254
255                         /* XXX We need to context-switch the timebase for
256                          * watchdog and FIT. */
257                         case SPRN_TBWL: break;
258                         case SPRN_TBWU: break;
259
260                         case SPRN_DEC:
261                                 vcpu->arch.dec = vcpu->arch.gpr[rs];
262                                 kvmppc_emulate_dec(vcpu);
263                                 break;
264
265                         case SPRN_SPRG0:
266                                 vcpu->arch.sprg0 = vcpu->arch.gpr[rs]; break;
267                         case SPRN_SPRG1:
268                                 vcpu->arch.sprg1 = vcpu->arch.gpr[rs]; break;
269                         case SPRN_SPRG2:
270                                 vcpu->arch.sprg2 = vcpu->arch.gpr[rs]; break;
271                         case SPRN_SPRG3:
272                                 vcpu->arch.sprg3 = vcpu->arch.gpr[rs]; break;
273
274                         default:
275                                 emulated = kvmppc_core_emulate_mtspr(vcpu, sprn, rs);
276                                 if (emulated == EMULATE_FAIL)
277                                         printk("mtspr: unknown spr %x\n", sprn);
278                                 break;
279                         }
280                         break;
281
282                 case OP_31_XOP_DCBI:
283                         /* Do nothing. The guest is performing dcbi because
284                          * hardware DMA is not snooped by the dcache, but
285                          * emulated DMA either goes through the dcache as
286                          * normal writes, or the host kernel has handled dcache
287                          * coherence. */
288                         break;
289
290                 case OP_31_XOP_LWBRX:
291                         rt = get_rt(inst);
292                         emulated = kvmppc_handle_load(run, vcpu, rt, 4, 0);
293                         break;
294
295                 case OP_31_XOP_TLBSYNC:
296                         break;
297
298                 case OP_31_XOP_STWBRX:
299                         rs = get_rs(inst);
300                         ra = get_ra(inst);
301                         rb = get_rb(inst);
302
303                         emulated = kvmppc_handle_store(run, vcpu,
304                                                        vcpu->arch.gpr[rs],
305                                                        4, 0);
306                         break;
307
308                 case OP_31_XOP_LHBRX:
309                         rt = get_rt(inst);
310                         emulated = kvmppc_handle_load(run, vcpu, rt, 2, 0);
311                         break;
312
313                 case OP_31_XOP_STHBRX:
314                         rs = get_rs(inst);
315                         ra = get_ra(inst);
316                         rb = get_rb(inst);
317
318                         emulated = kvmppc_handle_store(run, vcpu,
319                                                        vcpu->arch.gpr[rs],
320                                                        2, 0);
321                         break;
322
323                 default:
324                         /* Attempt core-specific emulation below. */
325                         emulated = EMULATE_FAIL;
326                 }
327                 break;
328
329         case OP_LWZ:
330                 rt = get_rt(inst);
331                 emulated = kvmppc_handle_load(run, vcpu, rt, 4, 1);
332                 break;
333
334         case OP_LWZU:
335                 ra = get_ra(inst);
336                 rt = get_rt(inst);
337                 emulated = kvmppc_handle_load(run, vcpu, rt, 4, 1);
338                 vcpu->arch.gpr[ra] = vcpu->arch.paddr_accessed;
339                 break;
340
341         case OP_LBZ:
342                 rt = get_rt(inst);
343                 emulated = kvmppc_handle_load(run, vcpu, rt, 1, 1);
344                 break;
345
346         case OP_LBZU:
347                 ra = get_ra(inst);
348                 rt = get_rt(inst);
349                 emulated = kvmppc_handle_load(run, vcpu, rt, 1, 1);
350                 vcpu->arch.gpr[ra] = vcpu->arch.paddr_accessed;
351                 break;
352
353         case OP_STW:
354                 rs = get_rs(inst);
355                 emulated = kvmppc_handle_store(run, vcpu, vcpu->arch.gpr[rs],
356                                                4, 1);
357                 break;
358
359         case OP_STWU:
360                 ra = get_ra(inst);
361                 rs = get_rs(inst);
362                 emulated = kvmppc_handle_store(run, vcpu, vcpu->arch.gpr[rs],
363                                                4, 1);
364                 vcpu->arch.gpr[ra] = vcpu->arch.paddr_accessed;
365                 break;
366
367         case OP_STB:
368                 rs = get_rs(inst);
369                 emulated = kvmppc_handle_store(run, vcpu, vcpu->arch.gpr[rs],
370                                                1, 1);
371                 break;
372
373         case OP_STBU:
374                 ra = get_ra(inst);
375                 rs = get_rs(inst);
376                 emulated = kvmppc_handle_store(run, vcpu, vcpu->arch.gpr[rs],
377                                                1, 1);
378                 vcpu->arch.gpr[ra] = vcpu->arch.paddr_accessed;
379                 break;
380
381         case OP_LHZ:
382                 rt = get_rt(inst);
383                 emulated = kvmppc_handle_load(run, vcpu, rt, 2, 1);
384                 break;
385
386         case OP_LHZU:
387                 ra = get_ra(inst);
388                 rt = get_rt(inst);
389                 emulated = kvmppc_handle_load(run, vcpu, rt, 2, 1);
390                 vcpu->arch.gpr[ra] = vcpu->arch.paddr_accessed;
391                 break;
392
393         case OP_STH:
394                 rs = get_rs(inst);
395                 emulated = kvmppc_handle_store(run, vcpu, vcpu->arch.gpr[rs],
396                                                2, 1);
397                 break;
398
399         case OP_STHU:
400                 ra = get_ra(inst);
401                 rs = get_rs(inst);
402                 emulated = kvmppc_handle_store(run, vcpu, vcpu->arch.gpr[rs],
403                                                2, 1);
404                 vcpu->arch.gpr[ra] = vcpu->arch.paddr_accessed;
405                 break;
406
407         default:
408                 emulated = EMULATE_FAIL;
409         }
410
411         if (emulated == EMULATE_FAIL) {
412                 emulated = kvmppc_core_emulate_op(run, vcpu, inst, &advance);
413                 if (emulated == EMULATE_FAIL) {
414                         advance = 0;
415                         printk(KERN_ERR "Couldn't emulate instruction 0x%08x "
416                                "(op %d xop %d)\n", inst, get_op(inst), get_xop(inst));
417                 }
418         }
419
420         KVMTRACE_3D(PPC_INSTR, vcpu, inst, (int)vcpu->arch.pc, emulated, entryexit);
421
422         if (advance)
423                 vcpu->arch.pc += 4; /* Advance past emulated instruction. */
424
425         return emulated;
426 }