mmu.c 85.9 KB
Newer Older
A
Avi Kivity 已提交
1 2 3 4 5 6 7 8 9
/*
 * Kernel-based Virtual Machine driver for Linux
 *
 * This module enables machines with Intel VT-x extensions to run virtual
 * machines without emulation or binary translation.
 *
 * MMU support
 *
 * Copyright (C) 2006 Qumranet, Inc.
A
Avi Kivity 已提交
10
 * Copyright 2010 Red Hat, Inc. and/or its affilates.
A
Avi Kivity 已提交
11 12 13 14 15 16 17 18 19
 *
 * Authors:
 *   Yaniv Kamay  <yaniv@qumranet.com>
 *   Avi Kivity   <avi@qumranet.com>
 *
 * This work is licensed under the terms of the GNU GPL, version 2.  See
 * the COPYING file in the top-level directory.
 *
 */
A
Avi Kivity 已提交
20

21
#include "mmu.h"
22
#include "x86.h"
A
Avi Kivity 已提交
23
#include "kvm_cache_regs.h"
A
Avi Kivity 已提交
24

25
#include <linux/kvm_host.h>
A
Avi Kivity 已提交
26 27 28 29 30
#include <linux/types.h>
#include <linux/string.h>
#include <linux/mm.h>
#include <linux/highmem.h>
#include <linux/module.h>
31
#include <linux/swap.h>
M
Marcelo Tosatti 已提交
32
#include <linux/hugetlb.h>
33
#include <linux/compiler.h>
34
#include <linux/srcu.h>
35
#include <linux/slab.h>
36
#include <linux/uaccess.h>
A
Avi Kivity 已提交
37

A
Avi Kivity 已提交
38 39
#include <asm/page.h>
#include <asm/cmpxchg.h>
40
#include <asm/io.h>
41
#include <asm/vmx.h>
A
Avi Kivity 已提交
42

43 44 45 46 47 48 49
/*
 * When setting this variable to true it enables Two-Dimensional-Paging
 * where the hardware walks 2 page tables:
 * 1. the guest-virtual to guest-physical
 * 2. while doing 1. it walks guest-physical to host-physical
 * If the hardware supports that we don't need to do shadow paging.
 */
50
bool tdp_enabled = false;
51

52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74
#undef MMU_DEBUG

#undef AUDIT

#ifdef AUDIT
static void kvm_mmu_audit(struct kvm_vcpu *vcpu, const char *msg);
#else
static void kvm_mmu_audit(struct kvm_vcpu *vcpu, const char *msg) {}
#endif

#ifdef MMU_DEBUG

#define pgprintk(x...) do { if (dbg) printk(x); } while (0)
#define rmap_printk(x...) do { if (dbg) printk(x); } while (0)

#else

#define pgprintk(x...) do { } while (0)
#define rmap_printk(x...) do { } while (0)

#endif

#if defined(MMU_DEBUG) || defined(AUDIT)
75 76
static int dbg = 0;
module_param(dbg, bool, 0644);
77
#endif
A
Avi Kivity 已提交
78

79 80 81
static int oos_shadow = 1;
module_param(oos_shadow, bool, 0644);

82 83 84
#ifndef MMU_DEBUG
#define ASSERT(x) do { } while (0)
#else
A
Avi Kivity 已提交
85 86 87 88 89
#define ASSERT(x)							\
	if (!(x)) {							\
		printk(KERN_WARNING "assertion failed %s:%d: %s\n",	\
		       __FILE__, __LINE__, #x);				\
	}
90
#endif
A
Avi Kivity 已提交
91 92 93 94 95 96 97

#define PT_FIRST_AVAIL_BITS_SHIFT 9
#define PT64_SECOND_AVAIL_BITS_SHIFT 52

#define PT64_LEVEL_BITS 9

#define PT64_LEVEL_SHIFT(level) \
M
Mike Day 已提交
98
		(PAGE_SHIFT + (level - 1) * PT64_LEVEL_BITS)
A
Avi Kivity 已提交
99 100 101 102 103 104 105 106 107 108 109

#define PT64_LEVEL_MASK(level) \
		(((1ULL << PT64_LEVEL_BITS) - 1) << PT64_LEVEL_SHIFT(level))

#define PT64_INDEX(address, level)\
	(((address) >> PT64_LEVEL_SHIFT(level)) & ((1 << PT64_LEVEL_BITS) - 1))


#define PT32_LEVEL_BITS 10

#define PT32_LEVEL_SHIFT(level) \
M
Mike Day 已提交
110
		(PAGE_SHIFT + (level - 1) * PT32_LEVEL_BITS)
A
Avi Kivity 已提交
111 112 113

#define PT32_LEVEL_MASK(level) \
		(((1ULL << PT32_LEVEL_BITS) - 1) << PT32_LEVEL_SHIFT(level))
114 115 116
#define PT32_LVL_OFFSET_MASK(level) \
	(PT32_BASE_ADDR_MASK & ((1ULL << (PAGE_SHIFT + (((level) - 1) \
						* PT32_LEVEL_BITS))) - 1))
A
Avi Kivity 已提交
117 118 119 120 121

#define PT32_INDEX(address, level)\
	(((address) >> PT32_LEVEL_SHIFT(level)) & ((1 << PT32_LEVEL_BITS) - 1))


122
#define PT64_BASE_ADDR_MASK (((1ULL << 52) - 1) & ~(u64)(PAGE_SIZE-1))
A
Avi Kivity 已提交
123 124
#define PT64_DIR_BASE_ADDR_MASK \
	(PT64_BASE_ADDR_MASK & ~((1ULL << (PAGE_SHIFT + PT64_LEVEL_BITS)) - 1))
125 126 127 128 129 130
#define PT64_LVL_ADDR_MASK(level) \
	(PT64_BASE_ADDR_MASK & ~((1ULL << (PAGE_SHIFT + (((level) - 1) \
						* PT64_LEVEL_BITS))) - 1))
#define PT64_LVL_OFFSET_MASK(level) \
	(PT64_BASE_ADDR_MASK & ((1ULL << (PAGE_SHIFT + (((level) - 1) \
						* PT64_LEVEL_BITS))) - 1))
A
Avi Kivity 已提交
131 132 133 134

#define PT32_BASE_ADDR_MASK PAGE_MASK
#define PT32_DIR_BASE_ADDR_MASK \
	(PAGE_MASK & ~((1ULL << (PAGE_SHIFT + PT32_LEVEL_BITS)) - 1))
135 136 137
#define PT32_LVL_ADDR_MASK(level) \
	(PAGE_MASK & ~((1ULL << (PAGE_SHIFT + (((level) - 1) \
					    * PT32_LEVEL_BITS))) - 1))
A
Avi Kivity 已提交
138

139 140
#define PT64_PERM_MASK (PT_PRESENT_MASK | PT_WRITABLE_MASK | PT_USER_MASK \
			| PT64_NX_MASK)
A
Avi Kivity 已提交
141

142 143
#define RMAP_EXT 4

144 145 146 147 148
#define ACC_EXEC_MASK    1
#define ACC_WRITE_MASK   PT_WRITABLE_MASK
#define ACC_USER_MASK    PT_USER_MASK
#define ACC_ALL          (ACC_EXEC_MASK | ACC_WRITE_MASK | ACC_USER_MASK)

149 150
#include <trace/events/kvm.h>

151 152 153
#define CREATE_TRACE_POINTS
#include "mmutrace.h"

154 155
#define SPTE_HOST_WRITEABLE (1ULL << PT_FIRST_AVAIL_BITS_SHIFT)

156 157
#define SHADOW_PT_INDEX(addr, level) PT64_INDEX(addr, level)

158
struct kvm_rmap_desc {
A
Avi Kivity 已提交
159
	u64 *sptes[RMAP_EXT];
160 161 162
	struct kvm_rmap_desc *more;
};

163 164 165 166 167 168 169 170 171 172 173 174 175
struct kvm_shadow_walk_iterator {
	u64 addr;
	hpa_t shadow_addr;
	int level;
	u64 *sptep;
	unsigned index;
};

#define for_each_shadow_entry(_vcpu, _addr, _walker)    \
	for (shadow_walk_init(&(_walker), _vcpu, _addr);	\
	     shadow_walk_okay(&(_walker));			\
	     shadow_walk_next(&(_walker)))

176
typedef void (*mmu_parent_walk_fn) (struct kvm_mmu_page *sp, u64 *spte);
M
Marcelo Tosatti 已提交
177

178 179
static struct kmem_cache *pte_chain_cache;
static struct kmem_cache *rmap_desc_cache;
180
static struct kmem_cache *mmu_page_header_cache;
181

182 183
static u64 __read_mostly shadow_trap_nonpresent_pte;
static u64 __read_mostly shadow_notrap_nonpresent_pte;
S
Sheng Yang 已提交
184 185 186 187 188 189
static u64 __read_mostly shadow_base_present_pte;
static u64 __read_mostly shadow_nx_mask;
static u64 __read_mostly shadow_x_mask;	/* mutual exclusive with nx_mask */
static u64 __read_mostly shadow_user_mask;
static u64 __read_mostly shadow_accessed_mask;
static u64 __read_mostly shadow_dirty_mask;
190

191 192 193 194 195
static inline u64 rsvd_bits(int s, int e)
{
	return ((1ULL << (e - s + 1)) - 1) << s;
}

196 197 198 199 200 201 202
void kvm_mmu_set_nonpresent_ptes(u64 trap_pte, u64 notrap_pte)
{
	shadow_trap_nonpresent_pte = trap_pte;
	shadow_notrap_nonpresent_pte = notrap_pte;
}
EXPORT_SYMBOL_GPL(kvm_mmu_set_nonpresent_ptes);

S
Sheng Yang 已提交
203 204 205 206 207 208 209
void kvm_mmu_set_base_ptes(u64 base_pte)
{
	shadow_base_present_pte = base_pte;
}
EXPORT_SYMBOL_GPL(kvm_mmu_set_base_ptes);

void kvm_mmu_set_mask_ptes(u64 user_mask, u64 accessed_mask,
210
		u64 dirty_mask, u64 nx_mask, u64 x_mask)
S
Sheng Yang 已提交
211 212 213 214 215 216 217 218 219
{
	shadow_user_mask = user_mask;
	shadow_accessed_mask = accessed_mask;
	shadow_dirty_mask = dirty_mask;
	shadow_nx_mask = nx_mask;
	shadow_x_mask = x_mask;
}
EXPORT_SYMBOL_GPL(kvm_mmu_set_mask_ptes);

220
static bool is_write_protection(struct kvm_vcpu *vcpu)
A
Avi Kivity 已提交
221
{
222
	return kvm_read_cr0_bits(vcpu, X86_CR0_WP);
A
Avi Kivity 已提交
223 224 225 226 227 228 229
}

static int is_cpuid_PSE36(void)
{
	return 1;
}

230 231
static int is_nx(struct kvm_vcpu *vcpu)
{
232
	return vcpu->arch.efer & EFER_NX;
233 234
}

235 236 237 238 239 240
static int is_shadow_present_pte(u64 pte)
{
	return pte != shadow_trap_nonpresent_pte
		&& pte != shadow_notrap_nonpresent_pte;
}

M
Marcelo Tosatti 已提交
241 242 243 244 245
static int is_large_pte(u64 pte)
{
	return pte & PT_PAGE_SIZE_MASK;
}

246
static int is_writable_pte(unsigned long pte)
A
Avi Kivity 已提交
247 248 249 250
{
	return pte & PT_WRITABLE_MASK;
}

251
static int is_dirty_gpte(unsigned long pte)
252
{
A
Avi Kivity 已提交
253
	return pte & PT_DIRTY_MASK;
254 255
}

256
static int is_rmap_spte(u64 pte)
257
{
258
	return is_shadow_present_pte(pte);
259 260
}

261 262 263 264
static int is_last_spte(u64 pte, int level)
{
	if (level == PT_PAGE_TABLE_LEVEL)
		return 1;
265
	if (is_large_pte(pte))
266 267 268 269
		return 1;
	return 0;
}

270
static pfn_t spte_to_pfn(u64 pte)
271
{
272
	return (pte & PT64_BASE_ADDR_MASK) >> PAGE_SHIFT;
273 274
}

275 276 277 278 279 280 281
static gfn_t pse36_gfn_delta(u32 gpte)
{
	int shift = 32 - PT32_DIR_PSE36_SHIFT - PAGE_SHIFT;

	return (gpte & PT32_DIR_PSE36_MASK) << shift;
}

A
Avi Kivity 已提交
282
static void __set_spte(u64 *sptep, u64 spte)
283 284 285 286 287 288 289 290
{
#ifdef CONFIG_X86_64
	set_64bit((unsigned long *)sptep, spte);
#else
	set_64bit((unsigned long long *)sptep, spte);
#endif
}

291 292 293 294 295 296 297 298 299 300 301 302 303 304 305
static u64 __xchg_spte(u64 *sptep, u64 new_spte)
{
#ifdef CONFIG_X86_64
	return xchg(sptep, new_spte);
#else
	u64 old_spte;

	do {
		old_spte = *sptep;
	} while (cmpxchg64(sptep, old_spte, new_spte) != old_spte);

	return old_spte;
#endif
}

306 307 308 309 310 311 312 313 314 315 316 317 318
static void update_spte(u64 *sptep, u64 new_spte)
{
	u64 old_spte;

	if (!shadow_accessed_mask || (new_spte & shadow_accessed_mask)) {
		__set_spte(sptep, new_spte);
	} else {
		old_spte = __xchg_spte(sptep, new_spte);
		if (old_spte & shadow_accessed_mask)
			mark_page_accessed(pfn_to_page(spte_to_pfn(old_spte)));
	}
}

319
static int mmu_topup_memory_cache(struct kvm_mmu_memory_cache *cache,
320
				  struct kmem_cache *base_cache, int min)
321 322 323 324
{
	void *obj;

	if (cache->nobjs >= min)
325
		return 0;
326
	while (cache->nobjs < ARRAY_SIZE(cache->objects)) {
327
		obj = kmem_cache_zalloc(base_cache, GFP_KERNEL);
328
		if (!obj)
329
			return -ENOMEM;
330 331
		cache->objects[cache->nobjs++] = obj;
	}
332
	return 0;
333 334
}

335 336
static void mmu_free_memory_cache(struct kvm_mmu_memory_cache *mc,
				  struct kmem_cache *cache)
337 338
{
	while (mc->nobjs)
339
		kmem_cache_free(cache, mc->objects[--mc->nobjs]);
340 341
}

A
Avi Kivity 已提交
342
static int mmu_topup_memory_cache_page(struct kvm_mmu_memory_cache *cache,
343
				       int min)
A
Avi Kivity 已提交
344 345 346 347 348 349
{
	struct page *page;

	if (cache->nobjs >= min)
		return 0;
	while (cache->nobjs < ARRAY_SIZE(cache->objects)) {
350
		page = alloc_page(GFP_KERNEL);
A
Avi Kivity 已提交
351 352 353 354 355 356 357 358 359 360
		if (!page)
			return -ENOMEM;
		cache->objects[cache->nobjs++] = page_address(page);
	}
	return 0;
}

static void mmu_free_memory_cache_page(struct kvm_mmu_memory_cache *mc)
{
	while (mc->nobjs)
361
		free_page((unsigned long)mc->objects[--mc->nobjs]);
A
Avi Kivity 已提交
362 363
}

364
static int mmu_topup_memory_caches(struct kvm_vcpu *vcpu)
365
{
366 367
	int r;

368
	r = mmu_topup_memory_cache(&vcpu->arch.mmu_pte_chain_cache,
369
				   pte_chain_cache, 4);
370 371
	if (r)
		goto out;
372
	r = mmu_topup_memory_cache(&vcpu->arch.mmu_rmap_desc_cache,
373
				   rmap_desc_cache, 4);
374 375
	if (r)
		goto out;
376
	r = mmu_topup_memory_cache_page(&vcpu->arch.mmu_page_cache, 8);
377 378
	if (r)
		goto out;
379
	r = mmu_topup_memory_cache(&vcpu->arch.mmu_page_header_cache,
380
				   mmu_page_header_cache, 4);
381 382
out:
	return r;
383 384 385 386
}

static void mmu_free_memory_caches(struct kvm_vcpu *vcpu)
{
387 388
	mmu_free_memory_cache(&vcpu->arch.mmu_pte_chain_cache, pte_chain_cache);
	mmu_free_memory_cache(&vcpu->arch.mmu_rmap_desc_cache, rmap_desc_cache);
389
	mmu_free_memory_cache_page(&vcpu->arch.mmu_page_cache);
390 391
	mmu_free_memory_cache(&vcpu->arch.mmu_page_header_cache,
				mmu_page_header_cache);
392 393 394 395 396 397 398 399 400 401 402 403 404 405
}

static void *mmu_memory_cache_alloc(struct kvm_mmu_memory_cache *mc,
				    size_t size)
{
	void *p;

	BUG_ON(!mc->nobjs);
	p = mc->objects[--mc->nobjs];
	return p;
}

static struct kvm_pte_chain *mmu_alloc_pte_chain(struct kvm_vcpu *vcpu)
{
406
	return mmu_memory_cache_alloc(&vcpu->arch.mmu_pte_chain_cache,
407 408 409
				      sizeof(struct kvm_pte_chain));
}

410
static void mmu_free_pte_chain(struct kvm_pte_chain *pc)
411
{
412
	kmem_cache_free(pte_chain_cache, pc);
413 414 415 416
}

static struct kvm_rmap_desc *mmu_alloc_rmap_desc(struct kvm_vcpu *vcpu)
{
417
	return mmu_memory_cache_alloc(&vcpu->arch.mmu_rmap_desc_cache,
418 419 420
				      sizeof(struct kvm_rmap_desc));
}

421
static void mmu_free_rmap_desc(struct kvm_rmap_desc *rd)
422
{
423
	kmem_cache_free(rmap_desc_cache, rd);
424 425
}

426 427 428 429 430 431 432 433 434 435 436 437 438 439 440 441
static gfn_t kvm_mmu_page_get_gfn(struct kvm_mmu_page *sp, int index)
{
	if (!sp->role.direct)
		return sp->gfns[index];

	return sp->gfn + (index << ((sp->role.level - 1) * PT64_LEVEL_BITS));
}

static void kvm_mmu_page_set_gfn(struct kvm_mmu_page *sp, int index, gfn_t gfn)
{
	if (sp->role.direct)
		BUG_ON(gfn != kvm_mmu_page_get_gfn(sp, index));
	else
		sp->gfns[index] = gfn;
}

M
Marcelo Tosatti 已提交
442 443 444 445
/*
 * Return the pointer to the largepage write count for a given
 * gfn, handling slots that are not large page aligned.
 */
446 447 448
static int *slot_largepage_idx(gfn_t gfn,
			       struct kvm_memory_slot *slot,
			       int level)
M
Marcelo Tosatti 已提交
449 450 451
{
	unsigned long idx;

452 453
	idx = (gfn >> KVM_HPAGE_GFN_SHIFT(level)) -
	      (slot->base_gfn >> KVM_HPAGE_GFN_SHIFT(level));
454
	return &slot->lpage_info[level - 2][idx].write_count;
M
Marcelo Tosatti 已提交
455 456 457 458
}

static void account_shadowed(struct kvm *kvm, gfn_t gfn)
{
459
	struct kvm_memory_slot *slot;
M
Marcelo Tosatti 已提交
460
	int *write_count;
461
	int i;
M
Marcelo Tosatti 已提交
462

A
Avi Kivity 已提交
463
	slot = gfn_to_memslot(kvm, gfn);
464 465 466 467 468
	for (i = PT_DIRECTORY_LEVEL;
	     i < PT_PAGE_TABLE_LEVEL + KVM_NR_PAGE_SIZES; ++i) {
		write_count   = slot_largepage_idx(gfn, slot, i);
		*write_count += 1;
	}
M
Marcelo Tosatti 已提交
469 470 471 472
}

