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. */
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_TBSS (OPTION_SUBSYSTEM + 1)
97 #define OPTION_TDATA (OPTION_TBSS + 1)
98 #define OPTION_TTEXT (OPTION_TDATA + 1)
99 #define OPTION_TRADITIONAL_FORMAT (OPTION_TTEXT + 1)
100 #define OPTION_UR (OPTION_TRADITIONAL_FORMAT + 1)
101 #define OPTION_VERBOSE (OPTION_UR + 1)
102 #define OPTION_VERSION (OPTION_VERBOSE + 1)
103 #define OPTION_WARN_COMMON (OPTION_VERSION + 1)
104 #define OPTION_WARN_ONCE (OPTION_WARN_COMMON + 1)
105 #define OPTION_SPLIT_BY_RELOC (OPTION_WARN_ONCE + 1)
106 #define OPTION_SPLIT_BY_FILE (OPTION_SPLIT_BY_RELOC + 1)
107 #define OPTION_WHOLE_ARCHIVE (OPTION_SPLIT_BY_FILE + 1)
108 #define OPTION_BASE_FILE (OPTION_WHOLE_ARCHIVE + 1)
109 static struct option longopts
[] = {
110 {"Bdynamic", no_argument
, NULL
, OPTION_CALL_SHARED
},
111 {"Bstatic", no_argument
, NULL
, OPTION_NON_SHARED
},
112 {"call_shared", no_argument
, NULL
, OPTION_CALL_SHARED
},
113 {"dc", no_argument
, NULL
, 'd'},
114 {"defsym", required_argument
, NULL
, OPTION_DEFSYM
},
115 {"dll-verbose", no_argument
, NULL
, OPTION_VERSION
}, /* Linux. */
116 {"dn", no_argument
, NULL
, OPTION_NON_SHARED
},
117 {"dp", no_argument
, NULL
, 'd'},
118 {"dy", no_argument
, NULL
, OPTION_CALL_SHARED
},
119 {"dynamic-linker", required_argument
, NULL
, OPTION_DYNAMIC_LINKER
},
120 {"EB", no_argument
, NULL
, OPTION_EB
},
121 {"EL", no_argument
, NULL
, OPTION_EL
},
122 {"embedded-relocs", no_argument
, NULL
, OPTION_EMBEDDED_RELOCS
},
123 {"end-group", no_argument
, NULL
, ')'},
124 {"export-dynamic", no_argument
, NULL
, OPTION_EXPORT_DYNAMIC
},
125 {"format", required_argument
, NULL
, 'b'},
126 {"heap", required_argument
, NULL
, OPTION_HEAP
}, /* WINDOWS_NT */
127 {"help", no_argument
, NULL
, OPTION_HELP
},
128 {"Map", required_argument
, NULL
, OPTION_MAP
},
129 {"no-keep-memory", no_argument
, NULL
, OPTION_NO_KEEP_MEMORY
},
130 {"noinhibit-exec", no_argument
, NULL
, OPTION_NOINHIBIT_EXEC
},
131 {"noinhibit_exec", no_argument
, NULL
, OPTION_NOINHIBIT_EXEC
},
132 {"non_shared", no_argument
, NULL
, OPTION_NON_SHARED
},
133 {"oformat", required_argument
, NULL
, OPTION_OFORMAT
},
134 {"Qy", no_argument
, NULL
, OPTION_IGNORE
},
135 {"qmagic", no_argument
, NULL
, OPTION_IGNORE
}, /* Linux compatibility. */
136 {"relax", no_argument
, NULL
, OPTION_RELAX
},
137 {"retain-symbols-file", required_argument
, NULL
, OPTION_RETAIN_SYMBOLS_FILE
},
138 {"rpath", required_argument
, NULL
, OPTION_RPATH
},
139 {"shared", no_argument
, NULL
, OPTION_SHARED
},
140 {"soname", required_argument
, NULL
, OPTION_SONAME
},
141 {"sort-common", no_argument
, NULL
, OPTION_SORT_COMMON
},
142 {"sort_common", no_argument
, NULL
, OPTION_SORT_COMMON
},
143 {"stack", required_argument
, NULL
, OPTION_STACK
}, /* WINDOWS_NT */
144 {"start-group", no_argument
, NULL
, '('},
145 {"stats", no_argument
, NULL
, OPTION_STATS
},
146 {"static", no_argument
, NULL
, OPTION_NON_SHARED
},
147 {"subsystem", required_argument
, NULL
, OPTION_SUBSYSTEM
}, /* WINDOWS_NT */
148 {"Tbss", required_argument
, NULL
, OPTION_TBSS
},
149 {"Tdata", required_argument
, NULL
, OPTION_TDATA
},
150 {"Ttext", required_argument
, NULL
, OPTION_TTEXT
},
151 {"traditional-format", no_argument
, NULL
, OPTION_TRADITIONAL_FORMAT
},
152 {"Ur", no_argument
, NULL
, OPTION_UR
},
153 {"verbose", no_argument
, NULL
, OPTION_VERBOSE
},
154 {"version", no_argument
, NULL
, OPTION_VERSION
},
155 {"warn-common", no_argument
, NULL
, OPTION_WARN_COMMON
},
156 {"warn-once", no_argument
, NULL
, OPTION_WARN_ONCE
},
157 {"split-by-reloc", required_argument
, NULL
, OPTION_SPLIT_BY_RELOC
},
158 {"split-by-file", no_argument
, NULL
, OPTION_SPLIT_BY_FILE
},
159 {"whole-archive", no_argument
, NULL
, OPTION_WHOLE_ARCHIVE
},
160 {"base-file", required_argument
, NULL
, OPTION_BASE_FILE
},
161 {NULL
, no_argument
, NULL
, 0}
164 /* The -G option is ambiguous on different platforms. Sometimes it
165 specifies the largest data size to put into the small data
166 section. Sometimes it is equivalent to --shared. Unfortunately,
167 the first form takes an argument, while the second does not.
169 We need to permit the --shared form because on some platforms,
170 such as Solaris, gcc -shared will pass -G to the linker.
172 To permit either usage, we look through the argument list. If we
173 find -G not followed by a number, we change it into --shared.
174 This will work for most normal cases. */
175 for (i
= 1; i
< argc
; i
++)
176 if (strcmp (argv
[i
], "-G") == 0
178 || ! isdigit (argv
[i
+ 1][0])))
179 argv
[i
] = (char *) "--shared";
183 /* getopt_long_only is like getopt_long, but '-' as well as '--' can
184 indicate a long option. */
186 int optc
= getopt_long_only (argc
, argv
, shortopts
, longopts
, &longind
);
195 case 1: /* File name. */
196 lang_add_input_file (optarg
, lang_input_file_is_file_enum
,
203 /* For HP/UX compatibility. Actually -a shared should mean
204 ``use only shared libraries'' but, then, we don't
205 currently support shared libraries on HP/UX anyhow. */
206 if (strcmp (optarg
, "archive") == 0)
207 config
.dynamic_link
= false;
208 else if (strcmp (optarg
, "shared") == 0
209 || strcmp (optarg
, "default") == 0)
210 config
.dynamic_link
= true;
212 einfo ("%P%F: unrecognized -a option `%s'\n", optarg
);
215 ldfile_add_arch (optarg
);
218 lang_add_target (optarg
);
221 ldfile_open_command_file (optarg
);
222 parser_input
= input_mri_script
;
225 case OPTION_CALL_SHARED
:
226 config
.dynamic_link
= true;
228 case OPTION_NON_SHARED
:
229 config
.dynamic_link
= false;
232 command_line
.force_common_definition
= true;
235 lex_redirect (optarg
);
236 parser_input
= input_defsym
;
239 case OPTION_DYNAMIC_LINKER
:
240 command_line
.interpreter
= optarg
;
243 command_line
.endian
= ENDIAN_BIG
;
246 command_line
.endian
= ENDIAN_LITTLE
;
248 case OPTION_EMBEDDED_RELOCS
:
249 command_line
.embedded_relocs
= true;
251 case OPTION_EXPORT_DYNAMIC
:
252 command_line
.export_dynamic
= true;
255 lang_add_entry (optarg
, 1);
263 g_switch_value
= strtoul (optarg
, &end
, 0);
265 einfo ("%P%F: invalid number `%s'\n", optarg
);
271 case OPTION_HEAP
: /* WINDOWS_NT */
272 link_info
.stack_heap_parameters
.heap_defined
= true;
273 set_stack_heap (optarg
, true);
280 ldfile_add_library_path (optarg
, true);
283 lang_add_input_file (optarg
, lang_input_file_is_l_enum
,
287 config
.map_filename
= "-";
290 /* Ignore. Was handled in a pre-parse. */
293 config
.map_filename
= optarg
;
296 config
.text_read_only
= false;
297 config
.magic_demand_paged
= false;
300 config
.magic_demand_paged
= false;
302 case OPTION_NO_KEEP_MEMORY
:
303 link_info
.keep_memory
= false;
305 case OPTION_NOINHIBIT_EXEC
:
306 force_make_executable
= true;
309 /* FIXME "-O<non-digits> <value>" used to set the address of
310 section <non-digits>. Was this for compatibility with
311 something, or can we create a new option to do that
312 (with a syntax similar to -defsym)?
313 getopt can't handle two args to an option without kludges. */
314 set_default_dirlist (optarg
);
317 lang_add_output (optarg
, 0);
320 lang_add_output_format (optarg
, (char *) NULL
, (char *) NULL
, 0);
324 link_info
.relocateable
= true;
325 config
.build_constructors
= false;
326 config
.magic_demand_paged
= false;
327 config
.text_read_only
= false;
328 config
.dynamic_link
= false;
331 /* The GNU linker traditionally uses -R to mean to include
332 only the symbols from a file. The Solaris linker uses -R
333 to set the path used by the runtime linker to find
334 libraries. This is the GNU linker -rpath argument. We
335 try to support both simultaneously by checking the file
336 named. If it is a directory, rather than a regular file,
337 we assume -rpath was meant. */
341 if (stat (optarg
, &s
) >= 0
342 && ! S_ISDIR (s
.st_mode
))
344 lang_add_input_file (optarg
,
345 lang_input_file_is_symbols_only_enum
,
352 if (command_line
.rpath
== NULL
)
353 command_line
.rpath
= buystring (optarg
);
358 buf
= xmalloc (strlen (command_line
.rpath
)
361 sprintf (buf
, "%s:%s", command_line
.rpath
, optarg
);
362 free (command_line
.rpath
);
363 command_line
.rpath
= buf
;
367 command_line
.relax
= true;
369 case OPTION_RETAIN_SYMBOLS_FILE
:
370 add_keepsyms_file (optarg
);
373 link_info
.strip
= strip_debugger
;
376 link_info
.strip
= strip_all
;
379 link_info
.shared
= true;
382 command_line
.soname
= optarg
;
384 case OPTION_SORT_COMMON
:
385 config
.sort_common
= true;
387 case OPTION_STACK
: /* WINDOWS_NT */
388 link_info
.stack_heap_parameters
.stack_defined
= true;
389 set_stack_heap (optarg
, false);
394 case OPTION_SUBSYSTEM
: /* WINDOWS_NT */
395 set_subsystem (optarg
);
401 ldfile_open_command_file (optarg
);
402 parser_input
= input_script
;
406 set_section_start (".bss", optarg
);
409 set_section_start (".data", optarg
);
412 set_section_start (".text", optarg
);
414 case OPTION_TRADITIONAL_FORMAT
:
415 config
.traditional_format
= true;
418 link_info
.relocateable
= true;
419 config
.build_constructors
= true;
420 config
.magic_demand_paged
= false;
421 config
.text_read_only
= false;
422 config
.dynamic_link
= false;
425 ldlang_add_undef (optarg
);
429 version_printed
= true;
430 trace_file_tries
= true;
434 version_printed
= true;
438 version_printed
= true;
442 version_printed
= true;
444 case OPTION_WARN_COMMON
:
445 config
.warn_common
= true;
447 case OPTION_WARN_ONCE
:
448 config
.warn_once
= true;
450 case OPTION_WHOLE_ARCHIVE
:
451 whole_archive
= true;
453 case OPTION_BASE_FILE
:
454 link_info
.base_file
= (PTR
) fopen (optarg
,"w");
455 if (link_info
.base_file
== NULL
)
457 fprintf (stderr
, "%s: Can't open base file %s\n",
458 program_name
, optarg
);
463 link_info
.discard
= discard_l
;
466 link_info
.discard
= discard_all
;
469 set_default_dirlist (optarg
);
475 /* We accept and ignore this option for Solaris
476 compatibility. Actually, on Solaris, optarg is not
477 ignored. Someday we should handle it correctly. FIXME. */
479 case OPTION_SPLIT_BY_RELOC
:
480 config
.split_by_reloc
= atoi (optarg
);
482 case OPTION_SPLIT_BY_FILE
:
483 config
.split_by_file
= true;
489 "%s: may not nest groups (--help for usage)\n",
500 "%s: group ended before it began (--help for usage)\n",
514 /* Add the (colon-separated) elements of DIRLIST_PTR to the
515 library search path. */
518 set_default_dirlist (dirlist_ptr
)
525 p
= strchr (dirlist_ptr
, ':');
529 ldfile_add_library_path (dirlist_ptr
, true);
538 set_section_start (sect
, valstr
)
542 unsigned long val
= strtoul (valstr
, &end
, 16);
544 einfo ("%P%F: invalid hex number `%s'\n", valstr
);
545 lang_section_start (sect
, exp_intop (val
));
548 /* WINDOWS_NT; added routines to get the subsystem type, heap and/or stack
549 parameters which may be input from the command line */
551 set_subsystem (subsystem_type
)
552 char *subsystem_type
;
554 if (strcmp (subsystem_type
, "native") == 0)
556 link_info
.subsystem
= native
;
558 else if (strcmp (subsystem_type
, "windows") == 0)
560 link_info
.subsystem
= windows
;
562 else if (strcmp (subsystem_type
, "console") == 0)
564 link_info
.subsystem
= console
;
566 else if (strcmp (subsystem_type
, "os2") == 0)
568 link_info
.subsystem
= os2
;
570 else if (strcmp (subsystem_type
, "posix") == 0)
572 link_info
.subsystem
= posix
;
575 einfo ("%P%F: invalid subsystem type `%s'\n", subsystem_type
);
580 set_stack_heap (valstr
, for_heap
)
584 char *begin_commit
, *end
;
588 /* There may be two values passed in to the -stack or -heap switches like
591 where the first parameter is the stack (or heap) reserve and the second
592 is commit. The second parameter is optional. */
594 /* get the reserve value */
595 reserve
= strtoul (valstr
, &begin_commit
, 16);
597 if (strcmp (valstr
, begin_commit
) == 0)
598 /* the reserve value couldn't be read */
599 einfo ("%P%F: invalid hex number for reserve[,commit] '%s'\n", valstr
);
600 else if (strcmp (begin_commit
, "\0") != 0) /* check for a commit value */
602 begin_commit
+= 1; /* increment begin_commit to point past ',' */
603 commit
= strtoul (begin_commit
, &end
, 16);
604 if (strcmp (end
, begin_commit
) == 0)
605 einfo ("%P%F: invalid hex number for commit '%s'\n", begin_commit
);
610 link_info
.stack_heap_parameters
.heap_reserve
= reserve
;
611 link_info
.stack_heap_parameters
.heap_commit
= commit
;
615 link_info
.stack_heap_parameters
.stack_reserve
= reserve
;
616 link_info
.stack_heap_parameters
.stack_commit
= commit
;
620 printf ("reserve = %8x commit = %8x\n", reserve
, commit
);