- * \sa proc_permit()
- */
-void proc_forbid(void)
-{
- /* No need to protect against interrupts here. */
- ++CurrentProcess->forbid_cnt;
-}
-
-/**
- * Re-enable preemptive task switching.
- *
- * \sa proc_forbid()
- */
-void proc_permit(void)
-{
- /* No need to protect against interrupts here. */
- --CurrentProcess->forbid_cnt;
-}
-
-
-void proc_preempt(void)
-{
- IRQ_DISABLE;
-
- LIST_ASSERT_VALID(&ProcReadyList);
- CurrentProcess = (struct Process *)list_remHead(&ProcReadyList);
- LIST_ASSERT_VALID(&ProcReadyList);
- ASSERT2(CurrentProcess, "no idle proc?");
-
- IRQ_ENABLE;
-
- TRACEMSG("new proc: %p:%s", CurrentProcess, CurrentProcess ? CurrentProcess->monitor.name : "---");
- monitor_report();
-}
-
-void proc_preempt_timer(UNUSED_ARG(void *, param))
-{
- IRQ_DISABLE;
-/*
- if (!CurrentProcess->forbid_cnt)
- {
- TRACEMSG("preempting %p:%s", CurrentProcess, CurrentProcess->monitor.name);
- LIST_ASSERT_VALID(&ProcReadyList);
- SCHED_ENQUEUE(CurrentProcess);
- proc_preempt();
- }
-*/
- IRQ_ENABLE;
-
- timer_setDelay(&preempt_timer, CONFIG_KERN_QUANTUM);
- timer_add(&preempt_timer);
-}
-
-void proc_schedule(void)
-{
- TRACE;
-
- // Will invoke proc_preempt() in interrupt context
- kill(0, SIGUSR1);
-}
-
-void proc_yield(void)
-{
- TRACE;
-
- ASSERT_IRQ_ENABLED();
- IRQ_DISABLE;
- SCHED_ENQUEUE(CurrentProcess);
- LIST_ASSERT_VALID(&ProcReadyList);
- proc_schedule();
- IRQ_ENABLE;
-}
-
-void proc_entry(void (*user_entry)(void))
-{
- user_entry();
- proc_exit();
-}
-
-
-static cpustack_t idle_stack[CONFIG_PROC_DEFSTACKSIZE / sizeof(cpustack_t)];
-
-/*
- * The idle process
- *
- * This process never dies and never sleeps. It's also quite apathic
- * and a bit antisocial.
- *
- * Having an idle process costs some stack space, but simplifies the
- * interrupt-driven preemption logic because there is always a user
- * context to which we can return.