static void unaccount_shadowed(struct kvm *kvm, gfn_t gfn)
{
473
	struct kvm_memory_slot *slot;
M
Marcelo Tosatti 已提交
474
	int *write_count;
475
	int i;
M
Marcelo Tosatti 已提交
476

A
Avi Kivity 已提交
477
	slot = gfn_to_memslot(kvm, gfn);
478 479 480 481 482 483
	for (i = PT_DIRECTORY_LEVEL;
	     i < PT_PAGE_TABLE_LEVEL + KVM_NR_PAGE_SIZES; ++i) {
		write_count   = slot_largepage_idx(gfn, slot, i);
		*write_count -= 1;
		WARN_ON(*write_count < 0);
	}
M
Marcelo Tosatti 已提交
484 485
}

486 487 488
static int has_wrprotected_page(struct kvm *kvm,
				gfn_t gfn,
				int level)
M
Marcelo Tosatti 已提交
489
{
490
	struct kvm_memory_slot *slot;
M
Marcelo Tosatti 已提交
491 492
	int *largepage_idx;

A
Avi Kivity 已提交
493
	slot = gfn_to_memslot(kvm, gfn);
M
Marcelo Tosatti 已提交
494
	if (slot) {
495
		largepage_idx = slot_largepage_idx(gfn, slot, level);
M
Marcelo Tosatti 已提交
496 497 498 499 500 501
		return *largepage_idx;
	}

	return 1;
}

502
static int host_mapping_level(struct kvm *kvm, gfn_t gfn)
M
Marcelo Tosatti 已提交
503
{
J
Joerg Roedel 已提交
504
	unsigned long page_size;
505
	int i, ret = 0;
M
Marcelo Tosatti 已提交
506

J
Joerg Roedel 已提交
507
	page_size = kvm_host_page_size(kvm, gfn);
M
Marcelo Tosatti 已提交
508

509 510 511 512 513 514 515 516
	for (i = PT_PAGE_TABLE_LEVEL;
	     i < (PT_PAGE_TABLE_LEVEL + KVM_NR_PAGE_SIZES); ++i) {
		if (page_size >= KVM_HPAGE_SIZE(i))
			ret = i;
		else
			break;
	}

517
	return ret;
M
Marcelo Tosatti 已提交
518 519
}

520
static int mapping_level(struct kvm_vcpu *vcpu, gfn_t large_gfn)
M
Marcelo Tosatti 已提交
521 522
{
	struct kvm_memory_slot *slot;
523
	int host_level, level, max_level;
M
Marcelo Tosatti 已提交
524 525 526

	slot = gfn_to_memslot(vcpu->kvm, large_gfn);
	if (slot && slot->dirty_bitmap)
527
		return PT_PAGE_TABLE_LEVEL;
M
Marcelo Tosatti 已提交
528

529 530 531 532 533
	host_level = host_mapping_level(vcpu->kvm, large_gfn);

	if (host_level == PT_PAGE_TABLE_LEVEL)
		return host_level;

534 535 536 537
	max_level = kvm_x86_ops->get_lpage_level() < host_level ?
		kvm_x86_ops->get_lpage_level() : host_level;

	for (level = PT_DIRECTORY_LEVEL; level <= max_level; ++level)
538 539 540 541
		if (has_wrprotected_page(vcpu->kvm, large_gfn, level))
			break;

	return level - 1;
M
Marcelo Tosatti 已提交
542 543
}

544 545 546 547
/*
 * Take gfn and return the reverse mapping to it.
 */

548
static unsigned long *gfn_to_rmap(struct kvm *kvm, gfn_t gfn, int level)
549 550
{
	struct kvm_memory_slot *slot;
M
Marcelo Tosatti 已提交
551
	unsigned long idx;
552 553

	slot = gfn_to_memslot(kvm, gfn);
554
	if (likely(level == PT_PAGE_TABLE_LEVEL))
M
Marcelo Tosatti 已提交
555 556
		return &slot->rmap[gfn - slot->base_gfn];

557 558
	idx = (gfn >> KVM_HPAGE_GFN_SHIFT(level)) -
		(slot->base_gfn >> KVM_HPAGE_GFN_SHIFT(level));
M
Marcelo Tosatti 已提交
559

560
	return &slot->lpage_info[level - 2][idx].rmap_pde;
561 562
}

563 564 565
/*
 * Reverse mapping data structures:
 *
566 567
 * If rmapp bit zero is zero, then rmapp point to the shadw page table entry
 * that points to page_address(page).
568
 *
569 570
 * If rmapp bit zero is one, (then rmap & ~1) points to a struct kvm_rmap_desc
 * containing more mappings.
571 572 573 574
 *
 * Returns the number of rmap entries before the spte was added or zero if
 * the spte was not added.
 *
575
 */
576
static int rmap_add(struct kvm_vcpu *vcpu, u64 *spte, gfn_t gfn)
577
{
578
	struct kvm_mmu_page *sp;
579
	struct kvm_rmap_desc *desc;
580
	unsigned long *rmapp;
581
	int i, count = 0;
582

583
	if (!is_rmap_spte(*spte))
584
		return count;
585
	sp = page_header(__pa(spte));
586
	kvm_mmu_page_set_gfn(sp, spte - sp->spt, gfn);
587
	rmapp = gfn_to_rmap(vcpu->kvm, gfn, sp->role.level);
588
	if (!*rmapp) {
589
		rmap_printk("rmap_add: %p %llx 0->1\n", spte, *spte);
590 591
		*rmapp = (unsigned long)spte;
	} else if (!(*rmapp & 1)) {
592
		rmap_printk("rmap_add: %p %llx 1->many\n", spte, *spte);
593
		desc = mmu_alloc_rmap_desc(vcpu);
A
Avi Kivity 已提交
594 595
		desc->sptes[0] = (u64 *)*rmapp;
		desc->sptes[1] = spte;
596
		*rmapp = (unsigned long)desc | 1;
597 598
	} else {
		rmap_printk("rmap_add: %p %llx many->many\n", spte, *spte);
599
		desc = (struct kvm_rmap_desc *)(*rmapp & ~1ul);
A
Avi Kivity 已提交
600
		while (desc->sptes[RMAP_EXT-1] && desc->more) {
601
			desc = desc->more;
602 603
			count += RMAP_EXT;
		}
A
Avi Kivity 已提交
604
		if (desc->sptes[RMAP_EXT-1]) {
605
			desc->more = mmu_alloc_rmap_desc(vcpu);
606 607
			desc = desc->more;
		}
A
Avi Kivity 已提交
608
		for (i = 0; desc->sptes[i]; ++i)
609
			;
A
Avi Kivity 已提交
610
		desc->sptes[i] = spte;
611
	}
612
	return count;
613 614
}

615
static void rmap_desc_remove_entry(unsigned long *rmapp,
616 617 618 619 620 621
				   struct kvm_rmap_desc *desc,
				   int i,
				   struct kvm_rmap_desc *prev_desc)
{
	int j;

A
Avi Kivity 已提交
622
	for (j = RMAP_EXT - 1; !desc->sptes[j] && j > i; --j)
623
		;
A
Avi Kivity 已提交
624 625
	desc->sptes[i] = desc->sptes[j];
	desc->sptes[j] = NULL;
626 627 628
	if (j != 0)
		return;
	if (!prev_desc && !desc->more)
A
Avi Kivity 已提交
629
		*rmapp = (unsigned long)desc->sptes[0];
630 631 632 633
	else
		if (prev_desc)
			prev_desc->more = desc->more;
		else
634
			*rmapp = (unsigned long)desc->more | 1;
635
	mmu_free_rmap_desc(desc);
636 637
}

638
static void rmap_remove(struct kvm *kvm, u64 *spte)
639 640 641
{
	struct kvm_rmap_desc *desc;
	struct kvm_rmap_desc *prev_desc;
642
	struct kvm_mmu_page *sp;
643
	gfn_t gfn;
644
	unsigned long *rmapp;
645 646
	int i;

647
	sp = page_header(__pa(spte));
648 649
	gfn = kvm_mmu_page_get_gfn(sp, spte - sp->spt);
	rmapp = gfn_to_rmap(kvm, gfn, sp->role.level);
650
	if (!*rmapp) {
651 652
		printk(KERN_ERR "rmap_remove: %p %llx 0->BUG\n", spte, *spte);
		BUG();
653
	} else if (!(*rmapp & 1)) {
654
		rmap_printk("rmap_remove:  %p %llx 1->0\n", spte, *spte);
655
		if ((u64 *)*rmapp != spte) {
656 657 658 659
			printk(KERN_ERR "rmap_remove:  %p %llx 1->BUG\n",
			       spte, *spte);
			BUG();
		}
660
		*rmapp = 0;
661 662
	} else {
		rmap_printk("rmap_remove:  %p %llx many->many\n", spte, *spte);
663
		desc = (struct kvm_rmap_desc *)(*rmapp & ~1ul);
664 665
		prev_desc = NULL;
		while (desc) {
A
Avi Kivity 已提交
666 667
			for (i = 0; i < RMAP_EXT && desc->sptes[i]; ++i)
				if (desc->sptes[i] == spte) {
668
					rmap_desc_remove_entry(rmapp,
669
							       desc, i,
670 671 672 673 674 675
							       prev_desc);
					return;
				}
			prev_desc = desc;
			desc = desc->more;
		}
676
		pr_err("rmap_remove: %p %llx many->many\n", spte, *spte);
677 678 679 680
		BUG();
	}
}

A
Avi Kivity 已提交
681 682
static void drop_spte(struct kvm *kvm, u64 *sptep, u64 new_spte)
{
683
	pfn_t pfn;
684
	u64 old_spte;
685

686 687
	old_spte = __xchg_spte(sptep, new_spte);
	if (!is_rmap_spte(old_spte))
688
		return;
689
	pfn = spte_to_pfn(old_spte);
690
	if (!shadow_accessed_mask || old_spte & shadow_accessed_mask)
691
		kvm_set_pfn_accessed(pfn);
692
	if (is_writable_pte(old_spte))
693
		kvm_set_pfn_dirty(pfn);
A
Avi Kivity 已提交
694 695 696
	rmap_remove(kvm, sptep);
}

697
static u64 *rmap_next(struct kvm *kvm, unsigned long *rmapp, u64 *spte)
698 699
{
	struct kvm_rmap_desc *desc;
700 701 702 703 704 705 706 707 708 709 710 711 712
	u64 *prev_spte;
	int i;

	if (!*rmapp)
		return NULL;
	else if (!(*rmapp & 1)) {
		if (!spte)
			return (u64 *)*rmapp;
		return NULL;
	}
	desc = (struct kvm_rmap_desc *)(*rmapp & ~1ul);
	prev_spte = NULL;
	while (desc) {
A
Avi Kivity 已提交
713
		for (i = 0; i < RMAP_EXT && desc->sptes[i]; ++i) {
714
			if (prev_spte == spte)
A
Avi Kivity 已提交
715 716
				return desc->sptes[i];
			prev_spte = desc->sptes[i];
717 718 719 720 721 722
		}
		desc = desc->more;
	}
	return NULL;
}

723
static int rmap_write_protect(struct kvm *kvm, u64 gfn)
724
{
725
	unsigned long *rmapp;
726
	u64 *spte;
727
	int i, write_protected = 0;
728

729
	rmapp = gfn_to_rmap(kvm, gfn, PT_PAGE_TABLE_LEVEL);
730

731 732
	spte = rmap_next(kvm, rmapp, NULL);
	while (spte) {
733 734 735
		BUG_ON(!spte);
		BUG_ON(!(*spte & PT_PRESENT_MASK));
		rmap_printk("rmap_write_protect: spte %p %llx\n", spte, *spte);
736
		if (is_writable_pte(*spte)) {
737
			update_spte(spte, *spte & ~PT_WRITABLE_MASK);
738 739
			write_protected = 1;
		}
740
		spte = rmap_next(kvm, rmapp, spte);
741
	}
742
	if (write_protected) {
743
		pfn_t pfn;
744 745

		spte = rmap_next(kvm, rmapp, NULL);
746 747
		pfn = spte_to_pfn(*spte);
		kvm_set_pfn_dirty(pfn);
748 749
	}

M
Marcelo Tosatti 已提交
750
	/* check for huge page mappings */
751 752 753 754 755 756 757 758 759
	for (i = PT_DIRECTORY_LEVEL;
	     i < PT_PAGE_TABLE_LEVEL + KVM_NR_PAGE_SIZES; ++i) {
		rmapp = gfn_to_rmap(kvm, gfn, i);
		spte = rmap_next(kvm, rmapp, NULL);
		while (spte) {
			BUG_ON(!spte);
			BUG_ON(!(*spte & PT_PRESENT_MASK));
			BUG_ON((*spte & (PT_PAGE_SIZE_MASK|PT_PRESENT_MASK)) != (PT_PAGE_SIZE_MASK|PT_PRESENT_MASK));
			pgprintk("rmap_write_protect(large): spte %p %llx %lld\n", spte, *spte, gfn);
760
			if (is_writable_pte(*spte)) {
A
Avi Kivity 已提交
761 762
				drop_spte(kvm, spte,
					  shadow_trap_nonpresent_pte);
763 764 765 766 767
				--kvm->stat.lpages;
				spte = NULL;
				write_protected = 1;
			}
			spte = rmap_next(kvm, rmapp, spte);
M
Marcelo Tosatti 已提交
768 769 770
		}
	}

771
	return write_protected;
772 773
}

F
Frederik Deweerdt 已提交
774 775
static int kvm_unmap_rmapp(struct kvm *kvm, unsigned long *rmapp,
			   unsigned long data)
776 777 778 779 780 781 782
{
	u64 *spte;
	int need_tlb_flush = 0;

	while ((spte = rmap_next(kvm, rmapp, NULL))) {
		BUG_ON(!(*spte & PT_PRESENT_MASK));
		rmap_printk("kvm_rmap_unmap_hva: spte %p %llx\n", spte, *spte);
A
Avi Kivity 已提交
783
		drop_spte(kvm, spte, shadow_trap_nonpresent_pte);
784 785 786 787 788
		need_tlb_flush = 1;
	}
	return need_tlb_flush;
}

F
Frederik Deweerdt 已提交
789 790
static int kvm_set_pte_rmapp(struct kvm *kvm, unsigned long *rmapp,
			     unsigned long data)
791 792
{
	int need_flush = 0;
793
	u64 *spte, new_spte, old_spte;
794 795 796 797 798 799 800 801 802 803 804
	pte_t *ptep = (pte_t *)data;
	pfn_t new_pfn;

	WARN_ON(pte_huge(*ptep));
	new_pfn = pte_pfn(*ptep);
	spte = rmap_next(kvm, rmapp, NULL);
	while (spte) {
		BUG_ON(!is_shadow_present_pte(*spte));
		rmap_printk("kvm_set_pte_rmapp: spte %p %llx\n", spte, *spte);
		need_flush = 1;
		if (pte_write(*ptep)) {
A
Avi Kivity 已提交
805
			drop_spte(kvm, spte, shadow_trap_nonpresent_pte);
806 807 808 809 810 811 812
			spte = rmap_next(kvm, rmapp, NULL);
		} else {
			new_spte = *spte &~ (PT64_BASE_ADDR_MASK);
			new_spte |= (u64)new_pfn << PAGE_SHIFT;

			new_spte &= ~PT_WRITABLE_MASK;
			new_spte &= ~SPTE_HOST_WRITEABLE;
813
			new_spte &= ~shadow_accessed_mask;
814
			if (is_writable_pte(*spte))
815
				kvm_set_pfn_dirty(spte_to_pfn(*spte));
816 817
			old_spte = __xchg_spte(spte, new_spte);
			if (is_shadow_present_pte(old_spte)
818 819
			    && (!shadow_accessed_mask ||
			    old_spte & shadow_accessed_mask))
820
				mark_page_accessed(pfn_to_page(spte_to_pfn(old_spte)));
821 822 823 824 825 826 827 828 829
			spte = rmap_next(kvm, rmapp, spte);
		}
	}
	if (need_flush)
		kvm_flush_remote_tlbs(kvm);

	return 0;
}

F
Frederik Deweerdt 已提交
830 831
static int kvm_handle_hva(struct kvm *kvm, unsigned long hva,
			  unsigned long data,
832
			  int (*handler)(struct kvm *kvm, unsigned long *rmapp,
F
Frederik Deweerdt 已提交
833
					 unsigned long data))
834
{
835
	int i, j;
836
	int ret;
837
	int retval = 0;
838 839
	struct kvm_memslots *slots;

840
	slots = kvm_memslots(kvm);
841

842 843
	for (i = 0; i < slots->nmemslots; i++) {
		struct kvm_memory_slot *memslot = &slots->memslots[i];
844 845 846 847 848 849
		unsigned long start = memslot->userspace_addr;
		unsigned long end;

		end = start + (memslot->npages << PAGE_SHIFT);
		if (hva >= start && hva < end) {
			gfn_t gfn_offset = (hva - start) >> PAGE_SHIFT;
850

851
			ret = handler(kvm, &memslot->rmap[gfn_offset], data);
852 853

			for (j = 0; j < KVM_NR_PAGE_SIZES - 1; ++j) {
854 855 856 857 858 859
				unsigned long idx;
				int sh;

				sh = KVM_HPAGE_GFN_SHIFT(PT_DIRECTORY_LEVEL+j);
				idx = ((memslot->base_gfn+gfn_offset) >> sh) -
					(memslot->base_gfn >> sh);
860
				ret |= handler(kvm,
861 862
					&memslot->lpage_info[j][idx].rmap_pde,
					data);
863
			}
864 865
			trace_kvm_age_page(hva, memslot, ret);
			retval |= ret;
866 867 868 869 870 871 872 873
		}
	}

	return retval;
}

int kvm_unmap_hva(struct kvm *kvm, unsigned long hva)
{
874 875 876 877 878
	return kvm_handle_hva(kvm, hva, 0, kvm_unmap_rmapp);
}

void kvm_set_spte_hva(struct kvm *kvm, unsigned long hva, pte_t pte)
{
F
Frederik Deweerdt 已提交
879
	kvm_handle_hva(kvm, hva, (unsigned long)&pte, kvm_set_pte_rmapp);
880 881
}

F
Frederik Deweerdt 已提交
882 883
static int kvm_age_rmapp(struct kvm *kvm, unsigned long *rmapp,
			 unsigned long data)
884 885 886 887
{
	u64 *spte;
	int young = 0;

888 889 890 891 892 893 894
	/*
	 * Emulate the accessed bit for EPT, by checking if this page has
	 * an EPT mapping, and clearing it if it does. On the next access,
	 * a new EPT mapping will be established.
	 * This has some overhead, but not as much as the cost of swapping
	 * out actively used pages or breaking up actively used hugepages.
	 */
895
	if (!shadow_accessed_mask)
896
		return kvm_unmap_rmapp(kvm, rmapp, data);
897

898 899 900 901 902 903 904 905 906 907 908 909 910 911 912
	spte = rmap_next(kvm, rmapp, NULL);
	while (spte) {
		int _young;
		u64 _spte = *spte;
		BUG_ON(!(_spte & PT_PRESENT_MASK));
		_young = _spte & PT_ACCESSED_MASK;
		if (_young) {
			young = 1;
			clear_bit(PT_ACCESSED_SHIFT, (unsigned long *)spte);
		}
		spte = rmap_next(kvm, rmapp, spte);
	}
	return young;
}

