exec.c 42.8 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
			put_page(page);
			return NULL;
		}
	}

	return page;
}

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

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)
{
258
	int err;
259 260 261 262 263
	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)
264
		return -ENOMEM;
265

266 267 268 269
	if (down_write_killable(&mm->mmap_sem)) {
		err = -EINTR;
		goto err_free;
	}
270 271 272 273 274 275 276 277
	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.
	 */
278
	BUILD_BUG_ON(VM_STACK_FLAGS & VM_STACK_INCOMPLETE_SETUP);
279 280
	vma->vm_end = STACK_TOP_MAX;
	vma->vm_start = vma->vm_end - PAGE_SIZE;
281
	vma->vm_flags = VM_SOFTDIRTY | VM_STACK_FLAGS | VM_STACK_INCOMPLETE_SETUP;
282
	vma->vm_page_prot = vm_get_page_prot(vma->vm_flags);
283
	INIT_LIST_HEAD(&vma->anon_vma_chain);
284

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

	mm->stack_vm = mm->total_vm = 1;
290
	arch_bprm_mm_init(mm, vma);
291 292 293 294
	up_write(&mm->mmap_sem);
	bprm->p = vma->vm_end - sizeof(void *);
	return 0;
err:
295
	up_write(&mm->mmap_sem);
296
err_free:
297 298
	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 704 705
	if (down_write_killable(&mm->mmap_sem))
		return -EINTR;

706
	vm_flags = VM_STACK_FLAGS;
707 708 709 710 711 712 713 714 715 716 717

	/*
	 * 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;
718
	vm_flags |= VM_STACK_INCOMPLETE_SETUP;
719 720 721 722 723 724 725 726 727 728

	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);
729 730
		if (ret)
			goto out_unlock;
L
Linus Torvalds 已提交
731 732
	}

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

736
	stack_expand = 131072UL; /* randomly 32*4k (or 2*64k) pages */
737 738 739 740 741 742
	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;
743
#ifdef CONFIG_STACK_GROWSUP
744 745 746 747
	if (stack_size + stack_expand > rlim_stack)
		stack_base = vma->vm_start + rlim_stack;
	else
		stack_base = vma->vm_end + stack_expand;
748
#else
749 750 751 752
	if (stack_size + stack_expand > rlim_stack)
		stack_base = vma->vm_end - rlim_stack;
	else
		stack_base = vma->vm_start - stack_expand;
753
#endif
754
	current->mm->start_stack = bprm->p;
755 756 757 758 759
	ret = expand_stack(vma, stack_base);
	if (ret)
		ret = -EFAULT;

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

#endif /* CONFIG_MMU */

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

778 779 780 781 782 783 784 785
	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);
786
	if (IS_ERR(file))
787 788 789
		goto out;

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

793
	if (path_noexec(&file->f_path))
794
		goto exit;
795 796

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

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

803
out:
804 805
	return file;

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

struct file *open_exec(const char *name)
{
813 814 815 816 817 818 819 820
	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;
821
}
L
Linus Torvalds 已提交
822 823
EXPORT_SYMBOL(open_exec);

M
Mimi Zohar 已提交
824 825
int kernel_read(struct file *file, loff_t offset,
		char *addr, unsigned long count)
L
Linus Torvalds 已提交
826 827 828 829 830 831 832 833 834 835 836 837 838 839 840
{
	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);

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

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

851 852 853 854
	ret = security_kernel_read_file(file, id);
	if (ret)
		return ret;

855 856 857 858
	ret = deny_write_access(file);
	if (ret)
		return ret;

859
	i_size = i_size_read(file_inode(file));
860 861 862 863 864 865 866 867
	if (max_size > 0 && i_size > max_size) {
		ret = -EFBIG;
		goto out;
	}
	if (i_size <= 0) {
		ret = -EINVAL;
		goto out;
	}
868 869

	*buf = vmalloc(i_size);
870 871 872 873
	if (!*buf) {
		ret = -ENOMEM;
		goto out;
	}
874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890

	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;
891
		goto out_free;
892 893
	}

894
	ret = security_kernel_post_read_file(file, *buf, i_size, id);
