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

annotate gcc/opts-common.c @ 111:04ced10e8804

gcc 7

author	kono
date	Fri, 27 Oct 2017 22:46:09 +0900
parents	f6334be47118
children	84e7813d76e9

rev	line source
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1 /* Command line option handling.
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	2 Copyright (C) 2006-2017 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
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	172 /* If ARG is a non-negative decimal or hexadecimal integer, return its
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	173 value, otherwise 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	174
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	175 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	176 integral_argument (const char *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	177 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	178 const char *p = 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	179
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	180 while (p && ISDIGIT (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	181 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	182
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	183 if (*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	184 return atoi (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	185
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	186 /* It wasn't a decimal number - try hexadecimal. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	187 if (arg[0] == '0' && (arg[1] == 'x' \|\| arg[1] == 'X'))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	188 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	189 p = arg + 2;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	190 while (p && ISXDIGIT (p))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	191 p++;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	192
04ced10e8804 gcc 7 kono parents: 67 diff changeset	193 if (p != arg + 2 && *p == '\0')
04ced10e8804 gcc 7 kono parents: 67 diff changeset	194 return strtol (arg, NULL, 16);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	195 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	196
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	197 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	198 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	199
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	200 /* 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	201 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	202 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	203 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	204 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	205 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	206 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	207 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	208 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	209 && (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	210 && !(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	211 /* 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	212 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	213 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	214 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	215 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	216
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	217 /* 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	218 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	219
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	220 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	221 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	222 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	223 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	224 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	225 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	226
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	227 /* 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	228 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	229 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	230
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	231 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	232 enum_arg_to_value (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	233 const char arg, 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	234 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	235 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	236
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	237 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	238 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	239 && 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	240 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	241 *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	242 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	243 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	244
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	245 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	246 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	247
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	248 /* Look up ARG in the enum used by option OPT_INDEX for language
04ced10e8804 gcc 7 kono parents: 67 diff changeset	249 LANG_MASK, returning true and storing the value in *VALUE if found,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	250 and returning false without modifying VALUE if not found. /
04ced10e8804 gcc 7 kono parents: 67 diff changeset	251
04ced10e8804 gcc 7 kono parents: 67 diff changeset	252 bool
04ced10e8804 gcc 7 kono parents: 67 diff changeset	253 opt_enum_arg_to_value (size_t opt_index, const char arg, int value,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	254 unsigned int lang_mask)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	255 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	256 const struct cl_option *option = &cl_options[opt_index];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	257
04ced10e8804 gcc 7 kono parents: 67 diff changeset	258 gcc_assert (option->var_type == CLVC_ENUM);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	259
04ced10e8804 gcc 7 kono parents: 67 diff changeset	260 return enum_arg_to_value (cl_enums[option->var_enum].values, arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	261 value, lang_mask);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	262 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	263
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	264 /* 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	265 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	266 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	267 (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	268 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	269 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	270
f6334be47118 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 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	272 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	273 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	274 {
f6334be47118 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 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	276
f6334be47118 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 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	278 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	279 && (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	280 && 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	281 {
f6334be47118 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 *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	283 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	284 }
f6334be47118 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
f6334be47118 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 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	287 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	288 && 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	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 *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	291 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	292 }
f6334be47118 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 *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	295 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	296 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	297
f6334be47118 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 /* 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	299 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	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 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	302 generate_canonical_option (size_t opt_index, const char *arg, int 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	303 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	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 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	306 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	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 if (value == 0
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	309 && !option->cl_reject_negative
04ced10e8804 gcc 7 kono parents: 67 diff changeset	310 && (opt_text[1] == 'W' \|\| opt_text[1] == 'f'
04ced10e8804 gcc 7 kono parents: 67 diff changeset	311 \|\| 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	312 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	313 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	314 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	315 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	316 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	317 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	318 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	319 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	320 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	321 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	322
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	323 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	324 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	325
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	326 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	327 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	328 if ((option->flags & CL_SEPARATE)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	329 && !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	330 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	331 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	332 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	333 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	334 }
f6334be47118 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 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	336 {
f6334be47118 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 gcc_assert (option->flags & CL_JOINED);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	338 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	339 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	340 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	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 }
f6334be47118 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 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	344 {
f6334be47118 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 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	346 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	347 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	348 }
f6334be47118 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 }
f6334be47118 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
f6334be47118 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 /* 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	352 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	353 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	354 {
f6334be47118 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 /* 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	356 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	357 /* 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	358 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	359 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	360 /* 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	361 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	362 /* 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	363 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	364 --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	365 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	366 /* 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	367 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	368 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	369 };
f6334be47118 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 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	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 { "-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	373 { "-fno-", NULL, "-f", false, true },
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	374 { "-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	375 { "-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	376 { "--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	377 { "--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	378 { "--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	379 { "--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	380 { "--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	381 { "--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	382 { "--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	383 { "--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	384 { "--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	385 { "--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	386 { "--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	387 { "--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	388 { "--", 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	389 { "--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	390 };
f6334be47118 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
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	392 /* Helper function for gcc.c's driver::suggest_option, for populating the
04ced10e8804 gcc 7 kono parents: 67 diff changeset	393 vec of suggestions for misspelled options.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	394
04ced10e8804 gcc 7 kono parents: 67 diff changeset	395 option_map above provides various prefixes for spelling command-line
04ced10e8804 gcc 7 kono parents: 67 diff changeset	396 options, which decode_cmdline_option uses to map spellings of options
04ced10e8804 gcc 7 kono parents: 67 diff changeset	397 to specific options. We want to do the reverse: to find all the ways
04ced10e8804 gcc 7 kono parents: 67 diff changeset	398 that a user could validly spell an option.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	399
04ced10e8804 gcc 7 kono parents: 67 diff changeset	400 Given valid OPT_TEXT (with a leading dash) for OPTION, add it and all
04ced10e8804 gcc 7 kono parents: 67 diff changeset	401 of its valid variant spellings to CANDIDATES, each without a leading
04ced10e8804 gcc 7 kono parents: 67 diff changeset	402 dash.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	403
04ced10e8804 gcc 7 kono parents: 67 diff changeset	404 For example, given "-Wabi-tag", the following are added to CANDIDATES:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	405 "Wabi-tag"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	406 "Wno-abi-tag"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	407 "-warn-abi-tag"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	408 "-warn-no-abi-tag".
04ced10e8804 gcc 7 kono parents: 67 diff changeset	409
04ced10e8804 gcc 7 kono parents: 67 diff changeset	410 The added strings must be freed using free. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	411
04ced10e8804 gcc 7 kono parents: 67 diff changeset	412 void
04ced10e8804 gcc 7 kono parents: 67 diff changeset	413 add_misspelling_candidates (auto_vec<char > candidates,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	414 const struct cl_option *option,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	415 const char *opt_text)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	416 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	417 gcc_assert (candidates);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	418 gcc_assert (option);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	419 gcc_assert (opt_text);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	420 if (remapping_prefix_p (option))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	421 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	422 candidates->safe_push (xstrdup (opt_text + 1));
04ced10e8804 gcc 7 kono parents: 67 diff changeset	423 for (unsigned i = 0; i < ARRAY_SIZE (option_map); i++)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	424 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	425 const char *opt0 = option_map[i].opt0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	426 const char *new_prefix = option_map[i].new_prefix;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	427 size_t new_prefix_len = strlen (new_prefix);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	428
04ced10e8804 gcc 7 kono parents: 67 diff changeset	429 if (option->cl_reject_negative && option_map[i].negated)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	430 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	431
04ced10e8804 gcc 7 kono parents: 67 diff changeset	432 if (strncmp (opt_text, new_prefix, new_prefix_len) == 0)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	433 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	434 char *alternative = concat (opt0 + 1, opt_text + new_prefix_len,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	435 NULL);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	436 candidates->safe_push (alternative);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	437 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	438 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	439 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	440
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	441 /* 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	442 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	443 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	444 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	445
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	446 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	447 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	448 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	449 {
f6334be47118 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 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	451 const char *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	452 int 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	453 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	454 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	455 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	456 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	457 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	458 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	459 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	460 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	461 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	462 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	463
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	464 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	465
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	466 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	467 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	468 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	469 && 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	470 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	471 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	472 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	473 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	474 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	475 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	476 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	477 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	478 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	479
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	480 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	481 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	482
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	483 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	484 && (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	485 \|\| (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	486 && (!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	487 \|\| 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	488 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	489 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	490 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	491
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	492 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	493 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	494 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	495 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	496 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	497 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	498 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	499 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	500 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	501 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	502
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	503 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	504 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	505 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	506 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	507 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	508 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	509 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	510
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	511 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	512
f6334be47118 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 /* 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	514 unrecognized. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	515 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	516 {
f6334be47118 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 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	518 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	519 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	520 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	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
f6334be47118 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 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	524 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	525
f6334be47118 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 /* Check to see if the option is disabled for this configuration. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	527 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	528 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	529
f6334be47118 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 /* 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	531 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	532 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	533 separate_arg_flag = ((option->flags & CL_SEPARATE)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	534 && !(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	535 && (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	536 separate_args = (separate_arg_flag
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	537 ? 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	538 : 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	539 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	540
f6334be47118 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 /* 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	542 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	543 {
f6334be47118 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 /* 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	545 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	546 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	547 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	548
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	549 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	550 {
f6334be47118 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 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	552 {
f6334be47118 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 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	554 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	555 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	556 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	557 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	558 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	559 }
f6334be47118 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 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	561 /* 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	562 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	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 }
f6334be47118 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 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	566 {
f6334be47118 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 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	568 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	569 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	570 {
f6334be47118 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 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	572 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	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 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	575 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	576 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	577 }
f6334be47118 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
f6334be47118 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 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	580 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	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 /* 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	583 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	584 if (option->alias_target != N_OPTS
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	585 && (!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	586 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	587 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	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 if (new_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	590 {
f6334be47118 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 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	592 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	593 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	594 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	595 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	596 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	597 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	598 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	599 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	600
f6334be47118 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 /* 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	602 gcc_assert (new_option->alias_target == N_OPTS
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	603 \|\| 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	604
f6334be47118 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 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	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 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	608 gcc_assert (arg == NULL);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	609 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	610 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	611 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	612 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	613 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	614 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	615 }
f6334be47118 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 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	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 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	619 gcc_assert (arg == NULL);
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	620 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	621 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	622 }
f6334be47118 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
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	624 if (option->cl_negative_alias)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	625 value = !value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	626
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 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	628 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	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 if (value == 0)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	631 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	632
f6334be47118 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 /* 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	634 separate_arg_flag = ((option->flags & CL_SEPARATE)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	635 && !(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	636 && (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	637 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	638
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	639 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	640 gcc_assert (separate_args
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	641 == (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	642
f6334be47118 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 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	644 {
f6334be47118 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 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	646 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	647 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	648 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 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	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 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	652 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	653 }
f6334be47118 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 /* 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	656 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	657 {
f6334be47118 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 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	659 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	660 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	661 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	662 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	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 }
f6334be47118 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
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	666 /* 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	667 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	668 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	669
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	670 /* Convert the argument to lowercase if appropriate. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	671 if (arg && option->cl_tolower)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	672 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	673 size_t j;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	674 size_t len = strlen (arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	675 char *arg_lower = XOBNEWVEC (&opts_obstack, char, len + 1);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	676
04ced10e8804 gcc 7 kono parents: 67 diff changeset	677 for (j = 0; j < len; j++)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	678 arg_lower[j] = TOLOWER ((unsigned char) arg[j]);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	679 arg_lower[len] = 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	680 arg = arg_lower;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	681 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	682
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	683 /* If the switch takes an integer, convert it. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	684 if (arg && option->cl_uinteger)
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	685 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	686 value = integral_argument (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	687 if (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	688 errors \|= CL_ERR_UINT_ARG;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	689
04ced10e8804 gcc 7 kono parents: 67 diff changeset	690 /* Reject value out of a range. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	691 if (option->range_max != -1
04ced10e8804 gcc 7 kono parents: 67 diff changeset	692 && (value < option->range_min \|\| value > option->range_max))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	693 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	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
f6334be47118 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 /* 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	697 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	698 {
f6334be47118 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 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	700
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	701 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	702 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	703 {
f6334be47118 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 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	705
f6334be47118 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 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	707 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	708 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	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 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	711 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	712 }
f6334be47118 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
f6334be47118 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 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	715 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	716 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	717 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	718 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	719 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	720
f6334be47118 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 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	722 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	723
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	724 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	725 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	726 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	727 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	728 {
f6334be47118 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 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	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 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	732 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	733 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	734 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	735 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	736 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	737 /* 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	738 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	739 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	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 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	742 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	743 }
f6334be47118 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 (opt_index != OPT_SPECIAL_unknown && 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	745 {
f6334be47118 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 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	747 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	748 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	749 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	750 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	751 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	752 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	753 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	754 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	755 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	756 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	757 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	758 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	759 }
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	760 decoded->orig_option_with_args_text
04ced10e8804 gcc 7 kono parents: 67 diff changeset	761 = 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	762 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	763 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	764 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	765
f6334be47118 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 /* 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	767 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	768 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	769 *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	770 *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	771 }
f6334be47118 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 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	773 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	774 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	775 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	776 *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	777 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	778 *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	779 }
f6334be47118 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
f6334be47118 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 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	782 }
f6334be47118 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
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	784 /* Obstack for option strings. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	785
04ced10e8804 gcc 7 kono parents: 67 diff changeset	786 struct obstack opts_obstack;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	787
04ced10e8804 gcc 7 kono parents: 67 diff changeset	788 /* Like libiberty concat, but allocate using opts_obstack. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	789
04ced10e8804 gcc 7 kono parents: 67 diff changeset	790 char *
04ced10e8804 gcc 7 kono parents: 67 diff changeset	791 opts_concat (const char *first, ...)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	792 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	793 char newstr, end;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	794 size_t length = 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	795 const char *arg;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	796 va_list ap;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	797
04ced10e8804 gcc 7 kono parents: 67 diff changeset	798 /* First compute the size of the result and get sufficient memory. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	799 va_start (ap, first);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	800 for (arg = first; arg; arg = va_arg (ap, const char *))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	801 length += strlen (arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	802 newstr = XOBNEWVEC (&opts_obstack, char, length + 1);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	803 va_end (ap);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	804
04ced10e8804 gcc 7 kono parents: 67 diff changeset	805 /* Now copy the individual pieces to the result string. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	806 va_start (ap, first);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	807 for (arg = first, end = newstr; arg; arg = va_arg (ap, const char *))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	808 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	809 length = strlen (arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	810 memcpy (end, arg, length);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	811 end += length;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	812 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	813 *end = '\0';
04ced10e8804 gcc 7 kono parents: 67 diff changeset	814 va_end (ap);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	815 return newstr;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	816 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	817
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	818 /* 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	819 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	820 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	821 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	822 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	823 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	824 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	825 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	826
f6334be47118 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 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	828 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	829 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	830 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	831 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	832 {
f6334be47118 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 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	834 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	835 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	836
f6334be47118 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 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	838
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	839 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	840 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	841 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	842 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	843 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	844 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	845 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	846 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	847 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	848 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	849 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	850 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	851
f6334be47118 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 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	853 {
f6334be47118 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 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	855
f6334be47118 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 /* 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	857 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	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 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	860 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	861 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	862 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	863 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	864
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	865 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	866 &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	867 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	868 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	869
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	870 *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	871 *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	872 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	873 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	874
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	875 /* 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	876 next one is the same as ORIG_NEXT_OPT_IDX. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	877
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	878 static bool
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	879 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	880 {
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	881 /* 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	882 Negative. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	883 if (cl_options [next_opt_idx].neg_index == opt_idx)
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	884 return true;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	885
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	886 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	887 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	888 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	889
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	890 return false;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	891 }
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	892
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	893 /* Filter out options canceled by the ones after them. */
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	894
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	895 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	896 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	897 unsigned int *decoded_options_count)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	898 {
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	899 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	900 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	901 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	902 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	903 = 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	904 unsigned int i;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	905 const struct cl_option *option;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	906 unsigned int fdiagnostics_color_idx = 0;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	907
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	908 /* 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	909 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	910 for (i = 0; i < old_decoded_options_count; i++)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	911 {
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	912 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	913
f6334be47118 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 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	915 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	916
f6334be47118 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 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	918 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	919 {
f6334be47118 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 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	921 case 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	922 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	923 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	924 goto keep;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	925
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	926 /* Do not save OPT_fdiagnostics_color_, just remember the last one. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	927 case OPT_fdiagnostics_color_:
04ced10e8804 gcc 7 kono parents: 67 diff changeset	928 fdiagnostics_color_idx = i;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	929 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	930
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	931 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	932 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	933 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	934 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	935 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	936
f6334be47118 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 /* 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	938 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	939 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	940
f6334be47118 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 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	942 {
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	943 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	944 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	945 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	946 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	947 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	948 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	949 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	950 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	951 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	952 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	953 break;
a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	954 }
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	955 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	956 {
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	957 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	958 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	959 = 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	960 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	961 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	962 break;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	963 }
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
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	966 if (fdiagnostics_color_idx >= 1)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	967 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	968 /* We put the last -fdiagnostics-color= at the first position
04ced10e8804 gcc 7 kono parents: 67 diff changeset	969 after argv[0] so it can take effect immediately. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	970 memmove (new_decoded_options + 2, new_decoded_options + 1,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	971 sizeof (struct cl_decoded_option)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	972 * (new_decoded_options_count - 1));
04ced10e8804 gcc 7 kono parents: 67 diff changeset	973 new_decoded_options[1] = old_decoded_options[fdiagnostics_color_idx];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	974 new_decoded_options_count++;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	975 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	976
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	977 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	978 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	979 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	980 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 *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	982 *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	983 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	984
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	985 /* 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	986 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	987 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	988 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	989 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	990 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	991 processing another option or otherwise generated internally, false
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	992 for one explicitly passed by the user. control_warning_option
04ced10e8804 gcc 7 kono parents: 67 diff changeset	993 generated options are considered explicitly passed by the user.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	994 Returns false if the switch was invalid. DC is the diagnostic
04ced10e8804 gcc 7 kono parents: 67 diff changeset	995 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	996
f6334be47118 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 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	998 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	999 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	1000 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	1001 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	1002 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	1003 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	1004 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1005 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	1006 const char *arg = 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	1007 int value = decoded->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	1008 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	1009 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	1010 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	1011
f6334be47118 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 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	1013 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	1014 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	1015
f6334be47118 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 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	1017 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	1018 {
f6334be47118 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 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	1020 lang_mask, kind, loc,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1021 handlers, dc,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1022 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	1023 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	1024 }
f6334be47118 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
f6334be47118 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 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	1027 }
f6334be47118 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
f6334be47118 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 /* 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	1030 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	1031 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	1032 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	1033
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1034 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	1035 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	1036 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	1037 size_t opt_index, const char *arg, int 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	1038 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	1039 const struct cl_option_handlers *handlers,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1040 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	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 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	1043
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1044 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	1045 return handle_option (opts, opts_set, &decoded, lang_mask, kind, loc,
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1046 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	1047 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1048
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1049 /* 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	1050 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	1051 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	1052
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1053 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	1054 generate_option (size_t opt_index, const char *arg, int 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	1055 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	1056 {
f6334be47118 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 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	1058
f6334be47118 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 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	1060 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	1061 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	1062 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	1063 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	1064 ? 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	1065 : 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	1066
f6334be47118 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 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	1068 switch (decoded->canonical_option_num_elements)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1069 {
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	1070 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	1071 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	1072 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	1073
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1074 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	1075 decoded->orig_option_with_args_text
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1076 = opts_concat (decoded->canonical_option[0], " ",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1077 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	1078 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	1079
f6334be47118 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 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	1081 gcc_unreachable ();
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1082 }
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	1083 }
f6334be47118 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 /* 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	1086
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1087 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	1088 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	1089 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	1090 {
f6334be47118 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 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	1092 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	1093 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	1094 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	1095 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	1096 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	1097 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	1098 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	1099 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	1100 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	1101 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	1102 }
f6334be47118 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
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1104 /* Helper function for listing valid choices and hint for misspelled
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1105 value. CANDIDATES is a vector containing all valid strings,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1106 STR is set to a heap allocated string that contains all those
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1107 strings concatenated, separated by spaces, and the return value
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1108 is the closest string from those to ARG, or NULL if nothing is
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1109 close enough. Callers should XDELETEVEC (STR) after using it
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1110 to avoid memory leaks. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1111
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1112 const char *
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1113 candidates_list_and_hint (const char arg, char &str,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1114 const auto_vec <const char *> &candidates)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1115 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1116 size_t len = 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1117 int i;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1118 const char *candidate;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1119 char *p;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1120
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1121 FOR_EACH_VEC_ELT (candidates, i, candidate)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1122 len += strlen (candidate) + 1;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1123
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1124 str = p = XNEWVEC (char, len);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1125 FOR_EACH_VEC_ELT (candidates, i, candidate)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1126 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1127 len = strlen (candidate);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1128 memcpy (p, candidate, len);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1129 p[len] = ' ';
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1130 p += len + 1;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1131 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1132 p[-1] = '\0';
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1133 return find_closest_string (arg, &candidates);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1134 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1135
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1136 /* Perform diagnostics for read_cmdline_option and control_warning_option
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1137 functions. Returns true if an error has been diagnosed.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1138 LOC and LANG_MASK arguments like in read_cmdline_option.
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1139 OPTION is the option to report diagnostics for, OPT the name
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1140 of the option as text, ARG the argument of the option (for joined
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1141 options), ERRORS is bitmask of CL_ERR_* values. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1142
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1143 static bool
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1144 cmdline_handle_error (location_t loc, const struct cl_option *option,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1145 const char opt, const char arg, int errors,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1146 unsigned int lang_mask)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1147 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1148 if (errors & CL_ERR_DISABLED)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1149 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1150 error_at (loc, "command line option %qs"
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1151 " is not supported by this configuration", opt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1152 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1153 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1154
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1155 if (errors & CL_ERR_MISSING_ARG)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1156 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1157 if (option->missing_argument_error)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1158 error_at (loc, option->missing_argument_error, opt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1159 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1160 error_at (loc, "missing argument to %qs", opt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1161 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1162 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1163
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1164 if (errors & CL_ERR_UINT_ARG)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1165 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1166 error_at (loc, "argument to %qs should be a non-negative integer",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1167 option->opt_text);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1168 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1169 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1170
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1171 if (errors & CL_ERR_INT_RANGE_ARG)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1172 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1173 error_at (loc, "argument to %qs is not between %d and %d",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1174 option->opt_text, option->range_min, option->range_max);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1175 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1176 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1177
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1178 if (errors & CL_ERR_ENUM_ARG)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1179 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1180 const struct cl_enum *e = &cl_enums[option->var_enum];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1181 unsigned int i;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1182 char *s;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1183
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1184 if (e->unknown_error)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1185 error_at (loc, e->unknown_error, arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1186 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1187 error_at (loc, "unrecognized argument in option %qs", opt);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1188
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1189 auto_vec <const char *> candidates;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1190 for (i = 0; e->values[i].arg != NULL; i++)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1191 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1192 if (!enum_arg_ok_for_language (&e->values[i], lang_mask))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1193 continue;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1194 candidates.safe_push (e->values[i].arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1195 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1196 const char *hint = candidates_list_and_hint (arg, s, candidates);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1197 if (hint)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1198 inform (loc, "valid arguments to %qs are: %s; did you mean %qs?",
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1199 option->opt_text, s, hint);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1200 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1201 inform (loc, "valid arguments to %qs are: %s", option->opt_text, s);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1202 XDELETEVEC (s);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1203
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1204 return true;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1205 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1206
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1207 return false;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1208 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1209
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	1210 /* 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	1211 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	1212 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	1213 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	1214
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1215 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	1216 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	1217 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	1218 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	1219 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	1220 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	1221 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	1222 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	1223 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1224 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	1225 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	1226
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1227 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	1228 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	1229
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1230 if (decoded->opt_index == OPT_SPECIAL_unknown)
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1231 {
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	1232 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	1233 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	1234 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	1235 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1236
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1237 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	1238 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	1239
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1240 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	1241
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1242 if (decoded->errors
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1243 && cmdline_handle_error (loc, option, opt, decoded->arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1244 decoded->errors, lang_mask))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1245 return;
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1246
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	1247 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	1248 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1249 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	1250 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	1251 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1252
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1253 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	1254
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1255 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	1256 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	1257 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	1258 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1259
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1260 /* 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	1261 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	1262 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	1263 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	1264
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1265 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	1266 set_option (struct gcc_options opts, 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	1267 int opt_index, int value, const char *arg, int 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	1268 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	1269 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1270 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	1271 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	1272 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	1273
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1274 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	1275 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	1276
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1277 if ((diagnostic_t) kind != DK_UNSPECIFIED && dc != NULL)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1278 diagnostic_classify_diagnostic (dc, opt_index, (diagnostic_t) kind, loc);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1279
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	1280 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	1281 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	1282
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1283 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	1284 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1285 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	1286 (int ) 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	1287 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	1288 (int ) 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	1289 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	1290
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1291 case CLVC_EQUAL:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1292 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1293 (HOST_WIDE_INT ) flag_var = (value
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1294 ? option->var_value
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1295 : !option->var_value);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1296 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1297 (int ) flag_var = (value
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1298 ? option->var_value
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1299 : !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	1300 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	1301 (int ) 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	1302 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	1303
f6334be47118 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 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	1305 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	1306 if ((value != 0) == (option->var_type == CLVC_BIT_SET))
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1307 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1308 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1309 (HOST_WIDE_INT ) flag_var \|= option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1310 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1311 (int ) flag_var \|= option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1312 }
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	1313 else
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1314 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1315 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1316 (HOST_WIDE_INT ) flag_var &= ~option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1317 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1318 (int ) flag_var &= ~option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1319 }
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	1320 if (set_flag_var)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1321 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1322 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1323 (HOST_WIDE_INT ) set_flag_var \|= option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1324 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1325 (int ) set_flag_var \|= option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1326 }
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	1327 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	1328
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1329 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	1330 (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	1331 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	1332 (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	1333 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	1334
f6334be47118 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 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	1336 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1337 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	1338
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1339 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	1340 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	1341 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	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 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	1344
f6334be47118 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 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	1346 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1347 vec<cl_deferred_option> *v
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1348 = (vec<cl_deferred_option> ) (void **) flag_var;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1349 cl_deferred_option p = {opt_index, arg, value};
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1350 if (!v)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1351 v = XCNEW (vec<cl_deferred_option>);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1352 v->safe_push (p);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1353 (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	1354 if (set_flag_var)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1355 (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	1356 }
f6334be47118 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 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	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 }
f6334be47118 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
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1361 /* 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	1362 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	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 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	1365 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	1366 {
f6334be47118 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 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	1368
f6334be47118 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 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	1370 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	1371 return (void )(((char ) opts) + option->flag_var_offset);
0 a06113de4d67 first commit kent <kent@cr.ie.u-ryukyu.ac.jp> parents: diff changeset	1372 }
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	1373
f6334be47118 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 /* 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	1375 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	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 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	1378 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	1379 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1380 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	1381 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	1382 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	1383
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1384 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	1385 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	1386 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1387 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	1388 return (int ) 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	1389
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1390 case CLVC_EQUAL:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1391 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1392 return (HOST_WIDE_INT ) flag_var == option->var_value;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1393 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1394 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	1395
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1396 case CLVC_BIT_CLEAR:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1397 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1398 return ((HOST_WIDE_INT ) flag_var & option->var_value) == 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1399 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1400 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	1401
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1402 case CLVC_BIT_SET:
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1403 if (option->cl_host_wide_int)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1404 return ((HOST_WIDE_INT ) flag_var & option->var_value) != 0;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1405 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1406 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	1407
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1408 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	1409 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	1410 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	1411 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	1412 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1413 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	1414 }
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1415
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1416 /* 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	1417 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	1418
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1419 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	1420 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	1421 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	1422 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1423 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	1424
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1425 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	1426 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	1427
f6334be47118 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 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	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_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	1431 case CLVC_EQUAL:
f6334be47118 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 state->data = flag_var;
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1433 state->size = (cl_options[option].cl_host_wide_int
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1434 ? sizeof (HOST_WIDE_INT)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1435 : 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	1436 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	1437
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1438 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	1439 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	1440 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	1441 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	1442 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	1443 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	1444
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1445 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	1446 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	1447 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	1448 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	1449 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	1450 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	1451
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1452 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	1453 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	1454 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	1455 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	1456
f6334be47118 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 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	1458 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	1459 }
f6334be47118 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 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	1461 }
f6334be47118 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 /* 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	1464 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	1465 structures OPTS and OPTS_SET and diagnostic context DC (possibly
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1466 NULL), at location LOC (UNKNOWN_LOCATION for -Werror=). ARG is the
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1467 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	1468 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	1469 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	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 void
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1472 control_warning_option (unsigned int opt_index, int kind, const char *arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1473 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	1474 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	1475 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	1476 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	1477 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	1478 {
f6334be47118 update gcc from gcc-4.6-20100522 to gcc-4.6-20110318 nobuyasu <dimolto@cr.ie.u-ryukyu.ac.jp> parents: 55 diff changeset	1479 if (cl_options[opt_index].alias_target != N_OPTS)
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1480 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1481 gcc_assert (!cl_options[opt_index].cl_separate_alias
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1482 && !cl_options[opt_index].cl_negative_alias);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1483 if (cl_options[opt_index].alias_arg)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1484 arg = cl_options[opt_index].alias_arg;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1485 opt_index = cl_options[opt_index].alias_target;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1486 }
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	1487 if (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	1488 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	1489 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	1490 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	1491 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	1492 {
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1493 const struct cl_option *option = &cl_options[opt_index];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1494
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	1495 /* -Werror=foo implies -Wfoo. */
111 04ced10e8804 gcc 7 kono parents: 67 diff changeset	1496 if (option->var_type == CLVC_BOOLEAN \|\| option->var_type == CLVC_ENUM)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1497 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1498 int value = 1;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1499
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1500 if (arg && *arg == '\0' && !option->cl_missing_ok)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1501 arg = NULL;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1502
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1503 if ((option->flags & CL_JOINED) && arg == NULL)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1504 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1505 cmdline_handle_error (loc, option, option->opt_text, arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1506 CL_ERR_MISSING_ARG, lang_mask);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1507 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1508 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1509
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1510 /* If the switch takes an integer, convert it. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1511 if (arg && option->cl_uinteger)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1512 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1513 value = integral_argument (arg);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1514 if (value == -1)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1515 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1516 cmdline_handle_error (loc, option, option->opt_text, arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1517 CL_ERR_UINT_ARG, lang_mask);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1518 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1519 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1520 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1521
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1522 /* If the switch takes an enumerated argument, convert it. */
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1523 if (arg && option->var_type == CLVC_ENUM)
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1524 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1525 const struct cl_enum *e = &cl_enums[option->var_enum];
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1526
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1527 if (enum_arg_to_value (e->values, arg, &value, lang_mask))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1528 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1529 const char *carg = NULL;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1530
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1531 if (enum_value_to_arg (e->values, &carg, value, lang_mask))
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1532 arg = carg;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1533 gcc_assert (carg != NULL);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1534 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1535 else
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1536 {
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1537 cmdline_handle_error (loc, option, option->opt_text, arg,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1538 CL_ERR_ENUM_ARG, lang_mask);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1539 return;
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1540 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1541 }
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1542
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1543 handle_generated_option (opts, opts_set,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1544 opt_index, arg, value, lang_mask,
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1545 kind, loc, handlers, false, dc);
04ced10e8804 gcc 7 kono parents: 67 diff changeset	1546 }
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	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 }

Mercurial > hg > CbC > CbC_gcc

annotate gcc/opts-common.c @ 111:04ced10e8804