913 914
#define RMAP_RECYCLE_THRESHOLD 1000

915
static void rmap_recycle(struct kvm_vcpu *vcpu, u64 *spte, gfn_t gfn)
916 917
{
	unsigned long *rmapp;
918 919 920
	struct kvm_mmu_page *sp;

	sp = page_header(__pa(spte));
921

922
	rmapp = gfn_to_rmap(vcpu->kvm, gfn, sp->role.level);
923

924
	kvm_unmap_rmapp(vcpu->kvm, rmapp, 0);
925 926 927
	kvm_flush_remote_tlbs(vcpu->kvm);
}

928 929
int kvm_age_hva(struct kvm *kvm, unsigned long hva)
{
930
	return kvm_handle_hva(kvm, hva, 0, kvm_age_rmapp);
931 932
}

933
#ifdef MMU_DEBUG
934
static int is_empty_shadow_page(u64 *spt)
A
Avi Kivity 已提交
935
{
936 937 938
	u64 *pos;
	u64 *end;

939
	for (pos = spt, end = pos + PAGE_SIZE / sizeof(u64); pos != end; pos++)
940
		if (is_shadow_present_pte(*pos)) {
941
			printk(KERN_ERR "%s: %p %llx\n", __func__,
942
			       pos, *pos);
A
Avi Kivity 已提交
943
			return 0;
944
		}
A
Avi Kivity 已提交
945 946
	return 1;
}
947
#endif
A
Avi Kivity 已提交
948

949
static void kvm_mmu_free_page(struct kvm *kvm, struct kvm_mmu_page *sp)
950
{
951
	ASSERT(is_empty_shadow_page(sp->spt));
952
	hlist_del(&sp->hash_link);
953 954
	list_del(&sp->link);
	__free_page(virt_to_page(sp->spt));
955 956
	if (!sp->role.direct)
		__free_page(virt_to_page(sp->gfns));
957
	kmem_cache_free(mmu_page_header_cache, sp);
958
	++kvm->arch.n_free_mmu_pages;
959 960
}

961 962
static unsigned kvm_page_table_hashfn(gfn_t gfn)
{
963
	return gfn & ((1 << KVM_MMU_HASH_SHIFT) - 1);
964 965
}

966
static struct kvm_mmu_page *kvm_mmu_alloc_page(struct kvm_vcpu *vcpu,
967
					       u64 *parent_pte, int direct)
A
Avi Kivity 已提交
968
{
969
	struct kvm_mmu_page *sp;
A
Avi Kivity 已提交
970

971 972
	sp = mmu_memory_cache_alloc(&vcpu->arch.mmu_page_header_cache, sizeof *sp);
	sp->spt = mmu_memory_cache_alloc(&vcpu->arch.mmu_page_cache, PAGE_SIZE);
973 974 975
	if (!direct)
		sp->gfns = mmu_memory_cache_alloc(&vcpu->arch.mmu_page_cache,
						  PAGE_SIZE);
976
	set_page_private(virt_to_page(sp->spt), (unsigned long)sp);
977
	list_add(&sp->link, &vcpu->kvm->arch.active_mmu_pages);
978
	bitmap_zero(sp->slot_bitmap, KVM_MEMORY_SLOTS + KVM_PRIVATE_MEM_SLOTS);
979 980
	sp->multimapped = 0;
	sp->parent_pte = parent_pte;
981
	--vcpu->kvm->arch.n_free_mmu_pages;
982
	return sp;
A
Avi Kivity 已提交
983 984
}

985
static void mmu_page_add_parent_pte(struct kvm_vcpu *vcpu,
986
				    struct kvm_mmu_page *sp, u64 *parent_pte)
987 988 989 990 991 992 993
{
	struct kvm_pte_chain *pte_chain;
	struct hlist_node *node;
	int i;

	if (!parent_pte)
		return;
994 995
	if (!sp->multimapped) {
		u64 *old = sp->parent_pte;
996 997

		if (!old) {
998
			sp->parent_pte = parent_pte;
999 1000
			return;
		}
1001
		sp->multimapped = 1;
1002
		pte_chain = mmu_alloc_pte_chain(vcpu);
1003 1004
		INIT_HLIST_HEAD(&sp->parent_ptes);
		hlist_add_head(&pte_chain->link, &sp->parent_ptes);
1005 1006
		pte_chain->parent_ptes[0] = old;
	}
1007
	hlist_for_each_entry(pte_chain, node, &sp->parent_ptes, link) {
1008 1009 1010 1011 1012 1013 1014 1015
		if (pte_chain->parent_ptes[NR_PTE_CHAIN_ENTRIES-1])
			continue;
		for (i = 0; i < NR_PTE_CHAIN_ENTRIES; ++i)
			if (!pte_chain->parent_ptes[i]) {
				pte_chain->parent_ptes[i] = parent_pte;
				return;
			}
	}
1016
	pte_chain = mmu_alloc_pte_chain(vcpu);
1017
	BUG_ON(!pte_chain);
1018
	hlist_add_head(&pte_chain->link, &sp->parent_ptes);
1019 1020 1021
	pte_chain->parent_ptes[0] = parent_pte;
}

1022
static void mmu_page_remove_parent_pte(struct kvm_mmu_page *sp,
1023 1024 1025 1026 1027 1028
				       u64 *parent_pte)
{
	struct kvm_pte_chain *pte_chain;
	struct hlist_node *node;
	int i;

1029 1030 1031
	if (!sp->multimapped) {
		BUG_ON(sp->parent_pte != parent_pte);
		sp->parent_pte = NULL;
1032 1033
		return;
	}
1034
	hlist_for_each_entry(pte_chain, node, &sp->parent_ptes, link)
1035 1036 1037 1038 1039
		for (i = 0; i < NR_PTE_CHAIN_ENTRIES; ++i) {
			if (!pte_chain->parent_ptes[i])
				break;
			if (pte_chain->parent_ptes[i] != parent_pte)
				continue;
1040 1041
			while (i + 1 < NR_PTE_CHAIN_ENTRIES
				&& pte_chain->parent_ptes[i + 1]) {
1042 1043 1044 1045 1046
				pte_chain->parent_ptes[i]
					= pte_chain->parent_ptes[i + 1];
				++i;
			}
			pte_chain->parent_ptes[i] = NULL;
1047 1048
			if (i == 0) {
				hlist_del(&pte_chain->link);
1049
				mmu_free_pte_chain(pte_chain);
1050 1051 1052
				if (hlist_empty(&sp->parent_ptes)) {
					sp->multimapped = 0;
					sp->parent_pte = NULL;
1053 1054
				}
			}
1055 1056 1057 1058 1059
			return;
		}
	BUG();
}

1060
static void mmu_parent_walk(struct kvm_mmu_page *sp, mmu_parent_walk_fn fn)
M
Marcelo Tosatti 已提交
1061 1062 1063 1064 1065 1066 1067 1068
{
	struct kvm_pte_chain *pte_chain;
	struct hlist_node *node;
	struct kvm_mmu_page *parent_sp;
	int i;

	if (!sp->multimapped && sp->parent_pte) {
		parent_sp = page_header(__pa(sp->parent_pte));
1069
		fn(parent_sp, sp->parent_pte);
M
Marcelo Tosatti 已提交
1070 1071
		return;
	}
1072

M
Marcelo Tosatti 已提交
1073 1074
	hlist_for_each_entry(pte_chain, node, &sp->parent_ptes, link)
		for (i = 0; i < NR_PTE_CHAIN_ENTRIES; ++i) {
1075 1076 1077
			u64 *spte = pte_chain->parent_ptes[i];

			if (!spte)
M
Marcelo Tosatti 已提交
1078
				break;
1079 1080
			parent_sp = page_header(__pa(spte));
			fn(parent_sp, spte);
M
Marcelo Tosatti 已提交
1081 1082 1083
		}
}

1084 1085
static void mark_unsync(struct kvm_mmu_page *sp, u64 *spte);
static void kvm_mmu_mark_parents_unsync(struct kvm_mmu_page *sp)
1086
{
1087
	mmu_parent_walk(sp, mark_unsync);
1088 1089
}

1090
static void mark_unsync(struct kvm_mmu_page *sp, u64 *spte)
1091
{
1092
	unsigned int index;
1093

1094 1095
	index = spte - sp->spt;
	if (__test_and_set_bit(index, sp->unsync_child_bitmap))
1096
		return;
1097
	if (sp->unsync_children++)
1098
		return;
1099
	kvm_mmu_mark_parents_unsync(sp);
1100 1101
}

1102 1103 1104 1105 1106 1107 1108 1109 1110
static void nonpaging_prefetch_page(struct kvm_vcpu *vcpu,
				    struct kvm_mmu_page *sp)
{
	int i;

	for (i = 0; i < PT64_ENT_PER_PAGE; ++i)
		sp->spt[i] = shadow_trap_nonpresent_pte;
}

1111
static int nonpaging_sync_page(struct kvm_vcpu *vcpu,
1112
			       struct kvm_mmu_page *sp, bool clear_unsync)
1113 1114 1115 1116
{
	return 1;
}

M
Marcelo Tosatti 已提交
1117 1118 1119 1120
static void nonpaging_invlpg(struct kvm_vcpu *vcpu, gva_t gva)
{
}

1121 1122 1123 1124 1125 1126 1127 1128 1129 1130
#define KVM_PAGE_ARRAY_NR 16

struct kvm_mmu_pages {
	struct mmu_page_and_offset {
		struct kvm_mmu_page *sp;
		unsigned int idx;
	} page[KVM_PAGE_ARRAY_NR];
	unsigned int nr;
};

1131 1132 1133 1134 1135
#define for_each_unsync_children(bitmap, idx)		\
	for (idx = find_first_bit(bitmap, 512);		\
	     idx < 512;					\
	     idx = find_next_bit(bitmap, 512, idx+1))

1136 1137
static int mmu_pages_add(struct kvm_mmu_pages *pvec, struct kvm_mmu_page *sp,
			 int idx)
1138
{
1139
	int i;
1140

1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155
	if (sp->unsync)
		for (i=0; i < pvec->nr; i++)
			if (pvec->page[i].sp == sp)
				return 0;

	pvec->page[pvec->nr].sp = sp;
	pvec->page[pvec->nr].idx = idx;
	pvec->nr++;
	return (pvec->nr == KVM_PAGE_ARRAY_NR);
}

static int __mmu_unsync_walk(struct kvm_mmu_page *sp,
			   struct kvm_mmu_pages *pvec)
{
	int i, ret, nr_unsync_leaf = 0;
1156

1157
	for_each_unsync_children(sp->unsync_child_bitmap, i) {
1158
		struct kvm_mmu_page *child;
1159 1160
		u64 ent = sp->spt[i];

1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183 1184 1185 1186 1187 1188 1189
		if (!is_shadow_present_pte(ent) || is_large_pte(ent))
			goto clear_child_bitmap;

		child = page_header(ent & PT64_BASE_ADDR_MASK);

		if (child->unsync_children) {
			if (mmu_pages_add(pvec, child, i))
				return -ENOSPC;

			ret = __mmu_unsync_walk(child, pvec);
			if (!ret)
				goto clear_child_bitmap;
			else if (ret > 0)
				nr_unsync_leaf += ret;
			else
				return ret;
		} else if (child->unsync) {
			nr_unsync_leaf++;
			if (mmu_pages_add(pvec, child, i))
				return -ENOSPC;
		} else
			 goto clear_child_bitmap;

		continue;

clear_child_bitmap:
		__clear_bit(i, sp->unsync_child_bitmap);
		sp->unsync_children--;
		WARN_ON((int)sp->unsync_children < 0);
1190 1191 1192
	}


1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203
	return nr_unsync_leaf;
}

static int mmu_unsync_walk(struct kvm_mmu_page *sp,
			   struct kvm_mmu_pages *pvec)
{
	if (!sp->unsync_children)
		return 0;

	mmu_pages_add(pvec, sp, 0);
	return __mmu_unsync_walk(sp, pvec);
1204 1205 1206 1207 1208
}

static void kvm_unlink_unsync_page(struct kvm *kvm, struct kvm_mmu_page *sp)
{
	WARN_ON(!sp->unsync);
1209
	trace_kvm_mmu_sync_page(sp);
1210 1211 1212 1213
	sp->unsync = 0;
	--kvm->stat.mmu_unsync;
}

1214 1215 1216 1217
static int kvm_mmu_prepare_zap_page(struct kvm *kvm, struct kvm_mmu_page *sp,
				    struct list_head *invalid_list);
static void kvm_mmu_commit_zap_page(struct kvm *kvm,
				    struct list_head *invalid_list);
1218

1219 1220
#define for_each_gfn_sp(kvm, sp, gfn, pos)				\
  hlist_for_each_entry(sp, pos,						\
1221 1222 1223
   &(kvm)->arch.mmu_page_hash[kvm_page_table_hashfn(gfn)], hash_link)	\
	if ((sp)->gfn != (gfn)) {} else

1224 1225
#define for_each_gfn_indirect_valid_sp(kvm, sp, gfn, pos)		\
  hlist_for_each_entry(sp, pos,						\
1226 1227 1228 1229
   &(kvm)->arch.mmu_page_hash[kvm_page_table_hashfn(gfn)], hash_link)	\
		if ((sp)->gfn != (gfn) || (sp)->role.direct ||		\
			(sp)->role.invalid) {} else

1230
/* @sp->gfn should be write-protected at the call site */
1231
static int __kvm_sync_page(struct kvm_vcpu *vcpu, struct kvm_mmu_page *sp,
1232
			   struct list_head *invalid_list, bool clear_unsync)
1233
{
1234
	if (sp->role.cr4_pae != !!is_pae(vcpu)) {
1235
		kvm_mmu_prepare_zap_page(vcpu->kvm, sp, invalid_list);
1236 1237 1238
		return 1;
	}

1239
	if (clear_unsync)
1240 1241
		kvm_unlink_unsync_page(vcpu->kvm, sp);

1242
	if (vcpu->arch.mmu.sync_page(vcpu, sp, clear_unsync)) {
1243
		kvm_mmu_prepare_zap_page(vcpu->kvm, sp, invalid_list);
1244 1245 1246 1247 1248 1249 1250
		return 1;
	}

	kvm_mmu_flush_tlb(vcpu);
	return 0;
}

1251 1252 1253
static int kvm_sync_page_transient(struct kvm_vcpu *vcpu,
				   struct kvm_mmu_page *sp)
{
1254
	LIST_HEAD(invalid_list);
1255 1256
	int ret;

1257
	ret = __kvm_sync_page(vcpu, sp, &invalid_list, false);
1258
	if (ret)
1259 1260
		kvm_mmu_commit_zap_page(vcpu->kvm, &invalid_list);

1261 1262 1263
	return ret;
}

1264 1265
static int kvm_sync_page(struct kvm_vcpu *vcpu, struct kvm_mmu_page *sp,
			 struct list_head *invalid_list)
1266
{
1267
	return __kvm_sync_page(vcpu, sp, invalid_list, true);
1268 1269
}

1270 1271 1272 1273
/* @gfn should be write-protected at the call site */
static void kvm_sync_pages(struct kvm_vcpu *vcpu,  gfn_t gfn)
{
	struct kvm_mmu_page *s;
1274
	struct hlist_node *node;
1275
	LIST_HEAD(invalid_list);
1276 1277
	bool flush = false;

1278
	for_each_gfn_indirect_valid_sp(vcpu->kvm, s, gfn, node) {
1279
		if (!s->unsync)
1280 1281 1282 1283
			continue;

		WARN_ON(s->role.level != PT_PAGE_TABLE_LEVEL);
		if ((s->role.cr4_pae != !!is_pae(vcpu)) ||
1284
			(vcpu->arch.mmu.sync_page(vcpu, s, true))) {
1285
			kvm_mmu_prepare_zap_page(vcpu->kvm, s, &invalid_list);
1286 1287 1288 1289 1290 1291
			continue;
		}
		kvm_unlink_unsync_page(vcpu->kvm, s);
		flush = true;
	}

1292
	kvm_mmu_commit_zap_page(vcpu->kvm, &invalid_list);
1293 1294 1295 1296
	if (flush)
		kvm_mmu_flush_tlb(vcpu);
}

1297 1298 1299
struct mmu_page_path {
	struct kvm_mmu_page *parent[PT64_ROOT_LEVEL-1];
	unsigned int idx[PT64_ROOT_LEVEL-1];
1300 1301
};

1302 1303 1304 1305 1306 1307
#define for_each_sp(pvec, sp, parents, i)			\
		for (i = mmu_pages_next(&pvec, &parents, -1),	\
			sp = pvec.page[i].sp;			\
			i < pvec.nr && ({ sp = pvec.page[i].sp; 1;});	\
			i = mmu_pages_next(&pvec, &parents, i))

1308 1309 1310
static int mmu_pages_next(struct kvm_mmu_pages *pvec,
			  struct mmu_page_path *parents,
			  int i)
1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328
{
	int n;

	for (n = i+1; n < pvec->nr; n++) {
		struct kvm_mmu_page *sp = pvec->page[n].sp;

		if (sp->role.level == PT_PAGE_TABLE_LEVEL) {
			parents->idx[0] = pvec->page[n].idx;
			return n;
		}

		parents->parent[sp->role.level-2] = sp;
		parents->idx[sp->role.level-1] = pvec->page[n].idx;
	}

	return n;
}

1329
static void mmu_pages_clear_parents(struct mmu_page_path *parents)
1330
{
1331 1332 1333 1334 1335
	struct kvm_mmu_page *sp;
	unsigned int level = 0;

	do {
		unsigned int idx = parents->idx[level];
1336

1337 1338 1339 1340 1341 1342 1343 1344 1345
		sp = parents->parent[level];
		if (!sp)
			return;

		--sp->unsync_children;
		WARN_ON((int)sp->unsync_children < 0);
		__clear_bit(idx, sp->unsync_child_bitmap);
		level++;
	} while (level < PT64_ROOT_LEVEL-1 && !sp->unsync_children);
1346 1347
}

1348 1349 1350
static void kvm_mmu_pages_init(struct kvm_mmu_page *parent,
			       struct mmu_page_path *parents,
			       struct kvm_mmu_pages *pvec)
1351
{
1352 1353 1354
	parents->parent[parent->role.level-1] = NULL;
	pvec->nr = 0;
}
1355

1356 1357 1358 1359 1360 1361 1362
static void mmu_sync_children(struct kvm_vcpu *vcpu,
			      struct kvm_mmu_page *parent)
{
	int i;
	struct kvm_mmu_page *sp;
	struct mmu_page_path parents;
	struct kvm_mmu_pages pages;
1363
	LIST_HEAD(invalid_list);
1364 1365 1366

	kvm_mmu_pages_init(parent, &parents, &pages);
	while (mmu_unsync_walk(parent, &pages)) {
1367 1368 1369 1370 1371 1372 1373 1374
		int protected = 0;

		for_each_sp(pages, sp, parents, i)
			protected |= rmap_write_protect(vcpu->kvm, sp->gfn);

		if (protected)
			kvm_flush_remote_tlbs(vcpu->kvm);

1375
		for_each_sp(pages, sp, parents, i) {
1376
			kvm_sync_page(vcpu, sp, &invalid_list);
1377 1378
			mmu_pages_clear_parents(&parents);
		}
1379
		kvm_mmu_commit_zap_page(vcpu->kvm, &invalid_list);
1380
		cond_resched_lock(&vcpu->kvm->mmu_lock);
1381 1382
		kvm_mmu_pages_init(parent, &parents, &pages);
	}
1383 1384
}

