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
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 2 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"
29 #include "filenames.h"
35 /* A list of symbols to explicitly strip out, or to keep. A linked
36 list is good enough for a small number from the command line, but
37 this will slow things down a lot if many symbols are being
46 /* A list to support redefine_sym. */
51 struct redefine_node
*next
;
54 typedef struct section_rename
56 const char * old_name
;
57 const char * new_name
;
59 struct section_rename
* next
;
63 /* List of sections to be renamed. */
64 static section_rename
*section_rename_list
;
66 #define RETURN_NONFATAL(s) {bfd_nonfatal (s); status = 1; return;}
68 static asymbol
**isympp
= NULL
; /* Input symbols. */
69 static asymbol
**osympp
= NULL
; /* Output symbols that survive stripping. */
71 /* If `copy_byte' >= 0, copy only that byte of every `interleave' bytes. */
72 static int copy_byte
= -1;
73 static int interleave
= 4;
75 static bfd_boolean verbose
; /* Print file and target names. */
76 static bfd_boolean preserve_dates
; /* Preserve input file timestamp. */
77 static int status
= 0; /* Exit status. */
82 STRIP_NONE
, /* Don't strip. */
83 STRIP_DEBUG
, /* Strip all debugger symbols. */
84 STRIP_UNNEEDED
, /* Strip unnecessary symbols. */
85 STRIP_NONDEBUG
, /* Strip everything but debug info. */
86 STRIP_ALL
/* Strip all symbols. */
89 /* Which symbols to remove. */
90 static enum strip_action strip_symbols
;
95 LOCALS_START_L
, /* Discard locals starting with L. */
96 LOCALS_ALL
/* Discard all locals. */
99 /* Which local symbols to remove. Overrides STRIP_ALL. */
100 static enum locals_action discard_locals
;
102 /* What kind of change to perform. */
110 /* Structure used to hold lists of sections and actions to take. */
113 struct section_list
* next
; /* Next section to change. */
114 const char * name
; /* Section name. */
115 bfd_boolean used
; /* Whether this entry was used. */
116 bfd_boolean remove
; /* Whether to remove this section. */
117 bfd_boolean copy
; /* Whether to copy this section. */
118 enum change_action change_vma
;/* Whether to change or set VMA. */
119 bfd_vma vma_val
; /* Amount to change by or set to. */
120 enum change_action change_lma
;/* Whether to change or set LMA. */
121 bfd_vma lma_val
; /* Amount to change by or set to. */
122 bfd_boolean set_flags
; /* Whether to set the section flags. */
123 flagword flags
; /* What to set the section flags to. */
126 static struct section_list
*change_sections
;
128 /* TRUE if some sections are to be removed. */
129 static bfd_boolean sections_removed
;
131 /* TRUE if only some sections are to be copied. */
132 static bfd_boolean sections_copied
;
134 /* Changes to the start address. */
135 static bfd_vma change_start
= 0;
136 static bfd_boolean set_start_set
= FALSE
;
137 static bfd_vma set_start
;
139 /* Changes to section addresses. */
140 static bfd_vma change_section_address
= 0;
142 /* Filling gaps between sections. */
143 static bfd_boolean gap_fill_set
= FALSE
;
144 static bfd_byte gap_fill
= 0;
146 /* Pad to a given address. */
147 static bfd_boolean pad_to_set
= FALSE
;
148 static bfd_vma pad_to
;
150 /* Use alternative machine code? */
151 static unsigned long use_alt_mach_code
= 0;
153 /* Output BFD flags user wants to set or clear */
154 static flagword bfd_flags_to_set
;
155 static flagword bfd_flags_to_clear
;
157 /* List of sections to add. */
160 /* Next section to add. */
161 struct section_add
*next
;
162 /* Name of section to add. */
164 /* Name of file holding section contents. */
165 const char *filename
;
168 /* Contents of file. */
170 /* BFD section, after it has been added. */
174 /* List of sections to add to the output BFD. */
175 static struct section_add
*add_sections
;
177 /* If non-NULL the argument to --add-gnu-debuglink.
178 This should be the filename to store in the .gnu_debuglink section. */
179 static const char * gnu_debuglink_filename
= NULL
;
181 /* Whether to convert debugging information. */
182 static bfd_boolean convert_debugging
= FALSE
;
184 /* Whether to change the leading character in symbol names. */
185 static bfd_boolean change_leading_char
= FALSE
;
187 /* Whether to remove the leading character from global symbol names. */
188 static bfd_boolean remove_leading_char
= FALSE
;
190 /* Whether to permit wildcard in symbol comparison. */
191 static bfd_boolean wildcard
= FALSE
;
193 /* True if --localize-hidden is in effect. */
194 static bfd_boolean localize_hidden
= FALSE
;
196 /* List of symbols to strip, keep, localize, keep-global, weaken,
198 static struct symlist
*strip_specific_list
= NULL
;
199 static struct symlist
*strip_unneeded_list
= NULL
;
200 static struct symlist
*keep_specific_list
= NULL
;
201 static struct symlist
*localize_specific_list
= NULL
;
202 static struct symlist
*globalize_specific_list
= NULL
;
203 static struct symlist
*keepglobal_specific_list
= NULL
;
204 static struct symlist
*weaken_specific_list
= NULL
;
205 static struct redefine_node
*redefine_sym_list
= NULL
;
207 /* If this is TRUE, we weaken global symbols (set BSF_WEAK). */
208 static bfd_boolean weaken
= FALSE
;
210 /* If this is TRUE, we retain BSF_FILE symbols. */
211 static bfd_boolean keep_file_symbols
= FALSE
;
213 /* Prefix symbols/sections. */
214 static char *prefix_symbols_string
= 0;
215 static char *prefix_sections_string
= 0;
216 static char *prefix_alloc_sections_string
= 0;
218 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
219 enum command_line_switch
221 OPTION_ADD_SECTION
=150,
222 OPTION_CHANGE_ADDRESSES
,
223 OPTION_CHANGE_LEADING_CHAR
,
225 OPTION_CHANGE_SECTION_ADDRESS
,
226 OPTION_CHANGE_SECTION_LMA
,
227 OPTION_CHANGE_SECTION_VMA
,
228 OPTION_CHANGE_WARNINGS
,
231 OPTION_NO_CHANGE_WARNINGS
,
233 OPTION_REMOVE_LEADING_CHAR
,
234 OPTION_SET_SECTION_FLAGS
,
236 OPTION_STRIP_UNNEEDED
,
239 OPTION_REDEFINE_SYMS
,
242 OPTION_STRIP_SYMBOLS
,
243 OPTION_STRIP_UNNEEDED_SYMBOL
,
244 OPTION_STRIP_UNNEEDED_SYMBOLS
,
246 OPTION_LOCALIZE_HIDDEN
,
247 OPTION_LOCALIZE_SYMBOLS
,
248 OPTION_GLOBALIZE_SYMBOL
,
249 OPTION_GLOBALIZE_SYMBOLS
,
250 OPTION_KEEPGLOBAL_SYMBOLS
,
251 OPTION_WEAKEN_SYMBOLS
,
252 OPTION_RENAME_SECTION
,
253 OPTION_ALT_MACH_CODE
,
254 OPTION_PREFIX_SYMBOLS
,
255 OPTION_PREFIX_SECTIONS
,
256 OPTION_PREFIX_ALLOC_SECTIONS
,
258 OPTION_ADD_GNU_DEBUGLINK
,
259 OPTION_ONLY_KEEP_DEBUG
,
260 OPTION_KEEP_FILE_SYMBOLS
,
261 OPTION_READONLY_TEXT
,
262 OPTION_WRITABLE_TEXT
,
267 /* Options to handle if running as "strip". */
269 static struct option strip_options
[] =
271 {"discard-all", no_argument
, 0, 'x'},
272 {"discard-locals", no_argument
, 0, 'X'},
273 {"format", required_argument
, 0, 'F'}, /* Obsolete */
274 {"help", no_argument
, 0, 'h'},
275 {"info", no_argument
, 0, OPTION_FORMATS_INFO
},
276 {"input-format", required_argument
, 0, 'I'}, /* Obsolete */
277 {"input-target", required_argument
, 0, 'I'},
278 {"keep-file-symbols", no_argument
, 0, OPTION_KEEP_FILE_SYMBOLS
},
279 {"keep-symbol", required_argument
, 0, 'K'},
280 {"only-keep-debug", no_argument
, 0, OPTION_ONLY_KEEP_DEBUG
},
281 {"output-format", required_argument
, 0, 'O'}, /* Obsolete */
282 {"output-target", required_argument
, 0, 'O'},
283 {"output-file", required_argument
, 0, 'o'},
284 {"preserve-dates", no_argument
, 0, 'p'},
285 {"remove-section", required_argument
, 0, 'R'},
286 {"strip-all", no_argument
, 0, 's'},
287 {"strip-debug", no_argument
, 0, 'S'},
288 {"strip-unneeded", no_argument
, 0, OPTION_STRIP_UNNEEDED
},
289 {"strip-symbol", required_argument
, 0, 'N'},
290 {"target", required_argument
, 0, 'F'},
291 {"verbose", no_argument
, 0, 'v'},
292 {"version", no_argument
, 0, 'V'},
293 {"wildcard", no_argument
, 0, 'w'},
294 {0, no_argument
, 0, 0}
297 /* Options to handle if running as "objcopy". */
299 static struct option copy_options
[] =
301 {"add-gnu-debuglink", required_argument
, 0, OPTION_ADD_GNU_DEBUGLINK
},
302 {"add-section", required_argument
, 0, OPTION_ADD_SECTION
},
303 {"adjust-start", required_argument
, 0, OPTION_CHANGE_START
},
304 {"adjust-vma", required_argument
, 0, OPTION_CHANGE_ADDRESSES
},
305 {"adjust-section-vma", required_argument
, 0, OPTION_CHANGE_SECTION_ADDRESS
},
306 {"adjust-warnings", no_argument
, 0, OPTION_CHANGE_WARNINGS
},
307 {"alt-machine-code", required_argument
, 0, OPTION_ALT_MACH_CODE
},
308 {"binary-architecture", required_argument
, 0, 'B'},
309 {"byte", required_argument
, 0, 'b'},
310 {"change-addresses", required_argument
, 0, OPTION_CHANGE_ADDRESSES
},
311 {"change-leading-char", no_argument
, 0, OPTION_CHANGE_LEADING_CHAR
},
312 {"change-section-address", required_argument
, 0, OPTION_CHANGE_SECTION_ADDRESS
},
313 {"change-section-lma", required_argument
, 0, OPTION_CHANGE_SECTION_LMA
},
314 {"change-section-vma", required_argument
, 0, OPTION_CHANGE_SECTION_VMA
},
315 {"change-start", required_argument
, 0, OPTION_CHANGE_START
},
316 {"change-warnings", no_argument
, 0, OPTION_CHANGE_WARNINGS
},
317 {"debugging", no_argument
, 0, OPTION_DEBUGGING
},
318 {"discard-all", no_argument
, 0, 'x'},
319 {"discard-locals", no_argument
, 0, 'X'},
320 {"format", required_argument
, 0, 'F'}, /* Obsolete */
321 {"gap-fill", required_argument
, 0, OPTION_GAP_FILL
},
322 {"globalize-symbol", required_argument
, 0, OPTION_GLOBALIZE_SYMBOL
},
323 {"globalize-symbols", required_argument
, 0, OPTION_GLOBALIZE_SYMBOLS
},
324 {"help", no_argument
, 0, 'h'},
325 {"impure", no_argument
, 0, OPTION_IMPURE
},
326 {"info", no_argument
, 0, OPTION_FORMATS_INFO
},
327 {"input-format", required_argument
, 0, 'I'}, /* Obsolete */
328 {"input-target", required_argument
, 0, 'I'},
329 {"interleave", required_argument
, 0, 'i'},
330 {"keep-file-symbols", no_argument
, 0, OPTION_KEEP_FILE_SYMBOLS
},
331 {"keep-global-symbol", required_argument
, 0, 'G'},
332 {"keep-global-symbols", required_argument
, 0, OPTION_KEEPGLOBAL_SYMBOLS
},
333 {"keep-symbol", required_argument
, 0, 'K'},
334 {"keep-symbols", required_argument
, 0, OPTION_KEEP_SYMBOLS
},
335 {"localize-hidden", no_argument
, 0, OPTION_LOCALIZE_HIDDEN
},
336 {"localize-symbol", required_argument
, 0, 'L'},
337 {"localize-symbols", required_argument
, 0, OPTION_LOCALIZE_SYMBOLS
},
338 {"no-adjust-warnings", no_argument
, 0, OPTION_NO_CHANGE_WARNINGS
},
339 {"no-change-warnings", no_argument
, 0, OPTION_NO_CHANGE_WARNINGS
},
340 {"only-keep-debug", no_argument
, 0, OPTION_ONLY_KEEP_DEBUG
},
341 {"only-section", required_argument
, 0, 'j'},
342 {"output-format", required_argument
, 0, 'O'}, /* Obsolete */
343 {"output-target", required_argument
, 0, 'O'},
344 {"pad-to", required_argument
, 0, OPTION_PAD_TO
},
345 {"prefix-symbols", required_argument
, 0, OPTION_PREFIX_SYMBOLS
},
346 {"prefix-sections", required_argument
, 0, OPTION_PREFIX_SECTIONS
},
347 {"prefix-alloc-sections", required_argument
, 0, OPTION_PREFIX_ALLOC_SECTIONS
},
348 {"preserve-dates", no_argument
, 0, 'p'},
349 {"pure", no_argument
, 0, OPTION_PURE
},
350 {"readonly-text", no_argument
, 0, OPTION_READONLY_TEXT
},
351 {"redefine-sym", required_argument
, 0, OPTION_REDEFINE_SYM
},
352 {"redefine-syms", required_argument
, 0, OPTION_REDEFINE_SYMS
},
353 {"remove-leading-char", no_argument
, 0, OPTION_REMOVE_LEADING_CHAR
},
354 {"remove-section", required_argument
, 0, 'R'},
355 {"rename-section", required_argument
, 0, OPTION_RENAME_SECTION
},
356 {"set-section-flags", required_argument
, 0, OPTION_SET_SECTION_FLAGS
},
357 {"set-start", required_argument
, 0, OPTION_SET_START
},
358 {"srec-len", required_argument
, 0, OPTION_SREC_LEN
},
359 {"srec-forceS3", no_argument
, 0, OPTION_SREC_FORCES3
},
360 {"strip-all", no_argument
, 0, 'S'},
361 {"strip-debug", no_argument
, 0, 'g'},
362 {"strip-unneeded", no_argument
, 0, OPTION_STRIP_UNNEEDED
},
363 {"strip-unneeded-symbol", required_argument
, 0, OPTION_STRIP_UNNEEDED_SYMBOL
},
364 {"strip-unneeded-symbols", required_argument
, 0, OPTION_STRIP_UNNEEDED_SYMBOLS
},
365 {"strip-symbol", required_argument
, 0, 'N'},
366 {"strip-symbols", required_argument
, 0, OPTION_STRIP_SYMBOLS
},
367 {"target", required_argument
, 0, 'F'},
368 {"verbose", no_argument
, 0, 'v'},
369 {"version", no_argument
, 0, 'V'},
370 {"weaken", no_argument
, 0, OPTION_WEAKEN
},
371 {"weaken-symbol", required_argument
, 0, 'W'},
372 {"weaken-symbols", required_argument
, 0, OPTION_WEAKEN_SYMBOLS
},
373 {"wildcard", no_argument
, 0, 'w'},
374 {"writable-text", no_argument
, 0, OPTION_WRITABLE_TEXT
},
375 {0, no_argument
, 0, 0}
379 extern char *program_name
;
381 /* This flag distinguishes between strip and objcopy:
382 1 means this is 'strip'; 0 means this is 'objcopy'.
383 -1 means if we should use argv[0] to decide. */
386 /* The maximum length of an S record. This variable is declared in srec.c
387 and can be modified by the --srec-len parameter. */
388 extern unsigned int Chunk
;
390 /* Restrict the generation of Srecords to type S3 only.
391 This variable is declare in bfd/srec.c and can be toggled
392 on by the --srec-forceS3 command line switch. */
393 extern bfd_boolean S3Forced
;
395 /* Defined in bfd/binary.c. Used to set architecture and machine of input
397 extern enum bfd_architecture bfd_external_binary_architecture
;
398 extern unsigned long bfd_external_machine
;
400 /* Forward declarations. */
401 static void setup_section (bfd
*, asection
*, void *);
402 static void setup_bfd_headers (bfd
*, bfd
*);
403 static void copy_section (bfd
*, asection
*, void *);
404 static void get_sections (bfd
*, asection
*, void *);
405 static int compare_section_lma (const void *, const void *);
406 static void mark_symbols_used_in_relocations (bfd
*, asection
*, void *);
407 static bfd_boolean
write_debugging_info (bfd
*, void *, long *, asymbol
***);
408 static const char *lookup_sym_redefinition (const char *);
411 copy_usage (FILE *stream
, int exit_status
)
413 fprintf (stream
, _("Usage: %s [option(s)] in-file [out-file]\n"), program_name
);
414 fprintf (stream
, _(" Copies a binary file, possibly transforming it in the process\n"));
415 fprintf (stream
, _(" The options are:\n"));
416 fprintf (stream
, _("\
417 -I --input-target <bfdname> Assume input file is in format <bfdname>\n\
418 -O --output-target <bfdname> Create an output file in format <bfdname>\n\
419 -B --binary-architecture <arch> Set arch of output file, when input is binary\n\
420 -F --target <bfdname> Set both input and output format to <bfdname>\n\
421 --debugging Convert debugging information, if possible\n\
422 -p --preserve-dates Copy modified/access timestamps to the output\n\
423 -j --only-section <name> Only copy section <name> into the output\n\
424 --add-gnu-debuglink=<file> Add section .gnu_debuglink linking to <file>\n\
425 -R --remove-section <name> Remove section <name> from the output\n\
426 -S --strip-all Remove all symbol and relocation information\n\
427 -g --strip-debug Remove all debugging symbols & sections\n\
428 --strip-unneeded Remove all symbols not needed by relocations\n\
429 -N --strip-symbol <name> Do not copy symbol <name>\n\
430 --strip-unneeded-symbol <name>\n\
431 Do not copy symbol <name> unless needed by\n\
433 --only-keep-debug Strip everything but the debug information\n\
434 -K --keep-symbol <name> Do not strip symbol <name>\n\
435 --keep-file-symbols Do not strip file symbol(s)\n\
436 --localize-hidden Turn all ELF hidden symbols into locals\n\
437 -L --localize-symbol <name> Force symbol <name> to be marked as a local\n\
438 --globalize-symbol <name> Force symbol <name> to be marked as a global\n\
439 -G --keep-global-symbol <name> Localize all symbols except <name>\n\
440 -W --weaken-symbol <name> Force symbol <name> to be marked as a weak\n\
441 --weaken Force all global symbols to be marked as weak\n\
442 -w --wildcard Permit wildcard in symbol comparison\n\
443 -x --discard-all Remove all non-global symbols\n\
444 -X --discard-locals Remove any compiler-generated symbols\n\
445 -i --interleave <number> Only copy one out of every <number> bytes\n\
446 -b --byte <num> Select byte <num> in every interleaved block\n\
447 --gap-fill <val> Fill gaps between sections with <val>\n\
448 --pad-to <addr> Pad the last section up to address <addr>\n\
449 --set-start <addr> Set the start address to <addr>\n\
450 {--change-start|--adjust-start} <incr>\n\
451 Add <incr> to the start address\n\
452 {--change-addresses|--adjust-vma} <incr>\n\
453 Add <incr> to LMA, VMA and start addresses\n\
454 {--change-section-address|--adjust-section-vma} <name>{=|+|-}<val>\n\
455 Change LMA and VMA of section <name> by <val>\n\
456 --change-section-lma <name>{=|+|-}<val>\n\
457 Change the LMA of section <name> by <val>\n\
458 --change-section-vma <name>{=|+|-}<val>\n\
459 Change the VMA of section <name> by <val>\n\
460 {--[no-]change-warnings|--[no-]adjust-warnings}\n\
461 Warn if a named section does not exist\n\
462 --set-section-flags <name>=<flags>\n\
463 Set section <name>'s properties to <flags>\n\
464 --add-section <name>=<file> Add section <name> found in <file> to output\n\
465 --rename-section <old>=<new>[,<flags>] Rename section <old> to <new>\n\
466 --change-leading-char Force output format's leading character style\n\
467 --remove-leading-char Remove leading character from global symbols\n\
468 --redefine-sym <old>=<new> Redefine symbol name <old> to <new>\n\
469 --redefine-syms <file> --redefine-sym for all symbol pairs \n\
471 --srec-len <number> Restrict the length of generated Srecords\n\
472 --srec-forceS3 Restrict the type of generated Srecords to S3\n\
473 --strip-symbols <file> -N for all symbols listed in <file>\n\
474 --strip-unneeded-symbols <file>\n\
475 --strip-unneeded-symbol for all symbols listed\n\
477 --keep-symbols <file> -K for all symbols listed in <file>\n\
478 --localize-symbols <file> -L for all symbols listed in <file>\n\
479 --globalize-symbols <file> --globalize-symbol for all in <file>\n\
480 --keep-global-symbols <file> -G for all symbols listed in <file>\n\
481 --weaken-symbols <file> -W for all symbols listed in <file>\n\
482 --alt-machine-code <index> Use the target's <index>'th alternative machine\n\
483 --writable-text Mark the output text as writable\n\
484 --readonly-text Make the output text write protected\n\
485 --pure Mark the output file as demand paged\n\
486 --impure Mark the output file as impure\n\
487 --prefix-symbols <prefix> Add <prefix> to start of every symbol name\n\
488 --prefix-sections <prefix> Add <prefix> to start of every section name\n\
489 --prefix-alloc-sections <prefix>\n\
490 Add <prefix> to start of every allocatable\n\
492 -v --verbose List all object files modified\n\
493 @<file> Read options from <file>\n\
494 -V --version Display this program's version number\n\
495 -h --help Display this output\n\
496 --info List object formats & architectures supported\n\
498 list_supported_targets (program_name
, stream
);
499 if (exit_status
== 0)
500 fprintf (stream
, _("Report bugs to %s\n"), REPORT_BUGS_TO
);
505 strip_usage (FILE *stream
, int exit_status
)
507 fprintf (stream
, _("Usage: %s <option(s)> in-file(s)\n"), program_name
);
508 fprintf (stream
, _(" Removes symbols and sections from files\n"));
509 fprintf (stream
, _(" The options are:\n"));
510 fprintf (stream
, _("\
511 -I --input-target=<bfdname> Assume input file is in format <bfdname>\n\
512 -O --output-target=<bfdname> Create an output file in format <bfdname>\n\
513 -F --target=<bfdname> Set both input and output format to <bfdname>\n\
514 -p --preserve-dates Copy modified/access timestamps to the output\n\
515 -R --remove-section=<name> Remove section <name> from the output\n\
516 -s --strip-all Remove all symbol and relocation information\n\
517 -g -S -d --strip-debug Remove all debugging symbols & sections\n\
518 --strip-unneeded Remove all symbols not needed by relocations\n\
519 --only-keep-debug Strip everything but the debug information\n\
520 -N --strip-symbol=<name> Do not copy symbol <name>\n\
521 -K --keep-symbol=<name> Do not strip symbol <name>\n\
522 --keep-file-symbols Do not strip file symbol(s)\n\
523 -w --wildcard Permit wildcard in symbol comparison\n\
524 -x --discard-all Remove all non-global symbols\n\
525 -X --discard-locals Remove any compiler-generated symbols\n\
526 -v --verbose List all object files modified\n\
527 -V --version Display this program's version number\n\
528 -h --help Display this output\n\
529 --info List object formats & architectures supported\n\
530 -o <file> Place stripped output into <file>\n\
533 list_supported_targets (program_name
, stream
);
534 if (exit_status
== 0)
535 fprintf (stream
, _("Report bugs to %s\n"), REPORT_BUGS_TO
);
539 /* Parse section flags into a flagword, with a fatal error if the
540 string can't be parsed. */
543 parse_flags (const char *s
)
553 snext
= strchr (s
, ',');
563 #define PARSE_FLAG(fname,fval) \
564 else if (strncasecmp (fname, s, len) == 0) ret |= fval
565 PARSE_FLAG ("alloc", SEC_ALLOC
);
566 PARSE_FLAG ("load", SEC_LOAD
);
567 PARSE_FLAG ("noload", SEC_NEVER_LOAD
);
568 PARSE_FLAG ("readonly", SEC_READONLY
);
569 PARSE_FLAG ("debug", SEC_DEBUGGING
);
570 PARSE_FLAG ("code", SEC_CODE
);
571 PARSE_FLAG ("data", SEC_DATA
);
572 PARSE_FLAG ("rom", SEC_ROM
);
573 PARSE_FLAG ("share", SEC_COFF_SHARED
);
574 PARSE_FLAG ("contents", SEC_HAS_CONTENTS
);
580 copy
= xmalloc (len
+ 1);
581 strncpy (copy
, s
, len
);
583 non_fatal (_("unrecognized section flag `%s'"), copy
);
584 fatal (_("supported flags: %s"),
585 "alloc, load, noload, readonly, debug, code, data, rom, share, contents");
595 /* Find and optionally add an entry in the change_sections list. */
597 static struct section_list
*
598 find_section_list (const char *name
, bfd_boolean add
)
600 struct section_list
*p
;
602 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
603 if (strcmp (p
->name
, name
) == 0)
609 p
= xmalloc (sizeof (struct section_list
));
614 p
->change_vma
= CHANGE_IGNORE
;
615 p
->change_lma
= CHANGE_IGNORE
;
618 p
->set_flags
= FALSE
;
621 p
->next
= change_sections
;
627 /* Add a symbol to strip_specific_list. */
630 add_specific_symbol (const char *name
, struct symlist
**list
)
632 struct symlist
*tmp_list
;
634 tmp_list
= xmalloc (sizeof (struct symlist
));
635 tmp_list
->name
= name
;
636 tmp_list
->next
= *list
;
640 /* Add symbols listed in `filename' to strip_specific_list. */
642 #define IS_WHITESPACE(c) ((c) == ' ' || (c) == '\t')
643 #define IS_LINE_TERMINATOR(c) ((c) == '\n' || (c) == '\r' || (c) == '\0')
646 add_specific_symbols (const char *filename
, struct symlist
**list
)
652 unsigned int line_count
;
654 size
= get_file_size (filename
);
661 buffer
= xmalloc (size
+ 2);
662 f
= fopen (filename
, FOPEN_RT
);
664 fatal (_("cannot open '%s': %s"), filename
, strerror (errno
));
666 if (fread (buffer
, 1, size
, f
) == 0 || ferror (f
))
667 fatal (_("%s: fread failed"), filename
);
670 buffer
[size
] = '\n';
671 buffer
[size
+ 1] = '\0';
675 for (line
= buffer
; * line
!= '\0'; line
++)
680 int finished
= FALSE
;
682 for (eol
= line
;; eol
++)
688 /* Cope with \n\r. */
696 /* Cope with \r\n. */
707 /* Line comment, Terminate the line here, in case a
708 name is present and then allow the rest of the
709 loop to find the real end of the line. */
721 /* A name may now exist somewhere between 'line' and 'eol'.
722 Strip off leading whitespace and trailing whitespace,
723 then add it to the list. */
724 for (name
= line
; IS_WHITESPACE (* name
); name
++)
726 for (name_end
= name
;
727 (! IS_WHITESPACE (* name_end
))
728 && (! IS_LINE_TERMINATOR (* name_end
));
732 if (! IS_LINE_TERMINATOR (* name_end
))
736 for (extra
= name_end
+ 1; IS_WHITESPACE (* extra
); extra
++)
739 if (! IS_LINE_TERMINATOR (* extra
))
740 non_fatal (_("%s:%d: Ignoring rubbish found on this line"),
741 filename
, line_count
);
747 add_specific_symbol (name
, list
);
749 /* Advance line pointer to end of line. The 'eol ++' in the for
750 loop above will then advance us to the start of the next line. */
756 /* See whether a symbol should be stripped or kept based on
757 strip_specific_list and keep_symbols. */
760 is_specified_symbol (const char *name
, struct symlist
*list
)
762 struct symlist
*tmp_list
;
766 for (tmp_list
= list
; tmp_list
; tmp_list
= tmp_list
->next
)
767 if (*(tmp_list
->name
) != '!')
769 if (!fnmatch (tmp_list
->name
, name
, 0))
774 if (fnmatch (tmp_list
->name
+ 1, name
, 0))
780 for (tmp_list
= list
; tmp_list
; tmp_list
= tmp_list
->next
)
781 if (strcmp (name
, tmp_list
->name
) == 0)
788 /* See if a section is being removed. */
791 is_strip_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
793 if (sections_removed
|| sections_copied
)
795 struct section_list
*p
;
797 p
= find_section_list (bfd_get_section_name (abfd
, sec
), FALSE
);
799 if (sections_removed
&& p
!= NULL
&& p
->remove
)
801 if (sections_copied
&& (p
== NULL
|| ! p
->copy
))
805 if ((bfd_get_section_flags (abfd
, sec
) & SEC_DEBUGGING
) != 0)
807 if (strip_symbols
== STRIP_DEBUG
808 || strip_symbols
== STRIP_UNNEEDED
809 || strip_symbols
== STRIP_ALL
810 || discard_locals
== LOCALS_ALL
811 || convert_debugging
)
814 if (strip_symbols
== STRIP_NONDEBUG
)
819 Group sections look like debugging sections but they are not.
820 (They have a non-zero size but they are not ALLOCated). */
821 if ((bfd_get_section_flags (abfd
, sec
) & SEC_GROUP
) != 0
822 && strip_symbols
== STRIP_NONDEBUG
)
828 /* Return true if SYM is a hidden symbol. */
831 is_hidden_symbol (asymbol
*sym
)
833 elf_symbol_type
*elf_sym
;
835 elf_sym
= elf_symbol_from (sym
->the_bfd
, sym
);
837 switch (ELF_ST_VISIBILITY (elf_sym
->internal_elf_sym
.st_other
))
846 /* Choose which symbol entries to copy; put the result in OSYMS.
847 We don't copy in place, because that confuses the relocs.
848 Return the number of symbols to print. */
851 filter_symbols (bfd
*abfd
, bfd
*obfd
, asymbol
**osyms
,
852 asymbol
**isyms
, long symcount
)
854 asymbol
**from
= isyms
, **to
= osyms
;
855 long src_count
= 0, dst_count
= 0;
856 int relocatable
= (abfd
->flags
& (HAS_RELOC
| EXEC_P
| DYNAMIC
))
859 for (; src_count
< symcount
; src_count
++)
861 asymbol
*sym
= from
[src_count
];
862 flagword flags
= sym
->flags
;
863 char *name
= (char *) bfd_asymbol_name (sym
);
865 bfd_boolean undefined
;
866 bfd_boolean rem_leading_char
;
867 bfd_boolean add_leading_char
;
869 undefined
= bfd_is_und_section (bfd_get_section (sym
));
871 if (redefine_sym_list
)
873 char *old_name
, *new_name
;
875 old_name
= (char *) bfd_asymbol_name (sym
);
876 new_name
= (char *) lookup_sym_redefinition (old_name
);
877 bfd_asymbol_name (sym
) = new_name
;
881 /* Check if we will remove the current leading character. */
883 (name
[0] == bfd_get_symbol_leading_char (abfd
))
884 && (change_leading_char
885 || (remove_leading_char
886 && ((flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0
888 || bfd_is_com_section (bfd_get_section (sym
)))));
890 /* Check if we will add a new leading character. */
893 && (bfd_get_symbol_leading_char (obfd
) != '\0')
894 && (bfd_get_symbol_leading_char (abfd
) == '\0'
895 || (name
[0] == bfd_get_symbol_leading_char (abfd
)));
897 /* Short circuit for change_leading_char if we can do it in-place. */
898 if (rem_leading_char
&& add_leading_char
&& !prefix_symbols_string
)
900 name
[0] = bfd_get_symbol_leading_char (obfd
);
901 bfd_asymbol_name (sym
) = name
;
902 rem_leading_char
= FALSE
;
903 add_leading_char
= FALSE
;
906 /* Remove leading char. */
907 if (rem_leading_char
)
908 bfd_asymbol_name (sym
) = ++name
;
910 /* Add new leading char and/or prefix. */
911 if (add_leading_char
|| prefix_symbols_string
)
915 ptr
= n
= xmalloc (1 + strlen (prefix_symbols_string
)
916 + strlen (name
) + 1);
917 if (add_leading_char
)
918 *ptr
++ = bfd_get_symbol_leading_char (obfd
);
920 if (prefix_symbols_string
)
922 strcpy (ptr
, prefix_symbols_string
);
923 ptr
+= strlen (prefix_symbols_string
);
927 bfd_asymbol_name (sym
) = n
;
931 if (strip_symbols
== STRIP_ALL
)
933 else if ((flags
& BSF_KEEP
) != 0 /* Used in relocation. */
934 || ((flags
& BSF_SECTION_SYM
) != 0
935 && ((*bfd_get_section (sym
)->symbol_ptr_ptr
)->flags
938 else if (relocatable
/* Relocatable file. */
939 && (flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0)
941 else if (bfd_decode_symclass (sym
) == 'I')
942 /* Global symbols in $idata sections need to be retained
943 even if relocatable is FALSE. External users of the
944 library containing the $idata section may reference these
947 else if ((flags
& BSF_GLOBAL
) != 0 /* Global symbol. */
948 || (flags
& BSF_WEAK
) != 0
950 || bfd_is_com_section (bfd_get_section (sym
)))
951 keep
= strip_symbols
!= STRIP_UNNEEDED
;
952 else if ((flags
& BSF_DEBUGGING
) != 0) /* Debugging symbol. */
953 keep
= (strip_symbols
!= STRIP_DEBUG
954 && strip_symbols
!= STRIP_UNNEEDED
955 && ! convert_debugging
);
956 else if (bfd_coff_get_comdat_section (abfd
, bfd_get_section (sym
)))
957 /* COMDAT sections store special information in local
958 symbols, so we cannot risk stripping any of them. */
960 else /* Local symbol. */
961 keep
= (strip_symbols
!= STRIP_UNNEEDED
962 && (discard_locals
!= LOCALS_ALL
963 && (discard_locals
!= LOCALS_START_L
964 || ! bfd_is_local_label (abfd
, sym
))));
966 if (keep
&& is_specified_symbol (name
, strip_specific_list
))
969 && !(flags
& BSF_KEEP
)
970 && is_specified_symbol (name
, strip_unneeded_list
))
973 && ((keep_file_symbols
&& (flags
& BSF_FILE
))
974 || is_specified_symbol (name
, keep_specific_list
)))
976 if (keep
&& is_strip_section (abfd
, bfd_get_section (sym
)))
981 if ((flags
& BSF_GLOBAL
) != 0
982 && (weaken
|| is_specified_symbol (name
, weaken_specific_list
)))
984 sym
->flags
&= ~ BSF_GLOBAL
;
985 sym
->flags
|= BSF_WEAK
;
989 && (flags
& (BSF_GLOBAL
| BSF_WEAK
))
990 && (is_specified_symbol (name
, localize_specific_list
)
991 || (keepglobal_specific_list
!= NULL
992 && ! is_specified_symbol (name
, keepglobal_specific_list
))
993 || (localize_hidden
&& is_hidden_symbol (sym
))))
995 sym
->flags
&= ~ (BSF_GLOBAL
| BSF_WEAK
);
996 sym
->flags
|= BSF_LOCAL
;
1000 && (flags
& BSF_LOCAL
)
1001 && is_specified_symbol (name
, globalize_specific_list
))
1003 sym
->flags
&= ~ BSF_LOCAL
;
1004 sym
->flags
|= BSF_GLOBAL
;
1007 to
[dst_count
++] = sym
;
1011 to
[dst_count
] = NULL
;
1016 /* Find the redefined name of symbol SOURCE. */
1019 lookup_sym_redefinition (const char *source
)
1021 struct redefine_node
*list
;
1023 for (list
= redefine_sym_list
; list
!= NULL
; list
= list
->next
)
1024 if (strcmp (source
, list
->source
) == 0)
1025 return list
->target
;
1030 /* Add a node to a symbol redefine list. */
1033 redefine_list_append (const char *cause
, const char *source
, const char *target
)
1035 struct redefine_node
**p
;
1036 struct redefine_node
*list
;
1037 struct redefine_node
*new_node
;
1039 for (p
= &redefine_sym_list
; (list
= *p
) != NULL
; p
= &list
->next
)
1041 if (strcmp (source
, list
->source
) == 0)
1042 fatal (_("%s: Multiple redefinition of symbol \"%s\""),
1045 if (strcmp (target
, list
->target
) == 0)
1046 fatal (_("%s: Symbol \"%s\" is target of more than one redefinition"),
1050 new_node
= xmalloc (sizeof (struct redefine_node
));
1052 new_node
->source
= strdup (source
);
1053 new_node
->target
= strdup (target
);
1054 new_node
->next
= NULL
;
1059 /* Handle the --redefine-syms option. Read lines containing "old new"
1060 from the file, and add them to the symbol redefine list. */
1063 add_redefine_syms_file (const char *filename
)
1072 file
= fopen (filename
, "r");
1074 fatal (_("couldn't open symbol redefinition file %s (error: %s)"),
1075 filename
, strerror (errno
));
1078 buf
= xmalloc (bufsize
);
1086 /* Collect the input symbol name. */
1087 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1095 buf
= xrealloc (buf
, bufsize
);
1103 /* Eat white space between the symbol names. */
1104 while (IS_WHITESPACE (c
))
1106 if (c
== '#' || IS_LINE_TERMINATOR (c
))
1111 /* Collect the output symbol name. */
1113 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1121 buf
= xrealloc (buf
, bufsize
);
1129 /* Eat white space at end of line. */
1130 while (! IS_LINE_TERMINATOR(c
) && c
!= EOF
&& IS_WHITESPACE (c
))
1135 if ((c
== '\r' && (c
= getc (file
)) == '\n')
1136 || c
== '\n' || c
== EOF
)
1139 /* Append the redefinition to the list. */
1141 redefine_list_append (filename
, &buf
[0], &buf
[outsym_off
]);
1152 fatal (_("%s:%d: garbage found at end of line"), filename
, lineno
);
1154 if (len
!= 0 && (outsym_off
== 0 || outsym_off
== len
))
1155 fatal (_("%s:%d: missing new symbol name"), filename
, lineno
);
1158 /* Eat the rest of the line and finish it. */
1159 while (c
!= '\n' && c
!= EOF
)
1165 fatal (_("%s:%d: premature end of file"), filename
, lineno
);
1170 /* Copy unkown object file IBFD onto OBFD.
1171 Returns TRUE upon success, FALSE otherwise. */
1174 copy_unknown_object (bfd
*ibfd
, bfd
*obfd
)
1182 if (bfd_stat_arch_elt (ibfd
, &buf
) != 0)
1184 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1191 non_fatal (_("stat returns negative size for `%s'"),
1192 bfd_get_archive_filename (ibfd
));
1196 if (bfd_seek (ibfd
, (file_ptr
) 0, SEEK_SET
) != 0)
1198 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1203 printf (_("copy from `%s' [unknown] to `%s' [unknown]\n"),
1204 bfd_get_archive_filename (ibfd
), bfd_get_filename (obfd
));
1206 cbuf
= xmalloc (BUFSIZE
);
1208 while (ncopied
< size
)
1210 tocopy
= size
- ncopied
;
1211 if (tocopy
> BUFSIZE
)
1214 if (bfd_bread (cbuf
, (bfd_size_type
) tocopy
, ibfd
)
1215 != (bfd_size_type
) tocopy
)
1217 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1222 if (bfd_bwrite (cbuf
, (bfd_size_type
) tocopy
, obfd
)
1223 != (bfd_size_type
) tocopy
)
1225 bfd_nonfatal (bfd_get_filename (obfd
));
1233 chmod (bfd_get_filename (obfd
), buf
.st_mode
);
1238 /* Copy object file IBFD onto OBFD.
1239 Returns TRUE upon success, FALSE otherwise. */
1242 copy_object (bfd
*ibfd
, bfd
*obfd
)
1246 asection
**osections
= NULL
;
1247 asection
*gnu_debuglink_section
= NULL
;
1248 bfd_size_type
*gaps
= NULL
;
1249 bfd_size_type max_gap
= 0;
1252 enum bfd_architecture iarch
;
1255 if (ibfd
->xvec
->byteorder
!= obfd
->xvec
->byteorder
1256 && ibfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
1257 && obfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
)
1258 fatal (_("Unable to change endianness of input file(s)"));
1260 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
1262 bfd_nonfatal (bfd_get_filename (obfd
));
1267 printf (_("copy from `%s' [%s] to `%s' [%s]\n"),
1268 bfd_get_archive_filename (ibfd
), bfd_get_target (ibfd
),
1269 bfd_get_filename (obfd
), bfd_get_target (obfd
));
1274 start
= bfd_get_start_address (ibfd
);
1275 start
+= change_start
;
1277 /* Neither the start address nor the flags
1278 need to be set for a core file. */
1279 if (bfd_get_format (obfd
) != bfd_core
)
1283 flags
= bfd_get_file_flags (ibfd
);
1284 flags
|= bfd_flags_to_set
;
1285 flags
&= ~bfd_flags_to_clear
;
1286 flags
&= bfd_applicable_file_flags (obfd
);
1288 if (!bfd_set_start_address (obfd
, start
)
1289 || !bfd_set_file_flags (obfd
, flags
))
1291 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1296 /* Copy architecture of input file to output file. */
1297 iarch
= bfd_get_arch (ibfd
);
1298 imach
= bfd_get_mach (ibfd
);
1299 if (!bfd_set_arch_mach (obfd
, iarch
, imach
)
1300 && (ibfd
->target_defaulted
1301 || bfd_get_arch (ibfd
) != bfd_get_arch (obfd
)))
1303 if (bfd_get_arch (ibfd
) == bfd_arch_unknown
)
1304 non_fatal (_("Unable to recognise the format of the input file `%s'"),
1305 bfd_get_archive_filename (ibfd
));
1307 non_fatal (_("Warning: Output file cannot represent architecture `%s'"),
1308 bfd_printable_arch_mach (bfd_get_arch (ibfd
),
1309 bfd_get_mach (ibfd
)));
1313 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
1315 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1322 if (osympp
!= isympp
)
1328 /* BFD mandates that all output sections be created and sizes set before
1329 any output is done. Thus, we traverse all sections multiple times. */
1330 bfd_map_over_sections (ibfd
, setup_section
, obfd
);
1332 setup_bfd_headers (ibfd
, obfd
);
1334 if (add_sections
!= NULL
)
1336 struct section_add
*padd
;
1337 struct section_list
*pset
;
1339 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
1343 pset
= find_section_list (padd
->name
, FALSE
);
1347 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DATA
;
1348 if (pset
!= NULL
&& pset
->set_flags
)
1349 flags
= pset
->flags
| SEC_HAS_CONTENTS
;
1351 /* bfd_make_section_with_flags() does not return very helpful
1352 error codes, so check for the most likely user error first. */
1353 if (bfd_get_section_by_name (obfd
, padd
->name
))
1355 non_fatal (_("can't add section '%s' - it already exists!"), padd
->name
);
1360 padd
->section
= bfd_make_section_with_flags (obfd
, padd
->name
, flags
);
1361 if (padd
->section
== NULL
)
1363 non_fatal (_("can't create section `%s': %s"),
1364 padd
->name
, bfd_errmsg (bfd_get_error ()));
1369 if (! bfd_set_section_size (obfd
, padd
->section
, padd
->size
))
1371 bfd_nonfatal (bfd_get_filename (obfd
));
1377 if (pset
->change_vma
!= CHANGE_IGNORE
)
1378 if (! bfd_set_section_vma (obfd
, padd
->section
,
1381 bfd_nonfatal (bfd_get_filename (obfd
));
1385 if (pset
->change_lma
!= CHANGE_IGNORE
)
1387 padd
->section
->lma
= pset
->lma_val
;
1389 if (! bfd_set_section_alignment
1390 (obfd
, padd
->section
,
1391 bfd_section_alignment (obfd
, padd
->section
)))
1393 bfd_nonfatal (bfd_get_filename (obfd
));
1401 if (gnu_debuglink_filename
!= NULL
)
1403 gnu_debuglink_section
= bfd_create_gnu_debuglink_section
1404 (obfd
, gnu_debuglink_filename
);
1406 if (gnu_debuglink_section
== NULL
)
1408 bfd_nonfatal (gnu_debuglink_filename
);
1412 /* Special processing for PE format files. We
1413 have no way to distinguish PE from COFF here. */
1414 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
)
1416 bfd_vma debuglink_vma
;
1417 asection
* highest_section
;
1420 /* The PE spec requires that all sections be adjacent and sorted
1421 in ascending order of VMA. It also specifies that debug
1422 sections should be last. This is despite the fact that debug
1423 sections are not loaded into memory and so in theory have no
1426 This means that the debuglink section must be given a non-zero
1427 VMA which makes it contiguous with other debug sections. So
1428 walk the current section list, find the section with the
1429 highest VMA and start the debuglink section after that one. */
1430 for (sec
= obfd
->sections
, highest_section
= NULL
;
1434 && (highest_section
== NULL
1435 || sec
->vma
> highest_section
->vma
))
1436 highest_section
= sec
;
1438 if (highest_section
)
1439 debuglink_vma
= BFD_ALIGN (highest_section
->vma
1440 + highest_section
->size
,
1441 /* FIXME: We ought to be using
1442 COFF_PAGE_SIZE here or maybe
1443 bfd_get_section_alignment() (if it
1444 was set) but since this is for PE
1445 and we know the required alignment
1446 it is easier just to hard code it. */
1449 /* Umm, not sure what to do in this case. */
1450 debuglink_vma
= 0x1000;
1452 bfd_set_section_vma (obfd
, gnu_debuglink_section
, debuglink_vma
);
1456 if (bfd_count_sections (obfd
) == 0)
1458 non_fatal (_("there are no sections to be copied!"));
1462 if (gap_fill_set
|| pad_to_set
)
1467 /* We must fill in gaps between the sections and/or we must pad
1468 the last section to a specified address. We do this by
1469 grabbing a list of the sections, sorting them by VMA, and
1470 increasing the section sizes as required to fill the gaps.
1471 We write out the gap contents below. */
1473 c
= bfd_count_sections (obfd
);
1474 osections
= xmalloc (c
* sizeof (asection
*));
1476 bfd_map_over_sections (obfd
, get_sections
, &set
);
1478 qsort (osections
, c
, sizeof (asection
*), compare_section_lma
);
1480 gaps
= xmalloc (c
* sizeof (bfd_size_type
));
1481 memset (gaps
, 0, c
* sizeof (bfd_size_type
));
1485 for (i
= 0; i
< c
- 1; i
++)
1489 bfd_vma gap_start
, gap_stop
;
1491 flags
= bfd_get_section_flags (obfd
, osections
[i
]);
1492 if ((flags
& SEC_HAS_CONTENTS
) == 0
1493 || (flags
& SEC_LOAD
) == 0)
1496 size
= bfd_section_size (obfd
, osections
[i
]);
1497 gap_start
= bfd_section_lma (obfd
, osections
[i
]) + size
;
1498 gap_stop
= bfd_section_lma (obfd
, osections
[i
+ 1]);
1499 if (gap_start
< gap_stop
)
1501 if (! bfd_set_section_size (obfd
, osections
[i
],
1502 size
+ (gap_stop
- gap_start
)))
1504 non_fatal (_("Can't fill gap after %s: %s"),
1505 bfd_get_section_name (obfd
, osections
[i
]),
1506 bfd_errmsg (bfd_get_error ()));
1510 gaps
[i
] = gap_stop
- gap_start
;
1511 if (max_gap
< gap_stop
- gap_start
)
1512 max_gap
= gap_stop
- gap_start
;
1522 lma
= bfd_section_lma (obfd
, osections
[c
- 1]);
1523 size
= bfd_section_size (obfd
, osections
[c
- 1]);
1524 if (lma
+ size
< pad_to
)
1526 if (! bfd_set_section_size (obfd
, osections
[c
- 1],
1529 non_fatal (_("Can't add padding to %s: %s"),
1530 bfd_get_section_name (obfd
, osections
[c
- 1]),
1531 bfd_errmsg (bfd_get_error ()));
1536 gaps
[c
- 1] = pad_to
- (lma
+ size
);
1537 if (max_gap
< pad_to
- (lma
+ size
))
1538 max_gap
= pad_to
- (lma
+ size
);
1544 /* Symbol filtering must happen after the output sections
1545 have been created, but before their contents are set. */
1547 symsize
= bfd_get_symtab_upper_bound (ibfd
);
1550 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1554 osympp
= isympp
= xmalloc (symsize
);
1555 symcount
= bfd_canonicalize_symtab (ibfd
, isympp
);
1558 bfd_nonfatal (bfd_get_filename (ibfd
));
1562 if (convert_debugging
)
1563 dhandle
= read_debugging_info (ibfd
, isympp
, symcount
);
1565 if (strip_symbols
== STRIP_DEBUG
1566 || strip_symbols
== STRIP_ALL
1567 || strip_symbols
== STRIP_UNNEEDED
1568 || strip_symbols
== STRIP_NONDEBUG
1569 || discard_locals
!= LOCALS_UNDEF
1571 || strip_specific_list
!= NULL
1572 || keep_specific_list
!= NULL
1573 || localize_specific_list
!= NULL
1574 || globalize_specific_list
!= NULL
1575 || keepglobal_specific_list
!= NULL
1576 || weaken_specific_list
!= NULL
1577 || prefix_symbols_string
1580 || convert_debugging
1581 || change_leading_char
1582 || remove_leading_char
1583 || redefine_sym_list
1586 /* Mark symbols used in output relocations so that they
1587 are kept, even if they are local labels or static symbols.
1589 Note we iterate over the input sections examining their
1590 relocations since the relocations for the output sections
1591 haven't been set yet. mark_symbols_used_in_relocations will
1592 ignore input sections which have no corresponding output
1594 if (strip_symbols
!= STRIP_ALL
)
1595 bfd_map_over_sections (ibfd
,
1596 mark_symbols_used_in_relocations
,
1598 osympp
= xmalloc ((symcount
+ 1) * sizeof (asymbol
*));
1599 symcount
= filter_symbols (ibfd
, obfd
, osympp
, isympp
, symcount
);
1602 if (convert_debugging
&& dhandle
!= NULL
)
1604 if (! write_debugging_info (obfd
, dhandle
, &symcount
, &osympp
))
1611 bfd_set_symtab (obfd
, osympp
, symcount
);
1613 /* This has to happen after the symbol table has been set. */
1614 bfd_map_over_sections (ibfd
, copy_section
, obfd
);
1616 if (add_sections
!= NULL
)
1618 struct section_add
*padd
;
1620 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
1622 if (! bfd_set_section_contents (obfd
, padd
->section
, padd
->contents
,
1625 bfd_nonfatal (bfd_get_filename (obfd
));
1631 if (gnu_debuglink_filename
!= NULL
)
1633 if (! bfd_fill_in_gnu_debuglink_section
1634 (obfd
, gnu_debuglink_section
, gnu_debuglink_filename
))
1636 bfd_nonfatal (gnu_debuglink_filename
);
1641 if (gap_fill_set
|| pad_to_set
)
1646 /* Fill in the gaps. */
1649 buf
= xmalloc (max_gap
);
1650 memset (buf
, gap_fill
, max_gap
);
1652 c
= bfd_count_sections (obfd
);
1653 for (i
= 0; i
< c
; i
++)
1661 off
= bfd_section_size (obfd
, osections
[i
]) - left
;
1672 if (! bfd_set_section_contents (obfd
, osections
[i
], buf
,
1675 bfd_nonfatal (bfd_get_filename (obfd
));
1686 /* Allow the BFD backend to copy any private data it understands
1687 from the input BFD to the output BFD. This is done last to
1688 permit the routine to look at the filtered symbol table, which is
1689 important for the ECOFF code at least. */
1690 if (bfd_get_flavour (ibfd
) == bfd_target_elf_flavour
1691 && strip_symbols
== STRIP_NONDEBUG
)
1692 /* Do not copy the private data when creating an ELF format
1693 debug info file. We do not want the program headers. */
1695 else if (! bfd_copy_private_bfd_data (ibfd
, obfd
))
1697 non_fatal (_("%s: error copying private BFD data: %s"),
1698 bfd_get_filename (obfd
),
1699 bfd_errmsg (bfd_get_error ()));
1703 /* Switch to the alternate machine code. We have to do this at the
1704 very end, because we only initialize the header when we create
1705 the first section. */
1706 if (use_alt_mach_code
!= 0)
1708 if (! bfd_alt_mach_code (obfd
, use_alt_mach_code
))
1710 non_fatal (_("this target does not support %lu alternative machine codes"),
1712 if (bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
1714 non_fatal (_("treating that number as an absolute e_machine value instead"));
1715 elf_elfheader (obfd
)->e_machine
= use_alt_mach_code
;
1718 non_fatal (_("ignoring the alternative value"));
1726 #if defined (_WIN32) && !defined (__CYGWIN32__)
1727 #define MKDIR(DIR, MODE) mkdir (DIR)
1729 #define MKDIR(DIR, MODE) mkdir (DIR, MODE)
1732 /* Read each archive element in turn from IBFD, copy the
1733 contents to temp file, and keep the temp file handle. */
1736 copy_archive (bfd
*ibfd
, bfd
*obfd
, const char *output_target
)
1740 struct name_list
*next
;
1744 bfd
**ptr
= &obfd
->archive_head
;
1746 char *dir
= make_tempname (bfd_get_filename (obfd
));
1748 /* Make a temp directory to hold the contents. */
1749 if (MKDIR (dir
, 0700) != 0)
1750 fatal (_("cannot mkdir %s for archive copying (error: %s)"),
1751 dir
, strerror (errno
));
1753 obfd
->has_armap
= ibfd
->has_armap
;
1757 this_element
= bfd_openr_next_archived_file (ibfd
, NULL
);
1759 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
1760 RETURN_NONFATAL (bfd_get_filename (obfd
));
1762 while (!status
&& this_element
!= NULL
)
1768 int stat_status
= 0;
1769 bfd_boolean
delete = TRUE
;
1771 /* Create an output file for this member. */
1772 output_name
= concat (dir
, "/",
1773 bfd_get_filename (this_element
), (char *) 0);
1775 /* If the file already exists, make another temp dir. */
1776 if (stat (output_name
, &buf
) >= 0)
1778 output_name
= make_tempname (output_name
);
1779 if (MKDIR (output_name
, 0700) != 0)
1780 fatal (_("cannot mkdir %s for archive copying (error: %s)"),
1781 output_name
, strerror (errno
));
1783 l
= xmalloc (sizeof (struct name_list
));
1784 l
->name
= output_name
;
1788 output_name
= concat (output_name
, "/",
1789 bfd_get_filename (this_element
), (char *) 0);
1792 output_bfd
= bfd_openw (output_name
, output_target
);
1795 stat_status
= bfd_stat_arch_elt (this_element
, &buf
);
1797 if (stat_status
!= 0)
1798 non_fatal (_("internal stat error on %s"),
1799 bfd_get_filename (this_element
));
1802 l
= xmalloc (sizeof (struct name_list
));
1803 l
->name
= output_name
;
1808 if (output_bfd
== NULL
)
1809 RETURN_NONFATAL (output_name
);
1811 if (bfd_check_format (this_element
, bfd_object
))
1813 delete = ! copy_object (this_element
, output_bfd
);
1816 || bfd_get_arch (this_element
) != bfd_arch_unknown
)
1818 if (!bfd_close (output_bfd
))
1820 bfd_nonfatal (bfd_get_filename (output_bfd
));
1821 /* Error in new object file. Don't change archive. */
1826 goto copy_unknown_element
;
1830 non_fatal (_("Unable to recognise the format of the input file `%s'"),
1831 bfd_get_archive_filename (this_element
));
1833 copy_unknown_element
:
1834 delete = !copy_unknown_object (this_element
, output_bfd
);
1835 if (!bfd_close_all_done (output_bfd
))
1837 bfd_nonfatal (bfd_get_filename (output_bfd
));
1838 /* Error in new object file. Don't change archive. */
1845 unlink (output_name
);
1850 if (preserve_dates
&& stat_status
== 0)
1851 set_times (output_name
, &buf
);
1853 /* Open the newly output file and attach to our list. */
1854 output_bfd
= bfd_openr (output_name
, output_target
);
1856 l
->obfd
= output_bfd
;
1859 ptr
= &output_bfd
->next
;
1861 last_element
= this_element
;
1863 this_element
= bfd_openr_next_archived_file (ibfd
, last_element
);
1865 bfd_close (last_element
);
1870 if (!bfd_close (obfd
))
1871 RETURN_NONFATAL (bfd_get_filename (obfd
));
1873 if (!bfd_close (ibfd
))
1874 RETURN_NONFATAL (bfd_get_filename (ibfd
));
1876 /* Delete all the files that we opened. */
1877 for (l
= list
; l
!= NULL
; l
= l
->next
)
1879 if (l
->obfd
== NULL
)
1883 bfd_close (l
->obfd
);
1890 /* The top-level control. */
1893 copy_file (const char *input_filename
, const char *output_filename
,
1894 const char *input_target
, const char *output_target
)
1897 char **obj_matching
;
1898 char **core_matching
;
1900 if (get_file_size (input_filename
) < 1)
1906 /* To allow us to do "strip *" without dying on the first
1907 non-object file, failures are nonfatal. */
1908 ibfd
= bfd_openr (input_filename
, input_target
);
1910 RETURN_NONFATAL (input_filename
);
1912 if (bfd_check_format (ibfd
, bfd_archive
))
1916 /* bfd_get_target does not return the correct value until
1917 bfd_check_format succeeds. */
1918 if (output_target
== NULL
)
1919 output_target
= bfd_get_target (ibfd
);
1921 obfd
= bfd_openw (output_filename
, output_target
);
1923 RETURN_NONFATAL (output_filename
);
1925 copy_archive (ibfd
, obfd
, output_target
);
1927 else if (bfd_check_format_matches (ibfd
, bfd_object
, &obj_matching
))
1932 /* bfd_get_target does not return the correct value until
1933 bfd_check_format succeeds. */
1934 if (output_target
== NULL
)
1935 output_target
= bfd_get_target (ibfd
);
1937 obfd
= bfd_openw (output_filename
, output_target
);
1939 RETURN_NONFATAL (output_filename
);
1941 if (! copy_object (ibfd
, obfd
))
1944 if (!bfd_close (obfd
))
1945 RETURN_NONFATAL (output_filename
);
1947 if (!bfd_close (ibfd
))
1948 RETURN_NONFATAL (input_filename
);
1953 bfd_error_type obj_error
= bfd_get_error ();
1954 bfd_error_type core_error
;
1956 if (bfd_check_format_matches (ibfd
, bfd_core
, &core_matching
))
1958 /* This probably can't happen.. */
1959 if (obj_error
== bfd_error_file_ambiguously_recognized
)
1960 free (obj_matching
);
1964 core_error
= bfd_get_error ();
1965 /* Report the object error in preference to the core error. */
1966 if (obj_error
!= core_error
)
1967 bfd_set_error (obj_error
);
1969 bfd_nonfatal (input_filename
);
1971 if (obj_error
== bfd_error_file_ambiguously_recognized
)
1973 list_matching_formats (obj_matching
);
1974 free (obj_matching
);
1976 if (core_error
== bfd_error_file_ambiguously_recognized
)
1978 list_matching_formats (core_matching
);
1979 free (core_matching
);
1986 /* Add a name to the section renaming list. */
1989 add_section_rename (const char * old_name
, const char * new_name
,
1992 section_rename
* rename
;
1994 /* Check for conflicts first. */
1995 for (rename
= section_rename_list
; rename
!= NULL
; rename
= rename
->next
)
1996 if (strcmp (rename
->old_name
, old_name
) == 0)
1998 /* Silently ignore duplicate definitions. */
1999 if (strcmp (rename
->new_name
, new_name
) == 0
2000 && rename
->flags
== flags
)
2003 fatal (_("Multiple renames of section %s"), old_name
);
2006 rename
= xmalloc (sizeof (* rename
));
2008 rename
->old_name
= old_name
;
2009 rename
->new_name
= new_name
;
2010 rename
->flags
= flags
;
2011 rename
->next
= section_rename_list
;
2013 section_rename_list
= rename
;
2016 /* Check the section rename list for a new name of the input section
2017 ISECTION. Return the new name if one is found.
2018 Also set RETURNED_FLAGS to the flags to be used for this section. */
2021 find_section_rename (bfd
* ibfd ATTRIBUTE_UNUSED
, sec_ptr isection
,
2022 flagword
* returned_flags
)
2024 const char * old_name
= bfd_section_name (ibfd
, isection
);
2025 section_rename
* rename
;
2027 /* Default to using the flags of the input section. */
2028 * returned_flags
= bfd_get_section_flags (ibfd
, isection
);
2030 for (rename
= section_rename_list
; rename
!= NULL
; rename
= rename
->next
)
2031 if (strcmp (rename
->old_name
, old_name
) == 0)
2033 if (rename
->flags
!= (flagword
) -1)
2034 * returned_flags
= rename
->flags
;
2036 return rename
->new_name
;
2042 /* Once each of the sections is copied, we may still need to do some
2043 finalization work for private section headers. Do that here. */
2046 setup_bfd_headers (bfd
*ibfd
, bfd
*obfd
)
2050 /* Allow the BFD backend to copy any private data it understands
2051 from the input section to the output section. */
2052 if (! bfd_copy_private_header_data (ibfd
, obfd
))
2054 err
= _("private header data");
2058 /* All went well. */
2062 non_fatal (_("%s: error in %s: %s"),
2063 bfd_get_filename (ibfd
),
2064 err
, bfd_errmsg (bfd_get_error ()));
2068 /* Create a section in OBFD with the same
2069 name and attributes as ISECTION in IBFD. */
2072 setup_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
2074 bfd
*obfd
= obfdarg
;
2075 struct section_list
*p
;
2083 char *prefix
= NULL
;
2085 if (is_strip_section (ibfd
, isection
))
2088 p
= find_section_list (bfd_section_name (ibfd
, isection
), FALSE
);
2092 /* Get the, possibly new, name of the output section. */
2093 name
= find_section_rename (ibfd
, isection
, & flags
);
2095 /* Prefix sections. */
2096 if ((prefix_alloc_sections_string
)
2097 && (bfd_get_section_flags (ibfd
, isection
) & SEC_ALLOC
))
2098 prefix
= prefix_alloc_sections_string
;
2099 else if (prefix_sections_string
)
2100 prefix
= prefix_sections_string
;
2106 n
= xmalloc (strlen (prefix
) + strlen (name
) + 1);
2112 if (p
!= NULL
&& p
->set_flags
)
2113 flags
= p
->flags
| (flags
& (SEC_HAS_CONTENTS
| SEC_RELOC
));
2114 else if (strip_symbols
== STRIP_NONDEBUG
&& (flags
& SEC_ALLOC
) != 0)
2115 flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
);
2117 osection
= bfd_make_section_anyway_with_flags (obfd
, name
, flags
);
2119 if (osection
== NULL
)
2125 if (strip_symbols
== STRIP_NONDEBUG
2126 && obfd
->xvec
->flavour
== bfd_target_elf_flavour
2127 && (flags
& SEC_ALLOC
) != 0
2128 && (p
== NULL
|| !p
->set_flags
))
2129 elf_section_type (osection
) = SHT_NOBITS
;
2131 size
= bfd_section_size (ibfd
, isection
);
2133 size
= (size
+ interleave
- 1) / interleave
;
2134 if (! bfd_set_section_size (obfd
, osection
, size
))
2140 vma
= bfd_section_vma (ibfd
, isection
);
2141 if (p
!= NULL
&& p
->change_vma
== CHANGE_MODIFY
)
2143 else if (p
!= NULL
&& p
->change_vma
== CHANGE_SET
)
2146 vma
+= change_section_address
;
2148 if (! bfd_set_section_vma (obfd
, osection
, vma
))
2154 lma
= isection
->lma
;
2155 if ((p
!= NULL
) && p
->change_lma
!= CHANGE_IGNORE
)
2157 if (p
->change_lma
== CHANGE_MODIFY
)
2159 else if (p
->change_lma
== CHANGE_SET
)
2165 lma
+= change_section_address
;
2167 osection
->lma
= lma
;
2169 /* FIXME: This is probably not enough. If we change the LMA we
2170 may have to recompute the header for the file as well. */
2171 if (!bfd_set_section_alignment (obfd
,
2173 bfd_section_alignment (ibfd
, isection
)))
2175 err
= _("alignment");
2179 /* Copy merge entity size. */
2180 osection
->entsize
= isection
->entsize
;
2182 /* This used to be mangle_section; we do here to avoid using
2183 bfd_get_section_by_name since some formats allow multiple
2184 sections with the same name. */
2185 isection
->output_section
= osection
;
2186 isection
->output_offset
= 0;
2188 /* Allow the BFD backend to copy any private data it understands
2189 from the input section to the output section. */
2190 if (bfd_get_flavour (ibfd
) == bfd_target_elf_flavour
2191 && strip_symbols
== STRIP_NONDEBUG
)
2192 /* Do not copy the private data when creating an ELF format
2193 debug info file. We do not want the program headers. */
2195 else if (!bfd_copy_private_section_data (ibfd
, isection
, obfd
, osection
))
2197 err
= _("private data");
2201 /* All went well. */
2205 non_fatal (_("%s: section `%s': error in %s: %s"),
2206 bfd_get_filename (ibfd
),
2207 bfd_section_name (ibfd
, isection
),
2208 err
, bfd_errmsg (bfd_get_error ()));
2212 /* Copy the data of input section ISECTION of IBFD
2213 to an output section with the same name in OBFD.
2214 If stripping then don't copy any relocation info. */
2217 copy_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
2219 bfd
*obfd
= obfdarg
;
2220 struct section_list
*p
;
2228 /* If we have already failed earlier on,
2229 do not keep on generating complaints now. */
2233 if (is_strip_section (ibfd
, isection
))
2236 flags
= bfd_get_section_flags (ibfd
, isection
);
2237 if ((flags
& SEC_GROUP
) != 0)
2240 osection
= isection
->output_section
;
2241 size
= bfd_get_section_size (isection
);
2243 if (size
== 0 || osection
== 0)
2246 p
= find_section_list (bfd_get_section_name (ibfd
, isection
), FALSE
);
2248 /* Core files do not need to be relocated. */
2249 if (bfd_get_format (obfd
) == bfd_core
)
2253 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
2257 /* Do not complain if the target does not support relocations. */
2258 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
2261 RETURN_NONFATAL (bfd_get_filename (ibfd
));
2266 bfd_set_reloc (obfd
, osection
, NULL
, 0);
2269 relpp
= xmalloc (relsize
);
2270 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, isympp
);
2272 RETURN_NONFATAL (bfd_get_filename (ibfd
));
2274 if (strip_symbols
== STRIP_ALL
)
2276 /* Remove relocations which are not in
2277 keep_strip_specific_list. */
2278 arelent
**temp_relpp
;
2279 long temp_relcount
= 0;
2282 temp_relpp
= xmalloc (relsize
);
2283 for (i
= 0; i
< relcount
; i
++)
2284 if (is_specified_symbol (bfd_asymbol_name (*relpp
[i
]->sym_ptr_ptr
),
2285 keep_specific_list
))
2286 temp_relpp
[temp_relcount
++] = relpp
[i
];
2287 relcount
= temp_relcount
;
2292 bfd_set_reloc (obfd
, osection
, relcount
== 0 ? NULL
: relpp
, relcount
);
2297 if (bfd_get_section_flags (ibfd
, isection
) & SEC_HAS_CONTENTS
2298 && bfd_get_section_flags (obfd
, osection
) & SEC_HAS_CONTENTS
)
2300 void *memhunk
= xmalloc (size
);
2302 if (!bfd_get_section_contents (ibfd
, isection
, memhunk
, 0, size
))
2303 RETURN_NONFATAL (bfd_get_filename (ibfd
));
2307 /* Keep only every `copy_byte'th byte in MEMHUNK. */
2308 char *from
= (char *) memhunk
+ copy_byte
;
2310 char *end
= (char *) memhunk
+ size
;
2312 for (; from
< end
; from
+= interleave
)
2315 size
= (size
+ interleave
- 1 - copy_byte
) / interleave
;
2316 osection
->lma
/= interleave
;
2319 if (!bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
2320 RETURN_NONFATAL (bfd_get_filename (obfd
));
2324 else if (p
!= NULL
&& p
->set_flags
&& (p
->flags
& SEC_HAS_CONTENTS
) != 0)
2326 void *memhunk
= xmalloc (size
);
2328 /* We don't permit the user to turn off the SEC_HAS_CONTENTS
2329 flag--they can just remove the section entirely and add it
2330 back again. However, we do permit them to turn on the
2331 SEC_HAS_CONTENTS flag, and take it to mean that the section
2332 contents should be zeroed out. */
2334 memset (memhunk
, 0, size
);
2335 if (! bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
2336 RETURN_NONFATAL (bfd_get_filename (obfd
));
2341 /* Get all the sections. This is used when --gap-fill or --pad-to is
2345 get_sections (bfd
*obfd ATTRIBUTE_UNUSED
, asection
*osection
, void *secppparg
)
2347 asection
***secppp
= secppparg
;
2349 **secppp
= osection
;
2353 /* Sort sections by VMA. This is called via qsort, and is used when
2354 --gap-fill or --pad-to is used. We force non loadable or empty
2355 sections to the front, where they are easier to ignore. */
2358 compare_section_lma (const void *arg1
, const void *arg2
)
2360 const asection
*const *sec1
= arg1
;
2361 const asection
*const *sec2
= arg2
;
2362 flagword flags1
, flags2
;
2364 /* Sort non loadable sections to the front. */
2365 flags1
= (*sec1
)->flags
;
2366 flags2
= (*sec2
)->flags
;
2367 if ((flags1
& SEC_HAS_CONTENTS
) == 0
2368 || (flags1
& SEC_LOAD
) == 0)
2370 if ((flags2
& SEC_HAS_CONTENTS
) != 0
2371 && (flags2
& SEC_LOAD
) != 0)
2376 if ((flags2
& SEC_HAS_CONTENTS
) == 0
2377 || (flags2
& SEC_LOAD
) == 0)
2381 /* Sort sections by LMA. */
2382 if ((*sec1
)->lma
> (*sec2
)->lma
)
2384 else if ((*sec1
)->lma
< (*sec2
)->lma
)
2387 /* Sort sections with the same LMA by size. */
2388 if (bfd_get_section_size (*sec1
) > bfd_get_section_size (*sec2
))
2390 else if (bfd_get_section_size (*sec1
) < bfd_get_section_size (*sec2
))
2396 /* Mark all the symbols which will be used in output relocations with
2397 the BSF_KEEP flag so that those symbols will not be stripped.
2399 Ignore relocations which will not appear in the output file. */
2402 mark_symbols_used_in_relocations (bfd
*ibfd
, sec_ptr isection
, void *symbolsarg
)
2404 asymbol
**symbols
= symbolsarg
;
2409 /* Ignore an input section with no corresponding output section. */
2410 if (isection
->output_section
== NULL
)
2413 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
2416 /* Do not complain if the target does not support relocations. */
2417 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
2419 bfd_fatal (bfd_get_filename (ibfd
));
2425 relpp
= xmalloc (relsize
);
2426 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, symbols
);
2428 bfd_fatal (bfd_get_filename (ibfd
));
2430 /* Examine each symbol used in a relocation. If it's not one of the
2431 special bfd section symbols, then mark it with BSF_KEEP. */
2432 for (i
= 0; i
< relcount
; i
++)
2434 if (*relpp
[i
]->sym_ptr_ptr
!= bfd_com_section_ptr
->symbol
2435 && *relpp
[i
]->sym_ptr_ptr
!= bfd_abs_section_ptr
->symbol
2436 && *relpp
[i
]->sym_ptr_ptr
!= bfd_und_section_ptr
->symbol
)
2437 (*relpp
[i
]->sym_ptr_ptr
)->flags
|= BSF_KEEP
;
2444 /* Write out debugging information. */
2447 write_debugging_info (bfd
*obfd
, void *dhandle
,
2448 long *symcountp ATTRIBUTE_UNUSED
,
2449 asymbol
***symppp ATTRIBUTE_UNUSED
)
2451 if (bfd_get_flavour (obfd
) == bfd_target_ieee_flavour
)
2452 return write_ieee_debugging_info (obfd
, dhandle
);
2454 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
2455 || bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
2457 bfd_byte
*syms
, *strings
;
2458 bfd_size_type symsize
, stringsize
;
2459 asection
*stabsec
, *stabstrsec
;
2462 if (! write_stabs_in_sections_debugging_info (obfd
, dhandle
, &syms
,
2467 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DEBUGGING
;
2468 stabsec
= bfd_make_section_with_flags (obfd
, ".stab", flags
);
2469 stabstrsec
= bfd_make_section_with_flags (obfd
, ".stabstr", flags
);
2471 || stabstrsec
== NULL
2472 || ! bfd_set_section_size (obfd
, stabsec
, symsize
)
2473 || ! bfd_set_section_size (obfd
, stabstrsec
, stringsize
)
2474 || ! bfd_set_section_alignment (obfd
, stabsec
, 2)
2475 || ! bfd_set_section_alignment (obfd
, stabstrsec
, 0))
2477 non_fatal (_("%s: can't create debugging section: %s"),
2478 bfd_get_filename (obfd
),
2479 bfd_errmsg (bfd_get_error ()));
2483 /* We can get away with setting the section contents now because
2484 the next thing the caller is going to do is copy over the
2485 real sections. We may someday have to split the contents
2486 setting out of this function. */
2487 if (! bfd_set_section_contents (obfd
, stabsec
, syms
, 0, symsize
)
2488 || ! bfd_set_section_contents (obfd
, stabstrsec
, strings
, 0,
2491 non_fatal (_("%s: can't set debugging section contents: %s"),
2492 bfd_get_filename (obfd
),
2493 bfd_errmsg (bfd_get_error ()));
2500 non_fatal (_("%s: don't know how to write debugging information for %s"),
2501 bfd_get_filename (obfd
), bfd_get_target (obfd
));
2506 strip_main (int argc
, char *argv
[])
2508 char *input_target
= NULL
;
2509 char *output_target
= NULL
;
2510 bfd_boolean show_version
= FALSE
;
2511 bfd_boolean formats_info
= FALSE
;
2514 struct section_list
*p
;
2515 char *output_file
= NULL
;
2517 while ((c
= getopt_long (argc
, argv
, "I:O:F:K:N:R:o:sSpdgxXHhVvw",
2518 strip_options
, (int *) 0)) != EOF
)
2523 input_target
= optarg
;
2526 output_target
= optarg
;
2529 input_target
= output_target
= optarg
;
2532 p
= find_section_list (optarg
, TRUE
);
2534 sections_removed
= TRUE
;
2537 strip_symbols
= STRIP_ALL
;
2541 case 'd': /* Historic BSD alias for -g. Used by early NetBSD. */
2542 strip_symbols
= STRIP_DEBUG
;
2544 case OPTION_STRIP_UNNEEDED
:
2545 strip_symbols
= STRIP_UNNEEDED
;
2548 add_specific_symbol (optarg
, &keep_specific_list
);
2551 add_specific_symbol (optarg
, &strip_specific_list
);
2554 output_file
= optarg
;
2557 preserve_dates
= TRUE
;
2560 discard_locals
= LOCALS_ALL
;
2563 discard_locals
= LOCALS_START_L
;
2569 show_version
= TRUE
;
2571 case OPTION_FORMATS_INFO
:
2572 formats_info
= TRUE
;
2574 case OPTION_ONLY_KEEP_DEBUG
:
2575 strip_symbols
= STRIP_NONDEBUG
;
2577 case OPTION_KEEP_FILE_SYMBOLS
:
2578 keep_file_symbols
= 1;
2581 /* We've been given a long option. */
2588 strip_usage (stdout
, 0);
2590 strip_usage (stderr
, 1);
2601 print_version ("strip");
2603 /* Default is to strip all symbols. */
2604 if (strip_symbols
== STRIP_UNDEF
2605 && discard_locals
== LOCALS_UNDEF
2606 && strip_specific_list
== NULL
)
2607 strip_symbols
= STRIP_ALL
;
2609 if (output_target
== NULL
)
2610 output_target
= input_target
;
2614 || (output_file
!= NULL
&& (i
+ 1) < argc
))
2615 strip_usage (stderr
, 1);
2617 for (; i
< argc
; i
++)
2619 int hold_status
= status
;
2620 struct stat statbuf
;
2623 if (get_file_size (argv
[i
]) < 1)
2630 /* No need to check the return value of stat().
2631 It has already been checked in get_file_size(). */
2632 stat (argv
[i
], &statbuf
);
2634 if (output_file
!= NULL
)
2635 tmpname
= output_file
;
2637 tmpname
= make_tempname (argv
[i
]);
2640 copy_file (argv
[i
], tmpname
, input_target
, output_target
);
2644 set_times (tmpname
, &statbuf
);
2645 if (output_file
== NULL
)
2646 smart_rename (tmpname
, argv
[i
], preserve_dates
);
2647 status
= hold_status
;
2650 unlink_if_ordinary (tmpname
);
2651 if (output_file
== NULL
)
2659 copy_main (int argc
, char *argv
[])
2661 char * binary_architecture
= NULL
;
2662 char *input_filename
= NULL
;
2663 char *output_filename
= NULL
;
2664 char *input_target
= NULL
;
2665 char *output_target
= NULL
;
2666 bfd_boolean show_version
= FALSE
;
2667 bfd_boolean change_warn
= TRUE
;
2668 bfd_boolean formats_info
= FALSE
;
2670 struct section_list
*p
;
2671 struct stat statbuf
;
2673 while ((c
= getopt_long (argc
, argv
, "b:B:i:I:j:K:N:s:O:d:F:L:G:R:SpgxXHhVvW:w",
2674 copy_options
, (int *) 0)) != EOF
)
2679 copy_byte
= atoi (optarg
);
2681 fatal (_("byte number must be non-negative"));
2685 binary_architecture
= optarg
;
2689 interleave
= atoi (optarg
);
2691 fatal (_("interleave must be positive"));
2695 case 's': /* "source" - 'I' is preferred */
2696 input_target
= optarg
;
2700 case 'd': /* "destination" - 'O' is preferred */
2701 output_target
= optarg
;
2705 input_target
= output_target
= optarg
;
2709 p
= find_section_list (optarg
, TRUE
);
2711 fatal (_("%s both copied and removed"), optarg
);
2713 sections_copied
= TRUE
;
2717 p
= find_section_list (optarg
, TRUE
);
2719 fatal (_("%s both copied and removed"), optarg
);
2721 sections_removed
= TRUE
;
2725 strip_symbols
= STRIP_ALL
;
2729 strip_symbols
= STRIP_DEBUG
;
2732 case OPTION_STRIP_UNNEEDED
:
2733 strip_symbols
= STRIP_UNNEEDED
;
2736 case OPTION_ONLY_KEEP_DEBUG
:
2737 strip_symbols
= STRIP_NONDEBUG
;
2740 case OPTION_KEEP_FILE_SYMBOLS
:
2741 keep_file_symbols
= 1;
2744 case OPTION_ADD_GNU_DEBUGLINK
:
2745 gnu_debuglink_filename
= optarg
;
2749 add_specific_symbol (optarg
, &keep_specific_list
);
2753 add_specific_symbol (optarg
, &strip_specific_list
);
2756 case OPTION_STRIP_UNNEEDED_SYMBOL
:
2757 add_specific_symbol (optarg
, &strip_unneeded_list
);
2761 add_specific_symbol (optarg
, &localize_specific_list
);
2764 case OPTION_GLOBALIZE_SYMBOL
:
2765 add_specific_symbol (optarg
, &globalize_specific_list
);
2769 add_specific_symbol (optarg
, &keepglobal_specific_list
);
2773 add_specific_symbol (optarg
, &weaken_specific_list
);
2777 preserve_dates
= TRUE
;
2785 discard_locals
= LOCALS_ALL
;
2789 discard_locals
= LOCALS_START_L
;
2797 show_version
= TRUE
;
2800 case OPTION_FORMATS_INFO
:
2801 formats_info
= TRUE
;
2808 case OPTION_ADD_SECTION
:
2812 struct section_add
*pa
;
2817 s
= strchr (optarg
, '=');
2820 fatal (_("bad format for %s"), "--add-section");
2822 size
= get_file_size (s
+ 1);
2829 pa
= xmalloc (sizeof (struct section_add
));
2832 name
= xmalloc (len
+ 1);
2833 strncpy (name
, optarg
, len
);
2837 pa
->filename
= s
+ 1;
2839 pa
->contents
= xmalloc (size
);
2841 f
= fopen (pa
->filename
, FOPEN_RB
);
2844 fatal (_("cannot open: %s: %s"),
2845 pa
->filename
, strerror (errno
));
2847 if (fread (pa
->contents
, 1, pa
->size
, f
) == 0
2849 fatal (_("%s: fread failed"), pa
->filename
);
2853 pa
->next
= add_sections
;
2858 case OPTION_CHANGE_START
:
2859 change_start
= parse_vma (optarg
, "--change-start");
2862 case OPTION_CHANGE_SECTION_ADDRESS
:
2863 case OPTION_CHANGE_SECTION_LMA
:
2864 case OPTION_CHANGE_SECTION_VMA
:
2869 char *option
= NULL
;
2871 enum change_action what
= CHANGE_IGNORE
;
2875 case OPTION_CHANGE_SECTION_ADDRESS
:
2876 option
= "--change-section-address";
2878 case OPTION_CHANGE_SECTION_LMA
:
2879 option
= "--change-section-lma";
2881 case OPTION_CHANGE_SECTION_VMA
:
2882 option
= "--change-section-vma";
2886 s
= strchr (optarg
, '=');
2889 s
= strchr (optarg
, '+');
2892 s
= strchr (optarg
, '-');
2894 fatal (_("bad format for %s"), option
);
2899 name
= xmalloc (len
+ 1);
2900 strncpy (name
, optarg
, len
);
2903 p
= find_section_list (name
, TRUE
);
2905 val
= parse_vma (s
+ 1, option
);
2909 case '=': what
= CHANGE_SET
; break;
2910 case '-': val
= - val
; /* Drop through. */
2911 case '+': what
= CHANGE_MODIFY
; break;
2916 case OPTION_CHANGE_SECTION_ADDRESS
:
2917 p
->change_vma
= what
;
2921 case OPTION_CHANGE_SECTION_LMA
:
2922 p
->change_lma
= what
;
2926 case OPTION_CHANGE_SECTION_VMA
:
2927 p
->change_vma
= what
;
2934 case OPTION_CHANGE_ADDRESSES
:
2935 change_section_address
= parse_vma (optarg
, "--change-addresses");
2936 change_start
= change_section_address
;
2939 case OPTION_CHANGE_WARNINGS
:
2943 case OPTION_CHANGE_LEADING_CHAR
:
2944 change_leading_char
= TRUE
;
2947 case OPTION_DEBUGGING
:
2948 convert_debugging
= TRUE
;
2951 case OPTION_GAP_FILL
:
2953 bfd_vma gap_fill_vma
;
2955 gap_fill_vma
= parse_vma (optarg
, "--gap-fill");
2956 gap_fill
= (bfd_byte
) gap_fill_vma
;
2957 if ((bfd_vma
) gap_fill
!= gap_fill_vma
)
2961 sprintf_vma (buff
, gap_fill_vma
);
2963 non_fatal (_("Warning: truncating gap-fill from 0x%s to 0x%x"),
2966 gap_fill_set
= TRUE
;
2970 case OPTION_NO_CHANGE_WARNINGS
:
2971 change_warn
= FALSE
;
2975 pad_to
= parse_vma (optarg
, "--pad-to");
2979 case OPTION_REMOVE_LEADING_CHAR
:
2980 remove_leading_char
= TRUE
;
2983 case OPTION_REDEFINE_SYM
:
2985 /* Push this redefinition onto redefine_symbol_list. */
2989 const char *nextarg
;
2990 char *source
, *target
;
2992 s
= strchr (optarg
, '=');
2994 fatal (_("bad format for %s"), "--redefine-sym");
2997 source
= xmalloc (len
+ 1);
2998 strncpy (source
, optarg
, len
);
3002 len
= strlen (nextarg
);
3003 target
= xmalloc (len
+ 1);
3004 strcpy (target
, nextarg
);
3006 redefine_list_append ("--redefine-sym", source
, target
);
3013 case OPTION_REDEFINE_SYMS
:
3014 add_redefine_syms_file (optarg
);
3017 case OPTION_SET_SECTION_FLAGS
:
3023 s
= strchr (optarg
, '=');
3025 fatal (_("bad format for %s"), "--set-section-flags");
3028 name
= xmalloc (len
+ 1);
3029 strncpy (name
, optarg
, len
);
3032 p
= find_section_list (name
, TRUE
);
3034 p
->set_flags
= TRUE
;
3035 p
->flags
= parse_flags (s
+ 1);
3039 case OPTION_RENAME_SECTION
:
3042 const char *eq
, *fl
;
3047 eq
= strchr (optarg
, '=');
3049 fatal (_("bad format for %s"), "--rename-section");
3053 fatal (_("bad format for %s"), "--rename-section");
3055 old_name
= xmalloc (len
+ 1);
3056 strncpy (old_name
, optarg
, len
);
3060 fl
= strchr (eq
, ',');
3063 flags
= parse_flags (fl
+ 1);
3073 fatal (_("bad format for %s"), "--rename-section");
3075 new_name
= xmalloc (len
+ 1);
3076 strncpy (new_name
, eq
, len
);
3079 add_section_rename (old_name
, new_name
, flags
);
3083 case OPTION_SET_START
:
3084 set_start
= parse_vma (optarg
, "--set-start");
3085 set_start_set
= TRUE
;
3088 case OPTION_SREC_LEN
:
3089 Chunk
= parse_vma (optarg
, "--srec-len");
3092 case OPTION_SREC_FORCES3
:
3096 case OPTION_STRIP_SYMBOLS
:
3097 add_specific_symbols (optarg
, &strip_specific_list
);
3100 case OPTION_STRIP_UNNEEDED_SYMBOLS
:
3101 add_specific_symbols (optarg
, &strip_unneeded_list
);
3104 case OPTION_KEEP_SYMBOLS
:
3105 add_specific_symbols (optarg
, &keep_specific_list
);
3108 case OPTION_LOCALIZE_HIDDEN
:
3109 localize_hidden
= TRUE
;
3112 case OPTION_LOCALIZE_SYMBOLS
:
3113 add_specific_symbols (optarg
, &localize_specific_list
);
3116 case OPTION_GLOBALIZE_SYMBOLS
:
3117 add_specific_symbols (optarg
, &globalize_specific_list
);
3120 case OPTION_KEEPGLOBAL_SYMBOLS
:
3121 add_specific_symbols (optarg
, &keepglobal_specific_list
);
3124 case OPTION_WEAKEN_SYMBOLS
:
3125 add_specific_symbols (optarg
, &weaken_specific_list
);
3128 case OPTION_ALT_MACH_CODE
:
3129 use_alt_mach_code
= strtoul (optarg
, NULL
, 0);
3130 if (use_alt_mach_code
== 0)
3131 fatal (_("unable to parse alternative machine code"));
3134 case OPTION_PREFIX_SYMBOLS
:
3135 prefix_symbols_string
= optarg
;
3138 case OPTION_PREFIX_SECTIONS
:
3139 prefix_sections_string
= optarg
;
3142 case OPTION_PREFIX_ALLOC_SECTIONS
:
3143 prefix_alloc_sections_string
= optarg
;
3146 case OPTION_READONLY_TEXT
:
3147 bfd_flags_to_set
|= WP_TEXT
;
3148 bfd_flags_to_clear
&= ~WP_TEXT
;
3151 case OPTION_WRITABLE_TEXT
:
3152 bfd_flags_to_clear
|= WP_TEXT
;
3153 bfd_flags_to_set
&= ~WP_TEXT
;
3157 bfd_flags_to_set
|= D_PAGED
;
3158 bfd_flags_to_clear
&= ~D_PAGED
;
3162 bfd_flags_to_clear
|= D_PAGED
;
3163 bfd_flags_to_set
&= ~D_PAGED
;
3167 /* We've been given a long option. */
3172 copy_usage (stdout
, 0);
3175 copy_usage (stderr
, 1);
3186 print_version ("objcopy");
3188 if (copy_byte
>= interleave
)
3189 fatal (_("byte number must be less than interleave"));
3191 if (optind
== argc
|| optind
+ 2 < argc
)
3192 copy_usage (stderr
, 1);
3194 input_filename
= argv
[optind
];
3195 if (optind
+ 1 < argc
)
3196 output_filename
= argv
[optind
+ 1];
3198 /* Default is to strip no symbols. */
3199 if (strip_symbols
== STRIP_UNDEF
&& discard_locals
== LOCALS_UNDEF
)
3200 strip_symbols
= STRIP_NONE
;
3202 if (output_target
== NULL
)
3203 output_target
= input_target
;
3205 if (binary_architecture
!= NULL
)
3207 if (input_target
&& strcmp (input_target
, "binary") == 0)
3209 const bfd_arch_info_type
* temp_arch_info
;
3211 temp_arch_info
= bfd_scan_arch (binary_architecture
);
3213 if (temp_arch_info
!= NULL
)
3215 bfd_external_binary_architecture
= temp_arch_info
->arch
;
3216 bfd_external_machine
= temp_arch_info
->mach
;
3219 fatal (_("architecture %s unknown"), binary_architecture
);
3223 non_fatal (_("Warning: input target 'binary' required for binary architecture parameter."));
3224 non_fatal (_(" Argument %s ignored"), binary_architecture
);
3229 if (stat (input_filename
, & statbuf
) < 0)
3230 fatal (_("warning: could not locate '%s'. System error message: %s"),
3231 input_filename
, strerror (errno
));
3233 /* If there is no destination file, or the source and destination files
3234 are the same, then create a temp and rename the result into the input. */
3235 if (output_filename
== NULL
|| strcmp (input_filename
, output_filename
) == 0)
3237 char *tmpname
= make_tempname (input_filename
);
3239 copy_file (input_filename
, tmpname
, input_target
, output_target
);
3243 set_times (tmpname
, &statbuf
);
3244 smart_rename (tmpname
, input_filename
, preserve_dates
);
3251 copy_file (input_filename
, output_filename
, input_target
, output_target
);
3253 if (status
== 0 && preserve_dates
)
3254 set_times (output_filename
, &statbuf
);
3255 else if (status
!= 0)
3256 unlink_if_ordinary (output_filename
);
3261 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
3265 if (p
->change_vma
!= CHANGE_IGNORE
)
3269 sprintf_vma (buff
, p
->vma_val
);
3271 /* xgettext:c-format */
3272 non_fatal (_("%s %s%c0x%s never used"),
3273 "--change-section-vma",
3275 p
->change_vma
== CHANGE_SET
? '=' : '+',
3279 if (p
->change_lma
!= CHANGE_IGNORE
)
3283 sprintf_vma (buff
, p
->lma_val
);
3285 /* xgettext:c-format */
3286 non_fatal (_("%s %s%c0x%s never used"),
3287 "--change-section-lma",
3289 p
->change_lma
== CHANGE_SET
? '=' : '+',
3300 main (int argc
, char *argv
[])
3302 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
3303 setlocale (LC_MESSAGES
, "");
3305 #if defined (HAVE_SETLOCALE)
3306 setlocale (LC_CTYPE
, "");
3308 bindtextdomain (PACKAGE
, LOCALEDIR
);
3309 textdomain (PACKAGE
);
3311 program_name
= argv
[0];
3312 xmalloc_set_program_name (program_name
);
3314 START_PROGRESS (program_name
, 0);
3316 expandargv (&argc
, &argv
);
3318 strip_symbols
= STRIP_UNDEF
;
3319 discard_locals
= LOCALS_UNDEF
;
3322 set_default_bfd_target ();
3326 int i
= strlen (program_name
);
3327 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
3328 /* Drop the .exe suffix, if any. */
3329 if (i
> 4 && FILENAME_CMP (program_name
+ i
- 4, ".exe") == 0)
3332 program_name
[i
] = '\0';
3335 is_strip
= (i
>= 5 && FILENAME_CMP (program_name
+ i
- 5, "strip") == 0);
3339 strip_main (argc
, argv
);
3341 copy_main (argc
, argv
);
3343 END_PROGRESS (program_name
);