Home | History | Annotate | Line # | Download | only in sleep
sleep.c revision 1.14
      1  1.14   mycroft /*	$NetBSD: sleep.c,v 1.14 1998/07/28 05:31:29 mycroft 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.14   mycroft __RCSID("$NetBSD: sleep.c,v 1.14 1998/07/28 05:31:29 mycroft Exp $");
     47   1.8       cgd #endif
     48   1.1       cgd #endif /* not lint */
     49   1.1       cgd 
     50  1.10     perry #include <time.h>
     51  1.10     perry #include <ctype.h>
     52  1.10     perry #include <math.h>
     53  1.10     perry #include <signal.h>
     54   1.1       cgd #include <stdio.h>
     55   1.1       cgd #include <stdlib.h>
     56   1.7   mycroft #include <unistd.h>
     57   1.6       jtc #include <locale.h>
     58   1.1       cgd 
     59   1.7   mycroft void usage __P((void));
     60  1.10     perry void alarmhandle __P((int));
     61   1.9  christos int  main __P((int, char *[]));
     62   1.7   mycroft 
     63   1.5       jtc int
     64   1.1       cgd main(argc, argv)
     65   1.1       cgd 	int argc;
     66   1.7   mycroft 	char *argv[];
     67   1.1       cgd {
     68  1.10     perry 	char *arg, *temp;
     69  1.10     perry 	double val, ival, fval;
     70  1.10     perry 	struct timespec ntime;
     71  1.10     perry 	int fracflag;
     72  1.10     perry 	int ch;
     73   1.7   mycroft 
     74  1.12       cgd 	(void)setlocale(LC_ALL, "");
     75   1.6       jtc 
     76  1.10     perry 	(void)signal(SIGALRM, alarmhandle);
     77  1.10     perry 
     78  1.11     lukem 	while ((ch = getopt(argc, argv, "")) != -1)
     79   1.7   mycroft 		switch(ch) {
     80   1.7   mycroft 		case '?':
     81   1.7   mycroft 		default:
     82   1.7   mycroft 			usage();
     83   1.7   mycroft 		}
     84   1.7   mycroft 	argc -= optind;
     85   1.7   mycroft 	argv += optind;
     86   1.1       cgd 
     87   1.7   mycroft 	if (argc != 1)
     88   1.7   mycroft 		usage();
     89   1.7   mycroft 
     90  1.10     perry 	/*
     91  1.10     perry 	 * Okay, why not just use atof for everything? Why bother
     92  1.10     perry 	 * checking if there is a fraction in use? Because the old
     93  1.10     perry 	 * sleep handled the full range of integers, that's why, and a
     94  1.10     perry 	 * double can't handle a large long. This is fairly useless
     95  1.10     perry 	 * given how large a number a double can hold on most
     96  1.10     perry 	 * machines, but now we won't ever have trouble. If you want
     97  1.10     perry 	 * 1000000000.9 seconds of sleep, well, that's your
     98  1.10     perry 	 * problem. Why use an isdigit() check instead of checking for
     99  1.10     perry 	 * a period? Because doing it this way means locales will be
    100  1.10     perry 	 * handled transparently by the atof code.
    101  1.10     perry 	 */
    102  1.10     perry 	fracflag = 0;
    103  1.10     perry 	arg = *argv;
    104  1.10     perry 	for (temp = arg; *temp != '\0'; temp++)
    105  1.10     perry 		if (!isdigit(*temp))
    106  1.10     perry 			fracflag++;
    107  1.10     perry 
    108  1.10     perry 	if (fracflag) {
    109  1.10     perry 		val = atof(arg);
    110  1.14   mycroft 		if (val <= 0) {
    111  1.10     perry 			exit(0);
    112  1.14   mycroft 			/* NOTREACHED */
    113  1.14   mycroft 		}
    114  1.10     perry 		ival = floor(val);
    115  1.10     perry 		fval = (1000000000 * (val-ival));
    116  1.10     perry 		ntime.tv_sec = ival;
    117  1.10     perry 		ntime.tv_nsec = fval;
    118  1.10     perry 	}
    119  1.10     perry 	else{
    120  1.10     perry 		ntime.tv_sec = atol(arg);
    121  1.14   mycroft 		if (ntime.tv_sec <= 0) {
    122  1.10     perry 			exit(0);
    123  1.14   mycroft 			/* NOTREACHED */
    124  1.14   mycroft 		}
    125  1.10     perry 		ntime.tv_nsec = 0;
    126  1.10     perry 	}
    127  1.10     perry 
    128  1.10     perry 	(void)nanosleep(&ntime, NULL);
    129  1.10     perry 
    130   1.1       cgd 	exit(0);
    131  1.12       cgd 	/* NOTREACHED */
    132   1.7   mycroft }
    133   1.7   mycroft 
    134   1.7   mycroft void
    135   1.7   mycroft usage()
    136   1.7   mycroft {
    137  1.13      fair 	(void)fputs("usage: sleep seconds\n", stderr);
    138   1.7   mycroft 	exit(1);
    139  1.14   mycroft 	/* NOTREACHED */
    140  1.10     perry }
    141  1.10     perry 
    142  1.12       cgd /* ARGSUSED */
    143  1.10     perry void
    144  1.10     perry alarmhandle(i)
    145  1.10     perry 	int i;
    146  1.10     perry {
    147  1.10     perry 	_exit(0);
    148  1.14   mycroft 	/* NOTREACHED */
    149   1.1       cgd }
    150