1385 1386 1387 1388
static struct kvm_mmu_page *kvm_mmu_get_page(struct kvm_vcpu *vcpu,
					     gfn_t gfn,
					     gva_t gaddr,
					     unsigned level,
1389
					     int direct,
1390
					     unsigned access,
1391
					     u64 *parent_pte)
1392 1393 1394
{
	union kvm_mmu_page_role role;
	unsigned quadrant;
1395
	struct kvm_mmu_page *sp;
1396
	struct hlist_node *node;
1397
	bool need_sync = false;
1398

1399
	role = vcpu->arch.mmu.base_role;
1400
	role.level = level;
1401
	role.direct = direct;
1402
	if (role.direct)
1403
		role.cr4_pae = 0;
1404
	role.access = access;
1405
	if (!tdp_enabled && vcpu->arch.mmu.root_level <= PT32_ROOT_LEVEL) {
1406 1407 1408 1409
		quadrant = gaddr >> (PAGE_SHIFT + (PT64_PT_BITS * level));
		quadrant &= (1 << ((PT32_PT_BITS - PT64_PT_BITS) * level)) - 1;
		role.quadrant = quadrant;
	}
1410
	for_each_gfn_sp(vcpu->kvm, sp, gfn, node) {
1411 1412
		if (!need_sync && sp->unsync)
			need_sync = true;
1413

1414 1415
		if (sp->role.word != role.word)
			continue;
1416

1417 1418
		if (sp->unsync && kvm_sync_page_transient(vcpu, sp))
			break;
1419

1420 1421
		mmu_page_add_parent_pte(vcpu, sp, parent_pte);
		if (sp->unsync_children) {
1422
			kvm_make_request(KVM_REQ_MMU_SYNC, vcpu);
1423 1424 1425
			kvm_mmu_mark_parents_unsync(sp);
		} else if (sp->unsync)
			kvm_mmu_mark_parents_unsync(sp);
1426

1427 1428 1429
		trace_kvm_mmu_get_page(sp, false);
		return sp;
	}
A
Avi Kivity 已提交
1430
	++vcpu->kvm->stat.mmu_cache_miss;
1431
	sp = kvm_mmu_alloc_page(vcpu, parent_pte, direct);
1432 1433 1434 1435
	if (!sp)
		return sp;
	sp->gfn = gfn;
	sp->role = role;
1436 1437
	hlist_add_head(&sp->hash_link,
		&vcpu->kvm->arch.mmu_page_hash[kvm_page_table_hashfn(gfn)]);
1438
	if (!direct) {
1439 1440
		if (rmap_write_protect(vcpu->kvm, gfn))
			kvm_flush_remote_tlbs(vcpu->kvm);
1441 1442 1443
		if (level > PT_PAGE_TABLE_LEVEL && need_sync)
			kvm_sync_pages(vcpu, gfn);

1444 1445
		account_shadowed(vcpu->kvm, gfn);
	}
1446 1447 1448 1449
	if (shadow_trap_nonpresent_pte != shadow_notrap_nonpresent_pte)
		vcpu->arch.mmu.prefetch_page(vcpu, sp);
	else
		nonpaging_prefetch_page(vcpu, sp);
A
Avi Kivity 已提交
1450
	trace_kvm_mmu_get_page(sp, true);
1451
	return sp;
1452 1453
}

1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473
static void shadow_walk_init(struct kvm_shadow_walk_iterator *iterator,
			     struct kvm_vcpu *vcpu, u64 addr)
{
	iterator->addr = addr;
	iterator->shadow_addr = vcpu->arch.mmu.root_hpa;
	iterator->level = vcpu->arch.mmu.shadow_root_level;
	if (iterator->level == PT32E_ROOT_LEVEL) {
		iterator->shadow_addr
			= vcpu->arch.mmu.pae_root[(addr >> 30) & 3];
		iterator->shadow_addr &= PT64_BASE_ADDR_MASK;
		--iterator->level;
		if (!iterator->shadow_addr)
			iterator->level = 0;
	}
}

static bool shadow_walk_okay(struct kvm_shadow_walk_iterator *iterator)
{
	if (iterator->level < PT_PAGE_TABLE_LEVEL)
		return false;
1474 1475 1476 1477 1478

	if (iterator->level == PT_PAGE_TABLE_LEVEL)
		if (is_large_pte(*iterator->sptep))
			return false;

1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489
	iterator->index = SHADOW_PT_INDEX(iterator->addr, iterator->level);
	iterator->sptep	= ((u64 *)__va(iterator->shadow_addr)) + iterator->index;
	return true;
}

static void shadow_walk_next(struct kvm_shadow_walk_iterator *iterator)
{
	iterator->shadow_addr = *iterator->sptep & PT64_BASE_ADDR_MASK;
	--iterator->level;
}

1490 1491 1492 1493 1494 1495 1496
static void link_shadow_page(u64 *sptep, struct kvm_mmu_page *sp)
{
	u64 spte;

	spte = __pa(sp->spt)
		| PT_PRESENT_MASK | PT_ACCESSED_MASK
		| PT_WRITABLE_MASK | PT_USER_MASK;
1497
	__set_spte(sptep, spte);
1498 1499
}

1500 1501 1502 1503 1504 1505 1506 1507
static void drop_large_spte(struct kvm_vcpu *vcpu, u64 *sptep)
{
	if (is_large_pte(*sptep)) {
		drop_spte(vcpu->kvm, sptep, shadow_trap_nonpresent_pte);
		kvm_flush_remote_tlbs(vcpu->kvm);
	}
}

1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530
static void validate_direct_spte(struct kvm_vcpu *vcpu, u64 *sptep,
				   unsigned direct_access)
{
	if (is_shadow_present_pte(*sptep) && !is_large_pte(*sptep)) {
		struct kvm_mmu_page *child;

		/*
		 * For the direct sp, if the guest pte's dirty bit
		 * changed form clean to dirty, it will corrupt the
		 * sp's access: allow writable in the read-only sp,
		 * so we should update the spte at this point to get
		 * a new sp with the correct access.
		 */
		child = page_header(*sptep & PT64_BASE_ADDR_MASK);
		if (child->role.access == direct_access)
			return;

		mmu_page_remove_parent_pte(child, sptep);
		__set_spte(sptep, shadow_trap_nonpresent_pte);
		kvm_flush_remote_tlbs(vcpu->kvm);
	}
}

1531
static void kvm_mmu_page_unlink_children(struct kvm *kvm,
1532
					 struct kvm_mmu_page *sp)
1533
{
1534 1535 1536 1537
	unsigned i;
	u64 *pt;
	u64 ent;

1538
	pt = sp->spt;
1539 1540 1541 1542

	for (i = 0; i < PT64_ENT_PER_PAGE; ++i) {
		ent = pt[i];

M
Marcelo Tosatti 已提交
1543
		if (is_shadow_present_pte(ent)) {
1544
			if (!is_last_spte(ent, sp->role.level)) {
M
Marcelo Tosatti 已提交
1545 1546 1547 1548
				ent &= PT64_BASE_ADDR_MASK;
				mmu_page_remove_parent_pte(page_header(ent),
							   &pt[i]);
			} else {
1549 1550
				if (is_large_pte(ent))
					--kvm->stat.lpages;
A
Avi Kivity 已提交
1551 1552
				drop_spte(kvm, &pt[i],
					  shadow_trap_nonpresent_pte);
M
Marcelo Tosatti 已提交
1553 1554
			}
		}
1555
		pt[i] = shadow_trap_nonpresent_pte;
1556
	}
1557 1558
}

1559
static void kvm_mmu_put_page(struct kvm_mmu_page *sp, u64 *parent_pte)
1560
{
1561
	mmu_page_remove_parent_pte(sp, parent_pte);
1562 1563
}

1564 1565 1566
static void kvm_mmu_reset_last_pte_updated(struct kvm *kvm)
{
	int i;
1567
	struct kvm_vcpu *vcpu;
1568

1569 1570
	kvm_for_each_vcpu(i, vcpu, kvm)
		vcpu->arch.last_pte_updated = NULL;
1571 1572
}

1573
static void kvm_mmu_unlink_parents(struct kvm *kvm, struct kvm_mmu_page *sp)
1574 1575 1576
{
	u64 *parent_pte;

1577 1578 1579
	while (sp->multimapped || sp->parent_pte) {
		if (!sp->multimapped)
			parent_pte = sp->parent_pte;
1580 1581 1582
		else {
			struct kvm_pte_chain *chain;

1583
			chain = container_of(sp->parent_ptes.first,
1584 1585 1586
					     struct kvm_pte_chain, link);
			parent_pte = chain->parent_ptes[0];
		}
1587
		BUG_ON(!parent_pte);
1588
		kvm_mmu_put_page(sp, parent_pte);
A
Avi Kivity 已提交
1589
		__set_spte(parent_pte, shadow_trap_nonpresent_pte);
1590
	}
1591 1592
}

1593
static int mmu_zap_unsync_children(struct kvm *kvm,
1594 1595
				   struct kvm_mmu_page *parent,
				   struct list_head *invalid_list)
1596
{
1597 1598 1599
	int i, zapped = 0;
	struct mmu_page_path parents;
	struct kvm_mmu_pages pages;
1600

1601
	if (parent->role.level == PT_PAGE_TABLE_LEVEL)
1602
		return 0;
1603 1604 1605 1606 1607 1608

	kvm_mmu_pages_init(parent, &parents, &pages);
	while (mmu_unsync_walk(parent, &pages)) {
		struct kvm_mmu_page *sp;

		for_each_sp(pages, sp, parents, i) {
1609
			kvm_mmu_prepare_zap_page(kvm, sp, invalid_list);
1610
			mmu_pages_clear_parents(&parents);
1611
			zapped++;
1612 1613 1614 1615 1616
		}
		kvm_mmu_pages_init(parent, &parents, &pages);
	}

	return zapped;
1617 1618
}

1619 1620
static int kvm_mmu_prepare_zap_page(struct kvm *kvm, struct kvm_mmu_page *sp,
				    struct list_head *invalid_list)
1621
{
1622
	int ret;
A
Avi Kivity 已提交
1623

1624
	trace_kvm_mmu_prepare_zap_page(sp);
1625
	++kvm->stat.mmu_shadow_zapped;
1626
	ret = mmu_zap_unsync_children(kvm, sp, invalid_list);
1627
	kvm_mmu_page_unlink_children(kvm, sp);
1628
	kvm_mmu_unlink_parents(kvm, sp);
1629
	if (!sp->role.invalid && !sp->role.direct)
A
Avi Kivity 已提交
1630
		unaccount_shadowed(kvm, sp->gfn);
1631 1632
	if (sp->unsync)
		kvm_unlink_unsync_page(kvm, sp);
1633
	if (!sp->root_count) {
1634 1635
		/* Count self */
		ret++;
1636
		list_move(&sp->link, invalid_list);
1637
	} else {
A
Avi Kivity 已提交
1638
		list_move(&sp->link, &kvm->arch.active_mmu_pages);
1639 1640
		kvm_reload_remote_mmus(kvm);
	}
1641 1642

	sp->role.invalid = 1;
1643
	kvm_mmu_reset_last_pte_updated(kvm);
1644
	return ret;
1645 1646
}

1647 1648 1649 1650 1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664
static void kvm_mmu_commit_zap_page(struct kvm *kvm,
				    struct list_head *invalid_list)
{
	struct kvm_mmu_page *sp;

	if (list_empty(invalid_list))
		return;

	kvm_flush_remote_tlbs(kvm);

	do {
		sp = list_first_entry(invalid_list, struct kvm_mmu_page, link);
		WARN_ON(!sp->role.invalid || sp->root_count);
		kvm_mmu_free_page(kvm, sp);
	} while (!list_empty(invalid_list));

}

1665 1666 1667 1668 1669 1670
/*
 * Changing the number of mmu pages allocated to the vm
 * Note: if kvm_nr_mmu_pages is too small, you will get dead lock
 */
void kvm_mmu_change_mmu_pages(struct kvm *kvm, unsigned int kvm_nr_mmu_pages)
{
1671
	int used_pages;
1672
	LIST_HEAD(invalid_list);
1673 1674 1675 1676

	used_pages = kvm->arch.n_alloc_mmu_pages - kvm->arch.n_free_mmu_pages;
	used_pages = max(0, used_pages);

1677 1678 1679 1680 1681 1682
	/*
	 * If we set the number of mmu pages to be smaller be than the
	 * number of actived pages , we must to free some mmu pages before we
	 * change the value
	 */

1683
	if (used_pages > kvm_nr_mmu_pages) {
1684 1685
		while (used_pages > kvm_nr_mmu_pages &&
			!list_empty(&kvm->arch.active_mmu_pages)) {
1686 1687
			struct kvm_mmu_page *page;

1688
			page = container_of(kvm->arch.active_mmu_pages.prev,
1689
					    struct kvm_mmu_page, link);
1690 1691
			used_pages -= kvm_mmu_prepare_zap_page(kvm, page,
							       &invalid_list);
1692
		}
1693
		kvm_mmu_commit_zap_page(kvm, &invalid_list);
1694
		kvm_nr_mmu_pages = used_pages;
1695
		kvm->arch.n_free_mmu_pages = 0;
1696 1697
	}
	else
1698 1699
		kvm->arch.n_free_mmu_pages += kvm_nr_mmu_pages
					 - kvm->arch.n_alloc_mmu_pages;
1700

1701
	kvm->arch.n_alloc_mmu_pages = kvm_nr_mmu_pages;
1702 1703
}

1704
static int kvm_mmu_unprotect_page(struct kvm *kvm, gfn_t gfn)
1705
{
1706
	struct kvm_mmu_page *sp;
1707
	struct hlist_node *node;
1708
	LIST_HEAD(invalid_list);
1709 1710
	int r;

1711
	pgprintk("%s: looking for gfn %lx\n", __func__, gfn);
1712
	r = 0;
1713 1714

	for_each_gfn_indirect_valid_sp(kvm, sp, gfn, node) {
1715 1716 1717
		pgprintk("%s: gfn %lx role %x\n", __func__, gfn,
			 sp->role.word);
		r = 1;
1718
		kvm_mmu_prepare_zap_page(kvm, sp, &invalid_list);
1719
	}
1720
	kvm_mmu_commit_zap_page(kvm, &invalid_list);
1721
	return r;
1722 1723
}

1724
static void mmu_unshadow(struct kvm *kvm, gfn_t gfn)
1725
{
1726
	struct kvm_mmu_page *sp;
1727
	struct hlist_node *node;
1728
	LIST_HEAD(invalid_list);
1729

1730
	for_each_gfn_indirect_valid_sp(kvm, sp, gfn, node) {
1731 1732
		pgprintk("%s: zap %lx %x\n",
			 __func__, gfn, sp->role.word);
1733
		kvm_mmu_prepare_zap_page(kvm, sp, &invalid_list);
1734
	}
1735
	kvm_mmu_commit_zap_page(kvm, &invalid_list);
1736 1737
}

1738
static void page_header_update_slot(struct kvm *kvm, void *pte, gfn_t gfn)
A
Avi Kivity 已提交
1739
{
1740
	int slot = memslot_id(kvm, gfn);
1741
	struct kvm_mmu_page *sp = page_header(__pa(pte));
A
Avi Kivity 已提交
1742

1743
	__set_bit(slot, sp->slot_bitmap);
A
Avi Kivity 已提交
1744 1745
}

1746 1747 1748 1749 1750 1751 1752 1753 1754 1755
static void mmu_convert_notrap(struct kvm_mmu_page *sp)
{
	int i;
	u64 *pt = sp->spt;

	if (shadow_trap_nonpresent_pte == shadow_notrap_nonpresent_pte)
		return;

	for (i = 0; i < PT64_ENT_PER_PAGE; ++i) {
		if (pt[i] == shadow_notrap_nonpresent_pte)
A
Avi Kivity 已提交
1756
			__set_spte(&pt[i], shadow_trap_nonpresent_pte);
1757 1758 1759
	}
}

1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852
/*
 * The function is based on mtrr_type_lookup() in
 * arch/x86/kernel/cpu/mtrr/generic.c
 */
static int get_mtrr_type(struct mtrr_state_type *mtrr_state,
			 u64 start, u64 end)
{
	int i;
	u64 base, mask;
	u8 prev_match, curr_match;
	int num_var_ranges = KVM_NR_VAR_MTRR;

	if (!mtrr_state->enabled)
		return 0xFF;

	/* Make end inclusive end, instead of exclusive */
	end--;

	/* Look in fixed ranges. Just return the type as per start */
	if (mtrr_state->have_fixed && (start < 0x100000)) {
		int idx;

		if (start < 0x80000) {
			idx = 0;
			idx += (start >> 16);
			return mtrr_state->fixed_ranges[idx];
		} else if (start < 0xC0000) {
			idx = 1 * 8;
			idx += ((start - 0x80000) >> 14);
			return mtrr_state->fixed_ranges[idx];
		} else if (start < 0x1000000) {
			idx = 3 * 8;
			idx += ((start - 0xC0000) >> 12);
			return mtrr_state->fixed_ranges[idx];
		}
	}

	/*
	 * Look in variable ranges
	 * Look of multiple ranges matching this address and pick type
	 * as per MTRR precedence
	 */
	if (!(mtrr_state->enabled & 2))
		return mtrr_state->def_type;

	prev_match = 0xFF;
	for (i = 0; i < num_var_ranges; ++i) {
		unsigned short start_state, end_state;

		if (!(mtrr_state->var_ranges[i].mask_lo & (1 << 11)))
			continue;

		base = (((u64)mtrr_state->var_ranges[i].base_hi) << 32) +
		       (mtrr_state->var_ranges[i].base_lo & PAGE_MASK);
		mask = (((u64)mtrr_state->var_ranges[i].mask_hi) << 32) +
		       (mtrr_state->var_ranges[i].mask_lo & PAGE_MASK);

		start_state = ((start & mask) == (base & mask));
		end_state = ((end & mask) == (base & mask));
		if (start_state != end_state)
			return 0xFE;

		if ((start & mask) != (base & mask))
			continue;

		curr_match = mtrr_state->var_ranges[i].base_lo & 0xff;
		if (prev_match == 0xFF) {
			prev_match = curr_match;
			continue;
		}

		if (prev_match == MTRR_TYPE_UNCACHABLE ||
		    curr_match == MTRR_TYPE_UNCACHABLE)
			return MTRR_TYPE_UNCACHABLE;

		if ((prev_match == MTRR_TYPE_WRBACK &&
		     curr_match == MTRR_TYPE_WRTHROUGH) ||
		    (prev_match == MTRR_TYPE_WRTHROUGH &&
		     curr_match == MTRR_TYPE_WRBACK)) {
			prev_match = MTRR_TYPE_WRTHROUGH;
			curr_match = MTRR_TYPE_WRTHROUGH;
		}

		if (prev_match != curr_match)
			return MTRR_TYPE_UNCACHABLE;
	}

	if (prev_match != 0xFF)
		return prev_match;

	return mtrr_state->def_type;
}

1853
u8 kvm_get_guest_memory_type(struct kvm_vcpu *vcpu, gfn_t gfn)
1854 1855 1856 1857 1858 1859 1860 1861 1862
{
	u8 mtrr;

	mtrr = get_mtrr_type(&vcpu->arch.mtrr_state, gfn << PAGE_SHIFT,
			     (gfn << PAGE_SHIFT) + PAGE_SIZE);
	if (mtrr == 0xfe || mtrr == 0xff)
		mtrr = MTRR_TYPE_WRBACK;
	return mtrr;
}
1863
EXPORT_SYMBOL_GPL(kvm_get_guest_memory_type);
1864

