OSDN Git Service

2002-05-27 H.J. Lu (hjl@gnu.org)
[pf3gnuchains/gcc-fork.git] / gcc / diagnostic.h
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
27 /*  Forward declarations.  */
28 typedef struct output_buffer output_buffer;
29 typedef struct diagnostic_context diagnostic_context;
30 typedef void (*diagnostic_starter_fn) PARAMS ((output_buffer *,
31                                                diagnostic_context *));
32 typedef diagnostic_starter_fn diagnostic_finalizer_fn;
33
34 typedef enum
35 {
36 #define DEFINE_DIAGNOSTIC_KIND(K, M) K,  
37 #include "diagnostic.def"
38 #undef DEFINE_DIAGNOSTIC_KIND
39   DK_LAST_DIAGNOSTIC_KIND
40 } diagnostic_t;
41
42 #define pedantic_error_kind() (flag_pedantic_errors ? DK_ERROR : DK_WARNING)
43
44 /* How often diagnostics are prefixed by their locations:
45    o DIAGNOSTICS_SHOW_PREFIX_NEVER: never - not yet supported;
46    o DIAGNOSTICS_SHOW_PREFIX_ONCE: emit only once;
47    o DIAGNOSTICS_SHOW_PREFIX_EVERY_LINE: emit each time a physical
48    line is started.  */
49 typedef enum
50 {
51   DIAGNOSTICS_SHOW_PREFIX_ONCE       = 0x0,
52   DIAGNOSTICS_SHOW_PREFIX_NEVER      = 0x1,
53   DIAGNOSTICS_SHOW_PREFIX_EVERY_LINE = 0x2
54 } diagnostic_prefixing_rule_t;
55
56 /* The type of front-end specific hook that formats trees into an
57    output_buffer.  A language specific printer returns a truth value if
58    everything goes well.  */
59 typedef int (*printer_fn) PARAMS ((output_buffer *));
60
61 /* This data structure encapsulates an output_buffer's state.  */
62 typedef struct
63 {
64   /* The prefix for each new line.  */
65   const char *prefix;
66
67   /* The real upper bound of number of characters per line, taking into
68      account the case of a very very looong prefix.  */  
69   int maximum_length;
70
71   /* The ideal upper bound of number of characters per line, as suggested
72      by front-end.  */  
73   int ideal_maximum_length;
74
75   /* Indentation count.  */
76   int indent_skip;
77
78   /* Nonzero if current PREFIX was emitted at least once.  */
79   bool emitted_prefix_p;
80
81   /* Nonzero means one should emit a newline before outputing anything.  */
82   bool need_newline_p;
83
84   /* Current prefixing rule.  */
85   diagnostic_prefixing_rule_t prefixing_rule;
86
87   /* The current char to output.  Updated by front-end (*format_map) when
88      it is called to report front-end printer for a specified format.  */  
89   const char *cursor;
90
91   /* A pointer to the variable argument-list for formatting.  */  
92   va_list *format_args;
93
94   /* The number of times we have issued diagnostics.  */
95   int diagnostic_count[DK_LAST_DIAGNOSTIC_KIND];
96 } output_state;
97
98 /* The output buffer datatype.  This is best seen as an abstract datatype.  */
99 struct output_buffer
100 {
101   /* Internal data.  These fields should not be accessed directly by
102      front-ends.  */
103
104   /* The current state of the buffer.  */
105   output_state state;
106
107   /* Where to output formatted text.  */
108   FILE* stream;
109
110   /* The obstack where the text is built up.  */  
111   struct obstack obstack;
112
113   /* The amount of characters output so far.  */  
114   int line_length;
115
116   /* This must be large enough to hold any printed integer or
117      floating-point value.  */
118   char digit_buffer[128];
119
120 /* If non-NULL, this function formats data in the BUFFER. When called,
121    output_buffer_text_cursor (BUFFER) points to a format code.
122    FORMAT_DECODER should call output_add_string (and related functions)
123    to add data to the BUFFER.  FORMAT_DECODER can read arguments from
124    output_buffer_format_args (BUFFER) using VA_ARG.  If the BUFFER needs
125    additional characters from the format string, it should advance
126    the output_buffer_text_cursor (BUFFER) as it goes.  When FORMAT_DECODER
127    returns, output_buffer_text_cursor (BUFFER) should point to the last
128    character processed.  */
129
130   printer_fn format_decoder;
131 };
132
133 /* Current state of an output_buffer.  */
134 #define output_buffer_state(BUFFER) (BUFFER)->state
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 /* This points to the beginning of the rest of the diagnostic message
141    to be formatted.  Accepts only `output_buffer *'s.  */
142 #define output_buffer_text_cursor(BUFFER) (BUFFER)->state.cursor
143
144 /* The rest of the `variable argument list' not yet processed.
145    This macro works on both `output_state *' and `output_buffer *'.  */
146 #define output_buffer_format_args(BUFFER) \
147    *(((output_state *)(BUFFER))->format_args)
148
149 /* In line-wrapping mode, whether we should start a new line.  */
150 #define output_needs_newline(BUFFER) (BUFFER)->state.need_newline_p
151
152 /* The amount of whitespace to be emitted when starting a new line.  */
153 #define output_indentation(BUFFER) (BUFFER)->state.indent_skip
154
155 /* A pointer to the formatted diagonstic message.  */
156 #define output_message_text(BUFFER) \
157    ((const char *) obstack_base (&(BUFFER)->obstack))
158
159 /* Client supplied function used to decode formats.  */
160 #define output_format_decoder(BUFFER)     (BUFFER)->format_decoder
161
162 /* Prefixing rule used in formatting a diagnostic message.  */
163 #define output_prefixing_rule(BUFFER)  (BUFFER)->state.prefixing_rule
164
165 /* Maximum characters per line in automatic line wrapping mode.
166    Zero means don't wrap lines.  */
167 #define output_line_cutoff(BUFFER)  (BUFFER)->state.ideal_maximum_length
168
169 /* This data structure bundles altogether any information relevant to
170    the context of a diagnostic message.  */
171 struct diagnostic_context
172 {
173   /* Where most of the diagnostic formatting work is done.  In Object
174      Oriented terms, we'll say that diagnostic_context is a sub-class of
175      output_buffer.  */
176   output_buffer buffer;
177
178   /* The diagnostic message to output.  */
179   const char *message;
180
181   /* A pointer to a variable list of the arguments necessary for the
182      purpose of message formatting.  */
183   va_list *args_ptr;
184
185   /* The name of the source file involved in the diiagnostic.  */     
186   const char *file;
187
188   /* The line-location in the source file.  */
189   int line;
190
191   /* Is this message a warning?  */
192   int warn;
193
194   /* This function is called before any message is printed out.  It is
195      responsible for preparing message prefix and such.  For example, it
196      might say:
197      In file included from "/usr/local/include/curses.h:5:
198                       from "/home/gdr/src/nifty_printer.h:56:
199                       ...
200   */
201   void (*begin_diagnostic) PARAMS ((output_buffer *, diagnostic_context *));
202
203   /* This function is called after the diagnostic message is printed.  */
204   void (*end_diagnostic) PARAMS ((output_buffer *, diagnostic_context *));
205
206   /* Hook for front-end extensions.  */
207   void *x_data;
208 };
209
210 /* The diagnostic message being formatted.  */
211 #define diagnostic_message(DC) (DC)->message
212
213 /* A pointer to the variable argument list used in a call
214    to a diagonstic routine.  */   
215 #define diagnostic_argument_list(DC) (DC)->args_ptr
216
217 /* The program file to which the diagnostic is referring to.  */
218 #define diagnostic_file_location(DC) (DC)->file
219
220 /* The program source line referred to in the diagnostic message.  */
221 #define diagnostic_line_location(DC) (DC)->line
222
223 /* Tell whether the diagnostic message is to be treated as a warning.  */
224 #define diagnostic_is_warning(DC) (DC)->warn
225
226 /* Client supplied function to announce a diagnostic.  */
227 #define diagnostic_starter(DC) (DC)->begin_diagnostic
228
229 /* Client supplied function called after a diagnostic message is
230    displayed.  */
231 #define diagnostic_finalizer(DC) (DC)->end_diagnostic
232
233 /* Extension hook for client.  */
234 #define diagnostic_auxiliary_data(DC) (DC)->x_data
235
236 /* Same as output_format_decoder.  Works on 'diagnostic_context *'.  */
237 #define diagnostic_format_decoder(DC) output_format_decoder (&(DC)->buffer)
238
239 /* Same as output_prefixing_rule.  Works on 'diagnostic_context *'.  */
240 #define diagnostic_prefixing_rule(DC) output_prefixing_rule (&(DC)->buffer)
241
242 /* Maximum characters per line in automatic line wrapping mode.
243    Zero means don't wrap lines.  */
244 #define diagnostic_line_cutoff(DC) output_line_cutoff (&(DC)->buffer)
245
246 /* Same as output_buffer_state, but works on 'diagnostic_context *'.  */
247 #define diagnostic_state(DC)  output_buffer_state (&(DC)->buffer)
248
249 #define diagnostic_buffer (&global_dc->buffer)
250
251 /* This diagnostic context is used by front-ends that directly output
252    diagnostic messages without going through `error', `warning',
253    and similar functions.  */
254 extern diagnostic_context *global_dc;
255
256 /* The total count of a KIND of diagnostics meitted so far.  */
257 #define diagnostic_kind_count(DC, DK) \
258    (DC)->buffer.state.diagnostic_count[(int) (DK)]
259
260 /* The number of errors that have been issued so far.  Ideally, these
261    would take an output_buffer as an argument.  */
262 #define errorcount diagnostic_kind_count (global_dc, DK_ERROR)
263 /* Similarly, but for warnings.  */
264 #define warningcount diagnostic_kind_count (global_dc, DK_WARNING)
265 /* Similarly, but for sorrys.  */
266 #define sorrycount diagnostic_kind_count (global_dc, DK_SORRY)
267
268 /* Returns non-zero if warnings should be emitted.  */
269 #define diagnostic_report_warnings_p()                  \
270   (!inhibit_warnings                                    \
271    && !(in_system_header && !warn_system_headers))
272
273
274 /* Prototypes */
275 extern void set_diagnostic_context      PARAMS ((diagnostic_context *,
276                                                  const char *, va_list *,
277                                                  const char *, int, int));
278 extern void set_internal_error_function PARAMS ((void (*)
279                                                  PARAMS ((const char *,
280                                                           va_list *))));
281 extern void report_diagnostic           PARAMS ((diagnostic_context *));
282 extern void diagnostic_initialize       PARAMS ((diagnostic_context *));
283 extern void init_output_buffer          PARAMS ((output_buffer *,
284                                                  const char *, int));
285 extern void flush_diagnostic_buffer     PARAMS ((void));
286 extern void output_clear                PARAMS ((output_buffer *));
287 extern const char *output_get_prefix    PARAMS ((const output_buffer *));
288 extern const char *output_last_position PARAMS ((const output_buffer *));
289 extern void output_set_prefix           PARAMS ((output_buffer *,
290                                                  const char *));
291 extern void output_destroy_prefix       PARAMS ((output_buffer *));
292 extern void output_set_maximum_length   PARAMS ((output_buffer *, int));
293 extern void output_emit_prefix          PARAMS ((output_buffer *));
294 extern void output_add_newline          PARAMS ((output_buffer *));
295 extern void output_add_space            PARAMS ((output_buffer *));
296 extern int output_space_left            PARAMS ((const output_buffer *));
297 extern void output_append               PARAMS ((output_buffer *, const char *,
298                                                  const char *));
299 extern void output_add_character        PARAMS ((output_buffer *, int));
300 extern void output_decimal              PARAMS ((output_buffer *, int));
301 extern void output_add_string           PARAMS ((output_buffer *,
302                                                  const char *));
303 extern const char *output_finalize_message PARAMS ((output_buffer *));
304 extern void output_clear_message_text   PARAMS ((output_buffer *));
305 extern void output_printf               PARAMS ((output_buffer *, const char *,
306                                                  ...)) ATTRIBUTE_PRINTF_2;
307 extern int output_is_line_wrapping      PARAMS ((output_buffer *));
308 extern void output_verbatim             PARAMS ((output_buffer *, const char *,
309                                                  ...)) ATTRIBUTE_PRINTF_2;
310 extern void verbatim                    PARAMS ((const char *, ...))
311      ATTRIBUTE_PRINTF_1;
312 extern char *context_as_prefix          PARAMS ((const char *, int, int));
313 extern char *file_name_as_prefix        PARAMS ((const char *));
314 extern int error_module_changed         PARAMS ((void));
315 extern void record_last_error_module    PARAMS ((void));
316 extern int error_function_changed       PARAMS ((void));
317 extern void record_last_error_function  PARAMS ((void));
318 extern void report_problematic_module   PARAMS ((output_buffer *));     
319
320 #endif /* ! GCC_DIAGNOSTIC_H */