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 #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                                                  ...)) ATTRIBUTE_PRINTF_2;
 326 extern void verbatim                    PARAMS ((const char *, ...))
 327      ATTRIBUTE_PRINTF_1;
 328 extern char *file_name_as_prefix        PARAMS ((const char *));
 329 extern void inform                      PARAMS ((const char *, ...));
 330
 331 #endif /* ! GCC_DIAGNOSTIC_H */