xref: /netbsd/sys/arch/atari/stand/tostools/libtos/error.c (revision bf9ec67e)
1 /*	$NetBSD: error.c,v 1.2 2002/02/24 20:51:08 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 		(void)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