shmem.c 103.2 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8
/*
 * Resizable virtual memory filesystem for Linux.
 *
 * Copyright (C) 2000 Linus Torvalds.
 *		 2000 Transmeta Corp.
 *		 2000-2001 Christoph Rohland
 *		 2000-2001 SAP AG
 *		 2002 Red Hat Inc.
9 10
 * Copyright (C) 2002-2011 Hugh Dickins.
 * Copyright (C) 2011 Google Inc.
11
 * Copyright (C) 2002-2005 VERITAS Software Corporation.
L
Linus Torvalds 已提交
12 13 14 15 16 17
 * Copyright (C) 2004 Andi Kleen, SuSE Labs
 *
 * Extended attribute support for tmpfs:
 * Copyright (c) 2004, Luke Kenneth Casson Leighton <lkcl@lkcl.net>
 * Copyright (c) 2004 Red Hat, Inc., James Morris <jmorris@redhat.com>
 *
18 19 20
 * tiny-shmem:
 * Copyright (c) 2004, 2008 Matt Mackall <mpm@selenic.com>
 *
L
Linus Torvalds 已提交
21 22 23
 * This file is released under the GPL.
 */

24 25 26 27
#include <linux/fs.h>
#include <linux/init.h>
#include <linux/vfs.h>
#include <linux/mount.h>
A
Andrew Morton 已提交
28
#include <linux/ramfs.h>
H
Hugh Dickins 已提交
29
#include <linux/pagemap.h>
30 31
#include <linux/file.h>
#include <linux/mm.h>
32
#include <linux/random.h>
33
#include <linux/sched/signal.h>
34
#include <linux/export.h>
35
#include <linux/swap.h>
36
#include <linux/uio.h>
37
#include <linux/khugepaged.h>
38
#include <linux/hugetlb.h>
39

40 41
#include <asm/tlbflush.h> /* for arch/microblaze update_mmu_cache() */

42 43 44
static struct vfsmount *shm_mnt;

#ifdef CONFIG_SHMEM
L
Linus Torvalds 已提交
45 46 47 48 49 50
/*
 * This virtual memory filesystem is heavily based on the ramfs. It
 * extends ramfs by the ability to use swap and honor resource limits
 * which makes it a completely usable filesystem.
 */

51
#include <linux/xattr.h>
52
#include <linux/exportfs.h>
53
#include <linux/posix_acl.h>
C
Christoph Hellwig 已提交
54
#include <linux/posix_acl_xattr.h>
L
Linus Torvalds 已提交
55 56 57 58 59 60 61
#include <linux/mman.h>
#include <linux/string.h>
#include <linux/slab.h>
#include <linux/backing-dev.h>
#include <linux/shmem_fs.h>
#include <linux/writeback.h>
#include <linux/blkdev.h>
62
#include <linux/pagevec.h>
63
#include <linux/percpu_counter.h>
64
#include <linux/falloc.h>
65
#include <linux/splice.h>
L
Linus Torvalds 已提交
66 67 68 69
#include <linux/security.h>
#include <linux/swapops.h>
#include <linux/mempolicy.h>
#include <linux/namei.h>
70
#include <linux/ctype.h>
71
#include <linux/migrate.h>
72
#include <linux/highmem.h>
73
#include <linux/seq_file.h>
M
Mimi Zohar 已提交
74
#include <linux/magic.h>
D
David Herrmann 已提交
75
#include <linux/syscalls.h>
D
David Herrmann 已提交
76
#include <linux/fcntl.h>
D
David Herrmann 已提交
77
#include <uapi/linux/memfd.h>
78
#include <linux/userfaultfd_k.h>
79
#include <linux/rmap.h>
80
#include <linux/uuid.h>
81

82
#include <linux/uaccess.h>
L
Linus Torvalds 已提交
83 84
#include <asm/pgtable.h>

85 86
#include "internal.h"

87 88
#define BLOCKS_PER_PAGE  (PAGE_SIZE/512)
#define VM_ACCT(size)    (PAGE_ALIGN(size) >> PAGE_SHIFT)
L
Linus Torvalds 已提交
89 90 91 92

/* Pretend that each entry is of this size in directory's i_size */
#define BOGO_DIRENT_SIZE 20

93 94 95
/* Symlink up to this size is kmalloc'ed instead of using a swappable page */
#define SHORT_SYMLINK_LEN 128

96
/*
97 98 99
 * shmem_fallocate communicates with shmem_fault or shmem_writepage via
 * inode->i_private (with i_mutex making sure that it has only one user at
 * a time): we would prefer not to enlarge the shmem inode just for that.
100 101
 */
struct shmem_falloc {
102
	wait_queue_head_t *waitq; /* faults into hole wait for punch to end */
103 104 105 106 107 108
	pgoff_t start;		/* start of range currently being fallocated */
	pgoff_t next;		/* the next page offset to be fallocated */
	pgoff_t nr_falloced;	/* how many new pages have been fallocated */
	pgoff_t nr_unswapped;	/* how often writepage refused to swap out */
};

A
Andrew Morton 已提交
109
#ifdef CONFIG_TMPFS
110 111 112 113 114 115 116 117 118
static unsigned long shmem_default_max_blocks(void)
{
	return totalram_pages / 2;
}

static unsigned long shmem_default_max_inodes(void)
{
	return min(totalram_pages - totalhigh_pages, totalram_pages / 2);
}
A
Andrew Morton 已提交
119
#endif
120

121 122 123
static bool shmem_should_replace_page(struct page *page, gfp_t gfp);
static int shmem_replace_page(struct page **pagep, gfp_t gfp,
				struct shmem_inode_info *info, pgoff_t index);
124
static int shmem_getpage_gfp(struct inode *inode, pgoff_t index,
125
		struct page **pagep, enum sgp_type sgp,
126
		gfp_t gfp, struct vm_area_struct *vma,
127
		struct vm_fault *vmf, vm_fault_t *fault_type);
128

129
int shmem_getpage(struct inode *inode, pgoff_t index,
130
		struct page **pagep, enum sgp_type sgp)
131 132
{
	return shmem_getpage_gfp(inode, index, pagep, sgp,
133
		mapping_gfp_mask(inode->i_mapping), NULL, NULL, NULL);
134
}
L
Linus Torvalds 已提交
135 136 137 138 139 140 141 142 143 144 145 146 147 148

static inline struct shmem_sb_info *SHMEM_SB(struct super_block *sb)
{
	return sb->s_fs_info;
}

/*
 * shmem_file_setup pre-accounts the whole fixed size of a VM object,
 * for shared memory and for shared anonymous (/dev/zero) mappings
 * (unless MAP_NORESERVE and sysctl_overcommit_memory <= 1),
 * consistent with the pre-accounting of private mappings ...
 */
static inline int shmem_acct_size(unsigned long flags, loff_t size)
{
149
	return (flags & VM_NORESERVE) ?
150
		0 : security_vm_enough_memory_mm(current->mm, VM_ACCT(size));
L
Linus Torvalds 已提交
151 152 153 154
}

static inline void shmem_unacct_size(unsigned long flags, loff_t size)
{
155
	if (!(flags & VM_NORESERVE))
L
Linus Torvalds 已提交
156 157 158
		vm_unacct_memory(VM_ACCT(size));
}

159 160 161 162 163 164 165 166 167 168 169 170 171
static inline int shmem_reacct_size(unsigned long flags,
		loff_t oldsize, loff_t newsize)
{
	if (!(flags & VM_NORESERVE)) {
		if (VM_ACCT(newsize) > VM_ACCT(oldsize))
			return security_vm_enough_memory_mm(current->mm,
					VM_ACCT(newsize) - VM_ACCT(oldsize));
		else if (VM_ACCT(newsize) < VM_ACCT(oldsize))
			vm_unacct_memory(VM_ACCT(oldsize) - VM_ACCT(newsize));
	}
	return 0;
}

L
Linus Torvalds 已提交
172 173
/*
 * ... whereas tmpfs objects are accounted incrementally as
H
Hugh Dickins 已提交
174
 * pages are allocated, in order to allow large sparse files.
L
Linus Torvalds 已提交
175 176 177
 * shmem_getpage reports shmem_acct_block failure as -ENOSPC not -ENOMEM,
 * so that a failure on a sparse tmpfs mapping will give SIGBUS not OOM.
 */
178
static inline int shmem_acct_block(unsigned long flags, long pages)
L
Linus Torvalds 已提交
179
{
180 181 182 183 184
	if (!(flags & VM_NORESERVE))
		return 0;

	return security_vm_enough_memory_mm(current->mm,
			pages * VM_ACCT(PAGE_SIZE));
L
Linus Torvalds 已提交
185 186 187 188
}

static inline void shmem_unacct_blocks(unsigned long flags, long pages)
{
189
	if (flags & VM_NORESERVE)
190
		vm_unacct_memory(pages * VM_ACCT(PAGE_SIZE));
L
Linus Torvalds 已提交
191 192
}

193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224
static inline bool shmem_inode_acct_block(struct inode *inode, long pages)
{
	struct shmem_inode_info *info = SHMEM_I(inode);
	struct shmem_sb_info *sbinfo = SHMEM_SB(inode->i_sb);

	if (shmem_acct_block(info->flags, pages))
		return false;

	if (sbinfo->max_blocks) {
		if (percpu_counter_compare(&sbinfo->used_blocks,
					   sbinfo->max_blocks - pages) > 0)
			goto unacct;
		percpu_counter_add(&sbinfo->used_blocks, pages);
	}

	return true;

unacct:
	shmem_unacct_blocks(info->flags, pages);
	return false;
}

static inline void shmem_inode_unacct_blocks(struct inode *inode, long pages)
{
	struct shmem_inode_info *info = SHMEM_I(inode);
	struct shmem_sb_info *sbinfo = SHMEM_SB(inode->i_sb);

	if (sbinfo->max_blocks)
		percpu_counter_sub(&sbinfo->used_blocks, pages);
	shmem_unacct_blocks(info->flags, pages);
}

225
static const struct super_operations shmem_ops;
226
static const struct address_space_operations shmem_aops;
227
static const struct file_operations shmem_file_operations;
228 229 230
static const struct inode_operations shmem_inode_operations;
static const struct inode_operations shmem_dir_inode_operations;
static const struct inode_operations shmem_special_inode_operations;
231
static const struct vm_operations_struct shmem_vm_ops;
232
static struct file_system_type shmem_fs_type;
L
Linus Torvalds 已提交
233

234 235 236 237 238
bool vma_is_shmem(struct vm_area_struct *vma)
{
	return vma->vm_ops == &shmem_vm_ops;
}

L
Linus Torvalds 已提交
239
static LIST_HEAD(shmem_swaplist);
240
static DEFINE_MUTEX(shmem_swaplist_mutex);
L
Linus Torvalds 已提交
241

242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266
static int shmem_reserve_inode(struct super_block *sb)
{
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);
	if (sbinfo->max_inodes) {
		spin_lock(&sbinfo->stat_lock);
		if (!sbinfo->free_inodes) {
			spin_unlock(&sbinfo->stat_lock);
			return -ENOSPC;
		}
		sbinfo->free_inodes--;
		spin_unlock(&sbinfo->stat_lock);
	}
	return 0;
}

static void shmem_free_inode(struct super_block *sb)
{
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);
	if (sbinfo->max_inodes) {
		spin_lock(&sbinfo->stat_lock);
		sbinfo->free_inodes++;
		spin_unlock(&sbinfo->stat_lock);
	}
}

267
/**
268
 * shmem_recalc_inode - recalculate the block usage of an inode
L
Linus Torvalds 已提交
269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286
 * @inode: inode to recalc
 *
 * We have to calculate the free blocks since the mm can drop
 * undirtied hole pages behind our back.
 *
 * But normally   info->alloced == inode->i_mapping->nrpages + info->swapped
 * So mm freed is info->alloced - (inode->i_mapping->nrpages + info->swapped)
 *
 * It has to be called with the spinlock held.
 */
static void shmem_recalc_inode(struct inode *inode)
{
	struct shmem_inode_info *info = SHMEM_I(inode);
	long freed;

	freed = info->alloced - info->swapped - inode->i_mapping->nrpages;
	if (freed > 0) {
		info->alloced -= freed;
287
		inode->i_blocks -= freed * BLOCKS_PER_PAGE;
288
		shmem_inode_unacct_blocks(inode, freed);
L
Linus Torvalds 已提交
289 290 291
	}
}

292 293 294
bool shmem_charge(struct inode *inode, long pages)
{
	struct shmem_inode_info *info = SHMEM_I(inode);
295
	unsigned long flags;
296

297
	if (!shmem_inode_acct_block(inode, pages))
298
		return false;
299

300
	spin_lock_irqsave(&info->lock, flags);
301 302 303
	info->alloced += pages;
	inode->i_blocks += pages * BLOCKS_PER_PAGE;
	shmem_recalc_inode(inode);
304
	spin_unlock_irqrestore(&info->lock, flags);
305 306 307 308 309 310 311 312
	inode->i_mapping->nrpages += pages;

	return true;
}

void shmem_uncharge(struct inode *inode, long pages)
{
	struct shmem_inode_info *info = SHMEM_I(inode);
313
	unsigned long flags;
314

315
	spin_lock_irqsave(&info->lock, flags);
316 317 318
	info->alloced -= pages;
	inode->i_blocks -= pages * BLOCKS_PER_PAGE;
	shmem_recalc_inode(inode);
319
	spin_unlock_irqrestore(&info->lock, flags);
320

321
	shmem_inode_unacct_blocks(inode, pages);
322 323
}

324
/*
325
 * Replace item expected in xarray by a new item, while holding xa_lock.
326
 */
327
static int shmem_replace_entry(struct address_space *mapping,
328 329
			pgoff_t index, void *expected, void *replacement)
{
330
	XA_STATE(xas, &mapping->i_pages, index);
331
	void *item;
332 333

	VM_BUG_ON(!expected);
334
	VM_BUG_ON(!replacement);
335
	item = xas_load(&xas);
336 337
	if (item != expected)
		return -ENOENT;
338
	xas_store(&xas, replacement);
339 340 341
	return 0;
}

342 343 344 345 346 347 348 349 350 351
/*
 * Sometimes, before we decide whether to proceed or to fail, we must check
 * that an entry was not already brought back from swap by a racing thread.
 *
 * Checking page is not enough: by the time a SwapCache page is locked, it
 * might be reused, and again be SwapCache, using the same swap as before.
 */
static bool shmem_confirm_swap(struct address_space *mapping,
			       pgoff_t index, swp_entry_t swap)
{
352
	return xa_load(&mapping->i_pages, index) == swp_to_radix_entry(swap);
353 354
}

355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 384 385 386
/*
 * Definitions for "huge tmpfs": tmpfs mounted with the huge= option
 *
 * SHMEM_HUGE_NEVER:
 *	disables huge pages for the mount;
 * SHMEM_HUGE_ALWAYS:
 *	enables huge pages for the mount;
 * SHMEM_HUGE_WITHIN_SIZE:
 *	only allocate huge pages if the page will be fully within i_size,
 *	also respect fadvise()/madvise() hints;
 * SHMEM_HUGE_ADVISE:
 *	only allocate huge pages if requested with fadvise()/madvise();
 */

#define SHMEM_HUGE_NEVER	0
#define SHMEM_HUGE_ALWAYS	1
#define SHMEM_HUGE_WITHIN_SIZE	2
#define SHMEM_HUGE_ADVISE	3

/*
 * Special values.
 * Only can be set via /sys/kernel/mm/transparent_hugepage/shmem_enabled:
 *
 * SHMEM_HUGE_DENY:
 *	disables huge on shm_mnt and all mounts, for emergency use;
 * SHMEM_HUGE_FORCE:
 *	enables huge on shm_mnt and all mounts, w/o needing option, for testing;
 *
 */
#define SHMEM_HUGE_DENY		(-1)
#define SHMEM_HUGE_FORCE	(-2)

387
#ifdef CONFIG_TRANSPARENT_HUGE_PAGECACHE
388 389
/* ifdef here to avoid bloating shmem.o when not necessary */

390
static int shmem_huge __read_mostly;
391

392
#if defined(CONFIG_SYSFS) || defined(CONFIG_TMPFS)
393 394 395 396 397 398 399 400 401 402 403 404 405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429
static int shmem_parse_huge(const char *str)
{
	if (!strcmp(str, "never"))
		return SHMEM_HUGE_NEVER;
	if (!strcmp(str, "always"))
		return SHMEM_HUGE_ALWAYS;
	if (!strcmp(str, "within_size"))
		return SHMEM_HUGE_WITHIN_SIZE;
	if (!strcmp(str, "advise"))
		return SHMEM_HUGE_ADVISE;
	if (!strcmp(str, "deny"))
		return SHMEM_HUGE_DENY;
	if (!strcmp(str, "force"))
		return SHMEM_HUGE_FORCE;
	return -EINVAL;
}

static const char *shmem_format_huge(int huge)
{
	switch (huge) {
	case SHMEM_HUGE_NEVER:
		return "never";
	case SHMEM_HUGE_ALWAYS:
		return "always";
	case SHMEM_HUGE_WITHIN_SIZE:
		return "within_size";
	case SHMEM_HUGE_ADVISE:
		return "advise";
	case SHMEM_HUGE_DENY:
		return "deny";
	case SHMEM_HUGE_FORCE:
		return "force";
	default:
		VM_BUG_ON(1);
		return "bad_val";
	}
}
430
#endif
431

432 433 434 435
static unsigned long shmem_unused_huge_shrink(struct shmem_sb_info *sbinfo,
		struct shrink_control *sc, unsigned long nr_to_split)
{
	LIST_HEAD(list), *pos, *next;
436
	LIST_HEAD(to_remove);
437 438 439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460 461 462
	struct inode *inode;
	struct shmem_inode_info *info;
	struct page *page;
	unsigned long batch = sc ? sc->nr_to_scan : 128;
	int removed = 0, split = 0;

	if (list_empty(&sbinfo->shrinklist))
		return SHRINK_STOP;

	spin_lock(&sbinfo->shrinklist_lock);
	list_for_each_safe(pos, next, &sbinfo->shrinklist) {
		info = list_entry(pos, struct shmem_inode_info, shrinklist);

		/* pin the inode */
		inode = igrab(&info->vfs_inode);

		/* inode is about to be evicted */
		if (!inode) {
			list_del_init(&info->shrinklist);
			removed++;
			goto next;
		}

		/* Check if there's anything to gain */
		if (round_up(inode->i_size, PAGE_SIZE) ==
				round_up(inode->i_size, HPAGE_PMD_SIZE)) {
463
			list_move(&info->shrinklist, &to_remove);
464 465 466 467 468 469 470 471 472 473 474
			removed++;
			goto next;
		}

		list_move(&info->shrinklist, &list);
next:
		if (!--batch)
			break;
	}
	spin_unlock(&sbinfo->shrinklist_lock);

475 476 477 478 479 480 481
	list_for_each_safe(pos, next, &to_remove) {
		info = list_entry(pos, struct shmem_inode_info, shrinklist);
		inode = &info->vfs_inode;
		list_del_init(&info->shrinklist);
		iput(inode);
	}

482 483 484 485 486 487
	list_for_each_safe(pos, next, &list) {
		int ret;

		info = list_entry(pos, struct shmem_inode_info, shrinklist);
		inode = &info->vfs_inode;

488 489
		if (nr_to_split && split >= nr_to_split)
			goto leave;
490

491
		page = find_get_page(inode->i_mapping,
492 493 494 495
				(inode->i_size & HPAGE_PMD_MASK) >> PAGE_SHIFT);
		if (!page)
			goto drop;

496
		/* No huge page at the end of the file: nothing to split */
497 498 499 500 501
		if (!PageTransHuge(page)) {
			put_page(page);
			goto drop;
		}

502 503 504 505 506 507 508 509 510 511 512 513
		/*
		 * Leave the inode on the list if we failed to lock
		 * the page at this time.
		 *
		 * Waiting for the lock may lead to deadlock in the
		 * reclaim path.
		 */
		if (!trylock_page(page)) {
			put_page(page);
			goto leave;
		}

514 515 516 517
		ret = split_huge_page(page);
		unlock_page(page);
		put_page(page);

518 519 520
		/* If split failed leave the inode on the list */
		if (ret)
			goto leave;
521 522 523 524 525

		split++;
drop:
		list_del_init(&info->shrinklist);
		removed++;
526
leave:
527 528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554
		iput(inode);
	}

	spin_lock(&sbinfo->shrinklist_lock);
	list_splice_tail(&list, &sbinfo->shrinklist);
	sbinfo->shrinklist_len -= removed;
	spin_unlock(&sbinfo->shrinklist_lock);

	return split;
}

static long shmem_unused_huge_scan(struct super_block *sb,
		struct shrink_control *sc)
{
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);

	if (!READ_ONCE(sbinfo->shrinklist_len))
		return SHRINK_STOP;

	return shmem_unused_huge_shrink(sbinfo, sc, 0);
}

static long shmem_unused_huge_count(struct super_block *sb,
		struct shrink_control *sc)
{
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);
	return READ_ONCE(sbinfo->shrinklist_len);
}
555
#else /* !CONFIG_TRANSPARENT_HUGE_PAGECACHE */
556 557 558

#define shmem_huge SHMEM_HUGE_DENY