895 896 897
	if (!ret)
		*size = pos;

898
out_free:
899 900 901 902
	if (ret < 0) {
		vfree(*buf);
		*buf = NULL;
	}
903 904 905

out:
	allow_write_access(file);
906 907 908 909
	return ret;
}
EXPORT_SYMBOL_GPL(kernel_read_file);

910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928
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);

929 930 931 932 933 934 935 936 937 938 939 940 941 942 943 944
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 已提交
945 946
ssize_t read_code(struct file *file, unsigned long addr, loff_t pos, size_t len)
{
947
	ssize_t res = vfs_read(file, (void __user *)addr, len, &pos);
A
Al Viro 已提交
948 949 950 951 952 953
	if (res > 0)
		flush_icache_range(addr, addr + len);
	return res;
}
EXPORT_SYMBOL(read_code);

L
Linus Torvalds 已提交
954 955 956
static int exec_mmap(struct mm_struct *mm)
{
	struct task_struct *tsk;
D
Davidlohr Bueso 已提交
957
	struct mm_struct *old_mm, *active_mm;
L
Linus Torvalds 已提交
958 959 960 961 962 963 964

	/* 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) {
965
		sync_mm_rss(old_mm);
L
Linus Torvalds 已提交
966 967 968 969
		/*
		 * 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
970
		 * checking core_state and changing tsk->mm.
L
Linus Torvalds 已提交
971 972
		 */
		down_read(&old_mm->mmap_sem);
973
		if (unlikely(old_mm->core_state)) {
L
Linus Torvalds 已提交
974 975 976 977 978 979 980 981 982
			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 已提交
983 984
	tsk->mm->vmacache_seqnum = 0;
	vmacache_flush(tsk);
L
Linus Torvalds 已提交
985 986 987
	task_unlock(tsk);
	if (old_mm) {
		up_read(&old_mm->mmap_sem);
988
		BUG_ON(active_mm != old_mm);
989
		setmax_mm_hiwater_rss(&tsk->signal->maxrss, old_mm);
990
		mm_update_next_owner(old_mm);
L
Linus Torvalds 已提交
991 992 993 994 995 996 997 998 999 1000 1001 1002 1003
		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().)
 */
1004
static int de_thread(struct task_struct *tsk)
L
Linus Torvalds 已提交
1005 1006
{
	struct signal_struct *sig = tsk->signal;
1007
	struct sighand_struct *oldsighand = tsk->sighand;
L
Linus Torvalds 已提交
1008 1009
	spinlock_t *lock = &oldsighand->siglock;

1010
	if (thread_group_empty(tsk))
L
Linus Torvalds 已提交
1011 1012 1013 1014 1015 1016
		goto no_thread_group;

	/*
	 * Kill all other threads in the thread group.
	 */
	spin_lock_irq(lock);
1017
	if (signal_group_exit(sig)) {
L
Linus Torvalds 已提交
1018 1019 1020 1021 1022 1023 1024
		/*
		 * Another group action in progress, just
		 * return so that the signal is processed.
		 */
		spin_unlock_irq(lock);
		return -EAGAIN;
	}
1025

1026
	sig->group_exit_task = tsk;
1027 1028 1029
	sig->notify_count = zap_other_threads(tsk);
	if (!thread_group_leader(tsk))
		sig->notify_count--;
L
Linus Torvalds 已提交
1030

1031
	while (sig->notify_count) {
O
Oleg Nesterov 已提交
1032
		__set_current_state(TASK_KILLABLE);
L
Linus Torvalds 已提交
1033 1034
		spin_unlock_irq(lock);
		schedule();
O
Oleg Nesterov 已提交
1035 1036
		if (unlikely(__fatal_signal_pending(tsk)))
			goto killed;
L
Linus Torvalds 已提交
1037 1038 1039 1040 1041 1042 1043 1044 1045
		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:
	 */
1046
	if (!thread_group_leader(tsk)) {
1047
		struct task_struct *leader = tsk->group_leader;
1048 1049

		for (;;) {
1050
			threadgroup_change_begin(tsk);
1051
			write_lock_irq(&tasklist_lock);
1052 1053 1054 1055 1056
			/*
			 * Do this under tasklist_lock to ensure that
			 * exit_notify() can't miss ->group_exit_task
			 */
			sig->notify_count = -1;
1057 1058
			if (likely(leader->exit_state))
				break;
O
Oleg Nesterov 已提交
1059
			__set_current_state(TASK_KILLABLE);
1060
			write_unlock_irq(&tasklist_lock);
1061
			threadgroup_change_end(tsk);
1062
			schedule();
O
Oleg Nesterov 已提交
1063 1064
			if (unlikely(__fatal_signal_pending(tsk)))
				goto killed;
1065
		}
L
Linus Torvalds 已提交
1066

1067 1068 1069 1070 1071 1072 1073 1074 1075 1076
		/*
		 * 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).
		 */
1077
		tsk->start_time = leader->start_time;
1078
		tsk->real_start_time = leader->real_start_time;
1079

1080 1081
		BUG_ON(!same_thread_group(leader, tsk));
		BUG_ON(has_group_leader_pid(tsk));
L
Linus Torvalds 已提交
1082 1083 1084 1085 1086 1087
		/*
		 * 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:
		 */
1088 1089

		/* Become a process group leader with the old leader's pid.
1090 1091
		 * The old leader becomes a thread of the this thread group.
		 * Note: The old leader also uses this pid until release_task
1092 1093
		 *       is called.  Odd but simple and correct.
		 */
1094
		tsk->pid = leader->pid;
1095
		change_pid(tsk, PIDTYPE_PID, task_pid(leader));
1096 1097
		transfer_pid(leader, tsk, PIDTYPE_PGID);
		transfer_pid(leader, tsk, PIDTYPE_SID);
1098

1099
		list_replace_rcu(&leader->tasks, &tsk->tasks);
1100
		list_replace_init(&leader->sibling, &tsk->sibling);
L
Linus Torvalds 已提交
1101

1102 1103
		tsk->group_leader = tsk;
		leader->group_leader = tsk;
1104

1105
		tsk->exit_signal = SIGCHLD;
1106
		leader->exit_signal = -1;
1107 1108 1109

		BUG_ON(leader->exit_state != EXIT_ZOMBIE);
		leader->exit_state = EXIT_DEAD;
1110 1111 1112 1113 1114 1115 1116 1117

		/*
		 * 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 已提交
1118
		write_unlock_irq(&tasklist_lock);
1119
		threadgroup_change_end(tsk);
1120 1121

		release_task(leader);
1122
	}
L
Linus Torvalds 已提交
1123

1124 1125
	sig->group_exit_task = NULL;
	sig->notify_count = 0;
L
Linus Torvalds 已提交
1126 1127

no_thread_group:
1128 1129 1130
	/* we have changed execution domain */
	tsk->exit_signal = SIGCHLD;

L
Linus Torvalds 已提交
1131
	exit_itimers(sig);
1132
	flush_itimer_signals();
1133

1134 1135
	if (atomic_read(&oldsighand->count) != 1) {
		struct sighand_struct *newsighand;
L
Linus Torvalds 已提交
1136
		/*
1137 1138
		 * This ->sighand is shared with the CLONE_SIGHAND
		 * but not CLONE_THREAD task, switch to the new one.
L
Linus Torvalds 已提交
1139
		 */
1140 1141 1142 1143
		newsighand = kmem_cache_alloc(sighand_cachep, GFP_KERNEL);
		if (!newsighand)
			return -ENOMEM;

L
Linus Torvalds 已提交
1144 1145 1146 1147 1148 1149
		atomic_set(&newsighand->count, 1);
		memcpy(newsighand->action, oldsighand->action,
		       sizeof(newsighand->action));

		write_lock_irq(&tasklist_lock);
		spin_lock(&oldsighand->siglock);
1150
		rcu_assign_pointer(tsk->sighand, newsighand);
L
Linus Torvalds 已提交
1151 1152 1153
		spin_unlock(&oldsighand->siglock);
		write_unlock_irq(&tasklist_lock);

1154
		__cleanup_sighand(oldsighand);
L
Linus Torvalds 已提交
1155 1156
	}

1157
	BUG_ON(!thread_group_leader(tsk));
L
Linus Torvalds 已提交
1158
	return 0;
O
Oleg Nesterov 已提交
1159 1160 1161 1162 1163 1164 1165 1166

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 已提交
1167
}
O
Oleg Nesterov 已提交
1168

1169
char *get_task_comm(char *buf, struct task_struct *tsk)
L
Linus Torvalds 已提交
1170 1171 1172 1173 1174
{
	/* buf must be at least sizeof(tsk->comm) in size */
	task_lock(tsk);
	strncpy(buf, tsk->comm, sizeof(tsk->comm));
	task_unlock(tsk);
1175
	return buf;
L
Linus Torvalds 已提交
1176
}
1177
EXPORT_SYMBOL_GPL(get_task_comm);
L
Linus Torvalds 已提交
1178

1179 1180 1181 1182 1183
/*
 * These functions flushes out all traces of the currently running executable
 * so that a new one can be started
 */

1184
void __set_task_comm(struct task_struct *tsk, const char *buf, bool exec)
L
Linus Torvalds 已提交
1185 1186
{
	task_lock(tsk);
1187
	trace_task_rename(tsk, buf);
L
Linus Torvalds 已提交
1188 1189
	strlcpy(tsk->comm, buf, sizeof(tsk->comm));
	task_unlock(tsk);
1190
	perf_event_comm(tsk, exec);
L
Linus Torvalds 已提交
1191 1192 1193 1194
}

int flush_old_exec(struct linux_binprm * bprm)
{
1195
	int retval;
L
Linus Torvalds 已提交
1196 1197 1198 1199 1200 1201 1202 1203 1204

	/*
	 * 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;

1205 1206 1207 1208 1209
	/*
	 * 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 已提交
1210
	set_mm_exe_file(bprm->mm, bprm->file);
1211

L
Linus Torvalds 已提交
1212 1213 1214
	/*
	 * Release all of the old mmap stuff
	 */
1215
	acct_arg_size(bprm, 0);
L
Linus Torvalds 已提交
1216 1217
	retval = exec_mmap(bprm->mm);
	if (retval)
1218
		goto out;
L
Linus Torvalds 已提交
1219 1220

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

1222
	set_fs(USER_DS);
1223 1224
	current->flags &= ~(PF_RANDOMIZE | PF_FORKNOEXEC | PF_KTHREAD |
					PF_NOFREEZE | PF_NO_SETAFFINITY);
1225 1226 1227
	flush_thread();
	current->personality &= ~bprm->per_clear;

1228 1229 1230 1231 1232 1233 1234
	return 0;

out:
	return retval;
}
EXPORT_SYMBOL(flush_old_exec);

1235 1236
void would_dump(struct linux_binprm *bprm, struct file *file)
{
A
Al Viro 已提交
1237
	if (inode_permission(file_inode(file), MAY_READ) < 0)
1238 1239 1240 1241
		bprm->interp_flags |= BINPRM_FLAGS_ENFORCE_NONDUMP;
}
EXPORT_SYMBOL(would_dump);

1242 1243 1244
void setup_new_exec(struct linux_binprm * bprm)
{
	arch_pick_mmap_layout(current->mm);
L
Linus Torvalds 已提交
1245 1246 1247 1248

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

1249
	if (uid_eq(current_euid(), current_uid()) && gid_eq(current_egid(), current_gid()))
1250
		set_dumpable(current->mm, SUID_DUMP_USER);
A
Alan Cox 已提交
1251
	else
1252
		set_dumpable(current->mm, suid_dumpable);
A
Alan Cox 已提交
1253

1254
	perf_event_exec();
1255
	__set_task_comm(current, kbasename(bprm->filename), true);
L
Linus Torvalds 已提交
1256

1257 1258 1259 1260 1261 1262
	/* 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;

1263
	/* install the new credentials */
1264 1265
	if (!uid_eq(bprm->cred->uid, current_euid()) ||
	    !gid_eq(bprm->cred->gid, current_egid())) {
1266
		current->pdeath_signal = 0;
1267 1268 1269 1270
	} else {
		would_dump(bprm, bprm->file);
		if (bprm->interp_flags & BINPRM_FLAGS_ENFORCE_NONDUMP)
			set_dumpable(current->mm, suid_dumpable);
L
Linus Torvalds 已提交
1271 1272 1273 1274 1275 1276
	}

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

1281 1282 1283 1284 1285 1286 1287 1288
/*
 * 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)
{
1289
	if (mutex_lock_interruptible(&current->signal->cred_guard_mutex))
1290 1291 1292 1293 1294 1295
		return -ERESTARTNOINTR;

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

1296
	mutex_unlock(&current->signal->cred_guard_mutex);
1297 1298 1299
	return -ENOMEM;
}

1300
static void free_bprm(struct linux_binprm *bprm)
1301 1302 1303
{
	free_arg_pages(bprm);
	if (bprm->cred) {
1304
		mutex_unlock(&current->signal->cred_guard_mutex);
1305 1306
		abort_creds(bprm->cred);
	}
1307 1308 1309 1310
	if (bprm->file) {
		allow_write_access(bprm->file);
		fput(bprm->file);
	}
1311 1312 1313
	/* If a binfmt changed the interp, free it. */
	if (bprm->interp != bprm->filename)
		kfree(bprm->interp);
1314 1315 1316
	kfree(bprm);
}

1317 1318 1319 1320 1321 1322 1323 1324 1325 1326 1327 1328
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);

1329 1330 1331 1332 1333 1334 1335 1336 1337
/*
 * 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;
1338 1339 1340 1341 1342 1343 1344 1345 1346

	/*
	 * 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);
1347 1348
	/*
	 * cred_guard_mutex must be held at least to this point to prevent
1349
	 * ptrace_attach() from altering our determination of the task's
1350 1351
	 * credentials; any time after this it may be unlocked.
	 */
1352
	security_bprm_committed_creds(bprm);
1353
	mutex_unlock(&current->signal->cred_guard_mutex);
1354 1355 1356 1357 1358
}
EXPORT_SYMBOL(install_exec_creds);

/*
 * determine how safe it is to execute the proposed program
1359
 * - the caller must hold ->cred_guard_mutex to protect against
1360
 *   PTRACE_ATTACH or seccomp thread-sync
1361
 */
1362
static void check_unsafe_exec(struct linux_binprm *bprm)
1363
{
D
David Howells 已提交
1364
	struct task_struct *p = current, *t;
1365
	unsigned n_fs;
1366

T
Tejun Heo 已提交
1367 1368 1369 1370 1371 1372
	if (p->ptrace) {
		if (p->ptrace & PT_PTRACE_CAP)
			bprm->unsafe |= LSM_UNSAFE_PTRACE_CAP;
		else
			bprm->unsafe |= LSM_UNSAFE_PTRACE;
	}
1373

1374 1375 1376 1377
	/*
	 * This isn't strictly necessary, but it makes it harder for LSMs to
	 * mess up.
	 */
1378
	if (task_no_new_privs(current))
1379 1380
		bprm->unsafe |= LSM_UNSAFE_NO_NEW_PRIVS;

1381
	t = p;
D
David Howells 已提交
1382
	n_fs = 1;
N
Nick Piggin 已提交
1383
	spin_lock(&p->fs->lock);
1384
	rcu_read_lock();
1385
	while_each_thread(p, t) {
D
David Howells 已提交
1386 1387 1388
		if (t->fs == p->fs)
			n_fs++;
	}
1389
	rcu_read_unlock();
D
David Howells 已提交
1390

1391
	if (p->fs->users > n_fs)
1392
		bprm->unsafe |= LSM_UNSAFE_SHARE;
1393 1394
	else
		p->fs->in_exec = 1;
N
Nick Piggin 已提交
1395
	spin_unlock(&p->fs->lock);
1396 1397
}

1398 1399 1400 1401 1402 1403 1404
static void bprm_fill_uid(struct linux_binprm *bprm)
{
	struct inode *inode;
	unsigned int mode;
	kuid_t uid;
	kgid_t gid;

1405 1406 1407 1408 1409 1410
	/*
	 * Since this can be called multiple times (via prepare_binprm),
	 * we must clear any previous work done when setting set[ug]id
	 * bits from any earlier bprm->file uses (for example when run
	 * first for a setuid script then again for its interpreter).
	 */
1411 1412 1413
	bprm->cred->euid = current_euid();
	bprm->cred->egid = current_egid();

1414
	if (!mnt_may_suid(bprm->file->f_path.mnt))
1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425
		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 已提交
1426
	inode_lock(inode);
1427 1428 1429 1430 1431

	/* reload atomically mode/uid/gid now that lock held */
	mode = inode->i_mode;
	uid = inode->i_uid;
	gid = inode->i_gid;
A
Al Viro 已提交
1432
	inode_unlock(inode);
1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449

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

1450 1451
/*
 * Fill the binprm structure from the inode.
L
Linus Torvalds 已提交
1452
 * Check permissions, then read the first 128 (BINPRM_BUF_SIZE) bytes
1453 1454
 *
 * This may be called multiple times for binary chains (scripts for example).
L
Linus Torvalds 已提交
1455 1456 1457 1458 1459
 */
int prepare_binprm(struct linux_binprm *bprm)
{
	int retval;

1460
	bprm_fill_uid(bprm);
L
Linus Torvalds 已提交
1461 1462

	/* fill in binprm security blob */
1463
	retval = security_bprm_set_creds(bprm);
L
Linus Torvalds 已提交
1464 1465
	if (retval)
		return retval;
1466
	bprm->cred_prepared = 1;
L
Linus Torvalds 已提交
1467

1468 1469
	memset(bprm->buf, 0, BINPRM_BUF_SIZE);
	return kernel_read(bprm->file, 0, bprm->buf, BINPRM_BUF_SIZE);
L
Linus Torvalds 已提交
1470 1471 1472 1473
}

EXPORT_SYMBOL(prepare_binprm);

N
Nick Piggin 已提交
1474 1475 1476 1477 1478
/*
 * 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.
 */
1479
int remove_arg_zero(struct linux_binprm *bprm)
L
Linus Torvalds 已提交
1480
{
1481 1482 1483 1484
	int ret = 0;
	unsigned long offset;
	char *kaddr;
	struct page *page;
N
Nick Piggin 已提交
1485

1486 1487
	if (!bprm->argc)
		return 0;
L
Linus Torvalds 已提交
1488

1489 1490 1491 1492 1493 1494 1495
	do {
		offset = bprm->p & ~PAGE_MASK;
		page = get_arg_page(bprm, bprm->p, 0);
		if (!page) {
			ret = -EFAULT;
			goto out;
		}
1496
		kaddr = kmap_atomic(page);
N
Nick Piggin 已提交
1497

1498 1499 1500
		for (; offset < PAGE_SIZE && kaddr[offset];
				offset++, bprm->p++)
			;
N
Nick Piggin 已提交
1501

1502
		kunmap_atomic(kaddr);
1503 1504
		put_arg_page(page);
	} while (offset == PAGE_SIZE);
N
Nick Piggin 已提交
1505

1506 1507 1508
	bprm->p++;
	bprm->argc--;
	ret = 0;
N
Nick Piggin 已提交
1509

1510 1511
out:
	return ret;
L
Linus Torvalds 已提交
1512 1513 1514
}
EXPORT_SYMBOL(remove_arg_zero);

1515
#define printable(c) (((c)=='\t') || ((c)=='\n') || (0x20<=(c) && (c)<=0x7e))
L
Linus Torvalds 已提交
1516 1517 1518
/*
 * cycle the list of binary formats handler, until one recognizes the image
 */
1519
int search_binary_handler(struct linux_binprm *bprm)
L
Linus Torvalds 已提交
1520
{
1521
	bool need_retry = IS_ENABLED(CONFIG_MODULES);
L
Linus Torvalds 已提交
1522
	struct linux_binfmt *fmt;
1523
	int retval;
L
Linus Torvalds 已提交
1524

1525
	/* This allows 4 levels of binfmt rewrites before failing hard. */
1526
	if (bprm->recursion_depth > 5)
1527 1528
		return -ELOOP;

L
Linus Torvalds 已提交
1529 1530 1531 1532 1533
	retval = security_bprm_check(bprm);
	if (retval)
		return retval;

	retval = -ENOENT;
1534 1535 1536 1537 1538 1539 1540 1541
 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);
1542 1543
		read_lock(&binfmt_lock);
		put_binfmt(fmt);
1544
		bprm->recursion_depth--;
1545 1546 1547 1548 1549 1550 1551 1552
		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);
1553
			return retval;
L
Linus Torvalds 已提交
1554 1555
		}
	}
