home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / gnu / shellutils-1.8 / src / sleep.c < prev    next >
Encoding:
C/C++ Source or Header  |  1992-10-28  |  1.7 KB  |  85 lines
  1. /* sleep - delay for a specified amount of time.
  2.    Copyright (C) 1984, 1991 Free Software Foundation, Inc.
  3.  
  4.    This program is free software; you can redistribute it and/or modify
  5.    it under the terms of the GNU General Public License as published by
  6.    the Free Software Foundation; either version 2, or (at your option)
  7.    any later version.
  8.  
  9.    This program 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
  12.    GNU General Public License for more details.
  13.  
  14.    You should have received a copy of the GNU General Public License
  15.    along with this program; if not, write to the Free Software
  16.    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  17.  
  18. #include <stdio.h>
  19. #include <sys/types.h>
  20. #include "system.h"
  21.  
  22. long argdecode ();
  23. void error ();
  24.  
  25. /* The name by which this program was run. */
  26. char *program_name;
  27.  
  28. void
  29. main (argc, argv)
  30.      int argc;
  31.      char **argv;
  32. {
  33.   int i;
  34.   unsigned seconds = 0;
  35.  
  36.   program_name = argv[0];
  37.  
  38.   if (argc == 1)
  39.     {
  40.       fprintf (stderr, "Usage: %s number[smhd]...\n", argv[0]);
  41.       exit (1);
  42.     }
  43.  
  44.   for (i = 1; i < argc; i++)
  45.     seconds += argdecode (argv[i]);
  46.  
  47.   sleep (seconds);
  48.  
  49.   exit (0);
  50. }
  51.  
  52. long
  53. argdecode (s)
  54.      char *s;
  55. {
  56.   long value;
  57.   register char *p = s;
  58.   register char c;
  59.  
  60.   value = 0;
  61.   while ((c = *p++) >= '0' && c <= '9')
  62.     value = value * 10 + c - '0';
  63.  
  64.   switch (c)
  65.     {
  66.     case 's':
  67.       break;
  68.     case 'm':
  69.       value *= 60;
  70.       break;
  71.     case 'h':
  72.       value *= 60 * 60;
  73.       break;
  74.     case 'd':
  75.       value *= 60 * 60 * 24;
  76.       break;
  77.     default:
  78.       p--;
  79.     }
  80.  
  81.   if (*p)
  82.     error (1, 0, "invalid time interval `%s'", s);
  83.   return value;
  84. }
  85.