559 560 561 562 563
static unsigned long shmem_unused_huge_shrink(struct shmem_sb_info *sbinfo,
		struct shrink_control *sc, unsigned long nr_to_split)
{
	return 0;
}
564
#endif /* CONFIG_TRANSPARENT_HUGE_PAGECACHE */
565

566 567 568 569 570 571 572 573 574
static inline bool is_huge_enabled(struct shmem_sb_info *sbinfo)
{
	if (IS_ENABLED(CONFIG_TRANSPARENT_HUGE_PAGECACHE) &&
	    (shmem_huge == SHMEM_HUGE_FORCE || sbinfo->huge) &&
	    shmem_huge != SHMEM_HUGE_DENY)
		return true;
	return false;
}

575 576 577 578 579
/*
 * Like add_to_page_cache_locked, but error if expected item has gone.
 */
static int shmem_add_to_page_cache(struct page *page,
				   struct address_space *mapping,
580
				   pgoff_t index, void *expected, gfp_t gfp)
581
{
582 583 584
	XA_STATE_ORDER(xas, &mapping->i_pages, index, compound_order(page));
	unsigned long i = 0;
	unsigned long nr = 1UL << compound_order(page);
585

586 587
	VM_BUG_ON_PAGE(PageTail(page), page);
	VM_BUG_ON_PAGE(index != round_down(index, nr), page);
588 589
	VM_BUG_ON_PAGE(!PageLocked(page), page);
	VM_BUG_ON_PAGE(!PageSwapBacked(page), page);
590
	VM_BUG_ON(expected && PageTransHuge(page));
591

592
	page_ref_add(page, nr);
593 594 595
	page->mapping = mapping;
	page->index = index;

596 597 598 599 600 601 602 603 604 605 606 607 608 609
	do {
		void *entry;
		xas_lock_irq(&xas);
		entry = xas_find_conflict(&xas);
		if (entry != expected)
			xas_set_err(&xas, -EEXIST);
		xas_create_range(&xas);
		if (xas_error(&xas))
			goto unlock;
next:
		xas_store(&xas, page + i);
		if (++i < nr) {
			xas_next(&xas);
			goto next;
610
		}
611
		if (PageTransHuge(page)) {
612
			count_vm_event(THP_FILE_ALLOC);
613
			__inc_node_page_state(page, NR_SHMEM_THPS);
614 615
		}
		mapping->nrpages += nr;
616 617
		__mod_node_page_state(page_pgdat(page), NR_FILE_PAGES, nr);
		__mod_node_page_state(page_pgdat(page), NR_SHMEM, nr);
618 619 620 621 622
unlock:
		xas_unlock_irq(&xas);
	} while (xas_nomem(&xas, gfp));

	if (xas_error(&xas)) {
623
		page->mapping = NULL;
624
		page_ref_sub(page, nr);
625
		return xas_error(&xas);
626
	}
627 628

	return 0;
629 630
}

631 632 633 634 635 636 637 638
/*
 * Like delete_from_page_cache, but substitutes swap for page.
 */
static void shmem_delete_from_page_cache(struct page *page, void *radswap)
{
	struct address_space *mapping = page->mapping;
	int error;

639 640
	VM_BUG_ON_PAGE(PageCompound(page), page);

M
Matthew Wilcox 已提交
641
	xa_lock_irq(&mapping->i_pages);
642
	error = shmem_replace_entry(mapping, page->index, page, radswap);
643 644
	page->mapping = NULL;
	mapping->nrpages--;
645 646
	__dec_node_page_state(page, NR_FILE_PAGES);
	__dec_node_page_state(page, NR_SHMEM);
M
Matthew Wilcox 已提交
647
	xa_unlock_irq(&mapping->i_pages);
648
	put_page(page);
649 650 651
	BUG_ON(error);
}

652
/*
653
 * Remove swap entry from page cache, free the swap and its page cache.
654 655 656 657
 */
static int shmem_free_swap(struct address_space *mapping,
			   pgoff_t index, void *radswap)
{
658
	void *old;
659

M
Matthew Wilcox 已提交
660
	xa_lock_irq(&mapping->i_pages);
661
	old = __xa_cmpxchg(&mapping->i_pages, index, radswap, NULL, 0);
M
Matthew Wilcox 已提交
662
	xa_unlock_irq(&mapping->i_pages);
663 664 665 666
	if (old != radswap)
		return -ENOENT;
	free_swap_and_cache(radix_to_swp_entry(radswap));
	return 0;
667 668
}

669 670
/*
 * Determine (in bytes) how many of the shmem object's pages mapped by the
671
 * given offsets are swapped out.
672
 *
M
Matthew Wilcox 已提交
673
 * This is safe to call without i_mutex or the i_pages lock thanks to RCU,
674 675
 * as long as the inode doesn't go away and racy results are not a problem.
 */
676 677
unsigned long shmem_partial_swap_usage(struct address_space *mapping,
						pgoff_t start, pgoff_t end)
678
{
679
	XA_STATE(xas, &mapping->i_pages, start);
680
	struct page *page;
681
	unsigned long swapped = 0;
682 683

	rcu_read_lock();
684 685
	xas_for_each(&xas, page, end - 1) {
		if (xas_retry(&xas, page))
M
Matthew Wilcox 已提交
686
			continue;
687
		if (xa_is_value(page))
688 689 690
			swapped++;

		if (need_resched()) {
691
			xas_pause(&xas);
692 693 694 695 696 697 698 699 700
			cond_resched_rcu();
		}
	}

	rcu_read_unlock();

	return swapped << PAGE_SHIFT;
}

701 702 703 704
/*
 * Determine (in bytes) how many of the shmem object's pages mapped by the
 * given vma is swapped out.
 *
M
Matthew Wilcox 已提交
705
 * This is safe to call without i_mutex or the i_pages lock thanks to RCU,
706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734
 * as long as the inode doesn't go away and racy results are not a problem.
 */
unsigned long shmem_swap_usage(struct vm_area_struct *vma)
{
	struct inode *inode = file_inode(vma->vm_file);
	struct shmem_inode_info *info = SHMEM_I(inode);
	struct address_space *mapping = inode->i_mapping;
	unsigned long swapped;

	/* Be careful as we don't hold info->lock */
	swapped = READ_ONCE(info->swapped);

	/*
	 * The easier cases are when the shmem object has nothing in swap, or
	 * the vma maps it whole. Then we can simply use the stats that we
	 * already track.
	 */
	if (!swapped)
		return 0;

	if (!vma->vm_pgoff && vma->vm_end - vma->vm_start >= inode->i_size)
		return swapped << PAGE_SHIFT;

	/* Here comes the more involved part */
	return shmem_partial_swap_usage(mapping,
			linear_page_index(vma, vma->vm_start),
			linear_page_index(vma, vma->vm_end));
}

735 736 737 738 739 740 741 742 743
/*
 * SysV IPC SHM_UNLOCK restore Unevictable pages to their evictable lists.
 */
void shmem_unlock_mapping(struct address_space *mapping)
{
	struct pagevec pvec;
	pgoff_t indices[PAGEVEC_SIZE];
	pgoff_t index = 0;

744
	pagevec_init(&pvec);
745 746 747 748 749 750 751 752
	/*
	 * Minor point, but we might as well stop if someone else SHM_LOCKs it.
	 */
	while (!mapping_unevictable(mapping)) {
		/*
		 * Avoid pagevec_lookup(): find_get_pages() returns 0 as if it
		 * has finished, if it hits a row of PAGEVEC_SIZE swap entries.
		 */
753 754
		pvec.nr = find_get_entries(mapping, index,
					   PAGEVEC_SIZE, pvec.pages, indices);
755 756 757
		if (!pvec.nr)
			break;
		index = indices[pvec.nr - 1] + 1;
758
		pagevec_remove_exceptionals(&pvec);
759 760 761 762
		check_move_unevictable_pages(pvec.pages, pvec.nr);
		pagevec_release(&pvec);
		cond_resched();
	}
763 764 765
}

/*
M
Matthew Wilcox 已提交
766
 * Remove range of pages and swap entries from page cache, and free them.
767
 * If !unfalloc, truncate or punch hole; if unfalloc, undo failed fallocate.
768
 */
769 770
static void shmem_undo_range(struct inode *inode, loff_t lstart, loff_t lend,
								 bool unfalloc)
L
Linus Torvalds 已提交
771
{
772
	struct address_space *mapping = inode->i_mapping;
L
Linus Torvalds 已提交
773
	struct shmem_inode_info *info = SHMEM_I(inode);
774 775 776 777
	pgoff_t start = (lstart + PAGE_SIZE - 1) >> PAGE_SHIFT;
	pgoff_t end = (lend + 1) >> PAGE_SHIFT;
	unsigned int partial_start = lstart & (PAGE_SIZE - 1);
	unsigned int partial_end = (lend + 1) & (PAGE_SIZE - 1);
778
	struct pagevec pvec;
779 780
	pgoff_t indices[PAGEVEC_SIZE];
	long nr_swaps_freed = 0;
781
	pgoff_t index;
782 783
	int i;

784 785
	if (lend == -1)
		end = -1;	/* unsigned, so actually very big */
786

787
	pagevec_init(&pvec);
788
	index = start;
789
	while (index < end) {
790 791 792
		pvec.nr = find_get_entries(mapping, index,
			min(end - index, (pgoff_t)PAGEVEC_SIZE),
			pvec.pages, indices);
793 794
		if (!pvec.nr)
			break;
795 796 797
		for (i = 0; i < pagevec_count(&pvec); i++) {
			struct page *page = pvec.pages[i];

798
			index = indices[i];
799
			if (index >= end)
800 801
				break;

802
			if (xa_is_value(page)) {
803 804
				if (unfalloc)
					continue;
805 806
				nr_swaps_freed += !shmem_free_swap(mapping,
								index, page);
807
				continue;
808 809
			}

810 811
			VM_BUG_ON_PAGE(page_to_pgoff(page) != index, page);

812
			if (!trylock_page(page))
813
				continue;
814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833

			if (PageTransTail(page)) {
				/* Middle of THP: zero out the page */
				clear_highpage(page);
				unlock_page(page);
				continue;
			} else if (PageTransHuge(page)) {
				if (index == round_down(end, HPAGE_PMD_NR)) {
					/*
					 * Range ends in the middle of THP:
					 * zero out the page
					 */
					clear_highpage(page);
					unlock_page(page);
					continue;
				}
				index += HPAGE_PMD_NR - 1;
				i += HPAGE_PMD_NR - 1;
			}

834
			if (!unfalloc || !PageUptodate(page)) {
835 836
				VM_BUG_ON_PAGE(PageTail(page), page);
				if (page_mapping(page) == mapping) {
837
					VM_BUG_ON_PAGE(PageWriteback(page), page);
838 839
					truncate_inode_page(mapping, page);
				}
840 841 842
			}
			unlock_page(page);
		}
843
		pagevec_remove_exceptionals(&pvec);
844
		pagevec_release(&pvec);
845 846 847
		cond_resched();
		index++;
	}
L
Linus Torvalds 已提交
848

849
	if (partial_start) {
850
		struct page *page = NULL;
851
		shmem_getpage(inode, start - 1, &page, SGP_READ);
852
		if (page) {
853
			unsigned int top = PAGE_SIZE;
854 855 856 857 858 859 860
			if (start > end) {
				top = partial_end;
				partial_end = 0;
			}
			zero_user_segment(page, partial_start, top);
			set_page_dirty(page);
			unlock_page(page);
861
			put_page(page);
862 863 864 865
		}
	}
	if (partial_end) {
		struct page *page = NULL;
866
		shmem_getpage(inode, end, &page, SGP_READ);
867 868
		if (page) {
			zero_user_segment(page, 0, partial_end);
869 870
			set_page_dirty(page);
			unlock_page(page);
871
			put_page(page);
872 873
		}
	}
874 875
	if (start >= end)
		return;
876 877

	index = start;
878
	while (index < end) {
879
		cond_resched();
880 881

		pvec.nr = find_get_entries(mapping, index,
882
				min(end - index, (pgoff_t)PAGEVEC_SIZE),
883
				pvec.pages, indices);
884
		if (!pvec.nr) {
885 886
			/* If all gone or hole-punch or unfalloc, we're done */
			if (index == start || end != -1)
887
				break;
888
			/* But if truncating, restart to make sure all gone */
889 890 891 892 893 894
			index = start;
			continue;
		}
		for (i = 0; i < pagevec_count(&pvec); i++) {
			struct page *page = pvec.pages[i];

895
			index = indices[i];
896
			if (index >= end)
897 898
				break;

899
			if (xa_is_value(page)) {
900 901
				if (unfalloc)
					continue;
902 903 904 905 906 907
				if (shmem_free_swap(mapping, index, page)) {
					/* Swap was replaced by page: retry */
					index--;
					break;
				}
				nr_swaps_freed++;
908 909 910
				continue;
			}

911
			lock_page(page);
912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938

			if (PageTransTail(page)) {
				/* Middle of THP: zero out the page */
				clear_highpage(page);
				unlock_page(page);
				/*
				 * Partial thp truncate due 'start' in middle
				 * of THP: don't need to look on these pages
				 * again on !pvec.nr restart.
				 */
				if (index != round_down(end, HPAGE_PMD_NR))
					start++;
				continue;
			} else if (PageTransHuge(page)) {
				if (index == round_down(end, HPAGE_PMD_NR)) {
					/*
					 * Range ends in the middle of THP:
					 * zero out the page
					 */
					clear_highpage(page);
					unlock_page(page);
					continue;
				}
				index += HPAGE_PMD_NR - 1;
				i += HPAGE_PMD_NR - 1;
			}

939
			if (!unfalloc || !PageUptodate(page)) {
940 941
				VM_BUG_ON_PAGE(PageTail(page), page);
				if (page_mapping(page) == mapping) {
942
					VM_BUG_ON_PAGE(PageWriteback(page), page);
943
					truncate_inode_page(mapping, page);
944 945 946 947 948
				} else {
					/* Page was replaced by swap: retry */
					unlock_page(page);
					index--;
					break;
949
				}
950
			}
951 952
			unlock_page(page);
		}
953
		pagevec_remove_exceptionals(&pvec);
954
		pagevec_release(&pvec);
955 956
		index++;
	}
957

958
	spin_lock_irq(&info->lock);
959
	info->swapped -= nr_swaps_freed;
L
Linus Torvalds 已提交
960
	shmem_recalc_inode(inode);
961
	spin_unlock_irq(&info->lock);
962
}
L
Linus Torvalds 已提交
963

964 965 966
void shmem_truncate_range(struct inode *inode, loff_t lstart, loff_t lend)
{
	shmem_undo_range(inode, lstart, lend, false);
967
	inode->i_ctime = inode->i_mtime = current_time(inode);
L
Linus Torvalds 已提交
968
}
969
EXPORT_SYMBOL_GPL(shmem_truncate_range);
L
Linus Torvalds 已提交
970

971 972
static int shmem_getattr(const struct path *path, struct kstat *stat,
			 u32 request_mask, unsigned int query_flags)
973
{
974
	struct inode *inode = path->dentry->d_inode;
975
	struct shmem_inode_info *info = SHMEM_I(inode);
976
	struct shmem_sb_info *sb_info = SHMEM_SB(inode->i_sb);
977

978
	if (info->alloced - info->swapped != inode->i_mapping->nrpages) {
979
		spin_lock_irq(&info->lock);
980
		shmem_recalc_inode(inode);
981
		spin_unlock_irq(&info->lock);
982
	}
983
	generic_fillattr(inode, stat);
984 985 986 987

	if (is_huge_enabled(sb_info))
		stat->blksize = HPAGE_PMD_SIZE;

988 989 990
	return 0;
}

991
static int shmem_setattr(struct dentry *dentry, struct iattr *attr)
L
Linus Torvalds 已提交
992
{
993
	struct inode *inode = d_inode(dentry);
D
David Herrmann 已提交
994
	struct shmem_inode_info *info = SHMEM_I(inode);
995
	struct shmem_sb_info *sbinfo = SHMEM_SB(inode->i_sb);
L
Linus Torvalds 已提交
996 997
	int error;

998
	error = setattr_prepare(dentry, attr);
999 1000 1001
	if (error)
		return error;

1002 1003 1004
	if (S_ISREG(inode->i_mode) && (attr->ia_valid & ATTR_SIZE)) {
		loff_t oldsize = inode->i_size;
		loff_t newsize = attr->ia_size;
1005

D
David Herrmann 已提交
1006 1007 1008 1009 1010
		/* protected by i_mutex */
		if ((newsize < oldsize && (info->seals & F_SEAL_SHRINK)) ||
		    (newsize > oldsize && (info->seals & F_SEAL_GROW)))
			return -EPERM;

1011
		if (newsize != oldsize) {
1012 1013 1014 1015
			error = shmem_reacct_size(SHMEM_I(inode)->flags,
					oldsize, newsize);
			if (error)
				return error;
1016
			i_size_write(inode, newsize);
1017
			inode->i_ctime = inode->i_mtime = current_time(inode);
1018
		}
1019
		if (newsize <= oldsize) {
1020
			loff_t holebegin = round_up(newsize, PAGE_SIZE);
1021 1022 1023 1024 1025 1026
			if (oldsize > holebegin)
				unmap_mapping_range(inode->i_mapping,
							holebegin, 0, 1);
			if (info->alloced)
				shmem_truncate_range(inode,
							newsize, (loff_t)-1);
1027
			/* unmap again to remove racily COWed private pages */
1028 1029 1030
			if (oldsize > holebegin)
				unmap_mapping_range(inode->i_mapping,
							holebegin, 0, 1);
1031 1032 1033 1034 1035 1036 1037

			/*
			 * Part of the huge page can be beyond i_size: subject
			 * to shrink under memory pressure.
			 */
			if (IS_ENABLED(CONFIG_TRANSPARENT_HUGE_PAGECACHE)) {
				spin_lock(&sbinfo->shrinklist_lock);
1038 1039 1040 1041 1042
				/*
				 * _careful to defend against unlocked access to
				 * ->shrink_list in shmem_unused_huge_shrink()
				 */
				if (list_empty_careful(&info->shrinklist)) {
1043 1044 1045 1046 1047 1048
					list_add_tail(&info->shrinklist,
							&sbinfo->shrinklist);
					sbinfo->shrinklist_len++;
				}
				spin_unlock(&sbinfo->shrinklist_lock);
			}
1049
		}
L
Linus Torvalds 已提交
1050 1051
	}

1052 1053
	setattr_copy(inode, attr);
	if (attr->ia_valid & ATTR_MODE)
C
Christoph Hellwig 已提交
1054
		error = posix_acl_chmod(inode, inode->i_mode);
L
Linus Torvalds 已提交
1055 1056 1057
	return error;
}

A
Al Viro 已提交
1058
static void shmem_evict_inode(struct inode *inode)
L
Linus Torvalds 已提交
1059 1060
{
	struct shmem_inode_info *info = SHMEM_I(inode);
1061
	struct shmem_sb_info *sbinfo = SHMEM_SB(inode->i_sb);
L
Linus Torvalds 已提交
1062

1063
	if (inode->i_mapping->a_ops == &shmem_aops) {
L
Linus Torvalds 已提交
1064 1065
		shmem_unacct_size(info->flags, inode->i_size);
		inode->i_size = 0;
1066
		shmem_truncate_range(inode, 0, (loff_t)-1);
1067 1068 1069 1070 1071 1072 1073 1074
		if (!list_empty(&info->shrinklist)) {
			spin_lock(&sbinfo->shrinklist_lock);
			if (!list_empty(&info->shrinklist)) {
				list_del_init(&info->shrinklist);
				sbinfo->shrinklist_len--;
			}
			spin_unlock(&sbinfo->shrinklist_lock);
		}
L
Linus Torvalds 已提交
1075
		if (!list_empty(&info->swaplist)) {
1076
			mutex_lock(&shmem_swaplist_mutex);
L
Linus Torvalds 已提交
1077
			list_del_init(&info->swaplist);
1078
			mutex_unlock(&shmem_swaplist_mutex);
L
Linus Torvalds 已提交
1079
		}
1080
	}
1081

1082
	simple_xattrs_free(&info->xattrs);
1083
	WARN_ON(inode->i_blocks);
1084
	shmem_free_inode(inode->i_sb);
1085
	clear_inode(inode);
L
Linus Torvalds 已提交
1086 1087
}

1088
static unsigned long find_swap_entry(struct xarray *xa, void *item)
1089
{
1090
	XA_STATE(xas, xa, 0);
1091
	unsigned int checked = 0;
1092
	void *entry;
1093 1094

	rcu_read_lock();
1095 1096
	xas_for_each(&xas, entry, ULONG_MAX) {
		if (xas_retry(&xas, entry))
1097
			continue;
1098
		if (entry == item)
1099 1100
			break;
		checked++;
1101
		if ((checked % XA_CHECK_SCHED) != 0)
1102
			continue;
1103
		xas_pause(&xas);
1104 1105 1106
		cond_resched_rcu();
	}
	rcu_read_unlock();
1107 1108

	return entry ? xas.xa_index : -1;
1109 1110
}

1111 1112 1113
/*
 * If swap found in inode, free it and move page from swapcache to filecache.
 */
1114
static int shmem_unuse_inode(struct shmem_inode_info *info,
1115
			     swp_entry_t swap, struct page **pagep)
