Error for '-' as filename of a precompiled header (PR pch/78970)
[gcc.git] / gcc / c-family / c-opts.c
1 /* C/ObjC/C++ command line option handling.
2 Copyright (C) 2002-2017 Free Software Foundation, Inc.
3 Contributed by Neil Booth.
4
5 This file is part of GCC.
6
7 GCC is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 3, or (at your option) any later
10 version.
11
12 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
15 for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with GCC; see the file COPYING3. If not see
19 <http://www.gnu.org/licenses/>. */
20
21 #include "config.h"
22 #include "system.h"
23 #include "coretypes.h"
24 #include "tm.h"
25 #include "c-target.h"
26 #include "c-common.h"
27 #include "memmodel.h"
28 #include "tm_p.h" /* For C_COMMON_OVERRIDE_OPTIONS. */
29 #include "diagnostic.h"
30 #include "c-pragma.h"
31 #include "flags.h"
32 #include "toplev.h"
33 #include "langhooks.h"
34 #include "tree-diagnostic.h" /* for virt_loc_aware_diagnostic_finalizer */
35 #include "intl.h"
36 #include "cppdefault.h"
37 #include "incpath.h"
38 #include "debug.h" /* For debug_hooks. */
39 #include "opts.h"
40 #include "plugin.h" /* For PLUGIN_INCLUDE_FILE event. */
41 #include "mkdeps.h"
42 #include "dumpfile.h"
43
44 #ifndef DOLLARS_IN_IDENTIFIERS
45 # define DOLLARS_IN_IDENTIFIERS true
46 #endif
47
48 #ifndef TARGET_SYSTEM_ROOT
49 # define TARGET_SYSTEM_ROOT NULL
50 #endif
51
52 #ifndef TARGET_OPTF
53 #define TARGET_OPTF(ARG)
54 #endif
55
56 /* CPP's options. */
57 cpp_options *cpp_opts;
58
59 /* Input filename. */
60 static const char *this_input_filename;
61
62 /* Filename and stream for preprocessed output. */
63 static const char *out_fname;
64 static FILE *out_stream;
65
66 /* Append dependencies to deps_file. */
67 static bool deps_append;
68
69 /* If dependency switches (-MF etc.) have been given. */
70 static bool deps_seen;
71
72 /* If -v seen. */
73 static bool verbose;
74
75 /* Dependency output file. */
76 static const char *deps_file;
77
78 /* The prefix given by -iprefix, if any. */
79 static const char *iprefix;
80
81 /* The multilib directory given by -imultilib, if any. */
82 static const char *imultilib;
83
84 /* The system root, if any. Overridden by -isysroot. */
85 static const char *sysroot = TARGET_SYSTEM_ROOT;
86
87 /* Zero disables all standard directories for headers. */
88 static bool std_inc = true;
89
90 /* Zero disables the C++-specific standard directories for headers. */
91 static bool std_cxx_inc = true;
92
93 /* If the quote chain has been split by -I-. */
94 static bool quote_chain_split;
95
96 /* Number of deferred options. */
97 static size_t deferred_count;
98
99 /* Number of deferred options scanned for -include. */
100 static size_t include_cursor;
101
102 /* Dump files/flags to use during parsing. */
103 static FILE *original_dump_file = NULL;
104 static int original_dump_flags;
105 static FILE *class_dump_file = NULL;
106 static int class_dump_flags;
107
108 /* Whether any standard preincluded header has been preincluded. */
109 static bool done_preinclude;
110
111 static void handle_OPT_d (const char *);
112 static void set_std_cxx98 (int);
113 static void set_std_cxx11 (int);
114 static void set_std_cxx14 (int);
115 static void set_std_cxx1z (int);
116 static void set_std_c89 (int, int);
117 static void set_std_c99 (int);
118 static void set_std_c11 (int);
119 static void check_deps_environment_vars (void);
120 static void handle_deferred_opts (void);
121 static void sanitize_cpp_opts (void);
122 static void add_prefixed_path (const char *, size_t);
123 static void push_command_line_include (void);
124 static void cb_file_change (cpp_reader *, const line_map_ordinary *);
125 static void cb_dir_change (cpp_reader *, const char *);
126 static void c_finish_options (void);
127
128 #ifndef STDC_0_IN_SYSTEM_HEADERS
129 #define STDC_0_IN_SYSTEM_HEADERS 0
130 #endif
131
132 /* Holds switches parsed by c_common_handle_option (), but whose
133 handling is deferred to c_common_post_options (). */
134 static void defer_opt (enum opt_code, const char *);
135 static struct deferred_opt
136 {
137 enum opt_code code;
138 const char *arg;
139 } *deferred_opts;
140
141
142 extern const unsigned int
143 c_family_lang_mask = (CL_C | CL_CXX | CL_ObjC | CL_ObjCXX);
144
145 /* Defer option CODE with argument ARG. */
146 static void
147 defer_opt (enum opt_code code, const char *arg)
148 {
149 deferred_opts[deferred_count].code = code;
150 deferred_opts[deferred_count].arg = arg;
151 deferred_count++;
152 }
153
154 /* Return language mask for option parsing. */
155 unsigned int
156 c_common_option_lang_mask (void)
157 {
158 static const unsigned int lang_flags[] = {CL_C, CL_ObjC, CL_CXX, CL_ObjCXX};
159
160 return lang_flags[c_language];
161 }
162
163 /* Diagnostic finalizer for C/C++/Objective-C/Objective-C++. */
164 static void
165 c_diagnostic_finalizer (diagnostic_context *context,
166 diagnostic_info *diagnostic)
167 {
168 diagnostic_show_locus (context, diagnostic->richloc, diagnostic->kind);
169 /* By default print macro expansion contexts in the diagnostic
170 finalizer -- for tokens resulting from macro expansion. */
171 virt_loc_aware_diagnostic_finalizer (context, diagnostic);
172 pp_destroy_prefix (context->printer);
173 pp_flush (context->printer);
174 }
175
176 /* Common default settings for diagnostics. */
177 void
178 c_common_diagnostics_set_defaults (diagnostic_context *context)
179 {
180 diagnostic_finalizer (context) = c_diagnostic_finalizer;
181 context->opt_permissive = OPT_fpermissive;
182 }
183
184 /* Whether options from all C-family languages should be accepted
185 quietly. */
186 static bool accept_all_c_family_options = false;
187
188 /* Return whether to complain about a wrong-language option. */
189 bool
190 c_common_complain_wrong_lang_p (const struct cl_option *option)
191 {
192 if (accept_all_c_family_options
193 && (option->flags & c_family_lang_mask))
194 return false;
195
196 return true;
197 }
198
199 /* Initialize options structure OPTS. */
200 void
201 c_common_init_options_struct (struct gcc_options *opts)
202 {
203 opts->x_flag_exceptions = c_dialect_cxx ();
204 opts->x_warn_pointer_arith = c_dialect_cxx ();
205 opts->x_warn_write_strings = c_dialect_cxx ();
206 opts->x_flag_warn_unused_result = true;
207
208 /* By default, C99-like requirements for complex multiply and divide. */
209 opts->x_flag_complex_method = 2;
210 }
211
212 /* Common initialization before calling option handlers. */
213 void
214 c_common_init_options (unsigned int decoded_options_count,
215 struct cl_decoded_option *decoded_options)
216 {
217 unsigned int i;
218 struct cpp_callbacks *cb;
219
220 g_string_concat_db
221 = new (ggc_alloc <string_concat_db> ()) string_concat_db ();
222
223 parse_in = cpp_create_reader (c_dialect_cxx () ? CLK_GNUCXX: CLK_GNUC89,
224 ident_hash, line_table);
225 cb = cpp_get_callbacks (parse_in);
226 cb->error = c_cpp_error;
227
228 cpp_opts = cpp_get_options (parse_in);
229 cpp_opts->dollars_in_ident = DOLLARS_IN_IDENTIFIERS;
230 cpp_opts->objc = c_dialect_objc ();
231
232 /* Reset to avoid warnings on internal definitions. We set it just
233 before passing on command-line options to cpplib. */
234 cpp_opts->warn_dollars = 0;
235
236 deferred_opts = XNEWVEC (struct deferred_opt, decoded_options_count);
237
238 if (c_language == clk_c)
239 {
240 /* The default for C is gnu11. */
241 set_std_c11 (false /* ISO */);
242
243 /* If preprocessing assembly language, accept any of the C-family
244 front end options since the driver may pass them through. */
245 for (i = 1; i < decoded_options_count; i++)
246 if (decoded_options[i].opt_index == OPT_lang_asm)
247 {
248 accept_all_c_family_options = true;
249 break;
250 }
251 }
252
253 /* Set C++ standard to C++14 if not specified on the command line. */
254 if (c_dialect_cxx ())
255 set_std_cxx14 (/*ISO*/false);
256
257 global_dc->colorize_source_p = true;
258 }
259
260 /* Handle switch SCODE with argument ARG. VALUE is true, unless no-
261 form of an -f or -W option was given. Returns false if the switch was
262 invalid, true if valid. Use HANDLERS in recursive handle_option calls. */
263 bool
264 c_common_handle_option (size_t scode, const char *arg, int value,
265 int kind, location_t loc,
266 const struct cl_option_handlers *handlers)
267 {
268 const struct cl_option *option = &cl_options[scode];
269 enum opt_code code = (enum opt_code) scode;
270 bool result = true;
271
272 /* Prevent resetting the language standard to a C dialect when the driver
273 has already determined that we're looking at assembler input. */
274 bool preprocessing_asm_p = (cpp_get_options (parse_in)->lang == CLK_ASM);
275
276 switch (code)
277 {
278 default:
279 if (cl_options[code].flags & c_family_lang_mask)
280 {
281 if ((option->flags & CL_TARGET)
282 && ! targetcm.handle_c_option (scode, arg, value))
283 result = false;
284 break;
285 }
286 result = false;
287 break;
288
289 case OPT__output_pch_:
290 pch_file = arg;
291 break;
292
293 case OPT_A:
294 defer_opt (code, arg);
295 break;
296
297 case OPT_C:
298 cpp_opts->discard_comments = 0;
299 break;
300
301 case OPT_CC:
302 cpp_opts->discard_comments = 0;
303 cpp_opts->discard_comments_in_macro_exp = 0;
304 break;
305
306 case OPT_D:
307 defer_opt (code, arg);
308 break;
309
310 case OPT_H:
311 cpp_opts->print_include_names = 1;
312 break;
313
314 case OPT_F:
315 TARGET_OPTF (xstrdup (arg));
316 break;
317
318 case OPT_I:
319 if (strcmp (arg, "-"))
320 add_path (xstrdup (arg), BRACKET, 0, true);
321 else
322 {
323 if (quote_chain_split)
324 error ("-I- specified twice");
325 quote_chain_split = true;
326 split_quote_chain ();
327 inform (input_location, "obsolete option -I- used, please use -iquote instead");
328 }
329 break;
330
331 case OPT_M:
332 case OPT_MM:
333 /* When doing dependencies with -M or -MM, suppress normal
334 preprocessed output, but still do -dM etc. as software
335 depends on this. Preprocessed output does occur if -MD, -MMD
336 or environment var dependency generation is used. */
337 cpp_opts->deps.style = (code == OPT_M ? DEPS_SYSTEM: DEPS_USER);
338 flag_no_output = 1;
339 break;
340
341 case OPT_MD:
342 case OPT_MMD:
343 cpp_opts->deps.style = (code == OPT_MD ? DEPS_SYSTEM: DEPS_USER);
344 cpp_opts->deps.need_preprocessor_output = true;
345 deps_file = arg;
346 break;
347
348 case OPT_MF:
349 deps_seen = true;
350 deps_file = arg;
351 break;
352
353 case OPT_MG:
354 deps_seen = true;
355 cpp_opts->deps.missing_files = true;
356 break;
357
358 case OPT_MP:
359 deps_seen = true;
360 cpp_opts->deps.phony_targets = true;
361 break;
362
363 case OPT_MQ:
364 case OPT_MT:
365 deps_seen = true;
366 defer_opt (code, arg);
367 break;
368
369 case OPT_P:
370 flag_no_line_commands = 1;
371 break;
372
373 case OPT_U:
374 defer_opt (code, arg);
375 break;
376
377 case OPT_Wall:
378 /* ??? Don't add new options here. Use LangEnabledBy in c.opt. */
379
380 cpp_opts->warn_num_sign_change = value;
381 break;
382
383 case OPT_Walloca_larger_than_:
384 if (!value)
385 inform (loc, "-Walloca-larger-than=0 is meaningless");
386 break;
387
388 case OPT_Wvla_larger_than_:
389 if (!value)
390 inform (loc, "-Wvla-larger-than=0 is meaningless");
391 break;
392
393 case OPT_Wunknown_pragmas:
394 /* Set to greater than 1, so that even unknown pragmas in
395 system headers will be warned about. */
396 /* ??? There is no way to handle this automatically for now. */
397 warn_unknown_pragmas = value * 2;
398 break;
399
400 case OPT_ansi:
401 if (!c_dialect_cxx ())
402 set_std_c89 (false, true);
403 else
404 set_std_cxx98 (true);
405 break;
406
407 case OPT_d:
408 handle_OPT_d (arg);
409 break;
410
411 case OPT_Wabi_:
412 warn_abi = true;
413 if (value == 1)
414 {
415 warning (0, "%<-Wabi=1%> is not supported, using =2");
416 value = 2;
417 }
418 warn_abi_version = value;
419 if (flag_abi_compat_version == -1)
420 flag_abi_compat_version = value;
421 break;
422
423 case OPT_fcanonical_system_headers:
424 cpp_opts->canonical_system_headers = value;
425 break;
426
427 case OPT_fcond_mismatch:
428 if (!c_dialect_cxx ())
429 {
430 flag_cond_mismatch = value;
431 break;
432 }
433 warning (0, "switch %qs is no longer supported", option->opt_text);
434 break;
435
436 case OPT_fbuiltin_:
437 if (value)
438 result = false;
439 else
440 disable_builtin_function (arg);
441 break;
442
443 case OPT_fdirectives_only:
444 cpp_opts->directives_only = value;
445 break;
446
447 case OPT_fdollars_in_identifiers:
448 cpp_opts->dollars_in_ident = value;
449 break;
450
451 case OPT_ffreestanding:
452 value = !value;
453 /* Fall through. */
454 case OPT_fhosted:
455 flag_hosted = value;
456 flag_no_builtin = !value;
457 break;
458
459 case OPT_fconstant_string_class_:
460 constant_string_class_name = arg;
461 break;
462
463 case OPT_fextended_identifiers:
464 cpp_opts->extended_identifiers = value;
465 break;
466
467 case OPT_foperator_names:
468 cpp_opts->operator_names = value;
469 break;
470
471 case OPT_fpch_deps:
472 cpp_opts->restore_pch_deps = value;
473 break;
474
475 case OPT_fpch_preprocess:
476 flag_pch_preprocess = value;
477 break;
478
479 case OPT_fpermissive:
480 flag_permissive = value;
481 global_dc->permissive = value;
482 break;
483
484 case OPT_fpreprocessed:
485 cpp_opts->preprocessed = value;
486 break;
487
488 case OPT_fdebug_cpp:
489 cpp_opts->debug = 1;
490 break;
491
492 case OPT_ftrack_macro_expansion:
493 if (value)
494 value = 2;
495 /* Fall Through. */
496
497 case OPT_ftrack_macro_expansion_:
498 if (arg && *arg != '\0')
499 cpp_opts->track_macro_expansion = value;
500 else
501 cpp_opts->track_macro_expansion = 2;
502 break;
503
504 case OPT_frepo:
505 flag_use_repository = value;
506 if (value)
507 flag_implicit_templates = 0;
508 break;
509
510 case OPT_ftabstop_:
511 /* It is documented that we silently ignore silly values. */
512 if (value >= 1 && value <= 100)
513 cpp_opts->tabstop = value;
514 break;
515
516 case OPT_fexec_charset_:
517 cpp_opts->narrow_charset = arg;
518 break;
519
520 case OPT_fwide_exec_charset_:
521 cpp_opts->wide_charset = arg;
522 break;
523
524 case OPT_finput_charset_:
525 cpp_opts->input_charset = arg;
526 break;
527
528 case OPT_ftemplate_depth_:
529 max_tinst_depth = value;
530 break;
531
532 case OPT_fvisibility_inlines_hidden:
533 visibility_options.inlines_hidden = value;
534 break;
535
536 case OPT_femit_struct_debug_baseonly:
537 set_struct_debug_option (&global_options, loc, "base");
538 break;
539
540 case OPT_femit_struct_debug_reduced:
541 set_struct_debug_option (&global_options, loc,
542 "dir:ord:sys,dir:gen:any,ind:base");
543 break;
544
545 case OPT_femit_struct_debug_detailed_:
546 set_struct_debug_option (&global_options, loc, arg);
547 break;
548
549 case OPT_fext_numeric_literals:
550 cpp_opts->ext_numeric_literals = value;
551 break;
552
553 case OPT_idirafter:
554 add_path (xstrdup (arg), AFTER, 0, true);
555 break;
556
557 case OPT_imacros:
558 case OPT_include:
559 defer_opt (code, arg);
560 break;
561
562 case OPT_imultilib:
563 imultilib = arg;
564 break;
565
566 case OPT_iprefix:
567 iprefix = arg;
568 break;
569
570 case OPT_iquote:
571 add_path (xstrdup (arg), QUOTE, 0, true);
572 break;
573
574 case OPT_isysroot:
575 sysroot = arg;
576 break;
577
578 case OPT_isystem:
579 add_path (xstrdup (arg), SYSTEM, 0, true);
580 break;
581
582 case OPT_iwithprefix:
583 add_prefixed_path (arg, SYSTEM);
584 break;
585
586 case OPT_iwithprefixbefore:
587 add_prefixed_path (arg, BRACKET);
588 break;
589
590 case OPT_lang_asm:
591 cpp_set_lang (parse_in, CLK_ASM);
592 cpp_opts->dollars_in_ident = false;
593 break;
594
595 case OPT_nostdinc:
596 std_inc = false;
597 break;
598
599 case OPT_nostdinc__:
600 std_cxx_inc = false;
601 break;
602
603 case OPT_o:
604 if (!out_fname)
605 out_fname = arg;
606 else
607 error ("output filename specified twice");
608 break;
609
610 case OPT_print_objc_runtime_info:
611 print_struct_values = 1;
612 break;
613
614 case OPT_remap:
615 cpp_opts->remap = 1;
616 break;
617
618 case OPT_std_c__98:
619 case OPT_std_gnu__98:
620 if (!preprocessing_asm_p)
621 set_std_cxx98 (code == OPT_std_c__98 /* ISO */);
622 break;
623
624 case OPT_std_c__11:
625 case OPT_std_gnu__11:
626 if (!preprocessing_asm_p)
627 set_std_cxx11 (code == OPT_std_c__11 /* ISO */);
628 break;
629
630 case OPT_std_c__14:
631 case OPT_std_gnu__14:
632 if (!preprocessing_asm_p)
633 set_std_cxx14 (code == OPT_std_c__14 /* ISO */);
634 break;
635
636 case OPT_std_c__1z:
637 case OPT_std_gnu__1z:
638 if (!preprocessing_asm_p)
639 set_std_cxx1z (code == OPT_std_c__1z /* ISO */);
640 break;
641
642 case OPT_std_c90:
643 case OPT_std_iso9899_199409:
644 if (!preprocessing_asm_p)
645 set_std_c89 (code == OPT_std_iso9899_199409 /* c94 */, true /* ISO */);
646 break;
647
648 case OPT_std_gnu90:
649 if (!preprocessing_asm_p)
650 set_std_c89 (false /* c94 */, false /* ISO */);
651 break;
652
653 case OPT_std_c99:
654 if (!preprocessing_asm_p)
655 set_std_c99 (true /* ISO */);
656 break;
657
658 case OPT_std_gnu99:
659 if (!preprocessing_asm_p)
660 set_std_c99 (false /* ISO */);
661 break;
662
663 case OPT_std_c11:
664 if (!preprocessing_asm_p)
665 set_std_c11 (true /* ISO */);
666 break;
667
668 case OPT_std_gnu11:
669 if (!preprocessing_asm_p)
670 set_std_c11 (false /* ISO */);
671 break;
672
673 case OPT_trigraphs:
674 cpp_opts->trigraphs = 1;
675 break;
676
677 case OPT_traditional_cpp:
678 cpp_opts->traditional = 1;
679 break;
680
681 case OPT_v:
682 verbose = true;
683 break;
684 }
685
686 switch (c_language)
687 {
688 case clk_c:
689 C_handle_option_auto (&global_options, &global_options_set,
690 scode, arg, value,
691 c_family_lang_mask, kind,
692 loc, handlers, global_dc);
693 break;
694
695 case clk_objc:
696 ObjC_handle_option_auto (&global_options, &global_options_set,
697 scode, arg, value,
698 c_family_lang_mask, kind,
699 loc, handlers, global_dc);
700 break;
701
702 case clk_cxx:
703 CXX_handle_option_auto (&global_options, &global_options_set,
704 scode, arg, value,
705 c_family_lang_mask, kind,
706 loc, handlers, global_dc);
707 break;
708
709 case clk_objcxx:
710 ObjCXX_handle_option_auto (&global_options, &global_options_set,
711 scode, arg, value,
712 c_family_lang_mask, kind,
713 loc, handlers, global_dc);
714 break;
715
716 default:
717 gcc_unreachable ();
718 }
719
720 cpp_handle_option_auto (&global_options, scode, cpp_opts);
721 return result;
722 }
723
724 /* Default implementation of TARGET_HANDLE_C_OPTION. */
725
726 bool
727 default_handle_c_option (size_t code ATTRIBUTE_UNUSED,
728 const char *arg ATTRIBUTE_UNUSED,
729 int value ATTRIBUTE_UNUSED)
730 {
731 return false;
732 }
733
734 /* Post-switch processing. */
735 bool
736 c_common_post_options (const char **pfilename)
737 {
738 struct cpp_callbacks *cb;
739
740 /* Canonicalize the input and output filenames. */
741 if (in_fnames == NULL)
742 {
743 in_fnames = XNEWVEC (const char *, 1);
744 in_fnames[0] = "";
745 }
746 else if (strcmp (in_fnames[0], "-") == 0)
747 {
748 if (pch_file)
749 error ("cannot use %<-%> as input filename for a precompiled header");
750
751 in_fnames[0] = "";
752 }
753
754 if (out_fname == NULL || !strcmp (out_fname, "-"))
755 out_fname = "";
756
757 if (cpp_opts->deps.style == DEPS_NONE)
758 check_deps_environment_vars ();
759
760 handle_deferred_opts ();
761
762 sanitize_cpp_opts ();
763
764 register_include_chains (parse_in, sysroot, iprefix, imultilib,
765 std_inc, std_cxx_inc && c_dialect_cxx (), verbose);
766
767 #ifdef C_COMMON_OVERRIDE_OPTIONS
768 /* Some machines may reject certain combinations of C
769 language-specific options. */
770 C_COMMON_OVERRIDE_OPTIONS;
771 #endif
772
773 /* Excess precision other than "fast" requires front-end
774 support. */
775 if (c_dialect_cxx ())
776 {
777 if (flag_excess_precision_cmdline == EXCESS_PRECISION_STANDARD)
778 sorry ("-fexcess-precision=standard for C++");
779 flag_excess_precision_cmdline = EXCESS_PRECISION_FAST;
780 }
781 else if (flag_excess_precision_cmdline == EXCESS_PRECISION_DEFAULT)
782 flag_excess_precision_cmdline = (flag_iso
783 ? EXCESS_PRECISION_STANDARD
784 : EXCESS_PRECISION_FAST);
785
786 /* ISO C restricts floating-point expression contraction to within
787 source-language expressions (-ffp-contract=on, currently an alias
788 for -ffp-contract=off). */
789 if (flag_iso
790 && !c_dialect_cxx ()
791 && (global_options_set.x_flag_fp_contract_mode
792 == (enum fp_contract_mode) 0)
793 && flag_unsafe_math_optimizations == 0)
794 flag_fp_contract_mode = FP_CONTRACT_OFF;
795
796 /* If we are compiling C, and we are outside of a standards mode,
797 we can permit the new values from ISO/IEC TS 18661-3 for
798 FLT_EVAL_METHOD. Otherwise, we must restrict the possible values to
799 the set specified in ISO C99/C11. */
800 if (!flag_iso
801 && !c_dialect_cxx ()
802 && (global_options_set.x_flag_permitted_flt_eval_methods
803 == PERMITTED_FLT_EVAL_METHODS_DEFAULT))
804 flag_permitted_flt_eval_methods = PERMITTED_FLT_EVAL_METHODS_TS_18661;
805 else
806 flag_permitted_flt_eval_methods = PERMITTED_FLT_EVAL_METHODS_C11;
807
808 /* By default we use C99 inline semantics in GNU99 or C99 mode. C99
809 inline semantics are not supported in GNU89 or C89 mode. */
810 if (flag_gnu89_inline == -1)
811 flag_gnu89_inline = !flag_isoc99;
812 else if (!flag_gnu89_inline && !flag_isoc99)
813 error ("-fno-gnu89-inline is only supported in GNU99 or C99 mode");
814
815 /* Default to ObjC sjlj exception handling if NeXT runtime. */
816 if (flag_objc_sjlj_exceptions < 0)
817 flag_objc_sjlj_exceptions = flag_next_runtime;
818 if (flag_objc_exceptions && !flag_objc_sjlj_exceptions)
819 flag_exceptions = 1;
820
821 /* If -ffreestanding, -fno-hosted or -fno-builtin then disable
822 pattern recognition. */
823 if (!global_options_set.x_flag_tree_loop_distribute_patterns
824 && flag_no_builtin)
825 flag_tree_loop_distribute_patterns = 0;
826
827 /* -Woverlength-strings is off by default, but is enabled by -Wpedantic.
828 It is never enabled in C++, as the minimum limit is not normative
829 in that standard. */
830 if (c_dialect_cxx ())
831 warn_overlength_strings = 0;
832
833 /* Wmain is enabled by default in C++ but not in C. */
834 /* Wmain is disabled by default for -ffreestanding (!flag_hosted),
835 even if -Wall or -Wpedantic was given (warn_main will be 2 if set
836 by -Wall, 1 if set by -Wmain). */
837 if (warn_main == -1)
838 warn_main = (c_dialect_cxx () && flag_hosted) ? 1 : 0;
839 else if (warn_main == 2)
840 warn_main = flag_hosted ? 1 : 0;
841
842 /* In C, -Wall and -Wc++-compat enable -Wenum-compare; if it has not
843 yet been set, it is disabled by default. In C++, it is enabled
844 by default. */
845 if (warn_enum_compare == -1)
846 warn_enum_compare = c_dialect_cxx () ? 1 : 0;
847
848 /* -Wpacked-bitfield-compat is on by default for the C languages. The
849 warning is issued in stor-layout.c which is not part of the front-end so
850 we need to selectively turn it on here. */
851 if (warn_packed_bitfield_compat == -1)
852 warn_packed_bitfield_compat = 1;
853
854 /* Special format checking options don't work without -Wformat; warn if
855 they are used. */
856 if (!warn_format)
857 {
858 warning (OPT_Wformat_y2k,
859 "-Wformat-y2k ignored without -Wformat");
860 warning (OPT_Wformat_extra_args,
861 "-Wformat-extra-args ignored without -Wformat");
862 warning (OPT_Wformat_zero_length,
863 "-Wformat-zero-length ignored without -Wformat");
864 warning (OPT_Wformat_nonliteral,
865 "-Wformat-nonliteral ignored without -Wformat");
866 warning (OPT_Wformat_contains_nul,
867 "-Wformat-contains-nul ignored without -Wformat");
868 warning (OPT_Wformat_security,
869 "-Wformat-security ignored without -Wformat");
870 }
871
872 /* -Wimplicit-function-declaration is enabled by default for C99. */
873 if (warn_implicit_function_declaration == -1)
874 warn_implicit_function_declaration = flag_isoc99;
875
876 /* -Wimplicit-int is enabled by default for C99. */
877 if (warn_implicit_int == -1)
878 warn_implicit_int = flag_isoc99;
879
880 /* -Wshift-overflow is enabled by default in C99 and C++11 modes. */
881 if (warn_shift_overflow == -1)
882 warn_shift_overflow = cxx_dialect >= cxx11 || flag_isoc99;
883
884 /* -Wshift-negative-value is enabled by -Wextra in C99 and C++11 modes. */
885 if (warn_shift_negative_value == -1)
886 warn_shift_negative_value = (extra_warnings
887 && (cxx_dialect >= cxx11 || flag_isoc99));
888
889 /* -Wregister is enabled by default in C++17. */
890 if (!global_options_set.x_warn_register)
891 warn_register = cxx_dialect >= cxx1z;
892
893 /* Declone C++ 'structors if -Os. */
894 if (flag_declone_ctor_dtor == -1)
895 flag_declone_ctor_dtor = optimize_size;
896
897 if (warn_abi_version == -1)
898 {
899 if (flag_abi_compat_version != -1)
900 warn_abi_version = flag_abi_compat_version;
901 else
902 warn_abi_version = 0;
903 }
904
905 if (flag_abi_compat_version == 1)
906 {
907 warning (0, "%<-fabi-compat-version=1%> is not supported, using =2");
908 flag_abi_compat_version = 2;
909 }
910 else if (flag_abi_compat_version == -1)
911 {
912 /* Generate compatibility aliases for ABI v10 (6.1) by default. */
913 flag_abi_compat_version
914 = (flag_abi_version == 0 ? 10 : 0);
915 }
916
917 /* Change flag_abi_version to be the actual current ABI level for the
918 benefit of c_cpp_builtins. */
919 if (flag_abi_version == 0)
920 flag_abi_version = 11;
921
922 /* By default, enable the new inheriting constructor semantics along with ABI
923 11. New and old should coexist fine, but it is a change in what
924 artificial symbols are generated. */
925 if (!global_options_set.x_flag_new_inheriting_ctors)
926 flag_new_inheriting_ctors = abi_version_at_least (11);
927
928 /* For GCC 7, only enable DR150 resolution by default if -std=c++1z. */
929 if (!global_options_set.x_flag_new_ttp)
930 flag_new_ttp = (cxx_dialect >= cxx1z);
931
932 if (cxx_dialect >= cxx11)
933 {
934 /* If we're allowing C++0x constructs, don't warn about C++98
935 identifiers which are keywords in C++0x. */
936 warn_cxx11_compat = 0;
937 cpp_opts->cpp_warn_cxx11_compat = 0;
938
939 if (warn_narrowing == -1)
940 warn_narrowing = 1;
941
942 /* Unless -f{,no-}ext-numeric-literals has been used explicitly,
943 for -std=c++{11,14,1z} default to -fno-ext-numeric-literals. */
944 if (flag_iso && !global_options_set.x_flag_ext_numeric_literals)
945 cpp_opts->ext_numeric_literals = 0;
946 }
947 else if (warn_narrowing == -1)
948 warn_narrowing = 0;
949
950 /* C++17 has stricter evaluation order requirements; let's use some of them
951 for earlier C++ as well, so chaining works as expected. */
952 if (c_dialect_cxx ()
953 && flag_strong_eval_order == -1)
954 flag_strong_eval_order = (cxx_dialect >= cxx1z ? 2 : 1);
955
956 /* Global sized deallocation is new in C++14. */
957 if (flag_sized_deallocation == -1)
958 flag_sized_deallocation = (cxx_dialect >= cxx14);
959
960 if (flag_extern_tls_init)
961 {
962 #if !defined (ASM_OUTPUT_DEF) || !SUPPORTS_WEAK
963 /* Lazy TLS initialization for a variable in another TU requires
964 alias and weak reference support. */
965 if (flag_extern_tls_init > 0)
966 sorry ("external TLS initialization functions not supported "
967 "on this target");
968 flag_extern_tls_init = 0;
969 #else
970 flag_extern_tls_init = 1;
971 #endif
972 }
973
974 if (flag_preprocess_only)
975 {
976 /* Open the output now. We must do so even if flag_no_output is
977 on, because there may be other output than from the actual
978 preprocessing (e.g. from -dM). */
979 if (out_fname[0] == '\0')
980 out_stream = stdout;
981 else
982 out_stream = fopen (out_fname, "w");
983
984 if (out_stream == NULL)
985 {
986 fatal_error (input_location, "opening output file %s: %m", out_fname);
987 return false;
988 }
989
990 if (num_in_fnames > 1)
991 error ("too many filenames given. Type %s --help for usage",
992 progname);
993
994 init_pp_output (out_stream);
995 }
996 else
997 {
998 init_c_lex ();
999
1000 /* When writing a PCH file, avoid reading some other PCH file,
1001 because the default address space slot then can't be used
1002 for the output PCH file. */
1003 if (pch_file)
1004 {
1005 c_common_no_more_pch ();
1006 /* Only -g0 and -gdwarf* are supported with PCH, for other
1007 debug formats we warn here and refuse to load any PCH files. */
1008 if (write_symbols != NO_DEBUG && write_symbols != DWARF2_DEBUG)
1009 warning (OPT_Wdeprecated,
1010 "the \"%s\" debug format cannot be used with "
1011 "pre-compiled headers", debug_type_names[write_symbols]);
1012 }
1013 else if (write_symbols != NO_DEBUG && write_symbols != DWARF2_DEBUG)
1014 c_common_no_more_pch ();
1015
1016 /* Yuk. WTF is this? I do know ObjC relies on it somewhere. */
1017 input_location = UNKNOWN_LOCATION;
1018 }
1019
1020 cb = cpp_get_callbacks (parse_in);
1021 cb->file_change = cb_file_change;
1022 cb->dir_change = cb_dir_change;
1023 cpp_post_options (parse_in);
1024 init_global_opts_from_cpp (&global_options, cpp_get_options (parse_in));
1025
1026 input_location = UNKNOWN_LOCATION;
1027
1028 *pfilename = this_input_filename
1029 = cpp_read_main_file (parse_in, in_fnames[0]);
1030 /* Don't do any compilation or preprocessing if there is no input file. */
1031 if (this_input_filename == NULL)
1032 {
1033 errorcount++;
1034 return false;
1035 }
1036
1037 if (flag_working_directory
1038 && flag_preprocess_only && !flag_no_line_commands)
1039 pp_dir_change (parse_in, get_src_pwd ());
1040
1041 /* Disable LTO output when outputting a precompiled header. */
1042 if (pch_file && flag_lto)
1043 {
1044 flag_lto = 0;
1045 flag_generate_lto = 0;
1046 }
1047
1048 return flag_preprocess_only;
1049 }
1050
1051 /* Front end initialization common to C, ObjC and C++. */
1052 bool
1053 c_common_init (void)
1054 {
1055 /* Set up preprocessor arithmetic. Must be done after call to
1056 c_common_nodes_and_builtins for type nodes to be good. */
1057 cpp_opts->precision = TYPE_PRECISION (intmax_type_node);
1058 cpp_opts->char_precision = TYPE_PRECISION (char_type_node);
1059 cpp_opts->int_precision = TYPE_PRECISION (integer_type_node);
1060 cpp_opts->wchar_precision = TYPE_PRECISION (wchar_type_node);
1061 cpp_opts->unsigned_wchar = TYPE_UNSIGNED (wchar_type_node);
1062 cpp_opts->bytes_big_endian = BYTES_BIG_ENDIAN;
1063
1064 /* This can't happen until after wchar_precision and bytes_big_endian
1065 are known. */
1066 cpp_init_iconv (parse_in);
1067
1068 if (version_flag)
1069 {
1070 int i;
1071 fputs ("Compiler executable checksum: ", stderr);
1072 for (i = 0; i < 16; i++)
1073 fprintf (stderr, "%02x", executable_checksum[i]);
1074 putc ('\n', stderr);
1075 }
1076
1077 /* Has to wait until now so that cpplib has its hash table. */
1078 init_pragma ();
1079
1080 if (flag_preprocess_only)
1081 {
1082 c_finish_options ();
1083 preprocess_file (parse_in);
1084 return false;
1085 }
1086
1087 return true;
1088 }
1089
1090 /* Initialize the integrated preprocessor after debug output has been
1091 initialized; loop over each input file. */
1092 void
1093 c_common_parse_file (void)
1094 {
1095 unsigned int i;
1096
1097 i = 0;
1098 for (;;)
1099 {
1100 c_finish_options ();
1101 /* Open the dump files to use for the original and class dump output
1102 here, to be used during parsing for the current file. */
1103 original_dump_file = dump_begin (TDI_original, &original_dump_flags);
1104 class_dump_file = dump_begin (TDI_class, &class_dump_flags);
1105 pch_init ();
1106 push_file_scope ();
1107 c_parse_file ();
1108 pop_file_scope ();
1109 /* And end the main input file, if the debug writer wants it */
1110 if (debug_hooks->start_end_main_source_file)
1111 (*debug_hooks->end_source_file) (0);
1112 if (++i >= num_in_fnames)
1113 break;
1114 cpp_undef_all (parse_in);
1115 cpp_clear_file_cache (parse_in);
1116 this_input_filename
1117 = cpp_read_main_file (parse_in, in_fnames[i]);
1118 if (original_dump_file)
1119 {
1120 dump_end (TDI_original, original_dump_file);
1121 original_dump_file = NULL;
1122 }
1123 if (class_dump_file)
1124 {
1125 dump_end (TDI_class, class_dump_file);
1126 class_dump_file = NULL;
1127 }
1128 /* If an input file is missing, abandon further compilation.
1129 cpplib has issued a diagnostic. */
1130 if (!this_input_filename)
1131 break;
1132 }
1133
1134 c_parse_final_cleanups ();
1135 }
1136
1137 /* Returns the appropriate dump file for PHASE to dump with FLAGS. */
1138 FILE *
1139 get_dump_info (int phase, int *flags)
1140 {
1141 gcc_assert (phase == TDI_original || phase == TDI_class);
1142 if (phase == TDI_original)
1143 {
1144 *flags = original_dump_flags;
1145 return original_dump_file;
1146 }
1147 else
1148 {
1149 *flags = class_dump_flags;
1150 return class_dump_file;
1151 }
1152 }
1153
1154 /* Common finish hook for the C, ObjC and C++ front ends. */
1155 void
1156 c_common_finish (void)
1157 {
1158 FILE *deps_stream = NULL;
1159
1160 /* Don't write the deps file if there are errors. */
1161 if (cpp_opts->deps.style != DEPS_NONE && !seen_error ())
1162 {
1163 /* If -M or -MM was seen without -MF, default output to the
1164 output stream. */
1165 if (!deps_file)
1166 deps_stream = out_stream;
1167 else
1168 {
1169 deps_stream = fopen (deps_file, deps_append ? "a": "w");
1170 if (!deps_stream)
1171 fatal_error (input_location, "opening dependency file %s: %m",
1172 deps_file);
1173 }
1174 }
1175
1176 /* For performance, avoid tearing down cpplib's internal structures
1177 with cpp_destroy (). */
1178 cpp_finish (parse_in, deps_stream);
1179
1180 if (deps_stream && deps_stream != out_stream
1181 && (ferror (deps_stream) || fclose (deps_stream)))
1182 fatal_error (input_location, "closing dependency file %s: %m", deps_file);
1183
1184 if (out_stream && (ferror (out_stream) || fclose (out_stream)))
1185 fatal_error (input_location, "when writing output to %s: %m", out_fname);
1186 }
1187
1188 /* Either of two environment variables can specify output of
1189 dependencies. Their value is either "OUTPUT_FILE" or "OUTPUT_FILE
1190 DEPS_TARGET", where OUTPUT_FILE is the file to write deps info to
1191 and DEPS_TARGET is the target to mention in the deps. They also
1192 result in dependency information being appended to the output file
1193 rather than overwriting it, and like Sun's compiler
1194 SUNPRO_DEPENDENCIES suppresses the dependency on the main file. */
1195 static void
1196 check_deps_environment_vars (void)
1197 {
1198 char *spec;
1199
1200 spec = getenv ("DEPENDENCIES_OUTPUT");
1201 if (spec)
1202 cpp_opts->deps.style = DEPS_USER;
1203 else
1204 {
1205 spec = getenv ("SUNPRO_DEPENDENCIES");
1206 if (spec)
1207 {
1208 cpp_opts->deps.style = DEPS_SYSTEM;
1209 cpp_opts->deps.ignore_main_file = true;
1210 }
1211 }
1212
1213 if (spec)
1214 {
1215 /* Find the space before the DEPS_TARGET, if there is one. */
1216 char *s = strchr (spec, ' ');
1217 if (s)
1218 {
1219 /* Let the caller perform MAKE quoting. */
1220 defer_opt (OPT_MT, s + 1);
1221 *s = '\0';
1222 }
1223
1224 /* Command line -MF overrides environment variables and default. */
1225 if (!deps_file)
1226 deps_file = spec;
1227
1228 deps_append = 1;
1229 deps_seen = true;
1230 }
1231 }
1232
1233 /* Handle deferred command line switches. */
1234 static void
1235 handle_deferred_opts (void)
1236 {
1237 size_t i;
1238 struct deps *deps;
1239
1240 /* Avoid allocating the deps buffer if we don't need it.
1241 (This flag may be true without there having been -MT or -MQ
1242 options, but we'll still need the deps buffer.) */
1243 if (!deps_seen)
1244 return;
1245
1246 deps = cpp_get_deps (parse_in);
1247
1248 for (i = 0; i < deferred_count; i++)
1249 {
1250 struct deferred_opt *opt = &deferred_opts[i];
1251
1252 if (opt->code == OPT_MT || opt->code == OPT_MQ)
1253 deps_add_target (deps, opt->arg, opt->code == OPT_MQ);
1254 }
1255 }
1256
1257 /* These settings are appropriate for GCC, but not necessarily so for
1258 cpplib as a library. */
1259 static void
1260 sanitize_cpp_opts (void)
1261 {
1262 /* If we don't know what style of dependencies to output, complain
1263 if any other dependency switches have been given. */
1264 if (deps_seen && cpp_opts->deps.style == DEPS_NONE)
1265 error ("to generate dependencies you must specify either -M or -MM");
1266
1267 /* -dM and dependencies suppress normal output; do it here so that
1268 the last -d[MDN] switch overrides earlier ones. */
1269 if (flag_dump_macros == 'M')
1270 flag_no_output = 1;
1271
1272 /* By default, -fdirectives-only implies -dD. This allows subsequent phases
1273 to perform proper macro expansion. */
1274 if (cpp_opts->directives_only && !cpp_opts->preprocessed && !flag_dump_macros)
1275 flag_dump_macros = 'D';
1276
1277 /* Disable -dD, -dN and -dI if normal output is suppressed. Allow
1278 -dM since at least glibc relies on -M -dM to work. */
1279 /* Also, flag_no_output implies flag_no_line_commands, always. */
1280 if (flag_no_output)
1281 {
1282 if (flag_dump_macros != 'M')
1283 flag_dump_macros = 0;
1284 flag_dump_includes = 0;
1285 flag_no_line_commands = 1;
1286 }
1287 else if (cpp_opts->deps.missing_files)
1288 error ("-MG may only be used with -M or -MM");
1289
1290 cpp_opts->unsigned_char = !flag_signed_char;
1291 cpp_opts->stdc_0_in_system_headers = STDC_0_IN_SYSTEM_HEADERS;
1292
1293 /* Wlong-long is disabled by default. It is enabled by:
1294 [-Wpedantic | -Wtraditional] -std=[gnu|c]++98 ; or
1295 [-Wpedantic | -Wtraditional] -std=non-c99
1296
1297 Either -Wlong-long or -Wno-long-long override any other settings.
1298 ??? These conditions should be handled in c.opt. */
1299 if (warn_long_long == -1)
1300 {
1301 warn_long_long = ((pedantic || warn_traditional)
1302 && (c_dialect_cxx () ? cxx_dialect == cxx98 : !flag_isoc99));
1303 cpp_opts->cpp_warn_long_long = warn_long_long;
1304 }
1305
1306 /* If we're generating preprocessor output, emit current directory
1307 if explicitly requested or if debugging information is enabled.
1308 ??? Maybe we should only do it for debugging formats that
1309 actually output the current directory? */
1310 if (flag_working_directory == -1)
1311 flag_working_directory = (debug_info_level != DINFO_LEVEL_NONE);
1312
1313 if (warn_implicit_fallthrough < 5)
1314 cpp_opts->cpp_warn_implicit_fallthrough = warn_implicit_fallthrough;
1315 else
1316 cpp_opts->cpp_warn_implicit_fallthrough = 0;
1317
1318 if (cpp_opts->directives_only)
1319 {
1320 if (cpp_warn_unused_macros)
1321 error ("-fdirectives-only is incompatible with -Wunused_macros");
1322 if (cpp_opts->traditional)
1323 error ("-fdirectives-only is incompatible with -traditional");
1324 }
1325 }
1326
1327 /* Add include path with a prefix at the front of its name. */
1328 static void
1329 add_prefixed_path (const char *suffix, size_t chain)
1330 {
1331 char *path;
1332 const char *prefix;
1333 size_t prefix_len, suffix_len;
1334
1335 suffix_len = strlen (suffix);
1336 prefix = iprefix ? iprefix : cpp_GCC_INCLUDE_DIR;
1337 prefix_len = iprefix ? strlen (iprefix) : cpp_GCC_INCLUDE_DIR_len;
1338
1339 path = (char *) xmalloc (prefix_len + suffix_len + 1);
1340 memcpy (path, prefix, prefix_len);
1341 memcpy (path + prefix_len, suffix, suffix_len);
1342 path[prefix_len + suffix_len] = '\0';
1343
1344 add_path (path, chain, 0, false);
1345 }
1346
1347 /* Handle -D, -U, -A, -imacros, and the first -include. */
1348 static void
1349 c_finish_options (void)
1350 {
1351 if (!cpp_opts->preprocessed)
1352 {
1353 size_t i;
1354
1355 cb_file_change (parse_in,
1356 linemap_check_ordinary (linemap_add (line_table,
1357 LC_RENAME, 0,
1358 _("<built-in>"),
1359 0)));
1360 /* Make sure all of the builtins about to be declared have
1361 BUILTINS_LOCATION has their source_location. */
1362 source_location builtins_loc = BUILTINS_LOCATION;
1363 cpp_force_token_locations (parse_in, &builtins_loc);
1364
1365 cpp_init_builtins (parse_in, flag_hosted);
1366 c_cpp_builtins (parse_in);
1367
1368 cpp_stop_forcing_token_locations (parse_in);
1369
1370 /* We're about to send user input to cpplib, so make it warn for
1371 things that we previously (when we sent it internal definitions)
1372 told it to not warn.
1373
1374 C99 permits implementation-defined characters in identifiers.
1375 The documented meaning of -std= is to turn off extensions that
1376 conflict with the specified standard, and since a strictly
1377 conforming program cannot contain a '$', we do not condition
1378 their acceptance on the -std= setting. */
1379 cpp_opts->warn_dollars = (cpp_opts->cpp_pedantic && !cpp_opts->c99);
1380
1381 cb_file_change (parse_in,
1382 linemap_check_ordinary (linemap_add (line_table, LC_RENAME, 0,
1383 _("<command-line>"), 0)));
1384
1385 for (i = 0; i < deferred_count; i++)
1386 {
1387 struct deferred_opt *opt = &deferred_opts[i];
1388
1389 if (opt->code == OPT_D)
1390 cpp_define (parse_in, opt->arg);
1391 else if (opt->code == OPT_U)
1392 cpp_undef (parse_in, opt->arg);
1393 else if (opt->code == OPT_A)
1394 {
1395 if (opt->arg[0] == '-')
1396 cpp_unassert (parse_in, opt->arg + 1);
1397 else
1398 cpp_assert (parse_in, opt->arg);
1399 }
1400 }
1401
1402 /* Start the main input file, if the debug writer wants it. */
1403 if (debug_hooks->start_end_main_source_file
1404 && !flag_preprocess_only)
1405 (*debug_hooks->start_source_file) (0, this_input_filename);
1406
1407 /* Handle -imacros after -D and -U. */
1408 for (i = 0; i < deferred_count; i++)
1409 {
1410 struct deferred_opt *opt = &deferred_opts[i];
1411
1412 if (opt->code == OPT_imacros
1413 && cpp_push_include (parse_in, opt->arg))
1414 {
1415 /* Disable push_command_line_include callback for now. */
1416 include_cursor = deferred_count + 1;
1417 cpp_scan_nooutput (parse_in);
1418 }
1419 }
1420 }
1421 else
1422 {
1423 if (cpp_opts->directives_only)
1424 cpp_init_special_builtins (parse_in);
1425
1426 /* Start the main input file, if the debug writer wants it. */
1427 if (debug_hooks->start_end_main_source_file
1428 && !flag_preprocess_only)
1429 (*debug_hooks->start_source_file) (0, this_input_filename);
1430 }
1431
1432 include_cursor = 0;
1433 push_command_line_include ();
1434 }
1435
1436 /* Give CPP the next file given by -include, if any. */
1437 static void
1438 push_command_line_include (void)
1439 {
1440 /* This can happen if disabled by -imacros for example.
1441 Punt so that we don't set "<command-line>" as the filename for
1442 the header. */
1443 if (include_cursor > deferred_count)
1444 return;
1445
1446 if (!done_preinclude)
1447 {
1448 done_preinclude = true;
1449 if (flag_hosted && std_inc && !cpp_opts->preprocessed)
1450 {
1451 const char *preinc = targetcm.c_preinclude ();
1452 if (preinc && cpp_push_default_include (parse_in, preinc))
1453 return;
1454 }
1455 }
1456
1457 pch_cpp_save_state ();
1458
1459 while (include_cursor < deferred_count)
1460 {
1461 struct deferred_opt *opt = &deferred_opts[include_cursor++];
1462
1463 if (!cpp_opts->preprocessed && opt->code == OPT_include
1464 && cpp_push_include (parse_in, opt->arg))
1465 return;
1466 }
1467
1468 if (include_cursor == deferred_count)
1469 {
1470 include_cursor++;
1471 /* -Wunused-macros should only warn about macros defined hereafter. */
1472 cpp_opts->warn_unused_macros = cpp_warn_unused_macros;
1473 /* Restore the line map from <command line>. */
1474 if (!cpp_opts->preprocessed)
1475 cpp_change_file (parse_in, LC_RENAME, this_input_filename);
1476
1477 /* Set this here so the client can change the option if it wishes,
1478 and after stacking the main file so we don't trace the main file. */
1479 line_table->trace_includes = cpp_opts->print_include_names;
1480 }
1481 }
1482
1483 /* File change callback. Has to handle -include files. */
1484 static void
1485 cb_file_change (cpp_reader * ARG_UNUSED (pfile),
1486 const line_map_ordinary *new_map)
1487 {
1488 if (flag_preprocess_only)
1489 pp_file_change (new_map);
1490 else
1491 fe_file_change (new_map);
1492
1493 if (new_map
1494 && (new_map->reason == LC_ENTER || new_map->reason == LC_RENAME))
1495 {
1496 /* Signal to plugins that a file is included. This could happen
1497 several times with the same file path, e.g. because of
1498 several '#include' or '#line' directives... */
1499 invoke_plugin_callbacks
1500 (PLUGIN_INCLUDE_FILE,
1501 const_cast<char*> (ORDINARY_MAP_FILE_NAME (new_map)));
1502 }
1503
1504 if (new_map == 0 || (new_map->reason == LC_LEAVE && MAIN_FILE_P (new_map)))
1505 {
1506 pch_cpp_save_state ();
1507 push_command_line_include ();
1508 }
1509 }
1510
1511 void
1512 cb_dir_change (cpp_reader * ARG_UNUSED (pfile), const char *dir)
1513 {
1514 if (!set_src_pwd (dir))
1515 warning (0, "too late for # directive to set debug directory");
1516 }
1517
1518 /* Set the C 89 standard (with 1994 amendments if C94, without GNU
1519 extensions if ISO). There is no concept of gnu94. */
1520 static void
1521 set_std_c89 (int c94, int iso)
1522 {
1523 cpp_set_lang (parse_in, c94 ? CLK_STDC94: iso ? CLK_STDC89: CLK_GNUC89);
1524 flag_iso = iso;
1525 flag_no_asm = iso;
1526 flag_no_gnu_keywords = iso;
1527 flag_no_nonansi_builtin = iso;
1528 flag_isoc94 = c94;
1529 flag_isoc99 = 0;
1530 flag_isoc11 = 0;
1531 lang_hooks.name = "GNU C89";
1532 }
1533
1534 /* Set the C 99 standard (without GNU extensions if ISO). */
1535 static void
1536 set_std_c99 (int iso)
1537 {
1538 cpp_set_lang (parse_in, iso ? CLK_STDC99: CLK_GNUC99);
1539 flag_no_asm = iso;
1540 flag_no_nonansi_builtin = iso;
1541 flag_iso = iso;
1542 flag_isoc11 = 0;
1543 flag_isoc99 = 1;
1544 flag_isoc94 = 1;
1545 lang_hooks.name = "GNU C99";
1546 }
1547
1548 /* Set the C 11 standard (without GNU extensions if ISO). */
1549 static void
1550 set_std_c11 (int iso)
1551 {
1552 cpp_set_lang (parse_in, iso ? CLK_STDC11: CLK_GNUC11);
1553 flag_no_asm = iso;
1554 flag_no_nonansi_builtin = iso;
1555 flag_iso = iso;
1556 flag_isoc11 = 1;
1557 flag_isoc99 = 1;
1558 flag_isoc94 = 1;
1559 lang_hooks.name = "GNU C11";
1560 }
1561
1562 /* Set the C++ 98 standard (without GNU extensions if ISO). */
1563 static void
1564 set_std_cxx98 (int iso)
1565 {
1566 cpp_set_lang (parse_in, iso ? CLK_CXX98: CLK_GNUCXX);
1567 flag_no_gnu_keywords = iso;
1568 flag_no_nonansi_builtin = iso;
1569 flag_iso = iso;
1570 flag_isoc94 = 0;
1571 flag_isoc99 = 0;
1572 cxx_dialect = cxx98;
1573 lang_hooks.name = "GNU C++98";
1574 }
1575
1576 /* Set the C++ 2011 standard (without GNU extensions if ISO). */
1577 static void
1578 set_std_cxx11 (int iso)
1579 {
1580 cpp_set_lang (parse_in, iso ? CLK_CXX11: CLK_GNUCXX11);
1581 flag_no_gnu_keywords = iso;
1582 flag_no_nonansi_builtin = iso;
1583 flag_iso = iso;
1584 /* C++11 includes the C99 standard library. */
1585 flag_isoc94 = 1;
1586 flag_isoc99 = 1;
1587 cxx_dialect = cxx11;
1588 lang_hooks.name = "GNU C++11";
1589 }
1590
1591 /* Set the C++ 2014 draft standard (without GNU extensions if ISO). */
1592 static void
1593 set_std_cxx14 (int iso)
1594 {
1595 cpp_set_lang (parse_in, iso ? CLK_CXX14: CLK_GNUCXX14);
1596 flag_no_gnu_keywords = iso;
1597 flag_no_nonansi_builtin = iso;
1598 flag_iso = iso;
1599 /* C++11 includes the C99 standard library. */
1600 flag_isoc94 = 1;
1601 flag_isoc99 = 1;
1602 cxx_dialect = cxx14;
1603 lang_hooks.name = "GNU C++14";
1604 }
1605
1606 /* Set the C++ 201z draft standard (without GNU extensions if ISO). */
1607 static void
1608 set_std_cxx1z (int iso)
1609 {
1610 cpp_set_lang (parse_in, iso ? CLK_CXX1Z: CLK_GNUCXX1Z);
1611 flag_no_gnu_keywords = iso;
1612 flag_no_nonansi_builtin = iso;
1613 flag_iso = iso;
1614 /* C++11 includes the C99 standard library. */
1615 flag_isoc94 = 1;
1616 flag_isoc99 = 1;
1617 flag_isoc11 = 1;
1618 cxx_dialect = cxx1z;
1619 lang_hooks.name = "GNU C++14"; /* Pretend C++14 till standarization. */
1620 }
1621
1622 /* Args to -d specify what to dump. Silently ignore
1623 unrecognized options; they may be aimed at toplev.c. */
1624 static void
1625 handle_OPT_d (const char *arg)
1626 {
1627 char c;
1628
1629 while ((c = *arg++) != '\0')
1630 switch (c)
1631 {
1632 case 'M': /* Dump macros only. */
1633 case 'N': /* Dump names. */
1634 case 'D': /* Dump definitions. */
1635 case 'U': /* Dump used macros. */
1636 flag_dump_macros = c;
1637 break;
1638
1639 case 'I':
1640 flag_dump_includes = 1;
1641 break;
1642 }
1643 }