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
|
/*\
*
* COPYRIGHT 1990
* DIGITAL EQUIPMENT CORPORATION
* MAYNARD, MASSACHUSETTS
* ALL RIGHTS RESERVED.
*
* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE AND
* SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT CORPORATION.
* DIGITAL MAKES NO REPRESENTATIONS ABOUT THE SUITABILITY OF THIS SOFTWARE
* FOR ANY PURPOSE. IT IS SUPPLIED "AS IS" WITHOUT EXPRESS OR IMPLIED
* WARRANTY.
*
* IF THE SOFTWARE IS MODIFIED IN A MANNER CREATING DERIVATIVE COPYRIGHT
* RIGHTS, APPROPRIATE LEGENDS MAY BE PLACED ON THE DERIVATIVE WORK IN
* ADDITION TO THAT SET FORTH ABOVE.
*
* Permission to use, copy, modify, and distribute this software and its
* documentation for any purpose and without fee is hereby granted, provided
* that the above copyright notice appear in all copies and that both that
* copyright notice and this permission notice appear in supporting
* documentation, and that the name of Digital Equipment Corporation not be
* used in advertising or publicity pertaining to distribution of the
* software without specific, written prior permission.
\*/
#include "utils.h"
#include <ctype.h>
#include <stdlib.h>
/***====================================================================***/
static FILE *errorFile = NULL;
Boolean
uSetErrorFile(const char *name)
{
if ((errorFile != NULL) && (errorFile != stderr)) {
fprintf(errorFile, "switching to %s\n", name ? name : "stderr");
fclose(errorFile);
}
if (name != NullString)
errorFile = fopen(name, "w");
else
errorFile = stderr;
if (errorFile == NULL) {
errorFile = stderr;
return (False);
}
return (True);
}
void
uInformation(const char *s, ...)
{
va_list ap;
va_start(ap, s);
vfprintf(errorFile, s, ap);
fflush(errorFile);
va_end(ap);
return;
}
/***====================================================================***/
void
uAction(const char *s, ...)
{
va_list ap;
va_start(ap, s);
fprintf(errorFile, " ");
vfprintf(errorFile, s, ap);
fflush(errorFile);
va_end(ap);
return;
}
/***====================================================================***/
void
uWarning(const char *s, ...)
{
va_list ap;
va_start(ap, s);
fprintf(errorFile, "Warning: ");
vfprintf(errorFile, s, ap);
fflush(errorFile);
va_end(ap);
return;
}
/***====================================================================***/
void
uError(const char *s, ...)
{
va_list ap;
va_start(ap, s);
fprintf(errorFile, "Error: ");
vfprintf(errorFile, s, ap);
fflush(errorFile);
va_end(ap);
return;
}
/***====================================================================***/
void
uInternalError(const char *s, ...)
{
va_list ap;
va_start(ap, s);
fprintf(errorFile, "Internal error: ");
vfprintf(errorFile, s, ap);
fflush(errorFile);
va_end(ap);
return;
}
/***====================================================================***/
|