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 * Copyright 2010-2011 Paul Mackerras, IBM Corp. <paulus@au1.ibm.com>
9 #include <linux/types.h>
10 #include <linux/string.h>
11 #include <linux/kvm.h>
12 #include <linux/kvm_host.h>
13 #include <linux/hugetlb.h>
14 #include <linux/module.h>
15 #include <linux/log2.h>
17 #include <asm/tlbflush.h>
18 #include <asm/trace.h>
19 #include <asm/kvm_ppc.h>
20 #include <asm/kvm_book3s.h>
21 #include <asm/book3s/64/mmu-hash.h>
22 #include <asm/hvcall.h>
23 #include <asm/synch.h>
24 #include <asm/ppc-opcode.h>
25 #include <asm/pte-walk.h>
27 /* Translate address of a vmalloc'd thing to a linear map address */
28 static void *real_vmalloc_addr(void *x
)
30 unsigned long addr
= (unsigned long) x
;
33 * assume we don't have huge pages in vmalloc space...
34 * So don't worry about THP collapse/split. Called
35 * Only in realmode with MSR_EE = 0, hence won't need irq_save/restore.
37 p
= find_init_mm_pte(addr
, NULL
);
38 if (!p
|| !pte_present(*p
))
40 addr
= (pte_pfn(*p
) << PAGE_SHIFT
) | (addr
& ~PAGE_MASK
);
44 /* Return 1 if we need to do a global tlbie, 0 if we can use tlbiel */
45 static int global_invalidates(struct kvm
*kvm
)
51 * If there is only one vcore, and it's currently running,
52 * as indicated by local_paca->kvm_hstate.kvm_vcpu being set,
53 * we can use tlbiel as long as we mark all other physical
54 * cores as potentially having stale TLB entries for this lpid.
55 * Otherwise, don't use tlbiel.
57 if (kvm
->arch
.online_vcores
== 1 && local_paca
->kvm_hstate
.kvm_vcpu
)
63 /* any other core might now have stale TLB entries... */
65 cpumask_setall(&kvm
->arch
.need_tlb_flush
);
66 cpu
= local_paca
->kvm_hstate
.kvm_vcore
->pcpu
;
68 * On POWER9, threads are independent but the TLB is shared,
69 * so use the bit for the first thread to represent the core.
71 if (cpu_has_feature(CPU_FTR_ARCH_300
))
72 cpu
= cpu_first_thread_sibling(cpu
);
73 cpumask_clear_cpu(cpu
, &kvm
->arch
.need_tlb_flush
);
80 * Add this HPTE into the chain for the real page.
81 * Must be called with the chain locked; it unlocks the chain.
83 void kvmppc_add_revmap_chain(struct kvm
*kvm
, struct revmap_entry
*rev
,
84 unsigned long *rmap
, long pte_index
, int realmode
)
86 struct revmap_entry
*head
, *tail
;
89 if (*rmap
& KVMPPC_RMAP_PRESENT
) {
90 i
= *rmap
& KVMPPC_RMAP_INDEX
;
91 head
= &kvm
->arch
.hpt
.rev
[i
];
93 head
= real_vmalloc_addr(head
);
94 tail
= &kvm
->arch
.hpt
.rev
[head
->back
];
96 tail
= real_vmalloc_addr(tail
);
98 rev
->back
= head
->back
;
99 tail
->forw
= pte_index
;
100 head
->back
= pte_index
;
102 rev
->forw
= rev
->back
= pte_index
;
103 *rmap
= (*rmap
& ~KVMPPC_RMAP_INDEX
) |
104 pte_index
| KVMPPC_RMAP_PRESENT
;
108 EXPORT_SYMBOL_GPL(kvmppc_add_revmap_chain
);
110 /* Update the dirty bitmap of a memslot */
111 void kvmppc_update_dirty_map(struct kvm_memory_slot
*memslot
,
112 unsigned long gfn
, unsigned long psize
)
114 unsigned long npages
;
116 if (!psize
|| !memslot
->dirty_bitmap
)
118 npages
= (psize
+ PAGE_SIZE
- 1) / PAGE_SIZE
;
119 gfn
-= memslot
->base_gfn
;
120 set_dirty_bits_atomic(memslot
->dirty_bitmap
, gfn
, npages
);
122 EXPORT_SYMBOL_GPL(kvmppc_update_dirty_map
);
124 static void kvmppc_set_dirty_from_hpte(struct kvm
*kvm
,
125 unsigned long hpte_v
, unsigned long hpte_gr
)
127 struct kvm_memory_slot
*memslot
;
131 psize
= kvmppc_actual_pgsz(hpte_v
, hpte_gr
);
132 gfn
= hpte_rpn(hpte_gr
, psize
);
133 memslot
= __gfn_to_memslot(kvm_memslots_raw(kvm
), gfn
);
134 if (memslot
&& memslot
->dirty_bitmap
)
135 kvmppc_update_dirty_map(memslot
, gfn
, psize
);
138 /* Returns a pointer to the revmap entry for the page mapped by a HPTE */
139 static unsigned long *revmap_for_hpte(struct kvm
*kvm
, unsigned long hpte_v
,
140 unsigned long hpte_gr
,
141 struct kvm_memory_slot
**memslotp
,
144 struct kvm_memory_slot
*memslot
;
148 gfn
= hpte_rpn(hpte_gr
, kvmppc_actual_pgsz(hpte_v
, hpte_gr
));
149 memslot
= __gfn_to_memslot(kvm_memslots_raw(kvm
), gfn
);
157 rmap
= real_vmalloc_addr(&memslot
->arch
.rmap
[gfn
- memslot
->base_gfn
]);
161 /* Remove this HPTE from the chain for a real page */
162 static void remove_revmap_chain(struct kvm
*kvm
, long pte_index
,
163 struct revmap_entry
*rev
,
164 unsigned long hpte_v
, unsigned long hpte_r
)
166 struct revmap_entry
*next
, *prev
;
167 unsigned long ptel
, head
;
169 unsigned long rcbits
;
170 struct kvm_memory_slot
*memslot
;
173 rcbits
= hpte_r
& (HPTE_R_R
| HPTE_R_C
);
174 ptel
= rev
->guest_rpte
|= rcbits
;
175 rmap
= revmap_for_hpte(kvm
, hpte_v
, ptel
, &memslot
, &gfn
);
180 head
= *rmap
& KVMPPC_RMAP_INDEX
;
181 next
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[rev
->forw
]);
182 prev
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[rev
->back
]);
183 next
->back
= rev
->back
;
184 prev
->forw
= rev
->forw
;
185 if (head
== pte_index
) {
187 if (head
== pte_index
)
188 *rmap
&= ~(KVMPPC_RMAP_PRESENT
| KVMPPC_RMAP_INDEX
);
190 *rmap
= (*rmap
& ~KVMPPC_RMAP_INDEX
) | head
;
192 *rmap
|= rcbits
<< KVMPPC_RMAP_RC_SHIFT
;
193 if (rcbits
& HPTE_R_C
)
194 kvmppc_update_dirty_map(memslot
, gfn
,
195 kvmppc_actual_pgsz(hpte_v
, hpte_r
));
199 long kvmppc_do_h_enter(struct kvm
*kvm
, unsigned long flags
,
200 long pte_index
, unsigned long pteh
, unsigned long ptel
,
201 pgd_t
*pgdir
, bool realmode
, unsigned long *pte_idx_ret
)
203 unsigned long i
, pa
, gpa
, gfn
, psize
;
204 unsigned long slot_fn
, hva
;
206 struct revmap_entry
*rev
;
207 unsigned long g_ptel
;
208 struct kvm_memory_slot
*memslot
;
209 unsigned hpage_shift
;
213 unsigned int writing
;
214 unsigned long mmu_seq
;
215 unsigned long rcbits
, irq_flags
= 0;
217 if (kvm_is_radix(kvm
))
219 psize
= kvmppc_actual_pgsz(pteh
, ptel
);
222 writing
= hpte_is_writable(ptel
);
223 pteh
&= ~(HPTE_V_HVLOCK
| HPTE_V_ABSENT
| HPTE_V_VALID
);
224 ptel
&= ~HPTE_GR_RESERVED
;
227 /* used later to detect if we might have been invalidated */
228 mmu_seq
= kvm
->mmu_notifier_seq
;
231 /* Find the memslot (if any) for this address */
232 gpa
= (ptel
& HPTE_R_RPN
) & ~(psize
- 1);
233 gfn
= gpa
>> PAGE_SHIFT
;
234 memslot
= __gfn_to_memslot(kvm_memslots_raw(kvm
), gfn
);
238 if (!(memslot
&& !(memslot
->flags
& KVM_MEMSLOT_INVALID
))) {
239 /* Emulated MMIO - mark this with key=31 */
240 pteh
|= HPTE_V_ABSENT
;
241 ptel
|= HPTE_R_KEY_HI
| HPTE_R_KEY_LO
;
245 /* Check if the requested page fits entirely in the memslot. */
246 if (!slot_is_aligned(memslot
, psize
))
248 slot_fn
= gfn
- memslot
->base_gfn
;
249 rmap
= &memslot
->arch
.rmap
[slot_fn
];
251 /* Translate to host virtual address */
252 hva
= __gfn_to_hva_memslot(memslot
, gfn
);
254 * If we had a page table table change after lookup, we would
255 * retry via mmu_notifier_retry.
258 local_irq_save(irq_flags
);
260 * If called in real mode we have MSR_EE = 0. Otherwise
261 * we disable irq above.
263 ptep
= __find_linux_pte(pgdir
, hva
, NULL
, &hpage_shift
);
266 unsigned int host_pte_size
;
269 host_pte_size
= 1ul << hpage_shift
;
271 host_pte_size
= PAGE_SIZE
;
273 * We should always find the guest page size
274 * to <= host page size, if host is using hugepage
276 if (host_pte_size
< psize
) {
278 local_irq_restore(flags
);
281 pte
= kvmppc_read_update_linux_pte(ptep
, writing
);
282 if (pte_present(pte
) && !pte_protnone(pte
)) {
283 if (writing
&& !__pte_write(pte
))
284 /* make the actual HPTE be read-only */
285 ptel
= hpte_make_readonly(ptel
);
287 pa
= pte_pfn(pte
) << PAGE_SHIFT
;
288 pa
|= hva
& (host_pte_size
- 1);
289 pa
|= gpa
& ~PAGE_MASK
;
293 local_irq_restore(irq_flags
);
295 ptel
&= HPTE_R_KEY
| HPTE_R_PP0
| (psize
-1);
299 pteh
|= HPTE_V_VALID
;
301 pteh
|= HPTE_V_ABSENT
;
302 ptel
&= ~(HPTE_R_KEY_HI
| HPTE_R_KEY_LO
);
305 /*If we had host pte mapping then Check WIMG */
306 if (ptep
&& !hpte_cache_flags_ok(ptel
, is_ci
)) {
310 * Allow guest to map emulated device memory as
311 * uncacheable, but actually make it cacheable.
313 ptel
&= ~(HPTE_R_W
|HPTE_R_I
|HPTE_R_G
);
317 /* Find and lock the HPTEG slot to use */
319 if (pte_index
>= kvmppc_hpt_npte(&kvm
->arch
.hpt
))
321 if (likely((flags
& H_EXACT
) == 0)) {
323 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (pte_index
<< 4));
324 for (i
= 0; i
< 8; ++i
) {
325 if ((be64_to_cpu(*hpte
) & HPTE_V_VALID
) == 0 &&
326 try_lock_hpte(hpte
, HPTE_V_HVLOCK
| HPTE_V_VALID
|
333 * Since try_lock_hpte doesn't retry (not even stdcx.
334 * failures), it could be that there is a free slot
335 * but we transiently failed to lock it. Try again,
336 * actually locking each slot and checking it.
339 for (i
= 0; i
< 8; ++i
) {
341 while (!try_lock_hpte(hpte
, HPTE_V_HVLOCK
))
343 pte
= be64_to_cpu(hpte
[0]);
344 if (!(pte
& (HPTE_V_VALID
| HPTE_V_ABSENT
)))
346 __unlock_hpte(hpte
, pte
);
354 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (pte_index
<< 4));
355 if (!try_lock_hpte(hpte
, HPTE_V_HVLOCK
| HPTE_V_VALID
|
357 /* Lock the slot and check again */
360 while (!try_lock_hpte(hpte
, HPTE_V_HVLOCK
))
362 pte
= be64_to_cpu(hpte
[0]);
363 if (pte
& (HPTE_V_VALID
| HPTE_V_ABSENT
)) {
364 __unlock_hpte(hpte
, pte
);
370 /* Save away the guest's idea of the second HPTE dword */
371 rev
= &kvm
->arch
.hpt
.rev
[pte_index
];
373 rev
= real_vmalloc_addr(rev
);
375 rev
->guest_rpte
= g_ptel
;
376 note_hpte_modification(kvm
, rev
);
379 /* Link HPTE into reverse-map chain */
380 if (pteh
& HPTE_V_VALID
) {
382 rmap
= real_vmalloc_addr(rmap
);
384 /* Check for pending invalidations under the rmap chain lock */
385 if (mmu_notifier_retry(kvm
, mmu_seq
)) {
386 /* inval in progress, write a non-present HPTE */
387 pteh
|= HPTE_V_ABSENT
;
388 pteh
&= ~HPTE_V_VALID
;
389 ptel
&= ~(HPTE_R_KEY_HI
| HPTE_R_KEY_LO
);
392 kvmppc_add_revmap_chain(kvm
, rev
, rmap
, pte_index
,
394 /* Only set R/C in real HPTE if already set in *rmap */
395 rcbits
= *rmap
>> KVMPPC_RMAP_RC_SHIFT
;
396 ptel
&= rcbits
| ~(HPTE_R_R
| HPTE_R_C
);
400 /* Convert to new format on P9 */
401 if (cpu_has_feature(CPU_FTR_ARCH_300
)) {
402 ptel
= hpte_old_to_new_r(pteh
, ptel
);
403 pteh
= hpte_old_to_new_v(pteh
);
405 hpte
[1] = cpu_to_be64(ptel
);
407 /* Write the first HPTE dword, unlocking the HPTE and making it valid */
409 __unlock_hpte(hpte
, pteh
);
410 asm volatile("ptesync" : : : "memory");
412 *pte_idx_ret
= pte_index
;
415 EXPORT_SYMBOL_GPL(kvmppc_do_h_enter
);
417 long kvmppc_h_enter(struct kvm_vcpu
*vcpu
, unsigned long flags
,
418 long pte_index
, unsigned long pteh
, unsigned long ptel
)
420 return kvmppc_do_h_enter(vcpu
->kvm
, flags
, pte_index
, pteh
, ptel
,
421 vcpu
->arch
.pgdir
, true, &vcpu
->arch
.gpr
[4]);
424 #ifdef __BIG_ENDIAN__
425 #define LOCK_TOKEN (*(u32 *)(&get_paca()->lock_token))
427 #define LOCK_TOKEN (*(u32 *)(&get_paca()->paca_index))
430 static inline int is_mmio_hpte(unsigned long v
, unsigned long r
)
432 return ((v
& HPTE_V_ABSENT
) &&
433 (r
& (HPTE_R_KEY_HI
| HPTE_R_KEY_LO
)) ==
434 (HPTE_R_KEY_HI
| HPTE_R_KEY_LO
));
437 static inline int try_lock_tlbie(unsigned int *lock
)
439 unsigned int tmp
, old
;
440 unsigned int token
= LOCK_TOKEN
;
442 asm volatile("1:lwarx %1,0,%2\n"
449 : "=&r" (tmp
), "=&r" (old
)
450 : "r" (lock
), "r" (token
)
455 static void do_tlbies(struct kvm
*kvm
, unsigned long *rbvalues
,
456 long npages
, int global
, bool need_sync
)
461 * We use the POWER9 5-operand versions of tlbie and tlbiel here.
462 * Since we are using RIC=0 PRS=0 R=0, and P7/P8 tlbiel ignores
463 * the RS field, this is backwards-compatible with P7 and P8.
466 while (!try_lock_tlbie(&kvm
->arch
.tlbie_lock
))
469 asm volatile("ptesync" : : : "memory");
470 for (i
= 0; i
< npages
; ++i
) {
471 asm volatile(PPC_TLBIE_5(%0,%1,0,0,0) : :
472 "r" (rbvalues
[i
]), "r" (kvm
->arch
.lpid
));
475 if (cpu_has_feature(CPU_FTR_P9_TLBIE_BUG
)) {
477 * Need the extra ptesync to make sure we don't
480 asm volatile("ptesync": : :"memory");
481 asm volatile(PPC_TLBIE_5(%0,%1,0,0,0) : :
482 "r" (rbvalues
[0]), "r" (kvm
->arch
.lpid
));
485 asm volatile("eieio; tlbsync; ptesync" : : : "memory");
486 kvm
->arch
.tlbie_lock
= 0;
489 asm volatile("ptesync" : : : "memory");
490 for (i
= 0; i
< npages
; ++i
) {
491 asm volatile(PPC_TLBIEL(%0,%1,0,0,0) : :
492 "r" (rbvalues
[i
]), "r" (0));
494 asm volatile("ptesync" : : : "memory");
498 long kvmppc_do_h_remove(struct kvm
*kvm
, unsigned long flags
,
499 unsigned long pte_index
, unsigned long avpn
,
500 unsigned long *hpret
)
503 unsigned long v
, r
, rb
;
504 struct revmap_entry
*rev
;
505 u64 pte
, orig_pte
, pte_r
;
507 if (kvm_is_radix(kvm
))
509 if (pte_index
>= kvmppc_hpt_npte(&kvm
->arch
.hpt
))
511 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (pte_index
<< 4));
512 while (!try_lock_hpte(hpte
, HPTE_V_HVLOCK
))
514 pte
= orig_pte
= be64_to_cpu(hpte
[0]);
515 pte_r
= be64_to_cpu(hpte
[1]);
516 if (cpu_has_feature(CPU_FTR_ARCH_300
)) {
517 pte
= hpte_new_to_old_v(pte
, pte_r
);
518 pte_r
= hpte_new_to_old_r(pte_r
);
520 if ((pte
& (HPTE_V_ABSENT
| HPTE_V_VALID
)) == 0 ||
521 ((flags
& H_AVPN
) && (pte
& ~0x7fUL
) != avpn
) ||
522 ((flags
& H_ANDCOND
) && (pte
& avpn
) != 0)) {
523 __unlock_hpte(hpte
, orig_pte
);
527 rev
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[pte_index
]);
528 v
= pte
& ~HPTE_V_HVLOCK
;
529 if (v
& HPTE_V_VALID
) {
530 hpte
[0] &= ~cpu_to_be64(HPTE_V_VALID
);
531 rb
= compute_tlbie_rb(v
, pte_r
, pte_index
);
532 do_tlbies(kvm
, &rb
, 1, global_invalidates(kvm
), true);
534 * The reference (R) and change (C) bits in a HPT
535 * entry can be set by hardware at any time up until
536 * the HPTE is invalidated and the TLB invalidation
537 * sequence has completed. This means that when
538 * removing a HPTE, we need to re-read the HPTE after
539 * the invalidation sequence has completed in order to
540 * obtain reliable values of R and C.
542 remove_revmap_chain(kvm
, pte_index
, rev
, v
,
543 be64_to_cpu(hpte
[1]));
545 r
= rev
->guest_rpte
& ~HPTE_GR_RESERVED
;
546 note_hpte_modification(kvm
, rev
);
547 unlock_hpte(hpte
, 0);
549 if (is_mmio_hpte(v
, pte_r
))
550 atomic64_inc(&kvm
->arch
.mmio_update
);
552 if (v
& HPTE_V_ABSENT
)
553 v
= (v
& ~HPTE_V_ABSENT
) | HPTE_V_VALID
;
558 EXPORT_SYMBOL_GPL(kvmppc_do_h_remove
);
560 long kvmppc_h_remove(struct kvm_vcpu
*vcpu
, unsigned long flags
,
561 unsigned long pte_index
, unsigned long avpn
)
563 return kvmppc_do_h_remove(vcpu
->kvm
, flags
, pte_index
, avpn
,
567 long kvmppc_h_bulk_remove(struct kvm_vcpu
*vcpu
)
569 struct kvm
*kvm
= vcpu
->kvm
;
570 unsigned long *args
= &vcpu
->arch
.gpr
[4];
571 __be64
*hp
, *hptes
[4];
572 unsigned long tlbrb
[4];
573 long int i
, j
, k
, n
, found
, indexes
[4];
574 unsigned long flags
, req
, pte_index
, rcbits
;
576 long int ret
= H_SUCCESS
;
577 struct revmap_entry
*rev
, *revs
[4];
580 if (kvm_is_radix(kvm
))
582 global
= global_invalidates(kvm
);
583 for (i
= 0; i
< 4 && ret
== H_SUCCESS
; ) {
588 flags
= pte_index
>> 56;
589 pte_index
&= ((1ul << 56) - 1);
592 if (req
== 3) { /* no more requests */
596 if (req
!= 1 || flags
== 3 ||
597 pte_index
>= kvmppc_hpt_npte(&kvm
->arch
.hpt
)) {
598 /* parameter error */
599 args
[j
] = ((0xa0 | flags
) << 56) + pte_index
;
603 hp
= (__be64
*) (kvm
->arch
.hpt
.virt
+ (pte_index
<< 4));
604 /* to avoid deadlock, don't spin except for first */
605 if (!try_lock_hpte(hp
, HPTE_V_HVLOCK
)) {
608 while (!try_lock_hpte(hp
, HPTE_V_HVLOCK
))
612 hp0
= be64_to_cpu(hp
[0]);
613 hp1
= be64_to_cpu(hp
[1]);
614 if (cpu_has_feature(CPU_FTR_ARCH_300
)) {
615 hp0
= hpte_new_to_old_v(hp0
, hp1
);
616 hp1
= hpte_new_to_old_r(hp1
);
618 if (hp0
& (HPTE_V_ABSENT
| HPTE_V_VALID
)) {
620 case 0: /* absolute */
623 case 1: /* andcond */
624 if (!(hp0
& args
[j
+ 1]))
628 if ((hp0
& ~0x7fUL
) == args
[j
+ 1])
634 hp
[0] &= ~cpu_to_be64(HPTE_V_HVLOCK
);
635 args
[j
] = ((0x90 | flags
) << 56) + pte_index
;
639 args
[j
] = ((0x80 | flags
) << 56) + pte_index
;
640 rev
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[pte_index
]);
641 note_hpte_modification(kvm
, rev
);
643 if (!(hp0
& HPTE_V_VALID
)) {
644 /* insert R and C bits from PTE */
645 rcbits
= rev
->guest_rpte
& (HPTE_R_R
|HPTE_R_C
);
646 args
[j
] |= rcbits
<< (56 - 5);
648 if (is_mmio_hpte(hp0
, hp1
))
649 atomic64_inc(&kvm
->arch
.mmio_update
);
653 /* leave it locked */
654 hp
[0] &= ~cpu_to_be64(HPTE_V_VALID
);
655 tlbrb
[n
] = compute_tlbie_rb(hp0
, hp1
, pte_index
);
665 /* Now that we've collected a batch, do the tlbies */
666 do_tlbies(kvm
, tlbrb
, n
, global
, true);
668 /* Read PTE low words after tlbie to get final R/C values */
669 for (k
= 0; k
< n
; ++k
) {
671 pte_index
= args
[j
] & ((1ul << 56) - 1);
674 remove_revmap_chain(kvm
, pte_index
, rev
,
675 be64_to_cpu(hp
[0]), be64_to_cpu(hp
[1]));
676 rcbits
= rev
->guest_rpte
& (HPTE_R_R
|HPTE_R_C
);
677 args
[j
] |= rcbits
<< (56 - 5);
678 __unlock_hpte(hp
, 0);
685 long kvmppc_h_protect(struct kvm_vcpu
*vcpu
, unsigned long flags
,
686 unsigned long pte_index
, unsigned long avpn
,
689 struct kvm
*kvm
= vcpu
->kvm
;
691 struct revmap_entry
*rev
;
692 unsigned long v
, r
, rb
, mask
, bits
;
695 if (kvm_is_radix(kvm
))
697 if (pte_index
>= kvmppc_hpt_npte(&kvm
->arch
.hpt
))
700 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (pte_index
<< 4));
701 while (!try_lock_hpte(hpte
, HPTE_V_HVLOCK
))
703 v
= pte_v
= be64_to_cpu(hpte
[0]);
704 if (cpu_has_feature(CPU_FTR_ARCH_300
))
705 v
= hpte_new_to_old_v(v
, be64_to_cpu(hpte
[1]));
706 if ((v
& (HPTE_V_ABSENT
| HPTE_V_VALID
)) == 0 ||
707 ((flags
& H_AVPN
) && (v
& ~0x7fUL
) != avpn
)) {
708 __unlock_hpte(hpte
, pte_v
);
712 pte_r
= be64_to_cpu(hpte
[1]);
713 bits
= (flags
<< 55) & HPTE_R_PP0
;
714 bits
|= (flags
<< 48) & HPTE_R_KEY_HI
;
715 bits
|= flags
& (HPTE_R_PP
| HPTE_R_N
| HPTE_R_KEY_LO
);
717 /* Update guest view of 2nd HPTE dword */
718 mask
= HPTE_R_PP0
| HPTE_R_PP
| HPTE_R_N
|
719 HPTE_R_KEY_HI
| HPTE_R_KEY_LO
;
720 rev
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[pte_index
]);
722 r
= (rev
->guest_rpte
& ~mask
) | bits
;
724 note_hpte_modification(kvm
, rev
);
728 if (v
& HPTE_V_VALID
) {
730 * If the page is valid, don't let it transition from
731 * readonly to writable. If it should be writable, we'll
732 * take a trap and let the page fault code sort it out.
734 r
= (pte_r
& ~mask
) | bits
;
735 if (hpte_is_writable(r
) && !hpte_is_writable(pte_r
))
736 r
= hpte_make_readonly(r
);
737 /* If the PTE is changing, invalidate it first */
739 rb
= compute_tlbie_rb(v
, r
, pte_index
);
740 hpte
[0] = cpu_to_be64((pte_v
& ~HPTE_V_VALID
) |
742 do_tlbies(kvm
, &rb
, 1, global_invalidates(kvm
), true);
743 /* Don't lose R/C bit updates done by hardware */
744 r
|= be64_to_cpu(hpte
[1]) & (HPTE_R_R
| HPTE_R_C
);
745 hpte
[1] = cpu_to_be64(r
);
748 unlock_hpte(hpte
, pte_v
& ~HPTE_V_HVLOCK
);
749 asm volatile("ptesync" : : : "memory");
750 if (is_mmio_hpte(v
, pte_r
))
751 atomic64_inc(&kvm
->arch
.mmio_update
);
756 long kvmppc_h_read(struct kvm_vcpu
*vcpu
, unsigned long flags
,
757 unsigned long pte_index
)
759 struct kvm
*kvm
= vcpu
->kvm
;
763 struct revmap_entry
*rev
= NULL
;
765 if (kvm_is_radix(kvm
))
767 if (pte_index
>= kvmppc_hpt_npte(&kvm
->arch
.hpt
))
769 if (flags
& H_READ_4
) {
773 rev
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[pte_index
]);
774 for (i
= 0; i
< n
; ++i
, ++pte_index
) {
775 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (pte_index
<< 4));
776 v
= be64_to_cpu(hpte
[0]) & ~HPTE_V_HVLOCK
;
777 r
= be64_to_cpu(hpte
[1]);
778 if (cpu_has_feature(CPU_FTR_ARCH_300
)) {
779 v
= hpte_new_to_old_v(v
, r
);
780 r
= hpte_new_to_old_r(r
);
782 if (v
& HPTE_V_ABSENT
) {
786 if (v
& HPTE_V_VALID
) {
787 r
= rev
[i
].guest_rpte
| (r
& (HPTE_R_R
| HPTE_R_C
));
788 r
&= ~HPTE_GR_RESERVED
;
790 vcpu
->arch
.gpr
[4 + i
* 2] = v
;
791 vcpu
->arch
.gpr
[5 + i
* 2] = r
;
796 long kvmppc_h_clear_ref(struct kvm_vcpu
*vcpu
, unsigned long flags
,
797 unsigned long pte_index
)
799 struct kvm
*kvm
= vcpu
->kvm
;
801 unsigned long v
, r
, gr
;
802 struct revmap_entry
*rev
;
804 long ret
= H_NOT_FOUND
;
806 if (kvm_is_radix(kvm
))
808 if (pte_index
>= kvmppc_hpt_npte(&kvm
->arch
.hpt
))
811 rev
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[pte_index
]);
812 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (pte_index
<< 4));
813 while (!try_lock_hpte(hpte
, HPTE_V_HVLOCK
))
815 v
= be64_to_cpu(hpte
[0]);
816 r
= be64_to_cpu(hpte
[1]);
817 if (!(v
& (HPTE_V_VALID
| HPTE_V_ABSENT
)))
820 gr
= rev
->guest_rpte
;
821 if (rev
->guest_rpte
& HPTE_R_R
) {
822 rev
->guest_rpte
&= ~HPTE_R_R
;
823 note_hpte_modification(kvm
, rev
);
825 if (v
& HPTE_V_VALID
) {
826 gr
|= r
& (HPTE_R_R
| HPTE_R_C
);
828 kvmppc_clear_ref_hpte(kvm
, hpte
, pte_index
);
829 rmap
= revmap_for_hpte(kvm
, v
, gr
, NULL
, NULL
);
832 *rmap
|= KVMPPC_RMAP_REFERENCED
;
837 vcpu
->arch
.gpr
[4] = gr
;
840 unlock_hpte(hpte
, v
& ~HPTE_V_HVLOCK
);
844 long kvmppc_h_clear_mod(struct kvm_vcpu
*vcpu
, unsigned long flags
,
845 unsigned long pte_index
)
847 struct kvm
*kvm
= vcpu
->kvm
;
849 unsigned long v
, r
, gr
;
850 struct revmap_entry
*rev
;
851 long ret
= H_NOT_FOUND
;
853 if (kvm_is_radix(kvm
))
855 if (pte_index
>= kvmppc_hpt_npte(&kvm
->arch
.hpt
))
858 rev
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[pte_index
]);
859 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (pte_index
<< 4));
860 while (!try_lock_hpte(hpte
, HPTE_V_HVLOCK
))
862 v
= be64_to_cpu(hpte
[0]);
863 r
= be64_to_cpu(hpte
[1]);
864 if (!(v
& (HPTE_V_VALID
| HPTE_V_ABSENT
)))
867 gr
= rev
->guest_rpte
;
869 rev
->guest_rpte
&= ~HPTE_R_C
;
870 note_hpte_modification(kvm
, rev
);
872 if (v
& HPTE_V_VALID
) {
873 /* need to make it temporarily absent so C is stable */
874 hpte
[0] |= cpu_to_be64(HPTE_V_ABSENT
);
875 kvmppc_invalidate_hpte(kvm
, hpte
, pte_index
);
876 r
= be64_to_cpu(hpte
[1]);
877 gr
|= r
& (HPTE_R_R
| HPTE_R_C
);
879 hpte
[1] = cpu_to_be64(r
& ~HPTE_R_C
);
881 kvmppc_set_dirty_from_hpte(kvm
, v
, gr
);
884 vcpu
->arch
.gpr
[4] = gr
;
887 unlock_hpte(hpte
, v
& ~HPTE_V_HVLOCK
);
891 void kvmppc_invalidate_hpte(struct kvm
*kvm
, __be64
*hptep
,
892 unsigned long pte_index
)
897 hptep
[0] &= ~cpu_to_be64(HPTE_V_VALID
);
898 hp0
= be64_to_cpu(hptep
[0]);
899 hp1
= be64_to_cpu(hptep
[1]);
900 if (cpu_has_feature(CPU_FTR_ARCH_300
)) {
901 hp0
= hpte_new_to_old_v(hp0
, hp1
);
902 hp1
= hpte_new_to_old_r(hp1
);
904 rb
= compute_tlbie_rb(hp0
, hp1
, pte_index
);
905 do_tlbies(kvm
, &rb
, 1, 1, true);
907 EXPORT_SYMBOL_GPL(kvmppc_invalidate_hpte
);
909 void kvmppc_clear_ref_hpte(struct kvm
*kvm
, __be64
*hptep
,
910 unsigned long pte_index
)
916 hp0
= be64_to_cpu(hptep
[0]);
917 hp1
= be64_to_cpu(hptep
[1]);
918 if (cpu_has_feature(CPU_FTR_ARCH_300
)) {
919 hp0
= hpte_new_to_old_v(hp0
, hp1
);
920 hp1
= hpte_new_to_old_r(hp1
);
922 rb
= compute_tlbie_rb(hp0
, hp1
, pte_index
);
923 rbyte
= (be64_to_cpu(hptep
[1]) & ~HPTE_R_R
) >> 8;
924 /* modify only the second-last byte, which contains the ref bit */
925 *((char *)hptep
+ 14) = rbyte
;
926 do_tlbies(kvm
, &rb
, 1, 1, false);
928 EXPORT_SYMBOL_GPL(kvmppc_clear_ref_hpte
);
930 static int slb_base_page_shift
[4] = {
934 20, /* 1M, unsupported */
937 static struct mmio_hpte_cache_entry
*mmio_cache_search(struct kvm_vcpu
*vcpu
,
938 unsigned long eaddr
, unsigned long slb_v
, long mmio_update
)
940 struct mmio_hpte_cache_entry
*entry
= NULL
;
944 for (i
= 0; i
< MMIO_HPTE_CACHE_SIZE
; i
++) {
945 entry
= &vcpu
->arch
.mmio_cache
.entry
[i
];
946 if (entry
->mmio_update
== mmio_update
) {
947 pshift
= entry
->slb_base_pshift
;
948 if ((entry
->eaddr
>> pshift
) == (eaddr
>> pshift
) &&
949 entry
->slb_v
== slb_v
)
956 static struct mmio_hpte_cache_entry
*
957 next_mmio_cache_entry(struct kvm_vcpu
*vcpu
)
959 unsigned int index
= vcpu
->arch
.mmio_cache
.index
;
961 vcpu
->arch
.mmio_cache
.index
++;
962 if (vcpu
->arch
.mmio_cache
.index
== MMIO_HPTE_CACHE_SIZE
)
963 vcpu
->arch
.mmio_cache
.index
= 0;
965 return &vcpu
->arch
.mmio_cache
.entry
[index
];
968 /* When called from virtmode, this func should be protected by
969 * preempt_disable(), otherwise, the holding of HPTE_V_HVLOCK
970 * can trigger deadlock issue.
972 long kvmppc_hv_find_lock_hpte(struct kvm
*kvm
, gva_t eaddr
, unsigned long slb_v
,
977 unsigned long somask
;
978 unsigned long vsid
, hash
;
981 unsigned long mask
, val
;
982 unsigned long v
, r
, orig_v
;
984 /* Get page shift, work out hash and AVPN etc. */
985 mask
= SLB_VSID_B
| HPTE_V_AVPN
| HPTE_V_SECONDARY
;
988 if (slb_v
& SLB_VSID_L
) {
989 mask
|= HPTE_V_LARGE
;
991 pshift
= slb_base_page_shift
[(slb_v
& SLB_VSID_LP
) >> 4];
993 if (slb_v
& SLB_VSID_B_1T
) {
994 somask
= (1UL << 40) - 1;
995 vsid
= (slb_v
& ~SLB_VSID_B
) >> SLB_VSID_SHIFT_1T
;
998 somask
= (1UL << 28) - 1;
999 vsid
= (slb_v
& ~SLB_VSID_B
) >> SLB_VSID_SHIFT
;
1001 hash
= (vsid
^ ((eaddr
& somask
) >> pshift
)) & kvmppc_hpt_mask(&kvm
->arch
.hpt
);
1002 avpn
= slb_v
& ~(somask
>> 16); /* also includes B */
1003 avpn
|= (eaddr
& somask
) >> 16;
1006 avpn
&= ~((1UL << (pshift
- 16)) - 1);
1012 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (hash
<< 7));
1014 for (i
= 0; i
< 16; i
+= 2) {
1015 /* Read the PTE racily */
1016 v
= be64_to_cpu(hpte
[i
]) & ~HPTE_V_HVLOCK
;
1017 if (cpu_has_feature(CPU_FTR_ARCH_300
))
1018 v
= hpte_new_to_old_v(v
, be64_to_cpu(hpte
[i
+1]));
1020 /* Check valid/absent, hash, segment size and AVPN */
1021 if (!(v
& valid
) || (v
& mask
) != val
)
1024 /* Lock the PTE and read it under the lock */
1025 while (!try_lock_hpte(&hpte
[i
], HPTE_V_HVLOCK
))
1027 v
= orig_v
= be64_to_cpu(hpte
[i
]) & ~HPTE_V_HVLOCK
;
1028 r
= be64_to_cpu(hpte
[i
+1]);
1029 if (cpu_has_feature(CPU_FTR_ARCH_300
)) {
1030 v
= hpte_new_to_old_v(v
, r
);
1031 r
= hpte_new_to_old_r(r
);
1035 * Check the HPTE again, including base page size
1037 if ((v
& valid
) && (v
& mask
) == val
&&
1038 kvmppc_hpte_base_page_shift(v
, r
) == pshift
)
1039 /* Return with the HPTE still locked */
1040 return (hash
<< 3) + (i
>> 1);
1042 __unlock_hpte(&hpte
[i
], orig_v
);
1045 if (val
& HPTE_V_SECONDARY
)
1047 val
|= HPTE_V_SECONDARY
;
1048 hash
= hash
^ kvmppc_hpt_mask(&kvm
->arch
.hpt
);
1052 EXPORT_SYMBOL(kvmppc_hv_find_lock_hpte
);
1055 * Called in real mode to check whether an HPTE not found fault
1056 * is due to accessing a paged-out page or an emulated MMIO page,
1057 * or if a protection fault is due to accessing a page that the
1058 * guest wanted read/write access to but which we made read-only.
1059 * Returns a possibly modified status (DSISR) value if not
1060 * (i.e. pass the interrupt to the guest),
1061 * -1 to pass the fault up to host kernel mode code, -2 to do that
1062 * and also load the instruction word (for MMIO emulation),
1063 * or 0 if we should make the guest retry the access.
1065 long kvmppc_hpte_hv_fault(struct kvm_vcpu
*vcpu
, unsigned long addr
,
1066 unsigned long slb_v
, unsigned int status
, bool data
)
1068 struct kvm
*kvm
= vcpu
->kvm
;
1070 unsigned long v
, r
, gr
, orig_v
;
1072 unsigned long valid
;
1073 struct revmap_entry
*rev
;
1074 unsigned long pp
, key
;
1075 struct mmio_hpte_cache_entry
*cache_entry
= NULL
;
1076 long mmio_update
= 0;
1078 /* For protection fault, expect to find a valid HPTE */
1079 valid
= HPTE_V_VALID
;
1080 if (status
& DSISR_NOHPTE
) {
1081 valid
|= HPTE_V_ABSENT
;
1082 mmio_update
= atomic64_read(&kvm
->arch
.mmio_update
);
1083 cache_entry
= mmio_cache_search(vcpu
, addr
, slb_v
, mmio_update
);
1086 index
= cache_entry
->pte_index
;
1087 v
= cache_entry
->hpte_v
;
1088 r
= cache_entry
->hpte_r
;
1089 gr
= cache_entry
->rpte
;
1091 index
= kvmppc_hv_find_lock_hpte(kvm
, addr
, slb_v
, valid
);
1093 if (status
& DSISR_NOHPTE
)
1094 return status
; /* there really was no HPTE */
1095 return 0; /* for prot fault, HPTE disappeared */
1097 hpte
= (__be64
*)(kvm
->arch
.hpt
.virt
+ (index
<< 4));
1098 v
= orig_v
= be64_to_cpu(hpte
[0]) & ~HPTE_V_HVLOCK
;
1099 r
= be64_to_cpu(hpte
[1]);
1100 if (cpu_has_feature(CPU_FTR_ARCH_300
)) {
1101 v
= hpte_new_to_old_v(v
, r
);
1102 r
= hpte_new_to_old_r(r
);
1104 rev
= real_vmalloc_addr(&kvm
->arch
.hpt
.rev
[index
]);
1105 gr
= rev
->guest_rpte
;
1107 unlock_hpte(hpte
, orig_v
);
1110 /* For not found, if the HPTE is valid by now, retry the instruction */
1111 if ((status
& DSISR_NOHPTE
) && (v
& HPTE_V_VALID
))
1114 /* Check access permissions to the page */
1115 pp
= gr
& (HPTE_R_PP0
| HPTE_R_PP
);
1116 key
= (vcpu
->arch
.shregs
.msr
& MSR_PR
) ? SLB_VSID_KP
: SLB_VSID_KS
;
1117 status
&= ~DSISR_NOHPTE
; /* DSISR_NOHPTE == SRR1_ISI_NOPT */
1119 if (gr
& (HPTE_R_N
| HPTE_R_G
))
1120 return status
| SRR1_ISI_N_OR_G
;
1121 if (!hpte_read_permission(pp
, slb_v
& key
))
1122 return status
| SRR1_ISI_PROT
;
1123 } else if (status
& DSISR_ISSTORE
) {
1124 /* check write permission */
1125 if (!hpte_write_permission(pp
, slb_v
& key
))
1126 return status
| DSISR_PROTFAULT
;
1128 if (!hpte_read_permission(pp
, slb_v
& key
))
1129 return status
| DSISR_PROTFAULT
;
1132 /* Check storage key, if applicable */
1133 if (data
&& (vcpu
->arch
.shregs
.msr
& MSR_DR
)) {
1134 unsigned int perm
= hpte_get_skey_perm(gr
, vcpu
->arch
.amr
);
1135 if (status
& DSISR_ISSTORE
)
1138 return status
| DSISR_KEYFAULT
;
1141 /* Save HPTE info for virtual-mode handler */
1142 vcpu
->arch
.pgfault_addr
= addr
;
1143 vcpu
->arch
.pgfault_index
= index
;
1144 vcpu
->arch
.pgfault_hpte
[0] = v
;
1145 vcpu
->arch
.pgfault_hpte
[1] = r
;
1146 vcpu
->arch
.pgfault_cache
= cache_entry
;
1148 /* Check the storage key to see if it is possibly emulated MMIO */
1149 if ((r
& (HPTE_R_KEY_HI
| HPTE_R_KEY_LO
)) ==
1150 (HPTE_R_KEY_HI
| HPTE_R_KEY_LO
)) {
1152 unsigned int pshift
= 12;
1153 unsigned int pshift_index
;
1155 if (slb_v
& SLB_VSID_L
) {
1156 pshift_index
= ((slb_v
& SLB_VSID_LP
) >> 4);
1157 pshift
= slb_base_page_shift
[pshift_index
];
1159 cache_entry
= next_mmio_cache_entry(vcpu
);
1160 cache_entry
->eaddr
= addr
;
1161 cache_entry
->slb_base_pshift
= pshift
;
1162 cache_entry
->pte_index
= index
;
1163 cache_entry
->hpte_v
= v
;
1164 cache_entry
->hpte_r
= r
;
1165 cache_entry
->rpte
= gr
;
1166 cache_entry
->slb_v
= slb_v
;
1167 cache_entry
->mmio_update
= mmio_update
;
1169 if (data
&& (vcpu
->arch
.shregs
.msr
& MSR_IR
))
1170 return -2; /* MMIO emulation - load instr word */
1173 return -1; /* send fault up to host kernel mode */