oom_kill.c 21.3 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6
/*
 *  linux/mm/oom_kill.c
 * 
 *  Copyright (C)  1998,2000  Rik van Riel
 *	Thanks go out to Claus Fischer for some serious inspiration and
 *	for goading me into coding this file...
D
David Rientjes 已提交
7 8
 *  Copyright (C)  2010  Google, Inc.
 *	Rewritten by David Rientjes
L
Linus Torvalds 已提交
9 10
 *
 *  The routines in this file are used to kill a process when
P
Paul Jackson 已提交
11 12
 *  we're seriously out of memory. This gets called from __alloc_pages()
 *  in mm/page_alloc.c when we really run out of memory.
L
Linus Torvalds 已提交
13 14 15 16 17 18 19
 *
 *  Since we won't call these routines often (on a well-configured
 *  machine) this file will double as a 'coding guide' and a signpost
 *  for newbie kernel hackers. It features several pointers to major
 *  kernel subsystems and hints as to where to find out what things do.
 */

20
#include <linux/oom.h>
L
Linus Torvalds 已提交
21
#include <linux/mm.h>
A
Alexey Dobriyan 已提交
22
#include <linux/err.h>
23
#include <linux/gfp.h>
L
Linus Torvalds 已提交
24 25 26 27
#include <linux/sched.h>
#include <linux/swap.h>
#include <linux/timex.h>
#include <linux/jiffies.h>
28
#include <linux/cpuset.h>
29 30
#include <linux/module.h>
#include <linux/notifier.h>
31
#include <linux/memcontrol.h>
32
#include <linux/mempolicy.h>
33
#include <linux/security.h>
L
Linus Torvalds 已提交
34

35
int sysctl_panic_on_oom;
36
int sysctl_oom_kill_allocating_task;
37
int sysctl_oom_dump_tasks = 1;
D
David Rientjes 已提交
38
static DEFINE_SPINLOCK(zone_scan_lock);
L
Linus Torvalds 已提交
39

40 41 42 43 44 45 46 47 48
#ifdef CONFIG_NUMA
/**
 * has_intersects_mems_allowed() - check task eligiblity for kill
 * @tsk: task struct of which task to consider
 * @mask: nodemask passed to page allocator for mempolicy ooms
 *
 * Task eligibility is determined by whether or not a candidate task, @tsk,
 * shares the same mempolicy nodes as current if it is bound by such a policy
 * and whether or not it has the same set of allowed cpuset nodes.
49
 */
50 51
static bool has_intersects_mems_allowed(struct task_struct *tsk,
					const nodemask_t *mask)
52
{
53
	struct task_struct *start = tsk;
54 55

	do {
56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72
		if (mask) {
			/*
			 * If this is a mempolicy constrained oom, tsk's
			 * cpuset is irrelevant.  Only return true if its
			 * mempolicy intersects current, otherwise it may be
			 * needlessly killed.
			 */
			if (mempolicy_nodemask_intersects(tsk, mask))
				return true;
		} else {
			/*
			 * This is not a mempolicy constrained oom, so only
			 * check the mems of tsk's cpuset.
			 */
			if (cpuset_mems_allowed_intersects(current, tsk))
				return true;
		}
73 74
	} while_each_thread(start, tsk);

75 76 77 78 79 80 81
	return false;
}
#else
static bool has_intersects_mems_allowed(struct task_struct *tsk,
					const nodemask_t *mask)
{
	return true;
82
}
83
#endif /* CONFIG_NUMA */
84

85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102
/*
 * If this is a system OOM (not a memcg OOM) and the task selected to be
 * killed is not already running at high (RT) priorities, speed up the
 * recovery by boosting the dying task to the lowest FIFO priority.
 * That helps with the recovery and avoids interfering with RT tasks.
 */
static void boost_dying_task_prio(struct task_struct *p,
				  struct mem_cgroup *mem)
{
	struct sched_param param = { .sched_priority = 1 };

	if (mem)
		return;

	if (!rt_task(p))
		sched_setscheduler_nocheck(p, SCHED_FIFO, &param);
}

103 104 105 106 107 108
/*
 * The process p may have detached its own ->mm while exiting or through
 * use_mm(), but one or more of its subthreads may still have a valid
 * pointer.  Return p, or any of its subthreads with a valid ->mm, with
 * task_lock() held.
 */