1865 1866 1867 1868 1869 1870 1871 1872 1873 1874 1875
static void __kvm_unsync_page(struct kvm_vcpu *vcpu, struct kvm_mmu_page *sp)
{
	trace_kvm_mmu_unsync_page(sp);
	++vcpu->kvm->stat.mmu_unsync;
	sp->unsync = 1;

	kvm_mmu_mark_parents_unsync(sp);
	mmu_convert_notrap(sp);
}

static void kvm_unsync_pages(struct kvm_vcpu *vcpu,  gfn_t gfn)
1876 1877
{
	struct kvm_mmu_page *s;
1878
	struct hlist_node *node;
1879

1880
	for_each_gfn_indirect_valid_sp(vcpu->kvm, s, gfn, node) {
1881
		if (s->unsync)
1882
			continue;
1883 1884
		WARN_ON(s->role.level != PT_PAGE_TABLE_LEVEL);
		__kvm_unsync_page(vcpu, s);
1885 1886 1887 1888 1889 1890
	}
}

static int mmu_need_write_protect(struct kvm_vcpu *vcpu, gfn_t gfn,
				  bool can_unsync)
{
1891
	struct kvm_mmu_page *s;
1892
	struct hlist_node *node;
1893 1894
	bool need_unsync = false;

1895
	for_each_gfn_indirect_valid_sp(vcpu->kvm, s, gfn, node) {
1896 1897 1898
		if (!can_unsync)
			return 1;

1899
		if (s->role.level != PT_PAGE_TABLE_LEVEL)
1900
			return 1;
1901 1902

		if (!need_unsync && !s->unsync) {
1903
			if (!oos_shadow)
1904 1905 1906
				return 1;
			need_unsync = true;
		}
1907
	}
1908 1909
	if (need_unsync)
		kvm_unsync_pages(vcpu, gfn);
1910 1911 1912
	return 0;
}

A
Avi Kivity 已提交
1913
static int set_spte(struct kvm_vcpu *vcpu, u64 *sptep,
M
Marcelo Tosatti 已提交
1914
		    unsigned pte_access, int user_fault,
1915
		    int write_fault, int dirty, int level,
1916
		    gfn_t gfn, pfn_t pfn, bool speculative,
1917
		    bool can_unsync, bool reset_host_protection)
1918 1919
{
	u64 spte;
M
Marcelo Tosatti 已提交
1920
	int ret = 0;
S
Sheng Yang 已提交
1921

1922 1923 1924 1925 1926
	/*
	 * We don't set the accessed bit, since we sometimes want to see
	 * whether the guest actually used the pte (in order to detect
	 * demand paging).
	 */
S
Sheng Yang 已提交
1927
	spte = shadow_base_present_pte | shadow_dirty_mask;
1928
	if (!speculative)
1929
		spte |= shadow_accessed_mask;
1930 1931
	if (!dirty)
		pte_access &= ~ACC_WRITE_MASK;
S
Sheng Yang 已提交
1932 1933 1934 1935
	if (pte_access & ACC_EXEC_MASK)
		spte |= shadow_x_mask;
	else
		spte |= shadow_nx_mask;
1936
	if (pte_access & ACC_USER_MASK)
S
Sheng Yang 已提交
1937
		spte |= shadow_user_mask;
1938
	if (level > PT_PAGE_TABLE_LEVEL)
M
Marcelo Tosatti 已提交
1939
		spte |= PT_PAGE_SIZE_MASK;
1940 1941 1942
	if (tdp_enabled)
		spte |= kvm_x86_ops->get_mt_mask(vcpu, gfn,
			kvm_is_mmio_pfn(pfn));
1943

1944 1945 1946
	if (reset_host_protection)
		spte |= SPTE_HOST_WRITEABLE;

1947
	spte |= (u64)pfn << PAGE_SHIFT;
1948 1949

	if ((pte_access & ACC_WRITE_MASK)
1950 1951
	    || (!tdp_enabled && write_fault && !is_write_protection(vcpu)
		&& !user_fault)) {
1952

1953 1954
		if (level > PT_PAGE_TABLE_LEVEL &&
		    has_wrprotected_page(vcpu->kvm, gfn, level)) {
1955
			ret = 1;
A
Avi Kivity 已提交
1956 1957
			drop_spte(vcpu->kvm, sptep, shadow_trap_nonpresent_pte);
			goto done;
1958 1959
		}

1960 1961
		spte |= PT_WRITABLE_MASK;

1962 1963 1964
		if (!tdp_enabled && !(pte_access & ACC_WRITE_MASK))
			spte &= ~PT_USER_MASK;

1965 1966 1967 1968 1969 1970
		/*
		 * Optimization: for pte sync, if spte was writable the hash
		 * lookup is unnecessary (and expensive). Write protection
		 * is responsibility of mmu_get_page / kvm_sync_page.
		 * Same reasoning can be applied to dirty page accounting.
		 */
1971
		if (!can_unsync && is_writable_pte(*sptep))
1972 1973
			goto set_pte;

1974
		if (mmu_need_write_protect(vcpu, gfn, can_unsync)) {
1975
			pgprintk("%s: found shadow page for %lx, marking ro\n",
1976
				 __func__, gfn);
M
Marcelo Tosatti 已提交
1977
			ret = 1;
1978
			pte_access &= ~ACC_WRITE_MASK;
1979
			if (is_writable_pte(spte))
1980 1981 1982 1983 1984 1985 1986
				spte &= ~PT_WRITABLE_MASK;
		}
	}

	if (pte_access & ACC_WRITE_MASK)
		mark_page_dirty(vcpu->kvm, gfn);

1987
set_pte:
1988
	update_spte(sptep, spte);
A
Avi Kivity 已提交
1989
done:
M
Marcelo Tosatti 已提交
1990 1991 1992
	return ret;
}

A
Avi Kivity 已提交
1993
static void mmu_set_spte(struct kvm_vcpu *vcpu, u64 *sptep,
M
Marcelo Tosatti 已提交
1994 1995
			 unsigned pt_access, unsigned pte_access,
			 int user_fault, int write_fault, int dirty,
1996
			 int *ptwrite, int level, gfn_t gfn,
1997 1998
			 pfn_t pfn, bool speculative,
			 bool reset_host_protection)
M
Marcelo Tosatti 已提交
1999 2000
{
	int was_rmapped = 0;
2001
	int was_writable = is_writable_pte(*sptep);
2002
	int rmap_count;
M
Marcelo Tosatti 已提交
2003 2004 2005

	pgprintk("%s: spte %llx access %x write_fault %d"
		 " user_fault %d gfn %lx\n",
A
Avi Kivity 已提交
2006
		 __func__, *sptep, pt_access,
M
Marcelo Tosatti 已提交
2007 2008
		 write_fault, user_fault, gfn);

A
Avi Kivity 已提交
2009
	if (is_rmap_spte(*sptep)) {
M
Marcelo Tosatti 已提交
2010 2011 2012 2013
		/*
		 * If we overwrite a PTE page pointer with a 2MB PMD, unlink
		 * the parent of the now unreachable PTE.
		 */
2014 2015
		if (level > PT_PAGE_TABLE_LEVEL &&
		    !is_large_pte(*sptep)) {
M
Marcelo Tosatti 已提交
2016
			struct kvm_mmu_page *child;
A
Avi Kivity 已提交
2017
			u64 pte = *sptep;
M
Marcelo Tosatti 已提交
2018 2019

			child = page_header(pte & PT64_BASE_ADDR_MASK);
A
Avi Kivity 已提交
2020
			mmu_page_remove_parent_pte(child, sptep);
2021 2022
			__set_spte(sptep, shadow_trap_nonpresent_pte);
			kvm_flush_remote_tlbs(vcpu->kvm);
A
Avi Kivity 已提交
2023
		} else if (pfn != spte_to_pfn(*sptep)) {
M
Marcelo Tosatti 已提交
2024
			pgprintk("hfn old %lx new %lx\n",
A
Avi Kivity 已提交
2025
				 spte_to_pfn(*sptep), pfn);
A
Avi Kivity 已提交
2026
			drop_spte(vcpu->kvm, sptep, shadow_trap_nonpresent_pte);
2027
			kvm_flush_remote_tlbs(vcpu->kvm);
2028 2029
		} else
			was_rmapped = 1;
M
Marcelo Tosatti 已提交
2030
	}
2031

A
Avi Kivity 已提交
2032
	if (set_spte(vcpu, sptep, pte_access, user_fault, write_fault,
2033 2034
		      dirty, level, gfn, pfn, speculative, true,
		      reset_host_protection)) {
M
Marcelo Tosatti 已提交
2035 2036
		if (write_fault)
			*ptwrite = 1;
2037
		kvm_mmu_flush_tlb(vcpu);
2038
	}
M
Marcelo Tosatti 已提交
2039

A
Avi Kivity 已提交
2040
	pgprintk("%s: setting spte %llx\n", __func__, *sptep);
M
Marcelo Tosatti 已提交
2041
	pgprintk("instantiating %s PTE (%s) at %ld (%llx) addr %p\n",
A
Avi Kivity 已提交
2042
		 is_large_pte(*sptep)? "2MB" : "4kB",
2043 2044
		 *sptep & PT_PRESENT_MASK ?"RW":"R", gfn,
		 *sptep, sptep);
A
Avi Kivity 已提交
2045
	if (!was_rmapped && is_large_pte(*sptep))
M
Marcelo Tosatti 已提交
2046 2047
		++vcpu->kvm->stat.lpages;

A
Avi Kivity 已提交
2048
	page_header_update_slot(vcpu->kvm, sptep, gfn);
2049
	if (!was_rmapped) {
2050
		rmap_count = rmap_add(vcpu, sptep, gfn);
2051
		kvm_release_pfn_clean(pfn);
2052
		if (rmap_count > RMAP_RECYCLE_THRESHOLD)
2053
			rmap_recycle(vcpu, sptep, gfn);
2054
	} else {
2055
		if (was_writable)
2056
			kvm_release_pfn_dirty(pfn);
2057
		else
2058
			kvm_release_pfn_clean(pfn);
2059
	}
2060
	if (speculative) {
A
Avi Kivity 已提交
2061
		vcpu->arch.last_pte_updated = sptep;
2062 2063
		vcpu->arch.last_pte_gfn = gfn;
	}
2064 2065
}

A
Avi Kivity 已提交
2066 2067 2068 2069
static void nonpaging_new_cr3(struct kvm_vcpu *vcpu)
{
}

2070
static int __direct_map(struct kvm_vcpu *vcpu, gpa_t v, int write,
2071
			int level, gfn_t gfn, pfn_t pfn)
2072
{
2073
	struct kvm_shadow_walk_iterator iterator;
2074
	struct kvm_mmu_page *sp;
2075
	int pt_write = 0;
2076
	gfn_t pseudo_gfn;
A
Avi Kivity 已提交
2077

2078
	for_each_shadow_entry(vcpu, (u64)gfn << PAGE_SHIFT, iterator) {
2079
		if (iterator.level == level) {
2080 2081
			mmu_set_spte(vcpu, iterator.sptep, ACC_ALL, ACC_ALL,
				     0, write, 1, &pt_write,
2082
				     level, gfn, pfn, false, true);
2083 2084
			++vcpu->stat.pf_fixed;
			break;
A
Avi Kivity 已提交
2085 2086
		}

2087
		if (*iterator.sptep == shadow_trap_nonpresent_pte) {
2088 2089 2090 2091
			u64 base_addr = iterator.addr;

			base_addr &= PT64_LVL_ADDR_MASK(iterator.level);
			pseudo_gfn = base_addr >> PAGE_SHIFT;
2092 2093 2094 2095 2096 2097 2098 2099
			sp = kvm_mmu_get_page(vcpu, pseudo_gfn, iterator.addr,
					      iterator.level - 1,
					      1, ACC_ALL, iterator.sptep);
			if (!sp) {
				pgprintk("nonpaging_map: ENOMEM\n");
				kvm_release_pfn_clean(pfn);
				return -ENOMEM;
			}
2100

A
Avi Kivity 已提交
2101 2102 2103 2104
			__set_spte(iterator.sptep,
				   __pa(sp->spt)
				   | PT_PRESENT_MASK | PT_WRITABLE_MASK
				   | shadow_user_mask | shadow_x_mask);
2105 2106 2107
		}
	}
	return pt_write;
A
Avi Kivity 已提交
2108 2109
}

2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126
static void kvm_send_hwpoison_signal(struct kvm *kvm, gfn_t gfn)
{
	char buf[1];
	void __user *hva;
	int r;

	/* Touch the page, so send SIGBUS */
	hva = (void __user *)gfn_to_hva(kvm, gfn);
	r = copy_from_user(buf, hva, 1);
}

static int kvm_handle_bad_page(struct kvm *kvm, gfn_t gfn, pfn_t pfn)
{
	kvm_release_pfn_clean(pfn);
	if (is_hwpoison_pfn(pfn)) {
		kvm_send_hwpoison_signal(kvm, gfn);
		return 0;
2127 2128 2129
	} else if (is_fault_pfn(pfn))
		return -EFAULT;

2130 2131 2132
	return 1;
}

2133 2134 2135
static int nonpaging_map(struct kvm_vcpu *vcpu, gva_t v, int write, gfn_t gfn)
{
	int r;
2136
	int level;
2137
	pfn_t pfn;
2138
	unsigned long mmu_seq;
2139

2140 2141 2142 2143 2144 2145 2146 2147 2148 2149
	level = mapping_level(vcpu, gfn);

	/*
	 * This path builds a PAE pagetable - so we can map 2mb pages at
	 * maximum. Therefore check if the level is larger than that.
	 */
	if (level > PT_DIRECTORY_LEVEL)
		level = PT_DIRECTORY_LEVEL;

	gfn &= ~(KVM_PAGES_PER_HPAGE(level) - 1);
M
Marcelo Tosatti 已提交
2150

2151
	mmu_seq = vcpu->kvm->mmu_notifier_seq;
2152
	smp_rmb();
2153
	pfn = gfn_to_pfn(vcpu->kvm, gfn);
2154

2155
	/* mmio */
2156 2157
	if (is_error_pfn(pfn))
		return kvm_handle_bad_page(vcpu->kvm, gfn, pfn);
2158

2159
	spin_lock(&vcpu->kvm->mmu_lock);
2160 2161
	if (mmu_notifier_retry(vcpu, mmu_seq))
		goto out_unlock;
2162
	kvm_mmu_free_some_pages(vcpu);
2163
	r = __direct_map(vcpu, v, write, level, gfn, pfn);
2164 2165 2166
	spin_unlock(&vcpu->kvm->mmu_lock);


2167
	return r;
2168 2169 2170 2171 2172

out_unlock:
	spin_unlock(&vcpu->kvm->mmu_lock);
	kvm_release_pfn_clean(pfn);
	return 0;
2173 2174 2175
}


2176 2177 2178
static void mmu_free_roots(struct kvm_vcpu *vcpu)
{
	int i;
2179
	struct kvm_mmu_page *sp;
2180
	LIST_HEAD(invalid_list);
2181

2182
	if (!VALID_PAGE(vcpu->arch.mmu.root_hpa))
A
Avi Kivity 已提交
2183
		return;
2184
	spin_lock(&vcpu->kvm->mmu_lock);
2185 2186
	if (vcpu->arch.mmu.shadow_root_level == PT64_ROOT_LEVEL) {
		hpa_t root = vcpu->arch.mmu.root_hpa;
2187

2188 2189
		sp = page_header(root);
		--sp->root_count;
2190 2191 2192 2193
		if (!sp->root_count && sp->role.invalid) {
			kvm_mmu_prepare_zap_page(vcpu->kvm, sp, &invalid_list);
			kvm_mmu_commit_zap_page(vcpu->kvm, &invalid_list);
		}
2194
		vcpu->arch.mmu.root_hpa = INVALID_PAGE;
2195
		spin_unlock(&vcpu->kvm->mmu_lock);
2196 2197 2198
		return;
	}
	for (i = 0; i < 4; ++i) {
2199
		hpa_t root = vcpu->arch.mmu.pae_root[i];
2200

A
Avi Kivity 已提交
2201 2202
		if (root) {
			root &= PT64_BASE_ADDR_MASK;
2203 2204
			sp = page_header(root);
			--sp->root_count;
2205
			if (!sp->root_count && sp->role.invalid)
2206 2207
				kvm_mmu_prepare_zap_page(vcpu->kvm, sp,
							 &invalid_list);
A
Avi Kivity 已提交
2208
		}
2209
		vcpu->arch.mmu.pae_root[i] = INVALID_PAGE;
2210
	}
2211
	kvm_mmu_commit_zap_page(vcpu->kvm, &invalid_list);
2212
	spin_unlock(&vcpu->kvm->mmu_lock);
2213
	vcpu->arch.mmu.root_hpa = INVALID_PAGE;
2214 2215
}

2216 2217 2218 2219 2220
static int mmu_check_root(struct kvm_vcpu *vcpu, gfn_t root_gfn)
{
	int ret = 0;

	if (!kvm_is_visible_gfn(vcpu->kvm, root_gfn)) {
2221
		kvm_make_request(KVM_REQ_TRIPLE_FAULT, vcpu);
2222 2223 2224 2225 2226 2227 2228
		ret = 1;
	}

	return ret;
}

static int mmu_alloc_roots(struct kvm_vcpu *vcpu)
2229 2230
{
	int i;
2231
	gfn_t root_gfn;
2232
	struct kvm_mmu_page *sp;
2233
	int direct = 0;
A
Avi Kivity 已提交
2234
	u64 pdptr;
2235

2236
	root_gfn = vcpu->arch.cr3 >> PAGE_SHIFT;
2237

2238 2239
	if (vcpu->arch.mmu.shadow_root_level == PT64_ROOT_LEVEL) {
		hpa_t root = vcpu->arch.mmu.root_hpa;
2240 2241

		ASSERT(!VALID_PAGE(root));
2242 2243
		if (mmu_check_root(vcpu, root_gfn))
			return 1;
2244 2245 2246 2247
		if (tdp_enabled) {
			direct = 1;
			root_gfn = 0;
		}
2248
		spin_lock(&vcpu->kvm->mmu_lock);
2249
		kvm_mmu_free_some_pages(vcpu);
2250
		sp = kvm_mmu_get_page(vcpu, root_gfn, 0,
2251
				      PT64_ROOT_LEVEL, direct,
2252
				      ACC_ALL, NULL);
2253 2254
		root = __pa(sp->spt);
		++sp->root_count;
2255
		spin_unlock(&vcpu->kvm->mmu_lock);
2256
		vcpu->arch.mmu.root_hpa = root;
2257
		return 0;
2258
	}
2259
	direct = !is_paging(vcpu);
2260
	for (i = 0; i < 4; ++i) {
2261
		hpa_t root = vcpu->arch.mmu.pae_root[i];
2262 2263

		ASSERT(!VALID_PAGE(root));
2264
		if (vcpu->arch.mmu.root_level == PT32E_ROOT_LEVEL) {
A
Avi Kivity 已提交
2265
			pdptr = kvm_pdptr_read(vcpu, i);
2266
			if (!is_present_gpte(pdptr)) {
2267
				vcpu->arch.mmu.pae_root[i] = 0;
A
Avi Kivity 已提交
2268 2269
				continue;
			}
A
Avi Kivity 已提交
2270
			root_gfn = pdptr >> PAGE_SHIFT;
2271
		} else if (vcpu->arch.mmu.root_level == 0)
2272
			root_gfn = 0;
2273 2274
		if (mmu_check_root(vcpu, root_gfn))
			return 1;
2275 2276 2277 2278
		if (tdp_enabled) {
			direct = 1;
			root_gfn = i << 30;
		}
2279
		spin_lock(&vcpu->kvm->mmu_lock);
2280
		kvm_mmu_free_some_pages(vcpu);
2281
		sp = kvm_mmu_get_page(vcpu, root_gfn, i << 30,
2282
				      PT32_ROOT_LEVEL, direct,
2283
				      ACC_ALL, NULL);
2284 2285
		root = __pa(sp->spt);
		++sp->root_count;
2286 2287
		spin_unlock(&vcpu->kvm->mmu_lock);

2288
		vcpu->arch.mmu.pae_root[i] = root | PT_PRESENT_MASK;
2289
	}
2290
	vcpu->arch.mmu.root_hpa = __pa(vcpu->arch.mmu.pae_root);
2291
	return 0;
2292 2293
}

