exec.c 42.5 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26
/*
 *  linux/fs/exec.c
 *
 *  Copyright (C) 1991, 1992  Linus Torvalds
 */

/*
 * #!-checking implemented by tytso.
 */
/*
 * Demand-loading implemented 01.12.91 - no need to read anything but
 * the header into memory. The inode of the executable is put into
 * "current->executable", and page faults do the actual loading. Clean.
 *
 * Once more I can proudly say that linux stood up to being changed: it
 * was less than 2 hours work to get demand-loading completely implemented.
 *
 * Demand loading changed July 1993 by Eric Youngdale.   Use mmap instead,
 * current->executable is only used by the procfs.  This allows a dispatch
 * table to check for several different types  of binary formats.  We keep
 * trying until we recognize the file or we run out of supported binary
 * formats. 
 */

#include <linux/slab.h>
#include <linux/file.h>
A
Al Viro 已提交
27
#include <linux/fdtable.h>
H
Hugh Dickins 已提交
28
#include <linux/mm.h>
D
Davidlohr Bueso 已提交
29
#include <linux/vmacache.h>
L
Linus Torvalds 已提交
30 31
#include <linux/stat.h>
#include <linux/fcntl.h>
H
Hugh Dickins 已提交
32
#include <linux/swap.h>
33
#include <linux/string.h>
L
Linus Torvalds 已提交
34
#include <linux/init.h>
35
#include <linux/pagemap.h>
36
#include <linux/perf_event.h>
L
Linus Torvalds 已提交
37 38 39 40 41 42
#include <linux/highmem.h>
#include <linux/spinlock.h>
#include <linux/key.h>
#include <linux/personality.h>
#include <linux/binfmts.h>
#include <linux/utsname.h>
43
#include <linux/pid_namespace.h>
L
Linus Torvalds 已提交
44 45 46 47 48
#include <linux/module.h>
#include <linux/namei.h>
#include <linux/mount.h>
#include <linux/security.h>
#include <linux/syscalls.h>
49
#include <linux/tsacct_kern.h>
M
Matt Helsley 已提交
50
#include <linux/cn_proc.h>
A
Al Viro 已提交
51
#include <linux/audit.h>
R
Roland McGrath 已提交
52
#include <linux/tracehook.h>
J
Johannes Berg 已提交
53
#include <linux/kmod.h>
54
#include <linux/fsnotify.h>
55
#include <linux/fs_struct.h>
56
#include <linux/pipe_fs_i.h>
Y
Ying Han 已提交
57
#include <linux/oom.h>
58
#include <linux/compat.h>
59
#include <linux/vmalloc.h>
L
Linus Torvalds 已提交
60 61 62

#include <asm/uaccess.h>
#include <asm/mmu_context.h>
63
#include <asm/tlb.h>
64 65

#include <trace/events/task.h>
66
#include "internal.h"
L
Linus Torvalds 已提交
67

68 69
#include <trace/events/sched.h>

A
Alan Cox 已提交
70 71
int suid_dumpable = 0;

A
Alexey Dobriyan 已提交
72
static LIST_HEAD(formats);
L
Linus Torvalds 已提交
73 74
static DEFINE_RWLOCK(binfmt_lock);

A
Al Viro 已提交
75
void __register_binfmt(struct linux_binfmt * fmt, int insert)
L
Linus Torvalds 已提交
76
{
A
Al Viro 已提交
77
	BUG_ON(!fmt);
78 79
	if (WARN_ON(!fmt->load_binary))
		return;
L
Linus Torvalds 已提交
80
	write_lock(&binfmt_lock);
I
Ivan Kokshaysky 已提交
81 82
	insert ? list_add(&fmt->lh, &formats) :
		 list_add_tail(&fmt->lh, &formats);
L
Linus Torvalds 已提交
83 84 85
	write_unlock(&binfmt_lock);
}

I
Ivan Kokshaysky 已提交
86
EXPORT_SYMBOL(__register_binfmt);
L
Linus Torvalds 已提交
87

88
void unregister_binfmt(struct linux_binfmt * fmt)
L
Linus Torvalds 已提交
89 90
{
	write_lock(&binfmt_lock);
A
Alexey Dobriyan 已提交
91
	list_del(&fmt->lh);
L
Linus Torvalds 已提交
92 93 94 95 96 97 98 99 100 101
	write_unlock(&binfmt_lock);
}

EXPORT_SYMBOL(unregister_binfmt);

static inline void put_binfmt(struct linux_binfmt * fmt)
{
	module_put(fmt->module);
}

102 103 104 105 106 107
bool path_noexec(const struct path *path)
{
	return (path->mnt->mnt_flags & MNT_NOEXEC) ||
	       (path->mnt->mnt_sb->s_iflags & SB_I_NOEXEC);
}

108
#ifdef CONFIG_USELIB
L
Linus Torvalds 已提交
109 110 111 112 113 114
/*
 * Note that a shared library must be both readable and executable due to
 * security reasons.
 *
 * Also note that we take the address to load from from the file itself.
 */
115
SYSCALL_DEFINE1(uselib, const char __user *, library)
L
Linus Torvalds 已提交
116
{
A
Al Viro 已提交
117
	struct linux_binfmt *fmt;
118
	struct file *file;
119
	struct filename *tmp = getname(library);
120
	int error = PTR_ERR(tmp);
121 122
	static const struct open_flags uselib_flags = {
		.open_flag = O_LARGEFILE | O_RDONLY | __FMODE_EXEC,
A
Al Viro 已提交
123
		.acc_mode = MAY_READ | MAY_EXEC,
124 125
		.intent = LOOKUP_OPEN,
		.lookup_flags = LOOKUP_FOLLOW,
126
	};
127

128 129 130
	if (IS_ERR(tmp))
		goto out;

131
	file = do_filp_open(AT_FDCWD, tmp, &uselib_flags);
132 133 134
	putname(tmp);
	error = PTR_ERR(file);
	if (IS_ERR(file))
L
Linus Torvalds 已提交
135 136 137
		goto out;

	error = -EINVAL;
A
Al Viro 已提交
138
	if (!S_ISREG(file_inode(file)->i_mode))
L
Linus Torvalds 已提交
139 140
		goto exit;

141
	error = -EACCES;
142
	if (path_noexec(&file->f_path))
L
Linus Torvalds 已提交
143 144
		goto exit;

145
	fsnotify_open(file);
146

L
Linus Torvalds 已提交
147 148
	error = -ENOEXEC;

A
Al Viro 已提交
149 150 151 152 153 154
	read_lock(&binfmt_lock);
	list_for_each_entry(fmt, &formats, lh) {
		if (!fmt->load_shlib)
			continue;
		if (!try_module_get(fmt->module))
			continue;
L
Linus Torvalds 已提交
155
		read_unlock(&binfmt_lock);
A
Al Viro 已提交
156 157 158 159 160
		error = fmt->load_shlib(file);
		read_lock(&binfmt_lock);
		put_binfmt(fmt);
		if (error != -ENOEXEC)
			break;
L
Linus Torvalds 已提交
161
	}
A
Al Viro 已提交
162
	read_unlock(&binfmt_lock);
163
exit:
L
Linus Torvalds 已提交
164 165 166 167
	fput(file);
out:
  	return error;
}
168
#endif /* #ifdef CONFIG_USELIB */
L
Linus Torvalds 已提交
169

170
#ifdef CONFIG_MMU
O
Oleg Nesterov 已提交
171 172 173 174 175 176
/*
 * The nascent bprm->mm is not visible until exec_mmap() but it can
 * use a lot of memory, account these pages in current->mm temporary
 * for oom_badness()->get_mm_rss(). Once exec succeeds or fails, we
 * change the counter back via acct_arg_size(0).
 */
177
static void acct_arg_size(struct linux_binprm *bprm, unsigned long pages)
178 179 180 181 182 183 184 185 186 187 188
{
	struct mm_struct *mm = current->mm;
	long diff = (long)(pages - bprm->vma_pages);

	if (!mm || !diff)
		return;

	bprm->vma_pages = pages;
	add_mm_counter(mm, MM_ANONPAGES, diff);
}

189
static struct page *get_arg_page(struct linux_binprm *bprm, unsigned long pos,
190 191 192 193 194 195 196
		int write)
{
	struct page *page;
	int ret;

#ifdef CONFIG_STACK_GROWSUP
	if (write) {
197
		ret = expand_downwards(bprm->vma, pos);
198 199 200 201
		if (ret < 0)
			return NULL;
	}
#endif
202 203 204 205 206 207
	/*
	 * We are doing an exec().  'current' is the process
	 * doing the exec and bprm->mm is the new process's mm.
	 */
	ret = get_user_pages_remote(current, bprm->mm, pos, 1, write,
			1, &page, NULL);
208 209 210 211 212
	if (ret <= 0)
		return NULL;

	if (write) {
		unsigned long size = bprm->vma->vm_end - bprm->vma->vm_start;
213 214
		struct rlimit *rlim;

215 216
		acct_arg_size(bprm, size / PAGE_SIZE);

217 218 219 220 221 222
		/*
		 * We've historically supported up to 32 pages (ARG_MAX)
		 * of argument strings even with small stacks
		 */
		if (size <= ARG_MAX)
			return page;
223 224 225 226 227 228 229 230

		/*
		 * Limit to 1/4-th the stack size for the argv+env strings.
		 * This ensures that:
		 *  - the remaining binfmt code will not run out of stack space,
		 *  - the program will have a reasonable amount of stack left
		 *    to work from.
		 */
231
		rlim = current->signal->rlim;
J
Jiri Slaby 已提交
232
		if (size > ACCESS_ONCE(rlim[RLIMIT_STACK].rlim_cur) / 4) {
233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261
			put_page(page);
			return NULL;
		}
	}

	return page;
}

