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 /* Omit args to avoid the possibility of clashing with a system header
38 that might disagree about consts. */
39 unsigned long strtoul ();
41 static void set_default_dirlist
PARAMS ((char *dirlist_ptr
));
42 static void set_section_start
PARAMS ((char *sect
, char *valstr
));
45 parse_args (argc
, argv
)
51 /* Starting the short option string with '-' is for programs that
52 expect options and other ARGV-elements in any order and that care about
53 the ordering of the two. We describe each non-option ARGV-element
54 as if it were the argument of an option with character code 1. */
56 const char *shortopts
=
57 "-A:B::b:cde:F::G:giL:l:Mm:NnO:o:R:rSsT:tu:VvXxY:y:()";
59 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
61 #define OPTION_CALL_SHARED 150
62 #define OPTION_DEFSYM (OPTION_CALL_SHARED + 1)
63 #define OPTION_DYNAMIC_LINKER (OPTION_DEFSYM + 1)
64 #define OPTION_EB (OPTION_DYNAMIC_LINKER + 1)
65 #define OPTION_EL (OPTION_EB + 1)
66 #define OPTION_HELP (OPTION_EL + 1)
67 #define OPTION_IGNORE (OPTION_HELP + 1)
68 #define OPTION_MAP (OPTION_IGNORE + 1)
69 #define OPTION_NO_KEEP_MEMORY (OPTION_MAP + 1)
70 #define OPTION_NOINHIBIT_EXEC (OPTION_NO_KEEP_MEMORY + 1)
71 #define OPTION_NON_SHARED (OPTION_NOINHIBIT_EXEC + 1)
72 #define OPTION_OFORMAT (OPTION_NON_SHARED + 1)
73 #define OPTION_RELAX (OPTION_OFORMAT + 1)
74 #define OPTION_RETAIN_SYMBOLS_FILE (OPTION_RELAX + 1)
75 #define OPTION_SHARED (OPTION_RETAIN_SYMBOLS_FILE + 1)
76 #define OPTION_SORT_COMMON (OPTION_SHARED + 1)
77 #define OPTION_STATS (OPTION_SORT_COMMON + 1)
78 #define OPTION_TBSS (OPTION_STATS + 1)
79 #define OPTION_TDATA (OPTION_TBSS + 1)
80 #define OPTION_TTEXT (OPTION_TDATA + 1)
81 #define OPTION_TRADITIONAL_FORMAT (OPTION_TTEXT + 1)
82 #define OPTION_UR (OPTION_TRADITIONAL_FORMAT + 1)
83 #define OPTION_VERSION (OPTION_UR + 1)
84 #define OPTION_WARN_COMMON (OPTION_VERSION + 1)
86 static struct option longopts
[] = {
87 {"Bdynamic", no_argument
, NULL
, OPTION_CALL_SHARED
},
88 {"Bstatic", no_argument
, NULL
, OPTION_NON_SHARED
},
89 {"call_shared", no_argument
, NULL
, OPTION_CALL_SHARED
},
90 {"dc", no_argument
, NULL
, 'd'},
91 {"defsym", required_argument
, NULL
, OPTION_DEFSYM
},
92 {"dn", no_argument
, NULL
, OPTION_NON_SHARED
},
93 {"dp", no_argument
, NULL
, 'd'},
94 {"dy", no_argument
, NULL
, OPTION_CALL_SHARED
},
95 {"dynamic-linker", required_argument
, NULL
, OPTION_DYNAMIC_LINKER
},
96 {"EB", no_argument
, NULL
, OPTION_EB
},
97 {"EL", no_argument
, NULL
, OPTION_EL
},
98 {"end-group", no_argument
, NULL
, ')'},
99 {"format", required_argument
, NULL
, 'b'},
100 {"help", no_argument
, NULL
, OPTION_HELP
},
101 {"Map", required_argument
, NULL
, OPTION_MAP
},
102 {"no-keep-memory", no_argument
, NULL
, OPTION_NO_KEEP_MEMORY
},
103 {"noinhibit-exec", no_argument
, NULL
, OPTION_NOINHIBIT_EXEC
},
104 {"noinhibit_exec", no_argument
, NULL
, OPTION_NOINHIBIT_EXEC
},
105 {"non_shared", no_argument
, NULL
, OPTION_NON_SHARED
},
106 {"oformat", required_argument
, NULL
, OPTION_OFORMAT
},
107 {"Qy", no_argument
, NULL
, OPTION_IGNORE
},
108 {"qmagic", no_argument
, NULL
, OPTION_IGNORE
}, /* Linux compatibility. */
109 {"relax", no_argument
, NULL
, OPTION_RELAX
},
110 {"retain-symbols-file", required_argument
, NULL
, OPTION_RETAIN_SYMBOLS_FILE
},
111 {"shared", no_argument
, NULL
, OPTION_SHARED
},
112 {"sort-common", no_argument
, NULL
, OPTION_SORT_COMMON
},
113 {"sort_common", no_argument
, NULL
, OPTION_SORT_COMMON
},
114 {"start-group", no_argument
, NULL
, '('},
115 {"stats", no_argument
, NULL
, OPTION_STATS
},
116 {"static", no_argument
, NULL
, OPTION_NON_SHARED
},
117 {"Tbss", required_argument
, NULL
, OPTION_TBSS
},
118 {"Tdata", required_argument
, NULL
, OPTION_TDATA
},
119 {"Ttext", required_argument
, NULL
, OPTION_TTEXT
},
120 {"traditional-format", no_argument
, NULL
, OPTION_TRADITIONAL_FORMAT
},
121 {"Ur", no_argument
, NULL
, OPTION_UR
},
122 {"version", no_argument
, NULL
, OPTION_VERSION
},
123 {"warn-common", no_argument
, NULL
, OPTION_WARN_COMMON
},
124 {NULL
, no_argument
, NULL
, 0}
129 /* getopt_long_only is like getopt_long, but '-' as well as '--' can
130 indicate a long option. */
132 int optc
= getopt_long_only (argc
, argv
, shortopts
, longopts
, &longind
);
141 case 1: /* File name. */
142 lang_add_input_file (optarg
, lang_input_file_is_file_enum
,
149 ldfile_add_arch (optarg
);
152 lang_add_target (optarg
);
155 ldfile_open_command_file (optarg
);
156 parser_input
= input_mri_script
;
159 case OPTION_CALL_SHARED
:
160 config
.dynamic_link
= true;
162 case OPTION_NON_SHARED
:
163 config
.dynamic_link
= false;
166 command_line
.force_common_definition
= true;
169 lex_redirect (optarg
);
170 parser_input
= input_defsym
;
173 case OPTION_DYNAMIC_LINKER
:
174 command_line
.interpreter
= optarg
;
177 /* FIXME: This is currently ignored. It means
178 ``produce a big-endian object file''. It could
179 be used to select an output format. */
182 /* FIXME: This is currently ignored. It means
183 ``produce a little-endian object file''. It could
184 be used to select an output format. */
187 lang_add_entry (optarg
, 1);
195 g_switch_value
= strtoul (optarg
, &end
, 0);
197 einfo ("%P%F: invalid number `%s'\n", optarg
);
208 ldfile_add_library_path (optarg
, true);
211 lang_add_input_file (optarg
, lang_input_file_is_l_enum
,
215 config
.map_filename
= "-";
218 /* Ignore. Was handled in a pre-parse. */
221 config
.map_filename
= optarg
;
224 config
.text_read_only
= false;
225 config
.magic_demand_paged
= false;
228 config
.magic_demand_paged
= false;
230 case OPTION_NO_KEEP_MEMORY
:
231 link_info
.keep_memory
= false;
233 case OPTION_NOINHIBIT_EXEC
:
234 force_make_executable
= true;
237 /* FIXME "-O<non-digits> <value>" used to set the address of
238 section <non-digits>. Was this for compatibility with
239 something, or can we create a new option to do that
240 (with a syntax similar to -defsym)?
241 getopt can't handle two args to an option without kludges. */
242 set_default_dirlist (optarg
);
245 lang_add_output (optarg
, 0);
248 lang_add_output_format (optarg
, 0);
252 link_info
.relocateable
= true;
253 config
.build_constructors
= false;
254 config
.magic_demand_paged
= false;
255 config
.text_read_only
= false;
256 config
.dynamic_link
= false;
259 lang_add_input_file (optarg
,
260 lang_input_file_is_symbols_only_enum
,
264 command_line
.relax
= true;
266 case OPTION_RETAIN_SYMBOLS_FILE
:
267 add_keepsyms_file (optarg
);
270 link_info
.strip
= strip_debugger
;
273 link_info
.strip
= strip_all
;
276 link_info
.shared
= true;
278 case OPTION_SORT_COMMON
:
279 config
.sort_common
= true;
288 ldfile_open_command_file (optarg
);
289 parser_input
= input_script
;
293 set_section_start (".bss", optarg
);
296 set_section_start (".data", optarg
);
299 set_section_start (".text", optarg
);
301 case OPTION_TRADITIONAL_FORMAT
:
302 config
.traditional_format
= true;
305 link_info
.relocateable
= true;
306 config
.build_constructors
= true;
307 config
.magic_demand_paged
= false;
308 config
.text_read_only
= false;
309 config
.dynamic_link
= false;
312 ldlang_add_undef (optarg
);
316 version_printed
= true;
317 trace_file_tries
= true;
321 version_printed
= true;
325 version_printed
= true;
327 case OPTION_WARN_COMMON
:
328 config
.warn_common
= true;
331 link_info
.discard
= discard_l
;
334 link_info
.discard
= discard_all
;
337 set_default_dirlist (optarg
);
346 "%s: may not nest groups (--help for usage)\n",
357 "%s: group ended before it began (--help for usage)\n",
371 /* Add the (colon-separated) elements of DIRLIST_PTR to the
372 library search path. */
375 set_default_dirlist (dirlist_ptr
)
382 p
= strchr (dirlist_ptr
, ':');
386 ldfile_add_library_path (dirlist_ptr
, true);
395 set_section_start (sect
, valstr
)
399 unsigned long val
= strtoul (valstr
, &end
, 16);
401 einfo ("%P%F: invalid hex number `%s'\n", valstr
);
402 lang_section_start (sect
, exp_intop (val
));