2 Copyright (C) 1986, 1987, 1989, 1992, 1993, 1994, 1995, 1996, 1997, 1998,
3 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
4 Contributed by Per Bothner, 1994-95.
5 Based on CCCP program by Paul Rubin, June 1986
6 Adapted to ANSI C, Richard Stallman, Jan 1987
8 This program is free software; you can redistribute it and/or modify it
9 under the terms of the GNU General Public License as published by the
10 Free Software Foundation; either version 2, or (at your option) any
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
30 #include "cppdefault.h"
31 #include "except.h" /* for USING_SJLJ_EXCEPTIONS */
33 /* Predefined symbols, built-in macros, and the default include path. */
35 #ifndef GET_ENV_PATH_LIST
36 #define GET_ENV_PATH_LIST(VAR,NAME) do { (VAR) = getenv (NAME); } while (0)
39 /* Windows does not natively support inodes, and neither does MSDOS.
40 Cygwin's emulation can generate non-unique inodes, so don't use it.
41 VMS has non-numeric inodes. */
43 # define INO_T_EQ(A, B) (!memcmp (&(A), &(B), sizeof (A)))
44 # define INO_T_COPY(DEST, SRC) memcpy(&(DEST), &(SRC), sizeof (SRC))
46 # if (defined _WIN32 && ! defined (_UWIN)) || defined __MSDOS__
47 # define INO_T_EQ(A, B) 0
49 # define INO_T_EQ(A, B) ((A) == (B))
51 # define INO_T_COPY(DEST, SRC) (DEST) = (SRC)
54 /* Internal structures and prototypes. */
56 /* A `struct pending_option' remembers one -D, -A, -U, -include, or
58 typedef void (* cl_directive_handler
) PARAMS ((cpp_reader
*, const char *));
61 struct pending_option
*next
;
63 cl_directive_handler handler
;
66 /* The `pending' structure accumulates all the options that are not
67 actually processed until we hit cpp_read_main_file. It consists of
68 several lists, one for each type of option. We keep both head and
69 tail pointers for quick insertion. */
72 struct pending_option
*directive_head
, *directive_tail
;
74 struct search_path
*quote_head
, *quote_tail
;
75 struct search_path
*brack_head
, *brack_tail
;
76 struct search_path
*systm_head
, *systm_tail
;
77 struct search_path
*after_head
, *after_tail
;
79 struct pending_option
*imacros_head
, *imacros_tail
;
80 struct pending_option
*include_head
, *include_tail
;
84 #define APPEND(pend, list, elt) \
85 do { if (!(pend)->list##_head) (pend)->list##_head = (elt); \
86 else (pend)->list##_tail->next = (elt); \
87 (pend)->list##_tail = (elt); \
90 #define APPEND(pend, list, elt) \
91 do { if (!(pend)->list/**/_head) (pend)->list/**/_head = (elt); \
92 else (pend)->list/**/_tail->next = (elt); \
93 (pend)->list/**/_tail = (elt); \
97 static void print_help
PARAMS ((void));
98 static void path_include
PARAMS ((cpp_reader
*,
100 static void init_library
PARAMS ((void));
101 static void init_builtins
PARAMS ((cpp_reader
*));
102 static void append_include_chain
PARAMS ((cpp_reader
*,
104 static struct search_path
* remove_dup_dir
PARAMS ((cpp_reader
*,
105 struct search_path
*));
106 static struct search_path
* remove_dup_dirs
PARAMS ((cpp_reader
*,
107 struct search_path
*));
108 static void merge_include_chains
PARAMS ((cpp_reader
*));
109 static bool push_include
PARAMS ((cpp_reader
*,
110 struct pending_option
*));
111 static void free_chain
PARAMS ((struct pending_option
*));
112 static void set_lang
PARAMS ((cpp_reader
*, enum c_lang
));
113 static void init_dependency_output
PARAMS ((cpp_reader
*));
114 static void init_standard_includes
PARAMS ((cpp_reader
*));
115 static void read_original_filename
PARAMS ((cpp_reader
*));
116 static void new_pending_directive
PARAMS ((struct cpp_pending
*,
118 cl_directive_handler
));
119 static void output_deps
PARAMS ((cpp_reader
*));
120 static int parse_option
PARAMS ((const char *));
122 /* Fourth argument to append_include_chain: chain to use.
123 Note it's never asked to append to the quote chain. */
124 enum { BRACKET
= 0, SYSTEM
, AFTER
};
126 /* If we have designated initializers (GCC >2.7) these tables can be
127 initialized, constant data. Otherwise, they have to be filled in at
129 #if HAVE_DESIGNATED_INITIALIZERS
131 #define init_trigraph_map() /* Nothing. */
132 #define TRIGRAPH_MAP \
133 __extension__ const U_CHAR _cpp_trigraph_map[UCHAR_MAX + 1] = {
136 #define s(p, v) [p] = v,
140 #define TRIGRAPH_MAP U_CHAR _cpp_trigraph_map[UCHAR_MAX + 1] = { 0 }; \
141 static void init_trigraph_map PARAMS ((void)) { \
142 unsigned char *x = _cpp_trigraph_map;
145 #define s(p, v) x[p] = v;
150 s('=', '#') s(')', ']') s('!', '|')
151 s('(', '[') s('\'', '^') s('>', '}')
152 s('/', '\\') s('<', '{') s('-', '~')
159 /* Given a colon-separated list of file names PATH,
160 add all the names to the search path for include files. */
162 path_include (pfile
, list
, path
)
173 /* Find the end of this name. */
175 while (*q
!= 0 && *q
!= PATH_SEPARATOR
) q
++;
178 /* An empty name in the path stands for the current directory. */
179 name
= (char *) xmalloc (2);
185 /* Otherwise use the directory that is named. */
186 name
= (char *) xmalloc (q
- p
+ 1);
187 memcpy (name
, p
, q
- p
);
191 append_include_chain (pfile
, name
, path
, 0);
193 /* Advance past this name. */
201 /* Append DIR to include path PATH. DIR must be allocated on the
202 heap; this routine takes responsibility for freeing it. CXX_AWARE
203 is non-zero if the header contains extern "C" guards for C++,
204 otherwise it is zero. */
206 append_include_chain (pfile
, dir
, path
, cxx_aware
)
210 int cxx_aware ATTRIBUTE_UNUSED
;
212 struct cpp_pending
*pend
= CPP_OPTION (pfile
, pending
);
213 struct search_path
*new;
222 _cpp_simplify_pathname (dir
);
226 /* Dirs that don't exist are silently ignored. */
228 cpp_notice_from_errno (pfile
, dir
);
229 else if (CPP_OPTION (pfile
, verbose
))
230 fprintf (stderr
, _("ignoring nonexistent directory \"%s\"\n"), dir
);
235 if (!S_ISDIR (st
.st_mode
))
237 cpp_notice (pfile
, "%s: Not a directory", dir
);
243 if (len
> pfile
->max_include_len
)
244 pfile
->max_include_len
= len
;
246 new = (struct search_path
*) xmalloc (sizeof (struct search_path
));
249 INO_T_COPY (new->ino
, st
.st_ino
);
250 new->dev
= st
.st_dev
;
251 /* Both systm and after include file lists should be treated as system
252 include files since these two lists are really just a concatenation
253 of one "system" list. */
254 if (path
== SYSTEM
|| path
== AFTER
)
255 #ifdef NO_IMPLICIT_EXTERN_C
258 new->sysp
= cxx_aware
? 1 : 2;
262 new->name_map
= NULL
;
267 case BRACKET
: APPEND (pend
, brack
, new); break;
268 case SYSTEM
: APPEND (pend
, systm
, new); break;
269 case AFTER
: APPEND (pend
, after
, new); break;
273 /* Handle a duplicated include path. PREV is the link in the chain
274 before the duplicate. The duplicate is removed from the chain and
275 freed. Returns PREV. */
276 static struct search_path
*
277 remove_dup_dir (pfile
, prev
)
279 struct search_path
*prev
;
281 struct search_path
*cur
= prev
->next
;
283 if (CPP_OPTION (pfile
, verbose
))
284 fprintf (stderr
, _("ignoring duplicate directory \"%s\"\n"), cur
->name
);
286 prev
->next
= cur
->next
;
287 free ((PTR
) cur
->name
);
293 /* Remove duplicate directories from a chain. Returns the tail of the
294 chain, or NULL if the chain is empty. This algorithm is quadratic
295 in the number of -I switches, which is acceptable since there
296 aren't usually that many of them. */
297 static struct search_path
*
298 remove_dup_dirs (pfile
, head
)
300 struct search_path
*head
;
302 struct search_path
*prev
= NULL
, *cur
, *other
;
304 for (cur
= head
; cur
; cur
= cur
->next
)
306 for (other
= head
; other
!= cur
; other
= other
->next
)
307 if (INO_T_EQ (cur
->ino
, other
->ino
) && cur
->dev
== other
->dev
)
309 if (cur
->sysp
&& !other
->sysp
)
312 "changing search order for system directory \"%s\"",
314 if (strcmp (cur
->name
, other
->name
))
316 " as it is the same as non-system directory \"%s\"",
320 " as it has already been specified as a non-system directory");
322 cur
= remove_dup_dir (pfile
, prev
);
331 /* Merge the four include chains together in the order quote, bracket,
332 system, after. Remove duplicate dirs (as determined by
333 INO_T_EQ()). The system_include and after_include chains are never
334 referred to again after this function; all access is through the
335 bracket_include path. */
337 merge_include_chains (pfile
)
340 struct search_path
*quote
, *brack
, *systm
, *qtail
;
342 struct cpp_pending
*pend
= CPP_OPTION (pfile
, pending
);
344 quote
= pend
->quote_head
;
345 brack
= pend
->brack_head
;
346 systm
= pend
->systm_head
;
347 qtail
= pend
->quote_tail
;
349 /* Paste together bracket, system, and after include chains. */
351 pend
->systm_tail
->next
= pend
->after_head
;
353 systm
= pend
->after_head
;
356 pend
->brack_tail
->next
= systm
;
360 /* This is a bit tricky. First we drop dupes from the quote-include
361 list. Then we drop dupes from the bracket-include list.
362 Finally, if qtail and brack are the same directory, we cut out
363 brack and move brack up to point to qtail.
365 We can't just merge the lists and then uniquify them because
366 then we may lose directories from the <> search path that should
367 be there; consider -Ifoo -Ibar -I- -Ifoo -Iquux. It is however
368 safe to treat -Ibar -Ifoo -I- -Ifoo -Iquux as if written
369 -Ibar -I- -Ifoo -Iquux. */
371 remove_dup_dirs (pfile
, brack
);
372 qtail
= remove_dup_dirs (pfile
, quote
);
378 /* If brack == qtail, remove brack as it's simpler. */
379 if (brack
&& INO_T_EQ (qtail
->ino
, brack
->ino
)
380 && qtail
->dev
== brack
->dev
)
381 brack
= remove_dup_dir (pfile
, qtail
);
386 CPP_OPTION (pfile
, quote_include
) = quote
;
387 CPP_OPTION (pfile
, bracket_include
) = brack
;
390 /* A set of booleans indicating what CPP features each source language
397 char extended_numbers
;
399 char dollars_in_ident
;
400 char cplusplus_comments
;
404 /* ??? Enable $ in identifiers in assembly? */
405 static const struct lang_flags lang_defaults
[] =
406 { /* c99 objc c++ xnum trig dollar c++comm digr */
407 /* GNUC89 */ { 0, 0, 0, 1, 0, 1, 1, 1 },
408 /* GNUC99 */ { 1, 0, 0, 1, 0, 1, 1, 1 },
409 /* STDC89 */ { 0, 0, 0, 0, 1, 0, 0, 0 },
410 /* STDC94 */ { 0, 0, 0, 0, 1, 0, 0, 1 },
411 /* STDC99 */ { 1, 0, 0, 1, 1, 0, 1, 1 },
412 /* GNUCXX */ { 0, 0, 1, 1, 0, 1, 1, 1 },
413 /* CXX98 */ { 0, 0, 1, 1, 1, 0, 1, 1 },
414 /* OBJC */ { 0, 1, 0, 1, 0, 1, 1, 1 },
415 /* OBJCXX */ { 0, 1, 1, 1, 0, 1, 1, 1 },
416 /* ASM */ { 0, 0, 0, 1, 0, 0, 1, 0 }
419 /* Sets internal flags correctly for a given language. */
421 set_lang (pfile
, lang
)
425 const struct lang_flags
*l
= &lang_defaults
[(int) lang
];
427 CPP_OPTION (pfile
, lang
) = lang
;
429 CPP_OPTION (pfile
, c99
) = l
->c99
;
430 CPP_OPTION (pfile
, objc
) = l
->objc
;
431 CPP_OPTION (pfile
, cplusplus
) = l
->cplusplus
;
432 CPP_OPTION (pfile
, extended_numbers
) = l
->extended_numbers
;
433 CPP_OPTION (pfile
, trigraphs
) = l
->trigraphs
;
434 CPP_OPTION (pfile
, dollars_in_ident
) = l
->dollars_in_ident
;
435 CPP_OPTION (pfile
, cplusplus_comments
) = l
->cplusplus_comments
;
436 CPP_OPTION (pfile
, digraphs
) = l
->digraphs
;
440 static int opt_comp
PARAMS ((const void *, const void *));
442 /* Run-time sorting of options array. */
447 return strcmp (((struct cl_option
*) p1
)->opt_text
,
448 ((struct cl_option
*) p2
)->opt_text
);
452 /* init initializes library global state. It might not need to
453 do anything depending on the platform and compiler. */
457 static int initialized
= 0;
464 /* For non-ASCII hosts, the cl_options array needs to be sorted at
466 qsort (cl_options
, N_OPTS
, sizeof (struct cl_option
), opt_comp
);
469 /* Set up the trigraph map. This doesn't need to do anything if
470 we were compiled with a compiler that supports C99 designated
472 init_trigraph_map ();
476 /* Initialize a cpp_reader structure. */
478 cpp_create_reader (lang
)
483 /* Initialise this instance of the library if it hasn't been already. */
486 pfile
= (cpp_reader
*) xcalloc (1, sizeof (cpp_reader
));
488 set_lang (pfile
, lang
);
489 CPP_OPTION (pfile
, warn_import
) = 1;
490 CPP_OPTION (pfile
, discard_comments
) = 1;
491 CPP_OPTION (pfile
, discard_comments_in_macro_exp
) = 1;
492 CPP_OPTION (pfile
, show_column
) = 1;
493 CPP_OPTION (pfile
, tabstop
) = 8;
494 CPP_OPTION (pfile
, operator_names
) = 1;
495 CPP_OPTION (pfile
, warn_endif_labels
) = 1;
496 #if DEFAULT_SIGNED_CHAR
497 CPP_OPTION (pfile
, signed_char
) = 1;
499 CPP_OPTION (pfile
, signed_char
) = 0;
502 CPP_OPTION (pfile
, pending
) =
503 (struct cpp_pending
*) xcalloc (1, sizeof (struct cpp_pending
));
505 /* It's simplest to just create this struct whether or not it will
507 pfile
->deps
= deps_init ();
509 /* Initialise the line map. Start at logical line 1, so we can use
510 a line number of zero for special states. */
511 init_line_maps (&pfile
->line_maps
);
514 /* Initialize lexer state. */
515 pfile
->state
.save_comments
= ! CPP_OPTION (pfile
, discard_comments
);
517 /* Set up static tokens. */
518 pfile
->date
.type
= CPP_EOF
;
519 pfile
->avoid_paste
.type
= CPP_PADDING
;
520 pfile
->avoid_paste
.val
.source
= NULL
;
521 pfile
->eof
.type
= CPP_EOF
;
522 pfile
->eof
.flags
= 0;
524 /* Create a token buffer for the lexer. */
525 _cpp_init_tokenrun (&pfile
->base_run
, 250);
526 pfile
->cur_run
= &pfile
->base_run
;
527 pfile
->cur_token
= pfile
->base_run
.base
;
529 /* Initialise the base context. */
530 pfile
->context
= &pfile
->base_context
;
531 pfile
->base_context
.macro
= 0;
532 pfile
->base_context
.prev
= pfile
->base_context
.next
= 0;
534 /* Aligned and unaligned storage. */
535 pfile
->a_buff
= _cpp_get_buff (pfile
, 0);
536 pfile
->u_buff
= _cpp_get_buff (pfile
, 0);
538 /* Initialise the buffer obstack. */
539 gcc_obstack_init (&pfile
->buffer_ob
);
541 _cpp_init_includes (pfile
);
546 /* Free resources used by PFILE. Accessing PFILE after this function
547 returns leads to undefined behaviour. Returns the error count. */
553 struct search_path
*dir
, *dirn
;
554 cpp_context
*context
, *contextn
;
555 tokenrun
*run
, *runn
;
557 while (CPP_BUFFER (pfile
) != NULL
)
558 _cpp_pop_buffer (pfile
);
560 if (pfile
->macro_buffer
)
562 free ((PTR
) pfile
->macro_buffer
);
563 pfile
->macro_buffer
= NULL
;
564 pfile
->macro_buffer_len
= 0;
567 deps_free (pfile
->deps
);
568 obstack_free (&pfile
->buffer_ob
, 0);
570 _cpp_destroy_hashtable (pfile
);
571 _cpp_cleanup_includes (pfile
);
573 _cpp_free_buff (pfile
->a_buff
);
574 _cpp_free_buff (pfile
->u_buff
);
575 _cpp_free_buff (pfile
->free_buffs
);
577 for (run
= &pfile
->base_run
; run
; run
= runn
)
581 if (run
!= &pfile
->base_run
)
585 for (dir
= CPP_OPTION (pfile
, quote_include
); dir
; dir
= dirn
)
588 free ((PTR
) dir
->name
);
592 for (context
= pfile
->base_context
.next
; context
; context
= contextn
)
594 contextn
= context
->next
;
598 free_line_maps (&pfile
->line_maps
);
600 result
= pfile
->errors
;
607 /* This structure defines one built-in identifier. A node will be
608 entered in the hash table under the name NAME, with value VALUE (if
609 any). If flags has OPERATOR, the node's operator field is used; if
610 flags has BUILTIN the node's builtin field is used. Macros that are
611 known at build time should not be flagged BUILTIN, as then they do
612 not appear in macro dumps with e.g. -dM or -dD.
614 Two values are not compile time constants, so we tag
615 them in the FLAGS field instead:
616 VERS value is the global version_string, quoted
617 ULP value is the global user_label_prefix
619 Also, macros with CPLUS set in the flags field are entered only for C++. */
624 unsigned char builtin
;
625 unsigned char operator;
626 unsigned short flags
;
633 #define OPERATOR 0x10
635 #define B(n, t) { U n, 0, t, 0, BUILTIN, sizeof n - 1 }
636 #define C(n, v) { U n, v, 0, 0, 0, sizeof n - 1 }
637 #define X(n, f) { U n, 0, 0, 0, f, sizeof n - 1 }
638 #define O(n, c, f) { U n, 0, 0, c, OPERATOR | f, sizeof n - 1 }
639 static const struct builtin builtin_array
[] =
641 B("__TIME__", BT_TIME
),
642 B("__DATE__", BT_DATE
),
643 B("__FILE__", BT_FILE
),
644 B("__BASE_FILE__", BT_BASE_FILE
),
645 B("__LINE__", BT_SPECLINE
),
646 B("__INCLUDE_LEVEL__", BT_INCLUDE_LEVEL
),
647 B("_Pragma", BT_PRAGMA
),
649 X("__VERSION__", VERS
),
650 X("__USER_LABEL_PREFIX__", ULP
),
651 C("__REGISTER_PREFIX__", REGISTER_PREFIX
),
652 C("__HAVE_BUILTIN_SETJMP__", "1"),
653 #if USING_SJLJ_EXCEPTIONS
654 /* libgcc needs to know this. */
655 C("__USING_SJLJ_EXCEPTIONS__","1"),
657 #ifndef NO_BUILTIN_SIZE_TYPE
658 C("__SIZE_TYPE__", SIZE_TYPE
),
660 #ifndef NO_BUILTIN_PTRDIFF_TYPE
661 C("__PTRDIFF_TYPE__", PTRDIFF_TYPE
),
663 #ifndef NO_BUILTIN_WCHAR_TYPE
664 C("__WCHAR_TYPE__", WCHAR_TYPE
),
666 #ifndef NO_BUILTIN_WINT_TYPE
667 C("__WINT_TYPE__", WINT_TYPE
),
669 #ifdef STDC_0_IN_SYSTEM_HEADERS
670 B("__STDC__", BT_STDC
),
675 /* Named operators known to the preprocessor. These cannot be #defined
676 and always have their stated meaning. They are treated like normal
677 identifiers except for the type code and the meaning. Most of them
678 are only for C++ (but see iso646.h). */
679 O("and", CPP_AND_AND
, CPLUS
),
680 O("and_eq", CPP_AND_EQ
, CPLUS
),
681 O("bitand", CPP_AND
, CPLUS
),
682 O("bitor", CPP_OR
, CPLUS
),
683 O("compl", CPP_COMPL
, CPLUS
),
684 O("not", CPP_NOT
, CPLUS
),
685 O("not_eq", CPP_NOT_EQ
, CPLUS
),
686 O("or", CPP_OR_OR
, CPLUS
),
687 O("or_eq", CPP_OR_EQ
, CPLUS
),
688 O("xor", CPP_XOR
, CPLUS
),
689 O("xor_eq", CPP_XOR_EQ
, CPLUS
)
695 #define builtin_array_end (builtin_array + ARRAY_SIZE (builtin_array))
697 /* Subroutine of cpp_read_main_file; reads the builtins table above and
698 enters them, and language-specific macros, into the hash table. */
700 init_builtins (pfile
)
703 const struct builtin
*b
;
705 for(b
= builtin_array
; b
< builtin_array_end
; b
++)
707 if ((b
->flags
& CPLUS
) && ! CPP_OPTION (pfile
, cplusplus
))
710 if ((b
->flags
& OPERATOR
) && ! CPP_OPTION (pfile
, operator_names
))
713 if (b
->flags
& (OPERATOR
| BUILTIN
))
715 cpp_hashnode
*hp
= cpp_lookup (pfile
, b
->name
, b
->len
);
716 if (b
->flags
& OPERATOR
)
718 hp
->flags
|= NODE_OPERATOR
;
719 hp
->value
.operator = b
->operator;
724 hp
->flags
|= NODE_BUILTIN
| NODE_WARN
;
725 hp
->value
.builtin
= b
->builtin
;
728 else /* A standard macro of some kind. */
735 /* Allocate enough space for 'name "value"\n\0'. */
736 str
= alloca (b
->len
+ strlen (version_string
) + 5);
737 sprintf (str
, "%s \"%s\"\n", b
->name
, version_string
);
742 val
= CPP_OPTION (pfile
, user_label_prefix
);
746 /* Allocate enough space for "name value\n\0". */
747 str
= alloca (b
->len
+ strlen (val
) + 3);
748 sprintf(str
, "%s %s\n", b
->name
, val
);
751 _cpp_define_builtin (pfile
, str
);
755 if (CPP_OPTION (pfile
, cplusplus
))
757 _cpp_define_builtin (pfile
, "__cplusplus 1");
758 if (SUPPORTS_ONE_ONLY
)
759 _cpp_define_builtin (pfile
, "__GXX_WEAK__ 1");
761 _cpp_define_builtin (pfile
, "__GXX_WEAK__ 0");
763 if (CPP_OPTION (pfile
, objc
))
764 _cpp_define_builtin (pfile
, "__OBJC__ 1");
766 if (CPP_OPTION (pfile
, lang
) == CLK_STDC94
)
767 _cpp_define_builtin (pfile
, "__STDC_VERSION__ 199409L");
768 else if (CPP_OPTION (pfile
, c99
))
769 _cpp_define_builtin (pfile
, "__STDC_VERSION__ 199901L");
771 if (CPP_OPTION (pfile
, signed_char
) == 0)
772 _cpp_define_builtin (pfile
, "__CHAR_UNSIGNED__ 1");
774 if (CPP_OPTION (pfile
, lang
) == CLK_STDC89
775 || CPP_OPTION (pfile
, lang
) == CLK_STDC94
776 || CPP_OPTION (pfile
, lang
) == CLK_STDC99
)
777 _cpp_define_builtin (pfile
, "__STRICT_ANSI__ 1");
778 else if (CPP_OPTION (pfile
, lang
) == CLK_ASM
)
779 _cpp_define_builtin (pfile
, "__ASSEMBLER__ 1");
786 #undef builtin_array_end
788 /* And another subroutine. This one sets up the standard include path. */
790 init_standard_includes (pfile
)
794 const struct default_include
*p
;
795 const char *specd_prefix
= CPP_OPTION (pfile
, include_prefix
);
797 /* Several environment variables may add to the include search path.
798 CPATH specifies an additional list of directories to be searched
799 as if specified with -I, while C_INCLUDE_PATH, CPLUS_INCLUDE_PATH,
800 etc. specify an additional list of directories to be searched as
801 if specified with -isystem, for the language indicated. */
803 GET_ENV_PATH_LIST (path
, "CPATH");
804 if (path
!= 0 && *path
!= 0)
805 path_include (pfile
, path
, BRACKET
);
807 switch ((CPP_OPTION (pfile
, objc
) << 1) + CPP_OPTION (pfile
, cplusplus
))
810 GET_ENV_PATH_LIST (path
, "C_INCLUDE_PATH");
813 GET_ENV_PATH_LIST (path
, "CPLUS_INCLUDE_PATH");
816 GET_ENV_PATH_LIST (path
, "OBJC_INCLUDE_PATH");
819 GET_ENV_PATH_LIST (path
, "OBJCPLUS_INCLUDE_PATH");
822 if (path
!= 0 && *path
!= 0)
823 path_include (pfile
, path
, SYSTEM
);
825 /* Search "translated" versions of GNU directories.
826 These have /usr/local/lib/gcc... replaced by specd_prefix. */
827 if (specd_prefix
!= 0 && cpp_GCC_INCLUDE_DIR_len
)
829 /* Remove the `include' from /usr/local/lib/gcc.../include.
830 GCC_INCLUDE_DIR will always end in /include. */
831 int default_len
= cpp_GCC_INCLUDE_DIR_len
;
832 char *default_prefix
= (char *) alloca (default_len
+ 1);
833 int specd_len
= strlen (specd_prefix
);
835 memcpy (default_prefix
, cpp_GCC_INCLUDE_DIR
, default_len
);
836 default_prefix
[default_len
] = '\0';
838 for (p
= cpp_include_defaults
; p
->fname
; p
++)
840 /* Some standard dirs are only for C++. */
842 || (CPP_OPTION (pfile
, cplusplus
)
843 && !CPP_OPTION (pfile
, no_standard_cplusplus_includes
)))
845 /* Does this dir start with the prefix? */
846 if (!memcmp (p
->fname
, default_prefix
, default_len
))
848 /* Yes; change prefix and add to search list. */
849 int flen
= strlen (p
->fname
);
850 int this_len
= specd_len
+ flen
- default_len
;
851 char *str
= (char *) xmalloc (this_len
+ 1);
852 memcpy (str
, specd_prefix
, specd_len
);
853 memcpy (str
+ specd_len
,
854 p
->fname
+ default_len
,
855 flen
- default_len
+ 1);
857 append_include_chain (pfile
, str
, SYSTEM
, p
->cxx_aware
);
863 /* Search ordinary names for GNU include directories. */
864 for (p
= cpp_include_defaults
; p
->fname
; p
++)
866 /* Some standard dirs are only for C++. */
868 || (CPP_OPTION (pfile
, cplusplus
)
869 && !CPP_OPTION (pfile
, no_standard_cplusplus_includes
)))
871 char *str
= update_path (p
->fname
, p
->component
);
872 append_include_chain (pfile
, str
, SYSTEM
, p
->cxx_aware
);
877 /* Pushes a command line -imacro and -include file indicated by P onto
878 the buffer stack. Returns non-zero if successful. */
880 push_include (pfile
, p
)
882 struct pending_option
*p
;
886 /* Later: maybe update this to use the #include "" search path
887 if cpp_read_file fails. */
888 header
.type
= CPP_STRING
;
889 header
.val
.str
.text
= (const unsigned char *) p
->arg
;
890 header
.val
.str
.len
= strlen (p
->arg
);
891 /* Make the command line directive take up a line. */
894 return _cpp_execute_include (pfile
, &header
, IT_CMDLINE
);
897 /* Frees a pending_option chain. */
900 struct pending_option
*head
;
902 struct pending_option
*next
;
912 /* This is called after options have been parsed, and partially
913 processed. Setup for processing input from the file named FNAME,
914 or stdin if it is the empty string. Return the original filename
915 on success (e.g. foo.i->foo.c), or NULL on failure. */
917 cpp_read_main_file (pfile
, fname
, table
)
922 /* The front ends don't set up the hash table until they have
923 finished processing the command line options, so initializing the
924 hashtable is deferred until now. */
925 _cpp_init_hashtable (pfile
, table
);
927 /* Set up the include search path now. */
928 if (! CPP_OPTION (pfile
, no_standard_includes
))
929 init_standard_includes (pfile
);
931 merge_include_chains (pfile
);
933 /* With -v, print the list of dirs to search. */
934 if (CPP_OPTION (pfile
, verbose
))
936 struct search_path
*l
;
937 fprintf (stderr
, _("#include \"...\" search starts here:\n"));
938 for (l
= CPP_OPTION (pfile
, quote_include
); l
; l
= l
->next
)
940 if (l
== CPP_OPTION (pfile
, bracket_include
))
941 fprintf (stderr
, _("#include <...> search starts here:\n"));
942 fprintf (stderr
, " %s\n", l
->name
);
944 fprintf (stderr
, _("End of search list.\n"));
947 if (CPP_OPTION (pfile
, print_deps
))
948 /* Set the default target (if there is none already). */
949 deps_add_default_target (pfile
->deps
, fname
);
951 /* Open the main input file. */
952 if (!_cpp_read_file (pfile
, fname
))
955 /* Set this after cpp_post_options so the client can change the
956 option if it wishes, and after stacking the main file so we don't
957 trace the main file. */
958 pfile
->line_maps
.trace_includes
= CPP_OPTION (pfile
, print_include_names
);
960 /* For foo.i, read the original filename foo.c now, for the benefit
961 of the front ends. */
962 if (CPP_OPTION (pfile
, preprocessed
))
963 read_original_filename (pfile
);
965 return pfile
->map
->to_file
;
968 /* For preprocessed files, if the first tokens are of the form # NUM.
969 handle the directive so we know the original file name. This will
970 generate file_change callbacks, which the front ends must handle
971 appropriately given their state of initialization. */
973 read_original_filename (pfile
)
976 const cpp_token
*token
, *token1
;
978 /* Lex ahead; if the first tokens are of the form # NUM, then
979 process the directive, otherwise back up. */
980 token
= _cpp_lex_direct (pfile
);
981 if (token
->type
== CPP_HASH
)
983 token1
= _cpp_lex_direct (pfile
);
984 _cpp_backup_tokens (pfile
, 1);
986 /* If it's a #line directive, handle it. */
987 if (token1
->type
== CPP_NUMBER
)
989 _cpp_handle_directive (pfile
, token
->flags
& PREV_WHITE
);
994 /* Backup as if nothing happened. */
995 _cpp_backup_tokens (pfile
, 1);
998 /* Handle pending command line options: -D, -U, -A, -imacros and
999 -include. This should be called after debugging has been properly
1000 set up in the front ends. */
1002 cpp_finish_options (pfile
)
1005 /* Install builtins and process command line macros etc. in the order
1006 they appeared, but only if not already preprocessed. */
1007 if (! CPP_OPTION (pfile
, preprocessed
))
1009 struct pending_option
*p
;
1011 _cpp_do_file_change (pfile
, LC_RENAME
, _("<built-in>"), 1, 0);
1012 init_builtins (pfile
);
1013 _cpp_do_file_change (pfile
, LC_RENAME
, _("<command line>"), 1, 0);
1014 for (p
= CPP_OPTION (pfile
, pending
)->directive_head
; p
; p
= p
->next
)
1015 (*p
->handler
) (pfile
, p
->arg
);
1017 /* Scan -imacros files after command line defines, but before
1018 files given with -include. */
1019 while ((p
= CPP_OPTION (pfile
, pending
)->imacros_head
) != NULL
)
1021 if (push_include (pfile
, p
))
1023 pfile
->buffer
->return_at_eof
= true;
1024 cpp_scan_nooutput (pfile
);
1026 CPP_OPTION (pfile
, pending
)->imacros_head
= p
->next
;
1031 free_chain (CPP_OPTION (pfile
, pending
)->directive_head
);
1032 _cpp_push_next_buffer (pfile
);
1035 /* Called to push the next buffer on the stack given by -include. If
1036 there are none, free the pending structure and restore the line map
1037 for the main file. */
1039 _cpp_push_next_buffer (pfile
)
1042 bool pushed
= false;
1044 /* This is't pretty; we'd rather not be relying on this as a boolean
1045 for reverting the line map. Further, we only free the chains in
1046 this conditional, so an early call to cpp_finish / cpp_destroy
1047 will leak that memory. */
1048 if (CPP_OPTION (pfile
, pending
)
1049 && CPP_OPTION (pfile
, pending
)->imacros_head
== NULL
)
1053 struct pending_option
*p
= CPP_OPTION (pfile
, pending
)->include_head
;
1057 if (! CPP_OPTION (pfile
, preprocessed
))
1058 pushed
= push_include (pfile
, p
);
1059 CPP_OPTION (pfile
, pending
)->include_head
= p
->next
;
1065 free (CPP_OPTION (pfile
, pending
));
1066 CPP_OPTION (pfile
, pending
) = NULL
;
1068 /* Restore the line map for the main file. */
1069 if (! CPP_OPTION (pfile
, preprocessed
))
1070 _cpp_do_file_change (pfile
, LC_RENAME
,
1071 pfile
->line_maps
.maps
[0].to_file
, 1, 0);
1078 /* Use mkdeps.c to output dependency information. */
1083 /* Stream on which to print the dependency information. */
1084 FILE *deps_stream
= 0;
1085 const char *const deps_mode
=
1086 CPP_OPTION (pfile
, print_deps_append
) ? "a" : "w";
1088 if (CPP_OPTION (pfile
, deps_file
)[0] == '\0')
1089 deps_stream
= stdout
;
1092 deps_stream
= fopen (CPP_OPTION (pfile
, deps_file
), deps_mode
);
1093 if (deps_stream
== 0)
1095 cpp_notice_from_errno (pfile
, CPP_OPTION (pfile
, deps_file
));
1100 deps_write (pfile
->deps
, deps_stream
, 72);
1102 if (CPP_OPTION (pfile
, deps_phony_targets
))
1103 deps_phony_targets (pfile
->deps
, deps_stream
);
1105 /* Don't close stdout. */
1106 if (deps_stream
!= stdout
)
1108 if (ferror (deps_stream
) || fclose (deps_stream
) != 0)
1109 cpp_fatal (pfile
, "I/O error on output");
1113 /* This is called at the end of preprocessing. It pops the
1114 last buffer and writes dependency output. It should also
1115 clear macro definitions, such that you could call cpp_start_read
1116 with a new filename to restart processing. */
1121 /* cpplex.c leaves the final buffer on the stack. This it so that
1122 it returns an unending stream of CPP_EOFs to the client. If we
1123 popped the buffer, we'd dereference a NULL buffer pointer and
1124 segfault. It's nice to allow the client to do worry-free excess
1125 cpp_get_token calls. */
1126 while (pfile
->buffer
)
1127 _cpp_pop_buffer (pfile
);
1129 /* Don't write the deps file if preprocessing has failed. */
1130 if (CPP_OPTION (pfile
, print_deps
) && pfile
->errors
== 0)
1131 output_deps (pfile
);
1133 /* Report on headers that could use multiple include guards. */
1134 if (CPP_OPTION (pfile
, print_include_names
))
1135 _cpp_report_missing_guards (pfile
);
1138 /* Add a directive to be handled later in the initialization phase. */
1140 new_pending_directive (pend
, text
, handler
)
1141 struct cpp_pending
*pend
;
1143 cl_directive_handler handler
;
1145 struct pending_option
*o
= (struct pending_option
*)
1146 xmalloc (sizeof (struct pending_option
));
1150 o
->handler
= handler
;
1151 APPEND (pend
, directive
, o
);
1154 /* Irix6 "cc -n32" and OSF4 cc have problems with char foo[] = ("string");
1155 I.e. a const string initializer with parens around it. That is
1156 what N_("string") resolves to, so we make no_* be macros instead. */
1157 #define no_arg N_("argument missing after %s")
1158 #define no_ass N_("assertion missing after %s")
1159 #define no_dir N_("directory name missing after %s")
1160 #define no_fil N_("file name missing after %s")
1161 #define no_mac N_("macro name missing after %s")
1162 #define no_pth N_("path name missing after %s")
1163 #define no_num N_("number missing after %s")
1164 #define no_tgt N_("target missing after %s")
1166 /* This is the list of all command line options, with the leading
1167 "-" removed. It must be sorted in ASCII collating order. */
1168 #define COMMAND_LINE_OPTIONS \
1169 DEF_OPT("$", 0, OPT_dollar) \
1170 DEF_OPT("+", 0, OPT_plus) \
1171 DEF_OPT("-help", 0, OPT__help) \
1172 DEF_OPT("-target-help", 0, OPT_target__help) \
1173 DEF_OPT("-version", 0, OPT__version) \
1174 DEF_OPT("A", no_ass, OPT_A) \
1175 DEF_OPT("C", 0, OPT_C) \
1176 DEF_OPT("CC", 0, OPT_CC) \
1177 DEF_OPT("D", no_mac, OPT_D) \
1178 DEF_OPT("H", 0, OPT_H) \
1179 DEF_OPT("I", no_dir, OPT_I) \
1180 DEF_OPT("M", 0, OPT_M) \
1181 DEF_OPT("MD", no_fil, OPT_MD) \
1182 DEF_OPT("MF", no_fil, OPT_MF) \
1183 DEF_OPT("MG", 0, OPT_MG) \
1184 DEF_OPT("MM", 0, OPT_MM) \
1185 DEF_OPT("MMD", no_fil, OPT_MMD) \
1186 DEF_OPT("MP", 0, OPT_MP) \
1187 DEF_OPT("MQ", no_tgt, OPT_MQ) \
1188 DEF_OPT("MT", no_tgt, OPT_MT) \
1189 DEF_OPT("P", 0, OPT_P) \
1190 DEF_OPT("U", no_mac, OPT_U) \
1191 DEF_OPT("W", no_arg, OPT_W) /* arg optional */ \
1192 DEF_OPT("d", no_arg, OPT_d) \
1193 DEF_OPT("fleading-underscore", 0, OPT_fleading_underscore) \
1194 DEF_OPT("fno-leading-underscore", 0, OPT_fno_leading_underscore) \
1195 DEF_OPT("fno-operator-names", 0, OPT_fno_operator_names) \
1196 DEF_OPT("fno-preprocessed", 0, OPT_fno_preprocessed) \
1197 DEF_OPT("fno-show-column", 0, OPT_fno_show_column) \
1198 DEF_OPT("fpreprocessed", 0, OPT_fpreprocessed) \
1199 DEF_OPT("fshow-column", 0, OPT_fshow_column) \
1200 DEF_OPT("fsigned-char", 0, OPT_fsigned_char) \
1201 DEF_OPT("ftabstop=", no_num, OPT_ftabstop) \
1202 DEF_OPT("funsigned-char", 0, OPT_funsigned_char) \
1203 DEF_OPT("h", 0, OPT_h) \
1204 DEF_OPT("idirafter", no_dir, OPT_idirafter) \
1205 DEF_OPT("imacros", no_fil, OPT_imacros) \
1206 DEF_OPT("include", no_fil, OPT_include) \
1207 DEF_OPT("iprefix", no_pth, OPT_iprefix) \
1208 DEF_OPT("isystem", no_dir, OPT_isystem) \
1209 DEF_OPT("iwithprefix", no_dir, OPT_iwithprefix) \
1210 DEF_OPT("iwithprefixbefore", no_dir, OPT_iwithprefixbefore) \
1211 DEF_OPT("lang-asm", 0, OPT_lang_asm) \
1212 DEF_OPT("lang-c", 0, OPT_lang_c) \
1213 DEF_OPT("lang-c++", 0, OPT_lang_cplusplus) \
1214 DEF_OPT("lang-c89", 0, OPT_lang_c89) \
1215 DEF_OPT("lang-objc", 0, OPT_lang_objc) \
1216 DEF_OPT("lang-objc++", 0, OPT_lang_objcplusplus) \
1217 DEF_OPT("nostdinc", 0, OPT_nostdinc) \
1218 DEF_OPT("nostdinc++", 0, OPT_nostdincplusplus) \
1219 DEF_OPT("o", no_fil, OPT_o) \
1220 DEF_OPT("pedantic", 0, OPT_pedantic) \
1221 DEF_OPT("pedantic-errors", 0, OPT_pedantic_errors) \
1222 DEF_OPT("remap", 0, OPT_remap) \
1223 DEF_OPT("std=c++98", 0, OPT_std_cplusplus98) \
1224 DEF_OPT("std=c89", 0, OPT_std_c89) \
1225 DEF_OPT("std=c99", 0, OPT_std_c99) \
1226 DEF_OPT("std=c9x", 0, OPT_std_c9x) \
1227 DEF_OPT("std=gnu89", 0, OPT_std_gnu89) \
1228 DEF_OPT("std=gnu99", 0, OPT_std_gnu99) \
1229 DEF_OPT("std=gnu9x", 0, OPT_std_gnu9x) \
1230 DEF_OPT("std=iso9899:1990", 0, OPT_std_iso9899_1990) \
1231 DEF_OPT("std=iso9899:199409", 0, OPT_std_iso9899_199409) \
1232 DEF_OPT("std=iso9899:1999", 0, OPT_std_iso9899_1999) \
1233 DEF_OPT("std=iso9899:199x", 0, OPT_std_iso9899_199x) \
1234 DEF_OPT("trigraphs", 0, OPT_trigraphs) \
1235 DEF_OPT("v", 0, OPT_v) \
1236 DEF_OPT("version", 0, OPT_version) \
1237 DEF_OPT("w", 0, OPT_w)
1239 #define DEF_OPT(text, msg, code) code,
1242 COMMAND_LINE_OPTIONS
1249 const char *opt_text
;
1252 enum opt_code opt_code
;
1255 #define DEF_OPT(text, msg, code) { text, msg, sizeof(text) - 1, code },
1257 static struct cl_option cl_options
[] =
1259 static const struct cl_option cl_options
[] =
1262 COMMAND_LINE_OPTIONS
1265 #undef COMMAND_LINE_OPTIONS
1267 /* Perform a binary search to find which, if any, option the given
1268 command-line matches. Returns its index in the option array,
1269 negative on failure. Complications arise since some options can be
1270 suffixed with an argument, and multiple complete matches can occur,
1271 e.g. -iwithprefix and -iwithprefixbefore. Moreover, we need to
1272 accept options beginning with -W that we do not recognise, but not
1273 to swallow any subsequent command line argument; this is handled as
1274 special cases in cpp_handle_option. */
1276 parse_option (input
)
1279 unsigned int md
, mn
, mx
;
1290 opt_len
= cl_options
[md
].opt_len
;
1291 comp
= memcmp (input
, cl_options
[md
].opt_text
, opt_len
);
1299 if (input
[opt_len
] == '\0')
1301 /* We were passed more text. If the option takes an argument,
1302 we may match a later option or we may have been passed the
1303 argument. The longest possible option match succeeds.
1304 If the option takes no arguments we have not matched and
1305 continue the search (e.g. input="stdc++" match was "stdc"). */
1307 if (cl_options
[md
].msg
)
1309 /* Scan forwards. If we get an exact match, return it.
1310 Otherwise, return the longest option-accepting match.
1311 This loops no more than twice with current options. */
1313 for (; mn
< (unsigned int) N_OPTS
; mn
++)
1315 opt_len
= cl_options
[mn
].opt_len
;
1316 if (memcmp (input
, cl_options
[mn
].opt_text
, opt_len
))
1318 if (input
[opt_len
] == '\0')
1320 if (cl_options
[mn
].msg
)
1331 /* Handle one command-line option in (argc, argv).
1332 Can be called multiple times, to handle multiple sets of options.
1333 If ignore is non-zero, this will ignore unrecognized -W* options.
1334 Returns number of strings consumed. */
1336 cpp_handle_option (pfile
, argc
, argv
, ignore
)
1343 struct cpp_pending
*pend
= CPP_OPTION (pfile
, pending
);
1345 /* Interpret "-" or a non-option as a file name. */
1346 if (argv
[i
][0] != '-' || argv
[i
][1] == '\0')
1348 if (CPP_OPTION (pfile
, in_fname
) == NULL
)
1349 CPP_OPTION (pfile
, in_fname
) = argv
[i
];
1350 else if (CPP_OPTION (pfile
, out_fname
) == NULL
)
1351 CPP_OPTION (pfile
, out_fname
) = argv
[i
];
1353 cpp_fatal (pfile
, "too many filenames. Type %s --help for usage info",
1358 enum opt_code opt_code
;
1360 const char *arg
= 0;
1362 /* Skip over '-'. */
1363 opt_index
= parse_option (&argv
[i
][1]);
1367 opt_code
= cl_options
[opt_index
].opt_code
;
1368 if (cl_options
[opt_index
].msg
)
1370 arg
= &argv
[i
][cl_options
[opt_index
].opt_len
+ 1];
1372 /* Yuk. Special case for -W as it must not swallow
1373 up any following argument. If this becomes common, add
1374 another field to the cl_options table. */
1375 if (arg
[0] == '\0' && opt_code
!= OPT_W
)
1380 cpp_fatal (pfile
, cl_options
[opt_index
].msg
, argv
[i
- 1]);
1388 case N_OPTS
: /* Shut GCC up. */
1390 case OPT_fleading_underscore
:
1391 CPP_OPTION (pfile
, user_label_prefix
) = "_";
1393 case OPT_fno_leading_underscore
:
1394 CPP_OPTION (pfile
, user_label_prefix
) = "";
1396 case OPT_fno_operator_names
:
1397 CPP_OPTION (pfile
, operator_names
) = 0;
1399 case OPT_fpreprocessed
:
1400 CPP_OPTION (pfile
, preprocessed
) = 1;
1402 case OPT_fno_preprocessed
:
1403 CPP_OPTION (pfile
, preprocessed
) = 0;
1405 case OPT_fshow_column
:
1406 CPP_OPTION (pfile
, show_column
) = 1;
1408 case OPT_fno_show_column
:
1409 CPP_OPTION (pfile
, show_column
) = 0;
1411 case OPT_fsigned_char
:
1412 CPP_OPTION (pfile
, signed_char
) = 1;
1414 case OPT_funsigned_char
:
1415 CPP_OPTION (pfile
, signed_char
) = 0;
1418 /* Silently ignore empty string, non-longs and silly values. */
1422 long tabstop
= strtol (arg
, &endptr
, 10);
1423 if (*endptr
== '\0' && tabstop
>= 1 && tabstop
<= 100)
1424 CPP_OPTION (pfile
, tabstop
) = tabstop
;
1428 CPP_OPTION (pfile
, inhibit_warnings
) = 1;
1433 CPP_OPTION (pfile
, help_only
) = 1;
1435 case OPT_target__help
:
1436 /* Print if any target specific options. cpplib has none, but
1437 make sure help_only gets set. */
1438 CPP_OPTION (pfile
, help_only
) = 1;
1441 /* --version inhibits compilation, -version doesn't. -v means
1442 verbose and -version. Historical reasons, don't ask. */
1444 CPP_OPTION (pfile
, help_only
) = 1;
1445 pfile
->print_version
= 1;
1448 CPP_OPTION (pfile
, verbose
) = 1;
1449 pfile
->print_version
= 1;
1452 pfile
->print_version
= 1;
1456 CPP_OPTION (pfile
, discard_comments
) = 0;
1459 CPP_OPTION (pfile
, discard_comments
) = 0;
1460 CPP_OPTION (pfile
, discard_comments_in_macro_exp
) = 0;
1463 CPP_OPTION (pfile
, no_line_commands
) = 1;
1465 case OPT_dollar
: /* Don't include $ in identifiers. */
1466 CPP_OPTION (pfile
, dollars_in_ident
) = 0;
1469 CPP_OPTION (pfile
, print_include_names
) = 1;
1472 new_pending_directive (pend
, arg
, cpp_define
);
1474 case OPT_pedantic_errors
:
1475 CPP_OPTION (pfile
, pedantic_errors
) = 1;
1478 CPP_OPTION (pfile
, pedantic
) = 1;
1479 CPP_OPTION (pfile
, warn_endif_labels
) = 1;
1482 CPP_OPTION (pfile
, trigraphs
) = 1;
1485 CPP_OPTION (pfile
, cplusplus
) = 1;
1486 CPP_OPTION (pfile
, cplusplus_comments
) = 1;
1489 CPP_OPTION (pfile
, remap
) = 1;
1492 CPP_OPTION (pfile
, include_prefix
) = arg
;
1493 CPP_OPTION (pfile
, include_prefix_len
) = strlen (arg
);
1496 set_lang (pfile
, CLK_GNUC89
);
1498 case OPT_lang_cplusplus
:
1499 set_lang (pfile
, CLK_GNUCXX
);
1502 set_lang (pfile
, CLK_OBJC
);
1504 case OPT_lang_objcplusplus
:
1505 set_lang (pfile
, CLK_OBJCXX
);
1508 set_lang (pfile
, CLK_ASM
);
1510 case OPT_std_cplusplus98
:
1511 set_lang (pfile
, CLK_CXX98
);
1514 set_lang (pfile
, CLK_GNUC89
);
1518 set_lang (pfile
, CLK_GNUC99
);
1520 case OPT_std_iso9899_199409
:
1521 set_lang (pfile
, CLK_STDC94
);
1523 case OPT_std_iso9899_1990
:
1526 set_lang (pfile
, CLK_STDC89
);
1528 case OPT_std_iso9899_199x
:
1529 case OPT_std_iso9899_1999
:
1532 set_lang (pfile
, CLK_STDC99
);
1535 /* -nostdinc causes no default include directories.
1536 You must specify all include-file directories with -I. */
1537 CPP_OPTION (pfile
, no_standard_includes
) = 1;
1539 case OPT_nostdincplusplus
:
1540 /* -nostdinc++ causes no default C++-specific include directories. */
1541 CPP_OPTION (pfile
, no_standard_cplusplus_includes
) = 1;
1544 if (CPP_OPTION (pfile
, out_fname
) == NULL
)
1545 CPP_OPTION (pfile
, out_fname
) = arg
;
1548 cpp_fatal (pfile
, "output filename specified twice");
1553 /* Args to -d specify what parts of macros to dump.
1554 Silently ignore unrecognised options; they may
1555 be aimed at the compiler proper. */
1559 while ((c
= *arg
++) != '\0')
1563 CPP_OPTION (pfile
, dump_macros
) = dump_only
;
1564 CPP_OPTION (pfile
, no_output
) = 1;
1567 CPP_OPTION (pfile
, dump_macros
) = dump_names
;
1570 CPP_OPTION (pfile
, dump_macros
) = dump_definitions
;
1573 CPP_OPTION (pfile
, dump_includes
) = 1;
1580 CPP_OPTION (pfile
, print_deps_missing_files
) = 1;
1583 /* When doing dependencies with -M or -MM, suppress normal
1584 preprocessed output, but still do -dM etc. as software
1585 depends on this. Preprocessed output occurs if -MD, -MMD
1586 or environment var dependency generation is used. */
1587 CPP_OPTION (pfile
, print_deps
) = 2;
1588 CPP_OPTION (pfile
, no_output
) = 1;
1591 CPP_OPTION (pfile
, print_deps
) = 1;
1592 CPP_OPTION (pfile
, no_output
) = 1;
1595 CPP_OPTION (pfile
, deps_file
) = arg
;
1598 CPP_OPTION (pfile
, deps_phony_targets
) = 1;
1602 /* Add a target. -MQ quotes for Make. */
1603 deps_add_target (pfile
->deps
, arg
, opt_code
== OPT_MQ
);
1607 CPP_OPTION (pfile
, print_deps
) = 2;
1608 CPP_OPTION (pfile
, deps_file
) = arg
;
1611 CPP_OPTION (pfile
, print_deps
) = 1;
1612 CPP_OPTION (pfile
, deps_file
) = arg
;
1618 /* -A with an argument beginning with '-' acts as
1619 #unassert on whatever immediately follows the '-'.
1620 If "-" is the whole argument, we eliminate all
1621 predefined macros and assertions, including those
1622 that were specified earlier on the command line.
1623 That way we can get rid of any that were passed
1624 automatically in from GCC. */
1628 free_chain (pend
->directive_head
);
1629 pend
->directive_head
= NULL
;
1630 pend
->directive_tail
= NULL
;
1633 new_pending_directive (pend
, arg
+ 1, cpp_unassert
);
1636 new_pending_directive (pend
, arg
, cpp_assert
);
1639 new_pending_directive (pend
, arg
, cpp_undef
);
1641 case OPT_I
: /* Add directory to path for includes. */
1642 if (!strcmp (arg
, "-"))
1645 Use the preceding -I directories for #include "..."
1646 but not #include <...>.
1647 Don't search the directory of the present file
1648 for #include "...". (Note that -I. -I- is not the same as
1649 the default setup; -I. uses the compiler's working dir.) */
1650 if (! CPP_OPTION (pfile
, ignore_srcdir
))
1652 pend
->quote_head
= pend
->brack_head
;
1653 pend
->quote_tail
= pend
->brack_tail
;
1654 pend
->brack_head
= 0;
1655 pend
->brack_tail
= 0;
1656 CPP_OPTION (pfile
, ignore_srcdir
) = 1;
1660 cpp_fatal (pfile
, "-I- specified twice");
1665 append_include_chain (pfile
, xstrdup (arg
), BRACKET
, 0);
1668 /* Add directory to beginning of system include path, as a system
1669 include directory. */
1670 append_include_chain (pfile
, xstrdup (arg
), SYSTEM
, 0);
1675 struct pending_option
*o
= (struct pending_option
*)
1676 xmalloc (sizeof (struct pending_option
));
1680 if (opt_code
== OPT_include
)
1681 APPEND (pend
, include
, o
);
1683 APPEND (pend
, imacros
, o
);
1686 case OPT_iwithprefix
:
1687 /* Add directory to end of path for includes,
1688 with the default prefix at the front of its name. */
1690 case OPT_iwithprefixbefore
:
1691 /* Add directory to main path for includes,
1692 with the default prefix at the front of its name. */
1699 if (CPP_OPTION (pfile
, include_prefix
) != 0)
1701 size_t ipl
= CPP_OPTION (pfile
, include_prefix_len
);
1702 fname
= xmalloc (ipl
+ len
+ 1);
1703 memcpy (fname
, CPP_OPTION (pfile
, include_prefix
), ipl
);
1704 memcpy (fname
+ ipl
, arg
, len
+ 1);
1706 else if (cpp_GCC_INCLUDE_DIR_len
)
1708 fname
= xmalloc (cpp_GCC_INCLUDE_DIR_len
+ len
+ 1);
1709 memcpy (fname
, cpp_GCC_INCLUDE_DIR
, cpp_GCC_INCLUDE_DIR_len
);
1710 memcpy (fname
+ cpp_GCC_INCLUDE_DIR_len
, arg
, len
+ 1);
1713 fname
= xstrdup (arg
);
1715 append_include_chain (pfile
, fname
,
1716 opt_code
== OPT_iwithprefix
? SYSTEM
: BRACKET
, 0);
1720 /* Add directory to end of path for includes. */
1721 append_include_chain (pfile
, xstrdup (arg
), AFTER
, 0);
1724 /* Silently ignore unrecognised options. */
1725 if (!strcmp (argv
[i
], "-Wall"))
1727 CPP_OPTION (pfile
, warn_trigraphs
) = 1;
1728 CPP_OPTION (pfile
, warn_comments
) = 1;
1730 else if (!strcmp (argv
[i
], "-Wtraditional"))
1731 CPP_OPTION (pfile
, warn_traditional
) = 1;
1732 else if (!strcmp (argv
[i
], "-Wtrigraphs"))
1733 CPP_OPTION (pfile
, warn_trigraphs
) = 1;
1734 else if (!strcmp (argv
[i
], "-Wcomment"))
1735 CPP_OPTION (pfile
, warn_comments
) = 1;
1736 else if (!strcmp (argv
[i
], "-Wcomments"))
1737 CPP_OPTION (pfile
, warn_comments
) = 1;
1738 else if (!strcmp (argv
[i
], "-Wundef"))
1739 CPP_OPTION (pfile
, warn_undef
) = 1;
1740 else if (!strcmp (argv
[i
], "-Wimport"))
1741 CPP_OPTION (pfile
, warn_import
) = 1;
1742 else if (!strcmp (argv
[i
], "-Werror"))
1743 CPP_OPTION (pfile
, warnings_are_errors
) = 1;
1744 else if (!strcmp (argv
[i
], "-Wsystem-headers"))
1745 CPP_OPTION (pfile
, warn_system_headers
) = 1;
1746 else if (!strcmp (argv
[i
], "-Wendif-labels"))
1747 CPP_OPTION (pfile
, warn_endif_labels
) = 1;
1748 else if (!strcmp (argv
[i
], "-Wno-traditional"))
1749 CPP_OPTION (pfile
, warn_traditional
) = 0;
1750 else if (!strcmp (argv
[i
], "-Wno-trigraphs"))
1751 CPP_OPTION (pfile
, warn_trigraphs
) = 0;
1752 else if (!strcmp (argv
[i
], "-Wno-comment"))
1753 CPP_OPTION (pfile
, warn_comments
) = 0;
1754 else if (!strcmp (argv
[i
], "-Wno-comments"))
1755 CPP_OPTION (pfile
, warn_comments
) = 0;
1756 else if (!strcmp (argv
[i
], "-Wno-undef"))
1757 CPP_OPTION (pfile
, warn_undef
) = 0;
1758 else if (!strcmp (argv
[i
], "-Wno-import"))
1759 CPP_OPTION (pfile
, warn_import
) = 0;
1760 else if (!strcmp (argv
[i
], "-Wno-error"))
1761 CPP_OPTION (pfile
, warnings_are_errors
) = 0;
1762 else if (!strcmp (argv
[i
], "-Wno-system-headers"))
1763 CPP_OPTION (pfile
, warn_system_headers
) = 0;
1764 else if (!strcmp (argv
[i
], "-Wno-endif-labels"))
1765 CPP_OPTION (pfile
, warn_endif_labels
) = 0;
1774 /* Handle command-line options in (argc, argv).
1775 Can be called multiple times, to handle multiple sets of options.
1776 Returns if an unrecognized option is seen.
1777 Returns number of strings consumed. */
1779 cpp_handle_options (pfile
, argc
, argv
)
1785 int strings_processed
;
1787 for (i
= 0; i
< argc
; i
+= strings_processed
)
1789 strings_processed
= cpp_handle_option (pfile
, argc
- i
, argv
+ i
, 1);
1790 if (strings_processed
== 0)
1797 /* Extra processing when all options are parsed, after all calls to
1798 cpp_handle_option[s]. Consistency checks etc. */
1800 cpp_post_options (pfile
)
1803 if (pfile
->print_version
)
1805 fprintf (stderr
, _("GNU CPP version %s (cpplib)"), version_string
);
1806 #ifdef TARGET_VERSION
1809 fputc ('\n', stderr
);
1812 /* Canonicalize in_fname and out_fname. We guarantee they are not
1813 NULL, and that the empty string represents stdin / stdout. */
1814 if (CPP_OPTION (pfile
, in_fname
) == NULL
1815 || !strcmp (CPP_OPTION (pfile
, in_fname
), "-"))
1816 CPP_OPTION (pfile
, in_fname
) = "";
1818 if (CPP_OPTION (pfile
, out_fname
) == NULL
1819 || !strcmp (CPP_OPTION (pfile
, out_fname
), "-"))
1820 CPP_OPTION (pfile
, out_fname
) = "";
1822 /* -Wtraditional is not useful in C++ mode. */
1823 if (CPP_OPTION (pfile
, cplusplus
))
1824 CPP_OPTION (pfile
, warn_traditional
) = 0;
1826 /* Set this if it hasn't been set already. */
1827 if (CPP_OPTION (pfile
, user_label_prefix
) == NULL
)
1828 CPP_OPTION (pfile
, user_label_prefix
) = USER_LABEL_PREFIX
;
1830 /* Permanently disable macro expansion if we are rescanning
1831 preprocessed text. */
1832 if (CPP_OPTION (pfile
, preprocessed
))
1833 pfile
->state
.prevent_expansion
= 1;
1835 /* We need to do this after option processing and before
1836 cpp_start_read, as cppmain.c relies on the options->no_output to
1837 set its callbacks correctly before calling cpp_start_read. */
1838 init_dependency_output (pfile
);
1840 /* After checking the environment variables, check if -M or -MM has
1841 not been specified, but other -M options have. */
1842 if (CPP_OPTION (pfile
, print_deps
) == 0 &&
1843 (CPP_OPTION (pfile
, print_deps_missing_files
)
1844 || CPP_OPTION (pfile
, deps_file
)
1845 || CPP_OPTION (pfile
, deps_phony_targets
)))
1846 cpp_fatal (pfile
, "you must additionally specify either -M or -MM");
1849 /* Set up dependency-file output. On exit, if print_deps is non-zero
1850 then deps_file is not NULL; stdout is the empty string. */
1852 init_dependency_output (pfile
)
1855 char *spec
, *s
, *output_file
;
1857 /* Either of two environment variables can specify output of deps.
1858 Its value is either "OUTPUT_FILE" or "OUTPUT_FILE DEPS_TARGET",
1859 where OUTPUT_FILE is the file to write deps info to
1860 and DEPS_TARGET is the target to mention in the deps. */
1862 if (CPP_OPTION (pfile
, print_deps
) == 0)
1864 spec
= getenv ("DEPENDENCIES_OUTPUT");
1866 CPP_OPTION (pfile
, print_deps
) = 1;
1869 spec
= getenv ("SUNPRO_DEPENDENCIES");
1871 CPP_OPTION (pfile
, print_deps
) = 2;
1876 /* Find the space before the DEPS_TARGET, if there is one. */
1877 s
= strchr (spec
, ' ');
1880 /* Let the caller perform MAKE quoting. */
1881 deps_add_target (pfile
->deps
, s
+ 1, 0);
1882 output_file
= (char *) xmalloc (s
- spec
+ 1);
1883 memcpy (output_file
, spec
, s
- spec
);
1884 output_file
[s
- spec
] = 0;
1889 /* Command line -MF overrides environment variables and default. */
1890 if (CPP_OPTION (pfile
, deps_file
) == 0)
1891 CPP_OPTION (pfile
, deps_file
) = output_file
;
1893 CPP_OPTION (pfile
, print_deps_append
) = 1;
1895 else if (CPP_OPTION (pfile
, deps_file
) == 0)
1896 /* If -M or -MM was seen without -MF, default output to wherever
1897 was specified with -o. out_fname is non-NULL here. */
1898 CPP_OPTION (pfile
, deps_file
) = CPP_OPTION (pfile
, out_fname
);
1901 /* Handle --help output. */
1905 /* To keep the lines from getting too long for some compilers, limit
1906 to about 500 characters (6 lines) per chunk. */
1909 -include <file> Include the contents of <file> before other files\n\
1910 -imacros <file> Accept definition of macros in <file>\n\
1911 -iprefix <path> Specify <path> as a prefix for next two options\n\
1912 -iwithprefix <dir> Add <dir> to the end of the system include path\n\
1913 -iwithprefixbefore <dir> Add <dir> to the end of the main include path\n\
1914 -isystem <dir> Add <dir> to the start of the system include path\n\
1917 -idirafter <dir> Add <dir> to the end of the system include path\n\
1918 -I <dir> Add <dir> to the end of the main include path\n\
1919 -I- Fine-grained include path control; see info docs\n\
1920 -nostdinc Do not search system include directories\n\
1921 (dirs specified with -isystem will still be used)\n\
1922 -nostdinc++ Do not search system include directories for C++\n\
1923 -o <file> Put output into <file>\n\
1926 -pedantic Issue all warnings demanded by strict ISO C\n\
1927 -pedantic-errors Issue -pedantic warnings as errors instead\n\
1928 -trigraphs Support ISO C trigraphs\n\
1929 -lang-c Assume that the input sources are in C\n\
1930 -lang-c89 Assume that the input sources are in C89\n\
1933 -lang-c++ Assume that the input sources are in C++\n\
1934 -lang-objc Assume that the input sources are in ObjectiveC\n\
1935 -lang-objc++ Assume that the input sources are in ObjectiveC++\n\
1936 -lang-asm Assume that the input sources are in assembler\n\
1939 -std=<std name> Specify the conformance standard; one of:\n\
1940 gnu89, gnu99, c89, c99, iso9899:1990,\n\
1941 iso9899:199409, iso9899:1999\n\
1942 -+ Allow parsing of C++ style features\n\
1943 -w Inhibit warning messages\n\
1944 -Wtrigraphs Warn if trigraphs are encountered\n\
1945 -Wno-trigraphs Do not warn about trigraphs\n\
1946 -Wcomment{s} Warn if one comment starts inside another\n\
1949 -Wno-comment{s} Do not warn about comments\n\
1950 -Wtraditional Warn about features not present in traditional C\n\
1951 -Wno-traditional Do not warn about traditional C\n\
1952 -Wundef Warn if an undefined macro is used by #if\n\
1953 -Wno-undef Do not warn about testing undefined macros\n\
1954 -Wimport Warn about the use of the #import directive\n\
1957 -Wno-import Do not warn about the use of #import\n\
1958 -Werror Treat all warnings as errors\n\
1959 -Wno-error Do not treat warnings as errors\n\
1960 -Wsystem-headers Do not suppress warnings from system headers\n\
1961 -Wno-system-headers Suppress warnings from system headers\n\
1962 -Wall Enable all preprocessor warnings\n\
1965 -M Generate make dependencies\n\
1966 -MM As -M, but ignore system header files\n\
1967 -MD Generate make dependencies and compile\n\
1968 -MMD As -MD, but ignore system header files\n\
1969 -MF <file> Write dependency output to the given file\n\
1970 -MG Treat missing header file as generated files\n\
1973 -MP Generate phony targets for all headers\n\
1974 -MQ <target> Add a MAKE-quoted target\n\
1975 -MT <target> Add an unquoted target\n\
1978 -D<macro> Define a <macro> with string '1' as its value\n\
1979 -D<macro>=<val> Define a <macro> with <val> as its value\n\
1980 -A<question>=<answer> Assert the <answer> to <question>\n\
1981 -A-<question>=<answer> Disable the <answer> to <question>\n\
1982 -U<macro> Undefine <macro> \n\
1983 -v Display the version number\n\
1986 -H Print the name of header files as they are used\n\
1987 -C Do not discard comments\n\
1988 -dM Display a list of macro definitions active at end\n\
1989 -dD Preserve macro definitions in output\n\
1990 -dN As -dD except that only the names are preserved\n\
1991 -dI Include #include directives in the output\n\
1994 -fpreprocessed Treat the input file as already preprocessed\n\
1995 -ftabstop=<number> Distance between tab stops for column reporting\n\
1996 -P Do not generate #line directives\n\
1997 -$ Do not allow '$' in identifiers\n\
1998 -remap Remap file names when including files\n\
1999 --version Display version information\n\
2000 -h or --help Display this information\n\