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.
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.
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.
15 * Copyright SUSE Linux Products GmbH 2009
17 * Authors: Alexander Graf <agraf@suse.de>
20 #include <asm/kvm_ppc.h>
21 #include <asm/disassemble.h>
22 #include <asm/kvm_book3s.h>
24 #include <asm/switch_to.h>
27 #define OP_19_XOP_RFID 18
28 #define OP_19_XOP_RFI 50
30 #define OP_31_XOP_MFMSR 83
31 #define OP_31_XOP_MTMSR 146
32 #define OP_31_XOP_MTMSRD 178
33 #define OP_31_XOP_MTSR 210
34 #define OP_31_XOP_MTSRIN 242
35 #define OP_31_XOP_TLBIEL 274
36 #define OP_31_XOP_TLBIE 306
37 /* Opcode is officially reserved, reuse it as sc 1 when sc 1 doesn't trap */
38 #define OP_31_XOP_FAKE_SC1 308
39 #define OP_31_XOP_SLBMTE 402
40 #define OP_31_XOP_SLBIE 434
41 #define OP_31_XOP_SLBIA 498
42 #define OP_31_XOP_MFSR 595
43 #define OP_31_XOP_MFSRIN 659
44 #define OP_31_XOP_DCBA 758
45 #define OP_31_XOP_SLBMFEV 851
46 #define OP_31_XOP_EIOIO 854
47 #define OP_31_XOP_SLBMFEE 915
49 /* DCBZ is actually 1014, but we patch it to 1010 so we get a trap */
50 #define OP_31_XOP_DCBZ 1010
66 /* Book3S_32 defines mfsrin(v) - but that messes up our abstract
67 * function pointers, so let's just disable the define. */
76 static bool spr_allowed(struct kvm_vcpu
*vcpu
, enum priv_level level
)
78 /* PAPR VMs only access supervisor SPRs */
79 if (vcpu
->arch
.papr_enabled
&& (level
> PRIV_SUPER
))
82 /* Limit user space to its own small SPR set */
83 if ((vcpu
->arch
.shared
->msr
& MSR_PR
) && level
> PRIV_PROBLEM
)
89 int kvmppc_core_emulate_op_pr(struct kvm_run
*run
, struct kvm_vcpu
*vcpu
,
90 unsigned int inst
, int *advance
)
92 int emulated
= EMULATE_DONE
;
93 int rt
= get_rt(inst
);
94 int rs
= get_rs(inst
);
95 int ra
= get_ra(inst
);
96 int rb
= get_rb(inst
);
98 switch (get_op(inst
)) {
100 switch (get_xop(inst
)) {
103 kvmppc_set_pc(vcpu
, vcpu
->arch
.shared
->srr0
);
104 kvmppc_set_msr(vcpu
, vcpu
->arch
.shared
->srr1
);
109 emulated
= EMULATE_FAIL
;
114 switch (get_xop(inst
)) {
115 case OP_31_XOP_MFMSR
:
116 kvmppc_set_gpr(vcpu
, rt
, vcpu
->arch
.shared
->msr
);
118 case OP_31_XOP_MTMSRD
:
120 ulong rs_val
= kvmppc_get_gpr(vcpu
, rs
);
121 if (inst
& 0x10000) {
122 ulong new_msr
= vcpu
->arch
.shared
->msr
;
123 new_msr
&= ~(MSR_RI
| MSR_EE
);
124 new_msr
|= rs_val
& (MSR_RI
| MSR_EE
);
125 vcpu
->arch
.shared
->msr
= new_msr
;
127 kvmppc_set_msr(vcpu
, rs_val
);
130 case OP_31_XOP_MTMSR
:
131 kvmppc_set_msr(vcpu
, kvmppc_get_gpr(vcpu
, rs
));
137 srnum
= kvmppc_get_field(inst
, 12 + 32, 15 + 32);
138 if (vcpu
->arch
.mmu
.mfsrin
) {
140 sr
= vcpu
->arch
.mmu
.mfsrin(vcpu
, srnum
);
141 kvmppc_set_gpr(vcpu
, rt
, sr
);
145 case OP_31_XOP_MFSRIN
:
149 srnum
= (kvmppc_get_gpr(vcpu
, rb
) >> 28) & 0xf;
150 if (vcpu
->arch
.mmu
.mfsrin
) {
152 sr
= vcpu
->arch
.mmu
.mfsrin(vcpu
, srnum
);
153 kvmppc_set_gpr(vcpu
, rt
, sr
);
158 vcpu
->arch
.mmu
.mtsrin(vcpu
,
160 kvmppc_get_gpr(vcpu
, rs
));
162 case OP_31_XOP_MTSRIN
:
163 vcpu
->arch
.mmu
.mtsrin(vcpu
,
164 (kvmppc_get_gpr(vcpu
, rb
) >> 28) & 0xf,
165 kvmppc_get_gpr(vcpu
, rs
));
167 case OP_31_XOP_TLBIE
:
168 case OP_31_XOP_TLBIEL
:
170 bool large
= (inst
& 0x00200000) ? true : false;
171 ulong addr
= kvmppc_get_gpr(vcpu
, rb
);
172 vcpu
->arch
.mmu
.tlbie(vcpu
, addr
, large
);
175 #ifdef CONFIG_PPC_BOOK3S_64
176 case OP_31_XOP_FAKE_SC1
:
178 /* SC 1 papr hypercalls */
179 ulong cmd
= kvmppc_get_gpr(vcpu
, 3);
182 if ((vcpu
->arch
.shared
->msr
& MSR_PR
) ||
183 !vcpu
->arch
.papr_enabled
) {
184 emulated
= EMULATE_FAIL
;
188 if (kvmppc_h_pr(vcpu
, cmd
) == EMULATE_DONE
)
191 run
->papr_hcall
.nr
= cmd
;
192 for (i
= 0; i
< 9; ++i
) {
193 ulong gpr
= kvmppc_get_gpr(vcpu
, 4 + i
);
194 run
->papr_hcall
.args
[i
] = gpr
;
197 run
->exit_reason
= KVM_EXIT_PAPR_HCALL
;
198 vcpu
->arch
.hcall_needed
= 1;
199 emulated
= EMULATE_EXIT_USER
;
203 case OP_31_XOP_EIOIO
:
205 case OP_31_XOP_SLBMTE
:
206 if (!vcpu
->arch
.mmu
.slbmte
)
209 vcpu
->arch
.mmu
.slbmte(vcpu
,
210 kvmppc_get_gpr(vcpu
, rs
),
211 kvmppc_get_gpr(vcpu
, rb
));
213 case OP_31_XOP_SLBIE
:
214 if (!vcpu
->arch
.mmu
.slbie
)
217 vcpu
->arch
.mmu
.slbie(vcpu
,
218 kvmppc_get_gpr(vcpu
, rb
));
220 case OP_31_XOP_SLBIA
:
221 if (!vcpu
->arch
.mmu
.slbia
)
224 vcpu
->arch
.mmu
.slbia(vcpu
);
226 case OP_31_XOP_SLBMFEE
:
227 if (!vcpu
->arch
.mmu
.slbmfee
) {
228 emulated
= EMULATE_FAIL
;
232 rb_val
= kvmppc_get_gpr(vcpu
, rb
);
233 t
= vcpu
->arch
.mmu
.slbmfee(vcpu
, rb_val
);
234 kvmppc_set_gpr(vcpu
, rt
, t
);
237 case OP_31_XOP_SLBMFEV
:
238 if (!vcpu
->arch
.mmu
.slbmfev
) {
239 emulated
= EMULATE_FAIL
;
243 rb_val
= kvmppc_get_gpr(vcpu
, rb
);
244 t
= vcpu
->arch
.mmu
.slbmfev(vcpu
, rb_val
);
245 kvmppc_set_gpr(vcpu
, rt
, t
);
249 /* Gets treated as NOP */
253 ulong rb_val
= kvmppc_get_gpr(vcpu
, rb
);
256 u32 zeros
[8] = { 0, 0, 0, 0, 0, 0, 0, 0 };
261 ra_val
= kvmppc_get_gpr(vcpu
, ra
);
263 addr
= (ra_val
+ rb_val
) & ~31ULL;
264 if (!(vcpu
->arch
.shared
->msr
& MSR_SF
))
268 r
= kvmppc_st(vcpu
, &addr
, 32, zeros
, true);
269 if ((r
== -ENOENT
) || (r
== -EPERM
)) {
271 vcpu
->arch
.shared
->dar
= vaddr
;
272 vcpu
->arch
.fault_dar
= vaddr
;
274 dsisr
= DSISR_ISSTORE
;
276 dsisr
|= DSISR_NOHPTE
;
277 else if (r
== -EPERM
)
278 dsisr
|= DSISR_PROTFAULT
;
280 vcpu
->arch
.shared
->dsisr
= dsisr
;
281 vcpu
->arch
.fault_dsisr
= dsisr
;
283 kvmppc_book3s_queue_irqprio(vcpu
,
284 BOOK3S_INTERRUPT_DATA_STORAGE
);
290 emulated
= EMULATE_FAIL
;
294 emulated
= EMULATE_FAIL
;
297 if (emulated
== EMULATE_FAIL
)
298 emulated
= kvmppc_emulate_paired_single(run
, vcpu
);
303 void kvmppc_set_bat(struct kvm_vcpu
*vcpu
, struct kvmppc_bat
*bat
, bool upper
,
308 u32 bl
= (val
>> 2) & 0x7ff;
309 bat
->bepi_mask
= (~bl
<< 17);
310 bat
->bepi
= val
& 0xfffe0000;
311 bat
->vs
= (val
& 2) ? 1 : 0;
312 bat
->vp
= (val
& 1) ? 1 : 0;
313 bat
->raw
= (bat
->raw
& 0xffffffff00000000ULL
) | val
;
316 bat
->brpn
= val
& 0xfffe0000;
317 bat
->wimg
= (val
>> 3) & 0xf;
319 bat
->raw
= (bat
->raw
& 0x00000000ffffffffULL
) | ((u64
)val
<< 32);
323 static struct kvmppc_bat
*kvmppc_find_bat(struct kvm_vcpu
*vcpu
, int sprn
)
325 struct kvmppc_vcpu_book3s
*vcpu_book3s
= to_book3s(vcpu
);
326 struct kvmppc_bat
*bat
;
329 case SPRN_IBAT0U
... SPRN_IBAT3L
:
330 bat
= &vcpu_book3s
->ibat
[(sprn
- SPRN_IBAT0U
) / 2];
332 case SPRN_IBAT4U
... SPRN_IBAT7L
:
333 bat
= &vcpu_book3s
->ibat
[4 + ((sprn
- SPRN_IBAT4U
) / 2)];
335 case SPRN_DBAT0U
... SPRN_DBAT3L
:
336 bat
= &vcpu_book3s
->dbat
[(sprn
- SPRN_DBAT0U
) / 2];
338 case SPRN_DBAT4U
... SPRN_DBAT7L
:
339 bat
= &vcpu_book3s
->dbat
[4 + ((sprn
- SPRN_DBAT4U
) / 2)];
348 int kvmppc_core_emulate_mtspr_pr(struct kvm_vcpu
*vcpu
, int sprn
, ulong spr_val
)
350 int emulated
= EMULATE_DONE
;
354 if (!spr_allowed(vcpu
, PRIV_HYPER
))
356 to_book3s(vcpu
)->sdr1
= spr_val
;
359 vcpu
->arch
.shared
->dsisr
= spr_val
;
362 vcpu
->arch
.shared
->dar
= spr_val
;
365 to_book3s(vcpu
)->hior
= spr_val
;
367 case SPRN_IBAT0U
... SPRN_IBAT3L
:
368 case SPRN_IBAT4U
... SPRN_IBAT7L
:
369 case SPRN_DBAT0U
... SPRN_DBAT3L
:
370 case SPRN_DBAT4U
... SPRN_DBAT7L
:
372 struct kvmppc_bat
*bat
= kvmppc_find_bat(vcpu
, sprn
);
374 kvmppc_set_bat(vcpu
, bat
, !(sprn
% 2), (u32
)spr_val
);
375 /* BAT writes happen so rarely that we're ok to flush
377 kvmppc_mmu_pte_flush(vcpu
, 0, 0);
378 kvmppc_mmu_flush_segments(vcpu
);
382 to_book3s(vcpu
)->hid
[0] = spr_val
;
385 to_book3s(vcpu
)->hid
[1] = spr_val
;
388 to_book3s(vcpu
)->hid
[2] = spr_val
;
390 case SPRN_HID2_GEKKO
:
391 to_book3s(vcpu
)->hid
[2] = spr_val
;
392 /* HID2.PSE controls paired single on gekko */
393 switch (vcpu
->arch
.pvr
) {
394 case 0x00080200: /* lonestar 2.0 */
395 case 0x00088202: /* lonestar 2.2 */
396 case 0x70000100: /* gekko 1.0 */
397 case 0x00080100: /* gekko 2.0 */
398 case 0x00083203: /* gekko 2.3a */
399 case 0x00083213: /* gekko 2.3b */
400 case 0x00083204: /* gekko 2.4 */
401 case 0x00083214: /* gekko 2.4e (8SE) - retail HW2 */
402 case 0x00087200: /* broadway */
403 if (vcpu
->arch
.hflags
& BOOK3S_HFLAG_NATIVE_PS
) {
404 /* Native paired singles */
405 } else if (spr_val
& (1 << 29)) { /* HID2.PSE */
406 vcpu
->arch
.hflags
|= BOOK3S_HFLAG_PAIRED_SINGLE
;
407 kvmppc_giveup_ext(vcpu
, MSR_FP
);
409 vcpu
->arch
.hflags
&= ~BOOK3S_HFLAG_PAIRED_SINGLE
;
415 case SPRN_HID4_GEKKO
:
416 to_book3s(vcpu
)->hid
[4] = spr_val
;
419 to_book3s(vcpu
)->hid
[5] = spr_val
;
420 /* guest HID5 set can change is_dcbz32 */
421 if (vcpu
->arch
.mmu
.is_dcbz32(vcpu
) &&
423 vcpu
->arch
.hflags
|= BOOK3S_HFLAG_DCBZ32
;
426 to_book3s(vcpu
)->purr_offset
= spr_val
- get_tb();
429 to_book3s(vcpu
)->spurr_offset
= spr_val
- get_tb();
439 to_book3s(vcpu
)->gqr
[sprn
- SPRN_GQR0
] = spr_val
;
449 case SPRN_MMCR0_GEKKO
:
450 case SPRN_MMCR1_GEKKO
:
451 case SPRN_PMC1_GEKKO
:
452 case SPRN_PMC2_GEKKO
:
453 case SPRN_PMC3_GEKKO
:
454 case SPRN_PMC4_GEKKO
:
455 case SPRN_WPAR_GEKKO
:
461 printk(KERN_INFO
"KVM: invalid SPR write: %d\n", sprn
);
463 emulated
= EMULATE_FAIL
;
471 int kvmppc_core_emulate_mfspr_pr(struct kvm_vcpu
*vcpu
, int sprn
, ulong
*spr_val
)
473 int emulated
= EMULATE_DONE
;
476 case SPRN_IBAT0U
... SPRN_IBAT3L
:
477 case SPRN_IBAT4U
... SPRN_IBAT7L
:
478 case SPRN_DBAT0U
... SPRN_DBAT3L
:
479 case SPRN_DBAT4U
... SPRN_DBAT7L
:
481 struct kvmppc_bat
*bat
= kvmppc_find_bat(vcpu
, sprn
);
484 *spr_val
= bat
->raw
>> 32;
491 if (!spr_allowed(vcpu
, PRIV_HYPER
))
493 *spr_val
= to_book3s(vcpu
)->sdr1
;
496 *spr_val
= vcpu
->arch
.shared
->dsisr
;
499 *spr_val
= vcpu
->arch
.shared
->dar
;
502 *spr_val
= to_book3s(vcpu
)->hior
;
505 *spr_val
= to_book3s(vcpu
)->hid
[0];
508 *spr_val
= to_book3s(vcpu
)->hid
[1];
511 case SPRN_HID2_GEKKO
:
512 *spr_val
= to_book3s(vcpu
)->hid
[2];
515 case SPRN_HID4_GEKKO
:
516 *spr_val
= to_book3s(vcpu
)->hid
[4];
519 *spr_val
= to_book3s(vcpu
)->hid
[5];
526 *spr_val
= get_tb() + to_book3s(vcpu
)->purr_offset
;
529 *spr_val
= get_tb() + to_book3s(vcpu
)->purr_offset
;
539 *spr_val
= to_book3s(vcpu
)->gqr
[sprn
- SPRN_GQR0
];
547 case SPRN_MMCR0_GEKKO
:
548 case SPRN_MMCR1_GEKKO
:
549 case SPRN_PMC1_GEKKO
:
550 case SPRN_PMC2_GEKKO
:
551 case SPRN_PMC3_GEKKO
:
552 case SPRN_PMC4_GEKKO
:
553 case SPRN_WPAR_GEKKO
:
560 printk(KERN_INFO
"KVM: invalid SPR read: %d\n", sprn
);
562 emulated
= EMULATE_FAIL
;
570 u32
kvmppc_alignment_dsisr(struct kvm_vcpu
*vcpu
, unsigned int inst
)
575 * This is what the spec says about DSISR bits (not mentioned = 0):
577 * 12:13 [DS] Set to bits 30:31
578 * 15:16 [X] Set to bits 29:30
579 * 17 [X] Set to bit 25
580 * [D/DS] Set to bit 5
581 * 18:21 [X] Set to bits 21:24
582 * [D/DS] Set to bits 1:4
583 * 22:26 Set to bits 6:10 (RT/RS/FRT/FRS)
584 * 27:31 Set to bits 11:15 (RA)
587 switch (get_op(inst
)) {
593 dsisr
|= (inst
>> 12) & 0x4000; /* bit 17 */
594 dsisr
|= (inst
>> 17) & 0x3c00; /* bits 18:21 */
598 dsisr
|= (inst
<< 14) & 0x18000; /* bits 15:16 */
599 dsisr
|= (inst
<< 8) & 0x04000; /* bit 17 */
600 dsisr
|= (inst
<< 3) & 0x03c00; /* bits 18:21 */
603 printk(KERN_INFO
"KVM: Unaligned instruction 0x%x\n", inst
);
607 dsisr
|= (inst
>> 16) & 0x03ff; /* bits 22:31 */
612 ulong
kvmppc_alignment_dar(struct kvm_vcpu
*vcpu
, unsigned int inst
)
615 ulong ra
= get_ra(inst
);
616 ulong rb
= get_rb(inst
);
618 switch (get_op(inst
)) {
624 dar
= kvmppc_get_gpr(vcpu
, ra
);
625 dar
+= (s32
)((s16
)inst
);
629 dar
= kvmppc_get_gpr(vcpu
, ra
);
630 dar
+= kvmppc_get_gpr(vcpu
, rb
);
633 printk(KERN_INFO
"KVM: Unaligned instruction 0x%x\n", inst
);