home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / glibc-1.06 / sysdeps / posix / sleep.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-05-16  |  3.2 KB  |  98 lines
  1. /* Copyright (C) 1991, 1992, 1993 Free Software Foundation, Inc.
  2. This file is part of the GNU C Library.
  3.  
  4. The GNU C Library is free software; you can redistribute it and/or
  5. modify it under the terms of the GNU Library General Public License as
  6. published by the Free Software Foundation; either version 2 of the
  7. License, or (at your option) any later version.
  8.  
  9. The GNU C Library is distributed in the hope that it will be useful,
  10. but WITHOUT ANY WARRANTY; without even the implied warranty of
  11. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12. Library General Public License for more details.
  13.  
  14. You should have received a copy of the GNU Library General Public
  15. License along with the GNU C Library; see the file COPYING.LIB.  If
  16. not, write to the Free Software Foundation, Inc., 675 Mass Ave,
  17. Cambridge, MA 02139, USA.  */
  18.  
  19. #include <ansidecl.h>
  20. #include <signal.h>
  21. #include <time.h>
  22. #include <unistd.h>
  23.  
  24.  
  25. /* SIGALRM signal handler for `sleep'.  This does nothing but return,
  26.    but SIG_IGN isn't supposed to break `pause'.  */
  27. static void
  28. DEFUN(sleep_handler, (sig), int sig)
  29. {
  30.   return;
  31. }
  32.  
  33. /* Make the process sleep for SECONDS seconds, or until a signal arrives
  34.    and is not ignored.  The function returns the number of seconds less
  35.    than SECONDS which it actually slept (zero if it slept the full time).
  36.    If a signal handler does a `longjmp' or modifies the handling of the
  37.    SIGALRM signal while inside `sleep' call, the handling of the SIGALRM
  38.    signal afterwards is undefined.  There is no return value to indicate
  39.    error, but if `sleep' returns SECONDS, it probably didn't work.  */
  40. unsigned int
  41. DEFUN(sleep, (seconds), unsigned int seconds)
  42. {
  43.   unsigned int remaining, slept;
  44.   time_t before, after;
  45.   sigset_t set, oset;
  46.   struct sigaction act, oact;
  47.  
  48.   if (seconds == 0)
  49.     return 0;
  50.  
  51.   /* Block SIGALRM signals while frobbing the handler.  */
  52.   if (sigemptyset (&set) < 0 ||
  53.       sigaddset (&set, SIGALRM) < 0 ||
  54.       sigprocmask (SIG_BLOCK, &set, &oset))
  55.     return seconds;
  56.  
  57.   act.sa_handler = sleep_handler;
  58.   act.sa_flags = 0;
  59.   if (sigemptyset (&act.sa_mask) < 0 ||
  60.       sigaction (SIGALRM, &act, &oact) < 0)
  61.     return seconds;
  62.  
  63.   before = time ((time_t *) NULL);
  64.   remaining = alarm (seconds);
  65.  
  66.   if (remaining > 0 && remaining < seconds)
  67.     {
  68.       /* The user's alarm will expire before our own would.
  69.      Restore the user's signal action state and let his alarm happen.  */
  70.       (void) sigaction (SIGALRM, &oact, (struct sigaction *) NULL);
  71.       alarm (remaining);    /* Restore sooner alarm.  */
  72.       sigsuspend (&oset);    /* Wait for it to go off.  */
  73.       after = time ((time_t *) NULL);
  74.     }
  75.   else
  76.     {
  77.       /* Atomically restore the old signal mask
  78.      (which had better not block SIGALRM),
  79.      and wait for a signal to arrive.  */
  80.       sigsuspend (&oset);
  81.  
  82.       after = time ((time_t *) NULL);
  83.  
  84.       /* Restore the old signal action state.  */
  85.       (void) sigaction (SIGALRM, &oact, (struct sigaction *) NULL);
  86.     }
  87.  
  88.   /* Notice how long we actually slept.  */
  89.   slept = after - before;
  90.  
  91.   /* Restore the user's alarm if we have not already past it.
  92.      If we have, be sure to turn off the alarm in case a signal
  93.      other than SIGALRM was what woke us up.  */
  94.   alarm (remaining > slept ? remaining - slept : 0);
  95.  
  96.   return slept > seconds ? 0 : seconds - slept;
  97. }
  98.