File: usleep.c

package info (click to toggle)
oo-browser 4.08-3
  • links: PTS
  • area: main
  • in suites: etch, etch-m68k, sarge
  • size: 3,864 kB
  • ctags: 2,889
  • sloc: lisp: 21,037; ansic: 10,819; makefile: 353; sh: 94
file content (69 lines) | stat: -rw-r--r-- 1,947 bytes parent folder | download | duplicates (12)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
/*
 *  NAME:
 *      usleep     -- This is the precision timer for Test Set
 *                    Automation. It uses the select(2) system
 *                    call to delay for the desired number of
 *                    micro-seconds. This call returns ZERO
 *                    (which is usually ignored) on successful
 *                    completion, -1 otherwise.
 *
 *  ALGORITHM:
 *      1) We range check the passed in microseconds and log a
 *         warning message if appropriate. We then return without
 *         delay, flagging an error.
 *      2) Load the Seconds and micro-seconds portion of the
 *         interval timer structure.
 *      3) Call select(2) with no file descriptors set, just the
 *         timer, this results in either delaying the proper
 *         ammount of time or being interupted early by a signal.
 *
 *  HISTORY:
 *      Added when the need for a subsecond timer was evident.
 *
 *  AUTHOR:
 *      Michael J. Dyer   <mike@sherlock.med.ge.com>
 */

#ifndef HAVE_USLEEP

#include <unistd.h>
#include <stdlib.h>
#include <stdio.h>
#include <errno.h>
#include <time.h>
#include <sys/time.h>
#include <sys/param.h>
#include <sys/types.h>

int
usleep (unsigned long microSeconds)
{
  unsigned int     Seconds, uSec;
  int              nfds = 0;
  fd_set           readfds, writefds, exceptfds;
  struct  timeval  Timer;

  if( (microSeconds == (unsigned long) 0) ||
      microSeconds  >  (unsigned long) 4000000 )
    {
      errno = ERANGE;         /* value out of range */
      perror( "usleep time out of range ( 0 -> 4000000 ) " );
      return -1;
    }

  Seconds = microSeconds / (unsigned long) 1000000;
  uSec    = microSeconds % (unsigned long) 1000000;

  Timer.tv_sec  = Seconds;
  Timer.tv_usec = uSec;

  if( select( nfds, &readfds, &writefds, &exceptfds, &Timer ) < 0 )
    {
      perror( "usleep (select) failed" );
      return -1;
    }

  return 0;
}

#endif /* not HAVE_USLEEP */