scheduler.c 30.2 KB
Newer Older
1
/*
mysterywolf's avatar
mysterywolf 已提交
2
 * Copyright (c) 2006-2021, RT-Thread Development Team
B
Bernard Xiong 已提交
3
 *
4
 * SPDX-License-Identifier: Apache-2.0
5 6 7 8 9 10
 *
 * Change Logs:
 * Date           Author       Notes
 * 2006-03-17     Bernard      the first version
 * 2006-04-28     Bernard      fix the scheduler algorthm
 * 2006-04-30     Bernard      add SCHEDULER_DEBUG
11 12
 * 2006-05-27     Bernard      fix the scheduler algorthm for same priority
 *                             thread schedule
13 14 15 16 17
 * 2006-06-04     Bernard      rewrite the scheduler algorithm
 * 2006-08-03     Bernard      add hook support
 * 2006-09-05     Bernard      add 32 priority level support
 * 2006-09-24     Bernard      add rt_system_scheduler_start function
 * 2009-09-16     Bernard      fix _rt_scheduler_stack_check
18
 * 2010-04-11     yi.qiu       add module feature
19
 * 2010-07-13     Bernard      fix the maximal number of rt_scheduler_lock_nest
20
 *                             issue found by kuronca
21
 * 2010-12-13     Bernard      add defunct list initialization even if not use heap.
B
bernard.xiong@gmail.com 已提交
22
 * 2011-05-10     Bernard      clean scheduler debug log.
23
 * 2013-12-21     Grissiom     add rt_critical_level
S
shaojinchun 已提交
24 25
 * 2018-11-22     Jesven       remove the current task from ready queue
 *                             add per cpu ready queue
mysterywolf's avatar
mysterywolf 已提交
26
 *                             add _scheduler_get_highest_priority_thread to find highest priority task
S
shaojinchun 已提交
27 28 29 30
 *                             rt_schedule_insert_thread won't insert current task to ready queue
 *                             in smp version, rt_hw_context_switch_interrupt maybe switch to
 *                               new task directly
 *
31 32 33 34 35 36
 */

#include <rtthread.h>
#include <rthw.h>

rt_list_t rt_thread_priority_table[RT_THREAD_PRIORITY_MAX];
S
shaojinchun 已提交
37
rt_uint32_t rt_thread_ready_priority_group;
38
#if RT_THREAD_PRIORITY_MAX > 32
39
/* Maximum priority level, 256 */
40
rt_uint8_t rt_thread_ready_table[32];
41
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
42

S
shaojinchun 已提交
43 44 45
#ifndef RT_USING_SMP
extern volatile rt_uint8_t rt_interrupt_nest;
static rt_int16_t rt_scheduler_lock_nest;
46
struct rt_thread *rt_current_thread = RT_NULL;
S
shaojinchun 已提交
47
rt_uint8_t rt_current_priority;
48
#endif /* RT_USING_SMP */
S
shaojinchun 已提交
49

50
#ifdef RT_USING_HOOK
D
dzzxzz 已提交
51
static void (*rt_scheduler_hook)(struct rt_thread *from, struct rt_thread *to);
F
fenghuijie 已提交
52
static void (*rt_scheduler_switch_hook)(struct rt_thread *tid);
53 54 55 56

/**
 * @addtogroup Hook
 */
D
dzzxzz 已提交
57

D
dogandog 已提交
58
/**@{*/
59 60

/**
61 62
 * @brief This function will set a hook function, which will be invoked when thread
 *        switch happens.
63
 *
64
 * @param hook the hook function.
65
 */
66
void rt_scheduler_sethook(void (*hook)(struct rt_thread *from, struct rt_thread *to))
67
{
68
    rt_scheduler_hook = hook;
69 70
}

71 72 73 74 75 76 77
/**
 * @brief This function will set a hook function, which will be invoked when context
 *        switch happens.
 *
 * @param hook the hook function.
 */
void rt_scheduler_switch_sethook(void (*hook)(struct rt_thread *tid))
F
fenghuijie 已提交
78 79 80 81
{
    rt_scheduler_switch_hook = hook;
}

D
dogandog 已提交
82
/**@}*/
83
#endif /* RT_USING_HOOK */
84 85

