gcc/diagnostic.h

   1 /* Various declarations for language-independent diagnostics subroutines.
   2    Copyright (C) 2000-2015 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 3, 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 COPYING3.  If not see
  19 <http://www.gnu.org/licenses/>.  */
  20
  21 #ifndef GCC_DIAGNOSTIC_H
  22 #define GCC_DIAGNOSTIC_H
  23
  24 #include "pretty-print.h"
  25 #include "diagnostic-core.h"
  26
  27 /* A diagnostic is described by the MESSAGE to send, the FILE and LINE of
  28    its context and its KIND (ice, error, warning, note, ...)  See complete
  29    list in diagnostic.def.  */
  30 struct diagnostic_info
  31 {
  32   /* Text to be formatted. It also contains the location(s) for this
  33      diagnostic.  */
  34   text_info message;
  35   unsigned int override_column;
  36   /* Auxiliary data for client.  */
  37   void *x_data;
  38   /* The kind of diagnostic it is about.  */
  39   diagnostic_t kind;
  40   /* Which OPT_* directly controls this diagnostic.  */
  41   int option_index;
  42 };
  43
  44 /* Each time a diagnostic's classification is changed with a pragma,
  45    we record the change and the location of the change in an array of
  46    these structs.  */
  47 struct diagnostic_classification_change_t
  48 {
  49   location_t location;
  50   int option;
  51   diagnostic_t kind;
  52 };
  53
  54 /*  Forward declarations.  */
  55 typedef void (*diagnostic_starter_fn) (diagnostic_context *,
  56                                        diagnostic_info *);
  57 typedef diagnostic_starter_fn diagnostic_finalizer_fn;
  58
  59 /* This data structure bundles altogether any information relevant to
  60    the context of a diagnostic message.  */
  61 struct diagnostic_context
  62 {
  63   /* Where most of the diagnostic formatting work is done.  */
  64   pretty_printer *printer;
  65
  66   /* The number of times we have issued diagnostics.  */
  67   int diagnostic_count[DK_LAST_DIAGNOSTIC_KIND];
  68
  69   /* True if we should display the "warnings are being tread as error"
  70      message, usually displayed once per compiler run.  */
  71   bool some_warnings_are_errors;
  72
  73   /* True if it has been requested that warnings be treated as errors.  */
  74   bool warning_as_error_requested;
  75
  76   /* The number of option indexes that can be passed to warning() et
  77      al.  */
  78   int n_opts;
  79
  80   /* For each option index that can be passed to warning() et al
  81      (OPT_* from options.h when using this code with the core GCC
  82      options), this array may contain a new kind that the diagnostic
  83      should be changed to before reporting, or DK_UNSPECIFIED to leave
  84      it as the reported kind, or DK_IGNORED to not report it at
  85      all.  */
  86   diagnostic_t *classify_diagnostic;
  87
  88   /* History of all changes to the classifications above.  This list
  89      is stored in location-order, so we can search it, either
  90      binary-wise or end-to-front, to find the most recent
  91      classification for a given diagnostic, given the location of the
  92      diagnostic.  */
  93   diagnostic_classification_change_t *classification_history;
  94
  95   /* The size of the above array.  */
  96   int n_classification_history;
  97
  98   /* For pragma push/pop.  */
  99   int *push_list;
 100   int n_push;
 101
 102   /* True if we should print the source line with a caret indicating
 103      the location.  */
 104   bool show_caret;
 105
 106   /* Maximum width of the source line printed.  */
 107   int caret_max_width;
 108
 109   /* Characters used for caret diagnostics.  */
 110   char caret_chars[MAX_LOCATIONS_PER_MESSAGE];
 111
 112   /* True if we should print the command line option which controls
 113      each diagnostic, if known.  */
 114   bool show_option_requested;
 115
 116   /* True if we should raise a SIGABRT on errors.  */
 117   bool abort_on_error;
 118
 119   /* True if we should show the column number on diagnostics.  */
 120   bool show_column;
 121
 122   /* True if pedwarns are errors.  */
 123   bool pedantic_errors;
 124
 125   /* True if permerrors are warnings.  */
 126   bool permissive;
 127
 128   /* The index of the option to associate with turning permerrors into
 129      warnings.  */
 130   int opt_permissive;
 131
 132   /* True if errors are fatal.  */
 133   bool fatal_errors;
 134
 135   /* True if all warnings should be disabled.  */
 136   bool dc_inhibit_warnings;
 137
 138   /* True if warnings should be given in system headers.  */
 139   bool dc_warn_system_headers;
 140
 141   /* Maximum number of errors to report.  */
 142   unsigned int max_errors;
 143
 144   /* This function is called before any message is printed out.  It is
 145      responsible for preparing message prefix and such.  For example, it
 146      might say:
 147      In file included from "/usr/local/include/curses.h:5:
 148                       from "/home/gdr/src/nifty_printer.h:56:
 149                       ...
 150   */
 151   diagnostic_starter_fn begin_diagnostic;
 152
 153   /* This function is called after the diagnostic message is printed.  */
 154   diagnostic_finalizer_fn end_diagnostic;
 155
 156   /* Client hook to report an internal error.  */
 157   void (*internal_error) (diagnostic_context *, const char *, va_list *);
 158
 159   /* Client hook to say whether the option controlling a diagnostic is
 160      enabled.  Returns nonzero if enabled, zero if disabled.  */
 161   int (*option_enabled) (int, void *);
 162
 163   /* Client information to pass as second argument to
 164      option_enabled.  */
 165   void *option_state;
 166
 167   /* Client hook to return the name of an option that controls a
 168      diagnostic.  Returns malloced memory.  The first diagnostic_t
 169      argument is the kind of diagnostic before any reclassification
 170      (of warnings as errors, etc.); the second is the kind after any
 171      reclassification.  May return NULL if no name is to be printed.
 172      May be passed 0 as well as the index of a particular option.  */
 173   char *(*option_name) (diagnostic_context *, int, diagnostic_t, diagnostic_t);
 174
 175   /* Auxiliary data for client.  */
 176   void *x_data;
 177
 178   /* Used to detect that the last caret was printed at the same location.  */
 179   location_t last_location;
 180
 181   /* Used to detect when the input file stack has changed since last
 182      described.  */
 183   const struct line_map *last_module;
 184
 185   int lock;
 186
 187   bool inhibit_notes_p;
 188 };
 189
 190 static inline void
 191 diagnostic_inhibit_notes (diagnostic_context * context)
 192 {
 193   context->inhibit_notes_p = true;
 194 }
 195
 196
 197 /* Client supplied function to announce a diagnostic.  */
 198 #define diagnostic_starter(DC) (DC)->begin_diagnostic
 199
 200 /* Client supplied function called after a diagnostic message is
 201    displayed.  */
 202 #define diagnostic_finalizer(DC) (DC)->end_diagnostic
 203
 204 /* Extension hooks for client.  */
 205 #define diagnostic_context_auxiliary_data(DC) (DC)->x_data
 206 #define diagnostic_info_auxiliary_data(DI) (DI)->x_data
 207
 208 /* Same as pp_format_decoder.  Works on 'diagnostic_context *'.  */
 209 #define diagnostic_format_decoder(DC) ((DC)->printer->format_decoder)
 210
 211 /* Same as output_prefixing_rule.  Works on 'diagnostic_context *'.  */
 212 #define diagnostic_prefixing_rule(DC) ((DC)->printer->wrapping.rule)
 213
 214 /* Maximum characters per line in automatic line wrapping mode.
 215    Zero means don't wrap lines.  */
 216 #define diagnostic_line_cutoff(DC) ((DC)->printer->wrapping.line_cutoff)
 217
 218 #define diagnostic_flush_buffer(DC) pp_flush ((DC)->printer)
 219
 220 /* True if the last module or file in which a diagnostic was reported is
 221    different from the current one.  */
 222 #define diagnostic_last_module_changed(DC, MAP) \
 223   ((DC)->last_module != MAP)
 224
 225 /* Remember the current module or file as being the last one in which we
 226    report a diagnostic.  */
 227 #define diagnostic_set_last_module(DC, MAP)     \
 228   (DC)->last_module = MAP
 229
 230 /* Raise SIGABRT on any diagnostic of severity DK_ERROR or higher.  */
 231 #define diagnostic_abort_on_error(DC) \
 232   (DC)->abort_on_error = true
 233
 234 /* This diagnostic_context is used by front-ends that directly output
 235    diagnostic messages without going through `error', `warning',
 236    and similar functions.  */
 237 extern diagnostic_context *global_dc;
 238
 239 /* The total count of a KIND of diagnostics emitted so far.  */
 240 #define diagnostic_kind_count(DC, DK) (DC)->diagnostic_count[(int) (DK)]
 241
 242 /* The number of errors that have been issued so far.  Ideally, these
 243    would take a diagnostic_context as an argument.  */
 244 #define errorcount diagnostic_kind_count (global_dc, DK_ERROR)
 245 /* Similarly, but for warnings.  */
 246 #define warningcount diagnostic_kind_count (global_dc, DK_WARNING)
 247 /* Similarly, but for warnings promoted to errors.  */
 248 #define werrorcount diagnostic_kind_count (global_dc, DK_WERROR)
 249 /* Similarly, but for sorrys.  */
 250 #define sorrycount diagnostic_kind_count (global_dc, DK_SORRY)
 251
 252 /* Returns nonzero if warnings should be emitted.  */
 253 #define diagnostic_report_warnings_p(DC, LOC)                           \
 254   (!(DC)->dc_inhibit_warnings                                           \
 255    && !(in_system_header_at (LOC) && !(DC)->dc_warn_system_headers))
 256
 257 #define report_diagnostic(D) diagnostic_report_diagnostic (global_dc, D)
 258
 259 /* Override the column number to be used for reporting a
 260    diagnostic.  */
 261 #define diagnostic_override_column(DI, COL) (DI)->override_column = (COL)
 262
 263 /* Override the option index to be used for reporting a
 264    diagnostic.  */
 265 #define diagnostic_override_option_index(DI, OPTIDX) \
 266     ((DI)->option_index = (OPTIDX))
 267
 268 /* Diagnostic related functions.  */
 269 extern void diagnostic_initialize (diagnostic_context *, int);
 270 extern void diagnostic_color_init (diagnostic_context *, int value = -1);
 271 extern void diagnostic_finish (diagnostic_context *);
 272 extern void diagnostic_report_current_module (diagnostic_context *, location_t);
 273 extern void diagnostic_show_locus (diagnostic_context *, const diagnostic_info *);
 274
 275 /* Force diagnostics controlled by OPTIDX to be kind KIND.  */
 276 extern diagnostic_t diagnostic_classify_diagnostic (diagnostic_context *,
 277                                                     int /* optidx */,
 278                                                     diagnostic_t /* kind */,
 279                                                     location_t);
 280 extern void diagnostic_push_diagnostics (diagnostic_context *, location_t);
 281 extern void diagnostic_pop_diagnostics (diagnostic_context *, location_t);
 282 extern bool diagnostic_report_diagnostic (diagnostic_context *,
 283                                           diagnostic_info *);
 284 #ifdef ATTRIBUTE_GCC_DIAG
 285 extern void diagnostic_set_info (diagnostic_info *, const char *, va_list *,
 286                                  location_t, diagnostic_t) ATTRIBUTE_GCC_DIAG(2,0);
 287 extern void diagnostic_set_info_translated (diagnostic_info *, const char *,
 288                                             va_list *, location_t,
 289                                             diagnostic_t)
 290      ATTRIBUTE_GCC_DIAG(2,0);
 291 extern void diagnostic_append_note (diagnostic_context *, location_t,
 292                                     const char *, ...) ATTRIBUTE_GCC_DIAG(3,4);
 293 #endif
 294 extern char *diagnostic_build_prefix (diagnostic_context *, const diagnostic_info *);
 295 void default_diagnostic_starter (diagnostic_context *, diagnostic_info *);
 296 void default_diagnostic_finalizer (diagnostic_context *, diagnostic_info *);
 297 void diagnostic_set_caret_max_width (diagnostic_context *context, int value);
 298 void diagnostic_action_after_output (diagnostic_context *, diagnostic_t);
 299
 300 void diagnostic_file_cache_fini (void);
 301
 302 int get_terminal_width (void);
 303
 304 /* Return the location associated to this diagnostic. Parameter WHICH
 305    specifies which location. By default, expand the first one.  */
 306
 307 static inline location_t
 308 diagnostic_location (const diagnostic_info * diagnostic, int which = 0)
 309 {
 310   return diagnostic->message.get_location (which);
 311 }
 312
 313 /* Expand the location of this diagnostic. Use this function for
 314    consistency.  Parameter WHICH specifies which location. By default,
 315    expand the first one.  */
 316
 317 static inline expanded_location
 318 diagnostic_expand_location (const diagnostic_info * diagnostic, int which = 0)
 319 {
 320   expanded_location s
 321     = expand_location_to_spelling_point (diagnostic_location (diagnostic,
 322                                                               which));
 323   if (which == 0 && diagnostic->override_column)
 324     s.column = diagnostic->override_column;
 325   return s;
 326 }
 327
 328 /* This is somehow the right-side margin of a caret line, that is, we
 329    print at least these many characters after the position pointed at
 330    by the caret.  */
 331 #define CARET_LINE_MARGIN 10
 332
 333 /* Return true if the two locations can be represented within the same
 334    caret line.  This is used to build a prefix and also to determine
 335    whether to print one or two caret lines.  */
 336
 337 static inline bool
 338 diagnostic_same_line (const diagnostic_context *context,
 339                        expanded_location s1, expanded_location s2)
 340 {
 341   return s2.column && s1.line == s2.line
 342     && context->caret_max_width - CARET_LINE_MARGIN > abs (s1.column - s2.column);
 343 }
 344
 345 void
 346 diagnostic_print_caret_line (diagnostic_context * context,
 347                              expanded_location xloc1,
 348                              expanded_location xloc2,
 349                              char caret1, char caret2);
 350
 351 /* Pure text formatting support functions.  */
 352 extern char *file_name_as_prefix (diagnostic_context *, const char *);
 353
 354 extern char *build_message_string (const char *, ...) ATTRIBUTE_PRINTF_1;
 355
 356
 357 #endif /* ! GCC_DIAGNOSTIC_H */