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>
34
#include <linux/ptrace.h>
35
#include <linux/freezer.h>
L
Linus Torvalds 已提交
36

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

42 43 44 45 46 47 48 49 50 51 52 53 54 55 56
/**
 * test_set_oom_score_adj() - set current's oom_score_adj and return old value
 * @new_val: new oom_score_adj value
 *
 * Sets the oom_score_adj value for current to @new_val with proper
 * synchronization and returns the old value.  Usually used to temporarily
 * set a value, save the old value in the caller, and then reinstate it later.
 */
int test_set_oom_score_adj(int new_val)
{
	struct sighand_struct *sighand = current->sighand;
	int old_val;

	spin_lock_irq(&sighand->siglock);
	old_val = current->signal->oom_score_adj;
D
David Rientjes 已提交
57
	current->signal->oom_score_adj = new_val;
58 59 60 61 62
	spin_unlock_irq(&sighand->siglock);

	return old_val;
}

63 64 65 66 67 68 69 70 71
#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.
72
 */
73 74
static bool has_intersects_mems_allowed(struct task_struct *tsk,
					const nodemask_t *mask)
75
{
76
	struct task_struct *start = tsk;
77 78

	do {
79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95
		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;
		}
96 97
	} while_each_thread(start, tsk);

98 99 100 101 102 103 104
	return false;
}
#else
static bool has_intersects_mems_allowed(struct task_struct *tsk,
					const nodemask_t *mask)
{
	return true;
105
}
106
#endif /* CONFIG_NUMA */
107

108 109 110 111 112 113
/*
 * 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.
 */
114
struct task_struct *find_lock_task_mm(struct task_struct *p)
115 116 117 118 119 120 121 122 123 124 125 126 127
{
	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;
}

128
/* return true if the task is not adequate as candidate victim task. */
129 130
static bool oom_unkillable_task(struct task_struct *p,
		const struct mem_cgroup *mem, const nodemask_t *nodemask)
