shmem.c 102.7 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/export.h>
33
#include <linux/swap.h>
34
#include <linux/uio.h>
35 36 37 38

static struct vfsmount *shm_mnt;

#ifdef CONFIG_SHMEM
L
Linus Torvalds 已提交
39 40 41 42 43 44
/*
 * 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.
 */

45
#include <linux/xattr.h>
46
#include <linux/exportfs.h>
47
#include <linux/posix_acl.h>
C
Christoph Hellwig 已提交
48
#include <linux/posix_acl_xattr.h>
L
Linus Torvalds 已提交
49 50 51 52 53 54 55
#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>
56
#include <linux/pagevec.h>
57
#include <linux/percpu_counter.h>
58
#include <linux/falloc.h>
59
#include <linux/splice.h>
L
Linus Torvalds 已提交
60 61 62 63
#include <linux/security.h>
#include <linux/swapops.h>
#include <linux/mempolicy.h>
#include <linux/namei.h>
64
#include <linux/ctype.h>
65
#include <linux/migrate.h>
66
#include <linux/highmem.h>
67
#include <linux/seq_file.h>
M
Mimi Zohar 已提交
68
#include <linux/magic.h>
D
David Herrmann 已提交
69
#include <linux/syscalls.h>
D
David Herrmann 已提交
70
#include <linux/fcntl.h>
D
David Herrmann 已提交
71
#include <uapi/linux/memfd.h>
72

L
Linus Torvalds 已提交
73 74 75
#include <asm/uaccess.h>
#include <asm/pgtable.h>

76 77
#include "internal.h"

78 79
#define BLOCKS_PER_PAGE  (PAGE_SIZE/512)
#define VM_ACCT(size)    (PAGE_ALIGN(size) >> PAGE_SHIFT)
L
Linus Torvalds 已提交
80 81 82 83

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

84 85 86
/* Symlink up to this size is kmalloc'ed instead of using a swappable page */
#define SHORT_SYMLINK_LEN 128

87
/*
88 89 90
 * 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.
91 92
 */
struct shmem_falloc {
93
	wait_queue_head_t *waitq; /* faults into hole wait for punch to end */
94 95 96 97 98 99
	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 */
};

100
/* Flag allocation requirements to shmem_getpage */
L
Linus Torvalds 已提交
101 102 103
enum sgp_type {
	SGP_READ,	/* don't exceed i_size, don't allocate page */
	SGP_CACHE,	/* don't exceed i_size, may allocate page */
104 105
	SGP_WRITE,	/* may exceed i_size, may allocate !Uptodate page */
	SGP_FALLOC,	/* like SGP_WRITE, but make existing page Uptodate */
L
Linus Torvalds 已提交
106 107
};

A
Andrew Morton 已提交
108
#ifdef CONFIG_TMPFS
109 110 111 112 113 114 115 116 117
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 已提交
118
#endif
119

120 121 122
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);
123
static int shmem_getpage_gfp(struct inode *inode, pgoff_t index,
124 125
		struct page **pagep, enum sgp_type sgp,
		gfp_t gfp, struct mm_struct *fault_mm, int *fault_type);
126 127

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

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)
{
147
	return (flags & VM_NORESERVE) ?
148
		0 : security_vm_enough_memory_mm(current->mm, VM_ACCT(size));
L
Linus Torvalds 已提交
149 150 151 152
}

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

157 158 159 160 161 162 163 164 165 166 167 168 169
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 已提交
170 171
/*
 * ... whereas tmpfs objects are accounted incrementally as
H
Hugh Dickins 已提交
172
 * pages are allocated, in order to allow large sparse files.
L
Linus Torvalds 已提交
173 174 175
 * 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.
 */
176
static inline int shmem_acct_block(unsigned long flags, long pages)
L
Linus Torvalds 已提交
177
{
178 179 180 181 182
	if (!(flags & VM_NORESERVE))
		return 0;

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

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

191
static const struct super_operations shmem_ops;
192
static const struct address_space_operations shmem_aops;
193
static const struct file_operations shmem_file_operations;
194 195 196
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;
197
static const struct vm_operations_struct shmem_vm_ops;
L
Linus Torvalds 已提交
198 199

static LIST_HEAD(shmem_swaplist);
200
static DEFINE_MUTEX(shmem_swaplist_mutex);
L
Linus Torvalds 已提交
201

202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226
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);
	}
}

227
/**
228
 * shmem_recalc_inode - recalculate the block usage of an inode
L
Linus Torvalds 已提交
229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245
 * @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) {
246 247 248
		struct shmem_sb_info *sbinfo = SHMEM_SB(inode->i_sb);
		if (sbinfo->max_blocks)
			percpu_counter_add(&sbinfo->used_blocks, -freed);
L
Linus Torvalds 已提交
249
		info->alloced -= freed;
250
		inode->i_blocks -= freed * BLOCKS_PER_PAGE;
L
Linus Torvalds 已提交
251 252 253 254
		shmem_unacct_blocks(info->flags, freed);
	}
}

255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299
bool shmem_charge(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;
	spin_lock(&info->lock);
	info->alloced += pages;
	inode->i_blocks += pages * BLOCKS_PER_PAGE;
	shmem_recalc_inode(inode);
	spin_unlock(&info->lock);
	inode->i_mapping->nrpages += pages;

	if (!sbinfo->max_blocks)
		return true;
	if (percpu_counter_compare(&sbinfo->used_blocks,
				sbinfo->max_blocks - pages) > 0) {
		inode->i_mapping->nrpages -= pages;
		spin_lock(&info->lock);
		info->alloced -= pages;
		shmem_recalc_inode(inode);
		spin_unlock(&info->lock);

		return false;
	}
	percpu_counter_add(&sbinfo->used_blocks, pages);
	return true;
}

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

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

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

300 301 302 303 304 305 306
/*
 * Replace item expected in radix tree by a new item, while holding tree lock.
 */
static int shmem_radix_tree_replace(struct address_space *mapping,
			pgoff_t index, void *expected, void *replacement)
{
	void **pslot;
307
	void *item;
308 309

	VM_BUG_ON(!expected);
310
	VM_BUG_ON(!replacement);
311
	pslot = radix_tree_lookup_slot(&mapping->page_tree, index);
312 313 314
	if (!pslot)
		return -ENOENT;
	item = radix_tree_deref_slot_protected(pslot, &mapping->tree_lock);
315 316
	if (item != expected)
		return -ENOENT;
317
	radix_tree_replace_slot(pslot, replacement);
318 319 320
	return 0;
}

321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338
/*
 * 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)
{
	void *item;

	rcu_read_lock();
	item = radix_tree_lookup(&mapping->page_tree, index);
	rcu_read_unlock();
	return item == swp_to_radix_entry(swap);
}

339 340 341 342 343 344 345 346 347 348 349 350 351 352 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 387 388 389 390 391 392 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
/*
 * 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)

#ifdef CONFIG_TRANSPARENT_HUGEPAGE
/* ifdef here to avoid bloating shmem.o when not necessary */

int shmem_huge __read_mostly;

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";
	}
}

#else /* !CONFIG_TRANSPARENT_HUGEPAGE */

#define shmem_huge SHMEM_HUGE_DENY

#endif /* CONFIG_TRANSPARENT_HUGEPAGE */

420 421 422 423 424
/*
 * 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,
425
				   pgoff_t index, void *expected)
426
{
427
	int error, nr = hpage_nr_pages(page);
428

429 430
	VM_BUG_ON_PAGE(PageTail(page), page);
	VM_BUG_ON_PAGE(index != round_down(index, nr), page);
431 432
	VM_BUG_ON_PAGE(!PageLocked(page), page);
	VM_BUG_ON_PAGE(!PageSwapBacked(page), page);
433
	VM_BUG_ON(expected && PageTransHuge(page));
434

435
	page_ref_add(page, nr);
436 437 438 439
	page->mapping = mapping;
	page->index = index;

	spin_lock_irq(&mapping->tree_lock);
440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460
	if (PageTransHuge(page)) {
		void __rcu **results;
		pgoff_t idx;
		int i;

		error = 0;
		if (radix_tree_gang_lookup_slot(&mapping->page_tree,
					&results, &idx, index, 1) &&
				idx < index + HPAGE_PMD_NR) {
			error = -EEXIST;
		}

		if (!error) {
			for (i = 0; i < HPAGE_PMD_NR; i++) {
				error = radix_tree_insert(&mapping->page_tree,
						index + i, page + i);
				VM_BUG_ON(error);
			}
			count_vm_event(THP_FILE_ALLOC);
		}
	} else if (!expected) {
461
		error = radix_tree_insert(&mapping->page_tree, index, page);
462
	} else {
463 464
		error = shmem_radix_tree_replace(mapping, index, expected,
								 page);
465 466
	}

467
	if (!error) {
468 469 470 471 472
		mapping->nrpages += nr;
		if (PageTransHuge(page))
			__inc_zone_page_state(page, NR_SHMEM_THPS);
		__mod_zone_page_state(page_zone(page), NR_FILE_PAGES, nr);
		__mod_zone_page_state(page_zone(page), NR_SHMEM, nr);
473 474 475 476
		spin_unlock_irq(&mapping->tree_lock);
	} else {
		page->mapping = NULL;
		spin_unlock_irq(&mapping->tree_lock);
477
		page_ref_sub(page, nr);
478 479 480 481
	}
	return error;
}

482 483 484 485 486 487 488 489
/*
 * 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;

490 491
	VM_BUG_ON_PAGE(PageCompound(page), page);

492 493 494 495 496 497 498
	spin_lock_irq(&mapping->tree_lock);
	error = shmem_radix_tree_replace(mapping, page->index, page, radswap);
	page->mapping = NULL;
	mapping->nrpages--;
	__dec_zone_page_state(page, NR_FILE_PAGES);
	__dec_zone_page_state(page, NR_SHMEM);
	spin_unlock_irq(&mapping->tree_lock);
499
	put_page(page);
500 501 502
	BUG_ON(error);
}

503 504 505 506 507 508
/*
 * Remove swap entry from radix tree, free the swap and its page cache.
 */
static int shmem_free_swap(struct address_space *mapping,
			   pgoff_t index, void *radswap)
{
509
	void *old;
510 511

	spin_lock_irq(&mapping->tree_lock);
512
	old = radix_tree_delete_item(&mapping->page_tree, index, radswap);
513
	spin_unlock_irq(&mapping->tree_lock);
514 515 516 517
	if (old != radswap)
		return -ENOENT;
	free_swap_and_cache(radix_to_swp_entry(radswap));
	return 0;
518 519
}

520 521
/*
 * Determine (in bytes) how many of the shmem object's pages mapped by the
522
 * given offsets are swapped out.
523 524 525 526
 *
 * This is safe to call without i_mutex or mapping->tree_lock thanks to RCU,
 * as long as the inode doesn't go away and racy results are not a problem.
 */
527 528
unsigned long shmem_partial_swap_usage(struct address_space *mapping,
						pgoff_t start, pgoff_t end)
529 530 531 532
{
	struct radix_tree_iter iter;
	void **slot;
	struct page *page;
533
	unsigned long swapped = 0;
534 535 536 537 538 539 540 541 542

	rcu_read_lock();

	radix_tree_for_each_slot(slot, &mapping->page_tree, &iter, start) {
		if (iter.index >= end)
			break;

		page = radix_tree_deref_slot(slot);

M
Matthew Wilcox 已提交
543 544 545 546
		if (radix_tree_deref_retry(page)) {
			slot = radix_tree_iter_retry(&iter);
			continue;
		}
547 548 549 550 551 552

		if (radix_tree_exceptional_entry(page))
			swapped++;

		if (need_resched()) {
			cond_resched_rcu();
553
			slot = radix_tree_iter_next(&iter);
554 555 556 557 558 559 560 561
		}
	}

	rcu_read_unlock();

	return swapped << PAGE_SHIFT;
}

562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591 592 593 594 595
/*
 * Determine (in bytes) how many of the shmem object's pages mapped by the
 * given vma is swapped out.
 *
 * This is safe to call without i_mutex or mapping->tree_lock thanks to RCU,
 * 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));
}

596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613
/*
 * 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;

	pagevec_init(&pvec, 0);
	/*
	 * 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.
		 */
614 615
		pvec.nr = find_get_entries(mapping, index,
					   PAGEVEC_SIZE, pvec.pages, indices);
616 617 618
		if (!pvec.nr)
			break;
		index = indices[pvec.nr - 1] + 1;
619
		pagevec_remove_exceptionals(&pvec);
620 621 622 623
		check_move_unevictable_pages(pvec.pages, pvec.nr);
		pagevec_release(&pvec);
		cond_resched();
	}
624 625 626 627
}

/*
 * Remove range of pages and swap entries from radix tree, and free them.
628
 * If !unfalloc, truncate or punch hole; if unfalloc, undo failed fallocate.
629
 */
630 631
static void shmem_undo_range(struct inode *inode, loff_t lstart, loff_t lend,
								 bool unfalloc)
L
Linus Torvalds 已提交
632
{
633
	struct address_space *mapping = inode->i_mapping;
L
Linus Torvalds 已提交
634
	struct shmem_inode_info *info = SHMEM_I(inode);
635 636 637 638
	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);
639
	struct pagevec pvec;
640 641
	pgoff_t indices[PAGEVEC_SIZE];
	long nr_swaps_freed = 0;
642
	pgoff_t index;
643 644
	int i;

645 646
	if (lend == -1)
		end = -1;	/* unsigned, so actually very big */
647 648 649

	pagevec_init(&pvec, 0);
	index = start;
650
	while (index < end) {
651 652 653
		pvec.nr = find_get_entries(mapping, index,
			min(end - index, (pgoff_t)PAGEVEC_SIZE),
			pvec.pages, indices);
654 655
		if (!pvec.nr)
			break;
656 657 658
		for (i = 0; i < pagevec_count(&pvec); i++) {
			struct page *page = pvec.pages[i];

659
			index = indices[i];
660
			if (index >= end)
661 662
				break;

663
			if (radix_tree_exceptional_entry(page)) {
664 665
				if (unfalloc)
					continue;
666 667
				nr_swaps_freed += !shmem_free_swap(mapping,
								index, page);
668
				continue;
669 670
			}

671 672
			VM_BUG_ON_PAGE(page_to_pgoff(page) != index, page);

673
			if (!trylock_page(page))
674
				continue;
675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694

			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;
			}

695
			if (!unfalloc || !PageUptodate(page)) {
696 697
				VM_BUG_ON_PAGE(PageTail(page), page);
				if (page_mapping(page) == mapping) {
698
					VM_BUG_ON_PAGE(PageWriteback(page), page);
699 700
					truncate_inode_page(mapping, page);
				}
701 702 703
			}
			unlock_page(page);
		}
704
		pagevec_remove_exceptionals(&pvec);
705
		pagevec_release(&pvec);
706 707 708
		cond_resched();
		index++;
	}
L
Linus Torvalds 已提交
709

710
	if (partial_start) {
711
		struct page *page = NULL;
712
		shmem_getpage(inode, start - 1, &page, SGP_READ);
713
		if (page) {
714
			unsigned int top = PAGE_SIZE;
715 716 717 718 719 720 721
			if (start > end) {
				top = partial_end;
				partial_end = 0;
			}
			zero_user_segment(page, partial_start, top);
			set_page_dirty(page);
			unlock_page(page);
722
			put_page(page);
723 724 725 726
		}
	}
	if (partial_end) {
		struct page *page = NULL;
727
		shmem_getpage(inode, end, &page, SGP_READ);
728 729
		if (page) {
			zero_user_segment(page, 0, partial_end);
730 731
			set_page_dirty(page);
			unlock_page(page);
732
			put_page(page);
733 734
		}
	}