109
struct task_struct *find_lock_task_mm(struct task_struct *p)
110 111 112 113 114 115 116 117 118 119 120 121 122
{
	struct task_struct *t = p;

	do {
		task_lock(t);
		if (likely(t->mm))
			return t;
		task_unlock(t);
	} while_each_thread(p, t);

	return NULL;
}

123
/* return true if the task is not adequate as candidate victim task. */
124 125
static bool oom_unkillable_task(struct task_struct *p,
		const struct mem_cgroup *mem, const nodemask_t *nodemask)
126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142
{
	if (is_global_init(p))
		return true;
	if (p->flags & PF_KTHREAD)
		return true;

	/* When mem_cgroup_out_of_memory() and p is not member of the group */
	if (mem && !task_in_mem_cgroup(p, mem))
		return true;

	/* p may not have freeable memory in nodemask */
	if (!has_intersects_mems_allowed(p, nodemask))
		return true;

	return false;
}

L
Linus Torvalds 已提交
143
/**
D
David Rientjes 已提交
144
 * oom_badness - heuristic function to determine which candidate task to kill
L
Linus Torvalds 已提交
145
 * @p: task struct of which task we should calculate
D
David Rientjes 已提交
146
 * @totalpages: total present RAM allowed for page allocation
L
Linus Torvalds 已提交
147
 *
D
David Rientjes 已提交
148 149 150
 * The heuristic for determining which task to kill is made to be as simple and
 * predictable as possible.  The goal is to return the highest value for the
 * task consuming the most memory to avoid subsequent oom failures.
L
Linus Torvalds 已提交
151
 */
D
David Rientjes 已提交
152 153
unsigned int oom_badness(struct task_struct *p, struct mem_cgroup *mem,
		      const nodemask_t *nodemask, unsigned long totalpages)
L
Linus Torvalds 已提交
154
{
D
David Rientjes 已提交
155
	int points;
156

157 158
	if (oom_unkillable_task(p, mem, nodemask))
		return 0;
L
Linus Torvalds 已提交
159

160 161
	p = find_lock_task_mm(p);
	if (!p)
L
Linus Torvalds 已提交
162 163 164
		return 0;

	/*
165 166 167
	 * Shortcut check for a thread sharing p->mm that is OOM_SCORE_ADJ_MIN
	 * so the entire heuristic doesn't need to be executed for something
	 * that cannot be killed.
L
Linus Torvalds 已提交
168
	 */
169
	if (atomic_read(&p->mm->oom_disable_count)) {
D
David Rientjes 已提交
170 171 172
		task_unlock(p);
		return 0;
	}
L
Linus Torvalds 已提交
173 174

	/*
D
David Rientjes 已提交
175 176
	 * When the PF_OOM_ORIGIN bit is set, it indicates the task should have
	 * priority for oom killing.
L
Linus Torvalds 已提交
177
	 */
D
David Rientjes 已提交
178 179 180 181
	if (p->flags & PF_OOM_ORIGIN) {
		task_unlock(p);
		return 1000;
	}
L
Linus Torvalds 已提交
182 183

	/*
D
David Rientjes 已提交
184 185
	 * The memory controller may have a limit of 0 bytes, so avoid a divide
	 * by zero, if necessary.
L
Linus Torvalds 已提交
186
	 */
D
David Rientjes 已提交
187 188
	if (!totalpages)
		totalpages = 1;
L
Linus Torvalds 已提交
189 190

	/*
D
David Rientjes 已提交
191 192
	 * The baseline for the badness score is the proportion of RAM that each
	 * task's rss and swap space use.
L
Linus Torvalds 已提交
193
	 */
D
David Rientjes 已提交
194 195 196
	points = (get_mm_rss(p->mm) + get_mm_counter(p->mm, MM_SWAPENTS)) * 1000 /
			totalpages;
	task_unlock(p);
L
Linus Torvalds 已提交
197 198

	/*
D
David Rientjes 已提交
199 200
	 * Root processes get 3% bonus, just like the __vm_enough_memory()
	 * implementation used by LSMs.
L
Linus Torvalds 已提交
201
	 */
D
David Rientjes 已提交
202 203
	if (has_capability_noaudit(p, CAP_SYS_ADMIN))
		points -= 30;
L
Linus Torvalds 已提交
204 205

	/*
D
David Rientjes 已提交
206 207 208
	 * /proc/pid/oom_score_adj ranges from -1000 to +1000 such that it may
	 * either completely disable oom killing or always prefer a certain
	 * task.
L
Linus Torvalds 已提交
209
	 */
D
David Rientjes 已提交
210
	points += p->signal->oom_score_adj;
L
Linus Torvalds 已提交
211

212 213 214 215 216 217 218
	/*
	 * Never return 0 for an eligible task that may be killed since it's
	 * possible that no single user task uses more than 0.1% of memory and
	 * no single admin tasks uses more than 3.0%.
	 */
	if (points <= 0)
		return 1;
D
David Rientjes 已提交
219
	return (points < 1000) ? points : 1000;
L
Linus Torvalds 已提交
220 221
}

