libcpp/internal.h

   1 /* Part of CPP library.
   2    Copyright (C) 1997-2022 Free Software Foundation, Inc.
   3
   4 This program is free software; you can redistribute it and/or modify it
   5 under the terms of the GNU General Public License as published by the
   6 Free Software Foundation; either version 3, or (at your option) any
   7 later version.
   8
   9 This program is distributed in the hope that it will be useful,
  10 but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 GNU General Public License for more details.
  13
  14 You should have received a copy of the GNU General Public License
  15 along with this program; see the file COPYING3.  If not see
  16 <http://www.gnu.org/licenses/>.  */
  17
  18 /* This header defines all the internal data structures and functions
  19    that need to be visible across files.  It should not be used outside
  20    cpplib.  */
  21
  22 #ifndef LIBCPP_INTERNAL_H
  23 #define LIBCPP_INTERNAL_H
  24
  25 #include "symtab.h"
  26 #include "cpplib.h"
  27
  28 #if HAVE_ICONV
  29 #include <iconv.h>
  30 #else
  31 #define HAVE_ICONV 0
  32 typedef int iconv_t;  /* dummy */
  33 #endif
  34
  35 #ifdef __cplusplus
  36 extern "C" {
  37 #endif
  38
  39 struct directive;               /* Deliberately incomplete.  */
  40 struct pending_option;
  41 struct op;
  42 struct _cpp_strbuf;
  43
  44 typedef bool (*convert_f) (iconv_t, const unsigned char *, size_t,
  45                            struct _cpp_strbuf *);
  46 struct cset_converter
  47 {
  48   convert_f func;
  49   iconv_t cd;
  50   int width;
  51   const char* from;
  52   const char* to;
  53 };
  54
  55 #define BITS_PER_CPPCHAR_T (CHAR_BIT * sizeof (cppchar_t))
  56
  57 /* Test if a sign is valid within a preprocessing number.  */
  58 #define VALID_SIGN(c, prevc) \
  59   (((c) == '+' || (c) == '-') && \
  60    ((prevc) == 'e' || (prevc) == 'E' \
  61     || (((prevc) == 'p' || (prevc) == 'P') \
  62         && CPP_OPTION (pfile, extended_numbers))))
  63
  64 #define DIGIT_SEP(c) ((c) == '\'' && CPP_OPTION (pfile, digit_separators))
  65
  66 #define CPP_OPTION(PFILE, OPTION) ((PFILE)->opts.OPTION)
  67 #define CPP_BUFFER(PFILE) ((PFILE)->buffer)
  68 #define CPP_BUF_COLUMN(BUF, CUR) ((CUR) - (BUF)->line_base)
  69 #define CPP_BUF_COL(BUF) CPP_BUF_COLUMN(BUF, (BUF)->cur)
  70
  71 #define CPP_INCREMENT_LINE(PFILE, COLS_HINT) do { \
  72     const class line_maps *line_table = PFILE->line_table; \
  73     const struct line_map_ordinary *map = \
  74       LINEMAPS_LAST_ORDINARY_MAP (line_table); \
  75     linenum_type line = SOURCE_LINE (map, line_table->highest_line); \
  76     linemap_line_start (PFILE->line_table, line + 1, COLS_HINT); \
  77   } while (0)
  78
  79 /* Host alignment handling.  */
  80 struct dummy
  81 {
  82   char c;
  83   union
  84   {
  85     double d;
  86     int *p;
  87   } u;
  88 };
  89
  90 #define DEFAULT_ALIGNMENT offsetof (struct dummy, u)
  91 #define CPP_ALIGN2(size, align) (((size) + ((align) - 1)) & ~((align) - 1))
  92 #define CPP_ALIGN(size) CPP_ALIGN2 (size, DEFAULT_ALIGNMENT)
  93
  94 #define _cpp_mark_macro_used(NODE)                                      \
  95   (cpp_user_macro_p (NODE) ? (NODE)->value.macro->used = 1 : 0)
  96
  97 /* A generic memory buffer, and operations on it.  */
  98 typedef struct _cpp_buff _cpp_buff;
  99 struct _cpp_buff
 100 {
 101   struct _cpp_buff *next;
 102   unsigned char *base, *cur, *limit;
 103 };
 104
 105 extern _cpp_buff *_cpp_get_buff (cpp_reader *, size_t);
 106 extern void _cpp_release_buff (cpp_reader *, _cpp_buff *);
 107 extern void _cpp_extend_buff (cpp_reader *, _cpp_buff **, size_t);
 108 extern _cpp_buff *_cpp_append_extend_buff (cpp_reader *, _cpp_buff *, size_t);
 109 extern void _cpp_free_buff (_cpp_buff *);
 110 extern unsigned char *_cpp_aligned_alloc (cpp_reader *, size_t);
 111 extern unsigned char *_cpp_unaligned_alloc (cpp_reader *, size_t);
 112
 113 #define BUFF_ROOM(BUFF) (size_t) ((BUFF)->limit - (BUFF)->cur)
 114 #define BUFF_FRONT(BUFF) ((BUFF)->cur)
 115 #define BUFF_LIMIT(BUFF) ((BUFF)->limit)
 116
 117 /* #include types.  */
 118 enum include_type
 119   {
 120    /* Directive-based including mechanisms.  */
 121    IT_INCLUDE,  /* #include */
 122    IT_INCLUDE_NEXT,  /* #include_next */
 123    IT_IMPORT,   /* #import  */
 124
 125    /* Non-directive including mechanisms.  */
 126    IT_CMDLINE,  /* -include */
 127    IT_DEFAULT,  /* forced header  */
 128    IT_MAIN,     /* main, start on line 1 */
 129    IT_PRE_MAIN,  /* main, but there will be a preamble before line
 130                     1 */
 131
 132    IT_DIRECTIVE_HWM = IT_IMPORT + 1,  /* Directives below this.  */
 133    IT_HEADER_HWM = IT_DEFAULT + 1     /* Header files below this.  */
 134   };
 135
 136 union utoken
 137 {
 138   const cpp_token *token;
 139   const cpp_token **ptoken;
 140 };
 141
 142 /* A "run" of tokens; part of a chain of runs.  */
 143 typedef struct tokenrun tokenrun;
 144 struct tokenrun
 145 {
 146   tokenrun *next, *prev;
 147   cpp_token *base, *limit;
 148 };
 149
 150 /* Accessor macros for struct cpp_context.  */
 151 #define FIRST(c) ((c)->u.iso.first)
 152 #define LAST(c) ((c)->u.iso.last)
 153 #define CUR(c) ((c)->u.trad.cur)
 154 #define RLIMIT(c) ((c)->u.trad.rlimit)
 155
 156 /* This describes some additional data that is added to the macro
 157    token context of type cpp_context, when -ftrack-macro-expansion is
 158    on.  */
 159 typedef struct
 160 {
 161   /* The node of the macro we are referring to.  */
 162   cpp_hashnode *macro_node;
 163   /* This buffer contains an array of virtual locations.  The virtual
 164      location at index 0 is the virtual location of the token at index
 165      0 in the current instance of cpp_context; similarly for all the
 166      other virtual locations.  */
 167   location_t *virt_locs;
 168   /* This is a pointer to the current virtual location.  This is used
 169      to iterate over the virtual locations while we iterate over the
 170      tokens they belong to.  */
 171   location_t *cur_virt_loc;
 172 } macro_context;
 173
 174 /* The kind of tokens carried by a cpp_context.  */
 175 enum context_tokens_kind {
 176   /* This is the value of cpp_context::tokens_kind if u.iso.first
 177      contains an instance of cpp_token **.  */
 178   TOKENS_KIND_INDIRECT,
 179   /* This is the value of cpp_context::tokens_kind if u.iso.first
 180      contains an instance of cpp_token *.  */
 181   TOKENS_KIND_DIRECT,
 182   /* This is the value of cpp_context::tokens_kind when the token
 183      context contains tokens resulting from macro expansion.  In that
 184      case struct cpp_context::macro points to an instance of struct
 185      macro_context.  This is used only when the
 186      -ftrack-macro-expansion flag is on.  */
 187   TOKENS_KIND_EXTENDED
 188 };
 189
 190 typedef struct cpp_context cpp_context;
 191 struct cpp_context
 192 {
 193   /* Doubly-linked list.  */
 194   cpp_context *next, *prev;
 195
 196   union
 197   {
 198     /* For ISO macro expansion.  Contexts other than the base context
 199        are contiguous tokens.  e.g. macro expansions, expanded
 200        argument tokens.  */
 201     struct
 202     {
 203       union utoken first;
 204       union utoken last;
 205     } iso;
 206
 207     /* For traditional macro expansion.  */
 208     struct
 209     {
 210       const unsigned char *cur;
 211       const unsigned char *rlimit;
 212     } trad;
 213   } u;
 214
 215   /* If non-NULL, a buffer used for storage related to this context.
 216      When the context is popped, the buffer is released.  */
 217   _cpp_buff *buff;
 218
 219   /* If tokens_kind is TOKEN_KIND_EXTENDED, then (as we thus are in a
 220      macro context) this is a pointer to an instance of macro_context.
 221      Otherwise if tokens_kind is *not* TOKEN_KIND_EXTENDED, then, if
 222      we are in a macro context, this is a pointer to an instance of
 223      cpp_hashnode, representing the name of the macro this context is
 224      for.  If we are not in a macro context, then this is just NULL.
 225      Note that when tokens_kind is TOKEN_KIND_EXTENDED, the memory
 226      used by the instance of macro_context pointed to by this member
 227      is de-allocated upon de-allocation of the instance of struct
 228      cpp_context.  */
 229   union
 230   {
 231     macro_context *mc;
 232     cpp_hashnode *macro;
 233   } c;
 234
 235   /* This determines the type of tokens held by this context.  */
 236   enum context_tokens_kind tokens_kind;
 237 };
 238
 239 struct lexer_state
 240 {
 241   /* 1 if we're handling a directive.  2 if it's an include-like
 242      directive.  */
 243   unsigned char in_directive;
 244
 245   /* Nonzero if in a directive that will handle padding tokens itself.
 246      #include needs this to avoid problems with computed include and
 247      spacing between tokens.  */
 248   unsigned char directive_wants_padding;
 249
 250   /* True if we are skipping a failed conditional group.  */
 251   unsigned char skipping;
 252
 253   /* Nonzero if in a directive that takes angle-bracketed headers.  */
 254   unsigned char angled_headers;
 255
 256   /* Nonzero if in a #if or #elif directive.  */
 257   unsigned char in_expression;
 258
 259   /* Nonzero to save comments.  Turned off if discard_comments, and in
 260      all directives apart from #define.  */
 261   unsigned char save_comments;
 262
 263   /* Nonzero if lexing __VA_ARGS__ and __VA_OPT__ are valid.  */
 264   unsigned char va_args_ok;
 265
 266   /* Nonzero if lexing poisoned identifiers is valid.  */
 267   unsigned char poisoned_ok;
 268
 269   /* Nonzero to prevent macro expansion.  */
 270   unsigned char prevent_expansion;
 271
 272   /* Nonzero when parsing arguments to a function-like macro.  */
 273   unsigned char parsing_args;
 274
 275   /* Nonzero if prevent_expansion is true only because output is
 276      being discarded.  */
 277   unsigned char discarding_output;
 278
 279   /* Nonzero to skip evaluating part of an expression.  */
 280   unsigned int skip_eval;
 281
 282   /* Nonzero when tokenizing a deferred pragma.  */
 283   unsigned char in_deferred_pragma;
 284
 285   /* Count to token that is a header-name.  */
 286   unsigned char directive_file_token;
 287
 288   /* Nonzero if the deferred pragma being handled allows macro expansion.  */
 289   unsigned char pragma_allow_expansion;
 290
 291   /* Nonzero if _Pragma should not be interpreted.  */
 292   unsigned char ignore__Pragma;
 293 };
 294
 295 /* Special nodes - identifiers with predefined significance.  */
 296 struct spec_nodes
 297 {
 298   cpp_hashnode *n_defined;              /* defined operator */
 299   cpp_hashnode *n_true;                 /* C++ keyword true */
 300   cpp_hashnode *n_false;                /* C++ keyword false */
 301   cpp_hashnode *n__VA_ARGS__;           /* C99 vararg macros */
 302   cpp_hashnode *n__VA_OPT__;            /* C++ vararg macros */
 303
 304   enum {M_EXPORT, M_MODULE, M_IMPORT, M__IMPORT, M_HWM};
 305
 306   /* C++20 modules, only set when module_directives is in effect.
 307      incoming variants [0], outgoing ones [1] */
 308   cpp_hashnode *n_modules[M_HWM][2];
 309 };
 310
 311 typedef struct _cpp_line_note _cpp_line_note;
 312 struct _cpp_line_note
 313 {
 314   /* Location in the clean line the note refers to.  */
 315   const unsigned char *pos;
 316
 317   /* Type of note.  The 9 'from' trigraph characters represent those
 318      trigraphs, '\\' an escaped newline, ' ' an escaped newline with
 319      intervening space, 0 represents a note that has already been handled,
 320      and anything else is invalid.  */
 321   unsigned int type;
 322 };
 323
 324 /* Represents the contents of a file cpplib has read in.  */
 325 struct cpp_buffer
 326 {
 327   const unsigned char *cur;        /* Current location.  */
 328   const unsigned char *line_base;  /* Start of current physical line.  */
 329   const unsigned char *next_line;  /* Start of to-be-cleaned logical line.  */
 330
 331   const unsigned char *buf;        /* Entire character buffer.  */
 332   const unsigned char *rlimit;     /* Writable byte at end of file.  */
 333   const unsigned char *to_free;    /* Pointer that should be freed when
 334                                       popping the buffer.  */
 335
 336   _cpp_line_note *notes;           /* Array of notes.  */
 337   unsigned int cur_note;           /* Next note to process.  */
 338   unsigned int notes_used;         /* Number of notes.  */
 339   unsigned int notes_cap;          /* Size of allocated array.  */
 340
 341   struct cpp_buffer *prev;
 342
 343   /* Pointer into the file table; non-NULL if this is a file buffer.
 344      Used for include_next and to record control macros.  */
 345   struct _cpp_file *file;
 346
 347   /* Saved value of __TIMESTAMP__ macro - date and time of last modification
 348      of the assotiated file.  */
 349   const unsigned char *timestamp;
 350
 351   /* Value of if_stack at start of this file.
 352      Used to prohibit unmatched #endif (etc) in an include file.  */
 353   struct if_stack *if_stack;
 354
 355   /* True if we need to get the next clean line.  */
 356   bool need_line : 1;
 357
 358   /* True if we have already warned about C++ comments in this file.
 359      The warning happens only for C89 extended mode with -pedantic on,
 360      or for -Wtraditional, and only once per file (otherwise it would
 361      be far too noisy).  */
 362   bool warned_cplusplus_comments : 1;
 363
 364   /* True if we don't process trigraphs and escaped newlines.  True
 365      for preprocessed input, command line directives, and _Pragma
 366      buffers.  */
 367   bool from_stage3 : 1;
 368
 369   /* At EOF, a buffer is automatically popped.  If RETURN_AT_EOF is
 370      true, a CPP_EOF token is then returned.  Otherwise, the next
 371      token from the enclosing buffer is returned.  */
 372   bool return_at_eof : 1;
 373
 374   /* One for a system header, two for a C system header file that therefore
 375      needs to be extern "C" protected in C++, and zero otherwise.  */
 376   unsigned char sysp;
 377
 378   /* The directory of the this buffer's file.  Its NAME member is not
 379      allocated, so we don't need to worry about freeing it.  */
 380   struct cpp_dir dir;
 381
 382   /* Descriptor for converting from the input character set to the
 383      source character set.  */
 384   struct cset_converter input_cset_desc;
 385 };
 386
 387 /* The list of saved macros by push_macro pragma.  */
 388 struct def_pragma_macro {
 389   /* Chain element to previous saved macro.  */
 390   struct def_pragma_macro *next;
 391   /* Name of the macro.  */
 392   char *name;
 393   /* The stored macro content.  */
 394   unsigned char *definition;
 395
 396   /* Definition line number.  */
 397   location_t line;
 398   /* If macro defined in system header.  */
 399   unsigned int syshdr   : 1;
 400   /* Nonzero if it has been expanded or had its existence tested.  */
 401   unsigned int used     : 1;
 402
 403   /* Mark if we save an undefined macro.  */
 404   unsigned int is_undef : 1;
 405   /* Nonzero if it was a builtin macro.  */
 406   unsigned int is_builtin : 1;
 407 };
 408
 409 /* A cpp_reader encapsulates the "state" of a pre-processor run.
 410    Applying cpp_get_token repeatedly yields a stream of pre-processor
 411    tokens.  Usually, there is only one cpp_reader object active.  */
 412 struct cpp_reader
 413 {
 414   /* Top of buffer stack.  */
 415   cpp_buffer *buffer;
 416
 417   /* Overlaid buffer (can be different after processing #include).  */
 418   cpp_buffer *overlaid_buffer;
 419
 420   /* Lexer state.  */
 421   struct lexer_state state;
 422
 423   /* Source line tracking.  */
 424   class line_maps *line_table;
 425
 426   /* The line of the '#' of the current directive.  */
 427   location_t directive_line;
 428
 429   /* Memory buffers.  */
 430   _cpp_buff *a_buff;            /* Aligned permanent storage.  */
 431   _cpp_buff *u_buff;            /* Unaligned permanent storage.  */
 432   _cpp_buff *free_buffs;        /* Free buffer chain.  */
 433
 434   /* Context stack.  */
 435   struct cpp_context base_context;
 436   struct cpp_context *context;
 437
 438   /* If in_directive, the directive if known.  */
 439   const struct directive *directive;
 440
 441   /* Token generated while handling a directive, if any. */
 442   cpp_token directive_result;
 443
 444   /* When expanding a macro at top-level, this is the location of the
 445      macro invocation.  */
 446   location_t invocation_location;
 447
 448   /* This is the node representing the macro being expanded at
 449      top-level.  The value of this data member is valid iff
 450      cpp_in_macro_expansion_p() returns TRUE.  */
 451   cpp_hashnode *top_most_macro_node;
 452
 453   /* Nonzero if we are about to expand a macro.  Note that if we are
 454      really expanding a macro, the function macro_of_context returns
 455      the macro being expanded and this flag is set to false.  Client
 456      code should use the function cpp_in_macro_expansion_p to know if we
 457      are either about to expand a macro, or are actually expanding
 458      one.  */
 459   bool about_to_expand_macro_p;
 460
 461   /* Search paths for include files.  */
 462   struct cpp_dir *quote_include;        /* "" */
 463   struct cpp_dir *bracket_include;      /* <> */
 464   struct cpp_dir no_search_path;        /* No path.  */
 465
 466   /* Chain of all hashed _cpp_file instances.  */
 467   struct _cpp_file *all_files;
 468
 469   struct _cpp_file *main_file;
 470
 471   /* File and directory hash table.  */
 472   struct htab *file_hash;
 473   struct htab *dir_hash;
 474   struct file_hash_entry_pool *file_hash_entries;
 475
 476   /* Negative path lookup hash table.  */
 477   struct htab *nonexistent_file_hash;
 478   struct obstack nonexistent_file_ob;
 479
 480   /* Nonzero means don't look for #include "foo" the source-file
 481      directory.  */
 482   bool quote_ignores_source_dir;
 483
 484   /* Nonzero if any file has contained #pragma once or #import has
 485      been used.  */
 486   bool seen_once_only;
 487
 488   /* Multiple include optimization.  */
 489   const cpp_hashnode *mi_cmacro;
 490   const cpp_hashnode *mi_ind_cmacro;
 491   bool mi_valid;
 492
 493   /* Lexing.  */
 494   cpp_token *cur_token;
 495   tokenrun base_run, *cur_run;
 496   unsigned int lookaheads;
 497
 498   /* Nonzero prevents the lexer from re-using the token runs.  */
 499   unsigned int keep_tokens;
 500
 501   /* Buffer to hold macro definition string.  */
 502   unsigned char *macro_buffer;
 503   unsigned int macro_buffer_len;
 504
 505   /* Descriptor for converting from the source character set to the
 506      execution character set.  */
 507   struct cset_converter narrow_cset_desc;
 508
 509   /* Descriptor for converting from the source character set to the
 510      UTF-8 execution character set.  */
 511   struct cset_converter utf8_cset_desc;
 512
 513   /* Descriptor for converting from the source character set to the
 514      UTF-16 execution character set.  */
 515   struct cset_converter char16_cset_desc;
 516
 517   /* Descriptor for converting from the source character set to the
 518      UTF-32 execution character set.  */
 519   struct cset_converter char32_cset_desc;
 520
 521   /* Descriptor for converting from the source character set to the
 522      wide execution character set.  */
 523   struct cset_converter wide_cset_desc;
 524
 525   /* Date and time text.  Calculated together if either is requested.  */
 526   const unsigned char *date;
 527   const unsigned char *time;
 528
 529   /* Time stamp, set idempotently lazily.  */
 530   time_t time_stamp;
 531   int time_stamp_kind; /* Or errno.  */
 532
 533   /* A token forcing paste avoidance, and one demarking macro arguments.  */
 534   cpp_token avoid_paste;
 535   cpp_token endarg;
 536
 537   /* Opaque handle to the dependencies of mkdeps.c.  */
 538   class mkdeps *deps;
 539
 540   /* Obstack holding all macro hash nodes.  This never shrinks.
 541      See identifiers.c */
 542   struct obstack hash_ob;
 543
 544   /* Obstack holding buffer and conditional structures.  This is a
 545      real stack.  See directives.c.  */
 546   struct obstack buffer_ob;
 547
 548   /* Pragma table - dynamic, because a library user can add to the
 549      list of recognized pragmas.  */
 550   struct pragma_entry *pragmas;
 551
 552   /* Call backs to cpplib client.  */
 553   struct cpp_callbacks cb;
 554
 555   /* Identifier hash table.  */
 556   struct ht *hash_table;
 557
 558   /* Expression parser stack.  */
 559   struct op *op_stack, *op_limit;
 560
 561   /* User visible options.  */
 562   struct cpp_options opts;
 563
 564   /* Special nodes - identifiers with predefined significance to the
 565      preprocessor.  */
 566   struct spec_nodes spec_nodes;
 567
 568   /* Whether cpplib owns the hashtable.  */
 569   bool our_hashtable;
 570
 571   /* Traditional preprocessing output buffer (a logical line).  */
 572   struct
 573   {
 574     unsigned char *base;
 575     unsigned char *limit;
 576     unsigned char *cur;
 577     location_t first_line;
 578   } out;
 579
 580   /* Used for buffer overlays by traditional.c.  */
 581   const unsigned char *saved_cur, *saved_rlimit, *saved_line_base;
 582
 583   /* A saved list of the defined macros, for dependency checking
 584      of precompiled headers.  */
 585   struct cpp_savedstate *savedstate;
 586
 587   /* Next value of __COUNTER__ macro. */
 588   unsigned int counter;
 589
 590   /* Table of comments, when state.save_comments is true.  */
 591   cpp_comment_table comments;
 592
 593   /* List of saved macros by push_macro.  */
 594   struct def_pragma_macro *pushed_macros;
 595
 596   /* If non-zero, the lexer will use this location for the next token
 597      instead of getting a location from the linemap.  */
 598   location_t forced_token_location;
 599
 600   /* Location identifying the main source file -- intended to be line
 601      zero of said file.  */
 602   location_t main_loc;
 603
 604   /* Returns true iff we should warn about UTF-8 bidirectional control
 605      characters.  */
 606   bool warn_bidi_p () const
 607   {
 608     return CPP_OPTION (this, cpp_warn_bidirectional) != bidirectional_none;
 609   }
 610 };
 611
 612 /* Character classes.  Based on the more primitive macros in safe-ctype.h.
 613    If the definition of `numchar' looks odd to you, please look up the
 614    definition of a pp-number in the C standard [section 6.4.8 of C99].
 615
 616    In the unlikely event that characters other than \r and \n enter
 617    the set is_vspace, the macro handle_newline() in lex.c must be
 618    updated.  */
 619 #define _dollar_ok(x)   ((x) == '$' && CPP_OPTION (pfile, dollars_in_ident))
 620
 621 #define is_idchar(x)    (ISIDNUM(x) || _dollar_ok(x))
 622 #define is_numchar(x)   ISIDNUM(x)
 623 #define is_idstart(x)   (ISIDST(x) || _dollar_ok(x))
 624 #define is_numstart(x)  ISDIGIT(x)
 625 #define is_hspace(x)    ISBLANK(x)
 626 #define is_vspace(x)    IS_VSPACE(x)
 627 #define is_nvspace(x)   IS_NVSPACE(x)
 628 #define is_space(x)     IS_SPACE_OR_NUL(x)
 629
 630 #define SEEN_EOL() (pfile->cur_token[-1].type == CPP_EOF)
 631
 632 /* This table is constant if it can be initialized at compile time,
 633    which is the case if cpp was compiled with GCC >=2.7, or another
 634    compiler that supports C99.  */
 635 #if HAVE_DESIGNATED_INITIALIZERS
 636 extern const unsigned char _cpp_trigraph_map[UCHAR_MAX + 1];
 637 #else
 638 extern unsigned char _cpp_trigraph_map[UCHAR_MAX + 1];
 639 #endif
 640
 641 #if !defined (HAVE_UCHAR) && !defined (IN_GCC)
 642 typedef unsigned char uchar;
 643 #endif
 644
 645 #define UC (const uchar *)  /* Intended use: UC"string" */
 646
 647 /* Accessors.  */
 648
 649 inline int
 650 _cpp_in_system_header (cpp_reader *pfile)
 651 {
 652   return pfile->buffer ? pfile->buffer->sysp : 0;
 653 }
 654 #define CPP_PEDANTIC(PF) CPP_OPTION (PF, cpp_pedantic)
 655 #define CPP_WTRADITIONAL(PF) CPP_OPTION (PF, cpp_warn_traditional)
 656
 657 /* Return true if we're in the main file (unless it's considered to be
 658    an include file in its own right.  */
 659 inline int
 660 _cpp_in_main_source_file (cpp_reader *pfile)
 661 {
 662   return (!CPP_OPTION (pfile, main_search)
 663           && pfile->buffer->file == pfile->main_file);
 664 }
 665
 666 /* True if NODE is a macro for the purposes of ifdef, defined etc.  */
 667 inline bool _cpp_defined_macro_p (cpp_hashnode *node)
 668 {
 669   /* Do not treat conditional macros as being defined.  This is due to
 670      the powerpc port using conditional macros for 'vector', 'bool',
 671      and 'pixel' to act as conditional keywords.  This messes up tests
 672      like #ifndef bool.  */
 673   return cpp_macro_p (node) && !(node->flags & NODE_CONDITIONAL);
 674 }
 675
 676 /* In macro.c */
 677 extern bool _cpp_notify_macro_use (cpp_reader *pfile, cpp_hashnode *node,
 678                                    location_t);
 679 inline bool _cpp_maybe_notify_macro_use (cpp_reader *pfile, cpp_hashnode *node,
 680                                          location_t loc)
 681 {
 682   if (!(node->flags & NODE_USED))
 683     return _cpp_notify_macro_use (pfile, node, loc);
 684   return true;
 685 }
 686 extern cpp_macro *_cpp_new_macro (cpp_reader *, cpp_macro_kind, void *);
 687 extern void _cpp_free_definition (cpp_hashnode *);
 688 extern bool _cpp_create_definition (cpp_reader *, cpp_hashnode *);
 689 extern void _cpp_pop_context (cpp_reader *);
 690 extern void _cpp_push_text_context (cpp_reader *, cpp_hashnode *,
 691                                     const unsigned char *, size_t);
 692 extern bool _cpp_save_parameter (cpp_reader *, unsigned, cpp_hashnode *,
 693                                  cpp_hashnode *);
 694 extern void _cpp_unsave_parameters (cpp_reader *, unsigned);
 695 extern bool _cpp_arguments_ok (cpp_reader *, cpp_macro *, const cpp_hashnode *,
 696                                unsigned int);
 697 extern const unsigned char *_cpp_builtin_macro_text (cpp_reader *,
 698                                                      cpp_hashnode *,
 699                                                      location_t = 0);
 700 extern int _cpp_warn_if_unused_macro (cpp_reader *, cpp_hashnode *, void *);
 701 extern void _cpp_push_token_context (cpp_reader *, cpp_hashnode *,
 702                                      const cpp_token *, unsigned int);
 703 extern void _cpp_backup_tokens_direct (cpp_reader *, unsigned int);
 704
 705 /* In identifiers.c */
 706 extern void _cpp_init_hashtable (cpp_reader *, cpp_hash_table *);
 707 extern void _cpp_destroy_hashtable (cpp_reader *);
 708
 709 /* In files.c */
 710 enum _cpp_find_file_kind
 711   { _cpp_FFK_NORMAL, _cpp_FFK_FAKE, _cpp_FFK_PRE_INCLUDE, _cpp_FFK_HAS_INCLUDE };
 712 extern _cpp_file *_cpp_find_file (cpp_reader *, const char *, cpp_dir *,
 713                                   int angle, _cpp_find_file_kind, location_t);
 714 extern bool _cpp_find_failed (_cpp_file *);
 715 extern void _cpp_mark_file_once_only (cpp_reader *, struct _cpp_file *);
 716 extern const char *_cpp_find_header_unit (cpp_reader *, const char *file,
 717                                           bool angle_p,  location_t);
 718 extern void _cpp_fake_include (cpp_reader *, const char *);
 719 extern bool _cpp_stack_file (cpp_reader *, _cpp_file*, include_type, location_t);
 720 extern bool _cpp_stack_include (cpp_reader *, const char *, int,
 721                                 enum include_type, location_t);
 722 extern int _cpp_compare_file_date (cpp_reader *, const char *, int);
 723 extern void _cpp_report_missing_guards (cpp_reader *);
 724 extern void _cpp_init_files (cpp_reader *);
 725 extern void _cpp_cleanup_files (cpp_reader *);
 726 extern void _cpp_pop_file_buffer (cpp_reader *, struct _cpp_file *,
 727                                   const unsigned char *);
 728 extern bool _cpp_save_file_entries (cpp_reader *pfile, FILE *f);
 729 extern bool _cpp_read_file_entries (cpp_reader *, FILE *);
 730 extern const char *_cpp_get_file_name (_cpp_file *);
 731 extern struct stat *_cpp_get_file_stat (_cpp_file *);
 732 extern bool _cpp_has_header (cpp_reader *, const char *, int,
 733                              enum include_type);
 734
 735 /* In expr.c */
 736 extern bool _cpp_parse_expr (cpp_reader *, bool);
 737 extern struct op *_cpp_expand_op_stack (cpp_reader *);
 738
 739 /* In lex.c */
 740 extern void _cpp_process_line_notes (cpp_reader *, int);
 741 extern void _cpp_clean_line (cpp_reader *);
 742 extern bool _cpp_get_fresh_line (cpp_reader *);
 743 extern bool _cpp_skip_block_comment (cpp_reader *);
 744 extern cpp_token *_cpp_temp_token (cpp_reader *);
 745 extern const cpp_token *_cpp_lex_token (cpp_reader *);
 746 extern cpp_token *_cpp_lex_direct (cpp_reader *);
 747 extern unsigned char *_cpp_spell_ident_ucns (unsigned char *, cpp_hashnode *);
 748 extern int _cpp_equiv_tokens (const cpp_token *, const cpp_token *);
 749 extern void _cpp_init_tokenrun (tokenrun *, unsigned int);
 750 extern cpp_hashnode *_cpp_lex_identifier (cpp_reader *, const char *);
 751 extern int _cpp_remaining_tokens_num_in_context (cpp_context *);
 752 extern void _cpp_init_lexer (void);
 753 static inline void *_cpp_reserve_room (cpp_reader *pfile, size_t have,
 754                                        size_t extra)
 755 {
 756   if (BUFF_ROOM (pfile->a_buff) < (have + extra))
 757     _cpp_extend_buff (pfile, &pfile->a_buff, extra);
 758   return BUFF_FRONT (pfile->a_buff);
 759 }
 760 extern void *_cpp_commit_buff (cpp_reader *pfile, size_t size);
 761
 762 /* In init.c.  */
 763 extern void _cpp_maybe_push_include_file (cpp_reader *);
 764 extern const char *cpp_named_operator2name (enum cpp_ttype type);
 765 extern void _cpp_restore_special_builtin (cpp_reader *pfile,
 766                                           struct def_pragma_macro *);
 767
 768 /* In directives.c */
 769 extern int _cpp_test_assertion (cpp_reader *, unsigned int *);
 770 extern int _cpp_handle_directive (cpp_reader *, bool);
 771 extern void _cpp_define_builtin (cpp_reader *, const char *);
 772 extern char ** _cpp_save_pragma_names (cpp_reader *);
 773 extern void _cpp_restore_pragma_names (cpp_reader *, char **);
 774 extern int _cpp_do__Pragma (cpp_reader *, location_t);
 775 extern void _cpp_init_directives (cpp_reader *);
 776 extern void _cpp_init_internal_pragmas (cpp_reader *);
 777 extern void _cpp_do_file_change (cpp_reader *, enum lc_reason, const char *,
 778                                  linenum_type, unsigned int);
 779 extern void _cpp_pop_buffer (cpp_reader *);
 780 extern char *_cpp_bracket_include (cpp_reader *);
 781
 782 /* In errors.c  */
 783 extern location_t cpp_diagnostic_get_current_location (cpp_reader *);
 784
 785 /* In traditional.c.  */
 786 extern bool _cpp_scan_out_logical_line (cpp_reader *, cpp_macro *, bool);
 787 extern bool _cpp_read_logical_line_trad (cpp_reader *);
 788 extern void _cpp_overlay_buffer (cpp_reader *pfile, const unsigned char *,
 789                                  size_t);
 790 extern void _cpp_remove_overlay (cpp_reader *);
 791 extern cpp_macro *_cpp_create_trad_definition (cpp_reader *);
 792 extern bool _cpp_expansions_different_trad (const cpp_macro *,
 793                                             const cpp_macro *);
 794 extern unsigned char *_cpp_copy_replacement_text (const cpp_macro *,
 795                                                   unsigned char *);
 796 extern size_t _cpp_replacement_text_len (const cpp_macro *);
 797
 798 /* In charset.c.  */
 799
 800 /* The normalization state at this point in the sequence.
 801    It starts initialized to all zeros, and at the end
 802    'level' is the normalization level of the sequence.  */
 803
 804 struct normalize_state
 805 {
 806   /* The previous starter character.  */
 807   cppchar_t previous;
 808   /* The combining class of the previous character (whether or not a
 809      starter).  */
 810   unsigned char prev_class;
 811   /* The lowest normalization level so far.  */
 812   enum cpp_normalize_level level;
 813 };
 814 #define INITIAL_NORMALIZE_STATE { 0, 0, normalized_KC }
 815 #define NORMALIZE_STATE_RESULT(st) ((st)->level)
 816
 817 /* We saw a character C that matches ISIDNUM(), update a
 818    normalize_state appropriately.  */
 819 #define NORMALIZE_STATE_UPDATE_IDNUM(st, c)     \
 820   ((st)->previous = (c), (st)->prev_class = 0)
 821
 822 extern bool _cpp_valid_ucn (cpp_reader *, const unsigned char **,
 823                             const unsigned char *, int,
 824                             struct normalize_state *state,
 825                             cppchar_t *,
 826                             source_range *char_range,
 827                             cpp_string_location_reader *loc_reader);
 828
 829 extern bool _cpp_valid_utf8 (cpp_reader *pfile,
 830                              const uchar **pstr,
 831                              const uchar *limit,
 832                              int identifier_pos,
 833                              struct normalize_state *nst,
 834                              cppchar_t *cp);
 835
 836 extern void _cpp_destroy_iconv (cpp_reader *);
 837 extern unsigned char *_cpp_convert_input (cpp_reader *, const char *,
 838                                           unsigned char *, size_t, size_t,
 839                                           const unsigned char **, off_t *);
 840 extern const char *_cpp_default_encoding (void);
 841 extern cpp_hashnode * _cpp_interpret_identifier (cpp_reader *pfile,
 842                                                  const unsigned char *id,
 843                                                  size_t len);
 844
 845 /* Utility routines and macros.  */
 846 #define DSC(str) (const unsigned char *)str, sizeof str - 1
 847
 848 /* These are inline functions instead of macros so we can get type
 849    checking.  */
 850 static inline int ustrcmp (const unsigned char *, const unsigned char *);
 851 static inline int ustrncmp (const unsigned char *, const unsigned char *,
 852                             size_t);
 853 static inline size_t ustrlen (const unsigned char *);
 854 static inline const unsigned char *uxstrdup (const unsigned char *);
 855 static inline const unsigned char *ustrchr (const unsigned char *, int);
 856 static inline int ufputs (const unsigned char *, FILE *);
 857
 858 /* Use a const char for the second parameter since it is usually a literal.  */
 859 static inline int ustrcspn (const unsigned char *, const char *);
 860
 861 static inline int
 862 ustrcmp (const unsigned char *s1, const unsigned char *s2)
 863 {
 864   return strcmp ((const char *)s1, (const char *)s2);
 865 }
 866
 867 static inline int
 868 ustrncmp (const unsigned char *s1, const unsigned char *s2, size_t n)
 869 {
 870   return strncmp ((const char *)s1, (const char *)s2, n);
 871 }
 872
 873 static inline int
 874 ustrcspn (const unsigned char *s1, const char *s2)
 875 {
 876   return strcspn ((const char *)s1, s2);
 877 }
 878
 879 static inline size_t
 880 ustrlen (const unsigned char *s1)
 881 {
 882   return strlen ((const char *)s1);
 883 }
 884
 885 static inline const unsigned char *
 886 uxstrdup (const unsigned char *s1)
 887 {
 888   return (const unsigned char *) xstrdup ((const char *)s1);
 889 }
 890
 891 static inline const unsigned char *
 892 ustrchr (const unsigned char *s1, int c)
 893 {
 894   return (const unsigned char *) strchr ((const char *)s1, c);
 895 }
 896
 897 static inline int
 898 ufputs (const unsigned char *s, FILE *f)
 899 {
 900   return fputs ((const char *)s, f);
 901 }
 902
 903 /* In line-map.c.  */
 904
 905 /* Create and return a virtual location for a token that is part of a
 906    macro expansion-list at a macro expansion point.  See the comment
 907    inside struct line_map_macro to see what an expansion-list exactly
 908    is.
 909
 910    A call to this function must come after a call to
 911    linemap_enter_macro.
 912
 913    MAP is the map into which the source location is created.  TOKEN_NO
 914    is the index of the token in the macro replacement-list, starting
 915    at number 0.
 916
 917    ORIG_LOC is the location of the token outside of this macro
 918    expansion.  If the token comes originally from the macro
 919    definition, it is the locus in the macro definition; otherwise it
 920    is a location in the context of the caller of this macro expansion
 921    (which is a virtual location or a source location if the caller is
 922    itself a macro expansion or not).
 923
 924    MACRO_DEFINITION_LOC is the location in the macro definition,
 925    either of the token itself or of a macro parameter that it
 926    replaces.  */
 927 location_t linemap_add_macro_token (const line_map_macro *,
 928                                     unsigned int,
 929                                     location_t,
 930                                     location_t);
 931
 932 /* Return the source line number corresponding to source location
 933    LOCATION.  SET is the line map set LOCATION comes from.  If
 934    LOCATION is the location of token that is part of the
 935    expansion-list of a macro expansion return the line number of the
 936    macro expansion point.  */
 937 int linemap_get_expansion_line (class line_maps *,
 938                                 location_t);
 939
 940 /* Return the path of the file corresponding to source code location
 941    LOCATION.
 942
 943    If LOCATION is the location of a token that is part of the
 944    replacement-list of a macro expansion return the file path of the
 945    macro expansion point.
 946
 947    SET is the line map set LOCATION comes from.  */
 948 const char* linemap_get_expansion_filename (class line_maps *,
 949                                             location_t);
 950
 951 /* A subclass of rich_location for emitting a diagnostic
 952    at the current location of the reader, but flagging
 953    it with set_escape_on_output (true).  */
 954 class encoding_rich_location : public rich_location
 955 {
 956  public:
 957   encoding_rich_location (cpp_reader *pfile)
 958   : rich_location (pfile->line_table,
 959                    cpp_diagnostic_get_current_location (pfile))
 960   {
 961     set_escape_on_output (true);
 962   }
 963
 964   encoding_rich_location (cpp_reader *pfile, location_t loc)
 965   : rich_location (pfile->line_table, loc)
 966   {
 967     set_escape_on_output (true);
 968   }
 969 };
 970
 971 #ifdef __cplusplus
 972 }
 973 #endif
 974
 975 #endif /* ! LIBCPP_INTERNAL_H */