735 736
	if (start >= end)
		return;
737 738

	index = start;
739
	while (index < end) {
740
		cond_resched();
741 742

		pvec.nr = find_get_entries(mapping, index,
743
				min(end - index, (pgoff_t)PAGEVEC_SIZE),
744
				pvec.pages, indices);
745
		if (!pvec.nr) {
746 747
			/* If all gone or hole-punch or unfalloc, we're done */
			if (index == start || end != -1)
748
				break;
749
			/* But if truncating, restart to make sure all gone */
750 751 752 753 754 755
			index = start;
			continue;
		}
		for (i = 0; i < pagevec_count(&pvec); i++) {
			struct page *page = pvec.pages[i];

756
			index = indices[i];
757
			if (index >= end)
758 759
				break;

760
			if (radix_tree_exceptional_entry(page)) {
761 762
				if (unfalloc)
					continue;
763 764 765 766 767 768
				if (shmem_free_swap(mapping, index, page)) {
					/* Swap was replaced by page: retry */
					index--;
					break;
				}
				nr_swaps_freed++;
769 770 771
				continue;
			}

772
			lock_page(page);
773 774 775 776 777 778 779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799

			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;
			}

800
			if (!unfalloc || !PageUptodate(page)) {
801 802
				VM_BUG_ON_PAGE(PageTail(page), page);
				if (page_mapping(page) == mapping) {
803
					VM_BUG_ON_PAGE(PageWriteback(page), page);
804
					truncate_inode_page(mapping, page);
805 806 807 808 809
				} else {
					/* Page was replaced by swap: retry */
					unlock_page(page);
					index--;
					break;
810
				}
811
			}
812 813
			unlock_page(page);
		}
814
		pagevec_remove_exceptionals(&pvec);
815
		pagevec_release(&pvec);
816 817
		index++;
	}
818

L
Linus Torvalds 已提交
819
	spin_lock(&info->lock);
820
	info->swapped -= nr_swaps_freed;
L
Linus Torvalds 已提交
821 822
	shmem_recalc_inode(inode);
	spin_unlock(&info->lock);
823
}
L
Linus Torvalds 已提交
824

825 826 827
void shmem_truncate_range(struct inode *inode, loff_t lstart, loff_t lend)
{
	shmem_undo_range(inode, lstart, lend, false);
828
	inode->i_ctime = inode->i_mtime = CURRENT_TIME;
L
Linus Torvalds 已提交
829
}
830
EXPORT_SYMBOL_GPL(shmem_truncate_range);
L
Linus Torvalds 已提交
831

832 833 834 835 836 837
static int shmem_getattr(struct vfsmount *mnt, struct dentry *dentry,
			 struct kstat *stat)
{
	struct inode *inode = dentry->d_inode;
	struct shmem_inode_info *info = SHMEM_I(inode);

838 839 840 841 842
	if (info->alloced - info->swapped != inode->i_mapping->nrpages) {
		spin_lock(&info->lock);
		shmem_recalc_inode(inode);
		spin_unlock(&info->lock);
	}
843 844 845 846
	generic_fillattr(inode, stat);
	return 0;
}

847
static int shmem_setattr(struct dentry *dentry, struct iattr *attr)
L
Linus Torvalds 已提交
848
{
849
	struct inode *inode = d_inode(dentry);
D
David Herrmann 已提交
850
	struct shmem_inode_info *info = SHMEM_I(inode);
L
Linus Torvalds 已提交
851 852
	int error;

853 854 855 856
	error = inode_change_ok(inode, attr);
	if (error)
		return error;

857 858 859
	if (S_ISREG(inode->i_mode) && (attr->ia_valid & ATTR_SIZE)) {
		loff_t oldsize = inode->i_size;
		loff_t newsize = attr->ia_size;
860

D
David Herrmann 已提交
861 862 863 864 865
		/* protected by i_mutex */
		if ((newsize < oldsize && (info->seals & F_SEAL_SHRINK)) ||
		    (newsize > oldsize && (info->seals & F_SEAL_GROW)))
			return -EPERM;

866
		if (newsize != oldsize) {
867 868 869 870
			error = shmem_reacct_size(SHMEM_I(inode)->flags,
					oldsize, newsize);
			if (error)
				return error;
871 872 873
			i_size_write(inode, newsize);
			inode->i_ctime = inode->i_mtime = CURRENT_TIME;
		}
874
		if (newsize <= oldsize) {
875
			loff_t holebegin = round_up(newsize, PAGE_SIZE);
876 877 878 879 880 881
			if (oldsize > holebegin)
				unmap_mapping_range(inode->i_mapping,
							holebegin, 0, 1);
			if (info->alloced)
				shmem_truncate_range(inode,
							newsize, (loff_t)-1);
882
			/* unmap again to remove racily COWed private pages */
883 884 885
			if (oldsize > holebegin)
				unmap_mapping_range(inode->i_mapping,
							holebegin, 0, 1);
886
		}
L
Linus Torvalds 已提交
887 888
	}

889 890
	setattr_copy(inode, attr);
	if (attr->ia_valid & ATTR_MODE)
C
Christoph Hellwig 已提交
891
		error = posix_acl_chmod(inode, inode->i_mode);
L
Linus Torvalds 已提交
892 893 894
	return error;
}

A
Al Viro 已提交
895
static void shmem_evict_inode(struct inode *inode)
L
Linus Torvalds 已提交
896 897 898
{
	struct shmem_inode_info *info = SHMEM_I(inode);

899
	if (inode->i_mapping->a_ops == &shmem_aops) {
L
Linus Torvalds 已提交
900 901
		shmem_unacct_size(info->flags, inode->i_size);
		inode->i_size = 0;
902
		shmem_truncate_range(inode, 0, (loff_t)-1);
L
Linus Torvalds 已提交
903
		if (!list_empty(&info->swaplist)) {
904
			mutex_lock(&shmem_swaplist_mutex);
L
Linus Torvalds 已提交
905
			list_del_init(&info->swaplist);
906
			mutex_unlock(&shmem_swaplist_mutex);
L
Linus Torvalds 已提交
907
		}
908
	}
909

910
	simple_xattrs_free(&info->xattrs);
911
	WARN_ON(inode->i_blocks);
912
	shmem_free_inode(inode->i_sb);
913
	clear_inode(inode);
L
Linus Torvalds 已提交
914 915
}

916 917 918
/*
 * If swap found in inode, free it and move page from swapcache to filecache.
 */
919
static int shmem_unuse_inode(struct shmem_inode_info *info,
920
			     swp_entry_t swap, struct page **pagep)
L
Linus Torvalds 已提交
921
{
922
	struct address_space *mapping = info->vfs_inode.i_mapping;
923
	void *radswap;
924
	pgoff_t index;
925 926
	gfp_t gfp;
	int error = 0;
L
Linus Torvalds 已提交
927

928
	radswap = swp_to_radix_entry(swap);
929
	index = radix_tree_locate_item(&mapping->page_tree, radswap);
930
	if (index == -1)
931
		return -EAGAIN;	/* tell shmem_unuse we found nothing */
932

H
Hugh Dickins 已提交
933 934
	/*
	 * Move _head_ to start search for next from here.
A
Al Viro 已提交
935
	 * But be careful: shmem_evict_inode checks list_empty without taking
H
Hugh Dickins 已提交
936
	 * mutex, and there's an instant in list_move_tail when info->swaplist
937
	 * would appear empty, if it were the only one on shmem_swaplist.
H
Hugh Dickins 已提交
938 939 940
	 */
	if (shmem_swaplist.next != &info->swaplist)
		list_move_tail(&shmem_swaplist, &info->swaplist);
941

942 943 944 945 946 947 948
	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
949 950 951 952 953 954 955 956 957 958 959 960 961 962 963
		 * allocation, but the inode might have been freed while we
		 * dropped it: although a racing shmem_evict_inode() cannot
		 * complete without emptying the radix_tree, our page lock
		 * on this swapcache page is not enough to prevent that -
		 * free_swap_and_cache() of our swap entry will only
		 * trylock_page(), removing swap from radix_tree whatever.
		 *
		 * 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).
964 965 966 967 968
		 */
		if (!page_swapcount(*pagep))
			error = -ENOENT;
	}

K
KAMEZAWA Hiroyuki 已提交
969
	/*
970 971 972
	 * 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 已提交
973
	 */
974 975
	if (!error)
		error = shmem_add_to_page_cache(*pagep, mapping, index,
976
						radswap);
977
	if (error != -ENOMEM) {
978 979 980 981
		/*
		 * Truncation and eviction use free_swap_and_cache(), which
		 * only does trylock page: if we raced, best clean up here.
		 */
982 983
		delete_from_swap_cache(*pagep);
		set_page_dirty(*pagep);
984 985 986 987 988 989
		if (!error) {
			spin_lock(&info->lock);
			info->swapped--;
			spin_unlock(&info->lock);
			swap_free(swap);
		}
L
Linus Torvalds 已提交
990
	}
991
	return error;
L
Linus Torvalds 已提交
992 993 994
}

/*
995
 * Search through swapped inodes to find and replace swap by page.
L
Linus Torvalds 已提交
996
 */
997
int shmem_unuse(swp_entry_t swap, struct page *page)
L
Linus Torvalds 已提交
998
{
999
	struct list_head *this, *next;
L
Linus Torvalds 已提交
1000
	struct shmem_inode_info *info;
1001
	struct mem_cgroup *memcg;
1002 1003 1004 1005
	int error = 0;

	/*
	 * There's a faint possibility that swap page was replaced before
1006
	 * caller locked it: caller will come back later with the right page.
1007
	 */
1008
	if (unlikely(!PageSwapCache(page) || page_private(page) != swap.val))
1009
		goto out;
1010 1011 1012 1013 1014 1015

	/*
	 * 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.
	 */
1016 1017
	error = mem_cgroup_try_charge(page, current->mm, GFP_KERNEL, &memcg,
			false);
1018 1019
	if (error)
		goto out;
1020
	/* No radix_tree_preload: swap entry keeps a place for page in tree */
1021
	error = -EAGAIN;
L
Linus Torvalds 已提交
1022

1023
	mutex_lock(&shmem_swaplist_mutex);
1024 1025
	list_for_each_safe(this, next, &shmem_swaplist) {
		info = list_entry(this, struct shmem_inode_info, swaplist);
1026
		if (info->swapped)
1027
			error = shmem_unuse_inode(info, swap, &page);
1028 1029
		else
			list_del_init(&info->swaplist);
1030
		cond_resched();
1031
		if (error != -EAGAIN)
1032
			break;
1033
		/* found nothing in this: move on to search the next */
L
Linus Torvalds 已提交
1034
	}
1035
	mutex_unlock(&shmem_swaplist_mutex);
1036

1037 1038 1039
	if (error) {
		if (error != -ENOMEM)
			error = 0;
1040
		mem_cgroup_cancel_charge(page, memcg, false);
1041
	} else
1042
		mem_cgroup_commit_charge(page, memcg, true, false);
1043
out:
H
Hugh Dickins 已提交
1044
	unlock_page(page);
1045
	put_page(page);
1046
	return error;
L
Linus Torvalds 已提交
1047 1048 1049 1050 1051 1052 1053 1054 1055 1056
}

/*
 * 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;
1057 1058
	swp_entry_t swap;
	pgoff_t index;
L
Linus Torvalds 已提交
1059

1060
	VM_BUG_ON_PAGE(PageCompound(page), page);
L
Linus Torvalds 已提交
1061 1062 1063 1064 1065 1066 1067
	BUG_ON(!PageLocked(page));
	mapping = page->mapping;
	index = page->index;
	inode = mapping->host;
	info = SHMEM_I(inode);
	if (info->flags & VM_LOCKED)
		goto redirty;
1068
	if (!total_swap_pages)
L
Linus Torvalds 已提交
1069 1070
		goto redirty;

1071
	/*
C
Christoph Hellwig 已提交
1072 1073 1074 1075 1076
	 * 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.
1077
	 */
1078 1079 1080 1081
	if (!wbc->for_reclaim) {
		WARN_ON_ONCE(1);	/* Still happens? Tell us about it! */
		goto redirty;
	}
1082 1083 1084 1085 1086

	/*
	 * 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.
1087 1088 1089 1090 1091 1092
	 *
	 * 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.
1093 1094
	 */
	if (!PageUptodate(page)) {
1095 1096 1097 1098 1099
		if (inode->i_private) {
			struct shmem_falloc *shmem_falloc;
			spin_lock(&inode->i_lock);
			shmem_falloc = inode->i_private;
			if (shmem_falloc &&
1100
			    !shmem_falloc->waitq &&
1101 1102 1103 1104 1105 1106 1107 1108 1109
			    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;
		}
1110 1111 1112 1113 1114
		clear_highpage(page);
		flush_dcache_page(page);
		SetPageUptodate(page);
	}

1115 1116 1117
	swap = get_swap_page();
	if (!swap.val)
		goto redirty;
1118

1119 1120 1121
	if (mem_cgroup_try_charge_swap(page, swap))
		goto free_swap;

1122 1123
	/*
	 * Add inode to shmem_unuse()'s list of swapped-out inodes,
1124 1125
	 * if it's not already there.  Do it now before the page is
	 * moved to swap cache, when its pagelock no longer protects
1126
	 * the inode from eviction.  But don't unlock the mutex until
1127 1128
	 * we've incremented swapped, because shmem_unuse_inode() will
	 * prune a !swapped inode from the swaplist under this mutex.
1129
	 */
1130 1131 1132
	mutex_lock(&shmem_swaplist_mutex);
	if (list_empty(&info->swaplist))
		list_add_tail(&info->swaplist, &shmem_swaplist);
1133

1134
	if (add_to_swap_cache(page, swap, GFP_ATOMIC) == 0) {
1135 1136
		spin_lock(&info->lock);
		shmem_recalc_inode(inode);
1137
		info->swapped++;
1138
		spin_unlock(&info->lock);
1139

1140 1141 1142
		swap_shmem_alloc(swap);
		shmem_delete_from_page_cache(page, swp_to_radix_entry(swap));

1143
		mutex_unlock(&shmem_swaplist_mutex);
1144
		BUG_ON(page_mapped(page));
H
Hugh Dickins 已提交
1145
		swap_writepage(page, wbc);
L
Linus Torvalds 已提交
1146 1147 1148
		return 0;
	}

1149
	mutex_unlock(&shmem_swaplist_mutex);
1150
free_swap:
1151
	swapcache_free(swap);
L
Linus Torvalds 已提交
1152 1153
redirty:
	set_page_dirty(page);
1154 1155 1156 1157
	if (wbc->for_reclaim)
		return AOP_WRITEPAGE_ACTIVATE;	/* Return with page locked */
	unlock_page(page);
	return 0;
L
Linus Torvalds 已提交
1158 1159
}

H
Hugh Dickins 已提交
1160
#if defined(CONFIG_NUMA) && defined(CONFIG_TMPFS)
1161
static void shmem_show_mpol(struct seq_file *seq, struct mempolicy *mpol)
1162
{
1163
	char buffer[64];
1164

1165
	if (!mpol || mpol->mode == MPOL_DEFAULT)
1166
		return;		/* show nothing */
1167

1168
	mpol_to_str(buffer, sizeof(buffer), mpol);
1169 1170

	seq_printf(seq, ",mpol=%s", buffer);
1171
}
1172 1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183

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 已提交
1184 1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195
#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
1196

1197 1198 1199 1200 1201 1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213
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 */
	vma->vm_start = 0;
	/* Bias interleave by inode number to distribute better across nodes */
	vma->vm_pgoff = index + info->vfs_inode.i_ino;
	vma->vm_ops = NULL;
	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);
}