static void put_arg_page(struct page *page)
{
	put_page(page);
}

static void free_arg_page(struct linux_binprm *bprm, int i)
{
}

static void free_arg_pages(struct linux_binprm *bprm)
{
}

static void flush_arg_page(struct linux_binprm *bprm, unsigned long pos,
		struct page *page)
{
	flush_cache_page(bprm->vma, pos, page_to_pfn(page));
}

static int __bprm_mm_init(struct linux_binprm *bprm)
{
262
	int err;
263 264 265 266 267
	struct vm_area_struct *vma = NULL;
	struct mm_struct *mm = bprm->mm;

	bprm->vma = vma = kmem_cache_zalloc(vm_area_cachep, GFP_KERNEL);
	if (!vma)
268
		return -ENOMEM;
269 270 271 272 273 274 275 276 277 278

	down_write(&mm->mmap_sem);
	vma->vm_mm = mm;

	/*
	 * Place the stack at the largest stack address the architecture
	 * supports. Later, we'll move this to an appropriate place. We don't
	 * use STACK_TOP because that can depend on attributes which aren't
	 * configured yet.
	 */
279
	BUILD_BUG_ON(VM_STACK_FLAGS & VM_STACK_INCOMPLETE_SETUP);
280 281
	vma->vm_end = STACK_TOP_MAX;
	vma->vm_start = vma->vm_end - PAGE_SIZE;
282
	vma->vm_flags = VM_SOFTDIRTY | VM_STACK_FLAGS | VM_STACK_INCOMPLETE_SETUP;
283
	vma->vm_page_prot = vm_get_page_prot(vma->vm_flags);
284
	INIT_LIST_HEAD(&vma->anon_vma_chain);
285

286
	err = insert_vm_struct(mm, vma);
287
	if (err)
288 289 290
		goto err;

	mm->stack_vm = mm->total_vm = 1;
291
	arch_bprm_mm_init(mm, vma);
292 293 294 295
	up_write(&mm->mmap_sem);
	bprm->p = vma->vm_end - sizeof(void *);
	return 0;
err:
296 297 298
	up_write(&mm->mmap_sem);
	bprm->vma = NULL;
	kmem_cache_free(vm_area_cachep, vma);
299 300 301 302 303 304 305 306 307 308
	return err;
}

static bool valid_arg_len(struct linux_binprm *bprm, long len)
{
	return len <= MAX_ARG_STRLEN;
}

#else

309
static inline void acct_arg_size(struct linux_binprm *bprm, unsigned long pages)
310 311 312
{
}

313
static struct page *get_arg_page(struct linux_binprm *bprm, unsigned long pos,
314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 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
		int write)
{
	struct page *page;

	page = bprm->page[pos / PAGE_SIZE];
	if (!page && write) {
		page = alloc_page(GFP_HIGHUSER|__GFP_ZERO);
		if (!page)
			return NULL;
		bprm->page[pos / PAGE_SIZE] = page;
	}

	return page;
}

static void put_arg_page(struct page *page)
{
}

static void free_arg_page(struct linux_binprm *bprm, int i)
{
	if (bprm->page[i]) {
		__free_page(bprm->page[i]);
		bprm->page[i] = NULL;
	}
}

static void free_arg_pages(struct linux_binprm *bprm)
{
	int i;

	for (i = 0; i < MAX_ARG_PAGES; i++)
		free_arg_page(bprm, i);
}

static void flush_arg_page(struct linux_binprm *bprm, unsigned long pos,
		struct page *page)
{
}

static int __bprm_mm_init(struct linux_binprm *bprm)
{
	bprm->p = PAGE_SIZE * MAX_ARG_PAGES - sizeof(void *);
	return 0;
}

static bool valid_arg_len(struct linux_binprm *bprm, long len)
{
	return len <= bprm->p;
}

#endif /* CONFIG_MMU */

/*
 * Create a new mm_struct and populate it with a temporary stack
 * vm_area_struct.  We don't have enough context at this point to set the stack
 * flags, permissions, and offset, so we use temporary values.  We'll update
 * them later in setup_arg_pages().
 */
373
static int bprm_mm_init(struct linux_binprm *bprm)
374 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397
{
	int err;
	struct mm_struct *mm = NULL;

	bprm->mm = mm = mm_alloc();
	err = -ENOMEM;
	if (!mm)
		goto err;

	err = __bprm_mm_init(bprm);
	if (err)
		goto err;

	return 0;

err:
	if (mm) {
		bprm->mm = NULL;
		mmdrop(mm);
	}

	return err;
}

398
struct user_arg_ptr {
399 400 401 402 403 404
#ifdef CONFIG_COMPAT
	bool is_compat;
#endif
	union {
		const char __user *const __user *native;
#ifdef CONFIG_COMPAT
A
Al Viro 已提交
405
		const compat_uptr_t __user *compat;
406 407
#endif
	} ptr;
408 409 410
};

static const char __user *get_user_arg_ptr(struct user_arg_ptr argv, int nr)
411
{
412 413 414 415 416 417 418 419
	const char __user *native;

#ifdef CONFIG_COMPAT
	if (unlikely(argv.is_compat)) {
		compat_uptr_t compat;

		if (get_user(compat, argv.ptr.compat + nr))
			return ERR_PTR(-EFAULT);
420

421 422 423 424 425
		return compat_ptr(compat);
	}
#endif

	if (get_user(native, argv.ptr.native + nr))
426 427
		return ERR_PTR(-EFAULT);

428
	return native;
429 430
}

L
Linus Torvalds 已提交
431 432 433
/*
 * count() counts the number of strings in array ARGV.
 */
434
static int count(struct user_arg_ptr argv, int max)
L
Linus Torvalds 已提交
435 436 437
{
	int i = 0;

438
	if (argv.ptr.native != NULL) {
L
Linus Torvalds 已提交
439
		for (;;) {
440
			const char __user *p = get_user_arg_ptr(argv, i);
L
Linus Torvalds 已提交
441 442 443

			if (!p)
				break;
444 445 446 447

			if (IS_ERR(p))
				return -EFAULT;

448
			if (i >= max)
L
Linus Torvalds 已提交
449
				return -E2BIG;
450
			++i;
451 452 453

			if (fatal_signal_pending(current))
				return -ERESTARTNOHAND;
L
Linus Torvalds 已提交
454 455 456 457 458 459 460
			cond_resched();
		}
	}
	return i;
}

/*
461 462 463
 * 'copy_strings()' copies argument/environment strings from the old
 * processes's memory to the new process's stack.  The call to get_user_pages()
 * ensures the destination page is created and not swapped out.
L
Linus Torvalds 已提交
464
 */
465
static int copy_strings(int argc, struct user_arg_ptr argv,
A
Adrian Bunk 已提交
466
			struct linux_binprm *bprm)
L
Linus Torvalds 已提交
467 468 469
{
	struct page *kmapped_page = NULL;
	char *kaddr = NULL;
470
	unsigned long kpos = 0;
L
Linus Torvalds 已提交
471 472 473
	int ret;

	while (argc-- > 0) {
474
		const char __user *str;
L
Linus Torvalds 已提交
475 476 477
		int len;
		unsigned long pos;

478 479 480
		ret = -EFAULT;
		str = get_user_arg_ptr(argv, argc);
		if (IS_ERR(str))
L
Linus Torvalds 已提交
481 482
			goto out;

483 484 485 486 487 488
		len = strnlen_user(str, MAX_ARG_STRLEN);
		if (!len)
			goto out;

		ret = -E2BIG;
		if (!valid_arg_len(bprm, len))
L
Linus Torvalds 已提交
489 490
			goto out;

491
		/* We're going to work our way backwords. */
L
Linus Torvalds 已提交
492
		pos = bprm->p;
493 494
		str += len;
		bprm->p -= len;
L
Linus Torvalds 已提交
495 496 497 498

		while (len > 0) {
			int offset, bytes_to_copy;

499 500 501 502
			if (fatal_signal_pending(current)) {
				ret = -ERESTARTNOHAND;
				goto out;
			}
503 504
			cond_resched();

L
Linus Torvalds 已提交
505
			offset = pos % PAGE_SIZE;
506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521
			if (offset == 0)
				offset = PAGE_SIZE;

			bytes_to_copy = offset;
			if (bytes_to_copy > len)
				bytes_to_copy = len;

			offset -= bytes_to_copy;
			pos -= bytes_to_copy;
			str -= bytes_to_copy;
			len -= bytes_to_copy;

			if (!kmapped_page || kpos != (pos & PAGE_MASK)) {
				struct page *page;

				page = get_arg_page(bprm, pos, 1);
L
Linus Torvalds 已提交
522
				if (!page) {
523
					ret = -E2BIG;
L
Linus Torvalds 已提交
524 525 526
					goto out;
				}

527 528
				if (kmapped_page) {
					flush_kernel_dcache_page(kmapped_page);
L
Linus Torvalds 已提交
529
					kunmap(kmapped_page);
530 531
					put_arg_page(kmapped_page);
				}
L
Linus Torvalds 已提交
532 533
				kmapped_page = page;
				kaddr = kmap(kmapped_page);
534 535
				kpos = pos & PAGE_MASK;
				flush_arg_page(bprm, kpos, kmapped_page);
L
Linus Torvalds 已提交
536
			}
537
			if (copy_from_user(kaddr+offset, str, bytes_to_copy)) {
L
Linus Torvalds 已提交
538 539 540 541 542 543 544
				ret = -EFAULT;
				goto out;
			}
		}
	}
	ret = 0;
out:
545 546
	if (kmapped_page) {
		flush_kernel_dcache_page(kmapped_page);
L
Linus Torvalds 已提交
547
		kunmap(kmapped_page);
548 549
		put_arg_page(kmapped_page);
	}
L
Linus Torvalds 已提交
550 551 552 553 554 555
	return ret;
}