2294 2295 2296 2297 2298 2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309
static void mmu_sync_roots(struct kvm_vcpu *vcpu)
{
	int i;
	struct kvm_mmu_page *sp;

	if (!VALID_PAGE(vcpu->arch.mmu.root_hpa))
		return;
	if (vcpu->arch.mmu.shadow_root_level == PT64_ROOT_LEVEL) {
		hpa_t root = vcpu->arch.mmu.root_hpa;
		sp = page_header(root);
		mmu_sync_children(vcpu, sp);
		return;
	}
	for (i = 0; i < 4; ++i) {
		hpa_t root = vcpu->arch.mmu.pae_root[i];

2310
		if (root && VALID_PAGE(root)) {
2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321
			root &= PT64_BASE_ADDR_MASK;
			sp = page_header(root);
			mmu_sync_children(vcpu, sp);
		}
	}
}

void kvm_mmu_sync_roots(struct kvm_vcpu *vcpu)
{
	spin_lock(&vcpu->kvm->mmu_lock);
	mmu_sync_roots(vcpu);
2322
	spin_unlock(&vcpu->kvm->mmu_lock);
2323 2324
}

2325 2326
static gpa_t nonpaging_gva_to_gpa(struct kvm_vcpu *vcpu, gva_t vaddr,
				  u32 access, u32 *error)
A
Avi Kivity 已提交
2327
{
2328 2329
	if (error)
		*error = 0;
A
Avi Kivity 已提交
2330 2331 2332 2333
	return vaddr;
}

static int nonpaging_page_fault(struct kvm_vcpu *vcpu, gva_t gva,
A
Avi Kivity 已提交
2334
				u32 error_code)
A
Avi Kivity 已提交
2335
{
2336
	gfn_t gfn;
2337
	int r;
A
Avi Kivity 已提交
2338

2339
	pgprintk("%s: gva %lx error %x\n", __func__, gva, error_code);
2340 2341 2342
	r = mmu_topup_memory_caches(vcpu);
	if (r)
		return r;
2343

A
Avi Kivity 已提交
2344
	ASSERT(vcpu);
2345
	ASSERT(VALID_PAGE(vcpu->arch.mmu.root_hpa));
A
Avi Kivity 已提交
2346

2347
	gfn = gva >> PAGE_SHIFT;
A
Avi Kivity 已提交
2348

2349 2350
	return nonpaging_map(vcpu, gva & PAGE_MASK,
			     error_code & PFERR_WRITE_MASK, gfn);
A
Avi Kivity 已提交
2351 2352
}

2353 2354 2355
static int tdp_page_fault(struct kvm_vcpu *vcpu, gva_t gpa,
				u32 error_code)
{
2356
	pfn_t pfn;
2357
	int r;
2358
	int level;
M
Marcelo Tosatti 已提交
2359
	gfn_t gfn = gpa >> PAGE_SHIFT;
2360
	unsigned long mmu_seq;
2361 2362 2363 2364 2365 2366 2367 2368

	ASSERT(vcpu);
	ASSERT(VALID_PAGE(vcpu->arch.mmu.root_hpa));

	r = mmu_topup_memory_caches(vcpu);
	if (r)
		return r;

2369 2370 2371 2372
	level = mapping_level(vcpu, gfn);

	gfn &= ~(KVM_PAGES_PER_HPAGE(level) - 1);

2373
	mmu_seq = vcpu->kvm->mmu_notifier_seq;
2374
	smp_rmb();
2375
	pfn = gfn_to_pfn(vcpu->kvm, gfn);
2376 2377
	if (is_error_pfn(pfn))
		return kvm_handle_bad_page(vcpu->kvm, gfn, pfn);
2378
	spin_lock(&vcpu->kvm->mmu_lock);
2379 2380
	if (mmu_notifier_retry(vcpu, mmu_seq))
		goto out_unlock;
2381 2382
	kvm_mmu_free_some_pages(vcpu);
	r = __direct_map(vcpu, gpa, error_code & PFERR_WRITE_MASK,
2383
			 level, gfn, pfn);
2384 2385 2386
	spin_unlock(&vcpu->kvm->mmu_lock);

	return r;
2387 2388 2389 2390 2391

out_unlock:
	spin_unlock(&vcpu->kvm->mmu_lock);
	kvm_release_pfn_clean(pfn);
	return 0;
2392 2393
}

A
Avi Kivity 已提交
2394 2395
static void nonpaging_free(struct kvm_vcpu *vcpu)
{
2396
	mmu_free_roots(vcpu);
A
Avi Kivity 已提交
2397 2398 2399 2400
}

static int nonpaging_init_context(struct kvm_vcpu *vcpu)
{
2401
	struct kvm_mmu *context = &vcpu->arch.mmu;
A
Avi Kivity 已提交
2402 2403 2404 2405 2406

	context->new_cr3 = nonpaging_new_cr3;
	context->page_fault = nonpaging_page_fault;
	context->gva_to_gpa = nonpaging_gva_to_gpa;
	context->free = nonpaging_free;
2407
	context->prefetch_page = nonpaging_prefetch_page;
2408
	context->sync_page = nonpaging_sync_page;
M
Marcelo Tosatti 已提交
2409
	context->invlpg = nonpaging_invlpg;
2410
	context->root_level = 0;
A
Avi Kivity 已提交
2411
	context->shadow_root_level = PT32E_ROOT_LEVEL;
A
Avi Kivity 已提交
2412
	context->root_hpa = INVALID_PAGE;
A
Avi Kivity 已提交
2413 2414 2415
	return 0;
}

2416
void kvm_mmu_flush_tlb(struct kvm_vcpu *vcpu)
A
Avi Kivity 已提交
2417
{
A
Avi Kivity 已提交
2418
	++vcpu->stat.tlb_flush;
2419
	kvm_make_request(KVM_REQ_TLB_FLUSH, vcpu);
A
Avi Kivity 已提交
2420 2421 2422 2423
}

static void paging_new_cr3(struct kvm_vcpu *vcpu)
{
2424
	pgprintk("%s: cr3 %lx\n", __func__, vcpu->arch.cr3);
2425
	mmu_free_roots(vcpu);
A
Avi Kivity 已提交
2426 2427 2428 2429 2430 2431
}

static void inject_page_fault(struct kvm_vcpu *vcpu,
			      u64 addr,
			      u32 err_code)
{
2432
	kvm_inject_page_fault(vcpu, addr, err_code);
A
Avi Kivity 已提交
2433 2434 2435 2436 2437 2438 2439
}

static void paging_free(struct kvm_vcpu *vcpu)
{
	nonpaging_free(vcpu);
}

2440 2441 2442 2443 2444 2445 2446 2447
static bool is_rsvd_bits_set(struct kvm_vcpu *vcpu, u64 gpte, int level)
{
	int bit7;

	bit7 = (gpte >> 7) & 1;
	return (gpte & vcpu->arch.mmu.rsvd_bits_mask[bit7][level-1]) != 0;
}

A
Avi Kivity 已提交
2448 2449 2450 2451 2452 2453 2454 2455
#define PTTYPE 64
#include "paging_tmpl.h"
#undef PTTYPE

#define PTTYPE 32
#include "paging_tmpl.h"
#undef PTTYPE

2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468
static void reset_rsvds_bits_mask(struct kvm_vcpu *vcpu, int level)
{
	struct kvm_mmu *context = &vcpu->arch.mmu;
	int maxphyaddr = cpuid_maxphyaddr(vcpu);
	u64 exb_bit_rsvd = 0;

	if (!is_nx(vcpu))
		exb_bit_rsvd = rsvd_bits(63, 63);
	switch (level) {
	case PT32_ROOT_LEVEL:
		/* no rsvd bits for 2 level 4K page table entries */
		context->rsvd_bits_mask[0][1] = 0;
		context->rsvd_bits_mask[0][0] = 0;
2469 2470 2471 2472 2473 2474 2475
		context->rsvd_bits_mask[1][0] = context->rsvd_bits_mask[0][0];

		if (!is_pse(vcpu)) {
			context->rsvd_bits_mask[1][1] = 0;
			break;
		}

2476 2477 2478 2479 2480 2481 2482 2483
		if (is_cpuid_PSE36())
			/* 36bits PSE 4MB page */
			context->rsvd_bits_mask[1][1] = rsvd_bits(17, 21);
		else
			/* 32 bits PSE 4MB page */
			context->rsvd_bits_mask[1][1] = rsvd_bits(13, 21);
		break;
	case PT32E_ROOT_LEVEL:
2484 2485 2486
		context->rsvd_bits_mask[0][2] =
			rsvd_bits(maxphyaddr, 63) |
			rsvd_bits(7, 8) | rsvd_bits(1, 2);	/* PDPTE */
2487
		context->rsvd_bits_mask[0][1] = exb_bit_rsvd |
2488
			rsvd_bits(maxphyaddr, 62);	/* PDE */
2489 2490 2491 2492 2493
		context->rsvd_bits_mask[0][0] = exb_bit_rsvd |
			rsvd_bits(maxphyaddr, 62); 	/* PTE */
		context->rsvd_bits_mask[1][1] = exb_bit_rsvd |
			rsvd_bits(maxphyaddr, 62) |
			rsvd_bits(13, 20);		/* large page */
2494
		context->rsvd_bits_mask[1][0] = context->rsvd_bits_mask[0][0];
2495 2496 2497 2498 2499 2500 2501
		break;
	case PT64_ROOT_LEVEL:
		context->rsvd_bits_mask[0][3] = exb_bit_rsvd |
			rsvd_bits(maxphyaddr, 51) | rsvd_bits(7, 8);
		context->rsvd_bits_mask[0][2] = exb_bit_rsvd |
			rsvd_bits(maxphyaddr, 51) | rsvd_bits(7, 8);
		context->rsvd_bits_mask[0][1] = exb_bit_rsvd |
2502
			rsvd_bits(maxphyaddr, 51);
2503 2504 2505
		context->rsvd_bits_mask[0][0] = exb_bit_rsvd |
			rsvd_bits(maxphyaddr, 51);
		context->rsvd_bits_mask[1][3] = context->rsvd_bits_mask[0][3];
2506 2507 2508
		context->rsvd_bits_mask[1][2] = exb_bit_rsvd |
			rsvd_bits(maxphyaddr, 51) |
			rsvd_bits(13, 29);
2509
		context->rsvd_bits_mask[1][1] = exb_bit_rsvd |
2510 2511
			rsvd_bits(maxphyaddr, 51) |
			rsvd_bits(13, 20);		/* large page */
2512
		context->rsvd_bits_mask[1][0] = context->rsvd_bits_mask[0][0];
2513 2514 2515 2516
		break;
	}
}

2517
static int paging64_init_context_common(struct kvm_vcpu *vcpu, int level)
A
Avi Kivity 已提交
2518
{
2519
	struct kvm_mmu *context = &vcpu->arch.mmu;
A
Avi Kivity 已提交
2520 2521 2522 2523 2524

	ASSERT(is_pae(vcpu));
	context->new_cr3 = paging_new_cr3;
	context->page_fault = paging64_page_fault;
	context->gva_to_gpa = paging64_gva_to_gpa;
2525
	context->prefetch_page = paging64_prefetch_page;
2526
	context->sync_page = paging64_sync_page;
M
Marcelo Tosatti 已提交
2527
	context->invlpg = paging64_invlpg;
A
Avi Kivity 已提交
2528
	context->free = paging_free;
2529 2530
	context->root_level = level;
	context->shadow_root_level = level;
A
Avi Kivity 已提交
2531
	context->root_hpa = INVALID_PAGE;
A
Avi Kivity 已提交
2532 2533 2534
	return 0;
}

2535 2536
static int paging64_init_context(struct kvm_vcpu *vcpu)
{
2537
	reset_rsvds_bits_mask(vcpu, PT64_ROOT_LEVEL);
2538 2539 2540
	return paging64_init_context_common(vcpu, PT64_ROOT_LEVEL);
}

A
Avi Kivity 已提交
2541 2542
static int paging32_init_context(struct kvm_vcpu *vcpu)
{
2543
	struct kvm_mmu *context = &vcpu->arch.mmu;
A
Avi Kivity 已提交
2544

2545
	reset_rsvds_bits_mask(vcpu, PT32_ROOT_LEVEL);
A
Avi Kivity 已提交
2546 2547 2548 2549
	context->new_cr3 = paging_new_cr3;
	context->page_fault = paging32_page_fault;
	context->gva_to_gpa = paging32_gva_to_gpa;
	context->free = paging_free;
2550
	context->prefetch_page = paging32_prefetch_page;
2551
	context->sync_page = paging32_sync_page;
M
Marcelo Tosatti 已提交
2552
	context->invlpg = paging32_invlpg;
A
Avi Kivity 已提交
2553 2554
	context->root_level = PT32_ROOT_LEVEL;
	context->shadow_root_level = PT32E_ROOT_LEVEL;
A
Avi Kivity 已提交
2555
	context->root_hpa = INVALID_PAGE;
A
Avi Kivity 已提交
2556 2557 2558 2559 2560
	return 0;
}

static int paging32E_init_context(struct kvm_vcpu *vcpu)
{
2561
	reset_rsvds_bits_mask(vcpu, PT32E_ROOT_LEVEL);
2562
	return paging64_init_context_common(vcpu, PT32E_ROOT_LEVEL);
A
Avi Kivity 已提交
2563 2564
}

2565 2566 2567 2568 2569 2570 2571 2572
static int init_kvm_tdp_mmu(struct kvm_vcpu *vcpu)
{
	struct kvm_mmu *context = &vcpu->arch.mmu;

	context->new_cr3 = nonpaging_new_cr3;
	context->page_fault = tdp_page_fault;
	context->free = nonpaging_free;
	context->prefetch_page = nonpaging_prefetch_page;
2573
	context->sync_page = nonpaging_sync_page;
M
Marcelo Tosatti 已提交
2574
	context->invlpg = nonpaging_invlpg;
2575
	context->shadow_root_level = kvm_x86_ops->get_tdp_level();
2576 2577 2578 2579 2580 2581
	context->root_hpa = INVALID_PAGE;

	if (!is_paging(vcpu)) {
		context->gva_to_gpa = nonpaging_gva_to_gpa;
		context->root_level = 0;
	} else if (is_long_mode(vcpu)) {
2582
		reset_rsvds_bits_mask(vcpu, PT64_ROOT_LEVEL);
2583 2584 2585
		context->gva_to_gpa = paging64_gva_to_gpa;
		context->root_level = PT64_ROOT_LEVEL;
	} else if (is_pae(vcpu)) {
2586
		reset_rsvds_bits_mask(vcpu, PT32E_ROOT_LEVEL);
2587 2588 2589
		context->gva_to_gpa = paging64_gva_to_gpa;
		context->root_level = PT32E_ROOT_LEVEL;
	} else {
2590
		reset_rsvds_bits_mask(vcpu, PT32_ROOT_LEVEL);
2591 2592 2593 2594 2595 2596 2597 2598
		context->gva_to_gpa = paging32_gva_to_gpa;
		context->root_level = PT32_ROOT_LEVEL;
	}

	return 0;
}

static int init_kvm_softmmu(struct kvm_vcpu *vcpu)
A
Avi Kivity 已提交
2599
{
2600 2601
	int r;

A
Avi Kivity 已提交
2602
	ASSERT(vcpu);
2603
	ASSERT(!VALID_PAGE(vcpu->arch.mmu.root_hpa));
A
Avi Kivity 已提交
2604 2605

	if (!is_paging(vcpu))
2606
		r = nonpaging_init_context(vcpu);
A
Avi Kivity 已提交
2607
	else if (is_long_mode(vcpu))
2608
		r = paging64_init_context(vcpu);
A
Avi Kivity 已提交
2609
	else if (is_pae(vcpu))
2610
		r = paging32E_init_context(vcpu);
A
Avi Kivity 已提交
2611
	else
2612 2613
		r = paging32_init_context(vcpu);

2614
	vcpu->arch.mmu.base_role.cr4_pae = !!is_pae(vcpu);
2615
	vcpu->arch.mmu.base_role.cr0_wp = is_write_protection(vcpu);
2616 2617

	return r;
A
Avi Kivity 已提交
2618 2619
}

2620 2621
static int init_kvm_mmu(struct kvm_vcpu *vcpu)
{
2622 2623
	vcpu->arch.update_pte.pfn = bad_pfn;

2624 2625 2626 2627 2628 2629
	if (tdp_enabled)
		return init_kvm_tdp_mmu(vcpu);
	else
		return init_kvm_softmmu(vcpu);
}

A
Avi Kivity 已提交
2630 2631 2632
static void destroy_kvm_mmu(struct kvm_vcpu *vcpu)
{
	ASSERT(vcpu);
2633 2634
	if (VALID_PAGE(vcpu->arch.mmu.root_hpa))
		/* mmu.free() should set root_hpa = INVALID_PAGE */
2635
		vcpu->arch.mmu.free(vcpu);
A
Avi Kivity 已提交
2636 2637 2638
}

int kvm_mmu_reset_context(struct kvm_vcpu *vcpu)
A
Avi Kivity 已提交
2639 2640 2641 2642
{
	destroy_kvm_mmu(vcpu);
	return init_kvm_mmu(vcpu);
}
2643
EXPORT_SYMBOL_GPL(kvm_mmu_reset_context);
A
Avi Kivity 已提交
2644 2645

int kvm_mmu_load(struct kvm_vcpu *vcpu)
A
Avi Kivity 已提交
2646
{
2647 2648
	int r;

2649
	r = mmu_topup_memory_caches(vcpu);
A
Avi Kivity 已提交
2650 2651
	if (r)
		goto out;
2652
	r = mmu_alloc_roots(vcpu);
2653
	spin_lock(&vcpu->kvm->mmu_lock);
2654
	mmu_sync_roots(vcpu);
2655
	spin_unlock(&vcpu->kvm->mmu_lock);
2656 2657
	if (r)
		goto out;
2658
	/* set_cr3() should ensure TLB has been flushed */
2659
	kvm_x86_ops->set_cr3(vcpu, vcpu->arch.mmu.root_hpa);
2660 2661
out:
	return r;
A
Avi Kivity 已提交
2662
}
A
Avi Kivity 已提交
2663 2664 2665 2666 2667 2668
EXPORT_SYMBOL_GPL(kvm_mmu_load);

void kvm_mmu_unload(struct kvm_vcpu *vcpu)
{
	mmu_free_roots(vcpu);
}
A
Avi Kivity 已提交
2669