1214 1215
static struct page *shmem_swapin(swp_entry_t swap, gfp_t gfp,
			struct shmem_inode_info *info, pgoff_t index)
L
Linus Torvalds 已提交
1216 1217
{
	struct vm_area_struct pvma;
M
Mel Gorman 已提交
1218
	struct page *page;
1219

1220
	shmem_pseudo_vma_init(&pvma, info, index);
M
Mel Gorman 已提交
1221
	page = swapin_readahead(swap, gfp, &pvma, 0);
1222
	shmem_pseudo_vma_destroy(&pvma);
M
Mel Gorman 已提交
1223

1224 1225 1226 1227 1228 1229 1230 1231 1232 1233 1234 1235 1236 1237 1238 1239 1240 1241 1242 1243 1244 1245 1246
	return page;
}

static struct page *shmem_alloc_hugepage(gfp_t gfp,
		struct shmem_inode_info *info, pgoff_t index)
{
	struct vm_area_struct pvma;
	struct inode *inode = &info->vfs_inode;
	struct address_space *mapping = inode->i_mapping;
	pgoff_t idx, hindex = round_down(index, HPAGE_PMD_NR);
	void __rcu **results;
	struct page *page;

	if (!IS_ENABLED(CONFIG_TRANSPARENT_HUGEPAGE))
		return NULL;

	rcu_read_lock();
	if (radix_tree_gang_lookup_slot(&mapping->page_tree, &results, &idx,
				hindex, 1) && idx < hindex + HPAGE_PMD_NR) {
		rcu_read_unlock();
		return NULL;
	}
	rcu_read_unlock();
M
Mel Gorman 已提交
1247

1248 1249 1250 1251 1252 1253
	shmem_pseudo_vma_init(&pvma, info, hindex);
	page = alloc_pages_vma(gfp | __GFP_COMP | __GFP_NORETRY | __GFP_NOWARN,
			HPAGE_PMD_ORDER, &pvma, 0, numa_node_id(), true);
	shmem_pseudo_vma_destroy(&pvma);
	if (page)
		prep_transhuge_page(page);
M
Mel Gorman 已提交
1254
	return page;
L
Linus Torvalds 已提交
1255 1256
}

1257
static struct page *shmem_alloc_page(gfp_t gfp,
1258
			struct shmem_inode_info *info, pgoff_t index)
L
Linus Torvalds 已提交
1259 1260
{
	struct vm_area_struct pvma;
M
Mel Gorman 已提交
1261
	struct page *page;
L
Linus Torvalds 已提交
1262

1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276
	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,
		struct shmem_inode_info *info, struct shmem_sb_info *sbinfo,
		pgoff_t index, bool huge)
{
	struct page *page;
	int nr;
	int err = -ENOSPC;
1277

1278 1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294
	if (!IS_ENABLED(CONFIG_TRANSPARENT_HUGEPAGE))
		huge = false;
	nr = huge ? HPAGE_PMD_NR : 1;

	if (shmem_acct_block(info->flags, nr))
		goto failed;
	if (sbinfo->max_blocks) {
		if (percpu_counter_compare(&sbinfo->used_blocks,
					sbinfo->max_blocks - nr) > 0)
			goto unacct;
		percpu_counter_add(&sbinfo->used_blocks, nr);
	}

	if (huge)
		page = shmem_alloc_hugepage(gfp, info, index);
	else
		page = shmem_alloc_page(gfp, info, index);
H
Hugh Dickins 已提交
1295 1296 1297
	if (page) {
		__SetPageLocked(page);
		__SetPageSwapBacked(page);
1298
		return page;
H
Hugh Dickins 已提交
1299
	}
M
Mel Gorman 已提交
1300

1301 1302 1303 1304 1305 1306 1307
	err = -ENOMEM;
	if (sbinfo->max_blocks)
		percpu_counter_add(&sbinfo->used_blocks, -nr);
unacct:
	shmem_unacct_blocks(info->flags, nr);
failed:
	return ERR_PTR(err);
L
Linus Torvalds 已提交
1308
}
1309

1310 1311 1312 1313 1314 1315 1316 1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347
/*
 * 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;
	pgoff_t swap_index;
	int error;

	oldpage = *pagep;
	swap_index = page_private(oldpage);
	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;

1348
	get_page(newpage);
1349
	copy_highpage(newpage, oldpage);
1350
	flush_dcache_page(newpage);
1351 1352 1353 1354 1355 1356 1357 1358 1359 1360 1361 1362

	SetPageUptodate(newpage);
	set_page_private(newpage, swap_index);
	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.
	 */
	spin_lock_irq(&swap_mapping->tree_lock);
	error = shmem_radix_tree_replace(swap_mapping, swap_index, oldpage,
								   newpage);
1363 1364 1365 1366
	if (!error) {
		__inc_zone_page_state(newpage, NR_FILE_PAGES);
		__dec_zone_page_state(oldpage, NR_FILE_PAGES);
	}
1367 1368
	spin_unlock_irq(&swap_mapping->tree_lock);

1369 1370 1371 1372 1373 1374 1375 1376
	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 {
1377
		mem_cgroup_migrate(oldpage, newpage);
1378 1379 1380
		lru_cache_add_anon(newpage);
		*pagep = newpage;
	}
1381 1382 1383 1384 1385

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

	unlock_page(oldpage);
1386 1387
	put_page(oldpage);
	put_page(oldpage);
1388
	return error;
1389 1390
}

L
Linus Torvalds 已提交
1391
/*
1392
 * shmem_getpage_gfp - find page in cache, or get from swap, or allocate
L
Linus Torvalds 已提交
1393 1394 1395
 *
 * 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
1396 1397 1398 1399
 * 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 已提交
1400
 */
1401
static int shmem_getpage_gfp(struct inode *inode, pgoff_t index,
1402 1403
	struct page **pagep, enum sgp_type sgp, gfp_t gfp,
	struct mm_struct *fault_mm, int *fault_type)
L
Linus Torvalds 已提交
1404 1405
{
	struct address_space *mapping = inode->i_mapping;
1406
	struct shmem_inode_info *info;
L
Linus Torvalds 已提交
1407
	struct shmem_sb_info *sbinfo;
1408
	struct mm_struct *charge_mm;
1409
	struct mem_cgroup *memcg;
H
Hugh Dickins 已提交
1410
	struct page *page;
L
Linus Torvalds 已提交
1411
	swp_entry_t swap;
1412
	pgoff_t hindex = index;
L
Linus Torvalds 已提交
1413
	int error;
1414
	int once = 0;
1415
	int alloced = 0;
L
Linus Torvalds 已提交
1416

1417
	if (index > (MAX_LFS_FILESIZE >> PAGE_SHIFT))
L
Linus Torvalds 已提交
1418 1419
		return -EFBIG;
repeat:
1420
	swap.val = 0;
1421
	page = find_lock_entry(mapping, index);
1422 1423 1424 1425 1426
	if (radix_tree_exceptional_entry(page)) {
		swap = radix_to_swp_entry(page);
		page = NULL;
	}

H
Hugh Dickins 已提交
1427
	if (sgp <= SGP_CACHE &&
1428
	    ((loff_t)index << PAGE_SHIFT) >= i_size_read(inode)) {
1429
		error = -EINVAL;
1430
		goto unlock;
1431 1432
	}

1433 1434 1435
	if (page && sgp == SGP_WRITE)
		mark_page_accessed(page);

1436 1437 1438 1439 1440
	/* fallocated page? */
	if (page && !PageUptodate(page)) {
		if (sgp != SGP_READ)
			goto clear;
		unlock_page(page);
1441
		put_page(page);
1442 1443
		page = NULL;
	}
1444 1445 1446
	if (page || (sgp == SGP_READ && !swap.val)) {
		*pagep = page;
		return 0;
H
Hugh Dickins 已提交
1447 1448 1449
	}

	/*
1450 1451
	 * Fast cache lookup did not find it:
	 * bring it back from swap or allocate.
H
Hugh Dickins 已提交
1452
	 */
1453 1454
	info = SHMEM_I(inode);
	sbinfo = SHMEM_SB(inode->i_sb);
1455
	charge_mm = fault_mm ? : current->mm;
L
Linus Torvalds 已提交
1456 1457 1458

	if (swap.val) {
		/* Look it up and read it in.. */
H
Hugh Dickins 已提交
1459 1460
		page = lookup_swap_cache(swap);
		if (!page) {
1461 1462
			/* Or update major stats only when swapin succeeds?? */
			if (fault_type) {
1463
				*fault_type |= VM_FAULT_MAJOR;
1464 1465 1466 1467
				count_vm_event(PGMAJFAULT);
				mem_cgroup_count_vm_event(fault_mm, PGMAJFAULT);
			}
			/* Here we actually start the io */
1468
			page = shmem_swapin(swap, gfp, info, index);
H
Hugh Dickins 已提交
1469
			if (!page) {
1470 1471
				error = -ENOMEM;
				goto failed;
L
Linus Torvalds 已提交
1472 1473 1474 1475
			}
		}

		/* We have to do this with page locked to prevent races */
1476
		lock_page(page);
1477
		if (!PageSwapCache(page) || page_private(page) != swap.val ||
1478
		    !shmem_confirm_swap(mapping, index, swap)) {
1479
			error = -EEXIST;	/* try again */
1480
			goto unlock;
1481
		}
H
Hugh Dickins 已提交
1482
		if (!PageUptodate(page)) {
L
Linus Torvalds 已提交
1483
			error = -EIO;
1484
			goto failed;
L
Linus Torvalds 已提交
1485
		}
1486 1487
		wait_on_page_writeback(page);

1488 1489 1490 1491
		if (shmem_should_replace_page(page, gfp)) {
			error = shmem_replace_page(&page, gfp, info, index);
			if (error)
				goto failed;
L
Linus Torvalds 已提交
1492
		}
H
Hugh Dickins 已提交
1493

1494
		error = mem_cgroup_try_charge(page, charge_mm, gfp, &memcg,
1495
				false);
1496
		if (!error) {
1497
			error = shmem_add_to_page_cache(page, mapping, index,
1498
						swp_to_radix_entry(swap));
1499 1500 1501 1502 1503 1504 1505 1506
			/*
			 * 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
1507
			 * the rest.
1508 1509 1510
			 * Reset swap.val? No, leave it so "failed" goes back to
			 * "repeat": reading a hole and writing should succeed.
			 */
1511
			if (error) {
1512
				mem_cgroup_cancel_charge(page, memcg, false);
1513
				delete_from_swap_cache(page);
1514
			}
1515
		}
1516 1517 1518
		if (error)
			goto failed;

1519
		mem_cgroup_commit_charge(page, memcg, true, false);
1520

1521
		spin_lock(&info->lock);
1522
		info->swapped--;
1523
		shmem_recalc_inode(inode);
H
Hugh Dickins 已提交
1524
		spin_unlock(&info->lock);
1525

1526 1527 1528
		if (sgp == SGP_WRITE)
			mark_page_accessed(page);

1529
		delete_from_swap_cache(page);
H
Hugh Dickins 已提交
1530 1531 1532
		set_page_dirty(page);
		swap_free(swap);

1533
	} else {
1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555
		/* shmem_symlink() */
		if (mapping->a_ops != &shmem_aops)
			goto alloc_nohuge;
		if (shmem_huge == SHMEM_HUGE_DENY)
			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:
			/* TODO: wire up fadvise()/madvise() */
			goto alloc_nohuge;
1556
		}
L
Linus Torvalds 已提交
1557

1558 1559 1560 1561 1562 1563
alloc_huge:
		page = shmem_alloc_and_acct_page(gfp, info, sbinfo,
				index, true);
		if (IS_ERR(page)) {
alloc_nohuge:		page = shmem_alloc_and_acct_page(gfp, info, sbinfo,
					index, false);
L
Linus Torvalds 已提交
1564
		}
1565 1566 1567 1568 1569 1570 1571 1572 1573 1574 1575
		if (IS_ERR(page)) {
			error = PTR_ERR(page);
			page = NULL;
			goto failed;
		}

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

1576
		if (sgp == SGP_WRITE)
1577
			__SetPageReferenced(page);
1578

1579
		error = mem_cgroup_try_charge(page, charge_mm, gfp, &memcg,
1580
				PageTransHuge(page));
1581
		if (error)
1582 1583 1584
			goto unacct;
		error = radix_tree_maybe_preload_order(gfp & GFP_RECLAIM_MASK,
				compound_order(page));
1585
		if (!error) {
1586
			error = shmem_add_to_page_cache(page, mapping, hindex,
1587
							NULL);
1588 1589 1590
			radix_tree_preload_end();
		}
		if (error) {
1591 1592 1593
			mem_cgroup_cancel_charge(page, memcg,
					PageTransHuge(page));
			goto unacct;
1594
		}
1595 1596
		mem_cgroup_commit_charge(page, memcg, false,
				PageTransHuge(page));
1597 1598 1599
		lru_cache_add_anon(page);

		spin_lock(&info->lock);
1600 1601
		info->alloced += 1 << compound_order(page);
		inode->i_blocks += BLOCKS_PER_PAGE << compound_order(page);
1602
		shmem_recalc_inode(inode);
L
Linus Torvalds 已提交
1603
		spin_unlock(&info->lock);
1604
		alloced = true;
1605

1606
		/*
1607 1608 1609 1610 1611 1612 1613 1614 1615
		 * 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.
1616
		 */
1617 1618 1619 1620 1621 1622 1623 1624 1625
		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);
1626
		}
L
Linus Torvalds 已提交
1627
	}
1628

1629
	/* Perhaps the file has been truncated since we checked */
H
Hugh Dickins 已提交
1630
	if (sgp <= SGP_CACHE &&
1631
	    ((loff_t)index << PAGE_SHIFT) >= i_size_read(inode)) {
1632 1633 1634 1635 1636 1637 1638
		if (alloced) {
			ClearPageDirty(page);
			delete_from_page_cache(page);
			spin_lock(&info->lock);
			shmem_recalc_inode(inode);
			spin_unlock(&info->lock);
		}
1639
		error = -EINVAL;
1640
		goto unlock;
H
Hugh Dickins 已提交
1641
	}
1642
	*pagep = page + index - hindex;
1643
	return 0;
L
Linus Torvalds 已提交
1644

1645
	/*
1646
	 * Error recovery.
1647
	 */
1648
unacct:
1649 1650 1651 1652 1653 1654 1655 1656 1657 1658
	if (sbinfo->max_blocks)
		percpu_counter_sub(&sbinfo->used_blocks,
				1 << compound_order(page));
	shmem_unacct_blocks(info->flags, 1 << compound_order(page));

	if (PageTransHuge(page)) {
		unlock_page(page);
		put_page(page);
		goto alloc_nohuge;
	}
1659
failed:
1660
	if (swap.val && !shmem_confirm_swap(mapping, index, swap))
1661 1662
		error = -EEXIST;
unlock:
H
Hugh Dickins 已提交
1663
	if (page) {
1664
		unlock_page(page);
1665
		put_page(page);
1666 1667 1668 1669 1670 1671
	}
	if (error == -ENOSPC && !once++) {
		info = SHMEM_I(inode);
		spin_lock(&info->lock);
		shmem_recalc_inode(inode);
		spin_unlock(&info->lock);
H
Hugh Dickins 已提交
1672
		goto repeat;
1673
	}
1674
	if (error == -EEXIST)	/* from above or from radix_tree_insert */
1675 1676
		goto repeat;
	return error;
L
Linus Torvalds 已提交
1677 1678
}

