X-Git-Url: https://codewiz.org/gitweb?a=blobdiff_plain;f=bertos%2Fkern%2Fpreempt.c;h=078724b42a8e38095fb93e3c6e226d2e2b5e2d70;hb=e8b0472be10fba4ca6baa62d8d483db90e28c06e;hp=f285d43f5a53c3e3932f3d1d5edca9be072a26d2;hpb=cf6017f59fb2ff71423c716ad9d9f60a1b65c7d0;p=bertos.git diff --git a/bertos/kern/preempt.c b/bertos/kern/preempt.c index f285d43f..078724b4 100644 --- a/bertos/kern/preempt.c +++ b/bertos/kern/preempt.c @@ -26,118 +26,7 @@ * invalidate any other reasons why the executable file might be covered by * the GNU General Public License. * - * Copyright 2008 Bernie Innocenti - * --> - * - * \brief Simple preemptive multitasking scheduler. + * \note This file is deprecated and kept only for backward compatibility. * - * \version $Id: proc.c 1616 2008-08-10 19:41:26Z bernie $ - * \author Bernie Innocenti + * --> */ - -#include "proc_p.h" -#include "proc.h" - -#include -#include -#include // CPU_IDLE -#include // IRQ_DISABLE()... -#include -#include - - -int preempt_forbid_cnt; - -static Timer preempt_timer; - - -// fwd decl from idle.c -void idle_init(void); - - -void proc_preempt(void) -{ - IRQ_DISABLE; - - ASSERT(preempt_forbid_cnt == 0); - LIST_ASSERT_VALID(&ProcReadyList); - CurrentProcess = (struct Process *)list_remHead(&ProcReadyList); - ASSERT2(CurrentProcess, "no idle proc?"); - - IRQ_ENABLE; - - TRACEMSG("launching %p:%s", CurrentProcess, proc_currentName()); -} - -void proc_preempt_timer(UNUSED_ARG(void *, param)) -{ - if (!preempt_forbid_cnt) - { - IRQ_DISABLE; - - #if CONFIG_KERN_PRI - Process *rival = (Process *)LIST_HEAD(&ProcReadyList); - if (rival && rival->link.pri >= CurrentProcess->link.pri) - { - #endif - - TRACEMSG("preempting %p:%s", CurrentProcess, proc_currentName()); -#if 0 - SCHED_ENQUEUE(CurrentProcess); - proc_preempt(); -#endif - #if CONFIG_KERN_PRI - } - #endif - - IRQ_ENABLE; - } - - timer_setDelay(&preempt_timer, CONFIG_KERN_QUANTUM); - timer_add(&preempt_timer); -} - -void proc_schedule(void) -{ - ATOMIC(LIST_ASSERT_VALID(&ProcReadyList)); - TRACEMSG("%p:%s", CurrentProcess, proc_currentName()); - ATOMIC(LIST_ASSERT_VALID(&ProcReadyList)); - - /* Sleeping with IRQs disabled or preemption forbidden is illegal */ - ASSERT_IRQ_ENABLED(); - ASSERT(preempt_forbid_cnt == 0); - - // Will invoke proc_preempt() in interrupt context - kill(0, SIGUSR1); -} - -void proc_yield(void) -{ - TRACEMSG("%p:%s", CurrentProcess, proc_currentName()); - - IRQ_DISABLE; - SCHED_ENQUEUE(CurrentProcess); - IRQ_ENABLE; - - proc_schedule(); -} - -void proc_entry(void (*user_entry)(void)) -{ - user_entry(); - proc_exit(); -} - -void preempt_init(void) -{ - MOD_CHECK(irq); - MOD_CHECK(timer); - - irq_register(SIGUSR1, proc_preempt); - - timer_setSoftint(&preempt_timer, proc_preempt_timer, NULL); - timer_setDelay(&preempt_timer, CONFIG_KERN_QUANTUM); - timer_add(&preempt_timer); - - idle_init(); -}