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, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
38 /* Somewhere above, sys/stat.h got included . . . . */
39 #if !defined(S_ISDIR) && defined(S_IFDIR)
40 #define S_ISDIR(m) (((m) & S_IFMT) == S_IFDIR)
43 /* Omit args to avoid the possibility of clashing with a system header
44 that might disagree about consts. */
45 unsigned long strtoul ();
47 static void set_default_dirlist
PARAMS ((char *dirlist_ptr
));
48 static void set_section_start
PARAMS ((char *sect
, char *valstr
));
50 /* WINDOWS_NT; declare additional functions */
51 static void set_subsystem
PARAMS ((char *subsystem_type
));
52 static void set_stack_heap
PARAMS ((char *valstr
, boolean for_heap
));
55 parse_args (argc
, argv
)
62 /* Starting the short option string with '-' is for programs that
63 expect options and other ARGV-elements in any order and that care about
64 the ordering of the two. We describe each non-option ARGV-element
65 as if it were the argument of an option with character code 1. */
67 const char *shortopts
=
68 "-a:A:B::b:c:de:F::G:giL:l:Mm:NnO:o:R:rSsT:tu:VvXxY:y:z:()";
70 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
72 #define OPTION_CALL_SHARED 150
73 #define OPTION_DEFSYM (OPTION_CALL_SHARED + 1)
74 #define OPTION_DYNAMIC_LINKER (OPTION_DEFSYM + 1)
75 #define OPTION_EB (OPTION_DYNAMIC_LINKER + 1)
76 #define OPTION_EL (OPTION_EB + 1)
77 #define OPTION_HEAP (OPTION_EL + 1)
78 #define OPTION_EMBEDDED_RELOCS (OPTION_HEAP + 1)
79 #define OPTION_EXPORT_DYNAMIC (OPTION_EMBEDDED_RELOCS + 1)
80 #define OPTION_HELP (OPTION_EXPORT_DYNAMIC + 1)
81 #define OPTION_IGNORE (OPTION_HELP + 1)
82 #define OPTION_MAP (OPTION_IGNORE + 1)
83 #define OPTION_NO_KEEP_MEMORY (OPTION_MAP + 1)
84 #define OPTION_NOINHIBIT_EXEC (OPTION_NO_KEEP_MEMORY + 1)
85 #define OPTION_NON_SHARED (OPTION_NOINHIBIT_EXEC + 1)
86 #define OPTION_OFORMAT (OPTION_NON_SHARED + 1)
87 #define OPTION_RELAX (OPTION_OFORMAT + 1)
88 #define OPTION_RETAIN_SYMBOLS_FILE (OPTION_RELAX + 1)
89 #define OPTION_RPATH (OPTION_RETAIN_SYMBOLS_FILE + 1)
90 #define OPTION_SHARED (OPTION_RPATH + 1)
91 #define OPTION_SONAME (OPTION_SHARED + 1)
92 #define OPTION_SORT_COMMON (OPTION_SONAME + 1)
93 #define OPTION_STACK (OPTION_SORT_COMMON + 1) /*WINDOWS_NT*/
94 #define OPTION_STATS (OPTION_STACK + 1)
95 #define OPTION_SUBSYSTEM (OPTION_STATS + 1) /* WINDOWS_NT */
96 #define OPTION_SYMBOLIC (OPTION_SUBSYSTEM + 1)
97 #define OPTION_TBSS (OPTION_SYMBOLIC + 1)
98 #define OPTION_TDATA (OPTION_TBSS + 1)
99 #define OPTION_TTEXT (OPTION_TDATA + 1)
100 #define OPTION_TRADITIONAL_FORMAT (OPTION_TTEXT + 1)
101 #define OPTION_UR (OPTION_TRADITIONAL_FORMAT + 1)
102 #define OPTION_VERBOSE (OPTION_UR + 1)
103 #define OPTION_VERSION (OPTION_VERBOSE + 1)
104 #define OPTION_WARN_COMMON (OPTION_VERSION + 1)
105 #define OPTION_WARN_ONCE (OPTION_WARN_COMMON + 1)
106 #define OPTION_SPLIT_BY_RELOC (OPTION_WARN_ONCE + 1)
107 #define OPTION_SPLIT_BY_FILE (OPTION_SPLIT_BY_RELOC + 1)
108 #define OPTION_WHOLE_ARCHIVE (OPTION_SPLIT_BY_FILE + 1)
109 #define OPTION_BASE_FILE (OPTION_WHOLE_ARCHIVE + 1)
110 static struct option longopts
[] = {
111 {"Bdynamic", no_argument
, NULL
, OPTION_CALL_SHARED
},
112 {"Bstatic", no_argument
, NULL
, OPTION_NON_SHARED
},
113 {"Bsymbolic", no_argument
, NULL
, OPTION_SYMBOLIC
},
114 {"call_shared", no_argument
, NULL
, OPTION_CALL_SHARED
},
115 {"dc", no_argument
, NULL
, 'd'},
116 {"defsym", required_argument
, NULL
, OPTION_DEFSYM
},
117 {"dll-verbose", no_argument
, NULL
, OPTION_VERSION
}, /* Linux. */
118 {"dn", no_argument
, NULL
, OPTION_NON_SHARED
},
119 {"dp", no_argument
, NULL
, 'd'},
120 {"dy", no_argument
, NULL
, OPTION_CALL_SHARED
},
121 {"dynamic-linker", required_argument
, NULL
, OPTION_DYNAMIC_LINKER
},
122 {"EB", no_argument
, NULL
, OPTION_EB
},
123 {"EL", no_argument
, NULL
, OPTION_EL
},
124 {"embedded-relocs", no_argument
, NULL
, OPTION_EMBEDDED_RELOCS
},
125 {"end-group", no_argument
, NULL
, ')'},
126 {"export-dynamic", no_argument
, NULL
, OPTION_EXPORT_DYNAMIC
},
127 {"format", required_argument
, NULL
, 'b'},
128 {"heap", required_argument
, NULL
, OPTION_HEAP
}, /* WINDOWS_NT */
129 {"help", no_argument
, NULL
, OPTION_HELP
},
130 {"Map", required_argument
, NULL
, OPTION_MAP
},
131 {"no-keep-memory", no_argument
, NULL
, OPTION_NO_KEEP_MEMORY
},
132 {"noinhibit-exec", no_argument
, NULL
, OPTION_NOINHIBIT_EXEC
},
133 {"noinhibit_exec", no_argument
, NULL
, OPTION_NOINHIBIT_EXEC
},
134 {"non_shared", no_argument
, NULL
, OPTION_NON_SHARED
},
135 {"oformat", required_argument
, NULL
, OPTION_OFORMAT
},
136 {"Qy", no_argument
, NULL
, OPTION_IGNORE
},
137 {"qmagic", no_argument
, NULL
, OPTION_IGNORE
}, /* Linux compatibility. */
138 {"relax", no_argument
, NULL
, OPTION_RELAX
},
139 {"retain-symbols-file", required_argument
, NULL
, OPTION_RETAIN_SYMBOLS_FILE
},
140 {"rpath", required_argument
, NULL
, OPTION_RPATH
},
141 {"shared", no_argument
, NULL
, OPTION_SHARED
},
142 {"soname", required_argument
, NULL
, OPTION_SONAME
},
143 {"sort-common", no_argument
, NULL
, OPTION_SORT_COMMON
},
144 {"sort_common", no_argument
, NULL
, OPTION_SORT_COMMON
},
145 {"stack", required_argument
, NULL
, OPTION_STACK
}, /* WINDOWS_NT */
146 {"start-group", no_argument
, NULL
, '('},
147 {"stats", no_argument
, NULL
, OPTION_STATS
},
148 {"static", no_argument
, NULL
, OPTION_NON_SHARED
},
149 {"subsystem", required_argument
, NULL
, OPTION_SUBSYSTEM
}, /* WINDOWS_NT */
150 {"Tbss", required_argument
, NULL
, OPTION_TBSS
},
151 {"Tdata", required_argument
, NULL
, OPTION_TDATA
},
152 {"Ttext", required_argument
, NULL
, OPTION_TTEXT
},
153 {"traditional-format", no_argument
, NULL
, OPTION_TRADITIONAL_FORMAT
},
154 {"Ur", no_argument
, NULL
, OPTION_UR
},
155 {"verbose", no_argument
, NULL
, OPTION_VERBOSE
},
156 {"version", no_argument
, NULL
, OPTION_VERSION
},
157 {"warn-common", no_argument
, NULL
, OPTION_WARN_COMMON
},
158 {"warn-once", no_argument
, NULL
, OPTION_WARN_ONCE
},
159 {"split-by-reloc", required_argument
, NULL
, OPTION_SPLIT_BY_RELOC
},
160 {"split-by-file", no_argument
, NULL
, OPTION_SPLIT_BY_FILE
},
161 {"whole-archive", no_argument
, NULL
, OPTION_WHOLE_ARCHIVE
},
162 {"base-file", required_argument
, NULL
, OPTION_BASE_FILE
},
163 {NULL
, no_argument
, NULL
, 0}
166 /* The -G option is ambiguous on different platforms. Sometimes it
167 specifies the largest data size to put into the small data
168 section. Sometimes it is equivalent to --shared. Unfortunately,
169 the first form takes an argument, while the second does not.
171 We need to permit the --shared form because on some platforms,
172 such as Solaris, gcc -shared will pass -G to the linker.
174 To permit either usage, we look through the argument list. If we
175 find -G not followed by a number, we change it into --shared.
176 This will work for most normal cases. */
177 for (i
= 1; i
< argc
; i
++)
178 if (strcmp (argv
[i
], "-G") == 0
180 || ! isdigit (argv
[i
+ 1][0])))
181 argv
[i
] = (char *) "--shared";
185 /* getopt_long_only is like getopt_long, but '-' as well as '--' can
186 indicate a long option. */
188 int optc
= getopt_long_only (argc
, argv
, shortopts
, longopts
, &longind
);
197 case 1: /* File name. */
198 lang_add_input_file (optarg
, lang_input_file_is_file_enum
,
205 /* For HP/UX compatibility. Actually -a shared should mean
206 ``use only shared libraries'' but, then, we don't
207 currently support shared libraries on HP/UX anyhow. */
208 if (strcmp (optarg
, "archive") == 0)
209 config
.dynamic_link
= false;
210 else if (strcmp (optarg
, "shared") == 0
211 || strcmp (optarg
, "default") == 0)
212 config
.dynamic_link
= true;
214 einfo ("%P%F: unrecognized -a option `%s'\n", optarg
);
217 ldfile_add_arch (optarg
);
220 lang_add_target (optarg
);
223 ldfile_open_command_file (optarg
);
224 parser_input
= input_mri_script
;
227 case OPTION_CALL_SHARED
:
228 config
.dynamic_link
= true;
230 case OPTION_NON_SHARED
:
231 config
.dynamic_link
= false;
234 command_line
.force_common_definition
= true;
237 lex_redirect (optarg
);
238 parser_input
= input_defsym
;
241 case OPTION_DYNAMIC_LINKER
:
242 command_line
.interpreter
= optarg
;
245 command_line
.endian
= ENDIAN_BIG
;
248 command_line
.endian
= ENDIAN_LITTLE
;
250 case OPTION_EMBEDDED_RELOCS
:
251 command_line
.embedded_relocs
= true;
253 case OPTION_EXPORT_DYNAMIC
:
254 command_line
.export_dynamic
= true;
257 lang_add_entry (optarg
, 1);
265 g_switch_value
= strtoul (optarg
, &end
, 0);
267 einfo ("%P%F: invalid number `%s'\n", optarg
);
273 case OPTION_HEAP
: /* WINDOWS_NT */
274 link_info
.stack_heap_parameters
.heap_defined
= true;
275 set_stack_heap (optarg
, true);
282 ldfile_add_library_path (optarg
, true);
285 lang_add_input_file (optarg
, lang_input_file_is_l_enum
,
289 config
.map_filename
= "-";
292 /* Ignore. Was handled in a pre-parse. */
295 config
.map_filename
= optarg
;
298 config
.text_read_only
= false;
299 config
.magic_demand_paged
= false;
302 config
.magic_demand_paged
= false;
304 case OPTION_NO_KEEP_MEMORY
:
305 link_info
.keep_memory
= false;
307 case OPTION_NOINHIBIT_EXEC
:
308 force_make_executable
= true;
311 /* FIXME "-O<non-digits> <value>" used to set the address of
312 section <non-digits>. Was this for compatibility with
313 something, or can we create a new option to do that
314 (with a syntax similar to -defsym)?
315 getopt can't handle two args to an option without kludges. */
316 set_default_dirlist (optarg
);
319 lang_add_output (optarg
, 0);
322 lang_add_output_format (optarg
, (char *) NULL
, (char *) NULL
, 0);
326 link_info
.relocateable
= true;
327 config
.build_constructors
= false;
328 config
.magic_demand_paged
= false;
329 config
.text_read_only
= false;
330 config
.dynamic_link
= false;
333 /* The GNU linker traditionally uses -R to mean to include
334 only the symbols from a file. The Solaris linker uses -R
335 to set the path used by the runtime linker to find
336 libraries. This is the GNU linker -rpath argument. We
337 try to support both simultaneously by checking the file
338 named. If it is a directory, rather than a regular file,
339 we assume -rpath was meant. */
343 if (stat (optarg
, &s
) >= 0
344 && ! S_ISDIR (s
.st_mode
))
346 lang_add_input_file (optarg
,
347 lang_input_file_is_symbols_only_enum
,
354 if (command_line
.rpath
== NULL
)
355 command_line
.rpath
= buystring (optarg
);
360 buf
= xmalloc (strlen (command_line
.rpath
)
363 sprintf (buf
, "%s:%s", command_line
.rpath
, optarg
);
364 free (command_line
.rpath
);
365 command_line
.rpath
= buf
;
369 command_line
.relax
= true;
371 case OPTION_RETAIN_SYMBOLS_FILE
:
372 add_keepsyms_file (optarg
);
375 link_info
.strip
= strip_debugger
;
378 link_info
.strip
= strip_all
;
381 link_info
.shared
= true;
384 command_line
.soname
= optarg
;
386 case OPTION_SORT_COMMON
:
387 config
.sort_common
= true;
389 case OPTION_STACK
: /* WINDOWS_NT */
390 link_info
.stack_heap_parameters
.stack_defined
= true;
391 set_stack_heap (optarg
, false);
396 case OPTION_SUBSYSTEM
: /* WINDOWS_NT */
397 set_subsystem (optarg
);
399 case OPTION_SYMBOLIC
:
400 link_info
.symbolic
= true;
406 ldfile_open_command_file (optarg
);
407 parser_input
= input_script
;
411 set_section_start (".bss", optarg
);
414 set_section_start (".data", optarg
);
417 set_section_start (".text", optarg
);
419 case OPTION_TRADITIONAL_FORMAT
:
420 config
.traditional_format
= true;
423 link_info
.relocateable
= true;
424 config
.build_constructors
= true;
425 config
.magic_demand_paged
= false;
426 config
.text_read_only
= false;
427 config
.dynamic_link
= false;
430 ldlang_add_undef (optarg
);
434 version_printed
= true;
435 trace_file_tries
= true;
439 version_printed
= true;
443 version_printed
= true;
447 version_printed
= true;
449 case OPTION_WARN_COMMON
:
450 config
.warn_common
= true;
452 case OPTION_WARN_ONCE
:
453 config
.warn_once
= true;
455 case OPTION_WHOLE_ARCHIVE
:
456 whole_archive
= true;
458 case OPTION_BASE_FILE
:
459 link_info
.base_file
= (PTR
) fopen (optarg
,"w");
460 if (link_info
.base_file
== NULL
)
462 fprintf (stderr
, "%s: Can't open base file %s\n",
463 program_name
, optarg
);
468 link_info
.discard
= discard_l
;
471 link_info
.discard
= discard_all
;
474 set_default_dirlist (optarg
);
480 /* We accept and ignore this option for Solaris
481 compatibility. Actually, on Solaris, optarg is not
482 ignored. Someday we should handle it correctly. FIXME. */
484 case OPTION_SPLIT_BY_RELOC
:
485 config
.split_by_reloc
= atoi (optarg
);
487 case OPTION_SPLIT_BY_FILE
:
488 config
.split_by_file
= true;
494 "%s: may not nest groups (--help for usage)\n",
505 "%s: group ended before it began (--help for usage)\n",
519 /* Add the (colon-separated) elements of DIRLIST_PTR to the
520 library search path. */
523 set_default_dirlist (dirlist_ptr
)
530 p
= strchr (dirlist_ptr
, ':');
534 ldfile_add_library_path (dirlist_ptr
, true);
543 set_section_start (sect
, valstr
)
547 unsigned long val
= strtoul (valstr
, &end
, 16);
549 einfo ("%P%F: invalid hex number `%s'\n", valstr
);
550 lang_section_start (sect
, exp_intop (val
));
553 /* WINDOWS_NT; added routines to get the subsystem type, heap and/or stack
554 parameters which may be input from the command line */
556 set_subsystem (subsystem_type
)
557 char *subsystem_type
;
559 if (strcmp (subsystem_type
, "native") == 0)
561 link_info
.subsystem
= native
;
563 else if (strcmp (subsystem_type
, "windows") == 0)
565 link_info
.subsystem
= windows
;
567 else if (strcmp (subsystem_type
, "console") == 0)
569 link_info
.subsystem
= console
;
571 else if (strcmp (subsystem_type
, "os2") == 0)
573 link_info
.subsystem
= os2
;
575 else if (strcmp (subsystem_type
, "posix") == 0)
577 link_info
.subsystem
= posix
;
580 einfo ("%P%F: invalid subsystem type `%s'\n", subsystem_type
);
585 set_stack_heap (valstr
, for_heap
)
589 char *begin_commit
, *end
;
593 /* There may be two values passed in to the -stack or -heap switches like
596 where the first parameter is the stack (or heap) reserve and the second
597 is commit. The second parameter is optional. */
599 /* get the reserve value */
600 reserve
= strtoul (valstr
, &begin_commit
, 16);
602 if (strcmp (valstr
, begin_commit
) == 0)
603 /* the reserve value couldn't be read */
604 einfo ("%P%F: invalid hex number for reserve[,commit] '%s'\n", valstr
);
605 else if (strcmp (begin_commit
, "\0") != 0) /* check for a commit value */
607 begin_commit
+= 1; /* increment begin_commit to point past ',' */
608 commit
= strtoul (begin_commit
, &end
, 16);
609 if (strcmp (end
, begin_commit
) == 0)
610 einfo ("%P%F: invalid hex number for commit '%s'\n", begin_commit
);
615 link_info
.stack_heap_parameters
.heap_reserve
= reserve
;
616 link_info
.stack_heap_parameters
.heap_commit
= commit
;
620 link_info
.stack_heap_parameters
.stack_reserve
= reserve
;
621 link_info
.stack_heap_parameters
.stack_commit
= commit
;
625 printf ("reserve = %8x commit = %8x\n", reserve
, commit
);