131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147
{
	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 已提交
148
/**
D
David Rientjes 已提交
149
 * oom_badness - heuristic function to determine which candidate task to kill
L
Linus Torvalds 已提交
150
 * @p: task struct of which task we should calculate
D
David Rientjes 已提交
151
 * @totalpages: total present RAM allowed for page allocation
L
Linus Torvalds 已提交
152
 *
D
David Rientjes 已提交
153 154 155
 * 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 已提交
156
 */
D
David Rientjes 已提交
157 158
unsigned int oom_badness(struct task_struct *p, struct mem_cgroup *mem,
		      const nodemask_t *nodemask, unsigned long totalpages)
L
Linus Torvalds 已提交
159
{
D
David Rientjes 已提交
160
	int points;
161

162 163
	if (oom_unkillable_task(p, mem, nodemask))
		return 0;
L
Linus Torvalds 已提交
164

165 166
	p = find_lock_task_mm(p);
	if (!p)
L
Linus Torvalds 已提交
167 168 169
		return 0;

	/*
D
David Rientjes 已提交
170 171
	 * The memory controller may have a limit of 0 bytes, so avoid a divide
	 * by zero, if necessary.
L
Linus Torvalds 已提交
172
	 */
D
David Rientjes 已提交
173 174
	if (!totalpages)
		totalpages = 1;
L
Linus Torvalds 已提交
175 176

	/*
D
David Rientjes 已提交
177
	 * The baseline for the badness score is the proportion of RAM that each
178
	 * task's rss, pagetable and swap space use.
L
Linus Torvalds 已提交
179
	 */
180 181 182 183 184
	points = get_mm_rss(p->mm) + p->mm->nr_ptes;
	points += get_mm_counter(p->mm, MM_SWAPENTS);

	points *= 1000;
	points /= totalpages;
D
David Rientjes 已提交
185
	task_unlock(p);
L
Linus Torvalds 已提交
186 187

	/*
D
David Rientjes 已提交
188 189
	 * Root processes get 3% bonus, just like the __vm_enough_memory()
	 * implementation used by LSMs.
L
Linus Torvalds 已提交
190
	 */
D
David Rientjes 已提交
191 192
	if (has_capability_noaudit(p, CAP_SYS_ADMIN))
		points -= 30;
L
Linus Torvalds 已提交
193 194

	/*
D
David Rientjes 已提交
195 196 197
	 * /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 已提交
198
	 */
D
David Rientjes 已提交
199
	points += p->signal->oom_score_adj;
L
Linus Torvalds 已提交
200

201 202 203 204 205 206 207
	/*
	 * 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 已提交
208
	return (points < 1000) ? points : 1000;
L
Linus Torvalds 已提交
209 210
}

211 212 213 214
/*
 * Determine the type of allocation constraint.
 */
#ifdef CONFIG_NUMA
215
static enum oom_constraint constrained_alloc(struct zonelist *zonelist,
D
David Rientjes 已提交
216 217
				gfp_t gfp_mask, nodemask_t *nodemask,
				unsigned long *totalpages)
218
{
219
	struct zone *zone;
220
	struct zoneref *z;
221
	enum zone_type high_zoneidx = gfp_zone(gfp_mask);
D
David Rientjes 已提交
222 223
	bool cpuset_limited = false;
	int nid;
224

D
David Rientjes 已提交
225 226 227 228 229
	/* Default to all available memory */
	*totalpages = totalram_pages + total_swap_pages;

	if (!zonelist)
		return CONSTRAINT_NONE;
230 231 232 233 234 235 236
	/*
	 * 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;
237

238
	/*
D
David Rientjes 已提交
239 240 241
	 * 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().
242
	 */
D
David Rientjes 已提交
243 244 245 246
	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);
247
		return CONSTRAINT_MEMORY_POLICY;
D
David Rientjes 已提交
248
	}
249 250 251 252 253

	/* 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 已提交
254
			cpuset_limited = true;
255

D
David Rientjes 已提交
256 257 258 259 260 261
	if (cpuset_limited) {
		*totalpages = total_swap_pages;
		for_each_node_mask(nid, cpuset_current_mems_allowed)
			*totalpages += node_spanned_pages(nid);
		return CONSTRAINT_CPUSET;
	}
262 263
	return CONSTRAINT_NONE;
}
264 265
#else
static enum oom_constraint constrained_alloc(struct zonelist *zonelist,
D
David Rientjes 已提交
266 267
				gfp_t gfp_mask, nodemask_t *nodemask,
				unsigned long *totalpages)
268
{
D
David Rientjes 已提交
269
	*totalpages = totalram_pages + total_swap_pages;
270 271 272
	return CONSTRAINT_NONE;
}
#endif
273

L
Linus Torvalds 已提交
274 275 276 277 278 279
/*
 * 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 已提交
280 281 282
static struct task_struct *select_bad_process(unsigned int *ppoints,
		unsigned long totalpages, struct mem_cgroup *mem,
		const nodemask_t *nodemask)
L
Linus Torvalds 已提交
283
{
284
	struct task_struct *g, *p;
L
Linus Torvalds 已提交
285
	struct task_struct *chosen = NULL;
286
	*ppoints = 0;
L
Linus Torvalds 已提交
287

288
	do_each_thread(g, p) {
D
David Rientjes 已提交
289
		unsigned int points;
P
Paul Jackson 已提交
290

291
		if (p->exit_state)
292
			continue;
293
		if (oom_unkillable_task(p, mem, nodemask))
294
			continue;
295

296 297 298 299 300 301 302 303 304
		/*
		 * 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?
		 */
305 306 307
		if (test_tsk_thread_flag(p, TIF_MEMDIE)) {
			if (unlikely(frozen(p)))
				thaw_process(p);
308
			return ERR_PTR(-1UL);
309
		}
310 311
		if (!p->mm)
			continue;
312

313
		if (p->flags & PF_EXITING) {
314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331
			/*
			 * If p is the current task and is in the process of
			 * releasing memory, we allow the "kill" to set
			 * TIF_MEMDIE, which will allow it to gain access to
			 * memory reserves.  Otherwise, it may stall forever.
			 *
			 * The loop isn't broken here, however, in case other
			 * threads are found to have already been oom killed.
			 */
			if (p == current) {
				chosen = p;
				*ppoints = 1000;
			} else {
				/*
				 * If this task is not being ptraced on exit,
				 * then wait for it to finish before killing
				 * some other task unnecessarily.
				 */
T
Tejun Heo 已提交
332
				if (!(p->group_leader->ptrace & PT_TRACE_EXIT))
333 334
					return ERR_PTR(-1UL);
			}
335
		}
336

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

L
Linus Torvalds 已提交
344 345 346
	return chosen;
}

347
/**
R
Randy Dunlap 已提交
348
 * dump_tasks - dump current memory state of all system tasks
349
 * @mem: current's memory controller, if constrained
350
 * @nodemask: nodemask passed to page allocator for mempolicy ooms
R
Randy Dunlap 已提交
351
 *
352 353 354
 * 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.
355
 * State information includes task's pid, uid, tgid, vm size, rss, cpu, oom_adj
D
David Rientjes 已提交
356
 * value, oom_score_adj value, and name.
357 358 359
 *
 * Call with tasklist_lock read-locked.
 */
360
static void dump_tasks(const struct mem_cgroup *mem, const nodemask_t *nodemask)
361
{
362 363
	struct task_struct *p;
	struct task_struct *task;
364

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

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

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

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

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

412
	p = find_lock_task_mm(p);
413
	if (!p)
414
		return 1;
415

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

419 420 421 422
	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)));
423
	task_unlock(p);
L
Linus Torvalds 已提交
424

425
	/*
426
	 * Kill all user processes sharing p->mm in other thread groups, if any.
427 428 429 430 431 432 433 434 435
	 * 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)
436 437
		if (q->mm == mm && !same_thread_group(q, p) &&
		    !(q->flags & PF_KTHREAD)) {
D
David Rientjes 已提交
438 439 440
			if (q->signal->oom_score_adj == OOM_SCORE_ADJ_MIN)
				continue;

441 442 443 444 445 446
			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);
		}
447

L
Linus Torvalds 已提交
448 449
	set_tsk_thread_flag(p, TIF_MEMDIE);
	force_sig(SIGKILL, p);
450

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

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

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

468 469 470 471
	/*
	 * 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
	 */