N
Nick Piggin 已提交
1679
static int shmem_fault(struct vm_area_struct *vma, struct vm_fault *vmf)
L
Linus Torvalds 已提交
1680
{
A
Al Viro 已提交
1681
	struct inode *inode = file_inode(vma->vm_file);
1682
	gfp_t gfp = mapping_gfp_mask(inode->i_mapping);
L
Linus Torvalds 已提交
1683
	int error;
1684
	int ret = VM_FAULT_LOCKED;
L
Linus Torvalds 已提交
1685

1686 1687 1688 1689
	/*
	 * 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
1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701
	 * 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.
1702 1703 1704 1705 1706 1707
	 */
	if (unlikely(inode->i_private)) {
		struct shmem_falloc *shmem_falloc;

		spin_lock(&inode->i_lock);
		shmem_falloc = inode->i_private;
1708 1709 1710 1711 1712 1713 1714 1715
		if (shmem_falloc &&
		    shmem_falloc->waitq &&
		    vmf->pgoff >= shmem_falloc->start &&
		    vmf->pgoff < shmem_falloc->next) {
			wait_queue_head_t *shmem_falloc_waitq;
			DEFINE_WAIT(shmem_fault_wait);

			ret = VM_FAULT_NOPAGE;
1716 1717
			if ((vmf->flags & FAULT_FLAG_ALLOW_RETRY) &&
			   !(vmf->flags & FAULT_FLAG_RETRY_NOWAIT)) {
1718
				/* It's polite to up mmap_sem if we can */
1719
				up_read(&vma->vm_mm->mmap_sem);
1720
				ret = VM_FAULT_RETRY;
1721
			}
1722 1723 1724 1725 1726 1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737 1738 1739

			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;
1740
		}
1741
		spin_unlock(&inode->i_lock);
1742 1743
	}

1744 1745
	error = shmem_getpage_gfp(inode, vmf->pgoff, &vmf->page, SGP_CACHE,
				  gfp, vma->vm_mm, &ret);
N
Nick Piggin 已提交
1746 1747
	if (error)
		return ((error == -ENOMEM) ? VM_FAULT_OOM : VM_FAULT_SIGBUS);
1748
	return ret;
L
Linus Torvalds 已提交
1749 1750
}

1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773 1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835 1836 1837 1838
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);

	if (!IS_ENABLED(CONFIG_TRANSPARENT_HUGEPAGE))
		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;
		}
		if (SHMEM_SB(sb)->huge != SHMEM_HUGE_NEVER)
			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 已提交
1839
#ifdef CONFIG_NUMA
1840
static int shmem_set_policy(struct vm_area_struct *vma, struct mempolicy *mpol)
L
Linus Torvalds 已提交
1841
{
A
Al Viro 已提交
1842
	struct inode *inode = file_inode(vma->vm_file);
1843
	return mpol_set_shared_policy(&SHMEM_I(inode)->policy, vma, mpol);
L
Linus Torvalds 已提交
1844 1845
}

A
Adrian Bunk 已提交
1846 1847
static struct mempolicy *shmem_get_policy(struct vm_area_struct *vma,
					  unsigned long addr)
L
Linus Torvalds 已提交
1848
{
A
Al Viro 已提交
1849
	struct inode *inode = file_inode(vma->vm_file);
1850
	pgoff_t index;
L
Linus Torvalds 已提交
1851

1852 1853
	index = ((addr - vma->vm_start) >> PAGE_SHIFT) + vma->vm_pgoff;
	return mpol_shared_policy_lookup(&SHMEM_I(inode)->policy, index);
L
Linus Torvalds 已提交
1854 1855 1856 1857 1858
}
#endif

int shmem_lock(struct file *file, int lock, struct user_struct *user)
{
A
Al Viro 已提交
1859
	struct inode *inode = file_inode(file);
L
Linus Torvalds 已提交
1860 1861 1862 1863 1864 1865 1866 1867
	struct shmem_inode_info *info = SHMEM_I(inode);
	int retval = -ENOMEM;

	spin_lock(&info->lock);
	if (lock && !(info->flags & VM_LOCKED)) {
		if (!user_shm_lock(inode->i_size, user))
			goto out_nomem;
		info->flags |= VM_LOCKED;
1868
		mapping_set_unevictable(file->f_mapping);
L
Linus Torvalds 已提交
1869 1870 1871 1872
	}
	if (!lock && (info->flags & VM_LOCKED) && user) {
		user_shm_unlock(inode->i_size, user);
		info->flags &= ~VM_LOCKED;
1873
		mapping_clear_unevictable(file->f_mapping);
L
Linus Torvalds 已提交
1874 1875
	}
	retval = 0;
1876

L
Linus Torvalds 已提交
1877 1878 1879 1880 1881
out_nomem:
	spin_unlock(&info->lock);
	return retval;
}

1882
static int shmem_mmap(struct file *file, struct vm_area_struct *vma)
L
Linus Torvalds 已提交
1883 1884 1885 1886 1887 1888
{
	file_accessed(file);
	vma->vm_ops = &shmem_vm_ops;
	return 0;
}

1889
static struct inode *shmem_get_inode(struct super_block *sb, const struct inode *dir,
1890
				     umode_t mode, dev_t dev, unsigned long flags)
L
Linus Torvalds 已提交
1891 1892 1893 1894 1895
{
	struct inode *inode;
	struct shmem_inode_info *info;
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);

1896 1897
	if (shmem_reserve_inode(sb))
		return NULL;
L
Linus Torvalds 已提交
1898 1899 1900

	inode = new_inode(sb);
	if (inode) {
1901
		inode->i_ino = get_next_ino();
1902
		inode_init_owner(inode, dir, mode);
L
Linus Torvalds 已提交
1903 1904
		inode->i_blocks = 0;
		inode->i_atime = inode->i_mtime = inode->i_ctime = CURRENT_TIME;
1905
		inode->i_generation = get_seconds();
L
Linus Torvalds 已提交
1906 1907 1908
		info = SHMEM_I(inode);
		memset(info, 0, (char *)inode - (char *)info);
		spin_lock_init(&info->lock);
D
David Herrmann 已提交
1909
		info->seals = F_SEAL_SEAL;
1910
		info->flags = flags & VM_NORESERVE;
L
Linus Torvalds 已提交
1911
		INIT_LIST_HEAD(&info->swaplist);
1912
		simple_xattrs_init(&info->xattrs);
1913
		cache_no_acl(inode);
L
Linus Torvalds 已提交
1914 1915 1916

		switch (mode & S_IFMT) {
		default:
1917
			inode->i_op = &shmem_special_inode_operations;
L
Linus Torvalds 已提交
1918 1919 1920
			init_special_inode(inode, mode, dev);
			break;
		case S_IFREG:
1921
			inode->i_mapping->a_ops = &shmem_aops;
L
Linus Torvalds 已提交
1922 1923
			inode->i_op = &shmem_inode_operations;
			inode->i_fop = &shmem_file_operations;
1924 1925
			mpol_shared_policy_init(&info->policy,
						 shmem_get_sbmpol(sbinfo));
L
Linus Torvalds 已提交
1926 1927
			break;
		case S_IFDIR:
1928
			inc_nlink(inode);
L
Linus Torvalds 已提交
1929 1930 1931 1932 1933 1934 1935 1936 1937 1938
			/* 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.
			 */
1939
			mpol_shared_policy_init(&info->policy, NULL);
L
Linus Torvalds 已提交
1940 1941
			break;
		}
1942 1943
	} else
		shmem_free_inode(sb);
L
Linus Torvalds 已提交
1944 1945 1946
	return inode;
}

1947 1948
bool shmem_mapping(struct address_space *mapping)
{
1949 1950 1951
	if (!mapping->host)
		return false;

C
Christoph Hellwig 已提交
1952
	return mapping->host->i_sb->s_op == &shmem_ops;
1953 1954
}

L
Linus Torvalds 已提交
1955
#ifdef CONFIG_TMPFS
1956
static const struct inode_operations shmem_symlink_inode_operations;
1957
static const struct inode_operations shmem_short_symlink_operations;
L
Linus Torvalds 已提交
1958

1959 1960 1961 1962 1963 1964
#ifdef CONFIG_TMPFS_XATTR
static int shmem_initxattrs(struct inode *, const struct xattr *, void *);
#else
#define shmem_initxattrs NULL
#endif

L
Linus Torvalds 已提交
1965
static int
N
Nick Piggin 已提交
1966 1967 1968
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 已提交
1969
{
N
Nick Piggin 已提交
1970
	struct inode *inode = mapping->host;
D
David Herrmann 已提交
1971
	struct shmem_inode_info *info = SHMEM_I(inode);
1972
	pgoff_t index = pos >> PAGE_SHIFT;
D
David Herrmann 已提交
1973 1974 1975 1976 1977 1978 1979 1980 1981

	/* i_mutex is held by caller */
	if (unlikely(info->seals)) {
		if (info->seals & F_SEAL_WRITE)
			return -EPERM;
		if ((info->seals & F_SEAL_GROW) && pos + len > inode->i_size)
			return -EPERM;
	}

1982
	return shmem_getpage(inode, index, pagep, SGP_WRITE);
N
Nick Piggin 已提交
1983 1984 1985 1986 1987 1988 1989 1990 1991
}

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 已提交
1992 1993 1994
	if (pos + copied > inode->i_size)
		i_size_write(inode, pos + copied);

1995
	if (!PageUptodate(page)) {
1996 1997 1998 1999 2000 2001 2002 2003 2004 2005 2006
		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);
			}
		}
2007 2008
		if (copied < PAGE_SIZE) {
			unsigned from = pos & (PAGE_SIZE - 1);
2009
			zero_user_segments(page, 0, from,
2010
					from + copied, PAGE_SIZE);
2011
		}
2012
		SetPageUptodate(head);
2013
	}
N
Nick Piggin 已提交
2014
	set_page_dirty(page);
2015
	unlock_page(page);
2016
	put_page(page);
N
Nick Piggin 已提交
2017 2018

	return copied;
L
Linus Torvalds 已提交
2019 2020
}

A
Al Viro 已提交
2021
static ssize_t shmem_file_read_iter(struct kiocb *iocb, struct iov_iter *to)
L
Linus Torvalds 已提交
2022
{
2023 2024
	struct file *file = iocb->ki_filp;
	struct inode *inode = file_inode(file);
L
Linus Torvalds 已提交
2025
	struct address_space *mapping = inode->i_mapping;
2026 2027
	pgoff_t index;
	unsigned long offset;
2028
	enum sgp_type sgp = SGP_READ;
2029
	int error = 0;
A
Al Viro 已提交
2030
	ssize_t retval = 0;
2031
	loff_t *ppos = &iocb->ki_pos;
2032 2033 2034 2035 2036 2037

	/*
	 * 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 已提交
2038
	if (!iter_is_iovec(to))
H
Hugh Dickins 已提交
2039
		sgp = SGP_CACHE;
L
Linus Torvalds 已提交
2040

2041 2042
	index = *ppos >> PAGE_SHIFT;
	offset = *ppos & ~PAGE_MASK;
L
Linus Torvalds 已提交
2043 2044 2045

	for (;;) {
		struct page *page = NULL;
2046 2047
		pgoff_t end_index;
		unsigned long nr, ret;
L
Linus Torvalds 已提交
2048 2049
		loff_t i_size = i_size_read(inode);

2050
		end_index = i_size >> PAGE_SHIFT;
L
Linus Torvalds 已提交
2051 2052 2053
		if (index > end_index)
			break;
		if (index == end_index) {
2054
			nr = i_size & ~PAGE_MASK;
L
Linus Torvalds 已提交
2055 2056 2057 2058
			if (nr <= offset)
				break;
		}

2059
		error = shmem_getpage(inode, index, &page, sgp);
2060 2061 2062
		if (error) {
			if (error == -EINVAL)
				error = 0;
L
Linus Torvalds 已提交
2063 2064
			break;
		}
H
Hugh Dickins 已提交
2065 2066 2067
		if (page) {
			if (sgp == SGP_CACHE)
				set_page_dirty(page);
H
Hugh Dickins 已提交
2068
			unlock_page(page);
H
Hugh Dickins 已提交
2069
		}
L
Linus Torvalds 已提交
2070 2071 2072

		/*
		 * We must evaluate after, since reads (unlike writes)
2073
		 * are called without i_mutex protection against truncate
L
Linus Torvalds 已提交
2074
		 */
2075
		nr = PAGE_SIZE;
L
Linus Torvalds 已提交
2076
		i_size = i_size_read(inode);
2077
		end_index = i_size >> PAGE_SHIFT;
L
Linus Torvalds 已提交
2078
		if (index == end_index) {
2079
			nr = i_size & ~PAGE_MASK;
L
Linus Torvalds 已提交
2080 2081
			if (nr <= offset) {
				if (page)
2082
					put_page(page);
L
Linus Torvalds 已提交
2083 2084 2085 2086 2087 2088 2089 2090 2091 2092 2093 2094 2095 2096 2097 2098 2099 2100
				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 已提交
2101
		} else {
L
Linus Torvalds 已提交
2102
			page = ZERO_PAGE(0);
2103
			get_page(page);
N
Nick Piggin 已提交
2104
		}
L
Linus Torvalds 已提交
2105 2106 2107 2108 2109

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

2116
		put_page(page);
A
Al Viro 已提交
2117
		if (!iov_iter_count(to))
L
Linus Torvalds 已提交
2118
			break;
2119 2120 2121 2122
		if (ret < nr) {
			error = -EFAULT;
			break;
		}
L
Linus Torvalds 已提交
2123 2124 2125
		cond_resched();
	}

2126
	*ppos = ((loff_t) index << PAGE_SHIFT) + offset;
2127 2128
	file_accessed(file);
	return retval ? retval : error;
L
Linus Torvalds 已提交
2129 2130
}

2131 2132 2133 2134 2135
static ssize_t shmem_file_splice_read(struct file *in, loff_t *ppos,
				struct pipe_inode_info *pipe, size_t len,
				unsigned int flags)
{
	struct address_space *mapping = in->f_mapping;
2136
	struct inode *inode = mapping->host;
2137 2138 2139 2140 2141 2142 2143 2144 2145 2146
	unsigned int loff, nr_pages, req_pages;
	struct page *pages[PIPE_DEF_BUFFERS];
	struct partial_page partial[PIPE_DEF_BUFFERS];
	struct page *page;
	pgoff_t index, end_index;
	loff_t isize, left;
	int error, page_nr;
	struct splice_pipe_desc spd = {
		.pages = pages,
		.partial = partial,
2147
		.nr_pages_max = PIPE_DEF_BUFFERS,
2148 2149 2150 2151 2152
		.flags = flags,
		.ops = &page_cache_pipe_buf_ops,
		.spd_release = spd_release_page,
	};

2153
	isize = i_size_read(inode);
2154 2155 2156 2157 2158 2159 2160 2161 2162 2163
	if (unlikely(*ppos >= isize))
		return 0;

	left = isize - *ppos;
	if (unlikely(left < len))
		len = left;

	if (splice_grow_spd(pipe, &spd))
		return -ENOMEM;

2164 2165 2166
	index = *ppos >> PAGE_SHIFT;
	loff = *ppos & ~PAGE_MASK;
	req_pages = (len + loff + PAGE_SIZE - 1) >> PAGE_SHIFT;
2167
	nr_pages = min(req_pages, spd.nr_pages_max);
2168 2169 2170 2171 2172 2173

	spd.nr_pages = find_get_pages_contig(mapping, index,
						nr_pages, spd.pages);
	index += spd.nr_pages;
	error = 0;

2174
	while (spd.nr_pages < nr_pages) {
2175
		error = shmem_getpage(inode, index, &page, SGP_CACHE);
2176 2177 2178
		if (error)
			break;
		unlock_page(page);
2179 2180 2181 2182
		spd.pages[spd.nr_pages++] = page;
		index++;
	}

2183
	index = *ppos >> PAGE_SHIFT;
2184 2185
	nr_pages = spd.nr_pages;
	spd.nr_pages = 0;
2186

2187 2188 2189 2190 2191 2192
	for (page_nr = 0; page_nr < nr_pages; page_nr++) {
		unsigned int this_len;

		if (!len)
			break;

2193
		this_len = min_t(unsigned long, len, PAGE_SIZE - loff);
2194 2195
		page = spd.pages[page_nr];

2196
		if (!PageUptodate(page) || page->mapping != mapping) {
2197
			error = shmem_getpage(inode, index, &page, SGP_CACHE);
2198
			if (error)
2199
				break;
2200
			unlock_page(page);
2201
			put_page(spd.pages[page_nr]);
2202
			spd.pages[page_nr] = page;
2203
		}
2204 2205

		isize = i_size_read(inode);
2206
		end_index = (isize - 1) >> PAGE_SHIFT;
2207 2208 2209 2210 2211 2212
		if (unlikely(!isize || index > end_index))
			break;

		if (end_index == index) {
			unsigned int plen;

2213
			plen = ((isize - 1) & ~PAGE_MASK) + 1;
2214 2215 2216 2217 2218 2219 2220 2221 2222 2223 2224 2225 2226 2227 2228 2229
			if (plen <= loff)
				break;

			this_len = min(this_len, plen - loff);
			len = this_len;
		}

		spd.partial[page_nr].offset = loff;
		spd.partial[page_nr].len = this_len;
		len -= this_len;
		loff = 0;
		spd.nr_pages++;
		index++;
	}

	while (page_nr < nr_pages)
2230
		put_page(spd.pages[page_nr++]);
2231 2232 2233 2234

	if (spd.nr_pages)
		error = splice_to_pipe(pipe, &spd);

2235
	splice_shrink_spd(&spd);
2236 2237 2238 2239 2240 2241 2242 2243

	if (error > 0) {
		*ppos += error;
		file_accessed(in);
	}
	return error;
}

