cpuset: rewrite update_tasks_nodemask()
[linux-2.6.git] / kernel / cpuset.c
1 /*
2  *  kernel/cpuset.c
3  *
4  *  Processor and Memory placement constraints for sets of tasks.
5  *
6  *  Copyright (C) 2003 BULL SA.
7  *  Copyright (C) 2004-2007 Silicon Graphics, Inc.
8  *  Copyright (C) 2006 Google, Inc
9  *
10  *  Portions derived from Patrick Mochel's sysfs code.
11  *  sysfs is Copyright (c) 2001-3 Patrick Mochel
12  *
13  *  2003-10-10 Written by Simon Derr.
14  *  2003-10-22 Updates by Stephen Hemminger.
15  *  2004 May-July Rework by Paul Jackson.
16  *  2006 Rework by Paul Menage to use generic cgroups
17  *  2008 Rework of the scheduler domains and CPU hotplug handling
18  *       by Max Krasnyansky
19  *
20  *  This file is subject to the terms and conditions of the GNU General Public
21  *  License.  See the file COPYING in the main directory of the Linux
22  *  distribution for more details.
23  */
24
25 #include <linux/cpu.h>
26 #include <linux/cpumask.h>
27 #include <linux/cpuset.h>
28 #include <linux/err.h>
29 #include <linux/errno.h>
30 #include <linux/file.h>
31 #include <linux/fs.h>
32 #include <linux/init.h>
33 #include <linux/interrupt.h>
34 #include <linux/kernel.h>
35 #include <linux/kmod.h>
36 #include <linux/list.h>
37 #include <linux/mempolicy.h>
38 #include <linux/mm.h>
39 #include <linux/memory.h>
40 #include <linux/module.h>
41 #include <linux/mount.h>
42 #include <linux/namei.h>
43 #include <linux/pagemap.h>
44 #include <linux/proc_fs.h>
45 #include <linux/rcupdate.h>
46 #include <linux/sched.h>
47 #include <linux/seq_file.h>
48 #include <linux/security.h>
49 #include <linux/slab.h>
50 #include <linux/spinlock.h>
51 #include <linux/stat.h>
52 #include <linux/string.h>
53 #include <linux/time.h>
54 #include <linux/backing-dev.h>
55 #include <linux/sort.h>
56
57 #include <asm/uaccess.h>
58 #include <asm/atomic.h>
59 #include <linux/mutex.h>
60 #include <linux/workqueue.h>
61 #include <linux/cgroup.h>
62
63 /*
64  * Workqueue for cpuset related tasks.
65  *
66  * Using kevent workqueue may cause deadlock when memory_migrate
67  * is set. So we create a separate workqueue thread for cpuset.
68  */
69 static struct workqueue_struct *cpuset_wq;
70
71 /*
72  * Tracks how many cpusets are currently defined in system.
73  * When there is only one cpuset (the root cpuset) we can
74  * short circuit some hooks.
75  */
76 int number_of_cpusets __read_mostly;
77
78 /* Forward declare cgroup structures */
79 struct cgroup_subsys cpuset_subsys;
80 struct cpuset;
81
82 /* See "Frequency meter" comments, below. */
83
84 struct fmeter {
85         int cnt;                /* unprocessed events count */
86         int val;                /* most recent output value */
87         time_t time;            /* clock (secs) when val computed */
88         spinlock_t lock;        /* guards read or write of above */
89 };
90
91 struct cpuset {
92         struct cgroup_subsys_state css;
93
94         unsigned long flags;            /* "unsigned long" so bitops work */
95         cpumask_var_t cpus_allowed;     /* CPUs allowed to tasks in cpuset */
96         nodemask_t mems_allowed;        /* Memory Nodes allowed to tasks */
97
98         struct cpuset *parent;          /* my parent */
99
100         /*
101          * Copy of global cpuset_mems_generation as of the most
102          * recent time this cpuset changed its mems_allowed.
103          */
104         int mems_generation;
105
106         struct fmeter fmeter;           /* memory_pressure filter */
107
108         /* partition number for rebuild_sched_domains() */
109         int pn;
110
111         /* for custom sched domain */
112         int relax_domain_level;
113
114         /* used for walking a cpuset heirarchy */
115         struct list_head stack_list;
116 };
117
118 /* Retrieve the cpuset for a cgroup */
119 static inline struct cpuset *cgroup_cs(struct cgroup *cont)
120 {
121         return container_of(cgroup_subsys_state(cont, cpuset_subsys_id),
122                             struct cpuset, css);
123 }
124
125 /* Retrieve the cpuset for a task */
126 static inline struct cpuset *task_cs(struct task_struct *task)
127 {
128         return container_of(task_subsys_state(task, cpuset_subsys_id),
129                             struct cpuset, css);
130 }
131 struct cpuset_hotplug_scanner {
132         struct cgroup_scanner scan;
133         struct cgroup *to;
134 };
135
136 /* bits in struct cpuset flags field */
137 typedef enum {
138         CS_CPU_EXCLUSIVE,
139         CS_MEM_EXCLUSIVE,
140         CS_MEM_HARDWALL,
141         CS_MEMORY_MIGRATE,
142         CS_SCHED_LOAD_BALANCE,
143         CS_SPREAD_PAGE,
144         CS_SPREAD_SLAB,
145 } cpuset_flagbits_t;
146
147 /* convenient tests for these bits */
148 static inline int is_cpu_exclusive(const struct cpuset *cs)
149 {
150         return test_bit(CS_CPU_EXCLUSIVE, &cs->flags);
151 }
152
153 static inline int is_mem_exclusive(const struct cpuset *cs)
154 {
155         return test_bit(CS_MEM_EXCLUSIVE, &cs->flags);
156 }
157
158 static inline int is_mem_hardwall(const struct cpuset *cs)
159 {
160         return test_bit(CS_MEM_HARDWALL, &cs->flags);
161 }
162
163 static inline int is_sched_load_balance(const struct cpuset *cs)
164 {
165         return test_bit(CS_SCHED_LOAD_BALANCE, &cs->flags);
166 }
167
168 static inline int is_memory_migrate(const struct cpuset *cs)
169 {
170         return test_bit(CS_MEMORY_MIGRATE, &cs->flags);
171 }
172
173 static inline int is_spread_page(const struct cpuset *cs)
174 {
175         return test_bit(CS_SPREAD_PAGE, &cs->flags);
176 }
177
178 static inline int is_spread_slab(const struct cpuset *cs)
179 {
180         return test_bit(CS_SPREAD_SLAB, &cs->flags);
181 }
182
183 /*
184  * Increment this integer everytime any cpuset changes its
185  * mems_allowed value.  Users of cpusets can track this generation
186  * number, and avoid having to lock and reload mems_allowed unless
187  * the cpuset they're using changes generation.
188  *
189  * A single, global generation is needed because cpuset_attach_task() could
190  * reattach a task to a different cpuset, which must not have its
191  * generation numbers aliased with those of that tasks previous cpuset.
192  *
193  * Generations are needed for mems_allowed because one task cannot
194  * modify another's memory placement.  So we must enable every task,
195  * on every visit to __alloc_pages(), to efficiently check whether
196  * its current->cpuset->mems_allowed has changed, requiring an update
197  * of its current->mems_allowed.
198  *
199  * Since writes to cpuset_mems_generation are guarded by the cgroup lock
200  * there is no need to mark it atomic.
201  */
202 static int cpuset_mems_generation;
203
204 static struct cpuset top_cpuset = {
205         .flags = ((1 << CS_CPU_EXCLUSIVE) | (1 << CS_MEM_EXCLUSIVE)),
206 };
207
208 /*
209  * There are two global mutexes guarding cpuset structures.  The first
210  * is the main control groups cgroup_mutex, accessed via
211  * cgroup_lock()/cgroup_unlock().  The second is the cpuset-specific
212  * callback_mutex, below. They can nest.  It is ok to first take
213  * cgroup_mutex, then nest callback_mutex.  We also require taking
214  * task_lock() when dereferencing a task's cpuset pointer.  See "The
215  * task_lock() exception", at the end of this comment.
216  *
217  * A task must hold both mutexes to modify cpusets.  If a task
218  * holds cgroup_mutex, then it blocks others wanting that mutex,
219  * ensuring that it is the only task able to also acquire callback_mutex
220  * and be able to modify cpusets.  It can perform various checks on
221  * the cpuset structure first, knowing nothing will change.  It can
222  * also allocate memory while just holding cgroup_mutex.  While it is
223  * performing these checks, various callback routines can briefly
224  * acquire callback_mutex to query cpusets.  Once it is ready to make
225  * the changes, it takes callback_mutex, blocking everyone else.
226  *
227  * Calls to the kernel memory allocator can not be made while holding
228  * callback_mutex, as that would risk double tripping on callback_mutex
229  * from one of the callbacks into the cpuset code from within
230  * __alloc_pages().
231  *
232  * If a task is only holding callback_mutex, then it has read-only
233  * access to cpusets.
234  *
235  * The task_struct fields mems_allowed and mems_generation may only
236  * be accessed in the context of that task, so require no locks.
237  *
238  * The cpuset_common_file_read() handlers only hold callback_mutex across
239  * small pieces of code, such as when reading out possibly multi-word
240  * cpumasks and nodemasks.
241  *
242  * Accessing a task's cpuset should be done in accordance with the
243  * guidelines for accessing subsystem state in kernel/cgroup.c
244  */
245
246 static DEFINE_MUTEX(callback_mutex);
247
248 /*
249  * cpuset_buffer_lock protects both the cpuset_name and cpuset_nodelist
250  * buffers.  They are statically allocated to prevent using excess stack
251  * when calling cpuset_print_task_mems_allowed().
252  */
253 #define CPUSET_NAME_LEN         (128)
254 #define CPUSET_NODELIST_LEN     (256)
255 static char cpuset_name[CPUSET_NAME_LEN];
256 static char cpuset_nodelist[CPUSET_NODELIST_LEN];
257 static DEFINE_SPINLOCK(cpuset_buffer_lock);
258
259 /*
260  * This is ugly, but preserves the userspace API for existing cpuset
261  * users. If someone tries to mount the "cpuset" filesystem, we
262  * silently switch it to mount "cgroup" instead
263  */
264 static int cpuset_get_sb(struct file_system_type *fs_type,
265                          int flags, const char *unused_dev_name,
266                          void *data, struct vfsmount *mnt)
267 {
268         struct file_system_type *cgroup_fs = get_fs_type("cgroup");
269         int ret = -ENODEV;
270         if (cgroup_fs) {
271                 char mountopts[] =
272                         "cpuset,noprefix,"
273                         "release_agent=/sbin/cpuset_release_agent";
274                 ret = cgroup_fs->get_sb(cgroup_fs, flags,
275                                            unused_dev_name, mountopts, mnt);
276                 put_filesystem(cgroup_fs);
277         }
278         return ret;
279 }
280
281 static struct file_system_type cpuset_fs_type = {
282         .name = "cpuset",
283         .get_sb = cpuset_get_sb,
284 };
285
286 /*
287  * Return in pmask the portion of a cpusets's cpus_allowed that
288  * are online.  If none are online, walk up the cpuset hierarchy
289  * until we find one that does have some online cpus.  If we get
290  * all the way to the top and still haven't found any online cpus,
291  * return cpu_online_map.  Or if passed a NULL cs from an exit'ing
292  * task, return cpu_online_map.
293  *
294  * One way or another, we guarantee to return some non-empty subset
295  * of cpu_online_map.
296  *
297  * Call with callback_mutex held.
298  */
299
300 static void guarantee_online_cpus(const struct cpuset *cs,
301                                   struct cpumask *pmask)
302 {
303         while (cs && !cpumask_intersects(cs->cpus_allowed, cpu_online_mask))
304                 cs = cs->parent;
305         if (cs)
306                 cpumask_and(pmask, cs->cpus_allowed, cpu_online_mask);
307         else
308                 cpumask_copy(pmask, cpu_online_mask);
309         BUG_ON(!cpumask_intersects(pmask, cpu_online_mask));
310 }
311
312 /*
313  * Return in *pmask the portion of a cpusets's mems_allowed that
314  * are online, with memory.  If none are online with memory, walk
315  * up the cpuset hierarchy until we find one that does have some
316  * online mems.  If we get all the way to the top and still haven't
317  * found any online mems, return node_states[N_HIGH_MEMORY].
318  *
319  * One way or another, we guarantee to return some non-empty subset
320  * of node_states[N_HIGH_MEMORY].
321  *
322  * Call with callback_mutex held.
323  */
324
325 static void guarantee_online_mems(const struct cpuset *cs, nodemask_t *pmask)
326 {
327         while (cs && !nodes_intersects(cs->mems_allowed,
328                                         node_states[N_HIGH_MEMORY]))
329                 cs = cs->parent;
330         if (cs)
331                 nodes_and(*pmask, cs->mems_allowed,
332                                         node_states[N_HIGH_MEMORY]);
333         else
334                 *pmask = node_states[N_HIGH_MEMORY];
335         BUG_ON(!nodes_intersects(*pmask, node_states[N_HIGH_MEMORY]));
336 }
337
338 /**
339  * cpuset_update_task_memory_state - update task memory placement
340  *
341  * If the current tasks cpusets mems_allowed changed behind our
342  * backs, update current->mems_allowed, mems_generation and task NUMA
343  * mempolicy to the new value.
344  *
345  * Task mempolicy is updated by rebinding it relative to the
346  * current->cpuset if a task has its memory placement changed.
347  * Do not call this routine if in_interrupt().
348  *
349  * Call without callback_mutex or task_lock() held.  May be
350  * called with or without cgroup_mutex held.  Thanks in part to
351  * 'the_top_cpuset_hack', the task's cpuset pointer will never
352  * be NULL.  This routine also might acquire callback_mutex during
353  * call.
354  *
355  * Reading current->cpuset->mems_generation doesn't need task_lock
356  * to guard the current->cpuset derefence, because it is guarded
357  * from concurrent freeing of current->cpuset using RCU.
358  *
359  * The rcu_dereference() is technically probably not needed,
360  * as I don't actually mind if I see a new cpuset pointer but
361  * an old value of mems_generation.  However this really only
362  * matters on alpha systems using cpusets heavily.  If I dropped
363  * that rcu_dereference(), it would save them a memory barrier.
364  * For all other arch's, rcu_dereference is a no-op anyway, and for
365  * alpha systems not using cpusets, another planned optimization,
366  * avoiding the rcu critical section for tasks in the root cpuset
367  * which is statically allocated, so can't vanish, will make this
368  * irrelevant.  Better to use RCU as intended, than to engage in
369  * some cute trick to save a memory barrier that is impossible to
370  * test, for alpha systems using cpusets heavily, which might not
371  * even exist.
372  *
373  * This routine is needed to update the per-task mems_allowed data,
374  * within the tasks context, when it is trying to allocate memory
375  * (in various mm/mempolicy.c routines) and notices that some other
376  * task has been modifying its cpuset.
377  */
378
379 void cpuset_update_task_memory_state(void)
380 {
381         int my_cpusets_mem_gen;
382         struct task_struct *tsk = current;
383         struct cpuset *cs;
384
385         rcu_read_lock();
386         my_cpusets_mem_gen = task_cs(tsk)->mems_generation;
387         rcu_read_unlock();
388
389         if (my_cpusets_mem_gen != tsk->cpuset_mems_generation) {
390                 mutex_lock(&callback_mutex);
391                 task_lock(tsk);
392                 cs = task_cs(tsk); /* Maybe changed when task not locked */
393                 guarantee_online_mems(cs, &tsk->mems_allowed);
394                 tsk->cpuset_mems_generation = cs->mems_generation;
395                 if (is_spread_page(cs))
396                         tsk->flags |= PF_SPREAD_PAGE;
397                 else
398                         tsk->flags &= ~PF_SPREAD_PAGE;
399                 if (is_spread_slab(cs))
400                         tsk->flags |= PF_SPREAD_SLAB;
401                 else
402                         tsk->flags &= ~PF_SPREAD_SLAB;
403                 task_unlock(tsk);
404                 mutex_unlock(&callback_mutex);
405                 mpol_rebind_task(tsk, &tsk->mems_allowed);
406         }
407 }
408
409 /*
410  * is_cpuset_subset(p, q) - Is cpuset p a subset of cpuset q?
411  *
412  * One cpuset is a subset of another if all its allowed CPUs and
413  * Memory Nodes are a subset of the other, and its exclusive flags
414  * are only set if the other's are set.  Call holding cgroup_mutex.
415  */
416
417 static int is_cpuset_subset(const struct cpuset *p, const struct cpuset *q)
418 {
419         return  cpumask_subset(p->cpus_allowed, q->cpus_allowed) &&
420                 nodes_subset(p->mems_allowed, q->mems_allowed) &&
421                 is_cpu_exclusive(p) <= is_cpu_exclusive(q) &&
422                 is_mem_exclusive(p) <= is_mem_exclusive(q);
423 }
424
425 /**
426  * alloc_trial_cpuset - allocate a trial cpuset
427  * @cs: the cpuset that the trial cpuset duplicates
428  */
429 static struct cpuset *alloc_trial_cpuset(const struct cpuset *cs)
430 {
431         struct cpuset *trial;
432
433         trial = kmemdup(cs, sizeof(*cs), GFP_KERNEL);
434         if (!trial)
435                 return NULL;
436
437         if (!alloc_cpumask_var(&trial->cpus_allowed, GFP_KERNEL)) {
438                 kfree(trial);
439                 return NULL;
440         }
441         cpumask_copy(trial->cpus_allowed, cs->cpus_allowed);
442
443         return trial;
444 }
445
446 /**
447  * free_trial_cpuset - free the trial cpuset
448  * @trial: the trial cpuset to be freed
449  */
450 static void free_trial_cpuset(struct cpuset *trial)
451 {
452         free_cpumask_var(trial->cpus_allowed);
453         kfree(trial);
454 }
455
456 /*
457  * validate_change() - Used to validate that any proposed cpuset change
458  *                     follows the structural rules for cpusets.
459  *
460  * If we replaced the flag and mask values of the current cpuset
461  * (cur) with those values in the trial cpuset (trial), would
462  * our various subset and exclusive rules still be valid?  Presumes
463  * cgroup_mutex held.
464  *
465  * 'cur' is the address of an actual, in-use cpuset.  Operations
466  * such as list traversal that depend on the actual address of the
467  * cpuset in the list must use cur below, not trial.
468  *
469  * 'trial' is the address of bulk structure copy of cur, with
470  * perhaps one or more of the fields cpus_allowed, mems_allowed,
471  * or flags changed to new, trial values.
472  *
473  * Return 0 if valid, -errno if not.
474  */
475
476 static int validate_change(const struct cpuset *cur, const struct cpuset *trial)
477 {
478         struct cgroup *cont;
479         struct cpuset *c, *par;
480
481         /* Each of our child cpusets must be a subset of us */
482         list_for_each_entry(cont, &cur->css.cgroup->children, sibling) {
483                 if (!is_cpuset_subset(cgroup_cs(cont), trial))
484                         return -EBUSY;
485         }
486
487         /* Remaining checks don't apply to root cpuset */
488         if (cur == &top_cpuset)
489                 return 0;
490
491         par = cur->parent;
492
493         /* We must be a subset of our parent cpuset */
494         if (!is_cpuset_subset(trial, par))
495                 return -EACCES;
496
497         /*
498          * If either I or some sibling (!= me) is exclusive, we can't
499          * overlap
500          */
501         list_for_each_entry(cont, &par->css.cgroup->children, sibling) {
502                 c = cgroup_cs(cont);
503                 if ((is_cpu_exclusive(trial) || is_cpu_exclusive(c)) &&
504                     c != cur &&
505                     cpumask_intersects(trial->cpus_allowed, c->cpus_allowed))
506                         return -EINVAL;
507                 if ((is_mem_exclusive(trial) || is_mem_exclusive(c)) &&
508                     c != cur &&
509                     nodes_intersects(trial->mems_allowed, c->mems_allowed))
510                         return -EINVAL;
511         }
512
513         /* Cpusets with tasks can't have empty cpus_allowed or mems_allowed */
514         if (cgroup_task_count(cur->css.cgroup)) {
515                 if (cpumask_empty(trial->cpus_allowed) ||
516                     nodes_empty(trial->mems_allowed)) {
517                         return -ENOSPC;
518                 }
519         }
520
521         return 0;
522 }
523
524 /*
525  * Helper routine for generate_sched_domains().
526  * Do cpusets a, b have overlapping cpus_allowed masks?
527  */
528 static int cpusets_overlap(struct cpuset *a, struct cpuset *b)
529 {
530         return cpumask_intersects(a->cpus_allowed, b->cpus_allowed);
531 }
532
533 static void
534 update_domain_attr(struct sched_domain_attr *dattr, struct cpuset *c)
535 {
536         if (dattr->relax_domain_level < c->relax_domain_level)
537                 dattr->relax_domain_level = c->relax_domain_level;
538         return;
539 }
540
541 static void
542 update_domain_attr_tree(struct sched_domain_attr *dattr, struct cpuset *c)
543 {
544         LIST_HEAD(q);
545
546         list_add(&c->stack_list, &q);
547         while (!list_empty(&q)) {
548                 struct cpuset *cp;
549                 struct cgroup *cont;
550                 struct cpuset *child;
551
552                 cp = list_first_entry(&q, struct cpuset, stack_list);
553                 list_del(q.next);
554
555                 if (cpumask_empty(cp->cpus_allowed))
556                         continue;
557
558                 if (is_sched_load_balance(cp))
559                         update_domain_attr(dattr, cp);
560
561                 list_for_each_entry(cont, &cp->css.cgroup->children, sibling) {
562                         child = cgroup_cs(cont);
563                         list_add_tail(&child->stack_list, &q);
564                 }
565         }
566 }
567
568 /*
569  * generate_sched_domains()
570  *
571  * This function builds a partial partition of the systems CPUs
572  * A 'partial partition' is a set of non-overlapping subsets whose
573  * union is a subset of that set.
574  * The output of this function needs to be passed to kernel/sched.c
575  * partition_sched_domains() routine, which will rebuild the scheduler's
576  * load balancing domains (sched domains) as specified by that partial
577  * partition.
578  *
579  * See "What is sched_load_balance" in Documentation/cgroups/cpusets.txt
580  * for a background explanation of this.
581  *
582  * Does not return errors, on the theory that the callers of this
583  * routine would rather not worry about failures to rebuild sched
584  * domains when operating in the severe memory shortage situations
585  * that could cause allocation failures below.
586  *
587  * Must be called with cgroup_lock held.
588  *
589  * The three key local variables below are:
590  *    q  - a linked-list queue of cpuset pointers, used to implement a
591  *         top-down scan of all cpusets.  This scan loads a pointer
592  *         to each cpuset marked is_sched_load_balance into the
593  *         array 'csa'.  For our purposes, rebuilding the schedulers
594  *         sched domains, we can ignore !is_sched_load_balance cpusets.
595  *  csa  - (for CpuSet Array) Array of pointers to all the cpusets
596  *         that need to be load balanced, for convenient iterative
597  *         access by the subsequent code that finds the best partition,
598  *         i.e the set of domains (subsets) of CPUs such that the
599  *         cpus_allowed of every cpuset marked is_sched_load_balance
600  *         is a subset of one of these domains, while there are as
601  *         many such domains as possible, each as small as possible.
602  * doms  - Conversion of 'csa' to an array of cpumasks, for passing to
603  *         the kernel/sched.c routine partition_sched_domains() in a
604  *         convenient format, that can be easily compared to the prior
605  *         value to determine what partition elements (sched domains)
606  *         were changed (added or removed.)
607  *
608  * Finding the best partition (set of domains):
609  *      The triple nested loops below over i, j, k scan over the
610  *      load balanced cpusets (using the array of cpuset pointers in
611  *      csa[]) looking for pairs of cpusets that have overlapping
612  *      cpus_allowed, but which don't have the same 'pn' partition
613  *      number and gives them in the same partition number.  It keeps
614  *      looping on the 'restart' label until it can no longer find
615  *      any such pairs.
616  *
617  *      The union of the cpus_allowed masks from the set of
618  *      all cpusets having the same 'pn' value then form the one
619  *      element of the partition (one sched domain) to be passed to
620  *      partition_sched_domains().
621  */
622 /* FIXME: see the FIXME in partition_sched_domains() */
623 static int generate_sched_domains(struct cpumask **domains,
624                         struct sched_domain_attr **attributes)
625 {
626         LIST_HEAD(q);           /* queue of cpusets to be scanned */
627         struct cpuset *cp;      /* scans q */
628         struct cpuset **csa;    /* array of all cpuset ptrs */
629         int csn;                /* how many cpuset ptrs in csa so far */
630         int i, j, k;            /* indices for partition finding loops */
631         struct cpumask *doms;   /* resulting partition; i.e. sched domains */
632         struct sched_domain_attr *dattr;  /* attributes for custom domains */
633         int ndoms = 0;          /* number of sched domains in result */
634         int nslot;              /* next empty doms[] struct cpumask slot */
635
636         doms = NULL;
637         dattr = NULL;
638         csa = NULL;
639
640         /* Special case for the 99% of systems with one, full, sched domain */
641         if (is_sched_load_balance(&top_cpuset)) {
642                 doms = kmalloc(cpumask_size(), GFP_KERNEL);
643                 if (!doms)
644                         goto done;
645
646                 dattr = kmalloc(sizeof(struct sched_domain_attr), GFP_KERNEL);
647                 if (dattr) {
648                         *dattr = SD_ATTR_INIT;
649                         update_domain_attr_tree(dattr, &top_cpuset);
650                 }
651                 cpumask_copy(doms, top_cpuset.cpus_allowed);
652
653                 ndoms = 1;
654                 goto done;
655         }
656
657         csa = kmalloc(number_of_cpusets * sizeof(cp), GFP_KERNEL);
658         if (!csa)
659                 goto done;
660         csn = 0;
661
662         list_add(&top_cpuset.stack_list, &q);
663         while (!list_empty(&q)) {
664                 struct cgroup *cont;
665                 struct cpuset *child;   /* scans child cpusets of cp */
666
667                 cp = list_first_entry(&q, struct cpuset, stack_list);
668                 list_del(q.next);
669
670                 if (cpumask_empty(cp->cpus_allowed))
671                         continue;
672
673                 /*
674                  * All child cpusets contain a subset of the parent's cpus, so
675                  * just skip them, and then we call update_domain_attr_tree()
676                  * to calc relax_domain_level of the corresponding sched
677                  * domain.
678                  */
679                 if (is_sched_load_balance(cp)) {
680                         csa[csn++] = cp;
681                         continue;
682                 }
683
684                 list_for_each_entry(cont, &cp->css.cgroup->children, sibling) {
685                         child = cgroup_cs(cont);
686                         list_add_tail(&child->stack_list, &q);
687                 }
688         }
689
690         for (i = 0; i < csn; i++)
691                 csa[i]->pn = i;
692         ndoms = csn;
693
694 restart:
695         /* Find the best partition (set of sched domains) */
696         for (i = 0; i < csn; i++) {
697                 struct cpuset *a = csa[i];
698                 int apn = a->pn;
699
700                 for (j = 0; j < csn; j++) {
701                         struct cpuset *b = csa[j];
702                         int bpn = b->pn;
703
704                         if (apn != bpn && cpusets_overlap(a, b)) {
705                                 for (k = 0; k < csn; k++) {
706                                         struct cpuset *c = csa[k];
707
708                                         if (c->pn == bpn)
709                                                 c->pn = apn;
710                                 }
711                                 ndoms--;        /* one less element */
712                                 goto restart;
713                         }
714                 }
715         }
716
717         /*
718          * Now we know how many domains to create.
719          * Convert <csn, csa> to <ndoms, doms> and populate cpu masks.
720          */
721         doms = kmalloc(ndoms * cpumask_size(), GFP_KERNEL);
722         if (!doms)
723                 goto done;
724
725         /*
726          * The rest of the code, including the scheduler, can deal with
727          * dattr==NULL case. No need to abort if alloc fails.
728          */
729         dattr = kmalloc(ndoms * sizeof(struct sched_domain_attr), GFP_KERNEL);
730
731         for (nslot = 0, i = 0; i < csn; i++) {
732                 struct cpuset *a = csa[i];
733                 struct cpumask *dp;
734                 int apn = a->pn;
735
736                 if (apn < 0) {
737                         /* Skip completed partitions */
738                         continue;
739                 }
740
741                 dp = doms + nslot;
742
743                 if (nslot == ndoms) {
744                         static int warnings = 10;
745                         if (warnings) {
746                                 printk(KERN_WARNING
747                                  "rebuild_sched_domains confused:"
748                                   " nslot %d, ndoms %d, csn %d, i %d,"
749                                   " apn %d\n",
750                                   nslot, ndoms, csn, i, apn);
751                                 warnings--;
752                         }
753                         continue;
754                 }
755
756                 cpumask_clear(dp);
757                 if (dattr)
758                         *(dattr + nslot) = SD_ATTR_INIT;
759                 for (j = i; j < csn; j++) {
760                         struct cpuset *b = csa[j];
761
762                         if (apn == b->pn) {
763                                 cpumask_or(dp, dp, b->cpus_allowed);
764                                 if (dattr)
765                                         update_domain_attr_tree(dattr + nslot, b);
766
767                                 /* Done with this partition */
768                                 b->pn = -1;
769                         }
770                 }
771                 nslot++;
772         }
773         BUG_ON(nslot != ndoms);
774
775 done:
776         kfree(csa);
777
778         /*
779          * Fallback to the default domain if kmalloc() failed.
780          * See comments in partition_sched_domains().
781          */
782         if (doms == NULL)
783                 ndoms = 1;
784
785         *domains    = doms;
786         *attributes = dattr;
787         return ndoms;
788 }
789
790 /*
791  * Rebuild scheduler domains.
792  *
793  * Call with neither cgroup_mutex held nor within get_online_cpus().
794  * Takes both cgroup_mutex and get_online_cpus().
795  *
796  * Cannot be directly called from cpuset code handling changes
797  * to the cpuset pseudo-filesystem, because it cannot be called
798  * from code that already holds cgroup_mutex.
799  */
800 static void do_rebuild_sched_domains(struct work_struct *unused)
801 {
802         struct sched_domain_attr *attr;
803         struct cpumask *doms;
804         int ndoms;
805
806         get_online_cpus();
807
808         /* Generate domain masks and attrs */
809         cgroup_lock();
810         ndoms = generate_sched_domains(&doms, &attr);
811         cgroup_unlock();
812
813         /* Have scheduler rebuild the domains */
814         partition_sched_domains(ndoms, doms, attr);
815
816         put_online_cpus();
817 }
818
819 static DECLARE_WORK(rebuild_sched_domains_work, do_rebuild_sched_domains);
820
821 /*
822  * Rebuild scheduler domains, asynchronously via workqueue.
823  *
824  * If the flag 'sched_load_balance' of any cpuset with non-empty
825  * 'cpus' changes, or if the 'cpus' allowed changes in any cpuset
826  * which has that flag enabled, or if any cpuset with a non-empty
827  * 'cpus' is removed, then call this routine to rebuild the
828  * scheduler's dynamic sched domains.
829  *
830  * The rebuild_sched_domains() and partition_sched_domains()
831  * routines must nest cgroup_lock() inside get_online_cpus(),
832  * but such cpuset changes as these must nest that locking the
833  * other way, holding cgroup_lock() for much of the code.
834  *
835  * So in order to avoid an ABBA deadlock, the cpuset code handling
836  * these user changes delegates the actual sched domain rebuilding
837  * to a separate workqueue thread, which ends up processing the
838  * above do_rebuild_sched_domains() function.
839  */
840 static void async_rebuild_sched_domains(void)
841 {
842         queue_work(cpuset_wq, &rebuild_sched_domains_work);
843 }
844
845 /*
846  * Accomplishes the same scheduler domain rebuild as the above
847  * async_rebuild_sched_domains(), however it directly calls the
848  * rebuild routine synchronously rather than calling it via an
849  * asynchronous work thread.
850  *
851  * This can only be called from code that is not holding
852  * cgroup_mutex (not nested in a cgroup_lock() call.)
853  */
854 void rebuild_sched_domains(void)
855 {
856         do_rebuild_sched_domains(NULL);
857 }
858
859 /**
860  * cpuset_test_cpumask - test a task's cpus_allowed versus its cpuset's
861  * @tsk: task to test
862  * @scan: struct cgroup_scanner contained in its struct cpuset_hotplug_scanner
863  *
864  * Call with cgroup_mutex held.  May take callback_mutex during call.
865  * Called for each task in a cgroup by cgroup_scan_tasks().
866  * Return nonzero if this tasks's cpus_allowed mask should be changed (in other
867  * words, if its mask is not equal to its cpuset's mask).
868  */
869 static int cpuset_test_cpumask(struct task_struct *tsk,
870                                struct cgroup_scanner *scan)
871 {
872         return !cpumask_equal(&tsk->cpus_allowed,
873                         (cgroup_cs(scan->cg))->cpus_allowed);
874 }
875
876 /**
877  * cpuset_change_cpumask - make a task's cpus_allowed the same as its cpuset's
878  * @tsk: task to test
879  * @scan: struct cgroup_scanner containing the cgroup of the task
880  *
881  * Called by cgroup_scan_tasks() for each task in a cgroup whose
882  * cpus_allowed mask needs to be changed.
883  *
884  * We don't need to re-check for the cgroup/cpuset membership, since we're
885  * holding cgroup_lock() at this point.
886  */
887 static void cpuset_change_cpumask(struct task_struct *tsk,
888                                   struct cgroup_scanner *scan)
889 {
890         set_cpus_allowed_ptr(tsk, ((cgroup_cs(scan->cg))->cpus_allowed));
891 }
892
893 /**
894  * update_tasks_cpumask - Update the cpumasks of tasks in the cpuset.
895  * @cs: the cpuset in which each task's cpus_allowed mask needs to be changed
896  * @heap: if NULL, defer allocating heap memory to cgroup_scan_tasks()
897  *
898  * Called with cgroup_mutex held
899  *
900  * The cgroup_scan_tasks() function will scan all the tasks in a cgroup,
901  * calling callback functions for each.
902  *
903  * No return value. It's guaranteed that cgroup_scan_tasks() always returns 0
904  * if @heap != NULL.
905  */
906 static void update_tasks_cpumask(struct cpuset *cs, struct ptr_heap *heap)
907 {
908         struct cgroup_scanner scan;
909
910         scan.cg = cs->css.cgroup;
911         scan.test_task = cpuset_test_cpumask;
912         scan.process_task = cpuset_change_cpumask;
913         scan.heap = heap;
914         cgroup_scan_tasks(&scan);
915 }
916
917 /**
918  * update_cpumask - update the cpus_allowed mask of a cpuset and all tasks in it
919  * @cs: the cpuset to consider
920  * @buf: buffer of cpu numbers written to this cpuset
921  */
922 static int update_cpumask(struct cpuset *cs, struct cpuset *trialcs,
923                           const char *buf)
924 {
925         struct ptr_heap heap;
926         int retval;
927         int is_load_balanced;
928
929         /* top_cpuset.cpus_allowed tracks cpu_online_map; it's read-only */
930         if (cs == &top_cpuset)
931                 return -EACCES;
932
933         /*
934          * An empty cpus_allowed is ok only if the cpuset has no tasks.
935          * Since cpulist_parse() fails on an empty mask, we special case
936          * that parsing.  The validate_change() call ensures that cpusets
937          * with tasks have cpus.
938          */
939         if (!*buf) {
940                 cpumask_clear(trialcs->cpus_allowed);
941         } else {
942                 retval = cpulist_parse(buf, trialcs->cpus_allowed);
943                 if (retval < 0)
944                         return retval;
945
946                 if (!cpumask_subset(trialcs->cpus_allowed, cpu_online_mask))
947                         return -EINVAL;
948         }
949         retval = validate_change(cs, trialcs);
950         if (retval < 0)
951                 return retval;
952
953         /* Nothing to do if the cpus didn't change */
954         if (cpumask_equal(cs->cpus_allowed, trialcs->cpus_allowed))
955                 return 0;
956
957         retval = heap_init(&heap, PAGE_SIZE, GFP_KERNEL, NULL);
958         if (retval)
959                 return retval;
960
961         is_load_balanced = is_sched_load_balance(trialcs);
962
963         mutex_lock(&callback_mutex);
964         cpumask_copy(cs->cpus_allowed, trialcs->cpus_allowed);
965         mutex_unlock(&callback_mutex);
966
967         /*
968          * Scan tasks in the cpuset, and update the cpumasks of any
969          * that need an update.
970          */
971         update_tasks_cpumask(cs, &heap);
972
973         heap_free(&heap);
974
975         if (is_load_balanced)
976                 async_rebuild_sched_domains();
977         return 0;
978 }
979
980 /*
981  * cpuset_migrate_mm
982  *
983  *    Migrate memory region from one set of nodes to another.
984  *
985  *    Temporarilly set tasks mems_allowed to target nodes of migration,
986  *    so that the migration code can allocate pages on these nodes.
987  *
988  *    Call holding cgroup_mutex, so current's cpuset won't change
989  *    during this call, as manage_mutex holds off any cpuset_attach()
990  *    calls.  Therefore we don't need to take task_lock around the
991  *    call to guarantee_online_mems(), as we know no one is changing
992  *    our task's cpuset.
993  *
994  *    Hold callback_mutex around the two modifications of our tasks
995  *    mems_allowed to synchronize with cpuset_mems_allowed().
996  *
997  *    While the mm_struct we are migrating is typically from some
998  *    other task, the task_struct mems_allowed that we are hacking
999  *    is for our current task, which must allocate new pages for that
1000  *    migrating memory region.
1001  *
1002  *    We call cpuset_update_task_memory_state() before hacking
1003  *    our tasks mems_allowed, so that we are assured of being in
1004  *    sync with our tasks cpuset, and in particular, callbacks to
1005  *    cpuset_update_task_memory_state() from nested page allocations
1006  *    won't see any mismatch of our cpuset and task mems_generation
1007  *    values, so won't overwrite our hacked tasks mems_allowed
1008  *    nodemask.
1009  */
1010
1011 static void cpuset_migrate_mm(struct mm_struct *mm, const nodemask_t *from,
1012                                                         const nodemask_t *to)
1013 {
1014         struct task_struct *tsk = current;
1015
1016         cpuset_update_task_memory_state();
1017
1018         mutex_lock(&callback_mutex);
1019         tsk->mems_allowed = *to;
1020         mutex_unlock(&callback_mutex);
1021
1022         do_migrate_pages(mm, from, to, MPOL_MF_MOVE_ALL);
1023
1024         mutex_lock(&callback_mutex);
1025         guarantee_online_mems(task_cs(tsk),&tsk->mems_allowed);
1026         mutex_unlock(&callback_mutex);
1027 }
1028
1029 /*
1030  * Rebind task's vmas to cpuset's new mems_allowed, and migrate pages to new
1031  * nodes if memory_migrate flag is set. Called with cgroup_mutex held.
1032  */
1033 static void cpuset_change_nodemask(struct task_struct *p,
1034                                    struct cgroup_scanner *scan)
1035 {
1036         struct mm_struct *mm;
1037         struct cpuset *cs;
1038         int migrate;
1039         const nodemask_t *oldmem = scan->data;
1040
1041         mm = get_task_mm(p);
1042         if (!mm)
1043                 return;
1044
1045         cs = cgroup_cs(scan->cg);
1046         migrate = is_memory_migrate(cs);
1047
1048         mpol_rebind_mm(mm, &cs->mems_allowed);
1049         if (migrate)
1050                 cpuset_migrate_mm(mm, oldmem, &cs->mems_allowed);
1051         mmput(mm);
1052 }
1053
1054 static void *cpuset_being_rebound;
1055
1056 /**
1057  * update_tasks_nodemask - Update the nodemasks of tasks in the cpuset.
1058  * @cs: the cpuset in which each task's mems_allowed mask needs to be changed
1059  * @oldmem: old mems_allowed of cpuset cs
1060  *
1061  * Called with cgroup_mutex held
1062  * Return 0 if successful, -errno if not.
1063  */
1064 static int update_tasks_nodemask(struct cpuset *cs, const nodemask_t *oldmem)
1065 {
1066         int retval;
1067         struct cgroup_scanner scan;
1068
1069         cpuset_being_rebound = cs;              /* causes mpol_dup() rebind */
1070
1071         scan.cg = cs->css.cgroup;
1072         scan.test_task = NULL;
1073         scan.process_task = cpuset_change_nodemask;
1074         scan.heap = NULL;
1075         scan.data = (nodemask_t *)oldmem;
1076
1077         /*
1078          * The mpol_rebind_mm() call takes mmap_sem, which we couldn't
1079          * take while holding tasklist_lock.  Forks can happen - the
1080          * mpol_dup() cpuset_being_rebound check will catch such forks,
1081          * and rebind their vma mempolicies too.  Because we still hold
1082          * the global cgroup_mutex, we know that no other rebind effort
1083          * will be contending for the global variable cpuset_being_rebound.
1084          * It's ok if we rebind the same mm twice; mpol_rebind_mm()
1085          * is idempotent.  Also migrate pages in each mm to new nodes.
1086          */
1087         retval = cgroup_scan_tasks(&scan);
1088
1089         /* We're done rebinding vmas to this cpuset's new mems_allowed. */
1090         cpuset_being_rebound = NULL;
1091
1092         return retval;
1093 }
1094
1095 /*
1096  * Handle user request to change the 'mems' memory placement
1097  * of a cpuset.  Needs to validate the request, update the
1098  * cpusets mems_allowed and mems_generation, and for each
1099  * task in the cpuset, rebind any vma mempolicies and if
1100  * the cpuset is marked 'memory_migrate', migrate the tasks
1101  * pages to the new memory.
1102  *
1103  * Call with cgroup_mutex held.  May take callback_mutex during call.
1104  * Will take tasklist_lock, scan tasklist for tasks in cpuset cs,
1105  * lock each such tasks mm->mmap_sem, scan its vma's and rebind
1106  * their mempolicies to the cpusets new mems_allowed.
1107  */
1108 static int update_nodemask(struct cpuset *cs, struct cpuset *trialcs,
1109                            const char *buf)
1110 {
1111         nodemask_t oldmem;
1112         int retval;
1113
1114         /*
1115          * top_cpuset.mems_allowed tracks node_stats[N_HIGH_MEMORY];
1116          * it's read-only
1117          */
1118         if (cs == &top_cpuset)
1119                 return -EACCES;
1120
1121         /*
1122          * An empty mems_allowed is ok iff there are no tasks in the cpuset.
1123          * Since nodelist_parse() fails on an empty mask, we special case
1124          * that parsing.  The validate_change() call ensures that cpusets
1125          * with tasks have memory.
1126          */
1127         if (!*buf) {
1128                 nodes_clear(trialcs->mems_allowed);
1129         } else {
1130                 retval = nodelist_parse(buf, trialcs->mems_allowed);
1131                 if (retval < 0)
1132                         goto done;
1133
1134                 if (!nodes_subset(trialcs->mems_allowed,
1135                                 node_states[N_HIGH_MEMORY]))
1136                         return -EINVAL;
1137         }
1138         oldmem = cs->mems_allowed;
1139         if (nodes_equal(oldmem, trialcs->mems_allowed)) {
1140                 retval = 0;             /* Too easy - nothing to do */
1141                 goto done;
1142         }
1143         retval = validate_change(cs, trialcs);
1144         if (retval < 0)
1145                 goto done;
1146
1147         mutex_lock(&callback_mutex);
1148         cs->mems_allowed = trialcs->mems_allowed;
1149         cs->mems_generation = cpuset_mems_generation++;
1150         mutex_unlock(&callback_mutex);
1151
1152         retval = update_tasks_nodemask(cs, &oldmem);
1153 done:
1154         return retval;
1155 }
1156
1157 int current_cpuset_is_being_rebound(void)
1158 {
1159         return task_cs(current) == cpuset_being_rebound;
1160 }
1161
1162 static int update_relax_domain_level(struct cpuset *cs, s64 val)
1163 {
1164         if (val < -1 || val >= SD_LV_MAX)
1165                 return -EINVAL;
1166
1167         if (val != cs->relax_domain_level) {
1168                 cs->relax_domain_level = val;
1169                 if (!cpumask_empty(cs->cpus_allowed) &&
1170                     is_sched_load_balance(cs))
1171                         async_rebuild_sched_domains();
1172         }
1173
1174         return 0;
1175 }
1176
1177 /*
1178  * update_flag - read a 0 or a 1 in a file and update associated flag
1179  * bit:         the bit to update (see cpuset_flagbits_t)
1180  * cs:          the cpuset to update
1181  * turning_on:  whether the flag is being set or cleared
1182  *
1183  * Call with cgroup_mutex held.
1184  */
1185
1186 static int update_flag(cpuset_flagbits_t bit, struct cpuset *cs,
1187                        int turning_on)
1188 {
1189         struct cpuset *trialcs;
1190         int err;
1191         int balance_flag_changed;
1192
1193         trialcs = alloc_trial_cpuset(cs);
1194         if (!trialcs)
1195                 return -ENOMEM;
1196
1197         if (turning_on)
1198                 set_bit(bit, &trialcs->flags);
1199         else
1200                 clear_bit(bit, &trialcs->flags);
1201
1202         err = validate_change(cs, trialcs);
1203         if (err < 0)
1204                 goto out;
1205
1206         balance_flag_changed = (is_sched_load_balance(cs) !=
1207                                 is_sched_load_balance(trialcs));
1208
1209         mutex_lock(&callback_mutex);
1210         cs->flags = trialcs->flags;
1211         mutex_unlock(&callback_mutex);
1212
1213         if (!cpumask_empty(trialcs->cpus_allowed) && balance_flag_changed)
1214                 async_rebuild_sched_domains();
1215
1216 out:
1217         free_trial_cpuset(trialcs);
1218         return err;
1219 }
1220
1221 /*
1222  * Frequency meter - How fast is some event occurring?
1223  *
1224  * These routines manage a digitally filtered, constant time based,
1225  * event frequency meter.  There are four routines:
1226  *   fmeter_init() - initialize a frequency meter.
1227  *   fmeter_markevent() - called each time the event happens.
1228  *   fmeter_getrate() - returns the recent rate of such events.
1229  *   fmeter_update() - internal routine used to update fmeter.
1230  *
1231  * A common data structure is passed to each of these routines,
1232  * which is used to keep track of the state required to manage the
1233  * frequency meter and its digital filter.
1234  *
1235  * The filter works on the number of events marked per unit time.
1236  * The filter is single-pole low-pass recursive (IIR).  The time unit
1237  * is 1 second.  Arithmetic is done using 32-bit integers scaled to
1238  * simulate 3 decimal digits of precision (multiplied by 1000).
1239  *
1240  * With an FM_COEF of 933, and a time base of 1 second, the filter
1241  * has a half-life of 10 seconds, meaning that if the events quit
1242  * happening, then the rate returned from the fmeter_getrate()
1243  * will be cut in half each 10 seconds, until it converges to zero.
1244  *
1245  * It is not worth doing a real infinitely recursive filter.  If more
1246  * than FM_MAXTICKS ticks have elapsed since the last filter event,
1247  * just compute FM_MAXTICKS ticks worth, by which point the level
1248  * will be stable.
1249  *
1250  * Limit the count of unprocessed events to FM_MAXCNT, so as to avoid
1251  * arithmetic overflow in the fmeter_update() routine.
1252  *
1253  * Given the simple 32 bit integer arithmetic used, this meter works
1254  * best for reporting rates between one per millisecond (msec) and
1255  * one per 32 (approx) seconds.  At constant rates faster than one
1256  * per msec it maxes out at values just under 1,000,000.  At constant
1257  * rates between one per msec, and one per second it will stabilize
1258  * to a value N*1000, where N is the rate of events per second.
1259  * At constant rates between one per second and one per 32 seconds,
1260  * it will be choppy, moving up on the seconds that have an event,
1261  * and then decaying until the next event.  At rates slower than
1262  * about one in 32 seconds, it decays all the way back to zero between
1263  * each event.
1264  */
1265
1266 #define FM_COEF 933             /* coefficient for half-life of 10 secs */
1267 #define FM_MAXTICKS ((time_t)99) /* useless computing more ticks than this */
1268 #define FM_MAXCNT 1000000       /* limit cnt to avoid overflow */
1269 #define FM_SCALE 1000           /* faux fixed point scale */
1270
1271 /* Initialize a frequency meter */
1272 static void fmeter_init(struct fmeter *fmp)
1273 {
1274         fmp->cnt = 0;
1275         fmp->val = 0;
1276         fmp->time = 0;
1277         spin_lock_init(&fmp->lock);
1278 }
1279
1280 /* Internal meter update - process cnt events and update value */
1281 static void fmeter_update(struct fmeter *fmp)
1282 {
1283         time_t now = get_seconds();
1284         time_t ticks = now - fmp->time;
1285
1286         if (ticks == 0)
1287                 return;
1288
1289         ticks = min(FM_MAXTICKS, ticks);
1290         while (ticks-- > 0)
1291                 fmp->val = (FM_COEF * fmp->val) / FM_SCALE;
1292         fmp->time = now;
1293
1294         fmp->val += ((FM_SCALE - FM_COEF) * fmp->cnt) / FM_SCALE;
1295         fmp->cnt = 0;
1296 }
1297
1298 /* Process any previous ticks, then bump cnt by one (times scale). */
1299 static void fmeter_markevent(struct fmeter *fmp)
1300 {
1301         spin_lock(&fmp->lock);
1302         fmeter_update(fmp);
1303         fmp->cnt = min(FM_MAXCNT, fmp->cnt + FM_SCALE);
1304         spin_unlock(&fmp->lock);
1305 }
1306
1307 /* Process any previous ticks, then return current value. */
1308 static int fmeter_getrate(struct fmeter *fmp)
1309 {
1310         int val;
1311
1312         spin_lock(&fmp->lock);
1313         fmeter_update(fmp);
1314         val = fmp->val;
1315         spin_unlock(&fmp->lock);
1316         return val;
1317 }
1318
1319 /* Protected by cgroup_lock */
1320 static cpumask_var_t cpus_attach;
1321
1322 /* Called by cgroups to determine if a cpuset is usable; cgroup_mutex held */
1323 static int cpuset_can_attach(struct cgroup_subsys *ss,
1324                              struct cgroup *cont, struct task_struct *tsk)
1325 {
1326         struct cpuset *cs = cgroup_cs(cont);
1327         int ret = 0;
1328
1329         if (cpumask_empty(cs->cpus_allowed) || nodes_empty(cs->mems_allowed))
1330                 return -ENOSPC;
1331
1332         if (tsk->flags & PF_THREAD_BOUND) {
1333                 mutex_lock(&callback_mutex);
1334                 if (!cpumask_equal(&tsk->cpus_allowed, cs->cpus_allowed))
1335                         ret = -EINVAL;
1336                 mutex_unlock(&callback_mutex);
1337         }
1338
1339         return ret < 0 ? ret : security_task_setscheduler(tsk, 0, NULL);
1340 }
1341
1342 static void cpuset_attach(struct cgroup_subsys *ss,
1343                           struct cgroup *cont, struct cgroup *oldcont,
1344                           struct task_struct *tsk)
1345 {
1346         nodemask_t from, to;
1347         struct mm_struct *mm;
1348         struct cpuset *cs = cgroup_cs(cont);
1349         struct cpuset *oldcs = cgroup_cs(oldcont);
1350         int err;
1351
1352         if (cs == &top_cpuset) {
1353                 cpumask_copy(cpus_attach, cpu_possible_mask);
1354         } else {
1355                 mutex_lock(&callback_mutex);
1356                 guarantee_online_cpus(cs, cpus_attach);
1357                 mutex_unlock(&callback_mutex);
1358         }
1359         err = set_cpus_allowed_ptr(tsk, cpus_attach);
1360         if (err)
1361                 return;
1362
1363         from = oldcs->mems_allowed;
1364         to = cs->mems_allowed;
1365         mm = get_task_mm(tsk);
1366         if (mm) {
1367                 mpol_rebind_mm(mm, &to);
1368                 if (is_memory_migrate(cs))
1369                         cpuset_migrate_mm(mm, &from, &to);
1370                 mmput(mm);
1371         }
1372 }
1373
1374 /* The various types of files and directories in a cpuset file system */
1375
1376 typedef enum {
1377         FILE_MEMORY_MIGRATE,
1378         FILE_CPULIST,
1379         FILE_MEMLIST,
1380         FILE_CPU_EXCLUSIVE,
1381         FILE_MEM_EXCLUSIVE,
1382         FILE_MEM_HARDWALL,
1383         FILE_SCHED_LOAD_BALANCE,
1384         FILE_SCHED_RELAX_DOMAIN_LEVEL,
1385         FILE_MEMORY_PRESSURE_ENABLED,
1386         FILE_MEMORY_PRESSURE,
1387         FILE_SPREAD_PAGE,
1388         FILE_SPREAD_SLAB,
1389 } cpuset_filetype_t;
1390
1391 static int cpuset_write_u64(struct cgroup *cgrp, struct cftype *cft, u64 val)
1392 {
1393         int retval = 0;
1394         struct cpuset *cs = cgroup_cs(cgrp);
1395         cpuset_filetype_t type = cft->private;
1396
1397         if (!cgroup_lock_live_group(cgrp))
1398                 return -ENODEV;
1399
1400         switch (type) {
1401         case FILE_CPU_EXCLUSIVE:
1402                 retval = update_flag(CS_CPU_EXCLUSIVE, cs, val);
1403                 break;
1404         case FILE_MEM_EXCLUSIVE:
1405                 retval = update_flag(CS_MEM_EXCLUSIVE, cs, val);
1406                 break;
1407         case FILE_MEM_HARDWALL:
1408                 retval = update_flag(CS_MEM_HARDWALL, cs, val);
1409                 break;
1410         case FILE_SCHED_LOAD_BALANCE:
1411                 retval = update_flag(CS_SCHED_LOAD_BALANCE, cs, val);
1412                 break;
1413         case FILE_MEMORY_MIGRATE:
1414                 retval = update_flag(CS_MEMORY_MIGRATE, cs, val);
1415                 break;
1416         case FILE_MEMORY_PRESSURE_ENABLED:
1417                 cpuset_memory_pressure_enabled = !!val;
1418                 break;
1419         case FILE_MEMORY_PRESSURE:
1420                 retval = -EACCES;
1421                 break;
1422         case FILE_SPREAD_PAGE:
1423                 retval = update_flag(CS_SPREAD_PAGE, cs, val);
1424                 cs->mems_generation = cpuset_mems_generation++;
1425                 break;
1426         case FILE_SPREAD_SLAB:
1427                 retval = update_flag(CS_SPREAD_SLAB, cs, val);
1428                 cs->mems_generation = cpuset_mems_generation++;
1429                 break;
1430         default:
1431                 retval = -EINVAL;
1432                 break;
1433         }
1434         cgroup_unlock();
1435         return retval;
1436 }
1437
1438 static int cpuset_write_s64(struct cgroup *cgrp, struct cftype *cft, s64 val)
1439 {
1440         int retval = 0;
1441         struct cpuset *cs = cgroup_cs(cgrp);
1442         cpuset_filetype_t type = cft->private;
1443
1444         if (!cgroup_lock_live_group(cgrp))
1445                 return -ENODEV;
1446
1447         switch (type) {
1448         case FILE_SCHED_RELAX_DOMAIN_LEVEL:
1449                 retval = update_relax_domain_level(cs, val);
1450                 break;
1451         default:
1452                 retval = -EINVAL;
1453                 break;
1454         }
1455         cgroup_unlock();
1456         return retval;
1457 }
1458
1459 /*
1460  * Common handling for a write to a "cpus" or "mems" file.
1461  */
1462 static int cpuset_write_resmask(struct cgroup *cgrp, struct cftype *cft,
1463                                 const char *buf)
1464 {
1465         int retval = 0;
1466         struct cpuset *cs = cgroup_cs(cgrp);
1467         struct cpuset *trialcs;
1468
1469         if (!cgroup_lock_live_group(cgrp))
1470                 return -ENODEV;
1471
1472         trialcs = alloc_trial_cpuset(cs);
1473         if (!trialcs)
1474                 return -ENOMEM;
1475
1476         switch (cft->private) {
1477         case FILE_CPULIST:
1478                 retval = update_cpumask(cs, trialcs, buf);
1479                 break;
1480         case FILE_MEMLIST:
1481                 retval = update_nodemask(cs, trialcs, buf);
1482                 break;
1483         default:
1484                 retval = -EINVAL;
1485                 break;
1486         }
1487
1488         free_trial_cpuset(trialcs);
1489         cgroup_unlock();
1490         return retval;
1491 }
1492
1493 /*
1494  * These ascii lists should be read in a single call, by using a user
1495  * buffer large enough to hold the entire map.  If read in smaller
1496  * chunks, there is no guarantee of atomicity.  Since the display format
1497  * used, list of ranges of sequential numbers, is variable length,
1498  * and since these maps can change value dynamically, one could read
1499  * gibberish by doing partial reads while a list was changing.
1500  * A single large read to a buffer that crosses a page boundary is
1501  * ok, because the result being copied to user land is not recomputed
1502  * across a page fault.
1503  */
1504
1505 static int cpuset_sprintf_cpulist(char *page, struct cpuset *cs)
1506 {
1507         int ret;
1508
1509         mutex_lock(&callback_mutex);
1510         ret = cpulist_scnprintf(page, PAGE_SIZE, cs->cpus_allowed);
1511         mutex_unlock(&callback_mutex);
1512
1513         return ret;
1514 }
1515
1516 static int cpuset_sprintf_memlist(char *page, struct cpuset *cs)
1517 {
1518         nodemask_t mask;
1519
1520         mutex_lock(&callback_mutex);
1521         mask = cs->mems_allowed;
1522         mutex_unlock(&callback_mutex);
1523
1524         return nodelist_scnprintf(page, PAGE_SIZE, mask);
1525 }
1526
1527 static ssize_t cpuset_common_file_read(struct cgroup *cont,
1528                                        struct cftype *cft,
1529                                        struct file *file,
1530                                        char __user *buf,
1531                                        size_t nbytes, loff_t *ppos)
1532 {
1533         struct cpuset *cs = cgroup_cs(cont);
1534         cpuset_filetype_t type = cft->private;
1535         char *page;
1536         ssize_t retval = 0;
1537         char *s;
1538
1539         if (!(page = (char *)__get_free_page(GFP_TEMPORARY)))
1540                 return -ENOMEM;
1541
1542         s = page;
1543
1544         switch (type) {
1545         case FILE_CPULIST:
1546                 s += cpuset_sprintf_cpulist(s, cs);
1547                 break;
1548         case FILE_MEMLIST:
1549                 s += cpuset_sprintf_memlist(s, cs);
1550                 break;
1551         default:
1552                 retval = -EINVAL;
1553                 goto out;
1554         }
1555         *s++ = '\n';
1556
1557         retval = simple_read_from_buffer(buf, nbytes, ppos, page, s - page);
1558 out:
1559         free_page((unsigned long)page);
1560         return retval;
1561 }
1562
1563 static u64 cpuset_read_u64(struct cgroup *cont, struct cftype *cft)
1564 {
1565         struct cpuset *cs = cgroup_cs(cont);
1566         cpuset_filetype_t type = cft->private;
1567         switch (type) {
1568         case FILE_CPU_EXCLUSIVE:
1569                 return is_cpu_exclusive(cs);
1570         case FILE_MEM_EXCLUSIVE:
1571                 return is_mem_exclusive(cs);
1572         case FILE_MEM_HARDWALL:
1573                 return is_mem_hardwall(cs);
1574         case FILE_SCHED_LOAD_BALANCE:
1575                 return is_sched_load_balance(cs);
1576         case FILE_MEMORY_MIGRATE:
1577                 return is_memory_migrate(cs);
1578         case FILE_MEMORY_PRESSURE_ENABLED:
1579                 return cpuset_memory_pressure_enabled;
1580         case FILE_MEMORY_PRESSURE:
1581                 return fmeter_getrate(&cs->fmeter);
1582         case FILE_SPREAD_PAGE:
1583                 return is_spread_page(cs);
1584         case FILE_SPREAD_SLAB:
1585                 return is_spread_slab(cs);
1586         default:
1587                 BUG();
1588         }
1589
1590         /* Unreachable but makes gcc happy */
1591         return 0;
1592 }
1593
1594 static s64 cpuset_read_s64(struct cgroup *cont, struct cftype *cft)
1595 {
1596         struct cpuset *cs = cgroup_cs(cont);
1597         cpuset_filetype_t type = cft->private;
1598         switch (type) {
1599         case FILE_SCHED_RELAX_DOMAIN_LEVEL:
1600                 return cs->relax_domain_level;
1601         default:
1602                 BUG();
1603         }
1604
1605         /* Unrechable but makes gcc happy */
1606         return 0;
1607 }
1608
1609
1610 /*
1611  * for the common functions, 'private' gives the type of file
1612  */
1613
1614 static struct cftype files[] = {
1615         {
1616                 .name = "cpus",
1617                 .read = cpuset_common_file_read,
1618                 .write_string = cpuset_write_resmask,
1619                 .max_write_len = (100U + 6 * NR_CPUS),
1620                 .private = FILE_CPULIST,
1621         },
1622
1623         {
1624                 .name = "mems",
1625                 .read = cpuset_common_file_read,
1626                 .write_string = cpuset_write_resmask,
1627                 .max_write_len = (100U + 6 * MAX_NUMNODES),
1628                 .private = FILE_MEMLIST,
1629         },
1630
1631         {
1632                 .name = "cpu_exclusive",
1633                 .read_u64 = cpuset_read_u64,
1634                 .write_u64 = cpuset_write_u64,
1635                 .private = FILE_CPU_EXCLUSIVE,
1636         },
1637
1638         {
1639                 .name = "mem_exclusive",
1640                 .read_u64 = cpuset_read_u64,
1641                 .write_u64 = cpuset_write_u64,
1642                 .private = FILE_MEM_EXCLUSIVE,
1643         },
1644
1645         {
1646                 .name = "mem_hardwall",
1647                 .read_u64 = cpuset_read_u64,
1648                 .write_u64 = cpuset_write_u64,
1649                 .private = FILE_MEM_HARDWALL,
1650         },
1651
1652         {
1653                 .name = "sched_load_balance",
1654                 .read_u64 = cpuset_read_u64,
1655                 .write_u64 = cpuset_write_u64,
1656                 .private = FILE_SCHED_LOAD_BALANCE,
1657         },
1658
1659         {
1660                 .name = "sched_relax_domain_level",
1661                 .read_s64 = cpuset_read_s64,
1662                 .write_s64 = cpuset_write_s64,
1663                 .private = FILE_SCHED_RELAX_DOMAIN_LEVEL,
1664         },
1665
1666         {
1667                 .name = "memory_migrate",
1668                 .read_u64 = cpuset_read_u64,
1669                 .write_u64 = cpuset_write_u64,
1670                 .private = FILE_MEMORY_MIGRATE,
1671         },
1672
1673         {
1674                 .name = "memory_pressure",
1675                 .read_u64 = cpuset_read_u64,
1676                 .write_u64 = cpuset_write_u64,
1677                 .private = FILE_MEMORY_PRESSURE,
1678                 .mode = S_IRUGO,
1679         },
1680
1681         {
1682                 .name = "memory_spread_page",
1683                 .read_u64 = cpuset_read_u64,
1684                 .write_u64 = cpuset_write_u64,
1685                 .private = FILE_SPREAD_PAGE,
1686         },
1687
1688         {
1689                 .name = "memory_spread_slab",
1690                 .read_u64 = cpuset_read_u64,
1691                 .write_u64 = cpuset_write_u64,
1692                 .private = FILE_SPREAD_SLAB,
1693         },
1694 };
1695
1696 static struct cftype cft_memory_pressure_enabled = {
1697         .name = "memory_pressure_enabled",
1698         .read_u64 = cpuset_read_u64,
1699         .write_u64 = cpuset_write_u64,
1700         .private = FILE_MEMORY_PRESSURE_ENABLED,
1701 };
1702
1703 static int cpuset_populate(struct cgroup_subsys *ss, struct cgroup *cont)
1704 {
1705         int err;
1706
1707         err = cgroup_add_files(cont, ss, files, ARRAY_SIZE(files));
1708         if (err)
1709                 return err;
1710         /* memory_pressure_enabled is in root cpuset only */
1711         if (!cont->parent)
1712                 err = cgroup_add_file(cont, ss,
1713                                       &cft_memory_pressure_enabled);
1714         return err;
1715 }
1716
1717 /*
1718  * post_clone() is called at the end of cgroup_clone().
1719  * 'cgroup' was just created automatically as a result of
1720  * a cgroup_clone(), and the current task is about to
1721  * be moved into 'cgroup'.
1722  *
1723  * Currently we refuse to set up the cgroup - thereby
1724  * refusing the task to be entered, and as a result refusing
1725  * the sys_unshare() or clone() which initiated it - if any
1726  * sibling cpusets have exclusive cpus or mem.
1727  *
1728  * If this becomes a problem for some users who wish to
1729  * allow that scenario, then cpuset_post_clone() could be
1730  * changed to grant parent->cpus_allowed-sibling_cpus_exclusive
1731  * (and likewise for mems) to the new cgroup. Called with cgroup_mutex
1732  * held.
1733  */
1734 static void cpuset_post_clone(struct cgroup_subsys *ss,
1735                               struct cgroup *cgroup)
1736 {
1737         struct cgroup *parent, *child;
1738         struct cpuset *cs, *parent_cs;
1739
1740         parent = cgroup->parent;
1741         list_for_each_entry(child, &parent->children, sibling) {
1742                 cs = cgroup_cs(child);
1743                 if (is_mem_exclusive(cs) || is_cpu_exclusive(cs))
1744                         return;
1745         }
1746         cs = cgroup_cs(cgroup);
1747         parent_cs = cgroup_cs(parent);
1748
1749         cs->mems_allowed = parent_cs->mems_allowed;
1750         cpumask_copy(cs->cpus_allowed, parent_cs->cpus_allowed);
1751         return;
1752 }
1753
1754 /*
1755  *      cpuset_create - create a cpuset
1756  *      ss:     cpuset cgroup subsystem
1757  *      cont:   control group that the new cpuset will be part of
1758  */
1759
1760 static struct cgroup_subsys_state *cpuset_create(
1761         struct cgroup_subsys *ss,
1762         struct cgroup *cont)
1763 {
1764         struct cpuset *cs;
1765         struct cpuset *parent;
1766
1767         if (!cont->parent) {
1768                 /* This is early initialization for the top cgroup */
1769                 top_cpuset.mems_generation = cpuset_mems_generation++;
1770                 return &top_cpuset.css;
1771         }
1772         parent = cgroup_cs(cont->parent);
1773         cs = kmalloc(sizeof(*cs), GFP_KERNEL);
1774         if (!cs)
1775                 return ERR_PTR(-ENOMEM);
1776         if (!alloc_cpumask_var(&cs->cpus_allowed, GFP_KERNEL)) {
1777                 kfree(cs);
1778                 return ERR_PTR(-ENOMEM);
1779         }
1780
1781         cpuset_update_task_memory_state();
1782         cs->flags = 0;
1783         if (is_spread_page(parent))
1784                 set_bit(CS_SPREAD_PAGE, &cs->flags);
1785         if (is_spread_slab(parent))
1786                 set_bit(CS_SPREAD_SLAB, &cs->flags);
1787         set_bit(CS_SCHED_LOAD_BALANCE, &cs->flags);
1788         cpumask_clear(cs->cpus_allowed);
1789         nodes_clear(cs->mems_allowed);
1790         cs->mems_generation = cpuset_mems_generation++;
1791         fmeter_init(&cs->fmeter);
1792         cs->relax_domain_level = -1;
1793
1794         cs->parent = parent;
1795         number_of_cpusets++;
1796         return &cs->css ;
1797 }
1798
1799 /*
1800  * If the cpuset being removed has its flag 'sched_load_balance'
1801  * enabled, then simulate turning sched_load_balance off, which
1802  * will call async_rebuild_sched_domains().
1803  */
1804
1805 static void cpuset_destroy(struct cgroup_subsys *ss, struct cgroup *cont)
1806 {
1807         struct cpuset *cs = cgroup_cs(cont);
1808
1809         cpuset_update_task_memory_state();
1810
1811         if (is_sched_load_balance(cs))
1812                 update_flag(CS_SCHED_LOAD_BALANCE, cs, 0);
1813
1814         number_of_cpusets--;
1815         free_cpumask_var(cs->cpus_allowed);
1816         kfree(cs);
1817 }
1818
1819 struct cgroup_subsys cpuset_subsys = {
1820         .name = "cpuset",
1821         .create = cpuset_create,
1822         .destroy = cpuset_destroy,
1823         .can_attach = cpuset_can_attach,
1824         .attach = cpuset_attach,
1825         .populate = cpuset_populate,
1826         .post_clone = cpuset_post_clone,
1827         .subsys_id = cpuset_subsys_id,
1828         .early_init = 1,
1829 };
1830
1831 /*
1832  * cpuset_init_early - just enough so that the calls to
1833  * cpuset_update_task_memory_state() in early init code
1834  * are harmless.
1835  */
1836
1837 int __init cpuset_init_early(void)
1838 {
1839         alloc_bootmem_cpumask_var(&top_cpuset.cpus_allowed);
1840
1841         top_cpuset.mems_generation = cpuset_mems_generation++;
1842         return 0;
1843 }
1844
1845
1846 /**
1847  * cpuset_init - initialize cpusets at system boot
1848  *
1849  * Description: Initialize top_cpuset and the cpuset internal file system,
1850  **/
1851
1852 int __init cpuset_init(void)
1853 {
1854         int err = 0;
1855
1856         cpumask_setall(top_cpuset.cpus_allowed);
1857         nodes_setall(top_cpuset.mems_allowed);
1858
1859         fmeter_init(&top_cpuset.fmeter);
1860         top_cpuset.mems_generation = cpuset_mems_generation++;
1861         set_bit(CS_SCHED_LOAD_BALANCE, &top_cpuset.flags);
1862         top_cpuset.relax_domain_level = -1;
1863
1864         err = register_filesystem(&cpuset_fs_type);
1865         if (err < 0)
1866                 return err;
1867
1868         if (!alloc_cpumask_var(&cpus_attach, GFP_KERNEL))
1869                 BUG();
1870
1871         number_of_cpusets = 1;
1872         return 0;
1873 }
1874
1875 /**
1876  * cpuset_do_move_task - move a given task to another cpuset
1877  * @tsk: pointer to task_struct the task to move
1878  * @scan: struct cgroup_scanner contained in its struct cpuset_hotplug_scanner
1879  *
1880  * Called by cgroup_scan_tasks() for each task in a cgroup.
1881  * Return nonzero to stop the walk through the tasks.
1882  */
1883 static void cpuset_do_move_task(struct task_struct *tsk,
1884                                 struct cgroup_scanner *scan)
1885 {
1886         struct cpuset_hotplug_scanner *chsp;
1887
1888         chsp = container_of(scan, struct cpuset_hotplug_scanner, scan);
1889         cgroup_attach_task(chsp->to, tsk);
1890 }
1891
1892 /**
1893  * move_member_tasks_to_cpuset - move tasks from one cpuset to another
1894  * @from: cpuset in which the tasks currently reside
1895  * @to: cpuset to which the tasks will be moved
1896  *
1897  * Called with cgroup_mutex held
1898  * callback_mutex must not be held, as cpuset_attach() will take it.
1899  *
1900  * The cgroup_scan_tasks() function will scan all the tasks in a cgroup,
1901  * calling callback functions for each.
1902  */
1903 static void move_member_tasks_to_cpuset(struct cpuset *from, struct cpuset *to)
1904 {
1905         struct cpuset_hotplug_scanner scan;
1906
1907         scan.scan.cg = from->css.cgroup;
1908         scan.scan.test_task = NULL; /* select all tasks in cgroup */
1909         scan.scan.process_task = cpuset_do_move_task;
1910         scan.scan.heap = NULL;
1911         scan.to = to->css.cgroup;
1912
1913         if (cgroup_scan_tasks(&scan.scan))
1914                 printk(KERN_ERR "move_member_tasks_to_cpuset: "
1915                                 "cgroup_scan_tasks failed\n");
1916 }
1917
1918 /*
1919  * If CPU and/or memory hotplug handlers, below, unplug any CPUs
1920  * or memory nodes, we need to walk over the cpuset hierarchy,
1921  * removing that CPU or node from all cpusets.  If this removes the
1922  * last CPU or node from a cpuset, then move the tasks in the empty
1923  * cpuset to its next-highest non-empty parent.
1924  *
1925  * Called with cgroup_mutex held
1926  * callback_mutex must not be held, as cpuset_attach() will take it.
1927  */
1928 static void remove_tasks_in_empty_cpuset(struct cpuset *cs)
1929 {
1930         struct cpuset *parent;
1931
1932         /*
1933          * The cgroup's css_sets list is in use if there are tasks
1934          * in the cpuset; the list is empty if there are none;
1935          * the cs->css.refcnt seems always 0.
1936          */
1937         if (list_empty(&cs->css.cgroup->css_sets))
1938                 return;
1939
1940         /*
1941          * Find its next-highest non-empty parent, (top cpuset
1942          * has online cpus, so can't be empty).
1943          */
1944         parent = cs->parent;
1945         while (cpumask_empty(parent->cpus_allowed) ||
1946                         nodes_empty(parent->mems_allowed))
1947                 parent = parent->parent;
1948
1949         move_member_tasks_to_cpuset(cs, parent);
1950 }
1951
1952 /*
1953  * Walk the specified cpuset subtree and look for empty cpusets.
1954  * The tasks of such cpuset must be moved to a parent cpuset.
1955  *
1956  * Called with cgroup_mutex held.  We take callback_mutex to modify
1957  * cpus_allowed and mems_allowed.
1958  *
1959  * This walk processes the tree from top to bottom, completing one layer
1960  * before dropping down to the next.  It always processes a node before
1961  * any of its children.
1962  *
1963  * For now, since we lack memory hot unplug, we'll never see a cpuset
1964  * that has tasks along with an empty 'mems'.  But if we did see such
1965  * a cpuset, we'd handle it just like we do if its 'cpus' was empty.
1966  */
1967 static void scan_for_empty_cpusets(struct cpuset *root)
1968 {
1969         LIST_HEAD(queue);
1970         struct cpuset *cp;      /* scans cpusets being updated */
1971         struct cpuset *child;   /* scans child cpusets of cp */
1972         struct cgroup *cont;
1973         nodemask_t oldmems;
1974
1975         list_add_tail((struct list_head *)&root->stack_list, &queue);
1976
1977         while (!list_empty(&queue)) {
1978                 cp = list_first_entry(&queue, struct cpuset, stack_list);
1979                 list_del(queue.next);
1980                 list_for_each_entry(cont, &cp->css.cgroup->children, sibling) {
1981                         child = cgroup_cs(cont);
1982                         list_add_tail(&child->stack_list, &queue);
1983                 }
1984
1985                 /* Continue past cpusets with all cpus, mems online */
1986                 if (cpumask_subset(cp->cpus_allowed, cpu_online_mask) &&
1987                     nodes_subset(cp->mems_allowed, node_states[N_HIGH_MEMORY]))
1988                         continue;
1989
1990                 oldmems = cp->mems_allowed;
1991
1992                 /* Remove offline cpus and mems from this cpuset. */
1993                 mutex_lock(&callback_mutex);
1994                 cpumask_and(cp->cpus_allowed, cp->cpus_allowed,
1995                             cpu_online_mask);
1996                 nodes_and(cp->mems_allowed, cp->mems_allowed,
1997                                                 node_states[N_HIGH_MEMORY]);
1998                 mutex_unlock(&callback_mutex);
1999
2000                 /* Move tasks from the empty cpuset to a parent */
2001                 if (cpumask_empty(cp->cpus_allowed) ||
2002                      nodes_empty(cp->mems_allowed))
2003                         remove_tasks_in_empty_cpuset(cp);
2004                 else {
2005                         update_tasks_cpumask(cp, NULL);
2006                         update_tasks_nodemask(cp, &oldmems);
2007                 }
2008         }
2009 }
2010
2011 /*
2012  * The top_cpuset tracks what CPUs and Memory Nodes are online,
2013  * period.  This is necessary in order to make cpusets transparent
2014  * (of no affect) on systems that are actively using CPU hotplug
2015  * but making no active use of cpusets.
2016  *
2017  * This routine ensures that top_cpuset.cpus_allowed tracks
2018  * cpu_online_map on each CPU hotplug (cpuhp) event.
2019  *
2020  * Called within get_online_cpus().  Needs to call cgroup_lock()
2021  * before calling generate_sched_domains().
2022  */
2023 static int cpuset_track_online_cpus(struct notifier_block *unused_nb,
2024                                 unsigned long phase, void *unused_cpu)
2025 {
2026         struct sched_domain_attr *attr;
2027         struct cpumask *doms;
2028         int ndoms;
2029
2030         switch (phase) {
2031         case CPU_ONLINE:
2032         case CPU_ONLINE_FROZEN:
2033         case CPU_DEAD:
2034         case CPU_DEAD_FROZEN:
2035                 break;
2036
2037         default:
2038                 return NOTIFY_DONE;
2039         }
2040
2041         cgroup_lock();
2042         mutex_lock(&callback_mutex);
2043         cpumask_copy(top_cpuset.cpus_allowed, cpu_online_mask);
2044         mutex_unlock(&callback_mutex);
2045         scan_for_empty_cpusets(&top_cpuset);
2046         ndoms = generate_sched_domains(&doms, &attr);
2047         cgroup_unlock();
2048
2049         /* Have scheduler rebuild the domains */
2050         partition_sched_domains(ndoms, doms, attr);
2051
2052         return NOTIFY_OK;
2053 }
2054
2055 #ifdef CONFIG_MEMORY_HOTPLUG
2056 /*
2057  * Keep top_cpuset.mems_allowed tracking node_states[N_HIGH_MEMORY].
2058  * Call this routine anytime after node_states[N_HIGH_MEMORY] changes.
2059  * See also the previous routine cpuset_track_online_cpus().
2060  */
2061 static int cpuset_track_online_nodes(struct notifier_block *self,
2062                                 unsigned long action, void *arg)
2063 {
2064         cgroup_lock();
2065         switch (action) {
2066         case MEM_ONLINE:
2067         case MEM_OFFLINE:
2068                 mutex_lock(&callback_mutex);
2069                 top_cpuset.mems_allowed = node_states[N_HIGH_MEMORY];
2070                 mutex_unlock(&callback_mutex);
2071                 if (action == MEM_OFFLINE)
2072                         scan_for_empty_cpusets(&top_cpuset);
2073                 break;
2074         default:
2075                 break;
2076         }
2077         cgroup_unlock();
2078         return NOTIFY_OK;
2079 }
2080 #endif
2081
2082 /**
2083  * cpuset_init_smp - initialize cpus_allowed
2084  *
2085  * Description: Finish top cpuset after cpu, node maps are initialized
2086  **/
2087
2088 void __init cpuset_init_smp(void)
2089 {
2090         cpumask_copy(top_cpuset.cpus_allowed, cpu_online_mask);
2091         top_cpuset.mems_allowed = node_states[N_HIGH_MEMORY];
2092
2093         hotcpu_notifier(cpuset_track_online_cpus, 0);
2094         hotplug_memory_notifier(cpuset_track_online_nodes, 10);
2095
2096         cpuset_wq = create_singlethread_workqueue("cpuset");
2097         BUG_ON(!cpuset_wq);
2098 }
2099
2100 /**
2101  * cpuset_cpus_allowed - return cpus_allowed mask from a tasks cpuset.
2102  * @tsk: pointer to task_struct from which to obtain cpuset->cpus_allowed.
2103  * @pmask: pointer to struct cpumask variable to receive cpus_allowed set.
2104  *
2105  * Description: Returns the cpumask_var_t cpus_allowed of the cpuset
2106  * attached to the specified @tsk.  Guaranteed to return some non-empty
2107  * subset of cpu_online_map, even if this means going outside the
2108  * tasks cpuset.
2109  **/
2110
2111 void cpuset_cpus_allowed(struct task_struct *tsk, struct cpumask *pmask)
2112 {
2113         mutex_lock(&callback_mutex);
2114         cpuset_cpus_allowed_locked(tsk, pmask);
2115         mutex_unlock(&callback_mutex);
2116 }
2117
2118 /**
2119  * cpuset_cpus_allowed_locked - return cpus_allowed mask from a tasks cpuset.
2120  * Must be called with callback_mutex held.
2121  **/
2122 void cpuset_cpus_allowed_locked(struct task_struct *tsk, struct cpumask *pmask)
2123 {
2124         task_lock(tsk);
2125         guarantee_online_cpus(task_cs(tsk), pmask);
2126         task_unlock(tsk);
2127 }
2128
2129 void cpuset_init_current_mems_allowed(void)
2130 {
2131         nodes_setall(current->mems_allowed);
2132 }
2133
2134 /**
2135  * cpuset_mems_allowed - return mems_allowed mask from a tasks cpuset.
2136  * @tsk: pointer to task_struct from which to obtain cpuset->mems_allowed.
2137  *
2138  * Description: Returns the nodemask_t mems_allowed of the cpuset
2139  * attached to the specified @tsk.  Guaranteed to return some non-empty
2140  * subset of node_states[N_HIGH_MEMORY], even if this means going outside the
2141  * tasks cpuset.
2142  **/
2143
2144 nodemask_t cpuset_mems_allowed(struct task_struct *tsk)
2145 {
2146         nodemask_t mask;
2147
2148         mutex_lock(&callback_mutex);
2149         task_lock(tsk);
2150         guarantee_online_mems(task_cs(tsk), &mask);
2151         task_unlock(tsk);
2152         mutex_unlock(&callback_mutex);
2153
2154         return mask;
2155 }
2156
2157 /**
2158  * cpuset_nodemask_valid_mems_allowed - check nodemask vs. curremt mems_allowed
2159  * @nodemask: the nodemask to be checked
2160  *
2161  * Are any of the nodes in the nodemask allowed in current->mems_allowed?
2162  */
2163 int cpuset_nodemask_valid_mems_allowed(nodemask_t *nodemask)
2164 {
2165         return nodes_intersects(*nodemask, current->mems_allowed);
2166 }
2167
2168 /*
2169  * nearest_hardwall_ancestor() - Returns the nearest mem_exclusive or
2170  * mem_hardwall ancestor to the specified cpuset.  Call holding
2171  * callback_mutex.  If no ancestor is mem_exclusive or mem_hardwall
2172  * (an unusual configuration), then returns the root cpuset.
2173  */
2174 static const struct cpuset *nearest_hardwall_ancestor(const struct cpuset *cs)
2175 {
2176         while (!(is_mem_exclusive(cs) || is_mem_hardwall(cs)) && cs->parent)
2177                 cs = cs->parent;
2178         return cs;
2179 }
2180
2181 /**
2182  * cpuset_zone_allowed_softwall - Can we allocate on zone z's memory node?
2183  * @z: is this zone on an allowed node?
2184  * @gfp_mask: memory allocation flags
2185  *
2186  * If we're in interrupt, yes, we can always allocate.  If
2187  * __GFP_THISNODE is set, yes, we can always allocate.  If zone
2188  * z's node is in our tasks mems_allowed, yes.  If it's not a
2189  * __GFP_HARDWALL request and this zone's nodes is in the nearest
2190  * hardwalled cpuset ancestor to this tasks cpuset, yes.
2191  * If the task has been OOM killed and has access to memory reserves
2192  * as specified by the TIF_MEMDIE flag, yes.
2193  * Otherwise, no.
2194  *
2195  * If __GFP_HARDWALL is set, cpuset_zone_allowed_softwall()
2196  * reduces to cpuset_zone_allowed_hardwall().  Otherwise,
2197  * cpuset_zone_allowed_softwall() might sleep, and might allow a zone
2198  * from an enclosing cpuset.
2199  *
2200  * cpuset_zone_allowed_hardwall() only handles the simpler case of
2201  * hardwall cpusets, and never sleeps.
2202  *
2203  * The __GFP_THISNODE placement logic is really handled elsewhere,
2204  * by forcibly using a zonelist starting at a specified node, and by
2205  * (in get_page_from_freelist()) refusing to consider the zones for
2206  * any node on the zonelist except the first.  By the time any such
2207  * calls get to this routine, we should just shut up and say 'yes'.
2208  *
2209  * GFP_USER allocations are marked with the __GFP_HARDWALL bit,
2210  * and do not allow allocations outside the current tasks cpuset
2211  * unless the task has been OOM killed as is marked TIF_MEMDIE.
2212  * GFP_KERNEL allocations are not so marked, so can escape to the
2213  * nearest enclosing hardwalled ancestor cpuset.
2214  *
2215  * Scanning up parent cpusets requires callback_mutex.  The
2216  * __alloc_pages() routine only calls here with __GFP_HARDWALL bit
2217  * _not_ set if it's a GFP_KERNEL allocation, and all nodes in the
2218  * current tasks mems_allowed came up empty on the first pass over
2219  * the zonelist.  So only GFP_KERNEL allocations, if all nodes in the
2220  * cpuset are short of memory, might require taking the callback_mutex
2221  * mutex.
2222  *
2223  * The first call here from mm/page_alloc:get_page_from_freelist()
2224  * has __GFP_HARDWALL set in gfp_mask, enforcing hardwall cpusets,
2225  * so no allocation on a node outside the cpuset is allowed (unless
2226  * in interrupt, of course).
2227  *
2228  * The second pass through get_page_from_freelist() doesn't even call
2229  * here for GFP_ATOMIC calls.  For those calls, the __alloc_pages()
2230  * variable 'wait' is not set, and the bit ALLOC_CPUSET is not set
2231  * in alloc_flags.  That logic and the checks below have the combined
2232  * affect that:
2233  *      in_interrupt - any node ok (current task context irrelevant)
2234  *      GFP_ATOMIC   - any node ok
2235  *      TIF_MEMDIE   - any node ok
2236  *      GFP_KERNEL   - any node in enclosing hardwalled cpuset ok
2237  *      GFP_USER     - only nodes in current tasks mems allowed ok.
2238  *
2239  * Rule:
2240  *    Don't call cpuset_zone_allowed_softwall if you can't sleep, unless you
2241  *    pass in the __GFP_HARDWALL flag set in gfp_flag, which disables
2242  *    the code that might scan up ancestor cpusets and sleep.
2243  */
2244
2245 int __cpuset_zone_allowed_softwall(struct zone *z, gfp_t gfp_mask)
2246 {
2247         int node;                       /* node that zone z is on */
2248         const struct cpuset *cs;        /* current cpuset ancestors */
2249         int allowed;                    /* is allocation in zone z allowed? */
2250
2251         if (in_interrupt() || (gfp_mask & __GFP_THISNODE))
2252                 return 1;
2253         node = zone_to_nid(z);
2254         might_sleep_if(!(gfp_mask & __GFP_HARDWALL));
2255         if (node_isset(node, current->mems_allowed))
2256                 return 1;
2257         /*
2258          * Allow tasks that have access to memory reserves because they have
2259          * been OOM killed to get memory anywhere.
2260          */
2261         if (unlikely(test_thread_flag(TIF_MEMDIE)))
2262                 return 1;
2263         if (gfp_mask & __GFP_HARDWALL)  /* If hardwall request, stop here */
2264                 return 0;
2265
2266         if (current->flags & PF_EXITING) /* Let dying task have memory */
2267                 return 1;
2268
2269         /* Not hardwall and node outside mems_allowed: scan up cpusets */
2270         mutex_lock(&callback_mutex);
2271
2272         task_lock(current);
2273         cs = nearest_hardwall_ancestor(task_cs(current));
2274         task_unlock(current);
2275
2276         allowed = node_isset(node, cs->mems_allowed);
2277         mutex_unlock(&callback_mutex);
2278         return allowed;
2279 }
2280
2281 /*
2282  * cpuset_zone_allowed_hardwall - Can we allocate on zone z's memory node?
2283  * @z: is this zone on an allowed node?
2284  * @gfp_mask: memory allocation flags
2285  *
2286  * If we're in interrupt, yes, we can always allocate.
2287  * If __GFP_THISNODE is set, yes, we can always allocate.  If zone
2288  * z's node is in our tasks mems_allowed, yes.   If the task has been
2289  * OOM killed and has access to memory reserves as specified by the
2290  * TIF_MEMDIE flag, yes.  Otherwise, no.
2291  *
2292  * The __GFP_THISNODE placement logic is really handled elsewhere,
2293  * by forcibly using a zonelist starting at a specified node, and by
2294  * (in get_page_from_freelist()) refusing to consider the zones for
2295  * any node on the zonelist except the first.  By the time any such
2296  * calls get to this routine, we should just shut up and say 'yes'.
2297  *
2298  * Unlike the cpuset_zone_allowed_softwall() variant, above,
2299  * this variant requires that the zone be in the current tasks
2300  * mems_allowed or that we're in interrupt.  It does not scan up the
2301  * cpuset hierarchy for the nearest enclosing mem_exclusive cpuset.
2302  * It never sleeps.
2303  */
2304
2305 int __cpuset_zone_allowed_hardwall(struct zone *z, gfp_t gfp_mask)
2306 {
2307         int node;                       /* node that zone z is on */
2308
2309         if (in_interrupt() || (gfp_mask & __GFP_THISNODE))
2310                 return 1;
2311         node = zone_to_nid(z);
2312         if (node_isset(node, current->mems_allowed))
2313                 return 1;
2314         /*
2315          * Allow tasks that have access to memory reserves because they have
2316          * been OOM killed to get memory anywhere.
2317          */
2318         if (unlikely(test_thread_flag(TIF_MEMDIE)))
2319                 return 1;
2320         return 0;
2321 }
2322
2323 /**
2324  * cpuset_lock - lock out any changes to cpuset structures
2325  *
2326  * The out of memory (oom) code needs to mutex_lock cpusets
2327  * from being changed while it scans the tasklist looking for a
2328  * task in an overlapping cpuset.  Expose callback_mutex via this
2329  * cpuset_lock() routine, so the oom code can lock it, before
2330  * locking the task list.  The tasklist_lock is a spinlock, so
2331  * must be taken inside callback_mutex.
2332  */
2333
2334 void cpuset_lock(void)
2335 {
2336         mutex_lock(&callback_mutex);
2337 }
2338
2339 /**
2340  * cpuset_unlock - release lock on cpuset changes
2341  *
2342  * Undo the lock taken in a previous cpuset_lock() call.
2343  */
2344
2345 void cpuset_unlock(void)
2346 {
2347         mutex_unlock(&callback_mutex);
2348 }
2349
2350 /**
2351  * cpuset_mem_spread_node() - On which node to begin search for a page
2352  *
2353  * If a task is marked PF_SPREAD_PAGE or PF_SPREAD_SLAB (as for
2354  * tasks in a cpuset with is_spread_page or is_spread_slab set),
2355  * and if the memory allocation used cpuset_mem_spread_node()
2356  * to determine on which node to start looking, as it will for
2357  * certain page cache or slab cache pages such as used for file
2358  * system buffers and inode caches, then instead of starting on the
2359  * local node to look for a free page, rather spread the starting
2360  * node around the tasks mems_allowed nodes.
2361  *
2362  * We don't have to worry about the returned node being offline
2363  * because "it can't happen", and even if it did, it would be ok.
2364  *
2365  * The routines calling guarantee_online_mems() are careful to
2366  * only set nodes in task->mems_allowed that are online.  So it
2367  * should not be possible for the following code to return an
2368  * offline node.  But if it did, that would be ok, as this routine
2369  * is not returning the node where the allocation must be, only
2370  * the node where the search should start.  The zonelist passed to
2371  * __alloc_pages() will include all nodes.  If the slab allocator
2372  * is passed an offline node, it will fall back to the local node.
2373  * See kmem_cache_alloc_node().
2374  */
2375
2376 int cpuset_mem_spread_node(void)
2377 {
2378         int node;
2379
2380         node = next_node(current->cpuset_mem_spread_rotor, current->mems_allowed);
2381         if (node == MAX_NUMNODES)
2382                 node = first_node(current->mems_allowed);
2383         current->cpuset_mem_spread_rotor = node;
2384         return node;
2385 }
2386 EXPORT_SYMBOL_GPL(cpuset_mem_spread_node);
2387
2388 /**
2389  * cpuset_mems_allowed_intersects - Does @tsk1's mems_allowed intersect @tsk2's?
2390  * @tsk1: pointer to task_struct of some task.
2391  * @tsk2: pointer to task_struct of some other task.
2392  *
2393  * Description: Return true if @tsk1's mems_allowed intersects the
2394  * mems_allowed of @tsk2.  Used by the OOM killer to determine if
2395  * one of the task's memory usage might impact the memory available
2396  * to the other.
2397  **/
2398
2399 int cpuset_mems_allowed_intersects(const struct task_struct *tsk1,
2400                                    const struct task_struct *tsk2)
2401 {
2402         return nodes_intersects(tsk1->mems_allowed, tsk2->mems_allowed);
2403 }
2404
2405 /**
2406  * cpuset_print_task_mems_allowed - prints task's cpuset and mems_allowed
2407  * @task: pointer to task_struct of some task.
2408  *
2409  * Description: Prints @task's name, cpuset name, and cached copy of its
2410  * mems_allowed to the kernel log.  Must hold task_lock(task) to allow
2411  * dereferencing task_cs(task).
2412  */
2413 void cpuset_print_task_mems_allowed(struct task_struct *tsk)
2414 {
2415         struct dentry *dentry;
2416
2417         dentry = task_cs(tsk)->css.cgroup->dentry;
2418         spin_lock(&cpuset_buffer_lock);
2419         snprintf(cpuset_name, CPUSET_NAME_LEN,
2420                  dentry ? (const char *)dentry->d_name.name : "/");
2421         nodelist_scnprintf(cpuset_nodelist, CPUSET_NODELIST_LEN,
2422                            tsk->mems_allowed);
2423         printk(KERN_INFO "%s cpuset=%s mems_allowed=%s\n",
2424                tsk->comm, cpuset_name, cpuset_nodelist);
2425         spin_unlock(&cpuset_buffer_lock);
2426 }
2427
2428 /*
2429  * Collection of memory_pressure is suppressed unless
2430  * this flag is enabled by writing "1" to the special
2431  * cpuset file 'memory_pressure_enabled' in the root cpuset.
2432  */
2433
2434 int cpuset_memory_pressure_enabled __read_mostly;
2435
2436 /**
2437  * cpuset_memory_pressure_bump - keep stats of per-cpuset reclaims.
2438  *
2439  * Keep a running average of the rate of synchronous (direct)
2440  * page reclaim efforts initiated by tasks in each cpuset.
2441  *
2442  * This represents the rate at which some task in the cpuset
2443  * ran low on memory on all nodes it was allowed to use, and
2444  * had to enter the kernels page reclaim code in an effort to
2445  * create more free memory by tossing clean pages or swapping
2446  * or writing dirty pages.
2447  *
2448  * Display to user space in the per-cpuset read-only file
2449  * "memory_pressure".  Value displayed is an integer
2450  * representing the recent rate of entry into the synchronous
2451  * (direct) page reclaim by any task attached to the cpuset.
2452  **/
2453
2454 void __cpuset_memory_pressure_bump(void)
2455 {
2456         task_lock(current);
2457         fmeter_markevent(&task_cs(current)->fmeter);
2458         task_unlock(current);
2459 }
2460
2461 #ifdef CONFIG_PROC_PID_CPUSET
2462 /*
2463  * proc_cpuset_show()
2464  *  - Print tasks cpuset path into seq_file.
2465  *  - Used for /proc/<pid>/cpuset.
2466  *  - No need to task_lock(tsk) on this tsk->cpuset reference, as it
2467  *    doesn't really matter if tsk->cpuset changes after we read it,
2468  *    and we take cgroup_mutex, keeping cpuset_attach() from changing it
2469  *    anyway.
2470  */
2471 static int proc_cpuset_show(struct seq_file *m, void *unused_v)
2472 {
2473         struct pid *pid;
2474         struct task_struct *tsk;
2475         char *buf;
2476         struct cgroup_subsys_state *css;
2477         int retval;
2478
2479         retval = -ENOMEM;
2480         buf = kmalloc(PAGE_SIZE, GFP_KERNEL);
2481         if (!buf)
2482                 goto out;
2483
2484         retval = -ESRCH;
2485         pid = m->private;
2486         tsk = get_pid_task(pid, PIDTYPE_PID);
2487         if (!tsk)
2488                 goto out_free;
2489
2490         retval = -EINVAL;
2491         cgroup_lock();
2492         css = task_subsys_state(tsk, cpuset_subsys_id);
2493         retval = cgroup_path(css->cgroup, buf, PAGE_SIZE);
2494         if (retval < 0)
2495                 goto out_unlock;
2496         seq_puts(m, buf);
2497         seq_putc(m, '\n');
2498 out_unlock:
2499         cgroup_unlock();
2500         put_task_struct(tsk);
2501 out_free:
2502         kfree(buf);
2503 out:
2504         return retval;
2505 }
2506
2507 static int cpuset_open(struct inode *inode, struct file *file)
2508 {
2509         struct pid *pid = PROC_I(inode)->pid;
2510         return single_open(file, proc_cpuset_show, pid);
2511 }
2512
2513 const struct file_operations proc_cpuset_operations = {
2514         .open           = cpuset_open,
2515         .read           = seq_read,
2516         .llseek         = seq_lseek,
2517         .release        = single_release,
2518 };
2519 #endif /* CONFIG_PROC_PID_CPUSET */
2520
2521 /* Display task cpus_allowed, mems_allowed in /proc/<pid>/status file. */
2522 void cpuset_task_status_allowed(struct seq_file *m, struct task_struct *task)
2523 {
2524         seq_printf(m, "Cpus_allowed:\t");
2525         seq_cpumask(m, &task->cpus_allowed);
2526         seq_printf(m, "\n");
2527         seq_printf(m, "Cpus_allowed_list:\t");
2528         seq_cpumask_list(m, &task->cpus_allowed);
2529         seq_printf(m, "\n");
2530         seq_printf(m, "Mems_allowed:\t");
2531         seq_nodemask(m, &task->mems_allowed);
2532         seq_printf(m, "\n");
2533         seq_printf(m, "Mems_allowed_list:\t");
2534         seq_nodemask_list(m, &task->mems_allowed);
2535         seq_printf(m, "\n");
2536 }