472
	if (p->flags & PF_EXITING) {
473
		set_tsk_thread_flag(p, TIF_MEMDIE);
474 475 476
		return 0;
	}

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

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

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

506
	return oom_kill_task(victim, mem);
L
Linus Torvalds 已提交
507 508
}

509 510 511 512
/*
 * 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,
513
				int order, const nodemask_t *nodemask)
514 515 516 517 518 519 520 521 522 523 524 525 526
{
	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);
527
	dump_header(NULL, gfp_mask, order, NULL, nodemask);
528 529 530 531 532
	read_unlock(&tasklist_lock);
	panic("Out of memory: %s panic_on_oom is enabled\n",
		sysctl_panic_on_oom == 2 ? "compulsory" : "system-wide");
}

533
#ifdef CONFIG_CGROUP_MEM_RES_CTLR
534 535
void mem_cgroup_out_of_memory(struct mem_cgroup *mem, gfp_t gfp_mask)
{
D
David Rientjes 已提交
536 537
	unsigned long limit;
	unsigned int points = 0;
538 539
	struct task_struct *p;

540 541 542 543 544 545 546 547 548 549
	/*
	 * 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);
		return;
	}

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

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

566 567 568 569 570 571 572 573 574 575 576 577 578 579
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 已提交
580 581 582 583 584
/*
 * 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.
 */
585
int try_set_zonelist_oom(struct zonelist *zonelist, gfp_t gfp_mask)
D
David Rientjes 已提交
586
{
587 588
	struct zoneref *z;
	struct zone *zone;
D
David Rientjes 已提交
589 590
	int ret = 1;

D
David Rientjes 已提交
591
	spin_lock(&zone_scan_lock);
592 593
	for_each_zone_zonelist(zone, z, zonelist, gfp_zone(gfp_mask)) {
		if (zone_is_oom_locked(zone)) {
D
David Rientjes 已提交
594 595 596
			ret = 0;
			goto out;
		}
597 598 599 600
	}

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

out:
D
David Rientjes 已提交
609
	spin_unlock(&zone_scan_lock);
D
David Rientjes 已提交
610 611 612 613 614 615 616 617
	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.
 */
618
void clear_zonelist_oom(struct zonelist *zonelist, gfp_t gfp_mask)
D
David Rientjes 已提交
619
{
620 621
	struct zoneref *z;
	struct zone *zone;
D
David Rientjes 已提交
622

D
David Rientjes 已提交
623
	spin_lock(&zone_scan_lock);
624 625 626
	for_each_zone_zonelist(zone, z, zonelist, gfp_zone(gfp_mask)) {
		zone_clear_flag(zone, ZONE_OOM_LOCKED);
	}
D
David Rientjes 已提交
627
	spin_unlock(&zone_scan_lock);
D
David Rientjes 已提交
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 662 663 664 665 666
/*
 * 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 已提交
667
/**
668
 * out_of_memory - kill the "best" process when we run out of memory
R
Randy Dunlap 已提交
669 670 671
 * @zonelist: zonelist pointer
 * @gfp_mask: memory allocation flags
 * @order: amount of memory being requested as a power of 2
672
 * @nodemask: nodemask passed to page allocator
L
Linus Torvalds 已提交
673 674 675 676 677 678
 *
 * 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.
 */
679 680
void out_of_memory(struct zonelist *zonelist, gfp_t gfp_mask,
		int order, nodemask_t *nodemask)
L
Linus Torvalds 已提交
681
{
682
	const nodemask_t *mpol_mask;
683
	struct task_struct *p;
D
David Rientjes 已提交
684
	unsigned long totalpages;
685
	unsigned long freed = 0;
D
David Rientjes 已提交
686
	unsigned int points;
687
	enum oom_constraint constraint = CONSTRAINT_NONE;
K
KOSAKI Motohiro 已提交
688
	int killed = 0;
689 690 691 692 693

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

695 696 697 698 699 700 701 702 703 704
	/*
	 * 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);
		return;
	}

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

D
David Rientjes 已提交
714
	read_lock(&tasklist_lock);
715
	if (sysctl_oom_kill_allocating_task &&
716
	    !oom_unkillable_task(current, NULL, nodemask) &&
D
David Rientjes 已提交
717
	    current->mm) {
718 719 720 721 722
		/*
		 * 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 已提交
723 724
		if (!oom_kill_process(current, gfp_mask, order, 0, totalpages,
				NULL, nodemask,
725
				"Out of memory (oom_kill_allocating_task)"))
K
KOSAKI Motohiro 已提交
726
			goto out;
727 728 729
	}

retry:
730
	p = select_bad_process(&points, totalpages, NULL, mpol_mask);
731
	if (PTR_ERR(p) == -1UL)
K
KOSAKI Motohiro 已提交
732
		goto out;
733 734 735

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

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

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

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