2244 2245 2246 2247
/*
 * llseek SEEK_DATA or SEEK_HOLE through the radix_tree.
 */
static pgoff_t shmem_seek_hole_data(struct address_space *mapping,
2248
				    pgoff_t index, pgoff_t end, int whence)
2249 2250 2251 2252 2253 2254 2255 2256 2257 2258
{
	struct page *page;
	struct pagevec pvec;
	pgoff_t indices[PAGEVEC_SIZE];
	bool done = false;
	int i;

	pagevec_init(&pvec, 0);
	pvec.nr = 1;		/* start small: we may be there already */
	while (!done) {
2259
		pvec.nr = find_get_entries(mapping, index,
2260 2261
					pvec.nr, pvec.pages, indices);
		if (!pvec.nr) {
2262
			if (whence == SEEK_DATA)
2263 2264 2265 2266 2267
				index = end;
			break;
		}
		for (i = 0; i < pvec.nr; i++, index++) {
			if (index < indices[i]) {
2268
				if (whence == SEEK_HOLE) {
2269 2270 2271 2272 2273 2274 2275 2276 2277 2278 2279
					done = true;
					break;
				}
				index = indices[i];
			}
			page = pvec.pages[i];
			if (page && !radix_tree_exceptional_entry(page)) {
				if (!PageUptodate(page))
					page = NULL;
			}
			if (index >= end ||
2280 2281
			    (page && whence == SEEK_DATA) ||
			    (!page && whence == SEEK_HOLE)) {
2282 2283 2284 2285
				done = true;
				break;
			}
		}
2286
		pagevec_remove_exceptionals(&pvec);
2287 2288 2289 2290 2291 2292 2293
		pagevec_release(&pvec);
		pvec.nr = PAGEVEC_SIZE;
		cond_resched();
	}
	return index;
}

2294
static loff_t shmem_file_llseek(struct file *file, loff_t offset, int whence)
2295 2296 2297 2298 2299 2300
{
	struct address_space *mapping = file->f_mapping;
	struct inode *inode = mapping->host;
	pgoff_t start, end;
	loff_t new_offset;

2301 2302
	if (whence != SEEK_DATA && whence != SEEK_HOLE)
		return generic_file_llseek_size(file, offset, whence,
2303
					MAX_LFS_FILESIZE, i_size_read(inode));
A
Al Viro 已提交
2304
	inode_lock(inode);
2305 2306 2307 2308 2309 2310 2311
	/* We're holding i_mutex so we can access i_size directly */

	if (offset < 0)
		offset = -EINVAL;
	else if (offset >= inode->i_size)
		offset = -ENXIO;
	else {
2312 2313
		start = offset >> PAGE_SHIFT;
		end = (inode->i_size + PAGE_SIZE - 1) >> PAGE_SHIFT;
2314
		new_offset = shmem_seek_hole_data(mapping, start, end, whence);
2315
		new_offset <<= PAGE_SHIFT;
2316 2317 2318
		if (new_offset > offset) {
			if (new_offset < inode->i_size)
				offset = new_offset;
2319
			else if (whence == SEEK_DATA)
2320 2321 2322 2323 2324 2325
				offset = -ENXIO;
			else
				offset = inode->i_size;
		}
	}

2326 2327
	if (offset >= 0)
		offset = vfs_setpos(file, offset, MAX_LFS_FILESIZE);
A
Al Viro 已提交
2328
	inode_unlock(inode);
2329 2330 2331
	return offset;
}

2332 2333 2334 2335 2336 2337 2338 2339 2340 2341 2342 2343 2344 2345 2346 2347 2348 2349 2350 2351 2352
/*
 * We need a tag: a new tag would expand every radix_tree_node by 8 bytes,
 * so reuse a tag which we firmly believe is never set or cleared on shmem.
 */
#define SHMEM_TAG_PINNED        PAGECACHE_TAG_TOWRITE
#define LAST_SCAN               4       /* about 150ms max */

static void shmem_tag_pins(struct address_space *mapping)
{
	struct radix_tree_iter iter;
	void **slot;
	pgoff_t start;
	struct page *page;

	lru_add_drain();
	start = 0;
	rcu_read_lock();

	radix_tree_for_each_slot(slot, &mapping->page_tree, &iter, start) {
		page = radix_tree_deref_slot(slot);
		if (!page || radix_tree_exception(page)) {
M
Matthew Wilcox 已提交
2353 2354 2355 2356
			if (radix_tree_deref_retry(page)) {
				slot = radix_tree_iter_retry(&iter);
				continue;
			}
2357 2358 2359 2360 2361 2362 2363 2364 2365
		} else if (page_count(page) - page_mapcount(page) > 1) {
			spin_lock_irq(&mapping->tree_lock);
			radix_tree_tag_set(&mapping->page_tree, iter.index,
					   SHMEM_TAG_PINNED);
			spin_unlock_irq(&mapping->tree_lock);
		}

		if (need_resched()) {
			cond_resched_rcu();
2366
			slot = radix_tree_iter_next(&iter);
2367 2368 2369 2370 2371 2372 2373 2374 2375 2376 2377 2378 2379 2380
		}
	}
	rcu_read_unlock();
}

/*
 * Setting SEAL_WRITE requires us to verify there's no pending writer. However,
 * via get_user_pages(), drivers might have some pending I/O without any active
 * user-space mappings (eg., direct-IO, AIO). Therefore, we look at all pages
 * and see whether it has an elevated ref-count. If so, we tag them and wait for
 * them to be dropped.
 * The caller must guarantee that no new user will acquire writable references
 * to those pages to avoid races.
 */
D
David Herrmann 已提交
2381 2382
static int shmem_wait_for_pins(struct address_space *mapping)
{
2383 2384 2385 2386 2387 2388 2389 2390 2391 2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407
	struct radix_tree_iter iter;
	void **slot;
	pgoff_t start;
	struct page *page;
	int error, scan;

	shmem_tag_pins(mapping);

	error = 0;
	for (scan = 0; scan <= LAST_SCAN; scan++) {
		if (!radix_tree_tagged(&mapping->page_tree, SHMEM_TAG_PINNED))
			break;

		if (!scan)
			lru_add_drain_all();
		else if (schedule_timeout_killable((HZ << scan) / 200))
			scan = LAST_SCAN;

		start = 0;
		rcu_read_lock();
		radix_tree_for_each_tagged(slot, &mapping->page_tree, &iter,
					   start, SHMEM_TAG_PINNED) {

			page = radix_tree_deref_slot(slot);
			if (radix_tree_exception(page)) {
M
Matthew Wilcox 已提交
2408 2409 2410 2411
				if (radix_tree_deref_retry(page)) {
					slot = radix_tree_iter_retry(&iter);
					continue;
				}
2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429 2430 2431 2432 2433 2434 2435

				page = NULL;
			}

			if (page &&
			    page_count(page) - page_mapcount(page) != 1) {
				if (scan < LAST_SCAN)
					goto continue_resched;

				/*
				 * On the last scan, we clean up all those tags
				 * we inserted; but make a note that we still
				 * found pages pinned.
				 */
				error = -EBUSY;
			}

			spin_lock_irq(&mapping->tree_lock);
			radix_tree_tag_clear(&mapping->page_tree,
					     iter.index, SHMEM_TAG_PINNED);
			spin_unlock_irq(&mapping->tree_lock);
continue_resched:
			if (need_resched()) {
				cond_resched_rcu();
2436
				slot = radix_tree_iter_next(&iter);
2437 2438 2439 2440 2441 2442
			}
		}
		rcu_read_unlock();
	}

	return error;
D
David Herrmann 已提交
2443 2444 2445 2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492
}

#define F_ALL_SEALS (F_SEAL_SEAL | \
		     F_SEAL_SHRINK | \
		     F_SEAL_GROW | \
		     F_SEAL_WRITE)

int shmem_add_seals(struct file *file, unsigned int seals)
{
	struct inode *inode = file_inode(file);
	struct shmem_inode_info *info = SHMEM_I(inode);
	int error;

	/*
	 * SEALING
	 * Sealing allows multiple parties to share a shmem-file but restrict
	 * access to a specific subset of file operations. Seals can only be
	 * added, but never removed. This way, mutually untrusted parties can
	 * share common memory regions with a well-defined policy. A malicious
	 * peer can thus never perform unwanted operations on a shared object.
	 *
	 * Seals are only supported on special shmem-files and always affect
	 * the whole underlying inode. Once a seal is set, it may prevent some
	 * kinds of access to the file. Currently, the following seals are
	 * defined:
	 *   SEAL_SEAL: Prevent further seals from being set on this file
	 *   SEAL_SHRINK: Prevent the file from shrinking
	 *   SEAL_GROW: Prevent the file from growing
	 *   SEAL_WRITE: Prevent write access to the file
	 *
	 * As we don't require any trust relationship between two parties, we
	 * must prevent seals from being removed. Therefore, sealing a file
	 * only adds a given set of seals to the file, it never touches
	 * existing seals. Furthermore, the "setting seals"-operation can be
	 * sealed itself, which basically prevents any further seal from being
	 * added.
	 *
	 * Semantics of sealing are only defined on volatile files. Only
	 * anonymous shmem files support sealing. More importantly, seals are
	 * never written to disk. Therefore, there's no plan to support it on
	 * other file types.
	 */

	if (file->f_op != &shmem_file_operations)
		return -EINVAL;
	if (!(file->f_mode & FMODE_WRITE))
		return -EPERM;
	if (seals & ~(unsigned int)F_ALL_SEALS)
		return -EINVAL;

A
Al Viro 已提交
2493
	inode_lock(inode);
D
David Herrmann 已提交
2494 2495 2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515

	if (info->seals & F_SEAL_SEAL) {
		error = -EPERM;
		goto unlock;
	}

	if ((seals & F_SEAL_WRITE) && !(info->seals & F_SEAL_WRITE)) {
		error = mapping_deny_writable(file->f_mapping);
		if (error)
			goto unlock;

		error = shmem_wait_for_pins(file->f_mapping);
		if (error) {
			mapping_allow_writable(file->f_mapping);
			goto unlock;
		}
	}

	info->seals |= seals;
	error = 0;

unlock:
A
Al Viro 已提交
2516
	inode_unlock(inode);
D
David Herrmann 已提交
2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552
	return error;
}
EXPORT_SYMBOL_GPL(shmem_add_seals);

int shmem_get_seals(struct file *file)
{
	if (file->f_op != &shmem_file_operations)
		return -EINVAL;

	return SHMEM_I(file_inode(file))->seals;
}
EXPORT_SYMBOL_GPL(shmem_get_seals);

long shmem_fcntl(struct file *file, unsigned int cmd, unsigned long arg)
{
	long error;

	switch (cmd) {
	case F_ADD_SEALS:
		/* disallow upper 32bit */
		if (arg > UINT_MAX)
			return -EINVAL;

		error = shmem_add_seals(file, arg);
		break;
	case F_GET_SEALS:
		error = shmem_get_seals(file);
		break;
	default:
		error = -EINVAL;
		break;
	}

	return error;
}

2553 2554 2555
static long shmem_fallocate(struct file *file, int mode, loff_t offset,
							 loff_t len)
{
A
Al Viro 已提交
2556
	struct inode *inode = file_inode(file);
2557
	struct shmem_sb_info *sbinfo = SHMEM_SB(inode->i_sb);
D
David Herrmann 已提交
2558
	struct shmem_inode_info *info = SHMEM_I(inode);
2559
	struct shmem_falloc shmem_falloc;
2560 2561
	pgoff_t start, index, end;
	int error;
2562

2563 2564 2565
	if (mode & ~(FALLOC_FL_KEEP_SIZE | FALLOC_FL_PUNCH_HOLE))
		return -EOPNOTSUPP;

A
Al Viro 已提交
2566
	inode_lock(inode);
2567 2568 2569 2570 2571

	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;
2572
		DECLARE_WAIT_QUEUE_HEAD_ONSTACK(shmem_falloc_waitq);
2573

D
David Herrmann 已提交
2574 2575 2576 2577 2578 2579
		/* protected by i_mutex */
		if (info->seals & F_SEAL_WRITE) {
			error = -EPERM;
			goto out;
		}

2580
		shmem_falloc.waitq = &shmem_falloc_waitq;
2581 2582 2583 2584 2585 2586
		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);

2587 2588 2589 2590 2591
		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 */
2592 2593 2594 2595 2596

		spin_lock(&inode->i_lock);
		inode->i_private = NULL;
		wake_up_all(&shmem_falloc_waitq);
		spin_unlock(&inode->i_lock);
2597
		error = 0;
2598
		goto out;
2599 2600 2601 2602 2603 2604 2605
	}

	/* 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 已提交
2606 2607 2608 2609 2610
	if ((info->seals & F_SEAL_GROW) && offset + len > inode->i_size) {
		error = -EPERM;
		goto out;
	}

2611 2612
	start = offset >> PAGE_SHIFT;
	end = (offset + len + PAGE_SIZE - 1) >> PAGE_SHIFT;
2613 2614 2615 2616
	/* Try to avoid a swapstorm if len is impossible to satisfy */
	if (sbinfo->max_blocks && end - start > sbinfo->max_blocks) {
		error = -ENOSPC;
		goto out;
2617 2618
	}

2619
	shmem_falloc.waitq = NULL;
2620 2621 2622 2623 2624 2625 2626 2627
	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);

2628 2629 2630 2631 2632 2633 2634 2635 2636
	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;
2637 2638
		else if (shmem_falloc.nr_unswapped > shmem_falloc.nr_falloced)
			error = -ENOMEM;
2639
		else
2640
			error = shmem_getpage(inode, index, &page, SGP_FALLOC);
2641
		if (error) {
2642
			/* Remove the !PageUptodate pages we added */
2643 2644 2645 2646 2647
			if (index > start) {
				shmem_undo_range(inode,
				    (loff_t)start << PAGE_SHIFT,
				    ((loff_t)index << PAGE_SHIFT) - 1, true);
			}
2648
			goto undone;
2649 2650
		}