#ifdef RT_USING_OVERFLOW_CHECK
D
dzzxzz 已提交
86
static void _rt_scheduler_stack_check(struct rt_thread *thread)
87
{
88 89
    RT_ASSERT(thread != RT_NULL);

90
#ifdef ARCH_CPU_STACK_GROWS_UPWARD
91
    if (*((rt_uint8_t *)((rt_ubase_t)thread->stack_addr + thread->stack_size - 1)) != '#' ||
Z
zhaohengbo 已提交
92
#else
A
Aubr.Cool 已提交
93
    if (*((rt_uint8_t *)thread->stack_addr) != '#' ||
94
#endif /* ARCH_CPU_STACK_GROWS_UPWARD */
B
Bernard Xiong 已提交
95 96 97
        (rt_ubase_t)thread->sp <= (rt_ubase_t)thread->stack_addr ||
        (rt_ubase_t)thread->sp >
        (rt_ubase_t)thread->stack_addr + (rt_ubase_t)thread->stack_size)
98
    {
B
Bernard Xiong 已提交
99
        rt_ubase_t level;
100 101

        rt_kprintf("thread:%s stack overflow\n", thread->name);
102

103 104 105
        level = rt_hw_interrupt_disable();
        while (level);
    }
106
#ifdef ARCH_CPU_STACK_GROWS_UPWARD
107 108 109 110 111 112
    else if ((rt_ubase_t)thread->sp > ((rt_ubase_t)thread->stack_addr + thread->stack_size))
    {
        rt_kprintf("warning: %s stack is close to the top of stack address.\n",
                   thread->name);
    }
#else
S
shaojinchun 已提交
113
    else if ((rt_ubase_t)thread->sp <= ((rt_ubase_t)thread->stack_addr + 32))
114
    {
S
shaojinchun 已提交
115
        rt_kprintf("warning: %s stack is close to end of stack address.\n",
116 117
                   thread->name);
    }
118
#endif /* ARCH_CPU_STACK_GROWS_UPWARD */
S
shaojinchun 已提交
119
}
120
#endif /* RT_USING_OVERFLOW_CHECK */
S
shaojinchun 已提交
121 122 123 124 125

/*
 * get the highest priority thread in ready queue
 */
#ifdef RT_USING_SMP
mysterywolf's avatar
mysterywolf 已提交
126
static struct rt_thread* _scheduler_get_highest_priority_thread(rt_ubase_t *highest_prio)
S
shaojinchun 已提交
127 128 129 130 131 132 133 134 135 136 137
{
    register struct rt_thread *highest_priority_thread;
    register rt_ubase_t highest_ready_priority, local_highest_ready_priority;
    struct rt_cpu* pcpu = rt_cpu_self();
#if RT_THREAD_PRIORITY_MAX > 32
    register rt_ubase_t number;

    number = __rt_ffs(rt_thread_ready_priority_group) - 1;
    highest_ready_priority = (number << 3) + __rt_ffs(rt_thread_ready_table[number]) - 1;
    number = __rt_ffs(pcpu->priority_group) - 1;
    local_highest_ready_priority = (number << 3) + __rt_ffs(pcpu->ready_table[number]) - 1;
138
#else
S
shaojinchun 已提交
139 140
    highest_ready_priority = __rt_ffs(rt_thread_ready_priority_group) - 1;
    local_highest_ready_priority = __rt_ffs(pcpu->priority_group) - 1;
141
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
S
shaojinchun 已提交
142 143 144

    /* get highest ready priority thread */
    if (highest_ready_priority < local_highest_ready_priority)
145
    {
S
shaojinchun 已提交
146 147 148 149 150 151 152 153 154 155 156
        *highest_prio = highest_ready_priority;
        highest_priority_thread = rt_list_entry(rt_thread_priority_table[highest_ready_priority].next,
                                  struct rt_thread,
                                  tlist);
    }
    else
    {
        *highest_prio = local_highest_ready_priority;
        highest_priority_thread = rt_list_entry(pcpu->priority_table[local_highest_ready_priority].next,
                                  struct rt_thread,
                                  tlist);
157
    }
S
shaojinchun 已提交
158 159 160 161

    return highest_priority_thread;
}
#else
mysterywolf's avatar
mysterywolf 已提交
162
static struct rt_thread* _scheduler_get_highest_priority_thread(rt_ubase_t *highest_prio)
S
shaojinchun 已提交
163 164 165 166 167 168 169 170 171 172 173
{
    register struct rt_thread *highest_priority_thread;
    register rt_ubase_t highest_ready_priority;

#if RT_THREAD_PRIORITY_MAX > 32
    register rt_ubase_t number;

    number = __rt_ffs(rt_thread_ready_priority_group) - 1;
    highest_ready_priority = (number << 3) + __rt_ffs(rt_thread_ready_table[number]) - 1;
#else
    highest_ready_priority = __rt_ffs(rt_thread_ready_priority_group) - 1;
174
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
S
shaojinchun 已提交
175 176 177 178 179 180 181 182 183

    /* get highest ready priority thread */
    highest_priority_thread = rt_list_entry(rt_thread_priority_table[highest_ready_priority].next,
                              struct rt_thread,
                              tlist);

    *highest_prio = highest_ready_priority;

    return highest_priority_thread;
184
}
185
#endif /* RT_USING_SMP */
186 187

/**
188
 * @brief This function will initialize the system scheduler.
189 190 191
 */
void rt_system_scheduler_init(void)
{
S
shaojinchun 已提交
192 193
#ifdef RT_USING_SMP
    int cpu;
194
#endif /* RT_USING_SMP */
195
    register rt_base_t offset;
196

S
shaojinchun 已提交
197
#ifndef RT_USING_SMP
198
    rt_scheduler_lock_nest = 0;
199
#endif /* RT_USING_SMP */
200

201
    RT_DEBUG_LOG(RT_DEBUG_SCHEDULER, ("start scheduler: max priority 0x%02x\n",
202
                                      RT_THREAD_PRIORITY_MAX));
B
bernard.xiong@gmail.com 已提交
203

204 205 206 207
    for (offset = 0; offset < RT_THREAD_PRIORITY_MAX; offset ++)
    {
        rt_list_init(&rt_thread_priority_table[offset]);
    }
S
shaojinchun 已提交
208 209 210 211 212 213 214 215
#ifdef RT_USING_SMP
    for (cpu = 0; cpu < RT_CPUS_NR; cpu++)
    {
        struct rt_cpu *pcpu =  rt_cpu_index(cpu);
        for (offset = 0; offset < RT_THREAD_PRIORITY_MAX; offset ++)
        {
            rt_list_init(&pcpu->priority_table[offset]);
        }
216

S
shaojinchun 已提交
217 218 219 220 221 222 223
        pcpu->irq_switch_flag = 0;
        pcpu->current_priority = RT_THREAD_PRIORITY_MAX - 1;
        pcpu->current_thread = RT_NULL;
        pcpu->priority_group = 0;

#if RT_THREAD_PRIORITY_MAX > 32
        rt_memset(pcpu->ready_table, 0, sizeof(pcpu->ready_table));
224
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
S
shaojinchun 已提交
225
    }
226
#endif /* RT_USING_SMP */
227

228 229
    /* initialize ready priority group */
    rt_thread_ready_priority_group = 0;
230 231

#if RT_THREAD_PRIORITY_MAX > 32
232 233
    /* initialize ready table */
    rt_memset(rt_thread_ready_table, 0, sizeof(rt_thread_ready_table));
234
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
235 236 237
}

/**
238
 * @ingroup SystemInit
239 240 241
 * This function will startup scheduler. It will select one thread
 * with the highest priority level, then switch to it.
 */
D
dzzxzz 已提交
242
void rt_system_scheduler_start(void)
243
{
244
    register struct rt_thread *to_thread;
S
shaojinchun 已提交
245
    rt_ubase_t highest_ready_priority;
246

mysterywolf's avatar
mysterywolf 已提交
247
    to_thread = _scheduler_get_highest_priority_thread(&highest_ready_priority);
248

S
shaojinchun 已提交
249 250
#ifdef RT_USING_SMP
    to_thread->oncpu = rt_hw_cpu_id();
251
#else
252
    rt_current_thread = to_thread;
253
#endif /* RT_USING_SMP */
S
shaojinchun 已提交
254 255

    rt_schedule_remove_thread(to_thread);
256
    to_thread->stat = RT_THREAD_RUNNING;
257

258
    /* switch to new thread */
S
shaojinchun 已提交
259
#ifdef RT_USING_SMP
260
    rt_hw_context_switch_to((rt_ubase_t)&to_thread->sp, to_thread);
S
shaojinchun 已提交
261
#else
262
    rt_hw_context_switch_to((rt_ubase_t)&to_thread->sp);
263
#endif /* RT_USING_SMP */
264

265
    /* never come back */
266 267 268 269 270
}

/**
 * @addtogroup Thread
 */
D
dzzxzz 已提交
271

D
dogandog 已提交
272
/**@{*/
273

S
shaojinchun 已提交
274 275 276

#ifdef RT_USING_SMP
/**
277
 * @brief This function will handle IPI interrupt and do a scheduling in system.
mysterywolf's avatar
mysterywolf 已提交
278
 *
279
 * @param vector the number of IPI interrupt for system scheduling.
mysterywolf's avatar
mysterywolf 已提交
280
 *
281 282 283
 * @param param use RT_NULL.
 *
 * @note this function should be invoke or register as ISR in BSP.
S
shaojinchun 已提交
284 285 286 287 288 289 290
 */
void rt_scheduler_ipi_handler(int vector, void *param)
{
    rt_schedule();
}

/**
291 292 293
 * @brief This function will perform one scheduling. It will select one thread
 *        with the highest priority level in global ready queue or local ready queue,
 *        then switch to it.
S
shaojinchun 已提交
294 295 296 297 298 299 300 301 302 303
 */
void rt_schedule(void)
{
    rt_base_t level;
    struct rt_thread *to_thread;
    struct rt_thread *current_thread;
    struct rt_cpu    *pcpu;
    int cpu_id;

    /* disable interrupt */
304
    level  = rt_hw_interrupt_disable();
S
shaojinchun 已提交
305 306 307 308 309 310 311 312 313

    cpu_id = rt_hw_cpu_id();
    pcpu   = rt_cpu_index(cpu_id);
    current_thread = pcpu->current_thread;

    /* whether do switch in interrupt */
    if (pcpu->irq_nest)
    {
        pcpu->irq_switch_flag = 1;
S
shaojinchun 已提交
314 315 316 317 318 319 320 321 322 323 324 325 326
        rt_hw_interrupt_enable(level);
        goto __exit;
    }

#ifdef RT_USING_SIGNALS
    if ((current_thread->stat & RT_THREAD_STAT_MASK) == RT_THREAD_SUSPEND)
    {
        /* if current_thread signal is in pending */

        if ((current_thread->stat & RT_THREAD_STAT_SIGNAL_MASK) & RT_THREAD_STAT_SIGNAL_PENDING)
        {
            rt_thread_resume(current_thread);
        }
S
shaojinchun 已提交
327
    }
328
#endif /* RT_USING_SIGNALS */
S
shaojinchun 已提交
329 330

    if (current_thread->scheduler_lock_nest == 1) /* whether lock scheduler */
S
shaojinchun 已提交
331 332 333 334 335
    {
        rt_ubase_t highest_ready_priority;

        if (rt_thread_ready_priority_group != 0 || pcpu->priority_group != 0)
        {
mysterywolf's avatar
mysterywolf 已提交
336
            to_thread = _scheduler_get_highest_priority_thread(&highest_ready_priority);
S
shaojinchun 已提交
337
            current_thread->oncpu = RT_CPU_DETACHED;
338
            if ((current_thread->stat & RT_THREAD_STAT_MASK) == RT_THREAD_RUNNING)
S
shaojinchun 已提交
339 340 341 342 343
            {
                if (current_thread->current_priority < highest_ready_priority)
                {
                    to_thread = current_thread;
                }
344
                else if (current_thread->current_priority == highest_ready_priority && (current_thread->stat & RT_THREAD_STAT_YIELD_MASK) == 0)
345 346 347
                {
                    to_thread = current_thread;
                }
S
shaojinchun 已提交
348 349 350 351
                else
                {
                    rt_schedule_insert_thread(current_thread);
                }
352
                current_thread->stat &= ~RT_THREAD_STAT_YIELD_MASK;
S
shaojinchun 已提交
353 354 355 356 357 358 359 360 361 362
            }
            to_thread->oncpu = cpu_id;
            if (to_thread != current_thread)
            {
                /* if the destination thread is not the same as current thread */
                pcpu->current_priority = (rt_uint8_t)highest_ready_priority;

                RT_OBJECT_HOOK_CALL(rt_scheduler_hook, (current_thread, to_thread));

                rt_schedule_remove_thread(to_thread);
363
                to_thread->stat = RT_THREAD_RUNNING | (to_thread->stat & ~RT_THREAD_STAT_MASK);
S
shaojinchun 已提交
364 365 366 367 368 369 370 371 372 373 374 375

                /* switch to new thread */
                RT_DEBUG_LOG(RT_DEBUG_SCHEDULER,
                        ("[%d]switch to priority#%d "
                         "thread:%.*s(sp:0x%08x), "
                         "from thread:%.*s(sp: 0x%08x)\n",
                         pcpu->irq_nest, highest_ready_priority,
                         RT_NAME_MAX, to_thread->name, to_thread->sp,
                         RT_NAME_MAX, current_thread->name, current_thread->sp));

#ifdef RT_USING_OVERFLOW_CHECK
                _rt_scheduler_stack_check(to_thread);
376
#endif /* RT_USING_OVERFLOW_CHECK */
S
shaojinchun 已提交
377

F
fenghuijie 已提交
378 379
                RT_OBJECT_HOOK_CALL(rt_scheduler_switch_hook, (current_thread));

S
shaojinchun 已提交
380 381
                rt_hw_context_switch((rt_ubase_t)&current_thread->sp,
                        (rt_ubase_t)&to_thread->sp, to_thread);
S
shaojinchun 已提交
382 383 384 385
            }
        }
    }

386 387 388
    /* enable interrupt */
    rt_hw_interrupt_enable(level);

S
shaojinchun 已提交
389
#ifdef RT_USING_SIGNALS
390 391
    /* check stat of thread for signal */
    level = rt_hw_interrupt_disable();
S
shaojinchun 已提交
392 393 394 395 396 397 398 399 400 401 402 403 404 405 406
    if (current_thread->stat & RT_THREAD_STAT_SIGNAL_PENDING)
    {
        extern void rt_thread_handle_sig(rt_bool_t clean_state);

        current_thread->stat &= ~RT_THREAD_STAT_SIGNAL_PENDING;

        rt_hw_interrupt_enable(level);

        /* check signal status */
        rt_thread_handle_sig(RT_TRUE);
    }
    else
    {
        rt_hw_interrupt_enable(level);
    }
407
#endif /* RT_USING_SIGNALS */
S
shaojinchun 已提交
408 409 410 411 412

__exit:
    return ;
}
#else
413
/**
414 415
 * @brief This function will perform one schedule. It will select one thread
 *        with the highest priority level, and switch to it immediately.
416
 */
D
dzzxzz 已提交
417
void rt_schedule(void)
418
{
419 420 421
    rt_base_t level;
    struct rt_thread *to_thread;
    struct rt_thread *from_thread;
422

423 424
    /* disable interrupt */
    level = rt_hw_interrupt_disable();
425

426 427 428
    /* check the scheduler is enabled or not */
    if (rt_scheduler_lock_nest == 0)
    {
S
shaojinchun 已提交
429
        rt_ubase_t highest_ready_priority;
430

S
shaojinchun 已提交
431 432
        if (rt_thread_ready_priority_group != 0)
        {
433
            /* need_insert_from_thread: need to insert from_thread to ready queue */
S
shaojinchun 已提交
434
            int need_insert_from_thread = 0;
435

mysterywolf's avatar
mysterywolf 已提交
436
            to_thread = _scheduler_get_highest_priority_thread(&highest_ready_priority);
437

438
            if ((rt_current_thread->stat & RT_THREAD_STAT_MASK) == RT_THREAD_RUNNING)
S
shaojinchun 已提交
439 440 441 442 443
            {
                if (rt_current_thread->current_priority < highest_ready_priority)
                {
                    to_thread = rt_current_thread;
                }
444
                else if (rt_current_thread->current_priority == highest_ready_priority && (rt_current_thread->stat & RT_THREAD_STAT_YIELD_MASK) == 0)
445
                {
446
                    to_thread = rt_current_thread;
447
                }
S
shaojinchun 已提交
448 449 450 451
                else
                {
                    need_insert_from_thread = 1;
                }
452
                rt_current_thread->stat &= ~RT_THREAD_STAT_YIELD_MASK;
S
shaojinchun 已提交
453
            }
454

S
shaojinchun 已提交
455 456 457 458 459 460 461 462
            if (to_thread != rt_current_thread)
            {
                /* if the destination thread is not the same as current thread */
                rt_current_priority = (rt_uint8_t)highest_ready_priority;
                from_thread         = rt_current_thread;
                rt_current_thread   = to_thread;

                RT_OBJECT_HOOK_CALL(rt_scheduler_hook, (from_thread, to_thread));
463

S
shaojinchun 已提交
464 465 466 467
                if (need_insert_from_thread)
                {
                    rt_schedule_insert_thread(from_thread);
                }
468

S
shaojinchun 已提交
469
                rt_schedule_remove_thread(to_thread);
470
                to_thread->stat = RT_THREAD_RUNNING | (to_thread->stat & ~RT_THREAD_STAT_MASK);
S
shaojinchun 已提交
471 472 473 474

                /* switch to new thread */
                RT_DEBUG_LOG(RT_DEBUG_SCHEDULER,
                        ("[%d]switch to priority#%d "
B
Bernard Xiong 已提交
475 476
                         "thread:%.*s(sp:0x%08x), "
                         "from thread:%.*s(sp: 0x%08x)\n",
S
shaojinchun 已提交
477 478 479
                         rt_interrupt_nest, highest_ready_priority,
                         RT_NAME_MAX, to_thread->name, to_thread->sp,
                         RT_NAME_MAX, from_thread->name, from_thread->sp));
480

481
#ifdef RT_USING_OVERFLOW_CHECK
S
shaojinchun 已提交
482
                _rt_scheduler_stack_check(to_thread);
483
#endif /* RT_USING_OVERFLOW_CHECK */
484

S
shaojinchun 已提交
485 486 487
                if (rt_interrupt_nest == 0)
                {
                    extern void rt_thread_handle_sig(rt_bool_t clean_state);
B
bernard 已提交
488

F
fenghuijie 已提交
489 490
                    RT_OBJECT_HOOK_CALL(rt_scheduler_switch_hook, (from_thread));

S
shaojinchun 已提交
491 492
                    rt_hw_context_switch((rt_ubase_t)&from_thread->sp,
                            (rt_ubase_t)&to_thread->sp);
493 494 495 496

                    /* enable interrupt */
                    rt_hw_interrupt_enable(level);

S
shaojinchun 已提交
497
#ifdef RT_USING_SIGNALS
498 499
                    /* check stat of thread for signal */
                    level = rt_hw_interrupt_disable();
S
shaojinchun 已提交
500 501 502 503 504
                    if (rt_current_thread->stat & RT_THREAD_STAT_SIGNAL_PENDING)
                    {
                        extern void rt_thread_handle_sig(rt_bool_t clean_state);

                        rt_current_thread->stat &= ~RT_THREAD_STAT_SIGNAL_PENDING;
B
bernard 已提交
505

S
shaojinchun 已提交
506 507 508 509 510 511 512 513 514
                        rt_hw_interrupt_enable(level);

                        /* check signal status */
                        rt_thread_handle_sig(RT_TRUE);
                    }
                    else
                    {
                        rt_hw_interrupt_enable(level);
                    }
515
#endif /* RT_USING_SIGNALS */
S
shaojinchun 已提交
516 517 518 519 520 521 522 523 524
                    goto __exit;
                }
                else
                {
                    RT_DEBUG_LOG(RT_DEBUG_SCHEDULER, ("switch in interrupt\n"));

                    rt_hw_context_switch_interrupt((rt_ubase_t)&from_thread->sp,
                            (rt_ubase_t)&to_thread->sp);
                }
525 526 527
            }
            else
            {
S
shaojinchun 已提交
528
                rt_schedule_remove_thread(rt_current_thread);
529
                rt_current_thread->stat = RT_THREAD_RUNNING | (rt_current_thread->stat & ~RT_THREAD_STAT_MASK);
530 531 532
            }
        }
    }
S
shaojinchun 已提交
533 534 535 536 537 538 539

    /* enable interrupt */
    rt_hw_interrupt_enable(level);

__exit:
    return;
}
540
#endif /* RT_USING_SMP */
S
shaojinchun 已提交
541 542

/**
543 544 545
 * @brief This function checks if a scheduling is needed after IRQ context. If yes,
 *        it will select one thread with the highest priority level, and then switch
 *        to it.
S
shaojinchun 已提交
546 547 548 549 550 551 552 553 554 555 556 557 558 559 560 561
 */
#ifdef RT_USING_SMP
void rt_scheduler_do_irq_switch(void *context)
{
    int cpu_id;
    rt_base_t level;
    struct rt_cpu* pcpu;
    struct rt_thread *to_thread;
    struct rt_thread *current_thread;

    level = rt_hw_interrupt_disable();

    cpu_id = rt_hw_cpu_id();
    pcpu   = rt_cpu_index(cpu_id);
    current_thread = pcpu->current_thread;

S
shaojinchun 已提交
562 563 564 565 566 567 568 569 570 571
#ifdef RT_USING_SIGNALS
    if ((current_thread->stat & RT_THREAD_STAT_MASK) == RT_THREAD_SUSPEND)
    {
        /* if current_thread signal is in pending */

        if ((current_thread->stat & RT_THREAD_STAT_SIGNAL_MASK) & RT_THREAD_STAT_SIGNAL_PENDING)
        {
            rt_thread_resume(current_thread);
        }
    }
572
#endif /* RT_USING_SIGNALS */
S
shaojinchun 已提交
573

S
shaojinchun 已提交
574
    if (pcpu->irq_switch_flag == 0)
armink_ztl's avatar
armink_ztl 已提交
575 576
    {
        rt_hw_interrupt_enable(level);
S
shaojinchun 已提交
577 578 579 580 581 582 583 584 585 586 587 588
        return;
    }

    if (current_thread->scheduler_lock_nest == 1 && pcpu->irq_nest == 0)
    {
        rt_ubase_t highest_ready_priority;

        /* clear irq switch flag */
        pcpu->irq_switch_flag = 0;

        if (rt_thread_ready_priority_group != 0 || pcpu->priority_group != 0)
        {
mysterywolf's avatar
mysterywolf 已提交
589
            to_thread = _scheduler_get_highest_priority_thread(&highest_ready_priority);
S
shaojinchun 已提交
590
            current_thread->oncpu = RT_CPU_DETACHED;
591
            if ((current_thread->stat & RT_THREAD_STAT_MASK) == RT_THREAD_RUNNING)
S
shaojinchun 已提交
592 593 594 595 596
            {
                if (current_thread->current_priority < highest_ready_priority)
                {
                    to_thread = current_thread;
                }
597
                else if (current_thread->current_priority == highest_ready_priority && (current_thread->stat & RT_THREAD_STAT_YIELD_MASK) == 0)
598 599 600
                {
                    to_thread = current_thread;
                }
S
shaojinchun 已提交
601 602 603 604
                else
                {
                    rt_schedule_insert_thread(current_thread);
                }
605
                current_thread->stat &= ~RT_THREAD_STAT_YIELD_MASK;
S
shaojinchun 已提交
606 607 608 609 610 611 612 613 614 615 616
            }
            to_thread->oncpu = cpu_id;
            if (to_thread != current_thread)
            {
                /* if the destination thread is not the same as current thread */

                pcpu->current_priority = (rt_uint8_t)highest_ready_priority;

                RT_OBJECT_HOOK_CALL(rt_scheduler_hook, (current_thread, to_thread));

                rt_schedule_remove_thread(to_thread);
617
                to_thread->stat = RT_THREAD_RUNNING | (to_thread->stat & ~RT_THREAD_STAT_MASK);
S
shaojinchun 已提交
618 619 620

#ifdef RT_USING_OVERFLOW_CHECK
                _rt_scheduler_stack_check(to_thread);
621
#endif /* RT_USING_OVERFLOW_CHECK */
S
shaojinchun 已提交
622 623 624 625 626
                RT_DEBUG_LOG(RT_DEBUG_SCHEDULER, ("switch in interrupt\n"));

                current_thread->cpus_lock_nest--;
                current_thread->scheduler_lock_nest--;

F
fenghuijie 已提交
627 628
                RT_OBJECT_HOOK_CALL(rt_scheduler_switch_hook, (current_thread));

S
shaojinchun 已提交
629 630 631 632
                rt_hw_context_switch_interrupt(context, (rt_ubase_t)&current_thread->sp,
                        (rt_ubase_t)&to_thread->sp, to_thread);
            }
        }
armink_ztl's avatar
armink_ztl 已提交
633
    }
S
shaojinchun 已提交
634
    rt_hw_interrupt_enable(level);
635
}
636
#endif /* RT_USING_SMP */
637

638 639 640
/**
 * @brief This function will insert a thread to system ready queue. The state of
 *        thread will be set as READY and remove from suspend queue.
641 642
 *
 * @param thread the thread to be inserted
643
 *
644 645
 * @note Please do not invoke this function in user application.
 */
S
shaojinchun 已提交
646 647 648 649 650 651 652 653 654 655 656 657 658
#ifdef RT_USING_SMP
void rt_schedule_insert_thread(struct rt_thread *thread)
{
    int cpu_id;
    int bind_cpu;
    rt_uint32_t cpu_mask;
    register rt_base_t level;

    RT_ASSERT(thread != RT_NULL);

    /* disable interrupt */
    level = rt_hw_interrupt_disable();

659
    /* it should be RUNNING thread */
S
shaojinchun 已提交
660 661
    if (thread->oncpu != RT_CPU_DETACHED)
    {
662
        thread->stat = RT_THREAD_RUNNING | (thread->stat & ~RT_THREAD_STAT_MASK);
S
shaojinchun 已提交
663 664 665
        goto __exit;
    }

666 667 668
    /* READY thread, insert to ready queue */
    thread->stat = RT_THREAD_READY | (thread->stat & ~RT_THREAD_STAT_MASK);

S
shaojinchun 已提交
669 670 671 672 673 674 675 676
    cpu_id   = rt_hw_cpu_id();
    bind_cpu = thread->bind_cpu ;

    /* insert thread to ready list */
    if (bind_cpu == RT_CPUS_NR)
    {
#if RT_THREAD_PRIORITY_MAX > 32
        rt_thread_ready_table[thread->number] |= thread->high_mask;
677
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
S
shaojinchun 已提交
678 679 680 681 682
        rt_thread_ready_priority_group |= thread->number_mask;

        rt_list_insert_before(&(rt_thread_priority_table[thread->current_priority]),
                              &(thread->tlist));
        cpu_mask = RT_CPU_MASK ^ (1 << cpu_id);
S
shaojinchun 已提交
683
        rt_hw_ipi_send(RT_SCHEDULE_IPI, cpu_mask);
S
shaojinchun 已提交
684 685 686 687 688 689 690
    }
    else
    {
        struct rt_cpu *pcpu = rt_cpu_index(bind_cpu);

#if RT_THREAD_PRIORITY_MAX > 32
        pcpu->ready_table[thread->number] |= thread->high_mask;
691
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
S
shaojinchun 已提交
692 693 694 695 696 697 698 699
        pcpu->priority_group |= thread->number_mask;

        rt_list_insert_before(&(rt_cpu_index(bind_cpu)->priority_table[thread->current_priority]),
                              &(thread->tlist));

        if (cpu_id != bind_cpu)
        {
            cpu_mask = 1 << bind_cpu;
S
shaojinchun 已提交
700
            rt_hw_ipi_send(RT_SCHEDULE_IPI, cpu_mask);
S
shaojinchun 已提交
701 702 703 704 705 706 707 708 709 710 711
        }
    }

    RT_DEBUG_LOG(RT_DEBUG_SCHEDULER, ("insert thread[%.*s], the priority: %d\n",
                                      RT_NAME_MAX, thread->name, thread->current_priority));

__exit:
    /* enable interrupt */
    rt_hw_interrupt_enable(level);
}
#else
D
dzzxzz 已提交
712
void rt_schedule_insert_thread(struct rt_thread *thread)
713
{
714
    register rt_base_t temp;
715

716
    RT_ASSERT(thread != RT_NULL);
717

718 719
    /* disable interrupt */
    temp = rt_hw_interrupt_disable();
720

721
    /* it's current thread, it should be RUNNING thread */
S
shaojinchun 已提交
722 723
    if (thread == rt_current_thread)
    {
724
        thread->stat = RT_THREAD_RUNNING | (thread->stat & ~RT_THREAD_STAT_MASK);
S
shaojinchun 已提交
725 726 727
        goto __exit;
    }

728 729
    /* READY thread, insert to ready queue */
    thread->stat = RT_THREAD_READY | (thread->stat & ~RT_THREAD_STAT_MASK);
730 731 732
    /* insert thread to ready list */
    rt_list_insert_before(&(rt_thread_priority_table[thread->current_priority]),
                          &(thread->tlist));
733

G
Grissiom 已提交
734 735
    RT_DEBUG_LOG(RT_DEBUG_SCHEDULER, ("insert thread[%.*s], the priority: %d\n",
                                      RT_NAME_MAX, thread->name, thread->current_priority));
736

S
shaojinchun 已提交
737
    /* set priority mask */
738
#if RT_THREAD_PRIORITY_MAX > 32
739
    rt_thread_ready_table[thread->number] |= thread->high_mask;
740
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
741
    rt_thread_ready_priority_group |= thread->number_mask;
742

S
shaojinchun 已提交
743
__exit:
744 745
    /* enable interrupt */
    rt_hw_interrupt_enable(temp);
746
}
747
#endif /* RT_USING_SMP */
748

B
bernard.xiong@gmail.com 已提交
749
/*
750 751 752 753 754 755
 * This function will remove a thread from system ready queue.
 *
 * @param thread the thread to be removed
 *
 * @note Please do not invoke this function in user application.
 */
S
shaojinchun 已提交
756
#ifdef RT_USING_SMP
D
dzzxzz 已提交
757
void rt_schedule_remove_thread(struct rt_thread *thread)
758
{
S
shaojinchun 已提交
759
    register rt_base_t level;
760

761
    RT_ASSERT(thread != RT_NULL);
762

763
    /* disable interrupt */
S
shaojinchun 已提交
764
    level = rt_hw_interrupt_disable();
765

G
Grissiom 已提交
766 767 768
    RT_DEBUG_LOG(RT_DEBUG_SCHEDULER, ("remove thread[%.*s], the priority: %d\n",
                                      RT_NAME_MAX, thread->name,
                                      thread->current_priority));
S
shaojinchun 已提交
769 770 771 772 773 774 775 776 777 778 779 780 781 782 783

    /* remove thread from ready list */
    rt_list_remove(&(thread->tlist));
    if (thread->bind_cpu == RT_CPUS_NR)
    {
        if (rt_list_isempty(&(rt_thread_priority_table[thread->current_priority])))
        {
#if RT_THREAD_PRIORITY_MAX > 32
            rt_thread_ready_table[thread->number] &= ~thread->high_mask;
            if (rt_thread_ready_table[thread->number] == 0)
            {
                rt_thread_ready_priority_group &= ~thread->number_mask;
            }
#else
            rt_thread_ready_priority_group &= ~thread->number_mask;
784
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
S
shaojinchun 已提交
785 786 787 788 789 790 791 792 793 794
        }
    }
    else
    {
        struct rt_cpu *pcpu = rt_cpu_index(thread->bind_cpu);

        if (rt_list_isempty(&(pcpu->priority_table[thread->current_priority])))
        {
#if RT_THREAD_PRIORITY_MAX > 32
            pcpu->ready_table[thread->number] &= ~thread->high_mask;
795
            if (pcpu->ready_table[thread->number] == 0)
S
shaojinchun 已提交
796 797 798
            {
                pcpu->priority_group &= ~thread->number_mask;
            }
799
#else
S
shaojinchun 已提交
800
            pcpu->priority_group &= ~thread->number_mask;
801
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
S
shaojinchun 已提交
802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820
        }
    }

    /* enable interrupt */
    rt_hw_interrupt_enable(level);
}
#else
void rt_schedule_remove_thread(struct rt_thread *thread)
{
    register rt_base_t level;

    RT_ASSERT(thread != RT_NULL);

    /* disable interrupt */
    level = rt_hw_interrupt_disable();

    RT_DEBUG_LOG(RT_DEBUG_SCHEDULER, ("remove thread[%.*s], the priority: %d\n",
                                      RT_NAME_MAX, thread->name,
                                      thread->current_priority));
821

822 823 824 825
    /* remove thread from ready list */
    rt_list_remove(&(thread->tlist));
    if (rt_list_isempty(&(rt_thread_priority_table[thread->current_priority])))
    {
826
#if RT_THREAD_PRIORITY_MAX > 32
827 828 829 830 831
        rt_thread_ready_table[thread->number] &= ~thread->high_mask;
        if (rt_thread_ready_table[thread->number] == 0)
        {
            rt_thread_ready_priority_group &= ~thread->number_mask;
        }
832
#else
833
        rt_thread_ready_priority_group &= ~thread->number_mask;
834
#endif /* RT_THREAD_PRIORITY_MAX > 32 */
835
    }
836

837
    /* enable interrupt */
S
shaojinchun 已提交
838
    rt_hw_interrupt_enable(level);
839
}
840
#endif /* RT_USING_SMP */
841 842

/**
843
 * @brief This function will lock the thread scheduler.
844
 */
S
shaojinchun 已提交
845 846 847 848 849 850 851 852 853 854
#ifdef RT_USING_SMP
void rt_enter_critical(void)
{
    register rt_base_t level;
    struct rt_thread *current_thread;

    /* disable interrupt */
    level = rt_hw_local_irq_disable();

    current_thread = rt_cpu_self()->current_thread;
855 856 857
    if (!current_thread)
    {
        rt_hw_local_irq_enable(level);
858
        return;
859 860
    }

S
shaojinchun 已提交
861 862 863 864 865 866
    /*
     * the maximal number of nest is RT_UINT16_MAX, which is big
     * enough and does not check here
     */

    {
867 868 869 870 871 872 873
        register rt_uint16_t lock_nest = current_thread->cpus_lock_nest;
        current_thread->cpus_lock_nest++;
        if (lock_nest == 0)
        {
            current_thread->scheduler_lock_nest ++;
            rt_hw_spin_lock(&_cpus_lock);
        }
S
shaojinchun 已提交
874
    }
S
shaojinchun 已提交
875 876 877
    /* critical for local cpu */
    current_thread->critical_lock_nest ++;

S
shaojinchun 已提交
878 879 880 881 882 883 884
    /* lock scheduler for local cpu */
    current_thread->scheduler_lock_nest ++;

    /* enable interrupt */
    rt_hw_local_irq_enable(level);
}
#else
D
dzzxzz 已提交
885
void rt_enter_critical(void)
886
{
887
    register rt_base_t level;
888

889 890
    /* disable interrupt */
    level = rt_hw_interrupt_disable();
891

892 893 894 895 896
    /*
     * the maximal number of nest is RT_UINT16_MAX, which is big
     * enough and does not check here
     */
    rt_scheduler_lock_nest ++;
897

898 899
    /* enable interrupt */
    rt_hw_interrupt_enable(level);
900
}
901
#endif /* RT_USING_SMP */
B
Bernard Xiong 已提交
902
RTM_EXPORT(rt_enter_critical);
903 904

/**
905
 * @brief This function will unlock the thread scheduler.
906
 */
S
shaojinchun 已提交
907 908 909 910 911 912 913 914 915 916
#ifdef RT_USING_SMP
void rt_exit_critical(void)
{
    register rt_base_t level;
    struct rt_thread *current_thread;

    /* disable interrupt */
    level = rt_hw_local_irq_disable();

    current_thread = rt_cpu_self()->current_thread;
917 918 919
    if (!current_thread)
    {
        rt_hw_local_irq_enable(level);
920
        return;
921
    }
S
shaojinchun 已提交
922 923 924

    current_thread->scheduler_lock_nest --;

S
shaojinchun 已提交
925 926
    current_thread->critical_lock_nest --;

927 928
    current_thread->cpus_lock_nest--;
    if (current_thread->cpus_lock_nest == 0)
S
shaojinchun 已提交
929
    {
930 931
        current_thread->scheduler_lock_nest --;
        rt_hw_spin_unlock(&_cpus_lock);
S
shaojinchun 已提交
932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948
    }

    if (current_thread->scheduler_lock_nest <= 0)
    {
        current_thread->scheduler_lock_nest = 0;
        /* enable interrupt */
        rt_hw_local_irq_enable(level);

        rt_schedule();
    }
    else
    {
        /* enable interrupt */
        rt_hw_local_irq_enable(level);
    }
}
#else
D
dzzxzz 已提交
949
void rt_exit_critical(void)
950
{
951 952 953 954 955 956 957 958 959 960 961 962
    register rt_base_t level;

    /* disable interrupt */
    level = rt_hw_interrupt_disable();

    rt_scheduler_lock_nest --;
    if (rt_scheduler_lock_nest <= 0)
    {
        rt_scheduler_lock_nest = 0;
        /* enable interrupt */
        rt_hw_interrupt_enable(level);

963 964 965 966 967
        if (rt_current_thread)
        {
            /* if scheduler is started, do a schedule */
            rt_schedule();
        }
968 969 970 971 972 973
    }
    else
    {
        /* enable interrupt */
        rt_hw_interrupt_enable(level);
    }
974
}
975
#endif /* RT_USING_SMP */
B
Bernard Xiong 已提交
976
RTM_EXPORT(rt_exit_critical);
977

978
/**
979
 * @brief Get the scheduler lock level.
980 981 982 983 984
 *
 * @return the level of the scheduler lock. 0 means unlocked.
 */
rt_uint16_t rt_critical_level(void)
{
S
shaojinchun 已提交
985 986 987
#ifdef RT_USING_SMP
    struct rt_thread *current_thread = rt_cpu_self()->current_thread;

S
shaojinchun 已提交
988
    return current_thread->critical_lock_nest;
S
shaojinchun 已提交
989
#else
990
    return rt_scheduler_lock_nest;
991
#endif /* RT_USING_SMP */
992
}
B
Bernard Xiong 已提交
993
RTM_EXPORT(rt_critical_level);
994

S
shaojinchun 已提交
995
/**@}*/