L
Linus Torvalds 已提交
1116
{
1117
	struct address_space *mapping = info->vfs_inode.i_mapping;
1118
	void *radswap;
1119
	pgoff_t index;
1120 1121
	gfp_t gfp;
	int error = 0;
L
Linus Torvalds 已提交
1122

1123
	radswap = swp_to_radix_entry(swap);
M
Matthew Wilcox 已提交
1124
	index = find_swap_entry(&mapping->i_pages, radswap);
1125
	if (index == -1)
1126
		return -EAGAIN;	/* tell shmem_unuse we found nothing */
1127

H
Hugh Dickins 已提交
1128 1129
	/*
	 * Move _head_ to start search for next from here.
A
Al Viro 已提交
1130
	 * But be careful: shmem_evict_inode checks list_empty without taking
H
Hugh Dickins 已提交
1131
	 * mutex, and there's an instant in list_move_tail when info->swaplist
1132
	 * would appear empty, if it were the only one on shmem_swaplist.
H
Hugh Dickins 已提交
1133 1134 1135
	 */
	if (shmem_swaplist.next != &info->swaplist)
		list_move_tail(&shmem_swaplist, &info->swaplist);
1136

1137 1138 1139 1140 1141 1142 1143
	gfp = mapping_gfp_mask(mapping);
	if (shmem_should_replace_page(*pagep, gfp)) {
		mutex_unlock(&shmem_swaplist_mutex);
		error = shmem_replace_page(pagep, gfp, info, index);
		mutex_lock(&shmem_swaplist_mutex);
		/*
		 * We needed to drop mutex to make that restrictive page
1144 1145
		 * allocation, but the inode might have been freed while we
		 * dropped it: although a racing shmem_evict_inode() cannot
M
Matthew Wilcox 已提交
1146
		 * complete without emptying the page cache, our page lock
1147 1148
		 * on this swapcache page is not enough to prevent that -
		 * free_swap_and_cache() of our swap entry will only
M
Matthew Wilcox 已提交
1149
		 * trylock_page(), removing swap from page cache whatever.
1150 1151 1152 1153 1154 1155 1156 1157 1158
		 *
		 * We must not proceed to shmem_add_to_page_cache() if the
		 * inode has been freed, but of course we cannot rely on
		 * inode or mapping or info to check that.  However, we can
		 * safely check if our swap entry is still in use (and here
		 * it can't have got reused for another page): if it's still
		 * in use, then the inode cannot have been freed yet, and we
		 * can safely proceed (if it's no longer in use, that tells
		 * nothing about the inode, but we don't need to unuse swap).
1159 1160 1161 1162 1163
		 */
		if (!page_swapcount(*pagep))
			error = -ENOENT;
	}

K
KAMEZAWA Hiroyuki 已提交
1164
	/*
1165 1166 1167
	 * We rely on shmem_swaplist_mutex, not only to protect the swaplist,
	 * but also to hold up shmem_evict_inode(): so inode cannot be freed
	 * beneath us (pagelock doesn't help until the page is in pagecache).
K
KAMEZAWA Hiroyuki 已提交
1168
	 */
1169 1170
	if (!error)
		error = shmem_add_to_page_cache(*pagep, mapping, index,
1171
						radswap, gfp);
1172
	if (error != -ENOMEM) {
1173 1174 1175 1176
		/*
		 * Truncation and eviction use free_swap_and_cache(), which
		 * only does trylock page: if we raced, best clean up here.
		 */
1177 1178
		delete_from_swap_cache(*pagep);
		set_page_dirty(*pagep);
1179
		if (!error) {
1180
			spin_lock_irq(&info->lock);
1181
			info->swapped--;
1182
			spin_unlock_irq(&info->lock);
1183 1184
			swap_free(swap);
		}
L
Linus Torvalds 已提交
1185
	}
1186
	return error;
L
Linus Torvalds 已提交
1187 1188 1189
}

/*
1190
 * Search through swapped inodes to find and replace swap by page.
L
Linus Torvalds 已提交
1191
 */
1192
int shmem_unuse(swp_entry_t swap, struct page *page)
L
Linus Torvalds 已提交
1193
{
1194
	struct list_head *this, *next;
L
Linus Torvalds 已提交
1195
	struct shmem_inode_info *info;
1196
	struct mem_cgroup *memcg;
1197 1198 1199 1200
	int error = 0;

	/*
	 * There's a faint possibility that swap page was replaced before
1201
	 * caller locked it: caller will come back later with the right page.
1202
	 */
1203
	if (unlikely(!PageSwapCache(page) || page_private(page) != swap.val))
1204
		goto out;
1205 1206 1207 1208 1209 1210

	/*
	 * Charge page using GFP_KERNEL while we can wait, before taking
	 * the shmem_swaplist_mutex which might hold up shmem_writepage().
	 * Charged back to the user (not to caller) when swap account is used.
	 */
1211 1212
	error = mem_cgroup_try_charge_delay(page, current->mm, GFP_KERNEL,
					    &memcg, false);
1213 1214
	if (error)
		goto out;
M
Matthew Wilcox 已提交
1215
	/* No memory allocation: swap entry occupies the slot for the page */
1216
	error = -EAGAIN;
L
Linus Torvalds 已提交
1217

1218
	mutex_lock(&shmem_swaplist_mutex);
1219 1220
	list_for_each_safe(this, next, &shmem_swaplist) {
		info = list_entry(this, struct shmem_inode_info, swaplist);
1221
		if (info->swapped)
1222
			error = shmem_unuse_inode(info, swap, &page);
1223 1224
		else
			list_del_init(&info->swaplist);
1225
		cond_resched();
1226
		if (error != -EAGAIN)
1227
			break;
1228
		/* found nothing in this: move on to search the next */
L
Linus Torvalds 已提交
1229
	}
1230
	mutex_unlock(&shmem_swaplist_mutex);
1231

1232 1233 1234
	if (error) {
		if (error != -ENOMEM)
			error = 0;
1235
		mem_cgroup_cancel_charge(page, memcg, false);
1236
	} else
1237
		mem_cgroup_commit_charge(page, memcg, true, false);
1238
out:
H
Hugh Dickins 已提交
1239
	unlock_page(page);
1240
	put_page(page);
1241
	return error;
L
Linus Torvalds 已提交
1242 1243 1244 1245 1246 1247 1248 1249 1250 1251
}

/*
 * Move the page from the page cache to the swap cache.
 */
static int shmem_writepage(struct page *page, struct writeback_control *wbc)
{
	struct shmem_inode_info *info;
	struct address_space *mapping;
	struct inode *inode;
1252 1253
	swp_entry_t swap;
	pgoff_t index;
L
Linus Torvalds 已提交
1254

1255
	VM_BUG_ON_PAGE(PageCompound(page), page);
L
Linus Torvalds 已提交
1256 1257 1258 1259 1260 1261 1262
	BUG_ON(!PageLocked(page));
	mapping = page->mapping;
	index = page->index;
	inode = mapping->host;
	info = SHMEM_I(inode);
	if (info->flags & VM_LOCKED)
		goto redirty;
1263
	if (!total_swap_pages)
L
Linus Torvalds 已提交
1264 1265
		goto redirty;

1266
	/*
C
Christoph Hellwig 已提交
1267 1268 1269 1270 1271
	 * Our capabilities prevent regular writeback or sync from ever calling
	 * shmem_writepage; but a stacking filesystem might use ->writepage of
	 * its underlying filesystem, in which case tmpfs should write out to
	 * swap only in response to memory pressure, and not for the writeback
	 * threads or sync.
1272
	 */
1273 1274 1275 1276
	if (!wbc->for_reclaim) {
		WARN_ON_ONCE(1);	/* Still happens? Tell us about it! */
		goto redirty;
	}
1277 1278 1279 1280 1281

	/*
	 * This is somewhat ridiculous, but without plumbing a SWAP_MAP_FALLOC
	 * value into swapfile.c, the only way we can correctly account for a
	 * fallocated page arriving here is now to initialize it and write it.
1282 1283 1284 1285 1286 1287
	 *
	 * That's okay for a page already fallocated earlier, but if we have
	 * not yet completed the fallocation, then (a) we want to keep track
	 * of this page in case we have to undo it, and (b) it may not be a
	 * good idea to continue anyway, once we're pushing into swap.  So
	 * reactivate the page, and let shmem_fallocate() quit when too many.
1288 1289
	 */
	if (!PageUptodate(page)) {
1290 1291 1292 1293 1294
		if (inode->i_private) {
			struct shmem_falloc *shmem_falloc;
			spin_lock(&inode->i_lock);
			shmem_falloc = inode->i_private;
			if (shmem_falloc &&
1295
			    !shmem_falloc->waitq &&
1296 1297 1298 1299 1300 1301 1302 1303 1304
			    index >= shmem_falloc->start &&
			    index < shmem_falloc->next)
				shmem_falloc->nr_unswapped++;
			else
				shmem_falloc = NULL;
			spin_unlock(&inode->i_lock);
			if (shmem_falloc)
				goto redirty;
		}
1305 1306 1307 1308 1309
		clear_highpage(page);
		flush_dcache_page(page);
		SetPageUptodate(page);
	}

1310
	swap = get_swap_page(page);
1311 1312
	if (!swap.val)
		goto redirty;
1313

1314 1315
	/*
	 * Add inode to shmem_unuse()'s list of swapped-out inodes,
1316 1317
	 * if it's not already there.  Do it now before the page is
	 * moved to swap cache, when its pagelock no longer protects
1318
	 * the inode from eviction.  But don't unlock the mutex until
1319 1320
	 * we've incremented swapped, because shmem_unuse_inode() will
	 * prune a !swapped inode from the swaplist under this mutex.
1321
	 */
1322 1323 1324
	mutex_lock(&shmem_swaplist_mutex);
	if (list_empty(&info->swaplist))
		list_add_tail(&info->swaplist, &shmem_swaplist);
1325

1326
	if (add_to_swap_cache(page, swap, GFP_ATOMIC) == 0) {
1327
		spin_lock_irq(&info->lock);
1328
		shmem_recalc_inode(inode);
1329
		info->swapped++;
1330
		spin_unlock_irq(&info->lock);
1331

1332 1333 1334
		swap_shmem_alloc(swap);
		shmem_delete_from_page_cache(page, swp_to_radix_entry(swap));

1335
		mutex_unlock(&shmem_swaplist_mutex);
1336
		BUG_ON(page_mapped(page));
H
Hugh Dickins 已提交
1337
		swap_writepage(page, wbc);
L
Linus Torvalds 已提交
1338 1339 1340
		return 0;
	}

1341
	mutex_unlock(&shmem_swaplist_mutex);
1342
	put_swap_page(page, swap);
L
Linus Torvalds 已提交
1343 1344
redirty:
	set_page_dirty(page);
1345 1346 1347 1348
	if (wbc->for_reclaim)
		return AOP_WRITEPAGE_ACTIVATE;	/* Return with page locked */
	unlock_page(page);
	return 0;
L
Linus Torvalds 已提交
1349 1350
}

H
Hugh Dickins 已提交
1351
#if defined(CONFIG_NUMA) && defined(CONFIG_TMPFS)
1352
static void shmem_show_mpol(struct seq_file *seq, struct mempolicy *mpol)
1353
{
1354
	char buffer[64];
1355

1356
	if (!mpol || mpol->mode == MPOL_DEFAULT)
1357
		return;		/* show nothing */
1358

1359
	mpol_to_str(buffer, sizeof(buffer), mpol);
1360 1361

	seq_printf(seq, ",mpol=%s", buffer);
1362
}
1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374

static struct mempolicy *shmem_get_sbmpol(struct shmem_sb_info *sbinfo)
{
	struct mempolicy *mpol = NULL;
	if (sbinfo->mpol) {
		spin_lock(&sbinfo->stat_lock);	/* prevent replace/use races */
		mpol = sbinfo->mpol;
		mpol_get(mpol);
		spin_unlock(&sbinfo->stat_lock);
	}
	return mpol;
}
H
Hugh Dickins 已提交
1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386
#else /* !CONFIG_NUMA || !CONFIG_TMPFS */
static inline void shmem_show_mpol(struct seq_file *seq, struct mempolicy *mpol)
{
}
static inline struct mempolicy *shmem_get_sbmpol(struct shmem_sb_info *sbinfo)
{
	return NULL;
}
#endif /* CONFIG_NUMA && CONFIG_TMPFS */
#ifndef CONFIG_NUMA
#define vm_policy vm_private_data
#endif
1387

1388 1389 1390 1391
static void shmem_pseudo_vma_init(struct vm_area_struct *vma,
		struct shmem_inode_info *info, pgoff_t index)
{
	/* Create a pseudo vma that just contains the policy */
1392
	vma_init(vma, NULL);
1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403
	/* Bias interleave by inode number to distribute better across nodes */
	vma->vm_pgoff = index + info->vfs_inode.i_ino;
	vma->vm_policy = mpol_shared_policy_lookup(&info->policy, index);
}

static void shmem_pseudo_vma_destroy(struct vm_area_struct *vma)
{
	/* Drop reference taken by mpol_shared_policy_lookup() */
	mpol_cond_put(vma->vm_policy);
}

1404 1405
static struct page *shmem_swapin(swp_entry_t swap, gfp_t gfp,
			struct shmem_inode_info *info, pgoff_t index)
L
Linus Torvalds 已提交
1406 1407
{
	struct vm_area_struct pvma;
M
Mel Gorman 已提交
1408
	struct page *page;
1409
	struct vm_fault vmf;
1410

1411
	shmem_pseudo_vma_init(&pvma, info, index);
1412 1413 1414
	vmf.vma = &pvma;
	vmf.address = 0;
	page = swap_cluster_readahead(swap, gfp, &vmf);
1415
	shmem_pseudo_vma_destroy(&pvma);
M
Mel Gorman 已提交
1416

1417 1418 1419 1420 1421 1422 1423
	return page;
}

static struct page *shmem_alloc_hugepage(gfp_t gfp,
		struct shmem_inode_info *info, pgoff_t index)
{
	struct vm_area_struct pvma;
1424 1425
	struct address_space *mapping = info->vfs_inode.i_mapping;
	pgoff_t hindex;
1426 1427
	struct page *page;

1428
	if (!IS_ENABLED(CONFIG_TRANSPARENT_HUGE_PAGECACHE))
1429 1430
		return NULL;

1431
	hindex = round_down(index, HPAGE_PMD_NR);
1432 1433
	if (xa_find(&mapping->i_pages, &hindex, hindex + HPAGE_PMD_NR - 1,
								XA_PRESENT))
1434
		return NULL;
M
Mel Gorman 已提交
1435

1436 1437
	shmem_pseudo_vma_init(&pvma, info, hindex);
	page = alloc_pages_vma(gfp | __GFP_COMP | __GFP_NORETRY | __GFP_NOWARN,
1438
			HPAGE_PMD_ORDER, &pvma, 0, numa_node_id());
1439 1440 1441
	shmem_pseudo_vma_destroy(&pvma);
	if (page)
		prep_transhuge_page(page);
M
Mel Gorman 已提交
1442
	return page;
L
Linus Torvalds 已提交
1443 1444
}

1445
static struct page *shmem_alloc_page(gfp_t gfp,
1446
			struct shmem_inode_info *info, pgoff_t index)
L
Linus Torvalds 已提交
1447 1448
{
	struct vm_area_struct pvma;
M
Mel Gorman 已提交
1449
	struct page *page;
L
Linus Torvalds 已提交
1450

1451 1452 1453 1454 1455 1456 1457 1458
	shmem_pseudo_vma_init(&pvma, info, index);
	page = alloc_page_vma(gfp, &pvma, 0);
	shmem_pseudo_vma_destroy(&pvma);

	return page;
}

static struct page *shmem_alloc_and_acct_page(gfp_t gfp,
1459
		struct inode *inode,
1460 1461
		pgoff_t index, bool huge)
{
1462
	struct shmem_inode_info *info = SHMEM_I(inode);
1463 1464 1465
	struct page *page;
	int nr;
	int err = -ENOSPC;
1466

1467
	if (!IS_ENABLED(CONFIG_TRANSPARENT_HUGE_PAGECACHE))
1468 1469 1470
		huge = false;
	nr = huge ? HPAGE_PMD_NR : 1;

1471
	if (!shmem_inode_acct_block(inode, nr))
1472 1473 1474 1475 1476 1477
		goto failed;

	if (huge)
		page = shmem_alloc_hugepage(gfp, info, index);
	else
		page = shmem_alloc_page(gfp, info, index);
H
Hugh Dickins 已提交
1478 1479 1480
	if (page) {
		__SetPageLocked(page);
		__SetPageSwapBacked(page);
1481
		return page;
H
Hugh Dickins 已提交
1482
	}
M
Mel Gorman 已提交
1483

1484
	err = -ENOMEM;
1485
	shmem_inode_unacct_blocks(inode, nr);
1486 1487
failed:
	return ERR_PTR(err);
L
Linus Torvalds 已提交
1488
}
1489

1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511
/*
 * When a page is moved from swapcache to shmem filecache (either by the
 * usual swapin of shmem_getpage_gfp(), or by the less common swapoff of
 * shmem_unuse_inode()), it may have been read in earlier from swap, in
 * ignorance of the mapping it belongs to.  If that mapping has special
 * constraints (like the gma500 GEM driver, which requires RAM below 4GB),
 * we may need to copy to a suitable page before moving to filecache.
 *
 * In a future release, this may well be extended to respect cpuset and
 * NUMA mempolicy, and applied also to anonymous pages in do_swap_page();
 * but for now it is a simple matter of zone.
 */
static bool shmem_should_replace_page(struct page *page, gfp_t gfp)
{
	return page_zonenum(page) > gfp_zone(gfp);
}

static int shmem_replace_page(struct page **pagep, gfp_t gfp,
				struct shmem_inode_info *info, pgoff_t index)
{
	struct page *oldpage, *newpage;
	struct address_space *swap_mapping;
1512
	swp_entry_t entry;
1513 1514 1515 1516
	pgoff_t swap_index;
	int error;

	oldpage = *pagep;
1517 1518
	entry.val = page_private(oldpage);
	swap_index = swp_offset(entry);
1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529
	swap_mapping = page_mapping(oldpage);

	/*
	 * We have arrived here because our zones are constrained, so don't
	 * limit chance of success by further cpuset and node constraints.
	 */
	gfp &= ~GFP_CONSTRAINT_MASK;
	newpage = shmem_alloc_page(gfp, info, index);
	if (!newpage)
		return -ENOMEM;

1530
	get_page(newpage);
1531
	copy_highpage(newpage, oldpage);
1532
	flush_dcache_page(newpage);
1533

1534 1535
	__SetPageLocked(newpage);
	__SetPageSwapBacked(newpage);
1536
	SetPageUptodate(newpage);
1537
	set_page_private(newpage, entry.val);
1538 1539 1540 1541 1542 1543
	SetPageSwapCache(newpage);

	/*
	 * Our caller will very soon move newpage out of swapcache, but it's
	 * a nice clean interface for us to replace oldpage by newpage there.
	 */
M
Matthew Wilcox 已提交
1544
	xa_lock_irq(&swap_mapping->i_pages);
1545
	error = shmem_replace_entry(swap_mapping, swap_index, oldpage, newpage);
1546
	if (!error) {
1547 1548
		__inc_node_page_state(newpage, NR_FILE_PAGES);
		__dec_node_page_state(oldpage, NR_FILE_PAGES);
1549
	}
M
Matthew Wilcox 已提交
1550
	xa_unlock_irq(&swap_mapping->i_pages);
1551

1552 1553 1554 1555 1556 1557 1558 1559
	if (unlikely(error)) {
		/*
		 * Is this possible?  I think not, now that our callers check
		 * both PageSwapCache and page_private after getting page lock;
		 * but be defensive.  Reverse old to newpage for clear and free.
		 */
		oldpage = newpage;
	} else {
1560
		mem_cgroup_migrate(oldpage, newpage);
1561 1562 1563
		lru_cache_add_anon(newpage);
		*pagep = newpage;
	}
1564 1565 1566 1567 1568

	ClearPageSwapCache(oldpage);
	set_page_private(oldpage, 0);

	unlock_page(oldpage);
1569 1570
	put_page(oldpage);
	put_page(oldpage);
1571
	return error;
1572 1573
}

L
Linus Torvalds 已提交
1574
/*
1575
 * shmem_getpage_gfp - find page in cache, or get from swap, or allocate
L
Linus Torvalds 已提交
1576 1577 1578
 *
 * If we allocate a new one we do not mark it dirty. That's up to the
 * vm. If we swap it in we mark it dirty since we also free the swap
1579 1580 1581 1582
 * entry since a page cannot live in both the swap and page cache.
 *
 * fault_mm and fault_type are only supplied by shmem_fault:
 * otherwise they are NULL.
L
Linus Torvalds 已提交
1583
 */
1584
static int shmem_getpage_gfp(struct inode *inode, pgoff_t index,
1585
	struct page **pagep, enum sgp_type sgp, gfp_t gfp,
1586 1587
	struct vm_area_struct *vma, struct vm_fault *vmf,
			vm_fault_t *fault_type)