2651 2652 2653 2654 2655 2656 2657 2658
		/*
		 * 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++;

2659
		/*
2660 2661 2662
		 * 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
2663 2664 2665 2666 2667
		 * 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);
2668
		put_page(page);
2669 2670 2671 2672 2673 2674
		cond_resched();
	}

	if (!(mode & FALLOC_FL_KEEP_SIZE) && offset + len > inode->i_size)
		i_size_write(inode, offset + len);
	inode->i_ctime = CURRENT_TIME;
2675 2676 2677 2678
undone:
	spin_lock(&inode->i_lock);
	inode->i_private = NULL;
	spin_unlock(&inode->i_lock);
2679
out:
A
Al Viro 已提交
2680
	inode_unlock(inode);
2681 2682 2683
	return error;
}

2684
static int shmem_statfs(struct dentry *dentry, struct kstatfs *buf)
L
Linus Torvalds 已提交
2685
{
2686
	struct shmem_sb_info *sbinfo = SHMEM_SB(dentry->d_sb);
L
Linus Torvalds 已提交
2687 2688

	buf->f_type = TMPFS_MAGIC;
2689
	buf->f_bsize = PAGE_SIZE;
L
Linus Torvalds 已提交
2690
	buf->f_namelen = NAME_MAX;
2691
	if (sbinfo->max_blocks) {
L
Linus Torvalds 已提交
2692
		buf->f_blocks = sbinfo->max_blocks;
2693 2694 2695
		buf->f_bavail =
		buf->f_bfree  = sbinfo->max_blocks -
				percpu_counter_sum(&sbinfo->used_blocks);
2696 2697
	}
	if (sbinfo->max_inodes) {
L
Linus Torvalds 已提交
2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708
		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 已提交
2709
shmem_mknod(struct inode *dir, struct dentry *dentry, umode_t mode, dev_t dev)
L
Linus Torvalds 已提交
2710
{
2711
	struct inode *inode;
L
Linus Torvalds 已提交
2712 2713
	int error = -ENOSPC;

2714
	inode = shmem_get_inode(dir->i_sb, dir, mode, dev, VM_NORESERVE);
L
Linus Torvalds 已提交
2715
	if (inode) {
C
Christoph Hellwig 已提交
2716 2717 2718
		error = simple_acl_create(dir, inode);
		if (error)
			goto out_iput;
2719
		error = security_inode_init_security(inode, dir,
2720
						     &dentry->d_name,
2721
						     shmem_initxattrs, NULL);
C
Christoph Hellwig 已提交
2722 2723
		if (error && error != -EOPNOTSUPP)
			goto out_iput;
2724

A
Al Viro 已提交
2725
		error = 0;
L
Linus Torvalds 已提交
2726 2727 2728 2729 2730 2731
		dir->i_size += BOGO_DIRENT_SIZE;
		dir->i_ctime = dir->i_mtime = CURRENT_TIME;
		d_instantiate(dentry, inode);
		dget(dentry); /* Extra count - pin the dentry in core */
	}
	return error;
C
Christoph Hellwig 已提交
2732 2733 2734
out_iput:
	iput(inode);
	return error;
L
Linus Torvalds 已提交
2735 2736
}

2737 2738 2739 2740 2741 2742 2743 2744 2745 2746 2747
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 已提交
2748 2749 2750 2751 2752
		if (error && error != -EOPNOTSUPP)
			goto out_iput;
		error = simple_acl_create(dir, inode);
		if (error)
			goto out_iput;
2753 2754 2755
		d_tmpfile(dentry, inode);
	}
	return error;
C
Christoph Hellwig 已提交
2756 2757 2758
out_iput:
	iput(inode);
	return error;
2759 2760
}

2761
static int shmem_mkdir(struct inode *dir, struct dentry *dentry, umode_t mode)
L
Linus Torvalds 已提交
2762 2763 2764 2765 2766
{
	int error;

	if ((error = shmem_mknod(dir, dentry, mode | S_IFDIR, 0)))
		return error;
2767
	inc_nlink(dir);
L
Linus Torvalds 已提交
2768 2769 2770
	return 0;
}

A
Al Viro 已提交
2771
static int shmem_create(struct inode *dir, struct dentry *dentry, umode_t mode,
A
Al Viro 已提交
2772
		bool excl)
L
Linus Torvalds 已提交
2773 2774 2775 2776 2777 2778 2779 2780 2781
{
	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)
{
2782
	struct inode *inode = d_inode(old_dentry);
2783
	int ret;
L
Linus Torvalds 已提交
2784 2785 2786 2787 2788 2789

	/*
	 * 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.
	 */
2790 2791 2792
	ret = shmem_reserve_inode(inode->i_sb);
	if (ret)
		goto out;
L
Linus Torvalds 已提交
2793 2794 2795

	dir->i_size += BOGO_DIRENT_SIZE;
	inode->i_ctime = dir->i_ctime = dir->i_mtime = CURRENT_TIME;
2796
	inc_nlink(inode);
A
Al Viro 已提交
2797
	ihold(inode);	/* New dentry reference */
L
Linus Torvalds 已提交
2798 2799
	dget(dentry);		/* Extra pinning count for the created dentry */
	d_instantiate(dentry, inode);
2800 2801
out:
	return ret;
L
Linus Torvalds 已提交
2802 2803 2804 2805
}

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

2808 2809
	if (inode->i_nlink > 1 && !S_ISDIR(inode->i_mode))
		shmem_free_inode(inode->i_sb);
L
Linus Torvalds 已提交
2810 2811 2812

	dir->i_size -= BOGO_DIRENT_SIZE;
	inode->i_ctime = dir->i_ctime = dir->i_mtime = CURRENT_TIME;
2813
	drop_nlink(inode);
L
Linus Torvalds 已提交
2814 2815 2816 2817 2818 2819 2820 2821 2822
	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;

2823
	drop_nlink(d_inode(dentry));
2824
	drop_nlink(dir);
L
Linus Torvalds 已提交
2825 2826 2827
	return shmem_unlink(dir, dentry);
}

M
Miklos Szeredi 已提交
2828 2829
static int shmem_exchange(struct inode *old_dir, struct dentry *old_dentry, struct inode *new_dir, struct dentry *new_dentry)
{
2830 2831
	bool old_is_dir = d_is_dir(old_dentry);
	bool new_is_dir = d_is_dir(new_dentry);
M
Miklos Szeredi 已提交
2832 2833 2834 2835 2836 2837 2838 2839 2840 2841 2842 2843

	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 =
2844 2845
	d_inode(old_dentry)->i_ctime =
	d_inode(new_dentry)->i_ctime = CURRENT_TIME;
M
Miklos Szeredi 已提交
2846 2847 2848 2849

	return 0;
}

M
Miklos Szeredi 已提交
2850 2851 2852 2853 2854 2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873 2874 2875
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 已提交
2876 2877 2878 2879 2880 2881
/*
 * 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 已提交
2882
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 已提交
2883
{
2884
	struct inode *inode = d_inode(old_dentry);
L
Linus Torvalds 已提交
2885 2886
	int they_are_dirs = S_ISDIR(inode->i_mode);

M
Miklos Szeredi 已提交
2887
	if (flags & ~(RENAME_NOREPLACE | RENAME_EXCHANGE | RENAME_WHITEOUT))
M
Miklos Szeredi 已提交
2888 2889
		return -EINVAL;

M
Miklos Szeredi 已提交
2890 2891 2892
	if (flags & RENAME_EXCHANGE)
		return shmem_exchange(old_dir, old_dentry, new_dir, new_dentry);

L
Linus Torvalds 已提交
2893 2894 2895
	if (!simple_empty(new_dentry))
		return -ENOTEMPTY;

M
Miklos Szeredi 已提交
2896 2897 2898 2899 2900 2901 2902 2903
	if (flags & RENAME_WHITEOUT) {
		int error;

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

2904
	if (d_really_is_positive(new_dentry)) {
L
Linus Torvalds 已提交
2905
		(void) shmem_unlink(new_dir, new_dentry);
2906
		if (they_are_dirs) {
2907
			drop_nlink(d_inode(new_dentry));
2908
			drop_nlink(old_dir);
2909
		}
L
Linus Torvalds 已提交
2910
	} else if (they_are_dirs) {
2911
		drop_nlink(old_dir);
2912
		inc_nlink(new_dir);
L
Linus Torvalds 已提交
2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926 2927
	}

	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 =
	inode->i_ctime = CURRENT_TIME;
	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 已提交
2928
	struct page *page;
L
Linus Torvalds 已提交
2929 2930 2931
	struct shmem_inode_info *info;

	len = strlen(symname) + 1;
2932
	if (len > PAGE_SIZE)
L
Linus Torvalds 已提交
2933 2934
		return -ENAMETOOLONG;

2935
	inode = shmem_get_inode(dir->i_sb, dir, S_IFLNK|S_IRWXUGO, 0, VM_NORESERVE);
L
Linus Torvalds 已提交
2936 2937 2938
	if (!inode)
		return -ENOSPC;

2939
	error = security_inode_init_security(inode, dir, &dentry->d_name,
2940
					     shmem_initxattrs, NULL);
2941 2942 2943 2944 2945 2946 2947 2948
	if (error) {
		if (error != -EOPNOTSUPP) {
			iput(inode);
			return error;
		}
		error = 0;
	}

L
Linus Torvalds 已提交
2949 2950
	info = SHMEM_I(inode);
	inode->i_size = len-1;
2951
	if (len <= SHORT_SYMLINK_LEN) {
2952 2953
		inode->i_link = kmemdup(symname, len, GFP_KERNEL);
		if (!inode->i_link) {
2954 2955 2956 2957
			iput(inode);
			return -ENOMEM;
		}
		inode->i_op = &shmem_short_symlink_operations;
L
Linus Torvalds 已提交
2958
	} else {
2959
		inode_nohighmem(inode);
2960
		error = shmem_getpage(inode, 0, &page, SGP_WRITE);
L
Linus Torvalds 已提交
2961 2962 2963 2964
		if (error) {
			iput(inode);
			return error;
		}
2965
		inode->i_mapping->a_ops = &shmem_aops;
L
Linus Torvalds 已提交
2966
		inode->i_op = &shmem_symlink_inode_operations;
2967
		memcpy(page_address(page), symname, len);
2968
		SetPageUptodate(page);
L
Linus Torvalds 已提交
2969
		set_page_dirty(page);
2970
		unlock_page(page);
2971
		put_page(page);
L
Linus Torvalds 已提交
2972 2973 2974 2975 2976 2977 2978 2979
	}
	dir->i_size += BOGO_DIRENT_SIZE;
	dir->i_ctime = dir->i_mtime = CURRENT_TIME;
	d_instantiate(dentry, inode);
	dget(dentry);
	return 0;
}

2980
static void shmem_put_link(void *arg)
L
Linus Torvalds 已提交
2981
{
2982 2983
	mark_page_accessed(arg);
	put_page(arg);
L
Linus Torvalds 已提交
2984 2985
}

2986
static const char *shmem_get_link(struct dentry *dentry,
2987 2988
				  struct inode *inode,
				  struct delayed_call *done)
L
Linus Torvalds 已提交
2989 2990
{
	struct page *page = NULL;
2991
	int error;
2992 2993 2994 2995 2996 2997 2998 2999 3000
	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 {
3001
		error = shmem_getpage(inode, 0, &page, SGP_READ);
3002 3003 3004 3005
		if (error)
			return ERR_PTR(error);
		unlock_page(page);
	}
3006
	set_delayed_call(done, shmem_put_link, page);
3007
	return page_address(page);
L
Linus Torvalds 已提交
3008 3009
}

3010
#ifdef CONFIG_TMPFS_XATTR
3011
/*
3012 3013
 * Superblocks without xattr inode operations may get some security.* xattr
 * support from the LSM "for free". As soon as we have any other xattrs
3014 3015 3016 3017
 * like ACLs, we also need to implement the security.* handlers at
 * filesystem level, though.
 */

3018 3019 3020 3021 3022 3023 3024 3025 3026
/*
 * 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;
3027
	struct simple_xattr *new_xattr;
3028 3029 3030
	size_t len;

	for (xattr = xattr_array; xattr->name != NULL; xattr++) {
3031
		new_xattr = simple_xattr_alloc(xattr->value, xattr->value_len);
3032 3033 3034 3035 3036 3037 3038 3039 3040 3041 3042 3043 3044 3045 3046 3047
		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);

3048
		simple_xattr_list_add(&info->xattrs, new_xattr);
3049 3050 3051 3052 3053
	}

	return 0;
}

3054
static int shmem_xattr_handler_get(const struct xattr_handler *handler,
3055 3056
				   struct dentry *unused, struct inode *inode,
				   const char *name, void *buffer, size_t size)
3057
{
3058
	struct shmem_inode_info *info = SHMEM_I(inode);
3059

3060
	name = xattr_full_name(handler, name);
3061
	return simple_xattr_get(&info->xattrs, name, buffer, size);
3062 3063
}

3064
static int shmem_xattr_handler_set(const struct xattr_handler *handler,
3065 3066 3067
				   struct dentry *unused, struct inode *inode,
				   const char *name, const void *value,
				   size_t size, int flags)
3068
{
3069
	struct shmem_inode_info *info = SHMEM_I(inode);
3070

3071
	name = xattr_full_name(handler, name);
3072
	return simple_xattr_set(&info->xattrs, name, value, size, flags);
3073 3074
}

3075 3076 3077 3078 3079
static const struct xattr_handler shmem_security_xattr_handler = {
	.prefix = XATTR_SECURITY_PREFIX,
	.get = shmem_xattr_handler_get,
	.set = shmem_xattr_handler_set,
};
3080

3081 3082 3083 3084 3085
static const struct xattr_handler shmem_trusted_xattr_handler = {
	.prefix = XATTR_TRUSTED_PREFIX,
	.get = shmem_xattr_handler_get,
	.set = shmem_xattr_handler_set,
};
3086

3087 3088 3089 3090 3091 3092 3093 3094 3095
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
};
3096 3097 3098

static ssize_t shmem_listxattr(struct dentry *dentry, char *buffer, size_t size)
{
3099
	struct shmem_inode_info *info = SHMEM_I(d_inode(dentry));
3100
	return simple_xattr_list(d_inode(dentry), &info->xattrs, buffer, size);
3101 3102 3103
}
#endif /* CONFIG_TMPFS_XATTR */

3104
static const struct inode_operations shmem_short_symlink_operations = {
3105
	.readlink	= generic_readlink,
3106
	.get_link	= simple_get_link,
3107
#ifdef CONFIG_TMPFS_XATTR
3108 3109
	.setxattr	= generic_setxattr,
	.getxattr	= generic_getxattr,
3110
	.listxattr	= shmem_listxattr,
3111
	.removexattr	= generic_removexattr,
3112 3113 3114 3115 3116
#endif
};

static const struct inode_operations shmem_symlink_inode_operations = {
	.readlink	= generic_readlink,
3117
	.get_link	= shmem_get_link,
3118
#ifdef CONFIG_TMPFS_XATTR
3119 3120
	.setxattr	= generic_setxattr,
	.getxattr	= generic_getxattr,
3121
	.listxattr	= shmem_listxattr,
3122
	.removexattr	= generic_removexattr,
3123
#endif
3124
};
3125

3126 3127 3128 3129 3130 3131 3132 3133 3134 3135 3136 3137 3138
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;
}

C
Christoph Hellwig 已提交
3139 3140
static struct dentry *shmem_fh_to_dentry(struct super_block *sb,
		struct fid *fid, int fh_len, int fh_type)
