1 /* Parse options for the GNU linker.
2 Copyright (C) 1991, 92, 93, 94 Free Software Foundation, Inc.
4 This file is part of GLD, the Gnu Linker.
6 GLD is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2, or (at your option)
11 GLD is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GLD; see the file COPYING. If not, write to
18 the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
37 /* Somewhere above, sys/stat.h got included . . . . */
38 #if !defined(S_ISDIR) && defined(S_IFDIR)
39 #define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
42 /* Omit args to avoid the possibility of clashing with a system header
43 that might disagree about consts. */
44 unsigned long strtoul ();
46 static void set_default_dirlist PARAMS ((char *dirlist_ptr));
47 static void set_section_start PARAMS ((char *sect, char *valstr));
50 parse_args (argc, argv)
56 /* Starting the short option string with '-' is for programs that
57 expect options and other ARGV-elements in any order and that care about
58 the ordering of the two. We describe each non-option ARGV-element
59 as if it were the argument of an option with character code 1. */
61 const char *shortopts =
62 "-A:B::b:cde:F::G:giL:l:Mm:NnO:o:R:rSsT:tu:VvXxY:y:()";
64 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
66 #define OPTION_CALL_SHARED 150
67 #define OPTION_DEFSYM (OPTION_CALL_SHARED + 1)
68 #define OPTION_DYNAMIC_LINKER (OPTION_DEFSYM + 1)
69 #define OPTION_EB (OPTION_DYNAMIC_LINKER + 1)
70 #define OPTION_EL (OPTION_EB + 1)
71 #define OPTION_HELP (OPTION_EL + 1)
72 #define OPTION_IGNORE (OPTION_HELP + 1)
73 #define OPTION_MAP (OPTION_IGNORE + 1)
74 #define OPTION_NO_KEEP_MEMORY (OPTION_MAP + 1)
75 #define OPTION_NOINHIBIT_EXEC (OPTION_NO_KEEP_MEMORY + 1)
76 #define OPTION_NON_SHARED (OPTION_NOINHIBIT_EXEC + 1)
77 #define OPTION_OFORMAT (OPTION_NON_SHARED + 1)
78 #define OPTION_RELAX (OPTION_OFORMAT + 1)
79 #define OPTION_RETAIN_SYMBOLS_FILE (OPTION_RELAX + 1)
80 #define OPTION_RPATH (OPTION_RETAIN_SYMBOLS_FILE + 1)
81 #define OPTION_SHARED (OPTION_RPATH + 1)
82 #define OPTION_SONAME (OPTION_SHARED + 1)
83 #define OPTION_SORT_COMMON (OPTION_SONAME + 1)
84 #define OPTION_STATS (OPTION_SORT_COMMON + 1)
85 #define OPTION_TBSS (OPTION_STATS + 1)
86 #define OPTION_TDATA (OPTION_TBSS + 1)
87 #define OPTION_TTEXT (OPTION_TDATA + 1)
88 #define OPTION_TRADITIONAL_FORMAT (OPTION_TTEXT + 1)
89 #define OPTION_UR (OPTION_TRADITIONAL_FORMAT + 1)
90 #define OPTION_VERSION (OPTION_UR + 1)
91 #define OPTION_WARN_COMMON (OPTION_VERSION + 1)
92 #define OPTION_WARN_ONCE (OPTION_WARN_COMMON + 1)
94 static struct option longopts[] = {
95 {"Bdynamic", no_argument, NULL, OPTION_CALL_SHARED},
96 {"Bstatic", no_argument, NULL, OPTION_NON_SHARED},
97 {"call_shared", no_argument, NULL, OPTION_CALL_SHARED},
98 {"dc", no_argument, NULL, 'd'},
99 {"defsym", required_argument, NULL, OPTION_DEFSYM},
100 {"dll-verbose", no_argument, NULL, OPTION_VERSION}, /* Linux. */
101 {"dn", no_argument, NULL, OPTION_NON_SHARED},
102 {"dp", no_argument, NULL, 'd'},
103 {"dy", no_argument, NULL, OPTION_CALL_SHARED},
104 {"dynamic-linker", required_argument, NULL, OPTION_DYNAMIC_LINKER},
105 {"EB", no_argument, NULL, OPTION_EB},
106 {"EL", no_argument, NULL, OPTION_EL},
107 {"end-group", no_argument, NULL, ')'},
108 {"format", required_argument, NULL, 'b'},
109 {"help", no_argument, NULL, OPTION_HELP},
110 {"Map", required_argument, NULL, OPTION_MAP},
111 {"no-keep-memory", no_argument, NULL, OPTION_NO_KEEP_MEMORY},
112 {"noinhibit-exec", no_argument, NULL, OPTION_NOINHIBIT_EXEC},
113 {"noinhibit_exec", no_argument, NULL, OPTION_NOINHIBIT_EXEC},
114 {"non_shared", no_argument, NULL, OPTION_NON_SHARED},
115 {"oformat", required_argument, NULL, OPTION_OFORMAT},
116 {"Qy", no_argument, NULL, OPTION_IGNORE},
117 {"qmagic", no_argument, NULL, OPTION_IGNORE}, /* Linux compatibility. */
118 {"relax", no_argument, NULL, OPTION_RELAX},
119 {"retain-symbols-file", required_argument, NULL, OPTION_RETAIN_SYMBOLS_FILE},
120 {"rpath", required_argument, NULL, OPTION_RPATH},
121 {"shared", no_argument, NULL, OPTION_SHARED},
122 {"soname", required_argument, NULL, OPTION_SONAME},
123 {"sort-common", no_argument, NULL, OPTION_SORT_COMMON},
124 {"sort_common", no_argument, NULL, OPTION_SORT_COMMON},
125 {"start-group", no_argument, NULL, '('},
126 {"stats", no_argument, NULL, OPTION_STATS},
127 {"static", no_argument, NULL, OPTION_NON_SHARED},
128 {"Tbss", required_argument, NULL, OPTION_TBSS},
129 {"Tdata", required_argument, NULL, OPTION_TDATA},
130 {"Ttext", required_argument, NULL, OPTION_TTEXT},
131 {"traditional-format", no_argument, NULL, OPTION_TRADITIONAL_FORMAT},
132 {"Ur", no_argument, NULL, OPTION_UR},
133 {"version", no_argument, NULL, OPTION_VERSION},
134 {"warn-common", no_argument, NULL, OPTION_WARN_COMMON},
135 {"warn-once", no_argument, NULL, OPTION_WARN_ONCE},
136 {NULL, no_argument, NULL, 0}
141 /* getopt_long_only is like getopt_long, but '-' as well as '--' can
142 indicate a long option. */
144 int optc = getopt_long_only (argc, argv, shortopts, longopts, &longind);
153 case 1: /* File name. */
154 lang_add_input_file (optarg, lang_input_file_is_file_enum,
161 ldfile_add_arch (optarg);
164 lang_add_target (optarg);
167 ldfile_open_command_file (optarg);
168 parser_input = input_mri_script;
171 case OPTION_CALL_SHARED:
172 config.dynamic_link = true;
174 case OPTION_NON_SHARED:
175 config.dynamic_link = false;
178 command_line.force_common_definition = true;
181 lex_redirect (optarg);
182 parser_input = input_defsym;
185 case OPTION_DYNAMIC_LINKER:
186 command_line.interpreter = optarg;
189 /* FIXME: This is currently ignored. It means
190 ``produce a big-endian object file''. It could
191 be used to select an output format. */
194 /* FIXME: This is currently ignored. It means
195 ``produce a little-endian object file''. It could
196 be used to select an output format. */
199 lang_add_entry (optarg, 1);
207 g_switch_value = strtoul (optarg, &end, 0);
209 einfo ("%P%F: invalid number `%s'\n", optarg);
220 ldfile_add_library_path (optarg, true);
223 lang_add_input_file (optarg, lang_input_file_is_l_enum,
227 config.map_filename = "-";
230 /* Ignore. Was handled in a pre-parse. */
233 config.map_filename = optarg;
236 config.text_read_only = false;
237 config.magic_demand_paged = false;
240 config.magic_demand_paged = false;
242 case OPTION_NO_KEEP_MEMORY:
243 link_info.keep_memory = false;
245 case OPTION_NOINHIBIT_EXEC:
246 force_make_executable = true;
249 /* FIXME "-O<non-digits> <value>" used to set the address of
250 section <non-digits>. Was this for compatibility with
251 something, or can we create a new option to do that
252 (with a syntax similar to -defsym)?
253 getopt can't handle two args to an option without kludges. */
254 set_default_dirlist (optarg);
257 lang_add_output (optarg, 0);
260 lang_add_output_format (optarg, 0);
264 link_info.relocateable = true;
265 config.build_constructors = false;
266 config.magic_demand_paged = false;
267 config.text_read_only = false;
268 config.dynamic_link = false;
271 /* The GNU linker traditionally uses -R to mean to include
272 only the symbols from a file. The Solaris linker uses -R
273 to set the path used by the runtime linker to find
274 libraries. This is the GNU linker -rpath argument. We
275 try to support both simultaneously by checking the file
276 named. If it is a directory, rather than a regular file,
277 we assume -rpath was meant. */
281 if (stat (optarg, &s) >= 0
282 && ! S_ISDIR (s.st_mode))
284 lang_add_input_file (optarg,
285 lang_input_file_is_symbols_only_enum,
292 if (command_line.rpath == NULL)
293 command_line.rpath = buystring (optarg);
298 buf = xmalloc (strlen (command_line.rpath)
301 sprintf (buf, "%s:%s", command_line.rpath, optarg);
302 free (command_line.rpath);
303 command_line.rpath = buf;
307 command_line.relax = true;
309 case OPTION_RETAIN_SYMBOLS_FILE:
310 add_keepsyms_file (optarg);
313 link_info.strip = strip_debugger;
316 link_info.strip = strip_all;
319 link_info.shared = true;
322 command_line.soname = optarg;
324 case OPTION_SORT_COMMON:
325 config.sort_common = true;
334 ldfile_open_command_file (optarg);
335 parser_input = input_script;
339 set_section_start (".bss", optarg);
342 set_section_start (".data", optarg);
345 set_section_start (".text", optarg);
347 case OPTION_TRADITIONAL_FORMAT:
348 config.traditional_format = true;
351 link_info.relocateable = true;
352 config.build_constructors = true;
353 config.magic_demand_paged = false;
354 config.text_read_only = false;
355 config.dynamic_link = false;
358 ldlang_add_undef (optarg);
362 version_printed = true;
363 trace_file_tries = true;
367 version_printed = true;
371 version_printed = true;
373 case OPTION_WARN_COMMON:
374 config.warn_common = true;
376 case OPTION_WARN_ONCE:
377 config.warn_once = true;
380 link_info.discard = discard_l;
383 link_info.discard = discard_all;
386 set_default_dirlist (optarg);
395 "%s: may not nest groups (--help for usage)\n",
406 "%s: group ended before it began (--help for usage)\n",
420 /* Add the (colon-separated) elements of DIRLIST_PTR to the
421 library search path. */
424 set_default_dirlist (dirlist_ptr)
431 p = strchr (dirlist_ptr, ':');
435 ldfile_add_library_path (dirlist_ptr, true);
444 set_section_start (sect, valstr)
448 unsigned long val = strtoul (valstr, &end, 16);
450 einfo ("%P%F: invalid hex number `%s'\n", valstr);
451 lang_section_start (sect, exp_intop (val));