L
Linus Torvalds 已提交
1588 1589
{
	struct address_space *mapping = inode->i_mapping;
1590
	struct shmem_inode_info *info = SHMEM_I(inode);
L
Linus Torvalds 已提交
1591
	struct shmem_sb_info *sbinfo;
1592
	struct mm_struct *charge_mm;
1593
	struct mem_cgroup *memcg;
H
Hugh Dickins 已提交
1594
	struct page *page;
L
Linus Torvalds 已提交
1595
	swp_entry_t swap;
1596
	enum sgp_type sgp_huge = sgp;
1597
	pgoff_t hindex = index;
L
Linus Torvalds 已提交
1598
	int error;
1599
	int once = 0;
1600
	int alloced = 0;
L
Linus Torvalds 已提交
1601

1602
	if (index > (MAX_LFS_FILESIZE >> PAGE_SHIFT))
L
Linus Torvalds 已提交
1603
		return -EFBIG;
1604 1605
	if (sgp == SGP_NOHUGE || sgp == SGP_HUGE)
		sgp = SGP_CACHE;
L
Linus Torvalds 已提交
1606
repeat:
1607
	swap.val = 0;
1608
	page = find_lock_entry(mapping, index);
1609
	if (xa_is_value(page)) {
1610 1611 1612 1613
		swap = radix_to_swp_entry(page);
		page = NULL;
	}

H
Hugh Dickins 已提交
1614
	if (sgp <= SGP_CACHE &&
1615
	    ((loff_t)index << PAGE_SHIFT) >= i_size_read(inode)) {
1616
		error = -EINVAL;
1617
		goto unlock;
1618 1619
	}

1620 1621 1622
	if (page && sgp == SGP_WRITE)
		mark_page_accessed(page);

1623 1624 1625 1626 1627
	/* fallocated page? */
	if (page && !PageUptodate(page)) {
		if (sgp != SGP_READ)
			goto clear;
		unlock_page(page);
1628
		put_page(page);
1629 1630
		page = NULL;
	}
1631 1632 1633
	if (page || (sgp == SGP_READ && !swap.val)) {
		*pagep = page;
		return 0;
H
Hugh Dickins 已提交
1634 1635 1636
	}

	/*
1637 1638
	 * Fast cache lookup did not find it:
	 * bring it back from swap or allocate.
H
Hugh Dickins 已提交
1639
	 */
1640
	sbinfo = SHMEM_SB(inode->i_sb);
1641
	charge_mm = vma ? vma->vm_mm : current->mm;
L
Linus Torvalds 已提交
1642 1643 1644

	if (swap.val) {
		/* Look it up and read it in.. */
H
Huang Ying 已提交
1645
		page = lookup_swap_cache(swap, NULL, 0);
H
Hugh Dickins 已提交
1646
		if (!page) {
1647 1648
			/* Or update major stats only when swapin succeeds?? */
			if (fault_type) {
1649
				*fault_type |= VM_FAULT_MAJOR;
1650
				count_vm_event(PGMAJFAULT);
1651
				count_memcg_event_mm(charge_mm, PGMAJFAULT);
1652 1653
			}
			/* Here we actually start the io */
1654
			page = shmem_swapin(swap, gfp, info, index);
H
Hugh Dickins 已提交
1655
			if (!page) {
1656 1657
				error = -ENOMEM;
				goto failed;
L
Linus Torvalds 已提交
1658 1659 1660 1661
			}
		}

		/* We have to do this with page locked to prevent races */
1662
		lock_page(page);
1663
		if (!PageSwapCache(page) || page_private(page) != swap.val ||
1664
		    !shmem_confirm_swap(mapping, index, swap)) {
1665
			error = -EEXIST;	/* try again */
1666
			goto unlock;
1667
		}
H
Hugh Dickins 已提交
1668
		if (!PageUptodate(page)) {
L
Linus Torvalds 已提交
1669
			error = -EIO;
1670
			goto failed;
L
Linus Torvalds 已提交
1671
		}
1672 1673
		wait_on_page_writeback(page);

1674 1675 1676 1677
		if (shmem_should_replace_page(page, gfp)) {
			error = shmem_replace_page(&page, gfp, info, index);
			if (error)
				goto failed;
L
Linus Torvalds 已提交
1678
		}
H
Hugh Dickins 已提交
1679

1680
		error = mem_cgroup_try_charge_delay(page, charge_mm, gfp, &memcg,
1681
				false);
1682
		if (!error) {
1683
			error = shmem_add_to_page_cache(page, mapping, index,
1684
						swp_to_radix_entry(swap), gfp);
1685 1686 1687 1688 1689 1690 1691 1692
			/*
			 * We already confirmed swap under page lock, and make
			 * no memory allocation here, so usually no possibility
			 * of error; but free_swap_and_cache() only trylocks a
			 * page, so it is just possible that the entry has been
			 * truncated or holepunched since swap was confirmed.
			 * shmem_undo_range() will have done some of the
			 * unaccounting, now delete_from_swap_cache() will do
1693
			 * the rest.
1694 1695 1696
			 * Reset swap.val? No, leave it so "failed" goes back to
			 * "repeat": reading a hole and writing should succeed.
			 */
1697
			if (error) {
1698
				mem_cgroup_cancel_charge(page, memcg, false);
1699
				delete_from_swap_cache(page);
1700
			}
1701
		}
1702 1703 1704
		if (error)
			goto failed;

1705
		mem_cgroup_commit_charge(page, memcg, true, false);
1706

1707
		spin_lock_irq(&info->lock);
1708
		info->swapped--;
1709
		shmem_recalc_inode(inode);
1710
		spin_unlock_irq(&info->lock);
1711

1712 1713 1714
		if (sgp == SGP_WRITE)
			mark_page_accessed(page);

1715
		delete_from_swap_cache(page);
H
Hugh Dickins 已提交
1716 1717 1718
		set_page_dirty(page);
		swap_free(swap);

1719
	} else {
1720 1721 1722 1723 1724
		if (vma && userfaultfd_missing(vma)) {
			*fault_type = handle_userfault(vmf, VM_UFFD_MISSING);
			return 0;
		}

1725 1726 1727
		/* shmem_symlink() */
		if (mapping->a_ops != &shmem_aops)
			goto alloc_nohuge;
1728
		if (shmem_huge == SHMEM_HUGE_DENY || sgp_huge == SGP_NOHUGE)
1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744
			goto alloc_nohuge;
		if (shmem_huge == SHMEM_HUGE_FORCE)
			goto alloc_huge;
		switch (sbinfo->huge) {
			loff_t i_size;
			pgoff_t off;
		case SHMEM_HUGE_NEVER:
			goto alloc_nohuge;
		case SHMEM_HUGE_WITHIN_SIZE:
			off = round_up(index, HPAGE_PMD_NR);
			i_size = round_up(i_size_read(inode), PAGE_SIZE);
			if (i_size >= HPAGE_PMD_SIZE &&
					i_size >> PAGE_SHIFT >= off)
				goto alloc_huge;
			/* fallthrough */
		case SHMEM_HUGE_ADVISE:
1745 1746 1747
			if (sgp_huge == SGP_HUGE)
				goto alloc_huge;
			/* TODO: implement fadvise() hints */
1748
			goto alloc_nohuge;
1749
		}
L
Linus Torvalds 已提交
1750

1751
alloc_huge:
1752
		page = shmem_alloc_and_acct_page(gfp, inode, index, true);
1753
		if (IS_ERR(page)) {
1754
alloc_nohuge:		page = shmem_alloc_and_acct_page(gfp, inode,
1755
					index, false);
L
Linus Torvalds 已提交
1756
		}
1757
		if (IS_ERR(page)) {
1758
			int retry = 5;
1759 1760
			error = PTR_ERR(page);
			page = NULL;
1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774
			if (error != -ENOSPC)
				goto failed;
			/*
			 * Try to reclaim some spece by splitting a huge page
			 * beyond i_size on the filesystem.
			 */
			while (retry--) {
				int ret;
				ret = shmem_unused_huge_shrink(sbinfo, NULL, 1);
				if (ret == SHRINK_STOP)
					break;
				if (ret)
					goto alloc_nohuge;
			}
1775 1776 1777 1778 1779 1780 1781 1782
			goto failed;
		}

		if (PageTransHuge(page))
			hindex = round_down(index, HPAGE_PMD_NR);
		else
			hindex = index;

1783
		if (sgp == SGP_WRITE)
1784
			__SetPageReferenced(page);
1785

1786
		error = mem_cgroup_try_charge_delay(page, charge_mm, gfp, &memcg,
1787
				PageTransHuge(page));
1788
		if (error)
1789
			goto unacct;
1790 1791
		error = shmem_add_to_page_cache(page, mapping, hindex,
						NULL, gfp & GFP_RECLAIM_MASK);
1792
		if (error) {
1793 1794 1795
			mem_cgroup_cancel_charge(page, memcg,
					PageTransHuge(page));
			goto unacct;
1796
		}
1797 1798
		mem_cgroup_commit_charge(page, memcg, false,
				PageTransHuge(page));
1799 1800
		lru_cache_add_anon(page);

1801
		spin_lock_irq(&info->lock);
1802 1803
		info->alloced += 1 << compound_order(page);
		inode->i_blocks += BLOCKS_PER_PAGE << compound_order(page);
1804
		shmem_recalc_inode(inode);
1805
		spin_unlock_irq(&info->lock);
1806
		alloced = true;
1807

1808 1809 1810 1811 1812 1813 1814 1815
		if (PageTransHuge(page) &&
				DIV_ROUND_UP(i_size_read(inode), PAGE_SIZE) <
				hindex + HPAGE_PMD_NR - 1) {
			/*
			 * Part of the huge page is beyond i_size: subject
			 * to shrink under memory pressure.
			 */
			spin_lock(&sbinfo->shrinklist_lock);
1816 1817 1818 1819 1820
			/*
			 * _careful to defend against unlocked access to
			 * ->shrink_list in shmem_unused_huge_shrink()
			 */
			if (list_empty_careful(&info->shrinklist)) {
1821 1822 1823 1824 1825 1826 1827
				list_add_tail(&info->shrinklist,
						&sbinfo->shrinklist);
				sbinfo->shrinklist_len++;
			}
			spin_unlock(&sbinfo->shrinklist_lock);
		}

1828
		/*
1829 1830 1831 1832 1833 1834 1835 1836 1837
		 * Let SGP_FALLOC use the SGP_WRITE optimization on a new page.
		 */
		if (sgp == SGP_FALLOC)
			sgp = SGP_WRITE;
clear:
		/*
		 * Let SGP_WRITE caller clear ends if write does not fill page;
		 * but SGP_FALLOC on a page fallocated earlier must initialize
		 * it now, lest undo on failure cancel our earlier guarantee.
1838
		 */
1839 1840 1841 1842 1843 1844 1845 1846 1847
		if (sgp != SGP_WRITE && !PageUptodate(page)) {
			struct page *head = compound_head(page);
			int i;

			for (i = 0; i < (1 << compound_order(head)); i++) {
				clear_highpage(head + i);
				flush_dcache_page(head + i);
			}
			SetPageUptodate(head);
1848
		}
L
Linus Torvalds 已提交
1849
	}
1850

1851
	/* Perhaps the file has been truncated since we checked */
H
Hugh Dickins 已提交
1852
	if (sgp <= SGP_CACHE &&
1853
	    ((loff_t)index << PAGE_SHIFT) >= i_size_read(inode)) {
1854 1855 1856
		if (alloced) {
			ClearPageDirty(page);
			delete_from_page_cache(page);
1857
			spin_lock_irq(&info->lock);
1858
			shmem_recalc_inode(inode);
1859
			spin_unlock_irq(&info->lock);
1860
		}
1861
		error = -EINVAL;
1862
		goto unlock;
H
Hugh Dickins 已提交
1863
	}
1864
	*pagep = page + index - hindex;
1865
	return 0;
L
Linus Torvalds 已提交
1866

1867
	/*
1868
	 * Error recovery.
1869
	 */
1870
unacct:
1871
	shmem_inode_unacct_blocks(inode, 1 << compound_order(page));
1872 1873 1874 1875 1876 1877

	if (PageTransHuge(page)) {
		unlock_page(page);
		put_page(page);
		goto alloc_nohuge;
	}
1878
failed:
1879
	if (swap.val && !shmem_confirm_swap(mapping, index, swap))
1880 1881
		error = -EEXIST;
unlock:
H
Hugh Dickins 已提交
1882
	if (page) {
1883
		unlock_page(page);
1884
		put_page(page);
1885 1886
	}
	if (error == -ENOSPC && !once++) {
1887
		spin_lock_irq(&info->lock);
1888
		shmem_recalc_inode(inode);
1889
		spin_unlock_irq(&info->lock);
H
Hugh Dickins 已提交
1890
		goto repeat;
1891
	}
M
Matthew Wilcox 已提交
1892
	if (error == -EEXIST)
1893 1894
		goto repeat;
	return error;
L
Linus Torvalds 已提交
1895 1896
}

1897 1898 1899 1900 1901
/*
 * This is like autoremove_wake_function, but it removes the wait queue
 * entry unconditionally - even if something else had already woken the
 * target.
 */
1902
static int synchronous_wake_function(wait_queue_entry_t *wait, unsigned mode, int sync, void *key)
1903 1904
{
	int ret = default_wake_function(wait, mode, sync, key);
1905
	list_del_init(&wait->entry);
1906 1907 1908
	return ret;
}

1909
static vm_fault_t shmem_fault(struct vm_fault *vmf)
L
Linus Torvalds 已提交
1910
{
1911
	struct vm_area_struct *vma = vmf->vma;
A
Al Viro 已提交
1912
	struct inode *inode = file_inode(vma->vm_file);
1913
	gfp_t gfp = mapping_gfp_mask(inode->i_mapping);
1914
	enum sgp_type sgp;
1915 1916
	int err;
	vm_fault_t ret = VM_FAULT_LOCKED;
L
Linus Torvalds 已提交
1917

1918 1919 1920 1921
	/*
	 * Trinity finds that probing a hole which tmpfs is punching can
	 * prevent the hole-punch from ever completing: which in turn
	 * locks writers out with its hold on i_mutex.  So refrain from
1922 1923 1924 1925 1926 1927 1928 1929 1930 1931 1932 1933
	 * faulting pages into the hole while it's being punched.  Although
	 * shmem_undo_range() does remove the additions, it may be unable to
	 * keep up, as each new page needs its own unmap_mapping_range() call,
	 * and the i_mmap tree grows ever slower to scan if new vmas are added.
	 *
	 * It does not matter if we sometimes reach this check just before the
	 * hole-punch begins, so that one fault then races with the punch:
	 * we just need to make racing faults a rare case.
	 *
	 * The implementation below would be much simpler if we just used a
	 * standard mutex or completion: but we cannot take i_mutex in fault,
	 * and bloating every shmem inode for this unlikely case would be sad.
1934 1935 1936 1937 1938 1939
	 */
	if (unlikely(inode->i_private)) {
		struct shmem_falloc *shmem_falloc;

		spin_lock(&inode->i_lock);
		shmem_falloc = inode->i_private;
1940 1941 1942 1943 1944
		if (shmem_falloc &&
		    shmem_falloc->waitq &&
		    vmf->pgoff >= shmem_falloc->start &&
		    vmf->pgoff < shmem_falloc->next) {
			wait_queue_head_t *shmem_falloc_waitq;
1945
			DEFINE_WAIT_FUNC(shmem_fault_wait, synchronous_wake_function);
1946 1947

			ret = VM_FAULT_NOPAGE;
1948 1949
			if ((vmf->flags & FAULT_FLAG_ALLOW_RETRY) &&
			   !(vmf->flags & FAULT_FLAG_RETRY_NOWAIT)) {
1950
				/* It's polite to up mmap_sem if we can */
1951
				up_read(&vma->vm_mm->mmap_sem);
1952
				ret = VM_FAULT_RETRY;
1953
			}
1954 1955 1956 1957 1958 1959 1960 1961 1962 1963 1964 1965 1966 1967 1968 1969 1970 1971

			shmem_falloc_waitq = shmem_falloc->waitq;
			prepare_to_wait(shmem_falloc_waitq, &shmem_fault_wait,
					TASK_UNINTERRUPTIBLE);
			spin_unlock(&inode->i_lock);
			schedule();

			/*
			 * shmem_falloc_waitq points into the shmem_fallocate()
			 * stack of the hole-punching task: shmem_falloc_waitq
			 * is usually invalid by the time we reach here, but
			 * finish_wait() does not dereference it in that case;
			 * though i_lock needed lest racing with wake_up_all().
			 */
			spin_lock(&inode->i_lock);
			finish_wait(shmem_falloc_waitq, &shmem_fault_wait);
			spin_unlock(&inode->i_lock);
			return ret;
1972
		}
1973
		spin_unlock(&inode->i_lock);
1974 1975
	}

1976
	sgp = SGP_CACHE;
1977 1978 1979

	if ((vma->vm_flags & VM_NOHUGEPAGE) ||
	    test_bit(MMF_DISABLE_THP, &vma->vm_mm->flags))
1980
		sgp = SGP_NOHUGE;
1981 1982
	else if (vma->vm_flags & VM_HUGEPAGE)
		sgp = SGP_HUGE;
1983

1984
	err = shmem_getpage_gfp(inode, vmf->pgoff, &vmf->page, sgp,
1985
				  gfp, vma, vmf, &ret);
1986 1987
	if (err)
		return vmf_error(err);
1988
	return ret;
L
Linus Torvalds 已提交
1989 1990
}

1991 1992 1993 1994 1995 1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006 2007 2008
unsigned long shmem_get_unmapped_area(struct file *file,
				      unsigned long uaddr, unsigned long len,
				      unsigned long pgoff, unsigned long flags)
{
	unsigned long (*get_area)(struct file *,
		unsigned long, unsigned long, unsigned long, unsigned long);
	unsigned long addr;
	unsigned long offset;
	unsigned long inflated_len;
	unsigned long inflated_addr;
	unsigned long inflated_offset;

	if (len > TASK_SIZE)
		return -ENOMEM;

	get_area = current->mm->get_unmapped_area;
	addr = get_area(file, uaddr, len, pgoff, flags);

2009
	if (!IS_ENABLED(CONFIG_TRANSPARENT_HUGE_PAGECACHE))
2010 2011 2012 2013 2014 2015 2016 2017 2018 2019 2020 2021 2022 2023 2024 2025 2026 2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046
		return addr;
	if (IS_ERR_VALUE(addr))
		return addr;
	if (addr & ~PAGE_MASK)
		return addr;
	if (addr > TASK_SIZE - len)
		return addr;

	if (shmem_huge == SHMEM_HUGE_DENY)
		return addr;
	if (len < HPAGE_PMD_SIZE)
		return addr;
	if (flags & MAP_FIXED)
		return addr;
	/*
	 * Our priority is to support MAP_SHARED mapped hugely;
	 * and support MAP_PRIVATE mapped hugely too, until it is COWed.
	 * But if caller specified an address hint, respect that as before.
	 */
	if (uaddr)
		return addr;

	if (shmem_huge != SHMEM_HUGE_FORCE) {
		struct super_block *sb;

		if (file) {
			VM_BUG_ON(file->f_op != &shmem_file_operations);
			sb = file_inode(file)->i_sb;
		} else {
			/*
			 * Called directly from mm/mmap.c, or drivers/char/mem.c
			 * for "/dev/zero", to create a shared anonymous object.
			 */
			if (IS_ERR(shm_mnt))
				return addr;
			sb = shm_mnt->mnt_sb;
		}
2047
		if (SHMEM_SB(sb)->huge == SHMEM_HUGE_NEVER)
2048 2049 2050 2051 2052 2053 2054 2055 2056 2057 2058 2059 2060 2061 2062 2063 2064 2065 2066 2067 2068 2069 2070 2071 2072 2073 2074 2075 2076 2077 2078
			return addr;
	}

	offset = (pgoff << PAGE_SHIFT) & (HPAGE_PMD_SIZE-1);
	if (offset && offset + len < 2 * HPAGE_PMD_SIZE)
		return addr;
	if ((addr & (HPAGE_PMD_SIZE-1)) == offset)
		return addr;

	inflated_len = len + HPAGE_PMD_SIZE - PAGE_SIZE;
	if (inflated_len > TASK_SIZE)
		return addr;
	if (inflated_len < len)
		return addr;

	inflated_addr = get_area(NULL, 0, inflated_len, 0, flags);
	if (IS_ERR_VALUE(inflated_addr))
		return addr;
	if (inflated_addr & ~PAGE_MASK)
		return addr;

	inflated_offset = inflated_addr & (HPAGE_PMD_SIZE-1);
	inflated_addr += offset - inflated_offset;
	if (inflated_offset > offset)
		inflated_addr += HPAGE_PMD_SIZE;

	if (inflated_addr > TASK_SIZE - len)
		return addr;
	return inflated_addr;
}

L
Linus Torvalds 已提交
2079
#ifdef CONFIG_NUMA
2080
static int shmem_set_policy(struct vm_area_struct *vma, struct mempolicy *mpol)
L
Linus Torvalds 已提交
2081
{
A
Al Viro 已提交
2082
	struct inode *inode = file_inode(vma->vm_file);
2083
	return mpol_set_shared_policy(&SHMEM_I(inode)->policy, vma, mpol);
L
Linus Torvalds 已提交
2084 2085
}

A
Adrian Bunk 已提交
2086 2087
static struct mempolicy *shmem_get_policy(struct vm_area_struct *vma,
					  unsigned long addr)
