Linux Audio

Check our new training course

Loading...
v5.4
   1/*
   2 * mm/rmap.c - physical to virtual reverse mappings
   3 *
   4 * Copyright 2001, Rik van Riel <riel@conectiva.com.br>
   5 * Released under the General Public License (GPL).
   6 *
   7 * Simple, low overhead reverse mapping scheme.
   8 * Please try to keep this thing as modular as possible.
   9 *
  10 * Provides methods for unmapping each kind of mapped page:
  11 * the anon methods track anonymous pages, and
  12 * the file methods track pages belonging to an inode.
  13 *
  14 * Original design by Rik van Riel <riel@conectiva.com.br> 2001
  15 * File methods by Dave McCracken <dmccr@us.ibm.com> 2003, 2004
  16 * Anonymous methods by Andrea Arcangeli <andrea@suse.de> 2004
  17 * Contributions by Hugh Dickins 2003, 2004
  18 */
  19
  20/*
  21 * Lock ordering in mm:
  22 *
  23 * inode->i_mutex	(while writing or truncating, not reading or faulting)
  24 *   mm->mmap_sem
  25 *     page->flags PG_locked (lock_page)
  26 *       hugetlbfs_i_mmap_rwsem_key (in huge_pmd_share)
  27 *         mapping->i_mmap_rwsem
  28 *           anon_vma->rwsem
  29 *             mm->page_table_lock or pte_lock
  30 *               pgdat->lru_lock (in mark_page_accessed, isolate_lru_page)
  31 *               swap_lock (in swap_duplicate, swap_info_get)
  32 *                 mmlist_lock (in mmput, drain_mmlist and others)
  33 *                 mapping->private_lock (in __set_page_dirty_buffers)
  34 *                   mem_cgroup_{begin,end}_page_stat (memcg->move_lock)
  35 *                     i_pages lock (widely used)
  36 *                 inode->i_lock (in set_page_dirty's __mark_inode_dirty)
  37 *                 bdi.wb->list_lock (in set_page_dirty's __mark_inode_dirty)
  38 *                   sb_lock (within inode_lock in fs/fs-writeback.c)
  39 *                   i_pages lock (widely used, in set_page_dirty,
  40 *                             in arch-dependent flush_dcache_mmap_lock,
  41 *                             within bdi.wb->list_lock in __sync_single_inode)
 
  42 *
  43 * anon_vma->rwsem,mapping->i_mutex      (memory_failure, collect_procs_anon)
  44 *   ->tasklist_lock
  45 *     pte map lock
 
 
 
 
 
 
  46 */
  47
  48#include <linux/mm.h>
  49#include <linux/sched/mm.h>
  50#include <linux/sched/task.h>
  51#include <linux/pagemap.h>
  52#include <linux/swap.h>
  53#include <linux/swapops.h>
  54#include <linux/slab.h>
  55#include <linux/init.h>
  56#include <linux/ksm.h>
  57#include <linux/rmap.h>
  58#include <linux/rcupdate.h>
  59#include <linux/export.h>
  60#include <linux/memcontrol.h>
  61#include <linux/mmu_notifier.h>
  62#include <linux/migrate.h>
  63#include <linux/hugetlb.h>
  64#include <linux/huge_mm.h>
  65#include <linux/backing-dev.h>
  66#include <linux/page_idle.h>
  67#include <linux/memremap.h>
  68#include <linux/userfaultfd_k.h>
 
 
  69
  70#include <asm/tlbflush.h>
  71
 
  72#include <trace/events/tlb.h>
 
  73
  74#include "internal.h"
  75
  76static struct kmem_cache *anon_vma_cachep;
  77static struct kmem_cache *anon_vma_chain_cachep;
  78
  79static inline struct anon_vma *anon_vma_alloc(void)
  80{
  81	struct anon_vma *anon_vma;
  82
  83	anon_vma = kmem_cache_alloc(anon_vma_cachep, GFP_KERNEL);
  84	if (anon_vma) {
  85		atomic_set(&anon_vma->refcount, 1);
  86		anon_vma->degree = 1;	/* Reference for first vma */
 
  87		anon_vma->parent = anon_vma;
  88		/*
  89		 * Initialise the anon_vma root to point to itself. If called
  90		 * from fork, the root will be reset to the parents anon_vma.
  91		 */
  92		anon_vma->root = anon_vma;
  93	}
  94
  95	return anon_vma;
  96}
  97
  98static inline void anon_vma_free(struct anon_vma *anon_vma)
  99{
 100	VM_BUG_ON(atomic_read(&anon_vma->refcount));
 101
 102	/*
 103	 * Synchronize against page_lock_anon_vma_read() such that
 104	 * we can safely hold the lock without the anon_vma getting
 105	 * freed.
 106	 *
 107	 * Relies on the full mb implied by the atomic_dec_and_test() from
 108	 * put_anon_vma() against the acquire barrier implied by
 109	 * down_read_trylock() from page_lock_anon_vma_read(). This orders:
 110	 *
 111	 * page_lock_anon_vma_read()	VS	put_anon_vma()
 112	 *   down_read_trylock()		  atomic_dec_and_test()
 113	 *   LOCK				  MB
 114	 *   atomic_read()			  rwsem_is_locked()
 115	 *
 116	 * LOCK should suffice since the actual taking of the lock must
 117	 * happen _before_ what follows.
 118	 */
 119	might_sleep();
 120	if (rwsem_is_locked(&anon_vma->root->rwsem)) {
 121		anon_vma_lock_write(anon_vma);
 122		anon_vma_unlock_write(anon_vma);
 123	}
 124
 125	kmem_cache_free(anon_vma_cachep, anon_vma);
 126}
 127
 128static inline struct anon_vma_chain *anon_vma_chain_alloc(gfp_t gfp)
 129{
 130	return kmem_cache_alloc(anon_vma_chain_cachep, gfp);
 131}
 132
 133static void anon_vma_chain_free(struct anon_vma_chain *anon_vma_chain)
 134{
 135	kmem_cache_free(anon_vma_chain_cachep, anon_vma_chain);
 136}
 137
 138static void anon_vma_chain_link(struct vm_area_struct *vma,
 139				struct anon_vma_chain *avc,
 140				struct anon_vma *anon_vma)
 141{
 142	avc->vma = vma;
 143	avc->anon_vma = anon_vma;
 144	list_add(&avc->same_vma, &vma->anon_vma_chain);
 145	anon_vma_interval_tree_insert(avc, &anon_vma->rb_root);
 146}
 147
 148/**
 149 * __anon_vma_prepare - attach an anon_vma to a memory region
 150 * @vma: the memory region in question
 151 *
 152 * This makes sure the memory mapping described by 'vma' has
 153 * an 'anon_vma' attached to it, so that we can associate the
 154 * anonymous pages mapped into it with that anon_vma.
 155 *
 156 * The common case will be that we already have one, which
 157 * is handled inline by anon_vma_prepare(). But if
 158 * not we either need to find an adjacent mapping that we
 159 * can re-use the anon_vma from (very common when the only
 160 * reason for splitting a vma has been mprotect()), or we
 161 * allocate a new one.
 162 *
 163 * Anon-vma allocations are very subtle, because we may have
 164 * optimistically looked up an anon_vma in page_lock_anon_vma_read()
 165 * and that may actually touch the spinlock even in the newly
 166 * allocated vma (it depends on RCU to make sure that the
 167 * anon_vma isn't actually destroyed).
 168 *
 169 * As a result, we need to do proper anon_vma locking even
 170 * for the new allocation. At the same time, we do not want
 171 * to do any locking for the common case of already having
 172 * an anon_vma.
 173 *
 174 * This must be called with the mmap_sem held for reading.
 175 */
 176int __anon_vma_prepare(struct vm_area_struct *vma)
 177{
 178	struct mm_struct *mm = vma->vm_mm;
 179	struct anon_vma *anon_vma, *allocated;
 180	struct anon_vma_chain *avc;
 181
 
 182	might_sleep();
 183
 184	avc = anon_vma_chain_alloc(GFP_KERNEL);
 185	if (!avc)
 186		goto out_enomem;
 187
 188	anon_vma = find_mergeable_anon_vma(vma);
 189	allocated = NULL;
 190	if (!anon_vma) {
 191		anon_vma = anon_vma_alloc();
 192		if (unlikely(!anon_vma))
 193			goto out_enomem_free_avc;
 
 194		allocated = anon_vma;
 195	}
 196
 197	anon_vma_lock_write(anon_vma);
 198	/* page_table_lock to protect against threads */
 199	spin_lock(&mm->page_table_lock);
 200	if (likely(!vma->anon_vma)) {
 201		vma->anon_vma = anon_vma;
 202		anon_vma_chain_link(vma, avc, anon_vma);
 203		/* vma reference or self-parent link for new root */
 204		anon_vma->degree++;
 205		allocated = NULL;
 206		avc = NULL;
 207	}
 208	spin_unlock(&mm->page_table_lock);
 209	anon_vma_unlock_write(anon_vma);
 210
 211	if (unlikely(allocated))
 212		put_anon_vma(allocated);
 213	if (unlikely(avc))
 214		anon_vma_chain_free(avc);
 215
 216	return 0;
 217
 218 out_enomem_free_avc:
 219	anon_vma_chain_free(avc);
 220 out_enomem:
 221	return -ENOMEM;
 222}
 223
 224/*
 225 * This is a useful helper function for locking the anon_vma root as
 226 * we traverse the vma->anon_vma_chain, looping over anon_vma's that
 227 * have the same vma.
 228 *
 229 * Such anon_vma's should have the same root, so you'd expect to see
 230 * just a single mutex_lock for the whole traversal.
 231 */
 232static inline struct anon_vma *lock_anon_vma_root(struct anon_vma *root, struct anon_vma *anon_vma)
 233{
 234	struct anon_vma *new_root = anon_vma->root;
 235	if (new_root != root) {
 236		if (WARN_ON_ONCE(root))
 237			up_write(&root->rwsem);
 238		root = new_root;
 239		down_write(&root->rwsem);
 240	}
 241	return root;
 242}
 243
 244static inline void unlock_anon_vma_root(struct anon_vma *root)
 245{
 246	if (root)
 247		up_write(&root->rwsem);
 248}
 249
 250/*
 251 * Attach the anon_vmas from src to dst.
 252 * Returns 0 on success, -ENOMEM on failure.
 253 *
 254 * If dst->anon_vma is NULL this function tries to find and reuse existing
 255 * anon_vma which has no vmas and only one child anon_vma. This prevents
 256 * degradation of anon_vma hierarchy to endless linear chain in case of
 257 * constantly forking task. On the other hand, an anon_vma with more than one
 258 * child isn't reused even if there was no alive vma, thus rmap walker has a
 259 * good chance of avoiding scanning the whole hierarchy when it searches where
 260 * page is mapped.
 
 
 
 
 
 
 
 261 */
 262int anon_vma_clone(struct vm_area_struct *dst, struct vm_area_struct *src)
 263{
 264	struct anon_vma_chain *avc, *pavc;
 265	struct anon_vma *root = NULL;
 266
 267	list_for_each_entry_reverse(pavc, &src->anon_vma_chain, same_vma) {
 268		struct anon_vma *anon_vma;
 269
 270		avc = anon_vma_chain_alloc(GFP_NOWAIT | __GFP_NOWARN);
 271		if (unlikely(!avc)) {
 272			unlock_anon_vma_root(root);
 273			root = NULL;
 274			avc = anon_vma_chain_alloc(GFP_KERNEL);
 275			if (!avc)
 276				goto enomem_failure;
 277		}
 278		anon_vma = pavc->anon_vma;
 279		root = lock_anon_vma_root(root, anon_vma);
 280		anon_vma_chain_link(dst, avc, anon_vma);
 281
 282		/*
 283		 * Reuse existing anon_vma if its degree lower than two,
 284		 * that means it has no vma and only one anon_vma child.
 285		 *
 286		 * Do not chose parent anon_vma, otherwise first child
 287		 * will always reuse it. Root anon_vma is never reused:
 288		 * it has self-parent reference and at least one child.
 289		 */
 290		if (!dst->anon_vma && anon_vma != src->anon_vma &&
 291				anon_vma->degree < 2)
 
 292			dst->anon_vma = anon_vma;
 293	}
 294	if (dst->anon_vma)
 295		dst->anon_vma->degree++;
 296	unlock_anon_vma_root(root);
 297	return 0;
 298
 299 enomem_failure:
 300	/*
 301	 * dst->anon_vma is dropped here otherwise its degree can be incorrectly
 302	 * decremented in unlink_anon_vmas().
 303	 * We can safely do this because callers of anon_vma_clone() don't care
 304	 * about dst->anon_vma if anon_vma_clone() failed.
 305	 */
 306	dst->anon_vma = NULL;
 307	unlink_anon_vmas(dst);
 308	return -ENOMEM;
 309}
 310
 311/*
 312 * Attach vma to its own anon_vma, as well as to the anon_vmas that
 313 * the corresponding VMA in the parent process is attached to.
 314 * Returns 0 on success, non-zero on failure.
 315 */
 316int anon_vma_fork(struct vm_area_struct *vma, struct vm_area_struct *pvma)
 317{
 318	struct anon_vma_chain *avc;
 319	struct anon_vma *anon_vma;
 320	int error;
 321
 322	/* Don't bother if the parent process has no anon_vma here. */
 323	if (!pvma->anon_vma)
 324		return 0;
 325
 326	/* Drop inherited anon_vma, we'll reuse existing or allocate new. */
 327	vma->anon_vma = NULL;
 328
 329	/*
 330	 * First, attach the new VMA to the parent VMA's anon_vmas,
 331	 * so rmap can find non-COWed pages in child processes.
 332	 */
 333	error = anon_vma_clone(vma, pvma);
 334	if (error)
 335		return error;
 336
 337	/* An existing anon_vma has been reused, all done then. */
 338	if (vma->anon_vma)
 339		return 0;
 340
 341	/* Then add our own anon_vma. */
 342	anon_vma = anon_vma_alloc();
 343	if (!anon_vma)
 344		goto out_error;
 
 345	avc = anon_vma_chain_alloc(GFP_KERNEL);
 346	if (!avc)
 347		goto out_error_free_anon_vma;
 348
 349	/*
 350	 * The root anon_vma's spinlock is the lock actually used when we
 351	 * lock any of the anon_vmas in this anon_vma tree.
 352	 */
 353	anon_vma->root = pvma->anon_vma->root;
 354	anon_vma->parent = pvma->anon_vma;
 355	/*
 356	 * With refcounts, an anon_vma can stay around longer than the
 357	 * process it belongs to. The root anon_vma needs to be pinned until
 358	 * this anon_vma is freed, because the lock lives in the root.
 359	 */
 360	get_anon_vma(anon_vma->root);
 361	/* Mark this anon_vma as the one where our new (COWed) pages go. */
 362	vma->anon_vma = anon_vma;
 363	anon_vma_lock_write(anon_vma);
 364	anon_vma_chain_link(vma, avc, anon_vma);
 365	anon_vma->parent->degree++;
 366	anon_vma_unlock_write(anon_vma);
 367
 368	return 0;
 369
 370 out_error_free_anon_vma:
 371	put_anon_vma(anon_vma);
 372 out_error:
 373	unlink_anon_vmas(vma);
 374	return -ENOMEM;
 375}
 376
 377void unlink_anon_vmas(struct vm_area_struct *vma)
 378{
 379	struct anon_vma_chain *avc, *next;
 380	struct anon_vma *root = NULL;
 381
 382	/*
 383	 * Unlink each anon_vma chained to the VMA.  This list is ordered
 384	 * from newest to oldest, ensuring the root anon_vma gets freed last.
 385	 */
 386	list_for_each_entry_safe(avc, next, &vma->anon_vma_chain, same_vma) {
 387		struct anon_vma *anon_vma = avc->anon_vma;
 388
 389		root = lock_anon_vma_root(root, anon_vma);
 390		anon_vma_interval_tree_remove(avc, &anon_vma->rb_root);
 391
 392		/*
 393		 * Leave empty anon_vmas on the list - we'll need
 394		 * to free them outside the lock.
 395		 */
 396		if (RB_EMPTY_ROOT(&anon_vma->rb_root.rb_root)) {
 397			anon_vma->parent->degree--;
 398			continue;
 399		}
 400
 401		list_del(&avc->same_vma);
 402		anon_vma_chain_free(avc);
 403	}
 404	if (vma->anon_vma)
 405		vma->anon_vma->degree--;
 
 
 
 
 
 
 
 406	unlock_anon_vma_root(root);
 407
 408	/*
 409	 * Iterate the list once more, it now only contains empty and unlinked
 410	 * anon_vmas, destroy them. Could not do before due to __put_anon_vma()
 411	 * needing to write-acquire the anon_vma->root->rwsem.
 412	 */
 413	list_for_each_entry_safe(avc, next, &vma->anon_vma_chain, same_vma) {
 414		struct anon_vma *anon_vma = avc->anon_vma;
 415
 416		VM_WARN_ON(anon_vma->degree);
 
 417		put_anon_vma(anon_vma);
 418
 419		list_del(&avc->same_vma);
 420		anon_vma_chain_free(avc);
 421	}
 422}
 423
 424static void anon_vma_ctor(void *data)
 425{
 426	struct anon_vma *anon_vma = data;
 427
 428	init_rwsem(&anon_vma->rwsem);
 429	atomic_set(&anon_vma->refcount, 0);
 430	anon_vma->rb_root = RB_ROOT_CACHED;
 431}
 432
 433void __init anon_vma_init(void)
 434{
 435	anon_vma_cachep = kmem_cache_create("anon_vma", sizeof(struct anon_vma),
 436			0, SLAB_TYPESAFE_BY_RCU|SLAB_PANIC|SLAB_ACCOUNT,
 437			anon_vma_ctor);
 438	anon_vma_chain_cachep = KMEM_CACHE(anon_vma_chain,
 439			SLAB_PANIC|SLAB_ACCOUNT);
 440}
 441
 442/*
 443 * Getting a lock on a stable anon_vma from a page off the LRU is tricky!
 444 *
 445 * Since there is no serialization what so ever against page_remove_rmap()
 446 * the best this function can do is return a locked anon_vma that might
 447 * have been relevant to this page.
 448 *
 449 * The page might have been remapped to a different anon_vma or the anon_vma
 450 * returned may already be freed (and even reused).
 451 *
 452 * In case it was remapped to a different anon_vma, the new anon_vma will be a
 453 * child of the old anon_vma, and the anon_vma lifetime rules will therefore
 454 * ensure that any anon_vma obtained from the page will still be valid for as
 455 * long as we observe page_mapped() [ hence all those page_mapped() tests ].
 456 *
 457 * All users of this function must be very careful when walking the anon_vma
 458 * chain and verify that the page in question is indeed mapped in it
 459 * [ something equivalent to page_mapped_in_vma() ].
 460 *
 461 * Since anon_vma's slab is DESTROY_BY_RCU and we know from page_remove_rmap()
 462 * that the anon_vma pointer from page->mapping is valid if there is a
 463 * mapcount, we can dereference the anon_vma after observing those.
 
 
 
 
 
 
 
 464 */
 465struct anon_vma *page_get_anon_vma(struct page *page)
 466{
 467	struct anon_vma *anon_vma = NULL;
 468	unsigned long anon_mapping;
 469
 470	rcu_read_lock();
 471	anon_mapping = (unsigned long)READ_ONCE(page->mapping);
 472	if ((anon_mapping & PAGE_MAPPING_FLAGS) != PAGE_MAPPING_ANON)
 473		goto out;
 474	if (!page_mapped(page))
 475		goto out;
 476
 477	anon_vma = (struct anon_vma *) (anon_mapping - PAGE_MAPPING_ANON);
 478	if (!atomic_inc_not_zero(&anon_vma->refcount)) {
 479		anon_vma = NULL;
 480		goto out;
 481	}
 482
 483	/*
 484	 * If this page is still mapped, then its anon_vma cannot have been
 485	 * freed.  But if it has been unmapped, we have no security against the
 486	 * anon_vma structure being freed and reused (for another anon_vma:
 487	 * SLAB_TYPESAFE_BY_RCU guarantees that - so the atomic_inc_not_zero()
 488	 * above cannot corrupt).
 489	 */
 490	if (!page_mapped(page)) {
 491		rcu_read_unlock();
 492		put_anon_vma(anon_vma);
 493		return NULL;
 494	}
 495out:
 496	rcu_read_unlock();
 497
 498	return anon_vma;
 499}
 500
 501/*
 502 * Similar to page_get_anon_vma() except it locks the anon_vma.
 503 *
 504 * Its a little more complex as it tries to keep the fast path to a single
 505 * atomic op -- the trylock. If we fail the trylock, we fall back to getting a
 506 * reference like with page_get_anon_vma() and then block on the mutex.
 
 507 */
 508struct anon_vma *page_lock_anon_vma_read(struct page *page)
 
 509{
 510	struct anon_vma *anon_vma = NULL;
 511	struct anon_vma *root_anon_vma;
 512	unsigned long anon_mapping;
 513
 
 514	rcu_read_lock();
 515	anon_mapping = (unsigned long)READ_ONCE(page->mapping);
 516	if ((anon_mapping & PAGE_MAPPING_FLAGS) != PAGE_MAPPING_ANON)
 517		goto out;
 518	if (!page_mapped(page))
 519		goto out;
 520
 521	anon_vma = (struct anon_vma *) (anon_mapping - PAGE_MAPPING_ANON);
 522	root_anon_vma = READ_ONCE(anon_vma->root);
 523	if (down_read_trylock(&root_anon_vma->rwsem)) {
 524		/*
 525		 * If the page is still mapped, then this anon_vma is still
 
 
 
 
 
 
 
 
 
 
 
 526		 * its anon_vma, and holding the mutex ensures that it will
 527		 * not go away, see anon_vma_free().
 528		 */
 529		if (!page_mapped(page)) {
 530			up_read(&root_anon_vma->rwsem);
 531			anon_vma = NULL;
 532		}
 533		goto out;
 534	}
 535
 
 
 
 
 
 
 536	/* trylock failed, we got to sleep */
 537	if (!atomic_inc_not_zero(&anon_vma->refcount)) {
 538		anon_vma = NULL;
 539		goto out;
 540	}
 541
 542	if (!page_mapped(page)) {
 543		rcu_read_unlock();
 544		put_anon_vma(anon_vma);
 545		return NULL;
 546	}
 547
 548	/* we pinned the anon_vma, its safe to sleep */
 549	rcu_read_unlock();
 550	anon_vma_lock_read(anon_vma);
 551
 
 
 
 
 
 
 
 
 
 
 
 
 552	if (atomic_dec_and_test(&anon_vma->refcount)) {
 553		/*
 554		 * Oops, we held the last refcount, release the lock
 555		 * and bail -- can't simply use put_anon_vma() because
 556		 * we'll deadlock on the anon_vma_lock_write() recursion.
 557		 */
 558		anon_vma_unlock_read(anon_vma);
 559		__put_anon_vma(anon_vma);
 560		anon_vma = NULL;
 561	}
 562
 563	return anon_vma;
 564
 565out:
 566	rcu_read_unlock();
 567	return anon_vma;
 568}
 569
 570void page_unlock_anon_vma_read(struct anon_vma *anon_vma)
 571{
 572	anon_vma_unlock_read(anon_vma);
 573}
 574
 575#ifdef CONFIG_ARCH_WANT_BATCHED_UNMAP_TLB_FLUSH
 576/*
 577 * Flush TLB entries for recently unmapped pages from remote CPUs. It is
 578 * important if a PTE was dirty when it was unmapped that it's flushed
 579 * before any IO is initiated on the page to prevent lost writes. Similarly,
 580 * it must be flushed before freeing to prevent data leakage.
 581 */
 582void try_to_unmap_flush(void)
 583{
 584	struct tlbflush_unmap_batch *tlb_ubc = &current->tlb_ubc;
 585
 586	if (!tlb_ubc->flush_required)
 587		return;
 588
 589	arch_tlbbatch_flush(&tlb_ubc->arch);
 590	tlb_ubc->flush_required = false;
 591	tlb_ubc->writable = false;
 592}
 593
 594/* Flush iff there are potentially writable TLB entries that can race with IO */
 595void try_to_unmap_flush_dirty(void)
 596{
 597	struct tlbflush_unmap_batch *tlb_ubc = &current->tlb_ubc;
 598
 599	if (tlb_ubc->writable)
 600		try_to_unmap_flush();
 601}
 602
 603static void set_tlb_ubc_flush_pending(struct mm_struct *mm, bool writable)
 
 
 
 
 
 
 
 
 
 
 
 604{
 605	struct tlbflush_unmap_batch *tlb_ubc = &current->tlb_ubc;
 
 
 
 
 
 606
 607	arch_tlbbatch_add_mm(&tlb_ubc->arch, mm);
 608	tlb_ubc->flush_required = true;
 609
 610	/*
 611	 * Ensure compiler does not re-order the setting of tlb_flush_batched
 612	 * before the PTE is cleared.
 613	 */
 614	barrier();
 615	mm->tlb_flush_batched = true;
 
 
 
 
 
 
 
 
 
 
 
 
 616
 617	/*
 618	 * If the PTE was dirty then it's best to assume it's writable. The
 619	 * caller must use try_to_unmap_flush_dirty() or try_to_unmap_flush()
 620	 * before the page is queued for IO.
 621	 */
 622	if (writable)
 623		tlb_ubc->writable = true;
 624}
 625
 626/*
 627 * Returns true if the TLB flush should be deferred to the end of a batch of
 628 * unmap operations to reduce IPIs.
 629 */
 630static bool should_defer_flush(struct mm_struct *mm, enum ttu_flags flags)
 631{
 632	bool should_defer = false;
 633
 634	if (!(flags & TTU_BATCH_FLUSH))
 635		return false;
 636
 637	/* If remote CPUs need to be flushed then defer batch the flush */
 638	if (cpumask_any_but(mm_cpumask(mm), get_cpu()) < nr_cpu_ids)
 639		should_defer = true;
 640	put_cpu();
 641
 642	return should_defer;
 643}
 644
 645/*
 646 * Reclaim unmaps pages under the PTL but do not flush the TLB prior to
 647 * releasing the PTL if TLB flushes are batched. It's possible for a parallel
 648 * operation such as mprotect or munmap to race between reclaim unmapping
 649 * the page and flushing the page. If this race occurs, it potentially allows
 650 * access to data via a stale TLB entry. Tracking all mm's that have TLB
 651 * batching in flight would be expensive during reclaim so instead track
 652 * whether TLB batching occurred in the past and if so then do a flush here
 653 * if required. This will cost one additional flush per reclaim cycle paid
 654 * by the first operation at risk such as mprotect and mumap.
 655 *
 656 * This must be called under the PTL so that an access to tlb_flush_batched
 657 * that is potentially a "reclaim vs mprotect/munmap/etc" race will synchronise
 658 * via the PTL.
 659 */
 660void flush_tlb_batched_pending(struct mm_struct *mm)
 661{
 662	if (mm->tlb_flush_batched) {
 663		flush_tlb_mm(mm);
 
 664
 
 
 665		/*
 666		 * Do not allow the compiler to re-order the clearing of
 667		 * tlb_flush_batched before the tlb is flushed.
 668		 */
 669		barrier();
 670		mm->tlb_flush_batched = false;
 671	}
 672}
 673#else
 674static void set_tlb_ubc_flush_pending(struct mm_struct *mm, bool writable)
 
 675{
 676}
 677
 678static bool should_defer_flush(struct mm_struct *mm, enum ttu_flags flags)
 679{
 680	return false;
 681}
 682#endif /* CONFIG_ARCH_WANT_BATCHED_UNMAP_TLB_FLUSH */
 683
 684/*
 685 * At what user virtual address is page expected in vma?
 686 * Caller should check the page is actually part of the vma.
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 687 */
 688unsigned long page_address_in_vma(struct page *page, struct vm_area_struct *vma)
 
 689{
 690	unsigned long address;
 691	if (PageAnon(page)) {
 692		struct anon_vma *page__anon_vma = page_anon_vma(page);
 693		/*
 694		 * Note: swapoff's unuse_vma() is more efficient with this
 695		 * check, and needs it to match anon_vma when KSM is active.
 696		 */
 697		if (!vma->anon_vma || !page__anon_vma ||
 698		    vma->anon_vma->root != page__anon_vma->root)
 699			return -EFAULT;
 700	} else if (page->mapping) {
 701		if (!vma->vm_file || vma->vm_file->f_mapping != page->mapping)
 702			return -EFAULT;
 703	} else
 704		return -EFAULT;
 705	address = __vma_address(page, vma);
 706	if (unlikely(address < vma->vm_start || address >= vma->vm_end))
 707		return -EFAULT;
 708	return address;
 
 
 
 709}
 710
 
 
 
 
 
 711pmd_t *mm_find_pmd(struct mm_struct *mm, unsigned long address)
 712{
 713	pgd_t *pgd;
 714	p4d_t *p4d;
 715	pud_t *pud;
 716	pmd_t *pmd = NULL;
 717	pmd_t pmde;
 718
 719	pgd = pgd_offset(mm, address);
 720	if (!pgd_present(*pgd))
 721		goto out;
 722
 723	p4d = p4d_offset(pgd, address);
 724	if (!p4d_present(*p4d))
 725		goto out;
 726
 727	pud = pud_offset(p4d, address);
 728	if (!pud_present(*pud))
 729		goto out;
 730
 731	pmd = pmd_offset(pud, address);
 732	/*
 733	 * Some THP functions use the sequence pmdp_huge_clear_flush(), set_pmd_at()
 734	 * without holding anon_vma lock for write.  So when looking for a
 735	 * genuine pmde (in which to find pte), test present and !THP together.
 736	 */
 737	pmde = *pmd;
 738	barrier();
 739	if (!pmd_present(pmde) || pmd_trans_huge(pmde))
 740		pmd = NULL;
 741out:
 742	return pmd;
 743}
 744
 745struct page_referenced_arg {
 746	int mapcount;
 747	int referenced;
 748	unsigned long vm_flags;
 749	struct mem_cgroup *memcg;
 750};
 
 751/*
 752 * arg: page_referenced_arg will be passed
 753 */
 754static bool page_referenced_one(struct page *page, struct vm_area_struct *vma,
 755			unsigned long address, void *arg)
 756{
 757	struct page_referenced_arg *pra = arg;
 758	struct page_vma_mapped_walk pvmw = {
 759		.page = page,
 760		.vma = vma,
 761		.address = address,
 762	};
 763	int referenced = 0;
 
 764
 765	while (page_vma_mapped_walk(&pvmw)) {
 766		address = pvmw.address;
 767
 768		if (vma->vm_flags & VM_LOCKED) {
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 769			page_vma_mapped_walk_done(&pvmw);
 770			pra->vm_flags |= VM_LOCKED;
 771			return false; /* To break the loop */
 772		}
 773
 774		if (pvmw.pte) {
 
 
 
 775			if (ptep_clear_flush_young_notify(vma, address,
 776						pvmw.pte)) {
 777				/*
 778				 * Don't treat a reference through
 779				 * a sequentially read mapping as such.
 780				 * If the page has been used in another mapping,
 781				 * we will catch it; if this other mapping is
 782				 * already gone, the unmap path will have set
 783				 * PG_referenced or activated the page.
 784				 */
 785				if (likely(!(vma->vm_flags & VM_SEQ_READ)))
 786					referenced++;
 787			}
 788		} else if (IS_ENABLED(CONFIG_TRANSPARENT_HUGEPAGE)) {
 789			if (pmdp_clear_flush_young_notify(vma, address,
 790						pvmw.pmd))
 791				referenced++;
 792		} else {
 793			/* unexpected pmd-mapped page? */
 794			WARN_ON_ONCE(1);
 795		}
 796
 797		pra->mapcount--;
 798	}
 799
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 800	if (referenced)
 801		clear_page_idle(page);
 802	if (test_and_clear_page_young(page))
 803		referenced++;
 804
 805	if (referenced) {
 806		pra->referenced++;
 807		pra->vm_flags |= vma->vm_flags;
 808	}
 809
 810	if (!pra->mapcount)
 811		return false; /* To break the loop */
 812
 813	return true;
 814}
 815
 816static bool invalid_page_referenced_vma(struct vm_area_struct *vma, void *arg)
 817{
 818	struct page_referenced_arg *pra = arg;
 819	struct mem_cgroup *memcg = pra->memcg;
 820
 821	if (!mm_match_cgroup(vma->vm_mm, memcg))
 
 
 
 
 
 
 
 
 
 
 
 
 
 822		return true;
 823
 824	return false;
 825}
 826
 827/**
 828 * page_referenced - test if the page was referenced
 829 * @page: the page to test
 830 * @is_locked: caller holds lock on the page
 831 * @memcg: target memory cgroup
 832 * @vm_flags: collect encountered vma->vm_flags who actually referenced the page
 
 
 833 *
 834 * Quick test_and_clear_referenced for all mappings to a page,
 835 * returns the number of ptes which referenced the page.
 836 */
 837int page_referenced(struct page *page,
 838		    int is_locked,
 839		    struct mem_cgroup *memcg,
 840		    unsigned long *vm_flags)
 841{
 842	int we_locked = 0;
 843	struct page_referenced_arg pra = {
 844		.mapcount = total_mapcount(page),
 845		.memcg = memcg,
 846	};
 847	struct rmap_walk_control rwc = {
 848		.rmap_one = page_referenced_one,
 849		.arg = (void *)&pra,
 850		.anon_lock = page_lock_anon_vma_read,
 
 
 851	};
 852
 853	*vm_flags = 0;
 854	if (!pra.mapcount)
 855		return 0;
 856
 857	if (!page_rmapping(page))
 858		return 0;
 859
 860	if (!is_locked && (!PageAnon(page) || PageKsm(page))) {
 861		we_locked = trylock_page(page);
 862		if (!we_locked)
 863			return 1;
 864	}
 865
 866	/*
 867	 * If we are reclaiming on behalf of a cgroup, skip
 868	 * counting on behalf of references from different
 869	 * cgroups
 870	 */
 871	if (memcg) {
 872		rwc.invalid_vma = invalid_page_referenced_vma;
 873	}
 874
 875	rmap_walk(page, &rwc);
 876	*vm_flags = pra.vm_flags;
 877
 878	if (we_locked)
 879		unlock_page(page);
 880
 881	return pra.referenced;
 882}
 883
 884static bool page_mkclean_one(struct page *page, struct vm_area_struct *vma,
 885			    unsigned long address, void *arg)
 886{
 887	struct page_vma_mapped_walk pvmw = {
 888		.page = page,
 889		.vma = vma,
 890		.address = address,
 891		.flags = PVMW_SYNC,
 892	};
 893	struct mmu_notifier_range range;
 894	int *cleaned = arg;
 895
 896	/*
 897	 * We have to assume the worse case ie pmd for invalidation. Note that
 898	 * the page can not be free from this function.
 899	 */
 900	mmu_notifier_range_init(&range, MMU_NOTIFY_PROTECTION_PAGE,
 901				0, vma, vma->vm_mm, address,
 902				min(vma->vm_end, address + page_size(page)));
 903	mmu_notifier_invalidate_range_start(&range);
 904
 905	while (page_vma_mapped_walk(&pvmw)) {
 906		int ret = 0;
 907
 908		address = pvmw.address;
 909		if (pvmw.pte) {
 910			pte_t entry;
 911			pte_t *pte = pvmw.pte;
 912
 913			if (!pte_dirty(*pte) && !pte_write(*pte))
 914				continue;
 915
 916			flush_cache_page(vma, address, pte_pfn(*pte));
 917			entry = ptep_clear_flush(vma, address, pte);
 918			entry = pte_wrprotect(entry);
 919			entry = pte_mkclean(entry);
 920			set_pte_at(vma->vm_mm, address, pte, entry);
 921			ret = 1;
 922		} else {
 923#ifdef CONFIG_TRANSPARENT_HUGE_PAGECACHE
 924			pmd_t *pmd = pvmw.pmd;
 925			pmd_t entry;
 926
 927			if (!pmd_dirty(*pmd) && !pmd_write(*pmd))
 928				continue;
 929
 930			flush_cache_page(vma, address, page_to_pfn(page));
 
 931			entry = pmdp_invalidate(vma, address, pmd);
 932			entry = pmd_wrprotect(entry);
 933			entry = pmd_mkclean(entry);
 934			set_pmd_at(vma->vm_mm, address, pmd, entry);
 935			ret = 1;
 936#else
 937			/* unexpected pmd-mapped page? */
 938			WARN_ON_ONCE(1);
 939#endif
 940		}
 941
 942		/*
 943		 * No need to call mmu_notifier_invalidate_range() as we are
 944		 * downgrading page table protection not changing it to point
 945		 * to a new page.
 946		 *
 947		 * See Documentation/vm/mmu_notifier.rst
 948		 */
 949		if (ret)
 950			(*cleaned)++;
 951	}
 952
 953	mmu_notifier_invalidate_range_end(&range);
 954
 
 
 
 
 
 
 
 
 
 
 
 955	return true;
 956}
 957
 958static bool invalid_mkclean_vma(struct vm_area_struct *vma, void *arg)
 959{
 960	if (vma->vm_flags & VM_SHARED)
 961		return false;
 962
 963	return true;
 964}
 965
 966int page_mkclean(struct page *page)
 967{
 968	int cleaned = 0;
 969	struct address_space *mapping;
 970	struct rmap_walk_control rwc = {
 971		.arg = (void *)&cleaned,
 972		.rmap_one = page_mkclean_one,
 973		.invalid_vma = invalid_mkclean_vma,
 974	};
 975
 976	BUG_ON(!PageLocked(page));
 977
 978	if (!page_mapped(page))
 979		return 0;
 980
 981	mapping = page_mapping(page);
 982	if (!mapping)
 983		return 0;
 984
 985	rmap_walk(page, &rwc);
 986
 987	return cleaned;
 988}
 989EXPORT_SYMBOL_GPL(page_mkclean);
 990
 991/**
 992 * page_move_anon_rmap - move a page to our anon_vma
 993 * @page:	the page to move to our anon_vma
 994 * @vma:	the vma the page belongs to
 995 *
 996 * When a page belongs exclusively to one process after a COW event,
 997 * that page can be moved into the anon_vma that belongs to just that
 998 * process, so the rmap code will not search the parent or sibling
 999 * processes.
 
 
1000 */
1001void page_move_anon_rmap(struct page *page, struct vm_area_struct *vma)
 
