annotate gcc/c-family/cppspec.c @ 127:4c56639505ff

fix function.c and add CbC-example Makefile
author mir3636
date Wed, 11 Apr 2018 18:46:58 +0900
parents 04ced10e8804
children 84e7813d76e9
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* Specific flags and argument handling of the C preprocessor.
kono
parents:
diff changeset
2 Copyright (C) 1999-2017 Free Software Foundation, Inc.
kono
parents:
diff changeset
3
kono
parents:
diff changeset
4 This file is part of GCC.
kono
parents:
diff changeset
5
kono
parents:
diff changeset
6 GCC is free software; you can redistribute it and/or modify it under
kono
parents:
diff changeset
7 the terms of the GNU General Public License as published by the Free
kono
parents:
diff changeset
8 Software Foundation; either version 3, or (at your option) any later
kono
parents:
diff changeset
9 version.
kono
parents:
diff changeset
10
kono
parents:
diff changeset
11 GCC is distributed in the hope that it will be useful, but WITHOUT ANY
kono
parents:
diff changeset
12 WARRANTY; without even the implied warranty of MERCHANTABILITY or
kono
parents:
diff changeset
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
kono
parents:
diff changeset
14 for more details.
kono
parents:
diff changeset
15
kono
parents:
diff changeset
16 You should have received a copy of the GNU General Public License
kono
parents:
diff changeset
17 along with GCC; see the file COPYING3. If not see
kono
parents:
diff changeset
18 <http://www.gnu.org/licenses/>. */
kono
parents:
diff changeset
19
kono
parents:
diff changeset
20 #include "config.h"
kono
parents:
diff changeset
21 #include "system.h"
kono
parents:
diff changeset
22 #include "coretypes.h"
kono
parents:
diff changeset
23 #include "tm.h"
kono
parents:
diff changeset
24 #include "gcc.h"
kono
parents:
diff changeset
25 #include "opts.h"
kono
parents:
diff changeset
26
kono
parents:
diff changeset
27 /* The `cpp' executable installed in $(bindir) and $(cpp_install_dir)
kono
parents:
diff changeset
28 is a customized version of the gcc driver. It forces -E; -S and -c
kono
parents:
diff changeset
29 are errors. It defaults to -x c for files with unrecognized
kono
parents:
diff changeset
30 extensions, unless -x options appear in argv, in which case we
kono
parents:
diff changeset
31 assume the user knows what they're doing. If no explicit input is
kono
parents:
diff changeset
32 mentioned, it will read stdin. */
kono
parents:
diff changeset
33
kono
parents:
diff changeset
34 /* Suffixes for known sorts of input files. Note that we do not list
kono
parents:
diff changeset
35 files which are normally considered to have been preprocessed already,
kono
parents:
diff changeset
36 since the user's expectation is that `cpp' always preprocesses. */
kono
parents:
diff changeset
37 static const char *const known_suffixes[] =
kono
parents:
diff changeset
38 {
kono
parents:
diff changeset
39 ".c", ".C", ".S", ".m",
kono
parents:
diff changeset
40 ".cc", ".cxx", ".cpp", ".cp", ".c++",
kono
parents:
diff changeset
41 ".sx",
kono
parents:
diff changeset
42 NULL
kono
parents:
diff changeset
43 };
kono
parents:
diff changeset
44
kono
parents:
diff changeset
45 /* Filter the command line before processing by the gcc driver proper. */
kono
parents:
diff changeset
46 void
kono
parents:
diff changeset
47 lang_specific_driver (struct cl_decoded_option **in_decoded_options,
kono
parents:
diff changeset
48 unsigned int *in_decoded_options_count,
kono
parents:
diff changeset
49 int *in_added_libraries ATTRIBUTE_UNUSED)
kono
parents:
diff changeset
50 {
kono
parents:
diff changeset
51 struct cl_decoded_option *decoded_options = *in_decoded_options;
kono
parents:
diff changeset
52 unsigned int argc = *in_decoded_options_count;
kono
parents:
diff changeset
53
kono
parents:
diff changeset
54 /* Do we need to read stdin? */
kono
parents:
diff changeset
55 int read_stdin = 1;
kono
parents:
diff changeset
56
kono
parents:
diff changeset
57 /* Do we need to insert -E? */
kono
parents:
diff changeset
58 int need_E = 1;
kono
parents:
diff changeset
59
kono
parents:
diff changeset
60 /* Have we seen an input file? */
kono
parents:
diff changeset
61 int seen_input = 0;
kono
parents:
diff changeset
62
kono
parents:
diff changeset
63 /* Positions to insert -xc, -xassembler-with-cpp, and -o, if necessary.
kono
parents:
diff changeset
64 0 means unnecessary. */
kono
parents:
diff changeset
65 unsigned int lang_c_here = 0;
kono
parents:
diff changeset
66 unsigned int lang_S_here = 0;
kono
parents:
diff changeset
67 unsigned int o_here = 0;
kono
parents:
diff changeset
68
kono
parents:
diff changeset
69 /* Do we need to fix up an input file with an unrecognized suffix? */
kono
parents:
diff changeset
70 int need_fixups = 1;
kono
parents:
diff changeset
71
kono
parents:
diff changeset
72 unsigned int i, j;
kono
parents:
diff changeset
73 struct cl_decoded_option *new_decoded_options;
kono
parents:
diff changeset
74 unsigned int new_argc;
kono
parents:
diff changeset
75 extern int is_cpp_driver;
kono
parents:
diff changeset
76
kono
parents:
diff changeset
77 is_cpp_driver = 1;
kono
parents:
diff changeset
78
kono
parents:
diff changeset
79 /* First pass. If we see an -S or -c, barf. If we see an input file,
kono
parents:
diff changeset
80 turn off read_stdin. If we see a second input file, it is actually
kono
parents:
diff changeset
81 the output file. If we see a third input file, barf. */
kono
parents:
diff changeset
82 for (i = 1; i < argc; i++)
kono
parents:
diff changeset
83 {
kono
parents:
diff changeset
84 switch (decoded_options[i].opt_index)
kono
parents:
diff changeset
85 {
kono
parents:
diff changeset
86 case OPT_E:
kono
parents:
diff changeset
87 need_E = 0;
kono
parents:
diff changeset
88 break;
kono
parents:
diff changeset
89
kono
parents:
diff changeset
90 case OPT_S:
kono
parents:
diff changeset
91 case OPT_c:
kono
parents:
diff changeset
92 fatal_error (input_location,
kono
parents:
diff changeset
93 "%qs is not a valid option to the preprocessor",
kono
parents:
diff changeset
94 decoded_options[i].orig_option_with_args_text);
kono
parents:
diff changeset
95 return;
kono
parents:
diff changeset
96
kono
parents:
diff changeset
97 case OPT_x:
kono
parents:
diff changeset
98 need_fixups = 0;
kono
parents:
diff changeset
99 break;
kono
parents:
diff changeset
100
kono
parents:
diff changeset
101 case OPT_SPECIAL_input_file:
kono
parents:
diff changeset
102 {
kono
parents:
diff changeset
103 const char *file = decoded_options[i].arg;
kono
parents:
diff changeset
104
kono
parents:
diff changeset
105 if (strcmp (file, "-") == 0)
kono
parents:
diff changeset
106 read_stdin = 0;
kono
parents:
diff changeset
107 else
kono
parents:
diff changeset
108 {
kono
parents:
diff changeset
109 seen_input++;
kono
parents:
diff changeset
110 if (seen_input == 3)
kono
parents:
diff changeset
111 {
kono
parents:
diff changeset
112 fatal_error (input_location, "too many input files");
kono
parents:
diff changeset
113 return;
kono
parents:
diff changeset
114 }
kono
parents:
diff changeset
115 else if (seen_input == 2)
kono
parents:
diff changeset
116 {
kono
parents:
diff changeset
117 o_here = i;
kono
parents:
diff changeset
118 }
kono
parents:
diff changeset
119 else
kono
parents:
diff changeset
120 {
kono
parents:
diff changeset
121 read_stdin = 0;
kono
parents:
diff changeset
122 if (need_fixups)
kono
parents:
diff changeset
123 {
kono
parents:
diff changeset
124 int l = strlen (file);
kono
parents:
diff changeset
125 int known = 0;
kono
parents:
diff changeset
126 const char *const *suff;
kono
parents:
diff changeset
127
kono
parents:
diff changeset
128 for (suff = known_suffixes; *suff; suff++)
kono
parents:
diff changeset
129 if (!strcmp (*suff, &file[l - strlen(*suff)]))
kono
parents:
diff changeset
130 {
kono
parents:
diff changeset
131 known = 1;
kono
parents:
diff changeset
132 break;
kono
parents:
diff changeset
133 }
kono
parents:
diff changeset
134
kono
parents:
diff changeset
135 if (! known)
kono
parents:
diff changeset
136 {
kono
parents:
diff changeset
137 /* .s files are a special case; we have to
kono
parents:
diff changeset
138 treat them like .S files so
kono
parents:
diff changeset
139 -D__ASSEMBLER__ will be in effect. */
kono
parents:
diff changeset
140 if (!strcmp (".s", &file[l - 2]))
kono
parents:
diff changeset
141 lang_S_here = i;
kono
parents:
diff changeset
142 else
kono
parents:
diff changeset
143 lang_c_here = i;
kono
parents:
diff changeset
144 }
kono
parents:
diff changeset
145 }
kono
parents:
diff changeset
146 }
kono
parents:
diff changeset
147 }
kono
parents:
diff changeset
148 }
kono
parents:
diff changeset
149 break;
kono
parents:
diff changeset
150 }
kono
parents:
diff changeset
151 }
kono
parents:
diff changeset
152
kono
parents:
diff changeset
153 /* If we don't need to edit the command line, we can bail early. */
kono
parents:
diff changeset
154
kono
parents:
diff changeset
155 new_argc = argc + need_E + read_stdin + !!lang_c_here + !!lang_S_here;
kono
parents:
diff changeset
156
kono
parents:
diff changeset
157 if (new_argc == argc && !o_here)
kono
parents:
diff changeset
158 return;
kono
parents:
diff changeset
159
kono
parents:
diff changeset
160 new_decoded_options = XNEWVEC (struct cl_decoded_option, new_argc);
kono
parents:
diff changeset
161
kono
parents:
diff changeset
162 new_decoded_options[0] = decoded_options[0];
kono
parents:
diff changeset
163 j = 1;
kono
parents:
diff changeset
164
kono
parents:
diff changeset
165 if (need_E)
kono
parents:
diff changeset
166 generate_option (OPT_E, NULL, 1, CL_DRIVER, &new_decoded_options[j++]);
kono
parents:
diff changeset
167
kono
parents:
diff changeset
168 for (i = 1; i < argc; i++, j++)
kono
parents:
diff changeset
169 {
kono
parents:
diff changeset
170 if (i == lang_c_here)
kono
parents:
diff changeset
171 generate_option (OPT_x, "c", 1, CL_DRIVER, &new_decoded_options[j++]);
kono
parents:
diff changeset
172 else if (i == lang_S_here)
kono
parents:
diff changeset
173 generate_option (OPT_x, "assembler-with-cpp", 1, CL_DRIVER,
kono
parents:
diff changeset
174 &new_decoded_options[j++]);
kono
parents:
diff changeset
175 else if (i == o_here)
kono
parents:
diff changeset
176 {
kono
parents:
diff changeset
177 generate_option (OPT_o, decoded_options[i].arg, 1, CL_DRIVER,
kono
parents:
diff changeset
178 &new_decoded_options[j]);
kono
parents:
diff changeset
179 continue;
kono
parents:
diff changeset
180 }
kono
parents:
diff changeset
181
kono
parents:
diff changeset
182 new_decoded_options[j] = decoded_options[i];
kono
parents:
diff changeset
183 }
kono
parents:
diff changeset
184
kono
parents:
diff changeset
185 if (read_stdin)
kono
parents:
diff changeset
186 generate_option_input_file ("-", &new_decoded_options[j++]);
kono
parents:
diff changeset
187
kono
parents:
diff changeset
188 *in_decoded_options_count = new_argc;
kono
parents:
diff changeset
189 *in_decoded_options = new_decoded_options;
kono
parents:
diff changeset
190 }
kono
parents:
diff changeset
191
kono
parents:
diff changeset
192 /* Called before linking. Returns 0 on success and -1 on failure. */
kono
parents:
diff changeset
193 int lang_specific_pre_link (void)
kono
parents:
diff changeset
194 {
kono
parents:
diff changeset
195 return 0; /* Not used for cpp. */
kono
parents:
diff changeset
196 }
kono
parents:
diff changeset
197
kono
parents:
diff changeset
198 /* Number of extra output files that lang_specific_pre_link may generate. */
kono
parents:
diff changeset
199 int lang_specific_extra_outfiles = 0; /* Not used for cpp. */