222 223 224 225
/*
 * Determine the type of allocation constraint.
 */
#ifdef CONFIG_NUMA
226
static enum oom_constraint constrained_alloc(struct zonelist *zonelist,
D
David Rientjes 已提交
227 228
				gfp_t gfp_mask, nodemask_t *nodemask,
				unsigned long *totalpages)
229
{
230
	struct zone *zone;
231
	struct zoneref *z;
232
	enum zone_type high_zoneidx = gfp_zone(gfp_mask);
D
David Rientjes 已提交
233 234
	bool cpuset_limited = false;
	int nid;
235

D
David Rientjes 已提交
236 237 238 239 240
	/* Default to all available memory */
	*totalpages = totalram_pages + total_swap_pages;

	if (!zonelist)
		return CONSTRAINT_NONE;
241 242 243 244 245 246 247
	/*
	 * Reach here only when __GFP_NOFAIL is used. So, we should avoid
	 * to kill current.We have to random task kill in this case.
	 * Hopefully, CONSTRAINT_THISNODE...but no way to handle it, now.
	 */
	if (gfp_mask & __GFP_THISNODE)
		return CONSTRAINT_NONE;
248

249
	/*
D
David Rientjes 已提交
250 251 252
	 * This is not a __GFP_THISNODE allocation, so a truncated nodemask in
	 * the page allocator means a mempolicy is in effect.  Cpuset policy
	 * is enforced in get_page_from_freelist().
253
	 */
D
David Rientjes 已提交
254 255 256 257
	if (nodemask && !nodes_subset(node_states[N_HIGH_MEMORY], *nodemask)) {
		*totalpages = total_swap_pages;
		for_each_node_mask(nid, *nodemask)
			*totalpages += node_spanned_pages(nid);
258
		return CONSTRAINT_MEMORY_POLICY;
D
David Rientjes 已提交
259
	}
260 261 262 263 264

	/* Check this allocation failure is caused by cpuset's wall function */
	for_each_zone_zonelist_nodemask(zone, z, zonelist,
			high_zoneidx, nodemask)
		if (!cpuset_zone_allowed_softwall(zone, gfp_mask))
D
David Rientjes 已提交
265
			cpuset_limited = true;
266

D
David Rientjes 已提交
267 268 269 270 271 272
	if (cpuset_limited) {
		*totalpages = total_swap_pages;
		for_each_node_mask(nid, cpuset_current_mems_allowed)
			*totalpages += node_spanned_pages(nid);
		return CONSTRAINT_CPUSET;
	}
273 274
	return CONSTRAINT_NONE;
}
275 276
#else
static enum oom_constraint constrained_alloc(struct zonelist *zonelist,
D
David Rientjes 已提交
277 278
				gfp_t gfp_mask, nodemask_t *nodemask,
				unsigned long *totalpages)
279
{
D
David Rientjes 已提交
280
	*totalpages = totalram_pages + total_swap_pages;
281 282 283
	return CONSTRAINT_NONE;
}
#endif
284

L
Linus Torvalds 已提交
285 286 287 288 289 290
/*
 * Simple selection loop. We chose the process with the highest
 * number of 'points'. We expect the caller will lock the tasklist.
 *
 * (not docbooked, we don't want this one cluttering up the manual)
 */
