Aren/NetBSD
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use usleep().

Browse Source
This commit is contained in:
mycroft 1995-04-27 22:15:28 +00:00
parent 200f85f63e
commit 079d9a1d8e
1 changed files with 2 additions and 104 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

106
games/larn/nap.c
View File

@ -1,17 +1,10 @@
#ifndef lint
static char rcsid[] = "$NetBSD: nap.c,v 1.3 1995/03/23 08:34:01 cgd Exp $";
static char rcsid[] = "$NetBSD: nap.c,v 1.4 1995/04/27 22:15:28 mycroft Exp $";
#endif /* not lint */
/* nap.c Larn is copyrighted 1986 by Noah Morgan. */
#include <signal.h>
#include <sys/types.h>
#ifdef SYSV
#include <sys/times.h>
#else
#ifdef BSD
#include <sys/timeb.h>
#endif BSD
#endif SYSV
/*
* routine to take a nap for n milliseconds
@ -21,100 +14,5 @@ nap(x)
{
if (x<=0) return; /* eliminate chance for infinite loop */
lflush();
if (x > 999) sleep(x/1000); else napms(x);
usleep(x*1000);
}
#ifdef NONAP
napms(x) /* do nothing */
int x;
{
}
#else NONAP
#ifdef SYSV
/* napms - sleep for time milliseconds - uses times() */
/* this assumes that times returns a relative time in 60ths of a second */
/* this will do horrible things if your times() returns seconds! */
napms(time)
int time;
{
long matchclock, times();
struct tms stats;
if (time<=0) time=1; /* eliminate chance for infinite loop */
if ((matchclock = times(&stats)) == -1 || matchclock == 0)
return; /* error, or BSD style times() */
matchclock += (time / 17); /*17 ms/tic is 1000 ms/sec / 60 tics/sec */
while(matchclock < times(&stats))
;
}
#else not SYSV
#ifdef BSD
#ifdef SIGVTALRM
/* This must be BSD 4.2! */
#include <sys/time.h>
#define bit(_a) (1<<((_a)-1))
static nullf()
{
}
/* napms - sleep for time milliseconds - uses setitimer() */
napms(time)
int time;
{
struct itimerval timeout;
int (*oldhandler) ();
int oldsig;
if (time <= 0) return;
timerclear(&timeout.it_interval);
timeout.it_value.tv_sec = time / 1000;
timeout.it_value.tv_usec = (time % 1000) * 1000;
oldsig = sigblock(bit(SIGALRM));
setitimer(ITIMER_REAL, &timeout, (struct itimerval *)0);
oldhandler = signal(SIGALRM, nullf);
sigpause(oldsig);
signal(SIGALRM, oldhandler);
sigsetmask(oldsig);
}
#else
/* napms - sleep for time milliseconds - uses ftime() */
static napms(time)
int time;
{
/* assumed to be BSD UNIX */
struct timeb _gtime;
time_t matchtime;
unsigned short matchmilli;
register struct timeb *tp = & _gtime;
if (time <= 0) return;
ftime(tp);
matchmilli = tp->millitm + time;
matchtime = tp->time;
while (matchmilli >= 1000)
{
++matchtime;
matchmilli -= 1000;
}
while(1)
{
ftime(tp);
if ((tp->time > matchtime) ||
((tp->time == matchtime) && (tp->millitm >= matchmilli)))
break;
}
}
#endif
#else not BSD
static napms(time) int time; {} /* do nothing, forget it */
#endif BSD
#endif SYSV
#endif NONAP