/*
 * Like copy_strings, but get argv and its values from kernel memory.
 */
556
int copy_strings_kernel(int argc, const char *const *__argv,
557
			struct linux_binprm *bprm)
L
Linus Torvalds 已提交
558 559 560
{
	int r;
	mm_segment_t oldfs = get_fs();
561
	struct user_arg_ptr argv = {
562
		.ptr.native = (const char __user *const  __user *)__argv,
563 564
	};

L
Linus Torvalds 已提交
565
	set_fs(KERNEL_DS);
566
	r = copy_strings(argc, argv, bprm);
L
Linus Torvalds 已提交
567
	set_fs(oldfs);
568

L
Linus Torvalds 已提交
569 570 571 572 573
	return r;
}
EXPORT_SYMBOL(copy_strings_kernel);

#ifdef CONFIG_MMU
574

L
Linus Torvalds 已提交
575
/*
576 577 578
 * During bprm_mm_init(), we create a temporary stack at STACK_TOP_MAX.  Once
 * the binfmt code determines where the new stack should reside, we shift it to
 * its final location.  The process proceeds as follows:
L
Linus Torvalds 已提交
579
 *
580 581 582 583 584 585
 * 1) Use shift to calculate the new vma endpoints.
 * 2) Extend vma to cover both the old and new ranges.  This ensures the
 *    arguments passed to subsequent functions are consistent.
 * 3) Move vma's page tables to the new range.
 * 4) Free up any cleared pgd range.
 * 5) Shrink the vma to cover only the new range.
L
Linus Torvalds 已提交
586
 */
587
static int shift_arg_pages(struct vm_area_struct *vma, unsigned long shift)
L
Linus Torvalds 已提交
588 589
{
	struct mm_struct *mm = vma->vm_mm;
590 591 592 593 594
	unsigned long old_start = vma->vm_start;
	unsigned long old_end = vma->vm_end;
	unsigned long length = old_end - old_start;
	unsigned long new_start = old_start - shift;
	unsigned long new_end = old_end - shift;
P
Peter Zijlstra 已提交
595
	struct mmu_gather tlb;
L
Linus Torvalds 已提交
596

597
	BUG_ON(new_start > new_end);
L
Linus Torvalds 已提交
598

599 600 601 602 603 604 605 606 607 608
	/*
	 * ensure there are no vmas between where we want to go
	 * and where we are
	 */
	if (vma != find_vma(mm, new_start))
		return -EFAULT;

	/*
	 * cover the whole range: [new_start, old_end)
	 */
609 610
	if (vma_adjust(vma, new_start, old_end, vma->vm_pgoff, NULL))
		return -ENOMEM;
611 612 613 614 615 616

	/*
	 * move the page tables downwards, on failure we rely on
	 * process cleanup to remove whatever mess we made.
	 */
	if (length != move_page_tables(vma, old_start,
617
				       vma, new_start, length, false))
618 619 620
		return -ENOMEM;

	lru_add_drain();
621
	tlb_gather_mmu(&tlb, mm, old_start, old_end);
622 623 624 625
	if (new_end > old_start) {
		/*
		 * when the old and new regions overlap clear from new_end.
		 */
P
Peter Zijlstra 已提交
626
		free_pgd_range(&tlb, new_end, old_end, new_end,
627
			vma->vm_next ? vma->vm_next->vm_start : USER_PGTABLES_CEILING);
628 629 630 631 632 633 634
	} else {
		/*
		 * otherwise, clean from old_start; this is done to not touch
		 * the address space in [new_end, old_start) some architectures
		 * have constraints on va-space that make this illegal (IA64) -
		 * for the others its just a little faster.
		 */
P
Peter Zijlstra 已提交
635
		free_pgd_range(&tlb, old_start, old_end, new_end,
636
			vma->vm_next ? vma->vm_next->vm_start : USER_PGTABLES_CEILING);
L
Linus Torvalds 已提交
637
	}
638
	tlb_finish_mmu(&tlb, old_start, old_end);
639 640

	/*
641
	 * Shrink the vma to just the new range.  Always succeeds.
642 643 644 645
	 */
	vma_adjust(vma, new_start, new_end, vma->vm_pgoff, NULL);

	return 0;
L
Linus Torvalds 已提交
646 647
}

648 649 650 651
/*
 * Finalizes the stack vm_area_struct. The flags and permissions are updated,
 * the stack is optionally relocated, and some extra space is added.
 */
L
Linus Torvalds 已提交
652 653 654 655
int setup_arg_pages(struct linux_binprm *bprm,
		    unsigned long stack_top,
		    int executable_stack)
{
656 657
	unsigned long ret;
	unsigned long stack_shift;
L
Linus Torvalds 已提交
658
	struct mm_struct *mm = current->mm;
659 660 661 662
	struct vm_area_struct *vma = bprm->vma;
	struct vm_area_struct *prev = NULL;
	unsigned long vm_flags;
	unsigned long stack_base;
663 664 665
	unsigned long stack_size;
	unsigned long stack_expand;
	unsigned long rlim_stack;
L
Linus Torvalds 已提交
666 667

#ifdef CONFIG_STACK_GROWSUP
668
	/* Limit stack size */
J
Jiri Slaby 已提交
669
	stack_base = rlimit_max(RLIMIT_STACK);
670 671
	if (stack_base > STACK_SIZE_MAX)
		stack_base = STACK_SIZE_MAX;
L
Linus Torvalds 已提交
672

673 674 675
	/* Add space for stack randomization. */
	stack_base += (STACK_RND_MASK << PAGE_SHIFT);

676 677 678
	/* Make sure we didn't let the argument array grow too large. */
	if (vma->vm_end - vma->vm_start > stack_base)
		return -ENOMEM;
L
Linus Torvalds 已提交
679

680
	stack_base = PAGE_ALIGN(stack_top - stack_base);
L
Linus Torvalds 已提交
681

682 683 684
	stack_shift = vma->vm_start - stack_base;
	mm->arg_start = bprm->p - stack_shift;
	bprm->p = vma->vm_end - stack_shift;
L
Linus Torvalds 已提交
685
#else
686 687
	stack_top = arch_align_stack(stack_top);
	stack_top = PAGE_ALIGN(stack_top);
688 689 690 691 692

	if (unlikely(stack_top < mmap_min_addr) ||
	    unlikely(vma->vm_end - vma->vm_start >= stack_top - mmap_min_addr))
		return -ENOMEM;

693 694 695
	stack_shift = vma->vm_end - stack_top;

	bprm->p -= stack_shift;
L
Linus Torvalds 已提交
696 697 698 699
	mm->arg_start = bprm->p;
#endif

	if (bprm->loader)
700 701
		bprm->loader -= stack_shift;
	bprm->exec -= stack_shift;
L
Linus Torvalds 已提交
702 703

	down_write(&mm->mmap_sem);
704
	vm_flags = VM_STACK_FLAGS;
705 706 707 708 709 710 711 712 713 714 715

	/*
	 * Adjust stack execute permissions; explicitly enable for
	 * EXSTACK_ENABLE_X, disable for EXSTACK_DISABLE_X and leave alone
	 * (arch default) otherwise.
	 */
	if (unlikely(executable_stack == EXSTACK_ENABLE_X))
		vm_flags |= VM_EXEC;
	else if (executable_stack == EXSTACK_DISABLE_X)
		vm_flags &= ~VM_EXEC;
	vm_flags |= mm->def_flags;
716
	vm_flags |= VM_STACK_INCOMPLETE_SETUP;
717 718 719 720 721 722 723 724 725 726

	ret = mprotect_fixup(vma, &prev, vma->vm_start, vma->vm_end,
			vm_flags);
	if (ret)
		goto out_unlock;
	BUG_ON(prev != vma);

	/* Move stack pages down in memory. */
	if (stack_shift) {
		ret = shift_arg_pages(vma, stack_shift);
727 728
		if (ret)
			goto out_unlock;
L
Linus Torvalds 已提交
729 730
	}

731 732 733
	/* mprotect_fixup is overkill to remove the temporary stack flags */
	vma->vm_flags &= ~VM_STACK_INCOMPLETE_SETUP;

734
	stack_expand = 131072UL; /* randomly 32*4k (or 2*64k) pages */
735 736 737 738 739 740
	stack_size = vma->vm_end - vma->vm_start;
	/*
	 * Align this down to a page boundary as expand_stack
	 * will align it up.
	 */
	rlim_stack = rlimit(RLIMIT_STACK) & PAGE_MASK;
741
#ifdef CONFIG_STACK_GROWSUP
742 743 744 745
	if (stack_size + stack_expand > rlim_stack)
		stack_base = vma->vm_start + rlim_stack;
	else
		stack_base = vma->vm_end + stack_expand;
746
#else
747 748 749 750
	if (stack_size + stack_expand > rlim_stack)
		stack_base = vma->vm_end - rlim_stack;
	else
		stack_base = vma->vm_start - stack_expand;
751
#endif
752
	current->mm->start_stack = bprm->p;
753 754 755 756 757
	ret = expand_stack(vma, stack_base);
	if (ret)
		ret = -EFAULT;

out_unlock:
L
Linus Torvalds 已提交
758
	up_write(&mm->mmap_sem);
759
	return ret;
L
Linus Torvalds 已提交
760 761 762 763 764
}
EXPORT_SYMBOL(setup_arg_pages);