L
Linus Torvalds 已提交
2088
{
A
Al Viro 已提交
2089
	struct inode *inode = file_inode(vma->vm_file);
2090
	pgoff_t index;
L
Linus Torvalds 已提交
2091

2092 2093
	index = ((addr - vma->vm_start) >> PAGE_SHIFT) + vma->vm_pgoff;
	return mpol_shared_policy_lookup(&SHMEM_I(inode)->policy, index);
L
Linus Torvalds 已提交
2094 2095 2096 2097 2098
}
#endif

int shmem_lock(struct file *file, int lock, struct user_struct *user)
{
A
Al Viro 已提交
2099
	struct inode *inode = file_inode(file);
L
Linus Torvalds 已提交
2100 2101 2102
	struct shmem_inode_info *info = SHMEM_I(inode);
	int retval = -ENOMEM;

2103
	spin_lock_irq(&info->lock);
L
Linus Torvalds 已提交
2104 2105 2106 2107
	if (lock && !(info->flags & VM_LOCKED)) {
		if (!user_shm_lock(inode->i_size, user))
			goto out_nomem;
		info->flags |= VM_LOCKED;
2108
		mapping_set_unevictable(file->f_mapping);
L
Linus Torvalds 已提交
2109 2110 2111 2112
	}
	if (!lock && (info->flags & VM_LOCKED) && user) {
		user_shm_unlock(inode->i_size, user);
		info->flags &= ~VM_LOCKED;
2113
		mapping_clear_unevictable(file->f_mapping);
L
Linus Torvalds 已提交
2114 2115
	}
	retval = 0;
2116

L
Linus Torvalds 已提交
2117
out_nomem:
2118
	spin_unlock_irq(&info->lock);
L
Linus Torvalds 已提交
2119 2120 2121
	return retval;
}

2122
static int shmem_mmap(struct file *file, struct vm_area_struct *vma)
L
Linus Torvalds 已提交
2123 2124 2125
{
	file_accessed(file);
	vma->vm_ops = &shmem_vm_ops;
2126
	if (IS_ENABLED(CONFIG_TRANSPARENT_HUGE_PAGECACHE) &&
2127 2128 2129 2130
			((vma->vm_start + ~HPAGE_PMD_MASK) & HPAGE_PMD_MASK) <
			(vma->vm_end & HPAGE_PMD_MASK)) {
		khugepaged_enter(vma, vma->vm_flags);
	}
L
Linus Torvalds 已提交
2131 2132 2133
	return 0;
}

2134
static struct inode *shmem_get_inode(struct super_block *sb, const struct inode *dir,
2135
				     umode_t mode, dev_t dev, unsigned long flags)
L
Linus Torvalds 已提交
2136 2137 2138 2139 2140
{
	struct inode *inode;
	struct shmem_inode_info *info;
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);

2141 2142
	if (shmem_reserve_inode(sb))
		return NULL;
L
Linus Torvalds 已提交
2143 2144 2145

	inode = new_inode(sb);
	if (inode) {
2146
		inode->i_ino = get_next_ino();
2147
		inode_init_owner(inode, dir, mode);
L
Linus Torvalds 已提交
2148
		inode->i_blocks = 0;
2149
		inode->i_atime = inode->i_mtime = inode->i_ctime = current_time(inode);
2150
		inode->i_generation = prandom_u32();
L
Linus Torvalds 已提交
2151 2152 2153
		info = SHMEM_I(inode);
		memset(info, 0, (char *)inode - (char *)info);
		spin_lock_init(&info->lock);
D
David Herrmann 已提交
2154
		info->seals = F_SEAL_SEAL;
2155
		info->flags = flags & VM_NORESERVE;
2156
		INIT_LIST_HEAD(&info->shrinklist);
L
Linus Torvalds 已提交
2157
		INIT_LIST_HEAD(&info->swaplist);
2158
		simple_xattrs_init(&info->xattrs);
2159
		cache_no_acl(inode);
L
Linus Torvalds 已提交
2160 2161 2162

		switch (mode & S_IFMT) {
		default:
2163
			inode->i_op = &shmem_special_inode_operations;
L
Linus Torvalds 已提交
2164 2165 2166
			init_special_inode(inode, mode, dev);
			break;
		case S_IFREG:
2167
			inode->i_mapping->a_ops = &shmem_aops;
L
Linus Torvalds 已提交
2168 2169
			inode->i_op = &shmem_inode_operations;
			inode->i_fop = &shmem_file_operations;
2170 2171
			mpol_shared_policy_init(&info->policy,
						 shmem_get_sbmpol(sbinfo));
L
Linus Torvalds 已提交
2172 2173
			break;
		case S_IFDIR:
2174
			inc_nlink(inode);
L
Linus Torvalds 已提交
2175 2176 2177 2178 2179 2180 2181 2182 2183 2184
			/* Some things misbehave if size == 0 on a directory */
			inode->i_size = 2 * BOGO_DIRENT_SIZE;
			inode->i_op = &shmem_dir_inode_operations;
			inode->i_fop = &simple_dir_operations;
			break;
		case S_IFLNK:
			/*
			 * Must not load anything in the rbtree,
			 * mpol_free_shared_policy will not be called.
			 */
2185
			mpol_shared_policy_init(&info->policy, NULL);
L
Linus Torvalds 已提交
2186 2187
			break;
		}
2188 2189

		lockdep_annotate_inode_mutex_key(inode);
2190 2191
	} else
		shmem_free_inode(sb);
L
Linus Torvalds 已提交
2192 2193 2194
	return inode;
}

2195 2196
bool shmem_mapping(struct address_space *mapping)
{
2197
	return mapping->a_ops == &shmem_aops;
2198 2199
}

2200 2201 2202 2203 2204 2205 2206
static int shmem_mfill_atomic_pte(struct mm_struct *dst_mm,
				  pmd_t *dst_pmd,
				  struct vm_area_struct *dst_vma,
				  unsigned long dst_addr,
				  unsigned long src_addr,
				  bool zeropage,
				  struct page **pagep)
2207 2208 2209 2210 2211 2212 2213 2214 2215 2216 2217 2218 2219
{
	struct inode *inode = file_inode(dst_vma->vm_file);
	struct shmem_inode_info *info = SHMEM_I(inode);
	struct address_space *mapping = inode->i_mapping;
	gfp_t gfp = mapping_gfp_mask(mapping);
	pgoff_t pgoff = linear_page_index(dst_vma, dst_addr);
	struct mem_cgroup *memcg;
	spinlock_t *ptl;
	void *page_kaddr;
	struct page *page;
	pte_t _dst_pte, *dst_pte;
	int ret;

2220
	ret = -ENOMEM;
2221
	if (!shmem_inode_acct_block(inode, 1))
2222
		goto out;
2223

2224
	if (!*pagep) {
2225 2226
		page = shmem_alloc_page(gfp, info, pgoff);
		if (!page)
2227
			goto out_unacct_blocks;
2228

2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244
		if (!zeropage) {	/* mcopy_atomic */
			page_kaddr = kmap_atomic(page);
			ret = copy_from_user(page_kaddr,
					     (const void __user *)src_addr,
					     PAGE_SIZE);
			kunmap_atomic(page_kaddr);

			/* fallback to copy_from_user outside mmap_sem */
			if (unlikely(ret)) {
				*pagep = page;
				shmem_inode_unacct_blocks(inode, 1);
				/* don't free the page */
				return -EFAULT;
			}
		} else {		/* mfill_zeropage_atomic */
			clear_highpage(page);
2245 2246 2247 2248 2249 2250
		}
	} else {
		page = *pagep;
		*pagep = NULL;
	}

2251 2252 2253
	VM_BUG_ON(PageLocked(page) || PageSwapBacked(page));
	__SetPageLocked(page);
	__SetPageSwapBacked(page);
2254
	__SetPageUptodate(page);
2255

2256
	ret = mem_cgroup_try_charge_delay(page, dst_mm, gfp, &memcg, false);
2257 2258 2259
	if (ret)
		goto out_release;

2260 2261
	ret = shmem_add_to_page_cache(page, mapping, pgoff, NULL,
						gfp & GFP_RECLAIM_MASK);
2262 2263 2264 2265 2266 2267 2268 2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287 2288 2289 2290 2291 2292 2293 2294 2295 2296 2297 2298 2299
	if (ret)
		goto out_release_uncharge;

	mem_cgroup_commit_charge(page, memcg, false, false);

	_dst_pte = mk_pte(page, dst_vma->vm_page_prot);
	if (dst_vma->vm_flags & VM_WRITE)
		_dst_pte = pte_mkwrite(pte_mkdirty(_dst_pte));

	ret = -EEXIST;
	dst_pte = pte_offset_map_lock(dst_mm, dst_pmd, dst_addr, &ptl);
	if (!pte_none(*dst_pte))
		goto out_release_uncharge_unlock;

	lru_cache_add_anon(page);

	spin_lock(&info->lock);
	info->alloced++;
	inode->i_blocks += BLOCKS_PER_PAGE;
	shmem_recalc_inode(inode);
	spin_unlock(&info->lock);

	inc_mm_counter(dst_mm, mm_counter_file(page));
	page_add_file_rmap(page, false);
	set_pte_at(dst_mm, dst_addr, dst_pte, _dst_pte);

	/* No need to invalidate - it was non-present before */
	update_mmu_cache(dst_vma, dst_addr, dst_pte);
	unlock_page(page);
	pte_unmap_unlock(dst_pte, ptl);
	ret = 0;
out:
	return ret;
out_release_uncharge_unlock:
	pte_unmap_unlock(dst_pte, ptl);
out_release_uncharge:
	mem_cgroup_cancel_charge(page, memcg, false);
out_release:
2300
	unlock_page(page);
2301 2302
	put_page(page);
out_unacct_blocks:
2303
	shmem_inode_unacct_blocks(inode, 1);
2304 2305 2306
	goto out;
}

2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326 2327 2328
int shmem_mcopy_atomic_pte(struct mm_struct *dst_mm,
			   pmd_t *dst_pmd,
			   struct vm_area_struct *dst_vma,
			   unsigned long dst_addr,
			   unsigned long src_addr,
			   struct page **pagep)
{
	return shmem_mfill_atomic_pte(dst_mm, dst_pmd, dst_vma,
				      dst_addr, src_addr, false, pagep);
}

int shmem_mfill_zeropage_pte(struct mm_struct *dst_mm,
			     pmd_t *dst_pmd,
			     struct vm_area_struct *dst_vma,
			     unsigned long dst_addr)
{
	struct page *page = NULL;

	return shmem_mfill_atomic_pte(dst_mm, dst_pmd, dst_vma,
				      dst_addr, 0, true, &page);
}

L
Linus Torvalds 已提交
2329
#ifdef CONFIG_TMPFS
2330
static const struct inode_operations shmem_symlink_inode_operations;
2331
static const struct inode_operations shmem_short_symlink_operations;
L
Linus Torvalds 已提交
2332

2333 2334 2335 2336 2337 2338
#ifdef CONFIG_TMPFS_XATTR
static int shmem_initxattrs(struct inode *, const struct xattr *, void *);
#else
#define shmem_initxattrs NULL
#endif

L
Linus Torvalds 已提交
2339
static int
N
Nick Piggin 已提交
2340 2341 2342
shmem_write_begin(struct file *file, struct address_space *mapping,
			loff_t pos, unsigned len, unsigned flags,
			struct page **pagep, void **fsdata)
L
Linus Torvalds 已提交
2343
{
N
Nick Piggin 已提交
2344
	struct inode *inode = mapping->host;
D
David Herrmann 已提交
2345
	struct shmem_inode_info *info = SHMEM_I(inode);
2346
	pgoff_t index = pos >> PAGE_SHIFT;
D
David Herrmann 已提交
2347 2348

	/* i_mutex is held by caller */
2349
	if (unlikely(info->seals & (F_SEAL_WRITE | F_SEAL_GROW))) {
D
David Herrmann 已提交
2350 2351 2352 2353 2354 2355
		if (info->seals & F_SEAL_WRITE)
			return -EPERM;
		if ((info->seals & F_SEAL_GROW) && pos + len > inode->i_size)
			return -EPERM;
	}

2356
	return shmem_getpage(inode, index, pagep, SGP_WRITE);
N
Nick Piggin 已提交
2357 2358 2359 2360 2361 2362 2363 2364 2365
}

static int
shmem_write_end(struct file *file, struct address_space *mapping,
			loff_t pos, unsigned len, unsigned copied,
			struct page *page, void *fsdata)
{
	struct inode *inode = mapping->host;

H
Hugh Dickins 已提交
2366 2367 2368
	if (pos + copied > inode->i_size)
		i_size_write(inode, pos + copied);

2369
	if (!PageUptodate(page)) {
2370 2371 2372 2373 2374 2375 2376 2377 2378 2379 2380
		struct page *head = compound_head(page);
		if (PageTransCompound(page)) {
			int i;

			for (i = 0; i < HPAGE_PMD_NR; i++) {
				if (head + i == page)
					continue;
				clear_highpage(head + i);
				flush_dcache_page(head + i);
			}
		}
2381 2382
		if (copied < PAGE_SIZE) {
			unsigned from = pos & (PAGE_SIZE - 1);
2383
			zero_user_segments(page, 0, from,
2384
					from + copied, PAGE_SIZE);
2385
		}
2386
		SetPageUptodate(head);
2387
	}
N
Nick Piggin 已提交
2388
	set_page_dirty(page);
2389
	unlock_page(page);
2390
	put_page(page);
N
Nick Piggin 已提交
2391 2392

	return copied;
L
Linus Torvalds 已提交
2393 2394
}

A
Al Viro 已提交
2395
static ssize_t shmem_file_read_iter(struct kiocb *iocb, struct iov_iter *to)
L
Linus Torvalds 已提交
2396
{
2397 2398
	struct file *file = iocb->ki_filp;
	struct inode *inode = file_inode(file);
L
Linus Torvalds 已提交
2399
	struct address_space *mapping = inode->i_mapping;
2400 2401
	pgoff_t index;
	unsigned long offset;
2402
	enum sgp_type sgp = SGP_READ;
2403
	int error = 0;
A
Al Viro 已提交
2404
	ssize_t retval = 0;
2405
	loff_t *ppos = &iocb->ki_pos;
2406 2407 2408 2409 2410 2411

	/*
	 * Might this read be for a stacking filesystem?  Then when reading
	 * holes of a sparse file, we actually need to allocate those pages,
	 * and even mark them dirty, so it cannot exceed the max_blocks limit.
	 */
A
Al Viro 已提交
2412
	if (!iter_is_iovec(to))
H
Hugh Dickins 已提交
2413
		sgp = SGP_CACHE;
L
Linus Torvalds 已提交
2414

2415 2416
	index = *ppos >> PAGE_SHIFT;
	offset = *ppos & ~PAGE_MASK;
L
Linus Torvalds 已提交
2417 2418 2419

	for (;;) {
		struct page *page = NULL;
2420 2421
		pgoff_t end_index;
		unsigned long nr, ret;
L
Linus Torvalds 已提交
2422 2423
		loff_t i_size = i_size_read(inode);

2424
		end_index = i_size >> PAGE_SHIFT;
L
Linus Torvalds 已提交
2425 2426 2427
		if (index > end_index)
			break;
		if (index == end_index) {
2428
			nr = i_size & ~PAGE_MASK;
L
Linus Torvalds 已提交
2429 2430 2431 2432
			if (nr <= offset)
				break;
		}

2433
		error = shmem_getpage(inode, index, &page, sgp);
2434 2435 2436
		if (error) {
			if (error == -EINVAL)
				error = 0;
L
Linus Torvalds 已提交
2437 2438
			break;
		}
H
Hugh Dickins 已提交
2439 2440 2441
		if (page) {
			if (sgp == SGP_CACHE)
				set_page_dirty(page);
H
Hugh Dickins 已提交
2442
			unlock_page(page);
H
Hugh Dickins 已提交
2443
		}
L
Linus Torvalds 已提交
2444 2445 2446

		/*
		 * We must evaluate after, since reads (unlike writes)
2447
		 * are called without i_mutex protection against truncate
L
Linus Torvalds 已提交
2448
		 */
2449
		nr = PAGE_SIZE;
L
Linus Torvalds 已提交
2450
		i_size = i_size_read(inode);
2451
		end_index = i_size >> PAGE_SHIFT;
L
Linus Torvalds 已提交
2452
		if (index == end_index) {
2453
			nr = i_size & ~PAGE_MASK;
L
Linus Torvalds 已提交
2454 2455
			if (nr <= offset) {
				if (page)
2456
					put_page(page);
L
Linus Torvalds 已提交
2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474
				break;
			}
		}
		nr -= offset;

		if (page) {
			/*
			 * If users can be writing to this page using arbitrary
			 * virtual addresses, take care about potential aliasing
			 * before reading the page on the kernel side.
			 */
			if (mapping_writably_mapped(mapping))
				flush_dcache_page(page);
			/*
			 * Mark the page accessed if we read the beginning.
			 */
			if (!offset)
				mark_page_accessed(page);
N
Nick Piggin 已提交
2475
		} else {
L
Linus Torvalds 已提交
2476
			page = ZERO_PAGE(0);
2477
			get_page(page);
N
Nick Piggin 已提交
2478
		}
L
Linus Torvalds 已提交
2479 2480 2481 2482 2483

		/*
		 * Ok, we have the page, and it's up-to-date, so
		 * now we can copy it to user space...
		 */
A
Al Viro 已提交
2484
		ret = copy_page_to_iter(page, offset, nr, to);
2485
		retval += ret;
L
Linus Torvalds 已提交
2486
		offset += ret;
2487 2488
		index += offset >> PAGE_SHIFT;
		offset &= ~PAGE_MASK;
L
Linus Torvalds 已提交
2489

2490
		put_page(page);
A
Al Viro 已提交
2491
		if (!iov_iter_count(to))
L
Linus Torvalds 已提交
2492
			break;
2493 2494 2495 2496
		if (ret < nr) {
			error = -EFAULT;
			break;
		}
L
Linus Torvalds 已提交
2497 2498 2499
		cond_resched();
	}

2500
	*ppos = ((loff_t) index << PAGE_SHIFT) + offset;
2501 2502
	file_accessed(file);
	return retval ? retval : error;
L
Linus Torvalds 已提交
2503 2504
}

2505
/*
M
Matthew Wilcox 已提交
2506
 * llseek SEEK_DATA or SEEK_HOLE through the page cache.
2507 2508
 */
static pgoff_t shmem_seek_hole_data(struct address_space *mapping,
2509
				    pgoff_t index, pgoff_t end, int whence)
2510 2511 2512 2513 2514 2515 2516
{
	struct page *page;
	struct pagevec pvec;
	pgoff_t indices[PAGEVEC_SIZE];
	bool done = false;
	int i;

2517
	pagevec_init(&pvec);
2518 2519
	pvec.nr = 1;		/* start small: we may be there already */
	while (!done) {
2520
		pvec.nr = find_get_entries(mapping, index,
2521 2522
					pvec.nr, pvec.pages, indices);
		if (!pvec.nr) {
2523
			if (whence == SEEK_DATA)
2524 2525 2526 2527 2528
				index = end;
			break;
		}
		for (i = 0; i < pvec.nr; i++, index++) {
			if (index < indices[i]) {
2529
				if (whence == SEEK_HOLE) {
2530 2531 2532 2533 2534 2535
					done = true;
					break;
				}
				index = indices[i];
			}
			page = pvec.pages[i];
2536
			if (page && !xa_is_value(page)) {
2537 2538 2539 2540
				if (!PageUptodate(page))
					page = NULL;
			}
			if (index >= end ||
2541 2542
			    (page && whence == SEEK_DATA) ||
			    (!page && whence == SEEK_HOLE)) {
2543 2544 2545 2546
				done = true;
				break;
			}
		}
2547
		pagevec_remove_exceptionals(&pvec);
2548 2549 2550 2551 2552 2553 2554
		pagevec_release(&pvec);
		pvec.nr = PAGEVEC_SIZE;
		cond_resched();
	}
	return index;
}

2555
static loff_t shmem_file_llseek(struct file *file, loff_t offset, int whence)
2556 2557 2558 2559 2560 2561
{
	struct address_space *mapping = file->f_mapping;
	struct inode *inode = mapping->host;
	pgoff_t start, end;
	loff_t new_offset;

2562 2563
	if (whence != SEEK_DATA && whence != SEEK_HOLE)
		return generic_file_llseek_size(file, offset, whence,
2564
					MAX_LFS_FILESIZE, i_size_read(inode));
A
Al Viro 已提交
2565
	inode_lock(inode);
2566 2567
	/* We're holding i_mutex so we can access i_size directly */

2568
	if (offset < 0 || offset >= inode->i_size)
2569 2570
		offset = -ENXIO;
	else {
2571 2572
		start = offset >> PAGE_SHIFT;
		end = (inode->i_size + PAGE_SIZE - 1) >> PAGE_SHIFT;
2573
		new_offset = shmem_seek_hole_data(mapping, start, end, whence);
2574
		new_offset <<= PAGE_SHIFT;
2575 2576 2577
		if (new_offset > offset) {
			if (new_offset < inode->i_size)
				offset = new_offset;
2578
			else if (whence == SEEK_DATA)
2579 2580 2581 2582 2583 2584
				offset = -ENXIO;
			else
				offset = inode->i_size;
		}
	}

2585 2586
	if (offset >= 0)
		offset = vfs_setpos(file, offset, MAX_LFS_FILESIZE);
A
Al Viro 已提交
2587
	inode_unlock(inode);
2588 2589 2590
	return offset;
}