1002{
1003	struct anon_vma *anon_vma = vma->anon_vma;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1004
1005	page = compound_head(page);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1006
1007	VM_BUG_ON_PAGE(!PageLocked(page), page);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1008	VM_BUG_ON_VMA(!anon_vma, vma);
1009
1010	anon_vma = (void *) anon_vma + PAGE_MAPPING_ANON;
1011	/*
1012	 * Ensure that anon_vma and the PAGE_MAPPING_ANON bit are written
1013	 * simultaneously, so a concurrent reader (eg page_referenced()'s
1014	 * PageAnon()) will not see one without the other.
1015	 */
1016	WRITE_ONCE(page->mapping, (struct address_space *) anon_vma);
1017}
1018
1019/**
1020 * __page_set_anon_rmap - set up new anonymous rmap
1021 * @page:	Page or Hugepage to add to rmap
1022 * @vma:	VM area to add page to.
1023 * @address:	User virtual address of the mapping	
1024 * @exclusive:	the page is exclusively owned by the current process
1025 */
1026static void __page_set_anon_rmap(struct page *page,
1027	struct vm_area_struct *vma, unsigned long address, int exclusive)
1028{
1029	struct anon_vma *anon_vma = vma->anon_vma;
1030
1031	BUG_ON(!anon_vma);
1032
1033	if (PageAnon(page))
1034		return;
1035
1036	/*
1037	 * If the page isn't exclusively mapped into this vma,
1038	 * we must use the _oldest_ possible anon_vma for the
1039	 * page mapping!
1040	 */
1041	if (!exclusive)
1042		anon_vma = anon_vma->root;
1043
 
 
 
 
 
 
1044	anon_vma = (void *) anon_vma + PAGE_MAPPING_ANON;
1045	page->mapping = (struct address_space *) anon_vma;
1046	page->index = linear_page_index(vma, address);
1047}
1048
1049/**
1050 * __page_check_anon_rmap - sanity check anonymous rmap addition
1051 * @page:	the page to add the mapping to
 
1052 * @vma:	the vm area in which the mapping is added
1053 * @address:	the user virtual address mapped
1054 */
1055static void __page_check_anon_rmap(struct page *page,
1056	struct vm_area_struct *vma, unsigned long address)
 
1057{
1058#ifdef CONFIG_DEBUG_VM
1059	/*
1060	 * The page's anon-rmap details (mapping and index) are guaranteed to
1061	 * be set up correctly at this point.
1062	 *
1063	 * We have exclusion against page_add_anon_rmap because the caller
1064	 * always holds the page locked, except if called from page_dup_rmap,
1065	 * in which case the page is already known to be setup.
1066	 *
1067	 * We have exclusion against page_add_new_anon_rmap because those pages
1068	 * are initially only visible via the pagetables, and the pte is locked
1069	 * over the call to page_add_new_anon_rmap.
1070	 */
1071	BUG_ON(page_anon_vma(page)->root != vma->anon_vma->root);
1072	BUG_ON(page_to_pgoff(page) != linear_page_index(vma, address));
1073#endif
 
1074}
1075
1076/**
1077 * page_add_anon_rmap - add pte mapping to an anonymous page
1078 * @page:	the page to add the mapping to
1079 * @vma:	the vm area in which the mapping is added
1080 * @address:	the user virtual address mapped
1081 * @compound:	charge the page as compound or small page
1082 *
1083 * The caller needs to hold the pte lock, and the page must be locked in
1084 * the anon_vma case: to serialize mapping,index checking after setting,
1085 * and to ensure that PageAnon is not being upgraded racily to PageKsm
1086 * (but PageKsm is never downgraded to PageAnon).
1087 */
1088void page_add_anon_rmap(struct page *page,
1089	struct vm_area_struct *vma, unsigned long address, bool compound)
1090{
1091	do_page_add_anon_rmap(page, vma, address, compound ? RMAP_COMPOUND : 0);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1092}
1093
1094/*
1095 * Special version of the above for do_swap_page, which often runs
1096 * into pages that are exclusively owned by the current process.
1097 * Everybody else should continue to use page_add_anon_rmap above.
1098 */
1099void do_page_add_anon_rmap(struct page *page,
1100	struct vm_area_struct *vma, unsigned long address, int flags)
1101{
1102	bool compound = flags & RMAP_COMPOUND;
1103	bool first;
1104
1105	if (compound) {
1106		atomic_t *mapcount;
1107		VM_BUG_ON_PAGE(!PageLocked(page), page);
1108		VM_BUG_ON_PAGE(!PageTransHuge(page), page);
1109		mapcount = compound_mapcount_ptr(page);
1110		first = atomic_inc_and_test(mapcount);
1111	} else {
1112		first = atomic_inc_and_test(&page->_mapcount);
 
 
 
 
 
 
1113	}
 
 
1114
1115	if (first) {
1116		int nr = compound ? hpage_nr_pages(page) : 1;
1117		/*
1118		 * We use the irq-unsafe __{inc|mod}_zone_page_stat because
1119		 * these counters are not modified in interrupt context, and
1120		 * pte lock(a spinlock) is held, which implies preemption
1121		 * disabled.
1122		 */
1123		if (compound)
1124			__inc_node_page_state(page, NR_ANON_THPS);
1125		__mod_node_page_state(page_pgdat(page), NR_ANON_MAPPED, nr);
1126	}
1127	if (unlikely(PageKsm(page)))
1128		return;
1129
1130	VM_BUG_ON_PAGE(!PageLocked(page), page);
 
 
 
 
 
 
 
 
1131
1132	/* address might be in next vma when migration races vma_adjust */
1133	if (first)
1134		__page_set_anon_rmap(page, vma, address,
1135				flags & RMAP_EXCLUSIVE);
1136	else
1137		__page_check_anon_rmap(page, vma, address);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1138}
1139
1140/**
1141 * page_add_new_anon_rmap - add pte mapping to a new anonymous page
1142 * @page:	the page to add the mapping to
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1143 * @vma:	the vm area in which the mapping is added
1144 * @address:	the user virtual address mapped
1145 * @compound:	charge the page as compound or small page
1146 *
1147 * Same as page_add_anon_rmap but must only be called on *new* pages.
1148 * This means the inc-and-test can be bypassed.
1149 * Page does not have to be locked.
 
 
 
 
1150 */
1151void page_add_new_anon_rmap(struct page *page,
1152	struct vm_area_struct *vma, unsigned long address, bool compound)
1153{
1154	int nr = compound ? hpage_nr_pages(page) : 1;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1155
1156	VM_BUG_ON_VMA(address < vma->vm_start || address >= vma->vm_end, vma);
1157	__SetPageSwapBacked(page);
1158	if (compound) {
1159		VM_BUG_ON_PAGE(!PageTransHuge(page), page);
1160		/* increment count (starts at -1) */
1161		atomic_set(compound_mapcount_ptr(page), 0);
1162		__inc_node_page_state(page, NR_ANON_THPS);
1163	} else {
1164		/* Anon THP always mapped first with PMD */
1165		VM_BUG_ON_PAGE(PageTransCompound(page), page);
1166		/* increment count (starts at -1) */
1167		atomic_set(&page->_mapcount, 0);
 
 
 
 
 
 
1168	}
1169	__mod_node_page_state(page_pgdat(page), NR_ANON_MAPPED, nr);
1170	__page_set_anon_rmap(page, vma, address, 1);
1171}
1172
1173/**
1174 * page_add_file_rmap - add pte mapping to a file page
1175 * @page: the page to add the mapping to
1176 * @compound: charge the page as compound or small page
1177 *
1178 * The caller needs to hold the pte lock.
1179 */
1180void page_add_file_rmap(struct page *page, bool compound)
1181{
1182	int i, nr = 1;
1183
1184	VM_BUG_ON_PAGE(compound && !PageTransHuge(page), page);
1185	lock_page_memcg(page);
1186	if (compound && PageTransHuge(page)) {
1187		for (i = 0, nr = 0; i < HPAGE_PMD_NR; i++) {
1188			if (atomic_inc_and_test(&page[i]._mapcount))
1189				nr++;
1190		}
1191		if (!atomic_inc_and_test(compound_mapcount_ptr(page)))
1192			goto out;
1193		if (PageSwapBacked(page))
1194			__inc_node_page_state(page, NR_SHMEM_PMDMAPPED);
1195		else
1196			__inc_node_page_state(page, NR_FILE_PMDMAPPED);
1197	} else {
1198		if (PageTransCompound(page) && page_mapping(page)) {
1199			VM_WARN_ON_ONCE(!PageLocked(page));
1200
1201			SetPageDoubleMap(compound_head(page));
1202			if (PageMlocked(page))
1203				clear_page_mlock(compound_head(page));
1204		}
1205		if (!atomic_inc_and_test(&page->_mapcount))
1206			goto out;
1207	}
1208	__mod_lruvec_page_state(page, NR_FILE_MAPPED, nr);
1209out:
1210	unlock_page_memcg(page);
1211}
1212
1213static void page_remove_file_rmap(struct page *page, bool compound)
 
 
1214{
1215	int i, nr = 1;
1216
1217	VM_BUG_ON_PAGE(compound && !PageHead(page), page);
1218	lock_page_memcg(page);
1219
1220	/* Hugepages are not counted in NR_FILE_MAPPED for now. */
1221	if (unlikely(PageHuge(page))) {
1222		/* hugetlb pages are always mapped with pmds */
1223		atomic_dec(compound_mapcount_ptr(page));
1224		goto out;
1225	}
1226
1227	/* page still mapped by someone else? */
1228	if (compound && PageTransHuge(page)) {
1229		for (i = 0, nr = 0; i < HPAGE_PMD_NR; i++) {
1230			if (atomic_add_negative(-1, &page[i]._mapcount))
1231				nr++;
1232		}
1233		if (!atomic_add_negative(-1, compound_mapcount_ptr(page)))
1234			goto out;
1235		if (PageSwapBacked(page))
1236			__dec_node_page_state(page, NR_SHMEM_PMDMAPPED);
1237		else
1238			__dec_node_page_state(page, NR_FILE_PMDMAPPED);
1239	} else {
1240		if (!atomic_add_negative(-1, &page->_mapcount))
1241			goto out;
1242	}
1243
1244	/*
1245	 * We use the irq-unsafe __{inc|mod}_lruvec_page_state because
1246	 * these counters are not modified in interrupt context, and
1247	 * pte lock(a spinlock) is held, which implies preemption disabled.
1248	 */
1249	__mod_lruvec_page_state(page, NR_FILE_MAPPED, -nr);
1250
1251	if (unlikely(PageMlocked(page)))
1252		clear_page_mlock(page);
1253out:
1254	unlock_page_memcg(page);
 
 
 
 
 
 
 
 
 
 
 
1255}
1256
1257static void page_remove_anon_compound_rmap(struct page *page)
 
 
 
 
 
 
 
 
 
 
 
