ARM: OMAP3: PM: remove access to PRM_VOLTCTRL register
[pandora-kernel.git] / mm / oom_kill.c
1 /*
2  *  linux/mm/oom_kill.c
3  * 
4  *  Copyright (C)  1998,2000  Rik van Riel
5  *      Thanks go out to Claus Fischer for some serious inspiration and
6  *      for goading me into coding this file...
7  *  Copyright (C)  2010  Google, Inc.
8  *      Rewritten by David Rientjes
9  *
10  *  The routines in this file are used to kill a process when
11  *  we're seriously out of memory. This gets called from __alloc_pages()
12  *  in mm/page_alloc.c when we really run out of memory.
13  *
14  *  Since we won't call these routines often (on a well-configured
15  *  machine) this file will double as a 'coding guide' and a signpost
16  *  for newbie kernel hackers. It features several pointers to major
17  *  kernel subsystems and hints as to where to find out what things do.
18  */
19
20 #include <linux/oom.h>
21 #include <linux/mm.h>
22 #include <linux/err.h>
23 #include <linux/gfp.h>
24 #include <linux/sched.h>
25 #include <linux/swap.h>
26 #include <linux/timex.h>
27 #include <linux/jiffies.h>
28 #include <linux/cpuset.h>
29 #include <linux/export.h>
30 #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>
36
37 int sysctl_panic_on_oom;
38 int sysctl_oom_kill_allocating_task;
39 int sysctl_oom_dump_tasks = 1;
40 static DEFINE_SPINLOCK(zone_scan_lock);
41
42 /*
43  * compare_swap_oom_score_adj() - compare and swap current's oom_score_adj
44  * @old_val: old oom_score_adj for compare
45  * @new_val: new oom_score_adj for swap
46  *
47  * Sets the oom_score_adj value for current to @new_val iff its present value is
48  * @old_val.  Usually used to reinstate a previous value to prevent racing with
49  * userspacing tuning the value in the interim.
50  */
51 void compare_swap_oom_score_adj(int old_val, int new_val)
52 {
53         struct sighand_struct *sighand = current->sighand;
54
55         spin_lock_irq(&sighand->siglock);
56         if (current->signal->oom_score_adj == old_val)
57                 current->signal->oom_score_adj = new_val;
58         spin_unlock_irq(&sighand->siglock);
59 }
60
61 /**
62  * test_set_oom_score_adj() - set current's oom_score_adj and return old value
63  * @new_val: new oom_score_adj value
64  *
65  * Sets the oom_score_adj value for current to @new_val with proper
66  * synchronization and returns the old value.  Usually used to temporarily
67  * set a value, save the old value in the caller, and then reinstate it later.
68  */
69 int test_set_oom_score_adj(int new_val)
70 {
71         struct sighand_struct *sighand = current->sighand;
72         int old_val;
73
74         spin_lock_irq(&sighand->siglock);
75         old_val = current->signal->oom_score_adj;
76         current->signal->oom_score_adj = new_val;
77         spin_unlock_irq(&sighand->siglock);
78
79         return old_val;
80 }
81
82 #ifdef CONFIG_NUMA
83 /**
84  * has_intersects_mems_allowed() - check task eligiblity for kill
85  * @tsk: task struct of which task to consider
86  * @mask: nodemask passed to page allocator for mempolicy ooms
87  *
88  * Task eligibility is determined by whether or not a candidate task, @tsk,
89  * shares the same mempolicy nodes as current if it is bound by such a policy
90  * and whether or not it has the same set of allowed cpuset nodes.
91  */
92 static bool has_intersects_mems_allowed(struct task_struct *tsk,
93                                         const nodemask_t *mask)
94 {
95         struct task_struct *start = tsk;
96
97         do {
98                 if (mask) {
99                         /*
100                          * If this is a mempolicy constrained oom, tsk's
101                          * cpuset is irrelevant.  Only return true if its
102                          * mempolicy intersects current, otherwise it may be
103                          * needlessly killed.
104                          */
105                         if (mempolicy_nodemask_intersects(tsk, mask))
106                                 return true;
107                 } else {
108                         /*
109                          * This is not a mempolicy constrained oom, so only
110                          * check the mems of tsk's cpuset.
111                          */
112                         if (cpuset_mems_allowed_intersects(current, tsk))
113                                 return true;
114                 }
115         } while_each_thread(start, tsk);
116
117         return false;
118 }
119 #else
120 static bool has_intersects_mems_allowed(struct task_struct *tsk,
121                                         const nodemask_t *mask)
122 {
123         return true;
124 }
125 #endif /* CONFIG_NUMA */
126
127 /*
128  * The process p may have detached its own ->mm while exiting or through
129  * use_mm(), but one or more of its subthreads may still have a valid
130  * pointer.  Return p, or any of its subthreads with a valid ->mm, with
131  * task_lock() held.
132  */
133 struct task_struct *find_lock_task_mm(struct task_struct *p)
134 {
135         struct task_struct *t = p;
136
137         do {
138                 task_lock(t);
139                 if (likely(t->mm))
140                         return t;
141                 task_unlock(t);
142         } while_each_thread(p, t);
143
144         return NULL;
145 }
146 EXPORT_SYMBOL_GPL(find_lock_task_mm);
147
148 /* return true if the task is not adequate as candidate victim task. */
149 static bool oom_unkillable_task(struct task_struct *p,
150                 const struct mem_cgroup *mem, const nodemask_t *nodemask)
151 {
152         if (is_global_init(p))
153                 return true;
154         if (p->flags & PF_KTHREAD)
155                 return true;
156
157         /* When mem_cgroup_out_of_memory() and p is not member of the group */
158         if (mem && !task_in_mem_cgroup(p, mem))
159                 return true;
160
161         /* p may not have freeable memory in nodemask */
162         if (!has_intersects_mems_allowed(p, nodemask))
163                 return true;
164
165         return false;
166 }
167
168 /**
169  * oom_badness - heuristic function to determine which candidate task to kill
170  * @p: task struct of which task we should calculate
171  * @totalpages: total present RAM allowed for page allocation
172  *
173  * The heuristic for determining which task to kill is made to be as simple and
174  * predictable as possible.  The goal is to return the highest value for the
175  * task consuming the most memory to avoid subsequent oom failures.
176  */
177 unsigned int oom_badness(struct task_struct *p, struct mem_cgroup *mem,
178                       const nodemask_t *nodemask, unsigned long totalpages)
179 {
180         long points;
181
182         if (oom_unkillable_task(p, mem, nodemask))
183                 return 0;
184
185         p = find_lock_task_mm(p);
186         if (!p)
187                 return 0;
188
189         if (p->signal->oom_score_adj == OOM_SCORE_ADJ_MIN) {
190                 task_unlock(p);
191                 return 0;
192         }
193
194         /*
195          * The memory controller may have a limit of 0 bytes, so avoid a divide
196          * by zero, if necessary.
197          */
198         if (!totalpages)
199                 totalpages = 1;
200
201         /*
202          * The baseline for the badness score is the proportion of RAM that each
203          * task's rss, pagetable and swap space use.
204          */
205         points = get_mm_rss(p->mm) + p->mm->nr_ptes;
206         points += get_mm_counter(p->mm, MM_SWAPENTS);
207
208         points *= 1000;
209         points /= totalpages;
210         task_unlock(p);
211
212         /*
213          * Root processes get 3% bonus, just like the __vm_enough_memory()
214          * implementation used by LSMs.
215          */
216         if (has_capability_noaudit(p, CAP_SYS_ADMIN))
217                 points -= (points * 3) / 100;
218
219         /*
220          * /proc/pid/oom_score_adj ranges from -1000 to +1000 such that it may
221          * either completely disable oom killing or always prefer a certain
222          * task.
223          */
224         points += p->signal->oom_score_adj;
225
226         /*
227          * Never return 0 for an eligible task that may be killed since it's
228          * possible that no single user task uses more than 0.1% of memory and
229          * no single admin tasks uses more than 3.0%.
230          */
231         if (points <= 0)
232                 return 1;
233         return (points < 1000) ? points : 1000;
234 }
235
236 /*
237  * Determine the type of allocation constraint.
238  */
239 #ifdef CONFIG_NUMA
240 static enum oom_constraint constrained_alloc(struct zonelist *zonelist,
241                                 gfp_t gfp_mask, nodemask_t *nodemask,
242                                 unsigned long *totalpages)
243 {
244         struct zone *zone;
245         struct zoneref *z;
246         enum zone_type high_zoneidx = gfp_zone(gfp_mask);
247         bool cpuset_limited = false;
248         int nid;
249
250         /* Default to all available memory */
251         *totalpages = totalram_pages + total_swap_pages;
252
253         if (!zonelist)
254                 return CONSTRAINT_NONE;
255         /*
256          * Reach here only when __GFP_NOFAIL is used. So, we should avoid
257          * to kill current.We have to random task kill in this case.
258          * Hopefully, CONSTRAINT_THISNODE...but no way to handle it, now.
259          */
260         if (gfp_mask & __GFP_THISNODE)
261                 return CONSTRAINT_NONE;
262
263         /*
264          * This is not a __GFP_THISNODE allocation, so a truncated nodemask in
265          * the page allocator means a mempolicy is in effect.  Cpuset policy
266          * is enforced in get_page_from_freelist().
267          */
268         if (nodemask && !nodes_subset(node_states[N_HIGH_MEMORY], *nodemask)) {
269                 *totalpages = total_swap_pages;
270                 for_each_node_mask(nid, *nodemask)
271                         *totalpages += node_spanned_pages(nid);
272                 return CONSTRAINT_MEMORY_POLICY;
273         }
274
275         /* Check this allocation failure is caused by cpuset's wall function */
276         for_each_zone_zonelist_nodemask(zone, z, zonelist,
277                         high_zoneidx, nodemask)
278                 if (!cpuset_zone_allowed_softwall(zone, gfp_mask))
279                         cpuset_limited = true;
280
281         if (cpuset_limited) {
282                 *totalpages = total_swap_pages;
283                 for_each_node_mask(nid, cpuset_current_mems_allowed)
284                         *totalpages += node_spanned_pages(nid);
285                 return CONSTRAINT_CPUSET;
286         }
287         return CONSTRAINT_NONE;
288 }
289 #else
290 static enum oom_constraint constrained_alloc(struct zonelist *zonelist,
291                                 gfp_t gfp_mask, nodemask_t *nodemask,
292                                 unsigned long *totalpages)
293 {
294         *totalpages = totalram_pages + total_swap_pages;
295         return CONSTRAINT_NONE;
296 }
297 #endif
298
299 /*
300  * Simple selection loop. We chose the process with the highest
301  * number of 'points'. We expect the caller will lock the tasklist.
302  *
303  * (not docbooked, we don't want this one cluttering up the manual)
304  */
305 static struct task_struct *select_bad_process(unsigned int *ppoints,
306                 unsigned long totalpages, struct mem_cgroup *mem,
307                 const nodemask_t *nodemask)
308 {
309         struct task_struct *g, *p;
310         struct task_struct *chosen = NULL;
311         *ppoints = 0;
312
313         do_each_thread(g, p) {
314                 unsigned int points;
315
316                 if (p->exit_state)
317                         continue;
318                 if (oom_unkillable_task(p, mem, nodemask))
319                         continue;
320
321                 /*
322                  * This task already has access to memory reserves and is
323                  * being killed. Don't allow any other task access to the
324                  * memory reserve.
325                  *
326                  * Note: this may have a chance of deadlock if it gets
327                  * blocked waiting for another task which itself is waiting
328                  * for memory. Is there a better alternative?
329                  */
330                 if (test_tsk_thread_flag(p, TIF_MEMDIE)) {
331                         if (unlikely(frozen(p)))
332                                 thaw_process(p);
333                         return ERR_PTR(-1UL);
334                 }
335                 if (!p->mm)
336                         continue;
337
338                 if (p->flags & PF_EXITING) {
339                         /*
340                          * If p is the current task and is in the process of
341                          * releasing memory, we allow the "kill" to set
342                          * TIF_MEMDIE, which will allow it to gain access to
343                          * memory reserves.  Otherwise, it may stall forever.
344                          *
345                          * The loop isn't broken here, however, in case other
346                          * threads are found to have already been oom killed.
347                          */
348                         if (p == current) {
349                                 chosen = p;
350                                 *ppoints = 1000;
351                         } else {
352                                 /*
353                                  * If this task is not being ptraced on exit,
354                                  * then wait for it to finish before killing
355                                  * some other task unnecessarily.
356                                  */
357                                 if (!(p->group_leader->ptrace & PT_TRACE_EXIT))
358                                         return ERR_PTR(-1UL);
359                         }
360                 }
361
362                 points = oom_badness(p, mem, nodemask, totalpages);
363                 if (points > *ppoints) {
364                         chosen = p;
365                         *ppoints = points;
366                 }
367         } while_each_thread(g, p);
368
369         return chosen;
370 }
371
372 /**
373  * dump_tasks - dump current memory state of all system tasks
374  * @mem: current's memory controller, if constrained
375  * @nodemask: nodemask passed to page allocator for mempolicy ooms
376  *
377  * Dumps the current memory state of all eligible tasks.  Tasks not in the same
378  * memcg, not in the same cpuset, or bound to a disjoint set of mempolicy nodes
379  * are not shown.
380  * State information includes task's pid, uid, tgid, vm size, rss, cpu, oom_adj
381  * value, oom_score_adj value, and name.
382  *
383  * Call with tasklist_lock read-locked.
384  */
385 static void dump_tasks(const struct mem_cgroup *mem, const nodemask_t *nodemask)
386 {
387         struct task_struct *p;
388         struct task_struct *task;
389
390         pr_info("[ pid ]   uid  tgid total_vm      rss cpu oom_adj oom_score_adj name\n");
391         for_each_process(p) {
392                 if (oom_unkillable_task(p, mem, nodemask))
393                         continue;
394
395                 task = find_lock_task_mm(p);
396                 if (!task) {
397                         /*
398                          * This is a kthread or all of p's threads have already
399                          * detached their mm's.  There's no need to report
400                          * them; they can't be oom killed anyway.
401                          */
402                         continue;
403                 }
404
405                 pr_info("[%5d] %5d %5d %8lu %8lu %3u     %3d         %5d %s\n",
406                         task->pid, task_uid(task), task->tgid,
407                         task->mm->total_vm, get_mm_rss(task->mm),
408                         task_cpu(task), task->signal->oom_adj,
409                         task->signal->oom_score_adj, task->comm);
410                 task_unlock(task);
411         }
412 }
413
414 static void dump_header(struct task_struct *p, gfp_t gfp_mask, int order,
415                         struct mem_cgroup *mem, const nodemask_t *nodemask)
416 {
417         task_lock(current);
418         pr_warning("%s invoked oom-killer: gfp_mask=0x%x, order=%d, "
419                 "oom_adj=%d, oom_score_adj=%d\n",
420                 current->comm, gfp_mask, order, current->signal->oom_adj,
421                 current->signal->oom_score_adj);
422         cpuset_print_task_mems_allowed(current);
423         task_unlock(current);
424         dump_stack();
425         mem_cgroup_print_oom_info(mem, p);
426         show_mem(SHOW_MEM_FILTER_NODES);
427         if (sysctl_oom_dump_tasks)
428                 dump_tasks(mem, nodemask);
429 }
430
431 #define K(x) ((x) << (PAGE_SHIFT-10))
432 static int oom_kill_task(struct task_struct *p, struct mem_cgroup *mem)
433 {
434         struct task_struct *q;
435         struct mm_struct *mm;
436
437         p = find_lock_task_mm(p);
438         if (!p)
439                 return 1;
440
441         /* mm cannot be safely dereferenced after task_unlock(p) */
442         mm = p->mm;
443
444         pr_err("Killed process %d (%s) total-vm:%lukB, anon-rss:%lukB, file-rss:%lukB\n",
445                 task_pid_nr(p), p->comm, K(p->mm->total_vm),
446                 K(get_mm_counter(p->mm, MM_ANONPAGES)),
447                 K(get_mm_counter(p->mm, MM_FILEPAGES)));
448         task_unlock(p);
449
450         /*
451          * Kill all user processes sharing p->mm in other thread groups, if any.
452          * They don't get access to memory reserves or a higher scheduler
453          * priority, though, to avoid depletion of all memory or task
454          * starvation.  This prevents mm->mmap_sem livelock when an oom killed
455          * task cannot exit because it requires the semaphore and its contended
456          * by another thread trying to allocate memory itself.  That thread will
457          * now get access to memory reserves since it has a pending fatal
458          * signal.
459          */
460         for_each_process(q)
461                 if (q->mm == mm && !same_thread_group(q, p) &&
462                     !(q->flags & PF_KTHREAD)) {
463                         if (q->signal->oom_score_adj == OOM_SCORE_ADJ_MIN)
464                                 continue;
465
466                         task_lock(q);   /* Protect ->comm from prctl() */
467                         pr_err("Kill process %d (%s) sharing same memory\n",
468                                 task_pid_nr(q), q->comm);
469                         task_unlock(q);
470                         force_sig(SIGKILL, q);
471                 }
472
473         set_tsk_thread_flag(p, TIF_MEMDIE);
474         force_sig(SIGKILL, p);
475
476         return 0;
477 }
478 #undef K
479
480 static int oom_kill_process(struct task_struct *p, gfp_t gfp_mask, int order,
481                             unsigned int points, unsigned long totalpages,
482                             struct mem_cgroup *mem, nodemask_t *nodemask,
483                             const char *message)
484 {
485         struct task_struct *victim = p;
486         struct task_struct *child;
487         struct task_struct *t = p;
488         unsigned int victim_points = 0;
489
490         if (printk_ratelimit())
491                 dump_header(p, gfp_mask, order, mem, nodemask);
492
493         /*
494          * If the task is already exiting, don't alarm the sysadmin or kill
495          * its children or threads, just set TIF_MEMDIE so it can die quickly
496          */
497         if (p->flags & PF_EXITING) {
498                 set_tsk_thread_flag(p, TIF_MEMDIE);
499                 return 0;
500         }
501
502         task_lock(p);
503         pr_err("%s: Kill process %d (%s) score %d or sacrifice child\n",
504                 message, task_pid_nr(p), p->comm, points);
505         task_unlock(p);
506
507         /*
508          * If any of p's children has a different mm and is eligible for kill,
509          * the one with the highest oom_badness() score is sacrificed for its
510          * parent.  This attempts to lose the minimal amount of work done while
511          * still freeing memory.
512          */
513         do {
514                 list_for_each_entry(child, &t->children, sibling) {
515                         unsigned int child_points;
516
517                         if (child->mm == p->mm)
518                                 continue;
519                         /*
520                          * oom_badness() returns 0 if the thread is unkillable
521                          */
522                         child_points = oom_badness(child, mem, nodemask,
523                                                                 totalpages);
524                         if (child_points > victim_points) {
525                                 victim = child;
526                                 victim_points = child_points;
527                         }
528                 }
529         } while_each_thread(p, t);
530
531         return oom_kill_task(victim, mem);
532 }
533
534 /*
535  * Determines whether the kernel must panic because of the panic_on_oom sysctl.
536  */
537 static void check_panic_on_oom(enum oom_constraint constraint, gfp_t gfp_mask,
538                                 int order, const nodemask_t *nodemask)
539 {
540         if (likely(!sysctl_panic_on_oom))
541                 return;
542         if (sysctl_panic_on_oom != 2) {
543                 /*
544                  * panic_on_oom == 1 only affects CONSTRAINT_NONE, the kernel
545                  * does not panic for cpuset, mempolicy, or memcg allocation
546                  * failures.
547                  */
548                 if (constraint != CONSTRAINT_NONE)
549                         return;
550         }
551         read_lock(&tasklist_lock);
552         dump_header(NULL, gfp_mask, order, NULL, nodemask);
553         read_unlock(&tasklist_lock);
554         panic("Out of memory: %s panic_on_oom is enabled\n",
555                 sysctl_panic_on_oom == 2 ? "compulsory" : "system-wide");
556 }
557
558 #ifdef CONFIG_CGROUP_MEM_RES_CTLR
559 void mem_cgroup_out_of_memory(struct mem_cgroup *mem, gfp_t gfp_mask)
560 {
561         unsigned long limit;
562         unsigned int points = 0;
563         struct task_struct *p;
564
565         /*
566          * If current has a pending SIGKILL, then automatically select it.  The
567          * goal is to allow it to allocate so that it may quickly exit and free
568          * its memory.
569          */
570         if (fatal_signal_pending(current)) {
571                 set_thread_flag(TIF_MEMDIE);
572                 return;
573         }
574
575         check_panic_on_oom(CONSTRAINT_MEMCG, gfp_mask, 0, NULL);
576         limit = mem_cgroup_get_limit(mem) >> PAGE_SHIFT;
577         read_lock(&tasklist_lock);
578 retry:
579         p = select_bad_process(&points, limit, mem, NULL);
580         if (!p || PTR_ERR(p) == -1UL)
581                 goto out;
582
583         if (oom_kill_process(p, gfp_mask, 0, points, limit, mem, NULL,
584                                 "Memory cgroup out of memory"))
585                 goto retry;
586 out:
587         read_unlock(&tasklist_lock);
588 }
589 #endif
590
591 static BLOCKING_NOTIFIER_HEAD(oom_notify_list);
592
593 int register_oom_notifier(struct notifier_block *nb)
594 {
595         return blocking_notifier_chain_register(&oom_notify_list, nb);
596 }
597 EXPORT_SYMBOL_GPL(register_oom_notifier);
598
599 int unregister_oom_notifier(struct notifier_block *nb)
600 {
601         return blocking_notifier_chain_unregister(&oom_notify_list, nb);
602 }
603 EXPORT_SYMBOL_GPL(unregister_oom_notifier);
604
605 /*
606  * Try to acquire the OOM killer lock for the zones in zonelist.  Returns zero
607  * if a parallel OOM killing is already taking place that includes a zone in
608  * the zonelist.  Otherwise, locks all zones in the zonelist and returns 1.
609  */
610 int try_set_zonelist_oom(struct zonelist *zonelist, gfp_t gfp_mask)
611 {
612         struct zoneref *z;
613         struct zone *zone;
614         int ret = 1;
615
616         spin_lock(&zone_scan_lock);
617         for_each_zone_zonelist(zone, z, zonelist, gfp_zone(gfp_mask)) {
618                 if (zone_is_oom_locked(zone)) {
619                         ret = 0;
620                         goto out;
621                 }
622         }
623
624         for_each_zone_zonelist(zone, z, zonelist, gfp_zone(gfp_mask)) {
625                 /*
626                  * Lock each zone in the zonelist under zone_scan_lock so a
627                  * parallel invocation of try_set_zonelist_oom() doesn't succeed
628                  * when it shouldn't.
629                  */
630                 zone_set_flag(zone, ZONE_OOM_LOCKED);
631         }
632
633 out:
634         spin_unlock(&zone_scan_lock);
635         return ret;
636 }
637
638 /*
639  * Clears the ZONE_OOM_LOCKED flag for all zones in the zonelist so that failed
640  * allocation attempts with zonelists containing them may now recall the OOM
641  * killer, if necessary.
642  */
643 void clear_zonelist_oom(struct zonelist *zonelist, gfp_t gfp_mask)
644 {
645         struct zoneref *z;
646         struct zone *zone;
647
648         spin_lock(&zone_scan_lock);
649         for_each_zone_zonelist(zone, z, zonelist, gfp_zone(gfp_mask)) {
650                 zone_clear_flag(zone, ZONE_OOM_LOCKED);
651         }
652         spin_unlock(&zone_scan_lock);
653 }
654
655 /*
656  * Try to acquire the oom killer lock for all system zones.  Returns zero if a
657  * parallel oom killing is taking place, otherwise locks all zones and returns
658  * non-zero.
659  */
660 static int try_set_system_oom(void)
661 {
662         struct zone *zone;
663         int ret = 1;
664
665         spin_lock(&zone_scan_lock);
666         for_each_populated_zone(zone)
667                 if (zone_is_oom_locked(zone)) {
668                         ret = 0;
669                         goto out;
670                 }
671         for_each_populated_zone(zone)
672                 zone_set_flag(zone, ZONE_OOM_LOCKED);
673 out:
674         spin_unlock(&zone_scan_lock);
675         return ret;
676 }
677
678 /*
679  * Clears ZONE_OOM_LOCKED for all system zones so that failed allocation
680  * attempts or page faults may now recall the oom killer, if necessary.
681  */
682 static void clear_system_oom(void)
683 {
684         struct zone *zone;
685
686         spin_lock(&zone_scan_lock);
687         for_each_populated_zone(zone)
688                 zone_clear_flag(zone, ZONE_OOM_LOCKED);
689         spin_unlock(&zone_scan_lock);
690 }
691
692 /**
693  * out_of_memory - kill the "best" process when we run out of memory
694  * @zonelist: zonelist pointer
695  * @gfp_mask: memory allocation flags
696  * @order: amount of memory being requested as a power of 2
697  * @nodemask: nodemask passed to page allocator
698  *
699  * If we run out of memory, we have the choice between either
700  * killing a random task (bad), letting the system crash (worse)
701  * OR try to be smart about which process to kill. Note that we
702  * don't have to be perfect here, we just have to be good.
703  */
704 void out_of_memory(struct zonelist *zonelist, gfp_t gfp_mask,
705                 int order, nodemask_t *nodemask)
706 {
707         const nodemask_t *mpol_mask;
708         struct task_struct *p;
709         unsigned long totalpages;
710         unsigned long freed = 0;
711         unsigned int points;
712         enum oom_constraint constraint = CONSTRAINT_NONE;
713         int killed = 0;
714
715         blocking_notifier_call_chain(&oom_notify_list, 0, &freed);
716         if (freed > 0)
717                 /* Got some memory back in the last second. */
718                 return;
719
720         /*
721          * If current has a pending SIGKILL, then automatically select it.  The
722          * goal is to allow it to allocate so that it may quickly exit and free
723          * its memory.
724          */
725         if (fatal_signal_pending(current)) {
726                 set_thread_flag(TIF_MEMDIE);
727                 return;
728         }
729
730         /*
731          * Check if there were limitations on the allocation (only relevant for
732          * NUMA) that may require different handling.
733          */
734         constraint = constrained_alloc(zonelist, gfp_mask, nodemask,
735                                                 &totalpages);
736         mpol_mask = (constraint == CONSTRAINT_MEMORY_POLICY) ? nodemask : NULL;
737         check_panic_on_oom(constraint, gfp_mask, order, mpol_mask);
738
739         read_lock(&tasklist_lock);
740         if (sysctl_oom_kill_allocating_task &&
741             !oom_unkillable_task(current, NULL, nodemask) &&
742             current->mm) {
743                 /*
744                  * oom_kill_process() needs tasklist_lock held.  If it returns
745                  * non-zero, current could not be killed so we must fallback to
746                  * the tasklist scan.
747                  */
748                 if (!oom_kill_process(current, gfp_mask, order, 0, totalpages,
749                                 NULL, nodemask,
750                                 "Out of memory (oom_kill_allocating_task)"))
751                         goto out;
752         }
753
754 retry:
755         p = select_bad_process(&points, totalpages, NULL, mpol_mask);
756         if (PTR_ERR(p) == -1UL)
757                 goto out;
758
759         /* Found nothing?!?! Either we hang forever, or we panic. */
760         if (!p) {
761                 dump_header(NULL, gfp_mask, order, NULL, mpol_mask);
762                 read_unlock(&tasklist_lock);
763                 panic("Out of memory and no killable processes...\n");
764         }
765
766         if (oom_kill_process(p, gfp_mask, order, points, totalpages, NULL,
767                                 nodemask, "Out of memory"))
768                 goto retry;
769         killed = 1;
770 out:
771         read_unlock(&tasklist_lock);
772
773         /*
774          * Give "p" a good chance of killing itself before we
775          * retry to allocate memory unless "p" is current
776          */
777         if (killed && !test_thread_flag(TIF_MEMDIE))
778                 schedule_timeout_uninterruptible(1);
779 }
780
781 /*
782  * The pagefault handler calls here because it is out of memory, so kill a
783  * memory-hogging task.  If a populated zone has ZONE_OOM_LOCKED set, a parallel
784  * oom killing is already in progress so do nothing.  If a task is found with
785  * TIF_MEMDIE set, it has been killed so do nothing and allow it to exit.
786  */
787 void pagefault_out_of_memory(void)
788 {
789         if (try_set_system_oom()) {
790                 out_of_memory(NULL, 0, 0, NULL);
791                 clear_system_oom();
792         }
793         if (!test_thread_flag(TIF_MEMDIE))
794                 schedule_timeout_uninterruptible(1);
795 }