#endif /* CONFIG_MMU */

765
static struct file *do_open_execat(int fd, struct filename *name, int flags)
L
Linus Torvalds 已提交
766 767
{
	struct file *file;
768
	int err;
769
	struct open_flags open_exec_flags = {
770
		.open_flag = O_LARGEFILE | O_RDONLY | __FMODE_EXEC,
A
Al Viro 已提交
771
		.acc_mode = MAY_EXEC,
772 773
		.intent = LOOKUP_OPEN,
		.lookup_flags = LOOKUP_FOLLOW,
774
	};
L
Linus Torvalds 已提交
775

776 777 778 779 780 781 782 783
	if ((flags & ~(AT_SYMLINK_NOFOLLOW | AT_EMPTY_PATH)) != 0)
		return ERR_PTR(-EINVAL);
	if (flags & AT_SYMLINK_NOFOLLOW)
		open_exec_flags.lookup_flags &= ~LOOKUP_FOLLOW;
	if (flags & AT_EMPTY_PATH)
		open_exec_flags.lookup_flags |= LOOKUP_EMPTY;

	file = do_filp_open(fd, name, &open_exec_flags);
784
	if (IS_ERR(file))
785 786 787
		goto out;

	err = -EACCES;
A
Al Viro 已提交
788
	if (!S_ISREG(file_inode(file)->i_mode))
789
		goto exit;
790

791
	if (path_noexec(&file->f_path))
792
		goto exit;
793 794

	err = deny_write_access(file);
795 796
	if (err)
		goto exit;
L
Linus Torvalds 已提交
797

798 799 800
	if (name->name[0] != '\0')
		fsnotify_open(file);

801
out:
802 803
	return file;

804 805
exit:
	fput(file);
806 807
	return ERR_PTR(err);
}
808 809 810

struct file *open_exec(const char *name)
{
811 812 813 814 815 816 817 818
	struct filename *filename = getname_kernel(name);
	struct file *f = ERR_CAST(filename);

	if (!IS_ERR(filename)) {
		f = do_open_execat(AT_FDCWD, filename, 0);
		putname(filename);
	}
	return f;
819
}
L
Linus Torvalds 已提交
820 821
EXPORT_SYMBOL(open_exec);

M
Mimi Zohar 已提交
822 823
int kernel_read(struct file *file, loff_t offset,
		char *addr, unsigned long count)
L
Linus Torvalds 已提交
824 825 826 827 828 829 830 831 832 833 834 835 836 837 838
{
	mm_segment_t old_fs;
	loff_t pos = offset;
	int result;

	old_fs = get_fs();
	set_fs(get_ds());
	/* The cast to a user pointer is valid due to the set_fs() */
	result = vfs_read(file, (void __user *)addr, count, &pos);
	set_fs(old_fs);
	return result;
}

EXPORT_SYMBOL(kernel_read);

839
int kernel_read_file(struct file *file, void **buf, loff_t *size,
840
		     loff_t max_size, enum kernel_read_file_id id)
841 842 843 844 845 846 847 848
{
	loff_t i_size, pos;
	ssize_t bytes = 0;
	int ret;

	if (!S_ISREG(file_inode(file)->i_mode) || max_size < 0)
		return -EINVAL;

849 850 851 852
	ret = security_kernel_read_file(file, id);
	if (ret)
		return ret;

853 854 855 856 857 858 859 860 861 862 863 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 879 880 881
	i_size = i_size_read(file_inode(file));
	if (max_size > 0 && i_size > max_size)
		return -EFBIG;
	if (i_size <= 0)
		return -EINVAL;

	*buf = vmalloc(i_size);
	if (!*buf)
		return -ENOMEM;

	pos = 0;
	while (pos < i_size) {
		bytes = kernel_read(file, pos, (char *)(*buf) + pos,
				    i_size - pos);
		if (bytes < 0) {
			ret = bytes;
			goto out;
		}

		if (bytes == 0)
			break;
		pos += bytes;
	}

	if (pos != i_size) {
		ret = -EIO;
		goto out;
	}

882
	ret = security_kernel_post_read_file(file, *buf, i_size, id);
883 884 885 886 887 888 889 890 891 892 893 894
	if (!ret)
		*size = pos;

out:
	if (ret < 0) {
		vfree(*buf);
		*buf = NULL;
	}
	return ret;
}
EXPORT_SYMBOL_GPL(kernel_read_file);

895 896 897 898 899 900 901 902 903 904 905 906 907 908 909 910 911 912 913
int kernel_read_file_from_path(char *path, void **buf, loff_t *size,
			       loff_t max_size, enum kernel_read_file_id id)
{
	struct file *file;
	int ret;

	if (!path || !*path)
		return -EINVAL;

	file = filp_open(path, O_RDONLY, 0);
	if (IS_ERR(file))
		return PTR_ERR(file);

	ret = kernel_read_file(file, buf, size, max_size, id);
	fput(file);
	return ret;
}
EXPORT_SYMBOL_GPL(kernel_read_file_from_path);

914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929
int kernel_read_file_from_fd(int fd, void **buf, loff_t *size, loff_t max_size,
			     enum kernel_read_file_id id)
{
	struct fd f = fdget(fd);
	int ret = -EBADF;

	if (!f.file)
		goto out;

	ret = kernel_read_file(f.file, buf, size, max_size, id);
out:
	fdput(f);
	return ret;
}
EXPORT_SYMBOL_GPL(kernel_read_file_from_fd);

A
Al Viro 已提交
930 931
ssize_t read_code(struct file *file, unsigned long addr, loff_t pos, size_t len)
{
932
	ssize_t res = vfs_read(file, (void __user *)addr, len, &pos);
A
Al Viro 已提交
933 934 935 936 937 938
	if (res > 0)
		flush_icache_range(addr, addr + len);
	return res;
}
EXPORT_SYMBOL(read_code);

L
Linus Torvalds 已提交
939 940 941
static int exec_mmap(struct mm_struct *mm)
{
	struct task_struct *tsk;
D
Davidlohr Bueso 已提交
942
	struct mm_struct *old_mm, *active_mm;
L
Linus Torvalds 已提交
943 944 945 946 947 948 949

	/* Notify parent that we're no longer interested in the old VM */
	tsk = current;
	old_mm = current->mm;
	mm_release(tsk, old_mm);

	if (old_mm) {
950
		sync_mm_rss(old_mm);
L
Linus Torvalds 已提交
951 952 953 954
		/*
		 * Make sure that if there is a core dump in progress
		 * for the old mm, we get out and die instead of going
		 * through with the exec.  We must hold mmap_sem around
955
		 * checking core_state and changing tsk->mm.
L
Linus Torvalds 已提交
956 957
		 */
		down_read(&old_mm->mmap_sem);
958
		if (unlikely(old_mm->core_state)) {
L
Linus Torvalds 已提交
959 960 961 962 963 964 965 966 967
			up_read(&old_mm->mmap_sem);
			return -EINTR;
		}
	}
	task_lock(tsk);
	active_mm = tsk->active_mm;
	tsk->mm = mm;
	tsk->active_mm = mm;
	activate_mm(active_mm, mm);
D
Davidlohr Bueso 已提交
968 969
	tsk->mm->vmacache_seqnum = 0;
	vmacache_flush(tsk);
L
Linus Torvalds 已提交
970 971 972
	task_unlock(tsk);
	if (old_mm) {
		up_read(&old_mm->mmap_sem);
973
		BUG_ON(active_mm != old_mm);
974
		setmax_mm_hiwater_rss(&tsk->signal->maxrss, old_mm);
975
		mm_update_next_owner(old_mm);
L
Linus Torvalds 已提交
976 977 978 979 980 981 982 983 984 985 986 987 988
		mmput(old_mm);
		return 0;
	}
	mmdrop(active_mm);
	return 0;
}