D
David Rientjes 已提交
291 292 293
static struct task_struct *select_bad_process(unsigned int *ppoints,
		unsigned long totalpages, struct mem_cgroup *mem,
		const nodemask_t *nodemask)
L
Linus Torvalds 已提交
294
{
295
	struct task_struct *p;
L
Linus Torvalds 已提交
296
	struct task_struct *chosen = NULL;
297
	*ppoints = 0;
L
Linus Torvalds 已提交
298

299
	for_each_process(p) {
D
David Rientjes 已提交
300
		unsigned int points;
P
Paul Jackson 已提交
301

302
		if (oom_unkillable_task(p, mem, nodemask))
303
			continue;
304

305 306 307 308 309 310 311 312 313 314 315 316
		/*
		 * This task already has access to memory reserves and is
		 * being killed. Don't allow any other task access to the
		 * memory reserve.
		 *
		 * Note: this may have a chance of deadlock if it gets
		 * blocked waiting for another task which itself is waiting
		 * for memory. Is there a better alternative?
		 */
		if (test_tsk_thread_flag(p, TIF_MEMDIE))
			return ERR_PTR(-1UL);

P
Paul Jackson 已提交
317
		/*
318
		 * This is in the process of releasing memory so wait for it
P
Paul Jackson 已提交
319
		 * to finish before killing some other task by mistake.
320 321 322 323 324
		 *
		 * However, if p is the current task, we allow the 'kill' to
		 * go ahead if it is exiting: this will simply set TIF_MEMDIE,
		 * which will allow it to gain access to memory reserves in
		 * the process of exiting and releasing its resources.
325
		 * Otherwise we could get an easy OOM deadlock.
P
Paul Jackson 已提交
326
		 */
327
		if (thread_group_empty(p) && (p->flags & PF_EXITING) && p->mm) {
328 329 330
			if (p != current)
				return ERR_PTR(-1UL);

331
			chosen = p;
D
David Rientjes 已提交
332
			*ppoints = 1000;
333
		}
334

D
David Rientjes 已提交
335 336
		points = oom_badness(p, mem, nodemask, totalpages);
		if (points > *ppoints) {
P
Paul Jackson 已提交
337
			chosen = p;
338
			*ppoints = points;
L
Linus Torvalds 已提交
339
		}
340
	}
341

L
Linus Torvalds 已提交
342 343 344
	return chosen;
}

345
/**
R
Randy Dunlap 已提交
346
 * dump_tasks - dump current memory state of all system tasks
347
 * @mem: current's memory controller, if constrained
348
 * @nodemask: nodemask passed to page allocator for mempolicy ooms
R
Randy Dunlap 已提交
349
 *
350 351 352
 * Dumps the current memory state of all eligible tasks.  Tasks not in the same
 * memcg, not in the same cpuset, or bound to a disjoint set of mempolicy nodes
 * are not shown.
353
 * State information includes task's pid, uid, tgid, vm size, rss, cpu, oom_adj
D
David Rientjes 已提交
354
 * value, oom_score_adj value, and name.
355 356 357
 *
 * Call with tasklist_lock read-locked.
 */
358
static void dump_tasks(const struct mem_cgroup *mem, const nodemask_t *nodemask)
359
{
360 361
	struct task_struct *p;
	struct task_struct *task;
362

D
David Rientjes 已提交
363
	pr_info("[ pid ]   uid  tgid total_vm      rss cpu oom_adj oom_score_adj name\n");
364
	for_each_process(p) {
365
		if (oom_unkillable_task(p, mem, nodemask))
366
			continue;
367

368 369
		task = find_lock_task_mm(p);
		if (!task) {
370
			/*
371 372
			 * This is a kthread or all of p's threads have already
			 * detached their mm's.  There's no need to report
373
			 * them; they can't be oom killed anyway.
374 375 376
			 */
			continue;
		}
377

D
David Rientjes 已提交
378
		pr_info("[%5d] %5d %5d %8lu %8lu %3u     %3d         %5d %s\n",
379
			task->pid, task_uid(task), task->tgid,
D
David Rientjes 已提交
380 381 382
			task->mm->total_vm, get_mm_rss(task->mm),
			task_cpu(task), task->signal->oom_adj,
			task->signal->oom_score_adj, task->comm);
383 384
		task_unlock(task);
	}
385 386
}

