1 /* @(#)sleep.c 4.3 (Berkeley) 06/12/83 */ 2 3 #include <signal.h> 4 #include <setjmp.h> 5 #include <time.h> 6 7 static jmp_buf jmp; 8 9 #define mask(s) (1<<((s)-1)) 10 #define setvec(vec, a) \ 11 vec.sv_handler = a; vec.sv_mask = vec.sv_onstack = 0 12 13 sleep(n) 14 unsigned n; 15 { 16 int sleepx(), omask; 17 struct itimerval itv, oitv; 18 register struct itimerval *itp = &itv; 19 struct sigvec vec, ovec; 20 21 if (n == 0) 22 return; 23 timerclear(&itp->it_interval); 24 timerclear(&itp->it_value); 25 if (setitimer(ITIMER_REAL, itp, &oitv) < 0) 26 return; 27 setvec(ovec, SIG_DFL); 28 if (setjmp(jmp)) { 29 (void) sigvec(SIGALRM, &ovec, (struct sigvec *)0); 30 (void) setitimer(ITIMER_REAL, &oitv, (struct itimerval *)0); 31 return; 32 } 33 omask = sigblock(0); 34 itp->it_value.tv_sec = n; 35 if (timerisset(&oitv.it_value)) { 36 if (timercmp(&oitv.it_value, &itp->it_value, >)) 37 oitv.it_value.tv_sec -= itp->it_value.tv_sec; 38 else { 39 itp->it_value = oitv.it_value; 40 /* 41 * This is a hack, but we must have time to 42 * return from the setitimer after the longjmp 43 * or else it'll be restarted. And, anyway, 44 * sleep never did anything more than this before. 45 */ 46 oitv.it_value.tv_sec = 1; 47 oitv.it_value.tv_usec = 0; 48 } 49 } 50 setvec(vec, sleepx); 51 (void) sigvec(SIGALRM, &vec, &ovec); 52 if (setitimer(ITIMER_REAL, itp, (struct itimerval *)0) < 0) 53 longjmp(jmp, 1); 54 for (;;) 55 sigpause(omask &~ mask(SIGALRM)); 56 /*NOTREACHED*/ 57 } 58 59 static 60 sleepx() 61 { 62 63 longjmp(jmp, 1); 64 } 65