1258{
1259	int i, nr;
 
 
 
 
 
1260
1261	if (!atomic_add_negative(-1, compound_mapcount_ptr(page)))
1262		return;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1263
1264	/* Hugepages are not counted in NR_ANON_PAGES for now. */
1265	if (unlikely(PageHuge(page)))
1266		return;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1267
1268	if (!IS_ENABLED(CONFIG_TRANSPARENT_HUGEPAGE))
1269		return;
 
1270
1271	__dec_node_page_state(page, NR_ANON_THPS);
 
 
 
 
 
 
 
 
1272
1273	if (TestClearPageDoubleMap(page)) {
1274		/*
1275		 * Subpages can be mapped with PTEs too. Check how many of
1276		 * themi are still mapped.
1277		 */
1278		for (i = 0, nr = 0; i < HPAGE_PMD_NR; i++) {
1279			if (atomic_add_negative(-1, &page[i]._mapcount))
1280				nr++;
1281		}
1282	} else {
1283		nr = HPAGE_PMD_NR;
1284	}
1285
1286	if (unlikely(PageMlocked(page)))
1287		clear_page_mlock(page);
 
 
 
 
 
1288
1289	if (nr) {
1290		__mod_node_page_state(page_pgdat(page), NR_ANON_MAPPED, -nr);
1291		deferred_split_huge_page(page);
1292	}
1293}
1294
1295/**
1296 * page_remove_rmap - take down pte mapping from a page
1297 * @page:	page to remove mapping from
1298 * @compound:	uncharge the page as compound or small page
 
 
 
 
1299 *
1300 * The caller needs to hold the pte lock.
1301 */
1302void page_remove_rmap(struct page *page, bool compound)
 
