1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
|
/*
* error.c: Error handling
*
* Written by: Stefan Frank
* Ullrich Hafner
*
* Credits: Modelled after variable argument routines from Jef
* Poskanzer's pbmplus package.
*
* This file is part of FIASCO (Fractal Image And Sequence COdec)
* Copyright (C) 1994-2000 Ullrich Hafner
*/
/*
* $Date: 2000/03/20 21:29:59 $
* $Author: hafner $
* $Revision: 4.3 $
* $State: Exp $
*/
#define _DEFAULT_SOURCE 1 /* New name for SVID & BSD source defines */
#define _BSD_SOURCE 1 /* Make sure strdup() is in string.h */
#define _XOPEN_SOURCE 500 /* Make sure strdup() is in string.h */
#define _ERROR_C
#include "config.h"
#include <stdlib.h>
#include <stdio.h>
#if STDC_HEADERS
# include <stdarg.h>
# define VA_START(args, lastarg) va_start(args, lastarg)
#else /* not STDC_HEADERS */
# include <varargs.h>
# define VA_START(args, lastarg) va_start(args)
#endif /* not STDC_HEADERS */
#include <string.h>
#if HAVE_SETJMP_H
# include <setjmp.h>
#endif /* HAVE_SETJMP_H */
#include "fiasco.h"
#include "binerror.h"
/*****************************************************************************
global variables
*****************************************************************************/
int error_line = 0;
const char *error_file = NULL;
/*****************************************************************************
local variables
*****************************************************************************/
static const char *executable = "(name not initialized)";
/*****************************************************************************
public code
*****************************************************************************/
void
init_error_handling (const char *name)
/*
* Initialize filename of executable.
*
* No return value.
*/
{
if (name)
executable = strdup (name);
}
void
_error (const char *format, ...)
/*
* Print error message and exit.
*
* No return value.
*/
{
va_list args;
VA_START (args, format);
fprintf (stderr, "%s: %s: line %d:\nError: ",
executable, error_file, error_line);
vfprintf (stderr, format, args);
fputc ('\n', stderr);
va_end(args);
exit (1);
}
void
_file_error (const char *filename)
/*
* Print file error message and exit.
*
* No return value.
*/
{
fprintf (stderr, "%s: %s: line %d:\nError: ",
executable, error_file, error_line);
perror (filename);
exit (2);
}
void
_warning (const char *format, ...)
/*
* Issue a warning and continue execution.
*
* No return value.
*/
{
va_list args;
VA_START (args, format);
fprintf (stderr, "%s: %s: line %d:\nWarning: ",
executable, error_file, error_line);
vfprintf (stderr, format, args);
fputc ('\n', stderr);
va_end (args);
}
|