1556 1557
	read_unlock(&binfmt_lock);

1558
	if (need_retry) {
1559 1560 1561
		if (printable(bprm->buf[0]) && printable(bprm->buf[1]) &&
		    printable(bprm->buf[2]) && printable(bprm->buf[3]))
			return retval;
1562 1563
		if (request_module("binfmt-%04x", *(ushort *)(bprm->buf + 2)) < 0)
			return retval;
1564 1565 1566 1567
		need_retry = false;
		goto retry;
	}

L
Linus Torvalds 已提交
1568 1569 1570 1571
	return retval;
}
EXPORT_SYMBOL(search_binary_handler);

1572 1573 1574 1575 1576 1577 1578 1579 1580 1581 1582 1583 1584
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) {
1585
		audit_bprm(bprm);
1586 1587
		trace_sched_process_exec(current, old_pid, bprm);
		ptrace_event(PTRACE_EVENT_EXEC, old_vpid);
1588
		proc_exec_connector(current);
1589 1590 1591 1592 1593
	}

	return ret;
}

L
Linus Torvalds 已提交
1594 1595 1596
/*
 * sys_execve() executes a new program.
 */
1597 1598 1599 1600
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 已提交
1601
{
1602
	char *pathbuf = NULL;
L
Linus Torvalds 已提交
1603 1604
	struct linux_binprm *bprm;
	struct file *file;
1605
	struct files_struct *displaced;
L
Linus Torvalds 已提交
1606
	int retval;
1607

1608 1609 1610
	if (IS_ERR(filename))
		return PTR_ERR(filename);

1611 1612 1613 1614 1615 1616 1617
	/*
	 * 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) &&
1618
	    atomic_read(&current_user()->processes) > rlimit(RLIMIT_NPROC)) {
1619 1620 1621 1622 1623 1624 1625
		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 已提交
1626

1627
	retval = unshare_files(&displaced);
1628 1629 1630
	if (retval)
		goto out_ret;

L
Linus Torvalds 已提交
1631
	retval = -ENOMEM;
1632
	bprm = kzalloc(sizeof(*bprm), GFP_KERNEL);
L
Linus Torvalds 已提交
1633
	if (!bprm)
1634
		goto out_files;
L
Linus Torvalds 已提交
1635

1636 1637
	retval = prepare_bprm_creds(bprm);
	if (retval)
1638
		goto out_free;
A
Al Viro 已提交
1639

1640
	check_unsafe_exec(bprm);
1641
	current->in_execve = 1;
1642

1643
	file = do_open_execat(fd, filename, flags);
L
Linus Torvalds 已提交
1644 1645
	retval = PTR_ERR(file);
	if (IS_ERR(file))
A
Al Viro 已提交
1646
		goto out_unmark;
L
Linus Torvalds 已提交
1647 1648 1649 1650

	sched_exec();

	bprm->file = file;
1651 1652 1653 1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665 1666 1667 1668 1669 1670 1671 1672
	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 已提交
1673

1674 1675
	retval = bprm_mm_init(bprm);
	if (retval)
1676
		goto out_unmark;
L
Linus Torvalds 已提交
1677

1678
	bprm->argc = count(argv, MAX_ARG_STRINGS);
L
Linus Torvalds 已提交
1679
	if ((retval = bprm->argc) < 0)
1680
		goto out;
L
Linus Torvalds 已提交
1681

1682
	bprm->envc = count(envp, MAX_ARG_STRINGS);
L
Linus Torvalds 已提交
1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702
	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;

1703
	retval = exec_binprm(bprm);
1704 1705
	if (retval < 0)
		goto out;
L
Linus Torvalds 已提交
1706

1707
	/* execve succeeded */
A
Al Viro 已提交
1708
	current->fs->in_exec = 0;
1709
	current->in_execve = 0;
1710
	acct_update_integrals(current);
1711
	task_numa_free(current);
1712
	free_bprm(bprm);
1713
	kfree(pathbuf);
1714
	putname(filename);
1715 1716 1717
	if (displaced)
		put_files_struct(displaced);
	return retval;
L
Linus Torvalds 已提交
1718

1719
out:
1720 1721 1722 1723
	if (bprm->mm) {
		acct_arg_size(bprm, 0);
		mmput(bprm->mm);
	}
L
Linus Torvalds 已提交
1724

A
Al Viro 已提交
1725
out_unmark:
1726
	current->fs->in_exec = 0;
1727
	current->in_execve = 0;
1728 1729

out_free:
1730
	free_bprm(bprm);
1731
	kfree(pathbuf);
L
Linus Torvalds 已提交
1732

1733
out_files:
1734 1735
	if (displaced)
		reset_files_struct(displaced);
L
Linus Torvalds 已提交
1736
out_ret:
1737
	putname(filename);
L
Linus Torvalds 已提交
1738 1739 1740
	return retval;
}

