1 /* $NetBSD: assert.c,v 1.17 2012/06/25 22:32:43 abs Exp $ */
2
3 /*-
4 * Copyright (c) 1992, 1993
5 * The Regents of the University of California. 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. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 #include <sys/cdefs.h>
33 #if defined(LIBC_SCCS) && !defined(lint)
34 #if 0
35 static char sccsid[] = "@(#)assert.c 8.1 (Berkeley) 6/4/93";
36 #else
37 __RCSID("$NetBSD: assert.c,v 1.17 2012/06/25 22:32:43 abs Exp $");
38 #endif
39 #endif /* LIBC_SCCS and not lint */
40
41 #include "namespace.h"
42 #include <sys/types.h>
43
44 #include <assert.h>
45 #include <stdio.h>
46 #include <stdlib.h>
47 #include <syslog.h>
48
49 void
__assert13(const char * file,int line,const char * function,const char * failedexpr)50 __assert13(const char *file, int line, const char *function,
51 const char *failedexpr)
52 {
53
54 (void)fprintf(stderr,
55 "assertion \"%s\" failed: file \"%s\", line %d%s%s%s\n",
56 failedexpr, file, line,
57 function ? ", function \"" : "",
58 function ? function : "",
59 function ? "\"" : "");
60 abort();
61 /* NOTREACHED */
62 }
63
64 void
__assert(const char * file,int line,const char * failedexpr)65 __assert(const char *file, int line, const char *failedexpr)
66 {
67
68 __assert13(file, line, NULL, failedexpr);
69 /* NOTREACHED */
70 }
71
72
73 enum {
74 DIAGASSERT_ABORT = 1<<0,
75 DIAGASSERT_STDERR = 1<<1,
76 DIAGASSERT_SYSLOG = 1<<2
77 };
78
79 static int diagassert_flags = -1;
80
81 void
__diagassert13(const char * file,int line,const char * function,const char * failedexpr)82 __diagassert13(const char *file, int line, const char *function,
83 const char *failedexpr)
84 {
85 char buf[1024];
86
87 if (diagassert_flags == -1) {
88 char *p;
89
90 diagassert_flags = DIAGASSERT_SYSLOG;
91
92 for (p = getenv("LIBC_DIAGASSERT"); p && *p; p++) {
93 switch (*p) {
94 case 'a':
95 diagassert_flags |= DIAGASSERT_ABORT;
96 break;
97 case 'A':
98 diagassert_flags &= ~DIAGASSERT_ABORT;
99 break;
100 case 'e':
101 diagassert_flags |= DIAGASSERT_STDERR;
102 break;
103 case 'E':
104 diagassert_flags &= ~DIAGASSERT_STDERR;
105 break;
106 case 'l':
107 diagassert_flags |= DIAGASSERT_SYSLOG;
108 break;
109 case 'L':
110 diagassert_flags &= ~DIAGASSERT_SYSLOG;
111 break;
112 }
113 }
114 }
115
116 snprintf(buf, sizeof(buf),
117 "assertion \"%s\" failed: file \"%s\", line %d%s%s%s",
118 failedexpr, file, line,
119 function ? ", function \"" : "",
120 function ? function : "",
121 function ? "\"" : "");
122 if (diagassert_flags & DIAGASSERT_STDERR)
123 (void)fprintf(stderr, "%s: %s\n", getprogname(), buf);
124 if (diagassert_flags & DIAGASSERT_SYSLOG)
125 syslog(LOG_DEBUG | LOG_USER, "%s", buf);
126 if (diagassert_flags & DIAGASSERT_ABORT)
127 abort();
128 }
129
130 void
__diagassert(const char * file,int line,const char * failedexpr)131 __diagassert(const char *file, int line, const char *failedexpr)
132 {
133
134 __diagassert13(file, line, NULL, failedexpr);
135 }
136