/*
 * This function makes sure the current process has its own signal table,
 * so that flush_signal_handlers can later reset the handlers without
 * disturbing other processes.  (Other processes might share the signal
 * table via the CLONE_SIGHAND option to clone().)
 */
989
static int de_thread(struct task_struct *tsk)
L
Linus Torvalds 已提交
990 991
{
	struct signal_struct *sig = tsk->signal;
992
	struct sighand_struct *oldsighand = tsk->sighand;
L
Linus Torvalds 已提交
993 994
	spinlock_t *lock = &oldsighand->siglock;

995
	if (thread_group_empty(tsk))
L
Linus Torvalds 已提交
996 997 998 999 1000 1001
		goto no_thread_group;

	/*
	 * Kill all other threads in the thread group.
	 */
	spin_lock_irq(lock);
1002
	if (signal_group_exit(sig)) {
L
Linus Torvalds 已提交
1003 1004 1005 1006 1007 1008 1009
		/*
		 * Another group action in progress, just
		 * return so that the signal is processed.
		 */
		spin_unlock_irq(lock);
		return -EAGAIN;
	}
1010

1011
	sig->group_exit_task = tsk;
1012 1013 1014
	sig->notify_count = zap_other_threads(tsk);
	if (!thread_group_leader(tsk))
		sig->notify_count--;
L
Linus Torvalds 已提交
1015

1016
	while (sig->notify_count) {
O
Oleg Nesterov 已提交
1017
		__set_current_state(TASK_KILLABLE);
L
Linus Torvalds 已提交
1018 1019
		spin_unlock_irq(lock);
		schedule();
O
Oleg Nesterov 已提交
1020 1021
		if (unlikely(__fatal_signal_pending(tsk)))
			goto killed;
L
Linus Torvalds 已提交
1022 1023 1024 1025 1026 1027 1028 1029 1030
		spin_lock_irq(lock);
	}
	spin_unlock_irq(lock);

	/*
	 * At this point all other threads have exited, all we have to
	 * do is to wait for the thread group leader to become inactive,
	 * and to assume its PID:
	 */
1031
	if (!thread_group_leader(tsk)) {
1032
		struct task_struct *leader = tsk->group_leader;
1033 1034

		for (;;) {
1035
			threadgroup_change_begin(tsk);
1036
			write_lock_irq(&tasklist_lock);
1037 1038 1039 1040 1041
			/*
			 * Do this under tasklist_lock to ensure that
			 * exit_notify() can't miss ->group_exit_task
			 */
			sig->notify_count = -1;
1042 1043
			if (likely(leader->exit_state))
				break;
O
Oleg Nesterov 已提交
1044
			__set_current_state(TASK_KILLABLE);
1045
			write_unlock_irq(&tasklist_lock);
1046
			threadgroup_change_end(tsk);
1047
			schedule();
O
Oleg Nesterov 已提交
1048 1049
			if (unlikely(__fatal_signal_pending(tsk)))
				goto killed;
1050
		}
L
Linus Torvalds 已提交
1051

1052 1053 1054 1055 1056 1057 1058 1059 1060 1061
		/*
		 * The only record we have of the real-time age of a
		 * process, regardless of execs it's done, is start_time.
		 * All the past CPU time is accumulated in signal_struct
		 * from sister threads now dead.  But in this non-leader
		 * exec, nothing survives from the original leader thread,
		 * whose birth marks the true age of this process now.
		 * When we take on its identity by switching to its PID, we
		 * also take its birthdate (always earlier than our own).
		 */
1062
		tsk->start_time = leader->start_time;
1063
		tsk->real_start_time = leader->real_start_time;
1064

1065 1066
		BUG_ON(!same_thread_group(leader, tsk));
		BUG_ON(has_group_leader_pid(tsk));
L
Linus Torvalds 已提交
1067 1068 1069 1070 1071 1072
		/*
		 * An exec() starts a new thread group with the
		 * TGID of the previous thread group. Rehash the
		 * two threads with a switched PID, and release
		 * the former thread group leader:
		 */
1073 1074

		/* Become a process group leader with the old leader's pid.
1075 1076
		 * The old leader becomes a thread of the this thread group.
		 * Note: The old leader also uses this pid until release_task
1077 1078
		 *       is called.  Odd but simple and correct.
		 */
1079
		tsk->pid = leader->pid;
1080
		change_pid(tsk, PIDTYPE_PID, task_pid(leader));
1081 1082
		transfer_pid(leader, tsk, PIDTYPE_PGID);
		transfer_pid(leader, tsk, PIDTYPE_SID);
1083

1084
		list_replace_rcu(&leader->tasks, &tsk->tasks);
1085
		list_replace_init(&leader->sibling, &tsk->sibling);
L
Linus Torvalds 已提交
1086

1087 1088
		tsk->group_leader = tsk;
		leader->group_leader = tsk;
1089

1090
		tsk->exit_signal = SIGCHLD;
1091
		leader->exit_signal = -1;
1092 1093 1094

		BUG_ON(leader->exit_state != EXIT_ZOMBIE);
		leader->exit_state = EXIT_DEAD;
1095 1096 1097 1098 1099 1100 1101 1102

		/*
		 * We are going to release_task()->ptrace_unlink() silently,
		 * the tracer can sleep in do_wait(). EXIT_DEAD guarantees
		 * the tracer wont't block again waiting for this thread.
		 */
		if (unlikely(leader->ptrace))
			__wake_up_parent(leader, leader->parent);
L
Linus Torvalds 已提交
1103
		write_unlock_irq(&tasklist_lock);
1104
		threadgroup_change_end(tsk);
1105 1106

		release_task(leader);
1107
	}
L
Linus Torvalds 已提交
1108

1109 1110
	sig->group_exit_task = NULL;
	sig->notify_count = 0;
L
Linus Torvalds 已提交
1111 1112

no_thread_group:
1113 1114 1115
	/* we have changed execution domain */
	tsk->exit_signal = SIGCHLD;

L
Linus Torvalds 已提交
1116
	exit_itimers(sig);
1117
	flush_itimer_signals();
1118

1119 1120
	if (atomic_read(&oldsighand->count) != 1) {
		struct sighand_struct *newsighand;
L
Linus Torvalds 已提交
1121
		/*
1122 1123
		 * This ->sighand is shared with the CLONE_SIGHAND
		 * but not CLONE_THREAD task, switch to the new one.
L
Linus Torvalds 已提交
1124
		 */
1125 1126 1127 1128
		newsighand = kmem_cache_alloc(sighand_cachep, GFP_KERNEL);
		if (!newsighand)
			return -ENOMEM;

L
Linus Torvalds 已提交
1129 1130 1131 1132 1133 1134
		atomic_set(&newsighand->count, 1);
		memcpy(newsighand->action, oldsighand->action,
		       sizeof(newsighand->action));

		write_lock_irq(&tasklist_lock);
		spin_lock(&oldsighand->siglock);
1135
		rcu_assign_pointer(tsk->sighand, newsighand);
L
Linus Torvalds 已提交
1136 1137 1138
		spin_unlock(&oldsighand->siglock);
		write_unlock_irq(&tasklist_lock);

1139
		__cleanup_sighand(oldsighand);
L
Linus Torvalds 已提交
1140 1141
	}

1142
	BUG_ON(!thread_group_leader(tsk));
L
Linus Torvalds 已提交
1143
	return 0;
O
Oleg Nesterov 已提交
1144 1145 1146 1147 1148 1149 1150 1151

killed:
	/* protects against exit_notify() and __exit_signal() */
	read_lock(&tasklist_lock);
	sig->group_exit_task = NULL;
	sig->notify_count = 0;
	read_unlock(&tasklist_lock);
	return -EAGAIN;
L
Linus Torvalds 已提交
1152
}
O
Oleg Nesterov 已提交
1153

1154
char *get_task_comm(char *buf, struct task_struct *tsk)
L
Linus Torvalds 已提交
1155 1156 1157 1158 1159
{
	/* buf must be at least sizeof(tsk->comm) in size */
	task_lock(tsk);
	strncpy(buf, tsk->comm, sizeof(tsk->comm));
	task_unlock(tsk);
1160
	return buf;
L
Linus Torvalds 已提交
1161
}
1162
EXPORT_SYMBOL_GPL(get_task_comm);
L
Linus Torvalds 已提交
1163

1164 1165 1166 1167 1168
/*
 * These functions flushes out all traces of the currently running executable
 * so that a new one can be started
 */

1169
void __set_task_comm(struct task_struct *tsk, const char *buf, bool exec)
L
Linus Torvalds 已提交
1170 1171
{
	task_lock(tsk);
1172
	trace_task_rename(tsk, buf);
L
Linus Torvalds 已提交
1173 1174
	strlcpy(tsk->comm, buf, sizeof(tsk->comm));
	task_unlock(tsk);
1175
	perf_event_comm(tsk, exec);
L
Linus Torvalds 已提交
1176 1177 1178 1179
}