2670
static void mmu_pte_write_zap_pte(struct kvm_vcpu *vcpu,
2671
				  struct kvm_mmu_page *sp,
2672 2673 2674 2675 2676 2677
				  u64 *spte)
{
	u64 pte;
	struct kvm_mmu_page *child;

	pte = *spte;
2678
	if (is_shadow_present_pte(pte)) {
2679
		if (is_last_spte(pte, sp->role.level))
A
Avi Kivity 已提交
2680
			drop_spte(vcpu->kvm, spte, shadow_trap_nonpresent_pte);
2681 2682
		else {
			child = page_header(pte & PT64_BASE_ADDR_MASK);
2683
			mmu_page_remove_parent_pte(child, spte);
2684 2685
		}
	}
A
Avi Kivity 已提交
2686
	__set_spte(spte, shadow_trap_nonpresent_pte);
M
Marcelo Tosatti 已提交
2687 2688
	if (is_large_pte(pte))
		--vcpu->kvm->stat.lpages;
2689 2690
}

2691
static void mmu_pte_write_new_pte(struct kvm_vcpu *vcpu,
2692
				  struct kvm_mmu_page *sp,
2693
				  u64 *spte,
2694
				  const void *new)
2695
{
2696
	if (sp->role.level != PT_PAGE_TABLE_LEVEL) {
2697 2698
		++vcpu->kvm->stat.mmu_pde_zapped;
		return;
2699
        }
2700

2701 2702 2703
	if (is_rsvd_bits_set(vcpu, *(u64 *)new, PT_PAGE_TABLE_LEVEL))
		return;

A
Avi Kivity 已提交
2704
	++vcpu->kvm->stat.mmu_pte_updated;
2705
	if (!sp->role.cr4_pae)
2706
		paging32_update_pte(vcpu, sp, spte, new);
2707
	else
2708
		paging64_update_pte(vcpu, sp, spte, new);
2709 2710
}

2711 2712 2713 2714 2715 2716 2717 2718 2719 2720 2721 2722 2723
static bool need_remote_flush(u64 old, u64 new)
{
	if (!is_shadow_present_pte(old))
		return false;
	if (!is_shadow_present_pte(new))
		return true;
	if ((old ^ new) & PT64_BASE_ADDR_MASK)
		return true;
	old ^= PT64_NX_MASK;
	new ^= PT64_NX_MASK;
	return (old & ~new & PT64_PERM_MASK) != 0;
}

2724 2725
static void mmu_pte_write_flush_tlb(struct kvm_vcpu *vcpu, bool zap_page,
				    bool remote_flush, bool local_flush)
2726
{
2727 2728 2729 2730
	if (zap_page)
		return;

	if (remote_flush)
2731
		kvm_flush_remote_tlbs(vcpu->kvm);
2732
	else if (local_flush)
2733 2734 2735
		kvm_mmu_flush_tlb(vcpu);
}

2736 2737
static bool last_updated_pte_accessed(struct kvm_vcpu *vcpu)
{
2738
	u64 *spte = vcpu->arch.last_pte_updated;
2739

S
Sheng Yang 已提交
2740
	return !!(spte && (*spte & shadow_accessed_mask));
2741 2742
}

2743
static void mmu_guess_page_from_pte_write(struct kvm_vcpu *vcpu, gpa_t gpa,
2744
					  u64 gpte)
2745 2746
{
	gfn_t gfn;
2747
	pfn_t pfn;
2748

2749
	if (!is_present_gpte(gpte))
2750 2751
		return;
	gfn = (gpte & PT64_BASE_ADDR_MASK) >> PAGE_SHIFT;
2752

2753
	vcpu->arch.update_pte.mmu_seq = vcpu->kvm->mmu_notifier_seq;
2754
	smp_rmb();
2755
	pfn = gfn_to_pfn(vcpu->kvm, gfn);
2756

2757 2758
	if (is_error_pfn(pfn)) {
		kvm_release_pfn_clean(pfn);
2759 2760
		return;
	}
2761
	vcpu->arch.update_pte.gfn = gfn;
2762
	vcpu->arch.update_pte.pfn = pfn;
2763 2764
}

2765 2766 2767 2768 2769 2770 2771 2772 2773 2774 2775 2776
static void kvm_mmu_access_page(struct kvm_vcpu *vcpu, gfn_t gfn)
{
	u64 *spte = vcpu->arch.last_pte_updated;

	if (spte
	    && vcpu->arch.last_pte_gfn == gfn
	    && shadow_accessed_mask
	    && !(*spte & shadow_accessed_mask)
	    && is_shadow_present_pte(*spte))
		set_bit(PT_ACCESSED_SHIFT, (unsigned long *)spte);
}

2777
void kvm_mmu_pte_write(struct kvm_vcpu *vcpu, gpa_t gpa,
2778 2779
		       const u8 *new, int bytes,
		       bool guest_initiated)
2780
{
2781
	gfn_t gfn = gpa >> PAGE_SHIFT;
2782
	union kvm_mmu_page_role mask = { .word = 0 };
2783
	struct kvm_mmu_page *sp;
2784
	struct hlist_node *node;
2785
	LIST_HEAD(invalid_list);
2786
	u64 entry, gentry;
2787 2788
	u64 *spte;
	unsigned offset = offset_in_page(gpa);
2789
	unsigned pte_size;
2790
	unsigned page_offset;
2791
	unsigned misaligned;
2792
	unsigned quadrant;
2793
	int level;
2794
	int flooded = 0;
2795
	int npte;
2796
	int r;
2797
	int invlpg_counter;
2798 2799 2800
	bool remote_flush, local_flush, zap_page;

	zap_page = remote_flush = local_flush = false;
2801

2802
	pgprintk("%s: gpa %llx bytes %d\n", __func__, gpa, bytes);
2803

2804
	invlpg_counter = atomic_read(&vcpu->kvm->arch.invlpg_counter);
2805 2806 2807 2808 2809 2810 2811

	/*
	 * Assume that the pte write on a page table of the same type
	 * as the current vcpu paging mode.  This is nearly always true
	 * (might be false while changing modes).  Note it is verified later
	 * by update_pte().
	 */
2812
	if ((is_pae(vcpu) && bytes == 4) || !new) {
2813
		/* Handle a 32-bit guest writing two halves of a 64-bit gpte */
2814 2815 2816 2817 2818
		if (is_pae(vcpu)) {
			gpa &= ~(gpa_t)7;
			bytes = 8;
		}
		r = kvm_read_guest(vcpu->kvm, gpa, &gentry, min(bytes, 8));
2819 2820
		if (r)
			gentry = 0;
2821 2822 2823 2824 2825 2826 2827 2828 2829 2830 2831 2832 2833
		new = (const u8 *)&gentry;
	}

	switch (bytes) {
	case 4:
		gentry = *(const u32 *)new;
		break;
	case 8:
		gentry = *(const u64 *)new;
		break;
	default:
		gentry = 0;
		break;
2834 2835 2836
	}

	mmu_guess_page_from_pte_write(vcpu, gpa, gentry);
2837
	spin_lock(&vcpu->kvm->mmu_lock);
2838 2839
	if (atomic_read(&vcpu->kvm->arch.invlpg_counter) != invlpg_counter)
		gentry = 0;
2840
	kvm_mmu_access_page(vcpu, gfn);
2841
	kvm_mmu_free_some_pages(vcpu);
A
Avi Kivity 已提交
2842
	++vcpu->kvm->stat.mmu_pte_write;
2843
	kvm_mmu_audit(vcpu, "pre pte write");
2844 2845 2846 2847 2848 2849 2850 2851 2852 2853 2854
	if (guest_initiated) {
		if (gfn == vcpu->arch.last_pt_write_gfn
		    && !last_updated_pte_accessed(vcpu)) {
			++vcpu->arch.last_pt_write_count;
			if (vcpu->arch.last_pt_write_count >= 3)
				flooded = 1;
		} else {
			vcpu->arch.last_pt_write_gfn = gfn;
			vcpu->arch.last_pt_write_count = 1;
			vcpu->arch.last_pte_updated = NULL;
		}
2855
	}
2856

2857
	mask.cr0_wp = mask.cr4_pae = mask.nxe = 1;
2858
	for_each_gfn_indirect_valid_sp(vcpu->kvm, sp, gfn, node) {
2859
		pte_size = sp->role.cr4_pae ? 8 : 4;
2860
		misaligned = (offset ^ (offset + bytes - 1)) & ~(pte_size - 1);
2861
		misaligned |= bytes < 4;
2862
		if (misaligned || flooded) {
2863 2864 2865 2866
			/*
			 * Misaligned accesses are too much trouble to fix
			 * up; also, they usually indicate a page is not used
			 * as a page table.
2867 2868 2869 2870 2871
			 *
			 * If we're seeing too many writes to a page,
			 * it may no longer be a page table, or we may be
			 * forking, in which case it is better to unmap the
			 * page.
2872 2873
			 */
			pgprintk("misaligned: gpa %llx bytes %d role %x\n",
2874
				 gpa, bytes, sp->role.word);
2875
			zap_page |= !!kvm_mmu_prepare_zap_page(vcpu->kvm, sp,
2876
						     &invalid_list);
A
Avi Kivity 已提交
2877
			++vcpu->kvm->stat.mmu_flooded;
2878 2879
			continue;
		}
2880
		page_offset = offset;
2881
		level = sp->role.level;
2882
		npte = 1;
2883
		if (!sp->role.cr4_pae) {
2884 2885 2886 2887 2888 2889 2890
			page_offset <<= 1;	/* 32->64 */
			/*
			 * A 32-bit pde maps 4MB while the shadow pdes map
			 * only 2MB.  So we need to double the offset again
			 * and zap two pdes instead of one.
			 */
			if (level == PT32_ROOT_LEVEL) {
2891
				page_offset &= ~7; /* kill rounding error */
2892 2893 2894
				page_offset <<= 1;
				npte = 2;
			}
2895
			quadrant = page_offset >> PAGE_SHIFT;
2896
			page_offset &= ~PAGE_MASK;
2897
			if (quadrant != sp->role.quadrant)
2898
				continue;
2899
		}
2900
		local_flush = true;
2901
		spte = &sp->spt[page_offset / sizeof(*spte)];
2902
		while (npte--) {
2903
			entry = *spte;
2904
			mmu_pte_write_zap_pte(vcpu, sp, spte);
2905 2906 2907
			if (gentry &&
			      !((sp->role.word ^ vcpu->arch.mmu.base_role.word)
			      & mask.word))
2908
				mmu_pte_write_new_pte(vcpu, sp, spte, &gentry);
2909 2910
			if (!remote_flush && need_remote_flush(entry, *spte))
				remote_flush = true;
2911
			++spte;
2912 2913
		}
	}
2914
	mmu_pte_write_flush_tlb(vcpu, zap_page, remote_flush, local_flush);
2915
	kvm_mmu_commit_zap_page(vcpu->kvm, &invalid_list);
2916
	kvm_mmu_audit(vcpu, "post pte write");
2917
	spin_unlock(&vcpu->kvm->mmu_lock);
2918 2919 2920
	if (!is_error_pfn(vcpu->arch.update_pte.pfn)) {
		kvm_release_pfn_clean(vcpu->arch.update_pte.pfn);
		vcpu->arch.update_pte.pfn = bad_pfn;
2921
	}
2922 2923
}

2924 2925
int kvm_mmu_unprotect_page_virt(struct kvm_vcpu *vcpu, gva_t gva)
{
2926 2927
	gpa_t gpa;
	int r;
2928

2929 2930 2931
	if (tdp_enabled)
		return 0;

2932
	gpa = kvm_mmu_gva_to_gpa_read(vcpu, gva, NULL);
2933

2934
	spin_lock(&vcpu->kvm->mmu_lock);
2935
	r = kvm_mmu_unprotect_page(vcpu->kvm, gpa >> PAGE_SHIFT);
2936
	spin_unlock(&vcpu->kvm->mmu_lock);
2937
	return r;
2938
}
2939
EXPORT_SYMBOL_GPL(kvm_mmu_unprotect_page_virt);
2940

2941
void __kvm_mmu_free_some_pages(struct kvm_vcpu *vcpu)
A
Avi Kivity 已提交
2942
{
2943
	int free_pages;
2944
	LIST_HEAD(invalid_list);
2945 2946 2947

	free_pages = vcpu->kvm->arch.n_free_mmu_pages;
	while (free_pages < KVM_REFILL_PAGES &&
2948
	       !list_empty(&vcpu->kvm->arch.active_mmu_pages)) {
2949
		struct kvm_mmu_page *sp;
A
Avi Kivity 已提交
2950

2951
		sp = container_of(vcpu->kvm->arch.active_mmu_pages.prev,
2952
				  struct kvm_mmu_page, link);
2953 2954
		free_pages += kvm_mmu_prepare_zap_page(vcpu->kvm, sp,
						       &invalid_list);
A
Avi Kivity 已提交
2955
		++vcpu->kvm->stat.mmu_recycled;
A
Avi Kivity 已提交
2956
	}
2957
	kvm_mmu_commit_zap_page(vcpu->kvm, &invalid_list);
A
Avi Kivity 已提交
2958 2959
}

2960 2961 2962 2963 2964
int kvm_mmu_page_fault(struct kvm_vcpu *vcpu, gva_t cr2, u32 error_code)
{
	int r;
	enum emulation_result er;

2965
	r = vcpu->arch.mmu.page_fault(vcpu, cr2, error_code);
2966 2967 2968 2969 2970 2971 2972 2973
	if (r < 0)
		goto out;

	if (!r) {
		r = 1;
		goto out;
	}

2974 2975 2976 2977
	r = mmu_topup_memory_caches(vcpu);
	if (r)
		goto out;

A
Avi Kivity 已提交
2978
	er = emulate_instruction(vcpu, cr2, error_code, 0);
2979 2980 2981 2982 2983 2984

	switch (er) {
	case EMULATE_DONE:
		return 1;
	case EMULATE_DO_MMIO:
		++vcpu->stat.mmio_exits;
2985
		/* fall through */
2986
	case EMULATE_FAIL:
2987
		return 0;
2988 2989 2990 2991 2992 2993 2994 2995
	default:
		BUG();
	}
out:
	return r;
}
EXPORT_SYMBOL_GPL(kvm_mmu_page_fault);

M
Marcelo Tosatti 已提交
2996 2997 2998 2999 3000 3001 3002 3003
void kvm_mmu_invlpg(struct kvm_vcpu *vcpu, gva_t gva)
{
	vcpu->arch.mmu.invlpg(vcpu, gva);
	kvm_mmu_flush_tlb(vcpu);
	++vcpu->stat.invlpg;
}
EXPORT_SYMBOL_GPL(kvm_mmu_invlpg);

3004 3005 3006 3007 3008 3009
void kvm_enable_tdp(void)
{
	tdp_enabled = true;
}
EXPORT_SYMBOL_GPL(kvm_enable_tdp);

3010 3011 3012 3013 3014 3015
void kvm_disable_tdp(void)
{
	tdp_enabled = false;
}
EXPORT_SYMBOL_GPL(kvm_disable_tdp);

A
Avi Kivity 已提交
3016 3017
static void free_mmu_pages(struct kvm_vcpu *vcpu)
{
3018
	free_page((unsigned long)vcpu->arch.mmu.pae_root);
A
Avi Kivity 已提交
3019 3020 3021 3022
}

static int alloc_mmu_pages(struct kvm_vcpu *vcpu)
{
3023
	struct page *page;
A
Avi Kivity 已提交
3024 3025 3026 3027
	int i;

	ASSERT(vcpu);

3028 3029 3030 3031 3032 3033 3034
	/*
	 * When emulating 32-bit mode, cr3 is only 32 bits even on x86_64.
	 * Therefore we need to allocate shadow page tables in the first
	 * 4GB of memory, which happens to fit the DMA32 zone.
	 */
	page = alloc_page(GFP_KERNEL | __GFP_DMA32);
	if (!page)
3035 3036
		return -ENOMEM;

3037
	vcpu->arch.mmu.pae_root = page_address(page);
3038
	for (i = 0; i < 4; ++i)
3039
		vcpu->arch.mmu.pae_root[i] = INVALID_PAGE;
3040

A
Avi Kivity 已提交
3041 3042 3043
	return 0;
}

3044
int kvm_mmu_create(struct kvm_vcpu *vcpu)
A
Avi Kivity 已提交
3045 3046
{
	ASSERT(vcpu);
3047
	ASSERT(!VALID_PAGE(vcpu->arch.mmu.root_hpa));
A
Avi Kivity 已提交
3048

3049 3050
	return alloc_mmu_pages(vcpu);
}
A
Avi Kivity 已提交
3051

3052 3053 3054
int kvm_mmu_setup(struct kvm_vcpu *vcpu)
{
	ASSERT(vcpu);
3055
	ASSERT(!VALID_PAGE(vcpu->arch.mmu.root_hpa));
3056

3057
	return init_kvm_mmu(vcpu);
A
Avi Kivity 已提交
3058 3059 3060 3061 3062 3063 3064 3065
}

void kvm_mmu_destroy(struct kvm_vcpu *vcpu)
{
	ASSERT(vcpu);

	destroy_kvm_mmu(vcpu);
	free_mmu_pages(vcpu);
3066
	mmu_free_memory_caches(vcpu);
A
Avi Kivity 已提交
3067 3068
}

3069
void kvm_mmu_slot_remove_write_access(struct kvm *kvm, int slot)
A
Avi Kivity 已提交
3070
{
3071
	struct kvm_mmu_page *sp;
A
Avi Kivity 已提交
3072

3073
	list_for_each_entry(sp, &kvm->arch.active_mmu_pages, link) {
A
Avi Kivity 已提交
3074 3075 3076
		int i;
		u64 *pt;

3077
		if (!test_bit(slot, sp->slot_bitmap))
A
Avi Kivity 已提交
3078 3079
			continue;

3080
		pt = sp->spt;
A
Avi Kivity 已提交
3081 3082
		for (i = 0; i < PT64_ENT_PER_PAGE; ++i)
			/* avoid RMW */
3083
			if (is_writable_pte(pt[i]))
A
Avi Kivity 已提交
3084 3085
				pt[i] &= ~PT_WRITABLE_MASK;
	}
3086
	kvm_flush_remote_tlbs(kvm);
A
Avi Kivity 已提交
3087
}
3088

3089
void kvm_mmu_zap_all(struct kvm *kvm)
D
Dor Laor 已提交
3090
{
3091
	struct kvm_mmu_page *sp, *node;
3092
	LIST_HEAD(invalid_list);
D
Dor Laor 已提交
3093

3094
	spin_lock(&kvm->mmu_lock);
3095
restart:
3096
	list_for_each_entry_safe(sp, node, &kvm->arch.active_mmu_pages, link)
3097
		if (kvm_mmu_prepare_zap_page(kvm, sp, &invalid_list))
3098 3099
			goto restart;

3100
	kvm_mmu_commit_zap_page(kvm, &invalid_list);
3101
	spin_unlock(&kvm->mmu_lock);
D
Dor Laor 已提交
3102 3103
}

3104 3105
static int kvm_mmu_remove_some_alloc_mmu_pages(struct kvm *kvm,
					       struct list_head *invalid_list)
3106 3107 3108 3109 3110
{
	struct kvm_mmu_page *page;

	page = container_of(kvm->arch.active_mmu_pages.prev,
			    struct kvm_mmu_page, link);
3111
	return kvm_mmu_prepare_zap_page(kvm, page, invalid_list);
3112 3113
}