387
static void dump_header(struct task_struct *p, gfp_t gfp_mask, int order,
388
			struct mem_cgroup *mem, const nodemask_t *nodemask)
389
{
390
	task_lock(current);
391
	pr_warning("%s invoked oom-killer: gfp_mask=0x%x, order=%d, "
D
David Rientjes 已提交
392 393 394
		"oom_adj=%d, oom_score_adj=%d\n",
		current->comm, gfp_mask, order, current->signal->oom_adj,
		current->signal->oom_score_adj);
395 396 397
	cpuset_print_task_mems_allowed(current);
	task_unlock(current);
	dump_stack();
398
	mem_cgroup_print_oom_info(mem, p);
399 400
	show_mem();
	if (sysctl_oom_dump_tasks)
401
		dump_tasks(mem, nodemask);
402 403
}

404
#define K(x) ((x) << (PAGE_SHIFT-10))
405
static int oom_kill_task(struct task_struct *p, struct mem_cgroup *mem)
L
Linus Torvalds 已提交
406
{
407 408 409
	struct task_struct *q;
	struct mm_struct *mm;

410
	p = find_lock_task_mm(p);
411
	if (!p)
412
		return 1;
413

414 415 416
	/* mm cannot be safely dereferenced after task_unlock(p) */
	mm = p->mm;

417 418 419 420
	pr_err("Killed process %d (%s) total-vm:%lukB, anon-rss:%lukB, file-rss:%lukB\n",
		task_pid_nr(p), p->comm, K(p->mm->total_vm),
		K(get_mm_counter(p->mm, MM_ANONPAGES)),
		K(get_mm_counter(p->mm, MM_FILEPAGES)));
421
	task_unlock(p);
L
Linus Torvalds 已提交
422

423 424 425 426 427 428 429 430 431 432 433 434 435 436 437 438 439 440
	/*
	 * Kill all processes sharing p->mm in other thread groups, if any.
	 * They don't get access to memory reserves or a higher scheduler
	 * priority, though, to avoid depletion of all memory or task
	 * starvation.  This prevents mm->mmap_sem livelock when an oom killed
	 * task cannot exit because it requires the semaphore and its contended
	 * by another thread trying to allocate memory itself.  That thread will
	 * now get access to memory reserves since it has a pending fatal
	 * signal.
	 */
	for_each_process(q)
		if (q->mm == mm && !same_thread_group(q, p)) {
			task_lock(q);	/* Protect ->comm from prctl() */
			pr_err("Kill process %d (%s) sharing same memory\n",
				task_pid_nr(q), q->comm);
			task_unlock(q);
			force_sig(SIGKILL, q);
		}
441

L
Linus Torvalds 已提交
442 443
	set_tsk_thread_flag(p, TIF_MEMDIE);
	force_sig(SIGKILL, p);
444 445 446 447 448 449 450 451

	/*
	 * We give our sacrificial lamb high priority and access to
	 * all the memory it needs. That way it should be able to
	 * exit() and clear out its resources quickly...
	 */
	boost_dying_task_prio(p, mem);

452
	return 0;
L
Linus Torvalds 已提交
453
}
454
#undef K
L
Linus Torvalds 已提交
455

456
static int oom_kill_process(struct task_struct *p, gfp_t gfp_mask, int order,
D
David Rientjes 已提交
457 458 459
			    unsigned int points, unsigned long totalpages,
			    struct mem_cgroup *mem, nodemask_t *nodemask,
			    const char *message)