1303{
1304	if (!PageAnon(page))
1305		return page_remove_file_rmap(page, compound);
1306
1307	if (compound)
1308		return page_remove_anon_compound_rmap(page);
1309
1310	/* page still mapped by someone else? */
1311	if (!atomic_add_negative(-1, &page->_mapcount))
1312		return;
1313
1314	/*
1315	 * We use the irq-unsafe __{inc|mod}_zone_page_stat because
1316	 * these counters are not modified in interrupt context, and
1317	 * pte lock(a spinlock) is held, which implies preemption disabled.
1318	 */
1319	__dec_node_page_state(page, NR_ANON_MAPPED);
1320
1321	if (unlikely(PageMlocked(page)))
1322		clear_page_mlock(page);
1323
1324	if (PageTransCompound(page))
1325		deferred_split_huge_page(compound_head(page));
1326
1327	/*
1328	 * It would be tidy to reset the PageAnon mapping here,
1329	 * but that might overwrite a racing page_add_anon_rmap
1330	 * which increments mapcount after us but sets mapping
1331	 * before us: so leave the reset to free_unref_page,
1332	 * and remember that it's only reliable while mapped.
1333	 * Leaving it set also helps swapoff to reinstate ptes
1334	 * faster for those pages still in swapcache.
1335	 */
1336}
1337
1338/*
1339 * @arg: enum ttu_flags will be passed to this argument
1340 */
1341static bool try_to_unmap_one(struct page *page, struct vm_area_struct *vma,
1342		     unsigned long address, void *arg)
1343{
1344	struct mm_struct *mm = vma->vm_mm;
1345	struct page_vma_mapped_walk pvmw = {
1346		.page = page,
1347		.vma = vma,
1348		.address = address,
1349	};
1350	pte_t pteval;
1351	struct page *subpage;
1352	bool ret = true;
1353	struct mmu_notifier_range range;
1354	enum ttu_flags flags = (enum ttu_flags)arg;
 
 
1355
1356	/* munlock has nothing to gain from examining un-locked vmas */
1357	if ((flags & TTU_MUNLOCK) && !(vma->vm_flags & VM_LOCKED))
1358		return true;
1359
1360	if (IS_ENABLED(CONFIG_MIGRATION) && (flags & TTU_MIGRATION) &&
1361	    is_zone_device_page(page) && !is_device_private_page(page))
1362		return true;
1363
1364	if (flags & TTU_SPLIT_HUGE_PMD) {
1365		split_huge_pmd_address(vma, address,
1366				flags & TTU_SPLIT_FREEZE, page);
1367	}
1368
1369	/*
1370	 * For THP, we have to assume the worse case ie pmd for invalidation.
1371	 * For hugetlb, it could be much worse if we need to do pud
1372	 * invalidation in the case of pmd sharing.
1373	 *
1374	 * Note that the page can not be free in this function as call of
1375	 * try_to_unmap() must hold a reference on the page.
1376	 */
1377	mmu_notifier_range_init(&range, MMU_NOTIFY_CLEAR, 0, vma, vma->vm_mm,
1378				address,
1379				min(vma->vm_end, address + page_size(page)));
1380	if (PageHuge(page)) {
1381		/*
1382		 * If sharing is possible, start and end will be adjusted
1383		 * accordingly.
1384		 */
1385		adjust_range_if_pmd_sharing_possible(vma, &range.start,
1386						     &range.end);
 
 
 
1387	}
1388	mmu_notifier_invalidate_range_start(&range);
1389
1390	while (page_vma_mapped_walk(&pvmw)) {
1391#ifdef CONFIG_ARCH_ENABLE_THP_MIGRATION
1392		/* PMD-mapped THP migration entry */
1393		if (!pvmw.pte && (flags & TTU_MIGRATION)) {
1394			VM_BUG_ON_PAGE(PageHuge(page) || !PageTransCompound(page), page);
1395
1396			set_pmd_migration_entry(&pvmw, page);
1397			continue;
1398		}
1399#endif
1400
1401		/*
1402		 * If the page is mlock()d, we cannot swap it out.
1403		 * If it's recently referenced (perhaps page_referenced
1404		 * skipped over this mm) then we should reactivate it.
1405		 */
1406		if (!(flags & TTU_IGNORE_MLOCK)) {
1407			if (vma->vm_flags & VM_LOCKED) {
1408				/* PTE-mapped THP are never mlocked */
1409				if (!PageTransCompound(page)) {
1410					/*
1411					 * Holding pte lock, we do *not* need
1412					 * mmap_sem here
1413					 */
1414					mlock_vma_page(page);
1415				}
1416				ret = false;
1417				page_vma_mapped_walk_done(&pvmw);
1418				break;
1419			}
1420			if (flags & TTU_MUNLOCK)
1421				continue;
1422		}
1423
1424		/* Unexpected PMD-mapped THP? */
1425		VM_BUG_ON_PAGE(!pvmw.pte, page);
1426
1427		subpage = page - page_to_pfn(page) + pte_pfn(*pvmw.pte);
1428		address = pvmw.address;
1429
1430		if (PageHuge(page)) {
1431			if (huge_pmd_unshare(mm, &address, pvmw.pte)) {
1432				/*
1433				 * huge_pmd_unshare unmapped an entire PMD
1434				 * page.  There is no way of knowing exactly
1435				 * which PMDs may be cached for this mm, so
1436				 * we must flush them all.  start/end were
1437				 * already adjusted above to cover this range.
1438				 */
1439				flush_cache_range(vma, range.start, range.end);
1440				flush_tlb_range(vma, range.start, range.end);
1441				mmu_notifier_invalidate_range(mm, range.start,
1442							      range.end);
1443
 
1444				/*
1445				 * The ref count of the PMD page was dropped
1446				 * which is part of the way map counting
1447				 * is done for shared PMDs.  Return 'true'
1448				 * here.  When there is no other sharing,
1449				 * huge_pmd_unshare returns false and we will
1450				 * unmap the actual page and drop map count
1451				 * to zero.
1452				 */
1453				page_vma_mapped_walk_done(&pvmw);
1454				break;
 
 
 
1455			}
1456		}
1457
1458		if (IS_ENABLED(CONFIG_MIGRATION) &&
1459		    (flags & TTU_MIGRATION) &&
1460		    is_zone_device_page(page)) {
1461			swp_entry_t entry;
1462			pte_t swp_pte;
 
 
 
1463
1464			pteval = ptep_get_and_clear(mm, pvmw.address, pvmw.pte);
 
1465
1466			/*
1467			 * Store the pfn of the page in a special migration
1468			 * pte. do_swap_page() will wait until the migration
1469			 * pte is removed and then restart fault handling.
1470			 */
1471			entry = make_migration_entry(page, 0);
1472			swp_pte = swp_entry_to_pte(entry);
1473			if (pte_soft_dirty(pteval))
1474				swp_pte = pte_swp_mksoft_dirty(swp_pte);
1475			set_pte_at(mm, pvmw.address, pvmw.pte, swp_pte);
1476			/*
1477			 * No need to invalidate here it will synchronize on
1478			 * against the special swap migration pte.
1479			 *
1480			 * The assignment to subpage above was computed from a
1481			 * swap PTE which results in an invalid pointer.
1482			 * Since only PAGE_SIZE pages can currently be
1483			 * migrated, just set it to page. This will need to be
1484			 * changed when hugepage migrations to device private
1485			 * memory are supported.
1486			 */
1487			subpage = page;
1488			goto discard;
1489		}
1490
1491		if (!(flags & TTU_IGNORE_ACCESS)) {
1492			if (ptep_clear_flush_young_notify(vma, address,
1493						pvmw.pte)) {
1494				ret = false;
1495				page_vma_mapped_walk_done(&pvmw);
1496				break;
1497			}
1498		}
1499
1500		/* Nuke the page table entry. */
1501		flush_cache_page(vma, address, pte_pfn(*pvmw.pte));
1502		if (should_defer_flush(mm, flags)) {
1503			/*
1504			 * We clear the PTE but do not flush so potentially
1505			 * a remote CPU could still be writing to the page.
1506			 * If the entry was previously clean then the
1507			 * architecture must guarantee that a clear->dirty
1508			 * transition on a cached TLB entry is written through
1509			 * and traps if the PTE is unmapped.
 
 
1510			 */
1511			pteval = ptep_get_and_clear(mm, address, pvmw.pte);
1512
1513			set_tlb_ubc_flush_pending(mm, pte_dirty(pteval));
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1514		} else {
1515			pteval = ptep_clear_flush(vma, address, pvmw.pte);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1516		}
1517
1518		/* Move the dirty bit to the page. Now the pte is gone. */
 
 
 
 
 
 
 
1519		if (pte_dirty(pteval))
1520			set_page_dirty(page);
1521
1522		/* Update high watermark before we lower rss */
1523		update_hiwater_rss(mm);
1524
1525		if (PageHWPoison(page) && !(flags & TTU_IGNORE_HWPOISON)) {
1526			pteval = swp_entry_to_pte(make_hwpoison_entry(subpage));
1527			if (PageHuge(page)) {
1528				hugetlb_count_sub(compound_nr(page), mm);
1529				set_huge_swap_pte_at(mm, address,
1530						     pvmw.pte, pteval,
1531						     vma_mmu_pagesize(vma));
1532			} else {
1533				dec_mm_counter(mm, mm_counter(page));
1534				set_pte_at(mm, address, pvmw.pte, pteval);
1535			}
1536
1537		} else if (pte_unused(pteval) && !userfaultfd_armed(vma)) {
1538			/*
1539			 * The guest indicated that the page content is of no
1540			 * interest anymore. Simply discard the pte, vmscan
1541			 * will take care of the rest.
1542			 * A future reference will then fault in a new zero
1543			 * page. When userfaultfd is active, we must not drop
1544			 * this page though, as its main user (postcopy
1545			 * migration) will not expect userfaults on already
1546			 * copied pages.
1547			 */
1548			dec_mm_counter(mm, mm_counter(page));
1549			/* We have to invalidate as we cleared the pte */
1550			mmu_notifier_invalidate_range(mm, address,
1551						      address + PAGE_SIZE);
1552		} else if (IS_ENABLED(CONFIG_MIGRATION) &&
1553				(flags & (TTU_MIGRATION|TTU_SPLIT_FREEZE))) {
1554			swp_entry_t entry;
1555			pte_t swp_pte;
1556
1557			if (arch_unmap_one(mm, vma, address, pteval) < 0) {
1558				set_pte_at(mm, address, pvmw.pte, pteval);
1559				ret = false;
1560				page_vma_mapped_walk_done(&pvmw);
1561				break;
1562			}
1563
1564			/*
1565			 * Store the pfn of the page in a special migration
1566			 * pte. do_swap_page() will wait until the migration
1567			 * pte is removed and then restart fault handling.
1568			 */
1569			entry = make_migration_entry(subpage,
1570					pte_write(pteval));
1571			swp_pte = swp_entry_to_pte(entry);
1572			if (pte_soft_dirty(pteval))
1573				swp_pte = pte_swp_mksoft_dirty(swp_pte);
1574			set_pte_at(mm, address, pvmw.pte, swp_pte);
1575			/*
1576			 * No need to invalidate here it will synchronize on
1577			 * against the special swap migration pte.
1578			 */
1579		} else if (PageAnon(page)) {
1580			swp_entry_t entry = { .val = page_private(subpage) };
1581			pte_t swp_pte;
1582			/*
1583			 * Store the swap location in the pte.
1584			 * See handle_pte_fault() ...
1585			 */
1586			if (unlikely(PageSwapBacked(page) != PageSwapCache(page))) {
 
1587				WARN_ON_ONCE(1);
1588				ret = false;
1589				/* We have to invalidate as we cleared the pte */
1590				mmu_notifier_invalidate_range(mm, address,
1591							address + PAGE_SIZE);
1592				page_vma_mapped_walk_done(&pvmw);
1593				break;
1594			}
1595
1596			/* MADV_FREE page check */
1597			if (!PageSwapBacked(page)) {
1598				if (!PageDirty(page)) {
1599					/* Invalidate as we cleared the pte */
1600					mmu_notifier_invalidate_range(mm,
1601						address, address + PAGE_SIZE);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1602					dec_mm_counter(mm, MM_ANONPAGES);
1603					goto discard;
1604				}
1605
1606				/*
1607				 * If the page was redirtied, it cannot be
1608				 * discarded. Remap the page to page table.
1609				 */
1610				set_pte_at(mm, address, pvmw.pte, pteval);
1611				SetPageSwapBacked(page);
1612				ret = false;
1613				page_vma_mapped_walk_done(&pvmw);
1614				break;
 
 
 
1615			}
1616
1617			if (swap_duplicate(entry) < 0) {
1618				set_pte_at(mm, address, pvmw.pte, pteval);
1619				ret = false;
1620				page_vma_mapped_walk_done(&pvmw);
1621				break;
1622			}
1623			if (arch_unmap_one(mm, vma, address, pteval) < 0) {
 
1624				set_pte_at(mm, address, pvmw.pte, pteval);
1625				ret = false;
1626				page_vma_mapped_walk_done(&pvmw);
1627				break;
 
 
 
 
 
 
1628			}
1629			if (list_empty(&mm->mmlist)) {
1630				spin_lock(&mmlist_lock);
1631				if (list_empty(&mm->mmlist))
1632					list_add(&mm->mmlist, &init_mm.mmlist);
1633				spin_unlock(&mmlist_lock);
1634			}
1635			dec_mm_counter(mm, MM_ANONPAGES);
1636			inc_mm_counter(mm, MM_SWAPENTS);
1637			swp_pte = swp_entry_to_pte(entry);
 
 
1638			if (pte_soft_dirty(pteval))
1639				swp_pte = pte_swp_mksoft_dirty(swp_pte);
 
 
1640			set_pte_at(mm, address, pvmw.pte, swp_pte);
1641			/* Invalidate as we cleared the pte */
1642			mmu_notifier_invalidate_range(mm, address,
1643						      address + PAGE_SIZE);
1644		} else {
1645			/*
1646			 * This is a locked file-backed page, thus it cannot
1647			 * be removed from the page cache and replaced by a new
1648			 * page before mmu_notifier_invalidate_range_end, so no
1649			 * concurrent thread might update its page table to
1650			 * point at new page while a device still is using this
1651			 * page.
 
1652			 *
1653			 * See Documentation/vm/mmu_notifier.rst
1654			 */
1655			dec_mm_counter(mm, mm_counter_file(page));
1656		}
1657discard:
1658		/*
1659		 * No need to call mmu_notifier_invalidate_range() it has be
1660		 * done above for all cases requiring it to happen under page
1661		 * table lock before mmu_notifier_invalidate_range_end()
1662		 *
1663		 * See Documentation/vm/mmu_notifier.rst
1664		 */
1665		page_remove_rmap(subpage, PageHuge(page));
1666		put_page(page);
 
 
 
 
1667	}
1668
1669	mmu_notifier_invalidate_range_end(&range);
1670
1671	return ret;
1672}
1673
1674bool is_vma_temporary_stack(struct vm_area_struct *vma)
1675{
1676	int maybe_stack = vma->vm_flags & (VM_GROWSDOWN | VM_GROWSUP);
1677
1678	if (!maybe_stack)
1679		return false;
1680
1681	if ((vma->vm_flags & VM_STACK_INCOMPLETE_SETUP) ==
1682						VM_STACK_INCOMPLETE_SETUP)
1683		return true;
1684
1685	return false;
1686}
1687
1688static bool invalid_migration_vma(struct vm_area_struct *vma, void *arg)
1689{
1690	return is_vma_temporary_stack(vma);
1691}
1692
1693static int page_mapcount_is_zero(struct page *page)
1694{
1695	return !total_mapcount(page);
1696}
1697
1698/**
1699 * try_to_unmap - try to remove all page table mappings to a page
1700 * @page: the page to get unmapped
1701 * @flags: action and flags
1702 *
1703 * Tries to remove all the page table entries which are mapping this
1704 * page, used in the pageout path.  Caller must hold the page lock.
 
1705 *
1706 * If unmap is successful, return true. Otherwise, false.
1707 */
1708bool try_to_unmap(struct page *page, enum ttu_flags flags)
1709{
1710	struct rmap_walk_control rwc = {
1711		.rmap_one = try_to_unmap_one,
1712		.arg = (void *)flags,
1713		.done = page_mapcount_is_zero,
1714		.anon_lock = page_lock_anon_vma_read,
1715	};
1716
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1717	/*
1718	 * During exec, a temporary VMA is setup and later moved.
1719	 * The VMA is moved under the anon_vma lock but not the
1720	 * page tables leading to a race where migration cannot
1721	 * find the migration ptes. Rather than increasing the
1722	 * locking requirements of exec(), migration skips
1723	 * temporary VMAs until after exec() completes.
1724	 */
1725	if ((flags & (TTU_MIGRATION|TTU_SPLIT_FREEZE))
1726	    && !PageKsm(page) && PageAnon(page))
1727		rwc.invalid_vma = invalid_migration_vma;
1728
1729	if (flags & TTU_RMAP_LOCKED)
1730		rmap_walk_locked(page, &rwc);
1731	else
1732		rmap_walk(page, &rwc);
1733
1734	return !page_mapcount(page) ? true : false;
1735}
1736
1737static int page_not_mapped(struct page *page)
1738{
1739	return !page_mapped(page);
 
 
 
1740};
1741
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1742/**
1743 * try_to_munlock - try to munlock a page
1744 * @page: the page to be munlocked
 
 
 
 
 
 
 
1745 *
1746 * Called from munlock code.  Checks all of the VMAs mapping the page
1747 * to make sure nobody else has this page mlocked. The page will be
1748 * returned with PG_mlocked cleared if no other vmas have it mlocked.
1749 */
1750
1751void try_to_munlock(struct page *page)
1752{
 
 
 
 
 
 
1753	struct rmap_walk_control rwc = {
1754		.rmap_one = try_to_unmap_one,
1755		.arg = (void *)TTU_MUNLOCK,
1756		.done = page_not_mapped,
1757		.anon_lock = page_lock_anon_vma_read,
1758
1759	};
1760
1761	VM_BUG_ON_PAGE(!PageLocked(page) || PageLRU(page), page);
1762	VM_BUG_ON_PAGE(PageCompound(page) && PageDoubleMap(page), page);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1763
1764	rmap_walk(page, &rwc);
1765}
 
 
1766
1767void __put_anon_vma(struct anon_vma *anon_vma)
1768{
1769	struct anon_vma *root = anon_vma->root;
1770
1771	anon_vma_free(anon_vma);
1772	if (root != anon_vma && atomic_dec_and_test(&root->refcount))
1773		anon_vma_free(root);
1774}
1775
1776static struct anon_vma *rmap_walk_anon_lock(struct page *page,
1777					struct rmap_walk_control *rwc)
1778{
1779	struct anon_vma *anon_vma;
1780
1781	if (rwc->anon_lock)
1782		return rwc->anon_lock(page);
1783
1784	/*
1785	 * Note: remove_migration_ptes() cannot use page_lock_anon_vma_read()
1786	 * because that depends on page_mapped(); but not all its usages
1787	 * are holding mmap_sem. Users without mmap_sem are required to
1788	 * take a reference count to prevent the anon_vma disappearing
1789	 */
1790	anon_vma = page_anon_vma(page);
1791	if (!anon_vma)
1792		return NULL;
1793
 
 
 
 
 
 
 
 
 
1794	anon_vma_lock_read(anon_vma);
 
1795	return anon_vma;
1796}
1797
1798/*
1799 * rmap_walk_anon - do something to anonymous page using the object-based
1800 * rmap method
1801 * @page: the page to be handled
1802 * @rwc: control variable according to each walk type
 
1803 *
1804 * Find all the mappings of a page using the mapping pointer and the vma chains
1805 * contained in the anon_vma struct it points to.
1806 *
1807 * When called from try_to_munlock(), the mmap_sem of the mm containing the vma
1808 * where the page was found will be held for write.  So, we won't recheck
1809 * vm_flags for that VMA.  That should be OK, because that vma shouldn't be
1810 * LOCKED.
1811 */
1812static void rmap_walk_anon(struct page *page, struct rmap_walk_control *rwc,
1813		bool locked)
1814{
1815	struct anon_vma *anon_vma;
1816	pgoff_t pgoff_start, pgoff_end;
1817	struct anon_vma_chain *avc;
1818
1819	if (locked) {
1820		anon_vma = page_anon_vma(page);
1821		/* anon_vma disappear under us? */
1822		VM_BUG_ON_PAGE(!anon_vma, page);
1823	} else {
1824		anon_vma = rmap_walk_anon_lock(page, rwc);
1825	}
1826	if (!anon_vma)
1827		return;
1828
1829	pgoff_start = page_to_pgoff(page);
1830	pgoff_end = pgoff_start + hpage_nr_pages(page) - 1;
1831	anon_vma_interval_tree_foreach(avc, &anon_vma->rb_root,
1832			pgoff_start, pgoff_end) {
1833		struct vm_area_struct *vma = avc->vma;
1834		unsigned long address = vma_address(page, vma);
 
1835
 
1836		cond_resched();
1837
1838		if (rwc->invalid_vma && rwc->invalid_vma(vma, rwc->arg))
1839			continue;
1840
1841		if (!rwc->rmap_one(page, vma, address, rwc->arg))
1842			break;
1843		if (rwc->done && rwc->done(page))
1844			break;
1845	}
1846
1847	if (!locked)
1848		anon_vma_unlock_read(anon_vma);
1849}
1850
1851/*
1852 * rmap_walk_file - do something to file page using the object-based rmap method
1853 * @page: the page to be handled
1854 * @rwc: control variable according to each walk type
 
1855 *
1856 * Find all the mappings of a page using the mapping pointer and the vma chains
1857 * contained in the address_space struct it points to.
1858 *
1859 * When called from try_to_munlock(), the mmap_sem of the mm containing the vma
1860 * where the page was found will be held for write.  So, we won't recheck
1861 * vm_flags for that VMA.  That should be OK, because that vma shouldn't be
1862 * LOCKED.
1863 */
1864static void rmap_walk_file(struct page *page, struct rmap_walk_control *rwc,
1865		bool locked)
1866{
1867	struct address_space *mapping = page_mapping(page);
1868	pgoff_t pgoff_start, pgoff_end;
1869	struct vm_area_struct *vma;
1870
1871	/*
1872	 * The page lock not only makes sure that page->mapping cannot
1873	 * suddenly be NULLified by truncation, it makes sure that the
1874	 * structure at mapping cannot be freed and reused yet,
1875	 * so we can safely take mapping->i_mmap_rwsem.
1876	 */
1877	VM_BUG_ON_PAGE(!PageLocked(page), page);
1878
1879	if (!mapping)
1880		return;
1881
1882	pgoff_start = page_to_pgoff(page);
1883	pgoff_end = pgoff_start + hpage_nr_pages(page) - 1;
1884	if (!locked)
 
 
 
 
 
 
 
 
1885		i_mmap_lock_read(mapping);
 
 
1886	vma_interval_tree_foreach(vma, &mapping->i_mmap,
1887			pgoff_start, pgoff_end) {
1888		unsigned long address = vma_address(page, vma);
 
1889
 
1890		cond_resched();
1891
1892		if (rwc->invalid_vma && rwc->invalid_vma(vma, rwc->arg))
1893			continue;
1894
1895		if (!rwc->rmap_one(page, vma, address, rwc->arg))
1896			goto done;
1897		if (rwc->done && rwc->done(page))
1898			goto done;
1899	}
1900
1901done:
1902	if (!locked)
1903		i_mmap_unlock_read(mapping);
1904}
1905
1906void rmap_walk(struct page *page, struct rmap_walk_control *rwc)
1907{
1908	if (unlikely(PageKsm(page)))
1909		rmap_walk_ksm(page, rwc);
1910	else if (PageAnon(page))
1911		rmap_walk_anon(page, rwc, false);
1912	else
1913		rmap_walk_file(page, rwc, false);
1914}
1915
1916/* Like rmap_walk, but caller holds relevant rmap lock */
1917void rmap_walk_locked(struct page *page, struct rmap_walk_control *rwc)
1918{
1919	/* no ksm support for now */
1920	VM_BUG_ON_PAGE(PageKsm(page), page);
1921	if (PageAnon(page))
1922		rmap_walk_anon(page, rwc, true);
1923	else
1924		rmap_walk_file(page, rwc, true);
1925}
1926
1927#ifdef CONFIG_HUGETLB_PAGE
1928/*
1929 * The following two functions are for anonymous (private mapped) hugepages.
1930 * Unlike common anonymous pages, anonymous hugepages have no accounting code
1931 * and no lru code, because we handle hugepages differently from common pages.
1932 */
1933void hugepage_add_anon_rmap(struct page *page,
1934			    struct vm_area_struct *vma, unsigned long address)
1935{
1936	struct anon_vma *anon_vma = vma->anon_vma;
1937	int first;
1938
1939	BUG_ON(!PageLocked(page));
1940	BUG_ON(!anon_vma);
1941	/* address might be in next vma when migration races vma_adjust */
1942	first = atomic_inc_and_test(compound_mapcount_ptr(page));
1943	if (first)
1944		__page_set_anon_rmap(page, vma, address, 0);
1945}
1946
1947void hugepage_add_new_anon_rmap(struct page *page,
1948			struct vm_area_struct *vma, unsigned long address)
1949{
 
 
1950	BUG_ON(address < vma->vm_start || address >= vma->vm_end);
1951	atomic_set(compound_mapcount_ptr(page), 0);
1952	__page_set_anon_rmap(page, vma, address, 1);
 
 
 
 
1953}
1954#endif /* CONFIG_HUGETLB_PAGE */
v6.13.7
   1/*
   2 * mm/rmap.c - physical to virtual reverse mappings
   3 *
   4 * Copyright 2001, Rik van Riel <riel@conectiva.com.br>
   5 * Released under the General Public License (GPL).
   6 *
   7 * Simple, low overhead reverse mapping scheme.
   8 * Please try to keep this thing as modular as possible.
   9 *
  10 * Provides methods for unmapping each kind of mapped page:
  11 * the anon methods track anonymous pages, and
  12 * the file methods track pages belonging to an inode.
  13 *
  14 * Original design by Rik van Riel <riel@conectiva.com.br> 2001
  15 * File methods by Dave McCracken <dmccr@us.ibm.com> 2003, 2004
  16 * Anonymous methods by Andrea Arcangeli <andrea@suse.de> 2004
  17 * Contributions by Hugh Dickins 2003, 2004
  18 */
  19
  20/*
  21 * Lock ordering in mm:
  22 *
  23 * inode->i_rwsem	(while writing or truncating, not reading or faulting)
  24 *   mm->mmap_lock
  25 *     mapping->invalidate_lock (in filemap_fault)
  26 *       folio_lock
  27 *         hugetlbfs_i_mmap_rwsem_key (in huge_pmd_share, see hugetlbfs below)
  28 *           vma_start_write
  29 *             mapping->i_mmap_rwsem
  30 *               anon_vma->rwsem
  31 *                 mm->page_table_lock or pte_lock
  32 *                   swap_lock (in swap_duplicate, swap_info_get)
  33 *                     mmlist_lock (in mmput, drain_mmlist and others)
  34 *                     mapping->private_lock (in block_dirty_folio)
  35 *                         i_pages lock (widely used)
  36 *                           lruvec->lru_lock (in folio_lruvec_lock_irq)
  37 *                     inode->i_lock (in set_page_dirty's __mark_inode_dirty)
  38 *                     bdi.wb->list_lock (in set_page_dirty's __mark_inode_dirty)
  39 *                       sb_lock (within inode_lock in fs/fs-writeback.c)
  40 *                       i_pages lock (widely used, in set_page_dirty,
  41 *                                 in arch-dependent flush_dcache_mmap_lock,
  42 *                                 within bdi.wb->list_lock in __sync_single_inode)
  43 *
  44 * anon_vma->rwsem,mapping->i_mmap_rwsem   (memory_failure, collect_procs_anon)
  45 *   ->tasklist_lock
  46 *     pte map lock
  47 *
  48 * hugetlbfs PageHuge() take locks in this order:
  49 *   hugetlb_fault_mutex (hugetlbfs specific page fault mutex)
  50 *     vma_lock (hugetlb specific lock for pmd_sharing)
  51 *       mapping->i_mmap_rwsem (also used for hugetlb pmd sharing)
  52 *         folio_lock
  53 */
  54
  55#include <linux/mm.h>
  56#include <linux/sched/mm.h>
  57#include <linux/sched/task.h>
  58#include <linux/pagemap.h>
  59#include <linux/swap.h>
  60#include <linux/swapops.h>
  61#include <linux/slab.h>
  62#include <linux/init.h>
  63#include <linux/ksm.h>
  64#include <linux/rmap.h>
  65#include <linux/rcupdate.h>
  66#include <linux/export.h>
  67#include <linux/memcontrol.h>
  68#include <linux/mmu_notifier.h>
  69#include <linux/migrate.h>
  70#include <linux/hugetlb.h>
  71#include <linux/huge_mm.h>
  72#include <linux/backing-dev.h>
  73#include <linux/page_idle.h>
  74#include <linux/memremap.h>
  75#include <linux/userfaultfd_k.h>
  76#include <linux/mm_inline.h>
  77#include <linux/oom.h>
  78
  79#include <asm/tlbflush.h>
  80
  81#define CREATE_TRACE_POINTS
  82#include <trace/events/tlb.h>
  83#include <trace/events/migrate.h>
  84
  85#include "internal.h"
  86
  87static struct kmem_cache *anon_vma_cachep;
  88static struct kmem_cache *anon_vma_chain_cachep;
  89
  90static inline struct anon_vma *anon_vma_alloc(void)
  91{
  92	struct anon_vma *anon_vma;
  93
  94	anon_vma = kmem_cache_alloc(anon_vma_cachep, GFP_KERNEL);
  95	if (anon_vma) {
  96		atomic_set(&anon_vma->refcount, 1);
  97		anon_vma->num_children = 0;
  98		anon_vma->num_active_vmas = 0;
  99		anon_vma->parent = anon_vma;
 100		/*
 101		 * Initialise the anon_vma root to point to itself. If called
 102		 * from fork, the root will be reset to the parents anon_vma.
 103		 */
 104		anon_vma->root = anon_vma;
 105	}
 106
 107	return anon_vma;
 108}
 109
 110static inline void anon_vma_free(struct anon_vma *anon_vma)
 111{
 112	VM_BUG_ON(atomic_read(&anon_vma->refcount));
 113
 114	/*
 115	 * Synchronize against folio_lock_anon_vma_read() such that
 116	 * we can safely hold the lock without the anon_vma getting
 117	 * freed.
 118	 *
 119	 * Relies on the full mb implied by the atomic_dec_and_test() from
 120	 * put_anon_vma() against the acquire barrier implied by
 121	 * down_read_trylock() from folio_lock_anon_vma_read(). This orders:
 122	 *
 123	 * folio_lock_anon_vma_read()	VS	put_anon_vma()
 124	 *   down_read_trylock()		  atomic_dec_and_test()
 125	 *   LOCK				  MB
 126	 *   atomic_read()			  rwsem_is_locked()
 127	 *
 128	 * LOCK should suffice since the actual taking of the lock must
 129	 * happen _before_ what follows.
 130	 */
 131	might_sleep();
 132	if (rwsem_is_locked(&anon_vma->root->rwsem)) {
 133		anon_vma_lock_write(anon_vma);
 134		anon_vma_unlock_write(anon_vma);
 135	}
 136
 137	kmem_cache_free(anon_vma_cachep, anon_vma);
 138}
 139
 140static inline struct anon_vma_chain *anon_vma_chain_alloc(gfp_t gfp)
 141{
 142	return kmem_cache_alloc(anon_vma_chain_cachep, gfp);
 143}
 144
 145static void anon_vma_chain_free(struct anon_vma_chain *anon_vma_chain)
 146{
 147	kmem_cache_free(anon_vma_chain_cachep, anon_vma_chain);
 148}
 149
 150static void anon_vma_chain_link(struct vm_area_struct *vma,
 151				struct anon_vma_chain *avc,
 152				struct anon_vma *anon_vma)
 153{
 154	avc->vma = vma;
 155	avc->anon_vma = anon_vma;
 156	list_add(&avc->same_vma, &vma->anon_vma_chain);
 157	anon_vma_interval_tree_insert(avc, &anon_vma->rb_root);
 158}
 159
 160/**
 161 * __anon_vma_prepare - attach an anon_vma to a memory region
 162 * @vma: the memory region in question
 163 *
 164 * This makes sure the memory mapping described by 'vma' has
 165 * an 'anon_vma' attached to it, so that we can associate the
 166 * anonymous pages mapped into it with that anon_vma.
 167 *
 168 * The common case will be that we already have one, which
 169 * is handled inline by anon_vma_prepare(). But if
 170 * not we either need to find an adjacent mapping that we
 171 * can re-use the anon_vma from (very common when the only
 172 * reason for splitting a vma has been mprotect()), or we
 173 * allocate a new one.
 174 *
 175 * Anon-vma allocations are very subtle, because we may have
 176 * optimistically looked up an anon_vma in folio_lock_anon_vma_read()
 177 * and that may actually touch the rwsem even in the newly
 178 * allocated vma (it depends on RCU to make sure that the
 179 * anon_vma isn't actually destroyed).
 180 *
 181 * As a result, we need to do proper anon_vma locking even
 182 * for the new allocation. At the same time, we do not want
 183 * to do any locking for the common case of already having
 184 * an anon_vma.
 
 
 185 */
 186int __anon_vma_prepare(struct vm_area_struct *vma)
 187{
 188	struct mm_struct *mm = vma->vm_mm;
 189	struct anon_vma *anon_vma, *allocated;
 190	struct anon_vma_chain *avc;
 191
 192	mmap_assert_locked(mm);
 193	might_sleep();
 194
 195	avc = anon_vma_chain_alloc(GFP_KERNEL);
 196	if (!avc)
 197		goto out_enomem;
 198
 199	anon_vma = find_mergeable_anon_vma(vma);
 200	allocated = NULL;
 201	if (!anon_vma) {
 202		anon_vma = anon_vma_alloc();
 203		if (unlikely(!anon_vma))
 204			goto out_enomem_free_avc;
 205		anon_vma->num_children++; /* self-parent link for new root */
 206		allocated = anon_vma;
 207	}
 208
 209	anon_vma_lock_write(anon_vma);
 210	/* page_table_lock to protect against threads */
 211	spin_lock(&mm->page_table_lock);
 212	if (likely(!vma->anon_vma)) {
 213		vma->anon_vma = anon_vma;
 214		anon_vma_chain_link(vma, avc, anon_vma);
 215		anon_vma->num_active_vmas++;
 
 216		allocated = NULL;
 217		avc = NULL;
 218	}
 219	spin_unlock(&mm->page_table_lock);
 220	anon_vma_unlock_write(anon_vma);
 221
 222	if (unlikely(allocated))
 223		put_anon_vma(allocated);
 224	if (unlikely(avc))
 225		anon_vma_chain_free(avc);
 226
 227	return 0;
 228
 229 out_enomem_free_avc:
 230	anon_vma_chain_free(avc);
 231 out_enomem:
 232	return -ENOMEM;
 233}
 234
 235/*
 236 * This is a useful helper function for locking the anon_vma root as
 237 * we traverse the vma->anon_vma_chain, looping over anon_vma's that
 238 * have the same vma.
 239 *
 240 * Such anon_vma's should have the same root, so you'd expect to see
 241 * just a single mutex_lock for the whole traversal.
 242 */
 243static inline struct anon_vma *lock_anon_vma_root(struct anon_vma *root, struct anon_vma *anon_vma)
 244{
 245	struct anon_vma *new_root = anon_vma->root;
 246	if (new_root != root) {
 247		if (WARN_ON_ONCE(root))
 248			up_write(&root->rwsem);
 249		root = new_root;
 250		down_write(&root->rwsem);
 251	}
 252	return root;
 253}
 254
 255static inline void unlock_anon_vma_root(struct anon_vma *root)
 256{
 257	if (root)
 258		up_write(&root->rwsem);
 259}
 260
 261/*
 262 * Attach the anon_vmas from src to dst.
 263 * Returns 0 on success, -ENOMEM on failure.
 264 *
 265 * anon_vma_clone() is called by vma_expand(), vma_merge(), __split_vma(),
 266 * copy_vma() and anon_vma_fork(). The first four want an exact copy of src,
 267 * while the last one, anon_vma_fork(), may try to reuse an existing anon_vma to
 268 * prevent endless growth of anon_vma. Since dst->anon_vma is set to NULL before
 269 * call, we can identify this case by checking (!dst->anon_vma &&
 270 * src->anon_vma).
 271 *
 272 * If (!dst->anon_vma && src->anon_vma) is true, this function tries to find
 273 * and reuse existing anon_vma which has no vmas and only one child anon_vma.
 274 * This prevents degradation of anon_vma hierarchy to endless linear chain in
 275 * case of constantly forking task. On the other hand, an anon_vma with more
 276 * than one child isn't reused even if there was no alive vma, thus rmap
 277 * walker has a good chance of avoiding scanning the whole hierarchy when it
 278 * searches where page is mapped.
 279 */
 280int anon_vma_clone(struct vm_area_struct *dst, struct vm_area_struct *src)
 281{
 282	struct anon_vma_chain *avc, *pavc;
 283	struct anon_vma *root = NULL;
 284
 285	list_for_each_entry_reverse(pavc, &src->anon_vma_chain, same_vma) {
 286		struct anon_vma *anon_vma;
 287
 288		avc = anon_vma_chain_alloc(GFP_NOWAIT | __GFP_NOWARN);
 289		if (unlikely(!avc)) {
 290			unlock_anon_vma_root(root);
 291			root = NULL;
 292			avc = anon_vma_chain_alloc(GFP_KERNEL);
 293			if (!avc)
 294				goto enomem_failure;
 295		}
 296		anon_vma = pavc->anon_vma;
 297		root = lock_anon_vma_root(root, anon_vma);
 298		anon_vma_chain_link(dst, avc, anon_vma);
 299
 300		/*
 301		 * Reuse existing anon_vma if it has no vma and only one
 302		 * anon_vma child.
 303		 *
 304		 * Root anon_vma is never reused:
 
 305		 * it has self-parent reference and at least one child.
 306		 */
 307		if (!dst->anon_vma && src->anon_vma &&
 308		    anon_vma->num_children < 2 &&
 309		    anon_vma->num_active_vmas == 0)
 310			dst->anon_vma = anon_vma;
 311	}
 312	if (dst->anon_vma)
 313		dst->anon_vma->num_active_vmas++;
 314	unlock_anon_vma_root(root);
 315	return 0;
 316
 317 enomem_failure:
 318	/*
 319	 * dst->anon_vma is dropped here otherwise its num_active_vmas can
 320	 * be incorrectly decremented in unlink_anon_vmas().
 321	 * We can safely do this because callers of anon_vma_clone() don't care
 322	 * about dst->anon_vma if anon_vma_clone() failed.
 323	 */
 324	dst->anon_vma = NULL;
 325	unlink_anon_vmas(dst);
 326	return -ENOMEM;
 327}
 328
 329/*
 330 * Attach vma to its own anon_vma, as well as to the anon_vmas that
 331 * the corresponding VMA in the parent process is attached to.
 332 * Returns 0 on success, non-zero on failure.
 333 */
 334int anon_vma_fork(struct vm_area_struct *vma, struct vm_area_struct *pvma)
 335{
 336	struct anon_vma_chain *avc;
 337	struct anon_vma *anon_vma;
 338	int error;
 339
 340	/* Don't bother if the parent process has no anon_vma here. */
 341	if (!pvma->anon_vma)
 342		return 0;
 343
 344	/* Drop inherited anon_vma, we'll reuse existing or allocate new. */
 345	vma->anon_vma = NULL;
 346
 347	/*
 348	 * First, attach the new VMA to the parent VMA's anon_vmas,
 349	 * so rmap can find non-COWed pages in child processes.
 350	 */
 351	error = anon_vma_clone(vma, pvma);
 352	if (error)
 353		return error;
 354
 355	/* An existing anon_vma has been reused, all done then. */
 356	if (vma->anon_vma)
 357		return 0;
 358
 359	/* Then add our own anon_vma. */
 360	anon_vma = anon_vma_alloc();
 361	if (!anon_vma)
 362		goto out_error;
 363	anon_vma->num_active_vmas++;
 364	avc = anon_vma_chain_alloc(GFP_KERNEL);
 365	if (!avc)
 366		goto out_error_free_anon_vma;
 367
 368	/*
 369	 * The root anon_vma's rwsem is the lock actually used when we
 370	 * lock any of the anon_vmas in this anon_vma tree.
 371	 */
 372	anon_vma->root = pvma->anon_vma->root;
 373	anon_vma->parent = pvma->anon_vma;
 374	/*
 375	 * With refcounts, an anon_vma can stay around longer than the
 376	 * process it belongs to. The root anon_vma needs to be pinned until
 377	 * this anon_vma is freed, because the lock lives in the root.
 378	 */
 379	get_anon_vma(anon_vma->root);
 380	/* Mark this anon_vma as the one where our new (COWed) pages go. */
 381	vma->anon_vma = anon_vma;
 382	anon_vma_lock_write(anon_vma);
 383	anon_vma_chain_link(vma, avc, anon_vma);
 384	anon_vma->parent->num_children++;
 385	anon_vma_unlock_write(anon_vma);
 386
 387	return 0;
 388
 389 out_error_free_anon_vma:
 390	put_anon_vma(anon_vma);
 391 out_error:
 392	unlink_anon_vmas(vma);
 393	return -ENOMEM;
 394}
 395
 396void unlink_anon_vmas(struct vm_area_struct *vma)
 397{
 398	struct anon_vma_chain *avc, *next;
 399	struct anon_vma *root = NULL;
 400
 401	/*
 402	 * Unlink each anon_vma chained to the VMA.  This list is ordered
 403	 * from newest to oldest, ensuring the root anon_vma gets freed last.
 404	 */
 405	list_for_each_entry_safe(avc, next, &vma->anon_vma_chain, same_vma) {
 406		struct anon_vma *anon_vma = avc->anon_vma;
 407
 408		root = lock_anon_vma_root(root, anon_vma);
 409		anon_vma_interval_tree_remove(avc, &anon_vma->rb_root);
 410
 411		/*
 412		 * Leave empty anon_vmas on the list - we'll need
 413		 * to free them outside the lock.
 414		 */
 415		if (RB_EMPTY_ROOT(&anon_vma->rb_root.rb_root)) {
 416			anon_vma->parent->num_children--;
 417			continue;
 418		}
 419
 420		list_del(&avc->same_vma);
 421		anon_vma_chain_free(avc);
 422	}
 423	if (vma->anon_vma) {
 424		vma->anon_vma->num_active_vmas--;
 425
 426		/*
 427		 * vma would still be needed after unlink, and anon_vma will be prepared
 428		 * when handle fault.
 429		 */
 430		vma->anon_vma = NULL;
 431	}
 432	unlock_anon_vma_root(root);
 433
 434	/*
 435	 * Iterate the list once more, it now only contains empty and unlinked
 436	 * anon_vmas, destroy them. Could not do before due to __put_anon_vma()
 437	 * needing to write-acquire the anon_vma->root->rwsem.
 438	 */
 439	list_for_each_entry_safe(avc, next, &vma->anon_vma_chain, same_vma) {
 440		struct anon_vma *anon_vma = avc->anon_vma;
 441
 442		VM_WARN_ON(anon_vma->num_children);
 443		VM_WARN_ON(anon_vma->num_active_vmas);
 444		put_anon_vma(anon_vma);
 445
 446		list_del(&avc->same_vma);
 447		anon_vma_chain_free(avc);
 448	}
 449}
 450
 451static void anon_vma_ctor(void *data)
 452{
 453	struct anon_vma *anon_vma = data;
 454
 455	init_rwsem(&anon_vma->rwsem);
 456	atomic_set(&anon_vma->refcount, 0);
 457	anon_vma->rb_root = RB_ROOT_CACHED;
 458}
 459
 460void __init anon_vma_init(void)
 461{
 462	anon_vma_cachep = kmem_cache_create("anon_vma", sizeof(struct anon_vma),
 463			0, SLAB_TYPESAFE_BY_RCU|SLAB_PANIC|SLAB_ACCOUNT,
 464			anon_vma_ctor);
 465	anon_vma_chain_cachep = KMEM_CACHE(anon_vma_chain,
 466			SLAB_PANIC|SLAB_ACCOUNT);
 467}
 468
 469/*
 470 * Getting a lock on a stable anon_vma from a page off the LRU is tricky!
 471 *
 472 * Since there is no serialization what so ever against folio_remove_rmap_*()
 473 * the best this function can do is return a refcount increased anon_vma
 474 * that might have been relevant to this page.
 475 *
 476 * The page might have been remapped to a different anon_vma or the anon_vma
 477 * returned may already be freed (and even reused).
 478 *
 479 * In case it was remapped to a different anon_vma, the new anon_vma will be a
 480 * child of the old anon_vma, and the anon_vma lifetime rules will therefore
 481 * ensure that any anon_vma obtained from the page will still be valid for as
 482 * long as we observe page_mapped() [ hence all those page_mapped() tests ].
 483 *
 484 * All users of this function must be very careful when walking the anon_vma
 485 * chain and verify that the page in question is indeed mapped in it
 486 * [ something equivalent to page_mapped_in_vma() ].
 487 *
 488 * Since anon_vma's slab is SLAB_TYPESAFE_BY_RCU and we know from
 489 * folio_remove_rmap_*() that the anon_vma pointer from page->mapping is valid
 490 * if there is a mapcount, we can dereference the anon_vma after observing
 491 * those.
 492 *
 493 * NOTE: the caller should normally hold folio lock when calling this.  If
 494 * not, the caller needs to double check the anon_vma didn't change after
 495 * taking the anon_vma lock for either read or write (UFFDIO_MOVE can modify it
 496 * concurrently without folio lock protection). See folio_lock_anon_vma_read()
 497 * which has already covered that, and comment above remap_pages().
 498 */
 499struct anon_vma *folio_get_anon_vma(const struct folio *folio)
 500{
 501	struct anon_vma *anon_vma = NULL;
 502	unsigned long anon_mapping;
 503
 504	rcu_read_lock();
 505	anon_mapping = (unsigned long)READ_ONCE(folio->mapping);
 506	if ((anon_mapping & PAGE_MAPPING_FLAGS) != PAGE_MAPPING_ANON)
 507		goto out;
 508	if (!folio_mapped(folio))
 509		goto out;
 510
 511	anon_vma = (struct anon_vma *) (anon_mapping - PAGE_MAPPING_ANON);
 512	if (!atomic_inc_not_zero(&anon_vma->refcount)) {
 513		anon_vma = NULL;
 514		goto out;
 515	}
 516
 517	/*
 518	 * If this folio is still mapped, then its anon_vma cannot have been
 519	 * freed.  But if it has been unmapped, we have no security against the
 520	 * anon_vma structure being freed and reused (for another anon_vma:
 521	 * SLAB_TYPESAFE_BY_RCU guarantees that - so the atomic_inc_not_zero()
 522	 * above cannot corrupt).
 523	 */
 524	if (!folio_mapped(folio)) {
 525		rcu_read_unlock();
 526		put_anon_vma(anon_vma);
 527		return NULL;
 528	}
 529out:
 530	rcu_read_unlock();
 531
 532	return anon_vma;
 533}
 534
 535/*
 536 * Similar to folio_get_anon_vma() except it locks the anon_vma.
 537 *
 538 * Its a little more complex as it tries to keep the fast path to a single
 539 * atomic op -- the trylock. If we fail the trylock, we fall back to getting a
 540 * reference like with folio_get_anon_vma() and then block on the mutex
 541 * on !rwc->try_lock case.
 542 */
 543struct anon_vma *folio_lock_anon_vma_read(const struct folio *folio,
 544					  struct rmap_walk_control *rwc)
 545{
 546	struct anon_vma *anon_vma = NULL;
 547	struct anon_vma *root_anon_vma;
 548	unsigned long anon_mapping;
 549
 550retry:
 551	rcu_read_lock();
 552	anon_mapping = (unsigned long)READ_ONCE(folio->mapping);
 553	if ((anon_mapping & PAGE_MAPPING_FLAGS) != PAGE_MAPPING_ANON)
 554		goto out;
 555	if (!folio_mapped(folio))
 556		goto out;
 557
 558	anon_vma = (struct anon_vma *) (anon_mapping - PAGE_MAPPING_ANON);
 559	root_anon_vma = READ_ONCE(anon_vma->root);
 560	if (down_read_trylock(&root_anon_vma->rwsem)) {
 561		/*
 562		 * folio_move_anon_rmap() might have changed the anon_vma as we
 563		 * might not hold the folio lock here.
 564		 */
 565		if (unlikely((unsigned long)READ_ONCE(folio->mapping) !=
 566			     anon_mapping)) {
 567			up_read(&root_anon_vma->rwsem);
 568			rcu_read_unlock();
 569			goto retry;
 570		}
 571
 572		/*
 573		 * If the folio is still mapped, then this anon_vma is still
 574		 * its anon_vma, and holding the mutex ensures that it will
 575		 * not go away, see anon_vma_free().
 576		 */
 577		if (!folio_mapped(folio)) {
 578			up_read(&root_anon_vma->rwsem);
 579			anon_vma = NULL;
 580		}
 581		goto out;
 582	}
 583
 584	if (rwc && rwc->try_lock) {
 585		anon_vma = NULL;
 586		rwc->contended = true;
 587		goto out;
 588	}
 589
 590	/* trylock failed, we got to sleep */
 591	if (!atomic_inc_not_zero(&anon_vma->refcount)) {
 592		anon_vma = NULL;
 593		goto out;
 594	}
 595
 596	if (!folio_mapped(folio)) {
 597		rcu_read_unlock();
 598		put_anon_vma(anon_vma);
 599		return NULL;
 600	}
 601
 602	/* we pinned the anon_vma, its safe to sleep */
 603	rcu_read_unlock();
 604	anon_vma_lock_read(anon_vma);
 605
 606	/*
 607	 * folio_move_anon_rmap() might have changed the anon_vma as we might
 608	 * not hold the folio lock here.
 609	 */
 610	if (unlikely((unsigned long)READ_ONCE(folio->mapping) !=
 611		     anon_mapping)) {
 612		anon_vma_unlock_read(anon_vma);
 613		put_anon_vma(anon_vma);
 614		anon_vma = NULL;
 615		goto retry;
 616	}
 617
 618	if (atomic_dec_and_test(&anon_vma->refcount)) {
 619		/*
 620		 * Oops, we held the last refcount, release the lock
 621		 * and bail -- can't simply use put_anon_vma() because
 622		 * we'll deadlock on the anon_vma_lock_write() recursion.
 623		 */
 624		anon_vma_unlock_read(anon_vma);
 625		__put_anon_vma(anon_vma);
 626		anon_vma = NULL;
 627	}
 628
 629	return anon_vma;
 630
 631out:
 632	rcu_read_unlock();
 633	return anon_vma;
 634}
 635
 
 
 
 
 
 636#ifdef CONFIG_ARCH_WANT_BATCHED_UNMAP_TLB_FLUSH
 637/*
 638 * Flush TLB entries for recently unmapped pages from remote CPUs. It is
 639 * important if a PTE was dirty when it was unmapped that it's flushed
 640 * before any IO is initiated on the page to prevent lost writes. Similarly,
 641 * it must be flushed before freeing to prevent data leakage.
 642 */
 643void try_to_unmap_flush(void)
 644{
 645	struct tlbflush_unmap_batch *tlb_ubc = &current->tlb_ubc;
 646
 647	if (!tlb_ubc->flush_required)
 648		return;
 649
 650	arch_tlbbatch_flush(&tlb_ubc->arch);
 651	tlb_ubc->flush_required = false;
 652	tlb_ubc->writable = false;
 653}
 654
 655/* Flush iff there are potentially writable TLB entries that can race with IO */
 656void try_to_unmap_flush_dirty(void)
 657{
 658	struct tlbflush_unmap_batch *tlb_ubc = &current->tlb_ubc;
 659
 660	if (tlb_ubc->writable)
 661		try_to_unmap_flush();
 662}
 663
 664/*
 665 * Bits 0-14 of mm->tlb_flush_batched record pending generations.
 666 * Bits 16-30 of mm->tlb_flush_batched bit record flushed generations.
 667 */
 668#define TLB_FLUSH_BATCH_FLUSHED_SHIFT	16
 669#define TLB_FLUSH_BATCH_PENDING_MASK			\
 670	((1 << (TLB_FLUSH_BATCH_FLUSHED_SHIFT - 1)) - 1)
 671#define TLB_FLUSH_BATCH_PENDING_LARGE			\
 672	(TLB_FLUSH_BATCH_PENDING_MASK / 2)
 673
 674static void set_tlb_ubc_flush_pending(struct mm_struct *mm, pte_t pteval,
 675				      unsigned long uaddr)
 676{
 677	struct tlbflush_unmap_batch *tlb_ubc = &current->tlb_ubc;
 678	int batch;
 679	bool writable = pte_dirty(pteval);
 680
 681	if (!pte_accessible(mm, pteval))
 682		return;
 683
 684	arch_tlbbatch_add_pending(&tlb_ubc->arch, mm, uaddr);
 685	tlb_ubc->flush_required = true;
 686
 687	/*
 688	 * Ensure compiler does not re-order the setting of tlb_flush_batched
 689	 * before the PTE is cleared.
 690	 */
 691	barrier();
 692	batch = atomic_read(&mm->tlb_flush_batched);
 693retry:
 694	if ((batch & TLB_FLUSH_BATCH_PENDING_MASK) > TLB_FLUSH_BATCH_PENDING_LARGE) {
 695		/*
 696		 * Prevent `pending' from catching up with `flushed' because of
 697		 * overflow.  Reset `pending' and `flushed' to be 1 and 0 if
 698		 * `pending' becomes large.
 699		 */
 700		if (!atomic_try_cmpxchg(&mm->tlb_flush_batched, &batch, 1))
 701			goto retry;
 702	} else {
 703		atomic_inc(&mm->tlb_flush_batched);
 704	}
 705
 706	/*
 707	 * If the PTE was dirty then it's best to assume it's writable. The
 708	 * caller must use try_to_unmap_flush_dirty() or try_to_unmap_flush()
 709	 * before the page is queued for IO.
 710	 */
 711	if (writable)
 712		tlb_ubc->writable = true;
 713}
 714
 715/*
 716 * Returns true if the TLB flush should be deferred to the end of a batch of
 717 * unmap operations to reduce IPIs.
 718 */
 719static bool should_defer_flush(struct mm_struct *mm, enum ttu_flags flags)
 720{
 
 
 721	if (!(flags & TTU_BATCH_FLUSH))
 722		return false;
 723
 724	return arch_tlbbatch_should_defer(mm);
 
 
 
 
 
 725}
 726
 727/*
 728 * Reclaim unmaps pages under the PTL but do not flush the TLB prior to
 729 * releasing the PTL if TLB flushes are batched. It's possible for a parallel
 730 * operation such as mprotect or munmap to race between reclaim unmapping
 731 * the page and flushing the page. If this race occurs, it potentially allows
 732 * access to data via a stale TLB entry. Tracking all mm's that have TLB
 733 * batching in flight would be expensive during reclaim so instead track
 734 * whether TLB batching occurred in the past and if so then do a flush here
 735 * if required. This will cost one additional flush per reclaim cycle paid
 736 * by the first operation at risk such as mprotect and mumap.
 737 *
 738 * This must be called under the PTL so that an access to tlb_flush_batched
 739 * that is potentially a "reclaim vs mprotect/munmap/etc" race will synchronise
 740 * via the PTL.
 741 */
 742void flush_tlb_batched_pending(struct mm_struct *mm)
 743{
 744	int batch = atomic_read(&mm->tlb_flush_batched);
 745	int pending = batch & TLB_FLUSH_BATCH_PENDING_MASK;
 746	int flushed = batch >> TLB_FLUSH_BATCH_FLUSHED_SHIFT;
 747
 748	if (pending != flushed) {
 749		arch_flush_tlb_batched_pending(mm);
 750		/*
 751		 * If the new TLB flushing is pending during flushing, leave
 752		 * mm->tlb_flush_batched as is, to avoid losing flushing.
 753		 */
 754		atomic_cmpxchg(&mm->tlb_flush_batched, batch,
 755			       pending | (pending << TLB_FLUSH_BATCH_FLUSHED_SHIFT));
 756	}
 757}
 758#else
 759static void set_tlb_ubc_flush_pending(struct mm_struct *mm, pte_t pteval,
 760				      unsigned long uaddr)
 761{
 762}
 763
 764static bool should_defer_flush(struct mm_struct *mm, enum ttu_flags flags)
 765{
 766	return false;
 767}
 768#endif /* CONFIG_ARCH_WANT_BATCHED_UNMAP_TLB_FLUSH */
 769
 770/**
 771 * page_address_in_vma - The virtual address of a page in this VMA.
 772 * @folio: The folio containing the page.
 773 * @page: The page within the folio.
 774 * @vma: The VMA we need to know the address in.
 775 *
 776 * Calculates the user virtual address of this page in the specified VMA.
 777 * It is the caller's responsibililty to check the page is actually
 778 * within the VMA.  There may not currently be a PTE pointing at this
 779 * page, but if a page fault occurs at this address, this is the page
 780 * which will be accessed.
 781 *
 782 * Context: Caller should hold a reference to the folio.  Caller should
 783 * hold a lock (eg the i_mmap_lock or the mmap_lock) which keeps the
 784 * VMA from being altered.
 785 *
 786 * Return: The virtual address corresponding to this page in the VMA.
 787 */
 788unsigned long page_address_in_vma(const struct folio *folio,
 789		const struct page *page, const struct vm_area_struct *vma)
 790{
 791	if (folio_test_anon(folio)) {
 792		struct anon_vma *page__anon_vma = folio_anon_vma(folio);
 
 793		/*
 794		 * Note: swapoff's unuse_vma() is more efficient with this
 795		 * check, and needs it to match anon_vma when KSM is active.
 796		 */
 797		if (!vma->anon_vma || !page__anon_vma ||
 798		    vma->anon_vma->root != page__anon_vma->root)
 799			return -EFAULT;
 800	} else if (!vma->vm_file) {
 
 
 
 801		return -EFAULT;
 802	} else if (vma->vm_file->f_mapping != folio->mapping) {
 
 803		return -EFAULT;
 804	}
 805
 806	/* KSM folios don't reach here because of the !page__anon_vma check */
 807	return vma_address(vma, page_pgoff(folio, page), 1);
 808}
 809
 810/*
 811 * Returns the actual pmd_t* where we expect 'address' to be mapped from, or
 812 * NULL if it doesn't exist.  No guarantees / checks on what the pmd_t*
 813 * represents.
 814 */
 815pmd_t *mm_find_pmd(struct mm_struct *mm, unsigned long address)
 816{
 817	pgd_t *pgd;
 818	p4d_t *p4d;
 819	pud_t *pud;
 820	pmd_t *pmd = NULL;
 
 821
 822	pgd = pgd_offset(mm, address);
 823	if (!pgd_present(*pgd))
 824		goto out;
 825
 826	p4d = p4d_offset(pgd, address);
 827	if (!p4d_present(*p4d))
 828		goto out;
 829
 830	pud = pud_offset(p4d, address);
 831	if (!pud_present(*pud))
 832		goto out;
 833
 834	pmd = pmd_offset(pud, address);
 
 
 
 
 
 
 
 
 
 835out:
 836	return pmd;
 837}
 838
 839struct folio_referenced_arg {
 840	int mapcount;
 841	int referenced;
 842	unsigned long vm_flags;
 843	struct mem_cgroup *memcg;
 844};
 845
 846/*
 847 * arg: folio_referenced_arg will be passed
 848 */
 849static bool folio_referenced_one(struct folio *folio,
 850		struct vm_area_struct *vma, unsigned long address, void *arg)
 851{
 852	struct folio_referenced_arg *pra = arg;
 853	DEFINE_FOLIO_VMA_WALK(pvmw, folio, vma, address, 0);
 
 
 
 
 854	int referenced = 0;
 855	unsigned long start = address, ptes = 0;
 856
 857	while (page_vma_mapped_walk(&pvmw)) {
 858		address = pvmw.address;
 859
 860		if (vma->vm_flags & VM_LOCKED) {
 861			if (!folio_test_large(folio) || !pvmw.pte) {
 862				/* Restore the mlock which got missed */
 863				mlock_vma_folio(folio, vma);
 864				page_vma_mapped_walk_done(&pvmw);
 865				pra->vm_flags |= VM_LOCKED;
 866				return false; /* To break the loop */
 867			}
 868			/*
 869			 * For large folio fully mapped to VMA, will
 870			 * be handled after the pvmw loop.
 871			 *
 872			 * For large folio cross VMA boundaries, it's
 873			 * expected to be picked  by page reclaim. But
 874			 * should skip reference of pages which are in
 875			 * the range of VM_LOCKED vma. As page reclaim
 876			 * should just count the reference of pages out
 877			 * the range of VM_LOCKED vma.
 878			 */
 879			ptes++;
 880			pra->mapcount--;
 881			continue;
 882		}
 883
 884		/*
 885		 * Skip the non-shared swapbacked folio mapped solely by
 886		 * the exiting or OOM-reaped process. This avoids redundant
 887		 * swap-out followed by an immediate unmap.
 888		 */
 889		if ((!atomic_read(&vma->vm_mm->mm_users) ||
 890		    check_stable_address_space(vma->vm_mm)) &&
 891		    folio_test_anon(folio) && folio_test_swapbacked(folio) &&
 892		    !folio_likely_mapped_shared(folio)) {
 893			pra->referenced = -1;
 894			page_vma_mapped_walk_done(&pvmw);
 895			return false;
 
 896		}
 897
 898		if (lru_gen_enabled() && pvmw.pte) {
 899			if (lru_gen_look_around(&pvmw))
 900				referenced++;
 901		} else if (pvmw.pte) {
 902			if (ptep_clear_flush_young_notify(vma, address,
 903						pvmw.pte))
 904				referenced++;
 
 
 
 
 
 
 
 
 
 
 905		} else if (IS_ENABLED(CONFIG_TRANSPARENT_HUGEPAGE)) {
 906			if (pmdp_clear_flush_young_notify(vma, address,
 907						pvmw.pmd))
 908				referenced++;
 909		} else {
 910			/* unexpected pmd-mapped folio? */
 911			WARN_ON_ONCE(1);
 912		}
 913
 914		pra->mapcount--;
 915	}
 916
 917	if ((vma->vm_flags & VM_LOCKED) &&
 918			folio_test_large(folio) &&
 919			folio_within_vma(folio, vma)) {
 920		unsigned long s_align, e_align;
 921
 922		s_align = ALIGN_DOWN(start, PMD_SIZE);
 923		e_align = ALIGN_DOWN(start + folio_size(folio) - 1, PMD_SIZE);
 924
 925		/* folio doesn't cross page table boundary and fully mapped */
 926		if ((s_align == e_align) && (ptes == folio_nr_pages(folio))) {
 927			/* Restore the mlock which got missed */
 928			mlock_vma_folio(folio, vma);
 929			pra->vm_flags |= VM_LOCKED;
 930			return false; /* To break the loop */
 931		}
 932	}
 933
 934	if (referenced)
 935		folio_clear_idle(folio);
 936	if (folio_test_clear_young(folio))
 937		referenced++;
 938
 939	if (referenced) {
 940		pra->referenced++;
 941		pra->vm_flags |= vma->vm_flags & ~VM_LOCKED;
 942	}
 943
 944	if (!pra->mapcount)
 945		return false; /* To break the loop */
 946
 947	return true;
 948}
 949
 950static bool invalid_folio_referenced_vma(struct vm_area_struct *vma, void *arg)
 951{
 952	struct folio_referenced_arg *pra = arg;
 953	struct mem_cgroup *memcg = pra->memcg;
 954
 955	/*
 956	 * Ignore references from this mapping if it has no recency. If the
 957	 * folio has been used in another mapping, we will catch it; if this
 958	 * other mapping is already gone, the unmap path will have set the
 959	 * referenced flag or activated the folio in zap_pte_range().
 960	 */
 961	if (!vma_has_recency(vma))
 962		return true;
 963
 964	/*
 965	 * If we are reclaiming on behalf of a cgroup, skip counting on behalf
 966	 * of references from different cgroups.
 967	 */
 968	if (memcg && !mm_match_cgroup(vma->vm_mm, memcg))
 969		return true;
 970
 971	return false;
 972}
 973
 974/**
 975 * folio_referenced() - Test if the folio was referenced.
 976 * @folio: The folio to test.
 977 * @is_locked: Caller holds lock on the folio.
 978 * @memcg: target memory cgroup
 979 * @vm_flags: A combination of all the vma->vm_flags which referenced the folio.
 980 *
 981 * Quick test_and_clear_referenced for all mappings of a folio,
 982 *
 983 * Return: The number of mappings which referenced the folio. Return -1 if
 984 * the function bailed out due to rmap lock contention.
 985 */
 986int folio_referenced(struct folio *folio, int is_locked,
 987		     struct mem_cgroup *memcg, unsigned long *vm_flags)
 988{
 989	bool we_locked = false;
 990	struct folio_referenced_arg pra = {
 991		.mapcount = folio_mapcount(folio),
 
 
 992		.memcg = memcg,
 993	};
 994	struct rmap_walk_control rwc = {
 995		.rmap_one = folio_referenced_one,
 996		.arg = (void *)&pra,
 997		.anon_lock = folio_lock_anon_vma_read,
 998		.try_lock = true,
 999		.invalid_vma = invalid_folio_referenced_vma,
1000	};
1001
1002	*vm_flags = 0;
1003	if (!pra.mapcount)
1004		return 0;
1005
1006	if (!folio_raw_mapping(folio))
1007		return 0;
1008
1009	if (!is_locked && (!folio_test_anon(folio) || folio_test_ksm(folio))) {
1010		we_locked = folio_trylock(folio);
1011		if (!we_locked)
1012			return 1;
1013	}
1014
1015	rmap_walk(folio, &rwc);
 
 
 
 
 
 
 
 
 
1016	*vm_flags = pra.vm_flags;
1017
1018	if (we_locked)
1019		folio_unlock(folio);
1020
1021	return rwc.contended ? -1 : pra.referenced;
1022}
1023
1024static int page_vma_mkclean_one(struct page_vma_mapped_walk *pvmw)
 
