Framework for relocation scanning. Implement simple static TLS
[binutils-gdb.git] / gold / options.cc
1 // options.c -- handle command line options for gold
2
3 #include <iostream>
4
5 #include "gold.h"
6 #include "options.h"
7
8 namespace gold
9 {
10
11 // The information we keep for a single command line option.
12
13 struct options::One_option
14 {
15 // The single character option name, or '\0' if this is only a long
16 // option.
17 char short_option;
18
19 // The long option name, or NULL if this is only a short option.
20 const char* long_option;
21
22 // Description of the option for --help output, or NULL if there is none.
23 const char* doc;
24
25 // How to print the option name in --help output, or NULL to use the
26 // default.
27 const char* help_output;
28
29 // Long option dash control. This is ignored if long_option is
30 // NULL.
31 enum
32 {
33 // Long option normally takes one dash; two dashes are also
34 // accepted.
35 ONE_DASH,
36 // Long option normally takes two dashes; one dash is also
37 // accepted.
38 TWO_DASHES,
39 // Long option always takes two dashes.
40 EXACTLY_TWO_DASHES
41 } dash;
42
43 // Function for special handling, or NULL. Returns the number of
44 // arguments to skip. This will normally be at least 1, but it may
45 // be 0 if this function changes *argv. ARG points to the location
46 // in *ARGV where the option starts, which may be helpful for a
47 // short option.
48 int (*special)(int argc, char** argv, char *arg, Command_line*);
49
50 // If this is a position independent option which does not take an
51 // argument, this is the member function to call to record it.
52 void (General_options::*general_noarg)();
53
54 // If this is a position independent function which takes an
55 // argument, this is the member function to call to record it.
56 void (General_options::*general_arg)(const char*);
57
58 // If this is a position dependent option which does not take an
59 // argument, this is the member function to call to record it.
60 void (Position_dependent_options::*dependent_noarg)();
61
62 // If this is a position dependent option which takes an argument,
63 // this is the member function to record it.
64 void (Position_dependent_options::*dependent_arg)(const char*);
65
66 // Return whether this option takes an argument.
67 bool
68 takes_argument() const
69 { return this->general_arg != NULL || this->dependent_arg != NULL; }
70 };
71
72 class options::Command_line_options
73 {
74 public:
75 static const One_option options[];
76 static const int options_size;
77 };
78
79 } // End namespace gold.
80
81 namespace
82 {
83
84 // Handle the special -l option, which adds an input file.
85
86 int
87 library(int argc, char** argv, char* arg, gold::Command_line* cmdline)
88 {
89 return cmdline->process_l_option(argc, argv, arg);
90 }
91
92 // Report usage information for ld --help, and exit.
93
94 int
95 help(int, char**, char*, gold::Command_line*)
96 {
97 printf(_("Usage: %s [options] file...\nOptions:\n"), gold::program_name);
98
99 const int options_size = gold::options::Command_line_options::options_size;
100 const gold::options::One_option* options =
101 gold::options::Command_line_options::options;
102 for (int i = 0; i < options_size; ++i)
103 {
104 if (options[i].doc == NULL)
105 continue;
106
107 printf(" ");
108 int len = 2;
109 bool comma = false;
110
111 int j = i;
112 do
113 {
114 if (options[j].help_output != NULL)
115 {
116 if (comma)
117 {
118 printf(", ");
119 len += 2;
120 }
121 printf(options[j].help_output);
122 len += std::strlen(options[i].help_output);
123 }
124 else
125 {
126 if (options[j].short_option != '\0')
127 {
128 if (comma)
129 {
130 printf(", ");
131 len += 2;
132 }
133 printf("-%c", options[j].short_option);
134 len += 2;
135 }
136
137 if (options[j].long_option != NULL)
138 {
139 if (comma)
140 {
141 printf(", ");
142 len += 2;
143 }
144 if (options[j].dash == gold::options::One_option::ONE_DASH)
145 {
146 printf("-");
147 ++len;
148 }
149 else
150 {
151 printf("--");
152 len += 2;
153 }
154 printf("%s", options[j].long_option);
155 len += std::strlen(options[j].long_option);
156 }
157 }
158 ++j;
159 }
160 while (j < options_size && options[j].doc == NULL);
161
162 if (len > 30)
163 {
164 printf("\n");
165 len = 0;
166 }
167 for (; len < 30; ++len)
168 std::putchar(' ');
169
170 std::puts(options[i].doc);
171 }
172
173 gold::gold_exit(true);
174
175 return 0;
176 }
177
178 } // End anonymous namespace.
179
180 namespace gold
181 {
182
183 // Helper macros used to specify the options. We could also do this
184 // using constructors, but then g++ would generate code to initialize
185 // the array. We want the array to be initialized statically so that
186 // we get better startup time.
187
188 #define GENERAL_NOARG(short_option, long_option, doc, help, dash, func) \
189 { short_option, long_option, doc, help, options::One_option::dash, \
190 NULL, func, NULL, NULL, NULL }
191 #define GENERAL_ARG(short_option, long_option, doc, help, dash, func) \
192 { short_option, long_option, doc, help, options::One_option::dash, \
193 NULL, NULL, func, NULL, NULL }
194 #define POSDEP_NOARG(short_option, long_option, doc, help, dash, func) \
195 { short_option, long_option, doc, help, options::One_option::dash, \
196 NULL, NULL, NULL, func, NULL }
197 #define POSDEP_ARG(short_option, long_option, doc, help, dash, func) \
198 { short_option, long_option, doc, help, options::One_option::dash, \
199 NULL, NULL, NULL, NULL, func }
200 #define SPECIAL(short_option, long_option, doc, help, dash, func) \
201 { short_option, long_option, doc, help, options::One_option::dash, \
202 func, NULL, NULL, NULL, NULL }
203
204 // Here is the actual list of options which we accept.
205
206 const options::One_option
207 options::Command_line_options::options[] =
208 {
209 SPECIAL('l', "library", N_("Search for library LIBNAME"),
210 N_("-lLIBNAME --library LIBNAME"), TWO_DASHES,
211 &library),
212 GENERAL_ARG('L', "library-path", N_("Add directory to search path"),
213 N_("-L DIR, --library-path DIR"), TWO_DASHES,
214 &General_options::add_to_search_path),
215 GENERAL_ARG('o', "output", N_("Set output file name"),
216 N_("-o FILE, --output FILE"), TWO_DASHES,
217 &General_options::set_output_file_name),
218 GENERAL_NOARG('r', NULL, N_("Generate relocatable output"), NULL,
219 ONE_DASH, &General_options::set_relocatable),
220 GENERAL_NOARG('\0', "shared", N_("Generate shared library"),
221 NULL, ONE_DASH, &General_options::set_shared),
222 GENERAL_NOARG('\0', "static", N_("Do not link against shared libraries"),
223 NULL, ONE_DASH, &General_options::set_static),
224 SPECIAL('\0', "help", N_("Report usage information"), NULL,
225 TWO_DASHES, &help)
226 };
227
228 const int options::Command_line_options::options_size =
229 sizeof (options) / sizeof (options[0]);
230
231 // The default values for the general options.
232
233 General_options::General_options()
234 : search_path_(),
235 output_file_name_("a.out"),
236 is_relocatable_(false),
237 is_shared_(false),
238 is_static_(false)
239 {
240 }
241
242 // The default values for the position dependent options.
243
244 Position_dependent_options::Position_dependent_options()
245 : do_static_search_(false)
246 {
247 }
248
249 // Construct a Command_line.
250
251 Command_line::Command_line()
252 {
253 }
254
255 // Process the command line options.
256
257 void
258 Command_line::process(int argc, char** argv)
259 {
260 const int options_size = options::Command_line_options::options_size;
261 const options::One_option* options =
262 options::Command_line_options::options;
263 bool no_more_options = false;
264 int i = 0;
265 while (i < argc)
266 {
267 if (argv[i][0] != '-' || no_more_options)
268 {
269 this->inputs_.push_back(Input_argument(argv[i], false,
270 this->position_options_));
271 ++i;
272 continue;
273 }
274
275 // Option starting with '-'.
276 int dashes = 1;
277 if (argv[i][1] == '-')
278 {
279 dashes = 2;
280 if (argv[i][2] == '\0')
281 {
282 no_more_options = true;
283 continue;
284 }
285 }
286
287 // Look for a long option match.
288 char* opt = argv[i] + dashes;
289 char first = opt[0];
290 int skiparg = 0;
291 char* arg = strchr(opt, '=');
292 if (arg != NULL)
293 *arg = '\0';
294 else if (i + 1 < argc)
295 {
296 arg = argv[i + 1];
297 skiparg = 1;
298 }
299
300 int j;
301 for (j = 0; j < options_size; ++j)
302 {
303 if (options[j].long_option != NULL
304 && (dashes == 2
305 || (options[j].dash
306 != options::One_option::EXACTLY_TWO_DASHES))
307 && first == options[j].long_option[0]
308 && strcmp(opt, options[j].long_option) == 0)
309 {
310 if (options[j].special)
311 i += options[j].special(argc - 1, argv + i, opt, this);
312 else
313 {
314 if (!options[j].takes_argument())
315 {
316 arg = NULL;
317 skiparg = 0;
318 }
319 else
320 {
321 if (arg == NULL)
322 this->usage(_("missing argument"), argv[i]);
323 }
324 this->apply_option(options[j], arg);
325 i += skiparg + 1;
326 }
327 break;
328 }
329 }
330 if (j < options_size)
331 continue;
332
333 // If we saw two dashes, we need to see a long option.
334 if (dashes == 2)
335 this->usage(_("unknown option"), argv[i]);
336
337 // Look for a short option match. There may be more than one
338 // short option in a given argument.
339 bool done = false;
340 char* s = argv[i] + 1;
341 ++i;
342 while (*s != '\0' && !done)
343 {
344 char opt = *s;
345 int j;
346 for (j = 0; j < options_size; ++j)
347 {
348 if (options[j].short_option == opt)
349 {
350 if (options[j].special)
351 {
352 // Undo the argument skip done above.
353 --i;
354 i += options[j].special(argc - i, argv + i, s, this);
355 done = true;
356 }
357 else
358 {
359 arg = NULL;
360 if (options[j].takes_argument())
361 {
362 if (s[1] != '\0')
363 {
364 arg = s + 1;
365 done = true;
366 }
367 else if (i < argc)
368 {
369 arg = argv[i];
370 ++i;
371 }
372 else
373 this->usage(_("missing argument"), opt);
374 }
375 this->apply_option(options[j], arg);
376 }
377 break;
378 }
379 }
380
381 if (j >= options_size)
382 this->usage(_("unknown option"), *s);
383
384 ++s;
385 }
386 }
387
388 // FIXME: We should only do this when configured in native mode.
389 this->options_.add_to_search_path("/lib");
390 this->options_.add_to_search_path("/usr/lib");
391 }
392
393 // Apply a command line option.
394
395 void
396 Command_line::apply_option(const options::One_option& opt,
397 const char* arg)
398 {
399 if (arg == NULL)
400 {
401 if (opt.general_noarg)
402 (this->options_.*(opt.general_noarg))();
403 else if (opt.dependent_noarg)
404 (this->position_options_.*(opt.dependent_noarg))();
405 else
406 gold_unreachable();
407 }
408 else
409 {
410 if (opt.general_arg)
411 (this->options_.*(opt.general_arg))(arg);
412 else if (opt.dependent_arg)
413 (this->position_options_.*(opt.dependent_arg))(arg);
414 else
415 gold_unreachable();
416 }
417 }
418
419 // Handle the -l option, which requires special treatment.
420
421 int
422 Command_line::process_l_option(int argc, char** argv, char* arg)
423 {
424 int ret;
425 const char* libname;
426 if (arg[1] != '\0')
427 {
428 ret = 1;
429 libname = arg + 1;
430 }
431 else if (argc > 1)
432 {
433 ret = 2;
434 libname = argv[argc + 1];
435 }
436 else
437 this->usage(_("missing argument"), arg);
438
439 this->inputs_.push_back(Input_argument(libname, true,
440 this->position_options_));
441
442 return ret;
443 }
444
445 // Report a usage error. */
446
447 void
448 Command_line::usage()
449 {
450 fprintf(stderr,
451 _("%s: use the --help option for usage information\n"),
452 program_name);
453 gold_exit(false);
454 }
455
456 void
457 Command_line::usage(const char* msg, const char *opt)
458 {
459 fprintf(stderr,
460 _("%s: %s: %s\n"),
461 program_name, opt, msg);
462 this->usage();
463 }
464
465 void
466 Command_line::usage(const char* msg, char opt)
467 {
468 fprintf(stderr,
469 _("%s: -%c: %s\n"),
470 program_name, opt, msg);
471 this->usage();
472 }
473
474 } // End namespace gold.