L
Linus Torvalds 已提交
460
{
461
	struct task_struct *victim;
462
	struct task_struct *child;
463 464
	struct task_struct *t;
	unsigned int victim_points;
L
Linus Torvalds 已提交
465

466
	if (printk_ratelimit())
467
		dump_header(p, gfp_mask, order, mem, nodemask);
468

469 470 471 472
	/*
	 * If the task is already exiting, don't alarm the sysadmin or kill
	 * its children or threads, just set TIF_MEMDIE so it can die quickly
	 */
473
	if (p->flags & PF_EXITING) {
474
		set_tsk_thread_flag(p, TIF_MEMDIE);
475
		boost_dying_task_prio(p, mem);
476 477 478
		return 0;
	}

479
	task_lock(p);
D
David Rientjes 已提交
480
	pr_err("%s: Kill process %d (%s) score %d or sacrifice child\n",
481 482
		message, task_pid_nr(p), p->comm, points);
	task_unlock(p);
N
Nick Piggin 已提交
483

484 485 486 487 488 489
	/*
	 * If any of p's children has a different mm and is eligible for kill,
	 * the one with the highest badness() score is sacrificed for its
	 * parent.  This attempts to lose the minimal amount of work done while
	 * still freeing memory.
	 */
490 491 492
	victim_points = oom_badness(p, mem, nodemask, totalpages);
	victim = p;
	t = p;
493
	do {
494
		list_for_each_entry(child, &t->children, sibling) {
D
David Rientjes 已提交
495
			unsigned int child_points;
496

497 498
			if (child->mm == t->mm)
				continue;
D
David Rientjes 已提交
499 500 501 502 503
			/*
			 * oom_badness() returns 0 if the thread is unkillable
			 */
			child_points = oom_badness(child, mem, nodemask,
								totalpages);
504 505 506 507
			if (child_points > victim_points) {
				victim = child;
				victim_points = child_points;
			}
508 509 510
		}
	} while_each_thread(p, t);

511
	return oom_kill_task(victim, mem);
L
Linus Torvalds 已提交
512 513
}

514 515 516 517
/*
 * Determines whether the kernel must panic because of the panic_on_oom sysctl.
 */
static void check_panic_on_oom(enum oom_constraint constraint, gfp_t gfp_mask,
518
				int order, const nodemask_t *nodemask)
519 520 521 522 523 524 525 526 527 528 529 530 531
{
	if (likely(!sysctl_panic_on_oom))
		return;
	if (sysctl_panic_on_oom != 2) {
		/*
		 * panic_on_oom == 1 only affects CONSTRAINT_NONE, the kernel
		 * does not panic for cpuset, mempolicy, or memcg allocation
		 * failures.
		 */
		if (constraint != CONSTRAINT_NONE)
			return;
	}
	read_lock(&tasklist_lock);
532
	dump_header(NULL, gfp_mask, order, NULL, nodemask);
533 534 535 536 537
	read_unlock(&tasklist_lock);
	panic("Out of memory: %s panic_on_oom is enabled\n",
		sysctl_panic_on_oom == 2 ? "compulsory" : "system-wide");
}

538
#ifdef CONFIG_CGROUP_MEM_RES_CTLR
539 540
void mem_cgroup_out_of_memory(struct mem_cgroup *mem, gfp_t gfp_mask)
{
D
David Rientjes 已提交
541 542
	unsigned long limit;
	unsigned int points = 0;
543 544
	struct task_struct *p;

545
	check_panic_on_oom(CONSTRAINT_MEMCG, gfp_mask, 0, NULL);
D
David Rientjes 已提交
546
	limit = mem_cgroup_get_limit(mem) >> PAGE_SHIFT;
L
Li Zefan 已提交
547
	read_lock(&tasklist_lock);
548
retry:
D
David Rientjes 已提交
549
	p = select_bad_process(&points, limit, mem, NULL);
550
	if (!p || PTR_ERR(p) == -1UL)
551 552
		goto out;

D
David Rientjes 已提交
553
	if (oom_kill_process(p, gfp_mask, 0, points, limit, mem, NULL,
554 555 556
				"Memory cgroup out of memory"))
		goto retry;
out:
L
Li Zefan 已提交
557
	read_unlock(&tasklist_lock);
558 559 560
}
#endif

561 562 563 564 565 566 567 568 569 570 571 572 573 574
static BLOCKING_NOTIFIER_HEAD(oom_notify_list);

int register_oom_notifier(struct notifier_block *nb)
{
	return blocking_notifier_chain_register(&oom_notify_list, nb);
}
EXPORT_SYMBOL_GPL(register_oom_notifier);

int unregister_oom_notifier(struct notifier_block *nb)
{
	return blocking_notifier_chain_unregister(&oom_notify_list, nb);
}
EXPORT_SYMBOL_GPL(unregister_oom_notifier);

