Initial import from FreeBSD RELENG_4:
[dragonfly.git] / usr.bin / at / panic.c
1 /* 
2  *  panic.c - terminate fast in case of error
3  *  Copyright (C) 1993  Thomas Koenig
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. The name of the author(s) may not be used to endorse or promote
11  *    products derived from this software without specific prior written
12  *    permission.
13  *
14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR
15  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
16  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
17  * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT,
18  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
19  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
20  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
21  * THEORY OF LIABILITY, WETHER IN CONTRACT, STRICT LIABILITY, OR TORT
22  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
23  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
24  */
25
26 #ifndef lint
27 static const char rcsid[] =
28   "$FreeBSD: src/usr.bin/at/panic.c,v 1.10 1999/12/05 19:57:14 charnier Exp $";
29 #endif /* not lint */
30
31 /* System Headers */
32
33 #include <err.h>
34 #include <errno.h>
35 #include <stdio.h>
36 #include <stdlib.h>
37 #include <unistd.h>
38
39 /* Local headers */
40
41 #include "panic.h"
42 #include "at.h"
43
44 /* External variables */
45
46 /* Global functions */
47
48 void
49 panic(char *a)
50 {
51 /* Something fatal has happened, print error message and exit.
52  */
53         if (fcreated)
54                 unlink(atfile);
55
56         errx(EXIT_FAILURE, "%s", a);
57 }
58
59 void
60 perr(char *a)
61 {
62 /* Some operating system error; print error message and exit.
63  */
64         int serrno = errno;
65
66         if (fcreated)
67                 unlink(atfile);
68
69         errno = serrno;
70         err(EXIT_FAILURE, "%s", a);
71 }
72
73 void
74 usage(void)
75 {
76         /* Print usage and exit. */
77     fprintf(stderr, "usage: at [-V] [-q x] [-f file] [-m] time\n"
78                     "       at [-V] -c job [job ...]\n"
79                     "       atq [-V] [-q x] [-v]\n"
80                     "       atrm [-V] job [job ...]\n"
81                     "       batch [-V] [-f file] [-m]\n");
82     exit(EXIT_FAILURE);
83 }