1741
int do_execve(struct filename *filename,
1742
	const char __user *const __user *__argv,
1743
	const char __user *const __user *__envp)
1744
{
1745 1746
	struct user_arg_ptr argv = { .ptr.native = __argv };
	struct user_arg_ptr envp = { .ptr.native = __envp };
1747 1748 1749 1750 1751 1752 1753 1754 1755 1756 1757 1758
	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);
1759 1760 1761
}

#ifdef CONFIG_COMPAT
1762
static int compat_do_execve(struct filename *filename,
A
Al Viro 已提交
1763
	const compat_uptr_t __user *__argv,
1764
	const compat_uptr_t __user *__envp)
1765 1766 1767 1768 1769 1770 1771 1772 1773
{
	struct user_arg_ptr argv = {
		.is_compat = true,
		.ptr.compat = __argv,
	};
	struct user_arg_ptr envp = {
		.is_compat = true,
		.ptr.compat = __envp,
	};
1774 1775 1776 1777 1778 1779 1780 1781 1782 1783 1784 1785 1786 1787 1788 1789 1790
	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);
1791
}
1792
#endif
1793

1794
void set_binfmt(struct linux_binfmt *new)
L
Linus Torvalds 已提交
1795
{
1796 1797 1798 1799
	struct mm_struct *mm = current->mm;

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

1801
	mm->binfmt = new;
1802 1803
	if (new)
		__module_get(new->module);
L
Linus Torvalds 已提交
1804 1805 1806
}
EXPORT_SYMBOL(set_binfmt);