D
David Rientjes 已提交
575 576 577 578 579
/*
 * Try to acquire the OOM killer lock for the zones in zonelist.  Returns zero
 * if a parallel OOM killing is already taking place that includes a zone in
 * the zonelist.  Otherwise, locks all zones in the zonelist and returns 1.
 */
580
int try_set_zonelist_oom(struct zonelist *zonelist, gfp_t gfp_mask)
D
David Rientjes 已提交
581
{
582 583
	struct zoneref *z;
	struct zone *zone;
D
David Rientjes 已提交
584 585
	int ret = 1;

D
David Rientjes 已提交
586
	spin_lock(&zone_scan_lock);
587 588
	for_each_zone_zonelist(zone, z, zonelist, gfp_zone(gfp_mask)) {
		if (zone_is_oom_locked(zone)) {
D
David Rientjes 已提交
589 590 591
			ret = 0;
			goto out;
		}
592 593 594 595
	}

	for_each_zone_zonelist(zone, z, zonelist, gfp_zone(gfp_mask)) {
		/*
D
David Rientjes 已提交
596
		 * Lock each zone in the zonelist under zone_scan_lock so a
597
		 * parallel invocation of try_set_zonelist_oom() doesn't succeed
598 599 600 601
		 * when it shouldn't.
		 */
		zone_set_flag(zone, ZONE_OOM_LOCKED);
	}
D
David Rientjes 已提交
602 603

out:
D
David Rientjes 已提交
604
	spin_unlock(&zone_scan_lock);
D
David Rientjes 已提交
605 606 607 608 609 610 611 612
	return ret;
}

/*
 * Clears the ZONE_OOM_LOCKED flag for all zones in the zonelist so that failed
 * allocation attempts with zonelists containing them may now recall the OOM
 * killer, if necessary.
 */
613
void clear_zonelist_oom(struct zonelist *zonelist, gfp_t gfp_mask)
D
David Rientjes 已提交
614
{
615 616
	struct zoneref *z;
	struct zone *zone;
D
David Rientjes 已提交
617

D
David Rientjes 已提交
618
	spin_lock(&zone_scan_lock);
619 620 621
	for_each_zone_zonelist(zone, z, zonelist, gfp_zone(gfp_mask)) {
		zone_clear_flag(zone, ZONE_OOM_LOCKED);
	}
D
David Rientjes 已提交
622
	spin_unlock(&zone_scan_lock);
D
David Rientjes 已提交
623 624
}

625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661
/*
 * Try to acquire the oom killer lock for all system zones.  Returns zero if a
 * parallel oom killing is taking place, otherwise locks all zones and returns
 * non-zero.
 */
static int try_set_system_oom(void)
{
	struct zone *zone;
	int ret = 1;

	spin_lock(&zone_scan_lock);
	for_each_populated_zone(zone)
		if (zone_is_oom_locked(zone)) {
			ret = 0;
			goto out;
		}
	for_each_populated_zone(zone)
		zone_set_flag(zone, ZONE_OOM_LOCKED);
out:
	spin_unlock(&zone_scan_lock);
	return ret;
}

/*
 * Clears ZONE_OOM_LOCKED for all system zones so that failed allocation
 * attempts or page faults may now recall the oom killer, if necessary.
 */
static void clear_system_oom(void)
{
	struct zone *zone;

	spin_lock(&zone_scan_lock);
	for_each_populated_zone(zone)
		zone_clear_flag(zone, ZONE_OOM_LOCKED);
	spin_unlock(&zone_scan_lock);
}

L
Linus Torvalds 已提交
662
/**
663
 * out_of_memory - kill the "best" process when we run out of memory
R
Randy Dunlap 已提交
664 665 666
 * @zonelist: zonelist pointer
 * @gfp_mask: memory allocation flags
 * @order: amount of memory being requested as a power of 2
667
 * @nodemask: nodemask passed to page allocator
L
Linus Torvalds 已提交
668 669 670 671 672 673
 *
 * If we run out of memory, we have the choice between either
 * killing a random task (bad), letting the system crash (worse)
 * OR try to be smart about which process to kill. Note that we
 * don't have to be perfect here, we just have to be good.
 */
674 675
void out_of_memory(struct zonelist *zonelist, gfp_t gfp_mask,
		int order, nodemask_t *nodemask)
