]>
Commit | Line | Data |
---|---|---|
21bf1558 JM |
1 | /* Command line option handling. Code involving global state that |
2 | should not be shared with the driver. | |
23a5b65a | 3 | Copyright (C) 2002-2014 Free Software Foundation, Inc. |
21bf1558 JM |
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" | |
c98cd5bf | 24 | #include "diagnostic.h" |
21bf1558 JM |
25 | #include "opts.h" |
26 | #include "flags.h" | |
c98cd5bf | 27 | #include "tree.h" /* Required by langhooks.h. */ |
60393bbc AM |
28 | #include "predict.h" |
29 | #include "vec.h" | |
30 | #include "hashtab.h" | |
31 | #include "hash-set.h" | |
32 | #include "machmode.h" | |
33 | #include "tm.h" | |
34 | #include "hard-reg-set.h" | |
35 | #include "input.h" | |
36 | #include "function.h" | |
2fb9a547 AM |
37 | #include "basic-block.h" |
38 | #include "tree-ssa-alias.h" | |
39 | #include "internal-fn.h" | |
40 | #include "gimple-expr.h" | |
41 | #include "is-a.h" | |
8e9055ae | 42 | #include "gimple.h" |
c98cd5bf | 43 | #include "langhooks.h" |
21bf1558 | 44 | #include "rtl.h" |
299404a1 JM |
45 | #include "dbgcnt.h" |
46 | #include "debug.h" | |
c98cd5bf | 47 | #include "lto-streamer.h" |
21bf1558 JM |
48 | #include "output.h" |
49 | #include "plugin.h" | |
c98cd5bf | 50 | #include "toplev.h" |
21bf1558 | 51 | #include "tree-pass.h" |
47e0da37 | 52 | #include "context.h" |
21bf1558 | 53 | |
c98cd5bf | 54 | typedef const char *const_char_p; /* For DEF_VEC_P. */ |
c98cd5bf | 55 | |
9771b263 | 56 | static vec<const_char_p> ignored_options; |
c98cd5bf JM |
57 | |
58 | /* Input file names. */ | |
59 | const char **in_fnames; | |
60 | unsigned num_in_fnames; | |
61 | ||
62 | /* Return a malloced slash-separated list of languages in MASK. */ | |
63 | ||
64 | static char * | |
65 | write_langs (unsigned int mask) | |
66 | { | |
67 | unsigned int n = 0, len = 0; | |
68 | const char *lang_name; | |
69 | char *result; | |
70 | ||
71 | for (n = 0; (lang_name = lang_names[n]) != 0; n++) | |
72 | if (mask & (1U << n)) | |
73 | len += strlen (lang_name) + 1; | |
74 | ||
75 | result = XNEWVEC (char, len); | |
76 | len = 0; | |
77 | for (n = 0; (lang_name = lang_names[n]) != 0; n++) | |
78 | if (mask & (1U << n)) | |
79 | { | |
80 | if (len) | |
81 | result[len++] = '/'; | |
82 | strcpy (result + len, lang_name); | |
83 | len += strlen (lang_name); | |
84 | } | |
85 | ||
86 | result[len] = 0; | |
87 | ||
88 | return result; | |
89 | } | |
90 | ||
91 | /* Complain that switch DECODED does not apply to this front end (mask | |
92 | LANG_MASK). */ | |
93 | ||
94 | static void | |
95 | complain_wrong_lang (const struct cl_decoded_option *decoded, | |
96 | unsigned int lang_mask) | |
97 | { | |
98 | const struct cl_option *option = &cl_options[decoded->opt_index]; | |
99 | const char *text = decoded->orig_option_with_args_text; | |
100 | char *ok_langs = NULL, *bad_lang = NULL; | |
101 | unsigned int opt_flags = option->flags; | |
102 | ||
103 | if (!lang_hooks.complain_wrong_lang_p (option)) | |
104 | return; | |
105 | ||
106 | opt_flags &= ((1U << cl_lang_count) - 1) | CL_DRIVER; | |
107 | if (opt_flags != CL_DRIVER) | |
108 | ok_langs = write_langs (opt_flags); | |
109 | if (lang_mask != CL_DRIVER) | |
110 | bad_lang = write_langs (lang_mask); | |
111 | ||
112 | if (opt_flags == CL_DRIVER) | |
113 | error ("command line option %qs is valid for the driver but not for %s", | |
114 | text, bad_lang); | |
115 | else if (lang_mask == CL_DRIVER) | |
116 | gcc_unreachable (); | |
117 | else | |
118 | /* Eventually this should become a hard error IMO. */ | |
119 | warning (0, "command line option %qs is valid for %s but not for %s", | |
120 | text, ok_langs, bad_lang); | |
121 | ||
122 | free (ok_langs); | |
123 | free (bad_lang); | |
124 | } | |
125 | ||
126 | /* Buffer the unknown option described by the string OPT. Currently, | |
127 | we only complain about unknown -Wno-* options if they may have | |
128 | prevented a diagnostic. Otherwise, we just ignore them. Note that | |
129 | if we do complain, it is only as a warning, not an error; passing | |
130 | the compiler an unrecognised -Wno-* option should never change | |
131 | whether the compilation succeeds or fails. */ | |
132 | ||
133 | static void | |
134 | postpone_unknown_option_warning (const char *opt) | |
135 | { | |
9771b263 | 136 | ignored_options.safe_push (opt); |
c98cd5bf JM |
137 | } |
138 | ||
139 | /* Produce a warning for each option previously buffered. */ | |
140 | ||
141 | void | |
142 | print_ignored_options (void) | |
143 | { | |
9771b263 | 144 | while (!ignored_options.is_empty ()) |
c98cd5bf JM |
145 | { |
146 | const char *opt; | |
147 | ||
9771b263 | 148 | opt = ignored_options.pop (); |
c98cd5bf JM |
149 | warning_at (UNKNOWN_LOCATION, 0, |
150 | "unrecognized command line option \"%s\"", opt); | |
151 | } | |
152 | } | |
153 | ||
154 | /* Handle an unknown option DECODED, returning true if an error should | |
155 | be given. */ | |
156 | ||
157 | static bool | |
158 | unknown_option_callback (const struct cl_decoded_option *decoded) | |
159 | { | |
160 | const char *opt = decoded->arg; | |
161 | ||
162 | if (opt[1] == 'W' && opt[2] == 'n' && opt[3] == 'o' && opt[4] == '-' | |
163 | && !(decoded->errors & CL_ERR_NEGATIVE)) | |
164 | { | |
165 | /* We don't generate warnings for unknown -Wno-* options unless | |
166 | we issue diagnostics. */ | |
167 | postpone_unknown_option_warning (opt); | |
168 | return false; | |
169 | } | |
170 | else | |
171 | return true; | |
172 | } | |
173 | ||
c98cd5bf JM |
174 | /* Handle a front-end option; arguments and return value as for |
175 | handle_option. */ | |
176 | ||
177 | static bool | |
178 | lang_handle_option (struct gcc_options *opts, | |
179 | struct gcc_options *opts_set, | |
180 | const struct cl_decoded_option *decoded, | |
181 | unsigned int lang_mask ATTRIBUTE_UNUSED, int kind, | |
182 | location_t loc, | |
183 | const struct cl_option_handlers *handlers, | |
184 | diagnostic_context *dc) | |
185 | { | |
186 | gcc_assert (opts == &global_options); | |
187 | gcc_assert (opts_set == &global_options_set); | |
188 | gcc_assert (dc == global_dc); | |
189 | gcc_assert (decoded->canonical_option_num_elements <= 2); | |
190 | return lang_hooks.handle_option (decoded->opt_index, decoded->arg, | |
191 | decoded->value, kind, loc, handlers); | |
192 | } | |
193 | ||
194 | /* Handle FILENAME from the command line. */ | |
195 | ||
196 | static void | |
197 | add_input_filename (const char *filename) | |
198 | { | |
199 | num_in_fnames++; | |
200 | in_fnames = XRESIZEVEC (const char *, in_fnames, num_in_fnames); | |
201 | in_fnames[num_in_fnames - 1] = filename; | |
202 | } | |
203 | ||
204 | /* Handle the vector of command line options (located at LOC), storing | |
205 | the results of processing DECODED_OPTIONS and DECODED_OPTIONS_COUNT | |
206 | in OPTS and OPTS_SET and using DC for diagnostic state. LANG_MASK | |
207 | contains has a single bit set representing the current language. | |
208 | HANDLERS describes what functions to call for the options. */ | |
209 | ||
210 | static void | |
211 | read_cmdline_options (struct gcc_options *opts, struct gcc_options *opts_set, | |
212 | struct cl_decoded_option *decoded_options, | |
213 | unsigned int decoded_options_count, | |
214 | location_t loc, | |
215 | unsigned int lang_mask, | |
216 | const struct cl_option_handlers *handlers, | |
217 | diagnostic_context *dc) | |
218 | { | |
219 | unsigned int i; | |
220 | ||
221 | for (i = 1; i < decoded_options_count; i++) | |
222 | { | |
223 | if (decoded_options[i].opt_index == OPT_SPECIAL_input_file) | |
224 | { | |
225 | /* Input files should only ever appear on the main command | |
226 | line. */ | |
227 | gcc_assert (opts == &global_options); | |
228 | gcc_assert (opts_set == &global_options_set); | |
229 | ||
a803773f | 230 | if (opts->x_main_input_filename == NULL) |
c98cd5bf | 231 | { |
a803773f JM |
232 | opts->x_main_input_filename = decoded_options[i].arg; |
233 | opts->x_main_input_baselength | |
234 | = base_of_path (opts->x_main_input_filename, | |
235 | &opts->x_main_input_basename); | |
c98cd5bf JM |
236 | } |
237 | add_input_filename (decoded_options[i].arg); | |
238 | continue; | |
239 | } | |
240 | ||
241 | read_cmdline_option (opts, opts_set, | |
242 | decoded_options + i, loc, lang_mask, handlers, | |
243 | dc); | |
244 | } | |
245 | } | |
246 | ||
247 | /* Language mask determined at initialization. */ | |
248 | static unsigned int initial_lang_mask; | |
249 | ||
250 | /* Initialize global options-related settings at start-up. */ | |
251 | ||
252 | void | |
253 | init_options_once (void) | |
254 | { | |
255 | /* Perform language-specific options initialization. */ | |
256 | initial_lang_mask = lang_hooks.option_lang_mask (); | |
257 | ||
258 | lang_hooks.initialize_diagnostics (global_dc); | |
259 | } | |
260 | ||
261 | /* Decode command-line options to an array, like | |
262 | decode_cmdline_options_to_array and with the same arguments but | |
263 | using the default lang_mask. */ | |
264 | ||
265 | void | |
266 | decode_cmdline_options_to_array_default_mask (unsigned int argc, | |
267 | const char **argv, | |
268 | struct cl_decoded_option **decoded_options, | |
269 | unsigned int *decoded_options_count) | |
270 | { | |
271 | decode_cmdline_options_to_array (argc, argv, | |
272 | initial_lang_mask | CL_COMMON | CL_TARGET, | |
273 | decoded_options, decoded_options_count); | |
274 | } | |
275 | ||
276 | /* Set *HANDLERS to the default set of option handlers for use in the | |
277 | compilers proper (not the driver). */ | |
278 | void | |
279 | set_default_handlers (struct cl_option_handlers *handlers) | |
280 | { | |
281 | handlers->unknown_option_callback = unknown_option_callback; | |
282 | handlers->wrong_lang_callback = complain_wrong_lang; | |
c98cd5bf JM |
283 | handlers->num_handlers = 3; |
284 | handlers->handlers[0].handler = lang_handle_option; | |
285 | handlers->handlers[0].mask = initial_lang_mask; | |
286 | handlers->handlers[1].handler = common_handle_option; | |
287 | handlers->handlers[1].mask = CL_COMMON; | |
288 | handlers->handlers[2].handler = target_handle_option; | |
289 | handlers->handlers[2].mask = CL_TARGET; | |
290 | } | |
291 | ||
292 | /* Parse command line options and set default flag values. Do minimal | |
293 | options processing. The decoded options are in *DECODED_OPTIONS | |
294 | and *DECODED_OPTIONS_COUNT; settings go in OPTS, OPTS_SET and DC; | |
295 | the options are located at LOC. */ | |
296 | void | |
297 | decode_options (struct gcc_options *opts, struct gcc_options *opts_set, | |
298 | struct cl_decoded_option *decoded_options, | |
299 | unsigned int decoded_options_count, | |
300 | location_t loc, diagnostic_context *dc) | |
301 | { | |
302 | struct cl_option_handlers handlers; | |
303 | ||
304 | unsigned int lang_mask; | |
305 | ||
306 | lang_mask = initial_lang_mask; | |
307 | ||
308 | set_default_handlers (&handlers); | |
309 | ||
c98cd5bf JM |
310 | default_options_optimization (opts, opts_set, |
311 | decoded_options, decoded_options_count, | |
312 | loc, lang_mask, &handlers, dc); | |
313 | ||
c98cd5bf JM |
314 | read_cmdline_options (opts, opts_set, |
315 | decoded_options, decoded_options_count, | |
316 | loc, lang_mask, | |
317 | &handlers, dc); | |
318 | ||
299404a1 | 319 | finish_options (opts, opts_set, loc); |
c98cd5bf JM |
320 | } |
321 | ||
322 | /* Process common options that have been deferred until after the | |
323 | handlers have been called for all options. */ | |
324 | ||
21bf1558 JM |
325 | void |
326 | handle_common_deferred_options (void) | |
327 | { | |
328 | unsigned int i; | |
329 | cl_deferred_option *opt; | |
9771b263 DN |
330 | vec<cl_deferred_option> v; |
331 | ||
332 | if (common_deferred_options) | |
333 | v = *((vec<cl_deferred_option> *) common_deferred_options); | |
334 | else | |
6e1aa848 | 335 | v = vNULL; |
21bf1558 | 336 | |
299404a1 JM |
337 | if (flag_dump_all_passed) |
338 | enable_rtl_dump_file (); | |
339 | ||
78c60e3d SS |
340 | if (flag_opt_info) |
341 | opt_info_switch_p (NULL); | |
342 | ||
9771b263 | 343 | FOR_EACH_VEC_ELT (v, i, opt) |
21bf1558 JM |
344 | { |
345 | switch (opt->opt_index) | |
346 | { | |
347 | case OPT_fcall_used_: | |
348 | fix_register (opt->arg, 0, 1); | |
349 | break; | |
350 | ||
351 | case OPT_fcall_saved_: | |
352 | fix_register (opt->arg, 0, 0); | |
353 | break; | |
354 | ||
299404a1 JM |
355 | case OPT_fdbg_cnt_: |
356 | dbg_cnt_process_opt (opt->arg); | |
357 | break; | |
358 | ||
359 | case OPT_fdbg_cnt_list: | |
360 | dbg_cnt_list_all_counters (); | |
361 | break; | |
362 | ||
363 | case OPT_fdebug_prefix_map_: | |
364 | add_debug_prefix_map (opt->arg); | |
365 | break; | |
366 | ||
21bf1558 | 367 | case OPT_fdump_: |
47e0da37 | 368 | if (!g->get_dumps ()->dump_switch_p (opt->arg)) |
21bf1558 JM |
369 | error ("unrecognized command line option %<-fdump-%s%>", opt->arg); |
370 | break; | |
371 | ||
78c60e3d SS |
372 | case OPT_fopt_info_: |
373 | if (!opt_info_switch_p (opt->arg)) | |
2b4e6bf1 | 374 | error ("unrecognized command line option %<-fopt-info-%s%>", |
78c60e3d SS |
375 | opt->arg); |
376 | break; | |
377 | ||
226c52aa XDL |
378 | case OPT_fenable_: |
379 | case OPT_fdisable_: | |
380 | if (opt->opt_index == OPT_fenable_) | |
381 | enable_pass (opt->arg); | |
382 | else | |
383 | disable_pass (opt->arg); | |
384 | break; | |
385 | ||
21bf1558 JM |
386 | case OPT_ffixed_: |
387 | /* Deferred. */ | |
388 | fix_register (opt->arg, 1, 1); | |
389 | break; | |
390 | ||
391 | case OPT_fplugin_: | |
392 | #ifdef ENABLE_PLUGIN | |
393 | add_new_plugin (opt->arg); | |
394 | #else | |
395 | error ("plugin support is disabled; configure with --enable-plugin"); | |
396 | #endif | |
397 | break; | |
398 | ||
399 | case OPT_fplugin_arg_: | |
400 | #ifdef ENABLE_PLUGIN | |
401 | parse_plugin_arg_opt (opt->arg); | |
402 | #else | |
403 | error ("plugin support is disabled; configure with --enable-plugin"); | |
404 | #endif | |
405 | break; | |
406 | ||
299404a1 JM |
407 | case OPT_frandom_seed: |
408 | /* The real switch is -fno-random-seed. */ | |
409 | if (!opt->value) | |
410 | set_random_seed (NULL); | |
411 | break; | |
412 | ||
413 | case OPT_frandom_seed_: | |
414 | set_random_seed (opt->arg); | |
415 | break; | |
416 | ||
21bf1558 JM |
417 | case OPT_fstack_limit: |
418 | /* The real switch is -fno-stack-limit. */ | |
299404a1 JM |
419 | if (!opt->value) |
420 | stack_limit_rtx = NULL_RTX; | |
21bf1558 JM |
421 | break; |
422 | ||
423 | case OPT_fstack_limit_register_: | |
424 | { | |
425 | int reg = decode_reg_name (opt->arg); | |
426 | if (reg < 0) | |
427 | error ("unrecognized register name %qs", opt->arg); | |
428 | else | |
429 | stack_limit_rtx = gen_rtx_REG (Pmode, reg); | |
430 | } | |
431 | break; | |
432 | ||
433 | case OPT_fstack_limit_symbol_: | |
434 | stack_limit_rtx = gen_rtx_SYMBOL_REF (Pmode, ggc_strdup (opt->arg)); | |
435 | break; | |
436 | ||
437 | default: | |
438 | gcc_unreachable (); | |
439 | } | |
440 | } | |
441 | } |