1 // SPDX-License-Identifier: GPL-2.0
2 /*
3 * Completely Fair Scheduling (CFS) Class (SCHED_NORMAL/SCHED_BATCH)
4 *
5 * Copyright (C) 2007 Red Hat, Inc., Ingo Molnar <mingo@redhat.com>
6 *
7 * Interactivity improvements by Mike Galbraith
8 * (C) 2007 Mike Galbraith <efault@gmx.de>
9 *
10 * Various enhancements by Dmitry Adamushko.
11 * (C) 2007 Dmitry Adamushko <dmitry.adamushko@gmail.com>
12 *
13 * Group scheduling enhancements by Srivatsa Vaddagiri
14 * Copyright IBM Corporation, 2007
15 * Author: Srivatsa Vaddagiri <vatsa@linux.vnet.ibm.com>
16 *
17 * Scaled math optimizations by Thomas Gleixner
18 * Copyright (C) 2007, Linutronix GmbH, Thomas Gleixner <tglx@kernel.org>
19 *
20 * Adaptive scheduling granularity, math enhancements by Peter Zijlstra
21 * Copyright (C) 2007 Red Hat, Inc., Peter Zijlstra
22 */
23 #include <linux/energy_model.h>
24 #include <linux/mmap_lock.h>
25 #include <linux/hugetlb_inline.h>
26 #include <linux/jiffies.h>
27 #include <linux/mm_api.h>
28 #include <linux/highmem.h>
29 #include <linux/hrtimer.h>
30 #include <linux/hrtimer_bases.h>
31 #include <linux/spinlock_api.h>
32 #include <linux/cpumask_api.h>
33 #include <linux/lockdep_api.h>
34 #include <linux/softirq.h>
35 #include <linux/refcount_api.h>
36 #include <linux/topology.h>
37 #include <linux/sched/clock.h>
38 #include <linux/sched/cond_resched.h>
39 #include <linux/sched/cputime.h>
40 #include <linux/sched/isolation.h>
41 #include <linux/sched/nohz.h>
42 #include <linux/sched/prio.h>
43 #include <linux/static_call.h>
44
45 #include <linux/cpuidle.h>
46 #include <linux/interrupt.h>
47 #include <linux/memory-tiers.h>
48 #include <linux/mempolicy.h>
49 #include <linux/mutex_api.h>
50 #include <linux/profile.h>
51 #include <linux/psi.h>
52 #include <linux/ratelimit.h>
53 #include <linux/task_work.h>
54 #include <linux/rbtree_augmented.h>
55
56 #include <asm/switch_to.h>
57
58 #include <uapi/linux/sched/types.h>
59
60 #include "sched.h"
61 #include "stats.h"
62 #include "autogroup.h"
63
64 /*
65 * The initial- and re-scaling of tunables is configurable
66 *
67 * Options are:
68 *
69 * SCHED_TUNABLESCALING_NONE - unscaled, always *1
70 * SCHED_TUNABLESCALING_LOG - scaled logarithmically, *1+ilog(ncpus)
71 * SCHED_TUNABLESCALING_LINEAR - scaled linear, *ncpus
72 *
73 * (default SCHED_TUNABLESCALING_LOG = *(1+ilog(ncpus))
74 */
75 unsigned int sysctl_sched_tunable_scaling = SCHED_TUNABLESCALING_LOG;
76
77 /*
78 * Default base time slice (request size r_i) for SCHED_NORMAL/SCHED_BATCH:
79 *
80 * Under EEVDF this is the request size used to compute the virtual
81 * deadline; see update_deadline().
82 *
83 * (default: 0.70 msec * (1 + ilog(ncpus)), units: nanoseconds)
84 */
85 unsigned int sysctl_sched_base_slice = 700000ULL;
86 static unsigned int normalized_sysctl_sched_base_slice = 700000ULL;
87
88 __read_mostly unsigned int sysctl_sched_migration_cost = 500000UL;
89
setup_sched_thermal_decay_shift(char * str)90 static int __init setup_sched_thermal_decay_shift(char *str)
91 {
92 pr_warn("Ignoring the deprecated sched_thermal_decay_shift= option\n");
93 return 1;
94 }
95 __setup("sched_thermal_decay_shift=", setup_sched_thermal_decay_shift);
96
97 /*
98 * For asym packing, by default the lower numbered CPU has higher priority.
99 */
arch_asym_cpu_priority(int cpu)100 int __weak arch_asym_cpu_priority(int cpu)
101 {
102 return -cpu;
103 }
104
105 /*
106 * The margin used when comparing utilization with CPU capacity.
107 *
108 * (default: ~20%)
109 */
110 #define fits_capacity(cap, max) ((cap) * 1280 < (max) * 1024)
111
112 /*
113 * The margin used when comparing CPU capacities.
114 * is 'cap1' noticeably greater than 'cap2'
115 *
116 * (default: ~5%)
117 */
118 #define capacity_greater(cap1, cap2) ((cap1) * 1024 > (cap2) * 1078)
119
120 #ifdef CONFIG_CFS_BANDWIDTH
121 /*
122 * Amount of runtime to allocate from global (tg) to local (per-cfs_rq) pool
123 * each time a cfs_rq requests quota.
124 *
125 * Note: in the case that the slice exceeds the runtime remaining (either due
126 * to consumption or the quota being specified to be smaller than the slice)
127 * we will always only issue the remaining available time.
128 *
129 * (default: 5 msec, units: microseconds)
130 */
131 static unsigned int sysctl_sched_cfs_bandwidth_slice = 5000UL;
132 #endif
133
134 #ifdef CONFIG_NUMA_BALANCING
135 /* Restrict the NUMA promotion throughput (MB/s) for each target node. */
136 static unsigned int sysctl_numa_balancing_promote_rate_limit = 65536;
137 #endif
138
139 #ifdef CONFIG_SYSCTL
140 static const struct ctl_table sched_fair_sysctls[] = {
141 #ifdef CONFIG_CFS_BANDWIDTH
142 {
143 .procname = "sched_cfs_bandwidth_slice_us",
144 .data = &sysctl_sched_cfs_bandwidth_slice,
145 .maxlen = sizeof(unsigned int),
146 .mode = 0644,
147 .proc_handler = proc_dointvec_minmax,
148 .extra1 = SYSCTL_ONE,
149 },
150 #endif
151 #ifdef CONFIG_NUMA_BALANCING
152 {
153 .procname = "numa_balancing_promote_rate_limit_MBps",
154 .data = &sysctl_numa_balancing_promote_rate_limit,
155 .maxlen = sizeof(unsigned int),
156 .mode = 0644,
157 .proc_handler = proc_dointvec_minmax,
158 .extra1 = SYSCTL_ZERO,
159 },
160 #endif /* CONFIG_NUMA_BALANCING */
161 };
162
sched_fair_sysctl_init(void)163 static int __init sched_fair_sysctl_init(void)
164 {
165 register_sysctl_init("kernel", sched_fair_sysctls);
166 return 0;
167 }
168 late_initcall(sched_fair_sysctl_init);
169 #endif /* CONFIG_SYSCTL */
170
update_load_add(struct load_weight * lw,unsigned long inc)171 static inline void update_load_add(struct load_weight *lw, unsigned long inc)
172 {
173 lw->weight += inc;
174 lw->inv_weight = 0;
175 }
176
update_load_sub(struct load_weight * lw,unsigned long dec)177 static inline void update_load_sub(struct load_weight *lw, unsigned long dec)
178 {
179 lw->weight -= dec;
180 lw->inv_weight = 0;
181 }
182
update_load_set(struct load_weight * lw,unsigned long w)183 static inline void update_load_set(struct load_weight *lw, unsigned long w)
184 {
185 lw->weight = w;
186 lw->inv_weight = 0;
187 }
188
189 /*
190 * Increase the granularity value when there are more CPUs,
191 * because with more CPUs the 'effective latency' as visible
192 * to users decreases. But the relationship is not linear,
193 * so pick a second-best guess by going with the log2 of the
194 * number of CPUs.
195 *
196 * This idea comes from the SD scheduler of Con Kolivas:
197 */
get_update_sysctl_factor(void)198 static unsigned int get_update_sysctl_factor(void)
199 {
200 unsigned int cpus = min_t(unsigned int, num_online_cpus(), 8);
201 unsigned int factor;
202
203 switch (sysctl_sched_tunable_scaling) {
204 case SCHED_TUNABLESCALING_NONE:
205 factor = 1;
206 break;
207 case SCHED_TUNABLESCALING_LINEAR:
208 factor = cpus;
209 break;
210 case SCHED_TUNABLESCALING_LOG:
211 default:
212 factor = 1 + ilog2(cpus);
213 break;
214 }
215
216 return factor;
217 }
218
update_sysctl(void)219 static void update_sysctl(void)
220 {
221 unsigned int factor = get_update_sysctl_factor();
222
223 #define SET_SYSCTL(name) \
224 (sysctl_##name = (factor) * normalized_sysctl_##name)
225 SET_SYSCTL(sched_base_slice);
226 #undef SET_SYSCTL
227 }
228
sched_init_granularity(void)229 void __init sched_init_granularity(void)
230 {
231 update_sysctl();
232 }
233
234 #ifndef CONFIG_64BIT
235 #define WMULT_CONST (~0U)
236 #define WMULT_SHIFT 32
237
__update_inv_weight(struct load_weight * lw)238 static void __update_inv_weight(struct load_weight *lw)
239 {
240 unsigned long w;
241
242 if (likely(lw->inv_weight))
243 return;
244
245 w = scale_load_down(lw->weight);
246
247 if (BITS_PER_LONG > 32 && unlikely(w >= WMULT_CONST))
248 lw->inv_weight = 1;
249 else if (unlikely(!w))
250 lw->inv_weight = WMULT_CONST;
251 else
252 lw->inv_weight = WMULT_CONST / w;
253 }
254
255 /*
256 * delta_exec * weight / lw.weight
257 * OR
258 * (delta_exec * (weight * lw->inv_weight)) >> WMULT_SHIFT
259 *
260 * Either weight := NICE_0_LOAD and lw \e sched_prio_to_wmult[], in which case
261 * we're guaranteed shift stays positive because inv_weight is guaranteed to
262 * fit 32 bits, and NICE_0_LOAD gives another 10 bits; therefore shift >= 22.
263 *
264 * Or, weight =< lw.weight (because lw.weight is the runqueue weight), thus
265 * weight/lw.weight <= 1, and therefore our shift will also be positive.
266 */
__calc_delta(u64 delta_exec,unsigned long weight,struct load_weight * lw)267 static u64 __calc_delta(u64 delta_exec, unsigned long weight, struct load_weight *lw)
268 {
269 u64 fact = scale_load_down(weight);
270 u32 fact_hi = (u32)(fact >> 32);
271 int shift = WMULT_SHIFT;
272 int fs;
273
274 __update_inv_weight(lw);
275
276 if (unlikely(fact_hi)) {
277 fs = fls(fact_hi);
278 shift -= fs;
279 fact >>= fs;
280 }
281
282 fact = mul_u32_u32(fact, lw->inv_weight);
283
284 fact_hi = (u32)(fact >> 32);
285 if (fact_hi) {
286 fs = fls(fact_hi);
287 shift -= fs;
288 fact >>= fs;
289 }
290
291 return mul_u64_u32_shr(delta_exec, fact, shift);
292 }
293 #else
__calc_delta(u64 delta_exec,unsigned long weight,struct load_weight * lw)294 static u64 __calc_delta(u64 delta_exec, unsigned long weight, struct load_weight *lw)
295 {
296 return (delta_exec * weight) / lw->weight;
297 }
298 #endif
299
300 /*
301 * delta /= w
302 */
calc_delta_fair(u64 delta,struct sched_entity * se)303 static inline u64 calc_delta_fair(u64 delta, struct sched_entity *se)
304 {
305 if (se->h_load.weight != NICE_0_LOAD)
306 delta = __calc_delta(delta, NICE_0_LOAD, &se->h_load);
307
308 return delta;
309 }
310
311 const struct sched_class fair_sched_class;
312
313 /**************************************************************
314 * CFS operations on generic schedulable entities:
315 */
316
317 #ifdef CONFIG_FAIR_GROUP_SCHED
318
319 /* Walk up scheduling entities hierarchy */
320 #define for_each_sched_entity(se) \
321 for (; se; se = se->parent)
322
list_add_leaf_cfs_rq(struct cfs_rq * cfs_rq)323 static inline bool list_add_leaf_cfs_rq(struct cfs_rq *cfs_rq)
324 {
325 struct rq *rq = rq_of(cfs_rq);
326 int cpu = cpu_of(rq);
327
328 if (cfs_rq->on_list)
329 return rq->tmp_alone_branch == &rq->leaf_cfs_rq_list;
330
331 cfs_rq->on_list = 1;
332
333 /*
334 * Ensure we either appear before our parent (if already
335 * enqueued) or force our parent to appear after us when it is
336 * enqueued. The fact that we always enqueue bottom-up
337 * reduces this to two cases and a special case for the root
338 * cfs_rq. Furthermore, it also means that we will always reset
339 * tmp_alone_branch either when the branch is connected
340 * to a tree or when we reach the top of the tree
341 */
342 if (cfs_rq->tg->parent &&
343 tg_cfs_rq(cfs_rq->tg->parent, cpu)->on_list) {
344 /*
345 * If parent is already on the list, we add the child
346 * just before. Thanks to circular linked property of
347 * the list, this means to put the child at the tail
348 * of the list that starts by parent.
349 */
350 list_add_tail_rcu(&cfs_rq->leaf_cfs_rq_list,
351 &(tg_cfs_rq(cfs_rq->tg->parent, cpu)->leaf_cfs_rq_list));
352 /*
353 * The branch is now connected to its tree so we can
354 * reset tmp_alone_branch to the beginning of the
355 * list.
356 */
357 rq->tmp_alone_branch = &rq->leaf_cfs_rq_list;
358 return true;
359 }
360
361 if (!cfs_rq->tg->parent) {
362 /*
363 * cfs rq without parent should be put
364 * at the tail of the list.
365 */
366 list_add_tail_rcu(&cfs_rq->leaf_cfs_rq_list,
367 &rq->leaf_cfs_rq_list);
368 /*
369 * We have reach the top of a tree so we can reset
370 * tmp_alone_branch to the beginning of the list.
371 */
372 rq->tmp_alone_branch = &rq->leaf_cfs_rq_list;
373 return true;
374 }
375
376 /*
377 * The parent has not already been added so we want to
378 * make sure that it will be put after us.
379 * tmp_alone_branch points to the begin of the branch
380 * where we will add parent.
381 */
382 list_add_rcu(&cfs_rq->leaf_cfs_rq_list, rq->tmp_alone_branch);
383 /*
384 * update tmp_alone_branch to points to the new begin
385 * of the branch
386 */
387 rq->tmp_alone_branch = &cfs_rq->leaf_cfs_rq_list;
388 return false;
389 }
390
list_del_leaf_cfs_rq(struct cfs_rq * cfs_rq)391 static inline void list_del_leaf_cfs_rq(struct cfs_rq *cfs_rq)
392 {
393 if (cfs_rq->on_list) {
394 struct rq *rq = rq_of(cfs_rq);
395
396 /*
397 * With cfs_rq being unthrottled/throttled during an enqueue,
398 * it can happen the tmp_alone_branch points to the leaf that
399 * we finally want to delete. In this case, tmp_alone_branch moves
400 * to the prev element but it will point to rq->leaf_cfs_rq_list
401 * at the end of the enqueue.
402 */
403 if (rq->tmp_alone_branch == &cfs_rq->leaf_cfs_rq_list)
404 rq->tmp_alone_branch = cfs_rq->leaf_cfs_rq_list.prev;
405
406 list_del_rcu(&cfs_rq->leaf_cfs_rq_list);
407 cfs_rq->on_list = 0;
408 }
409 }
410
assert_list_leaf_cfs_rq(struct rq * rq)411 static inline void assert_list_leaf_cfs_rq(struct rq *rq)
412 {
413 WARN_ON_ONCE(rq->tmp_alone_branch != &rq->leaf_cfs_rq_list);
414 }
415
416 /* Iterate through all leaf cfs_rq's on a runqueue */
417 #define for_each_leaf_cfs_rq_safe(rq, cfs_rq, pos) \
418 list_for_each_entry_safe(cfs_rq, pos, &rq->leaf_cfs_rq_list, \
419 leaf_cfs_rq_list)
420
421 /* Do the two (enqueued) entities belong to the same group ? */
422 static inline struct cfs_rq *
is_same_group(struct sched_entity * se,struct sched_entity * pse)423 is_same_group(struct sched_entity *se, struct sched_entity *pse)
424 {
425 if (se->cfs_rq == pse->cfs_rq)
426 return se->cfs_rq;
427
428 return NULL;
429 }
430
parent_entity(const struct sched_entity * se)431 static inline struct sched_entity *parent_entity(const struct sched_entity *se)
432 {
433 return se->parent;
434 }
435
tg_is_idle(struct task_group * tg)436 static int tg_is_idle(struct task_group *tg)
437 {
438 return tg->idle > 0;
439 }
440
cfs_rq_is_idle(struct cfs_rq * cfs_rq)441 static int cfs_rq_is_idle(struct cfs_rq *cfs_rq)
442 {
443 return cfs_rq->idle > 0;
444 }
445
se_is_idle(struct sched_entity * se)446 static int se_is_idle(struct sched_entity *se)
447 {
448 if (entity_is_task(se))
449 return task_has_idle_policy(task_of(se));
450 return cfs_rq_is_idle(group_cfs_rq(se));
451 }
452
453 #else /* !CONFIG_FAIR_GROUP_SCHED: */
454
455 #define for_each_sched_entity(se) \
456 for (; se; se = NULL)
457
list_add_leaf_cfs_rq(struct cfs_rq * cfs_rq)458 static inline bool list_add_leaf_cfs_rq(struct cfs_rq *cfs_rq)
459 {
460 return true;
461 }
462
list_del_leaf_cfs_rq(struct cfs_rq * cfs_rq)463 static inline void list_del_leaf_cfs_rq(struct cfs_rq *cfs_rq)
464 {
465 }
466
assert_list_leaf_cfs_rq(struct rq * rq)467 static inline void assert_list_leaf_cfs_rq(struct rq *rq)
468 {
469 }
470
471 #define for_each_leaf_cfs_rq_safe(rq, cfs_rq, pos) \
472 for (cfs_rq = &rq->cfs, pos = NULL; cfs_rq; cfs_rq = pos)
473
parent_entity(struct sched_entity * se)474 static inline struct sched_entity *parent_entity(struct sched_entity *se)
475 {
476 return NULL;
477 }
478
tg_is_idle(struct task_group * tg)479 static inline int tg_is_idle(struct task_group *tg)
480 {
481 return 0;
482 }
483
cfs_rq_is_idle(struct cfs_rq * cfs_rq)484 static int cfs_rq_is_idle(struct cfs_rq *cfs_rq)
485 {
486 return 0;
487 }
488
se_is_idle(struct sched_entity * se)489 static int se_is_idle(struct sched_entity *se)
490 {
491 return task_has_idle_policy(task_of(se));
492 }
493
494 #endif /* !CONFIG_FAIR_GROUP_SCHED */
495
496 static __always_inline
497 bool account_cfs_rq_runtime(struct cfs_rq *cfs_rq, u64 delta_exec);
498
499 /**************************************************************
500 * Scheduling class tree data structure manipulation methods:
501 */
502
503 extern void __BUILD_BUG_vruntime_cmp(void);
504
505 /* Use __builtin_strcmp() because of __HAVE_ARCH_STRCMP: */
506
507 #define vruntime_cmp(A, CMP_STR, B) ({ \
508 int __res = 0; \
509 \
510 if (!__builtin_strcmp(CMP_STR, "<")) { \
511 __res = ((s64)((A)-(B)) < 0); \
512 } else if (!__builtin_strcmp(CMP_STR, "<=")) { \
513 __res = ((s64)((A)-(B)) <= 0); \
514 } else if (!__builtin_strcmp(CMP_STR, ">")) { \
515 __res = ((s64)((A)-(B)) > 0); \
516 } else if (!__builtin_strcmp(CMP_STR, ">=")) { \
517 __res = ((s64)((A)-(B)) >= 0); \
518 } else { \
519 /* Unknown operator throws linker error: */ \
520 __BUILD_BUG_vruntime_cmp(); \
521 } \
522 \
523 __res; \
524 })
525
526 extern void __BUILD_BUG_vruntime_op(void);
527
528 #define vruntime_op(A, OP_STR, B) ({ \
529 s64 __res = 0; \
530 \
531 if (!__builtin_strcmp(OP_STR, "-")) { \
532 __res = (s64)((A)-(B)); \
533 } else { \
534 /* Unknown operator throws linker error: */ \
535 __BUILD_BUG_vruntime_op(); \
536 } \
537 \
538 __res; \
539 })
540
541
max_vruntime(u64 max_vruntime,u64 vruntime)542 static inline __maybe_unused u64 max_vruntime(u64 max_vruntime, u64 vruntime)
543 {
544 if (vruntime_cmp(vruntime, ">", max_vruntime))
545 max_vruntime = vruntime;
546
547 return max_vruntime;
548 }
549
min_vruntime(u64 min_vruntime,u64 vruntime)550 static inline __maybe_unused u64 min_vruntime(u64 min_vruntime, u64 vruntime)
551 {
552 if (vruntime_cmp(vruntime, "<", min_vruntime))
553 min_vruntime = vruntime;
554
555 return min_vruntime;
556 }
557
entity_before(const struct sched_entity * a,const struct sched_entity * b)558 static inline bool entity_before(const struct sched_entity *a,
559 const struct sched_entity *b)
560 {
561 /*
562 * Tiebreak on vruntime seems unnecessary since it can
563 * hardly happen.
564 */
565 return vruntime_cmp(a->deadline, "<", b->deadline);
566 }
567
568 /*
569 * Per avg_vruntime() below, cfs_rq::zero_vruntime is only slightly stale
570 * and this value should be no more than two lag bounds. Which puts it in the
571 * general order of:
572 *
573 * (slice + TICK_NSEC) << NICE_0_LOAD_SHIFT
574 *
575 * which is around 44 bits in size (on 64bit); that is 20 for
576 * NICE_0_LOAD_SHIFT, another 20 for NSEC_PER_MSEC and then a handful for
577 * however many msec the actual slice+tick ends up begin.
578 *
579 * (disregarding the actual divide-by-weight part makes for the worst case
580 * weight of 2, which nicely cancels vs the fuzz in zero_vruntime not actually
581 * being the zero-lag point).
582 */
entity_key(struct cfs_rq * cfs_rq,struct sched_entity * se)583 static inline s64 entity_key(struct cfs_rq *cfs_rq, struct sched_entity *se)
584 {
585 return vruntime_op(se->vruntime, "-", cfs_rq->zero_vruntime);
586 }
587
588 #define __node_2_se(node) \
589 rb_entry((node), struct sched_entity, run_node)
590
591 /*
592 * Compute virtual time from the per-task service numbers:
593 *
594 * Fair schedulers conserve lag:
595 *
596 * \Sum lag_i = 0
597 *
598 * Where lag_i is given by:
599 *
600 * lag_i = S - s_i = w_i * (V - v_i)
601 *
602 * Where S is the ideal service time and V is it's virtual time counterpart.
603 * Therefore:
604 *
605 * \Sum lag_i = 0
606 * \Sum w_i * (V - v_i) = 0
607 * \Sum (w_i * V - w_i * v_i) = 0
608 *
609 * From which we can solve an expression for V in v_i (which we have in
610 * se->vruntime):
611 *
612 * \Sum v_i * w_i \Sum v_i * w_i
613 * V = -------------- = --------------
614 * \Sum w_i W
615 *
616 * Specifically, this is the weighted average of all entity virtual runtimes.
617 *
618 * [[ NOTE: this is only equal to the ideal scheduler under the condition
619 * that join/leave operations happen at lag_i = 0, otherwise the
620 * virtual time has non-contiguous motion equivalent to:
621 *
622 * V +-= lag_i / W
623 *
624 * Also see the comment in place_entity() that deals with this. ]]
625 *
626 * However, since v_i is u64, and the multiplication could easily overflow
627 * transform it into a relative form that uses smaller quantities:
628 *
629 * Substitute: v_i == (v_i - v0) + v0
630 *
631 * \Sum ((v_i - v0) + v0) * w_i \Sum (v_i - v0) * w_i
632 * V = ---------------------------- = --------------------- + v0
633 * W W
634 *
635 * Which we track using:
636 *
637 * v0 := cfs_rq->zero_vruntime
638 * \Sum (v_i - v0) * w_i := cfs_rq->sum_w_vruntime
639 * \Sum w_i := cfs_rq->sum_weight
640 *
641 * Since zero_vruntime closely tracks the per-task service, these
642 * deltas: (v_i - v0), will be in the order of the maximal (virtual) lag
643 * induced in the system due to quantisation.
644 */
avg_vruntime_weight(struct cfs_rq * cfs_rq,unsigned long w)645 static inline unsigned long avg_vruntime_weight(struct cfs_rq *cfs_rq, unsigned long w)
646 {
647 #ifdef CONFIG_64BIT
648 if (cfs_rq->sum_shift)
649 w = max(2UL, w >> cfs_rq->sum_shift);
650 #endif
651 return w;
652 }
653
654 static inline void
__sum_w_vruntime_add(struct cfs_rq * cfs_rq,struct sched_entity * se)655 __sum_w_vruntime_add(struct cfs_rq *cfs_rq, struct sched_entity *se)
656 {
657 unsigned long weight = avg_vruntime_weight(cfs_rq, se->h_load.weight);
658 s64 w_vruntime, key = entity_key(cfs_rq, se);
659
660 w_vruntime = key * weight;
661 WARN_ON_ONCE((w_vruntime >> 63) != (w_vruntime >> 62));
662
663 cfs_rq->sum_w_vruntime += w_vruntime;
664 cfs_rq->sum_weight += weight;
665 }
666
667 static void
sum_w_vruntime_add_paranoid(struct cfs_rq * cfs_rq,struct sched_entity * se)668 sum_w_vruntime_add_paranoid(struct cfs_rq *cfs_rq, struct sched_entity *se)
669 {
670 unsigned long weight;
671 s64 key, tmp;
672
673 again:
674 weight = avg_vruntime_weight(cfs_rq, se->h_load.weight);
675 key = entity_key(cfs_rq, se);
676
677 if (check_mul_overflow(key, weight, &key))
678 goto overflow;
679
680 if (check_add_overflow(cfs_rq->sum_w_vruntime, key, &tmp))
681 goto overflow;
682
683 cfs_rq->sum_w_vruntime = tmp;
684 cfs_rq->sum_weight += weight;
685 return;
686
687 overflow:
688 /*
689 * There's gotta be a limit -- if we're still failing at this point
690 * there's really nothing much to be done about things.
691 */
692 BUG_ON(cfs_rq->sum_shift >= 10);
693 cfs_rq->sum_shift++;
694
695 /*
696 * Note: \Sum (k_i * (w_i >> 1)) != (\Sum (k_i * w_i)) >> 1
697 */
698 cfs_rq->sum_w_vruntime = 0;
699 cfs_rq->sum_weight = 0;
700
701 for (struct rb_node *node = cfs_rq->tasks_timeline.rb_leftmost;
702 node; node = rb_next(node))
703 __sum_w_vruntime_add(cfs_rq, __node_2_se(node));
704
705 goto again;
706 }
707
708 static void
sum_w_vruntime_add(struct cfs_rq * cfs_rq,struct sched_entity * se)709 sum_w_vruntime_add(struct cfs_rq *cfs_rq, struct sched_entity *se)
710 {
711 if (sched_feat(PARANOID_AVG))
712 return sum_w_vruntime_add_paranoid(cfs_rq, se);
713
714 __sum_w_vruntime_add(cfs_rq, se);
715 }
716
717 static void
sum_w_vruntime_sub(struct cfs_rq * cfs_rq,struct sched_entity * se)718 sum_w_vruntime_sub(struct cfs_rq *cfs_rq, struct sched_entity *se)
719 {
720 unsigned long weight = avg_vruntime_weight(cfs_rq, se->h_load.weight);
721 s64 key = entity_key(cfs_rq, se);
722
723 cfs_rq->sum_w_vruntime -= key * weight;
724 cfs_rq->sum_weight -= weight;
725 }
726
727 static inline
update_zero_vruntime(struct cfs_rq * cfs_rq,s64 delta)728 void update_zero_vruntime(struct cfs_rq *cfs_rq, s64 delta)
729 {
730 /*
731 * v' = v + d ==> sum_w_vruntime' = sum_w_vruntime - d*sum_weight
732 */
733 cfs_rq->sum_w_vruntime -= cfs_rq->sum_weight * delta;
734 cfs_rq->zero_vruntime += delta;
735 }
736
737 /*
738 * Specifically: avg_vruntime() + 0 must result in entity_eligible() := true
739 * For this to be so, the result of this function must have a left bias.
740 *
741 * Called in:
742 * - place_entity() -- before enqueue
743 * - update_entity_lag() -- before dequeue
744 * - update_deadline() -- slice expiration
745 *
746 * This means it is one entry 'behind' but that puts it close enough to where
747 * the bound on entity_key() is at most two lag bounds.
748 */
avg_vruntime(struct cfs_rq * cfs_rq)749 u64 avg_vruntime(struct cfs_rq *cfs_rq)
750 {
751 struct sched_entity *curr = cfs_rq->curr;
752 long weight = cfs_rq->sum_weight;
753 s64 delta = 0;
754
755 if (curr && !curr->on_rq)
756 curr = NULL;
757
758 if (weight) {
759 s64 runtime = cfs_rq->sum_w_vruntime;
760
761 if (curr) {
762 unsigned long w = avg_vruntime_weight(cfs_rq, curr->h_load.weight);
763
764 runtime += entity_key(cfs_rq, curr) * w;
765 weight += w;
766 }
767
768 /* sign flips effective floor / ceiling */
769 if (runtime < 0)
770 runtime -= (weight - 1);
771
772 delta = div64_long(runtime, weight);
773 } else if (curr) {
774 /*
775 * When there is but one element, it is the average.
776 */
777 delta = curr->vruntime - cfs_rq->zero_vruntime;
778 }
779
780 update_zero_vruntime(cfs_rq, delta);
781
782 return cfs_rq->zero_vruntime;
783 }
784
785 /*
786 * \Sum (v_i - v0)*w_i
787 * V = ------------------- + v0
788 * \Sum w_i
789 *
790 * Let W = \Sum w_i, and move v_j such that 'v_j == V', thus:
791 *
792 * V = 1/W * {(v_j - v0)*w_j + \Sum_i!=j (v_i - v0)*w_i} + v0
793 *
794 * v_j = 1/W * {(v_j - v0)*w_j + \Sum_i!=j (v_i - v0)*w_i} + v0
795 *
796 * v_j = 1/W * (v_j - v0)*w_j + 1/W * \Sum_i!=j (v_i - v0)*w_i + v0
797 *
798 * v_j - 1/W * (v_j - v0)*w_j = 1/W * \Sum_i!=j (v_i - v0)*w_i + v0
799 *
800 * v_j*W - (v_j - v0)*w_j = \Sum_i!=j (v_i - v0)*w_i + v0*W
801 *
802 * v_j*(W - w_j) + v0*w_j = \Sum_i!=j (v_i - v0)*w_i + v0*W
803 *
804 * v_j*(W - w_j) = \Sum_i!=j (v_i - v0)*w_i + v0*(W - w_j)
805 *
806 * \Sum_i!=j (v_i - v0)*w_i
807 * v_j = ------------------------ + v0
808 * W - w_j
809 *
810 * When v_j happens to be curr, then '\Sum_i!=j (v_i - v0)*w_i'
811 * is cfs_rq->sum_w_runtime, and 'W - w_j' is cfs_rq->sum_weight, since curr
812 * is not included in the sum.
813 */
ineligible_vruntime(struct cfs_rq * cfs_rq)814 static u64 ineligible_vruntime(struct cfs_rq *cfs_rq)
815 {
816 struct sched_entity *curr = cfs_rq->curr;
817 long weight = cfs_rq->sum_weight;
818 s64 delta = 0;
819
820 if (curr && !curr->on_rq)
821 curr = NULL;
822
823 /*
824 * This is called from set_next_task_fair(.first=true) /
825 * set_protect_slice() so curr had better be set and on_rq.
826 */
827 WARN_ON_ONCE(!curr);
828
829 if (weight) {
830 s64 runtime = cfs_rq->sum_w_vruntime;
831
832 /*
833 * Do not add @curr to obtain the effective '- w_j' terms.
834 */
835
836 /* sign flips effective floor / ceiling */
837 if (runtime < 0)
838 runtime -= (weight - 1);
839
840 delta = div64_long(runtime, weight);
841 }
842
843 return cfs_rq->zero_vruntime + delta + 1;
844 }
845
846 static inline u64 cfs_rq_max_slice(struct cfs_rq *cfs_rq);
847
848 /*
849 * lag_i = S - s_i = w_i * (V - v_i)
850 *
851 * However, since V is approximated by the weighted average of all entities it
852 * is possible -- by addition/removal/reweight to the tree -- to move V around
853 * and end up with a larger lag than we started with.
854 *
855 * Limit this to either double the slice length with a minimum of TICK_NSEC
856 * since that is the timing granularity.
857 *
858 * EEVDF gives the following limit for a steady state system:
859 *
860 * -r_max < lag < max(r_max, q)
861 */
entity_lag(struct cfs_rq * cfs_rq,struct sched_entity * se,u64 avruntime)862 static s64 entity_lag(struct cfs_rq *cfs_rq, struct sched_entity *se, u64 avruntime)
863 {
864 u64 max_slice = cfs_rq_max_slice(cfs_rq) + TICK_NSEC;
865 s64 vlag, limit;
866
867 vlag = avruntime - se->vruntime;
868 limit = calc_delta_fair(max_slice, se);
869
870 return clamp(vlag, -limit, limit);
871 }
872
873 /*
874 * Delayed dequeue aims to reduce the negative lag of a dequeued task. While
875 * updating the lag of an entity, check that negative lag didn't increase
876 * during the delayed dequeue period which would be unfair.
877 * Similarly, check that the entity didn't gain positive lag when DELAY_ZERO
878 * is set.
879 *
880 * Return true if the vlag has been modified. Specifically:
881 *
882 * se->vlag != avg_vruntime() - se->vruntime
883 *
884 * This can be due to clamping in entity_lag() or clamping due to
885 * sched_delayed. Either way, when vlag is modified and the entity is
886 * retained, the tree needs to be adjusted.
887 */
888 static __always_inline
update_entity_lag(struct cfs_rq * cfs_rq,struct sched_entity * se)889 bool update_entity_lag(struct cfs_rq *cfs_rq, struct sched_entity *se)
890 {
891 u64 avruntime = avg_vruntime(cfs_rq);
892 s64 vlag = entity_lag(cfs_rq, se, avruntime);
893
894 if (se->sched_delayed) {
895 /* previous vlag < 0 otherwise se would not be delayed */
896 vlag = max(vlag, se->vlag);
897 if (sched_feat(DELAY_ZERO))
898 vlag = min(vlag, 0);
899 }
900 se->vlag = vlag;
901
902 return avruntime - vlag != se->vruntime;
903 }
904
905 /*
906 * Entity is eligible once it received less service than it ought to have,
907 * eg. lag >= 0.
908 *
909 * lag_i = S - s_i = w_i*(V - v_i)
910 *
911 * lag_i >= 0 -> V >= v_i
912 *
913 * \Sum (v_i - v0)*w_i
914 * V = ------------------- + v0
915 * \Sum w_i
916 *
917 * lag_i >= 0 -> \Sum (v_i - v0)*w_i >= (v_i - v0)*(\Sum w_i)
918 *
919 * Note: using 'avg_vruntime() > se->vruntime' is inaccurate due
920 * to the loss in precision caused by the division.
921 */
vruntime_eligible(struct cfs_rq * cfs_rq,u64 vruntime)922 static int vruntime_eligible(struct cfs_rq *cfs_rq, u64 vruntime)
923 {
924 struct sched_entity *curr = cfs_rq->curr;
925 s64 key, avg = cfs_rq->sum_w_vruntime;
926 long load = cfs_rq->sum_weight;
927
928 if (curr && curr->on_rq) {
929 unsigned long weight = avg_vruntime_weight(cfs_rq, curr->h_load.weight);
930
931 avg += entity_key(cfs_rq, curr) * weight;
932 load += weight;
933 }
934
935 key = vruntime_op(vruntime, "-", cfs_rq->zero_vruntime);
936
937 /*
938 * The worst case term for @key includes 'NSEC_TICK * NICE_0_LOAD'
939 * and @load obviously includes NICE_0_LOAD. NSEC_TICK is around 24
940 * bits, while NICE_0_LOAD is 20 on 64bit and 10 otherwise.
941 *
942 * This gives that on 64bit the product will be at least 64bit which
943 * overflows s64, while on 32bit it will only be 44bits and should fit
944 * comfortably.
945 */
946 #ifdef CONFIG_64BIT
947 #ifdef CONFIG_ARCH_SUPPORTS_INT128
948 /* This often results in simpler code than __builtin_mul_overflow(). */
949 return avg >= (__int128)key * load;
950 #else
951 s64 rhs;
952 /*
953 * On overflow, the sign of key tells us the correct answer: a large
954 * positive key means vruntime >> V, so not eligible; a large negative
955 * key means vruntime << V, so eligible.
956 */
957 if (check_mul_overflow(key, load, &rhs))
958 return key <= 0;
959
960 return avg >= rhs;
961 #endif
962 #else /* 32bit */
963 return avg >= key * load;
964 #endif
965 }
966
entity_eligible(struct cfs_rq * cfs_rq,struct sched_entity * se)967 int entity_eligible(struct cfs_rq *cfs_rq, struct sched_entity *se)
968 {
969 return vruntime_eligible(cfs_rq, se->vruntime);
970 }
971
cfs_rq_min_slice(struct cfs_rq * cfs_rq)972 static inline u64 cfs_rq_min_slice(struct cfs_rq *cfs_rq)
973 {
974 struct sched_entity *root = __pick_root_entity(cfs_rq);
975 struct sched_entity *curr = cfs_rq->curr;
976 u64 min_slice = ~0ULL;
977
978 if (curr && curr->on_rq)
979 min_slice = curr->slice;
980
981 if (root)
982 min_slice = min(min_slice, root->min_slice);
983
984 return min_slice;
985 }
986
cfs_rq_max_slice(struct cfs_rq * cfs_rq)987 static inline u64 cfs_rq_max_slice(struct cfs_rq *cfs_rq)
988 {
989 struct sched_entity *root = __pick_root_entity(cfs_rq);
990 struct sched_entity *curr = cfs_rq->curr;
991 u64 max_slice = 0ULL;
992
993 if (curr && curr->on_rq)
994 max_slice = curr->slice;
995
996 if (root)
997 max_slice = max(max_slice, root->max_slice);
998
999 return max_slice;
1000 }
1001
__entity_less(struct rb_node * a,const struct rb_node * b)1002 static inline bool __entity_less(struct rb_node *a, const struct rb_node *b)
1003 {
1004 return entity_before(__node_2_se(a), __node_2_se(b));
1005 }
1006
__min_vruntime_update(struct sched_entity * se,struct rb_node * node)1007 static inline void __min_vruntime_update(struct sched_entity *se, struct rb_node *node)
1008 {
1009 if (node) {
1010 struct sched_entity *rse = __node_2_se(node);
1011
1012 if (vruntime_cmp(se->min_vruntime, ">", rse->min_vruntime))
1013 se->min_vruntime = rse->min_vruntime;
1014 }
1015 }
1016
__min_slice_update(struct sched_entity * se,struct rb_node * node)1017 static inline void __min_slice_update(struct sched_entity *se, struct rb_node *node)
1018 {
1019 if (node) {
1020 struct sched_entity *rse = __node_2_se(node);
1021 if (rse->min_slice < se->min_slice)
1022 se->min_slice = rse->min_slice;
1023 }
1024 }
1025
__max_slice_update(struct sched_entity * se,struct rb_node * node)1026 static inline void __max_slice_update(struct sched_entity *se, struct rb_node *node)
1027 {
1028 if (node) {
1029 struct sched_entity *rse = __node_2_se(node);
1030 if (rse->max_slice > se->max_slice)
1031 se->max_slice = rse->max_slice;
1032 }
1033 }
1034
1035 /*
1036 * se->min_vruntime = min(se->vruntime, {left,right}->min_vruntime)
1037 */
min_vruntime_update(struct sched_entity * se,bool exit)1038 static inline bool min_vruntime_update(struct sched_entity *se, bool exit)
1039 {
1040 u64 old_min_vruntime = se->min_vruntime;
1041 u64 old_min_slice = se->min_slice;
1042 u64 old_max_slice = se->max_slice;
1043 struct rb_node *node = &se->run_node;
1044
1045 se->min_vruntime = se->vruntime;
1046 __min_vruntime_update(se, node->rb_right);
1047 __min_vruntime_update(se, node->rb_left);
1048
1049 se->min_slice = se->slice;
1050 __min_slice_update(se, node->rb_right);
1051 __min_slice_update(se, node->rb_left);
1052
1053 se->max_slice = se->slice;
1054 __max_slice_update(se, node->rb_right);
1055 __max_slice_update(se, node->rb_left);
1056
1057 return se->min_vruntime == old_min_vruntime &&
1058 se->min_slice == old_min_slice &&
1059 se->max_slice == old_max_slice;
1060 }
1061
1062 RB_DECLARE_CALLBACKS(static, min_vruntime_cb, struct sched_entity,
1063 run_node, min_vruntime, min_vruntime_update);
1064
1065 /*
1066 * Enqueue an entity into the rb-tree:
1067 */
__enqueue_entity(struct cfs_rq * cfs_rq,struct sched_entity * se)1068 static void __enqueue_entity(struct cfs_rq *cfs_rq, struct sched_entity *se)
1069 {
1070 WARN_ON_ONCE(&rq_of(cfs_rq)->cfs != cfs_rq);
1071 WARN_ON_ONCE(!entity_is_task(se));
1072
1073 sum_w_vruntime_add(cfs_rq, se);
1074 se->min_vruntime = se->vruntime;
1075 se->min_slice = se->slice;
1076 rb_add_augmented_cached(&se->run_node, &cfs_rq->tasks_timeline,
1077 __entity_less, &min_vruntime_cb);
1078 }
1079
__dequeue_entity(struct cfs_rq * cfs_rq,struct sched_entity * se)1080 static void __dequeue_entity(struct cfs_rq *cfs_rq, struct sched_entity *se)
1081 {
1082 WARN_ON_ONCE(&rq_of(cfs_rq)->cfs != cfs_rq);
1083 WARN_ON_ONCE(!entity_is_task(se));
1084
1085 rb_erase_augmented_cached(&se->run_node, &cfs_rq->tasks_timeline,
1086 &min_vruntime_cb);
1087 sum_w_vruntime_sub(cfs_rq, se);
1088 }
1089
__pick_root_entity(struct cfs_rq * cfs_rq)1090 struct sched_entity *__pick_root_entity(struct cfs_rq *cfs_rq)
1091 {
1092 struct rb_node *root = cfs_rq->tasks_timeline.rb_root.rb_node;
1093
1094 if (!root)
1095 return NULL;
1096
1097 return __node_2_se(root);
1098 }
1099
__pick_first_entity(struct cfs_rq * cfs_rq)1100 struct sched_entity *__pick_first_entity(struct cfs_rq *cfs_rq)
1101 {
1102 struct rb_node *left = rb_first_cached(&cfs_rq->tasks_timeline);
1103
1104 if (!left)
1105 return NULL;
1106
1107 return __node_2_se(left);
1108 }
1109
1110 /*
1111 * Set the vruntime up to which an entity can run before looking
1112 * for another entity to pick.
1113 * In case of run to parity, we use the shortest slice of the enqueued
1114 * entities to set the protected period.
1115 * When run to parity is disabled, we give a minimum quantum to the running
1116 * entity to ensure progress.
1117 */
set_protect_slice(struct cfs_rq * cfs_rq,struct sched_entity * se)1118 static inline void set_protect_slice(struct cfs_rq *cfs_rq, struct sched_entity *se)
1119 {
1120 u64 slice = normalized_sysctl_sched_base_slice;
1121 u64 vprot = se->deadline;
1122
1123 if (sched_feat(RUN_TO_PARITY))
1124 slice = cfs_rq_min_slice(cfs_rq);
1125
1126 slice = min(slice, se->slice);
1127
1128 /* If there are shorter slices than se's one */
1129 if (slice != se->slice) {
1130 if (sched_feat(PREEMPT_SHORT))
1131 vprot = min_vruntime(vprot, ineligible_vruntime(cfs_rq));
1132 else
1133 vprot = min_vruntime(vprot, se->vruntime + calc_delta_fair(slice, se));
1134 }
1135
1136 se->vprot = vprot;
1137 }
1138
update_protect_slice(struct cfs_rq * cfs_rq,struct sched_entity * se)1139 static inline void update_protect_slice(struct cfs_rq *cfs_rq, struct sched_entity *se)
1140 {
1141 u64 slice = cfs_rq_min_slice(cfs_rq);
1142 u64 vruntime = min_vruntime(se->vruntime, avg_vruntime(cfs_rq));
1143
1144 se->vprot = min_vruntime(se->vprot, vruntime + calc_delta_fair(slice, se));
1145 }
1146
protect_slice(struct sched_entity * se)1147 static inline bool protect_slice(struct sched_entity *se)
1148 {
1149 return vruntime_cmp(se->vruntime, "<", se->vprot);
1150 }
1151
cancel_protect_slice(struct sched_entity * se)1152 static inline void cancel_protect_slice(struct sched_entity *se)
1153 {
1154 if (protect_slice(se))
1155 se->vprot = se->vruntime;
1156 }
1157
1158 /*
1159 * Earliest Eligible Virtual Deadline First
1160 *
1161 * In order to provide latency guarantees for different request sizes
1162 * EEVDF selects the best runnable task from two criteria:
1163 *
1164 * 1) the task must be eligible (must be owed service)
1165 *
1166 * 2) from those tasks that meet 1), we select the one
1167 * with the earliest virtual deadline.
1168 *
1169 * We can do this in O(log n) time due to an augmented RB-tree. The
1170 * tree keeps the entries sorted on deadline, but also functions as a
1171 * heap based on the vruntime by keeping:
1172 *
1173 * se->min_vruntime = min(se->vruntime, se->{left,right}->min_vruntime)
1174 *
1175 * Which allows tree pruning through eligibility.
1176 */
pick_eevdf(struct cfs_rq * cfs_rq,bool protect)1177 static struct sched_entity *pick_eevdf(struct cfs_rq *cfs_rq, bool protect)
1178 {
1179 struct rb_node *node = cfs_rq->tasks_timeline.rb_root.rb_node;
1180 struct sched_entity *se = __pick_first_entity(cfs_rq);
1181 struct sched_entity *curr = cfs_rq->curr;
1182 struct sched_entity *best = NULL;
1183
1184 /*
1185 * We can safely skip eligibility check if there is only one entity
1186 * in this cfs_rq, saving some cycles.
1187 */
1188 if (cfs_rq->h_nr_queued == 1)
1189 return curr && curr->on_rq ? curr : se;
1190
1191 /*
1192 * Picking the ->next buddy will affect latency but not fairness.
1193 */
1194 if (sched_feat(PICK_BUDDY) && protect &&
1195 cfs_rq->next && entity_eligible(cfs_rq, cfs_rq->next)) {
1196 /* ->next will never be delayed */
1197 WARN_ON_ONCE(cfs_rq->next->sched_delayed);
1198 return cfs_rq->next;
1199 }
1200
1201 if (curr && (!curr->on_rq || !entity_eligible(cfs_rq, curr)))
1202 curr = NULL;
1203
1204 if (curr && protect && protect_slice(curr))
1205 return curr;
1206
1207 /* Pick the leftmost entity if it's eligible */
1208 if (se && entity_eligible(cfs_rq, se)) {
1209 best = se;
1210 goto found;
1211 }
1212
1213 /* Heap search for the EEVD entity */
1214 while (node) {
1215 struct rb_node *left = node->rb_left;
1216
1217 /*
1218 * Eligible entities in left subtree are always better
1219 * choices, since they have earlier deadlines.
1220 */
1221 if (left && vruntime_eligible(cfs_rq,
1222 __node_2_se(left)->min_vruntime)) {
1223 node = left;
1224 continue;
1225 }
1226
1227 se = __node_2_se(node);
1228
1229 /*
1230 * The left subtree either is empty or has no eligible
1231 * entity, so check the current node since it is the one
1232 * with earliest deadline that might be eligible.
1233 */
1234 if (entity_eligible(cfs_rq, se)) {
1235 best = se;
1236 break;
1237 }
1238
1239 node = node->rb_right;
1240 }
1241 found:
1242 if (!best || (curr && entity_before(curr, best)))
1243 best = curr;
1244
1245 return best;
1246 }
1247
__pick_last_entity(struct cfs_rq * cfs_rq)1248 struct sched_entity *__pick_last_entity(struct cfs_rq *cfs_rq)
1249 {
1250 struct rb_node *last = rb_last(&cfs_rq->tasks_timeline.rb_root);
1251
1252 if (!last)
1253 return NULL;
1254
1255 return __node_2_se(last);
1256 }
1257
1258 /**************************************************************
1259 * Scheduling class statistics methods:
1260 */
sched_update_scaling(void)1261 int sched_update_scaling(void)
1262 {
1263 unsigned int factor = get_update_sysctl_factor();
1264
1265 #define WRT_SYSCTL(name) \
1266 (normalized_sysctl_##name = sysctl_##name / (factor))
1267 WRT_SYSCTL(sched_base_slice);
1268 #undef WRT_SYSCTL
1269
1270 return 0;
1271 }
1272
1273 static void clear_buddies(struct cfs_rq *cfs_rq, struct sched_entity *se);
1274
1275 /*
1276 * XXX: strictly: vd_i += N*r_i/w_i such that: vd_i > ve_i
1277 * this is probably good enough.
1278 */
update_deadline(struct cfs_rq * cfs_rq,struct sched_entity * se)1279 static bool update_deadline(struct cfs_rq *cfs_rq, struct sched_entity *se)
1280 {
1281 if (vruntime_cmp(se->vruntime, "<", se->deadline))
1282 return false;
1283
1284 /*
1285 * For EEVDF the virtual time slope is determined by w_i (iow.
1286 * nice) while the request time r_i is determined by
1287 * sysctl_sched_base_slice.
1288 */
1289 if (!se->custom_slice)
1290 se->slice = sysctl_sched_base_slice;
1291
1292 /*
1293 * EEVDF: vd_i = ve_i + r_i / w_i
1294 */
1295 se->deadline = se->vruntime + calc_delta_fair(se->slice, se);
1296 avg_vruntime(cfs_rq);
1297
1298 /*
1299 * The task has consumed its request, reschedule.
1300 */
1301 return true;
1302 }
1303
1304 #include "pelt.h"
1305
1306 static int select_idle_sibling(struct task_struct *p, int prev_cpu, int cpu);
1307 static unsigned long task_h_load(struct task_struct *p);
1308 static unsigned long capacity_of(int cpu);
1309
1310 /* Give new sched_entity start runnable values to heavy its load in infant time */
init_entity_runnable_average(struct sched_entity * se)1311 void init_entity_runnable_average(struct sched_entity *se)
1312 {
1313 struct sched_avg *sa = &se->avg;
1314
1315 memset(sa, 0, sizeof(*sa));
1316
1317 /*
1318 * Tasks are initialized with full load to be seen as heavy tasks until
1319 * they get a chance to stabilize to their real load level.
1320 * Group entities are initialized with zero load to reflect the fact that
1321 * nothing has been attached to the task group yet.
1322 */
1323 if (entity_is_task(se))
1324 sa->load_avg = scale_load_down(se->load.weight);
1325
1326 /* when this task is enqueued, it will contribute to its cfs_rq's load_avg */
1327 }
1328
1329 /*
1330 * With new tasks being created, their initial util_avgs are extrapolated
1331 * based on the cfs_rq's current util_avg:
1332 *
1333 * util_avg = cfs_rq->avg.util_avg / (cfs_rq->avg.load_avg + 1)
1334 * * se_weight(se)
1335 *
1336 * However, in many cases, the above util_avg does not give a desired
1337 * value. Moreover, the sum of the util_avgs may be divergent, such
1338 * as when the series is a harmonic series.
1339 *
1340 * To solve this problem, we also cap the util_avg of successive tasks to
1341 * only 1/2 of the left utilization budget:
1342 *
1343 * util_avg_cap = (cpu_scale - cfs_rq->avg.util_avg) / 2^n
1344 *
1345 * where n denotes the nth task and cpu_scale the CPU capacity.
1346 *
1347 * For example, for a CPU with 1024 of capacity, a simplest series from
1348 * the beginning would be like:
1349 *
1350 * task util_avg: 512, 256, 128, 64, 32, 16, 8, ...
1351 * cfs_rq util_avg: 512, 768, 896, 960, 992, 1008, 1016, ...
1352 *
1353 * Finally, that extrapolated util_avg is clamped to the cap (util_avg_cap)
1354 * if util_avg > util_avg_cap.
1355 */
post_init_entity_util_avg(struct task_struct * p)1356 void post_init_entity_util_avg(struct task_struct *p)
1357 {
1358 struct sched_entity *se = &p->se;
1359 struct cfs_rq *cfs_rq = cfs_rq_of(se);
1360 struct sched_avg *sa = &se->avg;
1361 long cpu_scale = arch_scale_cpu_capacity(cpu_of(rq_of(cfs_rq)));
1362 long cap = (long)(cpu_scale - cfs_rq->avg.util_avg) / 2;
1363
1364 if (p->sched_class != &fair_sched_class) {
1365 /*
1366 * For !fair tasks do:
1367 *
1368 update_cfs_rq_load_avg(now, cfs_rq);
1369 attach_entity_load_avg(cfs_rq, se);
1370 switched_from_fair(rq, p);
1371 *
1372 * such that the next switched_to_fair() has the
1373 * expected state.
1374 */
1375 se->avg.last_update_time = cfs_rq_clock_pelt(cfs_rq);
1376 return;
1377 }
1378
1379 if (cap > 0) {
1380 if (cfs_rq->avg.util_avg != 0) {
1381 sa->util_avg = cfs_rq->avg.util_avg * se_weight(se);
1382 sa->util_avg /= (cfs_rq->avg.load_avg + 1);
1383
1384 if (sa->util_avg > cap)
1385 sa->util_avg = cap;
1386 } else {
1387 sa->util_avg = cap;
1388 }
1389 }
1390
1391 sa->runnable_avg = sa->util_avg;
1392 }
1393
1394 static inline void account_mm_sched(struct rq *rq, struct task_struct *p, s64 delta_exec);
1395
update_se(struct rq * rq,struct sched_entity * se)1396 static s64 update_se(struct rq *rq, struct sched_entity *se)
1397 {
1398 u64 now = rq_clock_task(rq);
1399 s64 delta_exec;
1400
1401 delta_exec = now - se->exec_start;
1402 if (unlikely(delta_exec <= 0))
1403 return delta_exec;
1404
1405 se->exec_start = now;
1406 if (entity_is_task(se)) {
1407 struct task_struct *donor = task_of(se);
1408 struct task_struct *running = rq->curr;
1409 /*
1410 * If se is a task, we account the time against the running
1411 * task, as w/ proxy-exec they may not be the same.
1412 */
1413 running->se.exec_start = now;
1414 running->se.sum_exec_runtime += delta_exec;
1415
1416 trace_sched_stat_runtime(running, delta_exec);
1417 account_group_exec_runtime(running, delta_exec);
1418 account_mm_sched(rq, running, delta_exec);
1419
1420 /* cgroup time is always accounted against the donor */
1421 cgroup_account_cputime(donor, delta_exec);
1422 } else {
1423 /* If not task, account the time against donor se */
1424 se->sum_exec_runtime += delta_exec;
1425 }
1426
1427 if (schedstat_enabled()) {
1428 struct sched_statistics *stats;
1429
1430 stats = __schedstats_from_se(se);
1431 __schedstat_set(stats->exec_max,
1432 max(delta_exec, stats->exec_max));
1433 }
1434
1435 return delta_exec;
1436 }
1437
1438 #ifdef CONFIG_SCHED_CACHE
1439
1440 /*
1441 * XXX numbers come from a place the sun don't shine -- probably wants to be SD
1442 * tunable or so.
1443 */
1444 #define EPOCH_PERIOD (HZ / 100) /* 10 ms */
1445 #define EPOCH_LLC_AFFINITY_TIMEOUT 5 /* 50 ms */
1446 __read_mostly unsigned int llc_aggr_tolerance = 1;
1447 __read_mostly unsigned int llc_epoch_period = EPOCH_PERIOD;
1448 __read_mostly unsigned int llc_epoch_affinity_timeout = EPOCH_LLC_AFFINITY_TIMEOUT;
1449 __read_mostly unsigned int llc_imb_pct = 20;
1450 __read_mostly unsigned int llc_overaggr_pct = 50;
1451
llc_id(int cpu)1452 static int llc_id(int cpu)
1453 {
1454 if (cpu < 0)
1455 return -1;
1456
1457 return per_cpu(sd_llc_id, cpu);
1458 }
1459
get_sched_cache_scale(int mul)1460 static inline int get_sched_cache_scale(int mul)
1461 {
1462 unsigned int tol = READ_ONCE(llc_aggr_tolerance);
1463
1464 if (!tol)
1465 return 0;
1466
1467 if (tol >= 100)
1468 return INT_MAX;
1469
1470 return (1 + (tol - 1) * mul);
1471 }
1472
exceed_llc_capacity(struct mm_struct * mm,int cpu)1473 static bool exceed_llc_capacity(struct mm_struct *mm, int cpu)
1474 {
1475 #ifdef CONFIG_NUMA_BALANCING
1476 unsigned long llc, footprint;
1477 struct sched_domain *sd;
1478 int scale;
1479
1480 guard(rcu)();
1481
1482 sd = rcu_dereference_sched_domain(cpu_rq(cpu)->sd);
1483 if (!sd)
1484 return true;
1485
1486 if (static_branch_likely(&sched_numa_balancing)) {
1487 /*
1488 * TBD: RDT exclusive LLC ways reserved should be
1489 * excluded.
1490 */
1491 llc = sd->llc_bytes;
1492 footprint = READ_ONCE(mm->sc_stat.footprint);
1493
1494 /*
1495 * Scale the LLC size by 256*llc_aggr_tolerance
1496 * and compare it to the task's footprint.
1497 *
1498 * Suppose the L3 size is 32MB. If the
1499 * llc_aggr_tolerance is 1:
1500 * When the footprint is larger than 32MB, the
1501 * process is regarded as exceeding the LLC
1502 * capacity. If the llc_aggr_tolerance is 99:
1503 * When the footprint is larger than 784GB, the
1504 * process is regarded as exceeding the LLC
1505 * capacity:
1506 * 784GB = (1 + (99 - 1) * 256) * 32MB
1507 * If the llc_aggr_tolerance is 100:
1508 * ignore the footprint and do the aggregation
1509 * anyway.
1510 */
1511 scale = get_sched_cache_scale(256);
1512 if (scale == INT_MAX)
1513 return false;
1514
1515 return ((llc * (u64)scale) < (footprint * PAGE_SIZE));
1516 }
1517 #endif
1518 return false;
1519 }
1520
invalid_llc_nr(struct mm_struct * mm,struct task_struct * p,int cpu)1521 static bool invalid_llc_nr(struct mm_struct *mm, struct task_struct *p,
1522 int cpu)
1523 {
1524 int scale;
1525
1526 if (get_nr_threads(p) <= 1)
1527 return true;
1528
1529 /*
1530 * Scale the number of 'cores' in a LLC by llc_aggr_tolerance
1531 * and compare it to the task's active threads.
1532 */
1533 scale = get_sched_cache_scale(1);
1534 if (scale == INT_MAX)
1535 return false;
1536
1537 return !fits_capacity((mm->sc_stat.nr_running_avg * cpu_smt_num_threads),
1538 (scale * per_cpu(sd_llc_size, cpu)));
1539 }
1540
account_llc_enqueue(struct rq * rq,struct task_struct * p)1541 static void account_llc_enqueue(struct rq *rq, struct task_struct *p)
1542 {
1543 int pref_llc, pref_llc_queued;
1544 struct sched_domain *sd;
1545
1546 pref_llc = p->preferred_llc;
1547 if (pref_llc < 0)
1548 return;
1549
1550 pref_llc_queued = (pref_llc == task_llc(p));
1551 rq->nr_llc_running++;
1552 rq->nr_pref_llc_running += pref_llc_queued;
1553
1554 /*
1555 * Record whether p is enqueued on its preferred
1556 * LLC, in order to pair with account_llc_dequeue()
1557 * to maintain a consistent nr_pref_llc_running per
1558 * runqueue.
1559 * This is necessary because a race condition exists:
1560 * after a task is enqueued on a runqueue, task_llc(p)
1561 * may change due to CPU hotplug. Therefore, checking
1562 * task_llc(p) to determine whether the task is being
1563 * dequeued from its preferred LLC is unreliable and
1564 * can cause inconsistent values - checking the
1565 * p->pref_llc_queued in account_llc_dequeue() would
1566 * be reliable.
1567 */
1568 p->pref_llc_queued = pref_llc_queued;
1569
1570 sd = rcu_dereference_all(rq->sd);
1571 if (sd && (unsigned int)pref_llc < sd->llc_max)
1572 sd->llc_counts[pref_llc]++;
1573 }
1574
account_llc_dequeue(struct rq * rq,struct task_struct * p)1575 static void account_llc_dequeue(struct rq *rq, struct task_struct *p)
1576 {
1577 struct sched_domain *sd;
1578 int pref_llc;
1579
1580 pref_llc = p->preferred_llc;
1581 if (pref_llc < 0)
1582 return;
1583
1584 rq->nr_llc_running--;
1585 if (p->pref_llc_queued) {
1586 rq->nr_pref_llc_running--;
1587 /*
1588 * Update the status in case
1589 * other logic might query
1590 * this.
1591 */
1592 p->pref_llc_queued = 0;
1593 }
1594
1595 sd = rcu_dereference_all(rq->sd);
1596 if (sd && (unsigned int)pref_llc < sd->llc_max) {
1597 /*
1598 * There is a race condition between dequeue
1599 * and CPU hotplug. After a task has been enqueued
1600 * on CPUx, a CPU hotplug event occurs, and all online
1601 * CPUs (including CPUx) rebuild their sched_domains
1602 * and reset statistics to zero(including sd->llc_counts).
1603 * This can cause temporary undercount and we have to
1604 * check for such underflow in sd->llc_counts.
1605 *
1606 * This undercount is temporary and accurate accounting
1607 * will resume once the rq has a chance to be idle.
1608 */
1609 if (sd->llc_counts[pref_llc])
1610 sd->llc_counts[pref_llc]--;
1611 }
1612 }
1613
mm_init_sched(struct mm_struct * mm,struct sched_cache_time __percpu * _pcpu_sched)1614 void mm_init_sched(struct mm_struct *mm,
1615 struct sched_cache_time __percpu *_pcpu_sched)
1616 {
1617 unsigned long epoch = 0;
1618 int i;
1619
1620 for_each_possible_cpu(i) {
1621 struct sched_cache_time *pcpu_sched = per_cpu_ptr(_pcpu_sched, i);
1622 struct rq *rq = cpu_rq(i);
1623
1624 pcpu_sched->runtime = 0;
1625 /* a slightly stale cpu epoch is acceptible */
1626 pcpu_sched->epoch = rq->cpu_epoch;
1627 epoch = rq->cpu_epoch;
1628 }
1629
1630 raw_spin_lock_init(&mm->sc_stat.lock);
1631 mm->sc_stat.epoch = epoch;
1632 mm->sc_stat.cpu = -1;
1633 mm->sc_stat.next_scan = jiffies;
1634 mm->sc_stat.nr_running_avg = 0;
1635 mm->sc_stat.footprint = 0;
1636 /*
1637 * The update to mm->sc_stat should not be reordered
1638 * before initialization to mm's other fields, in case
1639 * the readers may get invalid mm_sched_epoch, etc.
1640 */
1641 smp_store_release(&mm->sc_stat.pcpu_sched, _pcpu_sched);
1642 }
1643
1644 /* because why would C be fully specified */
__shr_u64(u64 * val,unsigned int n)1645 static __always_inline void __shr_u64(u64 *val, unsigned int n)
1646 {
1647 if (n >= 64) {
1648 *val = 0;
1649 return;
1650 }
1651 *val >>= n;
1652 }
1653
__update_mm_sched(struct rq * rq,struct sched_cache_time * pcpu_sched)1654 static inline void __update_mm_sched(struct rq *rq,
1655 struct sched_cache_time *pcpu_sched)
1656 {
1657 lockdep_assert_held(&rq->cpu_epoch_lock);
1658
1659 unsigned int period = max(READ_ONCE(llc_epoch_period), 1U);
1660 unsigned long n, now = jiffies;
1661 long delta = now - rq->cpu_epoch_next;
1662
1663 if (delta > 0) {
1664 n = (delta + period - 1) / period;
1665 rq->cpu_epoch += n;
1666 rq->cpu_epoch_next += n * period;
1667 __shr_u64(&rq->cpu_runtime, n);
1668 }
1669
1670 n = rq->cpu_epoch - pcpu_sched->epoch;
1671 if (n) {
1672 pcpu_sched->epoch += n;
1673 __shr_u64(&pcpu_sched->runtime, n);
1674 }
1675 }
1676
fraction_mm_sched(struct rq * rq,struct sched_cache_time * pcpu_sched)1677 static unsigned long fraction_mm_sched(struct rq *rq,
1678 struct sched_cache_time *pcpu_sched)
1679 {
1680 guard(raw_spinlock_irqsave)(&rq->cpu_epoch_lock);
1681
1682 __update_mm_sched(rq, pcpu_sched);
1683
1684 /*
1685 * Runtime is a geometric series (r=0.5) and as such will sum to twice
1686 * the accumulation period, this means the multiplcation here should
1687 * not overflow.
1688 */
1689 return div64_u64(NICE_0_LOAD * pcpu_sched->runtime, rq->cpu_runtime + 1);
1690 }
1691
get_pref_llc(struct task_struct * p,struct mm_struct * mm)1692 static int get_pref_llc(struct task_struct *p, struct mm_struct *mm)
1693 {
1694 int mm_sched_llc = -1, mm_sched_cpu;
1695
1696 if (!mm)
1697 return -1;
1698
1699 mm_sched_cpu = READ_ONCE(mm->sc_stat.cpu);
1700 if (mm_sched_cpu != -1) {
1701 mm_sched_llc = llc_id(mm_sched_cpu);
1702
1703 #ifdef CONFIG_NUMA_BALANCING
1704 /*
1705 * Don't assign preferred LLC if it
1706 * conflicts with NUMA balancing.
1707 * This can happen when sched_setnuma() gets
1708 * called, however it is not much of an issue
1709 * because we expect account_mm_sched() to get
1710 * called fairly regularly -- at a higher rate
1711 * than sched_setnuma() at least -- and thus the
1712 * conflict only exists for a short period of time.
1713 */
1714 if (static_branch_likely(&sched_numa_balancing) &&
1715 p->numa_preferred_nid >= 0 &&
1716 cpu_to_node(mm_sched_cpu) != p->numa_preferred_nid)
1717 mm_sched_llc = -1;
1718 #endif
1719 }
1720
1721 return mm_sched_llc;
1722 }
1723
1724 static unsigned int task_running_on_cpu(int cpu, struct task_struct *p);
1725
1726 static inline
account_mm_sched(struct rq * rq,struct task_struct * p,s64 delta_exec)1727 void account_mm_sched(struct rq *rq, struct task_struct *p, s64 delta_exec)
1728 {
1729 struct sched_cache_time *pcpu_sched;
1730 struct mm_struct *mm = p->mm;
1731 int mm_sched_llc = -1;
1732 unsigned long epoch;
1733
1734 if (!sched_cache_enabled())
1735 return;
1736
1737 if (p->sched_class != &fair_sched_class)
1738 return;
1739 /*
1740 * init_task, kthreads and user thread created
1741 * by user_mode_thread() don't have mm.
1742 */
1743 if (!mm || !mm->sc_stat.pcpu_sched)
1744 return;
1745
1746 pcpu_sched = per_cpu_ptr(mm->sc_stat.pcpu_sched, cpu_of(rq));
1747
1748 scoped_guard (raw_spinlock, &rq->cpu_epoch_lock) {
1749 __update_mm_sched(rq, pcpu_sched);
1750 pcpu_sched->runtime += delta_exec;
1751 rq->cpu_runtime += delta_exec;
1752 epoch = rq->cpu_epoch;
1753 }
1754
1755 /*
1756 * If this process hasn't hit task_cache_work() for a while invalidate
1757 * its preferred state.
1758 */
1759 if ((long)(epoch - READ_ONCE(mm->sc_stat.epoch)) > llc_epoch_affinity_timeout ||
1760 invalid_llc_nr(mm, p, cpu_of(rq)) ||
1761 exceed_llc_capacity(mm, cpu_of(rq))) {
1762 if (READ_ONCE(mm->sc_stat.cpu) != -1)
1763 WRITE_ONCE(mm->sc_stat.cpu, -1);
1764 }
1765
1766 mm_sched_llc = get_pref_llc(p, mm);
1767
1768 /* task not on rq accounted later in account_entity_enqueue() */
1769 if (task_running_on_cpu(rq->cpu, p) &&
1770 READ_ONCE(p->preferred_llc) != mm_sched_llc) {
1771 account_llc_dequeue(rq, p);
1772 WRITE_ONCE(p->preferred_llc, mm_sched_llc);
1773 account_llc_enqueue(rq, p);
1774 }
1775 }
1776
task_tick_cache(struct rq * rq,struct task_struct * p)1777 static void task_tick_cache(struct rq *rq, struct task_struct *p)
1778 {
1779 struct callback_head *work = &p->cache_work;
1780 struct mm_struct *mm = p->mm;
1781 unsigned long epoch;
1782
1783 if (!sched_cache_enabled())
1784 return;
1785
1786 if (!mm || p->flags & PF_KTHREAD ||
1787 !mm->sc_stat.pcpu_sched)
1788 return;
1789
1790 epoch = rq->cpu_epoch;
1791 /* avoid moving backwards */
1792 if (time_after_eq(mm->sc_stat.epoch, epoch))
1793 return;
1794
1795 guard(raw_spinlock)(&mm->sc_stat.lock);
1796
1797 if (work->next == work) {
1798 task_work_add(p, work, TWA_RESUME);
1799 WRITE_ONCE(mm->sc_stat.epoch, epoch);
1800 }
1801 }
1802
get_scan_cpumasks(cpumask_var_t cpus,struct task_struct * p)1803 static void get_scan_cpumasks(cpumask_var_t cpus, struct task_struct *p)
1804 {
1805 #ifdef CONFIG_NUMA_BALANCING
1806 int cpu, curr_cpu, nid, pref_nid;
1807
1808 if (!static_branch_likely(&sched_numa_balancing))
1809 goto out;
1810
1811 cpu = READ_ONCE(p->mm->sc_stat.cpu);
1812 if (cpu != -1)
1813 nid = cpu_to_node(cpu);
1814 curr_cpu = task_cpu(p);
1815
1816 /*
1817 * Scanning in the preferred NUMA node is ideal. However, the NUMA
1818 * preferred node is per-task rather than per-process. It is possible
1819 * for different threads of the process to have distinct preferred
1820 * nodes; consequently, the process-wide preferred LLC may bounce
1821 * between different nodes. As a workaround, maintain the scan
1822 * CPU mask to also cover the process's current preferred LLC and the
1823 * current running node to mitigate the bouncing risk.
1824 * TBD: numa_group should be considered during task aggregation.
1825 */
1826 pref_nid = p->numa_preferred_nid;
1827 /* honor the task's preferred node */
1828 if (pref_nid == NUMA_NO_NODE)
1829 goto out;
1830
1831 cpumask_or(cpus, cpus, cpumask_of_node(pref_nid));
1832
1833 /* honor the task's preferred LLC CPU */
1834 if (cpu != -1 && !cpumask_test_cpu(cpu, cpus) && nid != NUMA_NO_NODE)
1835 cpumask_or(cpus, cpus, cpumask_of_node(nid));
1836
1837 /* make sure the task's current running node is included */
1838 if (!cpumask_test_cpu(curr_cpu, cpus))
1839 cpumask_or(cpus, cpus, cpumask_of_node(cpu_to_node(curr_cpu)));
1840
1841 return;
1842
1843 out:
1844 #endif
1845 cpumask_copy(cpus, cpu_online_mask);
1846 }
1847
update_avg_scale(u64 * avg,u64 sample)1848 static inline void update_avg_scale(u64 *avg, u64 sample)
1849 {
1850 int factor = per_cpu(sd_llc_size, raw_smp_processor_id());
1851 s64 diff = sample - *avg;
1852 u32 divisor;
1853
1854 /*
1855 * Scale the divisor based on the number of CPUs contained
1856 * in the LLC. This scaling ensures smaller LLC domains use
1857 * a smaller divisor to achieve more precise sensitivity to
1858 * changes in nr_running, while larger LLC domains are capped
1859 * at a maximum divisor of 8 which is the default smoothing
1860 * factor of EWMA in update_avg().
1861 */
1862 divisor = clamp_t(u32, (factor >> 2), 2, 8);
1863 *avg += div64_s64(diff, divisor);
1864 }
1865
task_cache_work(struct callback_head * work)1866 static void task_cache_work(struct callback_head *work)
1867 {
1868 int cpu, m_a_cpu = -1, nr_running = 0, curr_cpu;
1869 unsigned long next_scan, now = jiffies;
1870 struct task_struct *p = current, *cur;
1871 unsigned long curr_m_a_occ = 0;
1872 struct mm_struct *mm = p->mm;
1873 unsigned long m_a_occ = 0;
1874 cpumask_var_t cpus;
1875
1876 WARN_ON_ONCE(work != &p->cache_work);
1877
1878 work->next = work;
1879
1880 if (p->flags & PF_EXITING)
1881 return;
1882
1883 next_scan = READ_ONCE(mm->sc_stat.next_scan);
1884 if (time_before(now, next_scan))
1885 return;
1886
1887 /* only 1 thread is allowed to scan */
1888 if (!try_cmpxchg(&mm->sc_stat.next_scan, &next_scan,
1889 now + max_t(unsigned long,
1890 READ_ONCE(llc_epoch_period), 1)))
1891 return;
1892
1893 curr_cpu = task_cpu(p);
1894 if (invalid_llc_nr(mm, p, curr_cpu) ||
1895 exceed_llc_capacity(mm, curr_cpu)) {
1896 if (READ_ONCE(mm->sc_stat.cpu) != -1)
1897 WRITE_ONCE(mm->sc_stat.cpu, -1);
1898
1899 return;
1900 }
1901
1902 if (!zalloc_cpumask_var(&cpus, GFP_KERNEL))
1903 return;
1904
1905 scoped_guard (cpus_read_lock) {
1906 guard(rcu)();
1907
1908 get_scan_cpumasks(cpus, p);
1909
1910 for_each_cpu(cpu, cpus) {
1911 /* XXX sched_cluster_active */
1912 struct sched_domain *sd = rcu_dereference_all(per_cpu(sd_llc, cpu));
1913 unsigned long occ, m_occ = 0, a_occ = 0;
1914 int m_cpu = -1, i;
1915
1916 if (!sd)
1917 continue;
1918
1919 for_each_cpu(i, sched_domain_span(sd)) {
1920 occ = fraction_mm_sched(cpu_rq(i),
1921 per_cpu_ptr(mm->sc_stat.pcpu_sched, i));
1922 a_occ += occ;
1923 if (occ > m_occ) {
1924 m_occ = occ;
1925 m_cpu = i;
1926 }
1927
1928 cur = rcu_dereference_all(cpu_rq(i)->curr);
1929 if (cur && !(cur->flags & (PF_EXITING | PF_KTHREAD)) &&
1930 cur->mm == mm)
1931 nr_running++;
1932 }
1933
1934 /*
1935 * Compare the accumulated occupancy of each LLC. The
1936 * reason for using accumulated occupancy rather than average
1937 * per CPU occupancy is that it works better in asymmetric LLC
1938 * scenarios.
1939 * For example, if there are 2 threads in a 4CPU LLC and 3
1940 * threads in an 8CPU LLC, it might be better to choose the one
1941 * with 3 threads. However, this would not be the case if the
1942 * occupancy is divided by the number of CPUs in an LLC (i.e.,
1943 * if average per CPU occupancy is used).
1944 * Besides, NUMA balancing fault statistics behave similarly:
1945 * the total number of faults per node is compared rather than
1946 * the average number of faults per CPU. This strategy is also
1947 * followed here.
1948 */
1949 if (a_occ > m_a_occ) {
1950 m_a_occ = a_occ;
1951 m_a_cpu = m_cpu;
1952 }
1953
1954 if (llc_id(cpu) == llc_id(READ_ONCE(mm->sc_stat.cpu)))
1955 curr_m_a_occ = a_occ;
1956
1957 cpumask_andnot(cpus, cpus, sched_domain_span(sd));
1958 }
1959 }
1960
1961 if (m_a_occ > (2 * curr_m_a_occ)) {
1962 /*
1963 * Avoid switching sc_stat.cpu too fast.
1964 * The reason to choose 2X is because:
1965 * 1. It is better to keep the preferred LLC stable,
1966 * rather than changing it frequently and cause migrations
1967 * 2. 2X means the new preferred LLC has at least 1 more
1968 * busy CPU than the old one(200% vs 100%, eg)
1969 * 3. 2X is chosen based on test results, as it delivers
1970 * the optimal performance gain so far.
1971 */
1972 WRITE_ONCE(mm->sc_stat.cpu, m_a_cpu);
1973 }
1974
1975 update_avg_scale(&mm->sc_stat.nr_running_avg, nr_running);
1976 free_cpumask_var(cpus);
1977 }
1978
init_sched_mm(struct task_struct * p)1979 void init_sched_mm(struct task_struct *p)
1980 {
1981 struct callback_head *work = &p->cache_work;
1982
1983 init_task_work(work, task_cache_work);
1984 work->next = work;
1985 /*
1986 * Reset new task's preference to avoid
1987 * polluting account_llc_enqueue().
1988 */
1989 p->preferred_llc = -1;
1990 }
1991
1992 #else /* CONFIG_SCHED_CACHE */
1993
account_mm_sched(struct rq * rq,struct task_struct * p,s64 delta_exec)1994 static inline void account_mm_sched(struct rq *rq, struct task_struct *p,
1995 s64 delta_exec) { }
1996
init_sched_mm(struct task_struct * p)1997 void init_sched_mm(struct task_struct *p) { }
1998
task_tick_cache(struct rq * rq,struct task_struct * p)1999 static void task_tick_cache(struct rq *rq, struct task_struct *p) { }
2000
get_pref_llc(struct task_struct * p,struct mm_struct * mm)2001 static inline int get_pref_llc(struct task_struct *p,
2002 struct mm_struct *mm)
2003 {
2004 return -1;
2005 }
2006
account_llc_enqueue(struct rq * rq,struct task_struct * p)2007 static void account_llc_enqueue(struct rq *rq, struct task_struct *p) {}
2008
account_llc_dequeue(struct rq * rq,struct task_struct * p)2009 static void account_llc_dequeue(struct rq *rq, struct task_struct *p) {}
2010
2011 #endif /* CONFIG_SCHED_CACHE */
2012
2013 /*
2014 * Used by other classes to account runtime.
2015 */
update_curr_common(struct rq * rq)2016 s64 update_curr_common(struct rq *rq)
2017 {
2018 return update_se(rq, &rq->donor->se);
2019 }
2020
2021 /*
2022 * Update the current task's runtime statistics.
2023 */
update_curr(struct cfs_rq * cfs_rq)2024 static void update_curr(struct cfs_rq *cfs_rq)
2025 {
2026 /*
2027 * Note: cfs_rq->curr corresponds to the task picked to
2028 * run (ie: rq->donor.se) which due to proxy-exec may
2029 * not necessarily be the actual task running
2030 * (rq->curr.se). This is easy to confuse!
2031 */
2032 struct sched_entity *curr = cfs_rq->h_curr;
2033 struct rq *rq = rq_of(cfs_rq);
2034 s64 delta_exec;
2035 bool resched;
2036
2037 if (unlikely(!curr))
2038 return;
2039
2040 delta_exec = update_se(rq, curr);
2041 if (unlikely(delta_exec <= 0))
2042 return;
2043
2044 account_cfs_rq_runtime(cfs_rq, delta_exec);
2045
2046 if (!entity_is_task(curr))
2047 return;
2048
2049 cfs_rq = &rq->cfs;
2050
2051 curr->vruntime += calc_delta_fair(delta_exec, curr);
2052 resched = update_deadline(cfs_rq, curr);
2053
2054 /*
2055 * If the fair_server is active, we need to account for the
2056 * fair_server time whether or not the task is running on
2057 * behalf of fair_server or not:
2058 * - If the task is running on behalf of fair_server, we need
2059 * to limit its time based on the assigned runtime.
2060 * - Fair task that runs outside of fair_server should account
2061 * against fair_server such that it can account for this time
2062 * and possibly avoid running this period.
2063 */
2064 dl_server_update(&rq->fair_server, delta_exec);
2065
2066 if (cfs_rq->h_nr_queued == 1)
2067 return;
2068
2069 if (resched || !protect_slice(curr)) {
2070 resched_curr_lazy(rq);
2071 clear_buddies(cfs_rq, curr);
2072 }
2073 }
2074
update_curr_fair(struct rq * rq)2075 static void update_curr_fair(struct rq *rq)
2076 {
2077 struct sched_entity *se = &rq->donor->se;
2078
2079 for_each_sched_entity(se)
2080 update_curr(cfs_rq_of(se));
2081 }
2082
2083 static inline void
update_stats_wait_start_fair(struct cfs_rq * cfs_rq,struct sched_entity * se)2084 update_stats_wait_start_fair(struct cfs_rq *cfs_rq, struct sched_entity *se)
2085 {
2086 struct sched_statistics *stats;
2087 struct task_struct *p = NULL;
2088
2089 if (!schedstat_enabled())
2090 return;
2091
2092 stats = __schedstats_from_se(se);
2093
2094 if (entity_is_task(se))
2095 p = task_of(se);
2096
2097 __update_stats_wait_start(rq_of(cfs_rq), p, stats);
2098 }
2099
2100 static inline void
update_stats_wait_end_fair(struct cfs_rq * cfs_rq,struct sched_entity * se)2101 update_stats_wait_end_fair(struct cfs_rq *cfs_rq, struct sched_entity *se)
2102 {
2103 struct sched_statistics *stats;
2104 struct task_struct *p = NULL;
2105
2106 if (!schedstat_enabled())
2107 return;
2108
2109 stats = __schedstats_from_se(se);
2110
2111 /*
2112 * When the sched_schedstat changes from 0 to 1, some sched se
2113 * maybe already in the runqueue, the se->statistics.wait_start
2114 * will be 0.So it will let the delta wrong. We need to avoid this
2115 * scenario.
2116 */
2117 if (unlikely(!schedstat_val(stats->wait_start)))
2118 return;
2119
2120 if (entity_is_task(se))
2121 p = task_of(se);
2122
2123 __update_stats_wait_end(rq_of(cfs_rq), p, stats);
2124 }
2125
2126 static inline void
update_stats_enqueue_sleeper_fair(struct cfs_rq * cfs_rq,struct sched_entity * se)2127 update_stats_enqueue_sleeper_fair(struct cfs_rq *cfs_rq, struct sched_entity *se)
2128 {
2129 struct sched_statistics *stats;
2130 struct task_struct *tsk = NULL;
2131
2132 if (!schedstat_enabled())
2133 return;
2134
2135 stats = __schedstats_from_se(se);
2136
2137 if (entity_is_task(se))
2138 tsk = task_of(se);
2139
2140 __update_stats_enqueue_sleeper(rq_of(cfs_rq), tsk, stats);
2141 }
2142
2143 /*
2144 * Task is being enqueued - update stats:
2145 */
2146 static inline void
update_stats_enqueue_fair(struct cfs_rq * cfs_rq,struct sched_entity * se,int flags)2147 update_stats_enqueue_fair(struct cfs_rq *cfs_rq, struct sched_entity *se, int flags)
2148 {
2149 if (!schedstat_enabled())
2150 return;
2151
2152 /*
2153 * Are we enqueueing a waiting task? (for current tasks
2154 * a dequeue/enqueue event is a NOP)
2155 */
2156 if (se != cfs_rq->h_curr)
2157 update_stats_wait_start_fair(cfs_rq, se);
2158
2159 if (flags & ENQUEUE_WAKEUP)
2160 update_stats_enqueue_sleeper_fair(cfs_rq, se);
2161 }
2162
2163 static inline void
update_stats_dequeue_fair(struct cfs_rq * cfs_rq,struct sched_entity * se,int flags)2164 update_stats_dequeue_fair(struct cfs_rq *cfs_rq, struct sched_entity *se, int flags)
2165 {
2166
2167 if (!schedstat_enabled())
2168 return;
2169
2170 /*
2171 * Mark the end of the wait period if dequeueing a
2172 * waiting task:
2173 */
2174 if (se != cfs_rq->h_curr)
2175 update_stats_wait_end_fair(cfs_rq, se);
2176
2177 if ((flags & DEQUEUE_SLEEP) && entity_is_task(se)) {
2178 struct task_struct *tsk = task_of(se);
2179 unsigned int state;
2180
2181 /* XXX racy against TTWU */
2182 state = READ_ONCE(tsk->__state);
2183 if (state & TASK_INTERRUPTIBLE)
2184 __schedstat_set(tsk->stats.sleep_start,
2185 rq_clock(rq_of(cfs_rq)));
2186 if (state & TASK_UNINTERRUPTIBLE)
2187 __schedstat_set(tsk->stats.block_start,
2188 rq_clock(rq_of(cfs_rq)));
2189 }
2190 }
2191
2192 /*
2193 * We are picking a new current task - update its stats:
2194 */
2195 static inline void
update_stats_curr_start(struct cfs_rq * cfs_rq,struct sched_entity * se)2196 update_stats_curr_start(struct cfs_rq *cfs_rq, struct sched_entity *se)
2197 {
2198 /*
2199 * We are starting a new run period:
2200 */
2201 se->exec_start = rq_clock_task(rq_of(cfs_rq));
2202 }
2203
2204 /* Check sched_smt_active before calling this to avoid overheads in fastpaths */
is_core_idle(int cpu)2205 static inline bool is_core_idle(int cpu)
2206 {
2207 int sibling;
2208
2209 for_each_cpu(sibling, cpu_smt_mask(cpu)) {
2210 if (cpu == sibling)
2211 continue;
2212
2213 if (!idle_cpu(sibling))
2214 return false;
2215 }
2216
2217 return true;
2218 }
2219
2220 #ifdef CONFIG_NUMA
2221 #define NUMA_IMBALANCE_MIN 2
2222
2223 static inline long
adjust_numa_imbalance(int imbalance,int dst_running,int imb_numa_nr)2224 adjust_numa_imbalance(int imbalance, int dst_running, int imb_numa_nr)
2225 {
2226 /*
2227 * Allow a NUMA imbalance if busy CPUs is less than the maximum
2228 * threshold. Above this threshold, individual tasks may be contending
2229 * for both memory bandwidth and any shared HT resources. This is an
2230 * approximation as the number of running tasks may not be related to
2231 * the number of busy CPUs due to sched_setaffinity.
2232 */
2233 if (dst_running > imb_numa_nr)
2234 return imbalance;
2235
2236 /*
2237 * Allow a small imbalance based on a simple pair of communicating
2238 * tasks that remain local when the destination is lightly loaded.
2239 */
2240 if (imbalance <= NUMA_IMBALANCE_MIN)
2241 return 0;
2242
2243 return imbalance;
2244 }
2245 #endif /* CONFIG_NUMA */
2246
2247 #ifdef CONFIG_NUMA_BALANCING
2248 /*
2249 * Approximate time to scan a full NUMA task in ms. The task scan period is
2250 * calculated based on the tasks virtual memory size and
2251 * numa_balancing_scan_size.
2252 */
2253 unsigned int sysctl_numa_balancing_scan_period_min = 1000;
2254 unsigned int sysctl_numa_balancing_scan_period_max = 60000;
2255
2256 /* Portion of address space to scan in MB */
2257 unsigned int sysctl_numa_balancing_scan_size = 256;
2258
2259 /* Scan @scan_size MB every @scan_period after an initial @scan_delay in ms */
2260 unsigned int sysctl_numa_balancing_scan_delay = 1000;
2261
2262 /* The page with hint page fault latency < threshold in ms is considered hot */
2263 unsigned int sysctl_numa_balancing_hot_threshold = MSEC_PER_SEC;
2264
2265 struct numa_group {
2266 refcount_t refcount;
2267
2268 spinlock_t lock; /* nr_tasks, tasks */
2269 int nr_tasks;
2270 pid_t gid;
2271 int active_nodes;
2272
2273 struct rcu_head rcu;
2274 unsigned long total_faults;
2275 unsigned long max_faults_cpu;
2276 /*
2277 * faults[] array is split into two regions: faults_mem and faults_cpu.
2278 *
2279 * Faults_cpu is used to decide whether memory should move
2280 * towards the CPU. As a consequence, these stats are weighted
2281 * more by CPU use than by memory faults.
2282 */
2283 unsigned long faults[];
2284 };
2285
2286 /*
2287 * For functions that can be called in multiple contexts that permit reading
2288 * ->numa_group (see struct task_struct for locking rules).
2289 */
deref_task_numa_group(struct task_struct * p)2290 static struct numa_group *deref_task_numa_group(struct task_struct *p)
2291 {
2292 return rcu_dereference_check(p->numa_group, p == current ||
2293 (lockdep_is_held(__rq_lockp(task_rq(p))) && !READ_ONCE(p->on_cpu)));
2294 }
2295
deref_curr_numa_group(struct task_struct * p)2296 static struct numa_group *deref_curr_numa_group(struct task_struct *p)
2297 {
2298 return rcu_dereference_protected(p->numa_group, p == current);
2299 }
2300
2301 static inline unsigned long group_faults_priv(struct numa_group *ng);
2302 static inline unsigned long group_faults_shared(struct numa_group *ng);
2303
task_nr_scan_windows(struct task_struct * p)2304 static unsigned int task_nr_scan_windows(struct task_struct *p)
2305 {
2306 unsigned long rss = 0;
2307 unsigned long nr_scan_pages;
2308
2309 /*
2310 * Calculations based on RSS as non-present and empty pages are skipped
2311 * by the PTE scanner and NUMA hinting faults should be trapped based
2312 * on resident pages
2313 */
2314 nr_scan_pages = MB_TO_PAGES(sysctl_numa_balancing_scan_size);
2315 rss = get_mm_rss(p->mm);
2316 if (!rss)
2317 rss = nr_scan_pages;
2318
2319 rss = round_up(rss, nr_scan_pages);
2320 return rss / nr_scan_pages;
2321 }
2322
2323 /* For sanity's sake, never scan more PTEs than MAX_SCAN_WINDOW MB/sec. */
2324 #define MAX_SCAN_WINDOW 2560
2325
task_scan_min(struct task_struct * p)2326 static unsigned int task_scan_min(struct task_struct *p)
2327 {
2328 unsigned int scan_size = READ_ONCE(sysctl_numa_balancing_scan_size);
2329 unsigned int scan, floor;
2330 unsigned int windows = 1;
2331
2332 if (scan_size < MAX_SCAN_WINDOW)
2333 windows = MAX_SCAN_WINDOW / scan_size;
2334 floor = 1000 / windows;
2335
2336 scan = sysctl_numa_balancing_scan_period_min / task_nr_scan_windows(p);
2337 return max_t(unsigned int, floor, scan);
2338 }
2339
task_scan_start(struct task_struct * p)2340 static unsigned int task_scan_start(struct task_struct *p)
2341 {
2342 unsigned long smin = task_scan_min(p);
2343 unsigned long period = smin;
2344 struct numa_group *ng;
2345
2346 /* Scale the maximum scan period with the amount of shared memory. */
2347 rcu_read_lock();
2348 ng = rcu_dereference_all(p->numa_group);
2349 if (ng) {
2350 unsigned long shared = group_faults_shared(ng);
2351 unsigned long private = group_faults_priv(ng);
2352
2353 period *= refcount_read(&ng->refcount);
2354 period *= shared + 1;
2355 period /= private + shared + 1;
2356 }
2357 rcu_read_unlock();
2358
2359 return max(smin, period);
2360 }
2361
task_scan_max(struct task_struct * p)2362 static unsigned int task_scan_max(struct task_struct *p)
2363 {
2364 unsigned long smin = task_scan_min(p);
2365 unsigned long smax;
2366 struct numa_group *ng;
2367
2368 /* Watch for min being lower than max due to floor calculations */
2369 smax = sysctl_numa_balancing_scan_period_max / task_nr_scan_windows(p);
2370
2371 /* Scale the maximum scan period with the amount of shared memory. */
2372 ng = deref_curr_numa_group(p);
2373 if (ng) {
2374 unsigned long shared = group_faults_shared(ng);
2375 unsigned long private = group_faults_priv(ng);
2376 unsigned long period = smax;
2377
2378 period *= refcount_read(&ng->refcount);
2379 period *= shared + 1;
2380 period /= private + shared + 1;
2381
2382 smax = max(smax, period);
2383 }
2384
2385 return max(smin, smax);
2386 }
2387
account_numa_enqueue(struct rq * rq,struct task_struct * p)2388 static void account_numa_enqueue(struct rq *rq, struct task_struct *p)
2389 {
2390 rq->nr_numa_running += (p->numa_preferred_nid != NUMA_NO_NODE);
2391 rq->nr_preferred_running += (p->numa_preferred_nid == task_node(p));
2392 }
2393
account_numa_dequeue(struct rq * rq,struct task_struct * p)2394 static void account_numa_dequeue(struct rq *rq, struct task_struct *p)
2395 {
2396 rq->nr_numa_running -= (p->numa_preferred_nid != NUMA_NO_NODE);
2397 rq->nr_preferred_running -= (p->numa_preferred_nid == task_node(p));
2398 }
2399
2400 /* Shared or private faults. */
2401 #define NR_NUMA_HINT_FAULT_TYPES 2
2402
2403 /* Memory and CPU locality */
2404 #define NR_NUMA_HINT_FAULT_STATS (NR_NUMA_HINT_FAULT_TYPES * 2)
2405
2406 /* Averaged statistics, and temporary buffers. */
2407 #define NR_NUMA_HINT_FAULT_BUCKETS (NR_NUMA_HINT_FAULT_STATS * 2)
2408
task_numa_group_id(struct task_struct * p)2409 pid_t task_numa_group_id(struct task_struct *p)
2410 {
2411 struct numa_group *ng;
2412 pid_t gid = 0;
2413
2414 rcu_read_lock();
2415 ng = rcu_dereference_all(p->numa_group);
2416 if (ng)
2417 gid = ng->gid;
2418 rcu_read_unlock();
2419
2420 return gid;
2421 }
2422
2423 /*
2424 * The averaged statistics, shared & private, memory & CPU,
2425 * occupy the first half of the array. The second half of the
2426 * array is for current counters, which are averaged into the
2427 * first set by task_numa_placement.
2428 */
task_faults_idx(enum numa_faults_stats s,int nid,int priv)2429 static inline int task_faults_idx(enum numa_faults_stats s, int nid, int priv)
2430 {
2431 return NR_NUMA_HINT_FAULT_TYPES * (s * nr_node_ids + nid) + priv;
2432 }
2433
task_faults(struct task_struct * p,int nid)2434 static inline unsigned long task_faults(struct task_struct *p, int nid)
2435 {
2436 if (!p->numa_faults)
2437 return 0;
2438
2439 return p->numa_faults[task_faults_idx(NUMA_MEM, nid, 0)] +
2440 p->numa_faults[task_faults_idx(NUMA_MEM, nid, 1)];
2441 }
2442
group_faults(struct task_struct * p,int nid)2443 static inline unsigned long group_faults(struct task_struct *p, int nid)
2444 {
2445 struct numa_group *ng = deref_task_numa_group(p);
2446
2447 if (!ng)
2448 return 0;
2449
2450 return ng->faults[task_faults_idx(NUMA_MEM, nid, 0)] +
2451 ng->faults[task_faults_idx(NUMA_MEM, nid, 1)];
2452 }
2453
group_faults_cpu(struct numa_group * group,int nid)2454 static inline unsigned long group_faults_cpu(struct numa_group *group, int nid)
2455 {
2456 return group->faults[task_faults_idx(NUMA_CPU, nid, 0)] +
2457 group->faults[task_faults_idx(NUMA_CPU, nid, 1)];
2458 }
2459
group_faults_priv(struct numa_group * ng)2460 static inline unsigned long group_faults_priv(struct numa_group *ng)
2461 {
2462 unsigned long faults = 0;
2463 int node;
2464
2465 for_each_online_node(node) {
2466 faults += ng->faults[task_faults_idx(NUMA_MEM, node, 1)];
2467 }
2468
2469 return faults;
2470 }
2471
group_faults_shared(struct numa_group * ng)2472 static inline unsigned long group_faults_shared(struct numa_group *ng)
2473 {
2474 unsigned long faults = 0;
2475 int node;
2476
2477 for_each_online_node(node) {
2478 faults += ng->faults[task_faults_idx(NUMA_MEM, node, 0)];
2479 }
2480
2481 return faults;
2482 }
2483
2484 /*
2485 * A node triggering more than 1/3 as many NUMA faults as the maximum is
2486 * considered part of a numa group's pseudo-interleaving set. Migrations
2487 * between these nodes are slowed down, to allow things to settle down.
2488 */
2489 #define ACTIVE_NODE_FRACTION 3
2490
numa_is_active_node(int nid,struct numa_group * ng)2491 static bool numa_is_active_node(int nid, struct numa_group *ng)
2492 {
2493 return group_faults_cpu(ng, nid) * ACTIVE_NODE_FRACTION > ng->max_faults_cpu;
2494 }
2495
2496 /* Handle placement on systems where not all nodes are directly connected. */
score_nearby_nodes(struct task_struct * p,int nid,int lim_dist,bool task)2497 static unsigned long score_nearby_nodes(struct task_struct *p, int nid,
2498 int lim_dist, bool task)
2499 {
2500 unsigned long score = 0;
2501 int node, max_dist;
2502
2503 /*
2504 * All nodes are directly connected, and the same distance
2505 * from each other. No need for fancy placement algorithms.
2506 */
2507 if (sched_numa_topology_type == NUMA_DIRECT)
2508 return 0;
2509
2510 /* sched_max_numa_distance may be changed in parallel. */
2511 max_dist = READ_ONCE(sched_max_numa_distance);
2512 /*
2513 * This code is called for each node, introducing N^2 complexity,
2514 * which should be OK given the number of nodes rarely exceeds 8.
2515 */
2516 for_each_online_node(node) {
2517 unsigned long faults;
2518 int dist = node_distance(nid, node);
2519
2520 /*
2521 * The furthest away nodes in the system are not interesting
2522 * for placement; nid was already counted.
2523 */
2524 if (dist >= max_dist || node == nid)
2525 continue;
2526
2527 /*
2528 * On systems with a backplane NUMA topology, compare groups
2529 * of nodes, and move tasks towards the group with the most
2530 * memory accesses. When comparing two nodes at distance
2531 * "hoplimit", only nodes closer by than "hoplimit" are part
2532 * of each group. Skip other nodes.
2533 */
2534 if (sched_numa_topology_type == NUMA_BACKPLANE && dist >= lim_dist)
2535 continue;
2536
2537 /* Add up the faults from nearby nodes. */
2538 if (task)
2539 faults = task_faults(p, node);
2540 else
2541 faults = group_faults(p, node);
2542
2543 /*
2544 * On systems with a glueless mesh NUMA topology, there are
2545 * no fixed "groups of nodes". Instead, nodes that are not
2546 * directly connected bounce traffic through intermediate
2547 * nodes; a numa_group can occupy any set of nodes.
2548 * The further away a node is, the less the faults count.
2549 * This seems to result in good task placement.
2550 */
2551 if (sched_numa_topology_type == NUMA_GLUELESS_MESH) {
2552 faults *= (max_dist - dist);
2553 faults /= (max_dist - LOCAL_DISTANCE);
2554 }
2555
2556 score += faults;
2557 }
2558
2559 return score;
2560 }
2561
2562 /*
2563 * These return the fraction of accesses done by a particular task, or
2564 * task group, on a particular numa node. The group weight is given a
2565 * larger multiplier, in order to group tasks together that are almost
2566 * evenly spread out between numa nodes.
2567 */
task_weight(struct task_struct * p,int nid,int dist)2568 static inline unsigned long task_weight(struct task_struct *p, int nid,
2569 int dist)
2570 {
2571 unsigned long faults, total_faults;
2572
2573 if (!p->numa_faults)
2574 return 0;
2575
2576 total_faults = p->total_numa_faults;
2577
2578 if (!total_faults)
2579 return 0;
2580
2581 faults = task_faults(p, nid);
2582 faults += score_nearby_nodes(p, nid, dist, true);
2583
2584 return 1000 * faults / total_faults;
2585 }
2586
group_weight(struct task_struct * p,int nid,int dist)2587 static inline unsigned long group_weight(struct task_struct *p, int nid,
2588 int dist)
2589 {
2590 struct numa_group *ng = deref_task_numa_group(p);
2591 unsigned long faults, total_faults;
2592
2593 if (!ng)
2594 return 0;
2595
2596 total_faults = ng->total_faults;
2597
2598 if (!total_faults)
2599 return 0;
2600
2601 faults = group_faults(p, nid);
2602 faults += score_nearby_nodes(p, nid, dist, false);
2603
2604 return 1000 * faults / total_faults;
2605 }
2606
2607 /*
2608 * If memory tiering mode is enabled, cpupid of slow memory page is
2609 * used to record scan time instead of CPU and PID. When tiering mode
2610 * is disabled at run time, the scan time (in cpupid) will be
2611 * interpreted as CPU and PID. So CPU needs to be checked to avoid to
2612 * access out of array bound.
2613 */
cpupid_valid(int cpupid)2614 static inline bool cpupid_valid(int cpupid)
2615 {
2616 return cpupid_to_cpu(cpupid) < nr_cpu_ids;
2617 }
2618
2619 /*
2620 * For memory tiering mode, if there are enough free pages (more than
2621 * enough watermark defined here) in fast memory node, to take full
2622 * advantage of fast memory capacity, all recently accessed slow
2623 * memory pages will be migrated to fast memory node without
2624 * considering hot threshold.
2625 */
pgdat_free_space_enough(struct pglist_data * pgdat)2626 static bool pgdat_free_space_enough(struct pglist_data *pgdat)
2627 {
2628 int z;
2629 unsigned long enough_wmark;
2630
2631 enough_wmark = max(1UL * 1024 * 1024 * 1024 >> PAGE_SHIFT,
2632 pgdat->node_present_pages >> 4);
2633 for (z = pgdat->nr_zones - 1; z >= 0; z--) {
2634 struct zone *zone = pgdat->node_zones + z;
2635
2636 if (!populated_zone(zone))
2637 continue;
2638
2639 if (zone_watermark_ok(zone, 0,
2640 promo_wmark_pages(zone) + enough_wmark,
2641 ZONE_MOVABLE, 0))
2642 return true;
2643 }
2644 return false;
2645 }
2646
2647 /*
2648 * For memory tiering mode, when page tables are scanned, the scan
2649 * time will be recorded in struct page in addition to make page
2650 * PROT_NONE for slow memory page. So when the page is accessed, in
2651 * hint page fault handler, the hint page fault latency is calculated
2652 * via,
2653 *
2654 * hint page fault latency = hint page fault time - scan time
2655 *
2656 * The smaller the hint page fault latency, the higher the possibility
2657 * for the page to be hot.
2658 */
numa_hint_fault_latency(struct folio * folio)2659 static int numa_hint_fault_latency(struct folio *folio)
2660 {
2661 int last_time, time;
2662
2663 time = jiffies_to_msecs(jiffies);
2664 last_time = folio_xchg_access_time(folio, time);
2665
2666 return (time - last_time) & PAGE_ACCESS_TIME_MASK;
2667 }
2668
2669 /*
2670 * For memory tiering mode, too high promotion/demotion throughput may
2671 * hurt application latency. So we provide a mechanism to rate limit
2672 * the number of pages that are tried to be promoted.
2673 */
numa_promotion_rate_limit(struct pglist_data * pgdat,unsigned long rate_limit,int nr)2674 static bool numa_promotion_rate_limit(struct pglist_data *pgdat,
2675 unsigned long rate_limit, int nr)
2676 {
2677 unsigned long nr_cand;
2678 unsigned int now, start;
2679
2680 now = jiffies_to_msecs(jiffies);
2681 mod_node_page_state(pgdat, PGPROMOTE_CANDIDATE, nr);
2682 nr_cand = node_page_state(pgdat, PGPROMOTE_CANDIDATE);
2683 start = pgdat->nbp_rl_start;
2684 if (now - start > MSEC_PER_SEC &&
2685 cmpxchg(&pgdat->nbp_rl_start, start, now) == start)
2686 pgdat->nbp_rl_nr_cand = nr_cand;
2687 if (nr_cand - pgdat->nbp_rl_nr_cand >= rate_limit)
2688 return true;
2689 return false;
2690 }
2691
2692 #define NUMA_MIGRATION_ADJUST_STEPS 16
2693
numa_promotion_adjust_threshold(struct pglist_data * pgdat,unsigned long rate_limit,unsigned int ref_th)2694 static void numa_promotion_adjust_threshold(struct pglist_data *pgdat,
2695 unsigned long rate_limit,
2696 unsigned int ref_th)
2697 {
2698 unsigned int now, start, th_period, unit_th, th;
2699 unsigned long nr_cand, ref_cand, diff_cand;
2700
2701 now = jiffies_to_msecs(jiffies);
2702 th_period = sysctl_numa_balancing_scan_period_max;
2703 start = pgdat->nbp_th_start;
2704 if (now - start > th_period &&
2705 cmpxchg(&pgdat->nbp_th_start, start, now) == start) {
2706 ref_cand = rate_limit *
2707 sysctl_numa_balancing_scan_period_max / MSEC_PER_SEC;
2708 nr_cand = node_page_state(pgdat, PGPROMOTE_CANDIDATE);
2709 diff_cand = nr_cand - pgdat->nbp_th_nr_cand;
2710 unit_th = ref_th * 2 / NUMA_MIGRATION_ADJUST_STEPS;
2711 th = pgdat->nbp_threshold ? : ref_th;
2712 if (diff_cand > ref_cand * 11 / 10)
2713 th = max(th - unit_th, unit_th);
2714 else if (diff_cand < ref_cand * 9 / 10)
2715 th = min(th + unit_th, ref_th * 2);
2716 pgdat->nbp_th_nr_cand = nr_cand;
2717 pgdat->nbp_threshold = th;
2718 }
2719 }
2720
should_numa_migrate_memory(struct task_struct * p,struct folio * folio,int src_nid,int dst_cpu)2721 bool should_numa_migrate_memory(struct task_struct *p, struct folio *folio,
2722 int src_nid, int dst_cpu)
2723 {
2724 struct numa_group *ng = deref_curr_numa_group(p);
2725 int dst_nid = cpu_to_node(dst_cpu);
2726 int last_cpupid, this_cpupid;
2727
2728 /*
2729 * Cannot migrate to memoryless nodes.
2730 */
2731 if (!node_state(dst_nid, N_MEMORY))
2732 return false;
2733
2734 /*
2735 * The pages in slow memory node should be migrated according
2736 * to hot/cold instead of private/shared.
2737 */
2738 if (folio_use_access_time(folio)) {
2739 struct pglist_data *pgdat;
2740 unsigned long rate_limit;
2741 unsigned int latency, th, def_th;
2742 long nr = folio_nr_pages(folio);
2743
2744 pgdat = NODE_DATA(dst_nid);
2745 if (pgdat_free_space_enough(pgdat)) {
2746 /* workload changed, reset hot threshold */
2747 pgdat->nbp_threshold = 0;
2748 mod_node_page_state(pgdat, PGPROMOTE_CANDIDATE_NRL, nr);
2749 return true;
2750 }
2751
2752 def_th = sysctl_numa_balancing_hot_threshold;
2753 rate_limit = MB_TO_PAGES(sysctl_numa_balancing_promote_rate_limit);
2754 numa_promotion_adjust_threshold(pgdat, rate_limit, def_th);
2755
2756 th = pgdat->nbp_threshold ? : def_th;
2757 latency = numa_hint_fault_latency(folio);
2758 if (latency >= th)
2759 return false;
2760
2761 return !numa_promotion_rate_limit(pgdat, rate_limit, nr);
2762 }
2763
2764 this_cpupid = cpu_pid_to_cpupid(dst_cpu, current->pid);
2765 last_cpupid = folio_xchg_last_cpupid(folio, this_cpupid);
2766
2767 if (!(sysctl_numa_balancing_mode & NUMA_BALANCING_MEMORY_TIERING) &&
2768 !node_is_toptier(src_nid) && !cpupid_valid(last_cpupid))
2769 return false;
2770
2771 /*
2772 * Allow first faults or private faults to migrate immediately early in
2773 * the lifetime of a task. The magic number 4 is based on waiting for
2774 * two full passes of the "multi-stage node selection" test that is
2775 * executed below.
2776 */
2777 if ((p->numa_preferred_nid == NUMA_NO_NODE || p->numa_scan_seq <= 4) &&
2778 (cpupid_pid_unset(last_cpupid) || cpupid_match_pid(p, last_cpupid)))
2779 return true;
2780
2781 /*
2782 * Multi-stage node selection is used in conjunction with a periodic
2783 * migration fault to build a temporal task<->page relation. By using
2784 * a two-stage filter we remove short/unlikely relations.
2785 *
2786 * Using P(p) ~ n_p / n_t as per frequentist probability, we can equate
2787 * a task's usage of a particular page (n_p) per total usage of this
2788 * page (n_t) (in a given time-span) to a probability.
2789 *
2790 * Our periodic faults will sample this probability and getting the
2791 * same result twice in a row, given these samples are fully
2792 * independent, is then given by P(n)^2, provided our sample period
2793 * is sufficiently short compared to the usage pattern.
2794 *
2795 * This quadric squishes small probabilities, making it less likely we
2796 * act on an unlikely task<->page relation.
2797 */
2798 if (!cpupid_pid_unset(last_cpupid) &&
2799 cpupid_to_nid(last_cpupid) != dst_nid)
2800 return false;
2801
2802 /* Always allow migrate on private faults */
2803 if (cpupid_match_pid(p, last_cpupid))
2804 return true;
2805
2806 /* A shared fault, but p->numa_group has not been set up yet. */
2807 if (!ng)
2808 return true;
2809
2810 /*
2811 * Destination node is much more heavily used than the source
2812 * node? Allow migration.
2813 */
2814 if (group_faults_cpu(ng, dst_nid) > group_faults_cpu(ng, src_nid) *
2815 ACTIVE_NODE_FRACTION)
2816 return true;
2817
2818 /*
2819 * Distribute memory according to CPU & memory use on each node,
2820 * with 3/4 hysteresis to avoid unnecessary memory migrations:
2821 *
2822 * faults_cpu(dst) 3 faults_cpu(src)
2823 * --------------- * - > ---------------
2824 * faults_mem(dst) 4 faults_mem(src)
2825 */
2826 return group_faults_cpu(ng, dst_nid) * group_faults(p, src_nid) * 3 >
2827 group_faults_cpu(ng, src_nid) * group_faults(p, dst_nid) * 4;
2828 }
2829
2830 /*
2831 * 'numa_type' describes the node at the moment of load balancing.
2832 */
2833 enum numa_type {
2834 /* The node has spare capacity that can be used to run more tasks. */
2835 node_has_spare = 0,
2836 /*
2837 * The node is fully used and the tasks don't compete for more CPU
2838 * cycles. Nevertheless, some tasks might wait before running.
2839 */
2840 node_fully_busy,
2841 /*
2842 * The node is overloaded and can't provide expected CPU cycles to all
2843 * tasks.
2844 */
2845 node_overloaded
2846 };
2847
2848 /* Cached statistics for all CPUs within a node */
2849 struct numa_stats {
2850 unsigned long load;
2851 unsigned long runnable;
2852 unsigned long util;
2853 /* Total compute capacity of CPUs on a node */
2854 unsigned long compute_capacity;
2855 unsigned int nr_running;
2856 unsigned int weight;
2857 enum numa_type node_type;
2858 int idle_cpu;
2859 };
2860
2861 struct task_numa_env {
2862 struct task_struct *p;
2863
2864 int src_cpu, src_nid;
2865 int dst_cpu, dst_nid;
2866 int imb_numa_nr;
2867
2868 struct numa_stats src_stats, dst_stats;
2869
2870 int imbalance_pct;
2871 int dist;
2872
2873 struct task_struct *best_task;
2874 long best_imp;
2875 int best_cpu;
2876 };
2877
2878 static unsigned long cpu_load(struct rq *rq);
2879 static unsigned long cpu_runnable(struct rq *rq);
2880
2881 static inline enum
numa_classify(unsigned int imbalance_pct,struct numa_stats * ns)2882 numa_type numa_classify(unsigned int imbalance_pct,
2883 struct numa_stats *ns)
2884 {
2885 if ((ns->nr_running > ns->weight) &&
2886 (((ns->compute_capacity * 100) < (ns->util * imbalance_pct)) ||
2887 ((ns->compute_capacity * imbalance_pct) < (ns->runnable * 100))))
2888 return node_overloaded;
2889
2890 if ((ns->nr_running < ns->weight) ||
2891 (((ns->compute_capacity * 100) > (ns->util * imbalance_pct)) &&
2892 ((ns->compute_capacity * imbalance_pct) > (ns->runnable * 100))))
2893 return node_has_spare;
2894
2895 return node_fully_busy;
2896 }
2897
2898 /* Forward declarations of select_idle_sibling helpers */
2899 static inline bool test_idle_cores(int cpu);
numa_idle_core(int idle_core,int cpu)2900 static inline int numa_idle_core(int idle_core, int cpu)
2901 {
2902 if (!sched_smt_active() ||
2903 idle_core >= 0 || !test_idle_cores(cpu))
2904 return idle_core;
2905
2906 /*
2907 * Prefer cores instead of packing HT siblings
2908 * and triggering future load balancing.
2909 */
2910 if (is_core_idle(cpu))
2911 idle_core = cpu;
2912
2913 return idle_core;
2914 }
2915
2916 /*
2917 * Gather all necessary information to make NUMA balancing placement
2918 * decisions that are compatible with standard load balancer. This
2919 * borrows code and logic from update_sg_lb_stats but sharing a
2920 * common implementation is impractical.
2921 */
update_numa_stats(struct task_numa_env * env,struct numa_stats * ns,int nid,bool find_idle)2922 static void update_numa_stats(struct task_numa_env *env,
2923 struct numa_stats *ns, int nid,
2924 bool find_idle)
2925 {
2926 int cpu, idle_core = -1;
2927
2928 memset(ns, 0, sizeof(*ns));
2929 ns->idle_cpu = -1;
2930
2931 rcu_read_lock();
2932 for_each_cpu(cpu, cpumask_of_node(nid)) {
2933 struct rq *rq = cpu_rq(cpu);
2934
2935 ns->load += cpu_load(rq);
2936 ns->runnable += cpu_runnable(rq);
2937 ns->util += cpu_util_cfs(cpu);
2938 ns->nr_running += rq->cfs.h_nr_runnable;
2939 ns->compute_capacity += capacity_of(cpu);
2940
2941 if (find_idle && idle_core < 0 && !rq->nr_running && idle_cpu(cpu)) {
2942 if (READ_ONCE(rq->numa_migrate_on) ||
2943 !cpumask_test_cpu(cpu, env->p->cpus_ptr))
2944 continue;
2945
2946 if (ns->idle_cpu == -1)
2947 ns->idle_cpu = cpu;
2948
2949 idle_core = numa_idle_core(idle_core, cpu);
2950 }
2951 }
2952 rcu_read_unlock();
2953
2954 ns->weight = cpumask_weight(cpumask_of_node(nid));
2955
2956 ns->node_type = numa_classify(env->imbalance_pct, ns);
2957
2958 if (idle_core >= 0)
2959 ns->idle_cpu = idle_core;
2960 }
2961
task_numa_assign(struct task_numa_env * env,struct task_struct * p,long imp)2962 static void task_numa_assign(struct task_numa_env *env,
2963 struct task_struct *p, long imp)
2964 {
2965 struct rq *rq = cpu_rq(env->dst_cpu);
2966
2967 /* Check if run-queue part of active NUMA balance. */
2968 if (env->best_cpu != env->dst_cpu && xchg(&rq->numa_migrate_on, 1)) {
2969 int cpu;
2970 int start = env->dst_cpu;
2971
2972 /* Find alternative idle CPU. */
2973 for_each_cpu_wrap(cpu, cpumask_of_node(env->dst_nid), start + 1) {
2974 if (cpu == env->best_cpu || !idle_cpu(cpu) ||
2975 !cpumask_test_cpu(cpu, env->p->cpus_ptr)) {
2976 continue;
2977 }
2978
2979 env->dst_cpu = cpu;
2980 rq = cpu_rq(env->dst_cpu);
2981 if (!xchg(&rq->numa_migrate_on, 1))
2982 goto assign;
2983 }
2984
2985 /* Failed to find an alternative idle CPU */
2986 return;
2987 }
2988
2989 assign:
2990 /*
2991 * Clear previous best_cpu/rq numa-migrate flag, since task now
2992 * found a better CPU to move/swap.
2993 */
2994 if (env->best_cpu != -1 && env->best_cpu != env->dst_cpu) {
2995 rq = cpu_rq(env->best_cpu);
2996 WRITE_ONCE(rq->numa_migrate_on, 0);
2997 }
2998
2999 if (env->best_task)
3000 put_task_struct(env->best_task);
3001 if (p)
3002 get_task_struct(p);
3003
3004 env->best_task = p;
3005 env->best_imp = imp;
3006 env->best_cpu = env->dst_cpu;
3007 }
3008
load_too_imbalanced(long src_load,long dst_load,struct task_numa_env * env)3009 static bool load_too_imbalanced(long src_load, long dst_load,
3010 struct task_numa_env *env)
3011 {
3012 long imb, old_imb;
3013 long orig_src_load, orig_dst_load;
3014 long src_capacity, dst_capacity;
3015
3016 /*
3017 * The load is corrected for the CPU capacity available on each node.
3018 *
3019 * src_load dst_load
3020 * ------------ vs ---------
3021 * src_capacity dst_capacity
3022 */
3023 src_capacity = env->src_stats.compute_capacity;
3024 dst_capacity = env->dst_stats.compute_capacity;
3025
3026 imb = abs(dst_load * src_capacity - src_load * dst_capacity);
3027
3028 orig_src_load = env->src_stats.load;
3029 orig_dst_load = env->dst_stats.load;
3030
3031 old_imb = abs(orig_dst_load * src_capacity - orig_src_load * dst_capacity);
3032
3033 /* Would this change make things worse? */
3034 return (imb > old_imb);
3035 }
3036
3037 /*
3038 * Maximum NUMA importance can be 1998 (2*999);
3039 * SMALLIMP @ 30 would be close to 1998/64.
3040 * Used to deter task migration.
3041 */
3042 #define SMALLIMP 30
3043
3044 /*
3045 * This checks if the overall compute and NUMA accesses of the system would
3046 * be improved if the source tasks was migrated to the target dst_cpu taking
3047 * into account that it might be best if task running on the dst_cpu should
3048 * be exchanged with the source task
3049 */
task_numa_compare(struct task_numa_env * env,long taskimp,long groupimp,bool maymove)3050 static bool task_numa_compare(struct task_numa_env *env,
3051 long taskimp, long groupimp, bool maymove)
3052 {
3053 struct numa_group *cur_ng, *p_ng = deref_curr_numa_group(env->p);
3054 struct rq *dst_rq = cpu_rq(env->dst_cpu);
3055 long imp = p_ng ? groupimp : taskimp;
3056 struct task_struct *cur;
3057 long src_load, dst_load;
3058 int dist = env->dist;
3059 long moveimp = imp;
3060 long load;
3061 bool stopsearch = false;
3062
3063 if (READ_ONCE(dst_rq->numa_migrate_on))
3064 return false;
3065
3066 rcu_read_lock();
3067 cur = rcu_dereference_all(dst_rq->curr);
3068 if (cur && ((cur->flags & (PF_EXITING | PF_KTHREAD)) ||
3069 !cur->mm))
3070 cur = NULL;
3071
3072 /*
3073 * Because we have preemption enabled we can get migrated around and
3074 * end try selecting ourselves (current == env->p) as a swap candidate.
3075 */
3076 if (cur == env->p) {
3077 stopsearch = true;
3078 goto unlock;
3079 }
3080
3081 if (!cur) {
3082 if (maymove && moveimp >= env->best_imp)
3083 goto assign;
3084 else
3085 goto unlock;
3086 }
3087
3088 /* Skip this swap candidate if cannot move to the source cpu. */
3089 if (!cpumask_test_cpu(env->src_cpu, cur->cpus_ptr))
3090 goto unlock;
3091
3092 /*
3093 * Skip this swap candidate if it is not moving to its preferred
3094 * node and the best task is.
3095 */
3096 if (env->best_task &&
3097 env->best_task->numa_preferred_nid == env->src_nid &&
3098 cur->numa_preferred_nid != env->src_nid) {
3099 goto unlock;
3100 }
3101
3102 /*
3103 * "imp" is the fault differential for the source task between the
3104 * source and destination node. Calculate the total differential for
3105 * the source task and potential destination task. The more negative
3106 * the value is, the more remote accesses that would be expected to
3107 * be incurred if the tasks were swapped.
3108 *
3109 * If dst and source tasks are in the same NUMA group, or not
3110 * in any group then look only at task weights.
3111 */
3112 cur_ng = rcu_dereference_all(cur->numa_group);
3113 if (cur_ng == p_ng) {
3114 /*
3115 * Do not swap within a group or between tasks that have
3116 * no group if there is spare capacity. Swapping does
3117 * not address the load imbalance and helps one task at
3118 * the cost of punishing another.
3119 */
3120 if (env->dst_stats.node_type == node_has_spare)
3121 goto unlock;
3122
3123 imp = taskimp + task_weight(cur, env->src_nid, dist) -
3124 task_weight(cur, env->dst_nid, dist);
3125 /*
3126 * Add some hysteresis to prevent swapping the
3127 * tasks within a group over tiny differences.
3128 */
3129 if (cur_ng)
3130 imp -= imp / 16;
3131 } else {
3132 /*
3133 * Compare the group weights. If a task is all by itself
3134 * (not part of a group), use the task weight instead.
3135 */
3136 if (cur_ng && p_ng)
3137 imp += group_weight(cur, env->src_nid, dist) -
3138 group_weight(cur, env->dst_nid, dist);
3139 else
3140 imp += task_weight(cur, env->src_nid, dist) -
3141 task_weight(cur, env->dst_nid, dist);
3142 }
3143
3144 /* Discourage picking a task already on its preferred node */
3145 if (cur->numa_preferred_nid == env->dst_nid)
3146 imp -= imp / 16;
3147
3148 /*
3149 * Encourage picking a task that moves to its preferred node.
3150 * This potentially makes imp larger than it's maximum of
3151 * 1998 (see SMALLIMP and task_weight for why) but in this
3152 * case, it does not matter.
3153 */
3154 if (cur->numa_preferred_nid == env->src_nid)
3155 imp += imp / 8;
3156
3157 if (maymove && moveimp > imp && moveimp > env->best_imp) {
3158 imp = moveimp;
3159 cur = NULL;
3160 goto assign;
3161 }
3162
3163 /*
3164 * Prefer swapping with a task moving to its preferred node over a
3165 * task that is not.
3166 */
3167 if (env->best_task && cur->numa_preferred_nid == env->src_nid &&
3168 env->best_task->numa_preferred_nid != env->src_nid) {
3169 goto assign;
3170 }
3171
3172 /*
3173 * If the NUMA importance is less than SMALLIMP,
3174 * task migration might only result in ping pong
3175 * of tasks and also hurt performance due to cache
3176 * misses.
3177 */
3178 if (imp < SMALLIMP || imp <= env->best_imp + SMALLIMP / 2)
3179 goto unlock;
3180
3181 /*
3182 * In the overloaded case, try and keep the load balanced.
3183 */
3184 load = task_h_load(env->p) - task_h_load(cur);
3185 if (!load)
3186 goto assign;
3187
3188 dst_load = env->dst_stats.load + load;
3189 src_load = env->src_stats.load - load;
3190
3191 if (load_too_imbalanced(src_load, dst_load, env))
3192 goto unlock;
3193
3194 assign:
3195 /* Evaluate an idle CPU for a task numa move. */
3196 if (!cur) {
3197 int cpu = env->dst_stats.idle_cpu;
3198
3199 /* Nothing cached so current CPU went idle since the search. */
3200 if (cpu < 0)
3201 cpu = env->dst_cpu;
3202
3203 /*
3204 * If the CPU is no longer truly idle and the previous best CPU
3205 * is, keep using it.
3206 */
3207 if (!idle_cpu(cpu) && env->best_cpu >= 0 &&
3208 idle_cpu(env->best_cpu)) {
3209 cpu = env->best_cpu;
3210 }
3211
3212 env->dst_cpu = cpu;
3213 }
3214
3215 task_numa_assign(env, cur, imp);
3216
3217 /*
3218 * If a move to idle is allowed because there is capacity or load
3219 * balance improves then stop the search. While a better swap
3220 * candidate may exist, a search is not free.
3221 */
3222 if (maymove && !cur && env->best_cpu >= 0 && idle_cpu(env->best_cpu))
3223 stopsearch = true;
3224
3225 /*
3226 * If a swap candidate must be identified and the current best task
3227 * moves its preferred node then stop the search.
3228 */
3229 if (!maymove && env->best_task &&
3230 env->best_task->numa_preferred_nid == env->src_nid) {
3231 stopsearch = true;
3232 }
3233 unlock:
3234 rcu_read_unlock();
3235
3236 return stopsearch;
3237 }
3238
task_numa_find_cpu(struct task_numa_env * env,long taskimp,long groupimp)3239 static void task_numa_find_cpu(struct task_numa_env *env,
3240 long taskimp, long groupimp)
3241 {
3242 bool maymove = false;
3243 int cpu;
3244
3245 /*
3246 * If dst node has spare capacity, then check if there is an
3247 * imbalance that would be overruled by the load balancer.
3248 */
3249 if (env->dst_stats.node_type == node_has_spare) {
3250 unsigned int imbalance;
3251 int src_running, dst_running;
3252
3253 /*
3254 * Would movement cause an imbalance? Note that if src has
3255 * more running tasks that the imbalance is ignored as the
3256 * move improves the imbalance from the perspective of the
3257 * CPU load balancer.
3258 * */
3259 src_running = env->src_stats.nr_running - 1;
3260 dst_running = env->dst_stats.nr_running + 1;
3261 imbalance = max(0, dst_running - src_running);
3262 imbalance = adjust_numa_imbalance(imbalance, dst_running,
3263 env->imb_numa_nr);
3264
3265 /* Use idle CPU if there is no imbalance */
3266 if (!imbalance) {
3267 maymove = true;
3268 if (env->dst_stats.idle_cpu >= 0) {
3269 env->dst_cpu = env->dst_stats.idle_cpu;
3270 task_numa_assign(env, NULL, 0);
3271 return;
3272 }
3273 }
3274 } else {
3275 long src_load, dst_load, load;
3276 /*
3277 * If the improvement from just moving env->p direction is better
3278 * than swapping tasks around, check if a move is possible.
3279 */
3280 load = task_h_load(env->p);
3281 dst_load = env->dst_stats.load + load;
3282 src_load = env->src_stats.load - load;
3283 maymove = !load_too_imbalanced(src_load, dst_load, env);
3284 }
3285
3286 /* Skip CPUs if the source task cannot migrate */
3287 for_each_cpu_and(cpu, cpumask_of_node(env->dst_nid), env->p->cpus_ptr) {
3288 env->dst_cpu = cpu;
3289 if (task_numa_compare(env, taskimp, groupimp, maymove))
3290 break;
3291 }
3292 }
3293
task_numa_migrate(struct task_struct * p)3294 static int task_numa_migrate(struct task_struct *p)
3295 {
3296 struct task_numa_env env = {
3297 .p = p,
3298
3299 .src_cpu = task_cpu(p),
3300 .src_nid = task_node(p),
3301
3302 .imbalance_pct = 112,
3303
3304 .best_task = NULL,
3305 .best_imp = 0,
3306 .best_cpu = -1,
3307 };
3308 unsigned long taskweight, groupweight;
3309 struct sched_domain *sd;
3310 long taskimp, groupimp;
3311 struct numa_group *ng;
3312 struct rq *best_rq;
3313 int nid, ret, dist;
3314
3315 /*
3316 * Pick the lowest SD_NUMA domain, as that would have the smallest
3317 * imbalance and would be the first to start moving tasks about.
3318 *
3319 * And we want to avoid any moving of tasks about, as that would create
3320 * random movement of tasks -- counter the numa conditions we're trying
3321 * to satisfy here.
3322 */
3323 rcu_read_lock();
3324 sd = rcu_dereference_all(per_cpu(sd_numa, env.src_cpu));
3325 if (sd) {
3326 env.imbalance_pct = 100 + (sd->imbalance_pct - 100) / 2;
3327 env.imb_numa_nr = sd->imb_numa_nr;
3328 }
3329 rcu_read_unlock();
3330
3331 /*
3332 * Cpusets can break the scheduler domain tree into smaller
3333 * balance domains, some of which do not cross NUMA boundaries.
3334 * Tasks that are "trapped" in such domains cannot be migrated
3335 * elsewhere, so there is no point in (re)trying.
3336 */
3337 if (unlikely(!sd)) {
3338 sched_setnuma(p, task_node(p));
3339 return -EINVAL;
3340 }
3341
3342 env.dst_nid = p->numa_preferred_nid;
3343 dist = env.dist = node_distance(env.src_nid, env.dst_nid);
3344 taskweight = task_weight(p, env.src_nid, dist);
3345 groupweight = group_weight(p, env.src_nid, dist);
3346 update_numa_stats(&env, &env.src_stats, env.src_nid, false);
3347 taskimp = task_weight(p, env.dst_nid, dist) - taskweight;
3348 groupimp = group_weight(p, env.dst_nid, dist) - groupweight;
3349 update_numa_stats(&env, &env.dst_stats, env.dst_nid, true);
3350
3351 /* Try to find a spot on the preferred nid. */
3352 task_numa_find_cpu(&env, taskimp, groupimp);
3353
3354 /*
3355 * Look at other nodes in these cases:
3356 * - there is no space available on the preferred_nid
3357 * - the task is part of a numa_group that is interleaved across
3358 * multiple NUMA nodes; in order to better consolidate the group,
3359 * we need to check other locations.
3360 */
3361 ng = deref_curr_numa_group(p);
3362 if (env.best_cpu == -1 || (ng && ng->active_nodes > 1)) {
3363 for_each_node_state(nid, N_CPU) {
3364 if (nid == env.src_nid || nid == p->numa_preferred_nid)
3365 continue;
3366
3367 dist = node_distance(env.src_nid, env.dst_nid);
3368 if (sched_numa_topology_type == NUMA_BACKPLANE &&
3369 dist != env.dist) {
3370 taskweight = task_weight(p, env.src_nid, dist);
3371 groupweight = group_weight(p, env.src_nid, dist);
3372 }
3373
3374 /* Only consider nodes where both task and groups benefit */
3375 taskimp = task_weight(p, nid, dist) - taskweight;
3376 groupimp = group_weight(p, nid, dist) - groupweight;
3377 if (taskimp < 0 && groupimp < 0)
3378 continue;
3379
3380 env.dist = dist;
3381 env.dst_nid = nid;
3382 update_numa_stats(&env, &env.dst_stats, env.dst_nid, true);
3383 task_numa_find_cpu(&env, taskimp, groupimp);
3384 }
3385 }
3386
3387 /*
3388 * If the task is part of a workload that spans multiple NUMA nodes,
3389 * and is migrating into one of the workload's active nodes, remember
3390 * this node as the task's preferred numa node, so the workload can
3391 * settle down.
3392 * A task that migrated to a second choice node will be better off
3393 * trying for a better one later. Do not set the preferred node here.
3394 */
3395 if (ng) {
3396 if (env.best_cpu == -1)
3397 nid = env.src_nid;
3398 else
3399 nid = cpu_to_node(env.best_cpu);
3400
3401 if (nid != p->numa_preferred_nid)
3402 sched_setnuma(p, nid);
3403 }
3404
3405 /* No better CPU than the current one was found. */
3406 if (env.best_cpu == -1) {
3407 trace_sched_stick_numa(p, env.src_cpu, NULL, -1);
3408 return -EAGAIN;
3409 }
3410
3411 best_rq = cpu_rq(env.best_cpu);
3412 if (env.best_task == NULL) {
3413 ret = migrate_task_to(p, env.best_cpu);
3414 WRITE_ONCE(best_rq->numa_migrate_on, 0);
3415 if (ret != 0)
3416 trace_sched_stick_numa(p, env.src_cpu, NULL, env.best_cpu);
3417 return ret;
3418 }
3419
3420 ret = migrate_swap(p, env.best_task, env.best_cpu, env.src_cpu);
3421 WRITE_ONCE(best_rq->numa_migrate_on, 0);
3422
3423 if (ret != 0)
3424 trace_sched_stick_numa(p, env.src_cpu, env.best_task, env.best_cpu);
3425 put_task_struct(env.best_task);
3426 return ret;
3427 }
3428
3429 /* Attempt to migrate a task to a CPU on the preferred node. */
numa_migrate_preferred(struct task_struct * p)3430 static void numa_migrate_preferred(struct task_struct *p)
3431 {
3432 unsigned long interval = HZ;
3433
3434 /* This task has no NUMA fault statistics yet */
3435 if (unlikely(p->numa_preferred_nid == NUMA_NO_NODE || !p->numa_faults))
3436 return;
3437
3438 /* Periodically retry migrating the task to the preferred node */
3439 interval = min(interval, msecs_to_jiffies(p->numa_scan_period) / 16);
3440 p->numa_migrate_retry = jiffies + interval;
3441
3442 /* Success if task is already running on preferred CPU */
3443 if (task_node(p) == p->numa_preferred_nid)
3444 return;
3445
3446 /* Otherwise, try migrate to a CPU on the preferred node */
3447 task_numa_migrate(p);
3448 }
3449
3450 /*
3451 * Find out how many nodes the workload is actively running on. Do this by
3452 * tracking the nodes from which NUMA hinting faults are triggered. This can
3453 * be different from the set of nodes where the workload's memory is currently
3454 * located.
3455 */
numa_group_count_active_nodes(struct numa_group * numa_group)3456 static void numa_group_count_active_nodes(struct numa_group *numa_group)
3457 {
3458 unsigned long faults, max_faults = 0;
3459 int nid, active_nodes = 0;
3460
3461 for_each_node_state(nid, N_CPU) {
3462 faults = group_faults_cpu(numa_group, nid);
3463 if (faults > max_faults)
3464 max_faults = faults;
3465 }
3466
3467 for_each_node_state(nid, N_CPU) {
3468 faults = group_faults_cpu(numa_group, nid);
3469 if (faults * ACTIVE_NODE_FRACTION > max_faults)
3470 active_nodes++;
3471 }
3472
3473 numa_group->max_faults_cpu = max_faults;
3474 numa_group->active_nodes = active_nodes;
3475 }
3476
3477 /*
3478 * When adapting the scan rate, the period is divided into NUMA_PERIOD_SLOTS
3479 * increments. The more local the fault statistics are, the higher the scan
3480 * period will be for the next scan window. If local/(local+remote) ratio is
3481 * below NUMA_PERIOD_THRESHOLD (where range of ratio is 1..NUMA_PERIOD_SLOTS)
3482 * the scan period will decrease. Aim for 70% local accesses.
3483 */
3484 #define NUMA_PERIOD_SLOTS 10
3485 #define NUMA_PERIOD_THRESHOLD 7
3486
3487 /*
3488 * Increase the scan period (slow down scanning) if the majority of
3489 * our memory is already on our local node, or if the majority of
3490 * the page accesses are shared with other processes.
3491 * Otherwise, decrease the scan period.
3492 */
update_task_scan_period(struct task_struct * p,unsigned long shared,unsigned long private)3493 static void update_task_scan_period(struct task_struct *p,
3494 unsigned long shared, unsigned long private)
3495 {
3496 unsigned int period_slot;
3497 int lr_ratio, ps_ratio;
3498 int diff;
3499
3500 unsigned long remote = p->numa_faults_locality[0];
3501 unsigned long local = p->numa_faults_locality[1];
3502
3503 /*
3504 * If there were no record hinting faults then either the task is
3505 * completely idle or all activity is in areas that are not of interest
3506 * to automatic numa balancing. Related to that, if there were failed
3507 * migration then it implies we are migrating too quickly or the local
3508 * node is overloaded. In either case, scan slower
3509 */
3510 if (local + shared == 0 || p->numa_faults_locality[2]) {
3511 p->numa_scan_period = min(p->numa_scan_period_max,
3512 p->numa_scan_period << 1);
3513
3514 p->mm->numa_next_scan = jiffies +
3515 msecs_to_jiffies(p->numa_scan_period);
3516
3517 return;
3518 }
3519
3520 /*
3521 * Prepare to scale scan period relative to the current period.
3522 * == NUMA_PERIOD_THRESHOLD scan period stays the same
3523 * < NUMA_PERIOD_THRESHOLD scan period decreases (scan faster)
3524 * >= NUMA_PERIOD_THRESHOLD scan period increases (scan slower)
3525 */
3526 period_slot = DIV_ROUND_UP(p->numa_scan_period, NUMA_PERIOD_SLOTS);
3527 lr_ratio = (local * NUMA_PERIOD_SLOTS) / (local + remote);
3528 ps_ratio = (private * NUMA_PERIOD_SLOTS) / (private + shared);
3529
3530 if (ps_ratio >= NUMA_PERIOD_THRESHOLD) {
3531 /*
3532 * Most memory accesses are local. There is no need to
3533 * do fast NUMA scanning, since memory is already local.
3534 */
3535 int slot = ps_ratio - NUMA_PERIOD_THRESHOLD;
3536 if (!slot)
3537 slot = 1;
3538 diff = slot * period_slot;
3539 } else if (lr_ratio >= NUMA_PERIOD_THRESHOLD) {
3540 /*
3541 * Most memory accesses are shared with other tasks.
3542 * There is no point in continuing fast NUMA scanning,
3543 * since other tasks may just move the memory elsewhere.
3544 */
3545 int slot = lr_ratio - NUMA_PERIOD_THRESHOLD;
3546 if (!slot)
3547 slot = 1;
3548 diff = slot * period_slot;
3549 } else {
3550 /*
3551 * Private memory faults exceed (SLOTS-THRESHOLD)/SLOTS,
3552 * yet they are not on the local NUMA node. Speed up
3553 * NUMA scanning to get the memory moved over.
3554 */
3555 int ratio = max(lr_ratio, ps_ratio);
3556 diff = -(NUMA_PERIOD_THRESHOLD - ratio) * period_slot;
3557 }
3558
3559 p->numa_scan_period = clamp(p->numa_scan_period + diff,
3560 task_scan_min(p), task_scan_max(p));
3561 memset(p->numa_faults_locality, 0, sizeof(p->numa_faults_locality));
3562 }
3563
3564 /*
3565 * Get the fraction of time the task has been running since the last
3566 * NUMA placement cycle. The scheduler keeps similar statistics, but
3567 * decays those on a 32ms period, which is orders of magnitude off
3568 * from the dozens-of-seconds NUMA balancing period. Use the scheduler
3569 * stats only if the task is so new there are no NUMA statistics yet.
3570 */
numa_get_avg_runtime(struct task_struct * p,u64 * period)3571 static u64 numa_get_avg_runtime(struct task_struct *p, u64 *period)
3572 {
3573 u64 runtime, delta, now;
3574 /* Use the start of this time slice to avoid calculations. */
3575 now = p->se.exec_start;
3576 runtime = p->se.sum_exec_runtime;
3577
3578 if (p->last_task_numa_placement) {
3579 delta = runtime - p->last_sum_exec_runtime;
3580 *period = now - p->last_task_numa_placement;
3581
3582 /* Avoid time going backwards, prevent potential divide error: */
3583 if (unlikely((s64)*period < 0))
3584 *period = 0;
3585 } else {
3586 delta = p->se.avg.load_sum;
3587 *period = LOAD_AVG_MAX;
3588 }
3589
3590 p->last_sum_exec_runtime = runtime;
3591 p->last_task_numa_placement = now;
3592
3593 return delta;
3594 }
3595
3596 /*
3597 * Determine the preferred nid for a task in a numa_group. This needs to
3598 * be done in a way that produces consistent results with group_weight,
3599 * otherwise workloads might not converge.
3600 */
preferred_group_nid(struct task_struct * p,int nid)3601 static int preferred_group_nid(struct task_struct *p, int nid)
3602 {
3603 nodemask_t nodes;
3604 int dist;
3605
3606 /* Direct connections between all NUMA nodes. */
3607 if (sched_numa_topology_type == NUMA_DIRECT)
3608 return nid;
3609
3610 /*
3611 * On a system with glueless mesh NUMA topology, group_weight
3612 * scores nodes according to the number of NUMA hinting faults on
3613 * both the node itself, and on nearby nodes.
3614 */
3615 if (sched_numa_topology_type == NUMA_GLUELESS_MESH) {
3616 unsigned long score, max_score = 0;
3617 int node, max_node = nid;
3618
3619 dist = sched_max_numa_distance;
3620
3621 for_each_node_state(node, N_CPU) {
3622 score = group_weight(p, node, dist);
3623 if (score > max_score) {
3624 max_score = score;
3625 max_node = node;
3626 }
3627 }
3628 return max_node;
3629 }
3630
3631 /*
3632 * Finding the preferred nid in a system with NUMA backplane
3633 * interconnect topology is more involved. The goal is to locate
3634 * tasks from numa_groups near each other in the system, and
3635 * untangle workloads from different sides of the system. This requires
3636 * searching down the hierarchy of node groups, recursively searching
3637 * inside the highest scoring group of nodes. The nodemask tricks
3638 * keep the complexity of the search down.
3639 */
3640 nodes = node_states[N_CPU];
3641 for (dist = sched_max_numa_distance; dist > LOCAL_DISTANCE; dist--) {
3642 unsigned long max_faults = 0;
3643 nodemask_t max_group = NODE_MASK_NONE;
3644 int a, b;
3645
3646 /* Are there nodes at this distance from each other? */
3647 if (!find_numa_distance(dist))
3648 continue;
3649
3650 for_each_node_mask(a, nodes) {
3651 unsigned long faults = 0;
3652 nodemask_t this_group;
3653 nodes_clear(this_group);
3654
3655 /* Sum group's NUMA faults; includes a==b case. */
3656 for_each_node_mask(b, nodes) {
3657 if (node_distance(a, b) < dist) {
3658 faults += group_faults(p, b);
3659 node_set(b, this_group);
3660 node_clear(b, nodes);
3661 }
3662 }
3663
3664 /* Remember the top group. */
3665 if (faults > max_faults) {
3666 max_faults = faults;
3667 max_group = this_group;
3668 /*
3669 * subtle: at the smallest distance there is
3670 * just one node left in each "group", the
3671 * winner is the preferred nid.
3672 */
3673 nid = a;
3674 }
3675 }
3676 /* Next round, evaluate the nodes within max_group. */
3677 if (!max_faults)
3678 break;
3679 nodes = max_group;
3680 }
3681 return nid;
3682 }
3683
task_numa_placement(struct task_struct * p)3684 static void task_numa_placement(struct task_struct *p)
3685 __context_unsafe(/* conditional locking */)
3686 {
3687 int seq, nid, max_nid = NUMA_NO_NODE;
3688 unsigned long max_faults = 0;
3689 unsigned long fault_types[2] = { 0, 0 };
3690 unsigned long total_faults;
3691 u64 runtime, period;
3692 spinlock_t *group_lock = NULL;
3693 long __maybe_unused new_fp;
3694 struct numa_group *ng;
3695
3696 /*
3697 * The p->mm->numa_scan_seq field gets updated without
3698 * exclusive access. Use READ_ONCE() here to ensure
3699 * that the field is read in a single access:
3700 */
3701 seq = READ_ONCE(p->mm->numa_scan_seq);
3702 if (p->numa_scan_seq == seq)
3703 return;
3704 p->numa_scan_seq = seq;
3705 p->numa_scan_period_max = task_scan_max(p);
3706
3707 total_faults = p->numa_faults_locality[0] +
3708 p->numa_faults_locality[1];
3709 runtime = numa_get_avg_runtime(p, &period);
3710
3711 /* If the task is part of a group prevent parallel updates to group stats */
3712 ng = deref_curr_numa_group(p);
3713 if (ng) {
3714 group_lock = &ng->lock;
3715 spin_lock_irq(group_lock);
3716 }
3717
3718 /* Find the node with the highest number of faults */
3719 for_each_online_node(nid) {
3720 /* Keep track of the offsets in numa_faults array */
3721 int mem_idx, membuf_idx, cpu_idx, cpubuf_idx;
3722 unsigned long faults = 0, group_faults = 0;
3723 int priv;
3724
3725 for (priv = 0; priv < NR_NUMA_HINT_FAULT_TYPES; priv++) {
3726 long diff, f_diff, f_weight;
3727
3728 mem_idx = task_faults_idx(NUMA_MEM, nid, priv);
3729 membuf_idx = task_faults_idx(NUMA_MEMBUF, nid, priv);
3730 cpu_idx = task_faults_idx(NUMA_CPU, nid, priv);
3731 cpubuf_idx = task_faults_idx(NUMA_CPUBUF, nid, priv);
3732
3733 /* Decay existing window, copy faults since last scan */
3734 diff = p->numa_faults[membuf_idx] - p->numa_faults[mem_idx] / 2;
3735 fault_types[priv] += p->numa_faults[membuf_idx];
3736 p->numa_faults[membuf_idx] = 0;
3737
3738 /*
3739 * Normalize the faults_from, so all tasks in a group
3740 * count according to CPU use, instead of by the raw
3741 * number of faults. Tasks with little runtime have
3742 * little over-all impact on throughput, and thus their
3743 * faults are less important.
3744 */
3745 f_weight = div64_u64(runtime << 16, period + 1);
3746 f_weight = (f_weight * p->numa_faults[cpubuf_idx]) /
3747 (total_faults + 1);
3748 f_diff = f_weight - p->numa_faults[cpu_idx] / 2;
3749 p->numa_faults[cpubuf_idx] = 0;
3750
3751 p->numa_faults[mem_idx] += diff;
3752 p->numa_faults[cpu_idx] += f_diff;
3753 faults += p->numa_faults[mem_idx];
3754 p->total_numa_faults += diff;
3755 if (ng) {
3756 /*
3757 * safe because we can only change our own group
3758 *
3759 * mem_idx represents the offset for a given
3760 * nid and priv in a specific region because it
3761 * is at the beginning of the numa_faults array.
3762 */
3763 ng->faults[mem_idx] += diff;
3764 ng->faults[cpu_idx] += f_diff;
3765 ng->total_faults += diff;
3766 group_faults += ng->faults[mem_idx];
3767 }
3768 #ifdef CONFIG_SCHED_CACHE
3769 /*
3770 * Per task p->numa_faults[mem_idx] converges,
3771 * so the accumulation of each task's faults
3772 * converges too - Given the number of threads,
3773 * it cannot overflow an unsigned long.
3774 * Racy with concurrent updates from other threads
3775 * sharing this mm. Acceptable since footprint is a
3776 * heuristic and occasional lost updates are tolerable.
3777 *
3778 * If a task exits, its corresponding footprint must
3779 * be subtracted from the mm->sc_stat.footprint, otherwise
3780 * the mm->sc_stat.footprint will not converge:
3781 * the exiting thread's footprint remains unchanged/undecayed
3782 * in mm->sc_stat.footprint. See exit_mm().
3783 *
3784 * Lost updates and unsynchronized subtraction
3785 * in exit_mm() can cause footprint + diff to
3786 * go negative. Clamp to zero to prevent the
3787 * unsigned footprint from wrapping.
3788 */
3789 new_fp = (long)READ_ONCE(p->mm->sc_stat.footprint) + diff;
3790 WRITE_ONCE(p->mm->sc_stat.footprint,
3791 max(new_fp, 0L));
3792 #endif
3793 }
3794
3795 if (!ng) {
3796 if (faults > max_faults) {
3797 max_faults = faults;
3798 max_nid = nid;
3799 }
3800 } else if (group_faults > max_faults) {
3801 max_faults = group_faults;
3802 max_nid = nid;
3803 }
3804 }
3805
3806 /* Cannot migrate task to CPU-less node */
3807 max_nid = numa_nearest_node(max_nid, N_CPU);
3808
3809 if (ng) {
3810 numa_group_count_active_nodes(ng);
3811 spin_unlock_irq(group_lock);
3812 max_nid = preferred_group_nid(p, max_nid);
3813 }
3814
3815 if (max_faults) {
3816 /* Set the new preferred node */
3817 if (max_nid != p->numa_preferred_nid)
3818 sched_setnuma(p, max_nid);
3819 }
3820
3821 update_task_scan_period(p, fault_types[0], fault_types[1]);
3822 }
3823
get_numa_group(struct numa_group * grp)3824 static inline int get_numa_group(struct numa_group *grp)
3825 {
3826 return refcount_inc_not_zero(&grp->refcount);
3827 }
3828
put_numa_group(struct numa_group * grp)3829 static inline void put_numa_group(struct numa_group *grp)
3830 {
3831 if (refcount_dec_and_test(&grp->refcount))
3832 kfree_rcu(grp, rcu);
3833 }
3834
task_numa_group(struct task_struct * p,int cpupid,int flags,int * priv)3835 static void task_numa_group(struct task_struct *p, int cpupid, int flags,
3836 int *priv)
3837 {
3838 struct numa_group *grp, *my_grp;
3839 struct task_struct *tsk;
3840 bool join = false;
3841 int cpu = cpupid_to_cpu(cpupid);
3842 int i;
3843
3844 if (unlikely(!deref_curr_numa_group(p))) {
3845 unsigned int size = sizeof(struct numa_group) +
3846 NR_NUMA_HINT_FAULT_STATS *
3847 nr_node_ids * sizeof(unsigned long);
3848
3849 grp = kzalloc(size, GFP_KERNEL | __GFP_NOWARN);
3850 if (!grp)
3851 return;
3852
3853 refcount_set(&grp->refcount, 1);
3854 grp->active_nodes = 1;
3855 grp->max_faults_cpu = 0;
3856 spin_lock_init(&grp->lock);
3857 grp->gid = p->pid;
3858
3859 for (i = 0; i < NR_NUMA_HINT_FAULT_STATS * nr_node_ids; i++)
3860 grp->faults[i] = p->numa_faults[i];
3861
3862 grp->total_faults = p->total_numa_faults;
3863
3864 grp->nr_tasks++;
3865 rcu_assign_pointer(p->numa_group, grp);
3866 }
3867
3868 rcu_read_lock();
3869 tsk = READ_ONCE(cpu_rq(cpu)->curr);
3870
3871 if (!cpupid_match_pid(tsk, cpupid))
3872 goto no_join;
3873
3874 grp = rcu_dereference_all(tsk->numa_group);
3875 if (!grp)
3876 goto no_join;
3877
3878 my_grp = deref_curr_numa_group(p);
3879 if (grp == my_grp)
3880 goto no_join;
3881
3882 /*
3883 * Only join the other group if its bigger; if we're the bigger group,
3884 * the other task will join us.
3885 */
3886 if (my_grp->nr_tasks > grp->nr_tasks)
3887 goto no_join;
3888
3889 /*
3890 * Tie-break on the grp address.
3891 */
3892 if (my_grp->nr_tasks == grp->nr_tasks && my_grp > grp)
3893 goto no_join;
3894
3895 /* Always join threads in the same process. */
3896 if (tsk->mm == current->mm)
3897 join = true;
3898
3899 /* Simple filter to avoid false positives due to PID collisions */
3900 if (flags & TNF_SHARED)
3901 join = true;
3902
3903 /* Update priv based on whether false sharing was detected */
3904 *priv = !join;
3905
3906 if (join && !get_numa_group(grp))
3907 goto no_join;
3908
3909 rcu_read_unlock();
3910
3911 if (!join)
3912 return;
3913
3914 WARN_ON_ONCE(irqs_disabled());
3915 double_lock_irq(&my_grp->lock, &grp->lock);
3916
3917 for (i = 0; i < NR_NUMA_HINT_FAULT_STATS * nr_node_ids; i++) {
3918 my_grp->faults[i] -= p->numa_faults[i];
3919 grp->faults[i] += p->numa_faults[i];
3920 }
3921 my_grp->total_faults -= p->total_numa_faults;
3922 grp->total_faults += p->total_numa_faults;
3923
3924 my_grp->nr_tasks--;
3925 grp->nr_tasks++;
3926
3927 spin_unlock(&my_grp->lock);
3928 spin_unlock_irq(&grp->lock);
3929
3930 rcu_assign_pointer(p->numa_group, grp);
3931
3932 put_numa_group(my_grp);
3933 return;
3934
3935 no_join:
3936 rcu_read_unlock();
3937 return;
3938 }
3939
3940 /*
3941 * Get rid of NUMA statistics associated with a task (either current or dead).
3942 * If @final is set, the task is dead and has reached refcount zero, so we can
3943 * safely free all relevant data structures. Otherwise, there might be
3944 * concurrent reads from places like load balancing and procfs, and we should
3945 * reset the data back to default state without freeing ->numa_faults.
3946 */
task_numa_free(struct task_struct * p,bool final)3947 void task_numa_free(struct task_struct *p, bool final)
3948 {
3949 /* safe: p either is current or is being freed by current */
3950 struct numa_group *grp = rcu_dereference_raw(p->numa_group);
3951 unsigned long *numa_faults = p->numa_faults;
3952 unsigned long flags;
3953 int i;
3954
3955 if (!numa_faults)
3956 return;
3957
3958 if (grp) {
3959 spin_lock_irqsave(&grp->lock, flags);
3960 for (i = 0; i < NR_NUMA_HINT_FAULT_STATS * nr_node_ids; i++)
3961 grp->faults[i] -= p->numa_faults[i];
3962 grp->total_faults -= p->total_numa_faults;
3963
3964 grp->nr_tasks--;
3965 spin_unlock_irqrestore(&grp->lock, flags);
3966 RCU_INIT_POINTER(p->numa_group, NULL);
3967 put_numa_group(grp);
3968 }
3969
3970 if (final) {
3971 p->numa_faults = NULL;
3972 kfree(numa_faults);
3973 } else {
3974 p->total_numa_faults = 0;
3975 for (i = 0; i < NR_NUMA_HINT_FAULT_STATS * nr_node_ids; i++)
3976 numa_faults[i] = 0;
3977 }
3978 }
3979
3980 /*
3981 * Got a PROT_NONE fault for a page on @node.
3982 */
task_numa_fault(int last_cpupid,int mem_node,int pages,int flags)3983 void task_numa_fault(int last_cpupid, int mem_node, int pages, int flags)
3984 {
3985 struct task_struct *p = current;
3986 bool migrated = flags & TNF_MIGRATED;
3987 int cpu_node = task_node(current);
3988 int local = !!(flags & TNF_FAULT_LOCAL);
3989 struct numa_group *ng;
3990 int priv;
3991
3992 if (!static_branch_likely(&sched_numa_balancing))
3993 return;
3994
3995 /* for example, ksmd faulting in a user's mm */
3996 if (!p->mm)
3997 return;
3998
3999 /*
4000 * NUMA faults statistics are unnecessary for the slow memory
4001 * node for memory tiering mode.
4002 */
4003 if (!node_is_toptier(mem_node) &&
4004 (sysctl_numa_balancing_mode & NUMA_BALANCING_MEMORY_TIERING ||
4005 !cpupid_valid(last_cpupid)))
4006 return;
4007
4008 /* Allocate buffer to track faults on a per-node basis */
4009 if (unlikely(!p->numa_faults)) {
4010 int size = sizeof(*p->numa_faults) *
4011 NR_NUMA_HINT_FAULT_BUCKETS * nr_node_ids;
4012
4013 p->numa_faults = kzalloc(size, GFP_KERNEL|__GFP_NOWARN);
4014 if (!p->numa_faults)
4015 return;
4016
4017 p->total_numa_faults = 0;
4018 memset(p->numa_faults_locality, 0, sizeof(p->numa_faults_locality));
4019 }
4020
4021 /*
4022 * First accesses are treated as private, otherwise consider accesses
4023 * to be private if the accessing pid has not changed
4024 */
4025 if (unlikely(last_cpupid == (-1 & LAST_CPUPID_MASK))) {
4026 priv = 1;
4027 } else {
4028 priv = cpupid_match_pid(p, last_cpupid);
4029 if (!priv && !(flags & TNF_NO_GROUP))
4030 task_numa_group(p, last_cpupid, flags, &priv);
4031 }
4032
4033 /*
4034 * If a workload spans multiple NUMA nodes, a shared fault that
4035 * occurs wholly within the set of nodes that the workload is
4036 * actively using should be counted as local. This allows the
4037 * scan rate to slow down when a workload has settled down.
4038 */
4039 ng = deref_curr_numa_group(p);
4040 if (!priv && !local && ng && ng->active_nodes > 1 &&
4041 numa_is_active_node(cpu_node, ng) &&
4042 numa_is_active_node(mem_node, ng))
4043 local = 1;
4044
4045 /*
4046 * Retry to migrate task to preferred node periodically, in case it
4047 * previously failed, or the scheduler moved us.
4048 */
4049 if (time_after(jiffies, p->numa_migrate_retry)) {
4050 task_numa_placement(p);
4051 numa_migrate_preferred(p);
4052 }
4053
4054 if (migrated)
4055 p->numa_pages_migrated += pages;
4056 if (flags & TNF_MIGRATE_FAIL)
4057 p->numa_faults_locality[2] += pages;
4058
4059 p->numa_faults[task_faults_idx(NUMA_MEMBUF, mem_node, priv)] += pages;
4060 p->numa_faults[task_faults_idx(NUMA_CPUBUF, cpu_node, priv)] += pages;
4061 p->numa_faults_locality[local] += pages;
4062 }
4063
reset_ptenuma_scan(struct task_struct * p)4064 static void reset_ptenuma_scan(struct task_struct *p)
4065 {
4066 /*
4067 * We only did a read acquisition of the mmap sem, so
4068 * p->mm->numa_scan_seq is written to without exclusive access
4069 * and the update is not guaranteed to be atomic. That's not
4070 * much of an issue though, since this is just used for
4071 * statistical sampling. Use READ_ONCE/WRITE_ONCE, which are not
4072 * expensive, to avoid any form of compiler optimizations:
4073 */
4074 WRITE_ONCE(p->mm->numa_scan_seq, READ_ONCE(p->mm->numa_scan_seq) + 1);
4075 p->mm->numa_scan_offset = 0;
4076 }
4077
vma_is_accessed(struct mm_struct * mm,struct vm_area_struct * vma)4078 static bool vma_is_accessed(struct mm_struct *mm, struct vm_area_struct *vma)
4079 {
4080 unsigned long pids;
4081 /*
4082 * Allow unconditional access first two times, so that all the (pages)
4083 * of VMAs get prot_none fault introduced irrespective of accesses.
4084 * This is also done to avoid any side effect of task scanning
4085 * amplifying the unfairness of disjoint set of VMAs' access.
4086 */
4087 if ((READ_ONCE(current->mm->numa_scan_seq) - vma->numab_state->start_scan_seq) < 2)
4088 return true;
4089
4090 pids = vma->numab_state->pids_active[0] | vma->numab_state->pids_active[1];
4091 if (test_bit(hash_32(current->pid, ilog2(BITS_PER_LONG)), &pids))
4092 return true;
4093
4094 /*
4095 * Complete a scan that has already started regardless of PID access, or
4096 * some VMAs may never be scanned in multi-threaded applications:
4097 */
4098 if (mm->numa_scan_offset > vma->vm_start) {
4099 trace_sched_skip_vma_numa(mm, vma, NUMAB_SKIP_IGNORE_PID);
4100 return true;
4101 }
4102
4103 /*
4104 * This vma has not been accessed for a while, and if the number
4105 * the threads in the same process is low, which means no other
4106 * threads can help scan this vma, force a vma scan.
4107 */
4108 if (READ_ONCE(mm->numa_scan_seq) >
4109 (vma->numab_state->prev_scan_seq + get_nr_threads(current)))
4110 return true;
4111
4112 return false;
4113 }
4114
4115 #define VMA_PID_RESET_PERIOD (4 * sysctl_numa_balancing_scan_delay)
4116
4117 /*
4118 * The expensive part of numa migration is done from task_work context.
4119 * Triggered from task_tick_numa().
4120 */
task_numa_work(struct callback_head * work)4121 static void task_numa_work(struct callback_head *work)
4122 {
4123 unsigned long migrate, next_scan, now = jiffies;
4124 struct task_struct *p = current;
4125 struct mm_struct *mm = p->mm;
4126 u64 runtime = p->se.sum_exec_runtime;
4127 struct vm_area_struct *vma;
4128 unsigned long start, end;
4129 unsigned long nr_pte_updates = 0;
4130 long pages, virtpages;
4131 struct vma_iterator vmi;
4132 bool vma_pids_skipped;
4133 bool vma_pids_forced = false;
4134
4135 WARN_ON_ONCE(p != container_of(work, struct task_struct, numa_work));
4136
4137 work->next = work;
4138 /*
4139 * Who cares about NUMA placement when they're dying.
4140 *
4141 * NOTE: make sure not to dereference p->mm before this check,
4142 * exit_task_work() happens _after_ exit_mm() so we could be called
4143 * without p->mm even though we still had it when we enqueued this
4144 * work.
4145 */
4146 if (p->flags & PF_EXITING)
4147 return;
4148
4149 /*
4150 * Memory is pinned to only one NUMA node via cpuset.mems, naturally
4151 * no page can be migrated.
4152 */
4153 if (cpusets_enabled() && nodes_weight(cpuset_current_mems_allowed) == 1) {
4154 trace_sched_skip_cpuset_numa(current, &cpuset_current_mems_allowed);
4155 return;
4156 }
4157
4158 if (!mm->numa_next_scan) {
4159 mm->numa_next_scan = now +
4160 msecs_to_jiffies(sysctl_numa_balancing_scan_delay);
4161 }
4162
4163 /*
4164 * Enforce maximal scan/migration frequency..
4165 */
4166 migrate = mm->numa_next_scan;
4167 if (time_before(now, migrate))
4168 return;
4169
4170 if (p->numa_scan_period == 0) {
4171 p->numa_scan_period_max = task_scan_max(p);
4172 p->numa_scan_period = task_scan_start(p);
4173 }
4174
4175 next_scan = now + msecs_to_jiffies(p->numa_scan_period);
4176 if (!try_cmpxchg(&mm->numa_next_scan, &migrate, next_scan))
4177 return;
4178
4179 /*
4180 * Delay this task enough that another task of this mm will likely win
4181 * the next time around.
4182 */
4183 p->node_stamp += 2 * TICK_NSEC;
4184
4185 pages = sysctl_numa_balancing_scan_size;
4186 pages <<= 20 - PAGE_SHIFT; /* MB in pages */
4187 virtpages = pages * 8; /* Scan up to this much virtual space */
4188 if (!pages)
4189 return;
4190
4191
4192 if (!mmap_read_trylock(mm))
4193 return;
4194
4195 /*
4196 * VMAs are skipped if the current PID has not trapped a fault within
4197 * the VMA recently. Allow scanning to be forced if there is no
4198 * suitable VMA remaining.
4199 */
4200 vma_pids_skipped = false;
4201
4202 retry_pids:
4203 start = mm->numa_scan_offset;
4204 vma_iter_init(&vmi, mm, start);
4205 vma = vma_next(&vmi);
4206 if (!vma) {
4207 reset_ptenuma_scan(p);
4208 start = 0;
4209 vma_iter_set(&vmi, start);
4210 vma = vma_next(&vmi);
4211 }
4212
4213 for (; vma; vma = vma_next(&vmi)) {
4214 if (!vma_migratable(vma) || !vma_policy_mof(vma) ||
4215 is_vm_hugetlb_page(vma) || (vma->vm_flags & VM_MIXEDMAP)) {
4216 trace_sched_skip_vma_numa(mm, vma, NUMAB_SKIP_UNSUITABLE);
4217 continue;
4218 }
4219
4220 /*
4221 * Shared library pages mapped by multiple processes are not
4222 * migrated as it is expected they are cache replicated. Avoid
4223 * hinting faults in read-only file-backed mappings or the vDSO
4224 * as migrating the pages will be of marginal benefit.
4225 */
4226 if (!vma->vm_mm ||
4227 (vma->vm_file && (vma->vm_flags & (VM_READ|VM_WRITE)) == (VM_READ))) {
4228 trace_sched_skip_vma_numa(mm, vma, NUMAB_SKIP_SHARED_RO);
4229 continue;
4230 }
4231
4232 /*
4233 * Skip inaccessible VMAs to avoid any confusion between
4234 * PROT_NONE and NUMA hinting PTEs
4235 */
4236 if (!vma_is_accessible(vma)) {
4237 trace_sched_skip_vma_numa(mm, vma, NUMAB_SKIP_INACCESSIBLE);
4238 continue;
4239 }
4240
4241 /* Initialise new per-VMA NUMAB state. */
4242 if (!vma->numab_state) {
4243 struct vma_numab_state *ptr;
4244
4245 ptr = kzalloc_obj(*ptr);
4246 if (!ptr)
4247 continue;
4248
4249 if (cmpxchg(&vma->numab_state, NULL, ptr)) {
4250 kfree(ptr);
4251 continue;
4252 }
4253
4254 vma->numab_state->start_scan_seq = mm->numa_scan_seq;
4255
4256 vma->numab_state->next_scan = now +
4257 msecs_to_jiffies(sysctl_numa_balancing_scan_delay);
4258
4259 /* Reset happens after 4 times scan delay of scan start */
4260 vma->numab_state->pids_active_reset = vma->numab_state->next_scan +
4261 msecs_to_jiffies(VMA_PID_RESET_PERIOD);
4262
4263 /*
4264 * Ensure prev_scan_seq does not match numa_scan_seq,
4265 * to prevent VMAs being skipped prematurely on the
4266 * first scan:
4267 */
4268 vma->numab_state->prev_scan_seq = mm->numa_scan_seq - 1;
4269 }
4270
4271 /*
4272 * Scanning the VMAs of short lived tasks add more overhead. So
4273 * delay the scan for new VMAs.
4274 */
4275 if (mm->numa_scan_seq && time_before(jiffies,
4276 vma->numab_state->next_scan)) {
4277 trace_sched_skip_vma_numa(mm, vma, NUMAB_SKIP_SCAN_DELAY);
4278 continue;
4279 }
4280
4281 /* RESET access PIDs regularly for old VMAs. */
4282 if (mm->numa_scan_seq &&
4283 time_after(jiffies, vma->numab_state->pids_active_reset)) {
4284 vma->numab_state->pids_active_reset = vma->numab_state->pids_active_reset +
4285 msecs_to_jiffies(VMA_PID_RESET_PERIOD);
4286 vma->numab_state->pids_active[0] = READ_ONCE(vma->numab_state->pids_active[1]);
4287 vma->numab_state->pids_active[1] = 0;
4288 }
4289
4290 /* Do not rescan VMAs twice within the same sequence. */
4291 if (vma->numab_state->prev_scan_seq == mm->numa_scan_seq) {
4292 mm->numa_scan_offset = vma->vm_end;
4293 trace_sched_skip_vma_numa(mm, vma, NUMAB_SKIP_SEQ_COMPLETED);
4294 continue;
4295 }
4296
4297 /*
4298 * Do not scan the VMA if task has not accessed it, unless no other
4299 * VMA candidate exists.
4300 */
4301 if (!vma_pids_forced && !vma_is_accessed(mm, vma)) {
4302 vma_pids_skipped = true;
4303 trace_sched_skip_vma_numa(mm, vma, NUMAB_SKIP_PID_INACTIVE);
4304 continue;
4305 }
4306
4307 do {
4308 start = max(start, vma->vm_start);
4309 end = ALIGN(start + (pages << PAGE_SHIFT), HPAGE_SIZE);
4310 end = min(end, vma->vm_end);
4311 nr_pte_updates = change_prot_numa(vma, start, end);
4312
4313 /*
4314 * Try to scan sysctl_numa_balancing_size worth of
4315 * hpages that have at least one present PTE that
4316 * is not already PTE-numa. If the VMA contains
4317 * areas that are unused or already full of prot_numa
4318 * PTEs, scan up to virtpages, to skip through those
4319 * areas faster.
4320 */
4321 if (nr_pte_updates)
4322 pages -= (end - start) >> PAGE_SHIFT;
4323 virtpages -= (end - start) >> PAGE_SHIFT;
4324
4325 start = end;
4326 if (pages <= 0 || virtpages <= 0)
4327 goto out;
4328
4329 cond_resched();
4330 } while (end != vma->vm_end);
4331
4332 /* VMA scan is complete, do not scan until next sequence. */
4333 vma->numab_state->prev_scan_seq = mm->numa_scan_seq;
4334
4335 /*
4336 * Only force scan within one VMA at a time, to limit the
4337 * cost of scanning a potentially uninteresting VMA.
4338 */
4339 if (vma_pids_forced)
4340 break;
4341 }
4342
4343 /*
4344 * If no VMAs are remaining and VMAs were skipped due to the PID
4345 * not accessing the VMA previously, then force a scan to ensure
4346 * forward progress:
4347 */
4348 if (!vma && !vma_pids_forced && vma_pids_skipped) {
4349 vma_pids_forced = true;
4350 goto retry_pids;
4351 }
4352
4353 out:
4354 /*
4355 * It is possible to reach the end of the VMA list but the last few
4356 * VMAs are not guaranteed to the vma_migratable. If they are not, we
4357 * would find the !migratable VMA on the next scan but not reset the
4358 * scanner to the start so check it now.
4359 */
4360 if (vma)
4361 mm->numa_scan_offset = start;
4362 else
4363 reset_ptenuma_scan(p);
4364 mmap_read_unlock(mm);
4365
4366 /*
4367 * Make sure tasks use at least 32x as much time to run other code
4368 * than they used here, to limit NUMA PTE scanning overhead to 3% max.
4369 * Usually update_task_scan_period slows down scanning enough; on an
4370 * overloaded system we need to limit overhead on a per task basis.
4371 */
4372 if (unlikely(p->se.sum_exec_runtime != runtime)) {
4373 u64 diff = p->se.sum_exec_runtime - runtime;
4374 p->node_stamp += 32 * diff;
4375 }
4376 }
4377
init_numa_balancing(u64 clone_flags,struct task_struct * p)4378 void init_numa_balancing(u64 clone_flags, struct task_struct *p)
4379 {
4380 int mm_users = 0;
4381 struct mm_struct *mm = p->mm;
4382
4383 if (mm) {
4384 mm_users = atomic_read(&mm->mm_users);
4385 if (mm_users == 1) {
4386 mm->numa_next_scan = jiffies + msecs_to_jiffies(sysctl_numa_balancing_scan_delay);
4387 mm->numa_scan_seq = 0;
4388 }
4389 }
4390 p->node_stamp = 0;
4391 p->numa_scan_seq = mm ? mm->numa_scan_seq : 0;
4392 p->numa_scan_period = sysctl_numa_balancing_scan_delay;
4393 p->numa_migrate_retry = 0;
4394 /* Protect against double add, see task_tick_numa and task_numa_work */
4395 p->numa_work.next = &p->numa_work;
4396 p->numa_faults = NULL;
4397 p->numa_pages_migrated = 0;
4398 p->total_numa_faults = 0;
4399 RCU_INIT_POINTER(p->numa_group, NULL);
4400 p->last_task_numa_placement = 0;
4401 p->last_sum_exec_runtime = 0;
4402
4403 init_task_work(&p->numa_work, task_numa_work);
4404
4405 /* New address space, reset the preferred nid */
4406 if (!(clone_flags & CLONE_VM)) {
4407 p->numa_preferred_nid = NUMA_NO_NODE;
4408 return;
4409 }
4410
4411 /*
4412 * New thread, keep existing numa_preferred_nid which should be copied
4413 * already by arch_dup_task_struct but stagger when scans start.
4414 */
4415 if (mm) {
4416 unsigned int delay;
4417
4418 delay = min_t(unsigned int, task_scan_max(current),
4419 current->numa_scan_period * mm_users * NSEC_PER_MSEC);
4420 delay += 2 * TICK_NSEC;
4421 p->node_stamp = delay;
4422 }
4423 }
4424
4425 /*
4426 * Drive the periodic memory faults..
4427 */
task_tick_numa(struct rq * rq,struct task_struct * curr)4428 static void task_tick_numa(struct rq *rq, struct task_struct *curr)
4429 {
4430 struct callback_head *work = &curr->numa_work;
4431 u64 period, now;
4432
4433 /*
4434 * We don't care about NUMA placement if we don't have memory.
4435 */
4436 if (!curr->mm || (curr->flags & (PF_EXITING | PF_KTHREAD)) || work->next != work)
4437 return;
4438
4439 /*
4440 * Using runtime rather than walltime has the dual advantage that
4441 * we (mostly) drive the selection from busy threads and that the
4442 * task needs to have done some actual work before we bother with
4443 * NUMA placement.
4444 */
4445 now = curr->se.sum_exec_runtime;
4446 period = (u64)curr->numa_scan_period * NSEC_PER_MSEC;
4447
4448 if (now > curr->node_stamp + period) {
4449 if (!curr->node_stamp)
4450 curr->numa_scan_period = task_scan_start(curr);
4451 curr->node_stamp += period;
4452
4453 if (!time_before(jiffies, curr->mm->numa_next_scan))
4454 task_work_add(curr, work, TWA_RESUME);
4455 }
4456 }
4457
update_scan_period(struct task_struct * p,int new_cpu)4458 static void update_scan_period(struct task_struct *p, int new_cpu)
4459 {
4460 int src_nid = cpu_to_node(task_cpu(p));
4461 int dst_nid = cpu_to_node(new_cpu);
4462
4463 if (!static_branch_likely(&sched_numa_balancing))
4464 return;
4465
4466 if (!p->mm || !p->numa_faults || (p->flags & PF_EXITING))
4467 return;
4468
4469 if (src_nid == dst_nid)
4470 return;
4471
4472 /*
4473 * Allow resets if faults have been trapped before one scan
4474 * has completed. This is most likely due to a new task that
4475 * is pulled cross-node due to wakeups or load balancing.
4476 */
4477 if (p->numa_scan_seq) {
4478 /*
4479 * Avoid scan adjustments if moving to the preferred
4480 * node or if the task was not previously running on
4481 * the preferred node.
4482 */
4483 if (dst_nid == p->numa_preferred_nid ||
4484 (p->numa_preferred_nid != NUMA_NO_NODE &&
4485 src_nid != p->numa_preferred_nid))
4486 return;
4487 }
4488
4489 p->numa_scan_period = task_scan_start(p);
4490 }
4491
4492 #else /* !CONFIG_NUMA_BALANCING: */
4493
task_tick_numa(struct rq * rq,struct task_struct * curr)4494 static void task_tick_numa(struct rq *rq, struct task_struct *curr)
4495 {
4496 }
4497
account_numa_enqueue(struct rq * rq,struct task_struct * p)4498 static inline void account_numa_enqueue(struct rq *rq, struct task_struct *p)
4499 {
4500 }
4501
account_numa_dequeue(struct rq * rq,struct task_struct * p)4502 static inline void account_numa_dequeue(struct rq *rq, struct task_struct *p)
4503 {
4504 }
4505
update_scan_period(struct task_struct * p,int new_cpu)4506 static inline void update_scan_period(struct task_struct *p, int new_cpu)
4507 {
4508 }
4509
4510 #endif /* !CONFIG_NUMA_BALANCING */
4511
4512 static void
account_entity_enqueue(struct cfs_rq * cfs_rq,struct sched_entity * se)4513 account_entity_enqueue(struct cfs_rq *cfs_rq, struct sched_entity *se)
4514 {
4515 WARN_ON_ONCE(cfs_rq != cfs_rq_of(se));
4516 update_load_add(&cfs_rq->load, se->load.weight);
4517 if (entity_is_task(se)) {
4518 struct task_struct *p = task_of(se);
4519 struct rq *rq = rq_of(cfs_rq);
4520
4521 account_numa_enqueue(rq, p);
4522 account_llc_enqueue(rq, p);
4523 list_add(&se->group_node, &rq->cfs_tasks);
4524 }
4525 cfs_rq->nr_queued++;
4526 }
4527
4528 static void
account_entity_dequeue(struct cfs_rq * cfs_rq,struct sched_entity * se)4529 account_entity_dequeue(struct cfs_rq *cfs_rq, struct sched_entity *se)
4530 {
4531 WARN_ON_ONCE(cfs_rq != cfs_rq_of(se));
4532 update_load_sub(&cfs_rq->load, se->load.weight);
4533 if (entity_is_task(se)) {
4534 struct task_struct *p = task_of(se);
4535 struct rq *rq = rq_of(cfs_rq);
4536
4537 account_numa_dequeue(rq, p);
4538 account_llc_dequeue(rq, p);
4539 list_del_init(&se->group_node);
4540 }
4541 cfs_rq->nr_queued--;
4542 }
4543
4544 /*
4545 * Signed add and clamp on underflow.
4546 *
4547 * Explicitly do a load-store to ensure the intermediate value never hits
4548 * memory. This allows lockless observations without ever seeing the negative
4549 * values.
4550 */
4551 #define add_positive(_ptr, _val) do { \
4552 typeof(_ptr) ptr = (_ptr); \
4553 __signed_scalar_typeof(*ptr) val = (_val); \
4554 typeof(*ptr) res, var = READ_ONCE(*ptr); \
4555 \
4556 res = var + val; \
4557 \
4558 if (val < 0 && res > var) \
4559 res = 0; \
4560 \
4561 WRITE_ONCE(*ptr, res); \
4562 } while (0)
4563
4564 /*
4565 * Remove and clamp on negative, from a local variable.
4566 *
4567 * A variant of sub_positive(), which does not use explicit load-store
4568 * and is thus optimized for local variable updates.
4569 */
4570 #define lsub_positive(_ptr, _val) do { \
4571 typeof(_ptr) ptr = (_ptr); \
4572 *ptr -= min_t(typeof(*ptr), *ptr, _val); \
4573 } while (0)
4574
4575
4576 /*
4577 * Because of rounding, se->util_sum might ends up being +1 more than
4578 * cfs->util_sum. Although this is not a problem by itself, detaching
4579 * a lot of tasks with the rounding problem between 2 updates of
4580 * util_avg (~1ms) can make cfs->util_sum becoming null whereas
4581 * cfs_util_avg is not.
4582 *
4583 * Check that util_sum is still above its lower bound for the new
4584 * util_avg. Given that period_contrib might have moved since the last
4585 * sync, we are only sure that util_sum must be above or equal to
4586 * util_avg * minimum possible divider
4587 */
4588 #define __update_sa(sa, name, delta_avg, delta_sum) do { \
4589 add_positive(&(sa)->name##_avg, delta_avg); \
4590 add_positive(&(sa)->name##_sum, delta_sum); \
4591 (sa)->name##_sum = max_t(typeof((sa)->name##_sum), \
4592 (sa)->name##_sum, \
4593 (sa)->name##_avg * PELT_MIN_DIVIDER); \
4594 } while (0)
4595
4596 static inline void
enqueue_load_avg(struct cfs_rq * cfs_rq,struct sched_entity * se)4597 enqueue_load_avg(struct cfs_rq *cfs_rq, struct sched_entity *se)
4598 {
4599 __update_sa(&cfs_rq->avg, load, se->avg.load_avg,
4600 se_weight(se) * se->avg.load_sum);
4601 }
4602
4603 static inline void
dequeue_load_avg(struct cfs_rq * cfs_rq,struct sched_entity * se)4604 dequeue_load_avg(struct cfs_rq *cfs_rq, struct sched_entity *se)
4605 {
4606 __update_sa(&cfs_rq->avg, load, -se->avg.load_avg,
4607 se_weight(se) * -se->avg.load_sum);
4608 }
4609
4610 static void
rescale_entity(struct sched_entity * se,unsigned long weight,bool rel_vprot)4611 rescale_entity(struct sched_entity *se, unsigned long weight, bool rel_vprot)
4612 {
4613 long old_weight = se->h_load.weight;
4614
4615 /*
4616 * VRUNTIME
4617 * --------
4618 *
4619 * COROLLARY #1: The virtual runtime of the entity needs to be
4620 * adjusted if re-weight at !0-lag point.
4621 *
4622 * Proof: For contradiction assume this is not true, so we can
4623 * re-weight without changing vruntime at !0-lag point.
4624 *
4625 * Weight VRuntime Avg-VRuntime
4626 * before w v V
4627 * after w' v' V'
4628 *
4629 * Since lag needs to be preserved through re-weight:
4630 *
4631 * lag = (V - v)*w = (V'- v')*w', where v = v'
4632 * ==> V' = (V - v)*w/w' + v (1)
4633 *
4634 * Let W be the total weight of the entities before reweight,
4635 * since V' is the new weighted average of entities:
4636 *
4637 * V' = (WV + w'v - wv) / (W + w' - w) (2)
4638 *
4639 * by using (1) & (2) we obtain:
4640 *
4641 * (WV + w'v - wv) / (W + w' - w) = (V - v)*w/w' + v
4642 * ==> (WV-Wv+Wv+w'v-wv)/(W+w'-w) = (V - v)*w/w' + v
4643 * ==> (WV - Wv)/(W + w' - w) + v = (V - v)*w/w' + v
4644 * ==> (V - v)*W/(W + w' - w) = (V - v)*w/w' (3)
4645 *
4646 * Since we are doing at !0-lag point which means V != v, we
4647 * can simplify (3):
4648 *
4649 * ==> W / (W + w' - w) = w / w'
4650 * ==> Ww' = Ww + ww' - ww
4651 * ==> W * (w' - w) = w * (w' - w)
4652 * ==> W = w (re-weight indicates w' != w)
4653 *
4654 * So the cfs_rq contains only one entity, hence vruntime of
4655 * the entity @v should always equal to the cfs_rq's weighted
4656 * average vruntime @V, which means we will always re-weight
4657 * at 0-lag point, thus breach assumption. Proof completed.
4658 *
4659 *
4660 * COROLLARY #2: Re-weight does NOT affect weighted average
4661 * vruntime of all the entities.
4662 *
4663 * Proof: According to corollary #1, Eq. (1) should be:
4664 *
4665 * (V - v)*w = (V' - v')*w'
4666 * ==> v' = V' - (V - v)*w/w' (4)
4667 *
4668 * According to the weighted average formula, we have:
4669 *
4670 * V' = (WV - wv + w'v') / (W - w + w')
4671 * = (WV - wv + w'(V' - (V - v)w/w')) / (W - w + w')
4672 * = (WV - wv + w'V' - Vw + wv) / (W - w + w')
4673 * = (WV + w'V' - Vw) / (W - w + w')
4674 *
4675 * ==> V'*(W - w + w') = WV + w'V' - Vw
4676 * ==> V' * (W - w) = (W - w) * V (5)
4677 *
4678 * If the entity is the only one in the cfs_rq, then reweight
4679 * always occurs at 0-lag point, so V won't change. Or else
4680 * there are other entities, hence W != w, then Eq. (5) turns
4681 * into V' = V. So V won't change in either case, proof done.
4682 *
4683 *
4684 * So according to corollary #1 & #2, the effect of re-weight
4685 * on vruntime should be:
4686 *
4687 * v' = V' - (V - v) * w / w' (4)
4688 * = V - (V - v) * w / w'
4689 * = V - vl * w / w'
4690 * = V - vl'
4691 */
4692 se->vlag = div64_long(se->vlag * old_weight, weight);
4693
4694 /*
4695 * DEADLINE
4696 * --------
4697 *
4698 * When the weight changes, the virtual time slope changes and
4699 * we should adjust the relative virtual deadline accordingly.
4700 *
4701 * d' = v' + (d - v)*w/w'
4702 * = V' - (V - v)*w/w' + (d - v)*w/w'
4703 * = V - (V - v)*w/w' + (d - v)*w/w'
4704 * = V + (d - V)*w/w'
4705 */
4706 if (se->rel_deadline)
4707 se->deadline = div64_long(se->deadline * old_weight, weight);
4708
4709 if (rel_vprot)
4710 se->vprot = div64_long(se->vprot * old_weight, weight);
4711 }
4712
reweight_eevdf(struct cfs_rq * cfs_rq,struct sched_entity * se,unsigned long weight,bool on_rq)4713 static void reweight_eevdf(struct cfs_rq *cfs_rq, struct sched_entity *se,
4714 unsigned long weight, bool on_rq)
4715 {
4716 bool curr = cfs_rq->curr == se;
4717 bool rel_vprot = false;
4718 u64 avruntime = 0;
4719
4720 if (se->h_load.weight == weight)
4721 return;
4722
4723 if (on_rq) {
4724 avruntime = avg_vruntime(cfs_rq);
4725 se->vlag = entity_lag(cfs_rq, se, avruntime);
4726 se->deadline -= avruntime;
4727 se->rel_deadline = 1;
4728 if (curr && protect_slice(se)) {
4729 se->vprot -= avruntime;
4730 rel_vprot = true;
4731 }
4732
4733 cfs_rq->h_nr_queued--;
4734 if (!curr)
4735 __dequeue_entity(cfs_rq, se);
4736 }
4737
4738 rescale_entity(se, weight, rel_vprot);
4739
4740 update_load_set(&se->h_load, weight);
4741
4742 if (on_rq) {
4743 if (rel_vprot)
4744 se->vprot += avruntime;
4745 se->deadline += avruntime;
4746 se->rel_deadline = 0;
4747 se->vruntime = avruntime - se->vlag;
4748
4749 if (!curr)
4750 __enqueue_entity(cfs_rq, se);
4751 cfs_rq->h_nr_queued++;
4752 }
4753 }
4754
reweight_entity(struct cfs_rq * cfs_rq,struct sched_entity * se,unsigned long weight)4755 static void reweight_entity(struct cfs_rq *cfs_rq, struct sched_entity *se,
4756 unsigned long weight)
4757 {
4758 if (se->load.weight == weight)
4759 return;
4760
4761 if (se->on_rq) {
4762 WARN_ON_ONCE(cfs_rq != cfs_rq_of(se));
4763 update_load_sub(&cfs_rq->load, se->load.weight);
4764 }
4765 dequeue_load_avg(cfs_rq, se);
4766
4767 update_load_set(&se->load, weight);
4768
4769 do {
4770 u32 divider = get_pelt_divider(&se->avg);
4771 se->avg.load_avg = div_u64(se_weight(se) * se->avg.load_sum, divider);
4772 } while (0);
4773
4774 enqueue_load_avg(cfs_rq, se);
4775
4776 if (se->on_rq)
4777 update_load_add(&cfs_rq->load, se->load.weight);
4778 }
4779
4780 /*
4781 * weight = NICE_0_LOAD;
4782 * for_each_entity_se(se)
4783 * weight = __calc_prop_weight(cfs_rq_of(se), se, weight);
4784 */
4785 static __always_inline
__calc_prop_weight(struct cfs_rq * cfs_rq,struct sched_entity * se,unsigned long weight)4786 unsigned long __calc_prop_weight(struct cfs_rq *cfs_rq, struct sched_entity *se,
4787 unsigned long weight)
4788 {
4789 weight *= se->load.weight;
4790 if (parent_entity(se))
4791 weight /= cfs_rq->load.weight;
4792 else
4793 weight /= NICE_0_LOAD;
4794
4795 return max(weight, MIN_SHARES);
4796 }
4797
reweight_task_fair(struct rq * rq,struct task_struct * p,const struct load_weight * lw)4798 static void reweight_task_fair(struct rq *rq, struct task_struct *p,
4799 const struct load_weight *lw)
4800 {
4801 struct sched_entity *se = &p->se;
4802 unsigned long weight = NICE_0_LOAD;
4803
4804 if (se->on_rq)
4805 update_curr_fair(rq);
4806
4807 reweight_entity(cfs_rq_of(se), se, lw->weight);
4808 se->load.inv_weight = lw->inv_weight;
4809
4810 if (!se->on_rq)
4811 return;
4812
4813 for_each_sched_entity(se)
4814 weight = __calc_prop_weight(cfs_rq_of(se), se, weight);
4815
4816 reweight_eevdf(&rq->cfs, &p->se, weight, p->se.on_rq);
4817 }
4818
4819 static inline int throttled_hierarchy(struct cfs_rq *cfs_rq);
4820
4821 #ifdef CONFIG_FAIR_GROUP_SCHED
4822 /*
4823 * All this does is approximate the hierarchical proportion which includes that
4824 * global sum we all love to hate.
4825 *
4826 * That is, the weight of a group entity, is the proportional share of the
4827 * group weight based on the group runqueue weights. That is:
4828 *
4829 * tg->weight * grq->load.weight
4830 * ge->load.weight = ----------------------------- (1)
4831 * \Sum grq->load.weight
4832 *
4833 * Now, because computing that sum is prohibitively expensive to compute (been
4834 * there, done that) we approximate it with this average stuff. The average
4835 * moves slower and therefore the approximation is cheaper and more stable.
4836 *
4837 * So instead of the above, we substitute:
4838 *
4839 * grq->load.weight -> grq->avg.load_avg (2)
4840 *
4841 * which yields the following:
4842 *
4843 * tg->weight * grq->avg.load_avg
4844 * ge->load.weight = ------------------------------ (3)
4845 * tg->load_avg
4846 *
4847 * Where: tg->load_avg ~= \Sum grq->avg.load_avg
4848 *
4849 * That is shares_avg, and it is right (given the approximation (2)).
4850 *
4851 * The problem with it is that because the average is slow -- it was designed
4852 * to be exactly that of course -- this leads to transients in boundary
4853 * conditions. In specific, the case where the group was idle and we start the
4854 * one task. It takes time for our CPU's grq->avg.load_avg to build up,
4855 * yielding bad latency etc..
4856 *
4857 * Now, in that special case (1) reduces to:
4858 *
4859 * tg->weight * grq->load.weight
4860 * ge->load.weight = ----------------------------- = tg->weight (4)
4861 * grp->load.weight
4862 *
4863 * That is, the sum collapses because all other CPUs are idle; the UP scenario.
4864 *
4865 * So what we do is modify our approximation (3) to approach (4) in the (near)
4866 * UP case, like:
4867 *
4868 * ge->load.weight =
4869 *
4870 * tg->weight * grq->load.weight
4871 * --------------------------------------------------- (5)
4872 * tg->load_avg - grq->avg.load_avg + grq->load.weight
4873 *
4874 * But because grq->load.weight can drop to 0, resulting in a divide by zero,
4875 * we need to use grq->avg.load_avg as its lower bound, which then gives:
4876 *
4877 *
4878 * tg->weight * grq->load.weight
4879 * ge->load.weight = ----------------------------- (6)
4880 * tg_load_avg'
4881 *
4882 * Where:
4883 *
4884 * tg_load_avg' = tg->load_avg - grq->avg.load_avg +
4885 * max(grq->load.weight, grq->avg.load_avg)
4886 *
4887 * And that is shares_weight and is icky. In the (near) UP case it approaches
4888 * (4) while in the normal case it approaches (3). It consistently
4889 * overestimates the ge->load.weight and therefore:
4890 *
4891 * \Sum ge->load.weight >= tg->weight
4892 *
4893 * hence icky!
4894 */
__calc_smp_shares(struct cfs_rq * cfs_rq,long tg_shares,long shares_max)4895 static long __calc_smp_shares(struct cfs_rq *cfs_rq, long tg_shares, long shares_max)
4896 {
4897 struct task_group *tg = cfs_rq->tg;
4898 long tg_weight, load, shares;
4899
4900 load = max(scale_load_down(cfs_rq->load.weight), cfs_rq->avg.load_avg);
4901
4902 tg_weight = atomic_long_read(&tg->load_avg);
4903
4904 /* Ensure tg_weight >= load */
4905 tg_weight -= cfs_rq->tg_load_avg_contrib;
4906 tg_weight += load;
4907
4908 shares = (tg_shares * load);
4909 if (tg_weight)
4910 shares /= tg_weight;
4911
4912 /*
4913 * MIN_SHARES has to be unscaled here to support per-CPU partitioning
4914 * of a group with small tg->shares value. It is a floor value which is
4915 * assigned as a minimum load.weight to the sched_entity representing
4916 * the group on a CPU.
4917 *
4918 * E.g. on 64-bit for a group with tg->shares of scale_load(15)=15*1024
4919 * on an 8-core system with 8 tasks each runnable on one CPU shares has
4920 * to be 15*1024*1/8=1920 instead of scale_load(MIN_SHARES)=2*1024. In
4921 * case no task is runnable on a CPU MIN_SHARES=2 should be returned
4922 * instead of 0.
4923 */
4924 return clamp_t(long, shares, MIN_SHARES, shares_max);
4925 }
4926
tg_cpus(struct task_group * tg)4927 static int tg_cpus(struct task_group *tg)
4928 {
4929 int nr = num_online_cpus();
4930
4931 if (cpusets_enabled()) {
4932 struct cgroup *cgrp = tg->css.cgroup;
4933 if (cgrp)
4934 nr = cpuset_num_cpus(cgrp);
4935 }
4936
4937 /*
4938 * An empty cpuset would propagate a 0 shares_max into
4939 * __calc_smp_shares(), where clamp() yields hi when hi < lo and so
4940 * defeats the MIN_SHARES floor. Match tg_tasks(), which floors at 1.
4941 */
4942 return max(nr, 1);
4943 }
4944
tg_tasks(struct task_group * tg)4945 static inline int tg_tasks(struct task_group *tg)
4946 {
4947 return max(1, atomic_long_read(&tg->runnable_avg) >> SCHED_CAPACITY_SHIFT);
4948 }
4949
4950 /*
4951 * Func: fraction(nr_tasks * tg->shares)
4952 *
4953 * Scale tg->shares by the number of tasks.
4954 */
calc_tasks_shares(struct cfs_rq * cfs_rq)4955 static long calc_tasks_shares(struct cfs_rq *cfs_rq)
4956 {
4957 struct task_group *tg = cfs_rq->tg;
4958 int nr = tg_tasks(tg);
4959 long tg_shares = READ_ONCE(tg->shares);
4960 return __calc_smp_shares(cfs_rq, nr * tg_shares, nr * tg_shares);
4961 }
4962
4963 /*
4964 * Func: min(fraction(nr_cpus * tg->shares), nice -20)
4965 *
4966 * Scale tg->shares by the maximal number of CPUs; but clip the max shares at
4967 * nice -20, otherwise a single spinner on a 512 CPU machine would result in
4968 * 512*NICE_0_LOAD, which is also crazy.
4969 */
calc_max_shares(struct cfs_rq * cfs_rq)4970 static long calc_max_shares(struct cfs_rq *cfs_rq)
4971 {
4972 struct task_group *tg = cfs_rq->tg;
4973 int nr = tg_cpus(tg);
4974 long tg_shares = READ_ONCE(tg->shares);
4975 long max_shares = scale_load(sched_prio_to_weight[0]);
4976 return __calc_smp_shares(cfs_rq, tg_shares * nr, max_shares);
4977 }
4978
4979 /*
4980 * Func: fraction(nr * tg->shares); nr = min(nr_tasks, nr_cpus)
4981 *
4982 * Scales between "smp" and "max" in a natural way. No longer needs clipping
4983 * since there are no unnatural inflations like with "max".
4984 */
calc_concur_shares(struct cfs_rq * cfs_rq)4985 static long calc_concur_shares(struct cfs_rq *cfs_rq)
4986 {
4987 struct task_group *tg = cfs_rq->tg;
4988 int nr = min(tg_tasks(tg), tg_cpus(tg));
4989 long tg_shares = READ_ONCE(tg->shares);
4990 return __calc_smp_shares(cfs_rq, nr * tg_shares, nr * tg_shares);
4991 }
4992
4993 /*
4994 * Func: fraction(tg->shares)
4995 *
4996 * This infamously results in tiny shares when you have many CPUs.
4997 */
calc_smp_shares(struct cfs_rq * cfs_rq)4998 static long calc_smp_shares(struct cfs_rq *cfs_rq)
4999 {
5000 struct task_group *tg = cfs_rq->tg;
5001 long tg_shares = READ_ONCE(tg->shares);
5002 return __calc_smp_shares(cfs_rq, tg_shares, tg_shares);
5003 }
5004
5005 /*
5006 * Ignore this pesky SMP stuff, use (4).
5007 */
calc_up_shares(struct cfs_rq * cfs_rq)5008 static long calc_up_shares(struct cfs_rq *cfs_rq)
5009 {
5010 struct task_group *tg = cfs_rq->tg;
5011 return READ_ONCE(tg->shares);
5012 }
5013
5014 DEFINE_STATIC_CALL(calc_group_shares, calc_concur_shares);
5015
__sched_cgroup_mode_update(int mode)5016 void __sched_cgroup_mode_update(int mode)
5017 {
5018 long (*func)(struct cfs_rq *);
5019 switch (mode) {
5020 case 0:
5021 func = &calc_up_shares;
5022 break;
5023 case 1:
5024 func = &calc_smp_shares;
5025 break;
5026 case 2:
5027 default:
5028 func = &calc_concur_shares;
5029 break;
5030 case 3:
5031 func = &calc_max_shares;
5032 break;
5033 case 4:
5034 func = &calc_tasks_shares;
5035 break;
5036 }
5037 static_call_update(calc_group_shares, func);
5038 }
5039
5040 /*
5041 * Recomputes the group entity based on the current state of its group
5042 * runqueue.
5043 */
update_cfs_group(struct sched_entity * se)5044 static void update_cfs_group(struct sched_entity *se)
5045 {
5046 struct cfs_rq *gcfs_rq = group_cfs_rq(se);
5047 long shares;
5048
5049 /*
5050 * When a group becomes empty, preserve its weight. This matters for
5051 * DELAY_DEQUEUE.
5052 */
5053 if (!gcfs_rq || !gcfs_rq->load.weight)
5054 return;
5055
5056 shares = static_call(calc_group_shares)(gcfs_rq);
5057 reweight_entity(cfs_rq_of(se), se, shares);
5058 }
5059
5060 #else /* !CONFIG_FAIR_GROUP_SCHED: */
update_cfs_group(struct sched_entity * se)5061 static inline void update_cfs_group(struct sched_entity *se)
5062 {
5063 }
5064 #endif /* !CONFIG_FAIR_GROUP_SCHED */
5065
cfs_rq_util_change(struct cfs_rq * cfs_rq,int flags)5066 static inline void cfs_rq_util_change(struct cfs_rq *cfs_rq, int flags)
5067 {
5068 struct rq *rq = rq_of(cfs_rq);
5069
5070 if (&rq->cfs == cfs_rq) {
5071 /*
5072 * There are a few boundary cases this might miss but it should
5073 * get called often enough that that should (hopefully) not be
5074 * a real problem.
5075 *
5076 * It will not get called when we go idle, because the idle
5077 * thread is a different class (!fair), nor will the utilization
5078 * number include things like RT tasks.
5079 *
5080 * As is, the util number is not freq-invariant (we'd have to
5081 * implement arch_scale_freq_capacity() for that).
5082 *
5083 * See cpu_util_cfs().
5084 */
5085 cpufreq_update_util(rq, flags);
5086 }
5087 }
5088
load_avg_is_decayed(struct sched_avg * sa)5089 static inline bool load_avg_is_decayed(struct sched_avg *sa)
5090 {
5091 if (sa->load_sum)
5092 return false;
5093
5094 if (sa->util_sum)
5095 return false;
5096
5097 if (sa->runnable_sum)
5098 return false;
5099
5100 /*
5101 * _avg must be null when _sum are null because _avg = _sum / divider
5102 * Make sure that rounding and/or propagation of PELT values never
5103 * break this.
5104 */
5105 WARN_ON_ONCE(sa->load_avg ||
5106 sa->util_avg ||
5107 sa->runnable_avg);
5108
5109 return true;
5110 }
5111
cfs_rq_last_update_time(struct cfs_rq * cfs_rq)5112 static inline u64 cfs_rq_last_update_time(struct cfs_rq *cfs_rq)
5113 {
5114 return u64_u32_load_copy(cfs_rq->avg.last_update_time,
5115 cfs_rq->last_update_time_copy);
5116 }
5117 #ifdef CONFIG_FAIR_GROUP_SCHED
5118 /*
5119 * Because list_add_leaf_cfs_rq always places a child cfs_rq on the list
5120 * immediately before a parent cfs_rq, and cfs_rqs are removed from the list
5121 * bottom-up, we only have to test whether the cfs_rq before us on the list
5122 * is our child.
5123 * If cfs_rq is not on the list, test whether a child needs its to be added to
5124 * connect a branch to the tree * (see list_add_leaf_cfs_rq() for details).
5125 */
child_cfs_rq_on_list(struct cfs_rq * cfs_rq)5126 static inline bool child_cfs_rq_on_list(struct cfs_rq *cfs_rq)
5127 {
5128 struct cfs_rq *prev_cfs_rq;
5129 struct list_head *prev;
5130 struct rq *rq = rq_of(cfs_rq);
5131
5132 if (cfs_rq->on_list) {
5133 prev = cfs_rq->leaf_cfs_rq_list.prev;
5134 } else {
5135 prev = rq->tmp_alone_branch;
5136 }
5137
5138 if (prev == &rq->leaf_cfs_rq_list)
5139 return false;
5140
5141 prev_cfs_rq = container_of(prev, struct cfs_rq, leaf_cfs_rq_list);
5142
5143 return (prev_cfs_rq->tg->parent == cfs_rq->tg);
5144 }
5145
cfs_rq_is_decayed(struct cfs_rq * cfs_rq)5146 static inline bool cfs_rq_is_decayed(struct cfs_rq *cfs_rq)
5147 {
5148 if (cfs_rq->load.weight)
5149 return false;
5150
5151 if (!load_avg_is_decayed(&cfs_rq->avg))
5152 return false;
5153
5154 if (child_cfs_rq_on_list(cfs_rq))
5155 return false;
5156
5157 if (cfs_rq->tg_load_avg_contrib)
5158 return false;
5159
5160 return true;
5161 }
5162
5163 /**
5164 * update_tg_load_avg - update the tg's load avg
5165 * @cfs_rq: the cfs_rq whose avg changed
5166 *
5167 * This function 'ensures': tg->load_avg := \Sum tg->cfs_rq[]->avg.load.
5168 * However, because tg->load_avg is a global value there are performance
5169 * considerations.
5170 *
5171 * In order to avoid having to look at the other cfs_rq's, we use a
5172 * differential update where we store the last value we propagated. This in
5173 * turn allows skipping updates if the differential is 'small'.
5174 *
5175 * Updating tg's load_avg is necessary before update_cfs_group().
5176 */
update_tg_load_avg(struct cfs_rq * cfs_rq)5177 static inline void update_tg_load_avg(struct cfs_rq *cfs_rq)
5178 {
5179 long dl, dr;
5180 u64 now;
5181
5182 /*
5183 * No need to update load_avg for root_task_group as it is not used.
5184 */
5185 if (cfs_rq->tg == &root_task_group)
5186 return;
5187
5188 /* rq has been offline and doesn't contribute to the share anymore: */
5189 if (!cpu_active(cpu_of(rq_of(cfs_rq))))
5190 return;
5191
5192 /*
5193 * For migration heavy workloads, access to tg->load_avg can be
5194 * unbound. Limit the update rate to at most once per ms.
5195 */
5196 now = rq_clock(rq_of(cfs_rq));
5197 if (now - cfs_rq->last_update_tg_load_avg < NSEC_PER_MSEC)
5198 return;
5199
5200 dl = cfs_rq->avg.load_avg - cfs_rq->tg_load_avg_contrib;
5201 dr = cfs_rq->avg.runnable_avg - cfs_rq->tg_runnable_avg_contrib;
5202 if (abs(dl) > cfs_rq->tg_load_avg_contrib / 64 ||
5203 abs(dr) > cfs_rq->tg_runnable_avg_contrib / 64) {
5204 atomic_long_add(dl, &cfs_rq->tg->load_avg);
5205 atomic_long_add(dr, &cfs_rq->tg->runnable_avg);
5206 cfs_rq->tg_load_avg_contrib = cfs_rq->avg.load_avg;
5207 cfs_rq->tg_runnable_avg_contrib = cfs_rq->avg.runnable_avg;
5208 cfs_rq->last_update_tg_load_avg = now;
5209 }
5210 }
5211
clear_tg_load_avg(struct cfs_rq * cfs_rq)5212 static inline void clear_tg_load_avg(struct cfs_rq *cfs_rq)
5213 {
5214 long dl, dr;
5215 u64 now;
5216
5217 /*
5218 * No need to update load_avg for root_task_group, as it is not used.
5219 */
5220 if (cfs_rq->tg == &root_task_group)
5221 return;
5222
5223 now = rq_clock(rq_of(cfs_rq));
5224 dl = 0 - cfs_rq->tg_load_avg_contrib;
5225 dr = 0 - cfs_rq->tg_runnable_avg_contrib;
5226 atomic_long_add(dl, &cfs_rq->tg->load_avg);
5227 atomic_long_add(dr, &cfs_rq->tg->runnable_avg);
5228 cfs_rq->tg_load_avg_contrib = 0;
5229 cfs_rq->tg_runnable_avg_contrib = 0;
5230 cfs_rq->last_update_tg_load_avg = now;
5231 }
5232
5233 /* CPU offline callback: */
clear_tg_offline_cfs_rqs(struct rq * rq)5234 static void __maybe_unused clear_tg_offline_cfs_rqs(struct rq *rq)
5235 {
5236 struct task_group *tg;
5237
5238 lockdep_assert_rq_held(rq);
5239
5240 /*
5241 * The rq clock has already been updated in
5242 * set_rq_offline(), so we should skip updating
5243 * the rq clock again in unthrottle_cfs_rq().
5244 */
5245 rq_clock_start_loop_update(rq);
5246
5247 guard(rcu)();
5248
5249 list_for_each_entry_rcu(tg, &task_groups, list) {
5250 struct cfs_rq *cfs_rq = tg_cfs_rq(tg, cpu_of(rq));
5251
5252 clear_tg_load_avg(cfs_rq);
5253 }
5254
5255 rq_clock_stop_loop_update(rq);
5256 }
5257
5258 /*
5259 * Called within set_task_rq() right before setting a task's CPU. The
5260 * caller only guarantees p->pi_lock is held; no other assumptions,
5261 * including the state of rq->lock, should be made.
5262 */
set_task_rq_fair(struct sched_entity * se,struct cfs_rq * prev,struct cfs_rq * next)5263 void set_task_rq_fair(struct sched_entity *se,
5264 struct cfs_rq *prev, struct cfs_rq *next)
5265 {
5266 u64 p_last_update_time;
5267 u64 n_last_update_time;
5268
5269 if (!sched_feat(ATTACH_AGE_LOAD))
5270 return;
5271
5272 /*
5273 * We are supposed to update the task to "current" time, then its up to
5274 * date and ready to go to new CPU/cfs_rq. But we have difficulty in
5275 * getting what current time is, so simply throw away the out-of-date
5276 * time. This will result in the wakee task is less decayed, but giving
5277 * the wakee more load sounds not bad.
5278 */
5279 if (!(se->avg.last_update_time && prev))
5280 return;
5281
5282 p_last_update_time = cfs_rq_last_update_time(prev);
5283 n_last_update_time = cfs_rq_last_update_time(next);
5284
5285 __update_load_avg_blocked_se(p_last_update_time, se);
5286 se->avg.last_update_time = n_last_update_time;
5287 }
5288
5289 /*
5290 * When on migration a sched_entity joins/leaves the PELT hierarchy, we need to
5291 * propagate its contribution. The key to this propagation is the invariant
5292 * that for each group:
5293 *
5294 * ge->avg == grq->avg (1)
5295 *
5296 * _IFF_ we look at the pure running and runnable sums. Because they
5297 * represent the very same entity, just at different points in the hierarchy.
5298 *
5299 * Per the above update_tg_cfs_util() and update_tg_cfs_runnable() are trivial
5300 * and simply copies the running/runnable sum over (but still wrong, because
5301 * the group entity and group rq do not have their PELT windows aligned).
5302 *
5303 * However, update_tg_cfs_load() is more complex. So we have:
5304 *
5305 * ge->avg.load_avg = ge->load.weight * ge->avg.runnable_avg (2)
5306 *
5307 * And since, like util, the runnable part should be directly transferable,
5308 * the following would _appear_ to be the straight forward approach:
5309 *
5310 * grq->avg.load_avg = grq->load.weight * grq->avg.runnable_avg (3)
5311 *
5312 * And per (1) we have:
5313 *
5314 * ge->avg.runnable_avg == grq->avg.runnable_avg
5315 *
5316 * Which gives:
5317 *
5318 * ge->load.weight * grq->avg.load_avg
5319 * ge->avg.load_avg = ----------------------------------- (4)
5320 * grq->load.weight
5321 *
5322 * Except that is wrong!
5323 *
5324 * Because while for entities historical weight is not important and we
5325 * really only care about our future and therefore can consider a pure
5326 * runnable sum, runqueues can NOT do this.
5327 *
5328 * We specifically want runqueues to have a load_avg that includes
5329 * historical weights. Those represent the blocked load, the load we expect
5330 * to (shortly) return to us. This only works by keeping the weights as
5331 * integral part of the sum. We therefore cannot decompose as per (3).
5332 *
5333 * Another reason this doesn't work is that runnable isn't a 0-sum entity.
5334 * Imagine a rq with 2 tasks that each are runnable 2/3 of the time. Then the
5335 * rq itself is runnable anywhere between 2/3 and 1 depending on how the
5336 * runnable section of these tasks overlap (or not). If they were to perfectly
5337 * align the rq as a whole would be runnable 2/3 of the time. If however we
5338 * always have at least 1 runnable task, the rq as a whole is always runnable.
5339 *
5340 * So we'll have to approximate.. :/
5341 *
5342 * Given the constraint:
5343 *
5344 * ge->avg.running_sum <= ge->avg.runnable_sum <= LOAD_AVG_MAX
5345 *
5346 * We can construct a rule that adds runnable to a rq by assuming minimal
5347 * overlap.
5348 *
5349 * On removal, we'll assume each task is equally runnable; which yields:
5350 *
5351 * grq->avg.runnable_sum = grq->avg.load_sum / grq->load.weight
5352 *
5353 * XXX: only do this for the part of runnable > running ?
5354 *
5355 */
5356 static inline void
update_tg_cfs_util(struct cfs_rq * cfs_rq,struct sched_entity * se,struct cfs_rq * gcfs_rq)5357 update_tg_cfs_util(struct cfs_rq *cfs_rq, struct sched_entity *se, struct cfs_rq *gcfs_rq)
5358 {
5359 long delta_sum, delta_avg = gcfs_rq->avg.util_avg - se->avg.util_avg;
5360 u32 new_sum, divider;
5361
5362 /* Nothing to update */
5363 if (!delta_avg)
5364 return;
5365
5366 /*
5367 * cfs_rq->avg.period_contrib can be used for both cfs_rq and se.
5368 * See ___update_load_avg() for details.
5369 */
5370 divider = get_pelt_divider(&cfs_rq->avg);
5371
5372 /* Set new sched_entity's utilization */
5373 se->avg.util_avg = gcfs_rq->avg.util_avg;
5374 new_sum = se->avg.util_avg * divider;
5375 delta_sum = (long)new_sum - (long)se->avg.util_sum;
5376 se->avg.util_sum = new_sum;
5377
5378 /* Update parent cfs_rq utilization */
5379 __update_sa(&cfs_rq->avg, util, delta_avg, delta_sum);
5380 }
5381
5382 static inline void
update_tg_cfs_runnable(struct cfs_rq * cfs_rq,struct sched_entity * se,struct cfs_rq * gcfs_rq)5383 update_tg_cfs_runnable(struct cfs_rq *cfs_rq, struct sched_entity *se, struct cfs_rq *gcfs_rq)
5384 {
5385 long delta_sum, delta_avg = gcfs_rq->avg.runnable_avg - se->avg.runnable_avg;
5386 u64 new_sum;
5387 u32 divider;
5388
5389 /* Nothing to update */
5390 if (!delta_avg)
5391 return;
5392
5393 /*
5394 * cfs_rq->avg.period_contrib can be used for both cfs_rq and se.
5395 * See ___update_load_avg() for details.
5396 */
5397 divider = get_pelt_divider(&cfs_rq->avg);
5398
5399 /* Set new sched_entity's runnable */
5400 se->avg.runnable_avg = gcfs_rq->avg.runnable_avg;
5401 new_sum = (u64)se->avg.runnable_avg * divider;
5402 delta_sum = (long)new_sum - (long)se->avg.runnable_sum;
5403 se->avg.runnable_sum = new_sum;
5404
5405 /* Update parent cfs_rq runnable */
5406 __update_sa(&cfs_rq->avg, runnable, delta_avg, delta_sum);
5407 }
5408
5409 static inline void
update_tg_cfs_load(struct cfs_rq * cfs_rq,struct sched_entity * se,struct cfs_rq * gcfs_rq)5410 update_tg_cfs_load(struct cfs_rq *cfs_rq, struct sched_entity *se, struct cfs_rq *gcfs_rq)
5411 {
5412 long delta_avg, running_sum, runnable_sum = gcfs_rq->prop_runnable_sum;
5413 unsigned long load_avg;
5414 u64 load_sum = 0;
5415 s64 delta_sum;
5416 u32 divider;
5417
5418 if (!runnable_sum)
5419 return;
5420
5421 gcfs_rq->prop_runnable_sum = 0;
5422
5423 /*
5424 * cfs_rq->avg.period_contrib can be used for both cfs_rq and se.
5425 * See ___update_load_avg() for details.
5426 */
5427 divider = get_pelt_divider(&cfs_rq->avg);
5428
5429 if (runnable_sum >= 0) {
5430 /*
5431 * Add runnable; clip at LOAD_AVG_MAX. Reflects that until
5432 * the CPU is saturated running == runnable.
5433 */
5434 runnable_sum += se->avg.load_sum;
5435 runnable_sum = min_t(long, runnable_sum, divider);
5436 } else {
5437 /*
5438 * Estimate the new unweighted runnable_sum of the gcfs_rq by
5439 * assuming all tasks are equally runnable.
5440 */
5441 if (scale_load_down(gcfs_rq->load.weight)) {
5442 load_sum = div_u64(gcfs_rq->avg.load_sum,
5443 scale_load_down(gcfs_rq->load.weight));
5444 }
5445
5446 /* But make sure to not inflate se's runnable */
5447 runnable_sum = min(se->avg.load_sum, load_sum);
5448 }
5449
5450 /*
5451 * runnable_sum can't be lower than running_sum
5452 * Rescale running sum to be in the same range as runnable sum
5453 * running_sum is in [0 : LOAD_AVG_MAX << SCHED_CAPACITY_SHIFT]
5454 * runnable_sum is in [0 : LOAD_AVG_MAX]
5455 */
5456 running_sum = se->avg.util_sum >> SCHED_CAPACITY_SHIFT;
5457 runnable_sum = max(runnable_sum, running_sum);
5458
5459 load_sum = se_weight(se) * runnable_sum;
5460 load_avg = div_u64(load_sum, divider);
5461
5462 delta_avg = load_avg - se->avg.load_avg;
5463 if (!delta_avg)
5464 return;
5465
5466 delta_sum = load_sum - (s64)se_weight(se) * se->avg.load_sum;
5467
5468 se->avg.load_sum = runnable_sum;
5469 se->avg.load_avg = load_avg;
5470 __update_sa(&cfs_rq->avg, load, delta_avg, delta_sum);
5471 }
5472
add_tg_cfs_propagate(struct cfs_rq * cfs_rq,long runnable_sum)5473 static inline void add_tg_cfs_propagate(struct cfs_rq *cfs_rq, long runnable_sum)
5474 {
5475 cfs_rq->propagate = 1;
5476 cfs_rq->prop_runnable_sum += runnable_sum;
5477 }
5478
5479 /* Update task and its cfs_rq load average */
propagate_entity_load_avg(struct sched_entity * se)5480 static inline int propagate_entity_load_avg(struct sched_entity *se)
5481 {
5482 struct cfs_rq *cfs_rq, *gcfs_rq;
5483
5484 if (entity_is_task(se))
5485 return 0;
5486
5487 gcfs_rq = group_cfs_rq(se);
5488 if (!gcfs_rq->propagate)
5489 return 0;
5490
5491 gcfs_rq->propagate = 0;
5492
5493 cfs_rq = cfs_rq_of(se);
5494
5495 add_tg_cfs_propagate(cfs_rq, gcfs_rq->prop_runnable_sum);
5496
5497 update_tg_cfs_util(cfs_rq, se, gcfs_rq);
5498 update_tg_cfs_runnable(cfs_rq, se, gcfs_rq);
5499 update_tg_cfs_load(cfs_rq, se, gcfs_rq);
5500
5501 trace_pelt_cfs_tp(cfs_rq);
5502 trace_pelt_se_tp(se);
5503
5504 return 1;
5505 }
5506
5507 /*
5508 * Check if we need to update the load and the utilization of a blocked
5509 * group_entity:
5510 */
skip_blocked_update(struct sched_entity * se)5511 static inline bool skip_blocked_update(struct sched_entity *se)
5512 {
5513 struct cfs_rq *gcfs_rq = group_cfs_rq(se);
5514
5515 /*
5516 * If sched_entity still have not zero load or utilization, we have to
5517 * decay it:
5518 */
5519 if (se->avg.load_avg || se->avg.util_avg)
5520 return false;
5521
5522 /*
5523 * If there is a pending propagation, we have to update the load and
5524 * the utilization of the sched_entity:
5525 */
5526 if (gcfs_rq->propagate)
5527 return false;
5528
5529 /*
5530 * Otherwise, the load and the utilization of the sched_entity is
5531 * already zero and there is no pending propagation, so it will be a
5532 * waste of time to try to decay it:
5533 */
5534 return true;
5535 }
5536
5537 #else /* !CONFIG_FAIR_GROUP_SCHED: */
5538
update_tg_load_avg(struct cfs_rq * cfs_rq)5539 static inline void update_tg_load_avg(struct cfs_rq *cfs_rq) {}
5540
clear_tg_offline_cfs_rqs(struct rq * rq)5541 static inline void clear_tg_offline_cfs_rqs(struct rq *rq) {}
5542
propagate_entity_load_avg(struct sched_entity * se)5543 static inline int propagate_entity_load_avg(struct sched_entity *se)
5544 {
5545 return 0;
5546 }
5547
add_tg_cfs_propagate(struct cfs_rq * cfs_rq,long runnable_sum)5548 static inline void add_tg_cfs_propagate(struct cfs_rq *cfs_rq, long runnable_sum) {}
5549
5550 #endif /* !CONFIG_FAIR_GROUP_SCHED */
5551
5552 #ifdef CONFIG_NO_HZ_COMMON
migrate_se_pelt_lag(struct sched_entity * se)5553 static inline void migrate_se_pelt_lag(struct sched_entity *se)
5554 {
5555 u64 throttled = 0, now, lut;
5556 struct cfs_rq *cfs_rq;
5557 struct rq *rq;
5558 bool is_idle;
5559
5560 if (load_avg_is_decayed(&se->avg))
5561 return;
5562
5563 cfs_rq = cfs_rq_of(se);
5564 rq = rq_of(cfs_rq);
5565
5566 rcu_read_lock();
5567 is_idle = is_idle_task(rcu_dereference_all(rq->curr));
5568 rcu_read_unlock();
5569
5570 /*
5571 * The lag estimation comes with a cost we don't want to pay all the
5572 * time. Hence, limiting to the case where the source CPU is idle and
5573 * we know we are at the greatest risk to have an outdated clock.
5574 */
5575 if (!is_idle)
5576 return;
5577
5578 /*
5579 * Estimated "now" is: last_update_time + cfs_idle_lag + rq_idle_lag, where:
5580 *
5581 * last_update_time (the cfs_rq's last_update_time)
5582 * = cfs_rq_clock_pelt()@cfs_rq_idle
5583 * = rq_clock_pelt()@cfs_rq_idle
5584 * - cfs->throttled_clock_pelt_time@cfs_rq_idle
5585 *
5586 * cfs_idle_lag (delta between rq's update and cfs_rq's update)
5587 * = rq_clock_pelt()@rq_idle - rq_clock_pelt()@cfs_rq_idle
5588 *
5589 * rq_idle_lag (delta between now and rq's update)
5590 * = sched_clock_cpu() - rq_clock()@rq_idle
5591 *
5592 * We can then write:
5593 *
5594 * now = rq_clock_pelt()@rq_idle - cfs->throttled_clock_pelt_time +
5595 * sched_clock_cpu() - rq_clock()@rq_idle
5596 * Where:
5597 * rq_clock_pelt()@rq_idle is rq->clock_pelt_idle
5598 * rq_clock()@rq_idle is rq->clock_idle
5599 * cfs->throttled_clock_pelt_time@cfs_rq_idle
5600 * is cfs_rq->throttled_pelt_idle
5601 */
5602
5603 #ifdef CONFIG_CFS_BANDWIDTH
5604 throttled = u64_u32_load(cfs_rq->throttled_pelt_idle);
5605 /* The clock has been stopped for throttling */
5606 if (throttled == U64_MAX)
5607 return;
5608 #endif
5609 now = u64_u32_load(rq->clock_pelt_idle);
5610 /*
5611 * Paired with _update_idle_rq_clock_pelt(). It ensures at the worst case
5612 * is observed the old clock_pelt_idle value and the new clock_idle,
5613 * which lead to an underestimation. The opposite would lead to an
5614 * overestimation.
5615 */
5616 smp_rmb();
5617 lut = cfs_rq_last_update_time(cfs_rq);
5618
5619 now -= throttled;
5620 if (now < lut)
5621 /*
5622 * cfs_rq->avg.last_update_time is more recent than our
5623 * estimation, let's use it.
5624 */
5625 now = lut;
5626 else
5627 now += sched_clock_cpu(cpu_of(rq)) - u64_u32_load(rq->clock_idle);
5628
5629 __update_load_avg_blocked_se(now, se);
5630 }
5631 #else /* !CONFIG_NO_HZ_COMMON: */
migrate_se_pelt_lag(struct sched_entity * se)5632 static void migrate_se_pelt_lag(struct sched_entity *se) {}
5633 #endif /* !CONFIG_NO_HZ_COMMON */
5634
5635 /**
5636 * update_cfs_rq_load_avg - update the cfs_rq's load/util averages
5637 * @now: current time, as per cfs_rq_clock_pelt()
5638 * @cfs_rq: cfs_rq to update
5639 *
5640 * The cfs_rq avg is the direct sum of all its entities (blocked and runnable)
5641 * avg. The immediate corollary is that all (fair) tasks must be attached.
5642 *
5643 * cfs_rq->avg is used for task_h_load() and update_cfs_group() for example.
5644 *
5645 * Return: true if the load decayed or we removed load.
5646 *
5647 * Since both these conditions indicate a changed cfs_rq->avg.load we should
5648 * call update_tg_load_avg() when this function returns true.
5649 */
5650 static inline int
update_cfs_rq_load_avg(u64 now,struct cfs_rq * cfs_rq)5651 update_cfs_rq_load_avg(u64 now, struct cfs_rq *cfs_rq)
5652 {
5653 unsigned long removed_load = 0, removed_util = 0, removed_runnable = 0;
5654 struct sched_avg *sa = &cfs_rq->avg;
5655 int decayed = 0;
5656
5657 if (cfs_rq->removed.nr) {
5658 unsigned long r;
5659 u32 divider = get_pelt_divider(&cfs_rq->avg);
5660
5661 raw_spin_lock(&cfs_rq->removed.lock);
5662 swap(cfs_rq->removed.util_avg, removed_util);
5663 swap(cfs_rq->removed.load_avg, removed_load);
5664 swap(cfs_rq->removed.runnable_avg, removed_runnable);
5665 cfs_rq->removed.nr = 0;
5666 raw_spin_unlock(&cfs_rq->removed.lock);
5667
5668 r = removed_load;
5669 __update_sa(sa, load, -r, -r*divider);
5670
5671 r = removed_util;
5672 __update_sa(sa, util, -r, -r*divider);
5673
5674 r = removed_runnable;
5675 __update_sa(sa, runnable, -r, -r*divider);
5676
5677 /*
5678 * removed_runnable is the unweighted version of removed_load so we
5679 * can use it to estimate removed_load_sum.
5680 */
5681 add_tg_cfs_propagate(cfs_rq,
5682 -(long)(removed_runnable * divider) >> SCHED_CAPACITY_SHIFT);
5683
5684 decayed = 1;
5685 }
5686
5687 decayed |= __update_load_avg_cfs_rq(now, cfs_rq);
5688 u64_u32_store_copy(sa->last_update_time,
5689 cfs_rq->last_update_time_copy,
5690 sa->last_update_time);
5691 return decayed;
5692 }
5693
5694 /**
5695 * attach_entity_load_avg - attach this entity to its cfs_rq load avg
5696 * @cfs_rq: cfs_rq to attach to
5697 * @se: sched_entity to attach
5698 *
5699 * Must call update_cfs_rq_load_avg() before this, since we rely on
5700 * cfs_rq->avg.last_update_time being current.
5701 */
attach_entity_load_avg(struct cfs_rq * cfs_rq,struct sched_entity * se)5702 static void attach_entity_load_avg(struct cfs_rq *cfs_rq, struct sched_entity *se)
5703 {
5704 /*
5705 * cfs_rq->avg.period_contrib can be used for both cfs_rq and se.
5706 * See ___update_load_avg() for details.
5707 */
5708 u32 divider = get_pelt_divider(&cfs_rq->avg);
5709
5710 /*
5711 * When we attach the @se to the @cfs_rq, we must align the decay
5712 * window because without that, really weird and wonderful things can
5713 * happen.
5714 *
5715 * XXX illustrate
5716 */
5717 se->avg.last_update_time = cfs_rq->avg.last_update_time;
5718 se->avg.period_contrib = cfs_rq->avg.period_contrib;
5719
5720 /*
5721 * Hell(o) Nasty stuff.. we need to recompute _sum based on the new
5722 * period_contrib. This isn't strictly correct, but since we're
5723 * entirely outside of the PELT hierarchy, nobody cares if we truncate
5724 * _sum a little.
5725 */
5726 se->avg.util_sum = se->avg.util_avg * divider;
5727
5728 se->avg.runnable_sum = se->avg.runnable_avg * divider;
5729
5730 se->avg.load_sum = se->avg.load_avg * divider;
5731 if (se_weight(se) < se->avg.load_sum)
5732 se->avg.load_sum = div_u64(se->avg.load_sum, se_weight(se));
5733 else
5734 se->avg.load_sum = 1;
5735
5736 enqueue_load_avg(cfs_rq, se);
5737 cfs_rq->avg.util_avg += se->avg.util_avg;
5738 cfs_rq->avg.util_sum += se->avg.util_sum;
5739 cfs_rq->avg.runnable_avg += se->avg.runnable_avg;
5740 cfs_rq->avg.runnable_sum += se->avg.runnable_sum;
5741
5742 add_tg_cfs_propagate(cfs_rq, se->avg.load_sum);
5743
5744 cfs_rq_util_change(cfs_rq, 0);
5745
5746 trace_pelt_cfs_tp(cfs_rq);
5747 }
5748
5749 /**
5750 * detach_entity_load_avg - detach this entity from its cfs_rq load avg
5751 * @cfs_rq: cfs_rq to detach from
5752 * @se: sched_entity to detach
5753 *
5754 * Must call update_cfs_rq_load_avg() before this, since we rely on
5755 * cfs_rq->avg.last_update_time being current.
5756 */
detach_entity_load_avg(struct cfs_rq * cfs_rq,struct sched_entity * se)5757 static void detach_entity_load_avg(struct cfs_rq *cfs_rq, struct sched_entity *se)
5758 {
5759 dequeue_load_avg(cfs_rq, se);
5760 __update_sa(&cfs_rq->avg, util, -se->avg.util_avg, -se->avg.util_sum);
5761 __update_sa(&cfs_rq->avg, runnable, -se->avg.runnable_avg, -se->avg.runnable_sum);
5762
5763 add_tg_cfs_propagate(cfs_rq, -se->avg.load_sum);
5764
5765 cfs_rq_util_change(cfs_rq, 0);
5766
5767 trace_pelt_cfs_tp(cfs_rq);
5768 }
5769
5770 #define UTIL_EST_MARGIN (SCHED_CAPACITY_SCALE / 100)
5771
util_est_update(struct sched_entity * se)5772 static inline void util_est_update(struct sched_entity *se)
5773 {
5774 unsigned int ewma, dequeued, last_ewma_diff;
5775
5776 if (!sched_feat(UTIL_EST))
5777 return;
5778
5779 /* Get current estimate of utilization */
5780 ewma = READ_ONCE(se->avg.util_est);
5781
5782 /*
5783 * If the PELT values haven't changed since enqueue time,
5784 * skip the util_est update.
5785 */
5786 if (ewma & UTIL_AVG_UNCHANGED)
5787 return;
5788
5789 /* Get utilization at dequeue */
5790 dequeued = READ_ONCE(se->avg.util_avg);
5791
5792 /*
5793 * Reset EWMA on utilization increases, the moving average is used only
5794 * to smooth utilization decreases.
5795 */
5796 if (ewma <= dequeued) {
5797 ewma = dequeued;
5798 goto done;
5799 }
5800
5801 /*
5802 * Skip update of task's estimated utilization when its members are
5803 * already ~1% close to its last activation value.
5804 */
5805 last_ewma_diff = ewma - dequeued;
5806 if (last_ewma_diff < UTIL_EST_MARGIN)
5807 goto done;
5808
5809 /*
5810 * To avoid underestimate of task utilization, skip updates of EWMA if
5811 * we cannot grant that thread got all CPU time it wanted.
5812 */
5813 if ((dequeued + UTIL_EST_MARGIN) < READ_ONCE(se->avg.runnable_avg))
5814 goto done;
5815
5816 /*
5817 * Update Task's estimated utilization
5818 *
5819 * When *p completes an activation we can consolidate another sample
5820 * of the task size. This is done by using this value to update the
5821 * Exponential Weighted Moving Average (EWMA):
5822 *
5823 * ewma(t) = w * task_util(p) + (1-w) * ewma(t-1)
5824 * = w * task_util(p) + ewma(t-1) - w * ewma(t-1)
5825 * = w * (task_util(p) - ewma(t-1)) + ewma(t-1)
5826 * = w * ( -last_ewma_diff ) + ewma(t-1)
5827 * = w * (-last_ewma_diff + ewma(t-1) / w)
5828 *
5829 * Where 'w' is the weight of new samples, which is configured to be
5830 * 0.25, thus making w=1/4 ( >>= UTIL_EST_WEIGHT_SHIFT)
5831 */
5832 ewma <<= UTIL_EST_WEIGHT_SHIFT;
5833 ewma -= last_ewma_diff;
5834 ewma >>= UTIL_EST_WEIGHT_SHIFT;
5835 done:
5836 ewma |= UTIL_AVG_UNCHANGED;
5837 WRITE_ONCE(se->avg.util_est, ewma);
5838
5839 trace_sched_util_est_se_tp(se);
5840 }
5841
5842 /*
5843 * Optional action to be done while updating the load average
5844 */
5845 #define UPDATE_TG 0x01
5846 #define SKIP_AGE_LOAD 0x02
5847 #define DO_ATTACH 0x04
5848 #define DO_DETACH 0x08
5849 #define UPDATE_UTIL_EST 0x10
5850
5851 /* Update task and its cfs_rq load average */
update_load_avg(struct cfs_rq * cfs_rq,struct sched_entity * se,int flags)5852 static inline void update_load_avg(struct cfs_rq *cfs_rq, struct sched_entity *se, int flags)
5853 {
5854 u64 now = cfs_rq_clock_pelt(cfs_rq);
5855 int decayed;
5856
5857 /*
5858 * Track task load average for carrying it to new CPU after migrated, and
5859 * track group sched_entity load average for task_h_load calculation in migration
5860 */
5861 if (se->avg.last_update_time && !(flags & SKIP_AGE_LOAD))
5862 __update_load_avg_se(now, cfs_rq, se);
5863
5864 decayed = update_cfs_rq_load_avg(now, cfs_rq);
5865 decayed |= propagate_entity_load_avg(se);
5866
5867 if (!se->avg.last_update_time && (flags & DO_ATTACH)) {
5868
5869 /*
5870 * DO_ATTACH means we're here from enqueue_entity().
5871 * !last_update_time means we've passed through
5872 * migrate_task_rq_fair() indicating we migrated.
5873 *
5874 * IOW we're enqueueing a task on a new CPU.
5875 */
5876 attach_entity_load_avg(cfs_rq, se);
5877 update_tg_load_avg(cfs_rq);
5878
5879 } else if (flags & DO_DETACH) {
5880 /*
5881 * DO_DETACH means we're here from dequeue_entity()
5882 * and we are migrating task out of the CPU.
5883 */
5884 detach_entity_load_avg(cfs_rq, se);
5885 update_tg_load_avg(cfs_rq);
5886 } else if (decayed) {
5887 cfs_rq_util_change(cfs_rq, 0);
5888
5889 if (flags & UPDATE_TG)
5890 update_tg_load_avg(cfs_rq);
5891 }
5892
5893 if (flags & UPDATE_UTIL_EST)
5894 util_est_update(se);
5895 }
5896
5897 /*
5898 * Synchronize entity load avg of dequeued entity without locking
5899 * the previous rq.
5900 */
sync_entity_load_avg(struct sched_entity * se)5901 static void sync_entity_load_avg(struct sched_entity *se)
5902 {
5903 struct cfs_rq *cfs_rq = cfs_rq_of(se);
5904 u64 last_update_time;
5905
5906 last_update_time = cfs_rq_last_update_time(cfs_rq);
5907 __update_load_avg_blocked_se(last_update_time, se);
5908 }
5909
5910 /*
5911 * Task first catches up with cfs_rq, and then subtract
5912 * itself from the cfs_rq (task must be off the queue now).
5913 */
remove_entity_load_avg(struct sched_entity * se)5914 static void remove_entity_load_avg(struct sched_entity *se)
5915 {
5916 struct cfs_rq *cfs_rq = cfs_rq_of(se);
5917 unsigned long flags;
5918
5919 /*
5920 * tasks cannot exit without having gone through wake_up_new_task() ->
5921 * enqueue_task_fair() which will have added things to the cfs_rq,
5922 * so we can remove unconditionally.
5923 */
5924
5925 sync_entity_load_avg(se);
5926
5927 raw_spin_lock_irqsave(&cfs_rq->removed.lock, flags);
5928 ++cfs_rq->removed.nr;
5929 cfs_rq->removed.util_avg += se->avg.util_avg;
5930 cfs_rq->removed.load_avg += se->avg.load_avg;
5931 cfs_rq->removed.runnable_avg += se->avg.runnable_avg;
5932 raw_spin_unlock_irqrestore(&cfs_rq->removed.lock, flags);
5933 }
5934
cfs_rq_runnable_avg(struct cfs_rq * cfs_rq)5935 static inline unsigned long cfs_rq_runnable_avg(struct cfs_rq *cfs_rq)
5936 {
5937 return cfs_rq->avg.runnable_avg;
5938 }
5939
cfs_rq_load_avg(struct cfs_rq * cfs_rq)5940 static inline unsigned long cfs_rq_load_avg(struct cfs_rq *cfs_rq)
5941 {
5942 return cfs_rq->avg.load_avg;
5943 }
5944
5945 static int sched_balance_newidle(struct rq *this_rq, struct rq_flags *rf)
5946 __must_hold(__rq_lockp(this_rq));
5947
task_util(struct task_struct * p)5948 static inline unsigned long task_util(struct task_struct *p)
5949 {
5950 return READ_ONCE(p->se.avg.util_avg);
5951 }
5952
_task_util_est(struct task_struct * p)5953 static inline unsigned long _task_util_est(struct task_struct *p)
5954 {
5955 return READ_ONCE(p->se.avg.util_est) & ~UTIL_AVG_UNCHANGED;
5956 }
5957
task_util_est(struct task_struct * p)5958 static inline unsigned long task_util_est(struct task_struct *p)
5959 {
5960 return max(task_util(p), _task_util_est(p));
5961 }
5962
util_est_enqueue(struct cfs_rq * cfs_rq,struct task_struct * p)5963 static inline void util_est_enqueue(struct cfs_rq *cfs_rq,
5964 struct task_struct *p)
5965 {
5966 unsigned int enqueued;
5967
5968 if (!sched_feat(UTIL_EST))
5969 return;
5970
5971 /* Update root cfs_rq's estimated utilization */
5972 enqueued = cfs_rq->avg.util_est;
5973 enqueued += _task_util_est(p);
5974 WRITE_ONCE(cfs_rq->avg.util_est, enqueued);
5975
5976 trace_sched_util_est_cfs_tp(cfs_rq);
5977 }
5978
util_est_dequeue(struct cfs_rq * cfs_rq,struct task_struct * p)5979 static inline void util_est_dequeue(struct cfs_rq *cfs_rq,
5980 struct task_struct *p)
5981 {
5982 unsigned int enqueued;
5983
5984 if (!sched_feat(UTIL_EST))
5985 return;
5986
5987 /* Update root cfs_rq's estimated utilization */
5988 enqueued = cfs_rq->avg.util_est;
5989 enqueued -= min_t(unsigned int, enqueued, _task_util_est(p));
5990 WRITE_ONCE(cfs_rq->avg.util_est, enqueued);
5991
5992 trace_sched_util_est_cfs_tp(cfs_rq);
5993 }
5994
get_actual_cpu_capacity(int cpu)5995 static inline unsigned long get_actual_cpu_capacity(int cpu)
5996 {
5997 unsigned long capacity = arch_scale_cpu_capacity(cpu);
5998
5999 capacity -= max(hw_load_avg(cpu_rq(cpu)), cpufreq_get_pressure(cpu));
6000
6001 return capacity;
6002 }
6003
util_fits_cpu(unsigned long util,unsigned long uclamp_min,unsigned long uclamp_max,int cpu)6004 static inline int util_fits_cpu(unsigned long util,
6005 unsigned long uclamp_min,
6006 unsigned long uclamp_max,
6007 int cpu)
6008 {
6009 unsigned long capacity = capacity_of(cpu);
6010 unsigned long capacity_orig;
6011 bool fits, uclamp_max_fits;
6012
6013 /*
6014 * Check if the real util fits without any uclamp boost/cap applied.
6015 */
6016 fits = fits_capacity(util, capacity);
6017
6018 if (!uclamp_is_used())
6019 return fits;
6020
6021 /*
6022 * We must use arch_scale_cpu_capacity() for comparing against uclamp_min and
6023 * uclamp_max. We only care about capacity pressure (by using
6024 * capacity_of()) for comparing against the real util.
6025 *
6026 * If a task is boosted to 1024 for example, we don't want a tiny
6027 * pressure to skew the check whether it fits a CPU or not.
6028 *
6029 * Similarly if a task is capped to arch_scale_cpu_capacity(little_cpu), it
6030 * should fit a little cpu even if there's some pressure.
6031 *
6032 * Only exception is for HW or cpufreq pressure since it has a direct impact
6033 * on available OPP of the system.
6034 *
6035 * We honour it for uclamp_min only as a drop in performance level
6036 * could result in not getting the requested minimum performance level.
6037 *
6038 * For uclamp_max, we can tolerate a drop in performance level as the
6039 * goal is to cap the task. So it's okay if it's getting less.
6040 */
6041 capacity_orig = arch_scale_cpu_capacity(cpu);
6042
6043 /*
6044 * We want to force a task to fit a cpu as implied by uclamp_max.
6045 * But we do have some corner cases to cater for..
6046 *
6047 *
6048 * C=z
6049 * | ___
6050 * | C=y | |
6051 * |_ _ _ _ _ _ _ _ _ ___ _ _ _ | _ | _ _ _ _ _ uclamp_max
6052 * | C=x | | | |
6053 * | ___ | | | |
6054 * | | | | | | | (util somewhere in this region)
6055 * | | | | | | |
6056 * | | | | | | |
6057 * +----------------------------------------
6058 * CPU0 CPU1 CPU2
6059 *
6060 * In the above example if a task is capped to a specific performance
6061 * point, y, then when:
6062 *
6063 * * util = 80% of x then it does not fit on CPU0 and should migrate
6064 * to CPU1
6065 * * util = 80% of y then it is forced to fit on CPU1 to honour
6066 * uclamp_max request.
6067 *
6068 * which is what we're enforcing here. A task always fits if
6069 * uclamp_max <= capacity_orig. But when uclamp_max > capacity_orig,
6070 * the normal upmigration rules should withhold still.
6071 *
6072 * Only exception is when we are on max capacity, then we need to be
6073 * careful not to block overutilized state. This is so because:
6074 *
6075 * 1. There's no concept of capping at max_capacity! We can't go
6076 * beyond this performance level anyway.
6077 * 2. The system is being saturated when we're operating near
6078 * max capacity, it doesn't make sense to block overutilized.
6079 */
6080 uclamp_max_fits = (capacity_orig == SCHED_CAPACITY_SCALE) && (uclamp_max == SCHED_CAPACITY_SCALE);
6081 uclamp_max_fits = !uclamp_max_fits && (uclamp_max <= capacity_orig);
6082 fits = fits || uclamp_max_fits;
6083
6084 /*
6085 *
6086 * C=z
6087 * | ___ (region a, capped, util >= uclamp_max)
6088 * | C=y | |
6089 * |_ _ _ _ _ _ _ _ _ ___ _ _ _ | _ | _ _ _ _ _ uclamp_max
6090 * | C=x | | | |
6091 * | ___ | | | | (region b, uclamp_min <= util <= uclamp_max)
6092 * |_ _ _|_ _|_ _ _ _| _ | _ _ _| _ | _ _ _ _ _ uclamp_min
6093 * | | | | | | |
6094 * | | | | | | | (region c, boosted, util < uclamp_min)
6095 * +----------------------------------------
6096 * CPU0 CPU1 CPU2
6097 *
6098 * a) If util > uclamp_max, then we're capped, we don't care about
6099 * actual fitness value here. We only care if uclamp_max fits
6100 * capacity without taking margin/pressure into account.
6101 * See comment above.
6102 *
6103 * b) If uclamp_min <= util <= uclamp_max, then the normal
6104 * fits_capacity() rules apply. Except we need to ensure that we
6105 * enforce we remain within uclamp_max, see comment above.
6106 *
6107 * c) If util < uclamp_min, then we are boosted. Same as (b) but we
6108 * need to take into account the boosted value fits the CPU without
6109 * taking margin/pressure into account.
6110 *
6111 * Cases (a) and (b) are handled in the 'fits' variable already. We
6112 * just need to consider an extra check for case (c) after ensuring we
6113 * handle the case uclamp_min > uclamp_max.
6114 */
6115 uclamp_min = min(uclamp_min, uclamp_max);
6116 if (fits && (util < uclamp_min) &&
6117 (uclamp_min > get_actual_cpu_capacity(cpu)))
6118 return -1;
6119
6120 return fits;
6121 }
6122
task_fits_cpu(struct task_struct * p,int cpu)6123 static inline int task_fits_cpu(struct task_struct *p, int cpu)
6124 {
6125 unsigned long uclamp_min = uclamp_eff_value(p, UCLAMP_MIN);
6126 unsigned long uclamp_max = uclamp_eff_value(p, UCLAMP_MAX);
6127 unsigned long util = task_util_est(p);
6128 /*
6129 * Return true only if the cpu fully fits the task requirements, which
6130 * include the utilization but also the performance hints.
6131 */
6132 return (util_fits_cpu(util, uclamp_min, uclamp_max, cpu) > 0);
6133 }
6134
update_misfit_status(struct task_struct * p,struct rq * rq)6135 static inline void update_misfit_status(struct task_struct *p, struct rq *rq)
6136 {
6137 int cpu = cpu_of(rq);
6138
6139 if (!sched_asym_cpucap_active())
6140 return;
6141
6142 /*
6143 * Affinity allows us to go somewhere higher? Or are we on biggest
6144 * available CPU already? Or do we fit into this CPU ?
6145 */
6146 if (!p || (p->nr_cpus_allowed == 1) ||
6147 (arch_scale_cpu_capacity(cpu) == p->max_allowed_capacity) ||
6148 task_fits_cpu(p, cpu)) {
6149
6150 rq->misfit_task_load = 0;
6151 return;
6152 }
6153
6154 /*
6155 * Make sure that misfit_task_load will not be null even if
6156 * task_h_load() returns 0.
6157 */
6158 rq->misfit_task_load = max_t(unsigned long, task_h_load(p), 1);
6159 }
6160
__setparam_fair(struct task_struct * p,const struct sched_attr * attr)6161 void __setparam_fair(struct task_struct *p, const struct sched_attr *attr)
6162 {
6163 struct sched_entity *se = &p->se;
6164
6165 p->static_prio = NICE_TO_PRIO(attr->sched_nice);
6166 if (attr->sched_runtime) {
6167 se->custom_slice = 1;
6168 se->slice = clamp_t(u64, attr->sched_runtime,
6169 NSEC_PER_MSEC/10, /* HZ=1000 * 10 */
6170 NSEC_PER_MSEC*100); /* HZ=100 / 10 */
6171 } else {
6172 se->custom_slice = 0;
6173 se->slice = sysctl_sched_base_slice;
6174 }
6175 }
6176
6177 static void
place_entity(struct cfs_rq * cfs_rq,struct sched_entity * se,int flags)6178 place_entity(struct cfs_rq *cfs_rq, struct sched_entity *se, int flags)
6179 {
6180 u64 vslice, vruntime = avg_vruntime(cfs_rq);
6181 unsigned int nr_queued = cfs_rq->h_nr_queued;
6182 bool update_zero = false;
6183 s64 lag = 0;
6184
6185 if (!se->custom_slice)
6186 se->slice = sysctl_sched_base_slice;
6187 vslice = calc_delta_fair(se->slice, se);
6188
6189 if (flags & ENQUEUE_QUEUED)
6190 nr_queued -= 1;
6191
6192 /*
6193 * Due to how V is constructed as the weighted average of entities,
6194 * adding tasks with positive lag, or removing tasks with negative lag
6195 * will move 'time' backwards, this can screw around with the lag of
6196 * other tasks.
6197 *
6198 * EEVDF: placement strategy #1 / #2
6199 */
6200 if (sched_feat(PLACE_LAG) && nr_queued && se->vlag) {
6201 struct sched_entity *curr = cfs_rq->curr;
6202 long load, weight;
6203
6204 lag = se->vlag;
6205
6206 /*
6207 * If we want to place a task and preserve lag, we have to
6208 * consider the effect of the new entity on the weighted
6209 * average and compensate for this, otherwise lag can quickly
6210 * evaporate.
6211 *
6212 * Lag is defined as:
6213 *
6214 * lag_i = S - s_i = w_i * (V - v_i)
6215 *
6216 * To avoid the 'w_i' term all over the place, we only track
6217 * the virtual lag:
6218 *
6219 * vl_i = V - v_i <=> v_i = V - vl_i
6220 *
6221 * And we take V to be the weighted average of all v:
6222 *
6223 * V = (\Sum w_j*v_j) / W
6224 *
6225 * Where W is: \Sum w_j
6226 *
6227 * Then, the weighted average after adding an entity with lag
6228 * vl_i is given by:
6229 *
6230 * V' = (\Sum w_j*v_j + w_i*v_i) / (W + w_i)
6231 * = (W*V + w_i*(V - vl_i)) / (W + w_i)
6232 * = (W*V + w_i*V - w_i*vl_i) / (W + w_i)
6233 * = (V*(W + w_i) - w_i*vl_i) / (W + w_i)
6234 * = V - w_i*vl_i / (W + w_i)
6235 *
6236 * And the actual lag after adding an entity with vl_i is:
6237 *
6238 * vl'_i = V' - v_i
6239 * = V - w_i*vl_i / (W + w_i) - (V - vl_i)
6240 * = vl_i - w_i*vl_i / (W + w_i)
6241 *
6242 * Which is strictly less than vl_i. So in order to preserve lag
6243 * we should inflate the lag before placement such that the
6244 * effective lag after placement comes out right.
6245 *
6246 * As such, invert the above relation for vl'_i to get the vl_i
6247 * we need to use such that the lag after placement is the lag
6248 * we computed before dequeue.
6249 *
6250 * vl'_i = vl_i - w_i*vl_i / (W + w_i)
6251 * = ((W + w_i)*vl_i - w_i*vl_i) / (W + w_i)
6252 *
6253 * (W + w_i)*vl'_i = (W + w_i)*vl_i - w_i*vl_i
6254 * = W*vl_i
6255 *
6256 * vl_i = (W + w_i)*vl'_i / W
6257 */
6258 load = cfs_rq->sum_weight;
6259 if (curr && curr->on_rq)
6260 load += avg_vruntime_weight(cfs_rq, curr->h_load.weight);
6261
6262 weight = avg_vruntime_weight(cfs_rq, se->h_load.weight);
6263 lag *= load + weight;
6264 if (WARN_ON_ONCE(!load))
6265 load = 1;
6266 lag = div64_long(lag, load);
6267
6268 /*
6269 * A heavy entity (relative to the tree) will pull the
6270 * avg_vruntime close to its vruntime position on enqueue. But
6271 * the zero_vruntime point is only updated at the next
6272 * update_deadline()/place_entity()/update_entity_lag().
6273 *
6274 * Specifically (see the comment near avg_vruntime_weight()):
6275 *
6276 * sum_w_vruntime = \Sum (v_i - v0) * w_i
6277 *
6278 * Note that if v0 is near a light entity, both terms will be
6279 * small for the light entity, while in that case both terms
6280 * are large for the heavy entity, leading to risk of
6281 * overflow.
6282 *
6283 * OTOH if v0 is near the heavy entity, then the difference is
6284 * larger for the light entity, but the factor is small, while
6285 * for the heavy entity the difference is small but the factor
6286 * is large. Avoiding the multiplication overflow.
6287 */
6288 if (weight > load)
6289 update_zero = true;
6290 }
6291
6292 se->vruntime = vruntime - lag;
6293
6294 if (update_zero)
6295 update_zero_vruntime(cfs_rq, -lag);
6296
6297 if (sched_feat(PLACE_REL_DEADLINE) && se->rel_deadline) {
6298 se->deadline += se->vruntime;
6299 se->rel_deadline = 0;
6300 return;
6301 }
6302
6303 /*
6304 * When joining the competition; the existing tasks will be,
6305 * on average, halfway through their slice, as such start tasks
6306 * off with half a slice to ease into the competition.
6307 */
6308 if (sched_feat(PLACE_DEADLINE_INITIAL) && (flags & ENQUEUE_INITIAL))
6309 vslice /= 2;
6310
6311 /*
6312 * EEVDF: vd_i = ve_i + r_i/w_i
6313 */
6314 se->deadline = se->vruntime + vslice;
6315 }
6316
6317 static void check_enqueue_throttle(struct cfs_rq *cfs_rq);
6318 static inline int cfs_rq_throttled(struct cfs_rq *cfs_rq);
6319
6320 static void
enqueue_entity(struct cfs_rq * cfs_rq,struct sched_entity * se,int flags)6321 enqueue_entity(struct cfs_rq *cfs_rq, struct sched_entity *se, int flags)
6322 {
6323 /*
6324 * When enqueuing a sched_entity, we must:
6325 * - Update loads to have both entity and cfs_rq synced with now.
6326 * - For group_entity, update its runnable_weight to reflect the new
6327 * h_nr_runnable of its group cfs_rq.
6328 * - For group_entity, update its weight to reflect the new share of
6329 * its group cfs_rq
6330 * - Add its new weight to cfs_rq->load.weight
6331 */
6332 update_load_avg(cfs_rq, se, UPDATE_TG | DO_ATTACH);
6333 se_update_runnable(se);
6334 /*
6335 * XXX update_load_avg() above will have attached us to the pelt sum;
6336 * but update_cfs_group() here will re-adjust the weight and have to
6337 * undo/redo all that. Seems wasteful.
6338 */
6339 update_cfs_group(se);
6340
6341 account_entity_enqueue(cfs_rq, se);
6342
6343 /* Entity has migrated, no longer consider this task hot */
6344 if (flags & ENQUEUE_MIGRATED)
6345 se->exec_start = 0;
6346
6347 check_schedstat_required();
6348 update_stats_enqueue_fair(cfs_rq, se, flags);
6349 se->on_rq = 1;
6350
6351 if (cfs_rq->nr_queued == 1) {
6352 check_enqueue_throttle(cfs_rq);
6353 list_add_leaf_cfs_rq(cfs_rq);
6354 #ifdef CONFIG_CFS_BANDWIDTH
6355 if (cfs_rq->pelt_clock_throttled) {
6356 struct rq *rq = rq_of(cfs_rq);
6357
6358 cfs_rq->throttled_clock_pelt_time += rq_clock_pelt(rq) -
6359 cfs_rq->throttled_clock_pelt;
6360 cfs_rq->pelt_clock_throttled = 0;
6361 }
6362 #endif
6363 }
6364 }
6365
set_next_buddy(struct cfs_rq * cfs_rq,struct sched_entity * se)6366 static void set_next_buddy(struct cfs_rq *cfs_rq, struct sched_entity *se)
6367 {
6368 if (WARN_ON_ONCE(!se->on_rq || se->sched_delayed))
6369 return;
6370 if (se_is_idle(se))
6371 return;
6372 cfs_rq->next = se;
6373 }
6374
clear_buddies(struct cfs_rq * cfs_rq,struct sched_entity * se)6375 static void clear_buddies(struct cfs_rq *cfs_rq, struct sched_entity *se)
6376 {
6377 if (cfs_rq->next == se)
6378 cfs_rq->next = NULL;
6379 }
6380
6381 static __always_inline void return_cfs_rq_runtime(struct cfs_rq *cfs_rq);
6382
set_delayed(struct sched_entity * se)6383 static void set_delayed(struct sched_entity *se)
6384 {
6385 se->sched_delayed = 1;
6386
6387 /*
6388 * Delayed se of cfs_rq have no tasks queued on them.
6389 * Do not adjust h_nr_runnable since __dequeue_task()
6390 * will account it for blocked tasks.
6391 */
6392 if (!entity_is_task(se))
6393 return;
6394
6395 for_each_sched_entity(se) {
6396 struct cfs_rq *cfs_rq = cfs_rq_of(se);
6397
6398 cfs_rq->h_nr_runnable--;
6399 }
6400 }
6401
clear_delayed(struct sched_entity * se)6402 static void clear_delayed(struct sched_entity *se)
6403 {
6404 se->sched_delayed = 0;
6405
6406 /*
6407 * Delayed se of cfs_rq have no tasks queued on them.
6408 * Do not adjust h_nr_runnable since a dequeue has
6409 * already accounted for it or an enqueue of a task
6410 * below it will account for it in enqueue_task_fair().
6411 */
6412 if (!entity_is_task(se))
6413 return;
6414
6415 for_each_sched_entity(se) {
6416 struct cfs_rq *cfs_rq = cfs_rq_of(se);
6417
6418 cfs_rq->h_nr_runnable++;
6419 }
6420 }
6421
6422 static void
dequeue_entity(struct cfs_rq * cfs_rq,struct sched_entity * se,int flags)6423 dequeue_entity(struct cfs_rq *cfs_rq, struct sched_entity *se, int flags)
6424 {
6425 int action = UPDATE_TG;
6426
6427 if (entity_is_task(se)) {
6428 if (task_on_rq_migrating(task_of(se)))
6429 action |= DO_DETACH;
6430
6431 if ((flags & DEQUEUE_SLEEP) && !(flags & DEQUEUE_DELAYED))
6432 action |= UPDATE_UTIL_EST;
6433 }
6434
6435 /*
6436 * When dequeuing a sched_entity, we must:
6437 * - Update loads to have both entity and cfs_rq synced with now.
6438 * - For group_entity, update its runnable_weight to reflect the new
6439 * h_nr_runnable of its group cfs_rq.
6440 * - Subtract its previous weight from cfs_rq->load.weight.
6441 * - For group entity, update its weight to reflect the new share
6442 * of its group cfs_rq.
6443 */
6444 update_load_avg(cfs_rq, se, action);
6445 se_update_runnable(se);
6446
6447 update_stats_dequeue_fair(cfs_rq, se, flags);
6448
6449 se->on_rq = 0;
6450 account_entity_dequeue(cfs_rq, se);
6451
6452 /* return excess runtime on last dequeue */
6453 return_cfs_rq_runtime(cfs_rq);
6454
6455 update_cfs_group(se);
6456
6457 if (cfs_rq->nr_queued == 0) {
6458 update_idle_cfs_rq_clock_pelt(cfs_rq);
6459 #ifdef CONFIG_CFS_BANDWIDTH
6460 if (throttled_hierarchy(cfs_rq)) {
6461 struct rq *rq = rq_of(cfs_rq);
6462
6463 list_del_leaf_cfs_rq(cfs_rq);
6464 cfs_rq->throttled_clock_pelt = rq_clock_pelt(rq);
6465 cfs_rq->pelt_clock_throttled = 1;
6466 }
6467 #endif
6468 }
6469 }
6470
6471 static void
set_next_entity(struct cfs_rq * cfs_rq,struct sched_entity * se)6472 set_next_entity(struct cfs_rq *cfs_rq, struct sched_entity *se)
6473 {
6474 /* 'current' is not kept within the tree. */
6475 if (se->on_rq) {
6476 /*
6477 * Any task has to be enqueued before it get to execute on
6478 * a CPU. So account for the time it spent waiting on the
6479 * runqueue.
6480 */
6481 update_stats_wait_end_fair(cfs_rq, se);
6482 update_load_avg(cfs_rq, se, UPDATE_TG);
6483 }
6484
6485 update_stats_curr_start(cfs_rq, se);
6486 WARN_ON_ONCE(cfs_rq->h_curr);
6487 cfs_rq->h_curr = se;
6488
6489 /*
6490 * Track our maximum slice length, if the CPU's load is at
6491 * least twice that of our own weight (i.e. don't track it
6492 * when there are only lesser-weight tasks around):
6493 */
6494 if (schedstat_enabled() &&
6495 rq_of(cfs_rq)->cfs.load.weight >= 2*se->load.weight) {
6496 struct sched_statistics *stats;
6497
6498 stats = __schedstats_from_se(se);
6499 __schedstat_set(stats->slice_max,
6500 max((u64)stats->slice_max,
6501 se->sum_exec_runtime - se->prev_sum_exec_runtime));
6502 }
6503
6504 se->prev_sum_exec_runtime = se->sum_exec_runtime;
6505 }
6506
6507 static bool __dequeue_task(struct rq *rq, struct task_struct *p, int flags);
6508
6509 static struct sched_entity *
pick_next_entity(struct rq * rq,bool protect)6510 pick_next_entity(struct rq *rq, bool protect)
6511 {
6512 struct cfs_rq *cfs_rq = &rq->cfs;
6513 struct sched_entity *se;
6514
6515 se = pick_eevdf(cfs_rq, protect);
6516 if (se->sched_delayed) {
6517 __dequeue_task(rq, task_of(se), DEQUEUE_SLEEP | DEQUEUE_DELAYED);
6518 /*
6519 * Must not reference @se again, see __block_task().
6520 */
6521 return NULL;
6522 }
6523 return se;
6524 }
6525
put_prev_entity(struct cfs_rq * cfs_rq,struct sched_entity * prev)6526 static void put_prev_entity(struct cfs_rq *cfs_rq, struct sched_entity *prev)
6527 {
6528 /*
6529 * If still on the runqueue then deactivate_task()
6530 * was not called and update_curr() has to be done:
6531 */
6532 if (prev->on_rq)
6533 update_curr(cfs_rq);
6534
6535 if (prev->on_rq) {
6536 update_stats_wait_start_fair(cfs_rq, prev);
6537 /* in !on_rq case, update occurred at dequeue */
6538 update_load_avg(cfs_rq, prev, 0);
6539 }
6540 WARN_ON_ONCE(cfs_rq->h_curr != prev);
6541 cfs_rq->h_curr = NULL;
6542 }
6543
6544 static void
entity_tick(struct cfs_rq * cfs_rq,struct sched_entity * curr,int queued)6545 entity_tick(struct cfs_rq *cfs_rq, struct sched_entity *curr, int queued)
6546 {
6547 /*
6548 * Update run-time statistics of the 'current'.
6549 */
6550 update_curr(cfs_rq);
6551
6552 /*
6553 * Ensure that runnable average is periodically updated.
6554 */
6555 update_load_avg(cfs_rq, curr, UPDATE_TG);
6556 update_cfs_group(curr);
6557
6558 #ifdef CONFIG_SCHED_HRTICK
6559 /*
6560 * queued ticks are scheduled to match the slice, so don't bother
6561 * validating it and just reschedule.
6562 */
6563 if (queued) {
6564 resched_curr(rq_of(cfs_rq));
6565 return;
6566 }
6567 #endif
6568 }
6569
6570
6571 /**************************************************
6572 * CFS bandwidth control machinery
6573 */
6574
6575 #ifdef CONFIG_CFS_BANDWIDTH
6576
6577 #ifdef CONFIG_JUMP_LABEL
6578 static struct static_key __cfs_bandwidth_used;
6579
cfs_bandwidth_used(void)6580 static inline bool cfs_bandwidth_used(void)
6581 {
6582 return static_key_false(&__cfs_bandwidth_used);
6583 }
6584
cfs_bandwidth_usage_inc(void)6585 void cfs_bandwidth_usage_inc(void)
6586 {
6587 static_key_slow_inc_cpuslocked(&__cfs_bandwidth_used);
6588 }
6589
cfs_bandwidth_usage_dec(void)6590 void cfs_bandwidth_usage_dec(void)
6591 {
6592 static_key_slow_dec_cpuslocked(&__cfs_bandwidth_used);
6593 }
6594 #else /* !CONFIG_JUMP_LABEL: */
cfs_bandwidth_used(void)6595 static bool cfs_bandwidth_used(void)
6596 {
6597 return true;
6598 }
6599
cfs_bandwidth_usage_inc(void)6600 void cfs_bandwidth_usage_inc(void) {}
cfs_bandwidth_usage_dec(void)6601 void cfs_bandwidth_usage_dec(void) {}
6602 #endif /* !CONFIG_JUMP_LABEL */
6603
sched_cfs_bandwidth_slice(void)6604 static inline u64 sched_cfs_bandwidth_slice(void)
6605 {
6606 return (u64)sysctl_sched_cfs_bandwidth_slice * NSEC_PER_USEC;
6607 }
6608
6609 /*
6610 * Replenish runtime according to assigned quota. We use sched_clock_cpu
6611 * directly instead of rq->clock to avoid adding additional synchronization
6612 * around rq->lock.
6613 *
6614 * requires cfs_b->lock
6615 */
__refill_cfs_bandwidth_runtime(struct cfs_bandwidth * cfs_b)6616 void __refill_cfs_bandwidth_runtime(struct cfs_bandwidth *cfs_b)
6617 {
6618 s64 runtime;
6619
6620 if (unlikely(cfs_b->quota == RUNTIME_INF))
6621 return;
6622
6623 cfs_b->runtime += cfs_b->quota;
6624 runtime = cfs_b->runtime_snap - cfs_b->runtime;
6625 if (runtime > 0) {
6626 cfs_b->burst_time += runtime;
6627 cfs_b->nr_burst++;
6628 }
6629
6630 cfs_b->runtime = min(cfs_b->runtime, cfs_b->quota + cfs_b->burst);
6631 cfs_b->runtime_snap = cfs_b->runtime;
6632 }
6633
tg_cfs_bandwidth(struct task_group * tg)6634 static inline struct cfs_bandwidth *tg_cfs_bandwidth(struct task_group *tg)
6635 {
6636 return &tg->cfs_bandwidth;
6637 }
6638
6639 /* returns 0 on failure to allocate runtime */
__assign_cfs_rq_runtime(struct cfs_bandwidth * cfs_b,struct cfs_rq * cfs_rq,u64 target_runtime)6640 static int __assign_cfs_rq_runtime(struct cfs_bandwidth *cfs_b,
6641 struct cfs_rq *cfs_rq, u64 target_runtime)
6642 {
6643 u64 min_amount, amount = 0;
6644
6645 lockdep_assert_held(&cfs_b->lock);
6646
6647 /* note: this is a positive sum as runtime_remaining <= 0 */
6648 min_amount = target_runtime - cfs_rq->runtime_remaining;
6649
6650 if (cfs_b->quota == RUNTIME_INF)
6651 amount = min_amount;
6652 else {
6653 start_cfs_bandwidth(cfs_b);
6654
6655 if (cfs_b->runtime > 0) {
6656 amount = min(cfs_b->runtime, min_amount);
6657 cfs_b->runtime -= amount;
6658 cfs_b->idle = 0;
6659 }
6660 }
6661
6662 cfs_rq->runtime_remaining += amount;
6663
6664 return cfs_rq->runtime_remaining > 0;
6665 }
6666
6667 static bool throttle_cfs_rq(struct cfs_rq *cfs_rq);
6668
__account_cfs_rq_runtime(struct cfs_rq * cfs_rq,u64 delta_exec)6669 static bool __account_cfs_rq_runtime(struct cfs_rq *cfs_rq, u64 delta_exec)
6670 {
6671 /* dock delta_exec before expiring quota (as it could span periods) */
6672 cfs_rq->runtime_remaining -= delta_exec;
6673
6674 if (likely(cfs_rq->runtime_remaining > 0))
6675 return false;
6676
6677 if (cfs_rq->throttled)
6678 return true;
6679 /*
6680 * throttle_cfs_rq() will try to extend the runtime first
6681 * before throttling the hierarchy.
6682 */
6683 return throttle_cfs_rq(cfs_rq);
6684 }
6685
6686 static __always_inline
account_cfs_rq_runtime(struct cfs_rq * cfs_rq,u64 delta_exec)6687 bool account_cfs_rq_runtime(struct cfs_rq *cfs_rq, u64 delta_exec)
6688 {
6689 if (!cfs_bandwidth_used() || !cfs_rq->runtime_enabled)
6690 return false;
6691
6692 return __account_cfs_rq_runtime(cfs_rq, delta_exec);
6693 }
6694
cfs_rq_throttled(struct cfs_rq * cfs_rq)6695 static inline int cfs_rq_throttled(struct cfs_rq *cfs_rq)
6696 {
6697 return cfs_bandwidth_used() && cfs_rq->throttled;
6698 }
6699
cfs_rq_pelt_clock_throttled(struct cfs_rq * cfs_rq)6700 static inline bool cfs_rq_pelt_clock_throttled(struct cfs_rq *cfs_rq)
6701 {
6702 return cfs_bandwidth_used() && cfs_rq->pelt_clock_throttled;
6703 }
6704
6705 /* check whether cfs_rq, or any parent, is throttled */
throttled_hierarchy(struct cfs_rq * cfs_rq)6706 static inline int throttled_hierarchy(struct cfs_rq *cfs_rq)
6707 {
6708 return cfs_bandwidth_used() && cfs_rq->throttle_count;
6709 }
6710
lb_throttled_hierarchy(struct task_struct * p,int dst_cpu)6711 static inline int lb_throttled_hierarchy(struct task_struct *p, int dst_cpu)
6712 {
6713 return throttled_hierarchy(tg_cfs_rq(task_group(p), dst_cpu));
6714 }
6715
task_is_throttled(struct task_struct * p)6716 static inline bool task_is_throttled(struct task_struct *p)
6717 {
6718 return cfs_bandwidth_used() && p->throttled;
6719 }
6720
6721 static bool dequeue_task_fair(struct rq *rq, struct task_struct *p, int flags);
throttle_cfs_rq_work(struct callback_head * work)6722 static void throttle_cfs_rq_work(struct callback_head *work)
6723 {
6724 struct task_struct *p = container_of(work, struct task_struct, sched_throttle_work);
6725 struct sched_entity *se;
6726 struct cfs_rq *cfs_rq;
6727 struct rq *rq;
6728
6729 WARN_ON_ONCE(p != current);
6730 p->sched_throttle_work.next = &p->sched_throttle_work;
6731
6732 /*
6733 * If task is exiting, then there won't be a return to userspace, so we
6734 * don't have to bother with any of this.
6735 */
6736 if ((p->flags & PF_EXITING))
6737 return;
6738
6739 scoped_guard(task_rq_lock, p) {
6740 se = &p->se;
6741 cfs_rq = cfs_rq_of(se);
6742
6743 /* Raced, forget */
6744 if (p->sched_class != &fair_sched_class)
6745 return;
6746
6747 /*
6748 * If not in limbo, then either replenish has happened or this
6749 * task got migrated out of the throttled cfs_rq, move along.
6750 */
6751 if (!cfs_rq->throttle_count)
6752 return;
6753 rq = scope.rq;
6754 update_rq_clock(rq);
6755 WARN_ON_ONCE(p->throttled || !list_empty(&p->throttle_node));
6756 dequeue_task_fair(rq, p, DEQUEUE_SLEEP | DEQUEUE_THROTTLE);
6757 list_add(&p->throttle_node, &cfs_rq->throttled_limbo_list);
6758 /*
6759 * Must not set throttled before dequeue or dequeue will
6760 * mistakenly regard this task as an already throttled one.
6761 */
6762 p->throttled = true;
6763 resched_curr(rq);
6764 }
6765 }
6766
init_cfs_throttle_work(struct task_struct * p)6767 void init_cfs_throttle_work(struct task_struct *p)
6768 {
6769 init_task_work(&p->sched_throttle_work, throttle_cfs_rq_work);
6770 /* Protect against double add, see throttle_cfs_rq() and throttle_cfs_rq_work() */
6771 p->sched_throttle_work.next = &p->sched_throttle_work;
6772 INIT_LIST_HEAD(&p->throttle_node);
6773 }
6774
6775 /*
6776 * Task is throttled and someone wants to dequeue it again:
6777 * it could be sched/core when core needs to do things like
6778 * task affinity change, task group change, task sched class
6779 * change etc. and in these cases, DEQUEUE_SLEEP is not set;
6780 * or the task is blocked after throttled due to freezer etc.
6781 * and in these cases, DEQUEUE_SLEEP is set.
6782 */
6783 static void detach_task_cfs_rq(struct task_struct *p);
dequeue_throttled_task(struct task_struct * p,int flags)6784 static void dequeue_throttled_task(struct task_struct *p, int flags)
6785 {
6786 WARN_ON_ONCE(p->se.on_rq);
6787 list_del_init(&p->throttle_node);
6788
6789 /* task blocked after throttled */
6790 if (flags & DEQUEUE_SLEEP) {
6791 p->throttled = false;
6792 return;
6793 }
6794
6795 /*
6796 * task is migrating off its old cfs_rq, detach
6797 * the task's load from its old cfs_rq.
6798 */
6799 if (task_on_rq_migrating(p))
6800 detach_task_cfs_rq(p);
6801 }
6802
enqueue_throttled_task(struct task_struct * p)6803 static bool enqueue_throttled_task(struct task_struct *p)
6804 {
6805 struct cfs_rq *cfs_rq = cfs_rq_of(&p->se);
6806
6807 /* @p should have gone through dequeue_throttled_task() first */
6808 WARN_ON_ONCE(!list_empty(&p->throttle_node));
6809
6810 /*
6811 * If the throttled task @p is enqueued to a throttled cfs_rq,
6812 * take the fast path by directly putting the task on the
6813 * target cfs_rq's limbo list.
6814 *
6815 * Do not do that when @p is current because the following race can
6816 * cause @p's group_node to be incorectly re-insterted in its rq's
6817 * cfs_tasks list, despite being throttled:
6818 *
6819 * cpuX cpuY
6820 * p ret2user
6821 * throttle_cfs_rq_work() sched_move_task(p)
6822 * LOCK task_rq_lock
6823 * dequeue_task_fair(p)
6824 * UNLOCK task_rq_lock
6825 * LOCK task_rq_lock
6826 * task_current_donor(p) == true
6827 * task_on_rq_queued(p) == true
6828 * dequeue_task(p)
6829 * put_prev_task(p)
6830 * sched_change_group()
6831 * enqueue_task(p) -> p's new cfs_rq
6832 * is throttled, go
6833 * fast path and skip
6834 * actual enqueue
6835 * set_next_task(p)
6836 * list_move(&se->group_node, &rq->cfs_tasks); // bug
6837 * schedule()
6838 *
6839 * In the above race case, @p current cfs_rq is in the same rq as
6840 * its previous cfs_rq because sched_move_task() only moves a task
6841 * to a different group from the same rq, so we can use its current
6842 * cfs_rq to derive rq and test if the task is current.
6843 */
6844 if (throttled_hierarchy(cfs_rq) &&
6845 !task_current_donor(rq_of(cfs_rq), p)) {
6846 list_add(&p->throttle_node, &cfs_rq->throttled_limbo_list);
6847 return true;
6848 }
6849
6850 /* we can't take the fast path, do an actual enqueue*/
6851 p->throttled = false;
6852 return false;
6853 }
6854
6855 static void enqueue_task_fair(struct rq *rq, struct task_struct *p, int flags);
tg_unthrottle_up(struct task_group * tg,void * data)6856 static int tg_unthrottle_up(struct task_group *tg, void *data)
6857 {
6858 struct rq *rq = data;
6859 struct cfs_rq *cfs_rq = tg_cfs_rq(tg, cpu_of(rq));
6860 struct task_struct *p, *tmp;
6861 LIST_HEAD(throttled_tasks);
6862
6863 /*
6864 * If cfs_rq->curr is set, the cfs_rq might not have caught up
6865 * since the last clock update. Do it now before we begin
6866 * queueing task onto it to save the need for unnecessarily
6867 * unthrottle the hierarchy for this cfs_rq to be throttled
6868 * right back again.
6869 */
6870 update_curr(cfs_rq);
6871
6872 if (--cfs_rq->throttle_count)
6873 return 0;
6874
6875 if (cfs_rq->pelt_clock_throttled) {
6876 cfs_rq->throttled_clock_pelt_time += rq_clock_pelt(rq) -
6877 cfs_rq->throttled_clock_pelt;
6878 cfs_rq->pelt_clock_throttled = 0;
6879 }
6880
6881 if (cfs_rq->throttled_clock_self) {
6882 u64 delta = rq_clock(rq) - cfs_rq->throttled_clock_self;
6883
6884 cfs_rq->throttled_clock_self = 0;
6885
6886 if (WARN_ON_ONCE((s64)delta < 0))
6887 delta = 0;
6888
6889 cfs_rq->throttled_clock_self_time += delta;
6890 }
6891
6892 /*
6893 * Move the tasks to a local list since an update_curr() during
6894 * enqueue_task_fair() can throttle a higher cfs_rq, and it can
6895 * see the "throttled_limbo_list" being non-empty in
6896 * tg_throttle_down() if throttle_count turned 0 above.
6897 */
6898 list_splice_init(&cfs_rq->throttled_limbo_list, &throttled_tasks);
6899
6900 /* Re-enqueue the tasks that have been throttled at this level. */
6901 list_for_each_entry_safe(p, tmp, &throttled_tasks, throttle_node) {
6902 /*
6903 * Back to being throttled! Break out and put the remaining
6904 * tasks back onto the limbo_list to prevent running them
6905 * unnecessarily.
6906 */
6907 if (cfs_rq->throttle_count)
6908 break;
6909
6910 list_del_init(&p->throttle_node);
6911 p->throttled = false;
6912 enqueue_task_fair(rq, p, ENQUEUE_WAKEUP);
6913 }
6914
6915 list_splice(&throttled_tasks, &cfs_rq->throttled_limbo_list);
6916
6917 /* Add cfs_rq with load or one or more already running entities to the list */
6918 if (!cfs_rq_is_decayed(cfs_rq))
6919 list_add_leaf_cfs_rq(cfs_rq);
6920
6921 return 0;
6922 }
6923
task_has_throttle_work(struct task_struct * p)6924 static inline bool task_has_throttle_work(struct task_struct *p)
6925 {
6926 return p->sched_throttle_work.next != &p->sched_throttle_work;
6927 }
6928
task_throttle_setup_work(struct task_struct * p)6929 static inline void task_throttle_setup_work(struct task_struct *p)
6930 {
6931 if (task_has_throttle_work(p))
6932 return;
6933
6934 /*
6935 * Kthreads and exiting tasks don't return to userspace, so adding the
6936 * work is pointless
6937 */
6938 if ((p->flags & (PF_EXITING | PF_KTHREAD)))
6939 return;
6940
6941 task_work_add(p, &p->sched_throttle_work, TWA_RESUME);
6942 }
6943
record_throttle_clock(struct cfs_rq * cfs_rq)6944 static void record_throttle_clock(struct cfs_rq *cfs_rq)
6945 {
6946 struct rq *rq = rq_of(cfs_rq);
6947
6948 if (cfs_rq_throttled(cfs_rq) && !cfs_rq->throttled_clock)
6949 cfs_rq->throttled_clock = rq_clock(rq);
6950
6951 if (!cfs_rq->throttled_clock_self)
6952 cfs_rq->throttled_clock_self = rq_clock(rq);
6953 }
6954
tg_throttle_down(struct task_group * tg,void * data)6955 static int tg_throttle_down(struct task_group *tg, void *data)
6956 {
6957 struct rq *rq = data;
6958 struct cfs_rq *cfs_rq = tg_cfs_rq(tg, cpu_of(rq));
6959
6960 if (cfs_rq->throttle_count++)
6961 return 0;
6962
6963 /*
6964 * For cfs_rqs that still have entities enqueued, PELT clock
6965 * stop happens at dequeue time when all entities are dequeued.
6966 */
6967 if (!cfs_rq->nr_queued) {
6968 list_del_leaf_cfs_rq(cfs_rq);
6969 cfs_rq->throttled_clock_pelt = rq_clock_pelt(rq);
6970 cfs_rq->pelt_clock_throttled = 1;
6971 }
6972
6973 WARN_ON_ONCE(cfs_rq->throttled_clock_self);
6974 WARN_ON_ONCE(!list_empty(&cfs_rq->throttled_limbo_list));
6975 return 0;
6976 }
6977
throttle_cfs_rq(struct cfs_rq * cfs_rq)6978 static bool throttle_cfs_rq(struct cfs_rq *cfs_rq)
6979 {
6980 struct cfs_bandwidth *cfs_b = tg_cfs_bandwidth(cfs_rq->tg);
6981 struct sched_entity *curr = cfs_rq->curr;
6982 struct rq *rq = rq_of(cfs_rq);
6983
6984 scoped_guard(raw_spinlock, &cfs_b->lock) {
6985 u64 target_runtime = 1;
6986
6987 /*
6988 * If cfs_rq->curr is still runnable, we are here from an
6989 * update_curr(). Request sysctl_sched_cfs_bandwidth_slice
6990 * worth of bandwidth to continue running.
6991 *
6992 * If the curr is not runnable, just request enough bandwidth
6993 * to be runnable next time the pick selects this cfs_rq.
6994 */
6995 if (curr && curr->on_rq)
6996 target_runtime = sched_cfs_bandwidth_slice();
6997
6998 /*
6999 * Check if We have raced with bandwidth becoming available. If
7000 * we actually throttled the timer might not unthrottle us for
7001 * an entire period. We additionally needed to make sure that
7002 * any subsequent check_cfs_rq_runtime calls agree not to
7003 * throttle us, as we may commit to do cfs put_prev+pick_next,
7004 * so we ask for 1ns of runtime rather than just check cfs_b.
7005 *
7006 * This will start the period timer if necessary.
7007 */
7008 if (__assign_cfs_rq_runtime(cfs_b, cfs_rq, target_runtime))
7009 return false;
7010
7011 /*
7012 * No bandwidth available; Add ourselves on the list to be
7013 * unthrottled later.
7014 */
7015 list_add_tail_rcu(&cfs_rq->throttled_list,
7016 &cfs_b->throttled_cfs_rq);
7017 }
7018
7019 /* freeze hierarchy runnable averages while throttled */
7020 scoped_guard(rcu)
7021 walk_tg_tree_from(cfs_rq->tg, tg_throttle_down, tg_nop, (void *)rq);
7022
7023 /*
7024 * Note: distribution will already see us throttled via the
7025 * throttled-list. rq->lock protects completion.
7026 */
7027 cfs_rq->throttled = 1;
7028 WARN_ON_ONCE(cfs_rq->throttled_clock);
7029
7030 /*
7031 * If current hierarchy was throttled, add throttle work to the
7032 * current donor. In case of proxy-execution, the execution
7033 * context cannot exit to the userspace while holding a mutex
7034 * and the rule of throttle deferral to only throttle the
7035 * throttled context at exit to userspace is still preserved.
7036 */
7037 if (curr && curr->on_rq)
7038 task_throttle_setup_work(rq->donor);
7039
7040 return true;
7041 }
7042
unthrottle_cfs_rq(struct cfs_rq * cfs_rq)7043 void unthrottle_cfs_rq(struct cfs_rq *cfs_rq)
7044 {
7045 struct rq *rq = rq_of(cfs_rq);
7046 struct cfs_bandwidth *cfs_b = tg_cfs_bandwidth(cfs_rq->tg);
7047 struct sched_entity *se = cfs_rq_se(cfs_rq);
7048
7049 /*
7050 * It's possible we are called with runtime_remaining < 0 due to things
7051 * like async unthrottled us with a positive runtime_remaining but other
7052 * still running entities consumed those runtime before we reached here.
7053 *
7054 * We can't unthrottle this cfs_rq without any runtime remaining because
7055 * any enqueue in tg_unthrottle_up() will immediately trigger a throttle,
7056 * which is not supposed to happen on unthrottle path.
7057 *
7058 * Catch up on the remaining runtime since last clock update before
7059 * checking runtime remaining.
7060 */
7061 update_curr(cfs_rq);
7062 if (cfs_rq->runtime_enabled && cfs_rq->runtime_remaining <= 0)
7063 return;
7064
7065 cfs_rq->throttled = 0;
7066
7067 scoped_guard(raw_spinlock, &cfs_b->lock) {
7068 list_del_rcu(&cfs_rq->throttled_list);
7069
7070 if (!cfs_rq->throttled_clock)
7071 break;
7072
7073 cfs_b->throttled_time += rq_clock(rq) - cfs_rq->throttled_clock;
7074 cfs_rq->throttled_clock = 0;
7075 }
7076
7077 /* update hierarchical throttle state */
7078 walk_tg_tree_from(cfs_rq->tg, tg_nop, tg_unthrottle_up, (void *)rq);
7079
7080 if (!cfs_rq->load.weight) {
7081 if (!cfs_rq->on_list)
7082 return;
7083 /*
7084 * Nothing to run but something to decay (on_list)?
7085 * Complete the branch.
7086 */
7087 for_each_sched_entity(se) {
7088 if (list_add_leaf_cfs_rq(cfs_rq_of(se)))
7089 break;
7090 }
7091 }
7092
7093 assert_list_leaf_cfs_rq(rq);
7094
7095 /* Determine whether we need to wake up potentially idle CPU: */
7096 if (rq->curr == rq->idle && rq->cfs.h_nr_queued)
7097 resched_curr(rq);
7098 }
7099
__cfsb_csd_unthrottle(void * arg)7100 static void __cfsb_csd_unthrottle(void *arg)
7101 {
7102 struct cfs_rq *cursor, *tmp;
7103 struct rq *rq = arg;
7104
7105 guard(rq_lock)(rq);
7106
7107 /*
7108 * Iterating over the list can trigger several call to
7109 * update_rq_clock() in unthrottle_cfs_rq().
7110 * Do it once and skip the potential next ones.
7111 */
7112 update_rq_clock(rq);
7113 rq_clock_start_loop_update(rq);
7114
7115 /*
7116 * Since we hold rq lock we're safe from concurrent manipulation of
7117 * the CSD list. However, this RCU critical section annotates the
7118 * fact that we pair with sched_free_group_rcu(), so that we cannot
7119 * race with group being freed in the window between removing it
7120 * from the list and advancing to the next entry in the list.
7121 */
7122 guard(rcu)();
7123
7124 list_for_each_entry_safe(cursor, tmp, &rq->cfsb_csd_list,
7125 throttled_csd_list) {
7126 list_del_init(&cursor->throttled_csd_list);
7127
7128 if (cfs_rq_throttled(cursor))
7129 unthrottle_cfs_rq(cursor);
7130 }
7131
7132 rq_clock_stop_loop_update(rq);
7133 }
7134
__unthrottle_cfs_rq_async(struct cfs_rq * cfs_rq)7135 static inline void __unthrottle_cfs_rq_async(struct cfs_rq *cfs_rq)
7136 {
7137 struct rq *rq = rq_of(cfs_rq);
7138 bool first;
7139
7140 if (rq == this_rq()) {
7141 update_rq_clock(rq);
7142 unthrottle_cfs_rq(cfs_rq);
7143 return;
7144 }
7145
7146 /* Already enqueued */
7147 if (WARN_ON_ONCE(!list_empty(&cfs_rq->throttled_csd_list)))
7148 return;
7149
7150 first = list_empty(&rq->cfsb_csd_list);
7151 list_add_tail(&cfs_rq->throttled_csd_list, &rq->cfsb_csd_list);
7152 if (first)
7153 smp_call_function_single_async(cpu_of(rq), &rq->cfsb_csd);
7154 }
7155
unthrottle_cfs_rq_async(struct cfs_rq * cfs_rq)7156 static void unthrottle_cfs_rq_async(struct cfs_rq *cfs_rq)
7157 {
7158 lockdep_assert_rq_held(rq_of(cfs_rq));
7159
7160 if (WARN_ON_ONCE(!cfs_rq_throttled(cfs_rq) ||
7161 cfs_rq->runtime_remaining <= 0))
7162 return;
7163
7164 __unthrottle_cfs_rq_async(cfs_rq);
7165 }
7166
distribute_cfs_runtime(struct cfs_bandwidth * cfs_b)7167 static bool distribute_cfs_runtime(struct cfs_bandwidth *cfs_b)
7168 {
7169 bool throttled = false, unthrottle_local = false;
7170 int this_cpu = smp_processor_id();
7171 u64 runtime, remaining = 1;
7172 struct cfs_rq *cfs_rq;
7173 struct rq *rq;
7174
7175 guard(rcu)();
7176
7177 list_for_each_entry_rcu(cfs_rq, &cfs_b->throttled_cfs_rq,
7178 throttled_list) {
7179 rq = rq_of(cfs_rq);
7180
7181 if (!remaining) {
7182 throttled = true;
7183 break;
7184 }
7185
7186 guard(rq_lock_irqsave)(rq);
7187
7188 if (!cfs_rq_throttled(cfs_rq))
7189 continue;
7190
7191 /* Already queued for async unthrottle */
7192 if (!list_empty(&cfs_rq->throttled_csd_list))
7193 continue;
7194
7195 if (cfs_rq->curr) {
7196 update_rq_clock(rq);
7197 update_curr(cfs_rq);
7198 }
7199
7200 /* By the above checks, this should never be true */
7201 WARN_ON_ONCE(cfs_rq->runtime_remaining > 0);
7202
7203 scoped_guard(raw_spinlock, &cfs_b->lock) {
7204 runtime = -cfs_rq->runtime_remaining + 1;
7205 if (runtime > cfs_b->runtime)
7206 runtime = cfs_b->runtime;
7207 cfs_b->runtime -= runtime;
7208 remaining = cfs_b->runtime;
7209 }
7210
7211 cfs_rq->runtime_remaining += runtime;
7212
7213 /*
7214 * Ran out of bandwidth during distribution!
7215 * Indicate throttled entities and break early.
7216 */
7217 if (cfs_rq->runtime_remaining <= 0) {
7218 throttled = true;
7219 break;
7220 }
7221
7222 /* we check whether we're throttled above */
7223 if (cpu_of(rq) != this_cpu) {
7224 unthrottle_cfs_rq_async(cfs_rq);
7225 continue;
7226 }
7227
7228 /*
7229 * Allow a parallel async unthrottle to unthrottle
7230 * this cfs_rq too via __cfsb_csd_unthrottle().
7231 * If we are first, do it ourselves at the end and
7232 * save on an IPI from remote CPUs.
7233 */
7234 unthrottle_local = list_empty(&rq->cfsb_csd_list);
7235 list_add_tail(&cfs_rq->throttled_csd_list, &rq->cfsb_csd_list);
7236 }
7237
7238 if (unthrottle_local) {
7239 /*
7240 * Protect against an IPI that is also trying to flush
7241 * the unthrottled cfs_rq(s) from this CPU's csd_list.
7242 */
7243 scoped_guard(irqsave)
7244 __cfsb_csd_unthrottle(cpu_rq(this_cpu));
7245 }
7246
7247 return throttled;
7248 }
7249
7250 /*
7251 * Responsible for refilling a task_group's bandwidth and unthrottling its
7252 * cfs_rqs as appropriate. If there has been no activity within the last
7253 * period the timer is deactivated until scheduling resumes; cfs_b->idle is
7254 * used to track this state.
7255 */
do_sched_cfs_period_timer(struct cfs_bandwidth * cfs_b,int overrun,unsigned long flags)7256 static int do_sched_cfs_period_timer(struct cfs_bandwidth *cfs_b, int overrun, unsigned long flags)
7257 __must_hold(&cfs_b->lock)
7258 {
7259 int throttled;
7260
7261 /* no need to continue the timer with no bandwidth constraint */
7262 if (cfs_b->quota == RUNTIME_INF)
7263 goto out_deactivate;
7264
7265 throttled = !list_empty(&cfs_b->throttled_cfs_rq);
7266 cfs_b->nr_periods += overrun;
7267
7268 /* Refill extra burst quota even if cfs_b->idle */
7269 __refill_cfs_bandwidth_runtime(cfs_b);
7270
7271 /*
7272 * idle depends on !throttled (for the case of a large deficit), and if
7273 * we're going inactive then everything else can be deferred
7274 */
7275 if (cfs_b->idle && !throttled)
7276 goto out_deactivate;
7277
7278 if (!throttled) {
7279 /* mark as potentially idle for the upcoming period */
7280 cfs_b->idle = 1;
7281 return 0;
7282 }
7283
7284 /* account preceding periods in which throttling occurred */
7285 cfs_b->nr_throttled += overrun;
7286
7287 /*
7288 * This check is repeated as we release cfs_b->lock while we unthrottle.
7289 */
7290 while (throttled && cfs_b->runtime > 0) {
7291 raw_spin_unlock_irqrestore(&cfs_b->lock, flags);
7292 /* we can't nest cfs_b->lock while distributing bandwidth */
7293 throttled = distribute_cfs_runtime(cfs_b);
7294 raw_spin_lock_irqsave(&cfs_b->lock, flags);
7295 }
7296
7297 /*
7298 * While we are ensured activity in the period following an
7299 * unthrottle, this also covers the case in which the new bandwidth is
7300 * insufficient to cover the existing bandwidth deficit. (Forcing the
7301 * timer to remain active while there are any throttled entities.)
7302 */
7303 cfs_b->idle = 0;
7304
7305 return 0;
7306
7307 out_deactivate:
7308 return 1;
7309 }
7310
7311 /* a cfs_rq won't donate quota below this amount */
7312 static const u64 min_cfs_rq_runtime = 1 * NSEC_PER_MSEC;
7313 /* minimum remaining period time to redistribute slack quota */
7314 static const u64 min_bandwidth_expiration = 2 * NSEC_PER_MSEC;
7315 /* how long we wait to gather additional slack before distributing */
7316 static const u64 cfs_bandwidth_slack_period = 5 * NSEC_PER_MSEC;
7317
7318 /*
7319 * Are we near the end of the current quota period?
7320 *
7321 * Requires cfs_b->lock for hrtimer_expires_remaining to be safe against the
7322 * hrtimer base being cleared by hrtimer_start. In the case of
7323 * migrate_hrtimers, base is never cleared, so we are fine.
7324 */
runtime_refresh_within(struct cfs_bandwidth * cfs_b,u64 min_expire)7325 static int runtime_refresh_within(struct cfs_bandwidth *cfs_b, u64 min_expire)
7326 {
7327 struct hrtimer *refresh_timer = &cfs_b->period_timer;
7328 s64 remaining;
7329
7330 /* if the call-back is running a quota refresh is already occurring */
7331 if (hrtimer_callback_running(refresh_timer))
7332 return 1;
7333
7334 /* is a quota refresh about to occur? */
7335 remaining = ktime_to_ns(hrtimer_expires_remaining(refresh_timer));
7336 if (remaining < (s64)min_expire)
7337 return 1;
7338
7339 return 0;
7340 }
7341
start_cfs_slack_bandwidth(struct cfs_bandwidth * cfs_b)7342 static void start_cfs_slack_bandwidth(struct cfs_bandwidth *cfs_b)
7343 {
7344 u64 min_left = cfs_bandwidth_slack_period + min_bandwidth_expiration;
7345
7346 /* if there's a quota refresh soon don't bother with slack */
7347 if (runtime_refresh_within(cfs_b, min_left))
7348 return;
7349
7350 /* don't push forwards an existing deferred unthrottle */
7351 if (cfs_b->slack_started)
7352 return;
7353 cfs_b->slack_started = true;
7354
7355 hrtimer_start(&cfs_b->slack_timer,
7356 ns_to_ktime(cfs_bandwidth_slack_period),
7357 HRTIMER_MODE_REL);
7358 }
7359
7360 /* we know any runtime found here is valid as update_curr() precedes return */
__return_cfs_rq_runtime(struct cfs_rq * cfs_rq)7361 static void __return_cfs_rq_runtime(struct cfs_rq *cfs_rq)
7362 {
7363 struct cfs_bandwidth *cfs_b = tg_cfs_bandwidth(cfs_rq->tg);
7364 s64 slack_runtime = cfs_rq->runtime_remaining - min_cfs_rq_runtime;
7365
7366 if (slack_runtime <= 0)
7367 return;
7368
7369 guard(raw_spinlock)(&cfs_b->lock);
7370
7371 if (cfs_b->quota != RUNTIME_INF) {
7372 cfs_b->runtime += slack_runtime;
7373
7374 /* we are under rq->lock, defer unthrottling using a timer */
7375 if (cfs_b->runtime > sched_cfs_bandwidth_slice() &&
7376 !list_empty(&cfs_b->throttled_cfs_rq))
7377 start_cfs_slack_bandwidth(cfs_b);
7378 }
7379
7380 /* even if it's not valid for return we don't want to try again */
7381 cfs_rq->runtime_remaining -= slack_runtime;
7382 }
7383
return_cfs_rq_runtime(struct cfs_rq * cfs_rq)7384 static __always_inline void return_cfs_rq_runtime(struct cfs_rq *cfs_rq)
7385 {
7386 if (!cfs_bandwidth_used())
7387 return;
7388
7389 if (!cfs_rq->runtime_enabled || cfs_rq->nr_queued)
7390 return;
7391
7392 __return_cfs_rq_runtime(cfs_rq);
7393 }
7394
7395 /*
7396 * This is done with a timer (instead of inline with bandwidth return) since
7397 * it's necessary to juggle rq->locks to unthrottle their respective cfs_rqs.
7398 */
do_sched_cfs_slack_timer(struct cfs_bandwidth * cfs_b)7399 static void do_sched_cfs_slack_timer(struct cfs_bandwidth *cfs_b)
7400 {
7401 /* confirm we're still not at a refresh boundary */
7402 scoped_guard(raw_spinlock_irqsave, &cfs_b->lock) {
7403 u64 runtime = 0, slice = sched_cfs_bandwidth_slice();
7404
7405 cfs_b->slack_started = false;
7406
7407 if (runtime_refresh_within(cfs_b, min_bandwidth_expiration))
7408 return;
7409
7410 if (cfs_b->quota != RUNTIME_INF && cfs_b->runtime > slice)
7411 runtime = cfs_b->runtime;
7412
7413 if (!runtime)
7414 return;
7415 }
7416
7417 distribute_cfs_runtime(cfs_b);
7418 }
7419
7420 /*
7421 * When a group wakes up we want to make sure that its quota is not already
7422 * expired/exceeded, otherwise it may be allowed to steal additional ticks of
7423 * runtime as update_curr() throttling can not trigger until it's on-rq.
7424 */
check_enqueue_throttle(struct cfs_rq * cfs_rq)7425 static void check_enqueue_throttle(struct cfs_rq *cfs_rq)
7426 {
7427 if (!cfs_bandwidth_used())
7428 return;
7429
7430 /* an active group must be handled by the update_curr() path */
7431 if (!cfs_rq->runtime_enabled || cfs_rq->h_curr)
7432 return;
7433
7434 /* ensure the group is not already throttled */
7435 if (cfs_rq_throttled(cfs_rq))
7436 return;
7437
7438 /* update runtime allocation */
7439 account_cfs_rq_runtime(cfs_rq, 0);
7440 }
7441
sync_throttle(struct task_group * tg,int cpu)7442 static void sync_throttle(struct task_group *tg, int cpu)
7443 {
7444 struct cfs_rq *pcfs_rq, *cfs_rq;
7445
7446 if (!cfs_bandwidth_used())
7447 return;
7448
7449 if (!tg->parent)
7450 return;
7451
7452 cfs_rq = tg_cfs_rq(tg, cpu);
7453 pcfs_rq = tg_cfs_rq(tg->parent, cpu);
7454
7455 cfs_rq->throttle_count = pcfs_rq->throttle_count;
7456 cfs_rq->throttled_clock_pelt = rq_clock_pelt(cpu_rq(cpu));
7457
7458 /*
7459 * It is not enough to sync the "pelt_clock_throttled" indicator
7460 * with the parent cfs_rq when the hierarchy is not queued.
7461 * Always join a throttled hierarchy with PELT clock throttled
7462 * and leaf it to the first enqueue, or distribution to
7463 * unthrottle the PELT clock.
7464 */
7465 if (cfs_rq->throttle_count)
7466 cfs_rq->pelt_clock_throttled = 1;
7467 }
7468
sched_cfs_slack_timer(struct hrtimer * timer)7469 static enum hrtimer_restart sched_cfs_slack_timer(struct hrtimer *timer)
7470 {
7471 struct cfs_bandwidth *cfs_b =
7472 container_of(timer, struct cfs_bandwidth, slack_timer);
7473
7474 do_sched_cfs_slack_timer(cfs_b);
7475
7476 return HRTIMER_NORESTART;
7477 }
7478
sched_cfs_period_timer(struct hrtimer * timer)7479 static enum hrtimer_restart sched_cfs_period_timer(struct hrtimer *timer)
7480 {
7481 struct cfs_bandwidth *cfs_b =
7482 container_of(timer, struct cfs_bandwidth, period_timer);
7483 int overrun;
7484 int idle = 0;
7485 int count = 0;
7486
7487 CLASS(raw_spinlock_irqsave, cfsb_guard)(&cfs_b->lock);
7488
7489 for (;;) {
7490 overrun = hrtimer_forward_now(timer, cfs_b->period);
7491 if (!overrun)
7492 break;
7493
7494 idle = do_sched_cfs_period_timer(cfs_b, overrun, cfsb_guard.flags);
7495
7496 if (++count > 3) {
7497 u64 new, old = ktime_to_ns(cfs_b->period);
7498
7499 /*
7500 * Grow period by a factor of 2 to avoid losing precision.
7501 * Precision loss in the quota/period ratio can cause __cfs_schedulable
7502 * to fail.
7503 */
7504 new = old * 2;
7505 if (new < max_bw_quota_period_us * NSEC_PER_USEC) {
7506 cfs_b->period = ns_to_ktime(new);
7507 cfs_b->quota *= 2;
7508 cfs_b->burst *= 2;
7509
7510 pr_warn_ratelimited(
7511 "cfs_period_timer[cpu%d]: period too short, scaling up (new cfs_period_us = %lld, cfs_quota_us = %lld)\n",
7512 smp_processor_id(),
7513 div_u64(new, NSEC_PER_USEC),
7514 div_u64(cfs_b->quota, NSEC_PER_USEC));
7515 } else {
7516 pr_warn_ratelimited(
7517 "cfs_period_timer[cpu%d]: period too short, but cannot scale up without losing precision (cfs_period_us = %lld, cfs_quota_us = %lld)\n",
7518 smp_processor_id(),
7519 div_u64(old, NSEC_PER_USEC),
7520 div_u64(cfs_b->quota, NSEC_PER_USEC));
7521 }
7522
7523 /* reset count so we don't come right back in here */
7524 count = 0;
7525 }
7526 }
7527
7528 if (idle) {
7529 cfs_b->period_active = 0;
7530 return HRTIMER_NORESTART;
7531 }
7532
7533 return HRTIMER_RESTART;
7534 }
7535
init_cfs_bandwidth(struct cfs_bandwidth * cfs_b,struct cfs_bandwidth * parent)7536 void init_cfs_bandwidth(struct cfs_bandwidth *cfs_b, struct cfs_bandwidth *parent)
7537 {
7538 raw_spin_lock_init(&cfs_b->lock);
7539 cfs_b->runtime = 0;
7540 cfs_b->quota = RUNTIME_INF;
7541 cfs_b->period = us_to_ktime(default_bw_period_us());
7542 cfs_b->burst = 0;
7543 cfs_b->hierarchical_quota = parent ? parent->hierarchical_quota : RUNTIME_INF;
7544
7545 INIT_LIST_HEAD(&cfs_b->throttled_cfs_rq);
7546 hrtimer_setup(&cfs_b->period_timer, sched_cfs_period_timer, CLOCK_MONOTONIC,
7547 HRTIMER_MODE_ABS_PINNED);
7548
7549 /* Add a random offset so that timers interleave */
7550 hrtimer_set_expires(&cfs_b->period_timer,
7551 get_random_u32_below(cfs_b->period));
7552 hrtimer_setup(&cfs_b->slack_timer, sched_cfs_slack_timer, CLOCK_MONOTONIC,
7553 HRTIMER_MODE_REL);
7554 cfs_b->slack_started = false;
7555 }
7556
init_cfs_rq_runtime(struct cfs_rq * cfs_rq)7557 static void init_cfs_rq_runtime(struct cfs_rq *cfs_rq)
7558 {
7559 cfs_rq->runtime_enabled = 0;
7560 INIT_LIST_HEAD(&cfs_rq->throttled_list);
7561 INIT_LIST_HEAD(&cfs_rq->throttled_csd_list);
7562 INIT_LIST_HEAD(&cfs_rq->throttled_limbo_list);
7563 }
7564
start_cfs_bandwidth(struct cfs_bandwidth * cfs_b)7565 void start_cfs_bandwidth(struct cfs_bandwidth *cfs_b)
7566 {
7567 lockdep_assert_held(&cfs_b->lock);
7568
7569 if (cfs_b->period_active)
7570 return;
7571
7572 cfs_b->period_active = 1;
7573 hrtimer_forward_now(&cfs_b->period_timer, cfs_b->period);
7574 hrtimer_start_expires(&cfs_b->period_timer, HRTIMER_MODE_ABS_PINNED);
7575 }
7576
destroy_cfs_bandwidth(struct cfs_bandwidth * cfs_b)7577 static void destroy_cfs_bandwidth(struct cfs_bandwidth *cfs_b)
7578 {
7579 int __maybe_unused i;
7580
7581 /* init_cfs_bandwidth() was not called */
7582 if (!cfs_b->throttled_cfs_rq.next)
7583 return;
7584
7585 hrtimer_cancel(&cfs_b->period_timer);
7586 hrtimer_cancel(&cfs_b->slack_timer);
7587
7588 /*
7589 * It is possible that we still have some cfs_rq's pending on a CSD
7590 * list, though this race is very rare. In order for this to occur, we
7591 * must have raced with the last task leaving the group while there
7592 * exist throttled cfs_rq(s), and the period_timer must have queued the
7593 * CSD item but the remote cpu has not yet processed it. To handle this,
7594 * we can simply flush all pending CSD work inline here. We're
7595 * guaranteed at this point that no additional cfs_rq of this group can
7596 * join a CSD list.
7597 */
7598 for_each_possible_cpu(i) {
7599 struct rq *rq = cpu_rq(i);
7600
7601 if (list_empty(&rq->cfsb_csd_list))
7602 continue;
7603
7604 scoped_guard(irqsave)
7605 __cfsb_csd_unthrottle(rq);
7606 }
7607 }
7608
7609 /*
7610 * Both these CPU hotplug callbacks race against unregister_fair_sched_group()
7611 *
7612 * The race is harmless, since modifying bandwidth settings of unhooked group
7613 * bits doesn't do much.
7614 */
7615
7616 /* cpu online callback */
update_runtime_enabled(struct rq * rq)7617 static void __maybe_unused update_runtime_enabled(struct rq *rq)
7618 {
7619 struct task_group *tg;
7620
7621 lockdep_assert_rq_held(rq);
7622
7623 guard(rcu)();
7624
7625 list_for_each_entry_rcu(tg, &task_groups, list) {
7626 struct cfs_bandwidth *cfs_b = &tg->cfs_bandwidth;
7627 struct cfs_rq *cfs_rq = tg_cfs_rq(tg, cpu_of(rq));
7628
7629 scoped_guard(raw_spinlock, &cfs_b->lock)
7630 cfs_rq->runtime_enabled = cfs_b->quota != RUNTIME_INF;
7631 }
7632 }
7633
7634 /* cpu offline callback */
unthrottle_offline_cfs_rqs(struct rq * rq)7635 static void __maybe_unused unthrottle_offline_cfs_rqs(struct rq *rq)
7636 {
7637 struct task_group *tg;
7638
7639 lockdep_assert_rq_held(rq);
7640
7641 // Do not unthrottle for an active CPU
7642 if (cpumask_test_cpu(cpu_of(rq), cpu_active_mask))
7643 return;
7644
7645 /*
7646 * The rq clock has already been updated in the
7647 * set_rq_offline(), so we should skip updating
7648 * the rq clock again in unthrottle_cfs_rq().
7649 */
7650 rq_clock_start_loop_update(rq);
7651
7652 guard(rcu)();
7653
7654 list_for_each_entry_rcu(tg, &task_groups, list) {
7655 struct cfs_rq *cfs_rq = tg_cfs_rq(tg, cpu_of(rq));
7656
7657 if (!cfs_rq->runtime_enabled)
7658 continue;
7659
7660 /*
7661 * Offline rq is schedulable till CPU is completely disabled
7662 * in take_cpu_down(), so we prevent new cfs throttling here.
7663 */
7664 cfs_rq->runtime_enabled = 0;
7665
7666 if (!cfs_rq_throttled(cfs_rq))
7667 continue;
7668
7669 /*
7670 * clock_task is not advancing so we just need to make sure
7671 * there's some valid quota amount
7672 */
7673 cfs_rq->runtime_remaining = 1;
7674 unthrottle_cfs_rq(cfs_rq);
7675 }
7676
7677 rq_clock_stop_loop_update(rq);
7678 }
7679
cfs_task_bw_constrained(struct task_struct * p)7680 bool cfs_task_bw_constrained(struct task_struct *p)
7681 {
7682 struct cfs_rq *cfs_rq = task_cfs_rq(p);
7683
7684 if (!cfs_bandwidth_used())
7685 return false;
7686
7687 if (cfs_rq->runtime_enabled ||
7688 tg_cfs_bandwidth(cfs_rq->tg)->hierarchical_quota != RUNTIME_INF)
7689 return true;
7690
7691 return false;
7692 }
7693
7694 #ifdef CONFIG_NO_HZ_FULL
7695 /* called from pick_next_task_fair() */
sched_fair_update_stop_tick(struct rq * rq,struct task_struct * p)7696 static void sched_fair_update_stop_tick(struct rq *rq, struct task_struct *p)
7697 {
7698 int cpu = cpu_of(rq);
7699
7700 if (!cfs_bandwidth_used())
7701 return;
7702
7703 if (!tick_nohz_full_cpu(cpu))
7704 return;
7705
7706 if (rq->nr_running != 1)
7707 return;
7708
7709 /*
7710 * We know there is only one task runnable and we've just picked it. The
7711 * normal enqueue path will have cleared TICK_DEP_BIT_SCHED if we will
7712 * be otherwise able to stop the tick. Just need to check if we are using
7713 * bandwidth control.
7714 */
7715 if (cfs_task_bw_constrained(p))
7716 tick_nohz_dep_set_cpu(cpu, TICK_DEP_BIT_SCHED);
7717 }
7718 #endif /* CONFIG_NO_HZ_FULL */
7719
7720 #else /* !CONFIG_CFS_BANDWIDTH: */
7721
account_cfs_rq_runtime(struct cfs_rq * cfs_rq,u64 delta_exec)7722 static bool account_cfs_rq_runtime(struct cfs_rq *cfs_rq, u64 delta_exec) { return false; }
check_enqueue_throttle(struct cfs_rq * cfs_rq)7723 static void check_enqueue_throttle(struct cfs_rq *cfs_rq) {}
sync_throttle(struct task_group * tg,int cpu)7724 static inline void sync_throttle(struct task_group *tg, int cpu) {}
return_cfs_rq_runtime(struct cfs_rq * cfs_rq)7725 static __always_inline void return_cfs_rq_runtime(struct cfs_rq *cfs_rq) {}
task_throttle_setup_work(struct task_struct * p)7726 static void task_throttle_setup_work(struct task_struct *p) {}
task_is_throttled(struct task_struct * p)7727 static bool task_is_throttled(struct task_struct *p) { return false; }
dequeue_throttled_task(struct task_struct * p,int flags)7728 static void dequeue_throttled_task(struct task_struct *p, int flags) {}
enqueue_throttled_task(struct task_struct * p)7729 static bool enqueue_throttled_task(struct task_struct *p) { return false; }
record_throttle_clock(struct cfs_rq * cfs_rq)7730 static void record_throttle_clock(struct cfs_rq *cfs_rq) {}
7731
cfs_rq_throttled(struct cfs_rq * cfs_rq)7732 static inline int cfs_rq_throttled(struct cfs_rq *cfs_rq)
7733 {
7734 return 0;
7735 }
7736
cfs_rq_pelt_clock_throttled(struct cfs_rq * cfs_rq)7737 static inline bool cfs_rq_pelt_clock_throttled(struct cfs_rq *cfs_rq)
7738 {
7739 return false;
7740 }
7741
throttled_hierarchy(struct cfs_rq * cfs_rq)7742 static inline int throttled_hierarchy(struct cfs_rq *cfs_rq)
7743 {
7744 return 0;
7745 }
7746
lb_throttled_hierarchy(struct task_struct * p,int dst_cpu)7747 static inline int lb_throttled_hierarchy(struct task_struct *p, int dst_cpu)
7748 {
7749 return 0;
7750 }
7751
7752 #ifdef CONFIG_FAIR_GROUP_SCHED
init_cfs_bandwidth(struct cfs_bandwidth * cfs_b,struct cfs_bandwidth * parent)7753 void init_cfs_bandwidth(struct cfs_bandwidth *cfs_b, struct cfs_bandwidth *parent) {}
init_cfs_rq_runtime(struct cfs_rq * cfs_rq)7754 static void init_cfs_rq_runtime(struct cfs_rq *cfs_rq) {}
7755 #endif
7756
tg_cfs_bandwidth(struct task_group * tg)7757 static inline struct cfs_bandwidth *tg_cfs_bandwidth(struct task_group *tg)
7758 {
7759 return NULL;
7760 }
destroy_cfs_bandwidth(struct cfs_bandwidth * cfs_b)7761 static inline void destroy_cfs_bandwidth(struct cfs_bandwidth *cfs_b) {}
update_runtime_enabled(struct rq * rq)7762 static inline void update_runtime_enabled(struct rq *rq) {}
unthrottle_offline_cfs_rqs(struct rq * rq)7763 static inline void unthrottle_offline_cfs_rqs(struct rq *rq) {}
7764 #ifdef CONFIG_CGROUP_SCHED
cfs_task_bw_constrained(struct task_struct * p)7765 bool cfs_task_bw_constrained(struct task_struct *p)
7766 {
7767 return false;
7768 }
7769 #endif
7770 #endif /* !CONFIG_CFS_BANDWIDTH */
7771
7772 #if !defined(CONFIG_CFS_BANDWIDTH) || !defined(CONFIG_NO_HZ_FULL)
sched_fair_update_stop_tick(struct rq * rq,struct task_struct * p)7773 static inline void sched_fair_update_stop_tick(struct rq *rq, struct task_struct *p) {}
7774 #endif
7775
7776 /**************************************************
7777 * CFS operations on tasks:
7778 */
7779
7780 #ifdef CONFIG_SCHED_HRTICK
hrtick_start_fair(struct rq * rq,struct task_struct * p)7781 static void hrtick_start_fair(struct rq *rq, struct task_struct *p)
7782 {
7783 struct sched_entity *se = &p->se;
7784 unsigned long scale = 1024;
7785 unsigned long util = 0;
7786 u64 vdelta;
7787 u64 delta;
7788
7789 WARN_ON_ONCE(task_rq(p) != rq);
7790
7791 if (rq->cfs.h_nr_queued <= 1)
7792 return;
7793
7794 /*
7795 * Compute time until virtual deadline
7796 */
7797 vdelta = se->deadline - se->vruntime;
7798 if ((s64)vdelta < 0) {
7799 if (task_current_donor(rq, p))
7800 resched_curr(rq);
7801 return;
7802 }
7803 delta = (se->h_load.weight * vdelta) / NICE_0_LOAD;
7804
7805 /*
7806 * Correct for instantaneous load of other classes.
7807 */
7808 util += cpu_util_irq(rq);
7809 if (util && util < 1024) {
7810 scale *= 1024;
7811 scale /= (1024 - util);
7812 }
7813
7814 hrtick_start(rq, (scale * delta) / 1024);
7815 }
7816
7817 /*
7818 * Called on enqueue to start the hrtick when h_nr_queued becomes more than 1.
7819 */
hrtick_update(struct rq * rq)7820 static void hrtick_update(struct rq *rq)
7821 {
7822 struct task_struct *donor = rq->donor;
7823
7824 if (!hrtick_enabled_fair(rq) || donor->sched_class != &fair_sched_class)
7825 return;
7826
7827 if (hrtick_active(rq))
7828 return;
7829
7830 hrtick_start_fair(rq, donor);
7831 }
7832 #else /* !CONFIG_SCHED_HRTICK: */
7833 static inline void
hrtick_start_fair(struct rq * rq,struct task_struct * p)7834 hrtick_start_fair(struct rq *rq, struct task_struct *p)
7835 {
7836 }
7837
hrtick_update(struct rq * rq)7838 static inline void hrtick_update(struct rq *rq)
7839 {
7840 }
7841 #endif /* !CONFIG_SCHED_HRTICK */
7842
cpu_overutilized(int cpu)7843 static inline bool cpu_overutilized(int cpu)
7844 {
7845 unsigned long rq_util_max;
7846
7847 if (!sched_energy_enabled())
7848 return false;
7849
7850 rq_util_max = uclamp_rq_get(cpu_rq(cpu), UCLAMP_MAX);
7851
7852 /* Return true only if the utilization doesn't fit CPU's capacity */
7853 return !util_fits_cpu(cpu_util_cfs(cpu), 0, rq_util_max, cpu);
7854 }
7855
7856 /*
7857 * overutilized value make sense only if EAS is enabled
7858 */
is_rd_overutilized(struct root_domain * rd)7859 static inline bool is_rd_overutilized(struct root_domain *rd)
7860 {
7861 return !sched_energy_enabled() || READ_ONCE(rd->overutilized);
7862 }
7863
set_rd_overutilized(struct root_domain * rd,bool flag)7864 static inline void set_rd_overutilized(struct root_domain *rd, bool flag)
7865 {
7866 if (!sched_energy_enabled())
7867 return;
7868
7869 WRITE_ONCE(rd->overutilized, flag);
7870 trace_sched_overutilized_tp(rd, flag);
7871 }
7872
check_update_overutilized_status(struct rq * rq)7873 static inline void check_update_overutilized_status(struct rq *rq)
7874 {
7875 /*
7876 * overutilized field is used for load balancing decisions only
7877 * if energy aware scheduler is being used
7878 */
7879
7880 if (!is_rd_overutilized(rq->rd) && cpu_overutilized(rq->cpu))
7881 set_rd_overutilized(rq->rd, 1);
7882 }
7883
7884 /* Runqueue only has SCHED_IDLE tasks enqueued */
sched_idle_rq(struct rq * rq)7885 static int sched_idle_rq(struct rq *rq)
7886 {
7887 return unlikely(rq->nr_running == rq->cfs.h_nr_idle &&
7888 rq->nr_running);
7889 }
7890
choose_sched_idle_rq(struct rq * rq,struct task_struct * p)7891 static int choose_sched_idle_rq(struct rq *rq, struct task_struct *p)
7892 {
7893 return sched_idle_rq(rq) && !task_has_idle_policy(p);
7894 }
7895
choose_idle_cpu(int cpu,struct task_struct * p)7896 static int choose_idle_cpu(int cpu, struct task_struct *p)
7897 {
7898 return available_idle_cpu(cpu) ||
7899 choose_sched_idle_rq(cpu_rq(cpu), p);
7900 }
7901
7902 static void
requeue_delayed_entity(struct cfs_rq * cfs_rq,struct sched_entity * se)7903 requeue_delayed_entity(struct cfs_rq *cfs_rq, struct sched_entity *se)
7904 {
7905 /*
7906 * se->sched_delayed should imply: se->on_rq == 1.
7907 * Because a delayed entity is one that is still on
7908 * the runqueue competing until elegibility.
7909 */
7910 WARN_ON_ONCE(!se->sched_delayed);
7911 WARN_ON_ONCE(!se->on_rq);
7912
7913 if (update_entity_lag(cfs_rq, se)) {
7914 cfs_rq->h_nr_queued--;
7915 if (se != cfs_rq->curr)
7916 __dequeue_entity(cfs_rq, se);
7917 place_entity(cfs_rq, se, 0);
7918 if (se != cfs_rq->curr)
7919 __enqueue_entity(cfs_rq, se);
7920 cfs_rq->h_nr_queued++;
7921 }
7922
7923 update_load_avg(cfs_rq, se, 0);
7924 clear_delayed(se);
7925 }
7926
enqueue_hierarchy(struct task_struct * p,int flags)7927 static unsigned long enqueue_hierarchy(struct task_struct *p, int flags)
7928 {
7929 unsigned long weight = NICE_0_LOAD;
7930 int task_new = !(flags & ENQUEUE_WAKEUP);
7931 struct sched_entity *se = &p->se;
7932 int h_nr_idle = task_has_idle_policy(p);
7933 int h_nr_runnable = 1;
7934
7935 if (task_new && se->sched_delayed)
7936 h_nr_runnable = 0;
7937
7938 for_each_sched_entity(se) {
7939 struct cfs_rq *cfs_rq = cfs_rq_of(se);
7940
7941 update_curr(cfs_rq);
7942
7943 if (!se->on_rq) {
7944 enqueue_entity(cfs_rq, se, flags);
7945 } else {
7946 update_load_avg(cfs_rq, se, UPDATE_TG);
7947 se_update_runnable(se);
7948 update_cfs_group(se);
7949 }
7950
7951 cfs_rq->h_nr_runnable += h_nr_runnable;
7952 cfs_rq->h_nr_queued++;
7953 cfs_rq->h_nr_idle += h_nr_idle;
7954
7955 if (cfs_rq_is_idle(cfs_rq))
7956 h_nr_idle = 1;
7957
7958 weight = __calc_prop_weight(cfs_rq, se, weight);
7959
7960 flags = ENQUEUE_WAKEUP;
7961 }
7962
7963 return weight;
7964 }
7965
7966 /* Update curr's vruntime before placing entity or updating lag */
update_curr_eevdf(struct cfs_rq * cfs_rq)7967 static inline void update_curr_eevdf(struct cfs_rq *cfs_rq)
7968 {
7969 if (!cfs_rq->curr)
7970 return;
7971
7972 update_curr(cfs_rq_of(cfs_rq->curr));
7973 }
7974
7975 /*
7976 * The enqueue_task method is called before nr_running is
7977 * increased. Here we update the fair scheduling stats and
7978 * then put the task into the rbtree:
7979 */
7980 static void
enqueue_task_fair(struct rq * rq,struct task_struct * p,int flags)7981 enqueue_task_fair(struct rq *rq, struct task_struct *p, int flags)
7982 {
7983 int rq_h_nr_queued = rq->cfs.h_nr_queued;
7984 int task_new = !(flags & ENQUEUE_WAKEUP);
7985 struct sched_entity *se = &p->se;
7986 struct cfs_rq *cfs_rq = &rq->cfs;
7987 unsigned long weight;
7988 bool curr;
7989
7990 if (task_is_throttled(p) && enqueue_throttled_task(p))
7991 return;
7992
7993 /*
7994 * The code below (indirectly) updates schedutil which looks at
7995 * the cfs_rq utilization to select a frequency.
7996 * Let's add the task's estimated utilization to the cfs_rq's
7997 * estimated utilization, before we update schedutil.
7998 */
7999 if (!p->se.sched_delayed || (flags & ENQUEUE_DELAYED))
8000 util_est_enqueue(cfs_rq, p);
8001
8002 update_curr_eevdf(cfs_rq);
8003
8004 if (flags & ENQUEUE_DELAYED) {
8005 requeue_delayed_entity(cfs_rq, se);
8006 return;
8007 }
8008
8009 /*
8010 * If in_iowait is set, the code below may not trigger any cpufreq
8011 * utilization updates, so do it here explicitly with the IOWAIT flag
8012 * passed.
8013 */
8014 if (p->in_iowait)
8015 cpufreq_update_util(rq, SCHED_CPUFREQ_IOWAIT);
8016
8017 /*
8018 * XXX comment on the curr thing
8019 */
8020 curr = (cfs_rq->curr == se);
8021 if (curr)
8022 place_entity(cfs_rq, se, flags);
8023
8024 if (se->on_rq && se->sched_delayed)
8025 requeue_delayed_entity(cfs_rq, se);
8026
8027 weight = enqueue_hierarchy(p, flags);
8028
8029 if (!curr) {
8030 reweight_eevdf(cfs_rq, se, weight, false);
8031 place_entity(cfs_rq, se, flags | ENQUEUE_QUEUED);
8032 __enqueue_entity(cfs_rq, se);
8033 }
8034
8035 if (!rq_h_nr_queued && rq->cfs.h_nr_queued)
8036 dl_server_start(&rq->fair_server);
8037
8038 /* At this point se is NULL and we are at root level*/
8039 add_nr_running(rq, 1);
8040
8041 /*
8042 * Since new tasks are assigned an initial util_avg equal to
8043 * half of the spare capacity of their CPU, tiny tasks have the
8044 * ability to cross the overutilized threshold, which will
8045 * result in the load balancer ruining all the task placement
8046 * done by EAS. As a way to mitigate that effect, do not account
8047 * for the first enqueue operation of new tasks during the
8048 * overutilized flag detection.
8049 *
8050 * A better way of solving this problem would be to wait for
8051 * the PELT signals of tasks to converge before taking them
8052 * into account, but that is not straightforward to implement,
8053 * and the following generally works well enough in practice.
8054 */
8055 if (!task_new)
8056 check_update_overutilized_status(rq);
8057
8058 assert_list_leaf_cfs_rq(rq);
8059
8060 hrtick_update(rq);
8061 }
8062
dequeue_hierarchy(struct task_struct * p,int flags)8063 static void dequeue_hierarchy(struct task_struct *p, int flags)
8064 {
8065 struct sched_entity *se = &p->se;
8066 bool task_sleep = flags & DEQUEUE_SLEEP;
8067 bool task_delayed = flags & DEQUEUE_DELAYED;
8068 bool task_throttled = flags & DEQUEUE_THROTTLE;
8069 int h_nr_runnable = 0;
8070 int h_nr_idle = task_has_idle_policy(p);
8071 bool dequeue = true;
8072
8073 if (task_sleep || task_delayed || !se->sched_delayed)
8074 h_nr_runnable = 1;
8075
8076 for_each_sched_entity(se) {
8077 struct cfs_rq *cfs_rq = cfs_rq_of(se);
8078
8079 update_curr(cfs_rq);
8080
8081 if (dequeue) {
8082 dequeue_entity(cfs_rq, se, flags);
8083 /* Don't dequeue parent if it has other entities besides us */
8084 if (cfs_rq->load.weight)
8085 dequeue = false;
8086 } else {
8087 update_load_avg(cfs_rq, se, UPDATE_TG);
8088 se_update_runnable(se);
8089 update_cfs_group(se);
8090 }
8091
8092 cfs_rq->h_nr_runnable -= h_nr_runnable;
8093 cfs_rq->h_nr_queued--;
8094 cfs_rq->h_nr_idle -= h_nr_idle;
8095
8096 if (cfs_rq_is_idle(cfs_rq))
8097 h_nr_idle = 1;
8098
8099 if (throttled_hierarchy(cfs_rq) && task_throttled)
8100 record_throttle_clock(cfs_rq);
8101
8102 flags |= DEQUEUE_SLEEP;
8103 flags &= ~(DEQUEUE_DELAYED | DEQUEUE_SPECIAL);
8104 }
8105 }
8106
8107 /*
8108 * The part of dequeue_task_fair() that is needed to dequeue delayed tasks.
8109 *
8110 * Returns:
8111 * true - dequeued
8112 * false - delayed
8113 */
__dequeue_task(struct rq * rq,struct task_struct * p,int flags)8114 static bool __dequeue_task(struct rq *rq, struct task_struct *p, int flags)
8115 {
8116 struct sched_entity *se = &p->se;
8117 struct cfs_rq *cfs_rq = &rq->cfs;
8118 bool was_sched_idle = sched_idle_rq(rq);
8119 bool task_sleep = flags & DEQUEUE_SLEEP;
8120 bool task_delayed = flags & DEQUEUE_DELAYED;
8121
8122 clear_buddies(cfs_rq, se);
8123
8124 update_curr_eevdf(cfs_rq);
8125 update_entity_lag(cfs_rq, se);
8126
8127 if (flags & DEQUEUE_DELAYED) {
8128 WARN_ON_ONCE(!se->sched_delayed);
8129 } else {
8130 bool delay = task_sleep;
8131 /*
8132 * DELAY_DEQUEUE relies on spurious wakeups, special task
8133 * states must not suffer spurious wakeups, excempt them.
8134 */
8135 if (flags & (DEQUEUE_SPECIAL | DEQUEUE_THROTTLE))
8136 delay = false;
8137
8138 WARN_ON_ONCE(delay && se->sched_delayed);
8139
8140 if (sched_feat(DELAY_DEQUEUE) && delay &&
8141 !entity_eligible(cfs_rq, se)) {
8142 update_load_avg(cfs_rq_of(se), se, UPDATE_UTIL_EST);
8143 set_delayed(se);
8144 return false;
8145 }
8146 }
8147
8148 dequeue_hierarchy(p, flags);
8149
8150 if (sched_feat(PLACE_REL_DEADLINE) && !task_sleep) {
8151 se->deadline -= se->vruntime;
8152 se->rel_deadline = 1;
8153 }
8154 if (se != cfs_rq->curr)
8155 __dequeue_entity(cfs_rq, se);
8156
8157 sub_nr_running(rq, 1);
8158
8159 /* balance early to pull high priority tasks */
8160 if (unlikely(!was_sched_idle && sched_idle_rq(rq)))
8161 rq->next_balance = jiffies;
8162
8163 if (task_delayed) {
8164 clear_delayed(se);
8165
8166 WARN_ON_ONCE(!task_sleep);
8167 WARN_ON_ONCE(p->on_rq != 1);
8168
8169 /*
8170 * Fix-up what block_task() skipped.
8171 *
8172 * Must be last, @p might not be valid after this.
8173 */
8174 __block_task(rq, p);
8175 }
8176
8177 return true;
8178 }
8179
8180 /*
8181 * The dequeue_task method is called before nr_running is
8182 * decreased. We remove the task from the rbtree and
8183 * update the fair scheduling stats:
8184 */
dequeue_task_fair(struct rq * rq,struct task_struct * p,int flags)8185 static bool dequeue_task_fair(struct rq *rq, struct task_struct *p, int flags)
8186 {
8187 if (task_is_throttled(p)) {
8188 dequeue_throttled_task(p, flags);
8189 return true;
8190 }
8191
8192 if (!p->se.sched_delayed)
8193 util_est_dequeue(&rq->cfs, p);
8194
8195 if (!__dequeue_task(rq, p, flags))
8196 return false;
8197
8198 /*
8199 * Must not reference @p after __dequeue_task(DEQUEUE_DELAYED).
8200 */
8201 return true;
8202 }
8203
cfs_h_nr_delayed(struct rq * rq)8204 static inline unsigned int cfs_h_nr_delayed(struct rq *rq)
8205 {
8206 return (rq->cfs.h_nr_queued - rq->cfs.h_nr_runnable);
8207 }
8208
8209 /* Working cpumask for: sched_balance_rq(), sched_balance_newidle(). */
8210 static DEFINE_PER_CPU(cpumask_var_t, load_balance_mask);
8211 static DEFINE_PER_CPU(cpumask_var_t, select_rq_mask);
8212 static DEFINE_PER_CPU(cpumask_var_t, should_we_balance_tmpmask);
8213
8214 #ifdef CONFIG_NO_HZ_COMMON
8215
8216 static struct {
8217 cpumask_var_t idle_cpus_mask;
8218 int has_blocked_load; /* Idle CPUS has blocked load */
8219 int needs_update; /* Newly idle CPUs need their next_balance collated */
8220 unsigned long next_balance; /* in jiffy units */
8221 unsigned long next_blocked; /* Next update of blocked load in jiffies */
8222 } nohz ____cacheline_aligned;
8223
8224 #endif /* CONFIG_NO_HZ_COMMON */
8225
cpu_load(struct rq * rq)8226 static unsigned long cpu_load(struct rq *rq)
8227 {
8228 return cfs_rq_load_avg(&rq->cfs);
8229 }
8230
8231 /*
8232 * cpu_load_without - compute CPU load without any contributions from *p
8233 * @cpu: the CPU which load is requested
8234 * @p: the task which load should be discounted
8235 *
8236 * The load of a CPU is defined by the load of tasks currently enqueued on that
8237 * CPU as well as tasks which are currently sleeping after an execution on that
8238 * CPU.
8239 *
8240 * This method returns the load of the specified CPU by discounting the load of
8241 * the specified task, whenever the task is currently contributing to the CPU
8242 * load.
8243 */
cpu_load_without(struct rq * rq,struct task_struct * p)8244 static unsigned long cpu_load_without(struct rq *rq, struct task_struct *p)
8245 {
8246 struct cfs_rq *cfs_rq;
8247 unsigned int load;
8248
8249 /* Task has no contribution or is new */
8250 if (cpu_of(rq) != task_cpu(p) || !READ_ONCE(p->se.avg.last_update_time))
8251 return cpu_load(rq);
8252
8253 cfs_rq = &rq->cfs;
8254 load = READ_ONCE(cfs_rq->avg.load_avg);
8255
8256 /* Discount task's util from CPU's util */
8257 lsub_positive(&load, task_h_load(p));
8258
8259 return load;
8260 }
8261
cpu_runnable(struct rq * rq)8262 static unsigned long cpu_runnable(struct rq *rq)
8263 {
8264 return cfs_rq_runnable_avg(&rq->cfs);
8265 }
8266
cpu_runnable_without(struct rq * rq,struct task_struct * p)8267 static unsigned long cpu_runnable_without(struct rq *rq, struct task_struct *p)
8268 {
8269 struct cfs_rq *cfs_rq;
8270 unsigned int runnable;
8271
8272 /* Task has no contribution or is new */
8273 if (cpu_of(rq) != task_cpu(p) || !READ_ONCE(p->se.avg.last_update_time))
8274 return cpu_runnable(rq);
8275
8276 cfs_rq = &rq->cfs;
8277 runnable = READ_ONCE(cfs_rq->avg.runnable_avg);
8278
8279 /* Discount task's runnable from CPU's runnable */
8280 lsub_positive(&runnable, p->se.avg.runnable_avg);
8281
8282 return runnable;
8283 }
8284
capacity_of(int cpu)8285 static unsigned long capacity_of(int cpu)
8286 {
8287 return cpu_rq(cpu)->cpu_capacity;
8288 }
8289
record_wakee(struct task_struct * p)8290 static void record_wakee(struct task_struct *p)
8291 {
8292 /*
8293 * Only decay a single time; tasks that have less then 1 wakeup per
8294 * jiffy will not have built up many flips.
8295 */
8296 if (time_after(jiffies, current->wakee_flip_decay_ts + HZ)) {
8297 current->wakee_flips >>= 1;
8298 current->wakee_flip_decay_ts = jiffies;
8299 }
8300
8301 if (current->last_wakee != p) {
8302 current->last_wakee = p;
8303 current->wakee_flips++;
8304 }
8305 }
8306
8307 /*
8308 * Detect M:N waker/wakee relationships via a switching-frequency heuristic.
8309 *
8310 * A waker of many should wake a different task than the one last awakened
8311 * at a frequency roughly N times higher than one of its wakees.
8312 *
8313 * In order to determine whether we should let the load spread vs consolidating
8314 * to shared cache, we look for a minimum 'flip' frequency of llc_size in one
8315 * partner, and a factor of lls_size higher frequency in the other.
8316 *
8317 * With both conditions met, we can be relatively sure that the relationship is
8318 * non-monogamous, with partner count exceeding socket size.
8319 *
8320 * Waker/wakee being client/server, worker/dispatcher, interrupt source or
8321 * whatever is irrelevant, spread criteria is apparent partner count exceeds
8322 * socket size.
8323 */
wake_wide(struct task_struct * p)8324 static int wake_wide(struct task_struct *p)
8325 {
8326 unsigned int master = current->wakee_flips;
8327 unsigned int slave = p->wakee_flips;
8328 int factor = __this_cpu_read(sd_llc_size);
8329
8330 if (master < slave)
8331 swap(master, slave);
8332 if (slave < factor || master < slave * factor)
8333 return 0;
8334 return 1;
8335 }
8336
8337 /*
8338 * The purpose of wake_affine() is to quickly determine on which CPU we can run
8339 * soonest. For the purpose of speed we only consider the waking and previous
8340 * CPU.
8341 *
8342 * wake_affine_idle() - only considers 'now', it check if the waking CPU is
8343 * cache-affine and is (or will be) idle.
8344 *
8345 * wake_affine_weight() - considers the weight to reflect the average
8346 * scheduling latency of the CPUs. This seems to work
8347 * for the overloaded case.
8348 */
8349 static int
wake_affine_idle(int this_cpu,int prev_cpu,int sync)8350 wake_affine_idle(int this_cpu, int prev_cpu, int sync)
8351 {
8352 /*
8353 * If this_cpu is idle, it implies the wakeup is from interrupt
8354 * context. Only allow the move if cache is shared. Otherwise an
8355 * interrupt intensive workload could force all tasks onto one
8356 * node depending on the IO topology or IRQ affinity settings.
8357 *
8358 * If the prev_cpu is idle and cache affine then avoid a migration.
8359 * There is no guarantee that the cache hot data from an interrupt
8360 * is more important than cache hot data on the prev_cpu and from
8361 * a cpufreq perspective, it's better to have higher utilisation
8362 * on one CPU.
8363 */
8364 if (available_idle_cpu(this_cpu) && cpus_share_cache(this_cpu, prev_cpu))
8365 return available_idle_cpu(prev_cpu) ? prev_cpu : this_cpu;
8366
8367 if (sync) {
8368 struct rq *rq = cpu_rq(this_cpu);
8369
8370 if ((rq->nr_running - cfs_h_nr_delayed(rq)) == 1)
8371 return this_cpu;
8372 }
8373
8374 if (available_idle_cpu(prev_cpu))
8375 return prev_cpu;
8376
8377 return nr_cpumask_bits;
8378 }
8379
8380 static int
wake_affine_weight(struct sched_domain * sd,struct task_struct * p,int this_cpu,int prev_cpu,int sync)8381 wake_affine_weight(struct sched_domain *sd, struct task_struct *p,
8382 int this_cpu, int prev_cpu, int sync)
8383 {
8384 s64 this_eff_load, prev_eff_load;
8385 unsigned long task_load;
8386
8387 this_eff_load = cpu_load(cpu_rq(this_cpu));
8388
8389 if (sync) {
8390 unsigned long current_load = task_h_load(current);
8391
8392 if (current_load > this_eff_load)
8393 return this_cpu;
8394
8395 this_eff_load -= current_load;
8396 }
8397
8398 task_load = task_h_load(p);
8399
8400 this_eff_load += task_load;
8401 if (sched_feat(WA_BIAS))
8402 this_eff_load *= 100;
8403 this_eff_load *= capacity_of(prev_cpu);
8404
8405 prev_eff_load = cpu_load(cpu_rq(prev_cpu));
8406 prev_eff_load -= task_load;
8407 if (sched_feat(WA_BIAS))
8408 prev_eff_load *= 100 + (sd->imbalance_pct - 100) / 2;
8409 prev_eff_load *= capacity_of(this_cpu);
8410
8411 /*
8412 * If sync, adjust the weight of prev_eff_load such that if
8413 * prev_eff == this_eff that select_idle_sibling() will consider
8414 * stacking the wakee on top of the waker if no other CPU is
8415 * idle.
8416 */
8417 if (sync)
8418 prev_eff_load += 1;
8419
8420 return this_eff_load < prev_eff_load ? this_cpu : nr_cpumask_bits;
8421 }
8422
wake_affine(struct sched_domain * sd,struct task_struct * p,int this_cpu,int prev_cpu,int sync)8423 static int wake_affine(struct sched_domain *sd, struct task_struct *p,
8424 int this_cpu, int prev_cpu, int sync)
8425 {
8426 int target = nr_cpumask_bits;
8427
8428 if (sched_feat(WA_IDLE))
8429 target = wake_affine_idle(this_cpu, prev_cpu, sync);
8430
8431 if (sched_feat(WA_WEIGHT) && target == nr_cpumask_bits)
8432 target = wake_affine_weight(sd, p, this_cpu, prev_cpu, sync);
8433
8434 schedstat_inc(p->stats.nr_wakeups_affine_attempts);
8435 if (target != this_cpu)
8436 return prev_cpu;
8437
8438 schedstat_inc(sd->ttwu_move_affine);
8439 schedstat_inc(p->stats.nr_wakeups_affine);
8440 return target;
8441 }
8442
8443 static struct sched_group *
8444 sched_balance_find_dst_group(struct sched_domain *sd, struct task_struct *p, int this_cpu);
8445
8446 /*
8447 * sched_balance_find_dst_group_cpu - find the idlest CPU among the CPUs in the group.
8448 */
8449 static int
sched_balance_find_dst_group_cpu(struct sched_group * group,struct task_struct * p,int this_cpu)8450 sched_balance_find_dst_group_cpu(struct sched_group *group, struct task_struct *p, int this_cpu)
8451 {
8452 unsigned long load, min_load = ULONG_MAX;
8453 unsigned int min_exit_latency = UINT_MAX;
8454 u64 latest_idle_timestamp = 0;
8455 int least_loaded_cpu = this_cpu;
8456 int shallowest_idle_cpu = -1;
8457 int i;
8458
8459 /* Check if we have any choice: */
8460 if (group->group_weight == 1)
8461 return cpumask_first(sched_group_span(group));
8462
8463 /* Traverse only the allowed CPUs */
8464 for_each_cpu_and(i, sched_group_span(group), p->cpus_ptr) {
8465 struct rq *rq = cpu_rq(i);
8466
8467 if (!sched_core_cookie_match(rq, p))
8468 continue;
8469
8470 if (choose_sched_idle_rq(rq, p))
8471 return i;
8472
8473 if (available_idle_cpu(i)) {
8474 struct cpuidle_state *idle = idle_get_state(rq);
8475 if (idle && idle->exit_latency < min_exit_latency) {
8476 /*
8477 * We give priority to a CPU whose idle state
8478 * has the smallest exit latency irrespective
8479 * of any idle timestamp.
8480 */
8481 min_exit_latency = idle->exit_latency;
8482 latest_idle_timestamp = rq->idle_stamp;
8483 shallowest_idle_cpu = i;
8484 } else if ((!idle || idle->exit_latency == min_exit_latency) &&
8485 rq->idle_stamp > latest_idle_timestamp) {
8486 /*
8487 * If equal or no active idle state, then
8488 * the most recently idled CPU might have
8489 * a warmer cache.
8490 */
8491 latest_idle_timestamp = rq->idle_stamp;
8492 shallowest_idle_cpu = i;
8493 }
8494 } else if (shallowest_idle_cpu == -1) {
8495 load = cpu_load(cpu_rq(i));
8496 if (load < min_load) {
8497 min_load = load;
8498 least_loaded_cpu = i;
8499 }
8500 }
8501 }
8502
8503 return shallowest_idle_cpu != -1 ? shallowest_idle_cpu : least_loaded_cpu;
8504 }
8505
sched_balance_find_dst_cpu(struct sched_domain * sd,struct task_struct * p,int cpu,int prev_cpu,int sd_flag)8506 static inline int sched_balance_find_dst_cpu(struct sched_domain *sd, struct task_struct *p,
8507 int cpu, int prev_cpu, int sd_flag)
8508 {
8509 int new_cpu = cpu;
8510
8511 if (!cpumask_intersects(sched_domain_span(sd), p->cpus_ptr))
8512 return prev_cpu;
8513
8514 /*
8515 * We need task's util for cpu_util_without, sync it up to
8516 * prev_cpu's last_update_time.
8517 */
8518 if (!(sd_flag & SD_BALANCE_FORK))
8519 sync_entity_load_avg(&p->se);
8520
8521 while (sd) {
8522 struct sched_group *group;
8523 struct sched_domain *tmp;
8524 int weight;
8525
8526 if (!(sd->flags & sd_flag)) {
8527 sd = sd->child;
8528 continue;
8529 }
8530
8531 group = sched_balance_find_dst_group(sd, p, cpu);
8532 if (!group) {
8533 sd = sd->child;
8534 continue;
8535 }
8536
8537 new_cpu = sched_balance_find_dst_group_cpu(group, p, cpu);
8538 if (new_cpu == cpu) {
8539 /* Now try balancing at a lower domain level of 'cpu': */
8540 sd = sd->child;
8541 continue;
8542 }
8543
8544 /* Now try balancing at a lower domain level of 'new_cpu': */
8545 cpu = new_cpu;
8546 weight = sd->span_weight;
8547 sd = NULL;
8548 for_each_domain(cpu, tmp) {
8549 if (weight <= tmp->span_weight)
8550 break;
8551 if (tmp->flags & sd_flag)
8552 sd = tmp;
8553 }
8554 }
8555
8556 return new_cpu;
8557 }
8558
__select_idle_cpu(int cpu,struct task_struct * p)8559 static inline int __select_idle_cpu(int cpu, struct task_struct *p)
8560 {
8561 if (choose_idle_cpu(cpu, p) && sched_cpu_cookie_match(cpu_rq(cpu), p))
8562 return cpu;
8563
8564 return -1;
8565 }
8566
8567 DEFINE_STATIC_KEY_FALSE(sched_smt_present);
8568 EXPORT_SYMBOL_GPL(sched_smt_present);
8569
set_idle_cores(int cpu,int val)8570 static inline void set_idle_cores(int cpu, int val)
8571 {
8572 struct sched_domain_shared *sds;
8573
8574 sds = rcu_dereference_all(per_cpu(sd_balance_shared, cpu));
8575 if (sds)
8576 WRITE_ONCE(sds->has_idle_cores, val);
8577 }
8578
test_idle_cores(int cpu)8579 static inline bool test_idle_cores(int cpu)
8580 {
8581 struct sched_domain_shared *sds;
8582
8583 sds = rcu_dereference_all(per_cpu(sd_balance_shared, cpu));
8584 if (sds)
8585 return READ_ONCE(sds->has_idle_cores);
8586
8587 return false;
8588 }
8589
8590 /*
8591 * Scans the local SMT mask to see if the entire core is idle, and records this
8592 * information in sd_balance_shared->has_idle_cores.
8593 *
8594 * Since SMT siblings share all cache levels, inspecting this limited remote
8595 * state should be fairly cheap.
8596 */
__update_idle_core(struct rq * rq)8597 void __update_idle_core(struct rq *rq)
8598 {
8599 int core = cpu_of(rq);
8600 int cpu;
8601
8602 rcu_read_lock();
8603 if (test_idle_cores(core))
8604 goto unlock;
8605
8606 for_each_cpu(cpu, cpu_smt_mask(core)) {
8607 if (cpu == core)
8608 continue;
8609
8610 if (!available_idle_cpu(cpu))
8611 goto unlock;
8612 }
8613
8614 set_idle_cores(core, 1);
8615 unlock:
8616 rcu_read_unlock();
8617 }
8618
8619 /*
8620 * Scan the entire LLC domain for idle cores; this dynamically switches off if
8621 * there are no idle cores left in the system; tracked through
8622 * sd_balance_shared->has_idle_cores and enabled through update_idle_core()
8623 * above.
8624 */
select_idle_core(struct task_struct * p,int core,struct cpumask * cpus,int * idle_cpu)8625 static int select_idle_core(struct task_struct *p, int core, struct cpumask *cpus, int *idle_cpu)
8626 {
8627 bool idle = true;
8628 int cpu;
8629
8630 for_each_cpu(cpu, cpu_smt_mask(core)) {
8631 if (!available_idle_cpu(cpu)) {
8632 idle = false;
8633 if (*idle_cpu == -1) {
8634 if (choose_sched_idle_rq(cpu_rq(cpu), p) &&
8635 cpumask_test_cpu(cpu, cpus)) {
8636 *idle_cpu = cpu;
8637 break;
8638 }
8639 continue;
8640 }
8641 break;
8642 }
8643 if (*idle_cpu == -1 && cpumask_test_cpu(cpu, cpus))
8644 *idle_cpu = cpu;
8645 }
8646
8647 if (idle)
8648 return core;
8649
8650 cpumask_andnot(cpus, cpus, cpu_smt_mask(core));
8651 return -1;
8652 }
8653
8654 /*
8655 * Scan the local SMT mask for idle CPUs.
8656 */
select_idle_smt(struct task_struct * p,struct sched_domain * sd,int target)8657 static int select_idle_smt(struct task_struct *p, struct sched_domain *sd, int target)
8658 {
8659 int cpu;
8660
8661 for_each_cpu_and(cpu, cpu_smt_mask(target), p->cpus_ptr) {
8662 if (cpu == target)
8663 continue;
8664 /*
8665 * Check if the CPU is in the LLC scheduling domain of @target.
8666 * Due to isolcpus, there is no guarantee that all the siblings are in the domain.
8667 */
8668 if (!cpumask_test_cpu(cpu, sched_domain_span(sd)))
8669 continue;
8670 if (choose_idle_cpu(cpu, p))
8671 return cpu;
8672 }
8673
8674 return -1;
8675 }
8676
8677 /*
8678 * Scan the LLC domain for idle CPUs; this is dynamically regulated by
8679 * comparing the average scan cost (tracked in sd->avg_scan_cost) against the
8680 * average idle time for this rq (as found in rq->avg_idle).
8681 */
select_idle_cpu(struct task_struct * p,struct sched_domain * sd,bool has_idle_core,int target)8682 static int select_idle_cpu(struct task_struct *p, struct sched_domain *sd, bool has_idle_core, int target)
8683 {
8684 struct cpumask *cpus = this_cpu_cpumask_var_ptr(select_rq_mask);
8685 int i, cpu, idle_cpu = -1, nr = INT_MAX;
8686
8687 if (sched_feat(SIS_UTIL) && sd->shared) {
8688 /*
8689 * Increment because !--nr is the condition to stop scan.
8690 *
8691 * Since "sd" is "sd_llc" for target CPU dereferenced in the
8692 * caller, it is safe to directly dereference "sd->shared".
8693 * Topology bits always ensure it assigned for "sd_llc" abd it
8694 * cannot disappear as long as we have a RCU protected
8695 * reference to one the associated "sd" here.
8696 */
8697 nr = READ_ONCE(sd->shared->nr_idle_scan) + 1;
8698 /* overloaded LLC is unlikely to have idle cpu/core */
8699 if (nr == 1)
8700 return -1;
8701 }
8702
8703 if (!cpumask_and(cpus, sched_domain_span(sd), p->cpus_ptr))
8704 return -1;
8705
8706 if (static_branch_unlikely(&sched_cluster_active)) {
8707 struct sched_group *sg = sd->groups;
8708
8709 if (sg->flags & SD_CLUSTER) {
8710 for_each_cpu_wrap(cpu, sched_group_span(sg), target + 1) {
8711 if (!cpumask_test_cpu(cpu, cpus))
8712 continue;
8713
8714 if (has_idle_core) {
8715 i = select_idle_core(p, cpu, cpus, &idle_cpu);
8716 if ((unsigned int)i < nr_cpumask_bits)
8717 return i;
8718 } else {
8719 if (--nr <= 0)
8720 return -1;
8721 idle_cpu = __select_idle_cpu(cpu, p);
8722 if ((unsigned int)idle_cpu < nr_cpumask_bits)
8723 return idle_cpu;
8724 }
8725 }
8726 cpumask_andnot(cpus, cpus, sched_group_span(sg));
8727 }
8728 }
8729
8730 for_each_cpu_wrap(cpu, cpus, target + 1) {
8731 if (has_idle_core) {
8732 i = select_idle_core(p, cpu, cpus, &idle_cpu);
8733 if ((unsigned int)i < nr_cpumask_bits)
8734 return i;
8735
8736 } else {
8737 if (--nr <= 0)
8738 return -1;
8739 idle_cpu = __select_idle_cpu(cpu, p);
8740 if ((unsigned int)idle_cpu < nr_cpumask_bits)
8741 break;
8742 }
8743 }
8744
8745 if (has_idle_core)
8746 set_idle_cores(target, false);
8747
8748 return idle_cpu;
8749 }
8750
8751 /*
8752 * Idle-capacity scan converts util_fits_cpu() outcomes into preference ranks,
8753 * where lower values indicate a better fit - see select_idle_capacity().
8754 *
8755 * A CPU that both fits the task and sits on a fully-idle SMT core is returned
8756 * immediately and is never assigned one of these ranks. On !SMT every CPU is
8757 * its own "core", so the early return covers all fits-and-idle cases and the
8758 * core-tier ranks below become unreachable.
8759 *
8760 * Rank Val Tier Meaning
8761 * ------------------------------ --- ------ ---------------------------
8762 * ASYM_IDLE_UCLAMP_MISFIT -4 core Idle core; capacity fits
8763 * util but uclamp_min misses.
8764 * ASYM_IDLE_COMPLETE_MISFIT -3 core Idle core; capacity does
8765 * not fit. Still beats every
8766 * thread-tier rank: a busy
8767 * sibling cuts effective
8768 * capacity more than a
8769 * misfit hurts a quiet core.
8770 * ASYM_IDLE_THREAD_FITS -2 thread Busy SMT sibling; capacity
8771 * fits util + uclamp.
8772 * ASYM_IDLE_THREAD_UCLAMP_MISFIT -1 thread Busy SMT sibling; capacity
8773 * fits but uclamp_min misses
8774 * (native util_fits_cpu()
8775 * return value).
8776 * ASYM_IDLE_THREAD_MISFIT 0 thread Busy SMT sibling; capacity
8777 * does not fit.
8778 *
8779 * ASYM_IDLE_CORE_BIAS (-3) is an offset, not a state. On an idle core,
8780 * fits += ASYM_IDLE_CORE_BIAS rebases thread-tier ranks into the core tier:
8781 *
8782 * ASYM_IDLE_THREAD_UCLAMP_MISFIT (-1) + BIAS -> ASYM_IDLE_UCLAMP_MISFIT (-4)
8783 * ASYM_IDLE_THREAD_MISFIT (0) + BIAS -> ASYM_IDLE_COMPLETE_MISFIT (-3)
8784 *
8785 * ASYM_IDLE_THREAD_FITS (-2) is never rebased because a fully-fitting idle-core
8786 * candidate early-returns from select_idle_capacity().
8787 */
8788 enum asym_fits_state {
8789 ASYM_IDLE_UCLAMP_MISFIT = -4,
8790 ASYM_IDLE_COMPLETE_MISFIT,
8791 ASYM_IDLE_THREAD_FITS,
8792 ASYM_IDLE_THREAD_UCLAMP_MISFIT,
8793 ASYM_IDLE_THREAD_MISFIT,
8794
8795 /* util_fits_cpu() bias for idle core */
8796 ASYM_IDLE_CORE_BIAS = -3,
8797 };
8798
8799 /*
8800 * Scan the asym_capacity domain for idle CPUs; pick the first idle one on which
8801 * the task fits. If no CPU is big enough, but there are idle ones, try to
8802 * maximize capacity.
8803 */
8804 static int
select_idle_capacity(struct task_struct * p,struct sched_domain * sd,int target)8805 select_idle_capacity(struct task_struct *p, struct sched_domain *sd, int target)
8806 {
8807 /*
8808 * On !SMT systems, has_idle_core is always false and preferred_core
8809 * is always true (CPU == core), so the SMT preference logic below
8810 * collapses to the plain capacity scan.
8811 */
8812 bool has_idle_core = sched_smt_active() && test_idle_cores(target);
8813 unsigned long task_util, util_min, util_max, best_cap = 0;
8814 int fits, best_fits = ASYM_IDLE_THREAD_MISFIT;
8815 int cpu, best_cpu = -1;
8816 struct cpumask *cpus;
8817 int nr = INT_MAX;
8818
8819 cpus = this_cpu_cpumask_var_ptr(select_rq_mask);
8820 cpumask_and(cpus, sched_domain_span(sd), p->cpus_ptr);
8821
8822 task_util = task_util_est(p);
8823 util_min = uclamp_eff_value(p, UCLAMP_MIN);
8824 util_max = uclamp_eff_value(p, UCLAMP_MAX);
8825
8826 if (sched_feat(SIS_UTIL) && sd->shared) {
8827 /*
8828 * Same nr_idle_scan hint as select_idle_cpu(), nr only limits
8829 * the scan when not preferring an idle core.
8830 */
8831 nr = READ_ONCE(sd->shared->nr_idle_scan) + 1;
8832 /* overloaded domain is unlikely to have idle cpu/core */
8833 if (nr == 1)
8834 return -1;
8835 }
8836
8837 for_each_cpu_wrap(cpu, cpus, target) {
8838 bool preferred_core = !has_idle_core || is_core_idle(cpu);
8839 unsigned long cpu_cap = capacity_of(cpu);
8840
8841 /*
8842 * Stop when the nr_idle_scan is exhausted (mirrors
8843 * select_idle_cpu() logic).
8844 */
8845 if (!has_idle_core && --nr <= 0)
8846 return best_cpu;
8847
8848 if (!choose_idle_cpu(cpu, p))
8849 continue;
8850
8851 fits = util_fits_cpu(task_util, util_min, util_max, cpu);
8852
8853 /*
8854 * Perfect fit: capacity satisfies util + uclamp and the CPU
8855 * sits on a fully-idle SMT core, this is a !SMT system, or
8856 * there is no idle core to find.
8857 * Short-circuit the rank-based selection and return
8858 * immediately.
8859 */
8860 if (fits > 0 && preferred_core)
8861 return cpu;
8862 /*
8863 * Only the min performance hint (i.e. uclamp_min) doesn't fit.
8864 * Look for the CPU with best capacity.
8865 */
8866 else if (fits < 0)
8867 cpu_cap = get_actual_cpu_capacity(cpu);
8868 /*
8869 * fits > 0 implies we are not on a preferred core, but the util
8870 * fits CPU capacity. Set fits to ASYM_IDLE_THREAD_FITS
8871 * so the effective range becomes
8872 * [ASYM_IDLE_THREAD_FITS, ASYM_IDLE_THREAD_MISFIT], where:
8873 * ASYM_IDLE_THREAD_MISFIT - does not fit
8874 * ASYM_IDLE_THREAD_UCLAMP_MISFIT - fits with the exception of UCLAMP_MIN
8875 * ASYM_IDLE_THREAD_FITS - fits with the exception of preferred_core
8876 */
8877 else if (fits > 0)
8878 fits = ASYM_IDLE_THREAD_FITS;
8879
8880 /*
8881 * If we are on a preferred core, translate the range of fits
8882 * of [ASYM_IDLE_THREAD_UCLAMP_MISFIT, ASYM_IDLE_THREAD_MISFIT] to
8883 * [ASYM_IDLE_UCLAMP_MISFIT, ASYM_IDLE_COMPLETE_MISFIT].
8884 * This ensures that an idle core is always given priority over
8885 * (partially) busy core.
8886 *
8887 * A fully fitting idle core would have returned early and hence
8888 * fits > 0 for preferred_core need not be dealt with.
8889 */
8890 if (preferred_core)
8891 fits += ASYM_IDLE_CORE_BIAS;
8892
8893 /*
8894 * First, select CPU which fits better (lower is more preferred).
8895 * Then, select the one with best capacity at same level.
8896 */
8897 if ((fits < best_fits) ||
8898 ((fits == best_fits) && (cpu_cap > best_cap))) {
8899 best_cap = cpu_cap;
8900 best_cpu = cpu;
8901 best_fits = fits;
8902 }
8903 }
8904
8905 /*
8906 * A value in the [ASYM_IDLE_UCLAMP_MISFIT, ASYM_IDLE_COMPLETE_MISFIT]
8907 * range means the chosen CPU is in a fully idle SMT core. Values above
8908 * ASYM_IDLE_COMPLETE_MISFIT mean we never ranked such a CPU best.
8909 *
8910 * The asym-capacity wakeup path returns from select_idle_sibling()
8911 * after this function and never runs select_idle_cpu(), so the usual
8912 * select_idle_cpu() tail that clears idle cores must live here when the
8913 * idle-core preference did not win.
8914 */
8915 if (has_idle_core && best_fits > ASYM_IDLE_COMPLETE_MISFIT)
8916 set_idle_cores(target, false);
8917
8918 return best_cpu;
8919 }
8920
asym_fits_cpu(unsigned long util,unsigned long util_min,unsigned long util_max,int cpu)8921 static inline bool asym_fits_cpu(unsigned long util,
8922 unsigned long util_min,
8923 unsigned long util_max,
8924 int cpu)
8925 {
8926 if (sched_asym_cpucap_active()) {
8927 /*
8928 * Return true only if the cpu fully fits the task requirements
8929 * which include the utilization and the performance hints.
8930 *
8931 * When SMT is active, also require that the core has no busy
8932 * siblings.
8933 *
8934 * Note: gating on is_core_idle() also makes the early-bailout
8935 * candidates in select_idle_sibling() (target, prev,
8936 * recent_used_cpu) idle-core-aware on ASYM+SMT, which the
8937 * NO_ASYM path does not do.
8938 */
8939 return (!sched_smt_active() || is_core_idle(cpu)) &&
8940 (util_fits_cpu(util, util_min, util_max, cpu) > 0);
8941 }
8942
8943 return true;
8944 }
8945
8946 /*
8947 * Try and locate an idle core/thread in the LLC cache domain.
8948 */
select_idle_sibling(struct task_struct * p,int prev,int target)8949 static int select_idle_sibling(struct task_struct *p, int prev, int target)
8950 {
8951 bool has_idle_core = false;
8952 struct sched_domain *sd;
8953 unsigned long task_util, util_min, util_max;
8954 int i, recent_used_cpu, prev_aff = -1;
8955
8956 /*
8957 * On asymmetric system, update task utilization because we will check
8958 * that the task fits with CPU's capacity.
8959 */
8960 if (sched_asym_cpucap_active()) {
8961 sync_entity_load_avg(&p->se);
8962 task_util = task_util_est(p);
8963 util_min = uclamp_eff_value(p, UCLAMP_MIN);
8964 util_max = uclamp_eff_value(p, UCLAMP_MAX);
8965 }
8966
8967 /*
8968 * per-cpu select_rq_mask usage
8969 */
8970 lockdep_assert_irqs_disabled();
8971
8972 if (choose_idle_cpu(target, p) &&
8973 asym_fits_cpu(task_util, util_min, util_max, target))
8974 return target;
8975
8976 /*
8977 * If the previous CPU is cache affine and idle, don't be stupid:
8978 */
8979 if (prev != target && cpus_share_cache(prev, target) &&
8980 choose_idle_cpu(prev, p) &&
8981 asym_fits_cpu(task_util, util_min, util_max, prev)) {
8982
8983 if (!static_branch_unlikely(&sched_cluster_active) ||
8984 cpus_share_resources(prev, target))
8985 return prev;
8986
8987 prev_aff = prev;
8988 }
8989
8990 /*
8991 * Allow a per-cpu kthread to stack with the wakee if the
8992 * kworker thread and the tasks previous CPUs are the same.
8993 * The assumption is that the wakee queued work for the
8994 * per-cpu kthread that is now complete and the wakeup is
8995 * essentially a sync wakeup. An obvious example of this
8996 * pattern is IO completions.
8997 */
8998 if (is_per_cpu_kthread(current) &&
8999 in_task() &&
9000 prev == smp_processor_id() &&
9001 this_rq()->nr_running <= 1 &&
9002 asym_fits_cpu(task_util, util_min, util_max, prev)) {
9003 return prev;
9004 }
9005
9006 /* Check a recently used CPU as a potential idle candidate: */
9007 recent_used_cpu = p->recent_used_cpu;
9008 p->recent_used_cpu = prev;
9009 if (recent_used_cpu != prev &&
9010 recent_used_cpu != target &&
9011 cpus_share_cache(recent_used_cpu, target) &&
9012 choose_idle_cpu(recent_used_cpu, p) &&
9013 cpumask_test_cpu(recent_used_cpu, p->cpus_ptr) &&
9014 asym_fits_cpu(task_util, util_min, util_max, recent_used_cpu)) {
9015
9016 if (!static_branch_unlikely(&sched_cluster_active) ||
9017 cpus_share_resources(recent_used_cpu, target))
9018 return recent_used_cpu;
9019
9020 } else {
9021 recent_used_cpu = -1;
9022 }
9023
9024 /*
9025 * For asymmetric CPU capacity systems, our domain of interest is
9026 * sd_asym_cpucapacity rather than sd_llc.
9027 */
9028 if (sched_asym_cpucap_active()) {
9029 sd = rcu_dereference_all(per_cpu(sd_asym_cpucapacity, target));
9030 /*
9031 * On an asymmetric CPU capacity system where an exclusive
9032 * cpuset defines a symmetric island (i.e. one unique
9033 * capacity_orig value through the cpuset), the key will be set
9034 * but the CPUs within that cpuset will not have a domain with
9035 * SD_ASYM_CPUCAPACITY. These should follow the usual symmetric
9036 * capacity path.
9037 */
9038 if (sd) {
9039 i = select_idle_capacity(p, sd, target);
9040 return ((unsigned)i < nr_cpumask_bits) ? i : target;
9041 }
9042 }
9043
9044 sd = rcu_dereference_all(per_cpu(sd_llc, target));
9045 if (!sd)
9046 return target;
9047
9048 if (sched_smt_active()) {
9049 has_idle_core = test_idle_cores(target);
9050
9051 if (!has_idle_core && cpus_share_cache(prev, target)) {
9052 i = select_idle_smt(p, sd, prev);
9053 if ((unsigned int)i < nr_cpumask_bits)
9054 return i;
9055 }
9056 }
9057
9058 i = select_idle_cpu(p, sd, has_idle_core, target);
9059 if ((unsigned)i < nr_cpumask_bits)
9060 return i;
9061
9062 /*
9063 * For cluster machines which have lower sharing cache like L2 or
9064 * LLC Tag, we tend to find an idle CPU in the target's cluster
9065 * first. But prev_cpu or recent_used_cpu may also be a good candidate,
9066 * use them if possible when no idle CPU found in select_idle_cpu().
9067 */
9068 if ((unsigned int)prev_aff < nr_cpumask_bits)
9069 return prev_aff;
9070 if ((unsigned int)recent_used_cpu < nr_cpumask_bits)
9071 return recent_used_cpu;
9072
9073 return target;
9074 }
9075
9076 /**
9077 * cpu_util() - Estimates the amount of CPU capacity used by CFS tasks.
9078 * @cpu: the CPU to get the utilization for
9079 * @p: task for which the CPU utilization should be predicted or NULL
9080 * @dst_cpu: CPU @p migrates to, -1 if @p moves from @cpu or @p == NULL
9081 * @boost: 1 to enable boosting, otherwise 0
9082 *
9083 * The unit of the return value must be the same as the one of CPU capacity
9084 * so that CPU utilization can be compared with CPU capacity.
9085 *
9086 * CPU utilization is the sum of running time of runnable tasks plus the
9087 * recent utilization of currently non-runnable tasks on that CPU.
9088 * It represents the amount of CPU capacity currently used by CFS tasks in
9089 * the range [0..max CPU capacity] with max CPU capacity being the CPU
9090 * capacity at f_max.
9091 *
9092 * The estimated CPU utilization is defined as the maximum between CPU
9093 * utilization and sum of the estimated utilization of the currently
9094 * runnable tasks on that CPU. It preserves a utilization "snapshot" of
9095 * previously-executed tasks, which helps better deduce how busy a CPU will
9096 * be when a long-sleeping task wakes up. The contribution to CPU utilization
9097 * of such a task would be significantly decayed at this point of time.
9098 *
9099 * Boosted CPU utilization is defined as max(CPU runnable, CPU utilization).
9100 * CPU contention for CFS tasks can be detected by CPU runnable > CPU
9101 * utilization. Boosting is implemented in cpu_util() so that internal
9102 * users (e.g. EAS) can use it next to external users (e.g. schedutil),
9103 * latter via cpu_util_cfs_boost().
9104 *
9105 * CPU utilization can be higher than the current CPU capacity
9106 * (f_curr/f_max * max CPU capacity) or even the max CPU capacity because
9107 * of rounding errors as well as task migrations or wakeups of new tasks.
9108 * CPU utilization has to be capped to fit into the [0..max CPU capacity]
9109 * range. Otherwise a group of CPUs (CPU0 util = 121% + CPU1 util = 80%)
9110 * could be seen as over-utilized even though CPU1 has 20% of spare CPU
9111 * capacity. CPU utilization is allowed to overshoot current CPU capacity
9112 * though since this is useful for predicting the CPU capacity required
9113 * after task migrations (scheduler-driven DVFS).
9114 *
9115 * Return: (Boosted) (estimated) utilization for the specified CPU.
9116 */
9117 static unsigned long
cpu_util(int cpu,struct task_struct * p,int dst_cpu,int boost)9118 cpu_util(int cpu, struct task_struct *p, int dst_cpu, int boost)
9119 {
9120 bool add_task = p && task_cpu(p) != cpu && dst_cpu == cpu;
9121 bool sub_task = p && task_cpu(p) == cpu && dst_cpu != cpu;
9122 struct cfs_rq *cfs_rq = &cpu_rq(cpu)->cfs;
9123 unsigned long util = READ_ONCE(cfs_rq->avg.util_avg);
9124 unsigned long runnable;
9125
9126 /*
9127 * If @dst_cpu is -1 or @p migrates from @cpu to @dst_cpu remove its
9128 * contribution. If @p migrates from another CPU to @cpu add its
9129 * contribution. In all the other cases @cpu is not impacted by the
9130 * migration so its util_avg is already correct.
9131 */
9132 if (add_task)
9133 util += task_util(p);
9134 else if (sub_task)
9135 lsub_positive(&util, task_util(p));
9136
9137 if (boost) {
9138 runnable = READ_ONCE(cfs_rq->avg.runnable_avg);
9139 if (add_task)
9140 runnable += READ_ONCE(p->se.avg.runnable_avg);
9141 else if (sub_task)
9142 lsub_positive(&runnable,
9143 READ_ONCE(p->se.avg.runnable_avg));
9144 util = max(util, runnable);
9145 }
9146
9147 if (sched_feat(UTIL_EST)) {
9148 unsigned long util_est;
9149
9150 util_est = READ_ONCE(cfs_rq->avg.util_est);
9151
9152 /*
9153 * During wake-up @p isn't enqueued yet and doesn't contribute
9154 * to any cpu_rq(cpu)->cfs.avg.util_est.
9155 * If @dst_cpu == @cpu add it to "simulate" cpu_util after @p
9156 * has been enqueued.
9157 *
9158 * During exec (@dst_cpu = -1) @p is enqueued and does
9159 * contribute to cpu_rq(cpu)->cfs.util_est.
9160 * Remove it to "simulate" cpu_util without @p's contribution.
9161 *
9162 * Despite the task_on_rq_queued(@p) check there is still a
9163 * small window for a possible race when an exec
9164 * select_task_rq_fair() races with LB's detach_task().
9165 *
9166 * detach_task()
9167 * deactivate_task()
9168 * p->on_rq = TASK_ON_RQ_MIGRATING;
9169 * -------------------------------- A
9170 * dequeue_task() \
9171 * dequeue_task_fair() + Race Time
9172 * util_est_dequeue() /
9173 * -------------------------------- B
9174 *
9175 * The additional check "current == p" is required to further
9176 * reduce the race window.
9177 */
9178 if (dst_cpu == cpu)
9179 util_est += _task_util_est(p);
9180 else if (p && unlikely(task_on_rq_queued(p) || current == p))
9181 lsub_positive(&util_est, _task_util_est(p));
9182
9183 util = max(util, util_est);
9184 }
9185
9186 return min(util, arch_scale_cpu_capacity(cpu));
9187 }
9188
cpu_util_cfs(int cpu)9189 unsigned long cpu_util_cfs(int cpu)
9190 {
9191 return cpu_util(cpu, NULL, -1, 0);
9192 }
9193
cpu_util_cfs_boost(int cpu)9194 unsigned long cpu_util_cfs_boost(int cpu)
9195 {
9196 return cpu_util(cpu, NULL, -1, 1);
9197 }
9198
9199 /*
9200 * cpu_util_without: compute cpu utilization without any contributions from *p
9201 * @cpu: the CPU which utilization is requested
9202 * @p: the task which utilization should be discounted
9203 *
9204 * The utilization of a CPU is defined by the utilization of tasks currently
9205 * enqueued on that CPU as well as tasks which are currently sleeping after an
9206 * execution on that CPU.
9207 *
9208 * This method returns the utilization of the specified CPU by discounting the
9209 * utilization of the specified task, whenever the task is currently
9210 * contributing to the CPU utilization.
9211 */
cpu_util_without(int cpu,struct task_struct * p)9212 static unsigned long cpu_util_without(int cpu, struct task_struct *p)
9213 {
9214 /* Task has no contribution or is new */
9215 if (cpu != task_cpu(p) || !READ_ONCE(p->se.avg.last_update_time))
9216 p = NULL;
9217
9218 return cpu_util(cpu, p, -1, 0);
9219 }
9220
9221 /*
9222 * This function computes an effective utilization for the given CPU, to be
9223 * used for frequency selection given the linear relation: f = u * f_max.
9224 *
9225 * The scheduler tracks the following metrics:
9226 *
9227 * cpu_util_{cfs,rt,dl,irq}()
9228 * cpu_bw_dl()
9229 *
9230 * Where the cfs,rt and dl util numbers are tracked with the same metric and
9231 * synchronized windows and are thus directly comparable.
9232 *
9233 * The cfs,rt,dl utilization are the running times measured with rq->clock_task
9234 * which excludes things like IRQ and steal-time. These latter are then accrued
9235 * in the IRQ utilization.
9236 *
9237 * The DL bandwidth number OTOH is not a measured metric but a value computed
9238 * based on the task model parameters and gives the minimal utilization
9239 * required to meet deadlines.
9240 */
effective_cpu_util(int cpu,unsigned long util_cfs,unsigned long * min,unsigned long * max)9241 unsigned long effective_cpu_util(int cpu, unsigned long util_cfs,
9242 unsigned long *min,
9243 unsigned long *max)
9244 {
9245 unsigned long util, irq, scale;
9246 struct rq *rq = cpu_rq(cpu);
9247
9248 scale = arch_scale_cpu_capacity(cpu);
9249
9250 /*
9251 * Early check to see if IRQ/steal time saturates the CPU, can be
9252 * because of inaccuracies in how we track these -- see
9253 * update_irq_load_avg().
9254 */
9255 irq = cpu_util_irq(rq);
9256 if (unlikely(irq >= scale)) {
9257 if (min)
9258 *min = scale;
9259 if (max)
9260 *max = scale;
9261 return scale;
9262 }
9263
9264 if (min) {
9265 /*
9266 * The minimum utilization returns the highest level between:
9267 * - the computed DL bandwidth needed with the IRQ pressure which
9268 * steals time to the deadline task.
9269 * - The minimum performance requirement for CFS and/or RT.
9270 */
9271 *min = max(irq + cpu_bw_dl(rq), uclamp_rq_get(rq, UCLAMP_MIN));
9272
9273 /*
9274 * When an RT task is runnable and uclamp is not used, we must
9275 * ensure that the task will run at maximum compute capacity.
9276 */
9277 if (!uclamp_is_used() && rt_rq_is_runnable(&rq->rt))
9278 *min = max(*min, scale);
9279 }
9280
9281 /*
9282 * Because the time spend on RT/DL tasks is visible as 'lost' time to
9283 * CFS tasks and we use the same metric to track the effective
9284 * utilization (PELT windows are synchronized) we can directly add them
9285 * to obtain the CPU's actual utilization.
9286 */
9287 util = util_cfs + cpu_util_rt(rq);
9288 util += cpu_util_dl(rq);
9289
9290 /*
9291 * The maximum hint is a soft bandwidth requirement, which can be lower
9292 * than the actual utilization because of uclamp_max requirements.
9293 */
9294 if (max)
9295 *max = min(scale, uclamp_rq_get(rq, UCLAMP_MAX));
9296
9297 if (util >= scale)
9298 return scale;
9299
9300 /*
9301 * There is still idle time; further improve the number by using the
9302 * IRQ metric. Because IRQ/steal time is hidden from the task clock we
9303 * need to scale the task numbers:
9304 *
9305 * max - irq
9306 * U' = irq + --------- * U
9307 * max
9308 */
9309 util = scale_irq_capacity(util, irq, scale);
9310 util += irq;
9311
9312 return min(scale, util);
9313 }
9314
sched_cpu_util(int cpu)9315 unsigned long sched_cpu_util(int cpu)
9316 {
9317 return effective_cpu_util(cpu, cpu_util_cfs(cpu), NULL, NULL);
9318 }
9319
9320 /*
9321 * energy_env - Utilization landscape for energy estimation.
9322 * @task_busy_time: Utilization contribution by the task for which we test the
9323 * placement. Given by eenv_task_busy_time().
9324 * @pd_busy_time: Utilization of the whole perf domain without the task
9325 * contribution. Given by eenv_pd_busy_time().
9326 * @cpu_cap: Maximum CPU capacity for the perf domain.
9327 * @pd_cap: Entire perf domain capacity. (pd->nr_cpus * cpu_cap).
9328 */
9329 struct energy_env {
9330 unsigned long task_busy_time;
9331 unsigned long pd_busy_time;
9332 unsigned long cpu_cap;
9333 unsigned long pd_cap;
9334 };
9335
9336 /*
9337 * Compute the task busy time for compute_energy(). This time cannot be
9338 * injected directly into effective_cpu_util() because of the IRQ scaling.
9339 * The latter only makes sense with the most recent CPUs where the task has
9340 * run.
9341 */
eenv_task_busy_time(struct energy_env * eenv,struct task_struct * p,int prev_cpu)9342 static inline void eenv_task_busy_time(struct energy_env *eenv,
9343 struct task_struct *p, int prev_cpu)
9344 {
9345 unsigned long busy_time, max_cap = arch_scale_cpu_capacity(prev_cpu);
9346 unsigned long irq = cpu_util_irq(cpu_rq(prev_cpu));
9347
9348 if (unlikely(irq >= max_cap))
9349 busy_time = max_cap;
9350 else
9351 busy_time = scale_irq_capacity(task_util_est(p), irq, max_cap);
9352
9353 eenv->task_busy_time = busy_time;
9354 }
9355
9356 /*
9357 * Compute the perf_domain (PD) busy time for compute_energy(). Based on the
9358 * utilization for each @pd_cpus, it however doesn't take into account
9359 * clamping since the ratio (utilization / cpu_capacity) is already enough to
9360 * scale the EM reported power consumption at the (eventually clamped)
9361 * cpu_capacity.
9362 *
9363 * The contribution of the task @p for which we want to estimate the
9364 * energy cost is removed (by cpu_util()) and must be calculated
9365 * separately (see eenv_task_busy_time). This ensures:
9366 *
9367 * - A stable PD utilization, no matter which CPU of that PD we want to place
9368 * the task on.
9369 *
9370 * - A fair comparison between CPUs as the task contribution (task_util())
9371 * will always be the same no matter which CPU utilization we rely on
9372 * (util_avg or util_est).
9373 *
9374 * Set @eenv busy time for the PD that spans @pd_cpus. This busy time can't
9375 * exceed @eenv->pd_cap.
9376 */
eenv_pd_busy_time(struct energy_env * eenv,struct cpumask * pd_cpus,struct task_struct * p)9377 static inline void eenv_pd_busy_time(struct energy_env *eenv,
9378 struct cpumask *pd_cpus,
9379 struct task_struct *p)
9380 {
9381 unsigned long busy_time = 0;
9382 int cpu;
9383
9384 for_each_cpu(cpu, pd_cpus) {
9385 unsigned long util = cpu_util(cpu, p, -1, 0);
9386
9387 busy_time += effective_cpu_util(cpu, util, NULL, NULL);
9388 }
9389
9390 eenv->pd_busy_time = min(eenv->pd_cap, busy_time);
9391 }
9392
9393 /*
9394 * Compute the maximum utilization for compute_energy() when the task @p
9395 * is placed on the cpu @dst_cpu.
9396 *
9397 * Returns the maximum utilization among @eenv->cpus. This utilization can't
9398 * exceed @eenv->cpu_cap.
9399 */
9400 static inline unsigned long
eenv_pd_max_util(struct energy_env * eenv,struct cpumask * pd_cpus,struct task_struct * p,int dst_cpu)9401 eenv_pd_max_util(struct energy_env *eenv, struct cpumask *pd_cpus,
9402 struct task_struct *p, int dst_cpu)
9403 {
9404 unsigned long max_util = 0;
9405 int cpu;
9406
9407 for_each_cpu(cpu, pd_cpus) {
9408 struct task_struct *tsk = (cpu == dst_cpu) ? p : NULL;
9409 unsigned long util = cpu_util(cpu, p, dst_cpu, 1);
9410 unsigned long eff_util, min, max;
9411
9412 /*
9413 * Performance domain frequency: utilization clamping
9414 * must be considered since it affects the selection
9415 * of the performance domain frequency.
9416 * NOTE: in case RT tasks are running, by default the min
9417 * utilization can be max OPP.
9418 */
9419 eff_util = effective_cpu_util(cpu, util, &min, &max);
9420
9421 /* Task's uclamp can modify min and max value */
9422 if (tsk && uclamp_is_used()) {
9423 min = max(min, uclamp_eff_value(p, UCLAMP_MIN));
9424
9425 /*
9426 * If there is no active max uclamp constraint,
9427 * directly use task's one, otherwise keep max.
9428 */
9429 if (uclamp_rq_is_idle(cpu_rq(cpu)))
9430 max = uclamp_eff_value(p, UCLAMP_MAX);
9431 else
9432 max = max(max, uclamp_eff_value(p, UCLAMP_MAX));
9433 }
9434
9435 eff_util = sugov_effective_cpu_perf(cpu, eff_util, min, max);
9436 max_util = max(max_util, eff_util);
9437 }
9438
9439 return min(max_util, eenv->cpu_cap);
9440 }
9441
9442 /*
9443 * compute_energy(): Use the Energy Model to estimate the energy that @pd would
9444 * consume for a given utilization landscape @eenv. When @dst_cpu < 0, the task
9445 * contribution is ignored.
9446 */
9447 static inline unsigned long
compute_energy(struct energy_env * eenv,struct perf_domain * pd,struct cpumask * pd_cpus,struct task_struct * p,int dst_cpu)9448 compute_energy(struct energy_env *eenv, struct perf_domain *pd,
9449 struct cpumask *pd_cpus, struct task_struct *p, int dst_cpu)
9450 {
9451 unsigned long max_util = eenv_pd_max_util(eenv, pd_cpus, p, dst_cpu);
9452 unsigned long busy_time = eenv->pd_busy_time;
9453 unsigned long energy;
9454
9455 if (dst_cpu >= 0)
9456 busy_time = min(eenv->pd_cap, busy_time + eenv->task_busy_time);
9457
9458 energy = em_cpu_energy(pd->em_pd, max_util, busy_time, eenv->cpu_cap);
9459
9460 trace_sched_compute_energy_tp(p, dst_cpu, energy, max_util, busy_time);
9461
9462 return energy;
9463 }
9464
9465 /*
9466 * find_energy_efficient_cpu(): Find most energy-efficient target CPU for the
9467 * waking task. find_energy_efficient_cpu() looks for the CPU with maximum
9468 * spare capacity in each performance domain and uses it as a potential
9469 * candidate to execute the task. Then, it uses the Energy Model to figure
9470 * out which of the CPU candidates is the most energy-efficient.
9471 *
9472 * The rationale for this heuristic is as follows. In a performance domain,
9473 * all the most energy efficient CPU candidates (according to the Energy
9474 * Model) are those for which we'll request a low frequency. When there are
9475 * several CPUs for which the frequency request will be the same, we don't
9476 * have enough data to break the tie between them, because the Energy Model
9477 * only includes active power costs. With this model, if we assume that
9478 * frequency requests follow utilization (e.g. using schedutil), the CPU with
9479 * the maximum spare capacity in a performance domain is guaranteed to be among
9480 * the best candidates of the performance domain.
9481 *
9482 * In practice, it could be preferable from an energy standpoint to pack
9483 * small tasks on a CPU in order to let other CPUs go in deeper idle states,
9484 * but that could also hurt our chances to go cluster idle, and we have no
9485 * ways to tell with the current Energy Model if this is actually a good
9486 * idea or not. So, find_energy_efficient_cpu() basically favors
9487 * cluster-packing, and spreading inside a cluster. That should at least be
9488 * a good thing for latency, and this is consistent with the idea that most
9489 * of the energy savings of EAS come from the asymmetry of the system, and
9490 * not so much from breaking the tie between identical CPUs. That's also the
9491 * reason why EAS is enabled in the topology code only for systems where
9492 * SD_ASYM_CPUCAPACITY is set.
9493 *
9494 * NOTE: Forkees are not accepted in the energy-aware wake-up path because
9495 * they don't have any useful utilization data yet and it's not possible to
9496 * forecast their impact on energy consumption. Consequently, they will be
9497 * placed by sched_balance_find_dst_cpu() on the least loaded CPU, which might turn out
9498 * to be energy-inefficient in some use-cases. The alternative would be to
9499 * bias new tasks towards specific types of CPUs first, or to try to infer
9500 * their util_avg from the parent task, but those heuristics could hurt
9501 * other use-cases too. So, until someone finds a better way to solve this,
9502 * let's keep things simple by re-using the existing slow path.
9503 */
find_energy_efficient_cpu(struct task_struct * p,int prev_cpu)9504 static int find_energy_efficient_cpu(struct task_struct *p, int prev_cpu)
9505 {
9506 struct cpumask *cpus = this_cpu_cpumask_var_ptr(select_rq_mask);
9507 unsigned long prev_delta = ULONG_MAX, best_delta = ULONG_MAX;
9508 unsigned long p_util_min = uclamp_is_used() ? uclamp_eff_value(p, UCLAMP_MIN) : 0;
9509 unsigned long p_util_max = uclamp_is_used() ? uclamp_eff_value(p, UCLAMP_MAX) : 1024;
9510 struct root_domain *rd = this_rq()->rd;
9511 int cpu, best_energy_cpu, target = -1;
9512 int prev_fits = -1, best_fits = -1;
9513 unsigned long best_actual_cap = 0;
9514 unsigned long prev_actual_cap = 0;
9515 struct sched_domain *sd;
9516 struct perf_domain *pd;
9517 struct energy_env eenv;
9518
9519 pd = rcu_dereference_all(rd->pd);
9520 if (!pd)
9521 return target;
9522
9523 /*
9524 * Energy-aware wake-up happens on the lowest sched_domain starting
9525 * from sd_asym_cpucapacity spanning over this_cpu and prev_cpu.
9526 */
9527 sd = rcu_dereference_all(*this_cpu_ptr(&sd_asym_cpucapacity));
9528 while (sd && !cpumask_test_cpu(prev_cpu, sched_domain_span(sd)))
9529 sd = sd->parent;
9530 if (!sd)
9531 return target;
9532
9533 target = prev_cpu;
9534
9535 sync_entity_load_avg(&p->se);
9536 if (!task_util_est(p) && p_util_min == 0)
9537 return target;
9538
9539 eenv_task_busy_time(&eenv, p, prev_cpu);
9540
9541 for (; pd; pd = pd->next) {
9542 unsigned long util_min = p_util_min, util_max = p_util_max;
9543 unsigned long cpu_cap, cpu_actual_cap, util;
9544 long prev_spare_cap = -1, max_spare_cap = -1;
9545 unsigned long rq_util_min, rq_util_max;
9546 unsigned long cur_delta, base_energy;
9547 int max_spare_cap_cpu = -1;
9548 int fits, max_fits = -1;
9549
9550 if (!cpumask_and(cpus, perf_domain_span(pd), cpu_online_mask))
9551 continue;
9552
9553 /* Account external pressure for the energy estimation */
9554 cpu = cpumask_first(cpus);
9555 cpu_actual_cap = get_actual_cpu_capacity(cpu);
9556
9557 eenv.cpu_cap = cpu_actual_cap;
9558 eenv.pd_cap = 0;
9559
9560 for_each_cpu(cpu, cpus) {
9561 struct rq *rq = cpu_rq(cpu);
9562
9563 eenv.pd_cap += cpu_actual_cap;
9564
9565 if (!cpumask_test_cpu(cpu, sched_domain_span(sd)))
9566 continue;
9567
9568 if (!cpumask_test_cpu(cpu, p->cpus_ptr))
9569 continue;
9570
9571 util = cpu_util(cpu, p, cpu, 0);
9572 cpu_cap = capacity_of(cpu);
9573
9574 /*
9575 * Skip CPUs that cannot satisfy the capacity request.
9576 * IOW, placing the task there would make the CPU
9577 * overutilized. Take uclamp into account to see how
9578 * much capacity we can get out of the CPU; this is
9579 * aligned with sched_cpu_util().
9580 */
9581 if (uclamp_is_used() && !uclamp_rq_is_idle(rq)) {
9582 /*
9583 * Open code uclamp_rq_util_with() except for
9584 * the clamp() part. I.e.: apply max aggregation
9585 * only. util_fits_cpu() logic requires to
9586 * operate on non clamped util but must use the
9587 * max-aggregated uclamp_{min, max}.
9588 */
9589 rq_util_min = uclamp_rq_get(rq, UCLAMP_MIN);
9590 rq_util_max = uclamp_rq_get(rq, UCLAMP_MAX);
9591
9592 util_min = max(rq_util_min, p_util_min);
9593 util_max = max(rq_util_max, p_util_max);
9594 }
9595
9596 fits = util_fits_cpu(util, util_min, util_max, cpu);
9597 if (!fits)
9598 continue;
9599
9600 lsub_positive(&cpu_cap, util);
9601
9602 if (cpu == prev_cpu) {
9603 /* Always use prev_cpu as a candidate. */
9604 prev_spare_cap = cpu_cap;
9605 prev_fits = fits;
9606 } else if ((fits > max_fits) ||
9607 ((fits == max_fits) && ((long)cpu_cap > max_spare_cap))) {
9608 /*
9609 * Find the CPU with the maximum spare capacity
9610 * among the remaining CPUs in the performance
9611 * domain.
9612 */
9613 max_spare_cap = cpu_cap;
9614 max_spare_cap_cpu = cpu;
9615 max_fits = fits;
9616 }
9617 }
9618
9619 if (max_spare_cap_cpu < 0 && prev_spare_cap < 0)
9620 continue;
9621
9622 eenv_pd_busy_time(&eenv, cpus, p);
9623 /* Compute the 'base' energy of the pd, without @p */
9624 base_energy = compute_energy(&eenv, pd, cpus, p, -1);
9625
9626 /* Evaluate the energy impact of using prev_cpu. */
9627 if (prev_spare_cap > -1) {
9628 prev_delta = compute_energy(&eenv, pd, cpus, p,
9629 prev_cpu);
9630 /* CPU utilization has changed */
9631 if (prev_delta < base_energy)
9632 return target;
9633 prev_delta -= base_energy;
9634 prev_actual_cap = cpu_actual_cap;
9635 best_delta = min(best_delta, prev_delta);
9636 }
9637
9638 /* Evaluate the energy impact of using max_spare_cap_cpu. */
9639 if (max_spare_cap_cpu >= 0 && max_spare_cap > prev_spare_cap) {
9640 /* Current best energy cpu fits better */
9641 if (max_fits < best_fits)
9642 continue;
9643
9644 /*
9645 * Both don't fit performance hint (i.e. uclamp_min)
9646 * but best energy cpu has better capacity.
9647 */
9648 if ((max_fits < 0) &&
9649 (cpu_actual_cap <= best_actual_cap))
9650 continue;
9651
9652 cur_delta = compute_energy(&eenv, pd, cpus, p,
9653 max_spare_cap_cpu);
9654 /* CPU utilization has changed */
9655 if (cur_delta < base_energy)
9656 return target;
9657 cur_delta -= base_energy;
9658
9659 /*
9660 * Both fit for the task but best energy cpu has lower
9661 * energy impact.
9662 */
9663 if ((max_fits > 0) && (best_fits > 0) &&
9664 (cur_delta >= best_delta))
9665 continue;
9666
9667 best_delta = cur_delta;
9668 best_energy_cpu = max_spare_cap_cpu;
9669 best_fits = max_fits;
9670 best_actual_cap = cpu_actual_cap;
9671 }
9672 }
9673
9674 if ((best_fits > prev_fits) ||
9675 ((best_fits > 0) && (best_delta < prev_delta)) ||
9676 ((best_fits < 0) && (best_actual_cap > prev_actual_cap)))
9677 target = best_energy_cpu;
9678
9679 return target;
9680 }
9681
9682 /*
9683 * select_task_rq_fair: Select target runqueue for the waking task in domains
9684 * that have the relevant SD flag set. In practice, this is SD_BALANCE_WAKE,
9685 * SD_BALANCE_FORK, or SD_BALANCE_EXEC.
9686 *
9687 * Balances load by selecting the idlest CPU in the idlest group, or under
9688 * certain conditions an idle sibling CPU if the domain has SD_WAKE_AFFINE set.
9689 *
9690 * Returns the target CPU number.
9691 */
9692 static int
select_task_rq_fair(struct task_struct * p,int prev_cpu,int wake_flags)9693 select_task_rq_fair(struct task_struct *p, int prev_cpu, int wake_flags)
9694 {
9695 int sync = (wake_flags & WF_SYNC) && !(current->flags & PF_EXITING);
9696 struct sched_domain *tmp, *sd = NULL;
9697 int cpu = smp_processor_id();
9698 int new_cpu = prev_cpu;
9699 int want_affine = 0;
9700 /* SD_flags and WF_flags share the first nibble */
9701 int sd_flag = wake_flags & 0xF;
9702
9703 /*
9704 * required for stable ->cpus_allowed
9705 */
9706 lockdep_assert_held(&p->pi_lock);
9707 if (wake_flags & WF_TTWU) {
9708 record_wakee(p);
9709
9710 if ((wake_flags & WF_CURRENT_CPU) &&
9711 cpumask_test_cpu(cpu, p->cpus_ptr))
9712 return cpu;
9713
9714 if (!is_rd_overutilized(this_rq()->rd)) {
9715 new_cpu = find_energy_efficient_cpu(p, prev_cpu);
9716 if (new_cpu >= 0)
9717 return new_cpu;
9718 new_cpu = prev_cpu;
9719 }
9720
9721 want_affine = !wake_wide(p) && cpumask_test_cpu(cpu, p->cpus_ptr);
9722 }
9723
9724 for_each_domain(cpu, tmp) {
9725 /*
9726 * If both 'cpu' and 'prev_cpu' are part of this domain,
9727 * cpu is a valid SD_WAKE_AFFINE target.
9728 */
9729 if (want_affine && (tmp->flags & SD_WAKE_AFFINE) &&
9730 cpumask_test_cpu(prev_cpu, sched_domain_span(tmp))) {
9731 if (cpu != prev_cpu)
9732 new_cpu = wake_affine(tmp, p, cpu, prev_cpu, sync);
9733
9734 sd = NULL; /* Prefer wake_affine over balance flags */
9735 break;
9736 }
9737
9738 /*
9739 * Usually only true for WF_EXEC and WF_FORK, as sched_domains
9740 * usually do not have SD_BALANCE_WAKE set. That means wakeup
9741 * will usually go to the fast path.
9742 */
9743 if (tmp->flags & sd_flag)
9744 sd = tmp;
9745 else if (!want_affine)
9746 break;
9747 }
9748
9749 /* Slow path */
9750 if (unlikely(sd))
9751 return sched_balance_find_dst_cpu(sd, p, cpu, prev_cpu, sd_flag);
9752
9753 /* Fast path */
9754 if (wake_flags & WF_TTWU)
9755 return select_idle_sibling(p, prev_cpu, new_cpu);
9756
9757 return new_cpu;
9758 }
9759
9760 /*
9761 * Called immediately before a task is migrated to a new CPU; task_cpu(p) and
9762 * cfs_rq_of(p) references at time of call are still valid and identify the
9763 * previous CPU. The caller guarantees p->pi_lock or task_rq(p)->lock is held.
9764 */
migrate_task_rq_fair(struct task_struct * p,int new_cpu)9765 static void migrate_task_rq_fair(struct task_struct *p, int new_cpu)
9766 {
9767 struct sched_entity *se = &p->se;
9768
9769 if (!task_on_rq_migrating(p)) {
9770 remove_entity_load_avg(se);
9771
9772 /*
9773 * Here, the task's PELT values have been updated according to
9774 * the current rq's clock. But if that clock hasn't been
9775 * updated in a while, a substantial idle time will be missed,
9776 * leading to an inflation after wake-up on the new rq.
9777 *
9778 * Estimate the missing time from the cfs_rq last_update_time
9779 * and update sched_avg to improve the PELT continuity after
9780 * migration.
9781 */
9782 migrate_se_pelt_lag(se);
9783 }
9784
9785 /* Tell new CPU we are migrated */
9786 se->avg.last_update_time = 0;
9787
9788 update_scan_period(p, new_cpu);
9789 }
9790
task_dead_fair(struct task_struct * p)9791 static void task_dead_fair(struct task_struct *p)
9792 {
9793 struct sched_entity *se = &p->se;
9794 remove_entity_load_avg(se);
9795 }
9796
9797 /*
9798 * Set the max capacity the task is allowed to run at for misfit detection.
9799 */
set_task_max_allowed_capacity(struct task_struct * p)9800 static void set_task_max_allowed_capacity(struct task_struct *p)
9801 {
9802 struct asym_cap_data *entry;
9803
9804 if (!sched_asym_cpucap_active())
9805 return;
9806
9807 rcu_read_lock();
9808 list_for_each_entry_rcu(entry, &asym_cap_list, link) {
9809 cpumask_t *cpumask;
9810
9811 cpumask = cpu_capacity_span(entry);
9812 if (!cpumask_intersects(p->cpus_ptr, cpumask))
9813 continue;
9814
9815 p->max_allowed_capacity = entry->capacity;
9816 break;
9817 }
9818 rcu_read_unlock();
9819 }
9820
set_cpus_allowed_fair(struct task_struct * p,struct affinity_context * ctx)9821 static void set_cpus_allowed_fair(struct task_struct *p, struct affinity_context *ctx)
9822 {
9823 set_cpus_allowed_common(p, ctx);
9824 set_task_max_allowed_capacity(p);
9825 }
9826
9827 enum preempt_wakeup_action {
9828 PREEMPT_WAKEUP_NONE, /* No preemption. */
9829 PREEMPT_WAKEUP_SHORT, /* Ignore slice protection. */
9830 PREEMPT_WAKEUP_PICK, /* Let pick_eevdf() decide. */
9831 PREEMPT_WAKEUP_RESCHED, /* Force reschedule. */
9832 };
9833
set_preempt_buddy(struct cfs_rq * cfs_rq,struct sched_entity * pse)9834 static inline bool set_preempt_buddy(struct cfs_rq *cfs_rq, struct sched_entity *pse)
9835 {
9836 /*
9837 * Keep existing buddy if the deadline is sooner than pse.
9838 * The older buddy may be cache cold and completely unrelated
9839 * to the current wakeup but that is unpredictable where as
9840 * obeying the deadline is more in line with EEVDF objectives.
9841 */
9842 if (cfs_rq->next && entity_before(cfs_rq->next, pse))
9843 return false;
9844
9845 set_next_buddy(cfs_rq, pse);
9846 return true;
9847 }
9848
set_short_buddy(struct cfs_rq * cfs_rq,struct sched_entity * pse)9849 static inline bool set_short_buddy(struct cfs_rq *cfs_rq, struct sched_entity *pse)
9850 {
9851 if (cfs_rq->next && cfs_rq->next->slice < pse->slice)
9852 return false;
9853
9854 set_next_buddy(cfs_rq, pse);
9855 return true;
9856 }
9857
9858 /*
9859 * WF_SYNC|WF_TTWU indicates the waker expects to sleep but it is not
9860 * strictly enforced because the hint is either misunderstood or
9861 * multiple tasks must be woken up.
9862 */
9863 static inline enum preempt_wakeup_action
preempt_sync(struct rq * rq,int wake_flags,struct sched_entity * pse,struct sched_entity * se)9864 preempt_sync(struct rq *rq, int wake_flags,
9865 struct sched_entity *pse, struct sched_entity *se)
9866 {
9867 u64 threshold, delta;
9868
9869 /*
9870 * WF_SYNC without WF_TTWU is not expected so warn if it happens even
9871 * though it is likely harmless.
9872 */
9873 WARN_ON_ONCE(!(wake_flags & WF_TTWU));
9874
9875 threshold = sysctl_sched_migration_cost;
9876 delta = rq_clock_task(rq) - se->exec_start;
9877 if ((s64)delta < 0)
9878 delta = 0;
9879
9880 /*
9881 * WF_RQ_SELECTED implies the tasks are stacking on a CPU when they
9882 * could run on other CPUs. Reduce the threshold before preemption is
9883 * allowed to an arbitrary lower value as it is more likely (but not
9884 * guaranteed) the waker requires the wakee to finish.
9885 */
9886 if (wake_flags & WF_RQ_SELECTED)
9887 threshold >>= 2;
9888
9889 /*
9890 * As WF_SYNC is not strictly obeyed, allow some runtime for batch
9891 * wakeups to be issued.
9892 */
9893 if (entity_before(pse, se) && delta >= threshold)
9894 return PREEMPT_WAKEUP_RESCHED;
9895
9896 return PREEMPT_WAKEUP_NONE;
9897 }
9898
9899 /*
9900 * Preempt the current task with a newly woken task if needed:
9901 */
wakeup_preempt_fair(struct rq * rq,struct task_struct * p,int wake_flags)9902 static void wakeup_preempt_fair(struct rq *rq, struct task_struct *p, int wake_flags)
9903 {
9904 enum preempt_wakeup_action preempt_action = PREEMPT_WAKEUP_PICK;
9905 struct task_struct *donor = rq->donor;
9906 struct sched_entity *nse, *se = &donor->se, *pse = &p->se;
9907 struct cfs_rq *cfs_rq = &rq->cfs;
9908 int cse_is_idle, pse_is_idle;
9909
9910 /*
9911 * XXX Getting preempted by higher class, try and find idle CPU?
9912 */
9913 if (p->sched_class != &fair_sched_class ||
9914 donor->sched_class != &fair_sched_class)
9915 return;
9916
9917 if (unlikely(se == pse))
9918 return;
9919
9920 /*
9921 * This is possible from callers such as attach_tasks(), in which we
9922 * unconditionally wakeup_preempt() after an enqueue (which may have
9923 * lead to a throttle). This both saves work and prevents false
9924 * next-buddy nomination below.
9925 */
9926 if (task_is_throttled(p))
9927 return;
9928
9929 /*
9930 * We can come here with TIF_NEED_RESCHED already set from new task
9931 * wake up path.
9932 *
9933 * Note: this also catches the edge-case of curr being in a throttled
9934 * group (e.g. via set_curr_task), since update_curr() (in the
9935 * enqueue of curr) will have resulted in resched being set. This
9936 * prevents us from potentially nominating it as a false LAST_BUDDY
9937 * below.
9938 */
9939 if (!sched_feat(PREEMPT_SHORT) && test_tsk_need_resched(rq->curr))
9940 return;
9941
9942 if (!sched_feat(WAKEUP_PREEMPTION))
9943 return;
9944
9945 WARN_ON_ONCE(!pse);
9946
9947 cse_is_idle = se_is_idle(se);
9948 pse_is_idle = se_is_idle(pse);
9949
9950 nse = se;
9951 /*
9952 * Preempt an idle entity in favor of a non-idle entity (and don't preempt
9953 * in the inverse case).
9954 */
9955 if (cse_is_idle && !pse_is_idle)
9956 goto preempt;
9957
9958 update_curr_fair(rq);
9959
9960 if (cse_is_idle != pse_is_idle)
9961 goto update;
9962
9963 /*
9964 * BATCH and IDLE tasks do not preempt others.
9965 */
9966 if (unlikely(!normal_policy(p->policy)))
9967 goto update;
9968
9969 /*
9970 * Do not preempt for tasks that are sched_delayed as it would violate
9971 * EEVDF to forcibly queue an ineligible task.
9972 */
9973 if (pse->sched_delayed)
9974 goto update;
9975
9976 /*
9977 * If @p has a shorter slice than current and @p is eligible, override
9978 * current's slice protection in order to allow preemption.
9979 */
9980 if (sched_feat(PREEMPT_SHORT) && (pse->slice < se->slice)) {
9981 preempt_action = PREEMPT_WAKEUP_SHORT;
9982 goto pick;
9983 }
9984
9985 /*
9986 * Ignore wakee preemption on WF_FORK as it is less likely that
9987 * there is shared data as exec often follow fork.
9988 */
9989 if (wake_flags & WF_FORK)
9990 goto update;
9991
9992 /* Prefer picking wakee soon if appropriate. */
9993 if (sched_feat(NEXT_BUDDY) && set_preempt_buddy(cfs_rq, pse)) {
9994 /*
9995 * Decide whether to obey WF_SYNC hint for a new buddy. Old
9996 * buddies are ignored as they may not be relevant to the
9997 * waker and less likely to be cache hot.
9998 */
9999 if (wake_flags & WF_SYNC)
10000 preempt_action = preempt_sync(rq, wake_flags, pse, se);
10001 }
10002
10003 switch (preempt_action) {
10004 case PREEMPT_WAKEUP_NONE:
10005 return;
10006 case PREEMPT_WAKEUP_RESCHED:
10007 goto preempt;
10008 case PREEMPT_WAKEUP_SHORT:
10009 fallthrough;
10010 case PREEMPT_WAKEUP_PICK:
10011 break;
10012 }
10013
10014 pick:
10015 if (cfs_rq->h_nr_queued) {
10016 nse = pick_next_entity(rq, preempt_action != PREEMPT_WAKEUP_SHORT);
10017 if (unlikely(!nse))
10018 goto pick;
10019
10020 /* If @p has become the most eligible task, force preemption */
10021 if (nse == pse)
10022 goto preempt;
10023 }
10024
10025 /*
10026 * If @p is eligible but not the next task to run then cancel protection
10027 * to prevent large scheduling latency
10028 */
10029 if (preempt_action == PREEMPT_WAKEUP_SHORT && entity_eligible(cfs_rq, pse))
10030 goto preempt;
10031 update:
10032 if (sched_feat(RUN_TO_PARITY))
10033 update_protect_slice(cfs_rq, se);
10034
10035 return;
10036
10037 preempt:
10038 cancel_protect_slice(se);
10039
10040 if (preempt_action == PREEMPT_WAKEUP_SHORT)
10041 set_short_buddy(cfs_rq, pse);
10042
10043 resched_curr_lazy(rq);
10044 }
10045
pick_task_fair(struct rq * rq,struct rq_flags * rf)10046 struct task_struct *pick_task_fair(struct rq *rq, struct rq_flags *rf)
10047 __must_hold(__rq_lockp(rq))
10048 {
10049 struct cfs_rq *cfs_rq = &rq->cfs;
10050 struct sched_entity *se;
10051 struct task_struct *p;
10052 int new_tasks;
10053
10054 again:
10055 if (!cfs_rq->h_nr_queued)
10056 goto idle;
10057
10058 /* Might not have done put_prev_entity() */
10059 if (cfs_rq->curr && cfs_rq->curr->on_rq)
10060 update_curr(cfs_rq);
10061
10062 se = pick_next_entity(rq, true);
10063 if (!se)
10064 goto again;
10065
10066 p = task_of(se);
10067 return p;
10068
10069 idle:
10070 if (sched_core_enabled(rq))
10071 return NULL;
10072
10073 new_tasks = sched_balance_newidle(rq, rf);
10074 if (new_tasks < 0)
10075 return RETRY_TASK;
10076 if (new_tasks > 0)
10077 goto again;
10078 return NULL;
10079 }
10080
10081 static struct task_struct *
fair_server_pick_task(struct sched_dl_entity * dl_se,struct rq_flags * rf)10082 fair_server_pick_task(struct sched_dl_entity *dl_se, struct rq_flags *rf)
10083 __must_hold(__rq_lockp(dl_se->rq))
10084 {
10085 return pick_task_fair(dl_se->rq, rf);
10086 }
10087
fair_server_init(struct rq * rq)10088 void fair_server_init(struct rq *rq)
10089 {
10090 struct sched_dl_entity *dl_se = &rq->fair_server;
10091
10092 init_dl_entity(dl_se);
10093
10094 dl_server_init(dl_se, rq, fair_server_pick_task);
10095 }
10096
10097 /*
10098 * Account for a descheduled task:
10099 */
put_prev_task_fair(struct rq * rq,struct task_struct * prev,struct task_struct * next)10100 static void put_prev_task_fair(struct rq *rq, struct task_struct *prev, struct task_struct *next)
10101 {
10102 struct sched_entity *se = &prev->se;
10103 struct cfs_rq *cfs_rq = &rq->cfs;
10104 struct sched_entity *nse = NULL;
10105
10106 #ifdef CONFIG_FAIR_GROUP_SCHED
10107 if (next && next->sched_class == &fair_sched_class)
10108 nse = &next->se;
10109 #endif
10110
10111 while (se) {
10112 cfs_rq = cfs_rq_of(se);
10113 if (!nse || cfs_rq->h_curr)
10114 put_prev_entity(cfs_rq, se);
10115 #ifdef CONFIG_FAIR_GROUP_SCHED
10116 if (nse) {
10117 if (is_same_group(se, nse))
10118 break;
10119
10120 int d = nse->depth - se->depth;
10121 if (d >= 0) {
10122 /* nse has equal or greater depth, ascend */
10123 nse = parent_entity(nse);
10124 /* if nse is the deeper, do not ascend se */
10125 if (d > 0)
10126 continue;
10127 }
10128 }
10129 #endif
10130 se = parent_entity(se);
10131 }
10132
10133 /* Put 'current' back into the tree. */
10134 cfs_rq = &rq->cfs;
10135 se = &prev->se;
10136 WARN_ON_ONCE(cfs_rq->curr != se);
10137 cfs_rq->curr = NULL;
10138 if (se->on_rq)
10139 __enqueue_entity(cfs_rq, se);
10140 }
10141
10142 /*
10143 * sched_yield() is very simple
10144 */
yield_task_fair(struct rq * rq)10145 static void yield_task_fair(struct rq *rq)
10146 {
10147 struct task_struct *curr = rq->donor;
10148 struct sched_entity *se = &curr->se;
10149 struct cfs_rq *cfs_rq = &rq->cfs;
10150
10151 /*
10152 * Are we the only task in the tree?
10153 */
10154 if (unlikely(rq->nr_running == 1))
10155 return;
10156
10157 clear_buddies(cfs_rq, se);
10158
10159 update_rq_clock(rq);
10160 /*
10161 * Update run-time statistics of the 'current'.
10162 */
10163 update_curr(cfs_rq);
10164 /*
10165 * Tell update_rq_clock() that we've just updated,
10166 * so we don't do microscopic update in schedule()
10167 * and double the fastpath cost.
10168 */
10169 rq_clock_skip_update(rq);
10170
10171 /*
10172 * Forfeit the remaining vruntime, only if the entity is eligible. This
10173 * condition is necessary because in core scheduling we prefer to run
10174 * ineligible tasks rather than force idling. If this happens we may
10175 * end up in a loop where the core scheduler picks the yielding task,
10176 * which yields immediately again; without the condition the vruntime
10177 * ends up quickly running away.
10178 */
10179 if (entity_eligible(cfs_rq, se)) {
10180 se->vruntime = se->deadline;
10181 update_deadline(cfs_rq, se);
10182 }
10183 }
10184
yield_to_task_fair(struct rq * rq,struct task_struct * p)10185 static bool yield_to_task_fair(struct rq *rq, struct task_struct *p)
10186 {
10187 struct sched_entity *se = &p->se;
10188
10189 /* !se->on_rq also covers throttled task */
10190 if (!se->on_rq || se->sched_delayed)
10191 return false;
10192
10193 /* Tell the scheduler that we'd really like se to run next. */
10194 set_next_buddy(&task_rq(p)->cfs, se);
10195
10196 yield_task_fair(rq);
10197
10198 return true;
10199 }
10200
10201 /**************************************************
10202 * Fair scheduling class load-balancing methods.
10203 *
10204 * BASICS
10205 *
10206 * The purpose of load-balancing is to achieve the same basic fairness the
10207 * per-CPU scheduler provides, namely provide a proportional amount of compute
10208 * time to each task. This is expressed in the following equation:
10209 *
10210 * W_i,n/P_i == W_j,n/P_j for all i,j (1)
10211 *
10212 * Where W_i,n is the n-th weight average for CPU i. The instantaneous weight
10213 * W_i,0 is defined as:
10214 *
10215 * W_i,0 = \Sum_j w_i,j (2)
10216 *
10217 * Where w_i,j is the weight of the j-th runnable task on CPU i. This weight
10218 * is derived from the nice value as per sched_prio_to_weight[].
10219 *
10220 * The weight average is an exponential decay average of the instantaneous
10221 * weight:
10222 *
10223 * W'_i,n = (2^n - 1) / 2^n * W_i,n + 1 / 2^n * W_i,0 (3)
10224 *
10225 * C_i is the compute capacity of CPU i, typically it is the
10226 * fraction of 'recent' time available for SCHED_OTHER task execution. But it
10227 * can also include other factors [XXX].
10228 *
10229 * To achieve this balance we define a measure of imbalance which follows
10230 * directly from (1):
10231 *
10232 * imb_i,j = max{ avg(W/C), W_i/C_i } - min{ avg(W/C), W_j/C_j } (4)
10233 *
10234 * We them move tasks around to minimize the imbalance. In the continuous
10235 * function space it is obvious this converges, in the discrete case we get
10236 * a few fun cases generally called infeasible weight scenarios.
10237 *
10238 * [XXX expand on:
10239 * - infeasible weights;
10240 * - local vs global optima in the discrete case. ]
10241 *
10242 *
10243 * SCHED DOMAINS
10244 *
10245 * In order to solve the imbalance equation (4), and avoid the obvious O(n^2)
10246 * for all i,j solution, we create a tree of CPUs that follows the hardware
10247 * topology where each level pairs two lower groups (or better). This results
10248 * in O(log n) layers. Furthermore we reduce the number of CPUs going up the
10249 * tree to only the first of the previous level and we decrease the frequency
10250 * of load-balance at each level inversely proportional to the number of CPUs in
10251 * the groups.
10252 *
10253 * This yields:
10254 *
10255 * log_2 n 1 n
10256 * \Sum { --- * --- * 2^i } = O(n) (5)
10257 * i = 0 2^i 2^i
10258 * `- size of each group
10259 * | | `- number of CPUs doing load-balance
10260 * | `- freq
10261 * `- sum over all levels
10262 *
10263 * Coupled with a limit on how many tasks we can migrate every balance pass,
10264 * this makes (5) the runtime complexity of the balancer.
10265 *
10266 * An important property here is that each CPU is still (indirectly) connected
10267 * to every other CPU in at most O(log n) steps:
10268 *
10269 * The adjacency matrix of the resulting graph is given by:
10270 *
10271 * log_2 n
10272 * A_i,j = \Union (i % 2^k == 0) && i / 2^(k+1) == j / 2^(k+1) (6)
10273 * k = 0
10274 *
10275 * And you'll find that:
10276 *
10277 * A^(log_2 n)_i,j != 0 for all i,j (7)
10278 *
10279 * Showing there's indeed a path between every CPU in at most O(log n) steps.
10280 * The task movement gives a factor of O(m), giving a convergence complexity
10281 * of:
10282 *
10283 * O(nm log n), n := nr_cpus, m := nr_tasks (8)
10284 *
10285 *
10286 * WORK CONSERVING
10287 *
10288 * In order to avoid CPUs going idle while there's still work to do, new idle
10289 * balancing is more aggressive and has the newly idle CPU iterate up the domain
10290 * tree itself instead of relying on other CPUs to bring it work.
10291 *
10292 * This adds some complexity to both (5) and (8) but it reduces the total idle
10293 * time.
10294 *
10295 * [XXX more?]
10296 *
10297 *
10298 * CGROUPS
10299 *
10300 * Cgroups make a horror show out of (2), instead of a simple sum we get:
10301 *
10302 * s_k,i
10303 * W_i,0 = \Sum_j \Prod_k w_k * ----- (9)
10304 * S_k
10305 *
10306 * Where
10307 *
10308 * s_k,i = \Sum_j w_i,j,k and S_k = \Sum_i s_k,i (10)
10309 *
10310 * w_i,j,k is the weight of the j-th runnable task in the k-th cgroup on CPU i.
10311 *
10312 * The big problem is S_k, its a global sum needed to compute a local (W_i)
10313 * property.
10314 *
10315 * [XXX write more on how we solve this.. _after_ merging pjt's patches that
10316 * rewrite all of this once again.]
10317 */
10318
10319 static unsigned long __read_mostly max_load_balance_interval = HZ/10;
10320
10321 enum fbq_type { regular, remote, all };
10322
10323 /*
10324 * 'group_type' describes the group of CPUs at the moment of load balancing.
10325 *
10326 * The enum is ordered by pulling priority, with the group with lowest priority
10327 * first so the group_type can simply be compared when selecting the busiest
10328 * group. See update_sd_pick_busiest().
10329 */
10330 enum group_type {
10331 /* The group has spare capacity that can be used to run more tasks. */
10332 group_has_spare = 0,
10333 /*
10334 * The group is fully used and the tasks don't compete for more CPU
10335 * cycles. Nevertheless, some tasks might wait before running.
10336 */
10337 group_fully_busy,
10338 /*
10339 * One task doesn't fit with CPU's capacity and must be migrated to a
10340 * more powerful CPU.
10341 */
10342 group_misfit_task,
10343 /*
10344 * Balance SMT group that's fully busy. Can benefit from migration
10345 * a task on SMT with busy sibling to another CPU on idle core.
10346 */
10347 group_smt_balance,
10348 /*
10349 * SD_ASYM_PACKING only: One local CPU with higher capacity is available,
10350 * and the task should be migrated to it instead of running on the
10351 * current CPU.
10352 */
10353 group_asym_packing,
10354 /*
10355 * The tasks' affinity constraints previously prevented the scheduler
10356 * from balancing the load across the system.
10357 */
10358 group_imbalanced,
10359 /*
10360 * There are tasks running on non-preferred LLC, possible to move
10361 * them to their preferred LLC without creating too much imbalance.
10362 * The priority of group_llc_balance is lower than that of
10363 * group_overloaded and higher than that of all other group types.
10364 * This is because group_llc_balance may exacerbate load imbalance.
10365 * If the LLC balancing attempt fails, the nr_balance_failed
10366 * mechanism will trigger other group types to rebalance the load.
10367 */
10368 group_llc_balance,
10369 /*
10370 * The CPU is overloaded and can't provide expected CPU cycles to all
10371 * tasks.
10372 */
10373 group_overloaded
10374 };
10375
10376 enum migration_type {
10377 migrate_load = 0,
10378 migrate_util,
10379 migrate_task,
10380 migrate_misfit,
10381 migrate_llc_task
10382 };
10383
10384 #define LBF_ALL_PINNED 0x01
10385 #define LBF_NEED_BREAK 0x02
10386 #define LBF_DST_PINNED 0x04
10387 #define LBF_SOME_PINNED 0x08
10388 #define LBF_ACTIVE_LB 0x10
10389 #define LBF_LLC_PINNED 0x20
10390
10391 struct lb_env {
10392 struct sched_domain *sd;
10393
10394 struct rq *src_rq;
10395 int src_cpu;
10396
10397 int dst_cpu;
10398 struct rq *dst_rq;
10399 bool dst_core_idle;
10400
10401 struct cpumask *dst_grpmask;
10402 int new_dst_cpu;
10403 enum cpu_idle_type idle;
10404 long imbalance;
10405 /* The set of CPUs under consideration for load-balancing */
10406 struct cpumask *cpus;
10407
10408 unsigned int flags;
10409
10410 unsigned int loop;
10411 unsigned int loop_break;
10412 unsigned int loop_max;
10413
10414 enum fbq_type fbq_type;
10415 enum migration_type migration_type;
10416 struct list_head tasks;
10417 };
10418
10419 /*
10420 * Is this task likely cache-hot:
10421 */
task_hot(struct task_struct * p,struct lb_env * env)10422 static int task_hot(struct task_struct *p, struct lb_env *env)
10423 {
10424 s64 delta;
10425
10426 lockdep_assert_rq_held(env->src_rq);
10427
10428 if (p->sched_class != &fair_sched_class)
10429 return 0;
10430
10431 if (unlikely(task_has_idle_policy(p)))
10432 return 0;
10433
10434 /* SMT siblings share cache */
10435 if (env->sd->flags & SD_SHARE_CPUCAPACITY)
10436 return 0;
10437
10438 /*
10439 * Buddy candidates are cache hot:
10440 */
10441 if (sched_feat(CACHE_HOT_BUDDY) && env->dst_rq->nr_running &&
10442 (&p->se == cfs_rq_of(&p->se)->next))
10443 return 1;
10444
10445 if (sysctl_sched_migration_cost == -1)
10446 return 1;
10447
10448 /*
10449 * Don't migrate task if the task's cookie does not match
10450 * with the destination CPU's core cookie.
10451 */
10452 if (!sched_core_cookie_match(cpu_rq(env->dst_cpu), p))
10453 return 1;
10454
10455 if (sysctl_sched_migration_cost == 0)
10456 return 0;
10457
10458 delta = rq_clock_task(env->src_rq) - p->se.exec_start;
10459
10460 return delta < (s64)sysctl_sched_migration_cost;
10461 }
10462
10463 #ifdef CONFIG_NUMA_BALANCING
10464 /*
10465 * Returns a positive value, if task migration degrades locality.
10466 * Returns 0, if task migration is not affected by locality.
10467 * Returns a negative value, if task migration improves locality i.e migration preferred.
10468 */
migrate_degrades_locality(struct task_struct * p,struct lb_env * env)10469 static long migrate_degrades_locality(struct task_struct *p, struct lb_env *env)
10470 {
10471 struct numa_group *numa_group = rcu_dereference_all(p->numa_group);
10472 unsigned long src_weight, dst_weight;
10473 int src_nid, dst_nid, dist;
10474
10475 if (!static_branch_likely(&sched_numa_balancing))
10476 return 0;
10477
10478 if (!p->numa_faults || !(env->sd->flags & SD_NUMA))
10479 return 0;
10480
10481 src_nid = cpu_to_node(env->src_cpu);
10482 dst_nid = cpu_to_node(env->dst_cpu);
10483
10484 if (src_nid == dst_nid)
10485 return 0;
10486
10487 /* Migrating away from the preferred node is always bad. */
10488 if (src_nid == p->numa_preferred_nid) {
10489 if (env->src_rq->nr_running > env->src_rq->nr_preferred_running)
10490 return 1;
10491 else
10492 return 0;
10493 }
10494
10495 /* Encourage migration to the preferred node. */
10496 if (dst_nid == p->numa_preferred_nid)
10497 return -1;
10498
10499 /* Leaving a core idle is often worse than degrading locality. */
10500 if (env->idle == CPU_IDLE)
10501 return 0;
10502
10503 dist = node_distance(src_nid, dst_nid);
10504 if (numa_group) {
10505 src_weight = group_weight(p, src_nid, dist);
10506 dst_weight = group_weight(p, dst_nid, dist);
10507 } else {
10508 src_weight = task_weight(p, src_nid, dist);
10509 dst_weight = task_weight(p, dst_nid, dist);
10510 }
10511
10512 return src_weight - dst_weight;
10513 }
10514
10515 #else /* !CONFIG_NUMA_BALANCING: */
migrate_degrades_locality(struct task_struct * p,struct lb_env * env)10516 static inline long migrate_degrades_locality(struct task_struct *p,
10517 struct lb_env *env)
10518 {
10519 return 0;
10520 }
10521 #endif /* !CONFIG_NUMA_BALANCING */
10522
10523 /*
10524 * Check whether the task is ineligible on the destination cpu
10525 *
10526 * When the PLACE_LAG scheduling feature is enabled and
10527 * dst_cfs_rq->nr_queued is greater than 1, if the task
10528 * is ineligible, it will also be ineligible when
10529 * it is migrated to the destination cpu.
10530 */
task_is_ineligible_on_dst_cpu(struct task_struct * p,int dest_cpu)10531 static inline int task_is_ineligible_on_dst_cpu(struct task_struct *p, int dest_cpu)
10532 {
10533 struct cfs_rq *dst_cfs_rq = &cpu_rq(dest_cpu)->cfs;
10534
10535 if (sched_feat(PLACE_LAG) && dst_cfs_rq->h_nr_queued &&
10536 !entity_eligible(&task_rq(p)->cfs, &p->se))
10537 return 1;
10538
10539 return 0;
10540 }
10541
10542 #ifdef CONFIG_SCHED_CACHE
10543 /*
10544 * The margin used when comparing LLC utilization with CPU capacity.
10545 * It determines the LLC load level where active LLC aggregation is
10546 * done.
10547 * Derived from fits_capacity().
10548 *
10549 * (default: ~50%, tunable via debugfs)
10550 */
fits_llc_capacity(unsigned long util,unsigned long max)10551 static bool fits_llc_capacity(unsigned long util, unsigned long max)
10552 {
10553 u32 aggr_pct = llc_overaggr_pct;
10554
10555 /*
10556 * For single core systems, raise the aggregation
10557 * threshold to accommodate more tasks.
10558 */
10559 if (cpu_smt_num_threads == 1)
10560 aggr_pct = (aggr_pct * 3 / 2);
10561
10562 return util * 100 < max * aggr_pct;
10563 }
10564
10565 /*
10566 * The margin used when comparing utilization.
10567 * is 'util1' noticeably greater than 'util2'
10568 * Derived from capacity_greater().
10569 * Bias is in perentage.
10570 */
10571 /* Allows dst util to be bigger than src util by up to bias percent */
10572 #define util_greater(util1, util2) \
10573 ((util1) * 100 > (util2) * (100 + llc_imb_pct))
10574
get_llc_stats(int cpu,unsigned long * util,unsigned long * cap)10575 static __maybe_unused bool get_llc_stats(int cpu, unsigned long *util,
10576 unsigned long *cap)
10577 {
10578 struct sched_domain_shared *sd_share;
10579
10580 sd_share = rcu_dereference_all(per_cpu(sd_llc_shared, cpu));
10581 if (!sd_share)
10582 return false;
10583
10584 *util = READ_ONCE(sd_share->util_avg);
10585 *cap = READ_ONCE(sd_share->capacity);
10586
10587 return true;
10588 }
10589
10590 /*
10591 * Decision matrix according to the LLC utilization. To
10592 * decide whether we can do task aggregation across LLC.
10593 *
10594 * By default, 50% is the threshold for treating the LLC
10595 * as busy. The reason for choosing 50% is to avoid saturation
10596 * of SMT-2, and it is also a safe cutoff for other SMT-n
10597 * platforms. SMT-1 has higher threshold because it is
10598 * supposed to accommodate more tasks, see fits_llc_capacity().
10599 *
10600 * 20% is the utilization imbalance percentage to decide
10601 * if the preferred LLC is busier than the non-preferred LLC.
10602 * 20 is a little higher than the LLC domain's imbalance_pct
10603 * 17. The hysteresis is used to avoid task bouncing between the
10604 * preferred LLC and the non-preferred LLC, and it will
10605 * be turned into tunable debugfs.
10606 *
10607 * 1. moving towards the preferred LLC, dst is the preferred
10608 * LLC, src is not.
10609 *
10610 * src \ dst 30% 40% 50% 60%
10611 * 30% Y Y Y N
10612 * 40% Y Y Y Y
10613 * 50% Y Y G G
10614 * 60% Y Y G G
10615 *
10616 * 2. moving out of the preferred LLC, src is the preferred
10617 * LLC, dst is not:
10618 *
10619 * src \ dst 30% 40% 50% 60%
10620 * 30% N N N N
10621 * 40% N N N N
10622 * 50% N N G G
10623 * 60% Y N G G
10624 *
10625 * src : src_util
10626 * dst : dst_util
10627 * Y : Yes, migrate
10628 * N : No, do not migrate
10629 * G : let the Generic load balance to even the load.
10630 *
10631 * The intention is that if both LLCs are quite busy, cache aware
10632 * load balance should not be performed, and generic load balance
10633 * should take effect. However, if one is busy and the other is not,
10634 * the preferred LLC capacity(50%) and imbalance criteria(20%) should
10635 * be considered to determine whether LLC aggregation should be
10636 * performed to bias the load towards the preferred LLC.
10637 */
10638
10639 /* migration decision, 3 states are orthogonal. */
10640 enum llc_mig {
10641 mig_forbid = 0, /* N: Don't migrate task, respect LLC preference */
10642 mig_llc, /* Y: Do LLC preference based migration */
10643 mig_unrestricted /* G: Don't restrict generic load balance migration */
10644 };
10645
10646 /*
10647 * Check if task can be moved from the source LLC to the
10648 * destination LLC without breaking cache aware preferrence.
10649 * src_cpu and dst_cpu are arbitrary CPUs within the source
10650 * and destination LLCs, respectively.
10651 */
can_migrate_llc(int src_cpu,int dst_cpu,unsigned long tsk_util,bool to_pref)10652 static enum llc_mig can_migrate_llc(int src_cpu, int dst_cpu,
10653 unsigned long tsk_util,
10654 bool to_pref)
10655 {
10656 unsigned long src_util, dst_util, src_cap, dst_cap;
10657
10658 if (!get_llc_stats(src_cpu, &src_util, &src_cap) ||
10659 !get_llc_stats(dst_cpu, &dst_util, &dst_cap))
10660 return mig_unrestricted;
10661
10662 src_util = src_util < tsk_util ? 0 : src_util - tsk_util;
10663 dst_util = dst_util + tsk_util;
10664
10665 if (!fits_llc_capacity(dst_util, dst_cap) &&
10666 !fits_llc_capacity(src_util, src_cap))
10667 return mig_unrestricted;
10668
10669 if (to_pref) {
10670 /*
10671 * Don't migrate if we will get preferred LLC too
10672 * heavily loaded and if the dest is much busier
10673 * than the src, in which case migration will
10674 * increase the imbalance too much.
10675 */
10676 if (!fits_llc_capacity(dst_util, dst_cap) &&
10677 util_greater(dst_util, src_util))
10678 return mig_forbid;
10679 } else {
10680 /*
10681 * Don't migrate if we will leave preferred LLC
10682 * too idle, or if this migration leads to the
10683 * non-preferred LLC falls within sysctl_aggr_imb percent
10684 * of preferred LLC, leading to migration again
10685 * back to preferred LLC.
10686 */
10687 if (fits_llc_capacity(src_util, src_cap) ||
10688 !util_greater(src_util, dst_util))
10689 return mig_forbid;
10690 }
10691 return mig_llc;
10692 }
10693
10694 /*
10695 * Check if task p can migrate from source LLC to
10696 * destination LLC in terms of cache aware load balance.
10697 */
can_migrate_llc_task(int src_cpu,int dst_cpu,struct task_struct * p)10698 static enum llc_mig can_migrate_llc_task(int src_cpu, int dst_cpu,
10699 struct task_struct *p)
10700 {
10701 struct mm_struct *mm;
10702 bool to_pref;
10703 int cpu;
10704
10705 mm = p->mm;
10706 if (!mm)
10707 return mig_unrestricted;
10708
10709 cpu = READ_ONCE(mm->sc_stat.cpu);
10710 if (cpu < 0 || cpus_share_cache(src_cpu, dst_cpu))
10711 return mig_unrestricted;
10712
10713 /* skip cache aware load balance for too many threads */
10714 if (invalid_llc_nr(mm, p, dst_cpu) ||
10715 exceed_llc_capacity(mm, dst_cpu)) {
10716 if (READ_ONCE(mm->sc_stat.cpu) != -1)
10717 WRITE_ONCE(mm->sc_stat.cpu, -1);
10718 return mig_unrestricted;
10719 }
10720
10721 if (cpus_share_cache(dst_cpu, cpu))
10722 to_pref = true;
10723 else if (cpus_share_cache(src_cpu, cpu))
10724 to_pref = false;
10725 else
10726 return mig_unrestricted;
10727
10728 return can_migrate_llc(src_cpu, dst_cpu,
10729 task_util(p), to_pref);
10730 }
10731
10732 /*
10733 * Check if active load balance breaks LLC locality in
10734 * terms of cache aware load balance. The load level and
10735 * imbalance do not warrant breaking LLC preference per
10736 * the can_migrate_llc() policy. Here, the benefit of
10737 * LLC locality outweighs the power efficiency gained from
10738 * migrating the only runnable task away.
10739 */
10740 static inline bool
alb_break_llc(struct lb_env * env)10741 alb_break_llc(struct lb_env *env)
10742 {
10743 if (!sched_cache_enabled())
10744 return false;
10745
10746 if (cpus_share_cache(env->src_cpu, env->dst_cpu))
10747 return false;
10748 /*
10749 * All tasks prefer to stay on their current CPU.
10750 * Do not pull a task from its preferred CPU if:
10751 * 1. It is the only task running and does not exceed
10752 * imbalance allowance; OR
10753 * 2. Migrating it away from its preferred LLC would violate
10754 * the cache-aware scheduling policy.
10755 */
10756 if (env->src_rq->nr_pref_llc_running &&
10757 env->src_rq->nr_pref_llc_running == env->src_rq->cfs.h_nr_runnable) {
10758 unsigned long util = 0;
10759 struct task_struct *cur;
10760
10761 if (env->src_rq->nr_running <= 1)
10762 return true;
10763
10764 cur = rcu_dereference_all(env->src_rq->curr);
10765 if (cur && cur->sched_class == &fair_sched_class)
10766 util = task_util(cur);
10767
10768 if (can_migrate_llc(env->src_cpu, env->dst_cpu,
10769 util, false) == mig_forbid)
10770 return true;
10771 }
10772
10773 return false;
10774 }
10775
10776 /*
10777 * Check if migrating task p from env->src_cpu to
10778 * env->dst_cpu breaks LLC localiy.
10779 */
migrate_degrades_llc(struct task_struct * p,struct lb_env * env)10780 static bool migrate_degrades_llc(struct task_struct *p, struct lb_env *env)
10781 {
10782 if (!sched_cache_enabled())
10783 return false;
10784
10785 if (task_has_sched_core(p))
10786 return false;
10787 /*
10788 * Skip over tasks that would degrade LLC locality;
10789 * only when nr_balanced_failed is sufficiently high do we
10790 * ignore this constraint.
10791 *
10792 * Threshold of cache_nice_tries is set to 1 higher
10793 * than nr_balance_failed to avoid excessive task
10794 * migration at the same time.
10795 */
10796 if (env->sd->nr_balance_failed >= env->sd->cache_nice_tries + 1)
10797 return false;
10798
10799 /*
10800 * We know the env->src_cpu has some tasks prefer to
10801 * run on env->dst_cpu, skip the tasks do not prefer
10802 * env->dst_cpu, and find the one that prefers.
10803 */
10804 if (env->migration_type == migrate_llc_task &&
10805 READ_ONCE(p->preferred_llc) != llc_id(env->dst_cpu))
10806 return true;
10807
10808 if (can_migrate_llc_task(env->src_cpu,
10809 env->dst_cpu, p) != mig_forbid)
10810 return false;
10811
10812 return true;
10813 }
10814
10815 #else
get_llc_stats(int cpu,unsigned long * util,unsigned long * cap)10816 static inline bool get_llc_stats(int cpu, unsigned long *util,
10817 unsigned long *cap)
10818 {
10819 return false;
10820 }
10821
10822 static inline bool
alb_break_llc(struct lb_env * env)10823 alb_break_llc(struct lb_env *env)
10824 {
10825 return false;
10826 }
10827
10828 static inline bool
migrate_degrades_llc(struct task_struct * p,struct lb_env * env)10829 migrate_degrades_llc(struct task_struct *p, struct lb_env *env)
10830 {
10831 return false;
10832 }
10833 #endif
10834 /*
10835 * can_migrate_task - may task p from runqueue rq be migrated to this_cpu?
10836 */
10837 static
can_migrate_task(struct task_struct * p,struct lb_env * env)10838 int can_migrate_task(struct task_struct *p, struct lb_env *env)
10839 {
10840 long degrades, hot;
10841
10842 lockdep_assert_rq_held(env->src_rq);
10843 if (p->sched_task_hot)
10844 p->sched_task_hot = 0;
10845
10846 /*
10847 * We do not migrate tasks that are:
10848 * 1) delayed dequeued unless we migrate load, or
10849 * 2) target cfs_rq is in throttled hierarchy, or
10850 * 3) cannot be migrated to this CPU due to cpus_ptr, or
10851 * 4) running (obviously), or
10852 * 5) are cache-hot on their current CPU, or
10853 * 6) are blocked on mutexes (if SCHED_PROXY_EXEC is enabled)
10854 */
10855 if ((p->se.sched_delayed) && (env->migration_type != migrate_load))
10856 return 0;
10857
10858 if (lb_throttled_hierarchy(p, env->dst_cpu))
10859 return 0;
10860
10861 /*
10862 * We want to prioritize the migration of eligible tasks.
10863 * For ineligible tasks we soft-limit them and only allow
10864 * them to migrate when nr_balance_failed is non-zero to
10865 * avoid load-balancing trying very hard to balance the load.
10866 */
10867 if (!env->sd->nr_balance_failed &&
10868 task_is_ineligible_on_dst_cpu(p, env->dst_cpu))
10869 return 0;
10870
10871 /* Disregard percpu kthreads; they are where they need to be. */
10872 if (kthread_is_per_cpu(p))
10873 return 0;
10874
10875 if (task_is_blocked(p))
10876 return 0;
10877
10878 if (!cpumask_test_cpu(env->dst_cpu, p->cpus_ptr)) {
10879 int cpu;
10880
10881 schedstat_inc(p->stats.nr_failed_migrations_affine);
10882
10883 env->flags |= LBF_SOME_PINNED;
10884
10885 /*
10886 * Remember if this task can be migrated to any other CPU in
10887 * our sched_group. We may want to revisit it if we couldn't
10888 * meet load balance goals by pulling other tasks on src_cpu.
10889 *
10890 * Avoid computing new_dst_cpu
10891 * - for NEWLY_IDLE
10892 * - if we have already computed one in current iteration
10893 * - if it's an active balance
10894 */
10895 if (env->idle == CPU_NEWLY_IDLE ||
10896 env->flags & (LBF_DST_PINNED | LBF_ACTIVE_LB))
10897 return 0;
10898
10899 /* Prevent to re-select dst_cpu via env's CPUs: */
10900 cpu = cpumask_first_and_and(env->dst_grpmask, env->cpus, p->cpus_ptr);
10901
10902 if (cpu < nr_cpu_ids) {
10903 env->flags |= LBF_DST_PINNED;
10904 env->new_dst_cpu = cpu;
10905 }
10906
10907 return 0;
10908 }
10909
10910 /* Record that we found at least one task that could run on dst_cpu */
10911 env->flags &= ~LBF_ALL_PINNED;
10912
10913 if (task_on_cpu(env->src_rq, p) ||
10914 task_current_donor(env->src_rq, p)) {
10915 schedstat_inc(p->stats.nr_failed_migrations_running);
10916 return 0;
10917 }
10918
10919 /*
10920 * Aggressive migration if:
10921 * 1) active balance
10922 * 2) destination numa is preferred
10923 * 3) task is cache cold, or
10924 * 4) too many balance attempts have failed.
10925 */
10926 if (env->flags & LBF_ACTIVE_LB)
10927 return 1;
10928
10929 degrades = migrate_degrades_locality(p, env);
10930 if (!degrades) {
10931 /*
10932 * If the NUMA locality is not broken,
10933 * further check if migration would hurt
10934 * LLC locality.
10935 */
10936 if (migrate_degrades_llc(p, env)) {
10937 /*
10938 * If regular load balancing fails to pull a task
10939 * due to LLC locality, this is expected behavior
10940 * and we set LBF_LLC_PINNED so we don't increase
10941 * nr_balance_failed unecessarily.
10942 */
10943 if (env->migration_type != migrate_llc_task)
10944 env->flags |= LBF_LLC_PINNED;
10945
10946 return 0;
10947 }
10948
10949 hot = task_hot(p, env);
10950 } else {
10951 hot = degrades > 0;
10952 }
10953
10954 if (!hot || env->sd->nr_balance_failed > env->sd->cache_nice_tries) {
10955 if (hot)
10956 p->sched_task_hot = 1;
10957 return 1;
10958 }
10959
10960 schedstat_inc(p->stats.nr_failed_migrations_hot);
10961 return 0;
10962 }
10963
10964 /*
10965 * detach_task() -- detach the task for the migration specified in env
10966 */
detach_task(struct task_struct * p,struct lb_env * env)10967 static void detach_task(struct task_struct *p, struct lb_env *env)
10968 {
10969 lockdep_assert_rq_held(env->src_rq);
10970
10971 if (p->sched_task_hot) {
10972 p->sched_task_hot = 0;
10973 schedstat_inc(env->sd->lb_hot_gained[env->idle]);
10974 schedstat_inc(p->stats.nr_forced_migrations);
10975 }
10976
10977 WARN_ON(task_current(env->src_rq, p));
10978 WARN_ON(task_current_donor(env->src_rq, p));
10979
10980 deactivate_task(env->src_rq, p, DEQUEUE_NOCLOCK);
10981 set_task_cpu(p, env->dst_cpu);
10982 }
10983
10984 /*
10985 * detach_one_task() -- tries to dequeue exactly one task from env->src_rq, as
10986 * part of active balancing operations within "domain".
10987 *
10988 * Returns a task if successful and NULL otherwise.
10989 */
detach_one_task(struct lb_env * env)10990 static struct task_struct *detach_one_task(struct lb_env *env)
10991 {
10992 struct task_struct *p;
10993
10994 lockdep_assert_rq_held(env->src_rq);
10995
10996 list_for_each_entry_reverse(p,
10997 &env->src_rq->cfs_tasks, se.group_node) {
10998 if (!can_migrate_task(p, env))
10999 continue;
11000
11001 detach_task(p, env);
11002
11003 /*
11004 * Right now, this is only the second place where
11005 * lb_gained[env->idle] is updated (other is detach_tasks)
11006 * so we can safely collect stats here rather than
11007 * inside detach_tasks().
11008 */
11009 schedstat_inc(env->sd->lb_gained[env->idle]);
11010 return p;
11011 }
11012 return NULL;
11013 }
11014
11015 /*
11016 * detach_tasks() -- tries to detach up to imbalance load/util/tasks from
11017 * busiest_rq, as part of a balancing operation within domain "sd".
11018 *
11019 * Returns number of detached tasks if successful and 0 otherwise.
11020 */
detach_tasks(struct lb_env * env)11021 static int detach_tasks(struct lb_env *env)
11022 {
11023 struct list_head *tasks = &env->src_rq->cfs_tasks;
11024 unsigned long util, load;
11025 struct task_struct *p;
11026 int detached = 0;
11027
11028 lockdep_assert_rq_held(env->src_rq);
11029
11030 /*
11031 * Source run queue has been emptied by another CPU, clear
11032 * LBF_ALL_PINNED flag as we will not test any task.
11033 */
11034 if (env->src_rq->nr_running <= 1) {
11035 env->flags &= ~LBF_ALL_PINNED;
11036 return 0;
11037 }
11038
11039 if (env->imbalance <= 0)
11040 return 0;
11041
11042 while (!list_empty(tasks)) {
11043 /*
11044 * We don't want to steal all, otherwise we may be treated likewise,
11045 * which could at worst lead to a livelock crash.
11046 */
11047 if (env->idle && env->src_rq->nr_running <= 1)
11048 break;
11049
11050 env->loop++;
11051 /* We've more or less seen every task there is, call it quits */
11052 if (env->loop > env->loop_max)
11053 break;
11054
11055 /* take a breather every nr_migrate tasks */
11056 if (env->loop > env->loop_break) {
11057 env->loop_break += SCHED_NR_MIGRATE_BREAK;
11058 env->flags |= LBF_NEED_BREAK;
11059 break;
11060 }
11061
11062 p = list_last_entry(tasks, struct task_struct, se.group_node);
11063
11064 if (!can_migrate_task(p, env))
11065 goto next;
11066
11067 switch (env->migration_type) {
11068 case migrate_load:
11069 /*
11070 * Depending of the number of CPUs and tasks and the
11071 * cgroup hierarchy, task_h_load() can return a null
11072 * value. Make sure that env->imbalance decreases
11073 * otherwise detach_tasks() will stop only after
11074 * detaching up to loop_max tasks.
11075 */
11076 load = max_t(unsigned long, task_h_load(p), 1);
11077
11078 if (sched_feat(LB_MIN) &&
11079 load < 16 && !env->sd->nr_balance_failed)
11080 goto next;
11081
11082 /*
11083 * Make sure that we don't migrate too much load.
11084 * Nevertheless, let relax the constraint if
11085 * scheduler fails to find a good waiting task to
11086 * migrate.
11087 */
11088 if (shr_bound(load, env->sd->nr_balance_failed) > env->imbalance)
11089 goto next;
11090
11091 env->imbalance -= load;
11092 break;
11093
11094 case migrate_util:
11095 util = task_util_est(p);
11096
11097 if (shr_bound(util, env->sd->nr_balance_failed) > env->imbalance)
11098 goto next;
11099
11100 env->imbalance -= util;
11101 break;
11102
11103 case migrate_task:
11104 env->imbalance--;
11105 break;
11106
11107 case migrate_misfit:
11108 /* This is not a misfit task */
11109 if (task_fits_cpu(p, env->src_cpu))
11110 goto next;
11111
11112 env->imbalance = 0;
11113 break;
11114
11115 case migrate_llc_task:
11116 env->imbalance--;
11117 break;
11118 }
11119
11120 detach_task(p, env);
11121 list_add(&p->se.group_node, &env->tasks);
11122
11123 detached++;
11124
11125 #ifdef CONFIG_PREEMPTION
11126 /*
11127 * NEWIDLE balancing is a source of latency, so preemptible
11128 * kernels will stop after the first task is detached to minimize
11129 * the critical section.
11130 */
11131 if (env->idle == CPU_NEWLY_IDLE)
11132 break;
11133 #endif
11134
11135 /*
11136 * We only want to steal up to the prescribed amount of
11137 * load/util/tasks.
11138 */
11139 if (env->imbalance <= 0)
11140 break;
11141
11142 continue;
11143 next:
11144 if (p->sched_task_hot)
11145 schedstat_inc(p->stats.nr_failed_migrations_hot);
11146
11147 list_move(&p->se.group_node, tasks);
11148 }
11149
11150 /*
11151 * Right now, this is one of only two places we collect this stat
11152 * so we can safely collect detach_one_task() stats here rather
11153 * than inside detach_one_task().
11154 */
11155 schedstat_add(env->sd->lb_gained[env->idle], detached);
11156
11157 return detached;
11158 }
11159
11160 /*
11161 * attach_tasks() -- attaches all tasks detached by detach_tasks() to their
11162 * new rq.
11163 */
attach_tasks(struct lb_env * env)11164 static void attach_tasks(struct lb_env *env)
11165 {
11166 struct list_head *tasks = &env->tasks;
11167 struct task_struct *p;
11168 struct rq_flags rf;
11169
11170 rq_lock(env->dst_rq, &rf);
11171 update_rq_clock(env->dst_rq);
11172
11173 while (!list_empty(tasks)) {
11174 p = list_first_entry(tasks, struct task_struct, se.group_node);
11175 list_del_init(&p->se.group_node);
11176
11177 attach_task(env->dst_rq, p);
11178 }
11179
11180 rq_unlock(env->dst_rq, &rf);
11181 }
11182
11183 #ifdef CONFIG_NO_HZ_COMMON
cfs_rq_has_blocked_load(struct cfs_rq * cfs_rq)11184 static inline bool cfs_rq_has_blocked_load(struct cfs_rq *cfs_rq)
11185 {
11186 if (cfs_rq->avg.load_avg)
11187 return true;
11188
11189 if (cfs_rq->avg.util_avg)
11190 return true;
11191
11192 return false;
11193 }
11194
others_have_blocked(struct rq * rq)11195 static inline bool others_have_blocked(struct rq *rq)
11196 {
11197 if (cpu_util_rt(rq))
11198 return true;
11199
11200 if (cpu_util_dl(rq))
11201 return true;
11202
11203 if (hw_load_avg(rq))
11204 return true;
11205
11206 if (cpu_util_irq(rq))
11207 return true;
11208
11209 return false;
11210 }
11211
update_blocked_load_tick(struct rq * rq)11212 static inline void update_blocked_load_tick(struct rq *rq)
11213 {
11214 WRITE_ONCE(rq->last_blocked_load_update_tick, jiffies);
11215 }
11216
update_has_blocked_load_status(struct rq * rq,bool has_blocked_load)11217 static inline void update_has_blocked_load_status(struct rq *rq, bool has_blocked_load)
11218 {
11219 if (!has_blocked_load)
11220 rq->has_blocked_load = 0;
11221 }
11222 #else /* !CONFIG_NO_HZ_COMMON: */
cfs_rq_has_blocked_load(struct cfs_rq * cfs_rq)11223 static inline bool cfs_rq_has_blocked_load(struct cfs_rq *cfs_rq) { return false; }
others_have_blocked(struct rq * rq)11224 static inline bool others_have_blocked(struct rq *rq) { return false; }
update_blocked_load_tick(struct rq * rq)11225 static inline void update_blocked_load_tick(struct rq *rq) {}
update_has_blocked_load_status(struct rq * rq,bool has_blocked_load)11226 static inline void update_has_blocked_load_status(struct rq *rq, bool has_blocked_load) {}
11227 #endif /* !CONFIG_NO_HZ_COMMON */
11228
__update_blocked_others(struct rq * rq,bool * done)11229 static bool __update_blocked_others(struct rq *rq, bool *done)
11230 {
11231 bool updated;
11232
11233 /*
11234 * update_load_avg() can call cpufreq_update_util(). Make sure that RT,
11235 * DL and IRQ signals have been updated before updating CFS.
11236 */
11237 updated = update_other_load_avgs(rq);
11238
11239 if (others_have_blocked(rq))
11240 *done = false;
11241
11242 return updated;
11243 }
11244
11245 #ifdef CONFIG_FAIR_GROUP_SCHED
11246
__update_blocked_fair(struct rq * rq,bool * done)11247 static bool __update_blocked_fair(struct rq *rq, bool *done)
11248 {
11249 struct cfs_rq *cfs_rq, *pos;
11250 bool decayed = false;
11251
11252 /*
11253 * Iterates the task_group tree in a bottom up fashion, see
11254 * list_add_leaf_cfs_rq() for details.
11255 */
11256 for_each_leaf_cfs_rq_safe(rq, cfs_rq, pos) {
11257 struct sched_entity *se;
11258
11259 if (update_cfs_rq_load_avg(cfs_rq_clock_pelt(cfs_rq), cfs_rq)) {
11260 update_tg_load_avg(cfs_rq);
11261
11262 if (cfs_rq->nr_queued == 0)
11263 update_idle_cfs_rq_clock_pelt(cfs_rq);
11264
11265 if (cfs_rq == &rq->cfs)
11266 decayed = true;
11267 }
11268
11269 /* Propagate pending load changes to the parent, if any: */
11270 se = cfs_rq_se(cfs_rq);
11271 if (se && !skip_blocked_update(se))
11272 update_load_avg(cfs_rq_of(se), se, UPDATE_TG);
11273
11274 /*
11275 * There can be a lot of idle CPU cgroups. Don't let fully
11276 * decayed cfs_rqs linger on the list.
11277 */
11278 if (cfs_rq_is_decayed(cfs_rq))
11279 list_del_leaf_cfs_rq(cfs_rq);
11280
11281 /* Don't need periodic decay once load/util_avg are null */
11282 if (cfs_rq_has_blocked_load(cfs_rq))
11283 *done = false;
11284 }
11285
11286 return decayed;
11287 }
11288
11289 /*
11290 * Compute the hierarchical load factor for cfs_rq and all its ascendants.
11291 * This needs to be done in a top-down fashion because the load of a child
11292 * group is a fraction of its parents load.
11293 */
update_cfs_rq_h_load(struct cfs_rq * cfs_rq)11294 static void update_cfs_rq_h_load(struct cfs_rq *cfs_rq)
11295 {
11296 struct sched_entity *se = cfs_rq_se(cfs_rq);
11297 unsigned long now = jiffies;
11298 unsigned long load;
11299
11300 if (cfs_rq->last_h_load_update == now)
11301 return;
11302
11303 WRITE_ONCE(cfs_rq->h_load_next, NULL);
11304 for_each_sched_entity(se) {
11305 cfs_rq = cfs_rq_of(se);
11306 WRITE_ONCE(cfs_rq->h_load_next, se);
11307 if (cfs_rq->last_h_load_update == now)
11308 break;
11309 }
11310
11311 if (!se) {
11312 cfs_rq->h_load = cfs_rq_load_avg(cfs_rq);
11313 cfs_rq->last_h_load_update = now;
11314 }
11315
11316 while ((se = READ_ONCE(cfs_rq->h_load_next)) != NULL) {
11317 load = cfs_rq->h_load;
11318 load = div64_ul(load * se->avg.load_avg,
11319 cfs_rq_load_avg(cfs_rq) + 1);
11320 cfs_rq = group_cfs_rq(se);
11321 cfs_rq->h_load = load;
11322 cfs_rq->last_h_load_update = now;
11323 }
11324 }
11325
task_h_load(struct task_struct * p)11326 static unsigned long task_h_load(struct task_struct *p)
11327 {
11328 struct cfs_rq *cfs_rq = task_cfs_rq(p);
11329
11330 update_cfs_rq_h_load(cfs_rq);
11331 return div64_ul(p->se.avg.load_avg * cfs_rq->h_load,
11332 cfs_rq_load_avg(cfs_rq) + 1);
11333 }
11334 #else /* !CONFIG_FAIR_GROUP_SCHED: */
__update_blocked_fair(struct rq * rq,bool * done)11335 static bool __update_blocked_fair(struct rq *rq, bool *done)
11336 {
11337 struct cfs_rq *cfs_rq = &rq->cfs;
11338 bool decayed;
11339
11340 decayed = update_cfs_rq_load_avg(cfs_rq_clock_pelt(cfs_rq), cfs_rq);
11341 if (cfs_rq_has_blocked_load(cfs_rq))
11342 *done = false;
11343
11344 return decayed;
11345 }
11346
task_h_load(struct task_struct * p)11347 static unsigned long task_h_load(struct task_struct *p)
11348 {
11349 return p->se.avg.load_avg;
11350 }
11351 #endif /* !CONFIG_FAIR_GROUP_SCHED */
11352
__sched_balance_update_blocked_averages(struct rq * rq)11353 static void __sched_balance_update_blocked_averages(struct rq *rq)
11354 {
11355 bool decayed = false, done = true;
11356
11357 update_blocked_load_tick(rq);
11358
11359 decayed |= __update_blocked_others(rq, &done);
11360 decayed |= __update_blocked_fair(rq, &done);
11361
11362 update_has_blocked_load_status(rq, !done);
11363 if (decayed)
11364 cpufreq_update_util(rq, 0);
11365 }
11366
sched_balance_update_blocked_averages(int cpu)11367 static void sched_balance_update_blocked_averages(int cpu)
11368 {
11369 struct rq *rq = cpu_rq(cpu);
11370
11371 guard(rq_lock_irqsave)(rq);
11372 update_rq_clock(rq);
11373 __sched_balance_update_blocked_averages(rq);
11374 }
11375
11376 /********** Helpers for sched_balance_find_src_group ************************/
11377
11378 /*
11379 * sg_lb_stats - stats of a sched_group required for load-balancing:
11380 */
11381 struct sg_lb_stats {
11382 unsigned long avg_load; /* Avg load over the CPUs of the group */
11383 unsigned long group_load; /* Total load over the CPUs of the group */
11384 unsigned long group_capacity; /* Capacity over the CPUs of the group */
11385 unsigned long group_util; /* Total utilization over the CPUs of the group */
11386 unsigned long group_runnable; /* Total runnable time over the CPUs of the group */
11387 unsigned int sum_nr_running; /* Nr of all tasks running in the group */
11388 unsigned int sum_h_nr_running; /* Nr of CFS tasks running in the group */
11389 unsigned int idle_cpus; /* Nr of idle CPUs in the group */
11390 unsigned int group_weight;
11391 enum group_type group_type;
11392 unsigned int group_asym_packing; /* Tasks should be moved to preferred CPU */
11393 unsigned int group_smt_balance; /* Task on busy SMT be moved */
11394 unsigned int group_llc_balance; /* Tasks should be moved to preferred LLC */
11395 unsigned long group_misfit_task_load; /* A CPU has a task too big for its capacity */
11396 unsigned int group_overutilized; /* At least one CPU is overutilized in the group */
11397 #ifdef CONFIG_NUMA_BALANCING
11398 unsigned int nr_numa_running;
11399 unsigned int nr_preferred_running;
11400 #endif
11401 #ifdef CONFIG_SCHED_CACHE
11402 unsigned int nr_pref_dst_llc;
11403 #endif
11404 };
11405
11406 /*
11407 * sd_lb_stats - stats of a sched_domain required for load-balancing:
11408 */
11409 struct sd_lb_stats {
11410 struct sched_group *busiest; /* Busiest group in this sd */
11411 struct sched_group *local; /* Local group in this sd */
11412 unsigned long total_load; /* Total load of all groups in sd */
11413 unsigned long total_capacity; /* Total capacity of all groups in sd */
11414 unsigned long avg_load; /* Average load across all groups in sd */
11415 unsigned int prefer_sibling; /* Tasks should go to sibling first */
11416
11417 struct sg_lb_stats busiest_stat; /* Statistics of the busiest group */
11418 struct sg_lb_stats local_stat; /* Statistics of the local group */
11419 };
11420
init_sd_lb_stats(struct sd_lb_stats * sds)11421 static inline void init_sd_lb_stats(struct sd_lb_stats *sds)
11422 {
11423 /*
11424 * Skimp on the clearing to avoid duplicate work. We can avoid clearing
11425 * local_stat because update_sg_lb_stats() does a full clear/assignment.
11426 * We must however set busiest_stat::group_type and
11427 * busiest_stat::idle_cpus to the worst busiest group because
11428 * update_sd_pick_busiest() reads these before assignment.
11429 */
11430 *sds = (struct sd_lb_stats){
11431 .busiest = NULL,
11432 .local = NULL,
11433 .total_load = 0UL,
11434 .total_capacity = 0UL,
11435 .busiest_stat = {
11436 .idle_cpus = UINT_MAX,
11437 .group_type = group_has_spare,
11438 },
11439 };
11440 }
11441
scale_rt_capacity(int cpu)11442 static unsigned long scale_rt_capacity(int cpu)
11443 {
11444 unsigned long max = get_actual_cpu_capacity(cpu);
11445 struct rq *rq = cpu_rq(cpu);
11446 unsigned long used, free;
11447 unsigned long irq;
11448
11449 irq = cpu_util_irq(rq);
11450
11451 if (unlikely(irq >= max))
11452 return 1;
11453
11454 /*
11455 * avg_rt.util_avg and avg_dl.util_avg track binary signals
11456 * (running and not running) with weights 0 and 1024 respectively.
11457 */
11458 used = cpu_util_rt(rq);
11459 used += cpu_util_dl(rq);
11460
11461 if (unlikely(used >= max))
11462 return 1;
11463
11464 free = max - used;
11465
11466 return scale_irq_capacity(free, irq, max);
11467 }
11468
update_cpu_capacity(struct sched_domain * sd,int cpu)11469 static void update_cpu_capacity(struct sched_domain *sd, int cpu)
11470 {
11471 unsigned long capacity = scale_rt_capacity(cpu);
11472 struct sched_group *sdg = sd->groups;
11473
11474 if (!capacity)
11475 capacity = 1;
11476
11477 cpu_rq(cpu)->cpu_capacity = capacity;
11478 trace_sched_cpu_capacity_tp(cpu_rq(cpu));
11479
11480 sdg->sgc->capacity = capacity;
11481 sdg->sgc->min_capacity = capacity;
11482 sdg->sgc->max_capacity = capacity;
11483 }
11484
update_group_capacity(struct sched_domain * sd,int cpu)11485 void update_group_capacity(struct sched_domain *sd, int cpu)
11486 {
11487 struct sched_domain *child = sd->child;
11488 struct sched_group *group, *sdg = sd->groups;
11489 unsigned long capacity, min_capacity, max_capacity;
11490 unsigned long interval;
11491
11492 interval = msecs_to_jiffies(sd->balance_interval);
11493 interval = clamp(interval, 1UL, max_load_balance_interval);
11494 sdg->sgc->next_update = jiffies + interval;
11495
11496 if (!child) {
11497 update_cpu_capacity(sd, cpu);
11498 return;
11499 }
11500
11501 capacity = 0;
11502 min_capacity = ULONG_MAX;
11503 max_capacity = 0;
11504
11505 if (child->flags & SD_NUMA) {
11506 /*
11507 * SD_NUMA domains cannot assume that child groups
11508 * span the current group.
11509 */
11510
11511 for_each_cpu(cpu, sched_group_span(sdg)) {
11512 unsigned long cpu_cap = capacity_of(cpu);
11513
11514 capacity += cpu_cap;
11515 min_capacity = min(cpu_cap, min_capacity);
11516 max_capacity = max(cpu_cap, max_capacity);
11517 }
11518 } else {
11519 /*
11520 * !SD_NUMA domains can assume that child groups
11521 * span the current group.
11522 */
11523
11524 group = child->groups;
11525 do {
11526 struct sched_group_capacity *sgc = group->sgc;
11527
11528 capacity += sgc->capacity;
11529 min_capacity = min(sgc->min_capacity, min_capacity);
11530 max_capacity = max(sgc->max_capacity, max_capacity);
11531 group = group->next;
11532 } while (group != child->groups);
11533 }
11534
11535 sdg->sgc->capacity = capacity;
11536 sdg->sgc->min_capacity = min_capacity;
11537 sdg->sgc->max_capacity = max_capacity;
11538 }
11539
11540 /*
11541 * Check whether the capacity of the rq has been noticeably reduced by side
11542 * activity. The imbalance_pct is used for the threshold.
11543 * Return true is the capacity is reduced
11544 */
11545 static inline int
check_cpu_capacity(struct rq * rq,struct sched_domain * sd)11546 check_cpu_capacity(struct rq *rq, struct sched_domain *sd)
11547 {
11548 return ((rq->cpu_capacity * sd->imbalance_pct) <
11549 (arch_scale_cpu_capacity(cpu_of(rq)) * 100));
11550 }
11551
11552 /* Check if the rq has a misfit task */
check_misfit_status(struct rq * rq)11553 static inline bool check_misfit_status(struct rq *rq)
11554 {
11555 return rq->misfit_task_load;
11556 }
11557
11558 /*
11559 * Group imbalance indicates (and tries to solve) the problem where balancing
11560 * groups is inadequate due to ->cpus_ptr constraints.
11561 *
11562 * Imagine a situation of two groups of 4 CPUs each and 4 tasks each with a
11563 * cpumask covering 1 CPU of the first group and 3 CPUs of the second group.
11564 * Something like:
11565 *
11566 * { 0 1 2 3 } { 4 5 6 7 }
11567 * * * * *
11568 *
11569 * If we were to balance group-wise we'd place two tasks in the first group and
11570 * two tasks in the second group. Clearly this is undesired as it will overload
11571 * cpu 3 and leave one of the CPUs in the second group unused.
11572 *
11573 * The current solution to this issue is detecting the skew in the first group
11574 * by noticing the lower domain failed to reach balance and had difficulty
11575 * moving tasks due to affinity constraints.
11576 *
11577 * When this is so detected; this group becomes a candidate for busiest; see
11578 * update_sd_pick_busiest(). And calculate_imbalance() and
11579 * sched_balance_find_src_group() avoid some of the usual balance conditions to allow it
11580 * to create an effective group imbalance.
11581 *
11582 * This is a somewhat tricky proposition since the next run might not find the
11583 * group imbalance and decide the groups need to be balanced again. A most
11584 * subtle and fragile situation.
11585 */
11586
sg_imbalanced(struct sched_group * group)11587 static inline int sg_imbalanced(struct sched_group *group)
11588 {
11589 return group->sgc->imbalance;
11590 }
11591
11592 /*
11593 * group_has_capacity returns true if the group has spare capacity that could
11594 * be used by some tasks.
11595 * We consider that a group has spare capacity if the number of task is
11596 * smaller than the number of CPUs or if the utilization is lower than the
11597 * available capacity for CFS tasks.
11598 * For the latter, we use a threshold to stabilize the state, to take into
11599 * account the variance of the tasks' load and to return true if the available
11600 * capacity in meaningful for the load balancer.
11601 * As an example, an available capacity of 1% can appear but it doesn't make
11602 * any benefit for the load balance.
11603 */
11604 static inline bool
group_has_capacity(unsigned int imbalance_pct,struct sg_lb_stats * sgs)11605 group_has_capacity(unsigned int imbalance_pct, struct sg_lb_stats *sgs)
11606 {
11607 if (sgs->sum_nr_running < sgs->group_weight)
11608 return true;
11609
11610 if ((sgs->group_capacity * imbalance_pct) <
11611 (sgs->group_runnable * 100))
11612 return false;
11613
11614 if ((sgs->group_capacity * 100) >
11615 (sgs->group_util * imbalance_pct))
11616 return true;
11617
11618 return false;
11619 }
11620
11621 /*
11622 * group_is_overloaded returns true if the group has more tasks than it can
11623 * handle.
11624 * group_is_overloaded is not equals to !group_has_capacity because a group
11625 * with the exact right number of tasks, has no more spare capacity but is not
11626 * overloaded so both group_has_capacity and group_is_overloaded return
11627 * false.
11628 */
11629 static inline bool
group_is_overloaded(unsigned int imbalance_pct,struct sg_lb_stats * sgs)11630 group_is_overloaded(unsigned int imbalance_pct, struct sg_lb_stats *sgs)
11631 {
11632 /*
11633 * With EAS and uclamp, 1 CPU in the group must be overutilized to
11634 * consider the group overloaded.
11635 */
11636 if (sched_energy_enabled() && !sgs->group_overutilized)
11637 return false;
11638
11639 if (sgs->sum_nr_running <= sgs->group_weight)
11640 return false;
11641
11642 if ((sgs->group_capacity * 100) <
11643 (sgs->group_util * imbalance_pct))
11644 return true;
11645
11646 if ((sgs->group_capacity * imbalance_pct) <
11647 (sgs->group_runnable * 100))
11648 return true;
11649
11650 return false;
11651 }
11652
11653 static inline enum
group_classify(unsigned int imbalance_pct,struct sched_group * group,struct sg_lb_stats * sgs)11654 group_type group_classify(unsigned int imbalance_pct,
11655 struct sched_group *group,
11656 struct sg_lb_stats *sgs)
11657 {
11658 if (group_is_overloaded(imbalance_pct, sgs))
11659 return group_overloaded;
11660
11661 if (sgs->group_llc_balance)
11662 return group_llc_balance;
11663
11664 if (sg_imbalanced(group))
11665 return group_imbalanced;
11666
11667 if (sgs->group_asym_packing)
11668 return group_asym_packing;
11669
11670 if (sgs->group_smt_balance)
11671 return group_smt_balance;
11672
11673 if (sgs->group_misfit_task_load)
11674 return group_misfit_task;
11675
11676 if (!group_has_capacity(imbalance_pct, sgs))
11677 return group_fully_busy;
11678
11679 return group_has_spare;
11680 }
11681
11682 /**
11683 * sched_use_asym_prio - Check whether asym_packing priority must be used
11684 * @sd: The scheduling domain of the load balancing
11685 * @cpu: A CPU
11686 *
11687 * Always use CPU priority when balancing load between SMT siblings. When
11688 * balancing load between cores, it is not sufficient that @cpu is idle. Only
11689 * use CPU priority if the whole core is idle.
11690 *
11691 * Returns: True if the priority of @cpu must be followed. False otherwise.
11692 */
sched_use_asym_prio(struct sched_domain * sd,int cpu)11693 static bool sched_use_asym_prio(struct sched_domain *sd, int cpu)
11694 {
11695 if (!(sd->flags & SD_ASYM_PACKING))
11696 return false;
11697
11698 if (!sched_smt_active())
11699 return true;
11700
11701 return sd->flags & SD_SHARE_CPUCAPACITY || is_core_idle(cpu);
11702 }
11703
sched_asym(struct sched_domain * sd,int dst_cpu,int src_cpu)11704 static inline bool sched_asym(struct sched_domain *sd, int dst_cpu, int src_cpu)
11705 {
11706 /*
11707 * First check if @dst_cpu can do asym_packing load balance. Only do it
11708 * if it has higher priority than @src_cpu.
11709 */
11710 return sched_use_asym_prio(sd, dst_cpu) &&
11711 sched_asym_prefer(dst_cpu, src_cpu);
11712 }
11713
11714 /**
11715 * sched_group_asym - Check if the destination CPU can do asym_packing balance
11716 * @env: The load balancing environment
11717 * @sgs: Load-balancing statistics of the candidate busiest group
11718 * @group: The candidate busiest group
11719 *
11720 * @env::dst_cpu can do asym_packing if it has higher priority than the
11721 * preferred CPU of @group.
11722 *
11723 * Return: true if @env::dst_cpu can do with asym_packing load balance. False
11724 * otherwise.
11725 */
11726 static inline bool
sched_group_asym(struct lb_env * env,struct sg_lb_stats * sgs,struct sched_group * group)11727 sched_group_asym(struct lb_env *env, struct sg_lb_stats *sgs, struct sched_group *group)
11728 {
11729 /*
11730 * CPU priorities do not make sense for SMT cores with more than one
11731 * busy sibling.
11732 */
11733 if ((group->flags & SD_SHARE_CPUCAPACITY) &&
11734 (sgs->group_weight - sgs->idle_cpus != 1))
11735 return false;
11736
11737 return sched_asym(env->sd, env->dst_cpu, READ_ONCE(group->asym_prefer_cpu));
11738 }
11739
11740 /* One group has more than one SMT CPU while the other group does not */
smt_vs_nonsmt_groups(struct sched_group * sg1,struct sched_group * sg2)11741 static inline bool smt_vs_nonsmt_groups(struct sched_group *sg1,
11742 struct sched_group *sg2)
11743 {
11744 if (!sg1 || !sg2)
11745 return false;
11746
11747 return (sg1->flags & SD_SHARE_CPUCAPACITY) !=
11748 (sg2->flags & SD_SHARE_CPUCAPACITY);
11749 }
11750
smt_balance(struct lb_env * env,struct sg_lb_stats * sgs,struct sched_group * group)11751 static inline bool smt_balance(struct lb_env *env, struct sg_lb_stats *sgs,
11752 struct sched_group *group)
11753 {
11754 if (!env->idle)
11755 return false;
11756
11757 /*
11758 * For SMT source group, it is better to move a task
11759 * to a CPU that doesn't have multiple tasks sharing its CPU capacity.
11760 * Note that if a group has a single SMT, SD_SHARE_CPUCAPACITY
11761 * will not be on.
11762 */
11763 if (group->flags & SD_SHARE_CPUCAPACITY &&
11764 sgs->sum_h_nr_running > 1)
11765 return true;
11766
11767 return false;
11768 }
11769
sibling_imbalance(struct lb_env * env,struct sd_lb_stats * sds,struct sg_lb_stats * busiest,struct sg_lb_stats * local)11770 static inline long sibling_imbalance(struct lb_env *env,
11771 struct sd_lb_stats *sds,
11772 struct sg_lb_stats *busiest,
11773 struct sg_lb_stats *local)
11774 {
11775 int ncores_busiest, ncores_local;
11776 long imbalance;
11777
11778 if (!env->idle || !busiest->sum_nr_running)
11779 return 0;
11780
11781 ncores_busiest = sds->busiest->cores;
11782 ncores_local = sds->local->cores;
11783
11784 if (ncores_busiest == ncores_local) {
11785 imbalance = busiest->sum_nr_running;
11786 lsub_positive(&imbalance, local->sum_nr_running);
11787 return imbalance;
11788 }
11789
11790 /* Balance such that nr_running/ncores ratio are same on both groups */
11791 imbalance = ncores_local * busiest->sum_nr_running;
11792 lsub_positive(&imbalance, ncores_busiest * local->sum_nr_running);
11793 /* Normalize imbalance and do rounding on normalization */
11794 imbalance = 2 * imbalance + ncores_local + ncores_busiest;
11795 imbalance /= ncores_local + ncores_busiest;
11796
11797 /* Take advantage of resource in an empty sched group */
11798 if (imbalance <= 1 && local->sum_nr_running == 0 &&
11799 busiest->sum_nr_running > 1)
11800 imbalance = 2;
11801
11802 return imbalance;
11803 }
11804
11805 static inline bool
sched_reduced_capacity(struct rq * rq,struct sched_domain * sd)11806 sched_reduced_capacity(struct rq *rq, struct sched_domain *sd)
11807 {
11808 /*
11809 * When there is more than 1 task, the group_overloaded case already
11810 * takes care of cpu with reduced capacity
11811 */
11812 if (rq->cfs.h_nr_runnable != 1)
11813 return false;
11814
11815 return check_cpu_capacity(rq, sd);
11816 }
11817
11818 #ifdef CONFIG_SCHED_CACHE
11819 /*
11820 * Record the statistics for this scheduler group for later
11821 * use. These values guide load balancing on aggregating tasks
11822 * to a LLC.
11823 */
record_sg_llc_stats(struct lb_env * env,struct sg_lb_stats * sgs,struct sched_group * group)11824 static void record_sg_llc_stats(struct lb_env *env,
11825 struct sg_lb_stats *sgs,
11826 struct sched_group *group)
11827 {
11828 struct sched_domain_shared *sd_share;
11829 int cpu;
11830
11831 if (!sched_cache_enabled() || env->idle == CPU_NEWLY_IDLE)
11832 return;
11833
11834 /* Only care about sched domain spanning multiple LLCs */
11835 if (env->sd->child != rcu_dereference_all(per_cpu(sd_llc, env->dst_cpu)))
11836 return;
11837
11838 /*
11839 * At this point we know this group spans a LLC domain.
11840 * Record the statistic of this group in its corresponding
11841 * shared LLC domain.
11842 * Note: sd_share cannot be obtained via sd->child->shared,
11843 * because the latter refers to the domain that covers the
11844 * local group. Instead, sd_share should be located using
11845 * the first CPU of the LLC group.
11846 */
11847 cpu = cpumask_first(sched_group_span(group));
11848 sd_share = rcu_dereference_all(per_cpu(sd_llc_shared, cpu));
11849 if (!sd_share)
11850 return;
11851
11852 if (READ_ONCE(sd_share->util_avg) != sgs->group_util)
11853 WRITE_ONCE(sd_share->util_avg, sgs->group_util);
11854
11855 if (unlikely(READ_ONCE(sd_share->capacity) != sgs->group_capacity))
11856 WRITE_ONCE(sd_share->capacity, sgs->group_capacity);
11857 }
11858
11859 /*
11860 * Do LLC balance on sched group that contains LLC, and have tasks preferring
11861 * to run on LLC in idle dst_cpu.
11862 */
llc_balance(struct lb_env * env,struct sg_lb_stats * sgs,struct sched_group * group)11863 static inline bool llc_balance(struct lb_env *env, struct sg_lb_stats *sgs,
11864 struct sched_group *group)
11865 {
11866 if (!sched_cache_enabled())
11867 return false;
11868
11869 if (env->sd->flags & SD_SHARE_LLC)
11870 return false;
11871
11872 /*
11873 * Skip cache aware tagging if nr_balanced_failed is sufficiently high.
11874 * Threshold of cache_nice_tries is set to 1 higher than nr_balance_failed
11875 * to avoid excessive task migration at the same time.
11876 */
11877 if (env->sd->nr_balance_failed >= env->sd->cache_nice_tries + 1)
11878 return false;
11879
11880 if (sgs->nr_pref_dst_llc &&
11881 can_migrate_llc(cpumask_first(sched_group_span(group)),
11882 env->dst_cpu, 0, true) == mig_llc)
11883 return true;
11884
11885 return false;
11886 }
11887
update_llc_busiest(struct lb_env * env,struct sg_lb_stats * busiest,struct sg_lb_stats * sgs)11888 static bool update_llc_busiest(struct lb_env *env,
11889 struct sg_lb_stats *busiest,
11890 struct sg_lb_stats *sgs)
11891 {
11892 /*
11893 * There are more tasks that want to run on dst_cpu's LLC.
11894 */
11895 return sgs->nr_pref_dst_llc > busiest->nr_pref_dst_llc;
11896 }
11897 #else
record_sg_llc_stats(struct lb_env * env,struct sg_lb_stats * sgs,struct sched_group * group)11898 static inline void record_sg_llc_stats(struct lb_env *env, struct sg_lb_stats *sgs,
11899 struct sched_group *group)
11900 {
11901 }
11902
llc_balance(struct lb_env * env,struct sg_lb_stats * sgs,struct sched_group * group)11903 static inline bool llc_balance(struct lb_env *env, struct sg_lb_stats *sgs,
11904 struct sched_group *group)
11905 {
11906 return false;
11907 }
11908
update_llc_busiest(struct lb_env * env,struct sg_lb_stats * busiest,struct sg_lb_stats * sgs)11909 static bool update_llc_busiest(struct lb_env *env,
11910 struct sg_lb_stats *busiest,
11911 struct sg_lb_stats *sgs)
11912 {
11913 return false;
11914 }
11915 #endif
11916
11917 /**
11918 * update_sg_lb_stats - Update sched_group's statistics for load balancing.
11919 * @env: The load balancing environment.
11920 * @sds: Load-balancing data with statistics of the local group.
11921 * @group: sched_group whose statistics are to be updated.
11922 * @sgs: variable to hold the statistics for this group.
11923 * @sg_overloaded: sched_group is overloaded
11924 */
update_sg_lb_stats(struct lb_env * env,struct sd_lb_stats * sds,struct sched_group * group,struct sg_lb_stats * sgs,bool * sg_overloaded)11925 static inline void update_sg_lb_stats(struct lb_env *env,
11926 struct sd_lb_stats *sds,
11927 struct sched_group *group,
11928 struct sg_lb_stats *sgs,
11929 bool *sg_overloaded)
11930 {
11931 int i, nr_running, local_group, sd_flags = env->sd->flags;
11932 bool balancing_at_rd = !env->sd->parent;
11933
11934 memset(sgs, 0, sizeof(*sgs));
11935
11936 local_group = group == sds->local;
11937
11938 for_each_cpu_and(i, sched_group_span(group), env->cpus) {
11939 struct rq *rq = cpu_rq(i);
11940 unsigned long load = cpu_load(rq);
11941
11942 sgs->group_load += load;
11943 sgs->group_util += cpu_util_cfs(i);
11944 sgs->group_runnable += cpu_runnable(rq);
11945 sgs->sum_h_nr_running += rq->cfs.h_nr_runnable;
11946
11947 nr_running = rq->nr_running;
11948 sgs->sum_nr_running += nr_running;
11949
11950 if (cpu_overutilized(i))
11951 sgs->group_overutilized = 1;
11952
11953 #ifdef CONFIG_SCHED_CACHE
11954 if (sched_cache_enabled()) {
11955 struct sched_domain *sd_tmp;
11956 int dst_llc;
11957
11958 dst_llc = llc_id(env->dst_cpu);
11959 if (llc_id(i) != dst_llc) {
11960 sd_tmp = rcu_dereference_all(rq->sd);
11961 if (sd_tmp && (unsigned int)dst_llc < sd_tmp->llc_max)
11962 sgs->nr_pref_dst_llc += sd_tmp->llc_counts[dst_llc];
11963 }
11964 }
11965 #endif
11966
11967 /*
11968 * No need to call idle_cpu() if nr_running is not 0
11969 */
11970 if (!nr_running && idle_cpu(i)) {
11971 sgs->idle_cpus++;
11972 /* Idle cpu can't have misfit task */
11973 continue;
11974 }
11975
11976 /* Overload indicator is only updated at root domain */
11977 if (balancing_at_rd && nr_running > 1)
11978 *sg_overloaded = 1;
11979
11980 #ifdef CONFIG_NUMA_BALANCING
11981 /* Only fbq_classify_group() uses this to classify NUMA groups */
11982 if (sd_flags & SD_NUMA) {
11983 sgs->nr_numa_running += rq->nr_numa_running;
11984 sgs->nr_preferred_running += rq->nr_preferred_running;
11985 }
11986 #endif
11987 if (local_group)
11988 continue;
11989
11990 if (sd_flags & SD_ASYM_CPUCAPACITY) {
11991 if (rq->misfit_task_load) {
11992 /*
11993 * Always mark the root domain overloaded so big
11994 * CPUs can pick up misfit tasks via newly idle
11995 * balance.
11996 */
11997 if (balancing_at_rd)
11998 *sg_overloaded = 1;
11999
12000 /*
12001 * Only account misfit load if @dst_cpu can
12002 * help; otherwise, the group may be classified
12003 * as misfit_task and update_sd_pick_busiest()
12004 * will skip it.
12005 */
12006 if (capacity_greater(capacity_of(env->dst_cpu),
12007 group->sgc->max_capacity) &&
12008 (sgs->group_misfit_task_load < rq->misfit_task_load))
12009 sgs->group_misfit_task_load = rq->misfit_task_load;
12010 }
12011 } else if (env->idle && sched_reduced_capacity(rq, env->sd)) {
12012 /* Check for a task running on a CPU with reduced capacity */
12013 if (sgs->group_misfit_task_load < load)
12014 sgs->group_misfit_task_load = load;
12015 }
12016 }
12017
12018 sgs->group_capacity = group->sgc->capacity;
12019
12020 sgs->group_weight = group->group_weight;
12021
12022 if (!local_group) {
12023 /* Check if dst CPU is idle and preferred to this group */
12024 if (env->idle && sgs->sum_h_nr_running &&
12025 sched_group_asym(env, sgs, group))
12026 sgs->group_asym_packing = 1;
12027
12028 /* Check for loaded SMT group to be balanced to dst CPU */
12029 if (smt_balance(env, sgs, group))
12030 sgs->group_smt_balance = 1;
12031
12032 /* Check for tasks in this group can be moved to their preferred LLC */
12033 if (llc_balance(env, sgs, group))
12034 sgs->group_llc_balance = 1;
12035 }
12036
12037 sgs->group_type = group_classify(env->sd->imbalance_pct, group, sgs);
12038
12039 record_sg_llc_stats(env, sgs, group);
12040 /* Computing avg_load makes sense only when group is overloaded */
12041 if (sgs->group_type == group_overloaded)
12042 sgs->avg_load = (sgs->group_load * SCHED_CAPACITY_SCALE) /
12043 sgs->group_capacity;
12044 }
12045
12046 /**
12047 * update_sd_pick_busiest - return 1 on busiest group
12048 * @env: The load balancing environment.
12049 * @sds: sched_domain statistics
12050 * @sg: sched_group candidate to be checked for being the busiest
12051 * @sgs: sched_group statistics
12052 *
12053 * Determine if @sg is a busier group than the previously selected
12054 * busiest group.
12055 *
12056 * Return: %true if @sg is a busier group than the previously selected
12057 * busiest group. %false otherwise.
12058 */
update_sd_pick_busiest(struct lb_env * env,struct sd_lb_stats * sds,struct sched_group * sg,struct sg_lb_stats * sgs)12059 static bool update_sd_pick_busiest(struct lb_env *env,
12060 struct sd_lb_stats *sds,
12061 struct sched_group *sg,
12062 struct sg_lb_stats *sgs)
12063 {
12064 struct sg_lb_stats *busiest = &sds->busiest_stat;
12065
12066 /* Make sure that there is at least one task to pull */
12067 if (!sgs->sum_h_nr_running)
12068 return false;
12069
12070 /*
12071 * Don't try to pull misfit tasks we can't help.
12072 * We can use max_capacity here as reduction in capacity on some
12073 * CPUs in the group should either be possible to resolve
12074 * internally or be covered by avg_load imbalance (eventually).
12075 *
12076 * When SMT is active, only pull a misfit to dst_cpu if it is on a
12077 * fully idle core; otherwise the effective capacity of the core is
12078 * reduced and we may not actually provide more capacity than the
12079 * source.
12080 */
12081 if ((env->sd->flags & SD_ASYM_CPUCAPACITY) &&
12082 (sgs->group_type == group_misfit_task) &&
12083 (!env->dst_core_idle ||
12084 !capacity_greater(capacity_of(env->dst_cpu), sg->sgc->max_capacity) ||
12085 sds->local_stat.group_type != group_has_spare))
12086 return false;
12087
12088 /*
12089 * Candidate sg has no more than one task per CPU and has higher
12090 * per-CPU capacity. Migrating tasks to less capable CPUs may harm
12091 * throughput. Maximize throughput, power/energy consequences are not
12092 * considered.
12093 */
12094 if ((env->sd->flags & SD_ASYM_CPUCAPACITY) &&
12095 (sgs->group_type <= group_fully_busy) &&
12096 (capacity_greater(sg->sgc->min_capacity, capacity_of(env->dst_cpu))))
12097 return false;
12098
12099 if (sgs->group_type > busiest->group_type)
12100 return true;
12101
12102 if (sgs->group_type < busiest->group_type)
12103 return false;
12104
12105 /*
12106 * The candidate and the current busiest group are the same type of
12107 * group. Let check which one is the busiest according to the type.
12108 */
12109
12110 switch (sgs->group_type) {
12111 case group_overloaded:
12112 /* Select the overloaded group with highest avg_load. */
12113 return sgs->avg_load > busiest->avg_load;
12114
12115 case group_llc_balance:
12116 /* Select the group with most tasks preferring dst LLC */
12117 return update_llc_busiest(env, busiest, sgs);
12118
12119 case group_imbalanced:
12120 /*
12121 * Select the 1st imbalanced group as we don't have any way to
12122 * choose one more than another.
12123 */
12124 return false;
12125
12126 case group_asym_packing:
12127 /* Prefer to move from lowest priority CPU's work */
12128 return sched_asym_prefer(READ_ONCE(sds->busiest->asym_prefer_cpu),
12129 READ_ONCE(sg->asym_prefer_cpu));
12130
12131 case group_misfit_task:
12132 /*
12133 * If we have more than one misfit sg go with the biggest
12134 * misfit.
12135 */
12136 return sgs->group_misfit_task_load > busiest->group_misfit_task_load;
12137
12138 case group_smt_balance:
12139 /*
12140 * Check if we have spare CPUs on either SMT group to
12141 * choose has spare or fully busy handling.
12142 */
12143 if (sgs->idle_cpus != 0 || busiest->idle_cpus != 0)
12144 goto has_spare;
12145
12146 fallthrough;
12147
12148 case group_fully_busy:
12149 /*
12150 * Select the fully busy group with highest avg_load. In
12151 * theory, there is no need to pull task from such kind of
12152 * group because tasks have all compute capacity that they need
12153 * but we can still improve the overall throughput by reducing
12154 * contention when accessing shared HW resources.
12155 *
12156 * XXX for now avg_load is not computed and always 0 so we
12157 * select the 1st one, except if @sg is composed of SMT
12158 * siblings.
12159 */
12160
12161 if (sgs->avg_load < busiest->avg_load)
12162 return false;
12163
12164 if (sgs->avg_load == busiest->avg_load) {
12165 /*
12166 * SMT sched groups need more help than non-SMT groups.
12167 * If @sg happens to also be SMT, either choice is good.
12168 */
12169 if (sds->busiest->flags & SD_SHARE_CPUCAPACITY)
12170 return false;
12171 }
12172
12173 break;
12174
12175 case group_has_spare:
12176 /*
12177 * Do not pick sg with SMT CPUs over sg with pure CPUs,
12178 * as we do not want to pull task off SMT core with one task
12179 * and make the core idle.
12180 */
12181 if (smt_vs_nonsmt_groups(sds->busiest, sg)) {
12182 if (sg->flags & SD_SHARE_CPUCAPACITY && sgs->sum_h_nr_running <= 1)
12183 return false;
12184 else
12185 return true;
12186 }
12187 has_spare:
12188
12189 /*
12190 * Select not overloaded group with lowest number of idle CPUs
12191 * and highest number of running tasks. We could also compare
12192 * the spare capacity which is more stable but it can end up
12193 * that the group has less spare capacity but finally more idle
12194 * CPUs which means less opportunity to pull tasks.
12195 */
12196 if (sgs->idle_cpus > busiest->idle_cpus)
12197 return false;
12198 else if ((sgs->idle_cpus == busiest->idle_cpus) &&
12199 (sgs->sum_nr_running <= busiest->sum_nr_running))
12200 return false;
12201
12202 break;
12203 }
12204
12205 return true;
12206 }
12207
12208 #ifdef CONFIG_NUMA_BALANCING
fbq_classify_group(struct sg_lb_stats * sgs)12209 static inline enum fbq_type fbq_classify_group(struct sg_lb_stats *sgs)
12210 {
12211 if (sgs->sum_h_nr_running > sgs->nr_numa_running)
12212 return regular;
12213 if (sgs->sum_h_nr_running > sgs->nr_preferred_running)
12214 return remote;
12215 return all;
12216 }
12217
fbq_classify_rq(struct rq * rq)12218 static inline enum fbq_type fbq_classify_rq(struct rq *rq)
12219 {
12220 if (rq->nr_running > rq->nr_numa_running)
12221 return regular;
12222 if (rq->nr_running > rq->nr_preferred_running)
12223 return remote;
12224 return all;
12225 }
12226 #else /* !CONFIG_NUMA_BALANCING: */
fbq_classify_group(struct sg_lb_stats * sgs)12227 static inline enum fbq_type fbq_classify_group(struct sg_lb_stats *sgs)
12228 {
12229 return all;
12230 }
12231
fbq_classify_rq(struct rq * rq)12232 static inline enum fbq_type fbq_classify_rq(struct rq *rq)
12233 {
12234 return regular;
12235 }
12236 #endif /* !CONFIG_NUMA_BALANCING */
12237
12238
12239 struct sg_lb_stats;
12240
12241 /*
12242 * task_running_on_cpu - return 1 if @p is running on @cpu.
12243 */
12244
task_running_on_cpu(int cpu,struct task_struct * p)12245 static unsigned int task_running_on_cpu(int cpu, struct task_struct *p)
12246 {
12247 /* Task has no contribution or is new */
12248 if (cpu != task_cpu(p) || !READ_ONCE(p->se.avg.last_update_time))
12249 return 0;
12250
12251 if (task_on_rq_queued(p))
12252 return 1;
12253
12254 return 0;
12255 }
12256
12257 /**
12258 * idle_cpu_without - would a given CPU be idle without p ?
12259 * @cpu: the processor on which idleness is tested.
12260 * @p: task which should be ignored.
12261 *
12262 * Return: 1 if the CPU would be idle. 0 otherwise.
12263 */
idle_cpu_without(int cpu,struct task_struct * p)12264 static int idle_cpu_without(int cpu, struct task_struct *p)
12265 {
12266 struct rq *rq = cpu_rq(cpu);
12267
12268 if (rq->curr != rq->idle && rq->curr != p)
12269 return 0;
12270
12271 /*
12272 * rq->nr_running can't be used but an updated version without the
12273 * impact of p on cpu must be used instead. The updated nr_running
12274 * be computed and tested before calling idle_cpu_without().
12275 */
12276
12277 if (rq->ttwu_pending)
12278 return 0;
12279
12280 return 1;
12281 }
12282
12283 /*
12284 * update_sg_wakeup_stats - Update sched_group's statistics for wakeup.
12285 * @sd: The sched_domain level to look for idlest group.
12286 * @group: sched_group whose statistics are to be updated.
12287 * @sgs: variable to hold the statistics for this group.
12288 * @p: The task for which we look for the idlest group/CPU.
12289 */
update_sg_wakeup_stats(struct sched_domain * sd,struct sched_group * group,struct sg_lb_stats * sgs,struct task_struct * p)12290 static inline void update_sg_wakeup_stats(struct sched_domain *sd,
12291 struct sched_group *group,
12292 struct sg_lb_stats *sgs,
12293 struct task_struct *p)
12294 {
12295 int i, nr_running;
12296
12297 memset(sgs, 0, sizeof(*sgs));
12298
12299 /* Assume that task can't fit any CPU of the group */
12300 if (sd->flags & SD_ASYM_CPUCAPACITY)
12301 sgs->group_misfit_task_load = 1;
12302
12303 for_each_cpu_and(i, sched_group_span(group), p->cpus_ptr) {
12304 struct rq *rq = cpu_rq(i);
12305 unsigned int local;
12306
12307 sgs->group_load += cpu_load_without(rq, p);
12308 sgs->group_util += cpu_util_without(i, p);
12309 sgs->group_runnable += cpu_runnable_without(rq, p);
12310 local = task_running_on_cpu(i, p);
12311 sgs->sum_h_nr_running += rq->cfs.h_nr_runnable - local;
12312
12313 nr_running = rq->nr_running - local;
12314 sgs->sum_nr_running += nr_running;
12315
12316 /*
12317 * No need to call idle_cpu_without() if nr_running is not 0
12318 */
12319 if (!nr_running && idle_cpu_without(i, p))
12320 sgs->idle_cpus++;
12321
12322 /* Check if task fits in the CPU */
12323 if (sd->flags & SD_ASYM_CPUCAPACITY &&
12324 sgs->group_misfit_task_load &&
12325 task_fits_cpu(p, i))
12326 sgs->group_misfit_task_load = 0;
12327
12328 }
12329
12330 sgs->group_capacity = group->sgc->capacity;
12331
12332 sgs->group_weight = group->group_weight;
12333
12334 sgs->group_type = group_classify(sd->imbalance_pct, group, sgs);
12335
12336 /*
12337 * Computing avg_load makes sense only when group is fully busy or
12338 * overloaded
12339 */
12340 if (sgs->group_type == group_fully_busy ||
12341 sgs->group_type == group_overloaded)
12342 sgs->avg_load = (sgs->group_load * SCHED_CAPACITY_SCALE) /
12343 sgs->group_capacity;
12344 }
12345
update_pick_idlest(struct sched_group * idlest,struct sg_lb_stats * idlest_sgs,struct sched_group * group,struct sg_lb_stats * sgs)12346 static bool update_pick_idlest(struct sched_group *idlest,
12347 struct sg_lb_stats *idlest_sgs,
12348 struct sched_group *group,
12349 struct sg_lb_stats *sgs)
12350 {
12351 if (sgs->group_type < idlest_sgs->group_type)
12352 return true;
12353
12354 if (sgs->group_type > idlest_sgs->group_type)
12355 return false;
12356
12357 /*
12358 * The candidate and the current idlest group are the same type of
12359 * group. Let check which one is the idlest according to the type.
12360 */
12361
12362 switch (sgs->group_type) {
12363 case group_overloaded:
12364 case group_fully_busy:
12365 /* Select the group with lowest avg_load. */
12366 if (idlest_sgs->avg_load <= sgs->avg_load)
12367 return false;
12368 break;
12369
12370 case group_llc_balance:
12371 case group_imbalanced:
12372 case group_asym_packing:
12373 case group_smt_balance:
12374 /* Those types are not used in the slow wakeup path */
12375 return false;
12376
12377 case group_misfit_task:
12378 /* Select group with the highest max capacity */
12379 if (idlest->sgc->max_capacity >= group->sgc->max_capacity)
12380 return false;
12381 break;
12382
12383 case group_has_spare:
12384 /* Select group with most idle CPUs */
12385 if (idlest_sgs->idle_cpus > sgs->idle_cpus)
12386 return false;
12387
12388 /* Select group with lowest group_util */
12389 if (idlest_sgs->idle_cpus == sgs->idle_cpus &&
12390 idlest_sgs->group_util <= sgs->group_util)
12391 return false;
12392
12393 break;
12394 }
12395
12396 return true;
12397 }
12398
12399 /*
12400 * sched_balance_find_dst_group() finds and returns the least busy CPU group within the
12401 * domain.
12402 *
12403 * Assumes p is allowed on at least one CPU in sd.
12404 */
12405 static struct sched_group *
sched_balance_find_dst_group(struct sched_domain * sd,struct task_struct * p,int this_cpu)12406 sched_balance_find_dst_group(struct sched_domain *sd, struct task_struct *p, int this_cpu)
12407 {
12408 struct sched_group *idlest = NULL, *local = NULL, *group = sd->groups;
12409 struct sg_lb_stats local_sgs, tmp_sgs;
12410 struct sg_lb_stats *sgs;
12411 unsigned long imbalance;
12412 struct sg_lb_stats idlest_sgs = {
12413 .avg_load = UINT_MAX,
12414 .group_type = group_overloaded,
12415 };
12416
12417 do {
12418 int local_group;
12419
12420 /* Skip over this group if it has no CPUs allowed */
12421 if (!cpumask_intersects(sched_group_span(group),
12422 p->cpus_ptr))
12423 continue;
12424
12425 /* Skip over this group if no cookie matched */
12426 if (!sched_group_cookie_match(cpu_rq(this_cpu), p, group))
12427 continue;
12428
12429 local_group = cpumask_test_cpu(this_cpu,
12430 sched_group_span(group));
12431
12432 if (local_group) {
12433 sgs = &local_sgs;
12434 local = group;
12435 } else {
12436 sgs = &tmp_sgs;
12437 }
12438
12439 update_sg_wakeup_stats(sd, group, sgs, p);
12440
12441 if (!local_group && update_pick_idlest(idlest, &idlest_sgs, group, sgs)) {
12442 idlest = group;
12443 idlest_sgs = *sgs;
12444 }
12445
12446 } while (group = group->next, group != sd->groups);
12447
12448
12449 /* There is no idlest group to push tasks to */
12450 if (!idlest)
12451 return NULL;
12452
12453 /* The local group has been skipped because of CPU affinity */
12454 if (!local)
12455 return idlest;
12456
12457 /*
12458 * If the local group is idler than the selected idlest group
12459 * don't try and push the task.
12460 */
12461 if (local_sgs.group_type < idlest_sgs.group_type)
12462 return NULL;
12463
12464 /*
12465 * If the local group is busier than the selected idlest group
12466 * try and push the task.
12467 */
12468 if (local_sgs.group_type > idlest_sgs.group_type)
12469 return idlest;
12470
12471 switch (local_sgs.group_type) {
12472 case group_overloaded:
12473 case group_fully_busy:
12474
12475 /* Calculate allowed imbalance based on load */
12476 imbalance = scale_load_down(NICE_0_LOAD) *
12477 (sd->imbalance_pct-100) / 100;
12478
12479 /*
12480 * When comparing groups across NUMA domains, it's possible for
12481 * the local domain to be very lightly loaded relative to the
12482 * remote domains but "imbalance" skews the comparison making
12483 * remote CPUs look much more favourable. When considering
12484 * cross-domain, add imbalance to the load on the remote node
12485 * and consider staying local.
12486 */
12487
12488 if ((sd->flags & SD_NUMA) &&
12489 ((idlest_sgs.avg_load + imbalance) >= local_sgs.avg_load))
12490 return NULL;
12491
12492 /*
12493 * If the local group is less loaded than the selected
12494 * idlest group don't try and push any tasks.
12495 */
12496 if (idlest_sgs.avg_load >= (local_sgs.avg_load + imbalance))
12497 return NULL;
12498
12499 if (100 * local_sgs.avg_load <= sd->imbalance_pct * idlest_sgs.avg_load)
12500 return NULL;
12501 break;
12502
12503 case group_llc_balance:
12504 case group_imbalanced:
12505 case group_asym_packing:
12506 case group_smt_balance:
12507 /* Those type are not used in the slow wakeup path */
12508 return NULL;
12509
12510 case group_misfit_task:
12511 /* Select group with the highest max capacity */
12512 if (local->sgc->max_capacity >= idlest->sgc->max_capacity)
12513 return NULL;
12514 break;
12515
12516 case group_has_spare:
12517 #ifdef CONFIG_NUMA
12518 if (sd->flags & SD_NUMA) {
12519 int imb_numa_nr = sd->imb_numa_nr;
12520 #ifdef CONFIG_NUMA_BALANCING
12521 int idlest_cpu;
12522 /*
12523 * If there is spare capacity at NUMA, try to select
12524 * the preferred node
12525 */
12526 if (cpu_to_node(this_cpu) == p->numa_preferred_nid)
12527 return NULL;
12528
12529 idlest_cpu = cpumask_first(sched_group_span(idlest));
12530 if (cpu_to_node(idlest_cpu) == p->numa_preferred_nid)
12531 return idlest;
12532 #endif /* CONFIG_NUMA_BALANCING */
12533 /*
12534 * Otherwise, keep the task close to the wakeup source
12535 * and improve locality if the number of running tasks
12536 * would remain below threshold where an imbalance is
12537 * allowed while accounting for the possibility the
12538 * task is pinned to a subset of CPUs. If there is a
12539 * real need of migration, periodic load balance will
12540 * take care of it.
12541 */
12542 if (p->nr_cpus_allowed != NR_CPUS) {
12543 unsigned int w = cpumask_weight_and(p->cpus_ptr,
12544 sched_group_span(local));
12545 imb_numa_nr = min(w, sd->imb_numa_nr);
12546 }
12547
12548 imbalance = abs(local_sgs.idle_cpus - idlest_sgs.idle_cpus);
12549 if (!adjust_numa_imbalance(imbalance,
12550 local_sgs.sum_nr_running + 1,
12551 imb_numa_nr)) {
12552 return NULL;
12553 }
12554 }
12555 #endif /* CONFIG_NUMA */
12556
12557 /*
12558 * Select group with highest number of idle CPUs. We could also
12559 * compare the utilization which is more stable but it can end
12560 * up that the group has less spare capacity but finally more
12561 * idle CPUs which means more opportunity to run task.
12562 */
12563 if (local_sgs.idle_cpus >= idlest_sgs.idle_cpus)
12564 return NULL;
12565 break;
12566 }
12567
12568 return idlest;
12569 }
12570
update_idle_cpu_scan(struct lb_env * env,unsigned long sum_util)12571 static void update_idle_cpu_scan(struct lb_env *env,
12572 unsigned long sum_util)
12573 {
12574 struct sched_domain_shared *sd_share;
12575 struct sched_domain *sd = env->sd;
12576 int llc_weight, pct;
12577 u64 x, y, tmp;
12578 /*
12579 * Update the number of CPUs to scan in LLC domain, which could
12580 * be used as a hint in select_idle_cpu(). The update of sd_share
12581 * could be expensive because it is within a shared cache line.
12582 * So the write of this hint only occurs during periodic load
12583 * balancing, rather than CPU_NEWLY_IDLE, because the latter
12584 * can fire way more frequently than the former.
12585 */
12586 if (!sched_feat(SIS_UTIL) || env->idle == CPU_NEWLY_IDLE)
12587 return;
12588
12589 sd_share = sd->shared;
12590 if (!sd_share)
12591 return;
12592
12593 /*
12594 * The number of CPUs to search drops as sum_util increases, when
12595 * sum_util hits 85% or above, the scan stops.
12596 * The reason to choose 85% as the threshold is because this is the
12597 * imbalance_pct(117) when a LLC sched group is overloaded.
12598 *
12599 * let y = SCHED_CAPACITY_SCALE - p * x^2 [1]
12600 * and y'= y / SCHED_CAPACITY_SCALE
12601 *
12602 * x is the ratio of sum_util compared to the CPU capacity:
12603 * x = sum_util / (llc_weight * SCHED_CAPACITY_SCALE)
12604 * y' is the ratio of CPUs to be scanned in the LLC domain,
12605 * and the number of CPUs to scan is calculated by:
12606 *
12607 * nr_scan = llc_weight * y' [2]
12608 *
12609 * When x hits the threshold of overloaded, AKA, when
12610 * x = 100 / pct, y drops to 0. According to [1],
12611 * p should be SCHED_CAPACITY_SCALE * pct^2 / 10000
12612 *
12613 * Scale x by SCHED_CAPACITY_SCALE:
12614 * x' = sum_util / llc_weight; [3]
12615 *
12616 * and finally [1] becomes:
12617 * y = SCHED_CAPACITY_SCALE -
12618 * x'^2 * pct^2 / (10000 * SCHED_CAPACITY_SCALE) [4]
12619 *
12620 */
12621 /* equation [3] */
12622 x = sum_util;
12623 llc_weight = sd->span_weight;
12624 do_div(x, llc_weight);
12625
12626 /* equation [4] */
12627 pct = sd->imbalance_pct;
12628 tmp = x * x * pct * pct;
12629 do_div(tmp, 10000 * SCHED_CAPACITY_SCALE);
12630 tmp = min_t(long, tmp, SCHED_CAPACITY_SCALE);
12631 y = SCHED_CAPACITY_SCALE - tmp;
12632
12633 /* equation [2] */
12634 y *= llc_weight;
12635 do_div(y, SCHED_CAPACITY_SCALE);
12636 if ((int)y != sd_share->nr_idle_scan)
12637 WRITE_ONCE(sd_share->nr_idle_scan, (int)y);
12638 }
12639
12640 /**
12641 * update_sd_lb_stats - Update sched_domain's statistics for load balancing.
12642 * @env: The load balancing environment.
12643 * @sds: variable to hold the statistics for this sched_domain.
12644 */
12645
update_sd_lb_stats(struct lb_env * env,struct sd_lb_stats * sds)12646 static inline void update_sd_lb_stats(struct lb_env *env, struct sd_lb_stats *sds)
12647 {
12648 struct sched_group *sg = env->sd->groups;
12649 struct sg_lb_stats *local = &sds->local_stat;
12650 struct sg_lb_stats tmp_sgs;
12651 unsigned long sum_util = 0;
12652 bool sg_overloaded = 0, sg_overutilized = 0;
12653
12654 env->dst_core_idle = !sched_smt_active() || is_core_idle(env->dst_cpu);
12655
12656 do {
12657 struct sg_lb_stats *sgs = &tmp_sgs;
12658 int local_group;
12659
12660 local_group = cpumask_test_cpu(env->dst_cpu, sched_group_span(sg));
12661 if (local_group) {
12662 sds->local = sg;
12663 sgs = local;
12664
12665 if (env->idle != CPU_NEWLY_IDLE ||
12666 time_after_eq(jiffies, sg->sgc->next_update))
12667 update_group_capacity(env->sd, env->dst_cpu);
12668 }
12669
12670 update_sg_lb_stats(env, sds, sg, sgs, &sg_overloaded);
12671
12672 if (!local_group && update_sd_pick_busiest(env, sds, sg, sgs)) {
12673 sds->busiest = sg;
12674 sds->busiest_stat = *sgs;
12675 }
12676
12677 sg_overutilized |= sgs->group_overutilized;
12678
12679 /* Now, start updating sd_lb_stats */
12680 sds->total_load += sgs->group_load;
12681 sds->total_capacity += sgs->group_capacity;
12682
12683 sum_util += sgs->group_util;
12684 sg = sg->next;
12685 } while (sg != env->sd->groups);
12686
12687 /*
12688 * Indicate that the child domain of the busiest group prefers tasks
12689 * go to a child's sibling domains first. NB the flags of a sched group
12690 * are those of the child domain.
12691 */
12692 if (sds->busiest)
12693 sds->prefer_sibling = !!(sds->busiest->flags & SD_PREFER_SIBLING);
12694
12695
12696 if (env->sd->flags & SD_NUMA)
12697 env->fbq_type = fbq_classify_group(&sds->busiest_stat);
12698
12699 if (!env->sd->parent) {
12700 /* update overload indicator if we are at root domain */
12701 set_rd_overloaded(env->dst_rq->rd, sg_overloaded);
12702
12703 /* Update over-utilization (tipping point, U >= 0) indicator */
12704 set_rd_overutilized(env->dst_rq->rd, sg_overutilized);
12705 } else if (sg_overutilized) {
12706 set_rd_overutilized(env->dst_rq->rd, sg_overutilized);
12707 }
12708
12709 update_idle_cpu_scan(env, sum_util);
12710 }
12711
12712 /**
12713 * calculate_imbalance - Calculate the amount of imbalance present within the
12714 * groups of a given sched_domain during load balance.
12715 * @env: load balance environment
12716 * @sds: statistics of the sched_domain whose imbalance is to be calculated.
12717 */
calculate_imbalance(struct lb_env * env,struct sd_lb_stats * sds)12718 static inline void calculate_imbalance(struct lb_env *env, struct sd_lb_stats *sds)
12719 {
12720 struct sg_lb_stats *local, *busiest;
12721
12722 local = &sds->local_stat;
12723 busiest = &sds->busiest_stat;
12724
12725 if (busiest->group_type == group_misfit_task) {
12726 if (env->sd->flags & SD_ASYM_CPUCAPACITY) {
12727 /* Set imbalance to allow misfit tasks to be balanced. */
12728 env->migration_type = migrate_misfit;
12729 env->imbalance = 1;
12730 } else {
12731 /*
12732 * Set load imbalance to allow moving task from cpu
12733 * with reduced capacity.
12734 */
12735 env->migration_type = migrate_load;
12736 env->imbalance = busiest->group_misfit_task_load;
12737 }
12738 return;
12739 }
12740
12741 if (busiest->group_type == group_asym_packing) {
12742 /*
12743 * In case of asym capacity, we will try to migrate all load to
12744 * the preferred CPU.
12745 */
12746 env->migration_type = migrate_task;
12747 env->imbalance = busiest->sum_h_nr_running;
12748 return;
12749 }
12750
12751 if (busiest->group_type == group_smt_balance) {
12752 /* Reduce number of tasks sharing CPU capacity */
12753 env->migration_type = migrate_task;
12754 env->imbalance = 1;
12755 return;
12756 }
12757
12758 #ifdef CONFIG_SCHED_CACHE
12759 if (busiest->group_type == group_llc_balance) {
12760 /* Move a task that prefer local LLC */
12761 env->migration_type = migrate_llc_task;
12762 env->imbalance = 1;
12763 return;
12764 }
12765 #endif
12766
12767 if (busiest->group_type == group_imbalanced) {
12768 /*
12769 * In the group_imb case we cannot rely on group-wide averages
12770 * to ensure CPU-load equilibrium, try to move any task to fix
12771 * the imbalance. The next load balance will take care of
12772 * balancing back the system.
12773 */
12774 env->migration_type = migrate_task;
12775 env->imbalance = 1;
12776 return;
12777 }
12778
12779 /*
12780 * Try to use spare capacity of local group without overloading it or
12781 * emptying busiest.
12782 */
12783 if (local->group_type == group_has_spare) {
12784 if ((busiest->group_type > group_fully_busy) &&
12785 !(env->sd->flags & SD_SHARE_LLC)) {
12786 /*
12787 * If busiest is overloaded, try to fill spare
12788 * capacity. This might end up creating spare capacity
12789 * in busiest or busiest still being overloaded but
12790 * there is no simple way to directly compute the
12791 * amount of load to migrate in order to balance the
12792 * system.
12793 */
12794 env->migration_type = migrate_util;
12795 env->imbalance = max(local->group_capacity, local->group_util) -
12796 local->group_util;
12797
12798 /*
12799 * In some cases, the group's utilization is max or even
12800 * higher than capacity because of migrations but the
12801 * local CPU is (newly) idle. There is at least one
12802 * waiting task in this overloaded busiest group. Let's
12803 * try to pull it.
12804 */
12805 if (env->idle && env->imbalance == 0) {
12806 env->migration_type = migrate_task;
12807 env->imbalance = 1;
12808 }
12809
12810 return;
12811 }
12812
12813 if (busiest->group_weight == 1 || sds->prefer_sibling) {
12814 /*
12815 * When prefer sibling, evenly spread running tasks on
12816 * groups.
12817 */
12818 env->migration_type = migrate_task;
12819 env->imbalance = sibling_imbalance(env, sds, busiest, local);
12820 } else {
12821
12822 /*
12823 * If there is no overload, we just want to even the number of
12824 * idle CPUs.
12825 */
12826 env->migration_type = migrate_task;
12827 env->imbalance = max_t(long, 0,
12828 (local->idle_cpus - busiest->idle_cpus));
12829 }
12830
12831 #ifdef CONFIG_NUMA
12832 /* Consider allowing a small imbalance between NUMA groups */
12833 if (env->sd->flags & SD_NUMA) {
12834 env->imbalance = adjust_numa_imbalance(env->imbalance,
12835 local->sum_nr_running + 1,
12836 env->sd->imb_numa_nr);
12837 }
12838 #endif
12839
12840 /* Number of tasks to move to restore balance */
12841 env->imbalance >>= 1;
12842
12843 return;
12844 }
12845
12846 /*
12847 * Local is fully busy but has to take more load to relieve the
12848 * busiest group
12849 */
12850 if (local->group_type < group_overloaded) {
12851 /*
12852 * Local will become overloaded so the avg_load metrics are
12853 * finally needed.
12854 */
12855
12856 local->avg_load = (local->group_load * SCHED_CAPACITY_SCALE) /
12857 local->group_capacity;
12858
12859 /*
12860 * If the local group is more loaded than the selected
12861 * busiest group don't try to pull any tasks.
12862 */
12863 if (local->avg_load >= busiest->avg_load) {
12864 env->imbalance = 0;
12865 return;
12866 }
12867
12868 sds->avg_load = (sds->total_load * SCHED_CAPACITY_SCALE) /
12869 sds->total_capacity;
12870
12871 /*
12872 * If the local group is more loaded than the average system
12873 * load, don't try to pull any tasks.
12874 */
12875 if (local->avg_load >= sds->avg_load) {
12876 env->imbalance = 0;
12877 return;
12878 }
12879
12880 }
12881
12882 /*
12883 * Both group are or will become overloaded and we're trying to get all
12884 * the CPUs to the average_load, so we don't want to push ourselves
12885 * above the average load, nor do we wish to reduce the max loaded CPU
12886 * below the average load. At the same time, we also don't want to
12887 * reduce the group load below the group capacity. Thus we look for
12888 * the minimum possible imbalance.
12889 */
12890 env->migration_type = migrate_load;
12891 env->imbalance = min(
12892 (busiest->avg_load - sds->avg_load) * busiest->group_capacity,
12893 (sds->avg_load - local->avg_load) * local->group_capacity
12894 ) / SCHED_CAPACITY_SCALE;
12895 }
12896
12897 /******* sched_balance_find_src_group() helpers end here *********************/
12898
12899 /*
12900 * Decision matrix according to the local and busiest group type:
12901 *
12902 * busiest \ local has_spare fully_busy misfit asym imbalanced overloaded
12903 * has_spare nr_idle balanced N/A N/A balanced balanced
12904 * fully_busy nr_idle nr_idle N/A N/A balanced balanced
12905 * misfit_task force N/A N/A N/A N/A N/A
12906 * asym_packing force force N/A N/A force force
12907 * imbalanced force force N/A N/A force force
12908 * overloaded force force N/A N/A force avg_load
12909 *
12910 * N/A : Not Applicable because already filtered while updating
12911 * statistics.
12912 * balanced : The system is balanced for these 2 groups.
12913 * force : Calculate the imbalance as load migration is probably needed.
12914 * avg_load : Only if imbalance is significant enough.
12915 * nr_idle : dst_cpu is not busy and the number of idle CPUs is quite
12916 * different in groups.
12917 */
12918
12919 /**
12920 * sched_balance_find_src_group - Returns the busiest group within the sched_domain
12921 * if there is an imbalance.
12922 * @env: The load balancing environment.
12923 *
12924 * Also calculates the amount of runnable load which should be moved
12925 * to restore balance.
12926 *
12927 * Return: - The busiest group if imbalance exists.
12928 */
sched_balance_find_src_group(struct lb_env * env)12929 static struct sched_group *sched_balance_find_src_group(struct lb_env *env)
12930 {
12931 struct sg_lb_stats *local, *busiest;
12932 struct sd_lb_stats sds;
12933
12934 init_sd_lb_stats(&sds);
12935
12936 /*
12937 * Compute the various statistics relevant for load balancing at
12938 * this level.
12939 */
12940 update_sd_lb_stats(env, &sds);
12941
12942 /* There is no busy sibling group to pull tasks from */
12943 if (!sds.busiest)
12944 goto out_balanced;
12945
12946 busiest = &sds.busiest_stat;
12947
12948 /* Misfit tasks should be dealt with regardless of the avg load */
12949 if (busiest->group_type == group_misfit_task)
12950 goto force_balance;
12951
12952 if (!is_rd_overutilized(env->dst_rq->rd) &&
12953 rcu_dereference_all(env->dst_rq->rd->pd))
12954 goto out_balanced;
12955
12956 /* ASYM feature bypasses nice load balance check */
12957 if (busiest->group_type == group_asym_packing)
12958 goto force_balance;
12959
12960 /*
12961 * If the busiest group is imbalanced the below checks don't
12962 * work because they assume all things are equal, which typically
12963 * isn't true due to cpus_ptr constraints and the like.
12964 */
12965 if (busiest->group_type == group_imbalanced)
12966 goto force_balance;
12967
12968 local = &sds.local_stat;
12969 /*
12970 * If the local group is busier than the selected busiest group
12971 * don't try and pull any tasks.
12972 */
12973 if (local->group_type > busiest->group_type)
12974 goto out_balanced;
12975
12976 /*
12977 * When groups are overloaded, use the avg_load to ensure fairness
12978 * between tasks.
12979 */
12980 if (local->group_type == group_overloaded) {
12981 /*
12982 * If the local group is more loaded than the selected
12983 * busiest group don't try to pull any tasks.
12984 */
12985 if (local->avg_load >= busiest->avg_load)
12986 goto out_balanced;
12987
12988 /* XXX broken for overlapping NUMA groups */
12989 sds.avg_load = (sds.total_load * SCHED_CAPACITY_SCALE) /
12990 sds.total_capacity;
12991
12992 /*
12993 * Don't pull any tasks if this group is already above the
12994 * domain average load.
12995 */
12996 if (local->avg_load >= sds.avg_load)
12997 goto out_balanced;
12998
12999 /*
13000 * If the busiest group is more loaded, use imbalance_pct to be
13001 * conservative.
13002 */
13003 if (100 * busiest->avg_load <=
13004 env->sd->imbalance_pct * local->avg_load)
13005 goto out_balanced;
13006 }
13007
13008 /*
13009 * Try to move all excess tasks to a sibling domain of the busiest
13010 * group's child domain.
13011 */
13012 if (sds.prefer_sibling && local->group_type == group_has_spare &&
13013 (busiest->group_type == group_llc_balance ||
13014 sibling_imbalance(env, &sds, busiest, local) > 1))
13015 goto force_balance;
13016
13017 if (busiest->group_type != group_overloaded) {
13018 if (!env->idle) {
13019 /*
13020 * If the busiest group is not overloaded (and as a
13021 * result the local one too) but this CPU is already
13022 * busy, let another idle CPU try to pull task.
13023 */
13024 goto out_balanced;
13025 }
13026
13027 if (busiest->group_type == group_smt_balance &&
13028 smt_vs_nonsmt_groups(sds.local, sds.busiest)) {
13029 /* Let non SMT CPU pull from SMT CPU sharing with sibling */
13030 goto force_balance;
13031 }
13032
13033 if (busiest->group_weight > 1 &&
13034 local->idle_cpus <= (busiest->idle_cpus + 1)) {
13035 /*
13036 * If the busiest group is not overloaded
13037 * and there is no imbalance between this and busiest
13038 * group wrt idle CPUs, it is balanced. The imbalance
13039 * becomes significant if the diff is greater than 1
13040 * otherwise we might end up to just move the imbalance
13041 * on another group. Of course this applies only if
13042 * there is more than 1 CPU per group.
13043 */
13044 goto out_balanced;
13045 }
13046
13047 if (busiest->sum_h_nr_running == 1) {
13048 /*
13049 * busiest doesn't have any tasks waiting to run
13050 */
13051 goto out_balanced;
13052 }
13053 }
13054
13055 force_balance:
13056 /* Looks like there is an imbalance. Compute it */
13057 calculate_imbalance(env, &sds);
13058 return env->imbalance ? sds.busiest : NULL;
13059
13060 out_balanced:
13061 env->imbalance = 0;
13062 return NULL;
13063 }
13064
13065 /*
13066 * sched_balance_find_src_rq - find the busiest runqueue among the CPUs in the group.
13067 */
sched_balance_find_src_rq(struct lb_env * env,struct sched_group * group)13068 static struct rq *sched_balance_find_src_rq(struct lb_env *env,
13069 struct sched_group *group)
13070 {
13071 struct rq *busiest = NULL, *rq;
13072 unsigned long busiest_util = 0, busiest_load = 0, busiest_capacity = 1;
13073 unsigned int __maybe_unused busiest_pref_llc = 0;
13074 struct sched_domain __maybe_unused *sd_tmp;
13075 unsigned int busiest_nr = 0;
13076 int __maybe_unused dst_llc;
13077 int i;
13078
13079 for_each_cpu_and(i, sched_group_span(group), env->cpus) {
13080 unsigned long capacity, load, util;
13081 unsigned int nr_running;
13082 enum fbq_type rt;
13083
13084 rq = cpu_rq(i);
13085 rt = fbq_classify_rq(rq);
13086
13087 /*
13088 * We classify groups/runqueues into three groups:
13089 * - regular: there are !numa tasks
13090 * - remote: there are numa tasks that run on the 'wrong' node
13091 * - all: there is no distinction
13092 *
13093 * In order to avoid migrating ideally placed numa tasks,
13094 * ignore those when there's better options.
13095 *
13096 * If we ignore the actual busiest queue to migrate another
13097 * task, the next balance pass can still reduce the busiest
13098 * queue by moving tasks around inside the node.
13099 *
13100 * If we cannot move enough load due to this classification
13101 * the next pass will adjust the group classification and
13102 * allow migration of more tasks.
13103 *
13104 * Both cases only affect the total convergence complexity.
13105 */
13106 if (rt > env->fbq_type)
13107 continue;
13108
13109 nr_running = rq->cfs.h_nr_runnable;
13110 if (!nr_running)
13111 continue;
13112
13113 capacity = capacity_of(i);
13114
13115 /*
13116 * For ASYM_CPUCAPACITY domains, don't pick a CPU that could
13117 * eventually lead to active_balancing high->low capacity.
13118 * Higher per-CPU capacity is considered better than balancing
13119 * average load.
13120 */
13121 if (env->sd->flags & SD_ASYM_CPUCAPACITY &&
13122 nr_running == 1) {
13123 bool cluster_equal_cap = static_branch_unlikely(&sched_cluster_active) &&
13124 (get_actual_cpu_capacity(env->dst_cpu) ==
13125 get_actual_cpu_capacity(i));
13126 bool smt_degraded_cap = sched_smt_active() && !is_core_idle(i);
13127
13128 /*
13129 * Busy SMT siblings reduce the capacity of CPU @i. Do
13130 * not skip it in this case.
13131 *
13132 * CONFIG_SCHED_CLUSTER requires balancing load across
13133 * clusters of identical capacity, accounting for
13134 * hardware and cpufreq pressure.
13135 */
13136 if (!smt_degraded_cap && !cluster_equal_cap &&
13137 !capacity_greater(capacity_of(env->dst_cpu), capacity))
13138 continue;
13139 }
13140
13141 /*
13142 * Make sure we only pull tasks from a CPU of lower priority
13143 * when balancing between SMT siblings.
13144 *
13145 * If balancing between cores, let lower priority CPUs help
13146 * SMT cores with more than one busy sibling.
13147 */
13148 if (sched_asym(env->sd, i, env->dst_cpu) && nr_running == 1)
13149 continue;
13150
13151 switch (env->migration_type) {
13152 case migrate_load:
13153 /*
13154 * When comparing with load imbalance, use cpu_load()
13155 * which is not scaled with the CPU capacity.
13156 */
13157 load = cpu_load(rq);
13158
13159 if (nr_running == 1 && load > env->imbalance &&
13160 !check_cpu_capacity(rq, env->sd))
13161 break;
13162
13163 /*
13164 * For the load comparisons with the other CPUs,
13165 * consider the cpu_load() scaled with the CPU
13166 * capacity, so that the load can be moved away
13167 * from the CPU that is potentially running at a
13168 * lower capacity.
13169 *
13170 * Thus we're looking for max(load_i / capacity_i),
13171 * crosswise multiplication to rid ourselves of the
13172 * division works out to:
13173 * load_i * capacity_j > load_j * capacity_i;
13174 * where j is our previous maximum.
13175 */
13176 if (load * busiest_capacity > busiest_load * capacity) {
13177 busiest_load = load;
13178 busiest_capacity = capacity;
13179 busiest = rq;
13180 }
13181 break;
13182
13183 case migrate_util:
13184 util = cpu_util_cfs_boost(i);
13185
13186 /*
13187 * Don't try to pull utilization from a CPU with one
13188 * running task. Whatever its utilization, we will fail
13189 * detach the task.
13190 */
13191 if (nr_running <= 1)
13192 continue;
13193
13194 if (busiest_util < util) {
13195 busiest_util = util;
13196 busiest = rq;
13197 }
13198 break;
13199
13200 case migrate_task:
13201 if (busiest_nr < nr_running) {
13202 busiest_nr = nr_running;
13203 busiest = rq;
13204 }
13205 break;
13206
13207 case migrate_misfit:
13208 /*
13209 * For ASYM_CPUCAPACITY domains with misfit tasks we
13210 * simply seek the "biggest" misfit task.
13211 */
13212 if (rq->misfit_task_load > busiest_load) {
13213 busiest_load = rq->misfit_task_load;
13214 busiest = rq;
13215 }
13216
13217 break;
13218
13219 case migrate_llc_task:
13220 #ifdef CONFIG_SCHED_CACHE
13221 sd_tmp = rcu_dereference_all(rq->sd);
13222 dst_llc = llc_id(env->dst_cpu);
13223
13224 if (sd_tmp && (unsigned)dst_llc < sd_tmp->llc_max) {
13225 unsigned int this_pref_llc =
13226 sd_tmp->llc_counts[dst_llc];
13227
13228 if (busiest_pref_llc < this_pref_llc) {
13229 busiest_pref_llc = this_pref_llc;
13230 busiest = rq;
13231 }
13232 }
13233 #endif
13234 break;
13235
13236 }
13237 }
13238
13239 return busiest;
13240 }
13241
13242 /*
13243 * Max backoff if we encounter pinned tasks. Pretty arbitrary value, but
13244 * so long as it is large enough.
13245 */
13246 #define MAX_PINNED_INTERVAL 512
13247
13248 static inline bool
asym_active_balance(struct lb_env * env)13249 asym_active_balance(struct lb_env *env)
13250 {
13251 /*
13252 * ASYM_PACKING needs to force migrate tasks from busy but lower
13253 * priority CPUs in order to pack all tasks in the highest priority
13254 * CPUs. When done between cores, do it only if the whole core if the
13255 * whole core is idle.
13256 *
13257 * If @env::src_cpu is an SMT core with busy siblings, let
13258 * the lower priority @env::dst_cpu help it. Do not follow
13259 * CPU priority.
13260 */
13261 return env->idle && sched_use_asym_prio(env->sd, env->dst_cpu) &&
13262 (sched_asym_prefer(env->dst_cpu, env->src_cpu) ||
13263 !sched_use_asym_prio(env->sd, env->src_cpu));
13264 }
13265
13266 static inline bool
imbalanced_active_balance(struct lb_env * env)13267 imbalanced_active_balance(struct lb_env *env)
13268 {
13269 struct sched_domain *sd = env->sd;
13270
13271 /*
13272 * The imbalanced case includes the case of pinned tasks preventing a fair
13273 * distribution of the load on the system but also the even distribution of the
13274 * threads on a system with spare capacity
13275 */
13276 if ((env->migration_type == migrate_task) &&
13277 (sd->nr_balance_failed > sd->cache_nice_tries+2))
13278 return 1;
13279
13280 return 0;
13281 }
13282
need_active_balance(struct lb_env * env)13283 static int need_active_balance(struct lb_env *env)
13284 {
13285 struct sched_domain *sd = env->sd;
13286
13287 if (alb_break_llc(env))
13288 return 0;
13289
13290 if (asym_active_balance(env))
13291 return 1;
13292
13293 if (imbalanced_active_balance(env))
13294 return 1;
13295
13296 /*
13297 * The dst_cpu is idle and the src_cpu CPU has only 1 CFS task.
13298 * It's worth migrating the task if the src_cpu's capacity is reduced
13299 * because of other sched_class or IRQs if more capacity stays
13300 * available on dst_cpu.
13301 */
13302 if (env->idle &&
13303 (env->src_rq->cfs.h_nr_runnable == 1)) {
13304 if ((check_cpu_capacity(env->src_rq, sd)) &&
13305 (capacity_of(env->src_cpu)*sd->imbalance_pct < capacity_of(env->dst_cpu)*100))
13306 return 1;
13307 }
13308
13309 if (env->migration_type == migrate_misfit ||
13310 env->migration_type == migrate_llc_task)
13311 return 1;
13312
13313 return 0;
13314 }
13315
13316 static int active_load_balance_cpu_stop(void *data);
13317
should_we_balance(struct lb_env * env)13318 static int should_we_balance(struct lb_env *env)
13319 {
13320 struct cpumask *swb_cpus = this_cpu_cpumask_var_ptr(should_we_balance_tmpmask);
13321 struct sched_group *sg = env->sd->groups;
13322 int cpu, idle_smt = -1;
13323
13324 /*
13325 * Ensure the balancing environment is consistent; can happen
13326 * when the softirq triggers 'during' hotplug.
13327 */
13328 if (!cpumask_test_cpu(env->dst_cpu, env->cpus))
13329 return 0;
13330
13331 /*
13332 * In the newly idle case, we will allow all the CPUs
13333 * to do the newly idle load balance.
13334 *
13335 * However, we bail out if we already have tasks or a wakeup pending,
13336 * to optimize wakeup latency.
13337 */
13338 if (env->idle == CPU_NEWLY_IDLE) {
13339 if (env->dst_rq->nr_running > 0 || env->dst_rq->ttwu_pending)
13340 return 0;
13341 return 1;
13342 }
13343
13344 cpumask_copy(swb_cpus, group_balance_mask(sg));
13345 /* Try to find first idle CPU */
13346 for_each_cpu_and(cpu, swb_cpus, env->cpus) {
13347 if (!idle_cpu(cpu))
13348 continue;
13349
13350 /*
13351 * Don't balance to idle SMT in busy core right away when
13352 * balancing cores, but remember the first idle SMT CPU for
13353 * later consideration. Find CPU on an idle core first.
13354 */
13355 if (sched_smt_active() &&
13356 !(env->sd->flags & SD_SHARE_CPUCAPACITY) &&
13357 !is_core_idle(cpu)) {
13358 if (idle_smt == -1)
13359 idle_smt = cpu;
13360 /*
13361 * If the core is not idle, and first SMT sibling which is
13362 * idle has been found, then its not needed to check other
13363 * SMT siblings for idleness:
13364 */
13365 cpumask_andnot(swb_cpus, swb_cpus, cpu_smt_mask(cpu));
13366 continue;
13367 }
13368
13369 /*
13370 * Are we the first idle core in a non-SMT domain or higher,
13371 * or the first idle CPU in a SMT domain?
13372 */
13373 return cpu == env->dst_cpu;
13374 }
13375
13376 /* Are we the first idle CPU with busy siblings? */
13377 if (idle_smt != -1)
13378 return idle_smt == env->dst_cpu;
13379
13380 /* Are we the first CPU of this group ? */
13381 return group_balance_cpu(sg) == env->dst_cpu;
13382 }
13383
update_lb_imbalance_stat(struct lb_env * env,struct sched_domain * sd,enum cpu_idle_type idle)13384 static void update_lb_imbalance_stat(struct lb_env *env, struct sched_domain *sd,
13385 enum cpu_idle_type idle)
13386 {
13387 if (!schedstat_enabled())
13388 return;
13389
13390 switch (env->migration_type) {
13391 case migrate_load:
13392 __schedstat_add(sd->lb_imbalance_load[idle], env->imbalance);
13393 break;
13394 case migrate_util:
13395 __schedstat_add(sd->lb_imbalance_util[idle], env->imbalance);
13396 break;
13397 case migrate_task:
13398 __schedstat_add(sd->lb_imbalance_task[idle], env->imbalance);
13399 break;
13400 case migrate_misfit:
13401 __schedstat_add(sd->lb_imbalance_misfit[idle], env->imbalance);
13402 break;
13403 case migrate_llc_task:
13404 break;
13405 }
13406 }
13407
13408 /*
13409 * This flag serializes load-balancing passes over large domains
13410 * (above the NODE topology level) - only one load-balancing instance
13411 * may run at a time, to reduce overhead on very large systems with
13412 * lots of CPUs and large NUMA distances.
13413 *
13414 * - Note that load-balancing passes triggered while another one
13415 * is executing are skipped and not re-tried.
13416 *
13417 * - Also note that this does not serialize rebalance_domains()
13418 * execution, as non-SD_SERIALIZE domains will still be
13419 * load-balanced in parallel.
13420 */
13421 static atomic_t sched_balance_running = ATOMIC_INIT(0);
13422
13423 /*
13424 * Check this_cpu to ensure it is balanced within domain. Attempt to move
13425 * tasks if there is an imbalance.
13426 */
sched_balance_rq(int this_cpu,struct rq * this_rq,struct sched_domain * sd,enum cpu_idle_type idle,int * continue_balancing)13427 static int sched_balance_rq(int this_cpu, struct rq *this_rq,
13428 struct sched_domain *sd, enum cpu_idle_type idle,
13429 int *continue_balancing)
13430 {
13431 int ld_moved, cur_ld_moved, active_balance = 0;
13432 struct sched_domain *sd_parent = sd->parent;
13433 struct sched_group *group;
13434 struct rq *busiest;
13435 struct rq_flags rf;
13436 struct cpumask *cpus = this_cpu_cpumask_var_ptr(load_balance_mask);
13437 struct lb_env env = {
13438 .sd = sd,
13439 .dst_cpu = this_cpu,
13440 .dst_rq = this_rq,
13441 .dst_grpmask = group_balance_mask(sd->groups),
13442 .idle = idle,
13443 .loop_break = SCHED_NR_MIGRATE_BREAK,
13444 .cpus = cpus,
13445 .fbq_type = all,
13446 .tasks = LIST_HEAD_INIT(env.tasks),
13447 };
13448 bool need_unlock = false;
13449
13450 cpumask_and(cpus, sched_domain_span(sd), cpu_active_mask);
13451
13452 schedstat_inc(sd->lb_count[idle]);
13453
13454 redo:
13455 if (!should_we_balance(&env)) {
13456 *continue_balancing = 0;
13457 goto out_balanced;
13458 }
13459
13460 if (!need_unlock && (sd->flags & SD_SERIALIZE)) {
13461 int zero = 0;
13462 if (!atomic_try_cmpxchg_acquire(&sched_balance_running, &zero, 1))
13463 goto out_balanced;
13464
13465 need_unlock = true;
13466 }
13467
13468 group = sched_balance_find_src_group(&env);
13469 if (!group) {
13470 schedstat_inc(sd->lb_nobusyg[idle]);
13471 goto out_balanced;
13472 }
13473
13474 busiest = sched_balance_find_src_rq(&env, group);
13475 if (!busiest) {
13476 schedstat_inc(sd->lb_nobusyq[idle]);
13477 goto out_balanced;
13478 }
13479
13480 WARN_ON_ONCE(busiest == env.dst_rq);
13481
13482 update_lb_imbalance_stat(&env, sd, idle);
13483
13484 env.src_cpu = busiest->cpu;
13485 env.src_rq = busiest;
13486
13487 ld_moved = 0;
13488 /* Clear this flag as soon as we find a pullable task */
13489 env.flags |= LBF_ALL_PINNED;
13490 if (busiest->nr_running > 1) {
13491 /*
13492 * Attempt to move tasks. If sched_balance_find_src_group has found
13493 * an imbalance but busiest->nr_running <= 1, the group is
13494 * still unbalanced. ld_moved simply stays zero, so it is
13495 * correctly treated as an imbalance.
13496 */
13497 env.loop_max = min(sysctl_sched_nr_migrate, busiest->nr_running);
13498
13499 more_balance:
13500 rq_lock_irqsave(busiest, &rf);
13501 update_rq_clock(busiest);
13502
13503 /*
13504 * cur_ld_moved - load moved in current iteration
13505 * ld_moved - cumulative load moved across iterations
13506 */
13507 cur_ld_moved = detach_tasks(&env);
13508
13509 /*
13510 * We've detached some tasks from busiest_rq. Every
13511 * task is masked "TASK_ON_RQ_MIGRATING", so we can safely
13512 * unlock busiest->lock, and we are able to be sure
13513 * that nobody can manipulate the tasks in parallel.
13514 * See task_rq_lock() family for the details.
13515 */
13516
13517 rq_unlock(busiest, &rf);
13518
13519 if (cur_ld_moved) {
13520 attach_tasks(&env);
13521 ld_moved += cur_ld_moved;
13522 }
13523
13524 local_irq_restore(rf.flags);
13525
13526 if (env.flags & LBF_NEED_BREAK) {
13527 env.flags &= ~LBF_NEED_BREAK;
13528 goto more_balance;
13529 }
13530
13531 /*
13532 * Revisit (affine) tasks on src_cpu that couldn't be moved to
13533 * us and move them to an alternate dst_cpu in our sched_group
13534 * where they can run. The upper limit on how many times we
13535 * iterate on same src_cpu is dependent on number of CPUs in our
13536 * sched_group.
13537 *
13538 * This changes load balance semantics a bit on who can move
13539 * load to a given_cpu. In addition to the given_cpu itself
13540 * (or a ilb_cpu acting on its behalf where given_cpu is
13541 * nohz-idle), we now have balance_cpu in a position to move
13542 * load to given_cpu. In rare situations, this may cause
13543 * conflicts (balance_cpu and given_cpu/ilb_cpu deciding
13544 * _independently_ and at _same_ time to move some load to
13545 * given_cpu) causing excess load to be moved to given_cpu.
13546 * This however should not happen so much in practice and
13547 * moreover subsequent load balance cycles should correct the
13548 * excess load moved.
13549 */
13550 if ((env.flags & LBF_DST_PINNED) && env.imbalance > 0) {
13551
13552 /* Prevent to re-select dst_cpu via env's CPUs */
13553 __cpumask_clear_cpu(env.dst_cpu, env.cpus);
13554
13555 env.dst_rq = cpu_rq(env.new_dst_cpu);
13556 env.dst_cpu = env.new_dst_cpu;
13557 env.flags &= ~LBF_DST_PINNED;
13558 env.loop = 0;
13559 env.loop_break = SCHED_NR_MIGRATE_BREAK;
13560
13561 /*
13562 * Go back to "more_balance" rather than "redo" since we
13563 * need to continue with same src_cpu.
13564 */
13565 goto more_balance;
13566 }
13567
13568 /*
13569 * We failed to reach balance because of affinity.
13570 */
13571 if (sd_parent) {
13572 int *group_imbalance = &sd_parent->groups->sgc->imbalance;
13573
13574 if ((env.flags & LBF_SOME_PINNED) && env.imbalance > 0)
13575 *group_imbalance = 1;
13576 }
13577
13578 /* All tasks on this runqueue were pinned by CPU affinity */
13579 if (unlikely(env.flags & LBF_ALL_PINNED)) {
13580 __cpumask_clear_cpu(cpu_of(busiest), cpus);
13581 /*
13582 * Attempting to continue load balancing at the current
13583 * sched_domain level only makes sense if there are
13584 * active CPUs remaining as possible busiest CPUs to
13585 * pull load from which are not contained within the
13586 * destination group that is receiving any migrated
13587 * load.
13588 */
13589 if (!cpumask_subset(cpus, env.dst_grpmask)) {
13590 env.loop = 0;
13591 env.loop_break = SCHED_NR_MIGRATE_BREAK;
13592 goto redo;
13593 }
13594 goto out_all_pinned;
13595 }
13596 }
13597
13598 if (ld_moved) {
13599 sd->nr_balance_failed = 0;
13600 goto out_unbalanced;
13601 }
13602
13603 schedstat_inc(sd->lb_failed[idle]);
13604 /*
13605 * Increment the failure counter only on periodic balance.
13606 * We do not want newidle balance, which can be very
13607 * frequent, pollute the failure counter causing
13608 * excessive cache_hot migrations and active balances.
13609 *
13610 * Similarly for migration_misfit which is not related to
13611 * load/util migration, don't pollute nr_balance_failed.
13612 *
13613 * The same for cache aware scheduling's allowance for
13614 * load imbalance. If regular load balance does not
13615 * migrate task due to LLC locality, it is a expected
13616 * behavior and don't pollute nr_balance_failed.
13617 * See can_migrate_task().
13618 */
13619 if (idle != CPU_NEWLY_IDLE &&
13620 env.migration_type != migrate_misfit &&
13621 !(env.flags & LBF_LLC_PINNED))
13622 sd->nr_balance_failed++;
13623
13624 if (!need_active_balance(&env))
13625 goto out_unbalanced;
13626
13627 scoped_guard (raw_spin_rq_lock_irqsave, busiest) {
13628 /*
13629 * Don't kick the active_load_balance_cpu_stop,
13630 * if the curr task on busiest CPU can't be
13631 * moved to this_cpu:
13632 */
13633 if (!cpumask_test_cpu(this_cpu, busiest->curr->cpus_ptr))
13634 goto out_one_pinned;
13635
13636 /* Record that we found at least one task that could run on this_cpu */
13637 env.flags &= ~LBF_ALL_PINNED;
13638
13639 /*
13640 * ->active_balance synchronizes accesses to
13641 * ->active_balance_work. Once set, it's cleared
13642 * only after active load balance is finished.
13643 */
13644 if (busiest->active_balance)
13645 goto out_unbalanced;
13646
13647 /*
13648 * @busiest dropped its rq_lock in the middle of
13649 * scheduling out its ->curr task (->on_rq := 0), no
13650 * need to forcefully punt it away with active balance.
13651 */
13652 if (!busiest->curr->on_rq)
13653 goto out_unbalanced;
13654
13655 busiest->active_balance = 1;
13656 busiest->push_cpu = this_cpu;
13657 active_balance = 1;
13658 preempt_disable();
13659 }
13660 if (active_balance) {
13661 stop_one_cpu_nowait(cpu_of(busiest),
13662 active_load_balance_cpu_stop, busiest,
13663 &busiest->active_balance_work);
13664 }
13665 preempt_enable();
13666
13667 out_unbalanced:
13668 /* We were unbalanced, so reset the balancing interval */
13669 sd->balance_interval = sd->min_interval;
13670 goto out;
13671
13672 out_balanced:
13673 /*
13674 * We reach balance although we may have faced some affinity
13675 * constraints. Clear the imbalance flag only if other tasks got
13676 * a chance to move and fix the imbalance.
13677 */
13678 if (sd_parent && !(env.flags & LBF_ALL_PINNED)) {
13679 int *group_imbalance = &sd_parent->groups->sgc->imbalance;
13680
13681 if (*group_imbalance)
13682 *group_imbalance = 0;
13683 }
13684
13685 out_all_pinned:
13686 /*
13687 * We reach balance because all tasks are pinned at this level so
13688 * we can't migrate them. Let the imbalance flag set so parent level
13689 * can try to migrate them.
13690 */
13691 schedstat_inc(sd->lb_balanced[idle]);
13692
13693 sd->nr_balance_failed = 0;
13694
13695 out_one_pinned:
13696 ld_moved = 0;
13697
13698 /*
13699 * sched_balance_newidle() disregards balance intervals, so we could
13700 * repeatedly reach this code, which would lead to balance_interval
13701 * skyrocketing in a short amount of time. Skip the balance_interval
13702 * increase logic to avoid that.
13703 *
13704 * Similarly misfit migration which is not necessarily an indication of
13705 * the system being busy and requires lb to backoff to let it settle
13706 * down.
13707 */
13708 if (env.idle == CPU_NEWLY_IDLE ||
13709 env.migration_type == migrate_misfit)
13710 goto out;
13711
13712 /* tune up the balancing interval */
13713 if ((env.flags & LBF_ALL_PINNED &&
13714 sd->balance_interval < MAX_PINNED_INTERVAL) ||
13715 sd->balance_interval < sd->max_interval)
13716 sd->balance_interval *= 2;
13717 out:
13718 if (need_unlock)
13719 atomic_set_release(&sched_balance_running, 0);
13720
13721 return ld_moved;
13722 }
13723
13724 static inline unsigned long
get_sd_balance_interval(struct sched_domain * sd,int cpu_busy)13725 get_sd_balance_interval(struct sched_domain *sd, int cpu_busy)
13726 {
13727 unsigned long interval = sd->balance_interval;
13728
13729 if (cpu_busy)
13730 interval *= sd->busy_factor;
13731
13732 /* scale ms to jiffies */
13733 interval = msecs_to_jiffies(interval);
13734
13735 /*
13736 * Reduce likelihood of busy balancing at higher domains racing with
13737 * balancing at lower domains by preventing their balancing periods
13738 * from being multiples of each other.
13739 */
13740 if (cpu_busy)
13741 interval -= 1;
13742
13743 interval = clamp(interval, 1UL, max_load_balance_interval);
13744
13745 return interval;
13746 }
13747
13748 static inline void
update_next_balance(struct sched_domain * sd,unsigned long * next_balance)13749 update_next_balance(struct sched_domain *sd, unsigned long *next_balance)
13750 {
13751 unsigned long interval, next;
13752
13753 /* used by idle balance, so cpu_busy = 0 */
13754 interval = get_sd_balance_interval(sd, 0);
13755 next = sd->last_balance + interval;
13756
13757 if (time_after(*next_balance, next))
13758 *next_balance = next;
13759 }
13760
13761 /*
13762 * active_load_balance_cpu_stop is run by the CPU stopper. It pushes
13763 * running tasks off the busiest CPU onto idle CPUs. It requires at
13764 * least 1 task to be running on each physical CPU where possible, and
13765 * avoids physical / logical imbalances.
13766 */
active_load_balance_cpu_stop(void * data)13767 static int active_load_balance_cpu_stop(void *data)
13768 {
13769 struct rq *busiest_rq = data;
13770 int busiest_cpu = cpu_of(busiest_rq);
13771 int target_cpu = busiest_rq->push_cpu;
13772 struct rq *target_rq = cpu_rq(target_cpu);
13773 struct sched_domain *sd;
13774 struct task_struct *p = NULL;
13775 struct rq_flags rf;
13776
13777 rq_lock_irq(busiest_rq, &rf);
13778 /*
13779 * Between queueing the stop-work and running it is a hole in which
13780 * CPUs can become inactive. We should not move tasks from or to
13781 * inactive CPUs.
13782 */
13783 if (!cpu_active(busiest_cpu) || !cpu_active(target_cpu))
13784 goto out_unlock;
13785
13786 /* Make sure the requested CPU hasn't gone down in the meantime: */
13787 if (unlikely(busiest_cpu != smp_processor_id() ||
13788 !busiest_rq->active_balance))
13789 goto out_unlock;
13790
13791 /* Is there any task to move? */
13792 if (busiest_rq->nr_running <= 1)
13793 goto out_unlock;
13794
13795 /*
13796 * This condition is "impossible", if it occurs
13797 * we need to fix it. Originally reported by
13798 * Bjorn Helgaas on a 128-CPU setup.
13799 */
13800 WARN_ON_ONCE(busiest_rq == target_rq);
13801
13802 /* Search for an sd spanning us and the target CPU. */
13803 rcu_read_lock();
13804 for_each_domain(target_cpu, sd) {
13805 if (cpumask_test_cpu(busiest_cpu, sched_domain_span(sd)))
13806 break;
13807 }
13808
13809 if (likely(sd)) {
13810 struct lb_env env = {
13811 .sd = sd,
13812 .dst_cpu = target_cpu,
13813 .dst_rq = target_rq,
13814 .src_cpu = busiest_rq->cpu,
13815 .src_rq = busiest_rq,
13816 .idle = CPU_IDLE,
13817 .flags = LBF_ACTIVE_LB,
13818 };
13819
13820 schedstat_inc(sd->alb_count);
13821 update_rq_clock(busiest_rq);
13822
13823 p = detach_one_task(&env);
13824 if (p) {
13825 schedstat_inc(sd->alb_pushed);
13826 /* Active balancing done, reset the failure counter. */
13827 sd->nr_balance_failed = 0;
13828 } else {
13829 schedstat_inc(sd->alb_failed);
13830 }
13831 }
13832 rcu_read_unlock();
13833 out_unlock:
13834 busiest_rq->active_balance = 0;
13835 rq_unlock(busiest_rq, &rf);
13836
13837 if (p)
13838 attach_one_task(target_rq, p);
13839
13840 local_irq_enable();
13841
13842 return 0;
13843 }
13844
13845 /*
13846 * Scale the max sched_balance_rq interval with the number of CPUs in the system.
13847 * This trades load-balance latency on larger machines for less cross talk.
13848 */
update_max_interval(void)13849 void update_max_interval(void)
13850 {
13851 max_load_balance_interval = HZ*num_online_cpus()/10;
13852 }
13853
update_newidle_stats(struct sched_domain * sd,unsigned int success)13854 static inline void update_newidle_stats(struct sched_domain *sd, unsigned int success)
13855 {
13856 sd->newidle_call++;
13857 sd->newidle_success += success;
13858
13859 if (sd->newidle_call >= 1024) {
13860 u64 now = sched_clock();
13861 s64 delta = now - sd->newidle_stamp;
13862 sd->newidle_stamp = now;
13863 int ratio = 0;
13864
13865 if (delta < 0)
13866 delta = 0;
13867
13868 if (sched_feat(NI_RATE)) {
13869 /*
13870 * ratio delta freq
13871 *
13872 * 1024 - 4 s - 128 Hz
13873 * 512 - 2 s - 256 Hz
13874 * 256 - 1 s - 512 Hz
13875 * 128 - .5 s - 1024 Hz
13876 * 64 - .25 s - 2048 Hz
13877 */
13878 ratio = delta >> 22;
13879 }
13880
13881 ratio += sd->newidle_success;
13882
13883 sd->newidle_ratio = min(1024, ratio);
13884 sd->newidle_call /= 2;
13885 sd->newidle_success /= 2;
13886 }
13887 }
13888
13889 static inline bool
update_newidle_cost(struct sched_domain * sd,u64 cost,unsigned int success)13890 update_newidle_cost(struct sched_domain *sd, u64 cost, unsigned int success)
13891 {
13892 unsigned long next_decay = sd->last_decay_max_lb_cost + HZ;
13893 unsigned long now = jiffies;
13894
13895 if (cost)
13896 update_newidle_stats(sd, success);
13897
13898 if (cost > sd->max_newidle_lb_cost) {
13899 /*
13900 * Track max cost of a domain to make sure to not delay the
13901 * next wakeup on the CPU.
13902 */
13903 sd->max_newidle_lb_cost = cost;
13904 sd->last_decay_max_lb_cost = now;
13905
13906 } else if (time_after(now, next_decay)) {
13907 /*
13908 * Decay the newidle max times by ~1% per second to ensure that
13909 * it is not outdated and the current max cost is actually
13910 * shorter.
13911 */
13912 sd->max_newidle_lb_cost = (sd->max_newidle_lb_cost * 253) / 256;
13913 sd->last_decay_max_lb_cost = now;
13914 return true;
13915 }
13916
13917 return false;
13918 }
13919
13920 /*
13921 * It checks each scheduling domain to see if it is due to be balanced,
13922 * and initiates a balancing operation if so.
13923 *
13924 * Balancing parameters are set up in init_sched_domains.
13925 */
sched_balance_domains(struct rq * rq,enum cpu_idle_type idle)13926 static void sched_balance_domains(struct rq *rq, enum cpu_idle_type idle)
13927 {
13928 int continue_balancing = 1;
13929 int cpu = rq->cpu;
13930 int busy = idle != CPU_IDLE && !sched_idle_rq(rq);
13931 unsigned long interval;
13932 struct sched_domain *sd;
13933 /* Earliest time when we have to do rebalance again */
13934 unsigned long next_balance = jiffies + 60*HZ;
13935 int update_next_balance = 0;
13936 int need_decay = 0;
13937 u64 max_cost = 0;
13938
13939 rcu_read_lock();
13940 for_each_domain(cpu, sd) {
13941 /*
13942 * Decay the newidle max times here because this is a regular
13943 * visit to all the domains.
13944 */
13945 need_decay = update_newidle_cost(sd, 0, 0);
13946 max_cost += sd->max_newidle_lb_cost;
13947
13948 /*
13949 * Stop the load balance at this level. There is another
13950 * CPU in our sched group which is doing load balancing more
13951 * actively.
13952 */
13953 if (!continue_balancing) {
13954 if (need_decay)
13955 continue;
13956 break;
13957 }
13958
13959 interval = get_sd_balance_interval(sd, busy);
13960 if (time_after_eq(jiffies, sd->last_balance + interval)) {
13961 if (sched_balance_rq(cpu, rq, sd, idle, &continue_balancing)) {
13962 /*
13963 * The LBF_DST_PINNED logic could have changed
13964 * env->dst_cpu, so we can't know our idle
13965 * state even if we migrated tasks. Update it.
13966 */
13967 idle = idle_cpu(cpu);
13968 busy = !idle && !sched_idle_rq(rq);
13969 }
13970 sd->last_balance = jiffies;
13971 interval = get_sd_balance_interval(sd, busy);
13972 }
13973 if (time_after(next_balance, sd->last_balance + interval)) {
13974 next_balance = sd->last_balance + interval;
13975 update_next_balance = 1;
13976 }
13977 }
13978 if (need_decay) {
13979 /*
13980 * Ensure the rq-wide value also decays but keep it at a
13981 * reasonable floor to avoid funnies with rq->avg_idle.
13982 */
13983 rq->max_idle_balance_cost =
13984 max((u64)sysctl_sched_migration_cost, max_cost);
13985 }
13986 rcu_read_unlock();
13987
13988 /*
13989 * next_balance will be updated only when there is a need.
13990 * When the cpu is attached to null domain for ex, it will not be
13991 * updated.
13992 */
13993 if (likely(update_next_balance))
13994 rq->next_balance = next_balance;
13995
13996 }
13997
on_null_domain(struct rq * rq)13998 static inline int on_null_domain(struct rq *rq)
13999 {
14000 return unlikely(!rcu_dereference_sched(rq->sd));
14001 }
14002
14003 #ifdef CONFIG_NO_HZ_COMMON
14004 /*
14005 * NOHZ idle load balancing (ILB) details:
14006 *
14007 * - When one of the busy CPUs notices that there may be an idle rebalancing
14008 * needed, they will kick the idle load balancer, which then does idle
14009 * load balancing for all the idle CPUs.
14010 */
find_new_ilb(void)14011 static inline int find_new_ilb(void)
14012 {
14013 struct cpumask *ilb_cpus;
14014 int ilb_cpu, fallback = -1;
14015
14016 lockdep_assert_irqs_disabled();
14017
14018 /*
14019 * Reuse the per-CPU select_rq_mask, which is protected from concurrent
14020 * use on this CPU by having interrupts disabled.
14021 */
14022 ilb_cpus = this_cpu_cpumask_var_ptr(select_rq_mask);
14023 cpumask_and(ilb_cpus, nohz.idle_cpus_mask,
14024 housekeeping_cpumask(HK_TYPE_KERNEL_NOISE));
14025
14026 for_each_cpu(ilb_cpu, ilb_cpus) {
14027 if (!idle_cpu(ilb_cpu)) {
14028 /*
14029 * Once an idle fallback exists, a busy CPU proves that
14030 * this core cannot be fully idle. Skip its siblings.
14031 */
14032 if (sched_smt_active() && fallback >= 0)
14033 cpumask_andnot(ilb_cpus, ilb_cpus, cpu_smt_mask(ilb_cpu));
14034 continue;
14035 }
14036
14037 /*
14038 * Running the idle load balancer on an idle sibling of a busy
14039 * SMT core can reduce the capacity available to its sibling. Prefer
14040 * a CPU whose entire core is idle, but retain the first idle CPU as
14041 * a fallback so idle balancing can still make progress when no fully
14042 * idle core exists.
14043 */
14044 if (sched_smt_active() && !is_core_idle(ilb_cpu)) {
14045 if (fallback < 0)
14046 fallback = ilb_cpu;
14047
14048 /*
14049 * The core is not idle, so there is no need to check
14050 * any of its other SMT siblings.
14051 */
14052 cpumask_andnot(ilb_cpus, ilb_cpus,
14053 cpu_smt_mask(ilb_cpu));
14054 continue;
14055 }
14056
14057 return ilb_cpu;
14058 }
14059
14060 return fallback;
14061 }
14062
14063 /*
14064 * Kick a CPU to do the NOHZ balancing, if it is time for it, via a cross-CPU
14065 * SMP function call (IPI).
14066 *
14067 * Prefer a CPU on a fully idle core in the HK_TYPE_KERNEL_NOISE housekeeping
14068 * set. Fall back to the first idle CPU when no fully idle core exists.
14069 */
kick_ilb(unsigned int flags)14070 static void kick_ilb(unsigned int flags)
14071 {
14072 int ilb_cpu;
14073
14074 /*
14075 * Increase nohz.next_balance only when if full ilb is triggered but
14076 * not if we only update stats.
14077 */
14078 if (flags & NOHZ_BALANCE_KICK)
14079 nohz.next_balance = jiffies+1;
14080
14081 ilb_cpu = find_new_ilb();
14082 if (ilb_cpu < 0)
14083 return;
14084
14085 /*
14086 * Don't bother if no new NOHZ balance work items for ilb_cpu,
14087 * i.e. all bits in flags are already set in ilb_cpu.
14088 */
14089 if ((atomic_read(nohz_flags(ilb_cpu)) & flags) == flags)
14090 return;
14091
14092 /*
14093 * Access to rq::nohz_csd is serialized by NOHZ_KICK_MASK; he who sets
14094 * the first flag owns it; cleared by nohz_csd_func().
14095 */
14096 flags = atomic_fetch_or(flags, nohz_flags(ilb_cpu));
14097 if (flags & NOHZ_KICK_MASK)
14098 return;
14099
14100 /*
14101 * This way we generate an IPI on the target CPU which
14102 * is idle, and the softirq performing NOHZ idle load balancing
14103 * will be run before returning from the IPI.
14104 */
14105 smp_call_function_single_async(ilb_cpu, &cpu_rq(ilb_cpu)->nohz_csd);
14106 }
14107
14108 /*
14109 * Current decision point for kicking the idle load balancer in the presence
14110 * of idle CPUs in the system.
14111 */
nohz_balancer_kick(struct rq * rq)14112 static void nohz_balancer_kick(struct rq *rq)
14113 {
14114 unsigned long now = jiffies;
14115 struct sched_domain_shared *sds;
14116 struct sched_domain *sd;
14117 int nr_busy, i, cpu = rq->cpu;
14118 unsigned int flags = 0;
14119
14120 if (unlikely(rq->idle_balance))
14121 return;
14122
14123 /*
14124 * We may be recently in ticked or tickless idle mode. At the first
14125 * busy tick after returning from idle, we will update the busy stats.
14126 */
14127 nohz_balance_exit_idle(rq);
14128
14129 if (READ_ONCE(nohz.has_blocked_load) &&
14130 time_after(now, READ_ONCE(nohz.next_blocked)))
14131 flags = NOHZ_STATS_KICK;
14132
14133 /*
14134 * Most of the time system is not 100% busy. i.e nohz.nr_cpus > 0
14135 * Skip the read if time is not due.
14136 *
14137 * If none are in tickless mode, there maybe a narrow window
14138 * (28 jiffies, HZ=1000) where flags maybe set and kick_ilb called.
14139 * But idle load balancing is not done as find_new_ilb fails.
14140 * That's very rare. So read nohz.nr_cpus only if time is due.
14141 */
14142 if (time_before(now, nohz.next_balance))
14143 goto out;
14144
14145 /*
14146 * None are in tickless mode and hence no need for NOHZ idle load
14147 * balancing
14148 */
14149 if (unlikely(cpumask_empty(nohz.idle_cpus_mask)))
14150 return;
14151
14152 if (rq->nr_running >= 2) {
14153 flags = NOHZ_STATS_KICK | NOHZ_BALANCE_KICK;
14154 goto out;
14155 }
14156
14157 sd = rcu_dereference_all(rq->sd);
14158 if (sd) {
14159 /*
14160 * If there's a runnable CFS task and the current CPU has reduced
14161 * capacity, kick the ILB to see if there's a better CPU to run on:
14162 */
14163 if (rq->cfs.h_nr_runnable >= 1 && check_cpu_capacity(rq, sd)) {
14164 flags |= NOHZ_STATS_KICK | NOHZ_BALANCE_KICK;
14165 goto out;
14166 }
14167 }
14168
14169 sd = rcu_dereference_all(per_cpu(sd_asym_packing, cpu));
14170 if (sd) {
14171 /*
14172 * When ASYM_PACKING; see if there's a more preferred CPU
14173 * currently idle; in which case, kick the ILB to move tasks
14174 * around.
14175 *
14176 * When balancing between cores, all the SMT siblings of the
14177 * preferred CPU must be idle.
14178 */
14179 for_each_cpu_and(i, sched_domain_span(sd), nohz.idle_cpus_mask) {
14180 if (sched_asym(sd, i, cpu)) {
14181 flags |= NOHZ_STATS_KICK | NOHZ_BALANCE_KICK;
14182 goto out;
14183 }
14184 }
14185 }
14186
14187 sd = rcu_dereference_all(per_cpu(sd_asym_cpucapacity, cpu));
14188 if (sd) {
14189 /*
14190 * When ASYM_CPUCAPACITY; see if there's a higher capacity CPU
14191 * to run the misfit task on.
14192 */
14193 if (check_misfit_status(rq))
14194 flags |= NOHZ_STATS_KICK | NOHZ_BALANCE_KICK;
14195
14196 /*
14197 * For asymmetric systems, we do not want to nicely balance
14198 * cache use, instead we want to embrace asymmetry and only
14199 * ensure tasks have enough CPU capacity.
14200 *
14201 * Skip the LLC logic because it's not relevant in that case.
14202 */
14203 goto out;
14204 }
14205
14206 sds = rcu_dereference_all(per_cpu(sd_balance_shared, cpu));
14207 if (sds) {
14208 /*
14209 * If there is an imbalance between LLC domains (IOW we could
14210 * increase the overall cache utilization), we need a less-loaded LLC
14211 * domain to pull some load from. Likewise, we may need to spread
14212 * load within the current LLC domain (e.g. packed SMT cores but
14213 * other CPUs are idle). We can't really know from here how busy
14214 * the others are - so just get a NOHZ balance going if it looks
14215 * like this LLC domain has tasks we could move.
14216 */
14217 nr_busy = atomic_read(&sds->nr_busy_cpus);
14218 if (nr_busy > 1)
14219 flags |= NOHZ_STATS_KICK | NOHZ_BALANCE_KICK;
14220 }
14221 out:
14222 if (READ_ONCE(nohz.needs_update))
14223 flags |= NOHZ_NEXT_KICK;
14224
14225 if (flags)
14226 kick_ilb(flags);
14227 }
14228
set_cpu_sd_state_busy(int cpu)14229 static void set_cpu_sd_state_busy(int cpu)
14230 {
14231 struct sched_domain *sd;
14232 sd = rcu_dereference_all(per_cpu(sd_llc, cpu));
14233
14234 /*
14235 * sd->nohz_idle only pairs with nr_busy_cpus on sd->shared; if this
14236 * domain has no shared object there is nothing to clear or account.
14237 */
14238 if (!sd || !sd->shared || !sd->nohz_idle)
14239 return;
14240 sd->nohz_idle = 0;
14241
14242 atomic_inc(&sd->shared->nr_busy_cpus);
14243 }
14244
nohz_balance_exit_idle(struct rq * rq)14245 void nohz_balance_exit_idle(struct rq *rq)
14246 {
14247 WARN_ON_ONCE(rq != this_rq());
14248
14249 if (likely(!rq->nohz_tick_stopped))
14250 return;
14251
14252 rq->nohz_tick_stopped = 0;
14253 cpumask_clear_cpu(rq->cpu, nohz.idle_cpus_mask);
14254
14255 set_cpu_sd_state_busy(rq->cpu);
14256 }
14257
set_cpu_sd_state_idle(int cpu)14258 static void set_cpu_sd_state_idle(int cpu)
14259 {
14260 struct sched_domain *sd;
14261 sd = rcu_dereference_all(per_cpu(sd_llc, cpu));
14262
14263 /* See set_cpu_sd_state_busy(): nohz_idle is only used with sd->shared. */
14264 if (!sd || !sd->shared || sd->nohz_idle)
14265 return;
14266 sd->nohz_idle = 1;
14267
14268 atomic_dec(&sd->shared->nr_busy_cpus);
14269 }
14270
14271 /*
14272 * This routine will record that the CPU is going idle with tick stopped.
14273 * This info will be used in performing idle load balancing in the future.
14274 */
nohz_balance_enter_idle(int cpu)14275 void nohz_balance_enter_idle(int cpu)
14276 {
14277 struct rq *rq = cpu_rq(cpu);
14278
14279 WARN_ON_ONCE(cpu != smp_processor_id());
14280
14281 /* If this CPU is going down, then nothing needs to be done: */
14282 if (!cpu_active(cpu))
14283 return;
14284
14285 /*
14286 * Can be set safely without rq->lock held
14287 * If a clear happens, it will have evaluated last additions because
14288 * rq->lock is held during the check and the clear
14289 */
14290 rq->has_blocked_load = 1;
14291
14292 /*
14293 * The tick is still stopped but load could have been added in the
14294 * meantime. We set the nohz.has_blocked_load flag to trig a check of the
14295 * *_avg. The CPU is already part of nohz.idle_cpus_mask so the clear
14296 * of nohz.has_blocked_load can only happen after checking the new load
14297 */
14298 if (rq->nohz_tick_stopped)
14299 goto out;
14300
14301 /* If we're a completely isolated CPU, we don't play: */
14302 if (on_null_domain(rq))
14303 return;
14304
14305 rq->nohz_tick_stopped = 1;
14306
14307 cpumask_set_cpu(cpu, nohz.idle_cpus_mask);
14308
14309 /*
14310 * Ensures that if nohz_idle_balance() fails to observe our
14311 * @idle_cpus_mask store, it must observe the @has_blocked_load
14312 * and @needs_update stores.
14313 */
14314 smp_mb__after_atomic();
14315
14316 set_cpu_sd_state_idle(cpu);
14317
14318 WRITE_ONCE(nohz.needs_update, 1);
14319 out:
14320 /*
14321 * Each time a cpu enter idle, we assume that it has blocked load and
14322 * enable the periodic update of the load of idle CPUs
14323 */
14324 WRITE_ONCE(nohz.has_blocked_load, 1);
14325 }
14326
update_nohz_stats(struct rq * rq)14327 static bool update_nohz_stats(struct rq *rq)
14328 {
14329 unsigned int cpu = rq->cpu;
14330
14331 if (!rq->has_blocked_load)
14332 return false;
14333
14334 if (!cpumask_test_cpu(cpu, nohz.idle_cpus_mask))
14335 return false;
14336
14337 if (!time_after(jiffies, READ_ONCE(rq->last_blocked_load_update_tick)))
14338 return true;
14339
14340 sched_balance_update_blocked_averages(cpu);
14341
14342 return rq->has_blocked_load;
14343 }
14344
14345 /*
14346 * Internal function that runs load balance for all idle CPUs. The load balance
14347 * can be a simple update of blocked load or a complete load balance with
14348 * tasks movement depending of flags.
14349 */
_nohz_idle_balance(struct rq * this_rq,unsigned int flags)14350 static void _nohz_idle_balance(struct rq *this_rq, unsigned int flags)
14351 {
14352 /* Earliest time when we have to do rebalance again */
14353 unsigned long now = jiffies;
14354 unsigned long next_balance = now + 60*HZ;
14355 bool has_blocked_load = false;
14356 int update_next_balance = 0;
14357 int this_cpu = this_rq->cpu;
14358 int balance_cpu;
14359 struct rq *rq;
14360
14361 WARN_ON_ONCE((flags & NOHZ_KICK_MASK) == NOHZ_BALANCE_KICK);
14362
14363 /*
14364 * We assume there will be no idle load after this update and clear
14365 * the has_blocked_load flag. If a cpu enters idle in the mean time, it will
14366 * set the has_blocked_load flag and trigger another update of idle load.
14367 * Because a cpu that becomes idle, is added to idle_cpus_mask before
14368 * setting the flag, we are sure to not clear the state and not
14369 * check the load of an idle cpu.
14370 *
14371 * Same applies to idle_cpus_mask vs needs_update.
14372 */
14373 if (flags & NOHZ_STATS_KICK)
14374 WRITE_ONCE(nohz.has_blocked_load, 0);
14375 if (flags & NOHZ_NEXT_KICK)
14376 WRITE_ONCE(nohz.needs_update, 0);
14377
14378 /*
14379 * Ensures that if we miss the CPU, we must see the has_blocked_load
14380 * store from nohz_balance_enter_idle().
14381 */
14382 smp_mb();
14383
14384 /*
14385 * Start with the next CPU after this_cpu so we will end with this_cpu and let a
14386 * chance for other idle cpu to pull load.
14387 */
14388 for_each_cpu_wrap(balance_cpu, nohz.idle_cpus_mask, this_cpu+1) {
14389 if (!idle_cpu(balance_cpu))
14390 continue;
14391
14392 /*
14393 * If this CPU gets work to do, stop the load balancing
14394 * work being done for other CPUs. Next load
14395 * balancing owner will pick it up.
14396 */
14397 if (!idle_cpu(this_cpu) && need_resched()) {
14398 if (flags & NOHZ_STATS_KICK)
14399 has_blocked_load = true;
14400 if (flags & NOHZ_NEXT_KICK)
14401 WRITE_ONCE(nohz.needs_update, 1);
14402 goto abort;
14403 }
14404
14405 rq = cpu_rq(balance_cpu);
14406
14407 if (flags & NOHZ_STATS_KICK)
14408 has_blocked_load |= update_nohz_stats(rq);
14409
14410 /*
14411 * If time for next balance is due,
14412 * do the balance.
14413 */
14414 if (time_after_eq(jiffies, rq->next_balance)) {
14415 struct rq_flags rf;
14416
14417 rq_lock_irqsave(rq, &rf);
14418 update_rq_clock(rq);
14419 rq_unlock_irqrestore(rq, &rf);
14420
14421 if (flags & NOHZ_BALANCE_KICK)
14422 sched_balance_domains(rq, CPU_IDLE);
14423 }
14424
14425 if (time_after(next_balance, rq->next_balance)) {
14426 next_balance = rq->next_balance;
14427 update_next_balance = 1;
14428 }
14429 }
14430
14431 /*
14432 * next_balance will be updated only when there is a need.
14433 * When the CPU is attached to null domain for ex, it will not be
14434 * updated.
14435 */
14436 if (likely(update_next_balance))
14437 nohz.next_balance = next_balance;
14438
14439 if (flags & NOHZ_STATS_KICK)
14440 WRITE_ONCE(nohz.next_blocked,
14441 now + msecs_to_jiffies(LOAD_AVG_PERIOD));
14442
14443 abort:
14444 /* There is still blocked load, enable periodic update */
14445 if (has_blocked_load)
14446 WRITE_ONCE(nohz.has_blocked_load, 1);
14447 }
14448
14449 /*
14450 * In CONFIG_NO_HZ_COMMON case, the idle balance kickee will do the
14451 * rebalancing for all the CPUs for whom scheduler ticks are stopped.
14452 */
nohz_idle_balance(struct rq * this_rq,enum cpu_idle_type idle)14453 static bool nohz_idle_balance(struct rq *this_rq, enum cpu_idle_type idle)
14454 {
14455 unsigned int flags = this_rq->nohz_idle_balance;
14456
14457 if (!flags)
14458 return false;
14459
14460 this_rq->nohz_idle_balance = 0;
14461
14462 if (idle != CPU_IDLE)
14463 return false;
14464
14465 _nohz_idle_balance(this_rq, flags);
14466
14467 return true;
14468 }
14469
14470 /*
14471 * Check if we need to directly run the ILB for updating blocked load before
14472 * entering idle state. Here we run ILB directly without issuing IPIs.
14473 *
14474 * Note that when this function is called, the tick may not yet be stopped on
14475 * this CPU yet. nohz.idle_cpus_mask is updated only when tick is stopped and
14476 * cleared on the next busy tick. In other words, nohz.idle_cpus_mask updates
14477 * don't align with CPUs enter/exit idle to avoid bottlenecks due to high idle
14478 * entry/exit rate (usec). So it is possible that _nohz_idle_balance() is
14479 * called from this function on (this) CPU that's not yet in the mask. That's
14480 * OK because the goal of nohz_run_idle_balance() is to run ILB only for
14481 * updating the blocked load of already idle CPUs without waking up one of
14482 * those idle CPUs and outside the preempt disable / IRQ off phase of the local
14483 * cpu about to enter idle, because it can take a long time.
14484 */
nohz_run_idle_balance(int cpu)14485 void nohz_run_idle_balance(int cpu)
14486 {
14487 unsigned int flags;
14488
14489 flags = atomic_fetch_andnot(NOHZ_NEWILB_KICK, nohz_flags(cpu));
14490
14491 /*
14492 * Update the blocked load only if no SCHED_SOFTIRQ is about to happen
14493 * (i.e. NOHZ_STATS_KICK set) and will do the same.
14494 */
14495 if ((flags == NOHZ_NEWILB_KICK) && !need_resched())
14496 _nohz_idle_balance(cpu_rq(cpu), NOHZ_STATS_KICK);
14497 }
14498
nohz_newidle_balance(struct rq * this_rq)14499 static void nohz_newidle_balance(struct rq *this_rq)
14500 {
14501 int this_cpu = this_rq->cpu;
14502
14503 /* Will wake up very soon. No time for doing anything else*/
14504 if (this_rq->avg_idle < sysctl_sched_migration_cost)
14505 return;
14506
14507 /* Don't need to update blocked load of idle CPUs*/
14508 if (!READ_ONCE(nohz.has_blocked_load) ||
14509 time_before(jiffies, READ_ONCE(nohz.next_blocked)))
14510 return;
14511
14512 /*
14513 * Set the need to trigger ILB in order to update blocked load
14514 * before entering idle state.
14515 */
14516 atomic_or(NOHZ_NEWILB_KICK, nohz_flags(this_cpu));
14517 }
14518
14519 #else /* !CONFIG_NO_HZ_COMMON: */
nohz_balancer_kick(struct rq * rq)14520 static inline void nohz_balancer_kick(struct rq *rq) { }
14521
nohz_idle_balance(struct rq * this_rq,enum cpu_idle_type idle)14522 static inline bool nohz_idle_balance(struct rq *this_rq, enum cpu_idle_type idle)
14523 {
14524 return false;
14525 }
14526
nohz_newidle_balance(struct rq * this_rq)14527 static inline void nohz_newidle_balance(struct rq *this_rq) { }
14528 #endif /* !CONFIG_NO_HZ_COMMON */
14529
14530 /*
14531 * sched_balance_newidle is called by schedule() if this_cpu is about to become
14532 * idle. Attempts to pull tasks from other CPUs.
14533 *
14534 * Returns:
14535 * < 0 - we released the lock and there are !fair tasks present
14536 * 0 - failed, no new tasks
14537 * > 0 - success, new (fair) tasks present
14538 */
sched_balance_newidle(struct rq * this_rq,struct rq_flags * rf)14539 static int sched_balance_newidle(struct rq *this_rq, struct rq_flags *rf)
14540 __must_hold(__rq_lockp(this_rq))
14541 {
14542 unsigned long next_balance = jiffies + HZ;
14543 int this_cpu = this_rq->cpu;
14544 int continue_balancing = 1;
14545 u64 t0, t1, curr_cost = 0;
14546 struct sched_domain *sd;
14547 int pulled_task = 0;
14548
14549 update_misfit_status(NULL, this_rq);
14550
14551 /*
14552 * There is a task waiting to run. No need to search for one.
14553 * Return 0; the task will be enqueued when switching to idle.
14554 */
14555 if (this_rq->ttwu_pending)
14556 return 0;
14557
14558 /*
14559 * We must set idle_stamp _before_ calling sched_balance_rq()
14560 * for CPU_NEWLY_IDLE, such that we measure the this duration
14561 * as idle time.
14562 */
14563 this_rq->idle_stamp = rq_clock(this_rq);
14564
14565 /*
14566 * Do not pull tasks towards !active CPUs...
14567 */
14568 if (!cpu_active(this_cpu))
14569 return 0;
14570
14571 /*
14572 * This is OK, because current is on_cpu, which avoids it being picked
14573 * for load-balance and preemption/IRQs are still disabled avoiding
14574 * further scheduler activity on it and we're being very careful to
14575 * re-start the picking loop.
14576 */
14577 rq_unpin_lock(this_rq, rf);
14578
14579 sd = rcu_dereference_sched_domain(this_rq->sd);
14580 if (!sd)
14581 goto out;
14582
14583 if (!get_rd_overloaded(this_rq->rd) ||
14584 this_rq->avg_idle < sd->max_newidle_lb_cost) {
14585
14586 update_next_balance(sd, &next_balance);
14587 goto out;
14588 }
14589
14590 /*
14591 * Include sched_balance_update_blocked_averages() in the cost
14592 * calculation because it can be quite costly -- this ensures we skip
14593 * it when avg_idle gets to be very low.
14594 */
14595 t0 = sched_clock_cpu(this_cpu);
14596 __sched_balance_update_blocked_averages(this_rq);
14597
14598 rq_modified_begin(this_rq, &fair_sched_class);
14599 raw_spin_rq_unlock(this_rq);
14600
14601 for_each_domain(this_cpu, sd) {
14602 u64 domain_cost;
14603
14604 update_next_balance(sd, &next_balance);
14605
14606 if (this_rq->avg_idle < curr_cost + sd->max_newidle_lb_cost)
14607 break;
14608
14609 if (sd->flags & SD_BALANCE_NEWIDLE) {
14610 unsigned int weight = 1;
14611
14612 if (sched_feat(NI_RANDOM) && sd->newidle_ratio < 1024) {
14613 /*
14614 * Throw a 1k sided dice; and only run
14615 * newidle_balance according to the success
14616 * rate.
14617 */
14618 u32 d1k = sched_rng() % 1024;
14619 weight = 1 + sd->newidle_ratio;
14620 if (d1k > weight) {
14621 update_newidle_stats(sd, 0);
14622 continue;
14623 }
14624 weight = (1024 + weight/2) / weight;
14625 }
14626
14627 pulled_task = sched_balance_rq(this_cpu, this_rq,
14628 sd, CPU_NEWLY_IDLE,
14629 &continue_balancing);
14630
14631 t1 = sched_clock_cpu(this_cpu);
14632 domain_cost = t1 - t0;
14633 curr_cost += domain_cost;
14634 t0 = t1;
14635
14636 /*
14637 * Track max cost of a domain to make sure to not delay the
14638 * next wakeup on the CPU.
14639 */
14640 update_newidle_cost(sd, domain_cost, weight * !!pulled_task);
14641 }
14642
14643 /*
14644 * Stop searching for tasks to pull if there are
14645 * now runnable tasks on this rq.
14646 */
14647 if (pulled_task || !continue_balancing)
14648 break;
14649 }
14650
14651 raw_spin_rq_lock(this_rq);
14652
14653 if (curr_cost > this_rq->max_idle_balance_cost)
14654 this_rq->max_idle_balance_cost = curr_cost;
14655
14656 /*
14657 * While browsing the domains, we released the rq lock, a task could
14658 * have been enqueued in the meantime. Since we're not going idle,
14659 * pretend we pulled a task.
14660 */
14661 if (this_rq->cfs.h_nr_queued && !pulled_task)
14662 pulled_task = 1;
14663
14664 /* If a higher prio class was modified, restart the pick */
14665 if (rq_modified_above(this_rq, &fair_sched_class))
14666 pulled_task = -1;
14667
14668 out:
14669 /* Move the next balance forward */
14670 if (time_after(this_rq->next_balance, next_balance))
14671 this_rq->next_balance = next_balance;
14672
14673 if (pulled_task)
14674 this_rq->idle_stamp = 0;
14675 else
14676 nohz_newidle_balance(this_rq);
14677
14678 rq_repin_lock(this_rq, rf);
14679
14680 return pulled_task;
14681 }
14682
14683 /*
14684 * This softirq handler is triggered via SCHED_SOFTIRQ from two places:
14685 *
14686 * - directly from the local sched_tick() for periodic load balancing
14687 *
14688 * - indirectly from a remote sched_tick() for NOHZ idle balancing
14689 * through the SMP cross-call nohz_csd_func()
14690 */
sched_balance_softirq(void)14691 static __latent_entropy void sched_balance_softirq(void)
14692 {
14693 struct rq *this_rq = this_rq();
14694 enum cpu_idle_type idle = this_rq->idle_balance;
14695 /*
14696 * If this CPU has a pending NOHZ_BALANCE_KICK, then do the
14697 * balancing on behalf of the other idle CPUs whose ticks are
14698 * stopped. Do nohz_idle_balance *before* sched_balance_domains to
14699 * give the idle CPUs a chance to load balance. Else we may
14700 * load balance only within the local sched_domain hierarchy
14701 * and abort nohz_idle_balance altogether if we pull some load.
14702 */
14703 if (nohz_idle_balance(this_rq, idle))
14704 return;
14705
14706 /* normal load balance */
14707 sched_balance_update_blocked_averages(this_rq->cpu);
14708 sched_balance_domains(this_rq, idle);
14709 }
14710
14711 /*
14712 * Trigger the SCHED_SOFTIRQ if it is time to do periodic load balancing.
14713 */
sched_balance_trigger(struct rq * rq)14714 void sched_balance_trigger(struct rq *rq)
14715 {
14716 /*
14717 * Don't need to rebalance while attached to NULL domain or
14718 * runqueue CPU is not active
14719 */
14720 if (unlikely(on_null_domain(rq) || !cpu_active(cpu_of(rq))))
14721 return;
14722
14723 if (time_after_eq(jiffies, rq->next_balance))
14724 raise_softirq(SCHED_SOFTIRQ);
14725
14726 nohz_balancer_kick(rq);
14727 }
14728
rq_online_fair(struct rq * rq)14729 static void rq_online_fair(struct rq *rq)
14730 {
14731 update_sysctl();
14732
14733 update_runtime_enabled(rq);
14734 }
14735
rq_offline_fair(struct rq * rq)14736 static void rq_offline_fair(struct rq *rq)
14737 {
14738 update_sysctl();
14739
14740 /* Ensure any throttled groups are reachable by pick_next_task */
14741 unthrottle_offline_cfs_rqs(rq);
14742
14743 /* Ensure that we remove rq contribution to group share: */
14744 clear_tg_offline_cfs_rqs(rq);
14745 }
14746
14747 #ifdef CONFIG_SCHED_CORE
14748 static inline bool
__entity_slice_used(struct sched_entity * se,int min_nr_tasks)14749 __entity_slice_used(struct sched_entity *se, int min_nr_tasks)
14750 {
14751 u64 rtime = se->sum_exec_runtime - se->prev_sum_exec_runtime;
14752 u64 slice = se->slice;
14753
14754 return (rtime * min_nr_tasks > slice);
14755 }
14756
14757 #define MIN_NR_TASKS_DURING_FORCEIDLE 2
task_tick_core(struct rq * rq,struct task_struct * curr)14758 static inline void task_tick_core(struct rq *rq, struct task_struct *curr)
14759 {
14760 if (!sched_core_enabled(rq))
14761 return;
14762
14763 /*
14764 * If runqueue has only one task which used up its slice and
14765 * if the sibling is forced idle, then trigger schedule to
14766 * give forced idle task a chance.
14767 *
14768 * __entity_slice_used() considers only this active rq and it gets the
14769 * whole slice. But during force idle, we have siblings acting
14770 * like a single runqueue and hence we need to consider runnable
14771 * tasks on this CPU and the forced idle CPU. Ideally, we should
14772 * go through the forced idle rq, but that would be a perf hit.
14773 * We can assume that the forced idle CPU has at least
14774 * MIN_NR_TASKS_DURING_FORCEIDLE - 1 tasks and use that to check
14775 * if we need to give up the CPU.
14776 */
14777 if (rq->core->core_forceidle_count && rq->cfs.h_nr_queued == 1 &&
14778 __entity_slice_used(&curr->se, MIN_NR_TASKS_DURING_FORCEIDLE))
14779 resched_curr(rq);
14780 }
14781
14782 /*
14783 * Consider any infeasible weight scenario. Take for instance two tasks,
14784 * each bound to their respective sibling, one with weight 1 and one with
14785 * weight 2. Then the lower weight task will run ahead of the higher weight
14786 * task without bound.
14787 *
14788 * This utterly destroys the concept of a shared time base.
14789 *
14790 * Remember; all this is about a proportionally fair scheduling, where each
14791 * tasks receives:
14792 *
14793 * w_i
14794 * dt_i = ---------- dt (1)
14795 * \Sum_j w_j
14796 *
14797 * which we do by tracking a virtual time, s_i:
14798 *
14799 * 1
14800 * s_i = --- d[t]_i (2)
14801 * w_i
14802 *
14803 * Where d[t] is a delta of discrete time, while dt is an infinitesimal.
14804 * The immediate corollary is that the ideal schedule S, where (2) to use
14805 * an infinitesimal delta, is:
14806 *
14807 * 1
14808 * S = ---------- dt (3)
14809 * \Sum_i w_i
14810 *
14811 * From which we can define the lag, or deviation from the ideal, as:
14812 *
14813 * lag(i) = S - s_i (4)
14814 *
14815 * And since the one and only purpose is to approximate S, we get that:
14816 *
14817 * \Sum_i w_i lag(i) := 0 (5)
14818 *
14819 * If this were not so, we no longer converge to S, and we can no longer
14820 * claim our scheduler has any of the properties we derive from S. This is
14821 * exactly what you did above, you broke it!
14822 *
14823 *
14824 * Let's continue for a while though; to see if there is anything useful to
14825 * be learned. We can combine (1)-(3) or (4)-(5) and express S in s_i:
14826 *
14827 * \Sum_i w_i s_i
14828 * S = -------------- (6)
14829 * \Sum_i w_i
14830 *
14831 * Which gives us a way to compute S, given our s_i. Now, if you've read
14832 * our code, you know that we do not in fact do this, the reason for this
14833 * is two-fold. Firstly, computing S in that way requires a 64bit division
14834 * for every time we'd use it (see 12), and secondly, this only describes
14835 * the steady-state, it doesn't handle dynamics.
14836 *
14837 * Anyway, in (6): s_i -> x + (s_i - x), to get:
14838 *
14839 * \Sum_i w_i (s_i - x)
14840 * S - x = -------------------- (7)
14841 * \Sum_i w_i
14842 *
14843 * Which shows that S and s_i transform alike (which makes perfect sense
14844 * given that S is basically the (weighted) average of s_i).
14845 *
14846 * So the thing to remember is that the above is strictly UP. It is
14847 * possible to generalize to multiple runqueues -- however it gets really
14848 * yuck when you have to add affinity support, as illustrated by our very
14849 * first counter-example.
14850 *
14851 * Luckily I think we can avoid needing a full multi-queue variant for
14852 * core-scheduling (or load-balancing). The crucial observation is that we
14853 * only actually need this comparison in the presence of forced-idle; only
14854 * then do we need to tell if the stalled rq has higher priority over the
14855 * other.
14856 *
14857 * [XXX assumes SMT2; better consider the more general case, I suspect
14858 * it'll work out because our comparison is always between 2 rqs and the
14859 * answer is only interesting if one of them is forced-idle]
14860 *
14861 * And (under assumption of SMT2) when there is forced-idle, there is only
14862 * a single queue, so everything works like normal.
14863 *
14864 * Let, for our runqueue 'k':
14865 *
14866 * T_k = \Sum_i w_i s_i
14867 * W_k = \Sum_i w_i ; for all i of k (8)
14868 *
14869 * Then we can write (6) like:
14870 *
14871 * T_k
14872 * S_k = --- (9)
14873 * W_k
14874 *
14875 * From which immediately follows that:
14876 *
14877 * T_k + T_l
14878 * S_k+l = --------- (10)
14879 * W_k + W_l
14880 *
14881 * On which we can define a combined lag:
14882 *
14883 * lag_k+l(i) := S_k+l - s_i (11)
14884 *
14885 * And that gives us the tools to compare tasks across a combined runqueue.
14886 *
14887 *
14888 * Combined this gives the following:
14889 *
14890 * a) when a runqueue enters force-idle, sync it against it's sibling rq(s)
14891 * using (7); this only requires storing single 'time'-stamps.
14892 *
14893 * b) when comparing tasks between 2 runqueues of which one is forced-idle,
14894 * compare the combined lag, per (11).
14895 *
14896 * Now, of course cgroups (I so hate them) make this more interesting in
14897 * that a) seems to suggest we need to iterate all cgroup on a CPU at such
14898 * boundaries, but I think we can avoid that. The force-idle is for the
14899 * whole CPU, all it's rqs. So we can mark it in the root and lazily
14900 * propagate downward on demand.
14901 */
14902
14903 /*
14904 * So this sync is basically a relative reset of S to 0.
14905 *
14906 * So with 2 queues, when one goes idle, we drop them both to 0 and one
14907 * then increases due to not being idle, and the idle one builds up lag to
14908 * get re-elected. So far so simple, right?
14909 *
14910 * When there's 3, we can have the situation where 2 run and one is idle,
14911 * we sync to 0 and let the idle one build up lag to get re-election. Now
14912 * suppose another one also drops idle. At this point dropping all to 0
14913 * again would destroy the built-up lag from the queue that was already
14914 * idle, not good.
14915 *
14916 * So instead of syncing everything, we can:
14917 *
14918 * less := !((s64)(s_a - s_b) <= 0)
14919 *
14920 * (v_a - S_a) - (v_b - S_b) == v_a - v_b - S_a + S_b
14921 * == v_a - (v_b - S_a + S_b)
14922 *
14923 * IOW, we can recast the (lag) comparison to a one-sided difference.
14924 * So if then, instead of syncing the whole queue, sync the idle queue
14925 * against the active queue with S_a + S_b at the point where we sync.
14926 *
14927 * (XXX consider the implication of living in a cyclic group: N / 2^n N)
14928 *
14929 * This gives us means of syncing single queues against the active queue,
14930 * and for already idle queues to preserve their build-up lag.
14931 *
14932 * Of course, then we get the situation where there's 2 active and one
14933 * going idle, who do we pick to sync against? Theory would have us sync
14934 * against the combined S, but as we've already demonstrated, there is no
14935 * such thing in infeasible weight scenarios.
14936 *
14937 * One thing I've considered; and this is where that core_active rudiment
14938 * came from, is having active queues sync up between themselves after
14939 * every tick. This limits the observed divergence due to the work
14940 * conservancy.
14941 *
14942 * On top of that, we can improve upon things by employing (10) here.
14943 */
14944
14945 /*
14946 * se_fi_update - Update the cfs_rq->zero_vruntime_fi in a CFS hierarchy if needed.
14947 */
se_fi_update(const struct sched_entity * se,unsigned int fi_seq,bool forceidle)14948 static void se_fi_update(const struct sched_entity *se, unsigned int fi_seq,
14949 bool forceidle)
14950 {
14951 for_each_sched_entity(se) {
14952 struct cfs_rq *cfs_rq = cfs_rq_of(se);
14953
14954 if (forceidle) {
14955 if (cfs_rq->forceidle_seq == fi_seq)
14956 break;
14957 cfs_rq->forceidle_seq = fi_seq;
14958 }
14959
14960 cfs_rq->zero_vruntime_fi = cfs_rq->zero_vruntime;
14961 }
14962 }
14963
task_vruntime_update(struct rq * rq,struct task_struct * p,bool in_fi)14964 void task_vruntime_update(struct rq *rq, struct task_struct *p, bool in_fi)
14965 {
14966 struct sched_entity *se = &p->se;
14967
14968 if (p->sched_class != &fair_sched_class)
14969 return;
14970
14971 se_fi_update(se, rq->core->core_forceidle_seq, in_fi);
14972 }
14973
cfs_prio_less(const struct task_struct * a,const struct task_struct * b,bool in_fi)14974 bool cfs_prio_less(const struct task_struct *a, const struct task_struct *b,
14975 bool in_fi)
14976 {
14977 struct rq *rq = task_rq(a);
14978 const struct sched_entity *sea = &a->se;
14979 const struct sched_entity *seb = &b->se;
14980 struct cfs_rq *cfs_rqa;
14981 struct cfs_rq *cfs_rqb;
14982 s64 delta;
14983
14984 WARN_ON_ONCE(task_rq(b)->core != rq->core);
14985
14986 cfs_rqa = &task_rq(a)->cfs;
14987 cfs_rqb = &task_rq(b)->cfs;
14988
14989 /*
14990 * Find delta after normalizing se's vruntime with its cfs_rq's
14991 * zero_vruntime_fi, which would have been updated in prior calls
14992 * to se_fi_update().
14993 */
14994 delta = vruntime_op(sea->vruntime, "-", seb->vruntime) +
14995 vruntime_op(cfs_rqb->zero_vruntime_fi, "-", cfs_rqa->zero_vruntime_fi);
14996
14997 return delta > 0;
14998 }
14999
task_is_throttled_fair(struct task_struct * p,int cpu)15000 static int task_is_throttled_fair(struct task_struct *p, int cpu)
15001 {
15002 struct cfs_rq *cfs_rq;
15003
15004 #ifdef CONFIG_FAIR_GROUP_SCHED
15005 cfs_rq = tg_cfs_rq(task_group(p), cpu);
15006 #else
15007 cfs_rq = &cpu_rq(cpu)->cfs;
15008 #endif
15009 return throttled_hierarchy(cfs_rq);
15010 }
15011 #else /* !CONFIG_SCHED_CORE: */
task_tick_core(struct rq * rq,struct task_struct * curr)15012 static inline void task_tick_core(struct rq *rq, struct task_struct *curr) {}
15013 #endif /* !CONFIG_SCHED_CORE */
15014
15015 /*
15016 * scheduler tick hitting a task of our scheduling class.
15017 *
15018 * NOTE: This function can be called remotely by the tick offload that
15019 * goes along full dynticks. Therefore no local assumption can be made
15020 * and everything must be accessed through the @rq and @curr passed in
15021 * parameters.
15022 */
task_tick_fair(struct rq * rq,struct task_struct * curr,int queued)15023 static void task_tick_fair(struct rq *rq, struct task_struct *curr, int queued)
15024 {
15025 struct sched_entity *se = &curr->se;
15026
15027 if (se->on_rq) {
15028 unsigned long weight = NICE_0_LOAD;
15029 struct cfs_rq *cfs_rq;
15030
15031 for_each_sched_entity(se) {
15032 cfs_rq = cfs_rq_of(se);
15033 entity_tick(cfs_rq, se, queued);
15034
15035 weight = __calc_prop_weight(cfs_rq, se, weight);
15036 }
15037
15038 se = &curr->se;
15039 reweight_eevdf(cfs_rq, se, weight, se->on_rq);
15040 }
15041
15042 if (queued)
15043 return;
15044
15045 if (static_branch_unlikely(&sched_numa_balancing))
15046 task_tick_numa(rq, curr);
15047
15048 task_tick_cache(rq, curr);
15049
15050 update_misfit_status(curr, rq);
15051 check_update_overutilized_status(task_rq(curr));
15052
15053 task_tick_core(rq, curr);
15054 }
15055
15056 /*
15057 * called on fork with the child task as argument from the parent's context
15058 * - child not yet on the tasklist
15059 * - preemption disabled
15060 */
task_fork_fair(struct task_struct * p)15061 static void task_fork_fair(struct task_struct *p)
15062 {
15063 set_task_max_allowed_capacity(p);
15064 }
15065
15066 /*
15067 * Priority of the task has changed. Check to see if we preempt
15068 * the current task.
15069 */
15070 static void
prio_changed_fair(struct rq * rq,struct task_struct * p,u64 oldprio)15071 prio_changed_fair(struct rq *rq, struct task_struct *p, u64 oldprio)
15072 {
15073 if (!task_on_rq_queued(p))
15074 return;
15075
15076 if (p->prio == oldprio)
15077 return;
15078
15079 if (rq->cfs.h_nr_queued == 1)
15080 return;
15081
15082 /*
15083 * Reschedule if we are currently running on this runqueue and
15084 * our priority decreased, or if we are not currently running on
15085 * this runqueue and our priority is higher than the current's
15086 */
15087 if (task_current_donor(rq, p)) {
15088 if (p->prio > oldprio)
15089 resched_curr(rq);
15090 } else {
15091 wakeup_preempt(rq, p, 0);
15092 }
15093 }
15094
15095 #ifdef CONFIG_FAIR_GROUP_SCHED
15096 /*
15097 * Propagate the changes of the sched_entity across the tg tree to make it
15098 * visible to the root
15099 */
propagate_entity_cfs_rq(struct sched_entity * se)15100 static void propagate_entity_cfs_rq(struct sched_entity *se)
15101 {
15102 struct cfs_rq *cfs_rq = cfs_rq_of(se);
15103
15104 /*
15105 * If a task gets attached to this cfs_rq and before being queued,
15106 * it gets migrated to another CPU due to reasons like affinity
15107 * change, make sure this cfs_rq stays on leaf cfs_rq list to have
15108 * that removed load decayed or it can cause faireness problem.
15109 */
15110 if (!cfs_rq_pelt_clock_throttled(cfs_rq))
15111 list_add_leaf_cfs_rq(cfs_rq);
15112
15113 /* Start to propagate at parent */
15114 se = se->parent;
15115
15116 for_each_sched_entity(se) {
15117 cfs_rq = cfs_rq_of(se);
15118
15119 update_load_avg(cfs_rq, se, UPDATE_TG);
15120
15121 if (!cfs_rq_pelt_clock_throttled(cfs_rq))
15122 list_add_leaf_cfs_rq(cfs_rq);
15123 }
15124
15125 assert_list_leaf_cfs_rq(rq_of(cfs_rq));
15126 }
15127 #else /* !CONFIG_FAIR_GROUP_SCHED: */
propagate_entity_cfs_rq(struct sched_entity * se)15128 static void propagate_entity_cfs_rq(struct sched_entity *se) { }
15129 #endif /* !CONFIG_FAIR_GROUP_SCHED */
15130
detach_entity_cfs_rq(struct sched_entity * se)15131 static void detach_entity_cfs_rq(struct sched_entity *se)
15132 {
15133 struct cfs_rq *cfs_rq = cfs_rq_of(se);
15134
15135 /*
15136 * In case the task sched_avg hasn't been attached:
15137 * - A forked task which hasn't been woken up by wake_up_new_task().
15138 * - A task which has been woken up by try_to_wake_up() but is
15139 * waiting for actually being woken up by sched_ttwu_pending().
15140 */
15141 if (!se->avg.last_update_time)
15142 return;
15143
15144 /* Catch up with the cfs_rq and remove our load when we leave */
15145 update_load_avg(cfs_rq, se, 0);
15146 detach_entity_load_avg(cfs_rq, se);
15147 update_tg_load_avg(cfs_rq);
15148 propagate_entity_cfs_rq(se);
15149 }
15150
attach_entity_cfs_rq(struct sched_entity * se)15151 static void attach_entity_cfs_rq(struct sched_entity *se)
15152 {
15153 struct cfs_rq *cfs_rq = cfs_rq_of(se);
15154
15155 /* Synchronize entity with its cfs_rq */
15156 update_load_avg(cfs_rq, se, sched_feat(ATTACH_AGE_LOAD) ? 0 : SKIP_AGE_LOAD);
15157 attach_entity_load_avg(cfs_rq, se);
15158 update_tg_load_avg(cfs_rq);
15159 propagate_entity_cfs_rq(se);
15160 }
15161
detach_task_cfs_rq(struct task_struct * p)15162 static void detach_task_cfs_rq(struct task_struct *p)
15163 {
15164 struct sched_entity *se = &p->se;
15165
15166 detach_entity_cfs_rq(se);
15167 }
15168
attach_task_cfs_rq(struct task_struct * p)15169 static void attach_task_cfs_rq(struct task_struct *p)
15170 {
15171 struct sched_entity *se = &p->se;
15172
15173 attach_entity_cfs_rq(se);
15174 }
15175
switching_from_fair(struct rq * rq,struct task_struct * p)15176 static void switching_from_fair(struct rq *rq, struct task_struct *p)
15177 {
15178 if (p->se.sched_delayed)
15179 dequeue_task(rq, p, DEQUEUE_SLEEP | DEQUEUE_DELAYED | DEQUEUE_NOCLOCK);
15180 }
15181
switched_from_fair(struct rq * rq,struct task_struct * p)15182 static void switched_from_fair(struct rq *rq, struct task_struct *p)
15183 {
15184 detach_task_cfs_rq(p);
15185 }
15186
switched_to_fair(struct rq * rq,struct task_struct * p)15187 static void switched_to_fair(struct rq *rq, struct task_struct *p)
15188 {
15189 WARN_ON_ONCE(p->se.sched_delayed);
15190
15191 attach_task_cfs_rq(p);
15192
15193 set_task_max_allowed_capacity(p);
15194
15195 if (task_on_rq_queued(p)) {
15196 /*
15197 * We were most likely switched from sched_rt, so
15198 * kick off the schedule if running, otherwise just see
15199 * if we can still preempt the current task.
15200 */
15201 if (task_current_donor(rq, p))
15202 resched_curr(rq);
15203 else
15204 wakeup_preempt(rq, p, 0);
15205 }
15206 }
15207
set_next_task_fair(struct rq * rq,struct task_struct * p,bool first)15208 static void set_next_task_fair(struct rq *rq, struct task_struct *p, bool first)
15209 {
15210 struct sched_entity *se = &p->se;
15211 bool throttled = false;
15212 struct cfs_rq *cfs_rq = &rq->cfs;
15213 unsigned long weight = NICE_0_LOAD;
15214 bool on_rq = se->on_rq;
15215
15216 clear_buddies(cfs_rq, se);
15217
15218 if (on_rq)
15219 __dequeue_entity(cfs_rq, se);
15220
15221 for_each_sched_entity(se) {
15222 cfs_rq = cfs_rq_of(se);
15223
15224 if (!IS_ENABLED(CONFIG_FAIR_GROUP_SCHED) ||
15225 !first || !cfs_rq->h_curr)
15226 set_next_entity(cfs_rq, se);
15227
15228 /* ensure bandwidth has been allocated on our new cfs_rq */
15229 throttled |= account_cfs_rq_runtime(cfs_rq, 0);
15230
15231 if (on_rq)
15232 weight = __calc_prop_weight(cfs_rq, se, weight);
15233 }
15234
15235 if (throttled)
15236 task_throttle_setup_work(p);
15237
15238 se = &p->se;
15239 cfs_rq->curr = se;
15240
15241 if (on_rq) {
15242 reweight_eevdf(cfs_rq, se, weight, se->on_rq);
15243 if (first)
15244 set_protect_slice(cfs_rq, se);
15245 }
15246
15247 if (task_on_rq_queued(p)) {
15248 /*
15249 * Move the next running task to the front of the list, so our
15250 * cfs_tasks list becomes MRU one.
15251 */
15252 list_move(&se->group_node, &rq->cfs_tasks);
15253 }
15254 if (!first)
15255 return;
15256
15257 WARN_ON_ONCE(se->sched_delayed);
15258
15259 if (hrtick_enabled_fair(rq))
15260 hrtick_start_fair(rq, p);
15261
15262 update_misfit_status(p, rq);
15263 sched_fair_update_stop_tick(rq, p);
15264 }
15265
init_cfs_rq(struct cfs_rq * cfs_rq)15266 void init_cfs_rq(struct cfs_rq *cfs_rq)
15267 {
15268 cfs_rq->tasks_timeline = RB_ROOT_CACHED;
15269 cfs_rq->zero_vruntime = (u64)(-(1LL << 20));
15270 raw_spin_lock_init(&cfs_rq->removed.lock);
15271 }
15272
15273 #ifdef CONFIG_FAIR_GROUP_SCHED
task_change_group_fair(struct task_struct * p)15274 static void task_change_group_fair(struct task_struct *p)
15275 {
15276 /*
15277 * We couldn't detach or attach a forked task which
15278 * hasn't been woken up by wake_up_new_task().
15279 */
15280 if (READ_ONCE(p->__state) == TASK_NEW)
15281 return;
15282
15283 detach_task_cfs_rq(p);
15284
15285 /* Tell se's cfs_rq has been changed -- migrated */
15286 p->se.avg.last_update_time = 0;
15287 set_task_rq(p, task_cpu(p));
15288 attach_task_cfs_rq(p);
15289 }
15290
free_fair_sched_group(struct task_group * tg)15291 void free_fair_sched_group(struct task_group *tg)
15292 {
15293 free_percpu(tg->cfs_rq);
15294 }
15295
alloc_fair_sched_group(struct task_group * tg,struct task_group * parent)15296 int alloc_fair_sched_group(struct task_group *tg, struct task_group *parent)
15297 {
15298 struct cfs_tg_state __percpu *state;
15299 struct sched_entity *se;
15300 struct cfs_rq *cfs_rq;
15301 int i;
15302
15303 state = alloc_percpu_gfp(struct cfs_tg_state, GFP_KERNEL);
15304 if (!state)
15305 goto err;
15306
15307 tg->cfs_rq = &state->cfs_rq;
15308 tg->shares = NICE_0_LOAD;
15309
15310 init_cfs_bandwidth(tg_cfs_bandwidth(tg), tg_cfs_bandwidth(parent));
15311
15312 for_each_possible_cpu(i) {
15313 cfs_rq = tg_cfs_rq(tg, i);
15314 if (!cfs_rq)
15315 goto err;
15316
15317 se = tg_se(tg, i);
15318 init_cfs_rq(cfs_rq);
15319 init_tg_cfs_entry(tg, cfs_rq, se, i, tg_se(parent, i));
15320 init_entity_runnable_average(se);
15321 }
15322
15323 return 1;
15324
15325 err:
15326 return 0;
15327 }
15328
online_fair_sched_group(struct task_group * tg)15329 void online_fair_sched_group(struct task_group *tg)
15330 {
15331 struct sched_entity *se;
15332 struct rq_flags rf;
15333 struct rq *rq;
15334 int i;
15335
15336 for_each_possible_cpu(i) {
15337 rq = cpu_rq(i);
15338 se = tg_se(tg, i);
15339 rq_lock_irq(rq, &rf);
15340 update_rq_clock(rq);
15341 attach_entity_cfs_rq(se);
15342 sync_throttle(tg, i);
15343 rq_unlock_irq(rq, &rf);
15344 }
15345 }
15346
unregister_fair_sched_group(struct task_group * tg)15347 void unregister_fair_sched_group(struct task_group *tg)
15348 {
15349 int cpu;
15350
15351 destroy_cfs_bandwidth(tg_cfs_bandwidth(tg));
15352
15353 for_each_possible_cpu(cpu) {
15354 struct cfs_rq *cfs_rq = tg_cfs_rq(tg, cpu);
15355 struct sched_entity *se = tg_se(tg, cpu);
15356 struct rq *rq = cpu_rq(cpu);
15357
15358 if (se)
15359 remove_entity_load_avg(se);
15360
15361 /*
15362 * Only empty task groups can be destroyed; so we can speculatively
15363 * check on_list without danger of it being re-added.
15364 */
15365 if (cfs_rq->on_list) {
15366 guard(rq_lock_irqsave)(rq);
15367 list_del_leaf_cfs_rq(cfs_rq);
15368 }
15369 }
15370 }
15371
init_tg_cfs_entry(struct task_group * tg,struct cfs_rq * cfs_rq,struct sched_entity * se,int cpu,struct sched_entity * parent)15372 void init_tg_cfs_entry(struct task_group *tg, struct cfs_rq *cfs_rq,
15373 struct sched_entity *se, int cpu,
15374 struct sched_entity *parent)
15375 {
15376 struct rq *rq = cpu_rq(cpu);
15377
15378 cfs_rq->tg = tg;
15379 cfs_rq->rq = rq;
15380 init_cfs_rq_runtime(cfs_rq);
15381
15382 /* se could be NULL for root_task_group */
15383 if (!se)
15384 return;
15385
15386 if (!parent) {
15387 se->cfs_rq = &rq->cfs;
15388 se->depth = 0;
15389 } else {
15390 se->cfs_rq = parent->my_q;
15391 se->depth = parent->depth + 1;
15392 }
15393
15394 se->my_q = cfs_rq;
15395 /* guarantee group entities always have weight */
15396 update_load_set(&se->load, NICE_0_LOAD);
15397 se->parent = parent;
15398 }
15399
15400 static DEFINE_MUTEX(shares_mutex);
15401
__sched_group_set_shares(struct task_group * tg,unsigned long shares)15402 static int __sched_group_set_shares(struct task_group *tg, unsigned long shares)
15403 {
15404 int i;
15405
15406 lockdep_assert_held(&shares_mutex);
15407
15408 /*
15409 * We can't change the weight of the root cgroup.
15410 */
15411 if (is_root_task_group(tg))
15412 return -EINVAL;
15413
15414 shares = clamp(shares, scale_load(MIN_SHARES), scale_load(MAX_SHARES));
15415
15416 if (tg->shares == shares)
15417 return 0;
15418
15419 tg->shares = shares;
15420 for_each_possible_cpu(i) {
15421 struct rq *rq = cpu_rq(i);
15422 struct sched_entity *se = tg_se(tg, i);
15423 struct rq_flags rf;
15424
15425 /* Propagate contribution to hierarchy */
15426 rq_lock_irqsave(rq, &rf);
15427 update_rq_clock(rq);
15428 for_each_sched_entity(se) {
15429 update_load_avg(cfs_rq_of(se), se, UPDATE_TG);
15430 update_cfs_group(se);
15431 }
15432 rq_unlock_irqrestore(rq, &rf);
15433 }
15434
15435 return 0;
15436 }
15437
sched_group_set_shares(struct task_group * tg,unsigned long shares)15438 int sched_group_set_shares(struct task_group *tg, unsigned long shares)
15439 {
15440 int ret;
15441
15442 mutex_lock(&shares_mutex);
15443 if (tg_is_idle(tg))
15444 ret = -EINVAL;
15445 else
15446 ret = __sched_group_set_shares(tg, shares);
15447 mutex_unlock(&shares_mutex);
15448
15449 return ret;
15450 }
15451
sched_group_set_idle(struct task_group * tg,long idle)15452 int sched_group_set_idle(struct task_group *tg, long idle)
15453 {
15454 int i;
15455
15456 if (tg == &root_task_group)
15457 return -EINVAL;
15458
15459 if (idle < 0 || idle > 1)
15460 return -EINVAL;
15461
15462 mutex_lock(&shares_mutex);
15463
15464 if (tg->idle == idle) {
15465 mutex_unlock(&shares_mutex);
15466 return 0;
15467 }
15468
15469 tg->idle = idle;
15470
15471 for_each_possible_cpu(i) {
15472 struct rq *rq = cpu_rq(i);
15473 struct sched_entity *se = tg_se(tg, i);
15474 struct cfs_rq *grp_cfs_rq = tg_cfs_rq(tg, i);
15475 bool was_idle = cfs_rq_is_idle(grp_cfs_rq);
15476 long idle_task_delta;
15477 struct rq_flags rf;
15478
15479 rq_lock_irqsave(rq, &rf);
15480
15481 grp_cfs_rq->idle = idle;
15482 if (WARN_ON_ONCE(was_idle == cfs_rq_is_idle(grp_cfs_rq)))
15483 goto next_cpu;
15484
15485 idle_task_delta = grp_cfs_rq->h_nr_queued -
15486 grp_cfs_rq->h_nr_idle;
15487 if (!cfs_rq_is_idle(grp_cfs_rq))
15488 idle_task_delta *= -1;
15489
15490 for_each_sched_entity(se) {
15491 struct cfs_rq *cfs_rq = cfs_rq_of(se);
15492
15493 if (!se->on_rq)
15494 break;
15495
15496 cfs_rq->h_nr_idle += idle_task_delta;
15497
15498 /* Already accounted at parent level and above. */
15499 if (cfs_rq_is_idle(cfs_rq))
15500 break;
15501 }
15502
15503 next_cpu:
15504 rq_unlock_irqrestore(rq, &rf);
15505 }
15506
15507 /* Idle groups have minimum weight. */
15508 if (tg_is_idle(tg))
15509 __sched_group_set_shares(tg, scale_load(WEIGHT_IDLEPRIO));
15510 else
15511 __sched_group_set_shares(tg, NICE_0_LOAD);
15512
15513 mutex_unlock(&shares_mutex);
15514 return 0;
15515 }
15516
15517 #endif /* CONFIG_FAIR_GROUP_SCHED */
15518
15519
get_rr_interval_fair(struct rq * rq,struct task_struct * task)15520 static unsigned int get_rr_interval_fair(struct rq *rq, struct task_struct *task)
15521 {
15522 struct sched_entity *se = &task->se;
15523 unsigned int rr_interval = 0;
15524
15525 /*
15526 * Time slice is 0 for SCHED_OTHER tasks that are on an otherwise
15527 * idle runqueue:
15528 */
15529 if (rq->cfs.load.weight)
15530 rr_interval = NS_TO_JIFFIES(se->slice);
15531
15532 return rr_interval;
15533 }
15534
15535 /*
15536 * All the scheduling class methods:
15537 */
15538 DEFINE_SCHED_CLASS(fair) = {
15539 .enqueue_task = enqueue_task_fair,
15540 .dequeue_task = dequeue_task_fair,
15541 .yield_task = yield_task_fair,
15542 .yield_to_task = yield_to_task_fair,
15543
15544 .wakeup_preempt = wakeup_preempt_fair,
15545
15546 .pick_task = pick_task_fair,
15547 .put_prev_task = put_prev_task_fair,
15548 .set_next_task = set_next_task_fair,
15549
15550 .select_task_rq = select_task_rq_fair,
15551 .migrate_task_rq = migrate_task_rq_fair,
15552
15553 .rq_online = rq_online_fair,
15554 .rq_offline = rq_offline_fair,
15555
15556 .task_dead = task_dead_fair,
15557 .set_cpus_allowed = set_cpus_allowed_fair,
15558
15559 .task_tick = task_tick_fair,
15560 .task_fork = task_fork_fair,
15561
15562 .reweight_task = reweight_task_fair,
15563 .prio_changed = prio_changed_fair,
15564 .switching_from = switching_from_fair,
15565 .switched_from = switched_from_fair,
15566 .switched_to = switched_to_fair,
15567
15568 .get_rr_interval = get_rr_interval_fair,
15569
15570 .update_curr = update_curr_fair,
15571
15572 #ifdef CONFIG_FAIR_GROUP_SCHED
15573 .task_change_group = task_change_group_fair,
15574 #endif
15575
15576 #ifdef CONFIG_SCHED_CORE
15577 .task_is_throttled = task_is_throttled_fair,
15578 #endif
15579
15580 #ifdef CONFIG_UCLAMP_TASK
15581 .uclamp_enabled = 1,
15582 #endif
15583 };
15584
print_cfs_stats(struct seq_file * m,int cpu)15585 void print_cfs_stats(struct seq_file *m, int cpu)
15586 {
15587 struct cfs_rq *cfs_rq, *pos;
15588
15589 rcu_read_lock();
15590 for_each_leaf_cfs_rq_safe(cpu_rq(cpu), cfs_rq, pos)
15591 print_cfs_rq(m, cpu, cfs_rq);
15592 rcu_read_unlock();
15593 }
15594
15595 #ifdef CONFIG_NUMA_BALANCING
show_numa_stats(struct task_struct * p,struct seq_file * m)15596 void show_numa_stats(struct task_struct *p, struct seq_file *m)
15597 {
15598 int node;
15599 unsigned long tsf = 0, tpf = 0, gsf = 0, gpf = 0;
15600 struct numa_group *ng;
15601
15602 rcu_read_lock();
15603 ng = rcu_dereference_all(p->numa_group);
15604 for_each_online_node(node) {
15605 if (p->numa_faults) {
15606 tsf = p->numa_faults[task_faults_idx(NUMA_MEM, node, 0)];
15607 tpf = p->numa_faults[task_faults_idx(NUMA_MEM, node, 1)];
15608 }
15609 if (ng) {
15610 gsf = ng->faults[task_faults_idx(NUMA_MEM, node, 0)];
15611 gpf = ng->faults[task_faults_idx(NUMA_MEM, node, 1)];
15612 }
15613 print_numa_stats(m, node, tsf, tpf, gsf, gpf);
15614 }
15615 rcu_read_unlock();
15616 }
15617 #endif /* CONFIG_NUMA_BALANCING */
15618
init_sched_fair_class(void)15619 __init void init_sched_fair_class(void)
15620 {
15621 int i;
15622
15623 for_each_possible_cpu(i) {
15624 zalloc_cpumask_var_node(&per_cpu(load_balance_mask, i), GFP_KERNEL, cpu_to_node(i));
15625 zalloc_cpumask_var_node(&per_cpu(select_rq_mask, i), GFP_KERNEL, cpu_to_node(i));
15626 zalloc_cpumask_var_node(&per_cpu(should_we_balance_tmpmask, i),
15627 GFP_KERNEL, cpu_to_node(i));
15628
15629 #ifdef CONFIG_CFS_BANDWIDTH
15630 INIT_CSD(&cpu_rq(i)->cfsb_csd, __cfsb_csd_unthrottle, cpu_rq(i));
15631 INIT_LIST_HEAD(&cpu_rq(i)->cfsb_csd_list);
15632 #endif
15633 }
15634
15635 open_softirq(SCHED_SOFTIRQ, sched_balance_softirq);
15636
15637 #ifdef CONFIG_NO_HZ_COMMON
15638 nohz.next_balance = jiffies;
15639 nohz.next_blocked = jiffies;
15640 zalloc_cpumask_var(&nohz.idle_cpus_mask, GFP_NOWAIT);
15641 #endif
15642 }
15643