3114
static int mmu_shrink(struct shrinker *shrink, int nr_to_scan, gfp_t gfp_mask)
3115 3116 3117 3118 3119 3120 3121 3122
{
	struct kvm *kvm;
	struct kvm *kvm_freed = NULL;
	int cache_count = 0;

	spin_lock(&kvm_lock);

	list_for_each_entry(kvm, &vm_list, vm_list) {
G
Gui Jianfeng 已提交
3123
		int npages, idx, freed_pages;
3124
		LIST_HEAD(invalid_list);
3125

3126
		idx = srcu_read_lock(&kvm->srcu);
3127 3128 3129 3130 3131
		spin_lock(&kvm->mmu_lock);
		npages = kvm->arch.n_alloc_mmu_pages -
			 kvm->arch.n_free_mmu_pages;
		cache_count += npages;
		if (!kvm_freed && nr_to_scan > 0 && npages > 0) {
3132 3133
			freed_pages = kvm_mmu_remove_some_alloc_mmu_pages(kvm,
							  &invalid_list);
G
Gui Jianfeng 已提交
3134
			cache_count -= freed_pages;
3135 3136 3137 3138
			kvm_freed = kvm;
		}
		nr_to_scan--;

3139
		kvm_mmu_commit_zap_page(kvm, &invalid_list);
3140
		spin_unlock(&kvm->mmu_lock);
3141
		srcu_read_unlock(&kvm->srcu, idx);
3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155
	}
	if (kvm_freed)
		list_move_tail(&kvm_freed->vm_list, &vm_list);

	spin_unlock(&kvm_lock);

	return cache_count;
}

static struct shrinker mmu_shrinker = {
	.shrink = mmu_shrink,
	.seeks = DEFAULT_SEEKS * 10,
};

I
Ingo Molnar 已提交
3156
static void mmu_destroy_caches(void)
3157 3158 3159 3160 3161
{
	if (pte_chain_cache)
		kmem_cache_destroy(pte_chain_cache);
	if (rmap_desc_cache)
		kmem_cache_destroy(rmap_desc_cache);
3162 3163
	if (mmu_page_header_cache)
		kmem_cache_destroy(mmu_page_header_cache);
3164 3165
}

3166 3167 3168 3169 3170 3171
void kvm_mmu_module_exit(void)
{
	mmu_destroy_caches();
	unregister_shrinker(&mmu_shrinker);
}

3172 3173 3174 3175
int kvm_mmu_module_init(void)
{
	pte_chain_cache = kmem_cache_create("kvm_pte_chain",
					    sizeof(struct kvm_pte_chain),
3176
					    0, 0, NULL);
3177 3178 3179 3180
	if (!pte_chain_cache)
		goto nomem;
	rmap_desc_cache = kmem_cache_create("kvm_rmap_desc",
					    sizeof(struct kvm_rmap_desc),
3181
					    0, 0, NULL);
3182 3183 3184
	if (!rmap_desc_cache)
		goto nomem;

3185 3186
	mmu_page_header_cache = kmem_cache_create("kvm_mmu_page_header",
						  sizeof(struct kvm_mmu_page),
3187
						  0, 0, NULL);
3188 3189 3190
	if (!mmu_page_header_cache)
		goto nomem;

3191 3192
	register_shrinker(&mmu_shrinker);

3193 3194 3195
	return 0;

nomem:
3196
	mmu_destroy_caches();
3197 3198 3199
	return -ENOMEM;
}

3200 3201 3202 3203 3204 3205 3206 3207
/*
 * Caculate mmu pages needed for kvm.
 */
unsigned int kvm_mmu_calculate_mmu_pages(struct kvm *kvm)
{
	int i;
	unsigned int nr_mmu_pages;
	unsigned int  nr_pages = 0;
3208
	struct kvm_memslots *slots;
3209

3210 3211
	slots = kvm_memslots(kvm);

3212 3213
	for (i = 0; i < slots->nmemslots; i++)
		nr_pages += slots->memslots[i].npages;
3214 3215 3216 3217 3218 3219 3220 3221

	nr_mmu_pages = nr_pages * KVM_PERMILLE_MMU_PAGES / 1000;
	nr_mmu_pages = max(nr_mmu_pages,
			(unsigned int) KVM_MIN_ALLOC_MMU_PAGES);

	return nr_mmu_pages;
}

3222 3223 3224 3225 3226 3227 3228 3229 3230 3231 3232 3233 3234 3235 3236 3237 3238 3239 3240 3241 3242 3243 3244 3245 3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256
static void *pv_mmu_peek_buffer(struct kvm_pv_mmu_op_buffer *buffer,
				unsigned len)
{
	if (len > buffer->len)
		return NULL;
	return buffer->ptr;
}

static void *pv_mmu_read_buffer(struct kvm_pv_mmu_op_buffer *buffer,
				unsigned len)
{
	void *ret;

	ret = pv_mmu_peek_buffer(buffer, len);
	if (!ret)
		return ret;
	buffer->ptr += len;
	buffer->len -= len;
	buffer->processed += len;
	return ret;
}

static int kvm_pv_mmu_write(struct kvm_vcpu *vcpu,
			     gpa_t addr, gpa_t value)
{
	int bytes = 8;
	int r;

	if (!is_long_mode(vcpu) && !is_pae(vcpu))
		bytes = 4;

	r = mmu_topup_memory_caches(vcpu);
	if (r)
		return r;

3257
	if (!emulator_write_phys(vcpu, addr, &value, bytes))
3258 3259 3260 3261 3262 3263 3264
		return -EFAULT;

	return 1;
}

static int kvm_pv_mmu_flush_tlb(struct kvm_vcpu *vcpu)
{
3265
	(void)kvm_set_cr3(vcpu, vcpu->arch.cr3);
3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289 3290 3291 3292 3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303 3304 3305 3306 3307 3308 3309 3310 3311 3312 3313 3314 3315 3316 3317 3318
	return 1;
}

static int kvm_pv_mmu_release_pt(struct kvm_vcpu *vcpu, gpa_t addr)
{
	spin_lock(&vcpu->kvm->mmu_lock);
	mmu_unshadow(vcpu->kvm, addr >> PAGE_SHIFT);
	spin_unlock(&vcpu->kvm->mmu_lock);
	return 1;
}

static int kvm_pv_mmu_op_one(struct kvm_vcpu *vcpu,
			     struct kvm_pv_mmu_op_buffer *buffer)
{
	struct kvm_mmu_op_header *header;

	header = pv_mmu_peek_buffer(buffer, sizeof *header);
	if (!header)
		return 0;
	switch (header->op) {
	case KVM_MMU_OP_WRITE_PTE: {
		struct kvm_mmu_op_write_pte *wpte;

		wpte = pv_mmu_read_buffer(buffer, sizeof *wpte);
		if (!wpte)
			return 0;
		return kvm_pv_mmu_write(vcpu, wpte->pte_phys,
					wpte->pte_val);
	}
	case KVM_MMU_OP_FLUSH_TLB: {
		struct kvm_mmu_op_flush_tlb *ftlb;

		ftlb = pv_mmu_read_buffer(buffer, sizeof *ftlb);
		if (!ftlb)
			return 0;
		return kvm_pv_mmu_flush_tlb(vcpu);
	}
	case KVM_MMU_OP_RELEASE_PT: {
		struct kvm_mmu_op_release_pt *rpt;

		rpt = pv_mmu_read_buffer(buffer, sizeof *rpt);
		if (!rpt)
			return 0;
		return kvm_pv_mmu_release_pt(vcpu, rpt->pt_phys);
	}
	default: return 0;
	}
}

int kvm_pv_mmu_op(struct kvm_vcpu *vcpu, unsigned long bytes,
		  gpa_t addr, unsigned long *ret)
{
	int r;
3319
	struct kvm_pv_mmu_op_buffer *buffer = &vcpu->arch.mmu_op_buffer;
3320

3321 3322 3323
	buffer->ptr = buffer->buf;
	buffer->len = min_t(unsigned long, bytes, sizeof buffer->buf);
	buffer->processed = 0;
3324

3325
	r = kvm_read_guest(vcpu->kvm, addr, buffer->buf, buffer->len);
3326 3327 3328
	if (r)
		goto out;

3329 3330
	while (buffer->len) {
		r = kvm_pv_mmu_op_one(vcpu, buffer);
3331 3332 3333 3334 3335 3336 3337 3338
		if (r < 0)
			goto out;
		if (r == 0)
			break;
	}

	r = 1;
out:
3339
	*ret = buffer->processed;
3340 3341 3342
	return r;
}

3343 3344 3345 3346 3347 3348 3349 3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 3360
int kvm_mmu_get_spte_hierarchy(struct kvm_vcpu *vcpu, u64 addr, u64 sptes[4])
{
	struct kvm_shadow_walk_iterator iterator;
	int nr_sptes = 0;

	spin_lock(&vcpu->kvm->mmu_lock);
	for_each_shadow_entry(vcpu, addr, iterator) {
		sptes[iterator.level-1] = *iterator.sptep;
		nr_sptes++;
		if (!is_shadow_present_pte(*iterator.sptep))
			break;
	}
	spin_unlock(&vcpu->kvm->mmu_lock);

	return nr_sptes;
}
EXPORT_SYMBOL_GPL(kvm_mmu_get_spte_hierarchy);

3361 3362 3363 3364 3365 3366 3367 3368 3369 3370 3371 3372
#ifdef AUDIT

static const char *audit_msg;

static gva_t canonicalize(gva_t gva)
{
#ifdef CONFIG_X86_64
	gva = (long long)(gva << 16) >> 16;
#endif
	return gva;
}

3373

3374
typedef void (*inspect_spte_fn) (struct kvm *kvm, u64 *sptep);
3375 3376 3377 3378 3379 3380 3381 3382 3383 3384

static void __mmu_spte_walk(struct kvm *kvm, struct kvm_mmu_page *sp,
			    inspect_spte_fn fn)
{
	int i;

	for (i = 0; i < PT64_ENT_PER_PAGE; ++i) {
		u64 ent = sp->spt[i];

		if (is_shadow_present_pte(ent)) {
3385
			if (!is_last_spte(ent, sp->role.level)) {
3386 3387 3388
				struct kvm_mmu_page *child;
				child = page_header(ent & PT64_BASE_ADDR_MASK);
				__mmu_spte_walk(kvm, child, fn);
3389
			} else
3390
				fn(kvm, &sp->spt[i]);
3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419
		}
	}
}

static void mmu_spte_walk(struct kvm_vcpu *vcpu, inspect_spte_fn fn)
{
	int i;
	struct kvm_mmu_page *sp;

	if (!VALID_PAGE(vcpu->arch.mmu.root_hpa))
		return;
	if (vcpu->arch.mmu.shadow_root_level == PT64_ROOT_LEVEL) {
		hpa_t root = vcpu->arch.mmu.root_hpa;
		sp = page_header(root);
		__mmu_spte_walk(vcpu->kvm, sp, fn);
		return;
	}
	for (i = 0; i < 4; ++i) {
		hpa_t root = vcpu->arch.mmu.pae_root[i];

		if (root && VALID_PAGE(root)) {
			root &= PT64_BASE_ADDR_MASK;
			sp = page_header(root);
			__mmu_spte_walk(vcpu->kvm, sp, fn);
		}
	}
	return;
}

3420 3421 3422 3423 3424 3425 3426 3427 3428 3429
static void audit_mappings_page(struct kvm_vcpu *vcpu, u64 page_pte,
				gva_t va, int level)
{
	u64 *pt = __va(page_pte & PT64_BASE_ADDR_MASK);
	int i;
	gva_t va_delta = 1ul << (PAGE_SHIFT + 9 * (level - 1));

	for (i = 0; i < PT64_ENT_PER_PAGE; ++i, va += va_delta) {
		u64 ent = pt[i];

3430
		if (ent == shadow_trap_nonpresent_pte)
3431 3432 3433
			continue;

		va = canonicalize(va);
3434 3435 3436
		if (is_shadow_present_pte(ent) && !is_last_spte(ent, level))
			audit_mappings_page(vcpu, ent, va, level - 1);
		else {
3437
			gpa_t gpa = kvm_mmu_gva_to_gpa_read(vcpu, va, NULL);
J
Jan Kiszka 已提交
3438 3439 3440
			gfn_t gfn = gpa >> PAGE_SHIFT;
			pfn_t pfn = gfn_to_pfn(vcpu->kvm, gfn);
			hpa_t hpa = (hpa_t)pfn << PAGE_SHIFT;
3441

3442 3443 3444 3445 3446
			if (is_error_pfn(pfn)) {
				kvm_release_pfn_clean(pfn);
				continue;
			}

3447
			if (is_shadow_present_pte(ent)
3448
			    && (ent & PT64_BASE_ADDR_MASK) != hpa)
3449 3450
				printk(KERN_ERR "xx audit error: (%s) levels %d"
				       " gva %lx gpa %llx hpa %llx ent %llx %d\n",
3451
				       audit_msg, vcpu->arch.mmu.root_level,
M
Mike Day 已提交
3452 3453
				       va, gpa, hpa, ent,
				       is_shadow_present_pte(ent));
3454 3455 3456 3457
			else if (ent == shadow_notrap_nonpresent_pte
				 && !is_error_hpa(hpa))
				printk(KERN_ERR "audit: (%s) notrap shadow,"
				       " valid guest gva %lx\n", audit_msg, va);
3458
			kvm_release_pfn_clean(pfn);
3459

3460 3461 3462 3463 3464 3465
		}
	}
}

static void audit_mappings(struct kvm_vcpu *vcpu)
{
3466
	unsigned i;
3467

3468 3469
	if (vcpu->arch.mmu.root_level == 4)
		audit_mappings_page(vcpu, vcpu->arch.mmu.root_hpa, 0, 4);
3470 3471
	else
		for (i = 0; i < 4; ++i)
3472
			if (vcpu->arch.mmu.pae_root[i] & PT_PRESENT_MASK)
3473
				audit_mappings_page(vcpu,
3474
						    vcpu->arch.mmu.pae_root[i],
3475 3476 3477 3478 3479 3480
						    i << 30,
						    2);
}

static int count_rmaps(struct kvm_vcpu *vcpu)
{
3481 3482
	struct kvm *kvm = vcpu->kvm;
	struct kvm_memslots *slots;
3483
	int nmaps = 0;
3484
	int i, j, k, idx;
3485

3486
	idx = srcu_read_lock(&kvm->srcu);
3487
	slots = kvm_memslots(kvm);
3488
	for (i = 0; i < KVM_MEMORY_SLOTS; ++i) {
3489
		struct kvm_memory_slot *m = &slots->memslots[i];
3490 3491 3492
		struct kvm_rmap_desc *d;

		for (j = 0; j < m->npages; ++j) {
3493
			unsigned long *rmapp = &m->rmap[j];
3494

3495
			if (!*rmapp)
3496
				continue;
3497
			if (!(*rmapp & 1)) {
3498 3499 3500
				++nmaps;
				continue;
			}
3501
			d = (struct kvm_rmap_desc *)(*rmapp & ~1ul);
3502 3503
			while (d) {
				for (k = 0; k < RMAP_EXT; ++k)
A
Avi Kivity 已提交
3504
					if (d->sptes[k])
3505 3506 3507 3508 3509 3510 3511
						++nmaps;
					else
						break;
				d = d->more;
			}
		}
	}
3512
	srcu_read_unlock(&kvm->srcu, idx);
3513 3514 3515
	return nmaps;
}

3516
void inspect_spte_has_rmap(struct kvm *kvm, u64 *sptep)
3517 3518 3519 3520 3521
{
	unsigned long *rmapp;
	struct kvm_mmu_page *rev_sp;
	gfn_t gfn;

3522
	if (is_writable_pte(*sptep)) {
3523
		rev_sp = page_header(__pa(sptep));
3524
		gfn = kvm_mmu_page_get_gfn(rev_sp, sptep - rev_sp->spt);
3525 3526 3527 3528 3529 3530 3531

		if (!gfn_to_memslot(kvm, gfn)) {
			if (!printk_ratelimit())
				return;
			printk(KERN_ERR "%s: no memslot for gfn %ld\n",
					 audit_msg, gfn);
			printk(KERN_ERR "%s: index %ld of sp (gfn=%lx)\n",
3532
			       audit_msg, (long int)(sptep - rev_sp->spt),
3533 3534 3535 3536 3537
					rev_sp->gfn);
			dump_stack();
			return;
		}

3538
		rmapp = gfn_to_rmap(kvm, gfn, rev_sp->role.level);
3539 3540 3541 3542 3543 3544 3545 3546 3547 3548 3549 3550 3551 3552 3553 3554 3555
		if (!*rmapp) {
			if (!printk_ratelimit())
				return;
			printk(KERN_ERR "%s: no rmap for writable spte %llx\n",
					 audit_msg, *sptep);
			dump_stack();
		}
	}

}

void audit_writable_sptes_have_rmaps(struct kvm_vcpu *vcpu)
{
	mmu_spte_walk(vcpu, inspect_spte_has_rmap);
}

static void check_writable_mappings_rmap(struct kvm_vcpu *vcpu)
3556
{
3557
	struct kvm_mmu_page *sp;
3558 3559
	int i;

3560
	list_for_each_entry(sp, &vcpu->kvm->arch.active_mmu_pages, link) {
3561
		u64 *pt = sp->spt;
3562

3563
		if (sp->role.level != PT_PAGE_TABLE_LEVEL)
3564 3565 3566 3567 3568 3569 3570
			continue;

		for (i = 0; i < PT64_ENT_PER_PAGE; ++i) {
			u64 ent = pt[i];

			if (!(ent & PT_PRESENT_MASK))
				continue;
3571
			if (!is_writable_pte(ent))
3572
				continue;
3573
			inspect_spte_has_rmap(vcpu->kvm, &pt[i]);
3574 3575
		}
	}
3576
	return;
3577 3578 3579 3580
}

static void audit_rmap(struct kvm_vcpu *vcpu)
{
3581 3582
	check_writable_mappings_rmap(vcpu);
	count_rmaps(vcpu);
3583 3584 3585 3586
}

static void audit_write_protection(struct kvm_vcpu *vcpu)
{
3587
	struct kvm_mmu_page *sp;
3588 3589
	struct kvm_memory_slot *slot;
	unsigned long *rmapp;
3590
	u64 *spte;
3591
	gfn_t gfn;
3592

3593
	list_for_each_entry(sp, &vcpu->kvm->arch.active_mmu_pages, link) {
3594
		if (sp->role.direct)
3595
			continue;
3596 3597
		if (sp->unsync)
			continue;
3598

A
Avi Kivity 已提交
3599
		slot = gfn_to_memslot(vcpu->kvm, sp->gfn);
3600
		rmapp = &slot->rmap[gfn - slot->base_gfn];
3601 3602 3603

		spte = rmap_next(vcpu->kvm, rmapp, NULL);
		while (spte) {
3604
			if (is_writable_pte(*spte))
3605 3606
				printk(KERN_ERR "%s: (%s) shadow page has "
				"writable mappings: gfn %lx role %x\n",
3607
			       __func__, audit_msg, sp->gfn,
3608
			       sp->role.word);
3609 3610
			spte = rmap_next(vcpu->kvm, rmapp, spte);
		}
3611 3612 3613 3614 3615 3616 3617 3618 3619 3620 3621
	}
}

static void kvm_mmu_audit(struct kvm_vcpu *vcpu, const char *msg)
{
	int olddbg = dbg;

	dbg = 0;
	audit_msg = msg;
	audit_rmap(vcpu);
	audit_write_protection(vcpu);
3622 3623
	if (strcmp("pre pte write", audit_msg) != 0)
		audit_mappings(vcpu);
3624
	audit_writable_sptes_have_rmaps(vcpu);
3625 3626 3627 3628
	dbg = olddbg;
}

#endif