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