int flush_old_exec(struct linux_binprm * bprm)
{
1180
	int retval;
L
Linus Torvalds 已提交
1181 1182 1183 1184 1185 1186 1187 1188 1189

	/*
	 * Make sure we have a private signal table and that
	 * we are unassociated from the previous thread group.
	 */
	retval = de_thread(current);
	if (retval)
		goto out;

1190 1191 1192 1193 1194
	/*
	 * Must be called _before_ exec_mmap() as bprm->mm is
	 * not visibile until then. This also enables the update
	 * to be lockless.
	 */
M
Matt Helsley 已提交
1195
	set_mm_exe_file(bprm->mm, bprm->file);
1196

L
Linus Torvalds 已提交
1197 1198 1199
	/*
	 * Release all of the old mmap stuff
	 */
1200
	acct_arg_size(bprm, 0);
L
Linus Torvalds 已提交
1201 1202
	retval = exec_mmap(bprm->mm);
	if (retval)
1203
		goto out;
L
Linus Torvalds 已提交
1204 1205

	bprm->mm = NULL;		/* We're using it now */
1206

1207
	set_fs(USER_DS);
1208 1209
	current->flags &= ~(PF_RANDOMIZE | PF_FORKNOEXEC | PF_KTHREAD |
					PF_NOFREEZE | PF_NO_SETAFFINITY);
1210 1211 1212
	flush_thread();
	current->personality &= ~bprm->per_clear;

1213 1214 1215 1216 1217 1218 1219
	return 0;

out:
	return retval;
}
EXPORT_SYMBOL(flush_old_exec);

1220 1221
void would_dump(struct linux_binprm *bprm, struct file *file)
{
A
Al Viro 已提交
1222
	if (inode_permission(file_inode(file), MAY_READ) < 0)
1223 1224 1225 1226
		bprm->interp_flags |= BINPRM_FLAGS_ENFORCE_NONDUMP;
}
EXPORT_SYMBOL(would_dump);

1227 1228 1229
void setup_new_exec(struct linux_binprm * bprm)
{
	arch_pick_mmap_layout(current->mm);
L
Linus Torvalds 已提交
1230 1231 1232 1233

	/* This is the point of no return */
	current->sas_ss_sp = current->sas_ss_size = 0;

1234
	if (uid_eq(current_euid(), current_uid()) && gid_eq(current_egid(), current_gid()))
1235
		set_dumpable(current->mm, SUID_DUMP_USER);
A
Alan Cox 已提交
1236
	else
1237
		set_dumpable(current->mm, suid_dumpable);
A
Alan Cox 已提交
1238

1239
	perf_event_exec();
1240
	__set_task_comm(current, kbasename(bprm->filename), true);
L
Linus Torvalds 已提交
1241

1242 1243 1244 1245 1246 1247
	/* Set the new mm task size. We have to do that late because it may
	 * depend on TIF_32BIT which is only updated in flush_thread() on
	 * some architectures like powerpc
	 */
	current->mm->task_size = TASK_SIZE;

1248
	/* install the new credentials */
1249 1250
	if (!uid_eq(bprm->cred->uid, current_euid()) ||
	    !gid_eq(bprm->cred->gid, current_egid())) {
1251
		current->pdeath_signal = 0;
1252 1253 1254 1255
	} else {
		would_dump(bprm, bprm->file);
		if (bprm->interp_flags & BINPRM_FLAGS_ENFORCE_NONDUMP)
			set_dumpable(current->mm, suid_dumpable);
L
Linus Torvalds 已提交
1256 1257 1258 1259 1260 1261
	}

	/* An exec changes our domain. We are no longer part of the thread
	   group */
	current->self_exec_id++;
	flush_signal_handlers(current, 0);
1262
	do_close_on_exec(current->files);
L
Linus Torvalds 已提交
1263
}
1264
EXPORT_SYMBOL(setup_new_exec);
L
Linus Torvalds 已提交
1265

1266 1267 1268 1269 1270 1271 1272 1273
/*
 * Prepare credentials and lock ->cred_guard_mutex.
 * install_exec_creds() commits the new creds and drops the lock.
 * Or, if exec fails before, free_bprm() should release ->cred and
 * and unlock.
 */
int prepare_bprm_creds(struct linux_binprm *bprm)
{
1274
	if (mutex_lock_interruptible(&current->signal->cred_guard_mutex))
1275 1276 1277 1278 1279 1280
		return -ERESTARTNOINTR;

	bprm->cred = prepare_exec_creds();
	if (likely(bprm->cred))
		return 0;

1281
	mutex_unlock(&current->signal->cred_guard_mutex);
1282 1283 1284
	return -ENOMEM;
}

1285
static void free_bprm(struct linux_binprm *bprm)
1286 1287 1288
{
	free_arg_pages(bprm);
	if (bprm->cred) {
1289
		mutex_unlock(&current->signal->cred_guard_mutex);
1290 1291
		abort_creds(bprm->cred);
	}
1292 1293 1294 1295
	if (bprm->file) {
		allow_write_access(bprm->file);
		fput(bprm->file);
	}
1296 1297 1298
	/* If a binfmt changed the interp, free it. */
	if (bprm->interp != bprm->filename)
		kfree(bprm->interp);
1299 1300 1301
	kfree(bprm);
}

1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313
int bprm_change_interp(char *interp, struct linux_binprm *bprm)
{
	/* If a binfmt changed the interp, free it first. */
	if (bprm->interp != bprm->filename)
		kfree(bprm->interp);
	bprm->interp = kstrdup(interp, GFP_KERNEL);
	if (!bprm->interp)
		return -ENOMEM;
	return 0;
}
EXPORT_SYMBOL(bprm_change_interp);

1314 1315 1316 1317 1318 1319 1320 1321 1322
/*
 * install the new credentials for this executable
 */
void install_exec_creds(struct linux_binprm *bprm)
{
	security_bprm_committing_creds(bprm);

	commit_creds(bprm->cred);
	bprm->cred = NULL;
1323 1324 1325 1326 1327 1328 1329 1330 1331

	/*
	 * Disable monitoring for regular users
	 * when executing setuid binaries. Must
	 * wait until new credentials are committed
	 * by commit_creds() above
	 */
	if (get_dumpable(current->mm) != SUID_DUMP_USER)
		perf_event_exit_task(current);
1332 1333
	/*
	 * cred_guard_mutex must be held at least to this point to prevent
1334
	 * ptrace_attach() from altering our determination of the task's
1335 1336
	 * credentials; any time after this it may be unlocked.
	 */
1337
	security_bprm_committed_creds(bprm);
1338
	mutex_unlock(&current->signal->cred_guard_mutex);
1339 1340 1341 1342 1343
}
EXPORT_SYMBOL(install_exec_creds);

/*
 * determine how safe it is to execute the proposed program
1344
 * - the caller must hold ->cred_guard_mutex to protect against
1345
 *   PTRACE_ATTACH or seccomp thread-sync
1346
 */
1347
static void check_unsafe_exec(struct linux_binprm *bprm)
1348
{
D
David Howells 已提交
1349
	struct task_struct *p = current, *t;
1350
	unsigned n_fs;
1351

T
Tejun Heo 已提交
1352 1353 1354 1355 1356 1357
	if (p->ptrace) {
		if (p->ptrace & PT_PTRACE_CAP)
			bprm->unsafe |= LSM_UNSAFE_PTRACE_CAP;
		else
			bprm->unsafe |= LSM_UNSAFE_PTRACE;
	}
1358

1359 1360 1361 1362
	/*
	 * This isn't strictly necessary, but it makes it harder for LSMs to
	 * mess up.
	 */
1363
	if (task_no_new_privs(current))
1364 1365
		bprm->unsafe |= LSM_UNSAFE_NO_NEW_PRIVS;

1366
	t = p;
D
David Howells 已提交
1367
	n_fs = 1;
N
Nick Piggin 已提交
1368
	spin_lock(&p->fs->lock);
1369
	rcu_read_lock();
1370
	while_each_thread(p, t) {
D
David Howells 已提交
1371 1372 1373
		if (t->fs == p->fs)
			n_fs++;
	}
1374
	rcu_read_unlock();
D
David Howells 已提交
1375

1376
	if (p->fs->users > n_fs)
1377
		bprm->unsafe |= LSM_UNSAFE_SHARE;
1378 1379
	else
		p->fs->in_exec = 1;
N
Nick Piggin 已提交
1380
	spin_unlock(&p->fs->lock);
1381 1382
}

