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
err_set_file(void * fp)53 err_set_file(void *fp)
54 {
55 if (fp)
56 err_file = fp;
57 else
58 err_file = stderr;
59 }
60
61 void
err_set_exit(void (* ef)(int))62 err_set_exit(void (*ef)(int))
63 {
64 err_exit = ef;
65 }
66
67 void _err(int, const char *, ...) __printflike(2, 3);
68
69 void
_err(int eval,const char * fmt,...)70 _err(int eval, const char *fmt, ...)
71 {
72 va_list ap;
73 va_start(ap, fmt);
74 verrc(eval, errno, fmt, ap);
75 va_end(ap);
76 }
77
78 __weak_reference(_err, err);
79
80 void
verr(int eval,const char * fmt,va_list ap)81 verr(int eval, const char *fmt, va_list ap)
82 {
83 verrc(eval, errno, fmt, ap);
84 }
85
86 void
errc(int eval,int code,const char * fmt,...)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
verrc(int eval,int code,const char * fmt,va_list ap)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
errx(int eval,const char * fmt,...)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
verrx(int eval,const char * fmt,va_list ap)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 void _warn(const char *, ...) __printflike(1, 2);
135
136 void
_warn(const char * fmt,...)137 _warn(const char *fmt, ...)
138 {
139 va_list ap;
140 va_start(ap, fmt);
141 vwarnc(errno, fmt, ap);
142 va_end(ap);
143 }
144
145 __weak_reference(_warn, warn);
146
147 void
vwarn(const char * fmt,va_list ap)148 vwarn(const char *fmt, va_list ap)
149 {
150 vwarnc(errno, fmt, ap);
151 }
152
153 void
warnc(int code,const char * fmt,...)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
vwarnc(int code,const char * fmt,va_list ap)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
warnx(const char * fmt,...)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
vwarnx(const char * fmt,va_list ap)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