2591 2592 2593
static long shmem_fallocate(struct file *file, int mode, loff_t offset,
							 loff_t len)
{
A
Al Viro 已提交
2594
	struct inode *inode = file_inode(file);
2595
	struct shmem_sb_info *sbinfo = SHMEM_SB(inode->i_sb);
D
David Herrmann 已提交
2596
	struct shmem_inode_info *info = SHMEM_I(inode);
2597
	struct shmem_falloc shmem_falloc;
2598 2599
	pgoff_t start, index, end;
	int error;
2600

2601 2602 2603
	if (mode & ~(FALLOC_FL_KEEP_SIZE | FALLOC_FL_PUNCH_HOLE))
		return -EOPNOTSUPP;

A
Al Viro 已提交
2604
	inode_lock(inode);
2605 2606 2607 2608 2609

	if (mode & FALLOC_FL_PUNCH_HOLE) {
		struct address_space *mapping = file->f_mapping;
		loff_t unmap_start = round_up(offset, PAGE_SIZE);
		loff_t unmap_end = round_down(offset + len, PAGE_SIZE) - 1;
2610
		DECLARE_WAIT_QUEUE_HEAD_ONSTACK(shmem_falloc_waitq);
2611

D
David Herrmann 已提交
2612 2613 2614 2615 2616 2617
		/* protected by i_mutex */
		if (info->seals & F_SEAL_WRITE) {
			error = -EPERM;
			goto out;
		}

2618
		shmem_falloc.waitq = &shmem_falloc_waitq;
2619 2620 2621 2622 2623 2624
		shmem_falloc.start = unmap_start >> PAGE_SHIFT;
		shmem_falloc.next = (unmap_end + 1) >> PAGE_SHIFT;
		spin_lock(&inode->i_lock);
		inode->i_private = &shmem_falloc;
		spin_unlock(&inode->i_lock);

2625 2626 2627 2628 2629
		if ((u64)unmap_end > (u64)unmap_start)
			unmap_mapping_range(mapping, unmap_start,
					    1 + unmap_end - unmap_start, 0);
		shmem_truncate_range(inode, offset, offset + len - 1);
		/* No need to unmap again: hole-punching leaves COWed pages */
2630 2631 2632 2633

		spin_lock(&inode->i_lock);
		inode->i_private = NULL;
		wake_up_all(&shmem_falloc_waitq);
2634
		WARN_ON_ONCE(!list_empty(&shmem_falloc_waitq.head));
2635
		spin_unlock(&inode->i_lock);
2636
		error = 0;
2637
		goto out;
2638 2639 2640 2641 2642 2643 2644
	}

	/* We need to check rlimit even when FALLOC_FL_KEEP_SIZE */
	error = inode_newsize_ok(inode, offset + len);
	if (error)
		goto out;

D
David Herrmann 已提交
2645 2646 2647 2648 2649
	if ((info->seals & F_SEAL_GROW) && offset + len > inode->i_size) {
		error = -EPERM;
		goto out;
	}

2650 2651
	start = offset >> PAGE_SHIFT;
	end = (offset + len + PAGE_SIZE - 1) >> PAGE_SHIFT;
2652 2653 2654 2655
	/* Try to avoid a swapstorm if len is impossible to satisfy */
	if (sbinfo->max_blocks && end - start > sbinfo->max_blocks) {
		error = -ENOSPC;
		goto out;
2656 2657
	}

2658
	shmem_falloc.waitq = NULL;
2659 2660 2661 2662 2663 2664 2665 2666
	shmem_falloc.start = start;
	shmem_falloc.next  = start;
	shmem_falloc.nr_falloced = 0;
	shmem_falloc.nr_unswapped = 0;
	spin_lock(&inode->i_lock);
	inode->i_private = &shmem_falloc;
	spin_unlock(&inode->i_lock);

2667 2668 2669 2670 2671 2672 2673 2674 2675
	for (index = start; index < end; index++) {
		struct page *page;

		/*
		 * Good, the fallocate(2) manpage permits EINTR: we may have
		 * been interrupted because we are using up too much memory.
		 */
		if (signal_pending(current))
			error = -EINTR;
2676 2677
		else if (shmem_falloc.nr_unswapped > shmem_falloc.nr_falloced)
			error = -ENOMEM;
2678
		else
2679
			error = shmem_getpage(inode, index, &page, SGP_FALLOC);
2680
		if (error) {
2681
			/* Remove the !PageUptodate pages we added */
2682 2683 2684 2685 2686
			if (index > start) {
				shmem_undo_range(inode,
				    (loff_t)start << PAGE_SHIFT,
				    ((loff_t)index << PAGE_SHIFT) - 1, true);
			}
2687
			goto undone;
2688 2689
		}

2690 2691 2692 2693 2694 2695 2696 2697
		/*
		 * Inform shmem_writepage() how far we have reached.
		 * No need for lock or barrier: we have the page lock.
		 */
		shmem_falloc.next++;
		if (!PageUptodate(page))
			shmem_falloc.nr_falloced++;

2698
		/*
2699 2700 2701
		 * If !PageUptodate, leave it that way so that freeable pages
		 * can be recognized if we need to rollback on error later.
		 * But set_page_dirty so that memory pressure will swap rather
2702 2703 2704 2705 2706
		 * than free the pages we are allocating (and SGP_CACHE pages
		 * might still be clean: we now need to mark those dirty too).
		 */
		set_page_dirty(page);
		unlock_page(page);
2707
		put_page(page);
2708 2709 2710 2711 2712
		cond_resched();
	}

	if (!(mode & FALLOC_FL_KEEP_SIZE) && offset + len > inode->i_size)
		i_size_write(inode, offset + len);
2713
	inode->i_ctime = current_time(inode);
2714 2715 2716 2717
undone:
	spin_lock(&inode->i_lock);
	inode->i_private = NULL;
	spin_unlock(&inode->i_lock);
2718
out:
A
Al Viro 已提交
2719
	inode_unlock(inode);
2720 2721 2722
	return error;
}

2723
static int shmem_statfs(struct dentry *dentry, struct kstatfs *buf)
L
Linus Torvalds 已提交
2724
{
2725
	struct shmem_sb_info *sbinfo = SHMEM_SB(dentry->d_sb);
L
Linus Torvalds 已提交
2726 2727

	buf->f_type = TMPFS_MAGIC;
2728
	buf->f_bsize = PAGE_SIZE;
L
Linus Torvalds 已提交
2729
	buf->f_namelen = NAME_MAX;
2730
	if (sbinfo->max_blocks) {
L
Linus Torvalds 已提交
2731
		buf->f_blocks = sbinfo->max_blocks;
2732 2733 2734
		buf->f_bavail =
		buf->f_bfree  = sbinfo->max_blocks -
				percpu_counter_sum(&sbinfo->used_blocks);
2735 2736
	}
	if (sbinfo->max_inodes) {
L
Linus Torvalds 已提交
2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747
		buf->f_files = sbinfo->max_inodes;
		buf->f_ffree = sbinfo->free_inodes;
	}
	/* else leave those fields 0 like simple_statfs */
	return 0;
}

/*
 * File creation. Allocate an inode, and we're done..
 */
static int
A
Al Viro 已提交
2748
shmem_mknod(struct inode *dir, struct dentry *dentry, umode_t mode, dev_t dev)
L
Linus Torvalds 已提交
2749
{
2750
	struct inode *inode;
L
Linus Torvalds 已提交
2751 2752
	int error = -ENOSPC;

2753
	inode = shmem_get_inode(dir->i_sb, dir, mode, dev, VM_NORESERVE);
L
Linus Torvalds 已提交
2754
	if (inode) {
C
Christoph Hellwig 已提交
2755 2756 2757
		error = simple_acl_create(dir, inode);
		if (error)
			goto out_iput;
2758
		error = security_inode_init_security(inode, dir,
2759
						     &dentry->d_name,
2760
						     shmem_initxattrs, NULL);
C
Christoph Hellwig 已提交
2761 2762
		if (error && error != -EOPNOTSUPP)
			goto out_iput;
2763

A
Al Viro 已提交
2764
		error = 0;
L
Linus Torvalds 已提交
2765
		dir->i_size += BOGO_DIRENT_SIZE;
2766
		dir->i_ctime = dir->i_mtime = current_time(dir);
L
Linus Torvalds 已提交
2767 2768 2769 2770
		d_instantiate(dentry, inode);
		dget(dentry); /* Extra count - pin the dentry in core */
	}
	return error;
C
Christoph Hellwig 已提交
2771 2772 2773
out_iput:
	iput(inode);
	return error;
L
Linus Torvalds 已提交
2774 2775
}

2776 2777 2778 2779 2780 2781 2782 2783 2784 2785 2786
static int
shmem_tmpfile(struct inode *dir, struct dentry *dentry, umode_t mode)
{
	struct inode *inode;
	int error = -ENOSPC;

	inode = shmem_get_inode(dir->i_sb, dir, mode, 0, VM_NORESERVE);
	if (inode) {
		error = security_inode_init_security(inode, dir,
						     NULL,
						     shmem_initxattrs, NULL);
C
Christoph Hellwig 已提交
2787 2788 2789 2790 2791
		if (error && error != -EOPNOTSUPP)
			goto out_iput;
		error = simple_acl_create(dir, inode);
		if (error)
			goto out_iput;
2792 2793 2794
		d_tmpfile(dentry, inode);
	}
	return error;
C
Christoph Hellwig 已提交
2795 2796 2797
out_iput:
	iput(inode);
	return error;
2798 2799
}

2800
static int shmem_mkdir(struct inode *dir, struct dentry *dentry, umode_t mode)
L
Linus Torvalds 已提交
2801 2802 2803 2804 2805
{
	int error;

	if ((error = shmem_mknod(dir, dentry, mode | S_IFDIR, 0)))
		return error;
2806
	inc_nlink(dir);
L
Linus Torvalds 已提交
2807 2808 2809
	return 0;
}

A
Al Viro 已提交
2810
static int shmem_create(struct inode *dir, struct dentry *dentry, umode_t mode,
A
Al Viro 已提交
2811
		bool excl)
L
Linus Torvalds 已提交
2812 2813 2814 2815 2816 2817 2818 2819 2820
{
	return shmem_mknod(dir, dentry, mode | S_IFREG, 0);
}

/*
 * Link a file..
 */
static int shmem_link(struct dentry *old_dentry, struct inode *dir, struct dentry *dentry)
{
2821
	struct inode *inode = d_inode(old_dentry);
2822
	int ret;
L
Linus Torvalds 已提交
2823 2824 2825 2826 2827 2828

	/*
	 * No ordinary (disk based) filesystem counts links as inodes;
	 * but each new link needs a new dentry, pinning lowmem, and
	 * tmpfs dentries cannot be pruned until they are unlinked.
	 */
2829 2830 2831
	ret = shmem_reserve_inode(inode->i_sb);
	if (ret)
		goto out;
L
Linus Torvalds 已提交
2832 2833

	dir->i_size += BOGO_DIRENT_SIZE;
2834
	inode->i_ctime = dir->i_ctime = dir->i_mtime = current_time(inode);
2835
	inc_nlink(inode);
A
Al Viro 已提交
2836
	ihold(inode);	/* New dentry reference */
L
Linus Torvalds 已提交
2837 2838
	dget(dentry);		/* Extra pinning count for the created dentry */
	d_instantiate(dentry, inode);
2839 2840
out:
	return ret;
L
Linus Torvalds 已提交
2841 2842 2843 2844
}

static int shmem_unlink(struct inode *dir, struct dentry *dentry)
{
2845
	struct inode *inode = d_inode(dentry);
L
Linus Torvalds 已提交
2846

2847 2848
	if (inode->i_nlink > 1 && !S_ISDIR(inode->i_mode))
		shmem_free_inode(inode->i_sb);
L
Linus Torvalds 已提交
2849 2850

	dir->i_size -= BOGO_DIRENT_SIZE;
2851
	inode->i_ctime = dir->i_ctime = dir->i_mtime = current_time(inode);
2852
	drop_nlink(inode);
L
Linus Torvalds 已提交
2853 2854 2855 2856 2857 2858 2859 2860 2861
	dput(dentry);	/* Undo the count from "create" - this does all the work */
	return 0;
}

static int shmem_rmdir(struct inode *dir, struct dentry *dentry)
{
	if (!simple_empty(dentry))
		return -ENOTEMPTY;

2862
	drop_nlink(d_inode(dentry));
2863
	drop_nlink(dir);
L
Linus Torvalds 已提交
2864 2865 2866
	return shmem_unlink(dir, dentry);
}

M
Miklos Szeredi 已提交
2867 2868
static int shmem_exchange(struct inode *old_dir, struct dentry *old_dentry, struct inode *new_dir, struct dentry *new_dentry)
{
2869 2870
	bool old_is_dir = d_is_dir(old_dentry);
	bool new_is_dir = d_is_dir(new_dentry);
M
Miklos Szeredi 已提交
2871 2872 2873 2874 2875 2876 2877 2878 2879 2880 2881 2882

	if (old_dir != new_dir && old_is_dir != new_is_dir) {
		if (old_is_dir) {
			drop_nlink(old_dir);
			inc_nlink(new_dir);
		} else {
			drop_nlink(new_dir);
			inc_nlink(old_dir);
		}
	}
	old_dir->i_ctime = old_dir->i_mtime =
	new_dir->i_ctime = new_dir->i_mtime =
2883
	d_inode(old_dentry)->i_ctime =
2884
	d_inode(new_dentry)->i_ctime = current_time(old_dir);
M
Miklos Szeredi 已提交
2885 2886 2887 2888

	return 0;
}

M
Miklos Szeredi 已提交
2889 2890 2891 2892 2893 2894 2895 2896 2897 2898 2899 2900 2901 2902 2903 2904 2905 2906 2907 2908 2909 2910 2911 2912 2913 2914
static int shmem_whiteout(struct inode *old_dir, struct dentry *old_dentry)
{
	struct dentry *whiteout;
	int error;

	whiteout = d_alloc(old_dentry->d_parent, &old_dentry->d_name);
	if (!whiteout)
		return -ENOMEM;

	error = shmem_mknod(old_dir, whiteout,
			    S_IFCHR | WHITEOUT_MODE, WHITEOUT_DEV);
	dput(whiteout);
	if (error)
		return error;

	/*
	 * Cheat and hash the whiteout while the old dentry is still in
	 * place, instead of playing games with FS_RENAME_DOES_D_MOVE.
	 *
	 * d_lookup() will consistently find one of them at this point,
	 * not sure which one, but that isn't even important.
	 */
	d_rehash(whiteout);
	return 0;
}

L
Linus Torvalds 已提交
2915 2916 2917 2918 2919 2920
/*
 * The VFS layer already does all the dentry stuff for rename,
 * we just have to decrement the usage count for the target if
 * it exists so that the VFS layer correctly free's it when it
 * gets overwritten.
 */
M
Miklos Szeredi 已提交
2921
static int shmem_rename2(struct inode *old_dir, struct dentry *old_dentry, struct inode *new_dir, struct dentry *new_dentry, unsigned int flags)
L
Linus Torvalds 已提交
2922
{
2923
	struct inode *inode = d_inode(old_dentry);
L
Linus Torvalds 已提交
2924 2925
	int they_are_dirs = S_ISDIR(inode->i_mode);

M
Miklos Szeredi 已提交
2926
	if (flags & ~(RENAME_NOREPLACE | RENAME_EXCHANGE | RENAME_WHITEOUT))
M
Miklos Szeredi 已提交
2927 2928
		return -EINVAL;

M
Miklos Szeredi 已提交
2929 2930 2931
	if (flags & RENAME_EXCHANGE)
		return shmem_exchange(old_dir, old_dentry, new_dir, new_dentry);

L
Linus Torvalds 已提交
2932 2933 2934
	if (!simple_empty(new_dentry))
		return -ENOTEMPTY;

M
Miklos Szeredi 已提交
2935 2936 2937 2938 2939 2940 2941 2942
	if (flags & RENAME_WHITEOUT) {
		int error;

		error = shmem_whiteout(old_dir, old_dentry);
		if (error)
			return error;
	}

2943
	if (d_really_is_positive(new_dentry)) {
L
Linus Torvalds 已提交
2944
		(void) shmem_unlink(new_dir, new_dentry);
2945
		if (they_are_dirs) {
2946
			drop_nlink(d_inode(new_dentry));
2947
			drop_nlink(old_dir);
2948
		}
L
Linus Torvalds 已提交
2949
	} else if (they_are_dirs) {
2950
		drop_nlink(old_dir);
2951
		inc_nlink(new_dir);
L
Linus Torvalds 已提交
2952 2953 2954 2955 2956 2957
	}

	old_dir->i_size -= BOGO_DIRENT_SIZE;
	new_dir->i_size += BOGO_DIRENT_SIZE;
	old_dir->i_ctime = old_dir->i_mtime =
	new_dir->i_ctime = new_dir->i_mtime =
2958
	inode->i_ctime = current_time(old_dir);
L
Linus Torvalds 已提交
2959 2960 2961 2962 2963 2964 2965 2966
	return 0;
}

static int shmem_symlink(struct inode *dir, struct dentry *dentry, const char *symname)
{
	int error;
	int len;
	struct inode *inode;
H
Hugh Dickins 已提交
2967
	struct page *page;
L
Linus Torvalds 已提交
2968 2969

	len = strlen(symname) + 1;
2970
	if (len > PAGE_SIZE)
L
Linus Torvalds 已提交
2971 2972
		return -ENAMETOOLONG;

2973 2974
	inode = shmem_get_inode(dir->i_sb, dir, S_IFLNK | 0777, 0,
				VM_NORESERVE);
L
Linus Torvalds 已提交
2975 2976 2977
	if (!inode)
		return -ENOSPC;

2978
	error = security_inode_init_security(inode, dir, &dentry->d_name,
2979
					     shmem_initxattrs, NULL);
2980 2981 2982 2983 2984 2985 2986 2987
	if (error) {
		if (error != -EOPNOTSUPP) {
			iput(inode);
			return error;
		}
		error = 0;
	}

L
Linus Torvalds 已提交
2988
	inode->i_size = len-1;
2989
	if (len <= SHORT_SYMLINK_LEN) {
2990 2991
		inode->i_link = kmemdup(symname, len, GFP_KERNEL);
		if (!inode->i_link) {
2992 2993 2994 2995
			iput(inode);
			return -ENOMEM;
		}
		inode->i_op = &shmem_short_symlink_operations;
L
Linus Torvalds 已提交
2996
	} else {
2997
		inode_nohighmem(inode);
2998
		error = shmem_getpage(inode, 0, &page, SGP_WRITE);
L
Linus Torvalds 已提交
2999 3000 3001 3002
		if (error) {
			iput(inode);
			return error;
		}
3003
		inode->i_mapping->a_ops = &shmem_aops;
L
Linus Torvalds 已提交
3004
		inode->i_op = &shmem_symlink_inode_operations;
3005
		memcpy(page_address(page), symname, len);
3006
		SetPageUptodate(page);
L
Linus Torvalds 已提交
3007
		set_page_dirty(page);
3008
		unlock_page(page);
3009
		put_page(page);
L
Linus Torvalds 已提交
3010 3011
	}
	dir->i_size += BOGO_DIRENT_SIZE;
3012
	dir->i_ctime = dir->i_mtime = current_time(dir);
L
Linus Torvalds 已提交
3013 3014 3015 3016 3017
	d_instantiate(dentry, inode);
	dget(dentry);
	return 0;
}

3018
static void shmem_put_link(void *arg)
L
Linus Torvalds 已提交
3019
{
3020 3021
	mark_page_accessed(arg);
	put_page(arg);
L
Linus Torvalds 已提交
3022 3023
}

3024
static const char *shmem_get_link(struct dentry *dentry,
3025 3026
				  struct inode *inode,
				  struct delayed_call *done)
L
Linus Torvalds 已提交
3027 3028
{
	struct page *page = NULL;
3029
	int error;
3030 3031 3032 3033 3034 3035 3036 3037 3038
	if (!dentry) {
		page = find_get_page(inode->i_mapping, 0);
		if (!page)
			return ERR_PTR(-ECHILD);
		if (!PageUptodate(page)) {
			put_page(page);
			return ERR_PTR(-ECHILD);
		}
	} else {
3039
		error = shmem_getpage(inode, 0, &page, SGP_READ);
3040 3041 3042 3043
		if (error)
			return ERR_PTR(error);
		unlock_page(page);
	}
3044
	set_delayed_call(done, shmem_put_link, page);
3045
	return page_address(page);
L
Linus Torvalds 已提交
3046 3047
}

3048
#ifdef CONFIG_TMPFS_XATTR
3049
/*
3050 3051
 * Superblocks without xattr inode operations may get some security.* xattr
 * support from the LSM "for free". As soon as we have any other xattrs
3052 3053 3054 3055
 * like ACLs, we also need to implement the security.* handlers at
 * filesystem level, though.
 */

3056 3057 3058 3059 3060 3061 3062 3063 3064
/*
 * Callback for security_inode_init_security() for acquiring xattrs.
 */
