Home | History | Annotate | Line # | Download | only in sleep
sleep.c revision 1.11
      1  1.11     lukem /*	$NetBSD: sleep.c,v 1.11 1997/09/14 07:31:57 lukem Exp $	*/
      2   1.8       cgd 
      3   1.1       cgd /*
      4   1.7   mycroft  * Copyright (c) 1988, 1993, 1994
      5   1.7   mycroft  *	The Regents of the University of California.  All rights reserved.
      6   1.1       cgd  *
      7   1.1       cgd  * Redistribution and use in source and binary forms, with or without
      8   1.1       cgd  * modification, are permitted provided that the following conditions
      9   1.1       cgd  * are met:
     10   1.1       cgd  * 1. Redistributions of source code must retain the above copyright
     11   1.1       cgd  *    notice, this list of conditions and the following disclaimer.
     12   1.1       cgd  * 2. Redistributions in binary form must reproduce the above copyright
     13   1.1       cgd  *    notice, this list of conditions and the following disclaimer in the
     14   1.1       cgd  *    documentation and/or other materials provided with the distribution.
     15   1.1       cgd  * 3. All advertising materials mentioning features or use of this software
     16   1.1       cgd  *    must display the following acknowledgement:
     17   1.1       cgd  *	This product includes software developed by the University of
     18   1.1       cgd  *	California, Berkeley and its contributors.
     19   1.1       cgd  * 4. Neither the name of the University nor the names of its contributors
     20   1.1       cgd  *    may be used to endorse or promote products derived from this software
     21   1.1       cgd  *    without specific prior written permission.
     22   1.1       cgd  *
     23   1.1       cgd  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     24   1.1       cgd  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     25   1.1       cgd  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     26   1.1       cgd  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     27   1.1       cgd  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     28   1.1       cgd  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     29   1.1       cgd  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     30   1.1       cgd  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     31   1.1       cgd  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     32   1.1       cgd  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     33   1.1       cgd  * SUCH DAMAGE.
     34   1.1       cgd  */
     35   1.1       cgd 
     36   1.9  christos #include <sys/cdefs.h>
     37   1.1       cgd #ifndef lint
     38   1.9  christos __COPYRIGHT("@(#) Copyright (c) 1988, 1993, 1994\n\
     39   1.9  christos 	The Regents of the University of California.  All rights reserved.\n");
     40   1.1       cgd #endif /* not lint */
     41   1.1       cgd 
     42   1.1       cgd #ifndef lint
     43   1.8       cgd #if 0
     44   1.8       cgd static char sccsid[] = "@(#)sleep.c	8.3 (Berkeley) 4/2/94";
     45   1.8       cgd #else
     46  1.11     lukem __RCSID("$NetBSD: sleep.c,v 1.11 1997/09/14 07:31:57 lukem Exp $");
     47   1.8       cgd #endif
     48   1.1       cgd #endif /* not lint */
     49   1.1       cgd 
     50  1.10     perry /*
     51  1.10     perry  * XXX shouldn't need sys/time.h, but there was an include file bug
     52  1.10     perry  * which may be fixed soon.
     53  1.10     perry  */
     54  1.10     perry #include <sys/time.h>
     55  1.10     perry #include <time.h>
     56  1.10     perry #include <ctype.h>
     57  1.10     perry #include <math.h>
     58  1.10     perry #include <signal.h>
     59   1.1       cgd #include <stdio.h>
     60   1.1       cgd #include <stdlib.h>
     61   1.7   mycroft #include <unistd.h>
     62   1.6       jtc #include <locale.h>
     63   1.1       cgd 
     64   1.7   mycroft void usage __P((void));
     65  1.10     perry void alarmhandle __P((int));
     66   1.9  christos int  main __P((int, char *[]));
     67   1.7   mycroft 
     68   1.5       jtc int
     69   1.1       cgd main(argc, argv)
     70   1.1       cgd 	int argc;
     71   1.7   mycroft 	char *argv[];
     72   1.1       cgd {
     73  1.10     perry 	char *arg, *temp;
     74  1.10     perry 	double val, ival, fval;
     75  1.10     perry 	struct timespec ntime;
     76  1.10     perry 	int fracflag;
     77  1.10     perry 	int ch;
     78   1.7   mycroft 
     79   1.7   mycroft 	setlocale(LC_ALL, "");
     80   1.6       jtc 
     81  1.10     perry 	(void)signal(SIGALRM, alarmhandle);
     82  1.10     perry 
     83  1.11     lukem 	while ((ch = getopt(argc, argv, "")) != -1)
     84   1.7   mycroft 		switch(ch) {
     85   1.7   mycroft 		case '?':
     86   1.7   mycroft 		default:
     87   1.7   mycroft 			usage();
     88   1.7   mycroft 		}
     89   1.7   mycroft 	argc -= optind;
     90   1.7   mycroft 	argv += optind;
     91   1.1       cgd 
     92   1.7   mycroft 	if (argc != 1)
     93   1.7   mycroft 		usage();
     94   1.7   mycroft 
     95  1.10     perry 	/*
     96  1.10     perry 	 * Okay, why not just use atof for everything? Why bother
     97  1.10     perry 	 * checking if there is a fraction in use? Because the old
     98  1.10     perry 	 * sleep handled the full range of integers, that's why, and a
     99  1.10     perry 	 * double can't handle a large long. This is fairly useless
    100  1.10     perry 	 * given how large a number a double can hold on most
    101  1.10     perry 	 * machines, but now we won't ever have trouble. If you want
    102  1.10     perry 	 * 1000000000.9 seconds of sleep, well, that's your
    103  1.10     perry 	 * problem. Why use an isdigit() check instead of checking for
    104  1.10     perry 	 * a period? Because doing it this way means locales will be
    105  1.10     perry 	 * handled transparently by the atof code.
    106  1.10     perry 	 */
    107  1.10     perry 	fracflag = 0;
    108  1.10     perry 	arg = *argv;
    109  1.10     perry 	for (temp = arg; *temp != '\0'; temp++)
    110  1.10     perry 		if (!isdigit(*temp))
    111  1.10     perry 			fracflag++;
    112  1.10     perry 
    113  1.10     perry 	if (fracflag) {
    114  1.10     perry 		val = atof(arg);
    115  1.10     perry 		if (val <= 0)
    116  1.10     perry 			exit(0);
    117  1.10     perry 		ival = floor(val);
    118  1.10     perry 		fval = (1000000000 * (val-ival));
    119  1.10     perry 		ntime.tv_sec = ival;
    120  1.10     perry 		ntime.tv_nsec = fval;
    121  1.10     perry 	}
    122  1.10     perry 	else{
    123  1.10     perry 		ntime.tv_sec = atol(arg);
    124  1.10     perry 		if (ntime.tv_sec <= 0)
    125  1.10     perry 			exit(0);
    126  1.10     perry 		ntime.tv_nsec = 0;
    127  1.10     perry 	}
    128  1.10     perry 
    129  1.10     perry 	(void)nanosleep(&ntime, NULL);
    130  1.10     perry 
    131   1.1       cgd 	exit(0);
    132   1.7   mycroft }
    133   1.7   mycroft 
    134   1.7   mycroft void
    135   1.7   mycroft usage()
    136   1.7   mycroft {
    137   1.7   mycroft 
    138   1.7   mycroft 	(void)fprintf(stderr, "usage: sleep seconds\n");
    139   1.7   mycroft 	exit(1);
    140  1.10     perry }
    141  1.10     perry 
    142  1.10     perry void
    143  1.10     perry alarmhandle(i)
    144  1.10     perry 	int i;
    145  1.10     perry {
    146  1.10     perry 	_exit(0);
    147   1.1       cgd }
    148