3141 3142
{
	struct inode *inode;
C
Christoph Hellwig 已提交
3143
	struct dentry *dentry = NULL;
3144
	u64 inum;
C
Christoph Hellwig 已提交
3145 3146 3147

	if (fh_len < 3)
		return NULL;
3148

3149 3150 3151
	inum = fid->raw[2];
	inum = (inum << 32) | fid->raw[1];

C
Christoph Hellwig 已提交
3152 3153
	inode = ilookup5(sb, (unsigned long)(inum + fid->raw[0]),
			shmem_match, fid->raw);
3154
	if (inode) {
C
Christoph Hellwig 已提交
3155
		dentry = d_find_alias(inode);
3156 3157 3158
		iput(inode);
	}

C
Christoph Hellwig 已提交
3159
	return dentry;
3160 3161
}

A
Al Viro 已提交
3162 3163
static int shmem_encode_fh(struct inode *inode, __u32 *fh, int *len,
				struct inode *parent)
3164
{
3165 3166
	if (*len < 3) {
		*len = 3;
3167
		return FILEID_INVALID;
3168
	}
3169

A
Al Viro 已提交
3170
	if (inode_unhashed(inode)) {
3171 3172 3173 3174 3175 3176 3177
		/* 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 已提交
3178
		if (inode_unhashed(inode))
3179 3180 3181 3182 3183 3184 3185 3186 3187 3188 3189 3190 3191
			__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;
}

3192
static const struct export_operations shmem_export_ops = {
3193 3194
	.get_parent     = shmem_get_parent,
	.encode_fh      = shmem_encode_fh,
C
Christoph Hellwig 已提交
3195
	.fh_to_dentry	= shmem_fh_to_dentry,
3196 3197
};

3198 3199
static int shmem_parse_options(char *options, struct shmem_sb_info *sbinfo,
			       bool remount)
L
Linus Torvalds 已提交
3200 3201
{
	char *this_char, *value, *rest;
G
Greg Thelen 已提交
3202
	struct mempolicy *mpol = NULL;
3203 3204
	uid_t uid;
	gid_t gid;
L
Linus Torvalds 已提交
3205

3206 3207 3208 3209 3210 3211 3212 3213 3214 3215 3216 3217 3218 3219 3220 3221 3222
	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 已提交
3223 3224 3225 3226 3227
		if (!*this_char)
			continue;
		if ((value = strchr(this_char,'=')) != NULL) {
			*value++ = 0;
		} else {
3228 3229
			pr_err("tmpfs: No value for mount option '%s'\n",
			       this_char);
G
Greg Thelen 已提交
3230
			goto error;
L
Linus Torvalds 已提交
3231 3232 3233 3234 3235 3236 3237 3238 3239 3240 3241 3242 3243
		}

		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;
3244
			sbinfo->max_blocks =
3245
				DIV_ROUND_UP(size, PAGE_SIZE);
L
Linus Torvalds 已提交
3246
		} else if (!strcmp(this_char,"nr_blocks")) {
3247
			sbinfo->max_blocks = memparse(value, &rest);
L
Linus Torvalds 已提交
3248 3249 3250
			if (*rest)
				goto bad_val;
		} else if (!strcmp(this_char,"nr_inodes")) {
3251
			sbinfo->max_inodes = memparse(value, &rest);
L
Linus Torvalds 已提交
3252 3253 3254
			if (*rest)
				goto bad_val;
		} else if (!strcmp(this_char,"mode")) {
3255
			if (remount)
L
Linus Torvalds 已提交
3256
				continue;
3257
			sbinfo->mode = simple_strtoul(value, &rest, 8) & 07777;
L
Linus Torvalds 已提交
3258 3259 3260
			if (*rest)
				goto bad_val;
		} else if (!strcmp(this_char,"uid")) {
3261
			if (remount)
L
Linus Torvalds 已提交
3262
				continue;
3263
			uid = simple_strtoul(value, &rest, 0);
L
Linus Torvalds 已提交
3264 3265
			if (*rest)
				goto bad_val;
3266 3267 3268
			sbinfo->uid = make_kuid(current_user_ns(), uid);
			if (!uid_valid(sbinfo->uid))
				goto bad_val;
L
Linus Torvalds 已提交
3269
		} else if (!strcmp(this_char,"gid")) {
3270
			if (remount)
L
Linus Torvalds 已提交
3271
				continue;
3272
			gid = simple_strtoul(value, &rest, 0);
L
Linus Torvalds 已提交
3273 3274
			if (*rest)
				goto bad_val;
3275 3276 3277
			sbinfo->gid = make_kgid(current_user_ns(), gid);
			if (!gid_valid(sbinfo->gid))
				goto bad_val;
3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289
#ifdef CONFIG_TRANSPARENT_HUGEPAGE
		} 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
3290
		} else if (!strcmp(this_char,"mpol")) {
G
Greg Thelen 已提交
3291 3292 3293
			mpol_put(mpol);
			mpol = NULL;
			if (mpol_parse_str(value, &mpol))
3294
				goto bad_val;
3295
#endif
L
Linus Torvalds 已提交
3296
		} else {
3297
			pr_err("tmpfs: Bad mount option %s\n", this_char);
G
Greg Thelen 已提交
3298
			goto error;
L
Linus Torvalds 已提交
3299 3300
		}
	}
G
Greg Thelen 已提交
3301
	sbinfo->mpol = mpol;
L
Linus Torvalds 已提交
3302 3303 3304
	return 0;

bad_val:
3305
	pr_err("tmpfs: Bad value '%s' for mount option '%s'\n",
L
Linus Torvalds 已提交
3306
	       value, this_char);
G
Greg Thelen 已提交
3307 3308
error:
	mpol_put(mpol);
L
Linus Torvalds 已提交
3309 3310 3311 3312 3313 3314 3315
	return 1;

}

static int shmem_remount_fs(struct super_block *sb, int *flags, char *data)
{
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);
3316
	struct shmem_sb_info config = *sbinfo;
3317 3318 3319
	unsigned long inodes;
	int error = -EINVAL;

3320
	config.mpol = NULL;
3321
	if (shmem_parse_options(data, &config, true))
3322
		return error;
L
Linus Torvalds 已提交
3323

3324 3325
	spin_lock(&sbinfo->stat_lock);
	inodes = sbinfo->max_inodes - sbinfo->free_inodes;
3326
	if (percpu_counter_compare(&sbinfo->used_blocks, config.max_blocks) > 0)
3327
		goto out;
3328
	if (config.max_inodes < inodes)
3329 3330
		goto out;
	/*
3331
	 * Those tests disallow limited->unlimited while any are in use;
3332 3333 3334
	 * but we must separately disallow unlimited->limited, because
	 * in that case we have no record of how much is already in use.
	 */
3335
	if (config.max_blocks && !sbinfo->max_blocks)
3336
		goto out;
3337
	if (config.max_inodes && !sbinfo->max_inodes)
3338 3339 3340
		goto out;

	error = 0;
3341
	sbinfo->huge = config.huge;
3342 3343 3344
	sbinfo->max_blocks  = config.max_blocks;
	sbinfo->max_inodes  = config.max_inodes;
	sbinfo->free_inodes = config.max_inodes - inodes;
3345

3346 3347 3348 3349 3350 3351 3352
	/*
	 * Preserve previous mempolicy unless mpol remount option was specified.
	 */
	if (config.mpol) {
		mpol_put(sbinfo->mpol);
		sbinfo->mpol = config.mpol;	/* transfers initial ref */
	}
3353 3354 3355
out:
	spin_unlock(&sbinfo->stat_lock);
	return error;
L
Linus Torvalds 已提交
3356
}
3357

3358
static int shmem_show_options(struct seq_file *seq, struct dentry *root)
3359
{
3360
	struct shmem_sb_info *sbinfo = SHMEM_SB(root->d_sb);
3361 3362 3363

	if (sbinfo->max_blocks != shmem_default_max_blocks())
		seq_printf(seq, ",size=%luk",
3364
			sbinfo->max_blocks << (PAGE_SHIFT - 10));
3365 3366 3367
	if (sbinfo->max_inodes != shmem_default_max_inodes())
		seq_printf(seq, ",nr_inodes=%lu", sbinfo->max_inodes);
	if (sbinfo->mode != (S_IRWXUGO | S_ISVTX))
3368
		seq_printf(seq, ",mode=%03ho", sbinfo->mode);
3369 3370 3371 3372 3373 3374
	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));
3375 3376 3377 3378 3379
#ifdef CONFIG_TRANSPARENT_HUGEPAGE
	/* 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
3380
	shmem_show_mpol(seq, sbinfo->mpol);
3381 3382
	return 0;
}
D
David Herrmann 已提交
3383 3384 3385 3386 3387 3388 3389 3390 3391 3392 3393 3394 3395 3396 3397 3398 3399 3400 3401 3402 3403 3404 3405 3406 3407 3408 3409 3410 3411 3412 3413 3414 3415 3416 3417 3418 3419 3420 3421 3422 3423 3424 3425 3426 3427 3428 3429 3430 3431 3432 3433 3434 3435 3436 3437 3438 3439 3440 3441 3442 3443 3444 3445 3446 3447 3448 3449 3450 3451 3452 3453

#define MFD_NAME_PREFIX "memfd:"
#define MFD_NAME_PREFIX_LEN (sizeof(MFD_NAME_PREFIX) - 1)
#define MFD_NAME_MAX_LEN (NAME_MAX - MFD_NAME_PREFIX_LEN)

#define MFD_ALL_FLAGS (MFD_CLOEXEC | MFD_ALLOW_SEALING)

SYSCALL_DEFINE2(memfd_create,
		const char __user *, uname,
		unsigned int, flags)
{
	struct shmem_inode_info *info;
	struct file *file;
	int fd, error;
	char *name;
	long len;

	if (flags & ~(unsigned int)MFD_ALL_FLAGS)
		return -EINVAL;

	/* length includes terminating zero */
	len = strnlen_user(uname, MFD_NAME_MAX_LEN + 1);
	if (len <= 0)
		return -EFAULT;
	if (len > MFD_NAME_MAX_LEN + 1)
		return -EINVAL;

	name = kmalloc(len + MFD_NAME_PREFIX_LEN, GFP_TEMPORARY);
	if (!name)
		return -ENOMEM;

	strcpy(name, MFD_NAME_PREFIX);
	if (copy_from_user(&name[MFD_NAME_PREFIX_LEN], uname, len)) {
		error = -EFAULT;
		goto err_name;
	}

	/* terminating-zero may have changed after strnlen_user() returned */
	if (name[len + MFD_NAME_PREFIX_LEN - 1]) {
		error = -EFAULT;
		goto err_name;
	}

	fd = get_unused_fd_flags((flags & MFD_CLOEXEC) ? O_CLOEXEC : 0);
	if (fd < 0) {
		error = fd;
		goto err_name;
	}

	file = shmem_file_setup(name, 0, VM_NORESERVE);
	if (IS_ERR(file)) {
		error = PTR_ERR(file);
		goto err_fd;
	}
	info = SHMEM_I(file_inode(file));
	file->f_mode |= FMODE_LSEEK | FMODE_PREAD | FMODE_PWRITE;
	file->f_flags |= O_RDWR | O_LARGEFILE;
	if (flags & MFD_ALLOW_SEALING)
		info->seals &= ~F_SEAL_SEAL;

	fd_install(fd, file);
	kfree(name);
	return fd;

err_fd:
	put_unused_fd(fd);
err_name:
	kfree(name);
	return error;
}

3454
#endif /* CONFIG_TMPFS */
L
Linus Torvalds 已提交
3455 3456 3457

static void shmem_put_super(struct super_block *sb)
{
3458 3459 3460
	struct shmem_sb_info *sbinfo = SHMEM_SB(sb);

	percpu_counter_destroy(&sbinfo->used_blocks);
G
Greg Thelen 已提交
3461
	mpol_put(sbinfo->mpol);
3462
	kfree(sbinfo);
L
Linus Torvalds 已提交
3463 3464 3465
	sb->s_fs_info = NULL;
}

3466
int shmem_fill_super(struct super_block *sb, void *data, int silent)
L
Linus Torvalds 已提交
3467 3468
{
	struct inode *inode;
3469
	struct shmem_sb_info *sbinfo;
3470 3471 3472
	int err = -ENOMEM;

	/* Round up to L1_CACHE_BYTES to resist false sharing */
3473
	sbinfo = kzalloc(max((int)sizeof(struct shmem_sb_info),
3474 3475 3476 3477 3478
				L1_CACHE_BYTES), GFP_KERNEL);
	if (!sbinfo)
		return -ENOMEM;

	sbinfo->mode = S_IRWXUGO | S_ISVTX;
3479 3480
	sbinfo->uid = current_fsuid();
	sbinfo->gid = current_fsgid();
3481
	sb->s_fs_info = sbinfo;
L
Linus Torvalds 已提交
3482

3483
#ifdef CONFIG_TMPFS
L
Linus Torvalds 已提交
3484 3485 3486 3487 3488
	/*
	 * 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.
	 */
3489
	if (!(sb->s_flags & MS_KERNMOUNT)) {
3490 3491 3492 3493 3494 3495
		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;
		}
3496 3497
	} else {
		sb->s_flags |= MS_NOUSER;
L
Linus Torvalds 已提交
3498
	}
3499
	sb->s_export_op = &shmem_export_ops;
H
Hugh Dickins 已提交
3500
	sb->s_flags |= MS_NOSEC;
L
Linus Torvalds 已提交
3501 3502 3503 3504
#else
	sb->s_flags |= MS_NOUSER;
#endif

3505
	spin_lock_init(&sbinfo->stat_lock);
3506
	if (percpu_counter_init(&sbinfo->used_blocks, 0, GFP_KERNEL))
3507
		goto failed;
3508
	sbinfo->free_inodes = sbinfo->max_inodes;
3509

3510
	sb->s_maxbytes = MAX_LFS_FILESIZE;
3511 3512
	sb->s_blocksize = PAGE_SIZE;
	sb->s_blocksize_bits = PAGE_SHIFT;
L
Linus Torvalds 已提交
3513 3514
	sb->s_magic = TMPFS_MAGIC;
	sb->s_op = &shmem_ops;
3515
	sb->s_time_gran = 1;
3516
#ifdef CONFIG_TMPFS_XATTR
3517
	sb->s_xattr = shmem_xattr_handlers;
3518 3519
#endif
#ifdef CONFIG_TMPFS_POSIX_ACL
3520 3521
	sb->s_flags |= MS_POSIXACL;
#endif
3522

3523
	inode = shmem_get_inode(sb, NULL, S_IFDIR | sbinfo->mode, 0, VM_NORESERVE);
L
Linus Torvalds 已提交
3524 3525
	if (!inode)
		goto failed;
3526 3527
	inode->i_uid = sbinfo->uid;
	inode->i_gid = sbinfo->gid;
A
Al Viro 已提交
3528 3529
	sb->s_root = d_make_root(inode);
	if (!sb->s_root)
3530
		goto failed;
L
Linus Torvalds 已提交
3531 3532 3533 3534 3535 3536 3537
	return 0;

failed:
	shmem_put_super(sb);
	return err;
}

3538
static struct kmem_cache *shmem_inode_cachep;
L
Linus Torvalds 已提交
3539 3540 3541

static struct inode *shmem_alloc_inode(struct super_block *sb)
{
3542 3543 3544
	struct shmem_inode_info *info;
	info = kmem_cache_alloc(shmem_inode_cachep, GFP_KERNEL);
	if (!info)
L
Linus Torvalds 已提交
3545
		return NULL;
3546
	return &info->vfs_inode;
L
Linus Torvalds 已提交
3547 3548
}