1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405
static void bprm_fill_uid(struct linux_binprm *bprm)
{
	struct inode *inode;
	unsigned int mode;
	kuid_t uid;
	kgid_t gid;

	/* clear any previous set[ug]id data from a previous binary */
	bprm->cred->euid = current_euid();
	bprm->cred->egid = current_egid();

	if (bprm->file->f_path.mnt->mnt_flags & MNT_NOSUID)
		return;

	if (task_no_new_privs(current))
		return;

	inode = file_inode(bprm->file);
	mode = READ_ONCE(inode->i_mode);
	if (!(mode & (S_ISUID|S_ISGID)))
		return;

	/* Be careful if suid/sgid is set */
A
Al Viro 已提交
1406
	inode_lock(inode);
1407 1408 1409 1410 1411

	/* reload atomically mode/uid/gid now that lock held */
	mode = inode->i_mode;
	uid = inode->i_uid;
	gid = inode->i_gid;
A
Al Viro 已提交
1412
	inode_unlock(inode);
1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429

	/* We ignore suid/sgid if there are no mappings for them in the ns */
	if (!kuid_has_mapping(bprm->cred->user_ns, uid) ||
		 !kgid_has_mapping(bprm->cred->user_ns, gid))
		return;

	if (mode & S_ISUID) {
		bprm->per_clear |= PER_CLEAR_ON_SETID;
		bprm->cred->euid = uid;
	}

	if ((mode & (S_ISGID | S_IXGRP)) == (S_ISGID | S_IXGRP)) {
		bprm->per_clear |= PER_CLEAR_ON_SETID;
		bprm->cred->egid = gid;
	}
}

1430 1431
/*
 * Fill the binprm structure from the inode.
L
Linus Torvalds 已提交
1432
 * Check permissions, then read the first 128 (BINPRM_BUF_SIZE) bytes
1433 1434
 *
 * This may be called multiple times for binary chains (scripts for example).
L
Linus Torvalds 已提交
1435 1436 1437 1438 1439
 */
int prepare_binprm(struct linux_binprm *bprm)
{
	int retval;

1440
	bprm_fill_uid(bprm);
L
Linus Torvalds 已提交
1441 1442

	/* fill in binprm security blob */
1443
	retval = security_bprm_set_creds(bprm);
L
Linus Torvalds 已提交
1444 1445
	if (retval)
		return retval;
1446
	bprm->cred_prepared = 1;
L
Linus Torvalds 已提交
1447

1448 1449
	memset(bprm->buf, 0, BINPRM_BUF_SIZE);
	return kernel_read(bprm->file, 0, bprm->buf, BINPRM_BUF_SIZE);
L
Linus Torvalds 已提交
1450 1451 1452 1453
}

EXPORT_SYMBOL(prepare_binprm);

N
Nick Piggin 已提交
1454 1455 1456 1457 1458
/*
 * Arguments are '\0' separated strings found at the location bprm->p
 * points to; chop off the first by relocating brpm->p to right after
 * the first '\0' encountered.
 */
1459
int remove_arg_zero(struct linux_binprm *bprm)
L
Linus Torvalds 已提交
1460
{
1461 1462 1463 1464
	int ret = 0;
	unsigned long offset;
	char *kaddr;
	struct page *page;
N
Nick Piggin 已提交
1465

1466 1467
	if (!bprm->argc)
		return 0;
L
Linus Torvalds 已提交
1468

1469 1470 1471 1472 1473 1474 1475
	do {
		offset = bprm->p & ~PAGE_MASK;
		page = get_arg_page(bprm, bprm->p, 0);
		if (!page) {
			ret = -EFAULT;
			goto out;
		}
1476
		kaddr = kmap_atomic(page);
N
Nick Piggin 已提交
1477

1478 1479 1480
		for (; offset < PAGE_SIZE && kaddr[offset];
				offset++, bprm->p++)
			;
N
Nick Piggin 已提交
1481

1482
		kunmap_atomic(kaddr);
1483
		put_arg_page(page);
N
Nick Piggin 已提交
1484

1485 1486 1487
		if (offset == PAGE_SIZE)
			free_arg_page(bprm, (bprm->p >> PAGE_SHIFT) - 1);
	} while (offset == PAGE_SIZE);
N
Nick Piggin 已提交
1488

1489 1490 1491
	bprm->p++;
	bprm->argc--;
	ret = 0;
N
Nick Piggin 已提交
1492

1493 1494
out:
	return ret;
L
Linus Torvalds 已提交
1495 1496 1497
}
EXPORT_SYMBOL(remove_arg_zero);

1498
#define printable(c) (((c)=='\t') || ((c)=='\n') || (0x20<=(c) && (c)<=0x7e))
L
Linus Torvalds 已提交
1499 1500 1501
/*
 * cycle the list of binary formats handler, until one recognizes the image
 */
1502
int search_binary_handler(struct linux_binprm *bprm)
L
Linus Torvalds 已提交
1503
{
1504
	bool need_retry = IS_ENABLED(CONFIG_MODULES);
L
Linus Torvalds 已提交
1505
	struct linux_binfmt *fmt;
1506
	int retval;
L
Linus Torvalds 已提交
1507

1508
	/* This allows 4 levels of binfmt rewrites before failing hard. */
1509
	if (bprm->recursion_depth > 5)
1510 1511
		return -ELOOP;

L
Linus Torvalds 已提交
1512 1513 1514 1515 1516
	retval = security_bprm_check(bprm);
	if (retval)
		return retval;

	retval = -ENOENT;
1517 1518 1519 1520 1521 1522 1523 1524
 retry:
	read_lock(&binfmt_lock);
	list_for_each_entry(fmt, &formats, lh) {
		if (!try_module_get(fmt->module))
			continue;
		read_unlock(&binfmt_lock);
		bprm->recursion_depth++;
		retval = fmt->load_binary(bprm);
1525 1526
		read_lock(&binfmt_lock);
		put_binfmt(fmt);
1527
		bprm->recursion_depth--;
1528 1529 1530 1531 1532 1533 1534 1535
		if (retval < 0 && !bprm->mm) {
			/* we got to flush_old_exec() and failed after it */
			read_unlock(&binfmt_lock);
			force_sigsegv(SIGSEGV, current);
			return retval;
		}
		if (retval != -ENOEXEC || !bprm->file) {
			read_unlock(&binfmt_lock);
1536
			return retval;
L
Linus Torvalds 已提交
1537 1538
		}
	}
1539 1540
	read_unlock(&binfmt_lock);

1541
	if (need_retry) {
1542 1543 1544
		if (printable(bprm->buf[0]) && printable(bprm->buf[1]) &&
		    printable(bprm->buf[2]) && printable(bprm->buf[3]))
			return retval;
1545 1546
		if (request_module("binfmt-%04x", *(ushort *)(bprm->buf + 2)) < 0)
			return retval;
1547 1548 1549 1550
		need_retry = false;
		goto retry;
	}

L
Linus Torvalds 已提交
1551 1552 1553 1554
	return retval;
}
EXPORT_SYMBOL(search_binary_handler);

1555 1556 1557 1558 1559 1560 1561 1562 1563 1564 1565 1566 1567
static int exec_binprm(struct linux_binprm *bprm)
{
	pid_t old_pid, old_vpid;
	int ret;

	/* Need to fetch pid before load_binary changes it */
	old_pid = current->pid;
	rcu_read_lock();
	old_vpid = task_pid_nr_ns(current, task_active_pid_ns(current->parent));
	rcu_read_unlock();

	ret = search_binary_handler(bprm);
	if (ret >= 0) {
1568
		audit_bprm(bprm);
1569 1570
		trace_sched_process_exec(current, old_pid, bprm);
		ptrace_event(PTRACE_EVENT_EXEC, old_vpid);
1571
		proc_exec_connector(current);
1572 1573 1574 1575 1576
	}

	return ret;
}

L
Linus Torvalds 已提交
1577 1578 1579
/*
 * sys_execve() executes a new program.
 */
1580 1581 1582 1583
static int do_execveat_common(int fd, struct filename *filename,
			      struct user_arg_ptr argv,
			      struct user_arg_ptr envp,
			      int flags)
