error.c revision 1.1 1 /* $NetBSD: error.c,v 1.1 1996/01/07 21:50:49 leo Exp $ */
2
3 /*
4 * Copyright (c) 1995 Waldi Ravens.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by Waldi Ravens.
18 * 4. The name of the author may not be used to endorse or promote products
19 * derived from this software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32
33 #include <stdio.h>
34 #include <osbind.h>
35 #include <stdarg.h>
36 #include <stdlib.h>
37 #include <string.h>
38 #include <unistd.h>
39 #include "libtos.h"
40
41 static void errmsg PROTO((int, char *, va_list));
42
43 const char *program_name;
44
45 void
46 init_toslib(arg0)
47 char *arg0;
48 {
49 char *p;
50
51 if (isatty(STDERR_FILENO) && (!*arg0 || !getenv("STDERR")))
52 Fforce(STDERR_FILENO, -1);
53
54 if (!(p = strrchr(arg0, '/')))
55 p = strrchr(arg0, '\\');
56 program_name = p ? ++p : arg0;
57 }
58
59 void
60 error(err, frm)
61 int err;
62 char *frm;
63 {
64 va_list args;
65
66 va_start(args, frm);
67 errmsg(err, frm, args);
68 va_end(args);
69 }
70
71 void
72 fatal(err, frm)
73 int err;
74 char *frm;
75 {
76 va_list args;
77
78 va_start(args, frm);
79 errmsg(err, frm, args);
80 va_end(args);
81
82 xexit(EXIT_FAILURE);
83 }
84
85 static void
86 errmsg(err, frm, args)
87 int err;
88 char *frm;
89 va_list args;
90 {
91 extern const char *program_name;
92
93 eprintf("%s: ", program_name);
94 veprintf(frm, args);
95
96 if (err != -1) {
97 char *es = strerror(err);
98 if (es)
99 eprintf(": %s", es);
100 else
101 eprintf(": unknown error %d", err);
102 }
103
104 eprintf("\n");
105 }
106