1 /*
2 * Check: a unit test framework for C
3 * Copyright (C) 2001, 2002 Arien Malec
4 *
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2.1 of the License, or (at your option) any later version.
9 *
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
14 *
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the
17 * Free Software Foundation, Inc., 51 Franklin St, Fifth Floor, Boston,
18 * MA 02110-1301, USA.
19 */
20
21 #include "libcompat/libcompat.h"
22
23 #include <stdarg.h>
24 #include <stdlib.h>
25 #include <string.h>
26 #include <stdio.h>
27 #include <errno.h>
28 #include <setjmp.h>
29
30 #include "check_error.h"
31
32 /**
33 * Storage for setjmp/longjmp context information used in NOFORK mode
34 */
35 jmp_buf error_jmp_buffer;
36
37
38 /* FIXME: including a colon at the end is a bad way to indicate an error */
39 void
eprintf(const char * fmt,const char * file,int line,...)40 eprintf (const char *fmt, const char *file, int line, ...)
41 {
42 va_list args;
43
44 fflush (stderr);
45
46 fprintf (stderr, "%s:%d: ", file, line);
47 va_start (args, line);
48 vfprintf (stderr, fmt, args);
49 va_end (args);
50
51 /*include system error information if format ends in colon */
52 if (fmt[0] != '\0' && fmt[strlen (fmt) - 1] == ':')
53 fprintf (stderr, " %s", strerror (errno));
54 fprintf (stderr, "\n");
55
56 exit (2);
57 }
58
59 void *
emalloc(size_t n)60 emalloc (size_t n)
61 {
62 void *p;
63
64 p = malloc (n);
65 if (p == NULL)
66 eprintf ("malloc of %u bytes failed:", __FILE__, __LINE__ - 2, n);
67 return p;
68 }
69
70 void *
erealloc(void * ptr,size_t n)71 erealloc (void *ptr, size_t n)
72 {
73 void *p;
74
75 p = realloc (ptr, n);
76 if (p == NULL)
77 eprintf ("realloc of %u bytes failed:", __FILE__, __LINE__ - 2, n);
78 return p;
79 }
80