L
Linus Torvalds 已提交
676
{
677
	const nodemask_t *mpol_mask;
678
	struct task_struct *p;
D
David Rientjes 已提交
679
	unsigned long totalpages;
680
	unsigned long freed = 0;
D
David Rientjes 已提交
681
	unsigned int points;
682
	enum oom_constraint constraint = CONSTRAINT_NONE;
K
KOSAKI Motohiro 已提交
683
	int killed = 0;
684 685 686 687 688

	blocking_notifier_call_chain(&oom_notify_list, 0, &freed);
	if (freed > 0)
		/* Got some memory back in the last second. */
		return;
L
Linus Torvalds 已提交
689

690 691 692 693 694 695 696
	/*
	 * If current has a pending SIGKILL, then automatically select it.  The
	 * goal is to allow it to allocate so that it may quickly exit and free
	 * its memory.
	 */
	if (fatal_signal_pending(current)) {
		set_thread_flag(TIF_MEMDIE);
697
		boost_dying_task_prio(current, NULL);
698 699 700
		return;
	}

701 702 703 704
	/*
	 * Check if there were limitations on the allocation (only relevant for
	 * NUMA) that may require different handling.
	 */
D
David Rientjes 已提交
705 706
	constraint = constrained_alloc(zonelist, gfp_mask, nodemask,
						&totalpages);
707 708
	mpol_mask = (constraint == CONSTRAINT_MEMORY_POLICY) ? nodemask : NULL;
	check_panic_on_oom(constraint, gfp_mask, order, mpol_mask);
709

D
David Rientjes 已提交
710
	read_lock(&tasklist_lock);
711
	if (sysctl_oom_kill_allocating_task &&
712
	    !oom_unkillable_task(current, NULL, nodemask) &&
713
	    current->mm && !atomic_read(&current->mm->oom_disable_count)) {
714 715 716 717 718
		/*
		 * oom_kill_process() needs tasklist_lock held.  If it returns
		 * non-zero, current could not be killed so we must fallback to
		 * the tasklist scan.
		 */
D
David Rientjes 已提交
719 720
		if (!oom_kill_process(current, gfp_mask, order, 0, totalpages,
				NULL, nodemask,
721
				"Out of memory (oom_kill_allocating_task)"))
K
KOSAKI Motohiro 已提交
722
			goto out;
723 724 725
	}

retry:
726
	p = select_bad_process(&points, totalpages, NULL, mpol_mask);
727
	if (PTR_ERR(p) == -1UL)
K
KOSAKI Motohiro 已提交
728
		goto out;
729 730 731

	/* Found nothing?!?! Either we hang forever, or we panic. */
	if (!p) {
732
		dump_header(NULL, gfp_mask, order, NULL, mpol_mask);
733 734 735 736
		read_unlock(&tasklist_lock);
		panic("Out of memory and no killable processes...\n");
	}

D
David Rientjes 已提交
737 738
	if (oom_kill_process(p, gfp_mask, order, points, totalpages, NULL,
				nodemask, "Out of memory"))
739
		goto retry;
K
KOSAKI Motohiro 已提交
740 741
	killed = 1;
out:
742
	read_unlock(&tasklist_lock);
L
Linus Torvalds 已提交
743 744 745

	/*
	 * Give "p" a good chance of killing itself before we
746
	 * retry to allocate memory unless "p" is current
L
Linus Torvalds 已提交
747
	 */
K
KOSAKI Motohiro 已提交
748
	if (killed && !test_thread_flag(TIF_MEMDIE))
749
		schedule_timeout_uninterruptible(1);
L
Linus Torvalds 已提交
750
}
751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766

/*
 * The pagefault handler calls here because it is out of memory, so kill a
 * memory-hogging task.  If a populated zone has ZONE_OOM_LOCKED set, a parallel
 * oom killing is already in progress so do nothing.  If a task is found with
 * TIF_MEMDIE set, it has been killed so do nothing and allow it to exit.
 */
void pagefault_out_of_memory(void)
{
	if (try_set_system_oom()) {
		out_of_memory(NULL, 0, 0, NULL);
		clear_system_oom();
	}
	if (!test_thread_flag(TIF_MEMDIE))
		schedule_timeout_uninterruptible(1);
}