1025{
1026	int cleaned = 0;
1027	struct vm_area_struct *vma = pvmw->vma;
 
 
 
 
1028	struct mmu_notifier_range range;
1029	unsigned long address = pvmw->address;
1030
1031	/*
1032	 * We have to assume the worse case ie pmd for invalidation. Note that
1033	 * the folio can not be freed from this function.
1034	 */
1035	mmu_notifier_range_init(&range, MMU_NOTIFY_PROTECTION_PAGE, 0,
1036				vma->vm_mm, address, vma_address_end(pvmw));
 
1037	mmu_notifier_invalidate_range_start(&range);
1038
1039	while (page_vma_mapped_walk(pvmw)) {
1040		int ret = 0;
1041
1042		address = pvmw->address;
1043		if (pvmw->pte) {
1044			pte_t *pte = pvmw->pte;
1045			pte_t entry = ptep_get(pte);
1046
1047			if (!pte_dirty(entry) && !pte_write(entry))
1048				continue;
1049
1050			flush_cache_page(vma, address, pte_pfn(entry));
1051			entry = ptep_clear_flush(vma, address, pte);
1052			entry = pte_wrprotect(entry);
1053			entry = pte_mkclean(entry);
1054			set_pte_at(vma->vm_mm, address, pte, entry);
1055			ret = 1;
1056		} else {
1057#ifdef CONFIG_TRANSPARENT_HUGEPAGE
1058			pmd_t *pmd = pvmw->pmd;
1059			pmd_t entry;
1060
1061			if (!pmd_dirty(*pmd) && !pmd_write(*pmd))
1062				continue;
1063
1064			flush_cache_range(vma, address,
1065					  address + HPAGE_PMD_SIZE);
1066			entry = pmdp_invalidate(vma, address, pmd);
1067			entry = pmd_wrprotect(entry);
1068			entry = pmd_mkclean(entry);
1069			set_pmd_at(vma->vm_mm, address, pmd, entry);
1070			ret = 1;
1071#else
1072			/* unexpected pmd-mapped folio? */
1073			WARN_ON_ONCE(1);
1074#endif
1075		}
1076
 
 
 
 
 
 
 
1077		if (ret)
1078			cleaned++;
1079	}
1080
1081	mmu_notifier_invalidate_range_end(&range);
1082
1083	return cleaned;
1084}
1085
1086static bool page_mkclean_one(struct folio *folio, struct vm_area_struct *vma,
1087			     unsigned long address, void *arg)
1088{
1089	DEFINE_FOLIO_VMA_WALK(pvmw, folio, vma, address, PVMW_SYNC);
1090	int *cleaned = arg;
1091
1092	*cleaned += page_vma_mkclean_one(&pvmw);
1093
1094	return true;
1095}
1096
1097static bool invalid_mkclean_vma(struct vm_area_struct *vma, void *arg)
1098{
1099	if (vma->vm_flags & VM_SHARED)
1100		return false;
1101
1102	return true;
1103}
1104
1105int folio_mkclean(struct folio *folio)
1106{
1107	int cleaned = 0;
1108	struct address_space *mapping;
1109	struct rmap_walk_control rwc = {
1110		.arg = (void *)&cleaned,
1111		.rmap_one = page_mkclean_one,
1112		.invalid_vma = invalid_mkclean_vma,
1113	};
1114
1115	BUG_ON(!folio_test_locked(folio));
1116
1117	if (!folio_mapped(folio))
1118		return 0;
1119
1120	mapping = folio_mapping(folio);
1121	if (!mapping)
1122		return 0;
1123
1124	rmap_walk(folio, &rwc);
1125
1126	return cleaned;
1127}
1128EXPORT_SYMBOL_GPL(folio_mkclean);
1129
1130/**
1131 * pfn_mkclean_range - Cleans the PTEs (including PMDs) mapped with range of
1132 *                     [@pfn, @pfn + @nr_pages) at the specific offset (@pgoff)
1133 *                     within the @vma of shared mappings. And since clean PTEs
1134 *                     should also be readonly, write protects them too.
1135 * @pfn: start pfn.
1136 * @nr_pages: number of physically contiguous pages srarting with @pfn.
1137 * @pgoff: page offset that the @pfn mapped with.
1138 * @vma: vma that @pfn mapped within.
1139 *
1140 * Returns the number of cleaned PTEs (including PMDs).
1141 */
1142int pfn_mkclean_range(unsigned long pfn, unsigned long nr_pages, pgoff_t pgoff,
1143		      struct vm_area_struct *vma)
1144{
1145	struct page_vma_mapped_walk pvmw = {
1146		.pfn		= pfn,
1147		.nr_pages	= nr_pages,
1148		.pgoff		= pgoff,
1149		.vma		= vma,
1150		.flags		= PVMW_SYNC,
1151	};
1152
1153	if (invalid_mkclean_vma(vma, NULL))
1154		return 0;
1155
1156	pvmw.address = vma_address(vma, pgoff, nr_pages);
1157	VM_BUG_ON_VMA(pvmw.address == -EFAULT, vma);
1158
1159	return page_vma_mkclean_one(&pvmw);
1160}
1161
1162static __always_inline unsigned int __folio_add_rmap(struct folio *folio,
1163		struct page *page, int nr_pages, enum rmap_level level,
1164		int *nr_pmdmapped)
1165{
1166	atomic_t *mapped = &folio->_nr_pages_mapped;
1167	const int orig_nr_pages = nr_pages;
1168	int first = 0, nr = 0;
1169
1170	__folio_rmap_sanity_checks(folio, page, nr_pages, level);
1171
1172	switch (level) {
1173	case RMAP_LEVEL_PTE:
1174		if (!folio_test_large(folio)) {
1175			nr = atomic_inc_and_test(&folio->_mapcount);
1176			break;
1177		}
1178
1179		do {
1180			first += atomic_inc_and_test(&page->_mapcount);
1181		} while (page++, --nr_pages > 0);
1182
1183		if (first &&
1184		    atomic_add_return_relaxed(first, mapped) < ENTIRELY_MAPPED)
1185			nr = first;
1186
1187		atomic_add(orig_nr_pages, &folio->_large_mapcount);
1188		break;
1189	case RMAP_LEVEL_PMD:
1190		first = atomic_inc_and_test(&folio->_entire_mapcount);
1191		if (first) {
1192			nr = atomic_add_return_relaxed(ENTIRELY_MAPPED, mapped);
1193			if (likely(nr < ENTIRELY_MAPPED + ENTIRELY_MAPPED)) {
1194				*nr_pmdmapped = folio_nr_pages(folio);
1195				nr = *nr_pmdmapped - (nr & FOLIO_PAGES_MAPPED);
1196				/* Raced ahead of a remove and another add? */
1197				if (unlikely(nr < 0))
1198					nr = 0;
1199			} else {
1200				/* Raced ahead of a remove of ENTIRELY_MAPPED */
1201				nr = 0;
1202			}
1203		}
1204		atomic_inc(&folio->_large_mapcount);
1205		break;
1206	}
1207	return nr;
1208}
1209
1210/**
1211 * folio_move_anon_rmap - move a folio to our anon_vma
1212 * @folio:	The folio to move to our anon_vma
1213 * @vma:	The vma the folio belongs to
1214 *
1215 * When a folio belongs exclusively to one process after a COW event,
1216 * that folio can be moved into the anon_vma that belongs to just that
1217 * process, so the rmap code will not search the parent or sibling processes.
1218 */
1219void folio_move_anon_rmap(struct folio *folio, struct vm_area_struct *vma)
1220{
1221	void *anon_vma = vma->anon_vma;
1222
1223	VM_BUG_ON_FOLIO(!folio_test_locked(folio), folio);
1224	VM_BUG_ON_VMA(!anon_vma, vma);
1225
1226	anon_vma += PAGE_MAPPING_ANON;
1227	/*
1228	 * Ensure that anon_vma and the PAGE_MAPPING_ANON bit are written
1229	 * simultaneously, so a concurrent reader (eg folio_referenced()'s
1230	 * folio_test_anon()) will not see one without the other.
1231	 */
1232	WRITE_ONCE(folio->mapping, anon_vma);
1233}
1234
1235/**
1236 * __folio_set_anon - set up a new anonymous rmap for a folio
1237 * @folio:	The folio to set up the new anonymous rmap for.
1238 * @vma:	VM area to add the folio to.
1239 * @address:	User virtual address of the mapping
1240 * @exclusive:	Whether the folio is exclusive to the process.
1241 */
1242static void __folio_set_anon(struct folio *folio, struct vm_area_struct *vma,
1243			     unsigned long address, bool exclusive)
1244{
1245	struct anon_vma *anon_vma = vma->anon_vma;
1246
1247	BUG_ON(!anon_vma);
1248
 
 
 
1249	/*
1250	 * If the folio isn't exclusive to this vma, we must use the _oldest_
1251	 * possible anon_vma for the folio mapping!
 
1252	 */
1253	if (!exclusive)
1254		anon_vma = anon_vma->root;
1255
1256	/*
1257	 * page_idle does a lockless/optimistic rmap scan on folio->mapping.
1258	 * Make sure the compiler doesn't split the stores of anon_vma and
1259	 * the PAGE_MAPPING_ANON type identifier, otherwise the rmap code
1260	 * could mistake the mapping for a struct address_space and crash.
1261	 */
1262	anon_vma = (void *) anon_vma + PAGE_MAPPING_ANON;
1263	WRITE_ONCE(folio->mapping, (struct address_space *) anon_vma);
1264	folio->index = linear_page_index(vma, address);
1265}
1266
1267/**
1268 * __page_check_anon_rmap - sanity check anonymous rmap addition
1269 * @folio:	The folio containing @page.
1270 * @page:	the page to check the mapping of
1271 * @vma:	the vm area in which the mapping is added
1272 * @address:	the user virtual address mapped
1273 */
1274static void __page_check_anon_rmap(const struct folio *folio,
1275		const struct page *page, struct vm_area_struct *vma,
1276		unsigned long address)
1277{
 
1278	/*
1279	 * The page's anon-rmap details (mapping and index) are guaranteed to
1280	 * be set up correctly at this point.
1281	 *
1282	 * We have exclusion against folio_add_anon_rmap_*() because the caller
1283	 * always holds the page locked.
 
1284	 *
1285	 * We have exclusion against folio_add_new_anon_rmap because those pages
1286	 * are initially only visible via the pagetables, and the pte is locked
1287	 * over the call to folio_add_new_anon_rmap.
1288	 */
1289	VM_BUG_ON_FOLIO(folio_anon_vma(folio)->root != vma->anon_vma->root,
1290			folio);
1291	VM_BUG_ON_PAGE(page_pgoff(folio, page) != linear_page_index(vma, address),
1292		       page);
1293}
1294
1295static void __folio_mod_stat(struct folio *folio, int nr, int nr_pmdmapped)
 
 
 
 
 
 
 
 
 
 
 
 
 
