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
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
|
/* Copyright (C) 2001-2018 Artifex Software, Inc.
All Rights Reserved.
This software is provided AS-IS with no warranty, either express or
implied.
This software is distributed under license and may not be copied,
modified or distributed except as expressly authorized under the terms
of the license contained in the file LICENSE in this distribution.
Refer to licensing information at http://www.artifex.com or contact
Artifex Software, Inc., 1305 Grant Avenue - Suite 200, Novato,
CA 94945, U.S.A., +1(415)492-9861, for further information.
*/
/* Debugging machinery definitions */
#ifndef gdebug_INCLUDED
# define gdebug_INCLUDED
/*
* The compile-time DEBUG symbol determines whether debugging/tracing
* code is included in the compiled code. DEBUG may be set or not set
* independently for every compilation; however, a small amount of support
* machinery in gsmisc.c is always included in the executable, just
* in case *some* file was compiled with DEBUG set.
*
* When DEBUG is set, it does not cause debugging/tracing printout to occur.
* Rather, it includes code that produces such printout *if* (a) given
* one(s) of 128 debugging flags is set. In this way, one can selectively
* turn printout on and off during debugging. (In fact, we even provide a
* PostScript operator, .setdebug, that does this.)
*
* The debugging flags are normally indexed by character code. Originally
* this was more than a convention: gs_debug_c, which tests whether a given
* flag is set, considers that if a flag named by a given upper-case letter
* is set, the flag named by the corresponding lower-case letter is also
* set.
*
* The new code uses a 'implication' table that allows us to be more general;
* any debug flag can now 'imply' another one. By default this is setup
* to give the same behaviour as before, but newly added flags are not
* constrained in the same way - we can have A -> B -> C etc or can have
* upper case flags that don't imply lower case ones.
*
* If the output selected by a given flag can be printed by a single
* printf, the conventional way to produce the output is
* if_debugN('x', "...format...", v1, ..., vN);
* Usually the flag appears in the output explicitly:
* if_debugN('x', "[x]...format...", v1, ..., vN);
* If the output is more complex, the conventional way to produce the
* output is
* if ( gs_debug_c('x') ) {
* ... start each line with dlprintfN(...)
* ... produce additional output within a line with dprintfN(...)
* } */
typedef enum {
#define FLAG(a,b,c,d) gs_debug_flag_ ## a = b
#define UNUSED(a)
#include "gdbflags.h"
#undef FLAG
#undef UNUSED
} gs_debug_flag;
typedef struct {
int used;
char short_desc[20];
char long_desc[80];
} gs_debug_flag_details;
#define gs_debug_flags_max 127
extern const byte gs_debug_flag_implied_by[gs_debug_flags_max];
extern const gs_debug_flag_details gs_debug_flags[gs_debug_flags_max];
int gs_debug_flags_parse(gs_memory_t *heap, const char *arg);
void gs_debug_flags_list(gs_memory_t *heap);
/* Define the array of debugging flags, indexed by character code. */
extern char gs_debug[128];
bool gs_debug_c(int /*char */ );
/*
* Define an alias for a specialized debugging flag
* that used to be a separate variable.
*/
#define gs_log_errors gs_debug['#']
/* If debugging, direct all error output to gs_debug_out. */
extern FILE *gs_debug_out;
/* Debugging printout macros. */
#if defined(DEBUG) && !defined(GS_THREADSAFE)
# define if_debug0(c,s)\
BEGIN if (gs_debug_c(c)) dlprintf(s); END
# define if_debug1(c,s,a1)\
BEGIN if (gs_debug_c(c)) dlprintf1(s,a1); END
# define if_debug2(c,s,a1,a2)\
BEGIN if (gs_debug_c(c)) dlprintf2(s,a1,a2); END
# define if_debug3(c,s,a1,a2,a3)\
BEGIN if (gs_debug_c(c)) dlprintf3(s,a1,a2,a3); END
# define if_debug4(c,s,a1,a2,a3,a4)\
BEGIN if (gs_debug_c(c)) dlprintf4(s,a1,a2,a3,a4); END
# define if_debug5(c,s,a1,a2,a3,a4,a5)\
BEGIN if (gs_debug_c(c)) dlprintf5(s,a1,a2,a3,a4,a5); END
# define if_debug6(c,s,a1,a2,a3,a4,a5,a6)\
BEGIN if (gs_debug_c(c)) dlprintf6(s,a1,a2,a3,a4,a5,a6); END
# define if_debug7(c,s,a1,a2,a3,a4,a5,a6,a7)\
BEGIN if (gs_debug_c(c)) dlprintf7(s,a1,a2,a3,a4,a5,a6,a7); END
# define if_debug8(c,s,a1,a2,a3,a4,a5,a6,a7,a8)\
BEGIN if (gs_debug_c(c)) dlprintf8(s,a1,a2,a3,a4,a5,a6,a7,a8); END
# define if_debug9(c,s,a1,a2,a3,a4,a5,a6,a7,a8,a9)\
BEGIN if (gs_debug_c(c)) dlprintf9(s,a1,a2,a3,a4,a5,a6,a7,a8,a9); END
# define if_debug10(c,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10)\
BEGIN if (gs_debug_c(c)) dlprintf10(s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10); END
# define if_debug11(c,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11)\
BEGIN if (gs_debug_c(c)) dlprintf11(s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11); END
# define if_debug12(c,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12)\
BEGIN if (gs_debug_c(c)) dlprintf12(s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); END
#else
# define if_debug0(c,s) DO_NOTHING
# define if_debug1(c,s,a1) DO_NOTHING
# define if_debug2(c,s,a1,a2) DO_NOTHING
# define if_debug3(c,s,a1,a2,a3) DO_NOTHING
# define if_debug4(c,s,a1,a2,a3,a4) DO_NOTHING
# define if_debug5(c,s,a1,a2,a3,a4,a5) DO_NOTHING
# define if_debug6(c,s,a1,a2,a3,a4,a5,a6) DO_NOTHING
# define if_debug7(c,s,a1,a2,a3,a4,a5,a6,a7) DO_NOTHING
# define if_debug8(c,s,a1,a2,a3,a4,a5,a6,a7,a8) DO_NOTHING
# define if_debug9(c,s,a1,a2,a3,a4,a5,a6,a7,a8,a9) DO_NOTHING
# define if_debug10(c,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10) DO_NOTHING
# define if_debug11(c,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11) DO_NOTHING
# define if_debug12(c,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12) DO_NOTHING
#endif
#ifdef DEBUG
# define if_debug0m(c,m,s)\
BEGIN if (gs_debug_c(c)) dmlprintf(m,s); END
# define if_debug1m(c,m,s,a1)\
BEGIN if (gs_debug_c(c)) dmlprintf1(m,s,a1); END
# define if_debug2m(c,m,s,a1,a2)\
BEGIN if (gs_debug_c(c)) dmlprintf2(m,s,a1,a2); END
# define if_debug3m(c,m,s,a1,a2,a3)\
BEGIN if (gs_debug_c(c)) dmlprintf3(m,s,a1,a2,a3); END
# define if_debug4m(c,m,s,a1,a2,a3,a4)\
BEGIN if (gs_debug_c(c)) dmlprintf4(m,s,a1,a2,a3,a4); END
# define if_debug5m(c,m,s,a1,a2,a3,a4,a5)\
BEGIN if (gs_debug_c(c)) dmlprintf5(m,s,a1,a2,a3,a4,a5); END
# define if_debug6m(c,m,s,a1,a2,a3,a4,a5,a6)\
BEGIN if (gs_debug_c(c)) dmlprintf6(m,s,a1,a2,a3,a4,a5,a6); END
# define if_debug7m(c,m,s,a1,a2,a3,a4,a5,a6,a7)\
BEGIN if (gs_debug_c(c)) dmlprintf7(m,s,a1,a2,a3,a4,a5,a6,a7); END
# define if_debug8m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8)\
BEGIN if (gs_debug_c(c)) dmlprintf8(m,s,a1,a2,a3,a4,a5,a6,a7,a8); END
# define if_debug9m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9)\
BEGIN if (gs_debug_c(c)) dmlprintf9(m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9); END
# define if_debug10m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10)\
BEGIN if (gs_debug_c(c)) dmlprintf10(m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10); END
# define if_debug11m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11)\
BEGIN if (gs_debug_c(c)) dmlprintf11(m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11); END
# define if_debug12m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12)\
BEGIN if (gs_debug_c(c)) dmlprintf12(m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12); END
#else
# define if_debug0m(c,m,s) DO_NOTHING
# define if_debug1m(c,m,s,a1) DO_NOTHING
# define if_debug2m(c,m,s,a1,a2) DO_NOTHING
# define if_debug3m(c,m,s,a1,a2,a3) DO_NOTHING
# define if_debug4m(c,m,s,a1,a2,a3,a4) DO_NOTHING
# define if_debug5m(c,m,s,a1,a2,a3,a4,a5) DO_NOTHING
# define if_debug6m(c,m,s,a1,a2,a3,a4,a5,a6) DO_NOTHING
# define if_debug7m(c,m,s,a1,a2,a3,a4,a5,a6,a7) DO_NOTHING
# define if_debug8m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8) DO_NOTHING
# define if_debug9m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9) DO_NOTHING
# define if_debug10m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10) DO_NOTHING
# define if_debug11m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11) DO_NOTHING
# define if_debug12m(c,m,s,a1,a2,a3,a4,a5,a6,a7,a8,a9,a10,a11,a12) DO_NOTHING
#endif
/* Debugging support procedures in gsmisc.c */
void debug_print_string(const gs_memory_t *mem, const byte * str, uint len);
void debug_dump_bytes(const gs_memory_t *mem,
const byte * from, const byte * to,
const char *msg);
void debug_dump_bitmap(const gs_memory_t *mem,
const byte * from, uint raster, uint height,
const char *msg);
#ifndef GS_THREADSAFE
void debug_print_string_hex_nomem(const byte * str, uint len);
#endif
void debug_print_string_hex(const gs_memory_t *mem, const byte * str, uint len);
#endif /* gdebug_INCLUDED */
|
