CbC/CbC_gcc: gcc/opts-common.c annotate

annotate gcc/opts-common.c @ 131:84e7813d76e9

gcc-8.2

author	mir3636
date	Thu, 25 Oct 2018 07:37:49 +0900
parents	04ced10e8804
children	1830386684a0

rev	line source
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1 /* Command line option handling.
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	2 Copyright (C) 2006-2018 Free Software Foundation, Inc.
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	3
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	4 This file is part of GCC.
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	5
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	6 GCC is free software; you can redistribute it and/or modify it under
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	7 the terms of the GNU General Public License as published by the Free
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	8 Software Foundation; either version 3, or (at your option) any later
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	9 version.
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	10
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	14 for more details.
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	15
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	16 You should have received a copy of the GNU General Public License
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	17 along with GCC; see the file COPYING3. If not see
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	18 <http://www.gnu.org/licenses/>. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	19
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	20 #include "config.h"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	21 #include "system.h"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	22 #include "intl.h"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	23 #include "coretypes.h"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	24 #include "opts.h"
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	25 #include "options.h"
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	26 #include "diagnostic.h"
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	27 #include "spellcheck.h"
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	28
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	29 static void prune_options (struct cl_decoded_option *, unsigned int );
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	30
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	31 /* An option that is undocumented, that takes a joined argument, and
04ced10e8804 gcc 7 kono parents: 67 diff changeset	32 that doesn't fit any of the classes of uses (language/common,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	33 driver, target) is assumed to be a prefix used to catch
04ced10e8804 gcc 7 kono parents: 67 diff changeset	34 e.g. negated options, and stop them from being further shortened to
04ced10e8804 gcc 7 kono parents: 67 diff changeset	35 a prefix that could use the negated option as an argument. For
04ced10e8804 gcc 7 kono parents: 67 diff changeset	36 example, we want -gno-statement-frontiers to be taken as a negation
04ced10e8804 gcc 7 kono parents: 67 diff changeset	37 of -gstatement-frontiers, but without catching the gno- prefix and
04ced10e8804 gcc 7 kono parents: 67 diff changeset	38 signaling it's to be used for option remapping, it would end up
04ced10e8804 gcc 7 kono parents: 67 diff changeset	39 backtracked to g with no-statemnet-frontiers as the debug level. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	40
04ced10e8804 gcc 7 kono parents: 67 diff changeset	41 static bool
04ced10e8804 gcc 7 kono parents: 67 diff changeset	42 remapping_prefix_p (const struct cl_option *opt)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	43 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	44 return opt->flags & CL_UNDOCUMENTED
04ced10e8804 gcc 7 kono parents: 67 diff changeset	45 && opt->flags & CL_JOINED
04ced10e8804 gcc 7 kono parents: 67 diff changeset	46 && !(opt->flags & (CL_DRIVER \| CL_TARGET \| CL_COMMON \| CL_LANG_ALL));
04ced10e8804 gcc 7 kono parents: 67 diff changeset	47 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	48
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	49 /* Perform a binary search to find which option the command-line INPUT
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	50 matches. Returns its index in the option array, and
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	51 OPT_SPECIAL_unknown on failure.
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	52
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	53 This routine is quite subtle. A normal binary search is not good
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	54 enough because some options can be suffixed with an argument, and
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	55 multiple sub-matches can occur, e.g. input of "-pedantic" matching
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	56 the initial substring of "-pedantic-errors".
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	57
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	58 A more complicated example is -gstabs. It should match "-g" with
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	59 an argument of "stabs". Suppose, however, that the number and list
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	60 of switches are such that the binary search tests "-gen-decls"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	61 before having tested "-g". This doesn't match, and as "-gen-decls"
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	62 is less than "-gstabs", it will become the lower bound of the
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	63 binary search range, and "-g" will never be seen. To resolve this
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	64 issue, 'optc-gen.awk' makes "-gen-decls" point, via the back_chain member,
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	65 to "-g" so that failed searches that end between "-gen-decls" and
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	66 the lexicographically subsequent switch know to go back and see if
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	67 "-g" causes a match (which it does in this example).
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	68
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	69 This search is done in such a way that the longest match for the
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	70 front end in question wins. If there is no match for the current
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	71 front end, the longest match for a different front end is returned
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	72 (or N_OPTS if none) and the caller emits an error message. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	73 size_t
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	74 find_opt (const char *input, unsigned int lang_mask)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	75 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	76 size_t mn, mn_orig, mx, md, opt_len;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	77 size_t match_wrong_lang;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	78 int comp;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	79
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	80 mn = 0;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	81 mx = cl_options_count;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	82
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	83 /* Find mn such this lexicographical inequality holds:
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	84 cl_options[mn] <= input < cl_options[mn + 1]. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	85 while (mx - mn > 1)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	86 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	87 md = (mn + mx) / 2;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	88 opt_len = cl_options[md].opt_len;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	89 comp = strncmp (input, cl_options[md].opt_text + 1, opt_len);
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	90
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	91 if (comp < 0)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	92 mx = md;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	93 else
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	94 mn = md;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	95 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	96
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	97 mn_orig = mn;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	98
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	99 /* This is the switch that is the best match but for a different
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	100 front end, or OPT_SPECIAL_unknown if there is no match at all. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	101 match_wrong_lang = OPT_SPECIAL_unknown;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	102
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	103 /* Backtrace the chain of possible matches, returning the longest
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	104 one, if any, that fits best. With current GCC switches, this
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	105 loop executes at most twice. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	106 do
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	107 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	108 const struct cl_option *opt = &cl_options[mn];
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	109
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	110 /* Is the input either an exact match or a prefix that takes a
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	111 joined argument? */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	112 if (!strncmp (input, opt->opt_text + 1, opt->opt_len)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	113 && (input[opt->opt_len] == '\0' \|\| (opt->flags & CL_JOINED)))
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	114 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	115 /* If language is OK, return it. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	116 if (opt->flags & lang_mask)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	117 return mn;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	118
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	119 if (remapping_prefix_p (opt))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	120 return OPT_SPECIAL_unknown;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	121
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	122 /* If we haven't remembered a prior match, remember this
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	123 one. Any prior match is necessarily better. */
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	124 if (match_wrong_lang == OPT_SPECIAL_unknown)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	125 match_wrong_lang = mn;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	126 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	127
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	128 /* Try the next possibility. This is cl_options_count if there
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	129 are no more. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	130 mn = opt->back_chain;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	131 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	132 while (mn != cl_options_count);
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	133
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	134 if (match_wrong_lang == OPT_SPECIAL_unknown && input[0] == '-')
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	135 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	136 /* Long options, starting "--", may be abbreviated if the
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	137 abbreviation is unambiguous. This only applies to options
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	138 not taking a joined argument, and abbreviations of "--option"
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	139 are permitted even if there is a variant "--option=". */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	140 size_t mnc = mn_orig + 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	141 size_t cmp_len = strlen (input);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	142 while (mnc < cl_options_count
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	143 && strncmp (input, cl_options[mnc].opt_text + 1, cmp_len) == 0)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	144 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	145 /* Option matching this abbreviation. OK if it is the first
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	146 match and that does not take a joined argument, or the
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	147 second match, taking a joined argument and with only '='
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	148 added to the first match; otherwise considered
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	149 ambiguous. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	150 if (mnc == mn_orig + 1
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	151 && !(cl_options[mnc].flags & CL_JOINED))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	152 match_wrong_lang = mnc;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	153 else if (mnc == mn_orig + 2
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	154 && match_wrong_lang == mn_orig + 1
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	155 && (cl_options[mnc].flags & CL_JOINED)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	156 && (cl_options[mnc].opt_len
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	157 == cl_options[mn_orig + 1].opt_len + 1)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	158 && strncmp (cl_options[mnc].opt_text + 1,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	159 cl_options[mn_orig + 1].opt_text + 1,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	160 cl_options[mn_orig + 1].opt_len) == 0)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	161 ; /* OK, as long as there are no more matches. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	162 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	163 return OPT_SPECIAL_unknown;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	164 mnc++;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	165 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	166 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	167
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	168 /* Return the best wrong match, or OPT_SPECIAL_unknown if none. */
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	169 return match_wrong_lang;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	170 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	171
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	172 /* If ARG is a non-negative decimal or hexadecimal integer representable
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	173 in HOST_WIDE_INT return its value, otherwise return -1. If ERR is not
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	174 null set *ERR to zero on success or to EINVAL or to the value of errno
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	175 otherwise. */
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	176
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	177 HOST_WIDE_INT
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	178 integral_argument (const char arg, int err, bool byte_size_suffix)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	179 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	180 if (!err)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	181 err = &errno;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	182
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	183 if (!ISDIGIT (*arg))
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	184 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	185 *err = EINVAL;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	186 return -1;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	187 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	188
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	189 *err = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	190 errno = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	191
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	192 char *end = NULL;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	193 unsigned HOST_WIDE_INT unit = 1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	194 unsigned HOST_WIDE_INT value = strtoull (arg, &end, 10);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	195
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	196 /* If the value is too large to be represented use the maximum
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	197 representable value that strtoull sets VALUE to (setting
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	198 errno to ERANGE). */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	199
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	200 if (end && *end)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	201 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	202 if (!byte_size_suffix)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	203 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	204 errno = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	205 value = strtoull (arg, &end, 0);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	206 if (*end)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	207 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	208 /* errno is most likely EINVAL here. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	209 *err = errno;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	210 return -1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	211 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	212
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	213 return value;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	214 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	215
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	216 /* Numeric option arguments are at most INT_MAX. Make it
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	217 possible to specify a larger value by accepting common
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	218 suffixes. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	219 if (!strcmp (end, "kB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	220 unit = 1000;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	221 else if (!strcasecmp (end, "KiB") \|\| !strcmp (end, "KB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	222 unit = 1024;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	223 else if (!strcmp (end, "MB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	224 unit = HOST_WIDE_INT_UC (1000) * 1000;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	225 else if (!strcasecmp (end, "MiB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	226 unit = HOST_WIDE_INT_UC (1024) * 1024;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	227 else if (!strcasecmp (end, "GB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	228 unit = HOST_WIDE_INT_UC (1000) * 1000 * 1000;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	229 else if (!strcasecmp (end, "GiB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	230 unit = HOST_WIDE_INT_UC (1024) * 1024 * 1024;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	231 else if (!strcasecmp (end, "TB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	232 unit = HOST_WIDE_INT_UC (1000) * 1000 * 1000 * 1000;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	233 else if (!strcasecmp (end, "TiB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	234 unit = HOST_WIDE_INT_UC (1024) * 1024 * 1024 * 1024;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	235 else if (!strcasecmp (end, "PB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	236 unit = HOST_WIDE_INT_UC (1000) * 1000 * 1000 * 1000 * 1000;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	237 else if (!strcasecmp (end, "PiB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	238 unit = HOST_WIDE_INT_UC (1024) * 1024 * 1024 * 1024 * 1024;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	239 else if (!strcasecmp (end, "EB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	240 unit = HOST_WIDE_INT_UC (1000) * 1000 * 1000 * 1000 * 1000
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	241 * 1000;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	242 else if (!strcasecmp (end, "EiB"))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	243 unit = HOST_WIDE_INT_UC (1024) * 1024 * 1024 * 1024 * 1024
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	244 * 1024;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	245 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	246 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	247 /* This could mean an unknown suffix or a bad prefix, like
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	248 "+-1". */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	249 *err = EINVAL;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	250 return -1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	251 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	252 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	253
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	254 if (unit)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	255 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	256 unsigned HOST_WIDE_INT prod = value * unit;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	257 value = prod < value ? HOST_WIDE_INT_M1U : prod;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	258 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	259
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	260 return value;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	261 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	262
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	263 /* Return whether OPTION is OK for the language given by
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	264 LANG_MASK. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	265 static bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	266 option_ok_for_language (const struct cl_option *option,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	267 unsigned int lang_mask)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	268 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	269 if (!(option->flags & lang_mask))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	270 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	271 else if ((option->flags & CL_TARGET)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	272 && (option->flags & (CL_LANG_ALL \| CL_DRIVER))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	273 && !(option->flags & (lang_mask & ~CL_COMMON & ~CL_TARGET)))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	274 /* Complain for target flag language mismatches if any languages
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	275 are specified. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	276 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	277 return true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	278 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	279
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	280 /* Return whether ENUM_ARG is OK for the language given by
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	281 LANG_MASK. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	282
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	283 static bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	284 enum_arg_ok_for_language (const struct cl_enum_arg *enum_arg,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	285 unsigned int lang_mask)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	286 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	287 return (lang_mask & CL_DRIVER) \|\| !(enum_arg->flags & CL_ENUM_DRIVER_ONLY);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	288 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	289
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	290 /* Look up ARG in ENUM_ARGS for language LANG_MASK, returning true and
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	291 storing the value in *VALUE if found, and returning false without
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	292 modifying VALUE if not found. /
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	293
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	294 static bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	295 enum_arg_to_value (const struct cl_enum_arg *enum_args,
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	296 const char arg, HOST_WIDE_INT value,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	297 unsigned int lang_mask)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	298 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	299 unsigned int i;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	300
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	301 for (i = 0; enum_args[i].arg != NULL; i++)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	302 if (strcmp (arg, enum_args[i].arg) == 0
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	303 && enum_arg_ok_for_language (&enum_args[i], lang_mask))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	304 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	305 *value = enum_args[i].value;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	306 return true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	307 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	308
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	309 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	310 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	311
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	312 /* Look up ARG in the enum used by option OPT_INDEX for language
04ced10e8804 gcc 7 kono parents: 67 diff changeset	313 LANG_MASK, returning true and storing the value in *VALUE if found,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	314 and returning false without modifying VALUE if not found. /
04ced10e8804 gcc 7 kono parents: 67 diff changeset	315
04ced10e8804 gcc 7 kono parents: 67 diff changeset	316 bool
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	317 opt_enum_arg_to_value (size_t opt_index, const char *arg,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	318 int *value, unsigned int lang_mask)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	319 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	320 const struct cl_option *option = &cl_options[opt_index];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	321
04ced10e8804 gcc 7 kono parents: 67 diff changeset	322 gcc_assert (option->var_type == CLVC_ENUM);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	323
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	324 HOST_WIDE_INT wideval;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	325 if (enum_arg_to_value (cl_enums[option->var_enum].values, arg,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	326 &wideval, lang_mask))
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	327 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	328 *value = wideval;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	329 return true;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	330 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	331
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	332 return false;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	333 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	334
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	335 /* Look of VALUE in ENUM_ARGS for language LANG_MASK and store the
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	336 corresponding string in *ARGP, returning true if the found string
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	337 was marked as canonical, false otherwise. If VALUE is not found
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	338 (which may be the case for uninitialized values if the relevant
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	339 option has not been passed), set *ARGP to NULL and return
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	340 false. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	341
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	342 bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	343 enum_value_to_arg (const struct cl_enum_arg *enum_args,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	344 const char **argp, int value, unsigned int lang_mask)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	345 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	346 unsigned int i;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	347
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	348 for (i = 0; enum_args[i].arg != NULL; i++)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	349 if (enum_args[i].value == value
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	350 && (enum_args[i].flags & CL_ENUM_CANONICAL)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	351 && enum_arg_ok_for_language (&enum_args[i], lang_mask))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	352 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	353 *argp = enum_args[i].arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	354 return true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	355 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	356
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	357 for (i = 0; enum_args[i].arg != NULL; i++)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	358 if (enum_args[i].value == value
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	359 && enum_arg_ok_for_language (&enum_args[i], lang_mask))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	360 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	361 *argp = enum_args[i].arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	362 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	363 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	364
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	365 *argp = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	366 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	367 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	368
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	369 /* Fill in the canonical option part of *DECODED with an option
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	370 described by OPT_INDEX, ARG and VALUE. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	371
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	372 static void
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	373 generate_canonical_option (size_t opt_index, const char *arg,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	374 HOST_WIDE_INT value,
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	375 struct cl_decoded_option *decoded)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	376 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	377 const struct cl_option *option = &cl_options[opt_index];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	378 const char *opt_text = option->opt_text;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	379
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	380 if (value == 0
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	381 && !option->cl_reject_negative
04ced10e8804 gcc 7 kono parents: 67 diff changeset	382 && (opt_text[1] == 'W' \|\| opt_text[1] == 'f'
04ced10e8804 gcc 7 kono parents: 67 diff changeset	383 \|\| opt_text[1] == 'g' \|\| opt_text[1] == 'm'))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	384 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	385 char *t = XOBNEWVEC (&opts_obstack, char, option->opt_len + 5);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	386 t[0] = '-';
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	387 t[1] = opt_text[1];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	388 t[2] = 'n';
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	389 t[3] = 'o';
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	390 t[4] = '-';
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	391 memcpy (t + 5, opt_text + 2, option->opt_len);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	392 opt_text = t;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	393 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	394
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	395 decoded->canonical_option[2] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	396 decoded->canonical_option[3] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	397
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	398 if (arg)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	399 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	400 if ((option->flags & CL_SEPARATE)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	401 && !option->cl_separate_alias)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	402 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	403 decoded->canonical_option[0] = opt_text;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	404 decoded->canonical_option[1] = arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	405 decoded->canonical_option_num_elements = 2;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	406 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	407 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	408 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	409 gcc_assert (option->flags & CL_JOINED);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	410 decoded->canonical_option[0] = opts_concat (opt_text, arg, NULL);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	411 decoded->canonical_option[1] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	412 decoded->canonical_option_num_elements = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	413 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	414 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	415 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	416 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	417 decoded->canonical_option[0] = opt_text;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	418 decoded->canonical_option[1] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	419 decoded->canonical_option_num_elements = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	420 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	421 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	422
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	423 /* Structure describing mappings from options on the command line to
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	424 options to look up with find_opt. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	425 struct option_map
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	426 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	427 /* Prefix of the option on the command line. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	428 const char *opt0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	429 /* If two argv elements are considered to be merged into one option,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	430 prefix for the second element, otherwise NULL. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	431 const char *opt1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	432 /* The new prefix to map to. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	433 const char *new_prefix;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	434 /* Whether at least one character is needed following opt1 or opt0
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	435 for this mapping to be used. (--optimize= is valid for -O, but
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	436 --warn- is not valid for -W.) */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	437 bool another_char_needed;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	438 /* Whether the original option is a negated form of the option
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	439 resulting from this map. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	440 bool negated;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	441 };
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	442 static const struct option_map option_map[] =
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	443 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	444 { "-Wno-", NULL, "-W", false, true },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	445 { "-fno-", NULL, "-f", false, true },
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	446 { "-gno-", NULL, "-g", false, true },
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	447 { "-mno-", NULL, "-m", false, true },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	448 { "--debug=", NULL, "-g", false, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	449 { "--machine-", NULL, "-m", true, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	450 { "--machine-no-", NULL, "-m", false, true },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	451 { "--machine=", NULL, "-m", false, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	452 { "--machine=no-", NULL, "-m", false, true },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	453 { "--machine", "", "-m", false, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	454 { "--machine", "no-", "-m", false, true },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	455 { "--optimize=", NULL, "-O", false, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	456 { "--std=", NULL, "-std=", false, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	457 { "--std", "", "-std=", false, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	458 { "--warn-", NULL, "-W", true, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	459 { "--warn-no-", NULL, "-W", false, true },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	460 { "--", NULL, "-f", true, false },
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	461 { "--no-", NULL, "-f", false, true }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	462 };
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	463
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	464 /* Helper function for gcc.c's driver::suggest_option, for populating the
04ced10e8804 gcc 7 kono parents: 67 diff changeset	465 vec of suggestions for misspelled options.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	466
04ced10e8804 gcc 7 kono parents: 67 diff changeset	467 option_map above provides various prefixes for spelling command-line
04ced10e8804 gcc 7 kono parents: 67 diff changeset	468 options, which decode_cmdline_option uses to map spellings of options
04ced10e8804 gcc 7 kono parents: 67 diff changeset	469 to specific options. We want to do the reverse: to find all the ways
04ced10e8804 gcc 7 kono parents: 67 diff changeset	470 that a user could validly spell an option.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	471
04ced10e8804 gcc 7 kono parents: 67 diff changeset	472 Given valid OPT_TEXT (with a leading dash) for OPTION, add it and all
04ced10e8804 gcc 7 kono parents: 67 diff changeset	473 of its valid variant spellings to CANDIDATES, each without a leading
04ced10e8804 gcc 7 kono parents: 67 diff changeset	474 dash.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	475
04ced10e8804 gcc 7 kono parents: 67 diff changeset	476 For example, given "-Wabi-tag", the following are added to CANDIDATES:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	477 "Wabi-tag"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	478 "Wno-abi-tag"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	479 "-warn-abi-tag"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	480 "-warn-no-abi-tag".
04ced10e8804 gcc 7 kono parents: 67 diff changeset	481
04ced10e8804 gcc 7 kono parents: 67 diff changeset	482 The added strings must be freed using free. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	483
04ced10e8804 gcc 7 kono parents: 67 diff changeset	484 void
04ced10e8804 gcc 7 kono parents: 67 diff changeset	485 add_misspelling_candidates (auto_vec<char > candidates,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	486 const struct cl_option *option,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	487 const char *opt_text)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	488 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	489 gcc_assert (candidates);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	490 gcc_assert (option);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	491 gcc_assert (opt_text);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	492 if (remapping_prefix_p (option))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	493 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	494 candidates->safe_push (xstrdup (opt_text + 1));
04ced10e8804 gcc 7 kono parents: 67 diff changeset	495 for (unsigned i = 0; i < ARRAY_SIZE (option_map); i++)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	496 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	497 const char *opt0 = option_map[i].opt0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	498 const char *new_prefix = option_map[i].new_prefix;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	499 size_t new_prefix_len = strlen (new_prefix);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	500
04ced10e8804 gcc 7 kono parents: 67 diff changeset	501 if (option->cl_reject_negative && option_map[i].negated)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	502 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	503
04ced10e8804 gcc 7 kono parents: 67 diff changeset	504 if (strncmp (opt_text, new_prefix, new_prefix_len) == 0)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	505 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	506 char *alternative = concat (opt0 + 1, opt_text + new_prefix_len,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	507 NULL);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	508 candidates->safe_push (alternative);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	509 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	510 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	511 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	512
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	513 /* Decode the switch beginning at ARGV for the language indicated by
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	514 LANG_MASK (including CL_COMMON and CL_TARGET if applicable), into
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	515 the structure *DECODED. Returns the number of switches
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	516 consumed. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	517
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	518 static unsigned int
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	519 decode_cmdline_option (const char **argv, unsigned int lang_mask,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	520 struct cl_decoded_option *decoded)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	521 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	522 size_t opt_index;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	523 const char *arg = 0;
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	524 HOST_WIDE_INT value = 1;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	525 unsigned int result = 1, i, extra_args, separate_args = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	526 int adjust_len = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	527 size_t total_len;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	528 char *p;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	529 const struct cl_option *option;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	530 int errors = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	531 const char *warn_message = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	532 bool separate_arg_flag;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	533 bool joined_arg_flag;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	534 bool have_separate_arg = false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	535
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	536 extra_args = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	537
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	538 opt_index = find_opt (argv[0] + 1, lang_mask);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	539 i = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	540 while (opt_index == OPT_SPECIAL_unknown
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	541 && i < ARRAY_SIZE (option_map))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	542 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	543 const char *opt0 = option_map[i].opt0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	544 const char *opt1 = option_map[i].opt1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	545 const char *new_prefix = option_map[i].new_prefix;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	546 bool another_char_needed = option_map[i].another_char_needed;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	547 size_t opt0_len = strlen (opt0);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	548 size_t opt1_len = (opt1 == NULL ? 0 : strlen (opt1));
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	549 size_t optn_len = (opt1 == NULL ? opt0_len : opt1_len);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	550 size_t new_prefix_len = strlen (new_prefix);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	551
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	552 extra_args = (opt1 == NULL ? 0 : 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	553 value = !option_map[i].negated;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	554
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	555 if (strncmp (argv[0], opt0, opt0_len) == 0
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	556 && (opt1 == NULL
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	557 \|\| (argv[1] != NULL && strncmp (argv[1], opt1, opt1_len) == 0))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	558 && (!another_char_needed
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	559 \|\| argv[extra_args][optn_len] != 0))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	560 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	561 size_t arglen = strlen (argv[extra_args]);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	562 char *dup;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	563
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	564 adjust_len = (int) optn_len - (int) new_prefix_len;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	565 dup = XNEWVEC (char, arglen + 1 - adjust_len);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	566 memcpy (dup, new_prefix, new_prefix_len);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	567 memcpy (dup + new_prefix_len, argv[extra_args] + optn_len,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	568 arglen - optn_len + 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	569 opt_index = find_opt (dup + 1, lang_mask);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	570 free (dup);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	571 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	572 i++;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	573 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	574
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	575 if (opt_index == OPT_SPECIAL_unknown)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	576 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	577 arg = argv[0];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	578 extra_args = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	579 value = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	580 goto done;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	581 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	582
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	583 option = &cl_options[opt_index];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	584
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	585 /* Reject negative form of switches that don't take negatives as
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	586 unrecognized. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	587 if (!value && option->cl_reject_negative)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	588 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	589 opt_index = OPT_SPECIAL_unknown;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	590 errors \|= CL_ERR_NEGATIVE;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	591 arg = argv[0];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	592 goto done;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	593 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	594
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	595 /* Clear the initial value for size options (it will be overwritten
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	596 later based on the Init(value) specification in the opt file. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	597 if (option->var_type == CLVC_SIZE)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	598 value = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	599
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	600 result = extra_args + 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	601 warn_message = option->warn_message;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	602
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	603 /* Check to see if the option is disabled for this configuration. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	604 if (option->cl_disabled)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	605 errors \|= CL_ERR_DISABLED;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	606
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	607 /* Determine whether there may be a separate argument based on
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	608 whether this option is being processed for the driver, and, if
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	609 so, how many such arguments. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	610 separate_arg_flag = ((option->flags & CL_SEPARATE)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	611 && !(option->cl_no_driver_arg
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	612 && (lang_mask & CL_DRIVER)));
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	613 separate_args = (separate_arg_flag
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	614 ? option->cl_separate_nargs + 1
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	615 : 0);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	616 joined_arg_flag = (option->flags & CL_JOINED) != 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	617
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	618 /* Sort out any argument the switch takes. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	619 if (joined_arg_flag)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	620 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	621 /* Have arg point to the original switch. This is because
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	622 some code, such as disable_builtin_function, expects its
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	623 argument to be persistent until the program exits. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	624 arg = argv[extra_args] + cl_options[opt_index].opt_len + 1 + adjust_len;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	625
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	626 if (*arg == '\0' && !option->cl_missing_ok)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	627 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	628 if (separate_arg_flag)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	629 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	630 arg = argv[extra_args + 1];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	631 result = extra_args + 2;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	632 if (arg == NULL)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	633 result = extra_args + 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	634 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	635 have_separate_arg = true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	636 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	637 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	638 /* Missing argument. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	639 arg = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	640 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	641 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	642 else if (separate_arg_flag)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	643 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	644 arg = argv[extra_args + 1];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	645 for (i = 0; i < separate_args; i++)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	646 if (argv[extra_args + 1 + i] == NULL)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	647 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	648 errors \|= CL_ERR_MISSING_ARG;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	649 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	650 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	651 result = extra_args + 1 + i;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	652 if (arg != NULL)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	653 have_separate_arg = true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	654 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	655
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	656 if (arg == NULL && (separate_arg_flag \|\| joined_arg_flag))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	657 errors \|= CL_ERR_MISSING_ARG;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	658
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	659 /* Is this option an alias (or an ignored option, marked as an alias
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	660 of OPT_SPECIAL_ignore)? */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	661 if (option->alias_target != N_OPTS
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	662 && (!option->cl_separate_alias \|\| have_separate_arg))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	663 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	664 size_t new_opt_index = option->alias_target;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	665
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	666 if (new_opt_index == OPT_SPECIAL_ignore
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	667 \|\| new_opt_index == OPT_SPECIAL_deprecated)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	668 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	669 gcc_assert (option->alias_arg == NULL);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	670 gcc_assert (option->neg_alias_arg == NULL);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	671 opt_index = new_opt_index;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	672 arg = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	673 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	674 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	675 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	676 const struct cl_option *new_option = &cl_options[new_opt_index];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	677
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	678 /* The new option must not be an alias itself. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	679 gcc_assert (new_option->alias_target == N_OPTS
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	680 \|\| new_option->cl_separate_alias);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	681
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	682 if (option->neg_alias_arg)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	683 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	684 gcc_assert (option->alias_arg != NULL);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	685 gcc_assert (arg == NULL);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	686 gcc_assert (!option->cl_negative_alias);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	687 if (value)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	688 arg = option->alias_arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	689 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	690 arg = option->neg_alias_arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	691 value = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	692 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	693 else if (option->alias_arg)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	694 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	695 gcc_assert (value == 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	696 gcc_assert (arg == NULL);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	697 gcc_assert (!option->cl_negative_alias);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	698 arg = option->alias_arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	699 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	700
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	701 if (option->cl_negative_alias)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	702 value = !value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	703
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	704 opt_index = new_opt_index;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	705 option = new_option;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	706
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	707 if (value == 0)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	708 gcc_assert (!option->cl_reject_negative);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	709
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	710 /* Recompute what arguments are allowed. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	711 separate_arg_flag = ((option->flags & CL_SEPARATE)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	712 && !(option->cl_no_driver_arg
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	713 && (lang_mask & CL_DRIVER)));
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	714 joined_arg_flag = (option->flags & CL_JOINED) != 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	715
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	716 if (separate_args > 1 \|\| option->cl_separate_nargs)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	717 gcc_assert (separate_args
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	718 == (unsigned int) option->cl_separate_nargs + 1);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	719
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	720 if (!(errors & CL_ERR_MISSING_ARG))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	721 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	722 if (separate_arg_flag \|\| joined_arg_flag)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	723 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	724 if (option->cl_missing_ok && arg == NULL)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	725 arg = "";
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	726 gcc_assert (arg != NULL);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	727 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	728 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	729 gcc_assert (arg == NULL);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	730 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	731
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	732 /* Recheck for warnings and disabled options. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	733 if (option->warn_message)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	734 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	735 gcc_assert (warn_message == NULL);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	736 warn_message = option->warn_message;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	737 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	738 if (option->cl_disabled)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	739 errors \|= CL_ERR_DISABLED;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	740 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	741 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	742
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	743 /* Check if this is a switch for a different front end. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	744 if (!option_ok_for_language (option, lang_mask))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	745 errors \|= CL_ERR_WRONG_LANG;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	746
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	747 /* Convert the argument to lowercase if appropriate. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	748 if (arg && option->cl_tolower)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	749 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	750 size_t j;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	751 size_t len = strlen (arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	752 char *arg_lower = XOBNEWVEC (&opts_obstack, char, len + 1);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	753
04ced10e8804 gcc 7 kono parents: 67 diff changeset	754 for (j = 0; j < len; j++)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	755 arg_lower[j] = TOLOWER ((unsigned char) arg[j]);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	756 arg_lower[len] = 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	757 arg = arg_lower;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	758 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	759
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	760 /* If the switch takes an integer argument, convert it. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	761 if (arg && (option->cl_uinteger \|\| option->cl_host_wide_int))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	762 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	763 int error = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	764 value = *arg ? integral_argument (arg, &error, option->cl_byte_size) : 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	765 if (error)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	766 errors \|= CL_ERR_UINT_ARG;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	767
04ced10e8804 gcc 7 kono parents: 67 diff changeset	768 /* Reject value out of a range. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	769 if (option->range_max != -1
04ced10e8804 gcc 7 kono parents: 67 diff changeset	770 && (value < option->range_min \|\| value > option->range_max))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	771 errors \|= CL_ERR_INT_RANGE_ARG;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	772 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	773
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	774 /* If the switch takes an enumerated argument, convert it. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	775 if (arg && (option->var_type == CLVC_ENUM))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	776 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	777 const struct cl_enum *e = &cl_enums[option->var_enum];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	778
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	779 gcc_assert (value == 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	780 if (enum_arg_to_value (e->values, arg, &value, lang_mask))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	781 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	782 const char *carg = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	783
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	784 if (enum_value_to_arg (e->values, &carg, value, lang_mask))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	785 arg = carg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	786 gcc_assert (carg != NULL);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	787 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	788 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	789 errors \|= CL_ERR_ENUM_ARG;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	790 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	791
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	792 done:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	793 decoded->opt_index = opt_index;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	794 decoded->arg = arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	795 decoded->value = value;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	796 decoded->errors = errors;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	797 decoded->warn_message = warn_message;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	798
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	799 if (opt_index == OPT_SPECIAL_unknown)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	800 gcc_assert (result == 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	801
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	802 gcc_assert (result >= 1 && result <= ARRAY_SIZE (decoded->canonical_option));
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	803 decoded->canonical_option_num_elements = result;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	804 total_len = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	805 for (i = 0; i < ARRAY_SIZE (decoded->canonical_option); i++)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	806 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	807 if (i < result)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	808 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	809 size_t len;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	810 if (opt_index == OPT_SPECIAL_unknown)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	811 decoded->canonical_option[i] = argv[i];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	812 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	813 decoded->canonical_option[i] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	814 len = strlen (argv[i]);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	815 /* If the argument is an empty string, we will print it as "" in
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	816 orig_option_with_args_text. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	817 total_len += (len != 0 ? len : 2) + 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	818 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	819 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	820 decoded->canonical_option[i] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	821 }
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	822 if (opt_index != OPT_SPECIAL_unknown && opt_index != OPT_SPECIAL_ignore
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	823 && opt_index != OPT_SPECIAL_deprecated)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	824 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	825 generate_canonical_option (opt_index, arg, value, decoded);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	826 if (separate_args > 1)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	827 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	828 for (i = 0; i < separate_args; i++)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	829 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	830 if (argv[extra_args + 1 + i] == NULL)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	831 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	832 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	833 decoded->canonical_option[1 + i] = argv[extra_args + 1 + i];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	834 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	835 gcc_assert (result == 1 + i);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	836 decoded->canonical_option_num_elements = result;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	837 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	838 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	839 decoded->orig_option_with_args_text
04ced10e8804 gcc 7 kono parents: 67 diff changeset	840 = p = XOBNEWVEC (&opts_obstack, char, total_len);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	841 for (i = 0; i < result; i++)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	842 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	843 size_t len = strlen (argv[i]);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	844
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	845 /* Print the empty string verbally. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	846 if (len == 0)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	847 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	848 *p++ = '"';
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	849 *p++ = '"';
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	850 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	851 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	852 memcpy (p, argv[i], len);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	853 p += len;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	854 if (i == result - 1)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	855 *p++ = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	856 else
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	857 *p++ = ' ';
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	858 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	859
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	860 return result;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	861 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	862
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	863 /* Obstack for option strings. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	864
04ced10e8804 gcc 7 kono parents: 67 diff changeset	865 struct obstack opts_obstack;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	866
04ced10e8804 gcc 7 kono parents: 67 diff changeset	867 /* Like libiberty concat, but allocate using opts_obstack. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	868
04ced10e8804 gcc 7 kono parents: 67 diff changeset	869 char *
04ced10e8804 gcc 7 kono parents: 67 diff changeset	870 opts_concat (const char *first, ...)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	871 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	872 char newstr, end;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	873 size_t length = 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	874 const char *arg;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	875 va_list ap;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	876
04ced10e8804 gcc 7 kono parents: 67 diff changeset	877 /* First compute the size of the result and get sufficient memory. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	878 va_start (ap, first);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	879 for (arg = first; arg; arg = va_arg (ap, const char *))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	880 length += strlen (arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	881 newstr = XOBNEWVEC (&opts_obstack, char, length + 1);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	882 va_end (ap);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	883
04ced10e8804 gcc 7 kono parents: 67 diff changeset	884 /* Now copy the individual pieces to the result string. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	885 va_start (ap, first);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	886 for (arg = first, end = newstr; arg; arg = va_arg (ap, const char *))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	887 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	888 length = strlen (arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	889 memcpy (end, arg, length);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	890 end += length;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	891 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	892 *end = '\0';
04ced10e8804 gcc 7 kono parents: 67 diff changeset	893 va_end (ap);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	894 return newstr;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	895 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	896
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	897 /* Decode command-line options (ARGC and ARGV being the arguments of
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	898 main) into an array, setting *DECODED_OPTIONS to a pointer to that
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	899 array and *DECODED_OPTIONS_COUNT to the number of entries in the
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	900 array. The first entry in the array is always one for the program
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	901 name (OPT_SPECIAL_program_name). LANG_MASK indicates the language
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	902 flags applicable for decoding (including CL_COMMON and CL_TARGET if
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	903 those options should be considered applicable). Do not produce any
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	904 diagnostics or set state outside of these variables. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	905
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	906 void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	907 decode_cmdline_options_to_array (unsigned int argc, const char **argv,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	908 unsigned int lang_mask,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	909 struct cl_decoded_option **decoded_options,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	910 unsigned int *decoded_options_count)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	911 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	912 unsigned int n, i;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	913 struct cl_decoded_option *opt_array;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	914 unsigned int num_decoded_options;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	915
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	916 opt_array = XNEWVEC (struct cl_decoded_option, argc);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	917
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	918 opt_array[0].opt_index = OPT_SPECIAL_program_name;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	919 opt_array[0].warn_message = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	920 opt_array[0].arg = argv[0];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	921 opt_array[0].orig_option_with_args_text = argv[0];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	922 opt_array[0].canonical_option_num_elements = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	923 opt_array[0].canonical_option[0] = argv[0];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	924 opt_array[0].canonical_option[1] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	925 opt_array[0].canonical_option[2] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	926 opt_array[0].canonical_option[3] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	927 opt_array[0].value = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	928 opt_array[0].errors = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	929 num_decoded_options = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	930
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	931 for (i = 1; i < argc; i += n)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	932 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	933 const char *opt = argv[i];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	934
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	935 /* Interpret "-" or a non-switch as a file name. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	936 if (opt[0] != '-' \|\| opt[1] == '\0')
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	937 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	938 generate_option_input_file (opt, &opt_array[num_decoded_options]);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	939 num_decoded_options++;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	940 n = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	941 continue;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	942 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	943
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	944 n = decode_cmdline_option (argv + i, lang_mask,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	945 &opt_array[num_decoded_options]);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	946 num_decoded_options++;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	947 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	948
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	949 *decoded_options = opt_array;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	950 *decoded_options_count = num_decoded_options;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	951 prune_options (decoded_options, decoded_options_count);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	952 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	953
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	954 /* Return true if NEXT_OPT_IDX cancels OPT_IDX. Return false if the
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	955 next one is the same as ORIG_NEXT_OPT_IDX. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	956
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	957 static bool
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	958 cancel_option (int opt_idx, int next_opt_idx, int orig_next_opt_idx)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	959 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	960 /* An option can be canceled by the same option or an option with
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	961 Negative. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	962 if (cl_options [next_opt_idx].neg_index == opt_idx)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	963 return true;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	964
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	965 if (cl_options [next_opt_idx].neg_index != orig_next_opt_idx)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	966 return cancel_option (opt_idx, cl_options [next_opt_idx].neg_index,
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	967 orig_next_opt_idx);
55 77e2b8dfacca update it from 4.4.3 to 4.5.0 ryoma <e075725@ie.u-ryukyu.ac.jp> parents: 0 diff changeset	968
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	969 return false;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	970 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	971
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	972 /* Filter out options canceled by the ones after them. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	973
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	974 static void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	975 prune_options (struct cl_decoded_option **decoded_options,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	976 unsigned int *decoded_options_count)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	977 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	978 unsigned int old_decoded_options_count = *decoded_options_count;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	979 struct cl_decoded_option old_decoded_options = decoded_options;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	980 unsigned int new_decoded_options_count;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	981 struct cl_decoded_option *new_decoded_options
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	982 = XNEWVEC (struct cl_decoded_option, old_decoded_options_count);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	983 unsigned int i;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	984 const struct cl_option *option;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	985 unsigned int fdiagnostics_color_idx = 0;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	986
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	987 /* Remove arguments which are negated by others after them. */
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	988 new_decoded_options_count = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	989 for (i = 0; i < old_decoded_options_count; i++)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	990 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	991 unsigned int j, opt_idx, next_opt_idx;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	992
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	993 if (old_decoded_options[i].errors & ~CL_ERR_WRONG_LANG)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	994 goto keep;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	995
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	996 opt_idx = old_decoded_options[i].opt_index;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	997 switch (opt_idx)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	998 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	999 case OPT_SPECIAL_unknown:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1000 case OPT_SPECIAL_ignore:
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1001 case OPT_SPECIAL_deprecated:
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1002 case OPT_SPECIAL_program_name:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1003 case OPT_SPECIAL_input_file:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1004 goto keep;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1005
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1006 /* Do not save OPT_fdiagnostics_color_, just remember the last one. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1007 case OPT_fdiagnostics_color_:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1008 fdiagnostics_color_idx = i;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1009 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1010
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1011 default:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1012 gcc_assert (opt_idx < cl_options_count);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1013 option = &cl_options[opt_idx];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1014 if (option->neg_index < 0)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1015 goto keep;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1016
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1017 /* Skip joined switches. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1018 if ((option->flags & CL_JOINED))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1019 goto keep;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1020
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1021 for (j = i + 1; j < old_decoded_options_count; j++)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1022 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1023 if (old_decoded_options[j].errors & ~CL_ERR_WRONG_LANG)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1024 continue;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1025 next_opt_idx = old_decoded_options[j].opt_index;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1026 if (next_opt_idx >= cl_options_count)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1027 continue;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1028 if (cl_options[next_opt_idx].neg_index < 0)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1029 continue;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1030 if ((cl_options[next_opt_idx].flags & CL_JOINED))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1031 continue;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1032 if (cancel_option (opt_idx, next_opt_idx, next_opt_idx))
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1033 break;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1034 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1035 if (j == old_decoded_options_count)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1036 {
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1037 keep:
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1038 new_decoded_options[new_decoded_options_count]
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1039 = old_decoded_options[i];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1040 new_decoded_options_count++;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1041 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1042 break;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1043 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1044 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1045
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1046 if (fdiagnostics_color_idx >= 1)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1047 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1048 /* We put the last -fdiagnostics-color= at the first position
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1049 after argv[0] so it can take effect immediately. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1050 memmove (new_decoded_options + 2, new_decoded_options + 1,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1051 sizeof (struct cl_decoded_option)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1052 * (new_decoded_options_count - 1));
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1053 new_decoded_options[1] = old_decoded_options[fdiagnostics_color_idx];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1054 new_decoded_options_count++;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1055 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1056
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1057 free (old_decoded_options);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1058 new_decoded_options = XRESIZEVEC (struct cl_decoded_option,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1059 new_decoded_options,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1060 new_decoded_options_count);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1061 *decoded_options = new_decoded_options;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1062 *decoded_options_count = new_decoded_options_count;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1063 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1064
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1065 /* Handle option DECODED for the language indicated by LANG_MASK,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1066 using the handlers in HANDLERS and setting fields in OPTS and
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1067 OPTS_SET. KIND is the diagnostic_t if this is a diagnostics
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1068 option, DK_UNSPECIFIED otherwise, and LOC is the location of the
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1069 option for options from the source file, UNKNOWN_LOCATION
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1070 otherwise. GENERATED_P is true for an option generated as part of
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1071 processing another option or otherwise generated internally, false
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1072 for one explicitly passed by the user. control_warning_option
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1073 generated options are considered explicitly passed by the user.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1074 Returns false if the switch was invalid. DC is the diagnostic
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1075 context for options affecting diagnostics state, or NULL. */
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1076
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1077 static bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1078 handle_option (struct gcc_options *opts,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1079 struct gcc_options *opts_set,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1080 const struct cl_decoded_option *decoded,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1081 unsigned int lang_mask, int kind, location_t loc,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1082 const struct cl_option_handlers *handlers,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1083 bool generated_p, diagnostic_context *dc)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1084 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1085 size_t opt_index = decoded->opt_index;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1086 const char *arg = decoded->arg;
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1087 HOST_WIDE_INT value = decoded->value;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1088 const struct cl_option *option = &cl_options[opt_index];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1089 void *flag_var = option_flag_var (opt_index, opts);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1090 size_t i;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1091
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1092 if (flag_var)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1093 set_option (opts, (generated_p ? NULL : opts_set),
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1094 opt_index, value, arg, kind, loc, dc);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1095
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1096 for (i = 0; i < handlers->num_handlers; i++)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1097 if (option->flags & handlers->handlers[i].mask)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1098 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1099 if (!handlers->handlers[i].handler (opts, opts_set, decoded,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1100 lang_mask, kind, loc,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1101 handlers, dc,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1102 handlers->target_option_override_hook))
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1103 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1104 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1105
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1106 return true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1107 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1108
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1109 /* Like handle_option, but OPT_INDEX, ARG and VALUE describe the
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1110 option instead of DECODED. This is used for callbacks when one
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1111 option implies another instead of an option being decoded from the
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1112 command line. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1113
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1114 bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1115 handle_generated_option (struct gcc_options *opts,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1116 struct gcc_options *opts_set,
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1117 size_t opt_index, const char *arg, HOST_WIDE_INT value,
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1118 unsigned int lang_mask, int kind, location_t loc,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1119 const struct cl_option_handlers *handlers,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1120 bool generated_p, diagnostic_context *dc)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1121 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1122 struct cl_decoded_option decoded;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1123
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1124 generate_option (opt_index, arg, value, lang_mask, &decoded);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1125 return handle_option (opts, opts_set, &decoded, lang_mask, kind, loc,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1126 handlers, generated_p, dc);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1127 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1128
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1129 /* Fill in *DECODED with an option described by OPT_INDEX, ARG and
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1130 VALUE for a front end using LANG_MASK. This is used when the
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1131 compiler generates options internally. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1132
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1133 void
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1134 generate_option (size_t opt_index, const char *arg, HOST_WIDE_INT value,
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1135 unsigned int lang_mask, struct cl_decoded_option *decoded)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1136 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1137 const struct cl_option *option = &cl_options[opt_index];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1138
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1139 decoded->opt_index = opt_index;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1140 decoded->warn_message = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1141 decoded->arg = arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1142 decoded->value = value;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1143 decoded->errors = (option_ok_for_language (option, lang_mask)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1144 ? 0
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1145 : CL_ERR_WRONG_LANG);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1146
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1147 generate_canonical_option (opt_index, arg, value, decoded);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1148 switch (decoded->canonical_option_num_elements)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1149 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1150 case 1:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1151 decoded->orig_option_with_args_text = decoded->canonical_option[0];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1152 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1153
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1154 case 2:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1155 decoded->orig_option_with_args_text
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1156 = opts_concat (decoded->canonical_option[0], " ",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1157 decoded->canonical_option[1], NULL);
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1158 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1159
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1160 default:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1161 gcc_unreachable ();
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1162 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1163 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1164
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1165 /* Fill in DECODED with an option for input file FILE. /
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1166
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1167 void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1168 generate_option_input_file (const char *file,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1169 struct cl_decoded_option *decoded)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1170 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1171 decoded->opt_index = OPT_SPECIAL_input_file;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1172 decoded->warn_message = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1173 decoded->arg = file;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1174 decoded->orig_option_with_args_text = file;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1175 decoded->canonical_option_num_elements = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1176 decoded->canonical_option[0] = file;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1177 decoded->canonical_option[1] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1178 decoded->canonical_option[2] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1179 decoded->canonical_option[3] = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1180 decoded->value = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1181 decoded->errors = 0;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1182 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1183
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1184 /* Helper function for listing valid choices and hint for misspelled
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1185 value. CANDIDATES is a vector containing all valid strings,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1186 STR is set to a heap allocated string that contains all those
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1187 strings concatenated, separated by spaces, and the return value
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1188 is the closest string from those to ARG, or NULL if nothing is
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1189 close enough. Callers should XDELETEVEC (STR) after using it
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1190 to avoid memory leaks. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1191
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1192 const char *
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1193 candidates_list_and_hint (const char arg, char &str,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1194 const auto_vec <const char *> &candidates)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1195 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1196 size_t len = 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1197 int i;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1198 const char *candidate;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1199 char *p;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1200
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1201 FOR_EACH_VEC_ELT (candidates, i, candidate)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1202 len += strlen (candidate) + 1;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1203
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1204 str = p = XNEWVEC (char, len);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1205 FOR_EACH_VEC_ELT (candidates, i, candidate)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1206 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1207 len = strlen (candidate);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1208 memcpy (p, candidate, len);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1209 p[len] = ' ';
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1210 p += len + 1;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1211 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1212 p[-1] = '\0';
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1213 return find_closest_string (arg, &candidates);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1214 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1215
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1216 /* Perform diagnostics for read_cmdline_option and control_warning_option
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1217 functions. Returns true if an error has been diagnosed.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1218 LOC and LANG_MASK arguments like in read_cmdline_option.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1219 OPTION is the option to report diagnostics for, OPT the name
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1220 of the option as text, ARG the argument of the option (for joined
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1221 options), ERRORS is bitmask of CL_ERR_* values. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1222
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1223 static bool
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1224 cmdline_handle_error (location_t loc, const struct cl_option *option,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1225 const char opt, const char arg, int errors,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1226 unsigned int lang_mask)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1227 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1228 if (errors & CL_ERR_DISABLED)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1229 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1230 error_at (loc, "command line option %qs"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1231 " is not supported by this configuration", opt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1232 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1233 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1234
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1235 if (errors & CL_ERR_MISSING_ARG)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1236 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1237 if (option->missing_argument_error)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1238 error_at (loc, option->missing_argument_error, opt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1239 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1240 error_at (loc, "missing argument to %qs", opt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1241 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1242 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1243
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1244 if (errors & CL_ERR_UINT_ARG)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1245 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1246 if (option->cl_byte_size)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1247 error_at (loc, "argument to %qs should be a non-negative integer "
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1248 "optionally followed by a size unit",
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1249 option->opt_text);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1250 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1251 error_at (loc, "argument to %qs should be a non-negative integer",
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1252 option->opt_text);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1253 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1254 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1255
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1256 if (errors & CL_ERR_INT_RANGE_ARG)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1257 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1258 error_at (loc, "argument to %qs is not between %d and %d",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1259 option->opt_text, option->range_min, option->range_max);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1260 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1261 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1262
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1263 if (errors & CL_ERR_ENUM_ARG)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1264 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1265 const struct cl_enum *e = &cl_enums[option->var_enum];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1266 unsigned int i;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1267 char *s;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1268
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1269 auto_diagnostic_group d;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1270 if (e->unknown_error)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1271 error_at (loc, e->unknown_error, arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1272 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1273 error_at (loc, "unrecognized argument in option %qs", opt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1274
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1275 auto_vec <const char *> candidates;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1276 for (i = 0; e->values[i].arg != NULL; i++)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1277 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1278 if (!enum_arg_ok_for_language (&e->values[i], lang_mask))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1279 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1280 candidates.safe_push (e->values[i].arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1281 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1282 const char *hint = candidates_list_and_hint (arg, s, candidates);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1283 if (hint)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1284 inform (loc, "valid arguments to %qs are: %s; did you mean %qs?",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1285 option->opt_text, s, hint);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1286 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1287 inform (loc, "valid arguments to %qs are: %s", option->opt_text, s);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1288 XDELETEVEC (s);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1289
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1290 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1291 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1292
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1293 return false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1294 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1295
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1296 /* Handle the switch DECODED (location LOC) for the language indicated
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1297 by LANG_MASK, using the handlers in *HANDLERS and setting fields in
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1298 OPTS and OPTS_SET and using diagnostic context DC (if not NULL) for
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1299 diagnostic options. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1300
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1301 void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1302 read_cmdline_option (struct gcc_options *opts,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1303 struct gcc_options *opts_set,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1304 struct cl_decoded_option *decoded,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1305 location_t loc,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1306 unsigned int lang_mask,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1307 const struct cl_option_handlers *handlers,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1308 diagnostic_context *dc)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1309 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1310 const struct cl_option *option;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1311 const char *opt = decoded->orig_option_with_args_text;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1312
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1313 if (decoded->warn_message)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1314 warning_at (loc, 0, decoded->warn_message, opt);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1315
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1316 if (decoded->opt_index == OPT_SPECIAL_unknown)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1317 {
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1318 if (handlers->unknown_option_callback (decoded))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1319 error_at (loc, "unrecognized command line option %qs", decoded->arg);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1320 return;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1321 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1322
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1323 if (decoded->opt_index == OPT_SPECIAL_ignore)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1324 return;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1325
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1326 if (decoded->opt_index == OPT_SPECIAL_deprecated)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1327 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1328 /* Warn only about positive ignored options. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1329 if (decoded->value)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1330 warning_at (loc, 0, "switch %qs is no longer supported", opt);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1331 return;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1332 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1333
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1334 option = &cl_options[decoded->opt_index];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1335
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1336 if (decoded->errors
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1337 && cmdline_handle_error (loc, option, opt, decoded->arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1338 decoded->errors, lang_mask))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1339 return;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1340
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1341 if (decoded->errors & CL_ERR_WRONG_LANG)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1342 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1343 handlers->wrong_lang_callback (decoded, lang_mask);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1344 return;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1345 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1346
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1347 gcc_assert (!decoded->errors);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1348
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1349 if (!handle_option (opts, opts_set, decoded, lang_mask, DK_UNSPECIFIED,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1350 loc, handlers, false, dc))
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1351 error_at (loc, "unrecognized command line option %qs", opt);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1352 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1353
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1354 /* Set any field in OPTS, and OPTS_SET if not NULL, for option
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1355 OPT_INDEX according to VALUE and ARG, diagnostic kind KIND,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1356 location LOC, using diagnostic context DC if not NULL for
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1357 diagnostic classification. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1358
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1359 void
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1360 set_option (struct gcc_options opts, struct gcc_options opts_set,
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1361 int opt_index, HOST_WIDE_INT value, const char *arg, int kind,
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1362 location_t loc, diagnostic_context *dc)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1363 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1364 const struct cl_option *option = &cl_options[opt_index];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1365 void *flag_var = option_flag_var (opt_index, opts);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1366 void *set_flag_var = NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1367
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1368 if (!flag_var)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1369 return;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1370
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1371 if ((diagnostic_t) kind != DK_UNSPECIFIED && dc != NULL)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1372 diagnostic_classify_diagnostic (dc, opt_index, (diagnostic_t) kind, loc);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1373
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1374 if (opts_set != NULL)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1375 set_flag_var = option_flag_var (opt_index, opts_set);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1376
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1377 switch (option->var_type)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1378 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1379 case CLVC_BOOLEAN:
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1380 if (option->cl_host_wide_int)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1381 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1382 (HOST_WIDE_INT ) flag_var = value;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1383 if (set_flag_var)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1384 (HOST_WIDE_INT ) set_flag_var = 1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1385 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1386 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1387 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1388 (int ) flag_var = value;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1389 if (set_flag_var)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1390 (int ) set_flag_var = 1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1391 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1392
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1393 break;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1394
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1395 case CLVC_SIZE:
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1396 if (option->cl_host_wide_int)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1397 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1398 (HOST_WIDE_INT ) flag_var = value;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1399 if (set_flag_var)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1400 (HOST_WIDE_INT ) set_flag_var = value;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1401 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1402 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1403 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1404 (int ) flag_var = value;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1405 if (set_flag_var)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1406 (int ) set_flag_var = value;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1407 }
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1408
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1409 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1410
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1411 case CLVC_EQUAL:
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1412 if (option->cl_host_wide_int)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1413 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1414 (HOST_WIDE_INT ) flag_var = (value
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1415 ? option->var_value
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1416 : !option->var_value);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1417 if (set_flag_var)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1418 (HOST_WIDE_INT ) set_flag_var = 1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1419 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1420 else
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1421 {
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1422 (int ) flag_var = (value
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1423 ? option->var_value
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1424 : !option->var_value);
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1425 if (set_flag_var)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1426 (int ) set_flag_var = 1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1427 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1428 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1429
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1430 case CLVC_BIT_CLEAR:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1431 case CLVC_BIT_SET:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1432 if ((value != 0) == (option->var_type == CLVC_BIT_SET))
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1433 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1434 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1435 (HOST_WIDE_INT ) flag_var \|= option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1436 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1437 (int ) flag_var \|= option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1438 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1439 else
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1440 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1441 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1442 (HOST_WIDE_INT ) flag_var &= ~option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1443 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1444 (int ) flag_var &= ~option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1445 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1446 if (set_flag_var)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1447 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1448 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1449 (HOST_WIDE_INT ) set_flag_var \|= option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1450 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1451 (int ) set_flag_var \|= option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1452 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1453 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1454
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1455 case CLVC_STRING:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1456 (const char *) flag_var = arg;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1457 if (set_flag_var)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1458 (const char *) set_flag_var = "";
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1459 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1460
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1461 case CLVC_ENUM:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1462 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1463 const struct cl_enum *e = &cl_enums[option->var_enum];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1464
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1465 e->set (flag_var, value);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1466 if (set_flag_var)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1467 e->set (set_flag_var, 1);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1468 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1469 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1470
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1471 case CLVC_DEFER:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1472 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1473 vec<cl_deferred_option> *v
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1474 = (vec<cl_deferred_option> ) (void **) flag_var;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1475 cl_deferred_option p = {opt_index, arg, value};
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1476 if (!v)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1477 v = XCNEW (vec<cl_deferred_option>);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1478 v->safe_push (p);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1479 (void *) flag_var = v;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1480 if (set_flag_var)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1481 (void *) set_flag_var = v;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1482 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1483 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1484 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1485 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1486
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1487 /* Return the address of the flag variable for option OPT_INDEX in
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1488 options structure OPTS, or NULL if there is no flag variable. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1489
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1490 void *
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1491 option_flag_var (int opt_index, struct gcc_options *opts)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1492 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1493 const struct cl_option *option = &cl_options[opt_index];
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1494
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1495 if (option->flag_var_offset == (unsigned short) -1)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1496 return NULL;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1497 return (void )(((char ) opts) + option->flag_var_offset);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1498 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1499
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1500 /* Return 1 if option OPT_IDX is enabled in OPTS, 0 if it is disabled,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1501 or -1 if it isn't a simple on-off switch. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1502
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1503 int
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1504 option_enabled (int opt_idx, void *opts)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1505 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1506 const struct cl_option *option = &(cl_options[opt_idx]);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1507 struct gcc_options optsg = (struct gcc_options ) opts;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1508 void *flag_var = option_flag_var (opt_idx, optsg);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1509
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1510 if (flag_var)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1511 switch (option->var_type)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1512 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1513 case CLVC_BOOLEAN:
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1514 if (option->cl_host_wide_int)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1515 return (HOST_WIDE_INT ) flag_var != 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1516 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1517 return (int ) flag_var != 0;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1518
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1519 case CLVC_EQUAL:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1520 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1521 return (HOST_WIDE_INT ) flag_var == option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1522 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1523 return (int ) flag_var == option->var_value;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1524
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1525 case CLVC_BIT_CLEAR:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1526 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1527 return ((HOST_WIDE_INT ) flag_var & option->var_value) == 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1528 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1529 return ((int ) flag_var & option->var_value) == 0;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1530
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1531 case CLVC_BIT_SET:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1532 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1533 return ((HOST_WIDE_INT ) flag_var & option->var_value) != 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1534 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1535 return ((int ) flag_var & option->var_value) != 0;
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1536
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1537 case CLVC_SIZE:
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1538 if (option->cl_host_wide_int)
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1539 return (HOST_WIDE_INT ) flag_var != -1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1540 else
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1541 return (int ) flag_var != -1;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1542
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1543 case CLVC_STRING:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1544 case CLVC_ENUM:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1545 case CLVC_DEFER:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1546 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1547 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1548 return -1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1549 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1550
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1551 /* Fill STATE with the current state of option OPTION in OPTS. Return
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1552 true if there is some state to store. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1553
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1554 bool
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1555 get_option_state (struct gcc_options *opts, int option,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1556 struct cl_option_state *state)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1557 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1558 void *flag_var = option_flag_var (option, opts);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1559
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1560 if (flag_var == 0)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1561 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1562
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1563 switch (cl_options[option].var_type)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1564 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1565 case CLVC_BOOLEAN:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1566 case CLVC_EQUAL:
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1567 case CLVC_SIZE:
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1568 state->data = flag_var;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1569 state->size = (cl_options[option].cl_host_wide_int
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1570 ? sizeof (HOST_WIDE_INT)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1571 : sizeof (int));
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1572 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1573
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1574 case CLVC_BIT_CLEAR:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1575 case CLVC_BIT_SET:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1576 state->ch = option_enabled (option, opts);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1577 state->data = &state->ch;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1578 state->size = 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1579 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1580
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1581 case CLVC_STRING:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1582 state->data = (const char *) flag_var;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1583 if (state->data == 0)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1584 state->data = "";
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1585 state->size = strlen ((const char *) state->data) + 1;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1586 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1587
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1588 case CLVC_ENUM:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1589 state->data = flag_var;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1590 state->size = cl_enums[cl_options[option].var_enum].var_size;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1591 break;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1592
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1593 case CLVC_DEFER:
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1594 return false;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1595 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1596 return true;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1597 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1598
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1599 /* Set a warning option OPT_INDEX (language mask LANG_MASK, option
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1600 handlers HANDLERS) to have diagnostic kind KIND for option
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1601 structures OPTS and OPTS_SET and diagnostic context DC (possibly
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1602 NULL), at location LOC (UNKNOWN_LOCATION for -Werror=). ARG is the
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1603 argument of the option for joined options, or NULL otherwise. If IMPLY,
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1604 the warning option in question is implied at this point. This is
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1605 used by -Werror= and #pragma GCC diagnostic. */
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1606
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1607 void
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1608 control_warning_option (unsigned int opt_index, int kind, const char *arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1609 bool imply, location_t loc, unsigned int lang_mask,
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1610 const struct cl_option_handlers *handlers,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1611 struct gcc_options *opts,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1612 struct gcc_options *opts_set,
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1613 diagnostic_context *dc)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1614 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1615 if (cl_options[opt_index].alias_target != N_OPTS)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1616 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1617 gcc_assert (!cl_options[opt_index].cl_separate_alias
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1618 && !cl_options[opt_index].cl_negative_alias);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1619 if (cl_options[opt_index].alias_arg)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1620 arg = cl_options[opt_index].alias_arg;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1621 opt_index = cl_options[opt_index].alias_target;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1622 }
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1623 if (opt_index == OPT_SPECIAL_ignore \|\| opt_index == OPT_SPECIAL_deprecated)
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1624 return;
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1625 if (dc)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1626 diagnostic_classify_diagnostic (dc, opt_index, (diagnostic_t) kind, loc);
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1627 if (imply)
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1628 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1629 const struct cl_option *option = &cl_options[opt_index];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1630
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1631 /* -Werror=foo implies -Wfoo. */
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1632 if (option->var_type == CLVC_BOOLEAN
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1633 \|\| option->var_type == CLVC_ENUM
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1634 \|\| option->var_type == CLVC_SIZE)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1635 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1636 HOST_WIDE_INT value = 1;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1637
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1638 if (arg && *arg == '\0' && !option->cl_missing_ok)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1639 arg = NULL;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1640
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1641 if ((option->flags & CL_JOINED) && arg == NULL)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1642 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1643 cmdline_handle_error (loc, option, option->opt_text, arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1644 CL_ERR_MISSING_ARG, lang_mask);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1645 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1646 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1647
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1648 /* If the switch takes an integer argument, convert it. */
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1649 if (arg && (option->cl_uinteger \|\| option->cl_host_wide_int))
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1650 {
131 84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1651 int error = 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1652 value = *arg ? integral_argument (arg, &error,
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1653 option->cl_byte_size) : 0;
84e7813d76e9 gcc-8.2 mir3636 parents: 111 diff changeset	1654 if (error)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1655 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1656 cmdline_handle_error (loc, option, option->opt_text, arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1657 CL_ERR_UINT_ARG, lang_mask);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1658 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1659 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1660 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1661
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1662 /* If the switch takes an enumerated argument, convert it. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1663 if (arg && option->var_type == CLVC_ENUM)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1664 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1665 const struct cl_enum *e = &cl_enums[option->var_enum];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1666
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1667 if (enum_arg_to_value (e->values, arg, &value, lang_mask))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1668 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1669 const char *carg = NULL;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1670
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1671 if (enum_value_to_arg (e->values, &carg, value, lang_mask))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1672 arg = carg;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1673 gcc_assert (carg != NULL);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1674 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1675 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1676 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1677 cmdline_handle_error (loc, option, option->opt_text, arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1678 CL_ERR_ENUM_ARG, lang_mask);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1679 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1680 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1681 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1682
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1683 handle_generated_option (opts, opts_set,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1684 opt_index, arg, value, lang_mask,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1685 kind, loc, handlers, false, dc);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1686 }
67 f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1687 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1688 }

Mercurial > hg > CbC > CbC_gcc

annotate gcc/opts-common.c @ 131:84e7813d76e9