1 /* objcopy.c -- copy object file from input to output, optionally massaging it.
2 Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
3 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009
4 Free Software Foundation, Inc.
6 This file is part of GNU Binutils.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
27 #include "libiberty.h"
30 #include "filenames.h"
36 struct is_specified_symbol_predicate_data
42 /* A list to support redefine_sym. */
47 struct redefine_node
*next
;
50 typedef struct section_rename
52 const char * old_name
;
53 const char * new_name
;
55 struct section_rename
* next
;
59 /* List of sections to be renamed. */
60 static section_rename
*section_rename_list
;
62 static asymbol
**isympp
= NULL
; /* Input symbols. */
63 static asymbol
**osympp
= NULL
; /* Output symbols that survive stripping. */
65 /* If `copy_byte' >= 0, copy only that byte of every `interleave' bytes. */
66 static int copy_byte
= -1;
67 static int interleave
= 4;
69 static bfd_boolean verbose
; /* Print file and target names. */
70 static bfd_boolean preserve_dates
; /* Preserve input file timestamp. */
71 static int status
= 0; /* Exit status. */
76 STRIP_NONE
, /* Don't strip. */
77 STRIP_DEBUG
, /* Strip all debugger symbols. */
78 STRIP_UNNEEDED
, /* Strip unnecessary symbols. */
79 STRIP_NONDEBUG
, /* Strip everything but debug info. */
80 STRIP_ALL
/* Strip all symbols. */
83 /* Which symbols to remove. */
84 static enum strip_action strip_symbols
;
89 LOCALS_START_L
, /* Discard locals starting with L. */
90 LOCALS_ALL
/* Discard all locals. */
93 /* Which local symbols to remove. Overrides STRIP_ALL. */
94 static enum locals_action discard_locals
;
96 /* What kind of change to perform. */
104 /* Structure used to hold lists of sections and actions to take. */
107 struct section_list
* next
; /* Next section to change. */
108 const char * name
; /* Section name. */
109 bfd_boolean used
; /* Whether this entry was used. */
110 bfd_boolean remove
; /* Whether to remove this section. */
111 bfd_boolean copy
; /* Whether to copy this section. */
112 enum change_action change_vma
;/* Whether to change or set VMA. */
113 bfd_vma vma_val
; /* Amount to change by or set to. */
114 enum change_action change_lma
;/* Whether to change or set LMA. */
115 bfd_vma lma_val
; /* Amount to change by or set to. */
116 bfd_boolean set_flags
; /* Whether to set the section flags. */
117 flagword flags
; /* What to set the section flags to. */
120 static struct section_list
*change_sections
;
122 /* TRUE if some sections are to be removed. */
123 static bfd_boolean sections_removed
;
125 /* TRUE if only some sections are to be copied. */
126 static bfd_boolean sections_copied
;
128 /* Changes to the start address. */
129 static bfd_vma change_start
= 0;
130 static bfd_boolean set_start_set
= FALSE
;
131 static bfd_vma set_start
;
133 /* Changes to section addresses. */
134 static bfd_vma change_section_address
= 0;
136 /* Filling gaps between sections. */
137 static bfd_boolean gap_fill_set
= FALSE
;
138 static bfd_byte gap_fill
= 0;
140 /* Pad to a given address. */
141 static bfd_boolean pad_to_set
= FALSE
;
142 static bfd_vma pad_to
;
144 /* Use alternative machine code? */
145 static unsigned long use_alt_mach_code
= 0;
147 /* Output BFD flags user wants to set or clear */
148 static flagword bfd_flags_to_set
;
149 static flagword bfd_flags_to_clear
;
151 /* List of sections to add. */
154 /* Next section to add. */
155 struct section_add
*next
;
156 /* Name of section to add. */
158 /* Name of file holding section contents. */
159 const char *filename
;
162 /* Contents of file. */
164 /* BFD section, after it has been added. */
168 /* List of sections to add to the output BFD. */
169 static struct section_add
*add_sections
;
171 /* If non-NULL the argument to --add-gnu-debuglink.
172 This should be the filename to store in the .gnu_debuglink section. */
173 static const char * gnu_debuglink_filename
= NULL
;
175 /* Whether to convert debugging information. */
176 static bfd_boolean convert_debugging
= FALSE
;
178 /* Whether to change the leading character in symbol names. */
179 static bfd_boolean change_leading_char
= FALSE
;
181 /* Whether to remove the leading character from global symbol names. */
182 static bfd_boolean remove_leading_char
= FALSE
;
184 /* Whether to permit wildcard in symbol comparison. */
185 static bfd_boolean wildcard
= FALSE
;
187 /* True if --localize-hidden is in effect. */
188 static bfd_boolean localize_hidden
= FALSE
;
190 /* List of symbols to strip, keep, localize, keep-global, weaken,
192 static htab_t strip_specific_htab
= NULL
;
193 static htab_t strip_unneeded_htab
= NULL
;
194 static htab_t keep_specific_htab
= NULL
;
195 static htab_t localize_specific_htab
= NULL
;
196 static htab_t globalize_specific_htab
= NULL
;
197 static htab_t keepglobal_specific_htab
= NULL
;
198 static htab_t weaken_specific_htab
= NULL
;
199 static struct redefine_node
*redefine_sym_list
= NULL
;
201 /* If this is TRUE, we weaken global symbols (set BSF_WEAK). */
202 static bfd_boolean weaken
= FALSE
;
204 /* If this is TRUE, we retain BSF_FILE symbols. */
205 static bfd_boolean keep_file_symbols
= FALSE
;
207 /* Prefix symbols/sections. */
208 static char *prefix_symbols_string
= 0;
209 static char *prefix_sections_string
= 0;
210 static char *prefix_alloc_sections_string
= 0;
212 /* True if --extract-symbol was passed on the command line. */
213 static bfd_boolean extract_symbol
= FALSE
;
215 /* If `reverse_bytes' is nonzero, then reverse the order of every chunk
216 of <reverse_bytes> bytes within each output section. */
217 static int reverse_bytes
= 0;
220 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
221 enum command_line_switch
223 OPTION_ADD_SECTION
=150,
224 OPTION_CHANGE_ADDRESSES
,
225 OPTION_CHANGE_LEADING_CHAR
,
227 OPTION_CHANGE_SECTION_ADDRESS
,
228 OPTION_CHANGE_SECTION_LMA
,
229 OPTION_CHANGE_SECTION_VMA
,
230 OPTION_CHANGE_WARNINGS
,
233 OPTION_NO_CHANGE_WARNINGS
,
235 OPTION_REMOVE_LEADING_CHAR
,
236 OPTION_SET_SECTION_FLAGS
,
238 OPTION_STRIP_UNNEEDED
,
241 OPTION_REDEFINE_SYMS
,
244 OPTION_STRIP_SYMBOLS
,
245 OPTION_STRIP_UNNEEDED_SYMBOL
,
246 OPTION_STRIP_UNNEEDED_SYMBOLS
,
248 OPTION_LOCALIZE_HIDDEN
,
249 OPTION_LOCALIZE_SYMBOLS
,
250 OPTION_GLOBALIZE_SYMBOL
,
251 OPTION_GLOBALIZE_SYMBOLS
,
252 OPTION_KEEPGLOBAL_SYMBOLS
,
253 OPTION_WEAKEN_SYMBOLS
,
254 OPTION_RENAME_SECTION
,
255 OPTION_ALT_MACH_CODE
,
256 OPTION_PREFIX_SYMBOLS
,
257 OPTION_PREFIX_SECTIONS
,
258 OPTION_PREFIX_ALLOC_SECTIONS
,
260 OPTION_ADD_GNU_DEBUGLINK
,
261 OPTION_ONLY_KEEP_DEBUG
,
262 OPTION_KEEP_FILE_SYMBOLS
,
263 OPTION_READONLY_TEXT
,
264 OPTION_WRITABLE_TEXT
,
267 OPTION_EXTRACT_SYMBOL
,
271 /* Options to handle if running as "strip". */
273 static struct option strip_options
[] =
275 {"discard-all", no_argument
, 0, 'x'},
276 {"discard-locals", no_argument
, 0, 'X'},
277 {"format", required_argument
, 0, 'F'}, /* Obsolete */
278 {"help", no_argument
, 0, 'h'},
279 {"info", no_argument
, 0, OPTION_FORMATS_INFO
},
280 {"input-format", required_argument
, 0, 'I'}, /* Obsolete */
281 {"input-target", required_argument
, 0, 'I'},
282 {"keep-file-symbols", no_argument
, 0, OPTION_KEEP_FILE_SYMBOLS
},
283 {"keep-symbol", required_argument
, 0, 'K'},
284 {"only-keep-debug", no_argument
, 0, OPTION_ONLY_KEEP_DEBUG
},
285 {"output-format", required_argument
, 0, 'O'}, /* Obsolete */
286 {"output-target", required_argument
, 0, 'O'},
287 {"output-file", required_argument
, 0, 'o'},
288 {"preserve-dates", no_argument
, 0, 'p'},
289 {"remove-section", required_argument
, 0, 'R'},
290 {"strip-all", no_argument
, 0, 's'},
291 {"strip-debug", no_argument
, 0, 'S'},
292 {"strip-unneeded", no_argument
, 0, OPTION_STRIP_UNNEEDED
},
293 {"strip-symbol", required_argument
, 0, 'N'},
294 {"target", required_argument
, 0, 'F'},
295 {"verbose", no_argument
, 0, 'v'},
296 {"version", no_argument
, 0, 'V'},
297 {"wildcard", no_argument
, 0, 'w'},
298 {0, no_argument
, 0, 0}
301 /* Options to handle if running as "objcopy". */
303 static struct option copy_options
[] =
305 {"add-gnu-debuglink", required_argument
, 0, OPTION_ADD_GNU_DEBUGLINK
},
306 {"add-section", required_argument
, 0, OPTION_ADD_SECTION
},
307 {"adjust-start", required_argument
, 0, OPTION_CHANGE_START
},
308 {"adjust-vma", required_argument
, 0, OPTION_CHANGE_ADDRESSES
},
309 {"adjust-section-vma", required_argument
, 0, OPTION_CHANGE_SECTION_ADDRESS
},
310 {"adjust-warnings", no_argument
, 0, OPTION_CHANGE_WARNINGS
},
311 {"alt-machine-code", required_argument
, 0, OPTION_ALT_MACH_CODE
},
312 {"binary-architecture", required_argument
, 0, 'B'},
313 {"byte", required_argument
, 0, 'b'},
314 {"change-addresses", required_argument
, 0, OPTION_CHANGE_ADDRESSES
},
315 {"change-leading-char", no_argument
, 0, OPTION_CHANGE_LEADING_CHAR
},
316 {"change-section-address", required_argument
, 0, OPTION_CHANGE_SECTION_ADDRESS
},
317 {"change-section-lma", required_argument
, 0, OPTION_CHANGE_SECTION_LMA
},
318 {"change-section-vma", required_argument
, 0, OPTION_CHANGE_SECTION_VMA
},
319 {"change-start", required_argument
, 0, OPTION_CHANGE_START
},
320 {"change-warnings", no_argument
, 0, OPTION_CHANGE_WARNINGS
},
321 {"debugging", no_argument
, 0, OPTION_DEBUGGING
},
322 {"discard-all", no_argument
, 0, 'x'},
323 {"discard-locals", no_argument
, 0, 'X'},
324 {"extract-symbol", no_argument
, 0, OPTION_EXTRACT_SYMBOL
},
325 {"format", required_argument
, 0, 'F'}, /* Obsolete */
326 {"gap-fill", required_argument
, 0, OPTION_GAP_FILL
},
327 {"globalize-symbol", required_argument
, 0, OPTION_GLOBALIZE_SYMBOL
},
328 {"globalize-symbols", required_argument
, 0, OPTION_GLOBALIZE_SYMBOLS
},
329 {"help", no_argument
, 0, 'h'},
330 {"impure", no_argument
, 0, OPTION_IMPURE
},
331 {"info", no_argument
, 0, OPTION_FORMATS_INFO
},
332 {"input-format", required_argument
, 0, 'I'}, /* Obsolete */
333 {"input-target", required_argument
, 0, 'I'},
334 {"interleave", required_argument
, 0, 'i'},
335 {"keep-file-symbols", no_argument
, 0, OPTION_KEEP_FILE_SYMBOLS
},
336 {"keep-global-symbol", required_argument
, 0, 'G'},
337 {"keep-global-symbols", required_argument
, 0, OPTION_KEEPGLOBAL_SYMBOLS
},
338 {"keep-symbol", required_argument
, 0, 'K'},
339 {"keep-symbols", required_argument
, 0, OPTION_KEEP_SYMBOLS
},
340 {"localize-hidden", no_argument
, 0, OPTION_LOCALIZE_HIDDEN
},
341 {"localize-symbol", required_argument
, 0, 'L'},
342 {"localize-symbols", required_argument
, 0, OPTION_LOCALIZE_SYMBOLS
},
343 {"no-adjust-warnings", no_argument
, 0, OPTION_NO_CHANGE_WARNINGS
},
344 {"no-change-warnings", no_argument
, 0, OPTION_NO_CHANGE_WARNINGS
},
345 {"only-keep-debug", no_argument
, 0, OPTION_ONLY_KEEP_DEBUG
},
346 {"only-section", required_argument
, 0, 'j'},
347 {"output-format", required_argument
, 0, 'O'}, /* Obsolete */
348 {"output-target", required_argument
, 0, 'O'},
349 {"pad-to", required_argument
, 0, OPTION_PAD_TO
},
350 {"prefix-symbols", required_argument
, 0, OPTION_PREFIX_SYMBOLS
},
351 {"prefix-sections", required_argument
, 0, OPTION_PREFIX_SECTIONS
},
352 {"prefix-alloc-sections", required_argument
, 0, OPTION_PREFIX_ALLOC_SECTIONS
},
353 {"preserve-dates", no_argument
, 0, 'p'},
354 {"pure", no_argument
, 0, OPTION_PURE
},
355 {"readonly-text", no_argument
, 0, OPTION_READONLY_TEXT
},
356 {"redefine-sym", required_argument
, 0, OPTION_REDEFINE_SYM
},
357 {"redefine-syms", required_argument
, 0, OPTION_REDEFINE_SYMS
},
358 {"remove-leading-char", no_argument
, 0, OPTION_REMOVE_LEADING_CHAR
},
359 {"remove-section", required_argument
, 0, 'R'},
360 {"rename-section", required_argument
, 0, OPTION_RENAME_SECTION
},
361 {"reverse-bytes", required_argument
, 0, OPTION_REVERSE_BYTES
},
362 {"set-section-flags", required_argument
, 0, OPTION_SET_SECTION_FLAGS
},
363 {"set-start", required_argument
, 0, OPTION_SET_START
},
364 {"srec-len", required_argument
, 0, OPTION_SREC_LEN
},
365 {"srec-forceS3", no_argument
, 0, OPTION_SREC_FORCES3
},
366 {"strip-all", no_argument
, 0, 'S'},
367 {"strip-debug", no_argument
, 0, 'g'},
368 {"strip-unneeded", no_argument
, 0, OPTION_STRIP_UNNEEDED
},
369 {"strip-unneeded-symbol", required_argument
, 0, OPTION_STRIP_UNNEEDED_SYMBOL
},
370 {"strip-unneeded-symbols", required_argument
, 0, OPTION_STRIP_UNNEEDED_SYMBOLS
},
371 {"strip-symbol", required_argument
, 0, 'N'},
372 {"strip-symbols", required_argument
, 0, OPTION_STRIP_SYMBOLS
},
373 {"target", required_argument
, 0, 'F'},
374 {"verbose", no_argument
, 0, 'v'},
375 {"version", no_argument
, 0, 'V'},
376 {"weaken", no_argument
, 0, OPTION_WEAKEN
},
377 {"weaken-symbol", required_argument
, 0, 'W'},
378 {"weaken-symbols", required_argument
, 0, OPTION_WEAKEN_SYMBOLS
},
379 {"wildcard", no_argument
, 0, 'w'},
380 {"writable-text", no_argument
, 0, OPTION_WRITABLE_TEXT
},
381 {0, no_argument
, 0, 0}
385 extern char *program_name
;
387 /* This flag distinguishes between strip and objcopy:
388 1 means this is 'strip'; 0 means this is 'objcopy'.
389 -1 means if we should use argv[0] to decide. */
392 /* The maximum length of an S record. This variable is declared in srec.c
393 and can be modified by the --srec-len parameter. */
394 extern unsigned int Chunk
;
396 /* Restrict the generation of Srecords to type S3 only.
397 This variable is declare in bfd/srec.c and can be toggled
398 on by the --srec-forceS3 command line switch. */
399 extern bfd_boolean S3Forced
;
401 /* Defined in bfd/binary.c. Used to set architecture and machine of input
403 extern enum bfd_architecture bfd_external_binary_architecture
;
404 extern unsigned long bfd_external_machine
;
406 /* Forward declarations. */
407 static void setup_section (bfd
*, asection
*, void *);
408 static void setup_bfd_headers (bfd
*, bfd
*);
409 static void copy_section (bfd
*, asection
*, void *);
410 static void get_sections (bfd
*, asection
*, void *);
411 static int compare_section_lma (const void *, const void *);
412 static void mark_symbols_used_in_relocations (bfd
*, asection
*, void *);
413 static bfd_boolean
write_debugging_info (bfd
*, void *, long *, asymbol
***);
414 static const char *lookup_sym_redefinition (const char *);
417 copy_usage (FILE *stream
, int exit_status
)
419 fprintf (stream
, _("Usage: %s [option(s)] in-file [out-file]\n"), program_name
);
420 fprintf (stream
, _(" Copies a binary file, possibly transforming it in the process\n"));
421 fprintf (stream
, _(" The options are:\n"));
422 fprintf (stream
, _("\
423 -I --input-target <bfdname> Assume input file is in format <bfdname>\n\
424 -O --output-target <bfdname> Create an output file in format <bfdname>\n\
425 -B --binary-architecture <arch> Set arch of output file, when input is binary\n\
426 -F --target <bfdname> Set both input and output format to <bfdname>\n\
427 --debugging Convert debugging information, if possible\n\
428 -p --preserve-dates Copy modified/access timestamps to the output\n\
429 -j --only-section <name> Only copy section <name> into the output\n\
430 --add-gnu-debuglink=<file> Add section .gnu_debuglink linking to <file>\n\
431 -R --remove-section <name> Remove section <name> from the output\n\
432 -S --strip-all Remove all symbol and relocation information\n\
433 -g --strip-debug Remove all debugging symbols & sections\n\
434 --strip-unneeded Remove all symbols not needed by relocations\n\
435 -N --strip-symbol <name> Do not copy symbol <name>\n\
436 --strip-unneeded-symbol <name>\n\
437 Do not copy symbol <name> unless needed by\n\
439 --only-keep-debug Strip everything but the debug information\n\
440 --extract-symbol Remove section contents but keep symbols\n\
441 -K --keep-symbol <name> Do not strip symbol <name>\n\
442 --keep-file-symbols Do not strip file symbol(s)\n\
443 --localize-hidden Turn all ELF hidden symbols into locals\n\
444 -L --localize-symbol <name> Force symbol <name> to be marked as a local\n\
445 --globalize-symbol <name> Force symbol <name> to be marked as a global\n\
446 -G --keep-global-symbol <name> Localize all symbols except <name>\n\
447 -W --weaken-symbol <name> Force symbol <name> to be marked as a weak\n\
448 --weaken Force all global symbols to be marked as weak\n\
449 -w --wildcard Permit wildcard in symbol comparison\n\
450 -x --discard-all Remove all non-global symbols\n\
451 -X --discard-locals Remove any compiler-generated symbols\n\
452 -i --interleave <number> Only copy one out of every <number> bytes\n\
453 -b --byte <num> Select byte <num> in every interleaved block\n\
454 --gap-fill <val> Fill gaps between sections with <val>\n\
455 --pad-to <addr> Pad the last section up to address <addr>\n\
456 --set-start <addr> Set the start address to <addr>\n\
457 {--change-start|--adjust-start} <incr>\n\
458 Add <incr> to the start address\n\
459 {--change-addresses|--adjust-vma} <incr>\n\
460 Add <incr> to LMA, VMA and start addresses\n\
461 {--change-section-address|--adjust-section-vma} <name>{=|+|-}<val>\n\
462 Change LMA and VMA of section <name> by <val>\n\
463 --change-section-lma <name>{=|+|-}<val>\n\
464 Change the LMA of section <name> by <val>\n\
465 --change-section-vma <name>{=|+|-}<val>\n\
466 Change the VMA of section <name> by <val>\n\
467 {--[no-]change-warnings|--[no-]adjust-warnings}\n\
468 Warn if a named section does not exist\n\
469 --set-section-flags <name>=<flags>\n\
470 Set section <name>'s properties to <flags>\n\
471 --add-section <name>=<file> Add section <name> found in <file> to output\n\
472 --rename-section <old>=<new>[,<flags>] Rename section <old> to <new>\n\
473 --change-leading-char Force output format's leading character style\n\
474 --remove-leading-char Remove leading character from global symbols\n\
475 --reverse-bytes=<num> Reverse <num> bytes at a time, in output sections with content\n\
476 --redefine-sym <old>=<new> Redefine symbol name <old> to <new>\n\
477 --redefine-syms <file> --redefine-sym for all symbol pairs \n\
479 --srec-len <number> Restrict the length of generated Srecords\n\
480 --srec-forceS3 Restrict the type of generated Srecords to S3\n\
481 --strip-symbols <file> -N for all symbols listed in <file>\n\
482 --strip-unneeded-symbols <file>\n\
483 --strip-unneeded-symbol for all symbols listed\n\
485 --keep-symbols <file> -K for all symbols listed in <file>\n\
486 --localize-symbols <file> -L for all symbols listed in <file>\n\
487 --globalize-symbols <file> --globalize-symbol for all in <file>\n\
488 --keep-global-symbols <file> -G for all symbols listed in <file>\n\
489 --weaken-symbols <file> -W for all symbols listed in <file>\n\
490 --alt-machine-code <index> Use the target's <index>'th alternative machine\n\
491 --writable-text Mark the output text as writable\n\
492 --readonly-text Make the output text write protected\n\
493 --pure Mark the output file as demand paged\n\
494 --impure Mark the output file as impure\n\
495 --prefix-symbols <prefix> Add <prefix> to start of every symbol name\n\
496 --prefix-sections <prefix> Add <prefix> to start of every section name\n\
497 --prefix-alloc-sections <prefix>\n\
498 Add <prefix> to start of every allocatable\n\
500 -v --verbose List all object files modified\n\
501 @<file> Read options from <file>\n\
502 -V --version Display this program's version number\n\
503 -h --help Display this output\n\
504 --info List object formats & architectures supported\n\
506 list_supported_targets (program_name
, stream
);
507 if (REPORT_BUGS_TO
[0] && exit_status
== 0)
508 fprintf (stream
, _("Report bugs to %s\n"), REPORT_BUGS_TO
);
513 strip_usage (FILE *stream
, int exit_status
)
515 fprintf (stream
, _("Usage: %s <option(s)> in-file(s)\n"), program_name
);
516 fprintf (stream
, _(" Removes symbols and sections from files\n"));
517 fprintf (stream
, _(" The options are:\n"));
518 fprintf (stream
, _("\
519 -I --input-target=<bfdname> Assume input file is in format <bfdname>\n\
520 -O --output-target=<bfdname> Create an output file in format <bfdname>\n\
521 -F --target=<bfdname> Set both input and output format to <bfdname>\n\
522 -p --preserve-dates Copy modified/access timestamps to the output\n\
523 -R --remove-section=<name> Remove section <name> from the output\n\
524 -s --strip-all Remove all symbol and relocation information\n\
525 -g -S -d --strip-debug Remove all debugging symbols & sections\n\
526 --strip-unneeded Remove all symbols not needed by relocations\n\
527 --only-keep-debug Strip everything but the debug information\n\
528 -N --strip-symbol=<name> Do not copy symbol <name>\n\
529 -K --keep-symbol=<name> Do not strip symbol <name>\n\
530 --keep-file-symbols Do not strip file symbol(s)\n\
531 -w --wildcard Permit wildcard in symbol comparison\n\
532 -x --discard-all Remove all non-global symbols\n\
533 -X --discard-locals Remove any compiler-generated symbols\n\
534 -v --verbose List all object files modified\n\
535 -V --version Display this program's version number\n\
536 -h --help Display this output\n\
537 --info List object formats & architectures supported\n\
538 -o <file> Place stripped output into <file>\n\
541 list_supported_targets (program_name
, stream
);
542 if (REPORT_BUGS_TO
[0] && exit_status
== 0)
543 fprintf (stream
, _("Report bugs to %s\n"), REPORT_BUGS_TO
);
547 /* Parse section flags into a flagword, with a fatal error if the
548 string can't be parsed. */
551 parse_flags (const char *s
)
561 snext
= strchr (s
, ',');
571 #define PARSE_FLAG(fname,fval) \
572 else if (strncasecmp (fname, s, len) == 0) ret |= fval
573 PARSE_FLAG ("alloc", SEC_ALLOC
);
574 PARSE_FLAG ("load", SEC_LOAD
);
575 PARSE_FLAG ("noload", SEC_NEVER_LOAD
);
576 PARSE_FLAG ("readonly", SEC_READONLY
);
577 PARSE_FLAG ("debug", SEC_DEBUGGING
);
578 PARSE_FLAG ("code", SEC_CODE
);
579 PARSE_FLAG ("data", SEC_DATA
);
580 PARSE_FLAG ("rom", SEC_ROM
);
581 PARSE_FLAG ("share", SEC_COFF_SHARED
);
582 PARSE_FLAG ("contents", SEC_HAS_CONTENTS
);
588 copy
= xmalloc (len
+ 1);
589 strncpy (copy
, s
, len
);
591 non_fatal (_("unrecognized section flag `%s'"), copy
);
592 fatal (_("supported flags: %s"),
593 "alloc, load, noload, readonly, debug, code, data, rom, share, contents");
603 /* Find and optionally add an entry in the change_sections list. */
605 static struct section_list
*
606 find_section_list (const char *name
, bfd_boolean add
)
608 struct section_list
*p
;
610 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
611 if (strcmp (p
->name
, name
) == 0)
617 p
= xmalloc (sizeof (struct section_list
));
622 p
->change_vma
= CHANGE_IGNORE
;
623 p
->change_lma
= CHANGE_IGNORE
;
626 p
->set_flags
= FALSE
;
629 p
->next
= change_sections
;
635 /* There is htab_hash_string but no htab_eq_string. Makes sense. */
638 eq_string (const void *s1
, const void *s2
)
640 return strcmp (s1
, s2
) == 0;
644 create_symbol_htab (void)
646 return htab_create_alloc (16, htab_hash_string
, eq_string
, NULL
, xcalloc
, free
);
650 create_symbol_htabs (void)
652 strip_specific_htab
= create_symbol_htab ();
653 strip_unneeded_htab
= create_symbol_htab ();
654 keep_specific_htab
= create_symbol_htab ();
655 localize_specific_htab
= create_symbol_htab ();
656 globalize_specific_htab
= create_symbol_htab ();
657 keepglobal_specific_htab
= create_symbol_htab ();
658 weaken_specific_htab
= create_symbol_htab ();
661 /* Add a symbol to strip_specific_list. */
664 add_specific_symbol (const char *name
, htab_t htab
)
666 *htab_find_slot (htab
, name
, INSERT
) = (char *) name
;
669 /* Add symbols listed in `filename' to strip_specific_list. */
671 #define IS_WHITESPACE(c) ((c) == ' ' || (c) == '\t')
672 #define IS_LINE_TERMINATOR(c) ((c) == '\n' || (c) == '\r' || (c) == '\0')
675 add_specific_symbols (const char *filename
, htab_t htab
)
681 unsigned int line_count
;
683 size
= get_file_size (filename
);
690 buffer
= xmalloc (size
+ 2);
691 f
= fopen (filename
, FOPEN_RT
);
693 fatal (_("cannot open '%s': %s"), filename
, strerror (errno
));
695 if (fread (buffer
, 1, size
, f
) == 0 || ferror (f
))
696 fatal (_("%s: fread failed"), filename
);
699 buffer
[size
] = '\n';
700 buffer
[size
+ 1] = '\0';
704 for (line
= buffer
; * line
!= '\0'; line
++)
709 int finished
= FALSE
;
711 for (eol
= line
;; eol
++)
717 /* Cope with \n\r. */
725 /* Cope with \r\n. */
736 /* Line comment, Terminate the line here, in case a
737 name is present and then allow the rest of the
738 loop to find the real end of the line. */
750 /* A name may now exist somewhere between 'line' and 'eol'.
751 Strip off leading whitespace and trailing whitespace,
752 then add it to the list. */
753 for (name
= line
; IS_WHITESPACE (* name
); name
++)
755 for (name_end
= name
;
756 (! IS_WHITESPACE (* name_end
))
757 && (! IS_LINE_TERMINATOR (* name_end
));
761 if (! IS_LINE_TERMINATOR (* name_end
))
765 for (extra
= name_end
+ 1; IS_WHITESPACE (* extra
); extra
++)
768 if (! IS_LINE_TERMINATOR (* extra
))
769 non_fatal (_("%s:%d: Ignoring rubbish found on this line"),
770 filename
, line_count
);
776 add_specific_symbol (name
, htab
);
778 /* Advance line pointer to end of line. The 'eol ++' in the for
779 loop above will then advance us to the start of the next line. */
785 /* See whether a symbol should be stripped or kept
786 based on strip_specific_list and keep_symbols. */
789 is_specified_symbol_predicate (void **slot
, void *data
)
791 struct is_specified_symbol_predicate_data
*d
= data
;
792 const char *slot_name
= *slot
;
794 if (*slot_name
!= '!')
796 if (! fnmatch (slot_name
, d
->name
, 0))
799 /* Stop traversal. */
805 if (fnmatch (slot_name
+ 1, d
->name
, 0))
808 /* Stop traversal. */
813 /* Continue traversal. */
818 is_specified_symbol (const char *name
, htab_t htab
)
822 struct is_specified_symbol_predicate_data data
;
827 htab_traverse (htab
, is_specified_symbol_predicate
, &data
);
832 return htab_find (htab
, name
) != NULL
;
835 /* Return a pointer to the symbol used as a signature for GROUP. */
838 group_signature (asection
*group
)
840 bfd
*abfd
= group
->owner
;
841 Elf_Internal_Shdr
*ghdr
;
843 if (bfd_get_flavour (abfd
) != bfd_target_elf_flavour
)
846 ghdr
= &elf_section_data (group
)->this_hdr
;
847 if (ghdr
->sh_link
< elf_numsections (abfd
))
849 const struct elf_backend_data
*bed
= get_elf_backend_data (abfd
);
850 Elf_Internal_Shdr
*symhdr
= elf_elfsections (abfd
) [ghdr
->sh_link
];
852 if (symhdr
->sh_type
== SHT_SYMTAB
853 && ghdr
->sh_info
< symhdr
->sh_size
/ bed
->s
->sizeof_sym
)
854 return isympp
[ghdr
->sh_info
- 1];
859 /* See if a section is being removed. */
862 is_strip_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
864 if (sections_removed
|| sections_copied
)
866 struct section_list
*p
;
868 p
= find_section_list (bfd_get_section_name (abfd
, sec
), FALSE
);
870 if (sections_removed
&& p
!= NULL
&& p
->remove
)
872 if (sections_copied
&& (p
== NULL
|| ! p
->copy
))
876 if ((bfd_get_section_flags (abfd
, sec
) & SEC_DEBUGGING
) != 0)
878 if (strip_symbols
== STRIP_DEBUG
879 || strip_symbols
== STRIP_UNNEEDED
880 || strip_symbols
== STRIP_ALL
881 || discard_locals
== LOCALS_ALL
882 || convert_debugging
)
885 if (strip_symbols
== STRIP_NONDEBUG
)
889 if ((bfd_get_section_flags (abfd
, sec
) & SEC_GROUP
) != 0)
895 Group sections look like debugging sections but they are not.
896 (They have a non-zero size but they are not ALLOCated). */
897 if (strip_symbols
== STRIP_NONDEBUG
)
901 If we are going to strip the group signature symbol, then
902 strip the group section too. */
903 gsym
= group_signature (sec
);
908 if ((strip_symbols
== STRIP_ALL
909 && !is_specified_symbol (gname
, keep_specific_htab
))
910 || is_specified_symbol (gname
, strip_specific_htab
))
917 /* Return true if SYM is a hidden symbol. */
920 is_hidden_symbol (asymbol
*sym
)
922 elf_symbol_type
*elf_sym
;
924 elf_sym
= elf_symbol_from (sym
->the_bfd
, sym
);
926 switch (ELF_ST_VISIBILITY (elf_sym
->internal_elf_sym
.st_other
))
935 /* Choose which symbol entries to copy; put the result in OSYMS.
936 We don't copy in place, because that confuses the relocs.
937 Return the number of symbols to print. */
940 filter_symbols (bfd
*abfd
, bfd
*obfd
, asymbol
**osyms
,
941 asymbol
**isyms
, long symcount
)
943 asymbol
**from
= isyms
, **to
= osyms
;
944 long src_count
= 0, dst_count
= 0;
945 int relocatable
= (abfd
->flags
& (EXEC_P
| DYNAMIC
)) == 0;
947 for (; src_count
< symcount
; src_count
++)
949 asymbol
*sym
= from
[src_count
];
950 flagword flags
= sym
->flags
;
951 char *name
= (char *) bfd_asymbol_name (sym
);
953 bfd_boolean used_in_reloc
= FALSE
;
954 bfd_boolean undefined
;
955 bfd_boolean rem_leading_char
;
956 bfd_boolean add_leading_char
;
958 undefined
= bfd_is_und_section (bfd_get_section (sym
));
960 if (redefine_sym_list
)
962 char *old_name
, *new_name
;
964 old_name
= (char *) bfd_asymbol_name (sym
);
965 new_name
= (char *) lookup_sym_redefinition (old_name
);
966 bfd_asymbol_name (sym
) = new_name
;
970 /* Check if we will remove the current leading character. */
972 (name
[0] == bfd_get_symbol_leading_char (abfd
))
973 && (change_leading_char
974 || (remove_leading_char
975 && ((flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0
977 || bfd_is_com_section (bfd_get_section (sym
)))));
979 /* Check if we will add a new leading character. */
982 && (bfd_get_symbol_leading_char (obfd
) != '\0')
983 && (bfd_get_symbol_leading_char (abfd
) == '\0'
984 || (name
[0] == bfd_get_symbol_leading_char (abfd
)));
986 /* Short circuit for change_leading_char if we can do it in-place. */
987 if (rem_leading_char
&& add_leading_char
&& !prefix_symbols_string
)
989 name
[0] = bfd_get_symbol_leading_char (obfd
);
990 bfd_asymbol_name (sym
) = name
;
991 rem_leading_char
= FALSE
;
992 add_leading_char
= FALSE
;
995 /* Remove leading char. */
996 if (rem_leading_char
)
997 bfd_asymbol_name (sym
) = ++name
;
999 /* Add new leading char and/or prefix. */
1000 if (add_leading_char
|| prefix_symbols_string
)
1004 ptr
= n
= xmalloc (1 + strlen (prefix_symbols_string
)
1005 + strlen (name
) + 1);
1006 if (add_leading_char
)
1007 *ptr
++ = bfd_get_symbol_leading_char (obfd
);
1009 if (prefix_symbols_string
)
1011 strcpy (ptr
, prefix_symbols_string
);
1012 ptr
+= strlen (prefix_symbols_string
);
1016 bfd_asymbol_name (sym
) = n
;
1020 if (strip_symbols
== STRIP_ALL
)
1022 else if ((flags
& BSF_KEEP
) != 0 /* Used in relocation. */
1023 || ((flags
& BSF_SECTION_SYM
) != 0
1024 && ((*bfd_get_section (sym
)->symbol_ptr_ptr
)->flags
1028 used_in_reloc
= TRUE
;
1030 else if (relocatable
/* Relocatable file. */
1031 && (flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0)
1033 else if (bfd_decode_symclass (sym
) == 'I')
1034 /* Global symbols in $idata sections need to be retained
1035 even if relocatable is FALSE. External users of the
1036 library containing the $idata section may reference these
1039 else if ((flags
& BSF_GLOBAL
) != 0 /* Global symbol. */
1040 || (flags
& BSF_WEAK
) != 0
1042 || bfd_is_com_section (bfd_get_section (sym
)))
1043 keep
= strip_symbols
!= STRIP_UNNEEDED
;
1044 else if ((flags
& BSF_DEBUGGING
) != 0) /* Debugging symbol. */
1045 keep
= (strip_symbols
!= STRIP_DEBUG
1046 && strip_symbols
!= STRIP_UNNEEDED
1047 && ! convert_debugging
);
1048 else if (bfd_coff_get_comdat_section (abfd
, bfd_get_section (sym
)))
1049 /* COMDAT sections store special information in local
1050 symbols, so we cannot risk stripping any of them. */
1052 else /* Local symbol. */
1053 keep
= (strip_symbols
!= STRIP_UNNEEDED
1054 && (discard_locals
!= LOCALS_ALL
1055 && (discard_locals
!= LOCALS_START_L
1056 || ! bfd_is_local_label (abfd
, sym
))));
1058 if (keep
&& is_specified_symbol (name
, strip_specific_htab
))
1060 /* There are multiple ways to set 'keep' above, but if it
1061 was the relocatable symbol case, then that's an error. */
1064 non_fatal (_("not stripping symbol `%s' because it is named in a relocation"), name
);
1072 && !(flags
& BSF_KEEP
)
1073 && is_specified_symbol (name
, strip_unneeded_htab
))
1077 && ((keep_file_symbols
&& (flags
& BSF_FILE
))
1078 || is_specified_symbol (name
, keep_specific_htab
)))
1081 if (keep
&& is_strip_section (abfd
, bfd_get_section (sym
)))
1086 if ((flags
& BSF_GLOBAL
) != 0
1087 && (weaken
|| is_specified_symbol (name
, weaken_specific_htab
)))
1089 sym
->flags
&= ~ BSF_GLOBAL
;
1090 sym
->flags
|= BSF_WEAK
;
1094 && (flags
& (BSF_GLOBAL
| BSF_WEAK
))
1095 && (is_specified_symbol (name
, localize_specific_htab
)
1096 || (htab_elements (keepglobal_specific_htab
) != 0
1097 && ! is_specified_symbol (name
, keepglobal_specific_htab
))
1098 || (localize_hidden
&& is_hidden_symbol (sym
))))
1100 sym
->flags
&= ~ (BSF_GLOBAL
| BSF_WEAK
);
1101 sym
->flags
|= BSF_LOCAL
;
1105 && (flags
& BSF_LOCAL
)
1106 && is_specified_symbol (name
, globalize_specific_htab
))
1108 sym
->flags
&= ~ BSF_LOCAL
;
1109 sym
->flags
|= BSF_GLOBAL
;
1112 to
[dst_count
++] = sym
;
1116 to
[dst_count
] = NULL
;
1121 /* Find the redefined name of symbol SOURCE. */
1124 lookup_sym_redefinition (const char *source
)
1126 struct redefine_node
*list
;
1128 for (list
= redefine_sym_list
; list
!= NULL
; list
= list
->next
)
1129 if (strcmp (source
, list
->source
) == 0)
1130 return list
->target
;
1135 /* Add a node to a symbol redefine list. */
1138 redefine_list_append (const char *cause
, const char *source
, const char *target
)
1140 struct redefine_node
**p
;
1141 struct redefine_node
*list
;
1142 struct redefine_node
*new_node
;
1144 for (p
= &redefine_sym_list
; (list
= *p
) != NULL
; p
= &list
->next
)
1146 if (strcmp (source
, list
->source
) == 0)
1147 fatal (_("%s: Multiple redefinition of symbol \"%s\""),
1150 if (strcmp (target
, list
->target
) == 0)
1151 fatal (_("%s: Symbol \"%s\" is target of more than one redefinition"),
1155 new_node
= xmalloc (sizeof (struct redefine_node
));
1157 new_node
->source
= strdup (source
);
1158 new_node
->target
= strdup (target
);
1159 new_node
->next
= NULL
;
1164 /* Handle the --redefine-syms option. Read lines containing "old new"
1165 from the file, and add them to the symbol redefine list. */
1168 add_redefine_syms_file (const char *filename
)
1177 file
= fopen (filename
, "r");
1179 fatal (_("couldn't open symbol redefinition file %s (error: %s)"),
1180 filename
, strerror (errno
));
1183 buf
= xmalloc (bufsize
);
1191 /* Collect the input symbol name. */
1192 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1200 buf
= xrealloc (buf
, bufsize
);
1208 /* Eat white space between the symbol names. */
1209 while (IS_WHITESPACE (c
))
1211 if (c
== '#' || IS_LINE_TERMINATOR (c
))
1216 /* Collect the output symbol name. */
1218 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1226 buf
= xrealloc (buf
, bufsize
);
1234 /* Eat white space at end of line. */
1235 while (! IS_LINE_TERMINATOR(c
) && c
!= EOF
&& IS_WHITESPACE (c
))
1240 if ((c
== '\r' && (c
= getc (file
)) == '\n')
1241 || c
== '\n' || c
== EOF
)
1244 /* Append the redefinition to the list. */
1246 redefine_list_append (filename
, &buf
[0], &buf
[outsym_off
]);
1257 fatal (_("%s:%d: garbage found at end of line"), filename
, lineno
);
1259 if (len
!= 0 && (outsym_off
== 0 || outsym_off
== len
))
1260 fatal (_("%s:%d: missing new symbol name"), filename
, lineno
);
1263 /* Eat the rest of the line and finish it. */
1264 while (c
!= '\n' && c
!= EOF
)
1270 fatal (_("%s:%d: premature end of file"), filename
, lineno
);
1275 /* Copy unkown object file IBFD onto OBFD.
1276 Returns TRUE upon success, FALSE otherwise. */
1279 copy_unknown_object (bfd
*ibfd
, bfd
*obfd
)
1287 if (bfd_stat_arch_elt (ibfd
, &buf
) != 0)
1289 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1296 non_fatal (_("stat returns negative size for `%s'"),
1297 bfd_get_archive_filename (ibfd
));
1301 if (bfd_seek (ibfd
, (file_ptr
) 0, SEEK_SET
) != 0)
1303 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1308 printf (_("copy from `%s' [unknown] to `%s' [unknown]\n"),
1309 bfd_get_archive_filename (ibfd
), bfd_get_filename (obfd
));
1311 cbuf
= xmalloc (BUFSIZE
);
1313 while (ncopied
< size
)
1315 tocopy
= size
- ncopied
;
1316 if (tocopy
> BUFSIZE
)
1319 if (bfd_bread (cbuf
, (bfd_size_type
) tocopy
, ibfd
)
1320 != (bfd_size_type
) tocopy
)
1322 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1327 if (bfd_bwrite (cbuf
, (bfd_size_type
) tocopy
, obfd
)
1328 != (bfd_size_type
) tocopy
)
1330 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
1338 chmod (bfd_get_filename (obfd
), buf
.st_mode
);
1343 /* Copy object file IBFD onto OBFD.
1344 Returns TRUE upon success, FALSE otherwise. */
1347 copy_object (bfd
*ibfd
, bfd
*obfd
)
1351 asection
**osections
= NULL
;
1352 asection
*gnu_debuglink_section
= NULL
;
1353 bfd_size_type
*gaps
= NULL
;
1354 bfd_size_type max_gap
= 0;
1357 enum bfd_architecture iarch
;
1360 if (ibfd
->xvec
->byteorder
!= obfd
->xvec
->byteorder
1361 && ibfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
1362 && obfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
)
1363 fatal (_("Unable to change endianness of input file(s)"));
1365 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
1367 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
1372 printf (_("copy from `%s' [%s] to `%s' [%s]\n"),
1373 bfd_get_archive_filename (ibfd
), bfd_get_target (ibfd
),
1374 bfd_get_filename (obfd
), bfd_get_target (obfd
));
1383 start
= bfd_get_start_address (ibfd
);
1384 start
+= change_start
;
1387 /* Neither the start address nor the flags
1388 need to be set for a core file. */
1389 if (bfd_get_format (obfd
) != bfd_core
)
1393 flags
= bfd_get_file_flags (ibfd
);
1394 flags
|= bfd_flags_to_set
;
1395 flags
&= ~bfd_flags_to_clear
;
1396 flags
&= bfd_applicable_file_flags (obfd
);
1398 if (!bfd_set_start_address (obfd
, start
)
1399 || !bfd_set_file_flags (obfd
, flags
))
1401 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1406 /* Copy architecture of input file to output file. */
1407 iarch
= bfd_get_arch (ibfd
);
1408 imach
= bfd_get_mach (ibfd
);
1409 if (!bfd_set_arch_mach (obfd
, iarch
, imach
)
1410 && (ibfd
->target_defaulted
1411 || bfd_get_arch (ibfd
) != bfd_get_arch (obfd
)))
1413 if (bfd_get_arch (ibfd
) == bfd_arch_unknown
)
1414 non_fatal (_("Unable to recognise the format of the input file `%s'"),
1415 bfd_get_archive_filename (ibfd
));
1417 non_fatal (_("Warning: Output file cannot represent architecture `%s'"),
1418 bfd_printable_arch_mach (bfd_get_arch (ibfd
),
1419 bfd_get_mach (ibfd
)));
1423 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
1425 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1432 if (osympp
!= isympp
)
1438 symsize
= bfd_get_symtab_upper_bound (ibfd
);
1441 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1445 osympp
= isympp
= xmalloc (symsize
);
1446 symcount
= bfd_canonicalize_symtab (ibfd
, isympp
);
1449 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1453 /* BFD mandates that all output sections be created and sizes set before
1454 any output is done. Thus, we traverse all sections multiple times. */
1455 bfd_map_over_sections (ibfd
, setup_section
, obfd
);
1457 if (!extract_symbol
)
1458 setup_bfd_headers (ibfd
, obfd
);
1460 if (add_sections
!= NULL
)
1462 struct section_add
*padd
;
1463 struct section_list
*pset
;
1465 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
1469 pset
= find_section_list (padd
->name
, FALSE
);
1473 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DATA
;
1474 if (pset
!= NULL
&& pset
->set_flags
)
1475 flags
= pset
->flags
| SEC_HAS_CONTENTS
;
1477 /* bfd_make_section_with_flags() does not return very helpful
1478 error codes, so check for the most likely user error first. */
1479 if (bfd_get_section_by_name (obfd
, padd
->name
))
1481 bfd_nonfatal_message (NULL
, obfd
, NULL
,
1482 _("can't add section '%s'"), padd
->name
);
1487 padd
->section
= bfd_make_section_with_flags (obfd
, padd
->name
, flags
);
1488 if (padd
->section
== NULL
)
1490 bfd_nonfatal_message (NULL
, obfd
, NULL
,
1491 _("can't create section `%s'"),
1497 if (! bfd_set_section_size (obfd
, padd
->section
, padd
->size
))
1499 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
1505 if (pset
->change_vma
!= CHANGE_IGNORE
)
1506 if (! bfd_set_section_vma (obfd
, padd
->section
,
1509 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
1513 if (pset
->change_lma
!= CHANGE_IGNORE
)
1515 padd
->section
->lma
= pset
->lma_val
;
1517 if (! bfd_set_section_alignment
1518 (obfd
, padd
->section
,
1519 bfd_section_alignment (obfd
, padd
->section
)))
1521 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
1529 if (gnu_debuglink_filename
!= NULL
)
1531 gnu_debuglink_section
= bfd_create_gnu_debuglink_section
1532 (obfd
, gnu_debuglink_filename
);
1534 if (gnu_debuglink_section
== NULL
)
1536 bfd_nonfatal_message (NULL
, obfd
, NULL
,
1537 _("cannot create debug link section `%s'"),
1538 gnu_debuglink_filename
);
1542 /* Special processing for PE format files. We
1543 have no way to distinguish PE from COFF here. */
1544 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
)
1546 bfd_vma debuglink_vma
;
1547 asection
* highest_section
;
1550 /* The PE spec requires that all sections be adjacent and sorted
1551 in ascending order of VMA. It also specifies that debug
1552 sections should be last. This is despite the fact that debug
1553 sections are not loaded into memory and so in theory have no
1556 This means that the debuglink section must be given a non-zero
1557 VMA which makes it contiguous with other debug sections. So
1558 walk the current section list, find the section with the
1559 highest VMA and start the debuglink section after that one. */
1560 for (sec
= obfd
->sections
, highest_section
= NULL
;
1564 && (highest_section
== NULL
1565 || sec
->vma
> highest_section
->vma
))
1566 highest_section
= sec
;
1568 if (highest_section
)
1569 debuglink_vma
= BFD_ALIGN (highest_section
->vma
1570 + highest_section
->size
,
1571 /* FIXME: We ought to be using
1572 COFF_PAGE_SIZE here or maybe
1573 bfd_get_section_alignment() (if it
1574 was set) but since this is for PE
1575 and we know the required alignment
1576 it is easier just to hard code it. */
1579 /* Umm, not sure what to do in this case. */
1580 debuglink_vma
= 0x1000;
1582 bfd_set_section_vma (obfd
, gnu_debuglink_section
, debuglink_vma
);
1586 if (bfd_count_sections (obfd
) != 0
1587 && (gap_fill_set
|| pad_to_set
))
1592 /* We must fill in gaps between the sections and/or we must pad
1593 the last section to a specified address. We do this by
1594 grabbing a list of the sections, sorting them by VMA, and
1595 increasing the section sizes as required to fill the gaps.
1596 We write out the gap contents below. */
1598 c
= bfd_count_sections (obfd
);
1599 osections
= xmalloc (c
* sizeof (asection
*));
1601 bfd_map_over_sections (obfd
, get_sections
, &set
);
1603 qsort (osections
, c
, sizeof (asection
*), compare_section_lma
);
1605 gaps
= xmalloc (c
* sizeof (bfd_size_type
));
1606 memset (gaps
, 0, c
* sizeof (bfd_size_type
));
1610 for (i
= 0; i
< c
- 1; i
++)
1614 bfd_vma gap_start
, gap_stop
;
1616 flags
= bfd_get_section_flags (obfd
, osections
[i
]);
1617 if ((flags
& SEC_HAS_CONTENTS
) == 0
1618 || (flags
& SEC_LOAD
) == 0)
1621 size
= bfd_section_size (obfd
, osections
[i
]);
1622 gap_start
= bfd_section_lma (obfd
, osections
[i
]) + size
;
1623 gap_stop
= bfd_section_lma (obfd
, osections
[i
+ 1]);
1624 if (gap_start
< gap_stop
)
1626 if (! bfd_set_section_size (obfd
, osections
[i
],
1627 size
+ (gap_stop
- gap_start
)))
1629 bfd_nonfatal_message (NULL
, obfd
, osections
[i
],
1630 _("Can't fill gap after section"));
1634 gaps
[i
] = gap_stop
- gap_start
;
1635 if (max_gap
< gap_stop
- gap_start
)
1636 max_gap
= gap_stop
- gap_start
;
1646 lma
= bfd_section_lma (obfd
, osections
[c
- 1]);
1647 size
= bfd_section_size (obfd
, osections
[c
- 1]);
1648 if (lma
+ size
< pad_to
)
1650 if (! bfd_set_section_size (obfd
, osections
[c
- 1],
1653 bfd_nonfatal_message (NULL
, obfd
, osections
[c
- 1],
1654 _("can't add padding"));
1659 gaps
[c
- 1] = pad_to
- (lma
+ size
);
1660 if (max_gap
< pad_to
- (lma
+ size
))
1661 max_gap
= pad_to
- (lma
+ size
);
1667 /* Symbol filtering must happen after the output sections
1668 have been created, but before their contents are set. */
1670 if (convert_debugging
)
1671 dhandle
= read_debugging_info (ibfd
, isympp
, symcount
, FALSE
);
1673 if (strip_symbols
== STRIP_DEBUG
1674 || strip_symbols
== STRIP_ALL
1675 || strip_symbols
== STRIP_UNNEEDED
1676 || strip_symbols
== STRIP_NONDEBUG
1677 || discard_locals
!= LOCALS_UNDEF
1679 || htab_elements (strip_specific_htab
) != 0
1680 || htab_elements (keep_specific_htab
) != 0
1681 || htab_elements (localize_specific_htab
) != 0
1682 || htab_elements (globalize_specific_htab
) != 0
1683 || htab_elements (keepglobal_specific_htab
) != 0
1684 || htab_elements (weaken_specific_htab
) != 0
1685 || prefix_symbols_string
1688 || convert_debugging
1689 || change_leading_char
1690 || remove_leading_char
1691 || redefine_sym_list
1694 /* Mark symbols used in output relocations so that they
1695 are kept, even if they are local labels or static symbols.
1697 Note we iterate over the input sections examining their
1698 relocations since the relocations for the output sections
1699 haven't been set yet. mark_symbols_used_in_relocations will
1700 ignore input sections which have no corresponding output
1702 if (strip_symbols
!= STRIP_ALL
)
1703 bfd_map_over_sections (ibfd
,
1704 mark_symbols_used_in_relocations
,
1706 osympp
= xmalloc ((symcount
+ 1) * sizeof (asymbol
*));
1707 symcount
= filter_symbols (ibfd
, obfd
, osympp
, isympp
, symcount
);
1710 if (convert_debugging
&& dhandle
!= NULL
)
1712 if (! write_debugging_info (obfd
, dhandle
, &symcount
, &osympp
))
1719 bfd_set_symtab (obfd
, osympp
, symcount
);
1721 /* This has to happen after the symbol table has been set. */
1722 bfd_map_over_sections (ibfd
, copy_section
, obfd
);
1724 if (add_sections
!= NULL
)
1726 struct section_add
*padd
;
1728 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
1730 if (! bfd_set_section_contents (obfd
, padd
->section
, padd
->contents
,
1733 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
1739 if (gnu_debuglink_filename
!= NULL
)
1741 if (! bfd_fill_in_gnu_debuglink_section
1742 (obfd
, gnu_debuglink_section
, gnu_debuglink_filename
))
1744 bfd_nonfatal_message (NULL
, obfd
, NULL
,
1745 _("cannot fill debug link section `%s'"),
1746 gnu_debuglink_filename
);
1751 if (gap_fill_set
|| pad_to_set
)
1756 /* Fill in the gaps. */
1759 buf
= xmalloc (max_gap
);
1760 memset (buf
, gap_fill
, max_gap
);
1762 c
= bfd_count_sections (obfd
);
1763 for (i
= 0; i
< c
; i
++)
1771 off
= bfd_section_size (obfd
, osections
[i
]) - left
;
1782 if (! bfd_set_section_contents (obfd
, osections
[i
], buf
,
1785 bfd_nonfatal_message (NULL
, obfd
, osections
[i
], NULL
);
1796 /* Do not copy backend data if --extract-symbol is passed; anything
1797 that needs to look at the section contents will fail. */
1801 /* Allow the BFD backend to copy any private data it understands
1802 from the input BFD to the output BFD. This is done last to
1803 permit the routine to look at the filtered symbol table, which is
1804 important for the ECOFF code at least. */
1805 if (! bfd_copy_private_bfd_data (ibfd
, obfd
))
1807 bfd_nonfatal_message (NULL
, obfd
, NULL
,
1808 _("error copying private BFD data"));
1812 /* Switch to the alternate machine code. We have to do this at the
1813 very end, because we only initialize the header when we create
1814 the first section. */
1815 if (use_alt_mach_code
!= 0)
1817 if (! bfd_alt_mach_code (obfd
, use_alt_mach_code
))
1819 non_fatal (_("this target does not support %lu alternative machine codes"),
1821 if (bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
1823 non_fatal (_("treating that number as an absolute e_machine value instead"));
1824 elf_elfheader (obfd
)->e_machine
= use_alt_mach_code
;
1827 non_fatal (_("ignoring the alternative value"));
1834 /* Read each archive element in turn from IBFD, copy the
1835 contents to temp file, and keep the temp file handle.
1836 If 'force_output_target' is TRUE then make sure that
1837 all elements in the new archive are of the type
1841 copy_archive (bfd
*ibfd
, bfd
*obfd
, const char *output_target
,
1842 bfd_boolean force_output_target
)
1846 struct name_list
*next
;
1850 bfd
**ptr
= &obfd
->archive_head
;
1853 const char *filename
;
1855 /* Make a temp directory to hold the contents. */
1856 dir
= make_tempdir (bfd_get_filename (obfd
));
1858 fatal (_("cannot create tempdir for archive copying (error: %s)"),
1861 obfd
->has_armap
= ibfd
->has_armap
;
1862 obfd
->is_thin_archive
= ibfd
->is_thin_archive
;
1866 this_element
= bfd_openr_next_archived_file (ibfd
, NULL
);
1868 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
1871 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
1875 while (!status
&& this_element
!= NULL
)
1881 int stat_status
= 0;
1882 bfd_boolean
delete = TRUE
;
1884 /* Create an output file for this member. */
1885 output_name
= concat (dir
, "/",
1886 bfd_get_filename (this_element
), (char *) 0);
1888 /* If the file already exists, make another temp dir. */
1889 if (stat (output_name
, &buf
) >= 0)
1891 output_name
= make_tempdir (output_name
);
1892 if (output_name
== NULL
)
1893 fatal (_("cannot create tempdir for archive copying (error: %s)"),
1896 l
= xmalloc (sizeof (struct name_list
));
1897 l
->name
= output_name
;
1901 output_name
= concat (output_name
, "/",
1902 bfd_get_filename (this_element
), (char *) 0);
1907 stat_status
= bfd_stat_arch_elt (this_element
, &buf
);
1909 if (stat_status
!= 0)
1910 non_fatal (_("internal stat error on %s"),
1911 bfd_get_filename (this_element
));
1914 l
= xmalloc (sizeof (struct name_list
));
1915 l
->name
= output_name
;
1920 if (bfd_check_format (this_element
, bfd_object
))
1922 /* PR binutils/3110: Cope with archives
1923 containing multiple target types. */
1924 if (force_output_target
)
1925 output_bfd
= bfd_openw (output_name
, output_target
);
1927 output_bfd
= bfd_openw (output_name
, bfd_get_target (this_element
));
1929 if (output_bfd
== NULL
)
1931 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
1936 delete = ! copy_object (this_element
, output_bfd
);
1939 || bfd_get_arch (this_element
) != bfd_arch_unknown
)
1941 if (!bfd_close (output_bfd
))
1943 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
1944 /* Error in new object file. Don't change archive. */
1949 goto copy_unknown_element
;
1953 bfd_nonfatal_message (NULL
, this_element
, NULL
,
1954 _("Unable to recognise the format of file"));
1956 output_bfd
= bfd_openw (output_name
, output_target
);
1957 copy_unknown_element
:
1958 delete = !copy_unknown_object (this_element
, output_bfd
);
1959 if (!bfd_close_all_done (output_bfd
))
1961 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
1962 /* Error in new object file. Don't change archive. */
1969 unlink (output_name
);
1974 if (preserve_dates
&& stat_status
== 0)
1975 set_times (output_name
, &buf
);
1977 /* Open the newly output file and attach to our list. */
1978 output_bfd
= bfd_openr (output_name
, output_target
);
1980 l
->obfd
= output_bfd
;
1983 ptr
= &output_bfd
->archive_next
;
1985 last_element
= this_element
;
1987 this_element
= bfd_openr_next_archived_file (ibfd
, last_element
);
1989 bfd_close (last_element
);
1994 filename
= bfd_get_filename (obfd
);
1995 if (!bfd_close (obfd
))
1998 bfd_nonfatal_message (filename
, NULL
, NULL
, NULL
);
2002 filename
= bfd_get_filename (ibfd
);
2003 if (!bfd_close (ibfd
))
2006 bfd_nonfatal_message (filename
, NULL
, NULL
, NULL
);
2010 /* Delete all the files that we opened. */
2011 for (l
= list
; l
!= NULL
; l
= l
->next
)
2013 if (l
->obfd
== NULL
)
2017 bfd_close (l
->obfd
);
2024 /* The top-level control. */
2027 copy_file (const char *input_filename
, const char *output_filename
,
2028 const char *input_target
, const char *output_target
)
2031 char **obj_matching
;
2032 char **core_matching
;
2034 if (get_file_size (input_filename
) < 1)
2040 /* To allow us to do "strip *" without dying on the first
2041 non-object file, failures are nonfatal. */
2042 ibfd
= bfd_openr (input_filename
, input_target
);
2045 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
2050 if (bfd_check_format (ibfd
, bfd_archive
))
2052 bfd_boolean force_output_target
;
2055 /* bfd_get_target does not return the correct value until
2056 bfd_check_format succeeds. */
2057 if (output_target
== NULL
)
2059 output_target
= bfd_get_target (ibfd
);
2060 force_output_target
= FALSE
;
2063 force_output_target
= TRUE
;
2065 obfd
= bfd_openw (output_filename
, output_target
);
2068 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
2073 copy_archive (ibfd
, obfd
, output_target
, force_output_target
);
2075 else if (bfd_check_format_matches (ibfd
, bfd_object
, &obj_matching
))
2080 /* bfd_get_target does not return the correct value until
2081 bfd_check_format succeeds. */
2082 if (output_target
== NULL
)
2083 output_target
= bfd_get_target (ibfd
);
2085 obfd
= bfd_openw (output_filename
, output_target
);
2088 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
2093 if (! copy_object (ibfd
, obfd
))
2096 if (!bfd_close (obfd
))
2099 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
2103 if (!bfd_close (ibfd
))
2106 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
2112 bfd_error_type obj_error
= bfd_get_error ();
2113 bfd_error_type core_error
;
2115 if (bfd_check_format_matches (ibfd
, bfd_core
, &core_matching
))
2117 /* This probably can't happen.. */
2118 if (obj_error
== bfd_error_file_ambiguously_recognized
)
2119 free (obj_matching
);
2123 core_error
= bfd_get_error ();
2124 /* Report the object error in preference to the core error. */
2125 if (obj_error
!= core_error
)
2126 bfd_set_error (obj_error
);
2128 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
2130 if (obj_error
== bfd_error_file_ambiguously_recognized
)
2132 list_matching_formats (obj_matching
);
2133 free (obj_matching
);
2135 if (core_error
== bfd_error_file_ambiguously_recognized
)
2137 list_matching_formats (core_matching
);
2138 free (core_matching
);
2145 /* Add a name to the section renaming list. */
2148 add_section_rename (const char * old_name
, const char * new_name
,
2151 section_rename
* rename
;
2153 /* Check for conflicts first. */
2154 for (rename
= section_rename_list
; rename
!= NULL
; rename
= rename
->next
)
2155 if (strcmp (rename
->old_name
, old_name
) == 0)
2157 /* Silently ignore duplicate definitions. */
2158 if (strcmp (rename
->new_name
, new_name
) == 0
2159 && rename
->flags
== flags
)
2162 fatal (_("Multiple renames of section %s"), old_name
);
2165 rename
= xmalloc (sizeof (* rename
));
2167 rename
->old_name
= old_name
;
2168 rename
->new_name
= new_name
;
2169 rename
->flags
= flags
;
2170 rename
->next
= section_rename_list
;
2172 section_rename_list
= rename
;
2175 /* Check the section rename list for a new name of the input section
2176 ISECTION. Return the new name if one is found.
2177 Also set RETURNED_FLAGS to the flags to be used for this section. */
2180 find_section_rename (bfd
* ibfd ATTRIBUTE_UNUSED
, sec_ptr isection
,
2181 flagword
* returned_flags
)
2183 const char * old_name
= bfd_section_name (ibfd
, isection
);
2184 section_rename
* rename
;
2186 /* Default to using the flags of the input section. */
2187 * returned_flags
= bfd_get_section_flags (ibfd
, isection
);
2189 for (rename
= section_rename_list
; rename
!= NULL
; rename
= rename
->next
)
2190 if (strcmp (rename
->old_name
, old_name
) == 0)
2192 if (rename
->flags
!= (flagword
) -1)
2193 * returned_flags
= rename
->flags
;
2195 return rename
->new_name
;
2201 /* Once each of the sections is copied, we may still need to do some
2202 finalization work for private section headers. Do that here. */
2205 setup_bfd_headers (bfd
*ibfd
, bfd
*obfd
)
2207 /* Allow the BFD backend to copy any private data it understands
2208 from the input section to the output section. */
2209 if (! bfd_copy_private_header_data (ibfd
, obfd
))
2212 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
2213 _("error in private header data"));
2217 /* All went well. */
2221 /* Create a section in OBFD with the same
2222 name and attributes as ISECTION in IBFD. */
2225 setup_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
2227 bfd
*obfd
= obfdarg
;
2228 struct section_list
*p
;
2236 char *prefix
= NULL
;
2237 bfd_boolean make_nobits
;
2239 if (is_strip_section (ibfd
, isection
))
2242 p
= find_section_list (bfd_section_name (ibfd
, isection
), FALSE
);
2246 /* Get the, possibly new, name of the output section. */
2247 name
= find_section_rename (ibfd
, isection
, & flags
);
2249 /* Prefix sections. */
2250 if ((prefix_alloc_sections_string
)
2251 && (bfd_get_section_flags (ibfd
, isection
) & SEC_ALLOC
))
2252 prefix
= prefix_alloc_sections_string
;
2253 else if (prefix_sections_string
)
2254 prefix
= prefix_sections_string
;
2260 n
= xmalloc (strlen (prefix
) + strlen (name
) + 1);
2266 make_nobits
= FALSE
;
2267 if (p
!= NULL
&& p
->set_flags
)
2268 flags
= p
->flags
| (flags
& (SEC_HAS_CONTENTS
| SEC_RELOC
));
2269 else if (strip_symbols
== STRIP_NONDEBUG
2270 && (flags
& SEC_ALLOC
) != 0
2271 && (ibfd
->xvec
->flavour
!= bfd_target_elf_flavour
2272 || elf_section_type (isection
) != SHT_NOTE
))
2274 flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
);
2275 if (obfd
->xvec
->flavour
== bfd_target_elf_flavour
)
2279 /* Twiddle the input section flags so that it seems to
2280 elf.c:copy_private_bfd_data that section flags have not
2281 changed between input and output sections. This hack
2282 prevents wholesale rewriting of the program headers. */
2283 isection
->flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
);
2287 osection
= bfd_make_section_anyway_with_flags (obfd
, name
, flags
);
2289 if (osection
== NULL
)
2291 err
= _("failed to create output section");
2296 elf_section_type (osection
) = SHT_NOBITS
;
2298 size
= bfd_section_size (ibfd
, isection
);
2300 size
= (size
+ interleave
- 1) / interleave
;
2301 else if (extract_symbol
)
2303 if (! bfd_set_section_size (obfd
, osection
, size
))
2305 err
= _("failed to set size");
2309 vma
= bfd_section_vma (ibfd
, isection
);
2310 if (p
!= NULL
&& p
->change_vma
== CHANGE_MODIFY
)
2312 else if (p
!= NULL
&& p
->change_vma
== CHANGE_SET
)
2315 vma
+= change_section_address
;
2317 if (! bfd_set_section_vma (obfd
, osection
, vma
))
2319 err
= _("failed to set vma");
2323 lma
= isection
->lma
;
2324 if ((p
!= NULL
) && p
->change_lma
!= CHANGE_IGNORE
)
2326 if (p
->change_lma
== CHANGE_MODIFY
)
2328 else if (p
->change_lma
== CHANGE_SET
)
2334 lma
+= change_section_address
;
2336 osection
->lma
= lma
;
2338 /* FIXME: This is probably not enough. If we change the LMA we
2339 may have to recompute the header for the file as well. */
2340 if (!bfd_set_section_alignment (obfd
,
2342 bfd_section_alignment (ibfd
, isection
)))
2344 err
= _("failed to set alignment");
2348 /* Copy merge entity size. */
2349 osection
->entsize
= isection
->entsize
;
2351 /* This used to be mangle_section; we do here to avoid using
2352 bfd_get_section_by_name since some formats allow multiple
2353 sections with the same name. */
2354 isection
->output_section
= osection
;
2355 isection
->output_offset
= 0;
2357 /* Do not copy backend data if --extract-symbol is passed; anything
2358 that needs to look at the section contents will fail. */
2362 if ((isection
->flags
& SEC_GROUP
) != 0)
2364 asymbol
*gsym
= group_signature (isection
);
2368 gsym
->flags
|= BSF_KEEP
;
2369 if (ibfd
->xvec
->flavour
== bfd_target_elf_flavour
)
2370 elf_group_id (isection
) = gsym
;
2374 /* Allow the BFD backend to copy any private data it understands
2375 from the input section to the output section. */
2376 if (!bfd_copy_private_section_data (ibfd
, isection
, obfd
, osection
))
2378 err
= _("failed to copy private data");
2382 /* All went well. */
2387 bfd_nonfatal_message (NULL
, obfd
, osection
, err
);
2390 /* Copy the data of input section ISECTION of IBFD
2391 to an output section with the same name in OBFD.
2392 If stripping then don't copy any relocation info. */
2395 copy_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
2397 bfd
*obfd
= obfdarg
;
2398 struct section_list
*p
;
2406 /* If we have already failed earlier on,
2407 do not keep on generating complaints now. */
2411 if (is_strip_section (ibfd
, isection
))
2414 flags
= bfd_get_section_flags (ibfd
, isection
);
2415 if ((flags
& SEC_GROUP
) != 0)
2418 osection
= isection
->output_section
;
2419 size
= bfd_get_section_size (isection
);
2421 if (size
== 0 || osection
== 0)
2427 p
= find_section_list (bfd_get_section_name (ibfd
, isection
), FALSE
);
2429 /* Core files do not need to be relocated. */
2430 if (bfd_get_format (obfd
) == bfd_core
)
2434 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
2438 /* Do not complain if the target does not support relocations. */
2439 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
2444 bfd_nonfatal_message (NULL
, ibfd
, isection
, NULL
);
2451 bfd_set_reloc (obfd
, osection
, NULL
, 0);
2454 relpp
= xmalloc (relsize
);
2455 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, isympp
);
2459 bfd_nonfatal_message (NULL
, ibfd
, isection
,
2460 _("relocation count is negative"));
2464 if (strip_symbols
== STRIP_ALL
)
2466 /* Remove relocations which are not in
2467 keep_strip_specific_list. */
2468 arelent
**temp_relpp
;
2469 long temp_relcount
= 0;
2472 temp_relpp
= xmalloc (relsize
);
2473 for (i
= 0; i
< relcount
; i
++)
2474 if (is_specified_symbol (bfd_asymbol_name (*relpp
[i
]->sym_ptr_ptr
),
2475 keep_specific_htab
))
2476 temp_relpp
[temp_relcount
++] = relpp
[i
];
2477 relcount
= temp_relcount
;
2482 bfd_set_reloc (obfd
, osection
, relcount
== 0 ? NULL
: relpp
, relcount
);
2487 if (bfd_get_section_flags (ibfd
, isection
) & SEC_HAS_CONTENTS
2488 && bfd_get_section_flags (obfd
, osection
) & SEC_HAS_CONTENTS
)
2490 void *memhunk
= xmalloc (size
);
2492 if (!bfd_get_section_contents (ibfd
, isection
, memhunk
, 0, size
))
2495 bfd_nonfatal_message (NULL
, ibfd
, isection
, NULL
);
2501 /* We don't handle leftover bytes (too many possible behaviors,
2502 and we don't know what the user wants). The section length
2503 must be a multiple of the number of bytes to swap. */
2504 if ((size
% reverse_bytes
) == 0)
2509 for (i
= 0; i
< size
; i
+= reverse_bytes
)
2510 for (j
= 0; j
< (unsigned long)(reverse_bytes
/ 2); j
++)
2512 bfd_byte
*m
= (bfd_byte
*) memhunk
;
2515 m
[i
+ j
] = m
[(i
+ reverse_bytes
) - (j
+ 1)];
2516 m
[(i
+ reverse_bytes
) - (j
+ 1)] = b
;
2520 /* User must pad the section up in order to do this. */
2521 fatal (_("cannot reverse bytes: length of section %s must be evenly divisible by %d"),
2522 bfd_section_name (ibfd
, isection
), reverse_bytes
);
2527 /* Keep only every `copy_byte'th byte in MEMHUNK. */
2528 char *from
= (char *) memhunk
+ copy_byte
;
2530 char *end
= (char *) memhunk
+ size
;
2532 for (; from
< end
; from
+= interleave
)
2535 size
= (size
+ interleave
- 1 - copy_byte
) / interleave
;
2536 osection
->lma
/= interleave
;
2539 if (!bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
2542 bfd_nonfatal_message (NULL
, obfd
, osection
, NULL
);
2547 else if (p
!= NULL
&& p
->set_flags
&& (p
->flags
& SEC_HAS_CONTENTS
) != 0)
2549 void *memhunk
= xmalloc (size
);
2551 /* We don't permit the user to turn off the SEC_HAS_CONTENTS
2552 flag--they can just remove the section entirely and add it
2553 back again. However, we do permit them to turn on the
2554 SEC_HAS_CONTENTS flag, and take it to mean that the section
2555 contents should be zeroed out. */
2557 memset (memhunk
, 0, size
);
2558 if (! bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
2561 bfd_nonfatal_message (NULL
, obfd
, osection
, NULL
);
2568 /* Get all the sections. This is used when --gap-fill or --pad-to is
2572 get_sections (bfd
*obfd ATTRIBUTE_UNUSED
, asection
*osection
, void *secppparg
)
2574 asection
***secppp
= secppparg
;
2576 **secppp
= osection
;
2580 /* Sort sections by VMA. This is called via qsort, and is used when
2581 --gap-fill or --pad-to is used. We force non loadable or empty
2582 sections to the front, where they are easier to ignore. */
2585 compare_section_lma (const void *arg1
, const void *arg2
)
2587 const asection
*const *sec1
= arg1
;
2588 const asection
*const *sec2
= arg2
;
2589 flagword flags1
, flags2
;
2591 /* Sort non loadable sections to the front. */
2592 flags1
= (*sec1
)->flags
;
2593 flags2
= (*sec2
)->flags
;
2594 if ((flags1
& SEC_HAS_CONTENTS
) == 0
2595 || (flags1
& SEC_LOAD
) == 0)
2597 if ((flags2
& SEC_HAS_CONTENTS
) != 0
2598 && (flags2
& SEC_LOAD
) != 0)
2603 if ((flags2
& SEC_HAS_CONTENTS
) == 0
2604 || (flags2
& SEC_LOAD
) == 0)
2608 /* Sort sections by LMA. */
2609 if ((*sec1
)->lma
> (*sec2
)->lma
)
2611 else if ((*sec1
)->lma
< (*sec2
)->lma
)
2614 /* Sort sections with the same LMA by size. */
2615 if (bfd_get_section_size (*sec1
) > bfd_get_section_size (*sec2
))
2617 else if (bfd_get_section_size (*sec1
) < bfd_get_section_size (*sec2
))
2623 /* Mark all the symbols which will be used in output relocations with
2624 the BSF_KEEP flag so that those symbols will not be stripped.
2626 Ignore relocations which will not appear in the output file. */
2629 mark_symbols_used_in_relocations (bfd
*ibfd
, sec_ptr isection
, void *symbolsarg
)
2631 asymbol
**symbols
= symbolsarg
;
2636 /* Ignore an input section with no corresponding output section. */
2637 if (isection
->output_section
== NULL
)
2640 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
2643 /* Do not complain if the target does not support relocations. */
2644 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
2646 bfd_fatal (bfd_get_filename (ibfd
));
2652 relpp
= xmalloc (relsize
);
2653 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, symbols
);
2655 bfd_fatal (bfd_get_filename (ibfd
));
2657 /* Examine each symbol used in a relocation. If it's not one of the
2658 special bfd section symbols, then mark it with BSF_KEEP. */
2659 for (i
= 0; i
< relcount
; i
++)
2661 if (*relpp
[i
]->sym_ptr_ptr
!= bfd_com_section_ptr
->symbol
2662 && *relpp
[i
]->sym_ptr_ptr
!= bfd_abs_section_ptr
->symbol
2663 && *relpp
[i
]->sym_ptr_ptr
!= bfd_und_section_ptr
->symbol
)
2664 (*relpp
[i
]->sym_ptr_ptr
)->flags
|= BSF_KEEP
;
2671 /* Write out debugging information. */
2674 write_debugging_info (bfd
*obfd
, void *dhandle
,
2675 long *symcountp ATTRIBUTE_UNUSED
,
2676 asymbol
***symppp ATTRIBUTE_UNUSED
)
2678 if (bfd_get_flavour (obfd
) == bfd_target_ieee_flavour
)
2679 return write_ieee_debugging_info (obfd
, dhandle
);
2681 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
2682 || bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
2684 bfd_byte
*syms
, *strings
;
2685 bfd_size_type symsize
, stringsize
;
2686 asection
*stabsec
, *stabstrsec
;
2689 if (! write_stabs_in_sections_debugging_info (obfd
, dhandle
, &syms
,
2694 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DEBUGGING
;
2695 stabsec
= bfd_make_section_with_flags (obfd
, ".stab", flags
);
2696 stabstrsec
= bfd_make_section_with_flags (obfd
, ".stabstr", flags
);
2698 || stabstrsec
== NULL
2699 || ! bfd_set_section_size (obfd
, stabsec
, symsize
)
2700 || ! bfd_set_section_size (obfd
, stabstrsec
, stringsize
)
2701 || ! bfd_set_section_alignment (obfd
, stabsec
, 2)
2702 || ! bfd_set_section_alignment (obfd
, stabstrsec
, 0))
2704 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2705 _("can't create debugging section"));
2709 /* We can get away with setting the section contents now because
2710 the next thing the caller is going to do is copy over the
2711 real sections. We may someday have to split the contents
2712 setting out of this function. */
2713 if (! bfd_set_section_contents (obfd
, stabsec
, syms
, 0, symsize
)
2714 || ! bfd_set_section_contents (obfd
, stabstrsec
, strings
, 0,
2717 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2718 _("can't set debugging section contents"));
2725 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2726 _("don't know how to write debugging information for %s"),
2727 bfd_get_target (obfd
));
2732 strip_main (int argc
, char *argv
[])
2734 char *input_target
= NULL
;
2735 char *output_target
= NULL
;
2736 bfd_boolean show_version
= FALSE
;
2737 bfd_boolean formats_info
= FALSE
;
2740 struct section_list
*p
;
2741 char *output_file
= NULL
;
2743 while ((c
= getopt_long (argc
, argv
, "I:O:F:K:N:R:o:sSpdgxXHhVvw",
2744 strip_options
, (int *) 0)) != EOF
)
2749 input_target
= optarg
;
2752 output_target
= optarg
;
2755 input_target
= output_target
= optarg
;
2758 p
= find_section_list (optarg
, TRUE
);
2760 sections_removed
= TRUE
;
2763 strip_symbols
= STRIP_ALL
;
2767 case 'd': /* Historic BSD alias for -g. Used by early NetBSD. */
2768 strip_symbols
= STRIP_DEBUG
;
2770 case OPTION_STRIP_UNNEEDED
:
2771 strip_symbols
= STRIP_UNNEEDED
;
2774 add_specific_symbol (optarg
, keep_specific_htab
);
2777 add_specific_symbol (optarg
, strip_specific_htab
);
2780 output_file
= optarg
;
2783 preserve_dates
= TRUE
;
2786 discard_locals
= LOCALS_ALL
;
2789 discard_locals
= LOCALS_START_L
;
2795 show_version
= TRUE
;
2797 case OPTION_FORMATS_INFO
:
2798 formats_info
= TRUE
;
2800 case OPTION_ONLY_KEEP_DEBUG
:
2801 strip_symbols
= STRIP_NONDEBUG
;
2803 case OPTION_KEEP_FILE_SYMBOLS
:
2804 keep_file_symbols
= 1;
2807 /* We've been given a long option. */
2814 strip_usage (stdout
, 0);
2816 strip_usage (stderr
, 1);
2827 print_version ("strip");
2829 /* Default is to strip all symbols. */
2830 if (strip_symbols
== STRIP_UNDEF
2831 && discard_locals
== LOCALS_UNDEF
2832 && htab_elements (strip_specific_htab
) == 0)
2833 strip_symbols
= STRIP_ALL
;
2835 if (output_target
== NULL
)
2836 output_target
= input_target
;
2840 || (output_file
!= NULL
&& (i
+ 1) < argc
))
2841 strip_usage (stderr
, 1);
2843 for (; i
< argc
; i
++)
2845 int hold_status
= status
;
2846 struct stat statbuf
;
2849 if (get_file_size (argv
[i
]) < 1)
2856 /* No need to check the return value of stat().
2857 It has already been checked in get_file_size(). */
2858 stat (argv
[i
], &statbuf
);
2860 if (output_file
== NULL
|| strcmp (argv
[i
], output_file
) == 0)
2861 tmpname
= make_tempname (argv
[i
]);
2863 tmpname
= output_file
;
2865 if (tmpname
== NULL
)
2867 bfd_nonfatal_message (argv
[i
], NULL
, NULL
,
2868 _("could not create temporary file to hold stripped copy"));
2874 copy_file (argv
[i
], tmpname
, input_target
, output_target
);
2878 set_times (tmpname
, &statbuf
);
2879 if (output_file
!= tmpname
)
2880 smart_rename (tmpname
, output_file
? output_file
: argv
[i
],
2882 status
= hold_status
;
2885 unlink_if_ordinary (tmpname
);
2886 if (output_file
!= tmpname
)
2894 copy_main (int argc
, char *argv
[])
2896 char * binary_architecture
= NULL
;
2897 char *input_filename
= NULL
;
2898 char *output_filename
= NULL
;
2900 char *input_target
= NULL
;
2901 char *output_target
= NULL
;
2902 bfd_boolean show_version
= FALSE
;
2903 bfd_boolean change_warn
= TRUE
;
2904 bfd_boolean formats_info
= FALSE
;
2906 struct section_list
*p
;
2907 struct stat statbuf
;
2909 while ((c
= getopt_long (argc
, argv
, "b:B:i:I:j:K:N:s:O:d:F:L:G:R:SpgxXHhVvW:w",
2910 copy_options
, (int *) 0)) != EOF
)
2915 copy_byte
= atoi (optarg
);
2917 fatal (_("byte number must be non-negative"));
2921 binary_architecture
= optarg
;
2925 interleave
= atoi (optarg
);
2927 fatal (_("interleave must be positive"));
2931 case 's': /* "source" - 'I' is preferred */
2932 input_target
= optarg
;
2936 case 'd': /* "destination" - 'O' is preferred */
2937 output_target
= optarg
;
2941 input_target
= output_target
= optarg
;
2945 p
= find_section_list (optarg
, TRUE
);
2947 fatal (_("%s both copied and removed"), optarg
);
2949 sections_copied
= TRUE
;
2953 p
= find_section_list (optarg
, TRUE
);
2955 fatal (_("%s both copied and removed"), optarg
);
2957 sections_removed
= TRUE
;
2961 strip_symbols
= STRIP_ALL
;
2965 strip_symbols
= STRIP_DEBUG
;
2968 case OPTION_STRIP_UNNEEDED
:
2969 strip_symbols
= STRIP_UNNEEDED
;
2972 case OPTION_ONLY_KEEP_DEBUG
:
2973 strip_symbols
= STRIP_NONDEBUG
;
2976 case OPTION_KEEP_FILE_SYMBOLS
:
2977 keep_file_symbols
= 1;
2980 case OPTION_ADD_GNU_DEBUGLINK
:
2981 gnu_debuglink_filename
= optarg
;
2985 add_specific_symbol (optarg
, keep_specific_htab
);
2989 add_specific_symbol (optarg
, strip_specific_htab
);
2992 case OPTION_STRIP_UNNEEDED_SYMBOL
:
2993 add_specific_symbol (optarg
, strip_unneeded_htab
);
2997 add_specific_symbol (optarg
, localize_specific_htab
);
3000 case OPTION_GLOBALIZE_SYMBOL
:
3001 add_specific_symbol (optarg
, globalize_specific_htab
);
3005 add_specific_symbol (optarg
, keepglobal_specific_htab
);
3009 add_specific_symbol (optarg
, weaken_specific_htab
);
3013 preserve_dates
= TRUE
;
3021 discard_locals
= LOCALS_ALL
;
3025 discard_locals
= LOCALS_START_L
;
3033 show_version
= TRUE
;
3036 case OPTION_FORMATS_INFO
:
3037 formats_info
= TRUE
;
3044 case OPTION_ADD_SECTION
:
3048 struct section_add
*pa
;
3053 s
= strchr (optarg
, '=');
3056 fatal (_("bad format for %s"), "--add-section");
3058 size
= get_file_size (s
+ 1);
3065 pa
= xmalloc (sizeof (struct section_add
));
3068 name
= xmalloc (len
+ 1);
3069 strncpy (name
, optarg
, len
);
3073 pa
->filename
= s
+ 1;
3075 pa
->contents
= xmalloc (size
);
3077 f
= fopen (pa
->filename
, FOPEN_RB
);
3080 fatal (_("cannot open: %s: %s"),
3081 pa
->filename
, strerror (errno
));
3083 if (fread (pa
->contents
, 1, pa
->size
, f
) == 0
3085 fatal (_("%s: fread failed"), pa
->filename
);
3089 pa
->next
= add_sections
;
3094 case OPTION_CHANGE_START
:
3095 change_start
= parse_vma (optarg
, "--change-start");
3098 case OPTION_CHANGE_SECTION_ADDRESS
:
3099 case OPTION_CHANGE_SECTION_LMA
:
3100 case OPTION_CHANGE_SECTION_VMA
:
3105 char *option
= NULL
;
3107 enum change_action what
= CHANGE_IGNORE
;
3111 case OPTION_CHANGE_SECTION_ADDRESS
:
3112 option
= "--change-section-address";
3114 case OPTION_CHANGE_SECTION_LMA
:
3115 option
= "--change-section-lma";
3117 case OPTION_CHANGE_SECTION_VMA
:
3118 option
= "--change-section-vma";
3122 s
= strchr (optarg
, '=');
3125 s
= strchr (optarg
, '+');
3128 s
= strchr (optarg
, '-');
3130 fatal (_("bad format for %s"), option
);
3135 name
= xmalloc (len
+ 1);
3136 strncpy (name
, optarg
, len
);
3139 p
= find_section_list (name
, TRUE
);
3141 val
= parse_vma (s
+ 1, option
);
3145 case '=': what
= CHANGE_SET
; break;
3146 case '-': val
= - val
; /* Drop through. */
3147 case '+': what
= CHANGE_MODIFY
; break;
3152 case OPTION_CHANGE_SECTION_ADDRESS
:
3153 p
->change_vma
= what
;
3157 case OPTION_CHANGE_SECTION_LMA
:
3158 p
->change_lma
= what
;
3162 case OPTION_CHANGE_SECTION_VMA
:
3163 p
->change_vma
= what
;
3170 case OPTION_CHANGE_ADDRESSES
:
3171 change_section_address
= parse_vma (optarg
, "--change-addresses");
3172 change_start
= change_section_address
;
3175 case OPTION_CHANGE_WARNINGS
:
3179 case OPTION_CHANGE_LEADING_CHAR
:
3180 change_leading_char
= TRUE
;
3183 case OPTION_DEBUGGING
:
3184 convert_debugging
= TRUE
;
3187 case OPTION_GAP_FILL
:
3189 bfd_vma gap_fill_vma
;
3191 gap_fill_vma
= parse_vma (optarg
, "--gap-fill");
3192 gap_fill
= (bfd_byte
) gap_fill_vma
;
3193 if ((bfd_vma
) gap_fill
!= gap_fill_vma
)
3197 sprintf_vma (buff
, gap_fill_vma
);
3199 non_fatal (_("Warning: truncating gap-fill from 0x%s to 0x%x"),
3202 gap_fill_set
= TRUE
;
3206 case OPTION_NO_CHANGE_WARNINGS
:
3207 change_warn
= FALSE
;
3211 pad_to
= parse_vma (optarg
, "--pad-to");
3215 case OPTION_REMOVE_LEADING_CHAR
:
3216 remove_leading_char
= TRUE
;
3219 case OPTION_REDEFINE_SYM
:
3221 /* Push this redefinition onto redefine_symbol_list. */
3225 const char *nextarg
;
3226 char *source
, *target
;
3228 s
= strchr (optarg
, '=');
3230 fatal (_("bad format for %s"), "--redefine-sym");
3233 source
= xmalloc (len
+ 1);
3234 strncpy (source
, optarg
, len
);
3238 len
= strlen (nextarg
);
3239 target
= xmalloc (len
+ 1);
3240 strcpy (target
, nextarg
);
3242 redefine_list_append ("--redefine-sym", source
, target
);
3249 case OPTION_REDEFINE_SYMS
:
3250 add_redefine_syms_file (optarg
);
3253 case OPTION_SET_SECTION_FLAGS
:
3259 s
= strchr (optarg
, '=');
3261 fatal (_("bad format for %s"), "--set-section-flags");
3264 name
= xmalloc (len
+ 1);
3265 strncpy (name
, optarg
, len
);
3268 p
= find_section_list (name
, TRUE
);
3270 p
->set_flags
= TRUE
;
3271 p
->flags
= parse_flags (s
+ 1);
3275 case OPTION_RENAME_SECTION
:
3278 const char *eq
, *fl
;
3283 eq
= strchr (optarg
, '=');
3285 fatal (_("bad format for %s"), "--rename-section");
3289 fatal (_("bad format for %s"), "--rename-section");
3291 old_name
= xmalloc (len
+ 1);
3292 strncpy (old_name
, optarg
, len
);
3296 fl
= strchr (eq
, ',');
3299 flags
= parse_flags (fl
+ 1);
3309 fatal (_("bad format for %s"), "--rename-section");
3311 new_name
= xmalloc (len
+ 1);
3312 strncpy (new_name
, eq
, len
);
3315 add_section_rename (old_name
, new_name
, flags
);
3319 case OPTION_SET_START
:
3320 set_start
= parse_vma (optarg
, "--set-start");
3321 set_start_set
= TRUE
;
3324 case OPTION_SREC_LEN
:
3325 Chunk
= parse_vma (optarg
, "--srec-len");
3328 case OPTION_SREC_FORCES3
:
3332 case OPTION_STRIP_SYMBOLS
:
3333 add_specific_symbols (optarg
, strip_specific_htab
);
3336 case OPTION_STRIP_UNNEEDED_SYMBOLS
:
3337 add_specific_symbols (optarg
, strip_unneeded_htab
);
3340 case OPTION_KEEP_SYMBOLS
:
3341 add_specific_symbols (optarg
, keep_specific_htab
);
3344 case OPTION_LOCALIZE_HIDDEN
:
3345 localize_hidden
= TRUE
;
3348 case OPTION_LOCALIZE_SYMBOLS
:
3349 add_specific_symbols (optarg
, localize_specific_htab
);
3352 case OPTION_GLOBALIZE_SYMBOLS
:
3353 add_specific_symbols (optarg
, globalize_specific_htab
);
3356 case OPTION_KEEPGLOBAL_SYMBOLS
:
3357 add_specific_symbols (optarg
, keepglobal_specific_htab
);
3360 case OPTION_WEAKEN_SYMBOLS
:
3361 add_specific_symbols (optarg
, weaken_specific_htab
);
3364 case OPTION_ALT_MACH_CODE
:
3365 use_alt_mach_code
= strtoul (optarg
, NULL
, 0);
3366 if (use_alt_mach_code
== 0)
3367 fatal (_("unable to parse alternative machine code"));
3370 case OPTION_PREFIX_SYMBOLS
:
3371 prefix_symbols_string
= optarg
;
3374 case OPTION_PREFIX_SECTIONS
:
3375 prefix_sections_string
= optarg
;
3378 case OPTION_PREFIX_ALLOC_SECTIONS
:
3379 prefix_alloc_sections_string
= optarg
;
3382 case OPTION_READONLY_TEXT
:
3383 bfd_flags_to_set
|= WP_TEXT
;
3384 bfd_flags_to_clear
&= ~WP_TEXT
;
3387 case OPTION_WRITABLE_TEXT
:
3388 bfd_flags_to_clear
|= WP_TEXT
;
3389 bfd_flags_to_set
&= ~WP_TEXT
;
3393 bfd_flags_to_set
|= D_PAGED
;
3394 bfd_flags_to_clear
&= ~D_PAGED
;
3398 bfd_flags_to_clear
|= D_PAGED
;
3399 bfd_flags_to_set
&= ~D_PAGED
;
3402 case OPTION_EXTRACT_SYMBOL
:
3403 extract_symbol
= TRUE
;
3406 case OPTION_REVERSE_BYTES
:
3408 int prev
= reverse_bytes
;
3410 reverse_bytes
= atoi (optarg
);
3411 if ((reverse_bytes
<= 0) || ((reverse_bytes
% 2) != 0))
3412 fatal (_("number of bytes to reverse must be positive and even"));
3414 if (prev
&& prev
!= reverse_bytes
)
3415 non_fatal (_("Warning: ignoring previous --reverse-bytes value of %d"),
3421 /* We've been given a long option. */
3426 copy_usage (stdout
, 0);
3429 copy_usage (stderr
, 1);
3440 print_version ("objcopy");
3442 if (copy_byte
>= interleave
)
3443 fatal (_("byte number must be less than interleave"));
3445 if (optind
== argc
|| optind
+ 2 < argc
)
3446 copy_usage (stderr
, 1);
3448 input_filename
= argv
[optind
];
3449 if (optind
+ 1 < argc
)
3450 output_filename
= argv
[optind
+ 1];
3452 /* Default is to strip no symbols. */
3453 if (strip_symbols
== STRIP_UNDEF
&& discard_locals
== LOCALS_UNDEF
)
3454 strip_symbols
= STRIP_NONE
;
3456 if (output_target
== NULL
)
3457 output_target
= input_target
;
3459 if (binary_architecture
!= NULL
)
3461 if (input_target
&& strcmp (input_target
, "binary") == 0)
3463 const bfd_arch_info_type
* temp_arch_info
;
3465 temp_arch_info
= bfd_scan_arch (binary_architecture
);
3467 if (temp_arch_info
!= NULL
)
3469 bfd_external_binary_architecture
= temp_arch_info
->arch
;
3470 bfd_external_machine
= temp_arch_info
->mach
;
3473 fatal (_("architecture %s unknown"), binary_architecture
);
3477 non_fatal (_("Warning: input target 'binary' required for binary architecture parameter."));
3478 non_fatal (_(" Argument %s ignored"), binary_architecture
);
3483 if (stat (input_filename
, & statbuf
) < 0)
3484 fatal (_("warning: could not locate '%s'. System error message: %s"),
3485 input_filename
, strerror (errno
));
3487 /* If there is no destination file, or the source and destination files
3488 are the same, then create a temp and rename the result into the input. */
3489 if (output_filename
== NULL
|| strcmp (input_filename
, output_filename
) == 0)
3490 tmpname
= make_tempname (input_filename
);
3492 tmpname
= output_filename
;
3494 if (tmpname
== NULL
)
3495 fatal (_("warning: could not create temporary file whilst copying '%s', (error: %s)"),
3496 input_filename
, strerror (errno
));
3498 copy_file (input_filename
, tmpname
, input_target
, output_target
);
3502 set_times (tmpname
, &statbuf
);
3503 if (tmpname
!= output_filename
)
3504 smart_rename (tmpname
, input_filename
, preserve_dates
);
3507 unlink_if_ordinary (tmpname
);
3511 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
3515 if (p
->change_vma
!= CHANGE_IGNORE
)
3519 sprintf_vma (buff
, p
->vma_val
);
3521 /* xgettext:c-format */
3522 non_fatal (_("%s %s%c0x%s never used"),
3523 "--change-section-vma",
3525 p
->change_vma
== CHANGE_SET
? '=' : '+',
3529 if (p
->change_lma
!= CHANGE_IGNORE
)
3533 sprintf_vma (buff
, p
->lma_val
);
3535 /* xgettext:c-format */
3536 non_fatal (_("%s %s%c0x%s never used"),
3537 "--change-section-lma",
3539 p
->change_lma
== CHANGE_SET
? '=' : '+',
3550 main (int argc
, char *argv
[])
3552 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
3553 setlocale (LC_MESSAGES
, "");
3555 #if defined (HAVE_SETLOCALE)
3556 setlocale (LC_CTYPE
, "");
3558 bindtextdomain (PACKAGE
, LOCALEDIR
);
3559 textdomain (PACKAGE
);
3561 program_name
= argv
[0];
3562 xmalloc_set_program_name (program_name
);
3564 START_PROGRESS (program_name
, 0);
3566 expandargv (&argc
, &argv
);
3568 strip_symbols
= STRIP_UNDEF
;
3569 discard_locals
= LOCALS_UNDEF
;
3572 set_default_bfd_target ();
3576 int i
= strlen (program_name
);
3577 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
3578 /* Drop the .exe suffix, if any. */
3579 if (i
> 4 && FILENAME_CMP (program_name
+ i
- 4, ".exe") == 0)
3582 program_name
[i
] = '\0';
3585 is_strip
= (i
>= 5 && FILENAME_CMP (program_name
+ i
- 5, "strip") == 0);
3588 create_symbol_htabs ();
3591 strip_main (argc
, argv
);
3593 copy_main (argc
, argv
);
3595 END_PROGRESS (program_name
);