1296{
1297	int idx;
1298
1299	if (nr) {
1300		idx = folio_test_anon(folio) ? NR_ANON_MAPPED : NR_FILE_MAPPED;
1301		__lruvec_stat_mod_folio(folio, idx, nr);
1302	}
1303	if (nr_pmdmapped) {
1304		if (folio_test_anon(folio)) {
1305			idx = NR_ANON_THPS;
1306			__lruvec_stat_mod_folio(folio, idx, nr_pmdmapped);
1307		} else {
1308			/* NR_*_PMDMAPPED are not maintained per-memcg */
1309			idx = folio_test_swapbacked(folio) ?
1310				NR_SHMEM_PMDMAPPED : NR_FILE_PMDMAPPED;
1311			__mod_node_page_state(folio_pgdat(folio), idx,
1312					      nr_pmdmapped);
1313		}
1314	}
1315}
1316
1317static __always_inline void __folio_add_anon_rmap(struct folio *folio,
1318		struct page *page, int nr_pages, struct vm_area_struct *vma,
1319		unsigned long address, rmap_t flags, enum rmap_level level)
1320{
1321	int i, nr, nr_pmdmapped = 0;
1322
1323	VM_WARN_ON_FOLIO(!folio_test_anon(folio), folio);
1324
1325	nr = __folio_add_rmap(folio, page, nr_pages, level, &nr_pmdmapped);
1326
1327	if (likely(!folio_test_ksm(folio)))
1328		__page_check_anon_rmap(folio, page, vma, address);
1329
1330	__folio_mod_stat(folio, nr, nr_pmdmapped);
1331
1332	if (flags & RMAP_EXCLUSIVE) {
1333		switch (level) {
1334		case RMAP_LEVEL_PTE:
1335			for (i = 0; i < nr_pages; i++)
1336				SetPageAnonExclusive(page + i);
1337			break;
1338		case RMAP_LEVEL_PMD:
1339			SetPageAnonExclusive(page);
1340			break;
1341		}
1342	}
1343	for (i = 0; i < nr_pages; i++) {
1344		struct page *cur_page = page + i;
1345
1346		/* While PTE-mapping a THP we have a PMD and a PTE mapping. */
1347		VM_WARN_ON_FOLIO((atomic_read(&cur_page->_mapcount) > 0 ||
1348				  (folio_test_large(folio) &&
1349				   folio_entire_mapcount(folio) > 1)) &&
1350				 PageAnonExclusive(cur_page), folio);
 
 
 
 
 
 
1351	}
 
 
1352
1353	/*
1354	 * For large folio, only mlock it if it's fully mapped to VMA. It's
1355	 * not easy to check whether the large folio is fully mapped to VMA
1356	 * here. Only mlock normal 4K folio and leave page reclaim to handle
1357	 * large folio.
1358	 */
1359	if (!folio_test_large(folio))
1360		mlock_vma_folio(folio, vma);
1361}
1362
1363/**
1364 * folio_add_anon_rmap_ptes - add PTE mappings to a page range of an anon folio
1365 * @folio:	The folio to add the mappings to
1366 * @page:	The first page to add
1367 * @nr_pages:	The number of pages which will be mapped
1368 * @vma:	The vm area in which the mappings are added
1369 * @address:	The user virtual address of the first page to map
1370 * @flags:	The rmap flags
1371 *
1372 * The page range of folio is defined by [first_page, first_page + nr_pages)
1373 *
1374 * The caller needs to hold the page table lock, and the page must be locked in
1375 * the anon_vma case: to serialize mapping,index checking after setting,
1376 * and to ensure that an anon folio is not being upgraded racily to a KSM folio
1377 * (but KSM folios are never downgraded).
1378 */
1379void folio_add_anon_rmap_ptes(struct folio *folio, struct page *page,
1380		int nr_pages, struct vm_area_struct *vma, unsigned long address,
1381		rmap_t flags)
1382{
1383	__folio_add_anon_rmap(folio, page, nr_pages, vma, address, flags,
1384			      RMAP_LEVEL_PTE);
1385}
1386
1387/**
1388 * folio_add_anon_rmap_pmd - add a PMD mapping to a page range of an anon folio
1389 * @folio:	The folio to add the mapping to
1390 * @page:	The first page to add
1391 * @vma:	The vm area in which the mapping is added
1392 * @address:	The user virtual address of the first page to map
1393 * @flags:	The rmap flags
1394 *
1395 * The page range of folio is defined by [first_page, first_page + HPAGE_PMD_NR)
1396 *
1397 * The caller needs to hold the page table lock, and the page must be locked in
1398 * the anon_vma case: to serialize mapping,index checking after setting.
1399 */
1400void folio_add_anon_rmap_pmd(struct folio *folio, struct page *page,
1401		struct vm_area_struct *vma, unsigned long address, rmap_t flags)
1402{
1403#ifdef CONFIG_TRANSPARENT_HUGEPAGE
1404	__folio_add_anon_rmap(folio, page, HPAGE_PMD_NR, vma, address, flags,
1405			      RMAP_LEVEL_PMD);
1406#else
1407	WARN_ON_ONCE(true);
1408#endif
1409}
1410
1411/**
1412 * folio_add_new_anon_rmap - Add mapping to a new anonymous folio.
1413 * @folio:	The folio to add the mapping to.
1414 * @vma:	the vm area in which the mapping is added
1415 * @address:	the user virtual address mapped
1416 * @flags:	The rmap flags
1417 *
1418 * Like folio_add_anon_rmap_*() but must only be called on *new* folios.
1419 * This means the inc-and-test can be bypassed.
1420 * The folio doesn't necessarily need to be locked while it's exclusive
1421 * unless two threads map it concurrently. However, the folio must be
1422 * locked if it's shared.
1423 *
1424 * If the folio is pmd-mappable, it is accounted as a THP.
1425 */
1426void folio_add_new_anon_rmap(struct folio *folio, struct vm_area_struct *vma,
1427		unsigned long address, rmap_t flags)
1428{
1429	const int nr = folio_nr_pages(folio);
1430	const bool exclusive = flags & RMAP_EXCLUSIVE;
1431	int nr_pmdmapped = 0;
1432
1433	VM_WARN_ON_FOLIO(folio_test_hugetlb(folio), folio);
1434	VM_WARN_ON_FOLIO(!exclusive && !folio_test_locked(folio), folio);
1435	VM_BUG_ON_VMA(address < vma->vm_start ||
1436			address + (nr << PAGE_SHIFT) > vma->vm_end, vma);
1437
1438	/*
1439	 * VM_DROPPABLE mappings don't swap; instead they're just dropped when
1440	 * under memory pressure.
1441	 */
1442	if (!folio_test_swapbacked(folio) && !(vma->vm_flags & VM_DROPPABLE))
1443		__folio_set_swapbacked(folio);
1444	__folio_set_anon(folio, vma, address, exclusive);
1445
1446	if (likely(!folio_test_large(folio))) {
1447		/* increment count (starts at -1) */
1448		atomic_set(&folio->_mapcount, 0);
1449		if (exclusive)
1450			SetPageAnonExclusive(&folio->page);
1451	} else if (!folio_test_pmd_mappable(folio)) {
1452		int i;
1453
1454		for (i = 0; i < nr; i++) {
1455			struct page *page = folio_page(folio, i);
1456
1457			/* increment count (starts at -1) */
1458			atomic_set(&page->_mapcount, 0);
1459			if (exclusive)
1460				SetPageAnonExclusive(page);
1461		}
1462
 
 
 
 
1463		/* increment count (starts at -1) */
1464		atomic_set(&folio->_large_mapcount, nr - 1);
1465		atomic_set(&folio->_nr_pages_mapped, nr);
1466	} else {
 
 
1467		/* increment count (starts at -1) */
1468		atomic_set(&folio->_entire_mapcount, 0);
1469		/* increment count (starts at -1) */
1470		atomic_set(&folio->_large_mapcount, 0);
1471		atomic_set(&folio->_nr_pages_mapped, ENTIRELY_MAPPED);
1472		if (exclusive)
1473			SetPageAnonExclusive(&folio->page);
1474		nr_pmdmapped = nr;
1475	}
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1476
1477	__folio_mod_stat(folio, nr, nr_pmdmapped);
1478	mod_mthp_stat(folio_order(folio), MTHP_STAT_NR_ANON, 1);
 
 
 
 
 
 
 
 
1479}
1480
1481static __always_inline void __folio_add_file_rmap(struct folio *folio,
1482		struct page *page, int nr_pages, struct vm_area_struct *vma,
1483		enum rmap_level level)
1484{
1485	int nr, nr_pmdmapped = 0;
 
 
 
1486
1487	VM_WARN_ON_FOLIO(folio_test_anon(folio), folio);
 
 
 
 
 
1488
1489	nr = __folio_add_rmap(folio, page, nr_pages, level, &nr_pmdmapped);
1490	__folio_mod_stat(folio, nr, nr_pmdmapped);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1491
1492	/* See comments in folio_add_anon_rmap_*() */
1493	if (!folio_test_large(folio))
1494		mlock_vma_folio(folio, vma);
1495}
 
 
1496
1497/**
1498 * folio_add_file_rmap_ptes - add PTE mappings to a page range of a folio
1499 * @folio:	The folio to add the mappings to
1500 * @page:	The first page to add
1501 * @nr_pages:	The number of pages that will be mapped using PTEs
1502 * @vma:	The vm area in which the mappings are added
1503 *
1504 * The page range of the folio is defined by [page, page + nr_pages)
1505 *
1506 * The caller needs to hold the page table lock.
1507 */
1508void folio_add_file_rmap_ptes(struct folio *folio, struct page *page,
1509		int nr_pages, struct vm_area_struct *vma)
1510{
1511	__folio_add_file_rmap(folio, page, nr_pages, vma, RMAP_LEVEL_PTE);
1512}
1513
1514/**
1515 * folio_add_file_rmap_pmd - add a PMD mapping to a page range of a folio
1516 * @folio:	The folio to add the mapping to
1517 * @page:	The first page to add
1518 * @vma:	The vm area in which the mapping is added
1519 *
1520 * The page range of the folio is defined by [page, page + HPAGE_PMD_NR)
1521 *
1522 * The caller needs to hold the page table lock.
1523 */
1524void folio_add_file_rmap_pmd(struct folio *folio, struct page *page,
1525		struct vm_area_struct *vma)
1526{
1527#ifdef CONFIG_TRANSPARENT_HUGEPAGE
1528	__folio_add_file_rmap(folio, page, HPAGE_PMD_NR, vma, RMAP_LEVEL_PMD);
1529#else
1530	WARN_ON_ONCE(true);
1531#endif
1532}
1533
1534static __always_inline void __folio_remove_rmap(struct folio *folio,
1535		struct page *page, int nr_pages, struct vm_area_struct *vma,
1536		enum rmap_level level)
1537{
1538	atomic_t *mapped = &folio->_nr_pages_mapped;
1539	int last = 0, nr = 0, nr_pmdmapped = 0;
1540	bool partially_mapped = false;
1541
1542	__folio_rmap_sanity_checks(folio, page, nr_pages, level);
1543
1544	switch (level) {
1545	case RMAP_LEVEL_PTE:
1546		if (!folio_test_large(folio)) {
1547			nr = atomic_add_negative(-1, &folio->_mapcount);
1548			break;
1549		}
1550
1551		atomic_sub(nr_pages, &folio->_large_mapcount);
1552		do {
1553			last += atomic_add_negative(-1, &page->_mapcount);
1554		} while (page++, --nr_pages > 0);
1555
1556		if (last &&
1557		    atomic_sub_return_relaxed(last, mapped) < ENTIRELY_MAPPED)
1558			nr = last;
1559
1560		partially_mapped = nr && atomic_read(mapped);
1561		break;
1562	case RMAP_LEVEL_PMD:
1563		atomic_dec(&folio->_large_mapcount);
1564		last = atomic_add_negative(-1, &folio->_entire_mapcount);
1565		if (last) {
1566			nr = atomic_sub_return_relaxed(ENTIRELY_MAPPED, mapped);
1567			if (likely(nr < ENTIRELY_MAPPED)) {
1568				nr_pmdmapped = folio_nr_pages(folio);
1569				nr = nr_pmdmapped - (nr & FOLIO_PAGES_MAPPED);
1570				/* Raced ahead of another remove and an add? */
1571				if (unlikely(nr < 0))
1572					nr = 0;
1573			} else {
1574				/* An add of ENTIRELY_MAPPED raced ahead */
1575				nr = 0;
1576			}
1577		}
1578
1579		partially_mapped = nr && nr < nr_pmdmapped;
1580		break;
1581	}
1582
1583	/*
1584	 * Queue anon large folio for deferred split if at least one page of
1585	 * the folio is unmapped and at least one page is still mapped.
1586	 *
1587	 * Check partially_mapped first to ensure it is a large folio.
1588	 */
1589	if (partially_mapped && folio_test_anon(folio) &&
1590	    !folio_test_partially_mapped(folio))
1591		deferred_split_folio(folio, true);
1592
1593	__folio_mod_stat(folio, -nr, -nr_pmdmapped);
 
 
 
 
 
 
 
 
 
 
 
1594
1595	/*
1596	 * It would be tidy to reset folio_test_anon mapping when fully
1597	 * unmapped, but that might overwrite a racing folio_add_anon_rmap_*()
1598	 * which increments mapcount after us but sets mapping before us:
1599	 * so leave the reset to free_pages_prepare, and remember that
1600	 * it's only reliable while mapped.
1601	 */
1602
1603	munlock_vma_folio(folio, vma);
 
 
 
1604}
1605
1606/**
1607 * folio_remove_rmap_ptes - remove PTE mappings from a page range of a folio
1608 * @folio:	The folio to remove the mappings from
1609 * @page:	The first page to remove
1610 * @nr_pages:	The number of pages that will be removed from the mapping
1611 * @vma:	The vm area from which the mappings are removed
1612 *
1613 * The page range of the folio is defined by [page, page + nr_pages)
1614 *
1615 * The caller needs to hold the page table lock.
1616 */
1617void folio_remove_rmap_ptes(struct folio *folio, struct page *page,
1618		int nr_pages, struct vm_area_struct *vma)
1619{
1620	__folio_remove_rmap(folio, page, nr_pages, vma, RMAP_LEVEL_PTE);
1621}
 
 
 
 
 
 
 