static int shmem_initxattrs(struct inode *inode,
			    const struct xattr *xattr_array,
			    void *fs_info)
{
	struct shmem_inode_info *info = SHMEM_I(inode);
	const struct xattr *xattr;
3065
	struct simple_xattr *new_xattr;
3066 3067 3068
	size_t len;

	for (xattr = xattr_array; xattr->name != NULL; xattr++) {
3069
		new_xattr = simple_xattr_alloc(xattr->value, xattr->value_len);
3070 3071 3072 3073 3074 3075 3076 3077 3078 3079 3080 3081 3082 3083 3084 3085
		if (!new_xattr)
			return -ENOMEM;

		len = strlen(xattr->name) + 1;
		new_xattr->name = kmalloc(XATTR_SECURITY_PREFIX_LEN + len,
					  GFP_KERNEL);
		if (!new_xattr->name) {
			kfree(new_xattr);
			return -ENOMEM;
		}

		memcpy(new_xattr->name, XATTR_SECURITY_PREFIX,
		       XATTR_SECURITY_PREFIX_LEN);
		memcpy(new_xattr->name + XATTR_SECURITY_PREFIX_LEN,
		       xattr->name, len);

3086
		simple_xattr_list_add(&info->xattrs, new_xattr);
3087 3088 3089 3090 3091
	}

	return 0;
}

3092
static int shmem_xattr_handler_get(const struct xattr_handler *handler,
3093 3094
				   struct dentry *unused, struct inode *inode,
				   const char *name, void *buffer, size_t size)
3095
{
3096
	struct shmem_inode_info *info = SHMEM_I(inode);
3097

3098
	name = xattr_full_name(handler, name);
3099
	return simple_xattr_get(&info->xattrs, name, buffer, size);
3100 3101
}

3102
static int shmem_xattr_handler_set(const struct xattr_handler *handler,
3103 3104 3105
				   struct dentry *unused, struct inode *inode,
				   const char *name, const void *value,
				   size_t size, int flags)
3106
{
3107
	struct shmem_inode_info *info = SHMEM_I(inode);
3108

3109
	name = xattr_full_name(handler, name);
3110
	return simple_xattr_set(&info->xattrs, name, value, size, flags);
3111 3112
}

3113 3114 3115 3116 3117
static const struct xattr_handler shmem_security_xattr_handler = {
	.prefix = XATTR_SECURITY_PREFIX,
	.get = shmem_xattr_handler_get,
	.set = shmem_xattr_handler_set,
};
3118

3119 3120 3121 3122 3123
static const struct xattr_handler shmem_trusted_xattr_handler = {
	.prefix = XATTR_TRUSTED_PREFIX,
	.get = shmem_xattr_handler_get,
	.set = shmem_xattr_handler_set,
};
3124

3125 3126 3127 3128 3129 3130 3131 3132 3133
static const struct xattr_handler *shmem_xattr_handlers[] = {
#ifdef CONFIG_TMPFS_POSIX_ACL
	&posix_acl_access_xattr_handler,
	&posix_acl_default_xattr_handler,
#endif
	&shmem_security_xattr_handler,
	&shmem_trusted_xattr_handler,
	NULL
};
3134 3135 3136

static ssize_t shmem_listxattr(struct dentry *dentry, char *buffer, size_t size)
{
3137
	struct shmem_inode_info *info = SHMEM_I(d_inode(dentry));
3138
	return simple_xattr_list(d_inode(dentry), &info->xattrs, buffer, size);
3139 3140 3141
}
#endif /* CONFIG_TMPFS_XATTR */

3142
static const struct inode_operations shmem_short_symlink_operations = {
3143
	.get_link	= simple_get_link,
3144 3145 3146 3147 3148 3149
#ifdef CONFIG_TMPFS_XATTR
	.listxattr	= shmem_listxattr,
#endif
};

static const struct inode_operations shmem_symlink_inode_operations = {
3150
	.get_link	= shmem_get_link,
3151 3152
#ifdef CONFIG_TMPFS_XATTR
	.listxattr	= shmem_listxattr,
3153
#endif
3154
};
3155

3156 3157 3158 3159 3160 3161 3162 3163 3164 3165 3166 3167 3168
static struct dentry *shmem_get_parent(struct dentry *child)
{
	return ERR_PTR(-ESTALE);
}

static int shmem_match(struct inode *ino, void *vfh)
{
	__u32 *fh = vfh;
	__u64 inum = fh[2];
	inum = (inum << 32) | fh[1];
	return ino->i_ino == inum && fh[0] == ino->i_generation;
}

3169 3170 3171 3172 3173 3174 3175 3176 3177
/* Find any alias of inode, but prefer a hashed alias */
static struct dentry *shmem_find_alias(struct inode *inode)
{
	struct dentry *alias = d_find_alias(inode);

	return alias ?: d_find_any_alias(inode);
}


C
Christoph Hellwig 已提交
3178 3179
static struct dentry *shmem_fh_to_dentry(struct super_block *sb,
		struct fid *fid, int fh_len, int fh_type)
3180 3181
{
	struct inode *inode;
C
Christoph Hellwig 已提交
3182
	struct dentry *dentry = NULL;
3183
	u64 inum;
C
Christoph Hellwig 已提交
3184 3185 3186

	if (fh_len < 3)
		return NULL;
3187

3188 3189 3190
	inum = fid->raw[2];
	inum = (inum << 32) | fid->raw[1];

C
Christoph Hellwig 已提交
3191 3192
	inode = ilookup5(sb, (unsigned long)(inum + fid->raw[0]),
			shmem_match, fid->raw);
3193
	if (inode) {
3194
		dentry = shmem_find_alias(inode);
3195 3196 3197
		iput(inode);
	}

C
Christoph Hellwig 已提交
3198
	return dentry;
3199 3200
}

A
Al Viro 已提交
3201 3202
static int shmem_encode_fh(struct inode *inode, __u32 *fh, int *len,
				struct inode *parent)
3203
{
3204 3205
	if (*len < 3) {
		*len = 3;
3206
		return FILEID_INVALID;
3207
	}
3208

A
Al Viro 已提交
3209
	if (inode_unhashed(inode)) {
3210 3211 3212 3213 3214 3215 3216
		/* Unfortunately insert_inode_hash is not idempotent,
		 * so as we hash inodes here rather than at creation
		 * time, we need a lock to ensure we only try
		 * to do it once
		 */
		static DEFINE_SPINLOCK(lock);
		spin_lock(&lock);
A
Al Viro 已提交
3217
		if (inode_unhashed(inode))
3218 3219 3220 3221 3222 3223 3224 3225 3226 3227 3228 3229 3230
			__insert_inode_hash(inode,
					    inode->i_ino + inode->i_generation);
		spin_unlock(&lock);
	}

	fh[0] = inode->i_generation;
	fh[1] = inode->i_ino;
	fh[2] = ((__u64)inode->i_ino) >> 32;

	*len = 3;
	return 1;
}

3231
static const struct export_operations shmem_export_ops = {
3232 3233
	.get_parent     = shmem_get_parent,
	.encode_fh      = shmem_encode_fh,
C
Christoph Hellwig 已提交
3234
	.fh_to_dentry	= shmem_fh_to_dentry,
3235 3236
};

3237 3238
static int shmem_parse_options(char *options, struct shmem_sb_info *sbinfo,
			       bool remount)
L
Linus Torvalds 已提交
3239 3240
{
	char *this_char, *value, *rest;
G
Greg Thelen 已提交
3241
	struct mempolicy *mpol = NULL;
3242 3243
	uid_t uid;
	gid_t gid;
L
Linus Torvalds 已提交
3244

3245 3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261
	while (options != NULL) {
		this_char = options;
		for (;;) {
			/*
			 * NUL-terminate this option: unfortunately,
			 * mount options form a comma-separated list,
			 * but mpol's nodelist may also contain commas.
			 */
			options = strchr(options, ',');
			if (options == NULL)
				break;
			options++;
			if (!isdigit(*options)) {
				options[-1] = '\0';
				break;
			}
		}
L
Linus Torvalds 已提交
3262 3263 3264 3265 3266
		if (!*this_char)
			continue;
		if ((value = strchr(this_char,'=')) != NULL) {
			*value++ = 0;
		} else {
3267 3268
			pr_err("tmpfs: No value for mount option '%s'\n",
			       this_char);
G
Greg Thelen 已提交
3269
			goto error;
L
Linus Torvalds 已提交
3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282
		}

		if (!strcmp(this_char,"size")) {
			unsigned long long size;
			size = memparse(value,&rest);
			if (*rest == '%') {
				size <<= PAGE_SHIFT;
				size *= totalram_pages;
				do_div(size, 100);
				rest++;
			}
			if (*rest)
				goto bad_val;
3283
			sbinfo->max_blocks =
3284
				DIV_ROUND_UP(size, PAGE_SIZE);
L
Linus Torvalds 已提交
3285
		} else if (!strcmp(this_char,"nr_blocks")) {
3286
			sbinfo->max_blocks = memparse(value, &rest);
L
Linus Torvalds 已提交
3287 3288 3289
			if (*rest)
				goto bad_val;
		} else if (!strcmp(this_char,"nr_inodes")) {
3290
			sbinfo->max_inodes = memparse(value, &rest);
L
Linus Torvalds 已提交
3291 3292 3293
			if (*rest)
				goto bad_val;
		} else if (!strcmp(this_char,"mode")) {
3294
			if (remount)
L
Linus Torvalds 已提交
3295
				continue;
3296
			sbinfo->mode = simple_strtoul(value, &rest, 8) & 07777;
L
Linus Torvalds 已提交
3297 3298 3299
			if (*rest)
				goto bad_val;
		} else if (!strcmp(this_char,"uid")) {
3300
			if (remount)
L
Linus Torvalds 已提交
3301
				continue;
3302
			uid = simple_strtoul(value, &rest, 0);
L
Linus Torvalds 已提交
3303 3304
			if (*rest)
				goto bad_val;
3305 3306 3307
			sbinfo->uid = make_kuid(current_user_ns(), uid);
			if (!uid_valid(sbinfo->uid))
				goto bad_val;
L
Linus Torvalds 已提交
3308
		} else if (!strcmp(this_char,"gid")) {
3309
			if (remount)
L
Linus Torvalds 已提交
3310
				continue;
3311
			gid = simple_strtoul(value, &rest, 0);
L
Linus Torvalds 已提交
3312 3313
			if (*rest)
				goto bad_val;
3314 3315 3316
			sbinfo->gid = make_kgid(current_user_ns(), gid);
			if (!gid_valid(sbinfo->gid))
				goto bad_val;
3317
#ifdef CONFIG_TRANSPARENT_HUGE_PAGECACHE
3318 3319 3320 3321 3322 3323 3324 3325 3326 3327 3328
		} else if (!strcmp(this_char, "huge")) {
			int huge;
			huge = shmem_parse_huge(value);
			if (huge < 0)
				goto bad_val;
			if (!has_transparent_hugepage() &&
					huge != SHMEM_HUGE_NEVER)
				goto bad_val;
			sbinfo->huge = huge;
#endif
#ifdef CONFIG_NUMA
3329
		} else if (!strcmp(this_char,"mpol")) {
G
Greg Thelen 已提交
3330 3331 3332
			mpol_put(mpol);
			mpol = NULL;
			if (mpol_parse_str(value, &mpol))
3333
				goto bad_val;
3334
#endif
L
Linus Torvalds 已提交
3335
		} else {
3336
			pr_err("tmpfs: Bad mount option %s\n", this_char);
G
Greg Thelen 已提交
3337
			goto error;
L
Linus Torvalds 已提交
3338 3339
		}
	}
G
Greg Thelen 已提交
3340
	sbinfo->mpol = mpol;
L
Linus Torvalds 已提交
3341 3342 3343
	return 0;

bad_val:
3344
	pr_err("tmpfs: Bad value '%s' for mount option '%s'\n",
L
Linus Torvalds 已提交
3345
	       value, this_char);
G
Greg Thelen 已提交
3346 3347
error:
	mpol_put(mpol);
L
Linus Torvalds 已提交
3348 3349 3350 3351 3352 3353 3354
	return 1;

}

static int shmem_remount_fs(struct super_block *sb, int *flags, char *data)
{
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);
3355
	struct shmem_sb_info config = *sbinfo;
3356 3357 3358
	unsigned long inodes;
	int error = -EINVAL;

3359
	config.mpol = NULL;
3360
	if (shmem_parse_options(data, &config, true))
3361
		return error;
L
Linus Torvalds 已提交
3362

3363 3364
	spin_lock(&sbinfo->stat_lock);
	inodes = sbinfo->max_inodes - sbinfo->free_inodes;
3365
	if (percpu_counter_compare(&sbinfo->used_blocks, config.max_blocks) > 0)
3366
		goto out;
3367
	if (config.max_inodes < inodes)
3368 3369
		goto out;
	/*
3370
	 * Those tests disallow limited->unlimited while any are in use;
3371 3372 3373
	 * but we must separately disallow unlimited->limited, because
	 * in that case we have no record of how much is already in use.
	 */
3374
	if (config.max_blocks && !sbinfo->max_blocks)
3375
		goto out;
3376
	if (config.max_inodes && !sbinfo->max_inodes)
3377 3378 3379
		goto out;

	error = 0;
3380
	sbinfo->huge = config.huge;
3381 3382 3383
	sbinfo->max_blocks  = config.max_blocks;
	sbinfo->max_inodes  = config.max_inodes;
	sbinfo->free_inodes = config.max_inodes - inodes;
3384

3385 3386 3387 3388 3389 3390 3391
	/*
	 * Preserve previous mempolicy unless mpol remount option was specified.
	 */
	if (config.mpol) {
		mpol_put(sbinfo->mpol);
		sbinfo->mpol = config.mpol;	/* transfers initial ref */
	}
3392 3393 3394
out:
	spin_unlock(&sbinfo->stat_lock);
	return error;
L
Linus Torvalds 已提交
3395
}
3396

3397
static int shmem_show_options(struct seq_file *seq, struct dentry *root)
3398
{
3399
	struct shmem_sb_info *sbinfo = SHMEM_SB(root->d_sb);
3400 3401 3402

	if (sbinfo->max_blocks != shmem_default_max_blocks())
		seq_printf(seq, ",size=%luk",
3403
			sbinfo->max_blocks << (PAGE_SHIFT - 10));
3404 3405
	if (sbinfo->max_inodes != shmem_default_max_inodes())
		seq_printf(seq, ",nr_inodes=%lu", sbinfo->max_inodes);
3406
	if (sbinfo->mode != (0777 | S_ISVTX))
3407
		seq_printf(seq, ",mode=%03ho", sbinfo->mode);
3408 3409 3410 3411 3412 3413
	if (!uid_eq(sbinfo->uid, GLOBAL_ROOT_UID))
		seq_printf(seq, ",uid=%u",
				from_kuid_munged(&init_user_ns, sbinfo->uid));
	if (!gid_eq(sbinfo->gid, GLOBAL_ROOT_GID))
		seq_printf(seq, ",gid=%u",
				from_kgid_munged(&init_user_ns, sbinfo->gid));
3414
#ifdef CONFIG_TRANSPARENT_HUGE_PAGECACHE
3415 3416 3417 3418
	/* Rightly or wrongly, show huge mount option unmasked by shmem_huge */
	if (sbinfo->huge)
		seq_printf(seq, ",huge=%s", shmem_format_huge(sbinfo->huge));
#endif
3419
	shmem_show_mpol(seq, sbinfo->mpol);
3420 3421
	return 0;
}
D
David Herrmann 已提交
3422

3423
#endif /* CONFIG_TMPFS */
L
Linus Torvalds 已提交
3424 3425 3426

static void shmem_put_super(struct super_block *sb)
{
3427 3428 3429
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);

	percpu_counter_destroy(&sbinfo->used_blocks);
G
Greg Thelen 已提交
3430
	mpol_put(sbinfo->mpol);
3431
	kfree(sbinfo);
L
Linus Torvalds 已提交
3432 3433 3434
	sb->s_fs_info = NULL;
}

3435
int shmem_fill_super(struct super_block *sb, void *data, int silent)
L
Linus Torvalds 已提交
3436 3437
{
	struct inode *inode;
3438
	struct shmem_sb_info *sbinfo;
3439 3440 3441
	int err = -ENOMEM;

	/* Round up to L1_CACHE_BYTES to resist false sharing */
3442
	sbinfo = kzalloc(max((int)sizeof(struct shmem_sb_info),
3443 3444 3445 3446
				L1_CACHE_BYTES), GFP_KERNEL);
	if (!sbinfo)
		return -ENOMEM;

3447
	sbinfo->mode = 0777 | S_ISVTX;
3448 3449
	sbinfo->uid = current_fsuid();
	sbinfo->gid = current_fsgid();
3450
	sb->s_fs_info = sbinfo;
L
Linus Torvalds 已提交
3451

3452
#ifdef CONFIG_TMPFS
L
Linus Torvalds 已提交
3453 3454 3455 3456 3457
	/*
	 * Per default we only allow half of the physical ram per
	 * tmpfs instance, limiting inodes to one per page of lowmem;
	 * but the internal instance is left unlimited.
	 */
3458
	if (!(sb->s_flags & SB_KERNMOUNT)) {
3459 3460 3461 3462 3463 3464
		sbinfo->max_blocks = shmem_default_max_blocks();
		sbinfo->max_inodes = shmem_default_max_inodes();
		if (shmem_parse_options(data, sbinfo, false)) {
			err = -EINVAL;
			goto failed;
		}
3465
	} else {
3466
		sb->s_flags |= SB_NOUSER;
L
Linus Torvalds 已提交
3467
	}
3468
	sb->s_export_op = &shmem_export_ops;
3469
	sb->s_flags |= SB_NOSEC;
L
Linus Torvalds 已提交
3470
#else
3471
	sb->s_flags |= SB_NOUSER;
L
Linus Torvalds 已提交
3472 3473
#endif

3474
	spin_lock_init(&sbinfo->stat_lock);
3475
	if (percpu_counter_init(&sbinfo->used_blocks, 0, GFP_KERNEL))
3476
		goto failed;
3477
	sbinfo->free_inodes = sbinfo->max_inodes;
3478 3479
	spin_lock_init(&sbinfo->shrinklist_lock);
	INIT_LIST_HEAD(&sbinfo->shrinklist);
3480

3481
	sb->s_maxbytes = MAX_LFS_FILESIZE;
3482 3483
	sb->s_blocksize = PAGE_SIZE;
	sb->s_blocksize_bits = PAGE_SHIFT;
L
Linus Torvalds 已提交
3484 3485
	sb->s_magic = TMPFS_MAGIC;
	sb->s_op = &shmem_ops;
3486
	sb->s_time_gran = 1;
3487
#ifdef CONFIG_TMPFS_XATTR
3488
	sb->s_xattr = shmem_xattr_handlers;
3489 3490
#endif
#ifdef CONFIG_TMPFS_POSIX_ACL
3491
	sb->s_flags |= SB_POSIXACL;
3492
#endif
3493
	uuid_gen(&sb->s_uuid);
3494

3495
	inode = shmem_get_inode(sb, NULL, S_IFDIR | sbinfo->mode, 0, VM_NORESERVE);
L
Linus Torvalds 已提交
3496 3497
	if (!inode)
		goto failed;
3498 3499
	inode->i_uid = sbinfo->uid;
	inode->i_gid = sbinfo->gid;
A
Al Viro 已提交
3500 3501
	sb->s_root = d_make_root(inode);
	if (!sb->s_root)
3502
		goto failed;
L
Linus Torvalds 已提交
3503 3504 3505 3506 3507 3508 3509
	return 0;

failed:
	shmem_put_super(sb);
	return err;
}

3510
static struct kmem_cache *shmem_inode_cachep;
L
Linus Torvalds 已提交
3511 3512 3513

static struct inode *shmem_alloc_inode(struct super_block *sb)
{
3514 3515 3516
	struct shmem_inode_info *info;
	info = kmem_cache_alloc(shmem_inode_cachep, GFP_KERNEL);
	if (!info)
L
Linus Torvalds 已提交
3517
		return NULL;
3518
	return &info->vfs_inode;
L
Linus Torvalds 已提交
3519 3520
}

3521
static void shmem_destroy_callback(struct rcu_head *head)
N
Nick Piggin 已提交
3522 3523
{
	struct inode *inode = container_of(head, struct inode, i_rcu);
A
Al Viro 已提交
3524 3525
	if (S_ISLNK(inode->i_mode))
		kfree(inode->i_link);
N
Nick Piggin 已提交
3526 3527 3528
	kmem_cache_free(shmem_inode_cachep, SHMEM_I(inode));
}

L
Linus Torvalds 已提交
3529 3530
static void shmem_destroy_inode(struct inode *inode)
{
3531
	if (S_ISREG(inode->i_mode))
L
Linus Torvalds 已提交
3532
		mpol_free_shared_policy(&SHMEM_I(inode)->policy);
3533
	call_rcu(&inode->i_rcu, shmem_destroy_callback);
L
Linus Torvalds 已提交
3534 3535
}

3536
static void shmem_init_inode(void *foo)
L
Linus Torvalds 已提交
3537
{
3538 3539
	struct shmem_inode_info *info = foo;
	inode_init_once(&info->vfs_inode);
L
Linus Torvalds 已提交
3540 3541
}

3542
static void shmem_init_inodecache(void)
L
Linus Torvalds 已提交
3543 3544 3545
{
	shmem_inode_cachep = kmem_cache_create("shmem_inode_cache",
				sizeof(struct shmem_inode_info),
3546
				0, SLAB_PANIC|SLAB_ACCOUNT, shmem_init_inode);
L
Linus Torvalds 已提交
3547 3548
}

