168 lines
3.8 KiB
C
168 lines
3.8 KiB
C
/*
|
|
* Copyright (C) 2000, 2001, 2002 Jeff Dike (jdike@karaya.com)
|
|
* Licensed under the GPL
|
|
*/
|
|
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <unistd.h>
|
|
#include <time.h>
|
|
#include <sys/time.h>
|
|
#include <signal.h>
|
|
#include <errno.h>
|
|
#include "user_util.h"
|
|
#include "kern_util.h"
|
|
#include "user.h"
|
|
#include "process.h"
|
|
#include "signal_user.h"
|
|
#include "time_user.h"
|
|
#include "kern_constants.h"
|
|
|
|
/* XXX This really needs to be declared and initialized in a kernel file since
|
|
* it's in <linux/time.h>
|
|
*/
|
|
extern struct timespec wall_to_monotonic;
|
|
|
|
extern struct timeval xtime;
|
|
|
|
struct timeval local_offset = { 0, 0 };
|
|
|
|
void timer(void)
|
|
{
|
|
gettimeofday(&xtime, NULL);
|
|
timeradd(&xtime, &local_offset, &xtime);
|
|
}
|
|
|
|
void set_interval(int timer_type)
|
|
{
|
|
int usec = 1000000/hz();
|
|
struct itimerval interval = ((struct itimerval) { { 0, usec },
|
|
{ 0, usec } });
|
|
|
|
if(setitimer(timer_type, &interval, NULL) == -1)
|
|
panic("setitimer failed - errno = %d\n", errno);
|
|
}
|
|
|
|
void enable_timer(void)
|
|
{
|
|
int usec = 1000000/hz();
|
|
struct itimerval enable = ((struct itimerval) { { 0, usec },
|
|
{ 0, usec }});
|
|
if(setitimer(ITIMER_VIRTUAL, &enable, NULL))
|
|
printk("enable_timer - setitimer failed, errno = %d\n",
|
|
errno);
|
|
}
|
|
|
|
void disable_timer(void)
|
|
{
|
|
struct itimerval disable = ((struct itimerval) { { 0, 0 }, { 0, 0 }});
|
|
if((setitimer(ITIMER_VIRTUAL, &disable, NULL) < 0) ||
|
|
(setitimer(ITIMER_REAL, &disable, NULL) < 0))
|
|
printk("disnable_timer - setitimer failed, errno = %d\n",
|
|
errno);
|
|
/* If there are signals already queued, after unblocking ignore them */
|
|
set_handler(SIGALRM, SIG_IGN, 0, -1);
|
|
set_handler(SIGVTALRM, SIG_IGN, 0, -1);
|
|
}
|
|
|
|
void switch_timers(int to_real)
|
|
{
|
|
struct itimerval disable = ((struct itimerval) { { 0, 0 }, { 0, 0 }});
|
|
struct itimerval enable = ((struct itimerval) { { 0, 1000000/hz() },
|
|
{ 0, 1000000/hz() }});
|
|
int old, new;
|
|
|
|
if(to_real){
|
|
old = ITIMER_VIRTUAL;
|
|
new = ITIMER_REAL;
|
|
}
|
|
else {
|
|
old = ITIMER_REAL;
|
|
new = ITIMER_VIRTUAL;
|
|
}
|
|
|
|
if((setitimer(old, &disable, NULL) < 0) ||
|
|
(setitimer(new, &enable, NULL)))
|
|
printk("switch_timers - setitimer failed, errno = %d\n",
|
|
errno);
|
|
}
|
|
|
|
void uml_idle_timer(void)
|
|
{
|
|
if(signal(SIGVTALRM, SIG_IGN) == SIG_ERR)
|
|
panic("Couldn't unset SIGVTALRM handler");
|
|
|
|
set_handler(SIGALRM, (__sighandler_t) alarm_handler,
|
|
SA_RESTART, SIGUSR1, SIGIO, SIGWINCH, SIGVTALRM, -1);
|
|
set_interval(ITIMER_REAL);
|
|
}
|
|
|
|
extern int do_posix_clock_monotonic_gettime(struct timespec *tp);
|
|
|
|
void time_init(void)
|
|
{
|
|
struct timespec now;
|
|
|
|
if(signal(SIGVTALRM, boot_timer_handler) == SIG_ERR)
|
|
panic("Couldn't set SIGVTALRM handler");
|
|
set_interval(ITIMER_VIRTUAL);
|
|
|
|
do_posix_clock_monotonic_gettime(&now);
|
|
wall_to_monotonic.tv_sec = -now.tv_sec;
|
|
wall_to_monotonic.tv_nsec = -now.tv_nsec;
|
|
}
|
|
|
|
/* Declared in linux/time.h, which can't be included here */
|
|
extern void clock_was_set(void);
|
|
|
|
void do_gettimeofday(struct timeval *tv)
|
|
{
|
|
unsigned long flags;
|
|
|
|
flags = time_lock();
|
|
gettimeofday(tv, NULL);
|
|
timeradd(tv, &local_offset, tv);
|
|
time_unlock(flags);
|
|
clock_was_set();
|
|
}
|
|
|
|
int do_settimeofday(struct timespec *tv)
|
|
{
|
|
struct timeval now;
|
|
unsigned long flags;
|
|
struct timeval tv_in;
|
|
|
|
if ((unsigned long) tv->tv_nsec >= UM_NSEC_PER_SEC)
|
|
return -EINVAL;
|
|
|
|
tv_in.tv_sec = tv->tv_sec;
|
|
tv_in.tv_usec = tv->tv_nsec / 1000;
|
|
|
|
flags = time_lock();
|
|
gettimeofday(&now, NULL);
|
|
timersub(&tv_in, &now, &local_offset);
|
|
time_unlock(flags);
|
|
|
|
return(0);
|
|
}
|
|
|
|
void idle_sleep(int secs)
|
|
{
|
|
struct timespec ts;
|
|
|
|
ts.tv_sec = secs;
|
|
ts.tv_nsec = 0;
|
|
nanosleep(&ts, NULL);
|
|
}
|
|
|
|
/*
|
|
* Overrides for Emacs so that we follow Linus's tabbing style.
|
|
* Emacs will notice this stuff at the end of the file and automatically
|
|
* adjust the settings for this buffer only. This must remain at the end
|
|
* of the file.
|
|
* ---------------------------------------------------------------------------
|
|
* Local variables:
|
|
* c-file-style: "linux"
|
|
* End:
|
|
*/
|