1622
1623/**
1624 * folio_remove_rmap_pmd - remove a PMD mapping from a page range of a folio
1625 * @folio:	The folio to remove the mapping from
1626 * @page:	The first page to remove
1627 * @vma:	The vm area from which the mapping is removed
1628 *
1629 * The page range of the folio is defined by [page, page + HPAGE_PMD_NR)
1630 *
1631 * The caller needs to hold the page table lock.
1632 */
1633void folio_remove_rmap_pmd(struct folio *folio, struct page *page,
1634		struct vm_area_struct *vma)
1635{
1636#ifdef CONFIG_TRANSPARENT_HUGEPAGE
1637	__folio_remove_rmap(folio, page, HPAGE_PMD_NR, vma, RMAP_LEVEL_PMD);
1638#else
1639	WARN_ON_ONCE(true);
1640#endif
 
 
 
 
1641}
1642
1643/*
1644 * @arg: enum ttu_flags will be passed to this argument
1645 */
1646static bool try_to_unmap_one(struct folio *folio, struct vm_area_struct *vma,
1647		     unsigned long address, void *arg)
1648{
1649	struct mm_struct *mm = vma->vm_mm;
1650	DEFINE_FOLIO_VMA_WALK(pvmw, folio, vma, address, 0);
 
 
 
 
1651	pte_t pteval;
1652	struct page *subpage;
1653	bool anon_exclusive, ret = true;
1654	struct mmu_notifier_range range;
1655	enum ttu_flags flags = (enum ttu_flags)(long)arg;
1656	unsigned long pfn;
1657	unsigned long hsz = 0;
1658
1659	/*
1660	 * When racing against e.g. zap_pte_range() on another cpu,
1661	 * in between its ptep_get_and_clear_full() and folio_remove_rmap_*(),
1662	 * try_to_unmap() may return before page_mapped() has become false,
1663	 * if page table locking is skipped: use TTU_SYNC to wait for that.
1664	 */
1665	if (flags & TTU_SYNC)
1666		pvmw.flags = PVMW_SYNC;
 
 
 
 
1667
1668	/*
1669	 * For THP, we have to assume the worse case ie pmd for invalidation.
1670	 * For hugetlb, it could be much worse if we need to do pud
1671	 * invalidation in the case of pmd sharing.
1672	 *
1673	 * Note that the folio can not be freed in this function as call of
1674	 * try_to_unmap() must hold a reference on the folio.
1675	 */
1676	range.end = vma_address_end(&pvmw);
1677	mmu_notifier_range_init(&range, MMU_NOTIFY_CLEAR, 0, vma->vm_mm,
1678				address, range.end);
1679	if (folio_test_hugetlb(folio)) {
1680		/*
1681		 * If sharing is possible, start and end will be adjusted
1682		 * accordingly.
1683		 */
1684		adjust_range_if_pmd_sharing_possible(vma, &range.start,
1685						     &range.end);
1686
1687		/* We need the huge page size for set_huge_pte_at() */
1688		hsz = huge_page_size(hstate_vma(vma));
1689	}
1690	mmu_notifier_invalidate_range_start(&range);
1691
1692	while (page_vma_mapped_walk(&pvmw)) {
 
 
 
 
 
 
 
 
 
 
1693		/*
1694		 * If the folio is in an mlock()d vma, we must not swap it out.
 
 
1695		 */
1696		if (!(flags & TTU_IGNORE_MLOCK) &&
1697		    (vma->vm_flags & VM_LOCKED)) {
1698			/* Restore the mlock which got missed */
1699			if (!folio_test_large(folio))
1700				mlock_vma_folio(folio, vma);
1701			goto walk_abort;
 
 
 
 
 
 
 
 
 
 
1702		}
1703
1704		if (!pvmw.pte) {
1705			if (unmap_huge_pmd_locked(vma, pvmw.address, pvmw.pmd,
1706						  folio))
1707				goto walk_done;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1708
1709			if (flags & TTU_SPLIT_HUGE_PMD) {
1710				/*
1711				 * We temporarily have to drop the PTL and
1712				 * restart so we can process the PTE-mapped THP.
 
 
 
 
 
1713				 */
1714				split_huge_pmd_locked(vma, pvmw.address,
1715						      pvmw.pmd, false, folio);
1716				flags &= ~TTU_SPLIT_HUGE_PMD;
1717				page_vma_mapped_walk_restart(&pvmw);
1718				continue;
1719			}
1720		}
1721
1722		/* Unexpected PMD-mapped THP? */
1723		VM_BUG_ON_FOLIO(!pvmw.pte, folio);
1724
1725		pfn = pte_pfn(ptep_get(pvmw.pte));
1726		subpage = folio_page(folio, pfn - folio_pfn(folio));
1727		address = pvmw.address;
1728		anon_exclusive = folio_test_anon(folio) &&
1729				 PageAnonExclusive(subpage);
1730
1731		if (folio_test_hugetlb(folio)) {
1732			bool anon = folio_test_anon(folio);
1733
1734			/*
1735			 * The try_to_unmap() is only passed a hugetlb page
1736			 * in the case where the hugetlb page is poisoned.
 
1737			 */
1738			VM_BUG_ON_PAGE(!PageHWPoison(subpage), subpage);
 
 
 
 
1739			/*
1740			 * huge_pmd_unshare may unmap an entire PMD page.
1741			 * There is no way of knowing exactly which PMDs may
1742			 * be cached for this mm, so we must flush them all.
1743			 * start/end were already adjusted above to cover this
1744			 * range.
 
 
 
 
1745			 */
1746			flush_cache_range(vma, range.start, range.end);
 
 
 
 
 
 
 
 
 
 
 
1747
 
 
 
1748			/*
1749			 * To call huge_pmd_unshare, i_mmap_rwsem must be
1750			 * held in write mode.  Caller needs to explicitly
1751			 * do this outside rmap routines.
1752			 *
1753			 * We also must hold hugetlb vma_lock in write mode.
1754			 * Lock order dictates acquiring vma_lock BEFORE
1755			 * i_mmap_rwsem.  We can only try lock here and fail
1756			 * if unsuccessful.
1757			 */
1758			if (!anon) {
1759				VM_BUG_ON(!(flags & TTU_RMAP_LOCKED));
1760				if (!hugetlb_vma_trylock_write(vma))
1761					goto walk_abort;
1762				if (huge_pmd_unshare(mm, vma, address, pvmw.pte)) {
1763					hugetlb_vma_unlock_write(vma);
1764					flush_tlb_range(vma,
1765						range.start, range.end);
1766					/*
1767					 * The ref count of the PMD page was
1768					 * dropped which is part of the way map
1769					 * counting is done for shared PMDs.
1770					 * Return 'true' here.  When there is
1771					 * no other sharing, huge_pmd_unshare
1772					 * returns false and we will unmap the
1773					 * actual page and drop map count
1774					 * to zero.
1775					 */
1776					goto walk_done;
1777				}
1778				hugetlb_vma_unlock_write(vma);
1779			}
1780			pteval = huge_ptep_clear_flush(vma, address, pvmw.pte);
1781		} else {
1782			flush_cache_page(vma, address, pfn);
1783			/* Nuke the page table entry. */
1784			if (should_defer_flush(mm, flags)) {
1785				/*
1786				 * We clear the PTE but do not flush so potentially
1787				 * a remote CPU could still be writing to the folio.
1788				 * If the entry was previously clean then the
1789				 * architecture must guarantee that a clear->dirty
1790				 * transition on a cached TLB entry is written through
1791				 * and traps if the PTE is unmapped.
1792				 */
1793				pteval = ptep_get_and_clear(mm, address, pvmw.pte);
1794
1795				set_tlb_ubc_flush_pending(mm, pteval, address);
1796			} else {
1797				pteval = ptep_clear_flush(vma, address, pvmw.pte);
1798			}
1799		}
1800
1801		/*
1802		 * Now the pte is cleared. If this pte was uffd-wp armed,
1803		 * we may want to replace a none pte with a marker pte if
1804		 * it's file-backed, so we don't lose the tracking info.
1805		 */
1806		pte_install_uffd_wp_if_needed(vma, address, pvmw.pte, pteval);
1807
1808		/* Set the dirty flag on the folio now the pte is gone. */
1809		if (pte_dirty(pteval))
1810			folio_mark_dirty(folio);
1811
1812		/* Update high watermark before we lower rss */
1813		update_hiwater_rss(mm);
1814
1815		if (PageHWPoison(subpage) && (flags & TTU_HWPOISON)) {
1816			pteval = swp_entry_to_pte(make_hwpoison_entry(subpage));
1817			if (folio_test_hugetlb(folio)) {
1818				hugetlb_count_sub(folio_nr_pages(folio), mm);
1819				set_huge_pte_at(mm, address, pvmw.pte, pteval,
1820						hsz);
 
1821			} else {
1822				dec_mm_counter(mm, mm_counter(folio));
1823				set_pte_at(mm, address, pvmw.pte, pteval);
1824			}
1825
1826		} else if (pte_unused(pteval) && !userfaultfd_armed(vma)) {
1827			/*
1828			 * The guest indicated that the page content is of no
1829			 * interest anymore. Simply discard the pte, vmscan
1830			 * will take care of the rest.
1831			 * A future reference will then fault in a new zero
1832			 * page. When userfaultfd is active, we must not drop
1833			 * this page though, as its main user (postcopy
1834			 * migration) will not expect userfaults on already
1835			 * copied pages.
1836			 */
1837			dec_mm_counter(mm, mm_counter(folio));
1838		} else if (folio_test_anon(folio)) {
1839			swp_entry_t entry = page_swap_entry(subpage);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1840			pte_t swp_pte;
1841			/*
1842			 * Store the swap location in the pte.
1843			 * See handle_pte_fault() ...
1844			 */
1845			if (unlikely(folio_test_swapbacked(folio) !=
1846					folio_test_swapcache(folio))) {
1847				WARN_ON_ONCE(1);
1848				goto walk_abort;
 
 
 
 
 
1849			}
1850
1851			/* MADV_FREE page check */
1852			if (!folio_test_swapbacked(folio)) {
1853				int ref_count, map_count;
1854
1855				/*
1856				 * Synchronize with gup_pte_range():
1857				 * - clear PTE; barrier; read refcount
1858				 * - inc refcount; barrier; read PTE
1859				 */
1860				smp_mb();
1861
1862				ref_count = folio_ref_count(folio);
1863				map_count = folio_mapcount(folio);
1864
1865				/*
1866				 * Order reads for page refcount and dirty flag
1867				 * (see comments in __remove_mapping()).
1868				 */
1869				smp_rmb();
1870
1871				/*
1872				 * The only page refs must be one from isolation
1873				 * plus the rmap(s) (dropped by discard:).
1874				 */
1875				if (ref_count == 1 + map_count &&
1876				    (!folio_test_dirty(folio) ||
1877				     /*
1878				      * Unlike MADV_FREE mappings, VM_DROPPABLE
1879				      * ones can be dropped even if they've
1880				      * been dirtied.
1881				      */
1882				     (vma->vm_flags & VM_DROPPABLE))) {
1883					dec_mm_counter(mm, MM_ANONPAGES);
1884					goto discard;
1885				}
1886
1887				/*
1888				 * If the folio was redirtied, it cannot be
1889				 * discarded. Remap the page to page table.
1890				 */
1891				set_pte_at(mm, address, pvmw.pte, pteval);
1892				/*
1893				 * Unlike MADV_FREE mappings, VM_DROPPABLE ones
1894				 * never get swap backed on failure to drop.
1895				 */
1896				if (!(vma->vm_flags & VM_DROPPABLE))
1897					folio_set_swapbacked(folio);
1898				goto walk_abort;
1899			}
1900
1901			if (swap_duplicate(entry) < 0) {
1902				set_pte_at(mm, address, pvmw.pte, pteval);
1903				goto walk_abort;
 
 
1904			}
1905			if (arch_unmap_one(mm, vma, address, pteval) < 0) {
1906				swap_free(entry);
1907				set_pte_at(mm, address, pvmw.pte, pteval);
1908				goto walk_abort;
1909			}
1910
1911			/* See folio_try_share_anon_rmap(): clear PTE first. */
1912			if (anon_exclusive &&
1913			    folio_try_share_anon_rmap_pte(folio, subpage)) {
1914				swap_free(entry);
1915				set_pte_at(mm, address, pvmw.pte, pteval);
1916				goto walk_abort;
1917			}
1918			if (list_empty(&mm->mmlist)) {
1919				spin_lock(&mmlist_lock);
1920				if (list_empty(&mm->mmlist))
1921					list_add(&mm->mmlist, &init_mm.mmlist);
1922				spin_unlock(&mmlist_lock);
1923			}
1924			dec_mm_counter(mm, MM_ANONPAGES);
1925			inc_mm_counter(mm, MM_SWAPENTS);
1926			swp_pte = swp_entry_to_pte(entry);
1927			if (anon_exclusive)
1928				swp_pte = pte_swp_mkexclusive(swp_pte);
1929			if (pte_soft_dirty(pteval))
1930				swp_pte = pte_swp_mksoft_dirty(swp_pte);
1931			if (pte_uffd_wp(pteval))
1932				swp_pte = pte_swp_mkuffd_wp(swp_pte);
1933			set_pte_at(mm, address, pvmw.pte, swp_pte);
 
 
 
1934		} else {
1935			/*
1936			 * This is a locked file-backed folio,
1937			 * so it cannot be removed from the page
1938			 * cache and replaced by a new folio before
1939			 * mmu_notifier_invalidate_range_end, so no
1940			 * concurrent thread might update its page table
1941			 * to point at a new folio while a device is
1942			 * still using this folio.
1943			 *
1944			 * See Documentation/mm/mmu_notifier.rst
1945			 */
1946			dec_mm_counter(mm, mm_counter_file(folio));
1947		}
1948discard:
1949		if (unlikely(folio_test_hugetlb(folio)))
1950			hugetlb_remove_rmap(folio);
1951		else
1952			folio_remove_rmap_pte(folio, subpage, vma);
1953		if (vma->vm_flags & VM_LOCKED)
1954			mlock_drain_local();
1955		folio_put(folio);
1956		continue;
1957walk_abort:
1958		ret = false;
1959walk_done:
1960		page_vma_mapped_walk_done(&pvmw);
1961		break;
1962	}
1963
1964	mmu_notifier_invalidate_range_end(&range);
1965
1966	return ret;
1967}
1968
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1969static bool invalid_migration_vma(struct vm_area_struct *vma, void *arg)
1970{
1971	return vma_is_temporary_stack(vma);
1972}
1973
1974static int folio_not_mapped(struct folio *folio)
1975{
1976	return !folio_mapped(folio);
1977}
1978
1979/**
1980 * try_to_unmap - Try to remove all page table mappings to a folio.
1981 * @folio: The folio to unmap.
1982 * @flags: action and flags
1983 *
1984 * Tries to remove all the page table entries which are mapping this
1985 * folio.  It is the caller's responsibility to check if the folio is
1986 * still mapped if needed (use TTU_SYNC to prevent accounting races).
1987 *
1988 * Context: Caller must hold the folio lock.
1989 */
1990void try_to_unmap(struct folio *folio, enum ttu_flags flags)
1991{
1992	struct rmap_walk_control rwc = {
1993		.rmap_one = try_to_unmap_one,
1994		.arg = (void *)flags,
1995		.done = folio_not_mapped,
1996		.anon_lock = folio_lock_anon_vma_read,
1997	};
1998
1999	if (flags & TTU_RMAP_LOCKED)
2000		rmap_walk_locked(folio, &rwc);
2001	else
2002		rmap_walk(folio, &rwc);
2003}
2004
2005/*
2006 * @arg: enum ttu_flags will be passed to this argument.
2007 *
2008 * If TTU_SPLIT_HUGE_PMD is specified any PMD mappings will be split into PTEs
2009 * containing migration entries.
2010 */
2011static bool try_to_migrate_one(struct folio *folio, struct vm_area_struct *vma,
2012		     unsigned long address, void *arg)
2013{
2014	struct mm_struct *mm = vma->vm_mm;
2015	DEFINE_FOLIO_VMA_WALK(pvmw, folio, vma, address, 0);
2016	pte_t pteval;
2017	struct page *subpage;
2018	bool anon_exclusive, ret = true;
2019	struct mmu_notifier_range range;
2020	enum ttu_flags flags = (enum ttu_flags)(long)arg;
2021	unsigned long pfn;
2022	unsigned long hsz = 0;
2023
2024	/*
2025	 * When racing against e.g. zap_pte_range() on another cpu,
2026	 * in between its ptep_get_and_clear_full() and folio_remove_rmap_*(),
2027	 * try_to_migrate() may return before page_mapped() has become false,
2028	 * if page table locking is skipped: use TTU_SYNC to wait for that.
2029	 */
2030	if (flags & TTU_SYNC)
2031		pvmw.flags = PVMW_SYNC;
2032
2033	/*
2034	 * unmap_page() in mm/huge_memory.c is the only user of migration with
2035	 * TTU_SPLIT_HUGE_PMD and it wants to freeze.
2036	 */
2037	if (flags & TTU_SPLIT_HUGE_PMD)
2038		split_huge_pmd_address(vma, address, true, folio);
2039
2040	/*
2041	 * For THP, we have to assume the worse case ie pmd for invalidation.
2042	 * For hugetlb, it could be much worse if we need to do pud
2043	 * invalidation in the case of pmd sharing.
2044	 *
2045	 * Note that the page can not be free in this function as call of
2046	 * try_to_unmap() must hold a reference on the page.
2047	 */
2048	range.end = vma_address_end(&pvmw);
2049	mmu_notifier_range_init(&range, MMU_NOTIFY_CLEAR, 0, vma->vm_mm,
2050				address, range.end);
2051	if (folio_test_hugetlb(folio)) {
2052		/*
2053		 * If sharing is possible, start and end will be adjusted
2054		 * accordingly.
2055		 */
2056		adjust_range_if_pmd_sharing_possible(vma, &range.start,
2057						     &range.end);
2058
2059		/* We need the huge page size for set_huge_pte_at() */
2060		hsz = huge_page_size(hstate_vma(vma));
2061	}
2062	mmu_notifier_invalidate_range_start(&range);
2063
2064	while (page_vma_mapped_walk(&pvmw)) {
2065#ifdef CONFIG_ARCH_ENABLE_THP_MIGRATION
2066		/* PMD-mapped THP migration entry */
2067		if (!pvmw.pte) {
2068			subpage = folio_page(folio,
2069				pmd_pfn(*pvmw.pmd) - folio_pfn(folio));
2070			VM_BUG_ON_FOLIO(folio_test_hugetlb(folio) ||
2071					!folio_test_pmd_mappable(folio), folio);
2072
2073			if (set_pmd_migration_entry(&pvmw, subpage)) {
2074				ret = false;
2075				page_vma_mapped_walk_done(&pvmw);
2076				break;
2077			}
2078			continue;
2079		}
2080#endif
2081
2082		/* Unexpected PMD-mapped THP? */
2083		VM_BUG_ON_FOLIO(!pvmw.pte, folio);
2084
2085		pfn = pte_pfn(ptep_get(pvmw.pte));
2086
2087		if (folio_is_zone_device(folio)) {
2088			/*
2089			 * Our PTE is a non-present device exclusive entry and
2090			 * calculating the subpage as for the common case would
2091			 * result in an invalid pointer.
2092			 *
2093			 * Since only PAGE_SIZE pages can currently be
2094			 * migrated, just set it to page. This will need to be
2095			 * changed when hugepage migrations to device private
2096			 * memory are supported.
2097			 */
2098			VM_BUG_ON_FOLIO(folio_nr_pages(folio) > 1, folio);
2099			subpage = &folio->page;
2100		} else {
2101			subpage = folio_page(folio, pfn - folio_pfn(folio));
2102		}
2103		address = pvmw.address;
2104		anon_exclusive = folio_test_anon(folio) &&
2105				 PageAnonExclusive(subpage);
2106
2107		if (folio_test_hugetlb(folio)) {
2108			bool anon = folio_test_anon(folio);
2109
2110			/*
2111			 * huge_pmd_unshare may unmap an entire PMD page.
2112			 * There is no way of knowing exactly which PMDs may
2113			 * be cached for this mm, so we must flush them all.
2114			 * start/end were already adjusted above to cover this
2115			 * range.
2116			 */
2117			flush_cache_range(vma, range.start, range.end);
2118
2119			/*
2120			 * To call huge_pmd_unshare, i_mmap_rwsem must be
2121			 * held in write mode.  Caller needs to explicitly
2122			 * do this outside rmap routines.
2123			 *
2124			 * We also must hold hugetlb vma_lock in write mode.
2125			 * Lock order dictates acquiring vma_lock BEFORE
2126			 * i_mmap_rwsem.  We can only try lock here and
2127			 * fail if unsuccessful.
2128			 */
2129			if (!anon) {
2130				VM_BUG_ON(!(flags & TTU_RMAP_LOCKED));
2131				if (!hugetlb_vma_trylock_write(vma)) {
2132					page_vma_mapped_walk_done(&pvmw);
2133					ret = false;
2134					break;
2135				}
2136				if (huge_pmd_unshare(mm, vma, address, pvmw.pte)) {
2137					hugetlb_vma_unlock_write(vma);
2138					flush_tlb_range(vma,
2139						range.start, range.end);
2140
2141					/*
2142					 * The ref count of the PMD page was
2143					 * dropped which is part of the way map
2144					 * counting is done for shared PMDs.
2145					 * Return 'true' here.  When there is
2146					 * no other sharing, huge_pmd_unshare
2147					 * returns false and we will unmap the
2148					 * actual page and drop map count
2149					 * to zero.
2150					 */
2151					page_vma_mapped_walk_done(&pvmw);
2152					break;
2153				}
2154				hugetlb_vma_unlock_write(vma);
2155			}
2156			/* Nuke the hugetlb page table entry */
2157			pteval = huge_ptep_clear_flush(vma, address, pvmw.pte);
2158		} else {
2159			flush_cache_page(vma, address, pfn);
2160			/* Nuke the page table entry. */
2161			if (should_defer_flush(mm, flags)) {
2162				/*
2163				 * We clear the PTE but do not flush so potentially
2164				 * a remote CPU could still be writing to the folio.
2165				 * If the entry was previously clean then the
2166				 * architecture must guarantee that a clear->dirty
2167				 * transition on a cached TLB entry is written through
2168				 * and traps if the PTE is unmapped.
2169				 */
2170				pteval = ptep_get_and_clear(mm, address, pvmw.pte);
2171
2172				set_tlb_ubc_flush_pending(mm, pteval, address);
2173			} else {
2174				pteval = ptep_clear_flush(vma, address, pvmw.pte);
2175			}
2176		}
2177
2178		/* Set the dirty flag on the folio now the pte is gone. */
2179		if (pte_dirty(pteval))
2180			folio_mark_dirty(folio);
2181
2182		/* Update high watermark before we lower rss */
2183		update_hiwater_rss(mm);
2184
2185		if (folio_is_device_private(folio)) {
2186			unsigned long pfn = folio_pfn(folio);
2187			swp_entry_t entry;
2188			pte_t swp_pte;
2189
2190			if (anon_exclusive)
2191				WARN_ON_ONCE(folio_try_share_anon_rmap_pte(folio,
2192									   subpage));
2193
2194			/*
2195			 * Store the pfn of the page in a special migration
2196			 * pte. do_swap_page() will wait until the migration
2197			 * pte is removed and then restart fault handling.
2198			 */
2199			entry = pte_to_swp_entry(pteval);
2200			if (is_writable_device_private_entry(entry))
2201				entry = make_writable_migration_entry(pfn);
2202			else if (anon_exclusive)
2203				entry = make_readable_exclusive_migration_entry(pfn);
2204			else
2205				entry = make_readable_migration_entry(pfn);
2206			swp_pte = swp_entry_to_pte(entry);
2207
2208			/*
2209			 * pteval maps a zone device page and is therefore
2210			 * a swap pte.
2211			 */
2212			if (pte_swp_soft_dirty(pteval))
2213				swp_pte = pte_swp_mksoft_dirty(swp_pte);
2214			if (pte_swp_uffd_wp(pteval))
2215				swp_pte = pte_swp_mkuffd_wp(swp_pte);
2216			set_pte_at(mm, pvmw.address, pvmw.pte, swp_pte);
2217			trace_set_migration_pte(pvmw.address, pte_val(swp_pte),
2218						folio_order(folio));
2219			/*
2220			 * No need to invalidate here it will synchronize on
2221			 * against the special swap migration pte.
2222			 */
2223		} else if (PageHWPoison(subpage)) {
2224			pteval = swp_entry_to_pte(make_hwpoison_entry(subpage));
2225			if (folio_test_hugetlb(folio)) {
2226				hugetlb_count_sub(folio_nr_pages(folio), mm);
2227				set_huge_pte_at(mm, address, pvmw.pte, pteval,
2228						hsz);
2229			} else {
2230				dec_mm_counter(mm, mm_counter(folio));
2231				set_pte_at(mm, address, pvmw.pte, pteval);
2232			}
2233
2234		} else if (pte_unused(pteval) && !userfaultfd_armed(vma)) {
2235			/*
2236			 * The guest indicated that the page content is of no
2237			 * interest anymore. Simply discard the pte, vmscan
2238			 * will take care of the rest.
2239			 * A future reference will then fault in a new zero
2240			 * page. When userfaultfd is active, we must not drop
2241			 * this page though, as its main user (postcopy
2242			 * migration) will not expect userfaults on already
2243			 * copied pages.
2244			 */
2245			dec_mm_counter(mm, mm_counter(folio));
2246		} else {
2247			swp_entry_t entry;
2248			pte_t swp_pte;
2249
2250			if (arch_unmap_one(mm, vma, address, pteval) < 0) {
2251				if (folio_test_hugetlb(folio))
2252					set_huge_pte_at(mm, address, pvmw.pte,
2253							pteval, hsz);
2254				else
2255					set_pte_at(mm, address, pvmw.pte, pteval);
2256				ret = false;
2257				page_vma_mapped_walk_done(&pvmw);
2258				break;
2259			}
2260			VM_BUG_ON_PAGE(pte_write(pteval) && folio_test_anon(folio) &&
2261				       !anon_exclusive, subpage);
2262
2263			/* See folio_try_share_anon_rmap_pte(): clear PTE first. */
2264			if (folio_test_hugetlb(folio)) {
2265				if (anon_exclusive &&
2266				    hugetlb_try_share_anon_rmap(folio)) {
2267					set_huge_pte_at(mm, address, pvmw.pte,
2268							pteval, hsz);
2269					ret = false;
2270					page_vma_mapped_walk_done(&pvmw);
2271					break;
2272				}
2273			} else if (anon_exclusive &&
2274				   folio_try_share_anon_rmap_pte(folio, subpage)) {
2275				set_pte_at(mm, address, pvmw.pte, pteval);
2276				ret = false;
2277				page_vma_mapped_walk_done(&pvmw);
2278				break;
2279			}
2280
2281			/*
2282			 * Store the pfn of the page in a special migration
2283			 * pte. do_swap_page() will wait until the migration
2284			 * pte is removed and then restart fault handling.
2285			 */
2286			if (pte_write(pteval))
2287				entry = make_writable_migration_entry(
2288							page_to_pfn(subpage));
2289			else if (anon_exclusive)
2290				entry = make_readable_exclusive_migration_entry(
2291							page_to_pfn(subpage));
2292			else
2293				entry = make_readable_migration_entry(
2294							page_to_pfn(subpage));
2295			if (pte_young(pteval))
2296				entry = make_migration_entry_young(entry);
2297			if (pte_dirty(pteval))
2298				entry = make_migration_entry_dirty(entry);
2299			swp_pte = swp_entry_to_pte(entry);
2300			if (pte_soft_dirty(pteval))
2301				swp_pte = pte_swp_mksoft_dirty(swp_pte);
2302			if (pte_uffd_wp(pteval))
2303				swp_pte = pte_swp_mkuffd_wp(swp_pte);
2304			if (folio_test_hugetlb(folio))
2305				set_huge_pte_at(mm, address, pvmw.pte, swp_pte,
2306						hsz);
2307			else
2308				set_pte_at(mm, address, pvmw.pte, swp_pte);
2309			trace_set_migration_pte(address, pte_val(swp_pte),
2310						folio_order(folio));
2311			/*
2312			 * No need to invalidate here it will synchronize on
2313			 * against the special swap migration pte.
2314			 */
2315		}
2316
2317		if (unlikely(folio_test_hugetlb(folio)))
2318			hugetlb_remove_rmap(folio);
2319		else
2320			folio_remove_rmap_pte(folio, subpage, vma);
2321		if (vma->vm_flags & VM_LOCKED)
2322			mlock_drain_local();
2323		folio_put(folio);
2324	}
2325
2326	mmu_notifier_invalidate_range_end(&range);
2327
2328	return ret;
2329}
2330
2331/**
2332 * try_to_migrate - try to replace all page table mappings with swap entries
2333 * @folio: the folio to replace page table entries for
2334 * @flags: action and flags
2335 *
2336 * Tries to remove all the page table entries which are mapping this folio and
2337 * replace them with special swap entries. Caller must hold the folio lock.
2338 */
2339void try_to_migrate(struct folio *folio, enum ttu_flags flags)
2340{
2341	struct rmap_walk_control rwc = {
2342		.rmap_one = try_to_migrate_one,
2343		.arg = (void *)flags,
2344		.done = folio_not_mapped,
2345		.anon_lock = folio_lock_anon_vma_read,
2346	};
2347
2348	/*
2349	 * Migration always ignores mlock and only supports TTU_RMAP_LOCKED and
2350	 * TTU_SPLIT_HUGE_PMD, TTU_SYNC, and TTU_BATCH_FLUSH flags.
2351	 */
2352	if (WARN_ON_ONCE(flags & ~(TTU_RMAP_LOCKED | TTU_SPLIT_HUGE_PMD |
2353					TTU_SYNC | TTU_BATCH_FLUSH)))
2354		return;
2355
2356	if (folio_is_zone_device(folio) &&
2357	    (!folio_is_device_private(folio) && !folio_is_device_coherent(folio)))
2358		return;
2359
2360	/*
2361	 * During exec, a temporary VMA is setup and later moved.
2362	 * The VMA is moved under the anon_vma lock but not the
2363	 * page tables leading to a race where migration cannot
2364	 * find the migration ptes. Rather than increasing the
2365	 * locking requirements of exec(), migration skips
2366	 * temporary VMAs until after exec() completes.
2367	 */
2368	if (!folio_test_ksm(folio) && folio_test_anon(folio))
 
2369		rwc.invalid_vma = invalid_migration_vma;
2370
2371	if (flags & TTU_RMAP_LOCKED)
2372		rmap_walk_locked(folio, &rwc);
2373	else
2374		rmap_walk(folio, &rwc);
 
 
2375}
2376
2377#ifdef CONFIG_DEVICE_PRIVATE
2378struct make_exclusive_args {
2379	struct mm_struct *mm;
2380	unsigned long address;
2381	void *owner;
2382	bool valid;
2383};
2384
2385static bool page_make_device_exclusive_one(struct folio *folio,
2386		struct vm_area_struct *vma, unsigned long address, void *priv)
2387{
2388	struct mm_struct *mm = vma->vm_mm;
2389	DEFINE_FOLIO_VMA_WALK(pvmw, folio, vma, address, 0);
2390	struct make_exclusive_args *args = priv;
2391	pte_t pteval;
2392	struct page *subpage;
2393	bool ret = true;
2394	struct mmu_notifier_range range;
2395	swp_entry_t entry;
2396	pte_t swp_pte;
2397	pte_t ptent;
2398
2399	mmu_notifier_range_init_owner(&range, MMU_NOTIFY_EXCLUSIVE, 0,
2400				      vma->vm_mm, address, min(vma->vm_end,
2401				      address + folio_size(folio)),
2402				      args->owner);
2403	mmu_notifier_invalidate_range_start(&range);
2404
2405	while (page_vma_mapped_walk(&pvmw)) {
2406		/* Unexpected PMD-mapped THP? */
2407		VM_BUG_ON_FOLIO(!pvmw.pte, folio);
2408
2409		ptent = ptep_get(pvmw.pte);
2410		if (!pte_present(ptent)) {
2411			ret = false;
2412			page_vma_mapped_walk_done(&pvmw);
2413			break;
2414		}
2415
2416		subpage = folio_page(folio,
2417				pte_pfn(ptent) - folio_pfn(folio));
2418		address = pvmw.address;
2419
2420		/* Nuke the page table entry. */
2421		flush_cache_page(vma, address, pte_pfn(ptent));
2422		pteval = ptep_clear_flush(vma, address, pvmw.pte);
2423
2424		/* Set the dirty flag on the folio now the pte is gone. */
2425		if (pte_dirty(pteval))
2426			folio_mark_dirty(folio);
2427
2428		/*
2429		 * Check that our target page is still mapped at the expected
2430		 * address.
2431		 */
2432		if (args->mm == mm && args->address == address &&
2433		    pte_write(pteval))
2434			args->valid = true;
2435
2436		/*
2437		 * Store the pfn of the page in a special migration
2438		 * pte. do_swap_page() will wait until the migration
2439		 * pte is removed and then restart fault handling.
2440		 */
2441		if (pte_write(pteval))
2442			entry = make_writable_device_exclusive_entry(
2443							page_to_pfn(subpage));
2444		else
2445			entry = make_readable_device_exclusive_entry(
2446							page_to_pfn(subpage));
2447		swp_pte = swp_entry_to_pte(entry);
2448		if (pte_soft_dirty(pteval))
2449			swp_pte = pte_swp_mksoft_dirty(swp_pte);
2450		if (pte_uffd_wp(pteval))
2451			swp_pte = pte_swp_mkuffd_wp(swp_pte);
2452
2453		set_pte_at(mm, address, pvmw.pte, swp_pte);
2454
2455		/*
2456		 * There is a reference on the page for the swap entry which has
2457		 * been removed, so shouldn't take another.
2458		 */
2459		folio_remove_rmap_pte(folio, subpage, vma);
2460	}
2461
2462	mmu_notifier_invalidate_range_end(&range);
2463
2464	return ret;
2465}
2466
2467/**
2468 * folio_make_device_exclusive - Mark the folio exclusively owned by a device.
2469 * @folio: The folio to replace page table entries for.
2470 * @mm: The mm_struct where the folio is expected to be mapped.
2471 * @address: Address where the folio is expected to be mapped.
2472 * @owner: passed to MMU_NOTIFY_EXCLUSIVE range notifier callbacks
2473 *
2474 * Tries to remove all the page table entries which are mapping this
2475 * folio and replace them with special device exclusive swap entries to
2476 * grant a device exclusive access to the folio.
2477 *
2478 * Context: Caller must hold the folio lock.
2479 * Return: false if the page is still mapped, or if it could not be unmapped
2480 * from the expected address. Otherwise returns true (success).
2481 */
2482static bool folio_make_device_exclusive(struct folio *folio,
2483		struct mm_struct *mm, unsigned long address, void *owner)
2484{
2485	struct make_exclusive_args args = {
2486		.mm = mm,
2487		.address = address,
2488		.owner = owner,
2489		.valid = false,
2490	};
2491	struct rmap_walk_control rwc = {
2492		.rmap_one = page_make_device_exclusive_one,
2493		.done = folio_not_mapped,
2494		.anon_lock = folio_lock_anon_vma_read,
2495		.arg = &args,
 
2496	};
2497
2498	/*
2499	 * Restrict to anonymous folios for now to avoid potential writeback
2500	 * issues.
2501	 */
2502	if (!folio_test_anon(folio))
2503		return false;
2504
2505	rmap_walk(folio, &rwc);
2506
2507	return args.valid && !folio_mapcount(folio);
2508}
2509
2510/**
2511 * make_device_exclusive_range() - Mark a range for exclusive use by a device
2512 * @mm: mm_struct of associated target process
2513 * @start: start of the region to mark for exclusive device access
2514 * @end: end address of region
2515 * @pages: returns the pages which were successfully marked for exclusive access
2516 * @owner: passed to MMU_NOTIFY_EXCLUSIVE range notifier to allow filtering
2517 *
2518 * Returns: number of pages found in the range by GUP. A page is marked for
2519 * exclusive access only if the page pointer is non-NULL.
2520 *
2521 * This function finds ptes mapping page(s) to the given address range, locks
2522 * them and replaces mappings with special swap entries preventing userspace CPU
2523 * access. On fault these entries are replaced with the original mapping after
2524 * calling MMU notifiers.
2525 *
2526 * A driver using this to program access from a device must use a mmu notifier
2527 * critical section to hold a device specific lock during programming. Once
2528 * programming is complete it should drop the page lock and reference after
2529 * which point CPU access to the page will revoke the exclusive access.
2530 */
2531int make_device_exclusive_range(struct mm_struct *mm, unsigned long start,
2532				unsigned long end, struct page **pages,
2533				void *owner)
2534{
2535	long npages = (end - start) >> PAGE_SHIFT;
2536	long i;
2537
2538	npages = get_user_pages_remote(mm, start, npages,
2539				       FOLL_GET | FOLL_WRITE | FOLL_SPLIT_PMD,
2540				       pages, NULL);
2541	if (npages < 0)
2542		return npages;
2543
2544	for (i = 0; i < npages; i++, start += PAGE_SIZE) {
2545		struct folio *folio = page_folio(pages[i]);
2546		if (PageTail(pages[i]) || !folio_trylock(folio)) {
2547			folio_put(folio);
2548			pages[i] = NULL;
2549			continue;
2550		}
2551
2552		if (!folio_make_device_exclusive(folio, mm, start, owner)) {
2553			folio_unlock(folio);
2554			folio_put(folio);
2555			pages[i] = NULL;
2556		}
2557	}
2558
2559	return npages;
2560}
2561EXPORT_SYMBOL_GPL(make_device_exclusive_range);
2562#endif
2563
2564void __put_anon_vma(struct anon_vma *anon_vma)
2565{
2566	struct anon_vma *root = anon_vma->root;
2567
2568	anon_vma_free(anon_vma);
2569	if (root != anon_vma && atomic_dec_and_test(&root->refcount))
2570		anon_vma_free(root);
2571}
2572
2573static struct anon_vma *rmap_walk_anon_lock(const struct folio *folio,
2574					    struct rmap_walk_control *rwc)
2575{
2576	struct anon_vma *anon_vma;
2577
2578	if (rwc->anon_lock)
2579		return rwc->anon_lock(folio, rwc);
2580
2581	/*
2582	 * Note: remove_migration_ptes() cannot use folio_lock_anon_vma_read()
2583	 * because that depends on page_mapped(); but not all its usages
2584	 * are holding mmap_lock. Users without mmap_lock are required to
2585	 * take a reference count to prevent the anon_vma disappearing
2586	 */
2587	anon_vma = folio_anon_vma(folio);
2588	if (!anon_vma)
2589		return NULL;
2590
2591	if (anon_vma_trylock_read(anon_vma))
2592		goto out;
2593
2594	if (rwc->try_lock) {
2595		anon_vma = NULL;
2596		rwc->contended = true;
2597		goto out;
2598	}
2599
2600	anon_vma_lock_read(anon_vma);
2601out:
2602	return anon_vma;
2603}
2604
2605/*
2606 * rmap_walk_anon - do something to anonymous page using the object-based
2607 * rmap method
2608 * @folio: the folio to be handled
2609 * @rwc: control variable according to each walk type
2610 * @locked: caller holds relevant rmap lock
2611 *
2612 * Find all the mappings of a folio using the mapping pointer and the vma
2613 * chains contained in the anon_vma struct it points to.
 
 
 
 
 
2614 */
2615static void rmap_walk_anon(struct folio *folio,
2616		struct rmap_walk_control *rwc, bool locked)
2617{
2618	struct anon_vma *anon_vma;
2619	pgoff_t pgoff_start, pgoff_end;
2620	struct anon_vma_chain *avc;
2621
2622	if (locked) {
2623		anon_vma = folio_anon_vma(folio);
2624		/* anon_vma disappear under us? */
2625		VM_BUG_ON_FOLIO(!anon_vma, folio);
2626	} else {
2627		anon_vma = rmap_walk_anon_lock(folio, rwc);
2628	}
2629	if (!anon_vma)
2630		return;
2631
2632	pgoff_start = folio_pgoff(folio);
2633	pgoff_end = pgoff_start + folio_nr_pages(folio) - 1;
2634	anon_vma_interval_tree_foreach(avc, &anon_vma->rb_root,
2635			pgoff_start, pgoff_end) {
2636		struct vm_area_struct *vma = avc->vma;
2637		unsigned long address = vma_address(vma, pgoff_start,
2638				folio_nr_pages(folio));
2639
2640		VM_BUG_ON_VMA(address == -EFAULT, vma);
2641		cond_resched();
2642
2643		if (rwc->invalid_vma && rwc->invalid_vma(vma, rwc->arg))
2644			continue;
2645
2646		if (!rwc->rmap_one(folio, vma, address, rwc->arg))
2647			break;
2648		if (rwc->done && rwc->done(folio))
2649			break;
2650	}
2651
2652	if (!locked)
2653		anon_vma_unlock_read(anon_vma);
2654}
2655
2656/*
2657 * rmap_walk_file - do something to file page using the object-based rmap method
2658 * @folio: the folio to be handled
2659 * @rwc: control variable according to each walk type
2660 * @locked: caller holds relevant rmap lock
2661 *
2662 * Find all the mappings of a folio using the mapping pointer and the vma chains
2663 * contained in the address_space struct it points to.
 
 
 
 
 
2664 */
2665static void rmap_walk_file(struct folio *folio,
2666		struct rmap_walk_control *rwc, bool locked)
2667{
2668	struct address_space *mapping = folio_mapping(folio);
2669	pgoff_t pgoff_start, pgoff_end;
2670	struct vm_area_struct *vma;
2671
2672	/*
2673	 * The page lock not only makes sure that page->mapping cannot
2674	 * suddenly be NULLified by truncation, it makes sure that the
2675	 * structure at mapping cannot be freed and reused yet,
2676	 * so we can safely take mapping->i_mmap_rwsem.
2677	 */
2678	VM_BUG_ON_FOLIO(!folio_test_locked(folio), folio);
2679
2680	if (!mapping)
2681		return;
2682
2683	pgoff_start = folio_pgoff(folio);
2684	pgoff_end = pgoff_start + folio_nr_pages(folio) - 1;
2685	if (!locked) {
2686		if (i_mmap_trylock_read(mapping))
2687			goto lookup;
2688
2689		if (rwc->try_lock) {
2690			rwc->contended = true;
2691			return;
2692		}
2693
2694		i_mmap_lock_read(mapping);
2695	}
2696lookup:
2697	vma_interval_tree_foreach(vma, &mapping->i_mmap,
2698			pgoff_start, pgoff_end) {
2699		unsigned long address = vma_address(vma, pgoff_start,
2700			       folio_nr_pages(folio));
2701
2702		VM_BUG_ON_VMA(address == -EFAULT, vma);
2703		cond_resched();
2704
2705		if (rwc->invalid_vma && rwc->invalid_vma(vma, rwc->arg))
2706			continue;
2707
2708		if (!rwc->rmap_one(folio, vma, address, rwc->arg))
2709			goto done;
2710		if (rwc->done && rwc->done(folio))
2711			goto done;
2712	}
2713
2714done:
2715	if (!locked)
2716		i_mmap_unlock_read(mapping);
2717}
2718
2719void rmap_walk(struct folio *folio, struct rmap_walk_control *rwc)
2720{
2721	if (unlikely(folio_test_ksm(folio)))
2722		rmap_walk_ksm(folio, rwc);
2723	else if (folio_test_anon(folio))
2724		rmap_walk_anon(folio, rwc, false);
2725	else
2726		rmap_walk_file(folio, rwc, false);
2727}
2728
2729/* Like rmap_walk, but caller holds relevant rmap lock */
2730void rmap_walk_locked(struct folio *folio, struct rmap_walk_control *rwc)
2731{
2732	/* no ksm support for now */
2733	VM_BUG_ON_FOLIO(folio_test_ksm(folio), folio);
2734	if (folio_test_anon(folio))
2735		rmap_walk_anon(folio, rwc, true);
2736	else
2737		rmap_walk_file(folio, rwc, true);
2738}
2739
2740#ifdef CONFIG_HUGETLB_PAGE
2741/*
2742 * The following two functions are for anonymous (private mapped) hugepages.
2743 * Unlike common anonymous pages, anonymous hugepages have no accounting code
2744 * and no lru code, because we handle hugepages differently from common pages.
2745 */
2746void hugetlb_add_anon_rmap(struct folio *folio, struct vm_area_struct *vma,
2747		unsigned long address, rmap_t flags)
2748{
2749	VM_WARN_ON_FOLIO(!folio_test_hugetlb(folio), folio);
2750	VM_WARN_ON_FOLIO(!folio_test_anon(folio), folio);
2751
2752	atomic_inc(&folio->_entire_mapcount);
2753	atomic_inc(&folio->_large_mapcount);
2754	if (flags & RMAP_EXCLUSIVE)
2755		SetPageAnonExclusive(&folio->page);
2756	VM_WARN_ON_FOLIO(folio_entire_mapcount(folio) > 1 &&
2757			 PageAnonExclusive(&folio->page), folio);
2758}
2759
2760void hugetlb_add_new_anon_rmap(struct folio *folio,
2761		struct vm_area_struct *vma, unsigned long address)
2762{
2763	VM_WARN_ON_FOLIO(!folio_test_hugetlb(folio), folio);
2764
2765	BUG_ON(address < vma->vm_start || address >= vma->vm_end);
2766	/* increment count (starts at -1) */
2767	atomic_set(&folio->_entire_mapcount, 0);
2768	atomic_set(&folio->_large_mapcount, 0);
2769	folio_clear_hugetlb_restore_reserve(folio);
2770	__folio_set_anon(folio, vma, address, true);
2771	SetPageAnonExclusive(&folio->page);
2772}
2773#endif /* CONFIG_HUGETLB_PAGE */