1807
/*
1808
 * set_dumpable stores three-value SUID_DUMP_* into mm->flags.
1809 1810 1811
 */
void set_dumpable(struct mm_struct *mm, int value)
{
1812 1813
	unsigned long old, new;

1814 1815 1816
	if (WARN_ON((unsigned)value > SUID_DUMP_ROOT))
		return;

1817 1818
	do {
		old = ACCESS_ONCE(mm->flags);
1819
		new = (old & ~MMF_DUMPABLE_MASK) | value;
1820
	} while (cmpxchg(&mm->flags, old, new) != old);
1821 1822
}

A
Al Viro 已提交
1823 1824 1825 1826 1827
SYSCALL_DEFINE3(execve,
		const char __user *, filename,
		const char __user *const __user *, argv,
		const char __user *const __user *, envp)
{
1828
	return do_execve(getname(filename), argv, envp);
A
Al Viro 已提交
1829
}
1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843

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 已提交
1844
#ifdef CONFIG_COMPAT
1845 1846 1847
COMPAT_SYSCALL_DEFINE3(execve, const char __user *, filename,
	const compat_uptr_t __user *, argv,
	const compat_uptr_t __user *, envp)
A
Al Viro 已提交
1848
{
1849
	return compat_do_execve(getname(filename), argv, envp);
A
Al Viro 已提交
1850
}
1851 1852 1853 1854 1855 1856 1857 1858 1859 1860 1861 1862 1863

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 已提交
1864
#endif