1 | /* Various declarations for language-independent diagnostics subroutines.
|
---|
2 | Copyright (C) 2000, 2001, 2002 Free Software Foundation, Inc.
|
---|
3 | Contributed by Gabriel Dos Reis <gdr@codesourcery.com>
|
---|
4 |
|
---|
5 | This file is part of GCC.
|
---|
6 |
|
---|
7 | GCC is free software; you can redistribute it and/or modify it under
|
---|
8 | the terms of the GNU General Public License as published by the Free
|
---|
9 | Software Foundation; either version 2, or (at your option) any later
|
---|
10 | version.
|
---|
11 |
|
---|
12 | GCC is distributed in the hope that it will be useful, but WITHOUT ANY
|
---|
13 | WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
---|
14 | FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
---|
15 | for more details.
|
---|
16 |
|
---|
17 | You should have received a copy of the GNU General Public License
|
---|
18 | along with GCC; see the file COPYING. If not, write to the Free
|
---|
19 | Software Foundation, 59 Temple Place - Suite 330, Boston, MA
|
---|
20 | 02111-1307, USA. */
|
---|
21 |
|
---|
22 | #ifndef GCC_DIAGNOSTIC_H
|
---|
23 | #define GCC_DIAGNOSTIC_H
|
---|
24 |
|
---|
25 | #include "obstack.h"
|
---|
26 | #include "location.h"
|
---|
27 |
|
---|
28 | /* The type of a text to be formatted according a format specification
|
---|
29 | along with a list of things. */
|
---|
30 | typedef struct
|
---|
31 | {
|
---|
32 | const char *format_spec;
|
---|
33 | va_list *args_ptr;
|
---|
34 | } text_info;
|
---|
35 |
|
---|
36 | /* Contants used to discreminate diagnostics. */
|
---|
37 | typedef enum
|
---|
38 | {
|
---|
39 | #define DEFINE_DIAGNOSTIC_KIND(K, M) K,
|
---|
40 | #include "diagnostic.def"
|
---|
41 | #undef DEFINE_DIAGNOSTIC_KIND
|
---|
42 | DK_LAST_DIAGNOSTIC_KIND
|
---|
43 | } diagnostic_t;
|
---|
44 |
|
---|
45 | /* A diagnostic is described by the MESSAGE to send, the FILE and LINE of
|
---|
46 | its context and its KIND (ice, error, warning, note, ...) See complete
|
---|
47 | list in diagnostic.def. */
|
---|
48 | typedef struct
|
---|
49 | {
|
---|
50 | text_info message;
|
---|
51 | location_t location;
|
---|
52 | /* The kind of diagnostic it is about. */
|
---|
53 | diagnostic_t kind;
|
---|
54 | } diagnostic_info;
|
---|
55 |
|
---|
56 | #define pedantic_error_kind() (flag_pedantic_errors ? DK_ERROR : DK_WARNING)
|
---|
57 |
|
---|
58 | /* How often diagnostics are prefixed by their locations:
|
---|
59 | o DIAGNOSTICS_SHOW_PREFIX_NEVER: never - not yet supported;
|
---|
60 | o DIAGNOSTICS_SHOW_PREFIX_ONCE: emit only once;
|
---|
61 | o DIAGNOSTICS_SHOW_PREFIX_EVERY_LINE: emit each time a physical
|
---|
62 | line is started. */
|
---|
63 | typedef enum
|
---|
64 | {
|
---|
65 | DIAGNOSTICS_SHOW_PREFIX_ONCE = 0x0,
|
---|
66 | DIAGNOSTICS_SHOW_PREFIX_NEVER = 0x1,
|
---|
67 | DIAGNOSTICS_SHOW_PREFIX_EVERY_LINE = 0x2
|
---|
68 | } diagnostic_prefixing_rule_t;
|
---|
69 |
|
---|
70 | /* This data structure encapsulates an output_buffer's state. */
|
---|
71 | typedef struct
|
---|
72 | {
|
---|
73 | /* The prefix for each new line. */
|
---|
74 | const char *prefix;
|
---|
75 |
|
---|
76 | /* The real upper bound of number of characters per line, taking into
|
---|
77 | account the case of a very very looong prefix. */
|
---|
78 | int maximum_length;
|
---|
79 |
|
---|
80 | /* The ideal upper bound of number of characters per line, as suggested
|
---|
81 | by front-end. */
|
---|
82 | int ideal_maximum_length;
|
---|
83 |
|
---|
84 | /* Indentation count. */
|
---|
85 | int indent_skip;
|
---|
86 |
|
---|
87 | /* Nonzero if current PREFIX was emitted at least once. */
|
---|
88 | bool emitted_prefix_p;
|
---|
89 |
|
---|
90 | /* Nonzero means one should emit a newline before outputing anything. */
|
---|
91 | bool need_newline_p;
|
---|
92 |
|
---|
93 | /* Current prefixing rule. */
|
---|
94 | diagnostic_prefixing_rule_t prefixing_rule;
|
---|
95 | } output_state;
|
---|
96 |
|
---|
97 | /* The type of a hook that formats client-specific data (trees mostly) into
|
---|
98 | an output_buffer. A client-supplied formatter returns true if everything
|
---|
99 | goes well. */
|
---|
100 | typedef struct output_buffer output_buffer;
|
---|
101 | typedef bool (*printer_fn) PARAMS ((output_buffer *, text_info *));
|
---|
102 |
|
---|
103 | /* The output buffer datatype. This is best seen as an abstract datatype
|
---|
104 | whose fields should not be accessed directly by clients. */
|
---|
105 | struct output_buffer
|
---|
106 | {
|
---|
107 | /* The current state of the buffer. */
|
---|
108 | output_state state;
|
---|
109 |
|
---|
110 | /* Where to output formatted text. */
|
---|
111 | FILE* stream;
|
---|
112 |
|
---|
113 | /* The obstack where the text is built up. */
|
---|
114 | struct obstack obstack;
|
---|
115 |
|
---|
116 | /* The amount of characters output so far. */
|
---|
117 | int line_length;
|
---|
118 |
|
---|
119 | /* This must be large enough to hold any printed integer or
|
---|
120 | floating-point value. */
|
---|
121 | char digit_buffer[128];
|
---|
122 |
|
---|
123 | /* If non-NULL, this function formats a TEXT into the BUFFER. When called,
|
---|
124 | TEXT->format_spec points to a format code. FORMAT_DECODER should call
|
---|
125 | output_add_string (and related functions) to add data to the BUFFER.
|
---|
126 | FORMAT_DECODER can read arguments from *TEXT->args_pts using VA_ARG.
|
---|
127 | If the BUFFER needs additional characters from the format string, it
|
---|
128 | should advance the TEXT->format_spec as it goes. When FORMAT_DECODER
|
---|
129 | returns, TEXT->format_spec should point to the last character processed.
|
---|
130 | */
|
---|
131 | printer_fn format_decoder;
|
---|
132 | } ;
|
---|
133 |
|
---|
134 | #define output_prefix(BUFFER) (BUFFER)->state.prefix
|
---|
135 |
|
---|
136 | /* The stream attached to the output_buffer, where the formatted
|
---|
137 | diagnostics will ultimately go. Works only on `output_buffer *'. */
|
---|
138 | #define output_buffer_attached_stream(BUFFER) (BUFFER)->stream
|
---|
139 |
|
---|
140 | /* In line-wrapping mode, whether we should start a new line. */
|
---|
141 | #define output_needs_newline(BUFFER) (BUFFER)->state.need_newline_p
|
---|
142 |
|
---|
143 | /* The amount of whitespace to be emitted when starting a new line. */
|
---|
144 | #define output_indentation(BUFFER) (BUFFER)->state.indent_skip
|
---|
145 |
|
---|
146 | /* A pointer to the formatted diagnostic message. */
|
---|
147 | #define output_message_text(BUFFER) \
|
---|
148 | ((const char *) obstack_base (&(BUFFER)->obstack))
|
---|
149 |
|
---|
150 | /* Client supplied function used to decode formats. */
|
---|
151 | #define output_format_decoder(BUFFER) (BUFFER)->format_decoder
|
---|
152 |
|
---|
153 | /* Prefixing rule used in formatting a diagnostic message. */
|
---|
154 | #define output_prefixing_rule(BUFFER) (BUFFER)->state.prefixing_rule
|
---|
155 |
|
---|
156 | /* Maximum characters per line in automatic line wrapping mode.
|
---|
157 | Zero means don't wrap lines. */
|
---|
158 | #define output_line_cutoff(BUFFER) (BUFFER)->state.ideal_maximum_length
|
---|
159 |
|
---|
160 | /* True if BUFFER is in line-wrapping mode. */
|
---|
161 | #define output_is_line_wrapping(BUFFER) (output_line_cutoff (BUFFER) > 0)
|
---|
162 |
|
---|
163 | #define output_formatted_scalar(BUFFER, FORMAT, INTEGER) \
|
---|
164 | do \
|
---|
165 | { \
|
---|
166 | sprintf ((BUFFER)->digit_buffer, FORMAT, INTEGER); \
|
---|
167 | output_add_string (BUFFER, (BUFFER)->digit_buffer); \
|
---|
168 | } \
|
---|
169 | while (0)
|
---|
170 |
|
---|
171 | /* Forward declarations. */
|
---|
172 | typedef struct diagnostic_context diagnostic_context;
|
---|
173 | typedef void (*diagnostic_starter_fn) PARAMS ((diagnostic_context *,
|
---|
174 | diagnostic_info *));
|
---|
175 | typedef diagnostic_starter_fn diagnostic_finalizer_fn;
|
---|
176 |
|
---|
177 | /* This data structure bundles altogether any information relevant to
|
---|
178 | the context of a diagnostic message. */
|
---|
179 | struct diagnostic_context
|
---|
180 | {
|
---|
181 | /* Where most of the diagnostic formatting work is done. In Object
|
---|
182 | Oriented terms, we'll say that diagnostic_context is a sub-class of
|
---|
183 | output_buffer. */
|
---|
184 | output_buffer buffer;
|
---|
185 |
|
---|
186 | /* The number of times we have issued diagnostics. */
|
---|
187 | int diagnostic_count[DK_LAST_DIAGNOSTIC_KIND];
|
---|
188 |
|
---|
189 | /* True if we should display the "warnings are being tread as error"
|
---|
190 | message, usually displayed once per compiler run. */
|
---|
191 | bool warnings_are_errors_message;
|
---|
192 |
|
---|
193 | /* This function is called before any message is printed out. It is
|
---|
194 | responsible for preparing message prefix and such. For example, it
|
---|
195 | might say:
|
---|
196 | In file included from "/usr/local/include/curses.h:5:
|
---|
197 | from "/home/gdr/src/nifty_printer.h:56:
|
---|
198 | ...
|
---|
199 | */
|
---|
200 | diagnostic_starter_fn begin_diagnostic;
|
---|
201 |
|
---|
202 | /* This function is called after the diagnostic message is printed. */
|
---|
203 | diagnostic_finalizer_fn end_diagnostic;
|
---|
204 |
|
---|
205 | /* Client hook to report an internal error. */
|
---|
206 | void (*internal_error) PARAMS ((const char *, va_list *));
|
---|
207 |
|
---|
208 | /* Function of last diagnostic message; more generally, function such that
|
---|
209 | if next diagnostic message is in it then we don't have to mention the
|
---|
210 | function name. */
|
---|
211 | tree last_function;
|
---|
212 |
|
---|
213 | /* Used to detect when input_file_stack has changed since last described. */
|
---|
214 | int last_module;
|
---|
215 |
|
---|
216 | int lock;
|
---|
217 |
|
---|
218 | /* Hook for front-end extensions. */
|
---|
219 | void *x_data;
|
---|
220 | };
|
---|
221 |
|
---|
222 | /* Client supplied function to announce a diagnostic. */
|
---|
223 | #define diagnostic_starter(DC) (DC)->begin_diagnostic
|
---|
224 |
|
---|
225 | /* Client supplied function called after a diagnostic message is
|
---|
226 | displayed. */
|
---|
227 | #define diagnostic_finalizer(DC) (DC)->end_diagnostic
|
---|
228 |
|
---|
229 | /* Extension hook for client. */
|
---|
230 | #define diagnostic_auxiliary_data(DC) (DC)->x_data
|
---|
231 |
|
---|
232 | /* Same as output_format_decoder. Works on 'diagnostic_context *'. */
|
---|
233 | #define diagnostic_format_decoder(DC) output_format_decoder (&(DC)->buffer)
|
---|
234 |
|
---|
235 | /* Same as output_prefixing_rule. Works on 'diagnostic_context *'. */
|
---|
236 | #define diagnostic_prefixing_rule(DC) output_prefixing_rule (&(DC)->buffer)
|
---|
237 |
|
---|
238 | /* Maximum characters per line in automatic line wrapping mode.
|
---|
239 | Zero means don't wrap lines. */
|
---|
240 | #define diagnostic_line_cutoff(DC) output_line_cutoff (&(DC)->buffer)
|
---|
241 |
|
---|
242 | /* True if the last function in which a diagnostic was reported is
|
---|
243 | different from the current one. */
|
---|
244 | #define diagnostic_last_function_changed(DC) \
|
---|
245 | ((DC)->last_function != current_function_decl)
|
---|
246 |
|
---|
247 | /* Remember the current function as being the last one in which we report
|
---|
248 | a diagnostic. */
|
---|
249 | #define diagnostic_set_last_function(DC) \
|
---|
250 | (DC)->last_function = current_function_decl
|
---|
251 |
|
---|
252 | /* True if the last module or file in which a diagnostic was reported is
|
---|
253 | different from the current one. */
|
---|
254 | #define diagnostic_last_module_changed(DC) \
|
---|
255 | ((DC)->last_module != input_file_stack_tick)
|
---|
256 |
|
---|
257 | /* Remember the current module or file as being the last one in which we
|
---|
258 | report a diagnostic. */
|
---|
259 | #define diagnostic_set_last_module(DC) \
|
---|
260 | (DC)->last_module = input_file_stack_tick
|
---|
261 |
|
---|
262 | /* This diagnostic_context is used by front-ends that directly output
|
---|
263 | diagnostic messages without going through `error', `warning',
|
---|
264 | and similar functions. */
|
---|
265 | extern diagnostic_context *global_dc;
|
---|
266 |
|
---|
267 | /* The total count of a KIND of diagnostics meitted so far. */
|
---|
268 | #define diagnostic_kind_count(DC, DK) (DC)->diagnostic_count[(int) (DK)]
|
---|
269 |
|
---|
270 | /* The number of errors that have been issued so far. Ideally, these
|
---|
271 | would take a diagnostic_context as an argument. */
|
---|
272 | #define errorcount diagnostic_kind_count (global_dc, DK_ERROR)
|
---|
273 | /* Similarly, but for warnings. */
|
---|
274 | #define warningcount diagnostic_kind_count (global_dc, DK_WARNING)
|
---|
275 | /* Similarly, but for sorrys. */
|
---|
276 | #define sorrycount diagnostic_kind_count (global_dc, DK_SORRY)
|
---|
277 |
|
---|
278 | /* Returns nonzero if warnings should be emitted. */
|
---|
279 | #define diagnostic_report_warnings_p() \
|
---|
280 | (!inhibit_warnings \
|
---|
281 | && !(in_system_header && !warn_system_headers))
|
---|
282 |
|
---|
283 | #define report_diagnostic(D) diagnostic_report_diagnostic (global_dc, D)
|
---|
284 |
|
---|
285 | /* Dignostic related functions. */
|
---|
286 | extern void diagnostic_initialize PARAMS ((diagnostic_context *));
|
---|
287 | extern void diagnostic_report_current_module PARAMS ((diagnostic_context *));
|
---|
288 | extern void diagnostic_report_current_function PARAMS ((diagnostic_context *));
|
---|
289 | extern void diagnostic_flush_buffer PARAMS ((diagnostic_context *));
|
---|
290 | extern bool diagnostic_count_diagnostic PARAMS ((diagnostic_context *,
|
---|
291 | diagnostic_t));
|
---|
292 | extern void diagnostic_report_diagnostic PARAMS ((diagnostic_context *,
|
---|
293 | diagnostic_info *));
|
---|
294 | extern void diagnostic_set_info PARAMS ((diagnostic_info *,
|
---|
295 | const char *, va_list *,
|
---|
296 | const char *, int,
|
---|
297 | diagnostic_t));
|
---|
298 | extern char *diagnostic_build_prefix PARAMS ((diagnostic_info *));
|
---|
299 |
|
---|
300 | /* Pure text formatting support functions. */
|
---|
301 | extern void init_output_buffer PARAMS ((output_buffer *,
|
---|
302 | const char *, int));
|
---|
303 | extern void output_clear PARAMS ((output_buffer *));
|
---|
304 | extern const char *output_last_position PARAMS ((const output_buffer *));
|
---|
305 | extern void output_set_prefix PARAMS ((output_buffer *,
|
---|
306 | const char *));
|
---|
307 | extern void output_destroy_prefix PARAMS ((output_buffer *));
|
---|
308 | extern void output_set_maximum_length PARAMS ((output_buffer *, int));
|
---|
309 | extern void output_emit_prefix PARAMS ((output_buffer *));
|
---|
310 | extern void output_add_newline PARAMS ((output_buffer *));
|
---|
311 | extern void output_add_space PARAMS ((output_buffer *));
|
---|
312 | extern int output_space_left PARAMS ((const output_buffer *));
|
---|
313 | extern void output_append PARAMS ((output_buffer *, const char *,
|
---|
314 | const char *));
|
---|
315 | extern void output_add_character PARAMS ((output_buffer *, int));
|
---|
316 | extern void output_decimal PARAMS ((output_buffer *, int));
|
---|
317 | extern void output_add_string PARAMS ((output_buffer *,
|
---|
318 | const char *));
|
---|
319 | extern void output_add_identifier PARAMS ((output_buffer *, tree));
|
---|
320 | extern const char *output_finalize_message PARAMS ((output_buffer *));
|
---|
321 | extern void output_clear_message_text PARAMS ((output_buffer *));
|
---|
322 | extern void output_printf PARAMS ((output_buffer *, const char *,
|
---|
323 | ...)) ATTRIBUTE_PRINTF_2;
|
---|
324 | extern void output_verbatim PARAMS ((output_buffer *, const char *,
|
---|
325 | ...));
|
---|
326 | extern void verbatim PARAMS ((const char *, ...));
|
---|
327 | extern char *file_name_as_prefix PARAMS ((const char *));
|
---|
328 | extern void inform PARAMS ((const char *, ...));
|
---|
329 |
|
---|
330 | #endif /* ! GCC_DIAGNOSTIC_H */
|
---|