Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 1 | /* |
| 2 | * Task management functions. |
| 3 | * |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 4 | * Copyright 2000-2009 Willy Tarreau <w@1wt.eu> |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 5 | * |
| 6 | * This program is free software; you can redistribute it and/or |
| 7 | * modify it under the terms of the GNU General Public License |
| 8 | * as published by the Free Software Foundation; either version |
| 9 | * 2 of the License, or (at your option) any later version. |
| 10 | * |
| 11 | */ |
| 12 | |
Willy Tarreau | 87bed62 | 2009-03-08 22:25:28 +0100 | [diff] [blame] | 13 | #include <string.h> |
| 14 | |
Willy Tarreau | b255105 | 2020-06-09 09:07:15 +0200 | [diff] [blame] | 15 | #include <import/eb32sctree.h> |
| 16 | #include <import/eb32tree.h> |
| 17 | |
Willy Tarreau | 4c7e4b7 | 2020-05-27 12:58:42 +0200 | [diff] [blame] | 18 | #include <haproxy/api.h> |
Willy Tarreau | e7723bd | 2020-06-24 11:11:02 +0200 | [diff] [blame] | 19 | #include <haproxy/cfgparse.h> |
Willy Tarreau | b255105 | 2020-06-09 09:07:15 +0200 | [diff] [blame] | 20 | #include <haproxy/fd.h> |
Willy Tarreau | 853b297 | 2020-05-27 18:01:47 +0200 | [diff] [blame] | 21 | #include <haproxy/list.h> |
Willy Tarreau | b255105 | 2020-06-09 09:07:15 +0200 | [diff] [blame] | 22 | #include <haproxy/pool.h> |
Willy Tarreau | cea0e1b | 2020-06-04 17:25:40 +0200 | [diff] [blame] | 23 | #include <haproxy/task.h> |
Willy Tarreau | b255105 | 2020-06-09 09:07:15 +0200 | [diff] [blame] | 24 | #include <haproxy/tools.h> |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 25 | |
Willy Tarreau | e08f4bf | 2021-05-08 20:10:13 +0200 | [diff] [blame] | 26 | extern struct task *process_stream(struct task *t, void *context, unsigned int state); |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 27 | |
Willy Tarreau | 8ceae72 | 2018-11-26 11:58:30 +0100 | [diff] [blame] | 28 | DECLARE_POOL(pool_head_task, "task", sizeof(struct task)); |
| 29 | DECLARE_POOL(pool_head_tasklet, "tasklet", sizeof(struct tasklet)); |
Willy Tarreau | 96bcfd7 | 2007-04-29 10:41:56 +0200 | [diff] [blame] | 30 | |
Thierry FOURNIER | d697596 | 2017-07-12 14:31:10 +0200 | [diff] [blame] | 31 | /* This is the memory pool containing all the signal structs. These |
Joseph Herlant | cf92b6d | 2018-11-15 14:19:23 -0800 | [diff] [blame] | 32 | * struct are used to store each required signal between two tasks. |
Thierry FOURNIER | d697596 | 2017-07-12 14:31:10 +0200 | [diff] [blame] | 33 | */ |
Willy Tarreau | 8ceae72 | 2018-11-26 11:58:30 +0100 | [diff] [blame] | 34 | DECLARE_POOL(pool_head_notification, "notification", sizeof(struct notification)); |
Thierry FOURNIER | d697596 | 2017-07-12 14:31:10 +0200 | [diff] [blame] | 35 | |
Olivier Houchard | eba0c0b | 2018-07-26 18:53:28 +0200 | [diff] [blame] | 36 | volatile unsigned long global_tasks_mask = 0; /* Mask of threads with tasks in the global runqueue */ |
Willy Tarreau | e35c94a | 2009-03-21 10:01:42 +0100 | [diff] [blame] | 37 | unsigned int niced_tasks = 0; /* number of niced tasks in the run queue */ |
Emeric Brun | 0194897 | 2017-03-30 15:37:25 +0200 | [diff] [blame] | 38 | |
Willy Tarreau | d022e9c | 2019-09-24 08:25:15 +0200 | [diff] [blame] | 39 | THREAD_LOCAL struct task_per_thread *sched = &task_per_thread[0]; /* scheduler context for the current thread */ |
Willy Tarreau | 6d1222c | 2017-11-26 10:08:06 +0100 | [diff] [blame] | 40 | |
Willy Tarreau | 86abe44 | 2018-11-25 20:12:18 +0100 | [diff] [blame] | 41 | __decl_aligned_spinlock(rq_lock); /* spin lock related to run queue */ |
Willy Tarreau | ef28dc1 | 2019-05-28 18:48:07 +0200 | [diff] [blame] | 42 | __decl_aligned_rwlock(wq_lock); /* RW lock related to the wait queue */ |
Willy Tarreau | 964c936 | 2007-01-07 00:38:00 +0100 | [diff] [blame] | 43 | |
Olivier Houchard | b1ca58b | 2018-06-06 14:22:03 +0200 | [diff] [blame] | 44 | #ifdef USE_THREAD |
Willy Tarreau | c6ba9a0 | 2021-02-20 12:49:54 +0100 | [diff] [blame] | 45 | struct eb_root timers; /* sorted timers tree, global, accessed under wq_lock */ |
| 46 | struct eb_root rqueue; /* tree constituting the global run queue, accessed under rq_lock */ |
Willy Tarreau | 45499c5 | 2021-02-25 07:51:18 +0100 | [diff] [blame] | 47 | unsigned int grq_total; /* total number of entries in the global run queue, atomic */ |
Willy Tarreau | c6ba9a0 | 2021-02-20 12:49:54 +0100 | [diff] [blame] | 48 | static unsigned int global_rqueue_ticks; /* insertion count in the grq, use rq_lock */ |
Olivier Houchard | b1ca58b | 2018-06-06 14:22:03 +0200 | [diff] [blame] | 49 | #endif |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 50 | |
Willy Tarreau | 8d8747a | 2018-10-15 16:12:48 +0200 | [diff] [blame] | 51 | |
| 52 | struct task_per_thread task_per_thread[MAX_THREADS]; |
Willy Tarreau | 9789f7b | 2008-06-24 08:17:16 +0200 | [diff] [blame] | 53 | |
Willy Tarreau | eb8c2c6 | 2020-06-30 11:48:48 +0200 | [diff] [blame] | 54 | |
| 55 | /* Flags the task <t> for immediate destruction and puts it into its first |
| 56 | * thread's shared tasklet list if not yet queued/running. This will bypass |
| 57 | * the priority scheduling and make the task show up as fast as possible in |
| 58 | * the other thread's queue. Note that this operation isn't idempotent and is |
| 59 | * not supposed to be run on the same task from multiple threads at once. It's |
| 60 | * the caller's responsibility to make sure it is the only one able to kill the |
| 61 | * task. |
| 62 | */ |
| 63 | void task_kill(struct task *t) |
| 64 | { |
Willy Tarreau | 144f84a | 2021-03-02 16:09:26 +0100 | [diff] [blame] | 65 | unsigned int state = t->state; |
Willy Tarreau | eb8c2c6 | 2020-06-30 11:48:48 +0200 | [diff] [blame] | 66 | unsigned int thr; |
| 67 | |
| 68 | BUG_ON(state & TASK_KILLED); |
| 69 | |
| 70 | while (1) { |
| 71 | while (state & (TASK_RUNNING | TASK_QUEUED)) { |
| 72 | /* task already in the queue and about to be executed, |
| 73 | * or even currently running. Just add the flag and be |
| 74 | * done with it, the process loop will detect it and kill |
| 75 | * it. The CAS will fail if we arrive too late. |
| 76 | */ |
| 77 | if (_HA_ATOMIC_CAS(&t->state, &state, state | TASK_KILLED)) |
| 78 | return; |
| 79 | } |
| 80 | |
| 81 | /* We'll have to wake it up, but we must also secure it so that |
| 82 | * it doesn't vanish under us. TASK_QUEUED guarantees nobody will |
| 83 | * add past us. |
| 84 | */ |
| 85 | if (_HA_ATOMIC_CAS(&t->state, &state, state | TASK_QUEUED | TASK_KILLED)) { |
| 86 | /* Bypass the tree and go directly into the shared tasklet list. |
| 87 | * Note: that's a task so it must be accounted for as such. Pick |
| 88 | * the task's first thread for the job. |
| 89 | */ |
| 90 | thr = my_ffsl(t->thread_mask) - 1; |
Willy Tarreau | 54d3117 | 2020-07-02 14:14:00 +0200 | [diff] [blame] | 91 | |
| 92 | /* Beware: tasks that have never run don't have their ->list empty yet! */ |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 93 | MT_LIST_APPEND(&task_per_thread[thr].shared_tasklet_list, |
Willy Tarreau | 4f58926 | 2020-07-02 17:17:42 +0200 | [diff] [blame] | 94 | (struct mt_list *)&((struct tasklet *)t)->list); |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 95 | _HA_ATOMIC_INC(&task_per_thread[thr].rq_total); |
| 96 | _HA_ATOMIC_INC(&task_per_thread[thr].tasks_in_list); |
Willy Tarreau | 54d3117 | 2020-07-02 14:14:00 +0200 | [diff] [blame] | 97 | if (sleeping_thread_mask & (1UL << thr)) { |
| 98 | _HA_ATOMIC_AND(&sleeping_thread_mask, ~(1UL << thr)); |
| 99 | wake_thread(thr); |
Willy Tarreau | eb8c2c6 | 2020-06-30 11:48:48 +0200 | [diff] [blame] | 100 | } |
Willy Tarreau | 54d3117 | 2020-07-02 14:14:00 +0200 | [diff] [blame] | 101 | return; |
Willy Tarreau | eb8c2c6 | 2020-06-30 11:48:48 +0200 | [diff] [blame] | 102 | } |
| 103 | } |
| 104 | } |
| 105 | |
Amaury Denoyelle | 7b36833 | 2021-07-28 16:12:57 +0200 | [diff] [blame^] | 106 | /* Equivalent of task_kill for tasklets. Mark the tasklet <t> for destruction. |
| 107 | * It will be deleted on the next scheduler invocation. This function is |
| 108 | * thread-safe : a thread can kill a tasklet of another thread. |
| 109 | */ |
| 110 | void tasklet_kill(struct tasklet *t) |
| 111 | { |
| 112 | unsigned int state = t->state; |
| 113 | unsigned int thr; |
| 114 | |
| 115 | BUG_ON(state & TASK_KILLED); |
| 116 | |
| 117 | while (1) { |
| 118 | while (state & (TASK_IN_LIST)) { |
| 119 | /* Tasklet already in the list ready to be executed. Add |
| 120 | * the killed flag and wait for the process loop to |
| 121 | * detect it. |
| 122 | */ |
| 123 | if (_HA_ATOMIC_CAS(&t->state, &state, state | TASK_KILLED)) |
| 124 | return; |
| 125 | } |
| 126 | |
| 127 | /* Mark the tasklet as killed and wake the thread to process it |
| 128 | * as soon as possible. |
| 129 | */ |
| 130 | if (_HA_ATOMIC_CAS(&t->state, &state, state | TASK_IN_LIST | TASK_KILLED)) { |
| 131 | thr = t->tid > 0 ? t->tid: tid; |
| 132 | MT_LIST_APPEND(&task_per_thread[thr].shared_tasklet_list, |
| 133 | (struct mt_list *)&t->list); |
| 134 | _HA_ATOMIC_INC(&task_per_thread[thr].rq_total); |
| 135 | if (sleeping_thread_mask & (1UL << thr)) { |
| 136 | _HA_ATOMIC_AND(&sleeping_thread_mask, ~(1UL << thr)); |
| 137 | wake_thread(thr); |
| 138 | } |
| 139 | return; |
| 140 | } |
| 141 | } |
| 142 | } |
| 143 | |
Willy Tarreau | 9c6dbf0 | 2021-02-24 17:51:38 +0100 | [diff] [blame] | 144 | /* Do not call this one, please use tasklet_wakeup_on() instead, as this one is |
| 145 | * the slow path of tasklet_wakeup_on() which performs some preliminary checks |
| 146 | * and sets TASK_IN_LIST before calling this one. A negative <thr> designates |
| 147 | * the current thread. |
| 148 | */ |
| 149 | void __tasklet_wakeup_on(struct tasklet *tl, int thr) |
| 150 | { |
| 151 | if (likely(thr < 0)) { |
| 152 | /* this tasklet runs on the caller thread */ |
Willy Tarreau | 826fa87 | 2021-02-26 10:13:40 +0100 | [diff] [blame] | 153 | if (tl->state & TASK_HEAVY) { |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 154 | LIST_APPEND(&sched->tasklets[TL_HEAVY], &tl->list); |
Willy Tarreau | 826fa87 | 2021-02-26 10:13:40 +0100 | [diff] [blame] | 155 | sched->tl_class_mask |= 1 << TL_HEAVY; |
| 156 | } |
| 157 | else if (tl->state & TASK_SELF_WAKING) { |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 158 | LIST_APPEND(&sched->tasklets[TL_BULK], &tl->list); |
Willy Tarreau | 9c6dbf0 | 2021-02-24 17:51:38 +0100 | [diff] [blame] | 159 | sched->tl_class_mask |= 1 << TL_BULK; |
| 160 | } |
| 161 | else if ((struct task *)tl == sched->current) { |
| 162 | _HA_ATOMIC_OR(&tl->state, TASK_SELF_WAKING); |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 163 | LIST_APPEND(&sched->tasklets[TL_BULK], &tl->list); |
Willy Tarreau | 9c6dbf0 | 2021-02-24 17:51:38 +0100 | [diff] [blame] | 164 | sched->tl_class_mask |= 1 << TL_BULK; |
| 165 | } |
| 166 | else if (sched->current_queue < 0) { |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 167 | LIST_APPEND(&sched->tasklets[TL_URGENT], &tl->list); |
Willy Tarreau | 9c6dbf0 | 2021-02-24 17:51:38 +0100 | [diff] [blame] | 168 | sched->tl_class_mask |= 1 << TL_URGENT; |
| 169 | } |
| 170 | else { |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 171 | LIST_APPEND(&sched->tasklets[sched->current_queue], &tl->list); |
Willy Tarreau | 9c6dbf0 | 2021-02-24 17:51:38 +0100 | [diff] [blame] | 172 | sched->tl_class_mask |= 1 << sched->current_queue; |
| 173 | } |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 174 | _HA_ATOMIC_INC(&sched->rq_total); |
Willy Tarreau | 9c6dbf0 | 2021-02-24 17:51:38 +0100 | [diff] [blame] | 175 | } else { |
| 176 | /* this tasklet runs on a specific thread. */ |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 177 | MT_LIST_APPEND(&task_per_thread[thr].shared_tasklet_list, (struct mt_list *)&tl->list); |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 178 | _HA_ATOMIC_INC(&task_per_thread[thr].rq_total); |
Willy Tarreau | 9c6dbf0 | 2021-02-24 17:51:38 +0100 | [diff] [blame] | 179 | if (sleeping_thread_mask & (1UL << thr)) { |
| 180 | _HA_ATOMIC_AND(&sleeping_thread_mask, ~(1UL << thr)); |
| 181 | wake_thread(thr); |
| 182 | } |
| 183 | } |
| 184 | } |
| 185 | |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 186 | /* Puts the task <t> in run queue at a position depending on t->nice. <t> is |
| 187 | * returned. The nice value assigns boosts in 32th of the run queue size. A |
Christopher Faulet | 34c5cc9 | 2016-12-06 09:15:30 +0100 | [diff] [blame] | 188 | * nice value of -1024 sets the task to -tasks_run_queue*32, while a nice value |
| 189 | * of 1024 sets the task to tasks_run_queue*32. The state flags are cleared, so |
| 190 | * the caller will have to set its flags after this call. |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 191 | * The task must not already be in the run queue. If unsure, use the safer |
| 192 | * task_wakeup() function. |
Willy Tarreau | 91e9993 | 2008-06-30 07:51:00 +0200 | [diff] [blame] | 193 | */ |
Willy Tarreau | 018564e | 2021-02-24 16:41:11 +0100 | [diff] [blame] | 194 | void __task_wakeup(struct task *t) |
Willy Tarreau | e33aece | 2007-04-30 13:15:14 +0200 | [diff] [blame] | 195 | { |
Willy Tarreau | 018564e | 2021-02-24 16:41:11 +0100 | [diff] [blame] | 196 | struct eb_root *root = &sched->rqueue; |
| 197 | |
Olivier Houchard | b1ca58b | 2018-06-06 14:22:03 +0200 | [diff] [blame] | 198 | #ifdef USE_THREAD |
Willy Tarreau | 018564e | 2021-02-24 16:41:11 +0100 | [diff] [blame] | 199 | if (t->thread_mask != tid_bit && global.nbthread != 1) { |
| 200 | root = &rqueue; |
| 201 | |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 202 | _HA_ATOMIC_INC(&grq_total); |
Olivier Houchard | f6e6dc1 | 2018-05-18 18:38:23 +0200 | [diff] [blame] | 203 | HA_SPIN_LOCK(TASK_RQ_LOCK, &rq_lock); |
Willy Tarreau | 9c7b808 | 2021-02-24 15:10:07 +0100 | [diff] [blame] | 204 | |
Olivier Houchard | de82aea | 2019-04-17 19:10:22 +0200 | [diff] [blame] | 205 | global_tasks_mask |= t->thread_mask; |
Willy Tarreau | c6ba9a0 | 2021-02-20 12:49:54 +0100 | [diff] [blame] | 206 | t->rq.key = ++global_rqueue_ticks; |
Olivier Houchard | ed1a6a0 | 2019-04-18 14:12:51 +0200 | [diff] [blame] | 207 | __ha_barrier_store(); |
Willy Tarreau | c6ba9a0 | 2021-02-20 12:49:54 +0100 | [diff] [blame] | 208 | } else |
Olivier Houchard | c4aac9e | 2018-07-26 15:25:49 +0200 | [diff] [blame] | 209 | #endif |
Willy Tarreau | 9c7b808 | 2021-02-24 15:10:07 +0100 | [diff] [blame] | 210 | { |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 211 | _HA_ATOMIC_INC(&sched->rq_total); |
Willy Tarreau | c6ba9a0 | 2021-02-20 12:49:54 +0100 | [diff] [blame] | 212 | t->rq.key = ++sched->rqueue_ticks; |
Willy Tarreau | 9c7b808 | 2021-02-24 15:10:07 +0100 | [diff] [blame] | 213 | } |
Willy Tarreau | 91e9993 | 2008-06-30 07:51:00 +0200 | [diff] [blame] | 214 | |
| 215 | if (likely(t->nice)) { |
| 216 | int offset; |
| 217 | |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 218 | _HA_ATOMIC_INC(&niced_tasks); |
Willy Tarreau | 2d1fd0a | 2019-04-15 09:18:31 +0200 | [diff] [blame] | 219 | offset = t->nice * (int)global.tune.runqueue_depth; |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 220 | t->rq.key += offset; |
Willy Tarreau | 91e9993 | 2008-06-30 07:51:00 +0200 | [diff] [blame] | 221 | } |
| 222 | |
Willy Tarreau | d9add3a | 2019-04-25 08:57:41 +0200 | [diff] [blame] | 223 | if (task_profiling_mask & tid_bit) |
Willy Tarreau | 9efd745 | 2018-05-31 14:48:54 +0200 | [diff] [blame] | 224 | t->call_date = now_mono_time(); |
| 225 | |
Olivier Houchard | f6e6dc1 | 2018-05-18 18:38:23 +0200 | [diff] [blame] | 226 | eb32sc_insert(root, &t->rq, t->thread_mask); |
Willy Tarreau | 018564e | 2021-02-24 16:41:11 +0100 | [diff] [blame] | 227 | |
Olivier Houchard | b1ca58b | 2018-06-06 14:22:03 +0200 | [diff] [blame] | 228 | #ifdef USE_THREAD |
Olivier Houchard | f6e6dc1 | 2018-05-18 18:38:23 +0200 | [diff] [blame] | 229 | if (root == &rqueue) { |
Olivier Houchard | 4c283285 | 2019-03-08 18:48:47 +0100 | [diff] [blame] | 230 | _HA_ATOMIC_OR(&t->state, TASK_GLOBAL); |
Olivier Houchard | f6e6dc1 | 2018-05-18 18:38:23 +0200 | [diff] [blame] | 231 | HA_SPIN_UNLOCK(TASK_RQ_LOCK, &rq_lock); |
Willy Tarreau | 2c41d77 | 2021-02-24 16:13:03 +0100 | [diff] [blame] | 232 | |
Willy Tarreau | eeffb3d | 2021-02-24 16:44:51 +0100 | [diff] [blame] | 233 | /* If all threads that are supposed to handle this task are sleeping, |
| 234 | * wake one. |
| 235 | */ |
| 236 | if ((((t->thread_mask & all_threads_mask) & sleeping_thread_mask) == |
| 237 | (t->thread_mask & all_threads_mask))) { |
| 238 | unsigned long m = (t->thread_mask & all_threads_mask) &~ tid_bit; |
Olivier Houchard | 1b32790 | 2019-03-15 00:23:10 +0100 | [diff] [blame] | 239 | |
Willy Tarreau | eeffb3d | 2021-02-24 16:44:51 +0100 | [diff] [blame] | 240 | m = (m & (m - 1)) ^ m; // keep lowest bit set |
| 241 | _HA_ATOMIC_AND(&sleeping_thread_mask, ~m); |
| 242 | wake_thread(my_ffsl(m) - 1); |
| 243 | } |
Olivier Houchard | 1b32790 | 2019-03-15 00:23:10 +0100 | [diff] [blame] | 244 | } |
Willy Tarreau | 85d9b84 | 2018-07-27 17:14:41 +0200 | [diff] [blame] | 245 | #endif |
Olivier Houchard | f6e6dc1 | 2018-05-18 18:38:23 +0200 | [diff] [blame] | 246 | return; |
Willy Tarreau | e33aece | 2007-04-30 13:15:14 +0200 | [diff] [blame] | 247 | } |
Willy Tarreau | d825eef | 2007-05-12 22:35:00 +0200 | [diff] [blame] | 248 | |
Willy Tarreau | 96bcfd7 | 2007-04-29 10:41:56 +0200 | [diff] [blame] | 249 | /* |
Willy Tarreau | 531cf0c | 2009-03-08 16:35:27 +0100 | [diff] [blame] | 250 | * __task_queue() |
Willy Tarreau | 96bcfd7 | 2007-04-29 10:41:56 +0200 | [diff] [blame] | 251 | * |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 252 | * Inserts a task into wait queue <wq> at the position given by its expiration |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 253 | * date. It does not matter if the task was already in the wait queue or not, |
Willy Tarreau | 531cf0c | 2009-03-08 16:35:27 +0100 | [diff] [blame] | 254 | * as it will be unlinked. The task must not have an infinite expiration timer. |
Willy Tarreau | e35c94a | 2009-03-21 10:01:42 +0100 | [diff] [blame] | 255 | * Last, tasks must not be queued further than the end of the tree, which is |
| 256 | * between <now_ms> and <now_ms> + 2^31 ms (now+24days in 32bit). |
Willy Tarreau | 531cf0c | 2009-03-08 16:35:27 +0100 | [diff] [blame] | 257 | * |
| 258 | * This function should not be used directly, it is meant to be called by the |
| 259 | * inline version of task_queue() which performs a few cheap preliminary tests |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 260 | * before deciding to call __task_queue(). Moreover this function doesn't care |
| 261 | * at all about locking so the caller must be careful when deciding whether to |
| 262 | * lock or not around this call. |
Willy Tarreau | 96bcfd7 | 2007-04-29 10:41:56 +0200 | [diff] [blame] | 263 | */ |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 264 | void __task_queue(struct task *task, struct eb_root *wq) |
Willy Tarreau | 964c936 | 2007-01-07 00:38:00 +0100 | [diff] [blame] | 265 | { |
Willy Tarreau | e5d79bc | 2020-07-22 14:29:42 +0200 | [diff] [blame] | 266 | #ifdef USE_THREAD |
| 267 | BUG_ON((wq == &timers && !(task->state & TASK_SHARED_WQ)) || |
| 268 | (wq == &sched->timers && (task->state & TASK_SHARED_WQ)) || |
| 269 | (wq != &timers && wq != &sched->timers)); |
| 270 | #endif |
| 271 | |
Willy Tarreau | 531cf0c | 2009-03-08 16:35:27 +0100 | [diff] [blame] | 272 | if (likely(task_in_wq(task))) |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 273 | __task_unlink_wq(task); |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 274 | |
| 275 | /* the task is not in the queue now */ |
Willy Tarreau | e35c94a | 2009-03-21 10:01:42 +0100 | [diff] [blame] | 276 | task->wq.key = task->expire; |
Willy Tarreau | 28c41a4 | 2008-06-29 17:00:59 +0200 | [diff] [blame] | 277 | #ifdef DEBUG_CHECK_INVALID_EXPIRATION_DATES |
Willy Tarreau | e35c94a | 2009-03-21 10:01:42 +0100 | [diff] [blame] | 278 | if (tick_is_lt(task->wq.key, now_ms)) |
Willy Tarreau | 28c41a4 | 2008-06-29 17:00:59 +0200 | [diff] [blame] | 279 | /* we're queuing too far away or in the past (most likely) */ |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 280 | return; |
Willy Tarreau | 28c41a4 | 2008-06-29 17:00:59 +0200 | [diff] [blame] | 281 | #endif |
Willy Tarreau | ce44f12 | 2008-07-05 18:16:19 +0200 | [diff] [blame] | 282 | |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 283 | eb32_insert(wq, &task->wq); |
Willy Tarreau | 964c936 | 2007-01-07 00:38:00 +0100 | [diff] [blame] | 284 | } |
| 285 | |
Willy Tarreau | 96bcfd7 | 2007-04-29 10:41:56 +0200 | [diff] [blame] | 286 | /* |
Willy Tarreau | 9789f7b | 2008-06-24 08:17:16 +0200 | [diff] [blame] | 287 | * Extract all expired timers from the timer queue, and wakes up all |
Willy Tarreau | c49ba52 | 2019-12-11 08:12:23 +0100 | [diff] [blame] | 288 | * associated tasks. |
Willy Tarreau | 96bcfd7 | 2007-04-29 10:41:56 +0200 | [diff] [blame] | 289 | */ |
Willy Tarreau | c49ba52 | 2019-12-11 08:12:23 +0100 | [diff] [blame] | 290 | void wake_expired_tasks() |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 291 | { |
Willy Tarreau | d022e9c | 2019-09-24 08:25:15 +0200 | [diff] [blame] | 292 | struct task_per_thread * const tt = sched; // thread's tasks |
Willy Tarreau | 3cfaa8d | 2020-10-16 09:26:22 +0200 | [diff] [blame] | 293 | int max_processed = global.tune.runqueue_depth; |
Willy Tarreau | 96bcfd7 | 2007-04-29 10:41:56 +0200 | [diff] [blame] | 294 | struct task *task; |
Willy Tarreau | 9789f7b | 2008-06-24 08:17:16 +0200 | [diff] [blame] | 295 | struct eb32_node *eb; |
Willy Tarreau | af613e8 | 2020-06-05 08:40:51 +0200 | [diff] [blame] | 296 | __decl_thread(int key); |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 297 | |
Willy Tarreau | 3cfaa8d | 2020-10-16 09:26:22 +0200 | [diff] [blame] | 298 | while (max_processed-- > 0) { |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 299 | lookup_next_local: |
Willy Tarreau | 4c1e1ad | 2019-09-24 07:19:08 +0200 | [diff] [blame] | 300 | eb = eb32_lookup_ge(&tt->timers, now_ms - TIMER_LOOK_BACK); |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 301 | if (!eb) { |
| 302 | /* we might have reached the end of the tree, typically because |
| 303 | * <now_ms> is in the first half and we're first scanning the last |
| 304 | * half. Let's loop back to the beginning of the tree now. |
| 305 | */ |
Willy Tarreau | 4c1e1ad | 2019-09-24 07:19:08 +0200 | [diff] [blame] | 306 | eb = eb32_first(&tt->timers); |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 307 | if (likely(!eb)) |
| 308 | break; |
| 309 | } |
| 310 | |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 311 | /* It is possible that this task was left at an earlier place in the |
| 312 | * tree because a recent call to task_queue() has not moved it. This |
| 313 | * happens when the new expiration date is later than the old one. |
| 314 | * Since it is very unlikely that we reach a timeout anyway, it's a |
| 315 | * lot cheaper to proceed like this because we almost never update |
| 316 | * the tree. We may also find disabled expiration dates there. Since |
| 317 | * we have detached the task from the tree, we simply call task_queue |
| 318 | * to take care of this. Note that we might occasionally requeue it at |
| 319 | * the same place, before <eb>, so we have to check if this happens, |
| 320 | * and adjust <eb>, otherwise we may skip it which is not what we want. |
| 321 | * We may also not requeue the task (and not point eb at it) if its |
Willy Tarreau | 77015ab | 2020-06-19 11:50:27 +0200 | [diff] [blame] | 322 | * expiration time is not set. We also make sure we leave the real |
| 323 | * expiration date for the next task in the queue so that when calling |
| 324 | * next_timer_expiry() we're guaranteed to see the next real date and |
| 325 | * not the next apparent date. This is in order to avoid useless |
| 326 | * wakeups. |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 327 | */ |
Willy Tarreau | 77015ab | 2020-06-19 11:50:27 +0200 | [diff] [blame] | 328 | |
| 329 | task = eb32_entry(eb, struct task, wq); |
| 330 | if (tick_is_expired(task->expire, now_ms)) { |
| 331 | /* expired task, wake it up */ |
| 332 | __task_unlink_wq(task); |
| 333 | task_wakeup(task, TASK_WOKEN_TIMER); |
| 334 | } |
| 335 | else if (task->expire != eb->key) { |
| 336 | /* task is not expired but its key doesn't match so let's |
| 337 | * update it and skip to next apparently expired task. |
| 338 | */ |
| 339 | __task_unlink_wq(task); |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 340 | if (tick_isset(task->expire)) |
Willy Tarreau | 4c1e1ad | 2019-09-24 07:19:08 +0200 | [diff] [blame] | 341 | __task_queue(task, &tt->timers); |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 342 | } |
Willy Tarreau | 77015ab | 2020-06-19 11:50:27 +0200 | [diff] [blame] | 343 | else { |
| 344 | /* task not expired and correctly placed */ |
| 345 | break; |
| 346 | } |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 347 | } |
| 348 | |
| 349 | #ifdef USE_THREAD |
Willy Tarreau | 1e928c0 | 2019-05-28 18:57:25 +0200 | [diff] [blame] | 350 | if (eb_is_empty(&timers)) |
| 351 | goto leave; |
| 352 | |
| 353 | HA_RWLOCK_RDLOCK(TASK_WQ_LOCK, &wq_lock); |
| 354 | eb = eb32_lookup_ge(&timers, now_ms - TIMER_LOOK_BACK); |
| 355 | if (!eb) { |
| 356 | eb = eb32_first(&timers); |
| 357 | if (likely(!eb)) { |
| 358 | HA_RWLOCK_RDUNLOCK(TASK_WQ_LOCK, &wq_lock); |
| 359 | goto leave; |
| 360 | } |
| 361 | } |
| 362 | key = eb->key; |
Willy Tarreau | 1e928c0 | 2019-05-28 18:57:25 +0200 | [diff] [blame] | 363 | |
Willy Tarreau | d48ed66 | 2020-10-16 09:31:41 +0200 | [diff] [blame] | 364 | if (tick_is_lt(now_ms, key)) { |
| 365 | HA_RWLOCK_RDUNLOCK(TASK_WQ_LOCK, &wq_lock); |
Willy Tarreau | 1e928c0 | 2019-05-28 18:57:25 +0200 | [diff] [blame] | 366 | goto leave; |
Willy Tarreau | d48ed66 | 2020-10-16 09:31:41 +0200 | [diff] [blame] | 367 | } |
Willy Tarreau | 1e928c0 | 2019-05-28 18:57:25 +0200 | [diff] [blame] | 368 | |
| 369 | /* There's really something of interest here, let's visit the queue */ |
| 370 | |
Willy Tarreau | d48ed66 | 2020-10-16 09:31:41 +0200 | [diff] [blame] | 371 | if (HA_RWLOCK_TRYRDTOSK(TASK_WQ_LOCK, &wq_lock)) { |
| 372 | /* if we failed to grab the lock it means another thread is |
| 373 | * already doing the same here, so let it do the job. |
| 374 | */ |
| 375 | HA_RWLOCK_RDUNLOCK(TASK_WQ_LOCK, &wq_lock); |
| 376 | goto leave; |
| 377 | } |
| 378 | |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 379 | while (1) { |
Emeric Brun | c60def8 | 2017-09-27 14:59:38 +0200 | [diff] [blame] | 380 | lookup_next: |
Willy Tarreau | 3cfaa8d | 2020-10-16 09:26:22 +0200 | [diff] [blame] | 381 | if (max_processed-- <= 0) |
| 382 | break; |
Emeric Brun | 0194897 | 2017-03-30 15:37:25 +0200 | [diff] [blame] | 383 | eb = eb32_lookup_ge(&timers, now_ms - TIMER_LOOK_BACK); |
Emeric Brun | c60def8 | 2017-09-27 14:59:38 +0200 | [diff] [blame] | 384 | if (!eb) { |
Willy Tarreau | e35c94a | 2009-03-21 10:01:42 +0100 | [diff] [blame] | 385 | /* we might have reached the end of the tree, typically because |
| 386 | * <now_ms> is in the first half and we're first scanning the last |
| 387 | * half. Let's loop back to the beginning of the tree now. |
| 388 | */ |
| 389 | eb = eb32_first(&timers); |
Willy Tarreau | b992ba1 | 2017-11-05 19:09:27 +0100 | [diff] [blame] | 390 | if (likely(!eb)) |
Willy Tarreau | e35c94a | 2009-03-21 10:01:42 +0100 | [diff] [blame] | 391 | break; |
| 392 | } |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 393 | |
Willy Tarreau | e35c94a | 2009-03-21 10:01:42 +0100 | [diff] [blame] | 394 | task = eb32_entry(eb, struct task, wq); |
Willy Tarreau | 77015ab | 2020-06-19 11:50:27 +0200 | [diff] [blame] | 395 | if (tick_is_expired(task->expire, now_ms)) { |
| 396 | /* expired task, wake it up */ |
Willy Tarreau | d48ed66 | 2020-10-16 09:31:41 +0200 | [diff] [blame] | 397 | HA_RWLOCK_SKTOWR(TASK_WQ_LOCK, &wq_lock); |
Willy Tarreau | 77015ab | 2020-06-19 11:50:27 +0200 | [diff] [blame] | 398 | __task_unlink_wq(task); |
Willy Tarreau | d48ed66 | 2020-10-16 09:31:41 +0200 | [diff] [blame] | 399 | HA_RWLOCK_WRTOSK(TASK_WQ_LOCK, &wq_lock); |
Willy Tarreau | 77015ab | 2020-06-19 11:50:27 +0200 | [diff] [blame] | 400 | task_wakeup(task, TASK_WOKEN_TIMER); |
| 401 | } |
| 402 | else if (task->expire != eb->key) { |
| 403 | /* task is not expired but its key doesn't match so let's |
| 404 | * update it and skip to next apparently expired task. |
| 405 | */ |
Willy Tarreau | d48ed66 | 2020-10-16 09:31:41 +0200 | [diff] [blame] | 406 | HA_RWLOCK_SKTOWR(TASK_WQ_LOCK, &wq_lock); |
Willy Tarreau | 77015ab | 2020-06-19 11:50:27 +0200 | [diff] [blame] | 407 | __task_unlink_wq(task); |
Willy Tarreau | b992ba1 | 2017-11-05 19:09:27 +0100 | [diff] [blame] | 408 | if (tick_isset(task->expire)) |
Willy Tarreau | 783afbe | 2020-07-22 14:12:45 +0200 | [diff] [blame] | 409 | __task_queue(task, &timers); |
Willy Tarreau | d48ed66 | 2020-10-16 09:31:41 +0200 | [diff] [blame] | 410 | HA_RWLOCK_WRTOSK(TASK_WQ_LOCK, &wq_lock); |
Emeric Brun | c60def8 | 2017-09-27 14:59:38 +0200 | [diff] [blame] | 411 | goto lookup_next; |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 412 | } |
Willy Tarreau | 77015ab | 2020-06-19 11:50:27 +0200 | [diff] [blame] | 413 | else { |
| 414 | /* task not expired and correctly placed */ |
| 415 | break; |
| 416 | } |
Willy Tarreau | e35c94a | 2009-03-21 10:01:42 +0100 | [diff] [blame] | 417 | } |
Willy Tarreau | 9789f7b | 2008-06-24 08:17:16 +0200 | [diff] [blame] | 418 | |
Willy Tarreau | d48ed66 | 2020-10-16 09:31:41 +0200 | [diff] [blame] | 419 | HA_RWLOCK_SKUNLOCK(TASK_WQ_LOCK, &wq_lock); |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 420 | #endif |
Willy Tarreau | 1e928c0 | 2019-05-28 18:57:25 +0200 | [diff] [blame] | 421 | leave: |
Willy Tarreau | c49ba52 | 2019-12-11 08:12:23 +0100 | [diff] [blame] | 422 | return; |
| 423 | } |
| 424 | |
| 425 | /* Checks the next timer for the current thread by looking into its own timer |
| 426 | * list and the global one. It may return TICK_ETERNITY if no timer is present. |
Ilya Shipitsin | 856aabc | 2020-04-16 23:51:34 +0500 | [diff] [blame] | 427 | * Note that the next timer might very well be slightly in the past. |
Willy Tarreau | c49ba52 | 2019-12-11 08:12:23 +0100 | [diff] [blame] | 428 | */ |
| 429 | int next_timer_expiry() |
| 430 | { |
| 431 | struct task_per_thread * const tt = sched; // thread's tasks |
| 432 | struct eb32_node *eb; |
| 433 | int ret = TICK_ETERNITY; |
Willy Tarreau | 6ce0232 | 2020-08-21 05:48:34 +0200 | [diff] [blame] | 434 | __decl_thread(int key = TICK_ETERNITY); |
Willy Tarreau | c49ba52 | 2019-12-11 08:12:23 +0100 | [diff] [blame] | 435 | |
| 436 | /* first check in the thread-local timers */ |
| 437 | eb = eb32_lookup_ge(&tt->timers, now_ms - TIMER_LOOK_BACK); |
| 438 | if (!eb) { |
| 439 | /* we might have reached the end of the tree, typically because |
| 440 | * <now_ms> is in the first half and we're first scanning the last |
| 441 | * half. Let's loop back to the beginning of the tree now. |
| 442 | */ |
| 443 | eb = eb32_first(&tt->timers); |
| 444 | } |
| 445 | |
| 446 | if (eb) |
| 447 | ret = eb->key; |
| 448 | |
| 449 | #ifdef USE_THREAD |
| 450 | if (!eb_is_empty(&timers)) { |
| 451 | HA_RWLOCK_RDLOCK(TASK_WQ_LOCK, &wq_lock); |
| 452 | eb = eb32_lookup_ge(&timers, now_ms - TIMER_LOOK_BACK); |
| 453 | if (!eb) |
| 454 | eb = eb32_first(&timers); |
| 455 | if (eb) |
| 456 | key = eb->key; |
| 457 | HA_RWLOCK_RDUNLOCK(TASK_WQ_LOCK, &wq_lock); |
| 458 | if (eb) |
| 459 | ret = tick_first(ret, key); |
| 460 | } |
| 461 | #endif |
Willy Tarreau | b992ba1 | 2017-11-05 19:09:27 +0100 | [diff] [blame] | 462 | return ret; |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 463 | } |
| 464 | |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 465 | /* Walks over tasklet lists sched->tasklets[0..TL_CLASSES-1] and run at most |
| 466 | * budget[TL_*] of them. Returns the number of entries effectively processed |
| 467 | * (tasks and tasklets merged). The count of tasks in the list for the current |
| 468 | * thread is adjusted. |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 469 | */ |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 470 | unsigned int run_tasks_from_lists(unsigned int budgets[]) |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 471 | { |
Willy Tarreau | 144f84a | 2021-03-02 16:09:26 +0100 | [diff] [blame] | 472 | struct task *(*process)(struct task *t, void *ctx, unsigned int state); |
Willy Tarreau | ba48d5c | 2020-06-24 09:54:24 +0200 | [diff] [blame] | 473 | struct list *tl_queues = sched->tasklets; |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 474 | struct task *t; |
Willy Tarreau | e7723bd | 2020-06-24 11:11:02 +0200 | [diff] [blame] | 475 | uint8_t budget_mask = (1 << TL_CLASSES) - 1; |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 476 | struct sched_activity *profile_entry = NULL; |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 477 | unsigned int done = 0; |
| 478 | unsigned int queue; |
Willy Tarreau | 144f84a | 2021-03-02 16:09:26 +0100 | [diff] [blame] | 479 | unsigned int state; |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 480 | void *ctx; |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 481 | |
| 482 | for (queue = 0; queue < TL_CLASSES;) { |
| 483 | sched->current_queue = queue; |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 484 | |
Willy Tarreau | e7723bd | 2020-06-24 11:11:02 +0200 | [diff] [blame] | 485 | /* global.tune.sched.low-latency is set */ |
| 486 | if (global.tune.options & GTUNE_SCHED_LOW_LATENCY) { |
| 487 | if (unlikely(sched->tl_class_mask & budget_mask & ((1 << queue) - 1))) { |
| 488 | /* a lower queue index has tasks again and still has a |
| 489 | * budget to run them. Let's switch to it now. |
| 490 | */ |
| 491 | queue = (sched->tl_class_mask & 1) ? 0 : |
| 492 | (sched->tl_class_mask & 2) ? 1 : 2; |
| 493 | continue; |
| 494 | } |
| 495 | |
| 496 | if (unlikely(queue > TL_URGENT && |
| 497 | budget_mask & (1 << TL_URGENT) && |
| 498 | !MT_LIST_ISEMPTY(&sched->shared_tasklet_list))) { |
| 499 | /* an urgent tasklet arrived from another thread */ |
| 500 | break; |
| 501 | } |
| 502 | |
| 503 | if (unlikely(queue > TL_NORMAL && |
| 504 | budget_mask & (1 << TL_NORMAL) && |
Willy Tarreau | 2c41d77 | 2021-02-24 16:13:03 +0100 | [diff] [blame] | 505 | (!eb_is_empty(&sched->rqueue) || |
Willy Tarreau | e7723bd | 2020-06-24 11:11:02 +0200 | [diff] [blame] | 506 | (global_tasks_mask & tid_bit)))) { |
| 507 | /* a task was woken up by a bulk tasklet or another thread */ |
| 508 | break; |
| 509 | } |
| 510 | } |
| 511 | |
Willy Tarreau | ba48d5c | 2020-06-24 09:54:24 +0200 | [diff] [blame] | 512 | if (LIST_ISEMPTY(&tl_queues[queue])) { |
| 513 | sched->tl_class_mask &= ~(1 << queue); |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 514 | queue++; |
| 515 | continue; |
Willy Tarreau | ba48d5c | 2020-06-24 09:54:24 +0200 | [diff] [blame] | 516 | } |
| 517 | |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 518 | if (!budgets[queue]) { |
Willy Tarreau | e7723bd | 2020-06-24 11:11:02 +0200 | [diff] [blame] | 519 | budget_mask &= ~(1 << queue); |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 520 | queue++; |
| 521 | continue; |
| 522 | } |
Willy Tarreau | ba48d5c | 2020-06-24 09:54:24 +0200 | [diff] [blame] | 523 | |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 524 | budgets[queue]--; |
Willy Tarreau | ba48d5c | 2020-06-24 09:54:24 +0200 | [diff] [blame] | 525 | t = (struct task *)LIST_ELEM(tl_queues[queue].n, struct tasklet *, list); |
Amaury Denoyelle | 7b36833 | 2021-07-28 16:12:57 +0200 | [diff] [blame^] | 526 | state = t->state & (TASK_SHARED_WQ|TASK_SELF_WAKING|TASK_HEAVY|TASK_F_TASKLET|TASK_KILLED|TASK_F_USR1|TASK_KILLED); |
Willy Tarreau | 74dea8c | 2021-02-26 00:25:51 +0100 | [diff] [blame] | 527 | |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 528 | ti->flags &= ~TI_FL_STUCK; // this thread is still running |
| 529 | activity[tid].ctxsw++; |
| 530 | ctx = t->context; |
| 531 | process = t->process; |
| 532 | t->calls++; |
Willy Tarreau | d23d413 | 2020-01-31 10:39:03 +0100 | [diff] [blame] | 533 | sched->current = t; |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 534 | |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 535 | _HA_ATOMIC_DEC(&sched->rq_total); |
Willy Tarreau | 2da4c31 | 2020-11-30 14:52:11 +0100 | [diff] [blame] | 536 | |
Willy Tarreau | db4e238 | 2021-03-02 15:54:11 +0100 | [diff] [blame] | 537 | if (state & TASK_F_TASKLET) { |
Willy Tarreau | 2a54ffb | 2021-02-25 09:32:58 +0100 | [diff] [blame] | 538 | uint64_t before = 0; |
| 539 | |
Willy Tarreau | 4d6c594 | 2020-11-30 14:58:53 +0100 | [diff] [blame] | 540 | LIST_DEL_INIT(&((struct tasklet *)t)->list); |
| 541 | __ha_barrier_store(); |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 542 | |
| 543 | if (unlikely(task_profiling_mask & tid_bit)) { |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 544 | profile_entry = sched_activity_entry(sched_activity, t->process); |
| 545 | before = now_mono_time(); |
Willy Tarreau | b2285de | 2021-02-25 08:39:07 +0100 | [diff] [blame] | 546 | #ifdef DEBUG_TASK |
Willy Tarreau | 2a54ffb | 2021-02-25 09:32:58 +0100 | [diff] [blame] | 547 | if (((struct tasklet *)t)->call_date) { |
| 548 | HA_ATOMIC_ADD(&profile_entry->lat_time, before - ((struct tasklet *)t)->call_date); |
| 549 | ((struct tasklet *)t)->call_date = 0; |
| 550 | } |
Willy Tarreau | b2285de | 2021-02-25 08:39:07 +0100 | [diff] [blame] | 551 | #endif |
Willy Tarreau | 2a54ffb | 2021-02-25 09:32:58 +0100 | [diff] [blame] | 552 | } |
| 553 | |
| 554 | state = _HA_ATOMIC_XCHG(&t->state, state); |
| 555 | __ha_barrier_atomic_store(); |
| 556 | |
Amaury Denoyelle | 7b36833 | 2021-07-28 16:12:57 +0200 | [diff] [blame^] | 557 | if (likely(!(state & TASK_KILLED))) { |
| 558 | process(t, ctx, state); |
| 559 | } |
| 560 | else { |
| 561 | done++; |
| 562 | sched->current = NULL; |
| 563 | pool_free(pool_head_tasklet, t); |
| 564 | __ha_barrier_store(); |
| 565 | continue; |
| 566 | } |
Willy Tarreau | 2a54ffb | 2021-02-25 09:32:58 +0100 | [diff] [blame] | 567 | |
| 568 | if (unlikely(task_profiling_mask & tid_bit)) { |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 569 | HA_ATOMIC_INC(&profile_entry->calls); |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 570 | HA_ATOMIC_ADD(&profile_entry->cpu_time, now_mono_time() - before); |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 571 | } |
Willy Tarreau | 2a54ffb | 2021-02-25 09:32:58 +0100 | [diff] [blame] | 572 | |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 573 | done++; |
Willy Tarreau | d23d413 | 2020-01-31 10:39:03 +0100 | [diff] [blame] | 574 | sched->current = NULL; |
| 575 | __ha_barrier_store(); |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 576 | continue; |
| 577 | } |
| 578 | |
Willy Tarreau | 4d6c594 | 2020-11-30 14:58:53 +0100 | [diff] [blame] | 579 | LIST_DEL_INIT(&((struct tasklet *)t)->list); |
| 580 | __ha_barrier_store(); |
Willy Tarreau | 6fa8bcd | 2021-03-02 16:26:05 +0100 | [diff] [blame] | 581 | state = _HA_ATOMIC_XCHG(&t->state, state|TASK_RUNNING|TASK_F_USR1); |
Willy Tarreau | 952c264 | 2020-01-31 16:39:30 +0100 | [diff] [blame] | 582 | __ha_barrier_atomic_store(); |
Willy Tarreau | 952c264 | 2020-01-31 16:39:30 +0100 | [diff] [blame] | 583 | |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 584 | /* OK then this is a regular task */ |
| 585 | |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 586 | _HA_ATOMIC_DEC(&task_per_thread[tid].tasks_in_list); |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 587 | if (unlikely(t->call_date)) { |
| 588 | uint64_t now_ns = now_mono_time(); |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 589 | uint64_t lat = now_ns - t->call_date; |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 590 | |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 591 | t->lat_time += lat; |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 592 | t->call_date = now_ns; |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 593 | profile_entry = sched_activity_entry(sched_activity, t->process); |
| 594 | HA_ATOMIC_ADD(&profile_entry->lat_time, lat); |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 595 | HA_ATOMIC_INC(&profile_entry->calls); |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 596 | } |
| 597 | |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 598 | __ha_barrier_store(); |
Willy Tarreau | 8a6049c | 2020-06-30 11:48:48 +0200 | [diff] [blame] | 599 | |
| 600 | /* Note for below: if TASK_KILLED arrived before we've read the state, we |
| 601 | * directly free the task. Otherwise it will be seen after processing and |
| 602 | * it's freed on the exit path. |
| 603 | */ |
| 604 | if (likely(!(state & TASK_KILLED) && process == process_stream)) |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 605 | t = process_stream(t, ctx, state); |
Willy Tarreau | 8a6049c | 2020-06-30 11:48:48 +0200 | [diff] [blame] | 606 | else if (!(state & TASK_KILLED) && process != NULL) |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 607 | t = process(t, ctx, state); |
| 608 | else { |
Willy Tarreau | 273aea4 | 2020-07-17 14:37:51 +0200 | [diff] [blame] | 609 | task_unlink_wq(t); |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 610 | __task_free(t); |
| 611 | sched->current = NULL; |
| 612 | __ha_barrier_store(); |
| 613 | /* We don't want max_processed to be decremented if |
| 614 | * we're just freeing a destroyed task, we should only |
| 615 | * do so if we really ran a task. |
| 616 | */ |
| 617 | continue; |
| 618 | } |
| 619 | sched->current = NULL; |
| 620 | __ha_barrier_store(); |
| 621 | /* If there is a pending state we have to wake up the task |
| 622 | * immediately, else we defer it into wait queue |
| 623 | */ |
| 624 | if (t != NULL) { |
| 625 | if (unlikely(t->call_date)) { |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 626 | uint64_t cpu = now_mono_time() - t->call_date; |
| 627 | |
| 628 | t->cpu_time += cpu; |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 629 | t->call_date = 0; |
Willy Tarreau | 4e2282f | 2021-01-29 00:07:40 +0100 | [diff] [blame] | 630 | HA_ATOMIC_ADD(&profile_entry->cpu_time, cpu); |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 631 | } |
| 632 | |
Willy Tarreau | 1db4273 | 2021-04-06 11:44:07 +0200 | [diff] [blame] | 633 | state = _HA_ATOMIC_AND_FETCH(&t->state, ~TASK_RUNNING); |
Willy Tarreau | 8a6049c | 2020-06-30 11:48:48 +0200 | [diff] [blame] | 634 | if (unlikely(state & TASK_KILLED)) { |
Willy Tarreau | 273aea4 | 2020-07-17 14:37:51 +0200 | [diff] [blame] | 635 | task_unlink_wq(t); |
Willy Tarreau | 8a6049c | 2020-06-30 11:48:48 +0200 | [diff] [blame] | 636 | __task_free(t); |
| 637 | } |
| 638 | else if (state & TASK_WOKEN_ANY) |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 639 | task_wakeup(t, 0); |
| 640 | else |
| 641 | task_queue(t); |
| 642 | } |
| 643 | done++; |
| 644 | } |
Willy Tarreau | ba48d5c | 2020-06-24 09:54:24 +0200 | [diff] [blame] | 645 | sched->current_queue = -1; |
Willy Tarreau | 116ef22 | 2020-06-23 16:35:38 +0200 | [diff] [blame] | 646 | |
Willy Tarreau | 4ffa0b5 | 2020-01-30 18:13:13 +0100 | [diff] [blame] | 647 | return done; |
| 648 | } |
| 649 | |
Willy Tarreau | 58b458d | 2008-06-29 22:40:23 +0200 | [diff] [blame] | 650 | /* The run queue is chronologically sorted in a tree. An insertion counter is |
| 651 | * used to assign a position to each task. This counter may be combined with |
| 652 | * other variables (eg: nice value) to set the final position in the tree. The |
| 653 | * counter may wrap without a problem, of course. We then limit the number of |
Christopher Faulet | 8a48f67 | 2017-11-14 10:38:36 +0100 | [diff] [blame] | 654 | * tasks processed to 200 in any case, so that general latency remains low and |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 655 | * so that task positions have a chance to be considered. The function scans |
| 656 | * both the global and local run queues and picks the most urgent task between |
| 657 | * the two. We need to grab the global runqueue lock to touch it so it's taken |
| 658 | * on the very first access to the global run queue and is released as soon as |
| 659 | * it reaches the end. |
Willy Tarreau | 58b458d | 2008-06-29 22:40:23 +0200 | [diff] [blame] | 660 | * |
| 661 | * The function adjusts <next> if a new event is closer. |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 662 | */ |
Thierry FOURNIER | 9cf7c4b | 2014-12-15 13:26:01 +0100 | [diff] [blame] | 663 | void process_runnable_tasks() |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 664 | { |
Willy Tarreau | d022e9c | 2019-09-24 08:25:15 +0200 | [diff] [blame] | 665 | struct task_per_thread * const tt = sched; |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 666 | struct eb32sc_node *lrq; // next local run queue entry |
| 667 | struct eb32sc_node *grq; // next global run queue entry |
Willy Tarreau | 964c936 | 2007-01-07 00:38:00 +0100 | [diff] [blame] | 668 | struct task *t; |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 669 | const unsigned int default_weights[TL_CLASSES] = { |
| 670 | [TL_URGENT] = 64, // ~50% of CPU bandwidth for I/O |
| 671 | [TL_NORMAL] = 48, // ~37% of CPU bandwidth for tasks |
| 672 | [TL_BULK] = 16, // ~13% of CPU bandwidth for self-wakers |
Willy Tarreau | 401135c | 2021-02-26 09:16:22 +0100 | [diff] [blame] | 673 | [TL_HEAVY] = 1, // never more than 1 heavy task at once |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 674 | }; |
| 675 | unsigned int max[TL_CLASSES]; // max to be run per class |
| 676 | unsigned int max_total; // sum of max above |
Olivier Houchard | 0691046 | 2019-10-11 16:35:01 +0200 | [diff] [blame] | 677 | struct mt_list *tmp_list; |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 678 | unsigned int queue; |
| 679 | int max_processed; |
Willy Tarreau | e7923c1 | 2021-02-25 07:09:08 +0100 | [diff] [blame] | 680 | int lpicked, gpicked; |
Willy Tarreau | 76390da | 2021-02-26 10:18:11 +0100 | [diff] [blame] | 681 | int heavy_queued = 0; |
Willy Tarreau | c309dbd | 2020-11-30 15:39:00 +0100 | [diff] [blame] | 682 | int budget; |
Christopher Faulet | 3911ee8 | 2017-11-14 10:26:53 +0100 | [diff] [blame] | 683 | |
Willy Tarreau | e6a02fa | 2019-05-22 07:06:44 +0200 | [diff] [blame] | 684 | ti->flags &= ~TI_FL_STUCK; // this thread is still running |
| 685 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 686 | if (!thread_has_tasks()) { |
| 687 | activity[tid].empty_rq++; |
| 688 | return; |
| 689 | } |
| 690 | |
Willy Tarreau | 5c8be27 | 2020-06-19 12:17:55 +0200 | [diff] [blame] | 691 | max_processed = global.tune.runqueue_depth; |
| 692 | |
| 693 | if (likely(niced_tasks)) |
| 694 | max_processed = (max_processed + 3) / 4; |
| 695 | |
Willy Tarreau | 1691ba3 | 2021-03-10 09:26:24 +0100 | [diff] [blame] | 696 | if (max_processed < sched->rq_total && sched->rq_total <= 2*max_processed) { |
| 697 | /* If the run queue exceeds the budget by up to 50%, let's cut it |
| 698 | * into two identical halves to improve latency. |
| 699 | */ |
| 700 | max_processed = sched->rq_total / 2; |
| 701 | } |
| 702 | |
Willy Tarreau | 5c8be27 | 2020-06-19 12:17:55 +0200 | [diff] [blame] | 703 | not_done_yet: |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 704 | max[TL_URGENT] = max[TL_NORMAL] = max[TL_BULK] = 0; |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 705 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 706 | /* urgent tasklets list gets a default weight of ~50% */ |
Willy Tarreau | 49f90bf | 2020-06-24 09:39:48 +0200 | [diff] [blame] | 707 | if ((tt->tl_class_mask & (1 << TL_URGENT)) || |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 708 | !MT_LIST_ISEMPTY(&tt->shared_tasklet_list)) |
| 709 | max[TL_URGENT] = default_weights[TL_URGENT]; |
Willy Tarreau | a62917b | 2020-01-30 18:37:28 +0100 | [diff] [blame] | 710 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 711 | /* normal tasklets list gets a default weight of ~37% */ |
Willy Tarreau | 49f90bf | 2020-06-24 09:39:48 +0200 | [diff] [blame] | 712 | if ((tt->tl_class_mask & (1 << TL_NORMAL)) || |
Willy Tarreau | 2c41d77 | 2021-02-24 16:13:03 +0100 | [diff] [blame] | 713 | !eb_is_empty(&sched->rqueue) || (global_tasks_mask & tid_bit)) |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 714 | max[TL_NORMAL] = default_weights[TL_NORMAL]; |
Willy Tarreau | a62917b | 2020-01-30 18:37:28 +0100 | [diff] [blame] | 715 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 716 | /* bulk tasklets list gets a default weight of ~13% */ |
Willy Tarreau | 49f90bf | 2020-06-24 09:39:48 +0200 | [diff] [blame] | 717 | if ((tt->tl_class_mask & (1 << TL_BULK))) |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 718 | max[TL_BULK] = default_weights[TL_BULK]; |
| 719 | |
Willy Tarreau | 401135c | 2021-02-26 09:16:22 +0100 | [diff] [blame] | 720 | /* heavy tasks are processed only once and never refilled in a |
Willy Tarreau | 76390da | 2021-02-26 10:18:11 +0100 | [diff] [blame] | 721 | * call round. That budget is not lost either as we don't reset |
| 722 | * it unless consumed. |
Willy Tarreau | 401135c | 2021-02-26 09:16:22 +0100 | [diff] [blame] | 723 | */ |
Willy Tarreau | 76390da | 2021-02-26 10:18:11 +0100 | [diff] [blame] | 724 | if (!heavy_queued) { |
| 725 | if ((tt->tl_class_mask & (1 << TL_HEAVY))) |
| 726 | max[TL_HEAVY] = default_weights[TL_HEAVY]; |
| 727 | else |
| 728 | max[TL_HEAVY] = 0; |
| 729 | heavy_queued = 1; |
| 730 | } |
Willy Tarreau | 401135c | 2021-02-26 09:16:22 +0100 | [diff] [blame] | 731 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 732 | /* Now compute a fair share of the weights. Total may slightly exceed |
Willy Tarreau | 1553b66 | 2020-06-30 13:46:21 +0200 | [diff] [blame] | 733 | * 100% due to rounding, this is not a problem. Note that while in |
| 734 | * theory the sum cannot be NULL as we cannot get there without tasklets |
| 735 | * to process, in practice it seldom happens when multiple writers |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 736 | * conflict and rollback on MT_LIST_TRY_APPEND(shared_tasklet_list), causing |
Willy Tarreau | 1553b66 | 2020-06-30 13:46:21 +0200 | [diff] [blame] | 737 | * a first MT_LIST_ISEMPTY() to succeed for thread_has_task() and the |
| 738 | * one above to finally fail. This is extremely rare and not a problem. |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 739 | */ |
Willy Tarreau | 401135c | 2021-02-26 09:16:22 +0100 | [diff] [blame] | 740 | max_total = max[TL_URGENT] + max[TL_NORMAL] + max[TL_BULK] + max[TL_HEAVY]; |
Willy Tarreau | 1553b66 | 2020-06-30 13:46:21 +0200 | [diff] [blame] | 741 | if (!max_total) |
| 742 | return; |
| 743 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 744 | for (queue = 0; queue < TL_CLASSES; queue++) |
| 745 | max[queue] = ((unsigned)max_processed * max[queue] + max_total - 1) / max_total; |
| 746 | |
Willy Tarreau | 76390da | 2021-02-26 10:18:11 +0100 | [diff] [blame] | 747 | /* The heavy queue must never process more than one task at once |
| 748 | * anyway. |
| 749 | */ |
| 750 | if (max[TL_HEAVY] > 1) |
| 751 | max[TL_HEAVY] = 1; |
| 752 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 753 | lrq = grq = NULL; |
Christopher Faulet | 8a48f67 | 2017-11-14 10:38:36 +0100 | [diff] [blame] | 754 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 755 | /* pick up to max[TL_NORMAL] regular tasks from prio-ordered run queues */ |
| 756 | /* Note: the grq lock is always held when grq is not null */ |
Willy Tarreau | e7923c1 | 2021-02-25 07:09:08 +0100 | [diff] [blame] | 757 | lpicked = gpicked = 0; |
Willy Tarreau | 1f3b141 | 2021-02-24 14:13:40 +0100 | [diff] [blame] | 758 | budget = max[TL_NORMAL] - tt->tasks_in_list; |
Willy Tarreau | e7923c1 | 2021-02-25 07:09:08 +0100 | [diff] [blame] | 759 | while (lpicked + gpicked < budget) { |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 760 | if ((global_tasks_mask & tid_bit) && !grq) { |
Willy Tarreau | 3466e3c | 2019-04-15 18:52:40 +0200 | [diff] [blame] | 761 | #ifdef USE_THREAD |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 762 | HA_SPIN_LOCK(TASK_RQ_LOCK, &rq_lock); |
Willy Tarreau | c6ba9a0 | 2021-02-20 12:49:54 +0100 | [diff] [blame] | 763 | grq = eb32sc_lookup_ge(&rqueue, global_rqueue_ticks - TIMER_LOOK_BACK, tid_bit); |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 764 | if (unlikely(!grq)) { |
| 765 | grq = eb32sc_first(&rqueue, tid_bit); |
| 766 | if (!grq) { |
Olivier Houchard | de82aea | 2019-04-17 19:10:22 +0200 | [diff] [blame] | 767 | global_tasks_mask &= ~tid_bit; |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 768 | HA_SPIN_UNLOCK(TASK_RQ_LOCK, &rq_lock); |
Olivier Houchard | c4aac9e | 2018-07-26 15:25:49 +0200 | [diff] [blame] | 769 | } |
Willy Tarreau | f0c531a | 2017-11-05 16:35:59 +0100 | [diff] [blame] | 770 | } |
Willy Tarreau | 3466e3c | 2019-04-15 18:52:40 +0200 | [diff] [blame] | 771 | #endif |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 772 | } |
Willy Tarreau | f0c531a | 2017-11-05 16:35:59 +0100 | [diff] [blame] | 773 | |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 774 | /* If a global task is available for this thread, it's in grq |
| 775 | * now and the global RQ is locked. |
| 776 | */ |
Olivier Houchard | f6e6dc1 | 2018-05-18 18:38:23 +0200 | [diff] [blame] | 777 | |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 778 | if (!lrq) { |
Willy Tarreau | c6ba9a0 | 2021-02-20 12:49:54 +0100 | [diff] [blame] | 779 | lrq = eb32sc_lookup_ge(&tt->rqueue, tt->rqueue_ticks - TIMER_LOOK_BACK, tid_bit); |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 780 | if (unlikely(!lrq)) |
Willy Tarreau | 4c1e1ad | 2019-09-24 07:19:08 +0200 | [diff] [blame] | 781 | lrq = eb32sc_first(&tt->rqueue, tid_bit); |
Willy Tarreau | f0c531a | 2017-11-05 16:35:59 +0100 | [diff] [blame] | 782 | } |
Willy Tarreau | f0c531a | 2017-11-05 16:35:59 +0100 | [diff] [blame] | 783 | |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 784 | if (!lrq && !grq) |
| 785 | break; |
| 786 | |
| 787 | if (likely(!grq || (lrq && (int)(lrq->key - grq->key) <= 0))) { |
| 788 | t = eb32sc_entry(lrq, struct task, rq); |
| 789 | lrq = eb32sc_next(lrq, tid_bit); |
Willy Tarreau | 2b363ac | 2021-02-25 07:14:58 +0100 | [diff] [blame] | 790 | eb32sc_delete(&t->rq); |
Willy Tarreau | e7923c1 | 2021-02-25 07:09:08 +0100 | [diff] [blame] | 791 | lpicked++; |
Olivier Houchard | f6e6dc1 | 2018-05-18 18:38:23 +0200 | [diff] [blame] | 792 | } |
Willy Tarreau | 3466e3c | 2019-04-15 18:52:40 +0200 | [diff] [blame] | 793 | #ifdef USE_THREAD |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 794 | else { |
| 795 | t = eb32sc_entry(grq, struct task, rq); |
| 796 | grq = eb32sc_next(grq, tid_bit); |
Willy Tarreau | 2b363ac | 2021-02-25 07:14:58 +0100 | [diff] [blame] | 797 | _HA_ATOMIC_AND(&t->state, ~TASK_GLOBAL); |
| 798 | eb32sc_delete(&t->rq); |
| 799 | |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 800 | if (unlikely(!grq)) { |
| 801 | grq = eb32sc_first(&rqueue, tid_bit); |
| 802 | if (!grq) { |
Olivier Houchard | de82aea | 2019-04-17 19:10:22 +0200 | [diff] [blame] | 803 | global_tasks_mask &= ~tid_bit; |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 804 | HA_SPIN_UNLOCK(TASK_RQ_LOCK, &rq_lock); |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 805 | } |
| 806 | } |
Willy Tarreau | e7923c1 | 2021-02-25 07:09:08 +0100 | [diff] [blame] | 807 | gpicked++; |
Emeric Brun | 0194897 | 2017-03-30 15:37:25 +0200 | [diff] [blame] | 808 | } |
Willy Tarreau | 3466e3c | 2019-04-15 18:52:40 +0200 | [diff] [blame] | 809 | #endif |
Willy Tarreau | 2b363ac | 2021-02-25 07:14:58 +0100 | [diff] [blame] | 810 | if (t->nice) |
Willy Tarreau | 4781b15 | 2021-04-06 13:53:36 +0200 | [diff] [blame] | 811 | _HA_ATOMIC_DEC(&niced_tasks); |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 812 | |
Willy Tarreau | a868c29 | 2020-11-30 15:30:22 +0100 | [diff] [blame] | 813 | /* Add it to the local task list */ |
Willy Tarreau | 2b71810 | 2021-04-21 07:32:39 +0200 | [diff] [blame] | 814 | LIST_APPEND(&tt->tasklets[TL_NORMAL], &((struct tasklet *)t)->list); |
Olivier Houchard | b0bdae7 | 2018-05-18 18:45:28 +0200 | [diff] [blame] | 815 | } |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 816 | |
| 817 | /* release the rqueue lock */ |
| 818 | if (grq) { |
| 819 | HA_SPIN_UNLOCK(TASK_RQ_LOCK, &rq_lock); |
| 820 | grq = NULL; |
| 821 | } |
| 822 | |
Willy Tarreau | e7923c1 | 2021-02-25 07:09:08 +0100 | [diff] [blame] | 823 | if (lpicked + gpicked) { |
Willy Tarreau | c309dbd | 2020-11-30 15:39:00 +0100 | [diff] [blame] | 824 | tt->tl_class_mask |= 1 << TL_NORMAL; |
Willy Tarreau | e7923c1 | 2021-02-25 07:09:08 +0100 | [diff] [blame] | 825 | _HA_ATOMIC_ADD(&tt->tasks_in_list, lpicked + gpicked); |
Willy Tarreau | b7e0c63 | 2021-03-09 09:59:50 +0100 | [diff] [blame] | 826 | #ifdef USE_THREAD |
Willy Tarreau | 45499c5 | 2021-02-25 07:51:18 +0100 | [diff] [blame] | 827 | if (gpicked) { |
| 828 | _HA_ATOMIC_SUB(&grq_total, gpicked); |
Willy Tarreau | c9afbb1 | 2021-02-25 07:19:45 +0100 | [diff] [blame] | 829 | _HA_ATOMIC_ADD(&tt->rq_total, gpicked); |
Willy Tarreau | 45499c5 | 2021-02-25 07:51:18 +0100 | [diff] [blame] | 830 | } |
Willy Tarreau | b7e0c63 | 2021-03-09 09:59:50 +0100 | [diff] [blame] | 831 | #endif |
Willy Tarreau | e7923c1 | 2021-02-25 07:09:08 +0100 | [diff] [blame] | 832 | activity[tid].tasksw += lpicked + gpicked; |
Willy Tarreau | c309dbd | 2020-11-30 15:39:00 +0100 | [diff] [blame] | 833 | } |
| 834 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 835 | /* Merge the list of tasklets waken up by other threads to the |
| 836 | * main list. |
| 837 | */ |
| 838 | tmp_list = MT_LIST_BEHEAD(&tt->shared_tasklet_list); |
Willy Tarreau | 49f90bf | 2020-06-24 09:39:48 +0200 | [diff] [blame] | 839 | if (tmp_list) { |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 840 | LIST_SPLICE_END_DETACHED(&tt->tasklets[TL_URGENT], (struct list *)tmp_list); |
Willy Tarreau | 49f90bf | 2020-06-24 09:39:48 +0200 | [diff] [blame] | 841 | if (!LIST_ISEMPTY(&tt->tasklets[TL_URGENT])) |
| 842 | tt->tl_class_mask |= 1 << TL_URGENT; |
| 843 | } |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 844 | |
Willy Tarreau | 3ef7a19 | 2020-06-24 07:21:08 +0200 | [diff] [blame] | 845 | /* execute tasklets in each queue */ |
Willy Tarreau | 59153fe | 2020-06-24 10:17:29 +0200 | [diff] [blame] | 846 | max_processed -= run_tasks_from_lists(max); |
Willy Tarreau | a62917b | 2020-01-30 18:37:28 +0100 | [diff] [blame] | 847 | |
Willy Tarreau | 5c8be27 | 2020-06-19 12:17:55 +0200 | [diff] [blame] | 848 | /* some tasks may have woken other ones up */ |
Willy Tarreau | 0c0c85e | 2020-06-23 11:32:35 +0200 | [diff] [blame] | 849 | if (max_processed > 0 && thread_has_tasks()) |
Willy Tarreau | 5c8be27 | 2020-06-19 12:17:55 +0200 | [diff] [blame] | 850 | goto not_done_yet; |
| 851 | |
Willy Tarreau | 49f90bf | 2020-06-24 09:39:48 +0200 | [diff] [blame] | 852 | if (tt->tl_class_mask) |
Willy Tarreau | cde7902 | 2019-04-12 18:03:41 +0200 | [diff] [blame] | 853 | activity[tid].long_rq++; |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 854 | } |
| 855 | |
Willy Tarreau | 64e6012 | 2019-07-12 08:31:17 +0200 | [diff] [blame] | 856 | /* create a work list array for <nbthread> threads, using tasks made of |
| 857 | * function <fct>. The context passed to the function will be the pointer to |
| 858 | * the thread's work list, which will contain a copy of argument <arg>. The |
| 859 | * wake up reason will be TASK_WOKEN_OTHER. The pointer to the work_list array |
| 860 | * is returned on success, otherwise NULL on failure. |
| 861 | */ |
| 862 | struct work_list *work_list_create(int nbthread, |
Willy Tarreau | 144f84a | 2021-03-02 16:09:26 +0100 | [diff] [blame] | 863 | struct task *(*fct)(struct task *, void *, unsigned int), |
Willy Tarreau | 64e6012 | 2019-07-12 08:31:17 +0200 | [diff] [blame] | 864 | void *arg) |
| 865 | { |
| 866 | struct work_list *wl; |
| 867 | int i; |
| 868 | |
| 869 | wl = calloc(nbthread, sizeof(*wl)); |
| 870 | if (!wl) |
| 871 | goto fail; |
| 872 | |
| 873 | for (i = 0; i < nbthread; i++) { |
Olivier Houchard | 859dc80 | 2019-08-08 15:47:21 +0200 | [diff] [blame] | 874 | MT_LIST_INIT(&wl[i].head); |
Willy Tarreau | 64e6012 | 2019-07-12 08:31:17 +0200 | [diff] [blame] | 875 | wl[i].task = task_new(1UL << i); |
| 876 | if (!wl[i].task) |
| 877 | goto fail; |
| 878 | wl[i].task->process = fct; |
| 879 | wl[i].task->context = &wl[i]; |
| 880 | wl[i].arg = arg; |
| 881 | } |
| 882 | return wl; |
| 883 | |
| 884 | fail: |
| 885 | work_list_destroy(wl, nbthread); |
| 886 | return NULL; |
| 887 | } |
| 888 | |
| 889 | /* destroy work list <work> */ |
| 890 | void work_list_destroy(struct work_list *work, int nbthread) |
| 891 | { |
| 892 | int t; |
| 893 | |
| 894 | if (!work) |
| 895 | return; |
| 896 | for (t = 0; t < nbthread; t++) |
| 897 | task_destroy(work[t].task); |
| 898 | free(work); |
| 899 | } |
| 900 | |
William Lallemand | 27f3fa5 | 2018-12-06 14:05:20 +0100 | [diff] [blame] | 901 | /* |
| 902 | * Delete every tasks before running the master polling loop |
| 903 | */ |
| 904 | void mworker_cleantasks() |
| 905 | { |
| 906 | struct task *t; |
| 907 | int i; |
William Lallemand | b582339 | 2018-12-06 15:14:37 +0100 | [diff] [blame] | 908 | struct eb32_node *tmp_wq = NULL; |
| 909 | struct eb32sc_node *tmp_rq = NULL; |
William Lallemand | 27f3fa5 | 2018-12-06 14:05:20 +0100 | [diff] [blame] | 910 | |
| 911 | #ifdef USE_THREAD |
| 912 | /* cleanup the global run queue */ |
William Lallemand | b582339 | 2018-12-06 15:14:37 +0100 | [diff] [blame] | 913 | tmp_rq = eb32sc_first(&rqueue, MAX_THREADS_MASK); |
| 914 | while (tmp_rq) { |
| 915 | t = eb32sc_entry(tmp_rq, struct task, rq); |
| 916 | tmp_rq = eb32sc_next(tmp_rq, MAX_THREADS_MASK); |
Olivier Houchard | 3f795f7 | 2019-04-17 22:51:06 +0200 | [diff] [blame] | 917 | task_destroy(t); |
William Lallemand | 27f3fa5 | 2018-12-06 14:05:20 +0100 | [diff] [blame] | 918 | } |
| 919 | /* cleanup the timers queue */ |
William Lallemand | b582339 | 2018-12-06 15:14:37 +0100 | [diff] [blame] | 920 | tmp_wq = eb32_first(&timers); |
| 921 | while (tmp_wq) { |
| 922 | t = eb32_entry(tmp_wq, struct task, wq); |
| 923 | tmp_wq = eb32_next(tmp_wq); |
Olivier Houchard | 3f795f7 | 2019-04-17 22:51:06 +0200 | [diff] [blame] | 924 | task_destroy(t); |
William Lallemand | 27f3fa5 | 2018-12-06 14:05:20 +0100 | [diff] [blame] | 925 | } |
| 926 | #endif |
| 927 | /* clean the per thread run queue */ |
| 928 | for (i = 0; i < global.nbthread; i++) { |
William Lallemand | b582339 | 2018-12-06 15:14:37 +0100 | [diff] [blame] | 929 | tmp_rq = eb32sc_first(&task_per_thread[i].rqueue, MAX_THREADS_MASK); |
| 930 | while (tmp_rq) { |
| 931 | t = eb32sc_entry(tmp_rq, struct task, rq); |
| 932 | tmp_rq = eb32sc_next(tmp_rq, MAX_THREADS_MASK); |
Olivier Houchard | 3f795f7 | 2019-04-17 22:51:06 +0200 | [diff] [blame] | 933 | task_destroy(t); |
William Lallemand | 27f3fa5 | 2018-12-06 14:05:20 +0100 | [diff] [blame] | 934 | } |
| 935 | /* cleanup the per thread timers queue */ |
William Lallemand | b582339 | 2018-12-06 15:14:37 +0100 | [diff] [blame] | 936 | tmp_wq = eb32_first(&task_per_thread[i].timers); |
| 937 | while (tmp_wq) { |
| 938 | t = eb32_entry(tmp_wq, struct task, wq); |
| 939 | tmp_wq = eb32_next(tmp_wq); |
Olivier Houchard | 3f795f7 | 2019-04-17 22:51:06 +0200 | [diff] [blame] | 940 | task_destroy(t); |
William Lallemand | 27f3fa5 | 2018-12-06 14:05:20 +0100 | [diff] [blame] | 941 | } |
| 942 | } |
| 943 | } |
| 944 | |
Willy Tarreau | b6b3df3 | 2018-11-26 16:31:20 +0100 | [diff] [blame] | 945 | /* perform minimal intializations */ |
| 946 | static void init_task() |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 947 | { |
Willy Tarreau | 401135c | 2021-02-26 09:16:22 +0100 | [diff] [blame] | 948 | int i, q; |
Olivier Houchard | f6e6dc1 | 2018-05-18 18:38:23 +0200 | [diff] [blame] | 949 | |
Olivier Houchard | b1ca58b | 2018-06-06 14:22:03 +0200 | [diff] [blame] | 950 | #ifdef USE_THREAD |
Willy Tarreau | b20aa9e | 2018-10-15 14:52:21 +0200 | [diff] [blame] | 951 | memset(&timers, 0, sizeof(timers)); |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 952 | memset(&rqueue, 0, sizeof(rqueue)); |
Olivier Houchard | b1ca58b | 2018-06-06 14:22:03 +0200 | [diff] [blame] | 953 | #endif |
Willy Tarreau | 8d8747a | 2018-10-15 16:12:48 +0200 | [diff] [blame] | 954 | memset(&task_per_thread, 0, sizeof(task_per_thread)); |
Olivier Houchard | b0bdae7 | 2018-05-18 18:45:28 +0200 | [diff] [blame] | 955 | for (i = 0; i < MAX_THREADS; i++) { |
Willy Tarreau | 401135c | 2021-02-26 09:16:22 +0100 | [diff] [blame] | 956 | for (q = 0; q < TL_CLASSES; q++) |
| 957 | LIST_INIT(&task_per_thread[i].tasklets[q]); |
Olivier Houchard | 0691046 | 2019-10-11 16:35:01 +0200 | [diff] [blame] | 958 | MT_LIST_INIT(&task_per_thread[i].shared_tasklet_list); |
Olivier Houchard | b0bdae7 | 2018-05-18 18:45:28 +0200 | [diff] [blame] | 959 | } |
Willy Tarreau | 4726f53 | 2009-03-07 17:25:21 +0100 | [diff] [blame] | 960 | } |
| 961 | |
Willy Tarreau | e7723bd | 2020-06-24 11:11:02 +0200 | [diff] [blame] | 962 | /* config parser for global "tune.sched.low-latency", accepts "on" or "off" */ |
| 963 | static int cfg_parse_tune_sched_low_latency(char **args, int section_type, struct proxy *curpx, |
Willy Tarreau | 0182516 | 2021-03-09 09:53:46 +0100 | [diff] [blame] | 964 | const struct proxy *defpx, const char *file, int line, |
Willy Tarreau | e7723bd | 2020-06-24 11:11:02 +0200 | [diff] [blame] | 965 | char **err) |
| 966 | { |
| 967 | if (too_many_args(1, args, err, NULL)) |
| 968 | return -1; |
| 969 | |
| 970 | if (strcmp(args[1], "on") == 0) |
| 971 | global.tune.options |= GTUNE_SCHED_LOW_LATENCY; |
| 972 | else if (strcmp(args[1], "off") == 0) |
| 973 | global.tune.options &= ~GTUNE_SCHED_LOW_LATENCY; |
| 974 | else { |
| 975 | memprintf(err, "'%s' expects either 'on' or 'off' but got '%s'.", args[0], args[1]); |
| 976 | return -1; |
| 977 | } |
| 978 | return 0; |
| 979 | } |
| 980 | |
| 981 | /* config keyword parsers */ |
| 982 | static struct cfg_kw_list cfg_kws = {ILH, { |
| 983 | { CFG_GLOBAL, "tune.sched.low-latency", cfg_parse_tune_sched_low_latency }, |
| 984 | { 0, NULL, NULL } |
| 985 | }}; |
| 986 | |
| 987 | INITCALL1(STG_REGISTER, cfg_register_keywords, &cfg_kws); |
Willy Tarreau | b6b3df3 | 2018-11-26 16:31:20 +0100 | [diff] [blame] | 988 | INITCALL0(STG_PREPARE, init_task); |
| 989 | |
Willy Tarreau | baaee00 | 2006-06-26 02:48:02 +0200 | [diff] [blame] | 990 | /* |
| 991 | * Local variables: |
| 992 | * c-indent-level: 8 |
| 993 | * c-basic-offset: 8 |
| 994 | * End: |
| 995 | */ |