3549
static void shmem_destroy_inodecache(void)
L
Linus Torvalds 已提交
3550
{
3551
	kmem_cache_destroy(shmem_inode_cachep);
L
Linus Torvalds 已提交
3552 3553
}

3554
static const struct address_space_operations shmem_aops = {
L
Linus Torvalds 已提交
3555
	.writepage	= shmem_writepage,
3556
	.set_page_dirty	= __set_page_dirty_no_writeback,
L
Linus Torvalds 已提交
3557
#ifdef CONFIG_TMPFS
N
Nick Piggin 已提交
3558 3559
	.write_begin	= shmem_write_begin,
	.write_end	= shmem_write_end,
L
Linus Torvalds 已提交
3560
#endif
3561
#ifdef CONFIG_MIGRATION
3562
	.migratepage	= migrate_page,
3563
#endif
3564
	.error_remove_page = generic_error_remove_page,
L
Linus Torvalds 已提交
3565 3566
};

3567
static const struct file_operations shmem_file_operations = {
L
Linus Torvalds 已提交
3568
	.mmap		= shmem_mmap,
3569
	.get_unmapped_area = shmem_get_unmapped_area,
L
Linus Torvalds 已提交
3570
#ifdef CONFIG_TMPFS
3571
	.llseek		= shmem_file_llseek,
A
Al Viro 已提交
3572
	.read_iter	= shmem_file_read_iter,
3573
	.write_iter	= generic_file_write_iter,
3574
	.fsync		= noop_fsync,
3575
	.splice_read	= generic_file_splice_read,
3576
	.splice_write	= iter_file_splice_write,
3577
	.fallocate	= shmem_fallocate,
L
Linus Torvalds 已提交
3578 3579 3580
#endif
};

3581
static const struct inode_operations shmem_inode_operations = {
3582
	.getattr	= shmem_getattr,
3583
	.setattr	= shmem_setattr,
3584 3585
#ifdef CONFIG_TMPFS_XATTR
	.listxattr	= shmem_listxattr,
C
Christoph Hellwig 已提交
3586
	.set_acl	= simple_set_acl,
3587
#endif
L
Linus Torvalds 已提交
3588 3589
};

3590
static const struct inode_operations shmem_dir_inode_operations = {
L
Linus Torvalds 已提交
3591 3592 3593 3594 3595 3596 3597 3598 3599
#ifdef CONFIG_TMPFS
	.create		= shmem_create,
	.lookup		= simple_lookup,
	.link		= shmem_link,
	.unlink		= shmem_unlink,
	.symlink	= shmem_symlink,
	.mkdir		= shmem_mkdir,
	.rmdir		= shmem_rmdir,
	.mknod		= shmem_mknod,
3600
	.rename		= shmem_rename2,
3601
	.tmpfile	= shmem_tmpfile,
L
Linus Torvalds 已提交
3602
#endif
3603 3604 3605
#ifdef CONFIG_TMPFS_XATTR
	.listxattr	= shmem_listxattr,
#endif
3606
#ifdef CONFIG_TMPFS_POSIX_ACL
3607
	.setattr	= shmem_setattr,
C
Christoph Hellwig 已提交
3608
	.set_acl	= simple_set_acl,
3609 3610 3611
#endif
};

3612
static const struct inode_operations shmem_special_inode_operations = {
3613 3614 3615
#ifdef CONFIG_TMPFS_XATTR
	.listxattr	= shmem_listxattr,
#endif
3616
#ifdef CONFIG_TMPFS_POSIX_ACL
3617
	.setattr	= shmem_setattr,
C
Christoph Hellwig 已提交
3618
	.set_acl	= simple_set_acl,
3619
#endif
L
Linus Torvalds 已提交
3620 3621
};

3622
static const struct super_operations shmem_ops = {
L
Linus Torvalds 已提交
3623 3624 3625 3626 3627
	.alloc_inode	= shmem_alloc_inode,
	.destroy_inode	= shmem_destroy_inode,
#ifdef CONFIG_TMPFS
	.statfs		= shmem_statfs,
	.remount_fs	= shmem_remount_fs,
3628
	.show_options	= shmem_show_options,
L
Linus Torvalds 已提交
3629
#endif
A
Al Viro 已提交
3630
	.evict_inode	= shmem_evict_inode,
L
Linus Torvalds 已提交
3631 3632
	.drop_inode	= generic_delete_inode,
	.put_super	= shmem_put_super,
3633 3634 3635 3636
#ifdef CONFIG_TRANSPARENT_HUGE_PAGECACHE
	.nr_cached_objects	= shmem_unused_huge_count,
	.free_cached_objects	= shmem_unused_huge_scan,
#endif
L
Linus Torvalds 已提交
3637 3638
};

3639
static const struct vm_operations_struct shmem_vm_ops = {
3640
	.fault		= shmem_fault,
3641
	.map_pages	= filemap_map_pages,
L
Linus Torvalds 已提交
3642 3643 3644 3645 3646 3647
#ifdef CONFIG_NUMA
	.set_policy     = shmem_set_policy,
	.get_policy     = shmem_get_policy,
#endif
};

A
Al Viro 已提交
3648 3649
static struct dentry *shmem_mount(struct file_system_type *fs_type,
	int flags, const char *dev_name, void *data)
L
Linus Torvalds 已提交
3650
{
A
Al Viro 已提交
3651
	return mount_nodev(fs_type, flags, data, shmem_fill_super);
L
Linus Torvalds 已提交
3652 3653
}

3654
static struct file_system_type shmem_fs_type = {
L
Linus Torvalds 已提交
3655 3656
	.owner		= THIS_MODULE,
	.name		= "tmpfs",
A
Al Viro 已提交
3657
	.mount		= shmem_mount,
L
Linus Torvalds 已提交
3658
	.kill_sb	= kill_litter_super,
3659
	.fs_flags	= FS_USERNS_MOUNT,
L
Linus Torvalds 已提交
3660 3661
};

3662
int __init shmem_init(void)
L
Linus Torvalds 已提交
3663 3664 3665
{
	int error;

3666 3667 3668 3669
	/* If rootfs called this, don't re-init */
	if (shmem_inode_cachep)
		return 0;

3670
	shmem_init_inodecache();
L
Linus Torvalds 已提交
3671

3672
	error = register_filesystem(&shmem_fs_type);
L
Linus Torvalds 已提交
3673
	if (error) {
3674
		pr_err("Could not register tmpfs\n");
L
Linus Torvalds 已提交
3675 3676
		goto out2;
	}
3677

3678
	shm_mnt = kern_mount(&shmem_fs_type);
L
Linus Torvalds 已提交
3679 3680
	if (IS_ERR(shm_mnt)) {
		error = PTR_ERR(shm_mnt);
3681
		pr_err("Could not kern_mount tmpfs\n");
L
Linus Torvalds 已提交
3682 3683
		goto out1;
	}
3684

3685
#ifdef CONFIG_TRANSPARENT_HUGE_PAGECACHE
3686
	if (has_transparent_hugepage() && shmem_huge > SHMEM_HUGE_DENY)
3687 3688 3689 3690
		SHMEM_SB(shm_mnt->mnt_sb)->huge = shmem_huge;
	else
		shmem_huge = 0; /* just in case it was patched */
#endif
L
Linus Torvalds 已提交
3691 3692 3693
	return 0;

out1:
3694
	unregister_filesystem(&shmem_fs_type);
L
Linus Torvalds 已提交
3695
out2:
3696
	shmem_destroy_inodecache();
L
Linus Torvalds 已提交
3697 3698 3699
	shm_mnt = ERR_PTR(error);
	return error;
}
3700

3701
#if defined(CONFIG_TRANSPARENT_HUGE_PAGECACHE) && defined(CONFIG_SYSFS)
3702 3703 3704 3705 3706 3707 3708 3709 3710 3711 3712 3713 3714 3715 3716 3717 3718 3719 3720 3721 3722 3723 3724 3725 3726 3727 3728 3729 3730 3731 3732 3733 3734 3735 3736 3737 3738 3739 3740 3741 3742 3743 3744 3745
static ssize_t shmem_enabled_show(struct kobject *kobj,
		struct kobj_attribute *attr, char *buf)
{
	int values[] = {
		SHMEM_HUGE_ALWAYS,
		SHMEM_HUGE_WITHIN_SIZE,
		SHMEM_HUGE_ADVISE,
		SHMEM_HUGE_NEVER,
		SHMEM_HUGE_DENY,
		SHMEM_HUGE_FORCE,
	};
	int i, count;

	for (i = 0, count = 0; i < ARRAY_SIZE(values); i++) {
		const char *fmt = shmem_huge == values[i] ? "[%s] " : "%s ";

		count += sprintf(buf + count, fmt,
				shmem_format_huge(values[i]));
	}
	buf[count - 1] = '\n';
	return count;
}

static ssize_t shmem_enabled_store(struct kobject *kobj,
		struct kobj_attribute *attr, const char *buf, size_t count)
{
	char tmp[16];
	int huge;

	if (count + 1 > sizeof(tmp))
		return -EINVAL;
	memcpy(tmp, buf, count);
	tmp[count] = '\0';
	if (count && tmp[count - 1] == '\n')
		tmp[count - 1] = '\0';

	huge = shmem_parse_huge(tmp);
	if (huge == -EINVAL)
		return -EINVAL;
	if (!has_transparent_hugepage() &&
			huge != SHMEM_HUGE_NEVER && huge != SHMEM_HUGE_DENY)
		return -EINVAL;

	shmem_huge = huge;
3746
	if (shmem_huge > SHMEM_HUGE_DENY)
3747 3748 3749 3750 3751 3752
		SHMEM_SB(shm_mnt->mnt_sb)->huge = shmem_huge;
	return count;
}

struct kobj_attribute shmem_enabled_attr =
	__ATTR(shmem_enabled, 0644, shmem_enabled_show, shmem_enabled_store);
3753
#endif /* CONFIG_TRANSPARENT_HUGE_PAGECACHE && CONFIG_SYSFS */
3754

3755
#ifdef CONFIG_TRANSPARENT_HUGE_PAGECACHE
3756 3757 3758 3759 3760 3761 3762 3763 3764 3765 3766 3767 3768 3769 3770 3771 3772 3773 3774 3775 3776 3777
bool shmem_huge_enabled(struct vm_area_struct *vma)
{
	struct inode *inode = file_inode(vma->vm_file);
	struct shmem_sb_info *sbinfo = SHMEM_SB(inode->i_sb);
	loff_t i_size;
	pgoff_t off;

	if (shmem_huge == SHMEM_HUGE_FORCE)
		return true;
	if (shmem_huge == SHMEM_HUGE_DENY)
		return false;
	switch (sbinfo->huge) {
		case SHMEM_HUGE_NEVER:
			return false;
		case SHMEM_HUGE_ALWAYS:
			return true;
		case SHMEM_HUGE_WITHIN_SIZE:
			off = round_up(vma->vm_pgoff, HPAGE_PMD_NR);
			i_size = round_up(i_size_read(inode), PAGE_SIZE);
			if (i_size >= HPAGE_PMD_SIZE &&
					i_size >> PAGE_SHIFT >= off)
				return true;
3778
			/* fall through */
3779 3780 3781 3782 3783 3784 3785 3786
		case SHMEM_HUGE_ADVISE:
			/* TODO: implement fadvise() hints */
			return (vma->vm_flags & VM_HUGEPAGE);
		default:
			VM_BUG_ON(1);
			return false;
	}
}
3787
#endif /* CONFIG_TRANSPARENT_HUGE_PAGECACHE */
3788

3789 3790 3791 3792 3793 3794 3795 3796 3797 3798 3799
#else /* !CONFIG_SHMEM */

/*
 * tiny-shmem: simple shmemfs and tmpfs using ramfs code
 *
 * This is intended for small system where the benefits of the full
 * shmem code (swap-backed and resource-limited) are outweighed by
 * their complexity. On systems without swap this code should be
 * effectively equivalent, but much lighter weight.
 */

3800
static struct file_system_type shmem_fs_type = {
3801
	.name		= "tmpfs",
A
Al Viro 已提交
3802
	.mount		= ramfs_mount,
3803
	.kill_sb	= kill_litter_super,
3804
	.fs_flags	= FS_USERNS_MOUNT,
3805 3806
};

3807
int __init shmem_init(void)
3808
{
3809
	BUG_ON(register_filesystem(&shmem_fs_type) != 0);
3810

3811
	shm_mnt = kern_mount(&shmem_fs_type);
3812 3813 3814 3815 3816
	BUG_ON(IS_ERR(shm_mnt));

	return 0;
}

3817
int shmem_unuse(swp_entry_t swap, struct page *page)
3818 3819 3820 3821
{
	return 0;
}

H
Hugh Dickins 已提交
3822 3823 3824 3825 3826
int shmem_lock(struct file *file, int lock, struct user_struct *user)
{
	return 0;
}

3827 3828 3829 3830
void shmem_unlock_mapping(struct address_space *mapping)
{
}

3831 3832 3833 3834 3835 3836 3837 3838 3839
#ifdef CONFIG_MMU
unsigned long shmem_get_unmapped_area(struct file *file,
				      unsigned long addr, unsigned long len,
				      unsigned long pgoff, unsigned long flags)
{
	return current->mm->get_unmapped_area(file, addr, len, pgoff, flags);
}
#endif

3840
void shmem_truncate_range(struct inode *inode, loff_t lstart, loff_t lend)
3841
{
3842
	truncate_inode_pages_range(inode->i_mapping, lstart, lend);
3843 3844 3845
}
EXPORT_SYMBOL_GPL(shmem_truncate_range);

3846 3847
#define shmem_vm_ops				generic_file_vm_ops
#define shmem_file_operations			ramfs_file_operations
3848
#define shmem_get_inode(sb, dir, mode, dev, flags)	ramfs_get_inode(sb, dir, mode, dev)
3849 3850
#define shmem_acct_size(flags, size)		0
#define shmem_unacct_size(flags, size)		do {} while (0)
3851 3852 3853 3854

#endif /* CONFIG_SHMEM */

/* common code */
L
Linus Torvalds 已提交
3855

3856
static struct file *__shmem_file_setup(struct vfsmount *mnt, const char *name, loff_t size,
3857
				       unsigned long flags, unsigned int i_flags)
L
Linus Torvalds 已提交
3858 3859
{
	struct inode *inode;
3860
	struct file *res;
L
Linus Torvalds 已提交
3861

3862 3863
	if (IS_ERR(mnt))
		return ERR_CAST(mnt);
L
Linus Torvalds 已提交
3864

3865
	if (size < 0 || size > MAX_LFS_FILESIZE)
L
Linus Torvalds 已提交
3866 3867 3868 3869 3870
		return ERR_PTR(-EINVAL);

	if (shmem_acct_size(flags, size))
		return ERR_PTR(-ENOMEM);

3871 3872
	inode = shmem_get_inode(mnt->mnt_sb, NULL, S_IFREG | S_IRWXUGO, 0,
				flags);
3873 3874 3875 3876
	if (unlikely(!inode)) {
		shmem_unacct_size(flags, size);
		return ERR_PTR(-ENOSPC);
	}
3877
	inode->i_flags |= i_flags;
L
Linus Torvalds 已提交
3878
	inode->i_size = size;
3879
	clear_nlink(inode);	/* It is unlinked */
A
Al Viro 已提交
3880
	res = ERR_PTR(ramfs_nommu_expand_for_mapping(inode, size));
3881 3882 3883
	if (!IS_ERR(res))
		res = alloc_file_pseudo(inode, mnt, name, O_RDWR,
				&shmem_file_operations);
A
Al Viro 已提交
3884
	if (IS_ERR(res))
3885
		iput(inode);
A
Al Viro 已提交
3886
	return res;
L
Linus Torvalds 已提交
3887
}
3888 3889 3890 3891 3892

/**
 * shmem_kernel_file_setup - get an unlinked file living in tmpfs which must be
 * 	kernel internal.  There will be NO LSM permission checks against the
 * 	underlying inode.  So users of this interface must do LSM checks at a
3893 3894
 *	higher layer.  The users are the big_key and shm implementations.  LSM
 *	checks are provided at the key or shm level rather than the inode.
3895 3896 3897 3898 3899 3900
 * @name: name for dentry (to be seen in /proc/<pid>/maps
 * @size: size to be set for the file
 * @flags: VM_NORESERVE suppresses pre-accounting of the entire object size
 */
struct file *shmem_kernel_file_setup(const char *name, loff_t size, unsigned long flags)
{
3901
	return __shmem_file_setup(shm_mnt, name, size, flags, S_PRIVATE);
3902 3903 3904 3905 3906 3907 3908 3909 3910 3911
}

/**
 * shmem_file_setup - get an unlinked file living in tmpfs
 * @name: name for dentry (to be seen in /proc/<pid>/maps
 * @size: size to be set for the file
 * @flags: VM_NORESERVE suppresses pre-accounting of the entire object size
 */
struct file *shmem_file_setup(const char *name, loff_t size, unsigned long flags)
{
3912
	return __shmem_file_setup(shm_mnt, name, size, flags, 0);
3913
}
3914
EXPORT_SYMBOL_GPL(shmem_file_setup);
L
Linus Torvalds 已提交
3915

3916 3917 3918 3919 3920 3921 3922 3923 3924 3925 3926 3927 3928 3929
/**
 * shmem_file_setup_with_mnt - get an unlinked file living in tmpfs
 * @mnt: the tmpfs mount where the file will be created
 * @name: name for dentry (to be seen in /proc/<pid>/maps
 * @size: size to be set for the file
 * @flags: VM_NORESERVE suppresses pre-accounting of the entire object size
 */
struct file *shmem_file_setup_with_mnt(struct vfsmount *mnt, const char *name,
				       loff_t size, unsigned long flags)
{
	return __shmem_file_setup(mnt, name, size, flags, 0);
}
EXPORT_SYMBOL_GPL(shmem_file_setup_with_mnt);

3930
/**
L
Linus Torvalds 已提交
3931 3932 3933 3934 3935 3936 3937 3938
 * shmem_zero_setup - setup a shared anonymous mapping
 * @vma: the vma to be mmapped is prepared by do_mmap_pgoff
 */
int shmem_zero_setup(struct vm_area_struct *vma)
{
	struct file *file;
	loff_t size = vma->vm_end - vma->vm_start;

3939 3940 3941 3942 3943 3944
	/*
	 * Cloning a new file under mmap_sem leads to a lock ordering conflict
	 * between XFS directory reading and selinux: since this file is only
	 * accessible to the user through its mapping, use S_PRIVATE flag to
	 * bypass file security, in the same way as shmem_kernel_file_setup().
	 */
3945
	file = shmem_kernel_file_setup("dev/zero", size, vma->vm_flags);
L
Linus Torvalds 已提交
3946 3947 3948 3949 3950 3951 3952
	if (IS_ERR(file))
		return PTR_ERR(file);

	if (vma->vm_file)
		fput(vma->vm_file);
	vma->vm_file = file;
	vma->vm_ops = &shmem_vm_ops;
3953

3954
	if (IS_ENABLED(CONFIG_TRANSPARENT_HUGE_PAGECACHE) &&
3955 3956 3957 3958 3959
			((vma->vm_start + ~HPAGE_PMD_MASK) & HPAGE_PMD_MASK) <
			(vma->vm_end & HPAGE_PMD_MASK)) {
		khugepaged_enter(vma, vma->vm_flags);
	}

L
Linus Torvalds 已提交
3960 3961
	return 0;
}
3962 3963 3964 3965 3966 3967 3968 3969 3970 3971 3972 3973 3974

/**
 * shmem_read_mapping_page_gfp - read into page cache, using specified page allocation flags.
 * @mapping:	the page's address_space
 * @index:	the page index
 * @gfp:	the page allocator flags to use if allocating
 *
 * This behaves as a tmpfs "read_cache_page_gfp(mapping, index, gfp)",
 * with any new page allocations done using the specified allocation flags.
 * But read_cache_page_gfp() uses the ->readpage() method: which does not
 * suit tmpfs, since it may have pages in swapcache, and needs to find those
 * for itself; although drivers/gpu/drm i915 and ttm rely upon this support.
 *
3975 3976
 * i915_gem_object_get_pages_gtt() mixes __GFP_NORETRY | __GFP_NOWARN in
 * with the mapping_gfp_mask(), to avoid OOMing the machine unnecessarily.
3977 3978 3979 3980
 */
struct page *shmem_read_mapping_page_gfp(struct address_space *mapping,
					 pgoff_t index, gfp_t gfp)
{
3981 3982
#ifdef CONFIG_SHMEM
	struct inode *inode = mapping->host;
H
Hugh Dickins 已提交
3983
	struct page *page;
3984 3985 3986
	int error;

	BUG_ON(mapping->a_ops != &shmem_aops);
3987
	error = shmem_getpage_gfp(inode, index, &page, SGP_CACHE,
3988
				  gfp, NULL, NULL, NULL);
3989 3990 3991 3992 3993 3994 3995 3996 3997
	if (error)
		page = ERR_PTR(error);
	else
		unlock_page(page);
	return page;
#else
	/*
	 * The tiny !SHMEM case uses ramfs without swap
	 */
3998
	return read_cache_page_gfp(mapping, index, gfp);
3999
#endif
4000 4001
}
EXPORT_SYMBOL_GPL(shmem_read_mapping_page_gfp);