3549
static void shmem_destroy_callback(struct rcu_head *head)
N
Nick Piggin 已提交
3550 3551
{
	struct inode *inode = container_of(head, struct inode, i_rcu);
A
Al Viro 已提交
3552 3553
	if (S_ISLNK(inode->i_mode))
		kfree(inode->i_link);
N
Nick Piggin 已提交
3554 3555 3556
	kmem_cache_free(shmem_inode_cachep, SHMEM_I(inode));
}

L
Linus Torvalds 已提交
3557 3558
static void shmem_destroy_inode(struct inode *inode)
{
3559
	if (S_ISREG(inode->i_mode))
L
Linus Torvalds 已提交
3560
		mpol_free_shared_policy(&SHMEM_I(inode)->policy);
3561
	call_rcu(&inode->i_rcu, shmem_destroy_callback);
L
Linus Torvalds 已提交
3562 3563
}

3564
static void shmem_init_inode(void *foo)
L
Linus Torvalds 已提交
3565
{
3566 3567
	struct shmem_inode_info *info = foo;
	inode_init_once(&info->vfs_inode);
L
Linus Torvalds 已提交
3568 3569
}

3570
static int shmem_init_inodecache(void)
L
Linus Torvalds 已提交
3571 3572 3573
{
	shmem_inode_cachep = kmem_cache_create("shmem_inode_cache",
				sizeof(struct shmem_inode_info),
3574
				0, SLAB_PANIC|SLAB_ACCOUNT, shmem_init_inode);
L
Linus Torvalds 已提交
3575 3576 3577
	return 0;
}

3578
static void shmem_destroy_inodecache(void)
L
Linus Torvalds 已提交
3579
{
3580
	kmem_cache_destroy(shmem_inode_cachep);
L
Linus Torvalds 已提交
3581 3582
}

3583
static const struct address_space_operations shmem_aops = {
L
Linus Torvalds 已提交
3584
	.writepage	= shmem_writepage,
3585
	.set_page_dirty	= __set_page_dirty_no_writeback,
L
Linus Torvalds 已提交
3586
#ifdef CONFIG_TMPFS
N
Nick Piggin 已提交
3587 3588
	.write_begin	= shmem_write_begin,
	.write_end	= shmem_write_end,
L
Linus Torvalds 已提交
3589
#endif
3590
#ifdef CONFIG_MIGRATION
3591
	.migratepage	= migrate_page,
3592
#endif
3593
	.error_remove_page = generic_error_remove_page,
L
Linus Torvalds 已提交
3594 3595
};

3596
static const struct file_operations shmem_file_operations = {
L
Linus Torvalds 已提交
3597
	.mmap		= shmem_mmap,
3598
	.get_unmapped_area = shmem_get_unmapped_area,
L
Linus Torvalds 已提交
3599
#ifdef CONFIG_TMPFS
3600
	.llseek		= shmem_file_llseek,
A
Al Viro 已提交
3601
	.read_iter	= shmem_file_read_iter,
3602
	.write_iter	= generic_file_write_iter,
3603
	.fsync		= noop_fsync,
3604
	.splice_read	= shmem_file_splice_read,
3605
	.splice_write	= iter_file_splice_write,
3606
	.fallocate	= shmem_fallocate,
L
Linus Torvalds 已提交
3607 3608 3609
#endif
};

3610
static const struct inode_operations shmem_inode_operations = {
3611
	.getattr	= shmem_getattr,
3612
	.setattr	= shmem_setattr,
3613
#ifdef CONFIG_TMPFS_XATTR
3614 3615
	.setxattr	= generic_setxattr,
	.getxattr	= generic_getxattr,
3616
	.listxattr	= shmem_listxattr,
3617
	.removexattr	= generic_removexattr,
C
Christoph Hellwig 已提交
3618
	.set_acl	= simple_set_acl,
3619
#endif
L
Linus Torvalds 已提交
3620 3621
};

3622
static const struct inode_operations shmem_dir_inode_operations = {
L
Linus Torvalds 已提交
3623 3624 3625 3626 3627 3628 3629 3630 3631
#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,
M
Miklos Szeredi 已提交
3632
	.rename2	= shmem_rename2,
3633
	.tmpfile	= shmem_tmpfile,
L
Linus Torvalds 已提交
3634
#endif
3635
#ifdef CONFIG_TMPFS_XATTR
3636 3637
	.setxattr	= generic_setxattr,
	.getxattr	= generic_getxattr,
3638
	.listxattr	= shmem_listxattr,
3639
	.removexattr	= generic_removexattr,
3640
#endif
3641
#ifdef CONFIG_TMPFS_POSIX_ACL
3642
	.setattr	= shmem_setattr,
C
Christoph Hellwig 已提交
3643
	.set_acl	= simple_set_acl,
3644 3645 3646
#endif
};

3647
static const struct inode_operations shmem_special_inode_operations = {
3648
#ifdef CONFIG_TMPFS_XATTR
3649 3650
	.setxattr	= generic_setxattr,
	.getxattr	= generic_getxattr,
3651
	.listxattr	= shmem_listxattr,
3652
	.removexattr	= generic_removexattr,
3653
#endif
3654
#ifdef CONFIG_TMPFS_POSIX_ACL
3655
	.setattr	= shmem_setattr,
C
Christoph Hellwig 已提交
3656
	.set_acl	= simple_set_acl,
3657
#endif
L
Linus Torvalds 已提交
3658 3659
};

3660
static const struct super_operations shmem_ops = {
L
Linus Torvalds 已提交
3661 3662 3663 3664 3665
	.alloc_inode	= shmem_alloc_inode,
	.destroy_inode	= shmem_destroy_inode,
#ifdef CONFIG_TMPFS
	.statfs		= shmem_statfs,
	.remount_fs	= shmem_remount_fs,
3666
	.show_options	= shmem_show_options,
L
Linus Torvalds 已提交
3667
#endif
A
Al Viro 已提交
3668
	.evict_inode	= shmem_evict_inode,
L
Linus Torvalds 已提交
3669 3670 3671 3672
	.drop_inode	= generic_delete_inode,
	.put_super	= shmem_put_super,
};

3673
static const struct vm_operations_struct shmem_vm_ops = {
3674
	.fault		= shmem_fault,
3675
	.map_pages	= filemap_map_pages,
L
Linus Torvalds 已提交
3676 3677 3678 3679 3680 3681
#ifdef CONFIG_NUMA
	.set_policy     = shmem_set_policy,
	.get_policy     = shmem_get_policy,
#endif
};

A
Al Viro 已提交
3682 3683
static struct dentry *shmem_mount(struct file_system_type *fs_type,
	int flags, const char *dev_name, void *data)
L
Linus Torvalds 已提交
3684
{
A
Al Viro 已提交
3685
	return mount_nodev(fs_type, flags, data, shmem_fill_super);
L
Linus Torvalds 已提交
3686 3687
}

3688
static struct file_system_type shmem_fs_type = {
L
Linus Torvalds 已提交
3689 3690
	.owner		= THIS_MODULE,
	.name		= "tmpfs",
A
Al Viro 已提交
3691
	.mount		= shmem_mount,
L
Linus Torvalds 已提交
3692
	.kill_sb	= kill_litter_super,
3693
	.fs_flags	= FS_USERNS_MOUNT,
L
Linus Torvalds 已提交
3694 3695
};

3696
int __init shmem_init(void)
L
Linus Torvalds 已提交
3697 3698 3699
{
	int error;

3700 3701 3702 3703
	/* If rootfs called this, don't re-init */
	if (shmem_inode_cachep)
		return 0;

3704
	error = shmem_init_inodecache();
L
Linus Torvalds 已提交
3705 3706 3707
	if (error)
		goto out3;

3708
	error = register_filesystem(&shmem_fs_type);
L
Linus Torvalds 已提交
3709
	if (error) {
3710
		pr_err("Could not register tmpfs\n");
L
Linus Torvalds 已提交
3711 3712
		goto out2;
	}
3713

3714
	shm_mnt = kern_mount(&shmem_fs_type);
L
Linus Torvalds 已提交
3715 3716
	if (IS_ERR(shm_mnt)) {
		error = PTR_ERR(shm_mnt);
3717
		pr_err("Could not kern_mount tmpfs\n");
L
Linus Torvalds 已提交
3718 3719
		goto out1;
	}
3720 3721 3722 3723 3724 3725 3726

#ifdef CONFIG_TRANSPARENT_HUGEPAGE
	if (has_transparent_hugepage() && shmem_huge < SHMEM_HUGE_DENY)
		SHMEM_SB(shm_mnt->mnt_sb)->huge = shmem_huge;
	else
		shmem_huge = 0; /* just in case it was patched */
#endif
L
Linus Torvalds 已提交
3727 3728 3729
	return 0;

out1:
3730
	unregister_filesystem(&shmem_fs_type);
L
Linus Torvalds 已提交
3731
out2:
3732
	shmem_destroy_inodecache();
L
Linus Torvalds 已提交
3733 3734 3735 3736
out3:
	shm_mnt = ERR_PTR(error);
	return error;
}
3737

3738 3739 3740 3741 3742 3743 3744 3745 3746 3747 3748 3749 3750 3751 3752 3753 3754 3755 3756 3757 3758 3759 3760 3761 3762 3763 3764 3765 3766 3767 3768 3769 3770 3771 3772 3773 3774 3775 3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791
#if defined(CONFIG_TRANSPARENT_HUGEPAGE) && defined(CONFIG_SYSFS)
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;
	if (shmem_huge < SHMEM_HUGE_DENY)
		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);
#endif /* CONFIG_TRANSPARENT_HUGEPAGE && CONFIG_SYSFS */

3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802
#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.
 */

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

3810
int __init shmem_init(void)
3811
{
3812
	BUG_ON(register_filesystem(&shmem_fs_type) != 0);
3813

3814
	shm_mnt = kern_mount(&shmem_fs_type);
3815 3816 3817 3818 3819
	BUG_ON(IS_ERR(shm_mnt));

	return 0;
}

3820
int shmem_unuse(swp_entry_t swap, struct page *page)
3821 3822 3823 3824
{
	return 0;
}

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

3830 3831 3832 3833
void shmem_unlock_mapping(struct address_space *mapping)
{
}

3834 3835 3836 3837 3838 3839 3840 3841 3842
#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

3843
void shmem_truncate_range(struct inode *inode, loff_t lstart, loff_t lend)
3844
{
3845
	truncate_inode_pages_range(inode->i_mapping, lstart, lend);
3846 3847 3848
}
EXPORT_SYMBOL_GPL(shmem_truncate_range);

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

#endif /* CONFIG_SHMEM */

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

3859
static struct dentry_operations anon_ops = {
3860
	.d_dname = simple_dname
3861 3862
};

3863 3864
static struct file *__shmem_file_setup(const char *name, loff_t size,
				       unsigned long flags, unsigned int i_flags)
L
Linus Torvalds 已提交
3865
{
A
Al Viro 已提交
3866
	struct file *res;
L
Linus Torvalds 已提交
3867
	struct inode *inode;
3868
	struct path path;
3869
	struct super_block *sb;
L
Linus Torvalds 已提交
3870 3871 3872
	struct qstr this;

	if (IS_ERR(shm_mnt))
A
Al Viro 已提交
3873
		return ERR_CAST(shm_mnt);
L
Linus Torvalds 已提交
3874

3875
	if (size < 0 || size > MAX_LFS_FILESIZE)
L
Linus Torvalds 已提交
3876 3877 3878 3879 3880
		return ERR_PTR(-EINVAL);

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

A
Al Viro 已提交
3881
	res = ERR_PTR(-ENOMEM);
L
Linus Torvalds 已提交
3882 3883 3884
	this.name = name;
	this.len = strlen(name);
	this.hash = 0; /* will go */
3885
	sb = shm_mnt->mnt_sb;
3886
	path.mnt = mntget(shm_mnt);
3887
	path.dentry = d_alloc_pseudo(sb, &this);
3888
	if (!path.dentry)
L
Linus Torvalds 已提交
3889
		goto put_memory;
3890
	d_set_d_op(path.dentry, &anon_ops);
L
Linus Torvalds 已提交
3891

A
Al Viro 已提交
3892
	res = ERR_PTR(-ENOSPC);
3893
	inode = shmem_get_inode(sb, NULL, S_IFREG | S_IRWXUGO, 0, flags);
L
Linus Torvalds 已提交
3894
	if (!inode)
3895
		goto put_memory;
L
Linus Torvalds 已提交
3896

3897
	inode->i_flags |= i_flags;
3898
	d_instantiate(path.dentry, inode);
L
Linus Torvalds 已提交
3899
	inode->i_size = size;
3900
	clear_nlink(inode);	/* It is unlinked */
A
Al Viro 已提交
3901 3902
	res = ERR_PTR(ramfs_nommu_expand_for_mapping(inode, size));
	if (IS_ERR(res))
3903
		goto put_path;
3904

A
Al Viro 已提交
3905
	res = alloc_file(&path, FMODE_WRITE | FMODE_READ,
3906
		  &shmem_file_operations);
A
Al Viro 已提交
3907
	if (IS_ERR(res))
3908
		goto put_path;
3909

A
Al Viro 已提交
3910
	return res;
L
Linus Torvalds 已提交
3911 3912 3913

put_memory:
	shmem_unacct_size(flags, size);
3914 3915
put_path:
	path_put(&path);
A
Al Viro 已提交
3916
	return res;
L
Linus Torvalds 已提交
3917
}
3918 3919 3920 3921 3922

/**
 * 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
3923 3924
 *	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.
3925 3926 3927 3928 3929 3930 3931 3932 3933 3934 3935 3936 3937 3938 3939 3940 3941 3942 3943
 * @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)
{
	return __shmem_file_setup(name, size, flags, S_PRIVATE);
}

/**
 * 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)
{
	return __shmem_file_setup(name, size, flags, 0);
}
3944
EXPORT_SYMBOL_GPL(shmem_file_setup);
L
Linus Torvalds 已提交
3945

3946
/**
L
Linus Torvalds 已提交
3947 3948 3949 3950 3951 3952 3953 3954
 * 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;

3955 3956 3957 3958 3959 3960 3961
	/*
	 * 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().
	 */
	file = __shmem_file_setup("dev/zero", size, vma->vm_flags, S_PRIVATE);
L
Linus Torvalds 已提交
3962 3963 3964 3965 3966 3967 3968 3969 3970
	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;
	return 0;
}
3971 3972 3973 3974 3975 3976 3977 3978 3979 3980 3981 3982 3983

/**
 * 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.
 *
3984 3985
 * i915_gem_object_get_pages_gtt() mixes __GFP_NORETRY | __GFP_NOWARN in
 * with the mapping_gfp_mask(), to avoid OOMing the machine unnecessarily.
3986 3987 3988 3989
 */
struct page *shmem_read_mapping_page_gfp(struct address_space *mapping,
					 pgoff_t index, gfp_t gfp)
{
3990 3991
#ifdef CONFIG_SHMEM
	struct inode *inode = mapping->host;
H
Hugh Dickins 已提交
3992
	struct page *page;
3993 3994 3995
	int error;

	BUG_ON(mapping->a_ops != &shmem_aops);
3996 3997
	error = shmem_getpage_gfp(inode, index, &page, SGP_CACHE,
				  gfp, NULL, NULL);
3998 3999 4000 4001 4002 4003 4004 4005 4006
	if (error)
		page = ERR_PTR(error);
	else
		unlock_page(page);
	return page;
#else
	/*
	 * The tiny !SHMEM case uses ramfs without swap
	 */
4007
	return read_cache_page_gfp(mapping, index, gfp);
4008
#endif
4009 4010
}
EXPORT_SYMBOL_GPL(shmem_read_mapping_page_gfp);