L
Linus Torvalds 已提交
1584
{
1585
	char *pathbuf = NULL;
L
Linus Torvalds 已提交
1586 1587
	struct linux_binprm *bprm;
	struct file *file;
1588
	struct files_struct *displaced;
L
Linus Torvalds 已提交
1589
	int retval;
1590

1591 1592 1593
	if (IS_ERR(filename))
		return PTR_ERR(filename);

1594 1595 1596 1597 1598 1599 1600
	/*
	 * We move the actual failure in case of RLIMIT_NPROC excess from
	 * set*uid() to execve() because too many poorly written programs
	 * don't check setuid() return code.  Here we additionally recheck
	 * whether NPROC limit is still exceeded.
	 */
	if ((current->flags & PF_NPROC_EXCEEDED) &&
1601
	    atomic_read(&current_user()->processes) > rlimit(RLIMIT_NPROC)) {
1602 1603 1604 1605 1606 1607 1608
		retval = -EAGAIN;
		goto out_ret;
	}

	/* We're below the limit (still or again), so we don't want to make
	 * further execve() calls fail. */
	current->flags &= ~PF_NPROC_EXCEEDED;
L
Linus Torvalds 已提交
1609

1610
	retval = unshare_files(&displaced);
1611 1612 1613
	if (retval)
		goto out_ret;

L
Linus Torvalds 已提交
1614
	retval = -ENOMEM;
1615
	bprm = kzalloc(sizeof(*bprm), GFP_KERNEL);
L
Linus Torvalds 已提交
1616
	if (!bprm)
1617
		goto out_files;
L
Linus Torvalds 已提交
1618

1619 1620
	retval = prepare_bprm_creds(bprm);
	if (retval)
1621
		goto out_free;
A
Al Viro 已提交
1622

1623
	check_unsafe_exec(bprm);
1624
	current->in_execve = 1;
1625

1626
	file = do_open_execat(fd, filename, flags);
L
Linus Torvalds 已提交
1627 1628
	retval = PTR_ERR(file);
	if (IS_ERR(file))
A
Al Viro 已提交
1629
		goto out_unmark;
L
Linus Torvalds 已提交
1630 1631 1632 1633

	sched_exec();

	bprm->file = file;
1634 1635 1636 1637 1638 1639 1640 1641 1642 1643 1644 1645 1646 1647 1648 1649 1650 1651 1652 1653 1654 1655
	if (fd == AT_FDCWD || filename->name[0] == '/') {
		bprm->filename = filename->name;
	} else {
		if (filename->name[0] == '\0')
			pathbuf = kasprintf(GFP_TEMPORARY, "/dev/fd/%d", fd);
		else
			pathbuf = kasprintf(GFP_TEMPORARY, "/dev/fd/%d/%s",
					    fd, filename->name);
		if (!pathbuf) {
			retval = -ENOMEM;
			goto out_unmark;
		}
		/*
		 * Record that a name derived from an O_CLOEXEC fd will be
		 * inaccessible after exec. Relies on having exclusive access to
		 * current->files (due to unshare_files above).
		 */
		if (close_on_exec(fd, rcu_dereference_raw(current->files->fdt)))
			bprm->interp_flags |= BINPRM_FLAGS_PATH_INACCESSIBLE;
		bprm->filename = pathbuf;
	}
	bprm->interp = bprm->filename;
L
Linus Torvalds 已提交
1656

1657 1658
	retval = bprm_mm_init(bprm);
	if (retval)
1659
		goto out_unmark;
L
Linus Torvalds 已提交
1660

1661
	bprm->argc = count(argv, MAX_ARG_STRINGS);
L
Linus Torvalds 已提交
1662
	if ((retval = bprm->argc) < 0)
1663
		goto out;
L
Linus Torvalds 已提交
1664

1665
	bprm->envc = count(envp, MAX_ARG_STRINGS);
L
Linus Torvalds 已提交
1666 1667 1668 1669 1670 1671 1672 1673 1674 1675 1676 1677 1678 1679 1680 1681 1682 1683 1684 1685
	if ((retval = bprm->envc) < 0)
		goto out;

	retval = prepare_binprm(bprm);
	if (retval < 0)
		goto out;

	retval = copy_strings_kernel(1, &bprm->filename, bprm);
	if (retval < 0)
		goto out;

	bprm->exec = bprm->p;
	retval = copy_strings(bprm->envc, envp, bprm);
	if (retval < 0)
		goto out;

	retval = copy_strings(bprm->argc, argv, bprm);
	if (retval < 0)
		goto out;

1686
	retval = exec_binprm(bprm);
1687 1688
	if (retval < 0)
		goto out;
L
Linus Torvalds 已提交
1689

1690
	/* execve succeeded */
A
Al Viro 已提交
1691
	current->fs->in_exec = 0;
1692
	current->in_execve = 0;
1693
	acct_update_integrals(current);
1694
	task_numa_free(current);
1695
	free_bprm(bprm);
1696
	kfree(pathbuf);
1697
	putname(filename);
1698 1699 1700
	if (displaced)
		put_files_struct(displaced);
	return retval;
L
Linus Torvalds 已提交
1701

1702
out:
1703 1704 1705 1706
	if (bprm->mm) {
		acct_arg_size(bprm, 0);
		mmput(bprm->mm);
	}
L
Linus Torvalds 已提交
1707

A
Al Viro 已提交
1708
out_unmark:
1709
	current->fs->in_exec = 0;
1710
	current->in_execve = 0;
1711 1712

out_free:
1713
	free_bprm(bprm);
1714
	kfree(pathbuf);
L
Linus Torvalds 已提交
1715

1716
out_files:
1717 1718
	if (displaced)
		reset_files_struct(displaced);
L
Linus Torvalds 已提交
1719
out_ret:
1720
	putname(filename);
L
Linus Torvalds 已提交
1721 1722 1723
	return retval;
}

1724
int do_execve(struct filename *filename,
1725
	const char __user *const __user *__argv,
1726
	const char __user *const __user *__envp)
1727
{
1728 1729
	struct user_arg_ptr argv = { .ptr.native = __argv };
	struct user_arg_ptr envp = { .ptr.native = __envp };
1730 1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741
	return do_execveat_common(AT_FDCWD, filename, argv, envp, 0);
}

int do_execveat(int fd, struct filename *filename,
		const char __user *const __user *__argv,
		const char __user *const __user *__envp,
		int flags)
{
	struct user_arg_ptr argv = { .ptr.native = __argv };
	struct user_arg_ptr envp = { .ptr.native = __envp };

	return do_execveat_common(fd, filename, argv, envp, flags);
1742 1743 1744
}

#ifdef CONFIG_COMPAT
1745
static int compat_do_execve(struct filename *filename,
A
Al Viro 已提交
1746
	const compat_uptr_t __user *__argv,
1747
	const compat_uptr_t __user *__envp)
1748 1749 1750 1751 1752 1753 1754 1755 1756
{
	struct user_arg_ptr argv = {
		.is_compat = true,
		.ptr.compat = __argv,
	};
	struct user_arg_ptr envp = {
		.is_compat = true,
		.ptr.compat = __envp,
	};
1757 1758 1759 1760 1761 1762 1763 1764 1765 1766 1767 1768 1769 1770 1771 1772 1773
	return do_execveat_common(AT_FDCWD, filename, argv, envp, 0);
}

static int compat_do_execveat(int fd, struct filename *filename,
			      const compat_uptr_t __user *__argv,
			      const compat_uptr_t __user *__envp,
			      int flags)
{
	struct user_arg_ptr argv = {
		.is_compat = true,
		.ptr.compat = __argv,
	};
	struct user_arg_ptr envp = {
		.is_compat = true,
		.ptr.compat = __envp,
	};
	return do_execveat_common(fd, filename, argv, envp, flags);
1774
}
1775
#endif
1776

1777
void set_binfmt(struct linux_binfmt *new)
L
Linus Torvalds 已提交
1778
{
1779 1780 1781 1782
	struct mm_struct *mm = current->mm;

	if (mm->binfmt)
		module_put(mm->binfmt->module);
L
Linus Torvalds 已提交
1783

1784
	mm->binfmt = new;
1785 1786
	if (new)
		__module_get(new->module);
L
Linus Torvalds 已提交
1787 1788 1789
}
EXPORT_SYMBOL(set_binfmt);

1790
/*
1791
 * set_dumpable stores three-value SUID_DUMP_* into mm->flags.
1792 1793 1794
 */
void set_dumpable(struct mm_struct *mm, int value)
{
1795 1796
	unsigned long old, new;

1797 1798 1799
	if (WARN_ON((unsigned)value > SUID_DUMP_ROOT))
		return;

1800 1801
	do {
		old = ACCESS_ONCE(mm->flags);
1802
		new = (old & ~MMF_DUMPABLE_MASK) | value;
1803
	} while (cmpxchg(&mm->flags, old, new) != old);
1804 1805
}

A
Al Viro 已提交
1806 1807 1808 1809 1810
SYSCALL_DEFINE3(execve,
		const char __user *, filename,
		const char __user *const __user *, argv,
		const char __user *const __user *, envp)
{
1811
	return do_execve(getname(filename), argv, envp);
A
Al Viro 已提交
1812
}
1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826

SYSCALL_DEFINE5(execveat,
		int, fd, const char __user *, filename,
		const char __user *const __user *, argv,
		const char __user *const __user *, envp,
		int, flags)
{
	int lookup_flags = (flags & AT_EMPTY_PATH) ? LOOKUP_EMPTY : 0;

	return do_execveat(fd,
			   getname_flags(filename, lookup_flags, NULL),
			   argv, envp, flags);
}

A
Al Viro 已提交
1827
#ifdef CONFIG_COMPAT
1828 1829 1830
COMPAT_SYSCALL_DEFINE3(execve, const char __user *, filename,
	const compat_uptr_t __user *, argv,
	const compat_uptr_t __user *, envp)
A
Al Viro 已提交
1831
{
1832
	return compat_do_execve(getname(filename), argv, envp);
A
Al Viro 已提交
1833
}
1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846

COMPAT_SYSCALL_DEFINE5(execveat, int, fd,
		       const char __user *, filename,
		       const compat_uptr_t __user *, argv,
		       const compat_uptr_t __user *, envp,
		       int,  flags)
{
	int lookup_flags = (flags & AT_EMPTY_PATH) ? LOOKUP_EMPTY : 0;

	return compat_do_execveat(fd,
				  getname_flags(filename, lookup_flags, NULL),
				  argv, envp, flags);
}
A
Al Viro 已提交
1847
#endif