xref: /dragonfly/lib/libc/gen/err.c (revision 33311965)
1 /*-
2  * Copyright (c) 1993
3  *	The Regents of the University of California.  All rights reserved.
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. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. Neither the name of the University nor the names of its contributors
14  *    may be used to endorse or promote products derived from this software
15  *    without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  * @(#)err.c	8.1 (Berkeley) 6/4/93
30  * $FreeBSD: src/lib/libc/gen/err.c,v 1.15 2008/04/03 20:36:44 imp Exp $
31  */
32 
33 #include "namespace.h"
34 #include <err.h>
35 #include <errno.h>
36 #include <stdarg.h>
37 #include <stdio.h>
38 #include <stdlib.h>
39 #include <string.h>
40 #include "un-namespace.h"
41 
42 #include "libc_private.h"
43 
44 static FILE *err_file; /* file to use for error output */
45 static void (*err_exit)(int);
46 
47 /*
48  * This is declared to take a `void *' so that the caller is not required
49  * to include <stdio.h> first.  However, it is really a `FILE *', and the
50  * manual page documents it as such.
51  */
52 void
53 err_set_file(void *fp)
54 {
55 	if (fp)
56 		err_file = fp;
57 	else
58 		err_file = stderr;
59 }
60 
61 void
62 err_set_exit(void (*ef)(int))
63 {
64 	err_exit = ef;
65 }
66 
67 __weak_reference(_err, err);
68 
69 void _err(int, const char *, ...) __printflike(2, 3);
70 
71 void
72 _err(int eval, const char *fmt, ...)
73 {
74 	va_list ap;
75 	va_start(ap, fmt);
76 	verrc(eval, errno, fmt, ap);
77 	va_end(ap);
78 }
79 
80 void
81 verr(int eval, const char *fmt, va_list ap)
82 {
83 	verrc(eval, errno, fmt, ap);
84 }
85 
86 void
87 errc(int eval, int code, const char *fmt, ...)
88 {
89 	va_list ap;
90 	va_start(ap, fmt);
91 	verrc(eval, code, fmt, ap);
92 	va_end(ap);
93 }
94 
95 void
96 verrc(int eval, int code, const char *fmt, va_list ap)
97 {
98 	if (err_file == NULL)
99 		err_set_file(NULL);
100 	fprintf(err_file, "%s: ", _getprogname());
101 	if (fmt != NULL) {
102 		vfprintf(err_file, fmt, ap);
103 		fprintf(err_file, ": ");
104 	}
105 	fprintf(err_file, "%s\n", strerror(code));
106 	if (err_exit)
107 		err_exit(eval);
108 	exit(eval);
109 }
110 
111 void
112 errx(int eval, const char *fmt, ...)
113 {
114 	va_list ap;
115 	va_start(ap, fmt);
116 	verrx(eval, fmt, ap);
117 	va_end(ap);
118 }
119 
120 void
121 verrx(int eval, const char *fmt, va_list ap)
122 {
123 	if (err_file == NULL)
124 		err_set_file(NULL);
125 	fprintf(err_file, "%s: ", _getprogname());
126 	if (fmt != NULL)
127 		vfprintf(err_file, fmt, ap);
128 	fprintf(err_file, "\n");
129 	if (err_exit)
130 		err_exit(eval);
131 	exit(eval);
132 }
133 
134 __weak_reference(_warn, warn);
135 
136 void _warn(const char *, ...) __printflike(1, 2);
137 
138 void
139 _warn(const char *fmt, ...)
140 {
141 	va_list ap;
142 	va_start(ap, fmt);
143 	vwarnc(errno, fmt, ap);
144 	va_end(ap);
145 }
146 
147 void
148 vwarn(const char *fmt, va_list ap)
149 {
150 	vwarnc(errno, fmt, ap);
151 }
152 
153 void
154 warnc(int code, const char *fmt, ...)
155 {
156 	va_list ap;
157 	va_start(ap, fmt);
158 	vwarnc(code, fmt, ap);
159 	va_end(ap);
160 }
161 
162 void
163 vwarnc(int code, const char *fmt, va_list ap)
164 {
165 	if (err_file == NULL)
166 		err_set_file(NULL);
167 	fprintf(err_file, "%s: ", _getprogname());
168 	if (fmt != NULL) {
169 		vfprintf(err_file, fmt, ap);
170 		fprintf(err_file, ": ");
171 	}
172 	fprintf(err_file, "%s\n", strerror(code));
173 }
174 
175 void
176 warnx(const char *fmt, ...)
177 {
178 	va_list ap;
179 	va_start(ap, fmt);
180 	vwarnx(fmt, ap);
181 	va_end(ap);
182 }
183 
184 void
185 vwarnx(const char *fmt, va_list ap)
186 {
187 	if (err_file == NULL)
188 		err_set_file(NULL);
189 	fprintf(err_file, "%s: ", _getprogname());
190 	if (fmt != NULL)
191 		vfprintf(err_file, fmt, ap);
192 	fprintf(err_file, "\n");
193 }
194