Files
mckernel/kernel/timer.c
Masamichi Takagi m-takagi@ab.jp.nec.com 337fe4b20d timer sleep and wakeup functions by Balazs-san
2012-11-26 16:23:01 +09:00

120 lines
2.6 KiB
C

#include <types.h>
#include <kmsg.h>
#include <aal/cpu.h>
#include <cpulocal.h>
#include <aal/mm.h>
#include <aal/debug.h>
#include <aal/ikc.h>
#include <errno.h>
#include <cls.h>
#include <syscall.h>
#include <page.h>
#include <amemcpy.h>
#include <uio.h>
#include <aal/lock.h>
#include <ctype.h>
#include <waitq.h>
#include <rlimit.h>
#include <affinity.h>
#include <time.h>
#include <lwk/stddef.h>
#include <futex.h>
#include <bitops.h>
#include <timer.h>
//#define DEBUG_PRINT_TIMER
#ifdef DEBUG_PRINT_TIMER
#define dkprintf kprintf
#else
#define dkprintf(...)
#endif
#define LOOP_TIMEOUT 1000 /* default 1000 */
struct list_head timers;
aal_spinlock_t timers_lock;
void init_timers(void)
{
aal_mc_spinlock_init(&timers_lock);
INIT_LIST_HEAD(&timers);
}
uint64_t schedule_timeout(uint64_t timeout)
{
struct waitq_entry my_wait;
struct timer my_timer;
unsigned long irqflags;
/* Init waitq and wait entry for this timer */
my_timer.timeout = (timeout < LOOP_TIMEOUT) ? LOOP_TIMEOUT : timeout;
my_timer.proc = cpu_local_var(current);
waitq_init(&my_timer.processes);
waitq_init_entry(&my_wait, cpu_local_var(current));
/* Add ourself to the timer queue */
irqflags = aal_mc_spinlock_lock(&timers_lock);
list_add_tail(&my_timer.list, &timers);
aal_mc_spinlock_unlock(&timers_lock, irqflags);
dkprintf("schedule_timeout() sleep timeout: %lu\n", my_timer.timeout);
/* Add ourself to the waitqueue and sleep */
waitq_prepare_to_wait(&my_timer.processes, &my_wait, PS_INTERRUPTIBLE);
schedule();
waitq_finish_wait(&my_timer.processes, &my_wait);
irqflags = aal_mc_spinlock_lock(&timers_lock);
/* Waken up by someone else then timeout? */
if (my_timer.timeout) {
list_del(&my_timer.list);
}
aal_mc_spinlock_unlock(&timers_lock, irqflags);
dkprintf("schedule_timeout() woken up, timeout: %lu\n",
my_timer.timeout);
return my_timer.timeout;
}
void wake_timers_loop(void)
{
unsigned long loop_s;
unsigned long irqflags;
struct timer *timer;
struct timer *timer_next;
dkprintf("timers thread, entering loop\n");
for (;;) {
loop_s = rdtsc();
while (rdtsc() < (loop_s + LOOP_TIMEOUT)) {
cpu_pause();
}
/* Iterate and decrease timeout for all timers,
* wake up if timeout reaches zero. */
irqflags = aal_mc_spinlock_lock(&timers_lock);
list_for_each_entry_safe(timer, timer_next, &timers, list) {
timer->timeout -= LOOP_TIMEOUT;
if (timer->timeout < LOOP_TIMEOUT) {
timer->timeout = 0;
list_del(&timer->list);
dkprintf("timers timeout occurred, waking up pid: %d\n",
timer->proc->pid);
waitq_wakeup(&timer->processes);
}
}
aal_mc_spinlock_unlock(&timers_lock, irqflags);
}
}