1 /* objcopy.c -- copy object file from input to output, optionally massaging it.
2 Copyright (C) 1991-2020 Free Software Foundation, Inc.
4 This file is part of GNU Binutils.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
25 #include "libiberty.h"
28 #include "filenames.h"
31 #include "coff/internal.h"
33 #include "safe-ctype.h"
35 /* FIXME: See bfd/peXXigen.c for why we include an architecture specific
36 header in generic PE code. */
37 #include "coff/i386.h"
40 static bfd_vma pe_file_alignment
= (bfd_vma
) -1;
41 static bfd_vma pe_heap_commit
= (bfd_vma
) -1;
42 static bfd_vma pe_heap_reserve
= (bfd_vma
) -1;
43 static bfd_vma pe_image_base
= (bfd_vma
) -1;
44 static bfd_vma pe_section_alignment
= (bfd_vma
) -1;
45 static bfd_vma pe_stack_commit
= (bfd_vma
) -1;
46 static bfd_vma pe_stack_reserve
= (bfd_vma
) -1;
47 static short pe_subsystem
= -1;
48 static short pe_major_subsystem_version
= -1;
49 static short pe_minor_subsystem_version
= -1;
51 struct is_specified_symbol_predicate_data
57 /* A node includes symbol name mapping to support redefine_sym. */
66 struct addsym_node
*next
;
71 const char * othersym
;
74 typedef struct section_rename
76 const char * old_name
;
77 const char * new_name
;
79 struct section_rename
* next
;
83 /* List of sections to be renamed. */
84 static section_rename
*section_rename_list
;
86 static asymbol
**isympp
= NULL
; /* Input symbols. */
87 static asymbol
**osympp
= NULL
; /* Output symbols that survive stripping. */
89 /* If `copy_byte' >= 0, copy 'copy_width' byte(s) of every `interleave' bytes. */
90 static int copy_byte
= -1;
91 static int interleave
= 0; /* Initialised to 4 in copy_main(). */
92 static int copy_width
= 1;
94 static bfd_boolean verbose
; /* Print file and target names. */
95 static bfd_boolean preserve_dates
; /* Preserve input file timestamp. */
96 static int deterministic
= -1; /* Enable deterministic archives. */
97 static int status
= 0; /* Exit status. */
99 static bfd_boolean merge_notes
= FALSE
; /* Merge note sections. */
101 typedef struct merged_note_section
103 asection
* sec
; /* The section that is being merged. */
104 bfd_byte
* contents
;/* New contents of the section. */
105 bfd_size_type size
; /* New size of the section. */
106 struct merged_note_section
* next
; /* Link to next merged note section. */
107 } merged_note_section
;
112 STRIP_NONE
, /* Don't strip. */
113 STRIP_DEBUG
, /* Strip all debugger symbols. */
114 STRIP_UNNEEDED
, /* Strip unnecessary symbols. */
115 STRIP_NONDEBUG
, /* Strip everything but debug info. */
116 STRIP_DWO
, /* Strip all DWO info. */
117 STRIP_NONDWO
, /* Strip everything but DWO info. */
118 STRIP_ALL
/* Strip all symbols. */
121 /* Which symbols to remove. */
122 static enum strip_action strip_symbols
= STRIP_UNDEF
;
127 LOCALS_START_L
, /* Discard locals starting with L. */
128 LOCALS_ALL
/* Discard all locals. */
131 /* Which local symbols to remove. Overrides STRIP_ALL. */
132 static enum locals_action discard_locals
;
134 /* Structure used to hold lists of sections and actions to take. */
137 struct section_list
* next
; /* Next section to change. */
138 const char * pattern
; /* Section name pattern. */
139 bfd_boolean used
; /* Whether this entry was used. */
141 unsigned int context
; /* What to do with matching sections. */
142 /* Flag bits used in the context field.
143 COPY and REMOVE are mutually exlusive. SET and ALTER are mutually exclusive. */
144 #define SECTION_CONTEXT_REMOVE (1 << 0) /* Remove this section. */
145 #define SECTION_CONTEXT_COPY (1 << 1) /* Copy this section, delete all non-copied section. */
146 #define SECTION_CONTEXT_KEEP (1 << 2) /* Keep this section. */
147 #define SECTION_CONTEXT_SET_VMA (1 << 3) /* Set the sections' VMA address. */
148 #define SECTION_CONTEXT_ALTER_VMA (1 << 4) /* Increment or decrement the section's VMA address. */
149 #define SECTION_CONTEXT_SET_LMA (1 << 5) /* Set the sections' LMA address. */
150 #define SECTION_CONTEXT_ALTER_LMA (1 << 6) /* Increment or decrement the section's LMA address. */
151 #define SECTION_CONTEXT_SET_FLAGS (1 << 7) /* Set the section's flags. */
152 #define SECTION_CONTEXT_REMOVE_RELOCS (1 << 8) /* Remove relocations for this section. */
153 #define SECTION_CONTEXT_SET_ALIGNMENT (1 << 9) /* Set alignment for section. */
155 bfd_vma vma_val
; /* Amount to change by or set to. */
156 bfd_vma lma_val
; /* Amount to change by or set to. */
157 flagword flags
; /* What to set the section flags to. */
158 unsigned int alignment
; /* Alignment of output section. */
161 static struct section_list
*change_sections
;
163 /* TRUE if some sections are to be removed. */
164 static bfd_boolean sections_removed
;
166 /* TRUE if only some sections are to be copied. */
167 static bfd_boolean sections_copied
;
169 /* Changes to the start address. */
170 static bfd_vma change_start
= 0;
171 static bfd_boolean set_start_set
= FALSE
;
172 static bfd_vma set_start
;
174 /* Changes to section addresses. */
175 static bfd_vma change_section_address
= 0;
177 /* Filling gaps between sections. */
178 static bfd_boolean gap_fill_set
= FALSE
;
179 static bfd_byte gap_fill
= 0;
181 /* Pad to a given address. */
182 static bfd_boolean pad_to_set
= FALSE
;
183 static bfd_vma pad_to
;
185 /* Use alternative machine code? */
186 static unsigned long use_alt_mach_code
= 0;
188 /* Output BFD flags user wants to set or clear */
189 static flagword bfd_flags_to_set
;
190 static flagword bfd_flags_to_clear
;
192 /* List of sections to add. */
195 /* Next section to add. */
196 struct section_add
*next
;
197 /* Name of section to add. */
199 /* Name of file holding section contents. */
200 const char *filename
;
203 /* Contents of file. */
205 /* BFD section, after it has been added. */
209 /* List of sections to add to the output BFD. */
210 static struct section_add
*add_sections
;
212 /* List of sections to update in the output BFD. */
213 static struct section_add
*update_sections
;
215 /* List of sections to dump from the output BFD. */
216 static struct section_add
*dump_sections
;
218 /* If non-NULL the argument to --add-gnu-debuglink.
219 This should be the filename to store in the .gnu_debuglink section. */
220 static const char * gnu_debuglink_filename
= NULL
;
222 /* Whether to convert debugging information. */
223 static bfd_boolean convert_debugging
= FALSE
;
225 /* Whether to compress/decompress DWARF debug sections. */
230 compress_zlib
= compress
| 1 << 1,
231 compress_gnu_zlib
= compress
| 1 << 2,
232 compress_gabi_zlib
= compress
| 1 << 3,
234 } do_debug_sections
= nothing
;
236 /* Whether to generate ELF common symbols with the STT_COMMON type. */
237 static enum bfd_link_elf_stt_common do_elf_stt_common
= unchanged
;
239 /* Whether to change the leading character in symbol names. */
240 static bfd_boolean change_leading_char
= FALSE
;
242 /* Whether to remove the leading character from global symbol names. */
243 static bfd_boolean remove_leading_char
= FALSE
;
245 /* Whether to permit wildcard in symbol comparison. */
246 static bfd_boolean wildcard
= FALSE
;
248 /* True if --localize-hidden is in effect. */
249 static bfd_boolean localize_hidden
= FALSE
;
251 /* List of symbols to strip, keep, localize, keep-global, weaken,
253 static htab_t strip_specific_htab
= NULL
;
254 static htab_t strip_unneeded_htab
= NULL
;
255 static htab_t keep_specific_htab
= NULL
;
256 static htab_t localize_specific_htab
= NULL
;
257 static htab_t globalize_specific_htab
= NULL
;
258 static htab_t keepglobal_specific_htab
= NULL
;
259 static htab_t weaken_specific_htab
= NULL
;
260 static htab_t redefine_specific_htab
= NULL
;
261 static htab_t redefine_specific_reverse_htab
= NULL
;
262 static struct addsym_node
*add_sym_list
= NULL
, **add_sym_tail
= &add_sym_list
;
263 static int add_symbols
= 0;
265 static char *strip_specific_buffer
= NULL
;
266 static char *strip_unneeded_buffer
= NULL
;
267 static char *keep_specific_buffer
= NULL
;
268 static char *localize_specific_buffer
= NULL
;
269 static char *globalize_specific_buffer
= NULL
;
270 static char *keepglobal_specific_buffer
= NULL
;
271 static char *weaken_specific_buffer
= NULL
;
273 /* If this is TRUE, we weaken global symbols (set BSF_WEAK). */
274 static bfd_boolean weaken
= FALSE
;
276 /* If this is TRUE, we retain BSF_FILE symbols. */
277 static bfd_boolean keep_file_symbols
= FALSE
;
279 /* Prefix symbols/sections. */
280 static char *prefix_symbols_string
= 0;
281 static char *prefix_sections_string
= 0;
282 static char *prefix_alloc_sections_string
= 0;
284 /* True if --extract-symbol was passed on the command line. */
285 static bfd_boolean extract_symbol
= FALSE
;
287 /* If `reverse_bytes' is nonzero, then reverse the order of every chunk
288 of <reverse_bytes> bytes within each output section. */
289 static int reverse_bytes
= 0;
291 /* For Coff objects, we may want to allow or disallow long section names,
292 or preserve them where found in the inputs. Debug info relies on them. */
293 enum long_section_name_handling
300 /* The default long section handling mode is to preserve them.
301 This is also the only behaviour for 'strip'. */
302 static enum long_section_name_handling long_section_names
= KEEP
;
304 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
305 enum command_line_switch
307 OPTION_ADD_SECTION
=150,
308 OPTION_ADD_GNU_DEBUGLINK
,
310 OPTION_ALT_MACH_CODE
,
311 OPTION_CHANGE_ADDRESSES
,
312 OPTION_CHANGE_LEADING_CHAR
,
313 OPTION_CHANGE_SECTION_ADDRESS
,
314 OPTION_CHANGE_SECTION_LMA
,
315 OPTION_CHANGE_SECTION_VMA
,
317 OPTION_CHANGE_WARNINGS
,
318 OPTION_COMPRESS_DEBUG_SECTIONS
,
320 OPTION_DECOMPRESS_DEBUG_SECTIONS
,
322 OPTION_ELF_STT_COMMON
,
324 OPTION_EXTRACT_SYMBOL
,
325 OPTION_FILE_ALIGNMENT
,
328 OPTION_GLOBALIZE_SYMBOL
,
329 OPTION_GLOBALIZE_SYMBOLS
,
333 OPTION_INTERLEAVE_WIDTH
,
334 OPTION_KEEPGLOBAL_SYMBOLS
,
335 OPTION_KEEP_FILE_SYMBOLS
,
338 OPTION_LOCALIZE_HIDDEN
,
339 OPTION_LOCALIZE_SYMBOLS
,
340 OPTION_LONG_SECTION_NAMES
,
342 OPTION_NO_MERGE_NOTES
,
343 OPTION_NO_CHANGE_WARNINGS
,
344 OPTION_ONLY_KEEP_DEBUG
,
346 OPTION_PREFIX_ALLOC_SECTIONS
,
347 OPTION_PREFIX_SECTIONS
,
348 OPTION_PREFIX_SYMBOLS
,
350 OPTION_READONLY_TEXT
,
352 OPTION_REDEFINE_SYMS
,
353 OPTION_REMOVE_LEADING_CHAR
,
354 OPTION_REMOVE_RELOCS
,
355 OPTION_RENAME_SECTION
,
356 OPTION_REVERSE_BYTES
,
357 OPTION_PE_SECTION_ALIGNMENT
,
358 OPTION_SET_SECTION_FLAGS
,
359 OPTION_SET_SECTION_ALIGNMENT
,
365 OPTION_STRIP_SYMBOLS
,
366 OPTION_STRIP_UNNEEDED
,
367 OPTION_STRIP_UNNEEDED_SYMBOL
,
368 OPTION_STRIP_UNNEEDED_SYMBOLS
,
370 OPTION_UPDATE_SECTION
,
371 OPTION_VERILOG_DATA_WIDTH
,
373 OPTION_WEAKEN_SYMBOLS
,
377 /* Options to handle if running as "strip". */
379 static struct option strip_options
[] =
381 {"disable-deterministic-archives", no_argument
, 0, 'U'},
382 {"discard-all", no_argument
, 0, 'x'},
383 {"discard-locals", no_argument
, 0, 'X'},
384 {"enable-deterministic-archives", no_argument
, 0, 'D'},
385 {"format", required_argument
, 0, 'F'}, /* Obsolete */
386 {"help", no_argument
, 0, 'h'},
387 {"info", no_argument
, 0, OPTION_FORMATS_INFO
},
388 {"input-format", required_argument
, 0, 'I'}, /* Obsolete */
389 {"input-target", required_argument
, 0, 'I'},
390 {"keep-file-symbols", no_argument
, 0, OPTION_KEEP_FILE_SYMBOLS
},
391 {"keep-section", required_argument
, 0, OPTION_KEEP_SECTION
},
392 {"keep-symbol", required_argument
, 0, 'K'},
393 {"merge-notes", no_argument
, 0, 'M'},
394 {"no-merge-notes", no_argument
, 0, OPTION_NO_MERGE_NOTES
},
395 {"only-keep-debug", no_argument
, 0, OPTION_ONLY_KEEP_DEBUG
},
396 {"output-file", required_argument
, 0, 'o'},
397 {"output-format", required_argument
, 0, 'O'}, /* Obsolete */
398 {"output-target", required_argument
, 0, 'O'},
399 {"preserve-dates", no_argument
, 0, 'p'},
400 {"remove-section", required_argument
, 0, 'R'},
401 {"remove-relocations", required_argument
, 0, OPTION_REMOVE_RELOCS
},
402 {"strip-all", no_argument
, 0, 's'},
403 {"strip-debug", no_argument
, 0, 'S'},
404 {"strip-dwo", no_argument
, 0, OPTION_STRIP_DWO
},
405 {"strip-symbol", required_argument
, 0, 'N'},
406 {"strip-unneeded", no_argument
, 0, OPTION_STRIP_UNNEEDED
},
407 {"target", required_argument
, 0, 'F'},
408 {"verbose", no_argument
, 0, 'v'},
409 {"version", no_argument
, 0, 'V'},
410 {"wildcard", no_argument
, 0, 'w'},
411 {0, no_argument
, 0, 0}
414 /* Options to handle if running as "objcopy". */
416 static struct option copy_options
[] =
418 {"add-gnu-debuglink", required_argument
, 0, OPTION_ADD_GNU_DEBUGLINK
},
419 {"add-section", required_argument
, 0, OPTION_ADD_SECTION
},
420 {"add-symbol", required_argument
, 0, OPTION_ADD_SYMBOL
},
421 {"adjust-section-vma", required_argument
, 0, OPTION_CHANGE_SECTION_ADDRESS
},
422 {"adjust-start", required_argument
, 0, OPTION_CHANGE_START
},
423 {"adjust-vma", required_argument
, 0, OPTION_CHANGE_ADDRESSES
},
424 {"adjust-warnings", no_argument
, 0, OPTION_CHANGE_WARNINGS
},
425 {"alt-machine-code", required_argument
, 0, OPTION_ALT_MACH_CODE
},
426 {"binary-architecture", required_argument
, 0, 'B'},
427 {"byte", required_argument
, 0, 'b'},
428 {"change-addresses", required_argument
, 0, OPTION_CHANGE_ADDRESSES
},
429 {"change-leading-char", no_argument
, 0, OPTION_CHANGE_LEADING_CHAR
},
430 {"change-section-address", required_argument
, 0, OPTION_CHANGE_SECTION_ADDRESS
},
431 {"change-section-lma", required_argument
, 0, OPTION_CHANGE_SECTION_LMA
},
432 {"change-section-vma", required_argument
, 0, OPTION_CHANGE_SECTION_VMA
},
433 {"change-start", required_argument
, 0, OPTION_CHANGE_START
},
434 {"change-warnings", no_argument
, 0, OPTION_CHANGE_WARNINGS
},
435 {"compress-debug-sections", optional_argument
, 0, OPTION_COMPRESS_DEBUG_SECTIONS
},
436 {"debugging", no_argument
, 0, OPTION_DEBUGGING
},
437 {"decompress-debug-sections", no_argument
, 0, OPTION_DECOMPRESS_DEBUG_SECTIONS
},
438 {"disable-deterministic-archives", no_argument
, 0, 'U'},
439 {"discard-all", no_argument
, 0, 'x'},
440 {"discard-locals", no_argument
, 0, 'X'},
441 {"dump-section", required_argument
, 0, OPTION_DUMP_SECTION
},
442 {"elf-stt-common", required_argument
, 0, OPTION_ELF_STT_COMMON
},
443 {"enable-deterministic-archives", no_argument
, 0, 'D'},
444 {"extract-dwo", no_argument
, 0, OPTION_EXTRACT_DWO
},
445 {"extract-symbol", no_argument
, 0, OPTION_EXTRACT_SYMBOL
},
446 {"file-alignment", required_argument
, 0, OPTION_FILE_ALIGNMENT
},
447 {"format", required_argument
, 0, 'F'}, /* Obsolete */
448 {"gap-fill", required_argument
, 0, OPTION_GAP_FILL
},
449 {"globalize-symbol", required_argument
, 0, OPTION_GLOBALIZE_SYMBOL
},
450 {"globalize-symbols", required_argument
, 0, OPTION_GLOBALIZE_SYMBOLS
},
451 {"heap", required_argument
, 0, OPTION_HEAP
},
452 {"help", no_argument
, 0, 'h'},
453 {"image-base", required_argument
, 0 , OPTION_IMAGE_BASE
},
454 {"impure", no_argument
, 0, OPTION_IMPURE
},
455 {"info", no_argument
, 0, OPTION_FORMATS_INFO
},
456 {"input-format", required_argument
, 0, 'I'}, /* Obsolete */
457 {"input-target", required_argument
, 0, 'I'},
458 {"interleave", optional_argument
, 0, 'i'},
459 {"interleave-width", required_argument
, 0, OPTION_INTERLEAVE_WIDTH
},
460 {"keep-file-symbols", no_argument
, 0, OPTION_KEEP_FILE_SYMBOLS
},
461 {"keep-global-symbol", required_argument
, 0, 'G'},
462 {"keep-global-symbols", required_argument
, 0, OPTION_KEEPGLOBAL_SYMBOLS
},
463 {"keep-section", required_argument
, 0, OPTION_KEEP_SECTION
},
464 {"keep-symbol", required_argument
, 0, 'K'},
465 {"keep-symbols", required_argument
, 0, OPTION_KEEP_SYMBOLS
},
466 {"localize-hidden", no_argument
, 0, OPTION_LOCALIZE_HIDDEN
},
467 {"localize-symbol", required_argument
, 0, 'L'},
468 {"localize-symbols", required_argument
, 0, OPTION_LOCALIZE_SYMBOLS
},
469 {"long-section-names", required_argument
, 0, OPTION_LONG_SECTION_NAMES
},
470 {"merge-notes", no_argument
, 0, 'M'},
471 {"no-merge-notes", no_argument
, 0, OPTION_NO_MERGE_NOTES
},
472 {"no-adjust-warnings", no_argument
, 0, OPTION_NO_CHANGE_WARNINGS
},
473 {"no-change-warnings", no_argument
, 0, OPTION_NO_CHANGE_WARNINGS
},
474 {"only-keep-debug", no_argument
, 0, OPTION_ONLY_KEEP_DEBUG
},
475 {"only-section", required_argument
, 0, 'j'},
476 {"output-format", required_argument
, 0, 'O'}, /* Obsolete */
477 {"output-target", required_argument
, 0, 'O'},
478 {"pad-to", required_argument
, 0, OPTION_PAD_TO
},
479 {"prefix-alloc-sections", required_argument
, 0, OPTION_PREFIX_ALLOC_SECTIONS
},
480 {"prefix-sections", required_argument
, 0, OPTION_PREFIX_SECTIONS
},
481 {"prefix-symbols", required_argument
, 0, OPTION_PREFIX_SYMBOLS
},
482 {"preserve-dates", no_argument
, 0, 'p'},
483 {"pure", no_argument
, 0, OPTION_PURE
},
484 {"readonly-text", no_argument
, 0, OPTION_READONLY_TEXT
},
485 {"redefine-sym", required_argument
, 0, OPTION_REDEFINE_SYM
},
486 {"redefine-syms", required_argument
, 0, OPTION_REDEFINE_SYMS
},
487 {"remove-leading-char", no_argument
, 0, OPTION_REMOVE_LEADING_CHAR
},
488 {"remove-section", required_argument
, 0, 'R'},
489 {"remove-relocations", required_argument
, 0, OPTION_REMOVE_RELOCS
},
490 {"rename-section", required_argument
, 0, OPTION_RENAME_SECTION
},
491 {"reverse-bytes", required_argument
, 0, OPTION_REVERSE_BYTES
},
492 {"section-alignment", required_argument
, 0, OPTION_PE_SECTION_ALIGNMENT
},
493 {"set-section-flags", required_argument
, 0, OPTION_SET_SECTION_FLAGS
},
494 {"set-section-alignment", required_argument
, 0, OPTION_SET_SECTION_ALIGNMENT
},
495 {"set-start", required_argument
, 0, OPTION_SET_START
},
496 {"srec-forceS3", no_argument
, 0, OPTION_SREC_FORCES3
},
497 {"srec-len", required_argument
, 0, OPTION_SREC_LEN
},
498 {"stack", required_argument
, 0, OPTION_STACK
},
499 {"strip-all", no_argument
, 0, 'S'},
500 {"strip-debug", no_argument
, 0, 'g'},
501 {"strip-dwo", no_argument
, 0, OPTION_STRIP_DWO
},
502 {"strip-symbol", required_argument
, 0, 'N'},
503 {"strip-symbols", required_argument
, 0, OPTION_STRIP_SYMBOLS
},
504 {"strip-unneeded", no_argument
, 0, OPTION_STRIP_UNNEEDED
},
505 {"strip-unneeded-symbol", required_argument
, 0, OPTION_STRIP_UNNEEDED_SYMBOL
},
506 {"strip-unneeded-symbols", required_argument
, 0, OPTION_STRIP_UNNEEDED_SYMBOLS
},
507 {"subsystem", required_argument
, 0, OPTION_SUBSYSTEM
},
508 {"target", required_argument
, 0, 'F'},
509 {"update-section", required_argument
, 0, OPTION_UPDATE_SECTION
},
510 {"verbose", no_argument
, 0, 'v'},
511 {"verilog-data-width", required_argument
, 0, OPTION_VERILOG_DATA_WIDTH
},
512 {"version", no_argument
, 0, 'V'},
513 {"weaken", no_argument
, 0, OPTION_WEAKEN
},
514 {"weaken-symbol", required_argument
, 0, 'W'},
515 {"weaken-symbols", required_argument
, 0, OPTION_WEAKEN_SYMBOLS
},
516 {"wildcard", no_argument
, 0, 'w'},
517 {"writable-text", no_argument
, 0, OPTION_WRITABLE_TEXT
},
518 {0, no_argument
, 0, 0}
522 extern char *program_name
;
524 /* This flag distinguishes between strip and objcopy:
525 1 means this is 'strip'; 0 means this is 'objcopy'.
526 -1 means if we should use argv[0] to decide. */
529 /* The maximum length of an S record. This variable is defined in srec.c
530 and can be modified by the --srec-len parameter. */
531 extern unsigned int _bfd_srec_len
;
533 /* Restrict the generation of Srecords to type S3 only.
534 This variable is defined in bfd/srec.c and can be toggled
535 on by the --srec-forceS3 command line switch. */
536 extern bfd_boolean _bfd_srec_forceS3
;
538 /* Width of data in bytes for verilog output.
539 This variable is declared in bfd/verilog.c and can be modified by
540 the --verilog-data-width parameter. */
541 extern unsigned int VerilogDataWidth
;
543 /* Forward declarations. */
544 static void setup_section (bfd
*, asection
*, void *);
545 static void setup_bfd_headers (bfd
*, bfd
*);
546 static void copy_relocations_in_section (bfd
*, asection
*, void *);
547 static void copy_section (bfd
*, asection
*, void *);
548 static void get_sections (bfd
*, asection
*, void *);
549 static int compare_section_lma (const void *, const void *);
550 static void mark_symbols_used_in_relocations (bfd
*, asection
*, void *);
551 static bfd_boolean
write_debugging_info (bfd
*, void *, long *, asymbol
***);
552 static const char *lookup_sym_redefinition (const char *);
553 static const char *find_section_rename (const char *, flagword
*);
555 ATTRIBUTE_NORETURN
static void
556 copy_usage (FILE *stream
, int exit_status
)
558 fprintf (stream
, _("Usage: %s [option(s)] in-file [out-file]\n"), program_name
);
559 fprintf (stream
, _(" Copies a binary file, possibly transforming it in the process\n"));
560 fprintf (stream
, _(" The options are:\n"));
561 fprintf (stream
, _("\
562 -I --input-target <bfdname> Assume input file is in format <bfdname>\n\
563 -O --output-target <bfdname> Create an output file in format <bfdname>\n\
564 -B --binary-architecture <arch> Set output arch, when input is arch-less\n\
565 -F --target <bfdname> Set both input and output format to <bfdname>\n\
566 --debugging Convert debugging information, if possible\n\
567 -p --preserve-dates Copy modified/access timestamps to the output\n"));
568 if (DEFAULT_AR_DETERMINISTIC
)
569 fprintf (stream
, _("\
570 -D --enable-deterministic-archives\n\
571 Produce deterministic output when stripping archives (default)\n\
572 -U --disable-deterministic-archives\n\
573 Disable -D behavior\n"));
575 fprintf (stream
, _("\
576 -D --enable-deterministic-archives\n\
577 Produce deterministic output when stripping archives\n\
578 -U --disable-deterministic-archives\n\
579 Disable -D behavior (default)\n"));
580 fprintf (stream
, _("\
581 -j --only-section <name> Only copy section <name> into the output\n\
582 --add-gnu-debuglink=<file> Add section .gnu_debuglink linking to <file>\n\
583 -R --remove-section <name> Remove section <name> from the output\n\
584 --remove-relocations <name> Remove relocations from section <name>\n\
585 -S --strip-all Remove all symbol and relocation information\n\
586 -g --strip-debug Remove all debugging symbols & sections\n\
587 --strip-dwo Remove all DWO sections\n\
588 --strip-unneeded Remove all symbols not needed by relocations\n\
589 -N --strip-symbol <name> Do not copy symbol <name>\n\
590 --strip-unneeded-symbol <name>\n\
591 Do not copy symbol <name> unless needed by\n\
593 --only-keep-debug Strip everything but the debug information\n\
594 --extract-dwo Copy only DWO sections\n\
595 --extract-symbol Remove section contents but keep symbols\n\
596 --keep-section <name> Do not strip section <name>\n\
597 -K --keep-symbol <name> Do not strip symbol <name>\n\
598 --keep-file-symbols Do not strip file symbol(s)\n\
599 --localize-hidden Turn all ELF hidden symbols into locals\n\
600 -L --localize-symbol <name> Force symbol <name> to be marked as a local\n\
601 --globalize-symbol <name> Force symbol <name> to be marked as a global\n\
602 -G --keep-global-symbol <name> Localize all symbols except <name>\n\
603 -W --weaken-symbol <name> Force symbol <name> to be marked as a weak\n\
604 --weaken Force all global symbols to be marked as weak\n\
605 -w --wildcard Permit wildcard in symbol comparison\n\
606 -x --discard-all Remove all non-global symbols\n\
607 -X --discard-locals Remove any compiler-generated symbols\n\
608 -i --interleave[=<number>] Only copy N out of every <number> bytes\n\
609 --interleave-width <number> Set N for --interleave\n\
610 -b --byte <num> Select byte <num> in every interleaved block\n\
611 --gap-fill <val> Fill gaps between sections with <val>\n\
612 --pad-to <addr> Pad the last section up to address <addr>\n\
613 --set-start <addr> Set the start address to <addr>\n\
614 {--change-start|--adjust-start} <incr>\n\
615 Add <incr> to the start address\n\
616 {--change-addresses|--adjust-vma} <incr>\n\
617 Add <incr> to LMA, VMA and start addresses\n\
618 {--change-section-address|--adjust-section-vma} <name>{=|+|-}<val>\n\
619 Change LMA and VMA of section <name> by <val>\n\
620 --change-section-lma <name>{=|+|-}<val>\n\
621 Change the LMA of section <name> by <val>\n\
622 --change-section-vma <name>{=|+|-}<val>\n\
623 Change the VMA of section <name> by <val>\n\
624 {--[no-]change-warnings|--[no-]adjust-warnings}\n\
625 Warn if a named section does not exist\n\
626 --set-section-flags <name>=<flags>\n\
627 Set section <name>'s properties to <flags>\n\
628 --set-section-alignment <name>=<align>\n\
629 Set section <name>'s alignment to <align> bytes\n\
630 --add-section <name>=<file> Add section <name> found in <file> to output\n\
631 --update-section <name>=<file>\n\
632 Update contents of section <name> with\n\
633 contents found in <file>\n\
634 --dump-section <name>=<file> Dump the contents of section <name> into <file>\n\
635 --rename-section <old>=<new>[,<flags>] Rename section <old> to <new>\n\
636 --long-section-names {enable|disable|keep}\n\
637 Handle long section names in Coff objects.\n\
638 --change-leading-char Force output format's leading character style\n\
639 --remove-leading-char Remove leading character from global symbols\n\
640 --reverse-bytes=<num> Reverse <num> bytes at a time, in output sections with content\n\
641 --redefine-sym <old>=<new> Redefine symbol name <old> to <new>\n\
642 --redefine-syms <file> --redefine-sym for all symbol pairs \n\
644 --srec-len <number> Restrict the length of generated Srecords\n\
645 --srec-forceS3 Restrict the type of generated Srecords to S3\n\
646 --strip-symbols <file> -N for all symbols listed in <file>\n\
647 --strip-unneeded-symbols <file>\n\
648 --strip-unneeded-symbol for all symbols listed\n\
650 --keep-symbols <file> -K for all symbols listed in <file>\n\
651 --localize-symbols <file> -L for all symbols listed in <file>\n\
652 --globalize-symbols <file> --globalize-symbol for all in <file>\n\
653 --keep-global-symbols <file> -G for all symbols listed in <file>\n\
654 --weaken-symbols <file> -W for all symbols listed in <file>\n\
655 --add-symbol <name>=[<section>:]<value>[,<flags>] Add a symbol\n\
656 --alt-machine-code <index> Use the target's <index>'th alternative machine\n\
657 --writable-text Mark the output text as writable\n\
658 --readonly-text Make the output text write protected\n\
659 --pure Mark the output file as demand paged\n\
660 --impure Mark the output file as impure\n\
661 --prefix-symbols <prefix> Add <prefix> to start of every symbol name\n\
662 --prefix-sections <prefix> Add <prefix> to start of every section name\n\
663 --prefix-alloc-sections <prefix>\n\
664 Add <prefix> to start of every allocatable\n\
666 --file-alignment <num> Set PE file alignment to <num>\n\
667 --heap <reserve>[,<commit>] Set PE reserve/commit heap to <reserve>/\n\
669 --image-base <address> Set PE image base to <address>\n\
670 --section-alignment <num> Set PE section alignment to <num>\n\
671 --stack <reserve>[,<commit>] Set PE reserve/commit stack to <reserve>/\n\
673 --subsystem <name>[:<version>]\n\
674 Set PE subsystem to <name> [& <version>]\n\
675 --compress-debug-sections[={none|zlib|zlib-gnu|zlib-gabi}]\n\
676 Compress DWARF debug sections using zlib\n\
677 --decompress-debug-sections Decompress DWARF debug sections using zlib\n\
678 --elf-stt-common=[yes|no] Generate ELF common symbols with STT_COMMON\n\
680 --verilog-data-width <number> Specifies data width, in bytes, for verilog output\n\
681 -M --merge-notes Remove redundant entries in note sections\n\
682 --no-merge-notes Do not attempt to remove redundant notes (default)\n\
683 -v --verbose List all object files modified\n\
684 @<file> Read options from <file>\n\
685 -V --version Display this program's version number\n\
686 -h --help Display this output\n\
687 --info List object formats & architectures supported\n\
689 list_supported_targets (program_name
, stream
);
690 if (REPORT_BUGS_TO
[0] && exit_status
== 0)
691 fprintf (stream
, _("Report bugs to %s\n"), REPORT_BUGS_TO
);
695 ATTRIBUTE_NORETURN
static void
696 strip_usage (FILE *stream
, int exit_status
)
698 fprintf (stream
, _("Usage: %s <option(s)> in-file(s)\n"), program_name
);
699 fprintf (stream
, _(" Removes symbols and sections from files\n"));
700 fprintf (stream
, _(" The options are:\n"));
701 fprintf (stream
, _("\
702 -I --input-target=<bfdname> Assume input file is in format <bfdname>\n\
703 -O --output-target=<bfdname> Create an output file in format <bfdname>\n\
704 -F --target=<bfdname> Set both input and output format to <bfdname>\n\
705 -p --preserve-dates Copy modified/access timestamps to the output\n\
707 if (DEFAULT_AR_DETERMINISTIC
)
708 fprintf (stream
, _("\
709 -D --enable-deterministic-archives\n\
710 Produce deterministic output when stripping archives (default)\n\
711 -U --disable-deterministic-archives\n\
712 Disable -D behavior\n"));
714 fprintf (stream
, _("\
715 -D --enable-deterministic-archives\n\
716 Produce deterministic output when stripping archives\n\
717 -U --disable-deterministic-archives\n\
718 Disable -D behavior (default)\n"));
719 fprintf (stream
, _("\
720 -R --remove-section=<name> Also remove section <name> from the output\n\
721 --remove-relocations <name> Remove relocations from section <name>\n\
722 -s --strip-all Remove all symbol and relocation information\n\
723 -g -S -d --strip-debug Remove all debugging symbols & sections\n\
724 --strip-dwo Remove all DWO sections\n\
725 --strip-unneeded Remove all symbols not needed by relocations\n\
726 --only-keep-debug Strip everything but the debug information\n\
727 -M --merge-notes Remove redundant entries in note sections (default)\n\
728 --no-merge-notes Do not attempt to remove redundant notes\n\
729 -N --strip-symbol=<name> Do not copy symbol <name>\n\
730 --keep-section=<name> Do not strip section <name>\n\
731 -K --keep-symbol=<name> Do not strip symbol <name>\n\
732 --keep-file-symbols Do not strip file symbol(s)\n\
733 -w --wildcard Permit wildcard in symbol comparison\n\
734 -x --discard-all Remove all non-global symbols\n\
735 -X --discard-locals Remove any compiler-generated symbols\n\
736 -v --verbose List all object files modified\n\
737 -V --version Display this program's version number\n\
738 -h --help Display this output\n\
739 --info List object formats & architectures supported\n\
740 -o <file> Place stripped output into <file>\n\
743 list_supported_targets (program_name
, stream
);
744 if (REPORT_BUGS_TO
[0] && exit_status
== 0)
745 fprintf (stream
, _("Report bugs to %s\n"), REPORT_BUGS_TO
);
749 /* Parse section flags into a flagword, with a fatal error if the
750 string can't be parsed. */
753 parse_flags (const char *s
)
763 snext
= strchr (s
, ',');
773 #define PARSE_FLAG(fname,fval) \
774 else if (strncasecmp (fname, s, len) == 0) ret |= fval
775 PARSE_FLAG ("alloc", SEC_ALLOC
);
776 PARSE_FLAG ("load", SEC_LOAD
);
777 PARSE_FLAG ("noload", SEC_NEVER_LOAD
);
778 PARSE_FLAG ("readonly", SEC_READONLY
);
779 PARSE_FLAG ("debug", SEC_DEBUGGING
);
780 PARSE_FLAG ("code", SEC_CODE
);
781 PARSE_FLAG ("data", SEC_DATA
);
782 PARSE_FLAG ("rom", SEC_ROM
);
783 PARSE_FLAG ("share", SEC_COFF_SHARED
);
784 PARSE_FLAG ("contents", SEC_HAS_CONTENTS
);
785 PARSE_FLAG ("merge", SEC_MERGE
);
786 PARSE_FLAG ("strings", SEC_STRINGS
);
792 copy
= (char *) xmalloc (len
+ 1);
793 strncpy (copy
, s
, len
);
795 non_fatal (_("unrecognized section flag `%s'"), copy
);
796 fatal (_("supported flags: %s"),
797 "alloc, load, noload, readonly, debug, code, data, rom, share, contents, merge, strings");
807 /* Parse symbol flags into a flagword, with a fatal error if the
808 string can't be parsed. */
811 parse_symflags (const char *s
, const char **other
)
821 snext
= strchr (s
, ',');
830 #define PARSE_FLAG(fname, fval) \
831 else if (len == sizeof fname - 1 \
832 && strncasecmp (fname, s, len) == 0) \
835 #define PARSE_OTHER(fname, fval) \
836 else if (len >= sizeof fname \
837 && strncasecmp (fname, s, sizeof fname - 1) == 0) \
838 fval = xstrndup (s + sizeof fname - 1, len - sizeof fname + 1)
841 PARSE_FLAG ("local", BSF_LOCAL
);
842 PARSE_FLAG ("global", BSF_GLOBAL
);
843 PARSE_FLAG ("export", BSF_EXPORT
);
844 PARSE_FLAG ("debug", BSF_DEBUGGING
);
845 PARSE_FLAG ("function", BSF_FUNCTION
);
846 PARSE_FLAG ("weak", BSF_WEAK
);
847 PARSE_FLAG ("section", BSF_SECTION_SYM
);
848 PARSE_FLAG ("constructor", BSF_CONSTRUCTOR
);
849 PARSE_FLAG ("warning", BSF_WARNING
);
850 PARSE_FLAG ("indirect", BSF_INDIRECT
);
851 PARSE_FLAG ("file", BSF_FILE
);
852 PARSE_FLAG ("object", BSF_OBJECT
);
853 PARSE_FLAG ("synthetic", BSF_SYNTHETIC
);
854 PARSE_FLAG ("indirect-function", BSF_GNU_INDIRECT_FUNCTION
| BSF_FUNCTION
);
855 PARSE_FLAG ("unique-object", BSF_GNU_UNIQUE
| BSF_OBJECT
);
856 PARSE_OTHER ("before=", *other
);
864 copy
= (char *) xmalloc (len
+ 1);
865 strncpy (copy
, s
, len
);
867 non_fatal (_("unrecognized symbol flag `%s'"), copy
);
868 fatal (_("supported flags: %s"),
869 "local, global, export, debug, function, weak, section, "
870 "constructor, warning, indirect, file, object, synthetic, "
871 "indirect-function, unique-object, before=<othersym>");
881 /* Find and optionally add an entry in the change_sections list.
883 We need to be careful in how we match section names because of the support
884 for wildcard characters. For example suppose that the user has invoked
887 --set-section-flags .debug_*=debug
888 --set-section-flags .debug_str=readonly,debug
889 --change-section-address .debug_*ranges=0x1000
891 With the idea that all debug sections will receive the DEBUG flag, the
892 .debug_str section will also receive the READONLY flag and the
893 .debug_ranges and .debug_aranges sections will have their address set to
894 0x1000. (This may not make much sense, but it is just an example).
896 When adding the section name patterns to the section list we need to make
897 sure that previous entries do not match with the new entry, unless the
898 match is exact. (In which case we assume that the user is overriding
899 the previous entry with the new context).
901 When matching real section names to the section list we make use of the
902 wildcard characters, but we must do so in context. Eg if we are setting
903 section addresses then we match for .debug_ranges but not for .debug_info.
905 Finally, if ADD is false and we do find a match, we mark the section list
908 static struct section_list
*
909 find_section_list (const char *name
, bfd_boolean add
, unsigned int context
)
911 struct section_list
*p
, *match
= NULL
;
913 /* assert ((context & ((1 << 7) - 1)) != 0); */
915 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
919 if (strcmp (p
->pattern
, name
) == 0)
921 /* Check for context conflicts. */
922 if (((p
->context
& SECTION_CONTEXT_REMOVE
)
923 && (context
& SECTION_CONTEXT_COPY
))
924 || ((context
& SECTION_CONTEXT_REMOVE
)
925 && (p
->context
& SECTION_CONTEXT_COPY
)))
926 fatal (_("error: %s both copied and removed"), name
);
928 if (((p
->context
& SECTION_CONTEXT_SET_VMA
)
929 && (context
& SECTION_CONTEXT_ALTER_VMA
))
930 || ((context
& SECTION_CONTEXT_SET_VMA
)
931 && (context
& SECTION_CONTEXT_ALTER_VMA
)))
932 fatal (_("error: %s both sets and alters VMA"), name
);
934 if (((p
->context
& SECTION_CONTEXT_SET_LMA
)
935 && (context
& SECTION_CONTEXT_ALTER_LMA
))
936 || ((context
& SECTION_CONTEXT_SET_LMA
)
937 && (context
& SECTION_CONTEXT_ALTER_LMA
)))
938 fatal (_("error: %s both sets and alters LMA"), name
);
940 /* Extend the context. */
941 p
->context
|= context
;
945 /* If we are not adding a new name/pattern then
946 only check for a match if the context applies. */
947 else if (p
->context
& context
)
949 /* We could check for the presence of wildchar characters
950 first and choose between calling strcmp and fnmatch,
951 but is that really worth it ? */
952 if (p
->pattern
[0] == '!')
954 if (fnmatch (p
->pattern
+ 1, name
, 0) == 0)
962 if (fnmatch (p
->pattern
, name
, 0) == 0)
978 p
= (struct section_list
*) xmalloc (sizeof (struct section_list
));
981 p
->context
= context
;
986 p
->next
= change_sections
;
992 /* S1 is the entry node already in the table, S2 is the key node. */
995 eq_string_redefnode (const void *s1
, const void *s2
)
997 struct redefine_node
*node1
= (struct redefine_node
*) s1
;
998 struct redefine_node
*node2
= (struct redefine_node
*) s2
;
999 return !strcmp ((const char *) node1
->source
, (const char *) node2
->source
);
1002 /* P is redefine node. Hash value is generated from its "source" filed. */
1005 htab_hash_redefnode (const void *p
)
1007 struct redefine_node
*redefnode
= (struct redefine_node
*) p
;
1008 return htab_hash_string (redefnode
->source
);
1011 /* Create hashtab used for redefine node. */
1014 create_symbol2redef_htab (void)
1016 return htab_create_alloc (16, htab_hash_redefnode
, eq_string_redefnode
, NULL
,
1020 /* There is htab_hash_string but no htab_eq_string. Makes sense. */
1023 eq_string (const void *s1
, const void *s2
)
1025 return strcmp ((const char *) s1
, (const char *) s2
) == 0;
1029 create_symbol_htab (void)
1031 return htab_create_alloc (16, htab_hash_string
, eq_string
, NULL
, xcalloc
, free
);
1035 create_symbol_htabs (void)
1037 strip_specific_htab
= create_symbol_htab ();
1038 strip_unneeded_htab
= create_symbol_htab ();
1039 keep_specific_htab
= create_symbol_htab ();
1040 localize_specific_htab
= create_symbol_htab ();
1041 globalize_specific_htab
= create_symbol_htab ();
1042 keepglobal_specific_htab
= create_symbol_htab ();
1043 weaken_specific_htab
= create_symbol_htab ();
1044 redefine_specific_htab
= create_symbol2redef_htab ();
1045 /* As there is no bidirectional hash table in libiberty, need a reverse table
1046 to check duplicated target string. */
1047 redefine_specific_reverse_htab
= create_symbol_htab ();
1050 /* Add a symbol to strip_specific_list. */
1053 add_specific_symbol (const char *name
, htab_t htab
)
1055 *htab_find_slot (htab
, name
, INSERT
) = (char *) name
;
1058 /* Like add_specific_symbol, but the element type is void *. */
1061 add_specific_symbol_node (const void *node
, htab_t htab
)
1063 *htab_find_slot (htab
, node
, INSERT
) = (void *) node
;
1066 /* Add symbols listed in `filename' to strip_specific_list. */
1068 #define IS_WHITESPACE(c) ((c) == ' ' || (c) == '\t')
1069 #define IS_LINE_TERMINATOR(c) ((c) == '\n' || (c) == '\r' || (c) == '\0')
1072 add_specific_symbols (const char *filename
, htab_t htab
, char **buffer_p
)
1078 unsigned int line_count
;
1080 size
= get_file_size (filename
);
1087 buffer
= (char *) xmalloc (size
+ 2);
1088 f
= fopen (filename
, FOPEN_RT
);
1090 fatal (_("cannot open '%s': %s"), filename
, strerror (errno
));
1092 if (fread (buffer
, 1, size
, f
) == 0 || ferror (f
))
1093 fatal (_("%s: fread failed"), filename
);
1096 buffer
[size
] = '\n';
1097 buffer
[size
+ 1] = '\0';
1101 for (line
= buffer
; * line
!= '\0'; line
++)
1106 int finished
= FALSE
;
1108 for (eol
= line
;; eol
++)
1114 /* Cope with \n\r. */
1122 /* Cope with \r\n. */
1133 /* Line comment, Terminate the line here, in case a
1134 name is present and then allow the rest of the
1135 loop to find the real end of the line. */
1147 /* A name may now exist somewhere between 'line' and 'eol'.
1148 Strip off leading whitespace and trailing whitespace,
1149 then add it to the list. */
1150 for (name
= line
; IS_WHITESPACE (* name
); name
++)
1152 for (name_end
= name
;
1153 (! IS_WHITESPACE (* name_end
))
1154 && (! IS_LINE_TERMINATOR (* name_end
));
1158 if (! IS_LINE_TERMINATOR (* name_end
))
1162 for (extra
= name_end
+ 1; IS_WHITESPACE (* extra
); extra
++)
1165 if (! IS_LINE_TERMINATOR (* extra
))
1166 non_fatal (_("%s:%d: Ignoring rubbish found on this line"),
1167 filename
, line_count
);
1172 if (name_end
> name
)
1173 add_specific_symbol (name
, htab
);
1175 /* Advance line pointer to end of line. The 'eol ++' in the for
1176 loop above will then advance us to the start of the next line. */
1181 /* Do not free the buffer. Parts of it will have been referenced
1182 in the calls to add_specific_symbol. */
1186 /* See whether a symbol should be stripped or kept
1187 based on strip_specific_list and keep_symbols. */
1190 is_specified_symbol_predicate (void **slot
, void *data
)
1192 struct is_specified_symbol_predicate_data
*d
=
1193 (struct is_specified_symbol_predicate_data
*) data
;
1194 const char *slot_name
= (char *) *slot
;
1196 if (*slot_name
!= '!')
1198 if (! fnmatch (slot_name
, d
->name
, 0))
1201 /* Continue traversal, there might be a non-match rule. */
1207 if (! fnmatch (slot_name
+ 1, d
->name
, 0))
1210 /* Stop traversal. */
1215 /* Continue traversal. */
1220 is_specified_symbol (const char *name
, htab_t htab
)
1224 struct is_specified_symbol_predicate_data data
;
1229 htab_traverse (htab
, is_specified_symbol_predicate
, &data
);
1234 return htab_find (htab
, name
) != NULL
;
1237 /* Return a pointer to the symbol used as a signature for GROUP. */
1240 group_signature (asection
*group
)
1242 bfd
*abfd
= group
->owner
;
1243 Elf_Internal_Shdr
*ghdr
;
1245 /* PR 20089: An earlier error may have prevented us from loading the symbol table. */
1249 if (bfd_get_flavour (abfd
) != bfd_target_elf_flavour
)
1252 ghdr
= &elf_section_data (group
)->this_hdr
;
1253 if (ghdr
->sh_link
== elf_onesymtab (abfd
))
1255 const struct elf_backend_data
*bed
= get_elf_backend_data (abfd
);
1256 Elf_Internal_Shdr
*symhdr
= &elf_symtab_hdr (abfd
);
1258 if (ghdr
->sh_info
> 0
1259 && ghdr
->sh_info
< symhdr
->sh_size
/ bed
->s
->sizeof_sym
)
1260 return isympp
[ghdr
->sh_info
- 1];
1265 /* Return TRUE if the section is a DWO section. */
1268 is_dwo_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1270 const char *name
= bfd_section_name (sec
);
1271 int len
= strlen (name
);
1273 return strncmp (name
+ len
- 4, ".dwo", 4) == 0;
1276 /* Return TRUE if section SEC is in the update list. */
1279 is_update_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1281 if (update_sections
!= NULL
)
1283 struct section_add
*pupdate
;
1285 for (pupdate
= update_sections
;
1287 pupdate
= pupdate
->next
)
1289 if (strcmp (sec
->name
, pupdate
->name
) == 0)
1298 is_mergeable_note_section (bfd
* abfd
, asection
* sec
)
1301 && bfd_get_flavour (abfd
) == bfd_target_elf_flavour
1302 && elf_section_data (sec
)->this_hdr
.sh_type
== SHT_NOTE
1303 /* FIXME: We currently only support merging GNU_BUILD_NOTEs.
1304 We should add support for more note types. */
1305 && ((elf_section_data (sec
)->this_hdr
.sh_flags
& SHF_GNU_BUILD_NOTE
) != 0
1306 /* Old versions of GAS (prior to 2.27) could not set the section
1307 flags to OS-specific values, so we also accept sections that
1308 start with the expected name. */
1309 || (CONST_STRNEQ (sec
->name
, GNU_BUILD_ATTRS_SECTION_NAME
))))
1315 /* See if a non-group section is being removed. */
1318 is_strip_section_1 (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1320 if (find_section_list (bfd_section_name (sec
), FALSE
, SECTION_CONTEXT_KEEP
)
1324 if (sections_removed
|| sections_copied
)
1326 struct section_list
*p
;
1327 struct section_list
*q
;
1329 p
= find_section_list (bfd_section_name (sec
), FALSE
,
1330 SECTION_CONTEXT_REMOVE
);
1331 q
= find_section_list (bfd_section_name (sec
), FALSE
,
1332 SECTION_CONTEXT_COPY
);
1335 fatal (_("error: section %s matches both remove and copy options"),
1336 bfd_section_name (sec
));
1337 if (p
&& is_update_section (abfd
, sec
))
1338 fatal (_("error: section %s matches both update and remove options"),
1339 bfd_section_name (sec
));
1343 if (sections_copied
&& q
== NULL
)
1347 if ((bfd_section_flags (sec
) & SEC_DEBUGGING
) != 0)
1349 if (strip_symbols
== STRIP_DEBUG
1350 || strip_symbols
== STRIP_UNNEEDED
1351 || strip_symbols
== STRIP_ALL
1352 || discard_locals
== LOCALS_ALL
1353 || convert_debugging
)
1355 /* By default we don't want to strip .reloc section.
1356 This section has for pe-coff special meaning. See
1357 pe-dll.c file in ld, and peXXigen.c in bfd for details. */
1358 if (strcmp (bfd_section_name (sec
), ".reloc") != 0)
1362 if (strip_symbols
== STRIP_DWO
)
1363 return is_dwo_section (abfd
, sec
);
1365 if (strip_symbols
== STRIP_NONDEBUG
)
1369 if (strip_symbols
== STRIP_NONDWO
)
1370 return !is_dwo_section (abfd
, sec
);
1375 /* See if a section is being removed. */
1378 is_strip_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1380 if (is_strip_section_1 (abfd
, sec
))
1383 if ((bfd_section_flags (sec
) & SEC_GROUP
) != 0)
1387 asection
*elt
, *first
;
1389 gsym
= group_signature (sec
);
1390 /* Strip groups without a valid signature. */
1395 If we are going to strip the group signature symbol, then
1396 strip the group section too. */
1398 if ((strip_symbols
== STRIP_ALL
1399 && !is_specified_symbol (gname
, keep_specific_htab
))
1400 || is_specified_symbol (gname
, strip_specific_htab
))
1403 /* Remove the group section if all members are removed. */
1404 first
= elt
= elf_next_in_group (sec
);
1407 if (!is_strip_section_1 (abfd
, elt
))
1409 elt
= elf_next_in_group (elt
);
1421 is_nondebug_keep_contents_section (bfd
*ibfd
, asection
*isection
)
1423 /* Always keep ELF note sections. */
1424 if (bfd_get_flavour (ibfd
) == bfd_target_elf_flavour
)
1425 return elf_section_type (isection
) == SHT_NOTE
;
1427 /* Always keep the .buildid section for PE/COFF.
1429 Strictly, this should be written "always keep the section storing the debug
1430 directory", but that may be the .text section for objects produced by some
1431 tools, which it is not sensible to keep. */
1432 if (bfd_get_flavour (ibfd
) == bfd_target_coff_flavour
)
1433 return strcmp (bfd_section_name (isection
), ".buildid") == 0;
1438 /* Return true if SYM is a hidden symbol. */
1441 is_hidden_symbol (asymbol
*sym
)
1443 elf_symbol_type
*elf_sym
;
1445 elf_sym
= elf_symbol_from (sym
->the_bfd
, sym
);
1446 if (elf_sym
!= NULL
)
1447 switch (ELF_ST_VISIBILITY (elf_sym
->internal_elf_sym
.st_other
))
1456 /* Empty name is hopefully never a valid symbol name. */
1457 static const char * empty_name
= "";
1460 need_sym_before (struct addsym_node
**node
, const char *sym
)
1463 struct addsym_node
*ptr
= add_sym_list
;
1465 /* 'othersym' symbols are at the front of the list. */
1466 for (count
= 0; count
< add_symbols
; count
++)
1470 if (ptr
->othersym
== empty_name
)
1472 else if (strcmp (ptr
->othersym
, sym
) == 0)
1474 free ((char *) ptr
->othersym
);
1475 ptr
->othersym
= empty_name
;
1485 create_new_symbol (struct addsym_node
*ptr
, bfd
*obfd
)
1487 asymbol
*sym
= bfd_make_empty_symbol (obfd
);
1489 bfd_set_asymbol_name (sym
, ptr
->symdef
);
1490 sym
->value
= ptr
->symval
;
1491 sym
->flags
= ptr
->flags
;
1494 asection
*sec
= bfd_get_section_by_name (obfd
, ptr
->section
);
1496 fatal (_("Section %s not found"), ptr
->section
);
1500 sym
->section
= bfd_abs_section_ptr
;
1504 /* Choose which symbol entries to copy; put the result in OSYMS.
1505 We don't copy in place, because that confuses the relocs.
1506 Return the number of symbols to print. */
1509 filter_symbols (bfd
*abfd
, bfd
*obfd
, asymbol
**osyms
,
1510 asymbol
**isyms
, long symcount
)
1512 asymbol
**from
= isyms
, **to
= osyms
;
1513 long src_count
= 0, dst_count
= 0;
1514 int relocatable
= (abfd
->flags
& (EXEC_P
| DYNAMIC
)) == 0;
1516 for (; src_count
< symcount
; src_count
++)
1518 asymbol
*sym
= from
[src_count
];
1519 flagword flags
= sym
->flags
;
1520 char *name
= (char *) bfd_asymbol_name (sym
);
1522 bfd_boolean used_in_reloc
= FALSE
;
1523 bfd_boolean undefined
;
1524 bfd_boolean rem_leading_char
;
1525 bfd_boolean add_leading_char
;
1527 undefined
= bfd_is_und_section (bfd_asymbol_section (sym
));
1531 struct addsym_node
*ptr
;
1533 if (need_sym_before (&ptr
, name
))
1534 to
[dst_count
++] = create_new_symbol (ptr
, obfd
);
1537 if (htab_elements (redefine_specific_htab
) || section_rename_list
)
1541 new_name
= (char *) lookup_sym_redefinition (name
);
1542 if (new_name
== name
1543 && (flags
& BSF_SECTION_SYM
) != 0)
1544 new_name
= (char *) find_section_rename (name
, NULL
);
1545 bfd_set_asymbol_name (sym
, new_name
);
1549 /* Check if we will remove the current leading character. */
1551 (name
[0] == bfd_get_symbol_leading_char (abfd
))
1552 && (change_leading_char
1553 || (remove_leading_char
1554 && ((flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0
1556 || bfd_is_com_section (bfd_asymbol_section (sym
)))));
1558 /* Check if we will add a new leading character. */
1561 && (bfd_get_symbol_leading_char (obfd
) != '\0')
1562 && (bfd_get_symbol_leading_char (abfd
) == '\0'
1563 || (name
[0] == bfd_get_symbol_leading_char (abfd
)));
1565 /* Short circuit for change_leading_char if we can do it in-place. */
1566 if (rem_leading_char
&& add_leading_char
&& !prefix_symbols_string
)
1568 name
[0] = bfd_get_symbol_leading_char (obfd
);
1569 bfd_set_asymbol_name (sym
, name
);
1570 rem_leading_char
= FALSE
;
1571 add_leading_char
= FALSE
;
1574 /* Remove leading char. */
1575 if (rem_leading_char
)
1576 bfd_set_asymbol_name (sym
, ++name
);
1578 /* Add new leading char and/or prefix. */
1579 if (add_leading_char
|| prefix_symbols_string
)
1583 ptr
= n
= (char *) xmalloc (1 + strlen (prefix_symbols_string
)
1584 + strlen (name
) + 1);
1585 if (add_leading_char
)
1586 *ptr
++ = bfd_get_symbol_leading_char (obfd
);
1588 if (prefix_symbols_string
)
1590 strcpy (ptr
, prefix_symbols_string
);
1591 ptr
+= strlen (prefix_symbols_string
);
1595 bfd_set_asymbol_name (sym
, n
);
1599 if (strip_symbols
== STRIP_ALL
)
1601 else if ((flags
& BSF_KEEP
) != 0 /* Used in relocation. */
1602 || ((flags
& BSF_SECTION_SYM
) != 0
1603 && ((*bfd_asymbol_section (sym
)->symbol_ptr_ptr
)->flags
1607 used_in_reloc
= TRUE
;
1609 else if (relocatable
/* Relocatable file. */
1610 && ((flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0
1611 || bfd_is_com_section (bfd_asymbol_section (sym
))))
1613 else if (bfd_decode_symclass (sym
) == 'I')
1614 /* Global symbols in $idata sections need to be retained
1615 even if relocatable is FALSE. External users of the
1616 library containing the $idata section may reference these
1619 else if ((flags
& BSF_GLOBAL
) != 0 /* Global symbol. */
1620 || (flags
& BSF_WEAK
) != 0
1622 || bfd_is_com_section (bfd_asymbol_section (sym
)))
1623 keep
= strip_symbols
!= STRIP_UNNEEDED
;
1624 else if ((flags
& BSF_DEBUGGING
) != 0) /* Debugging symbol. */
1625 keep
= (strip_symbols
!= STRIP_DEBUG
1626 && strip_symbols
!= STRIP_UNNEEDED
1627 && ! convert_debugging
);
1628 else if (bfd_coff_get_comdat_section (abfd
, bfd_asymbol_section (sym
)))
1629 /* COMDAT sections store special information in local
1630 symbols, so we cannot risk stripping any of them. */
1632 else /* Local symbol. */
1633 keep
= (strip_symbols
!= STRIP_UNNEEDED
1634 && (discard_locals
!= LOCALS_ALL
1635 && (discard_locals
!= LOCALS_START_L
1636 || ! bfd_is_local_label (abfd
, sym
))));
1638 if (keep
&& is_specified_symbol (name
, strip_specific_htab
))
1640 /* There are multiple ways to set 'keep' above, but if it
1641 was the relocatable symbol case, then that's an error. */
1644 non_fatal (_("not stripping symbol `%s' because it is named in a relocation"), name
);
1652 && !(flags
& BSF_KEEP
)
1653 && is_specified_symbol (name
, strip_unneeded_htab
))
1657 && ((keep_file_symbols
&& (flags
& BSF_FILE
))
1658 || is_specified_symbol (name
, keep_specific_htab
)))
1661 if (keep
&& is_strip_section (abfd
, bfd_asymbol_section (sym
)))
1666 if ((flags
& BSF_GLOBAL
) != 0
1667 && (weaken
|| is_specified_symbol (name
, weaken_specific_htab
)))
1669 sym
->flags
&= ~ BSF_GLOBAL
;
1670 sym
->flags
|= BSF_WEAK
;
1674 && (flags
& (BSF_GLOBAL
| BSF_WEAK
))
1675 && (is_specified_symbol (name
, localize_specific_htab
)
1676 || (htab_elements (keepglobal_specific_htab
) != 0
1677 && ! is_specified_symbol (name
, keepglobal_specific_htab
))
1678 || (localize_hidden
&& is_hidden_symbol (sym
))))
1680 sym
->flags
&= ~ (BSF_GLOBAL
| BSF_WEAK
);
1681 sym
->flags
|= BSF_LOCAL
;
1685 && (flags
& BSF_LOCAL
)
1686 && is_specified_symbol (name
, globalize_specific_htab
))
1688 sym
->flags
&= ~ BSF_LOCAL
;
1689 sym
->flags
|= BSF_GLOBAL
;
1692 to
[dst_count
++] = sym
;
1697 struct addsym_node
*ptr
= add_sym_list
;
1699 for (src_count
= 0; src_count
< add_symbols
; src_count
++)
1703 if (ptr
->othersym
!= empty_name
)
1704 fatal (_("'before=%s' not found"), ptr
->othersym
);
1707 to
[dst_count
++] = create_new_symbol (ptr
, obfd
);
1713 to
[dst_count
] = NULL
;
1718 /* Find the redefined name of symbol SOURCE. */
1721 lookup_sym_redefinition (const char *source
)
1723 struct redefine_node key_node
= {(char *) source
, NULL
};
1724 struct redefine_node
*redef_node
1725 = (struct redefine_node
*) htab_find (redefine_specific_htab
, &key_node
);
1727 return redef_node
== NULL
? source
: redef_node
->target
;
1730 /* Insert a node into symbol redefine hash tabel. */
1733 add_redefine_and_check (const char *cause
, const char *source
,
1736 struct redefine_node
*new_node
1737 = (struct redefine_node
*) xmalloc (sizeof (struct redefine_node
));
1739 new_node
->source
= strdup (source
);
1740 new_node
->target
= strdup (target
);
1742 if (htab_find (redefine_specific_htab
, new_node
) != HTAB_EMPTY_ENTRY
)
1743 fatal (_("%s: Multiple redefinition of symbol \"%s\""),
1746 if (htab_find (redefine_specific_reverse_htab
, target
) != HTAB_EMPTY_ENTRY
)
1747 fatal (_("%s: Symbol \"%s\" is target of more than one redefinition"),
1750 /* Insert the NEW_NODE into hash table for quick search. */
1751 add_specific_symbol_node (new_node
, redefine_specific_htab
);
1753 /* Insert the target string into the reverse hash table, this is needed for
1754 duplicated target string check. */
1755 add_specific_symbol (new_node
->target
, redefine_specific_reverse_htab
);
1759 /* Handle the --redefine-syms option. Read lines containing "old new"
1760 from the file, and add them to the symbol redefine list. */
1763 add_redefine_syms_file (const char *filename
)
1772 file
= fopen (filename
, "r");
1774 fatal (_("couldn't open symbol redefinition file %s (error: %s)"),
1775 filename
, strerror (errno
));
1778 buf
= (char *) xmalloc (bufsize
+ 1 /* For the terminating NUL. */);
1786 /* Collect the input symbol name. */
1787 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1795 buf
= (char *) xrealloc (buf
, bufsize
+ 1);
1803 /* Eat white space between the symbol names. */
1804 while (IS_WHITESPACE (c
))
1806 if (c
== '#' || IS_LINE_TERMINATOR (c
))
1811 /* Collect the output symbol name. */
1813 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1821 buf
= (char *) xrealloc (buf
, bufsize
+ 1);
1829 /* Eat white space at end of line. */
1830 while (! IS_LINE_TERMINATOR(c
) && c
!= EOF
&& IS_WHITESPACE (c
))
1835 if ((c
== '\r' && (c
= getc (file
)) == '\n')
1836 || c
== '\n' || c
== EOF
)
1839 /* Append the redefinition to the list. */
1841 add_redefine_and_check (filename
, &buf
[0], &buf
[outsym_off
]);
1852 fatal (_("%s:%d: garbage found at end of line"), filename
, lineno
);
1854 if (len
!= 0 && (outsym_off
== 0 || outsym_off
== len
))
1855 fatal (_("%s:%d: missing new symbol name"), filename
, lineno
);
1858 /* Eat the rest of the line and finish it. */
1859 while (c
!= '\n' && c
!= EOF
)
1865 fatal (_("%s:%d: premature end of file"), filename
, lineno
);
1871 /* Copy unknown object file IBFD onto OBFD.
1872 Returns TRUE upon success, FALSE otherwise. */
1875 copy_unknown_object (bfd
*ibfd
, bfd
*obfd
)
1883 if (bfd_stat_arch_elt (ibfd
, &buf
) != 0)
1885 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1892 non_fatal (_("stat returns negative size for `%s'"),
1893 bfd_get_archive_filename (ibfd
));
1897 if (bfd_seek (ibfd
, (file_ptr
) 0, SEEK_SET
) != 0)
1899 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1904 printf (_("copy from `%s' [unknown] to `%s' [unknown]\n"),
1905 bfd_get_archive_filename (ibfd
), bfd_get_filename (obfd
));
1907 cbuf
= (char *) xmalloc (BUFSIZE
);
1909 while (ncopied
< size
)
1911 tocopy
= size
- ncopied
;
1912 if (tocopy
> BUFSIZE
)
1915 if (bfd_bread (cbuf
, (bfd_size_type
) tocopy
, ibfd
)
1916 != (bfd_size_type
) tocopy
)
1918 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1923 if (bfd_bwrite (cbuf
, (bfd_size_type
) tocopy
, obfd
)
1924 != (bfd_size_type
) tocopy
)
1926 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
1934 /* We should at least to be able to read it back when copying an
1935 unknown object in an archive. */
1936 chmod (bfd_get_filename (obfd
), buf
.st_mode
| S_IRUSR
);
1941 typedef struct objcopy_internal_note
1943 Elf_Internal_Note note
;
1944 unsigned long padded_namesz
;
1947 } objcopy_internal_note
;
1949 #define DEBUG_MERGE 0
1952 #define merge_debug(format, ...) fprintf (stderr, format, ## __VA_ARGS__)
1954 #define merge_debug(format, ...)
1957 /* Returns TRUE iff PNOTE1 overlaps or adjoins PNOTE2. */
1960 overlaps_or_adjoins (objcopy_internal_note
* pnote1
,
1961 objcopy_internal_note
* pnote2
)
1963 if (pnote1
->end
< pnote2
->start
)
1964 /* FIXME: Alignment of 16 bytes taken from x86_64 binaries.
1965 Really we should extract the alignment of the section
1966 covered by the notes. */
1967 return BFD_ALIGN (pnote1
->end
, 16) < pnote2
->start
;
1969 if (pnote2
->end
< pnote2
->start
)
1970 return BFD_ALIGN (pnote2
->end
, 16) < pnote1
->start
;
1972 if (pnote1
->end
< pnote2
->end
)
1975 if (pnote2
->end
< pnote1
->end
)
1981 /* Returns TRUE iff NEEDLE is fully contained by HAYSTACK. */
1984 contained_by (objcopy_internal_note
* needle
,
1985 objcopy_internal_note
* haystack
)
1987 return needle
->start
>= haystack
->start
&& needle
->end
<= haystack
->end
;
1991 is_open_note (objcopy_internal_note
* pnote
)
1993 return pnote
->note
.type
== NT_GNU_BUILD_ATTRIBUTE_OPEN
;
1997 is_func_note (objcopy_internal_note
* pnote
)
1999 return pnote
->note
.type
== NT_GNU_BUILD_ATTRIBUTE_FUNC
;
2003 is_deleted_note (objcopy_internal_note
* pnote
)
2005 return pnote
->note
.type
== 0;
2009 is_version_note (objcopy_internal_note
* pnote
)
2011 return (pnote
->note
.namesz
> 4
2012 && pnote
->note
.namedata
[0] == 'G'
2013 && pnote
->note
.namedata
[1] == 'A'
2014 && pnote
->note
.namedata
[2] == '$'
2015 && pnote
->note
.namedata
[3] == GNU_BUILD_ATTRIBUTE_VERSION
);
2019 is_64bit (bfd
* abfd
)
2021 /* Should never happen, but let's be paranoid. */
2022 if (bfd_get_flavour (abfd
) != bfd_target_elf_flavour
)
2025 return elf_elfheader (abfd
)->e_ident
[EI_CLASS
] == ELFCLASS64
;
2028 /* This sorting function is used to get the notes into an order
2029 that makes merging easy. */
2032 compare_gnu_build_notes (const void * data1
, const void * data2
)
2034 objcopy_internal_note
* pnote1
= (objcopy_internal_note
*) data1
;
2035 objcopy_internal_note
* pnote2
= (objcopy_internal_note
*) data2
;
2037 /* Sort notes based upon the attribute they record. */
2038 int cmp
= memcmp (pnote1
->note
.namedata
+ 3,
2039 pnote2
->note
.namedata
+ 3,
2040 pnote1
->note
.namesz
< pnote2
->note
.namesz
?
2041 pnote1
->note
.namesz
- 3 : pnote2
->note
.namesz
- 3);
2045 if (pnote1
->end
< pnote2
->start
)
2047 if (pnote1
->start
> pnote2
->end
)
2050 /* Overlaps - we should merge the two ranges. */
2051 if (pnote1
->start
< pnote2
->start
)
2053 if (pnote1
->end
> pnote2
->end
)
2056 /* Put OPEN notes before function notes. */
2057 if (is_open_note (pnote1
) && ! is_open_note (pnote2
))
2059 if (! is_open_note (pnote1
) && is_open_note (pnote2
))
2065 /* This sorting function is used to get the notes into an order
2066 that makes eliminating address ranges easier. */
2069 sort_gnu_build_notes (const void * data1
, const void * data2
)
2071 objcopy_internal_note
* pnote1
= (objcopy_internal_note
*) data1
;
2072 objcopy_internal_note
* pnote2
= (objcopy_internal_note
*) data2
;
2074 if (pnote1
->note
.type
!= pnote2
->note
.type
)
2076 /* Move deleted notes to the end. */
2077 if (is_deleted_note (pnote1
)) /* 1: OFD 2: OFD */
2080 /* Move OPEN notes to the start. */
2081 if (is_open_note (pnote1
)) /* 1: OF 2: OFD */
2084 if (is_deleted_note (pnote2
)) /* 1: F 2: O D */
2087 return 1; /* 1: F 2: O */
2090 /* Sort by starting address. */
2091 if (pnote1
->start
< pnote2
->start
)
2093 if (pnote1
->start
> pnote2
->start
)
2096 /* Then by end address (bigger range first). */
2097 if (pnote1
->end
> pnote2
->end
)
2099 if (pnote1
->end
< pnote2
->end
)
2102 /* Then by attribute type. */
2103 if (pnote1
->note
.namesz
> 4
2104 && pnote2
->note
.namesz
> 4
2105 && pnote1
->note
.namedata
[3] != pnote2
->note
.namedata
[3])
2106 return pnote1
->note
.namedata
[3] - pnote2
->note
.namedata
[3];
2111 /* Merge the notes on SEC, removing redundant entries.
2112 Returns the new, smaller size of the section upon success. */
2114 static bfd_size_type
2115 merge_gnu_build_notes (bfd
* abfd
,
2118 bfd_byte
* contents
)
2120 objcopy_internal_note
* pnotes_end
;
2121 objcopy_internal_note
* pnotes
= NULL
;
2122 objcopy_internal_note
* pnote
;
2123 bfd_size_type remain
= size
;
2124 unsigned version_1_seen
= 0;
2125 unsigned version_2_seen
= 0;
2126 unsigned version_3_seen
= 0;
2127 const char * err
= NULL
;
2128 bfd_byte
* in
= contents
;
2129 unsigned long previous_func_start
= 0;
2130 unsigned long previous_open_start
= 0;
2131 unsigned long previous_func_end
= 0;
2132 unsigned long previous_open_end
= 0;
2135 relsize
= bfd_get_reloc_upper_bound (abfd
, sec
);
2141 /* If there are relocs associated with this section then we
2142 cannot safely merge it. */
2143 relpp
= (arelent
**) xmalloc (relsize
);
2144 relcount
= bfd_canonicalize_reloc (abfd
, sec
, relpp
, isympp
);
2149 non_fatal (_("%s[%s]: Cannot merge - there are relocations against this section"),
2150 bfd_get_filename (abfd
), bfd_section_name (sec
));
2155 /* Make a copy of the notes and convert to our internal format.
2156 Minimum size of a note is 12 bytes. Also locate the version
2157 notes and check them. */
2158 pnote
= pnotes
= (objcopy_internal_note
*)
2159 xcalloc ((size
/ 12), sizeof (* pnote
));
2160 while (remain
>= 12)
2164 pnote
->note
.namesz
= bfd_get_32 (abfd
, in
);
2165 pnote
->note
.descsz
= bfd_get_32 (abfd
, in
+ 4);
2166 pnote
->note
.type
= bfd_get_32 (abfd
, in
+ 8);
2167 pnote
->padded_namesz
= (pnote
->note
.namesz
+ 3) & ~3;
2169 if (((pnote
->note
.descsz
+ 3) & ~3) != pnote
->note
.descsz
)
2171 err
= _("corrupt GNU build attribute note: description size not a factor of 4");
2175 if (pnote
->note
.type
!= NT_GNU_BUILD_ATTRIBUTE_OPEN
2176 && pnote
->note
.type
!= NT_GNU_BUILD_ATTRIBUTE_FUNC
)
2178 err
= _("corrupt GNU build attribute note: wrong note type");
2182 if (pnote
->padded_namesz
+ pnote
->note
.descsz
+ 12 > remain
)
2184 err
= _("corrupt GNU build attribute note: note too big");
2188 if (pnote
->note
.namesz
< 2)
2190 err
= _("corrupt GNU build attribute note: name too small");
2194 pnote
->note
.namedata
= (char *)(in
+ 12);
2195 pnote
->note
.descdata
= (char *)(in
+ 12 + pnote
->padded_namesz
);
2197 remain
-= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2198 in
+= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2200 if (pnote
->note
.namesz
> 2
2201 && pnote
->note
.namedata
[0] == '$'
2202 && pnote
->note
.namedata
[1] == GNU_BUILD_ATTRIBUTE_VERSION
2203 && pnote
->note
.namedata
[2] == '1')
2205 else if (is_version_note (pnote
))
2207 if (pnote
->note
.namedata
[4] == '2')
2209 else if (pnote
->note
.namedata
[4] == '3')
2213 err
= _("corrupt GNU build attribute note: unsupported version");
2218 switch (pnote
->note
.descsz
)
2225 start
= bfd_get_32 (abfd
, pnote
->note
.descdata
);
2226 /* FIXME: For version 1 and 2 notes we should try to
2227 calculate the end address by finding a symbol whose
2228 value is START, and then adding in its size.
2230 For now though, since v1 and v2 was not intended to
2231 handle gaps, we chose an artificially large end
2237 if (! is_64bit (abfd
))
2239 start
= bfd_get_32 (abfd
, pnote
->note
.descdata
);
2240 end
= bfd_get_32 (abfd
, pnote
->note
.descdata
+ 4);
2244 start
= bfd_get_64 (abfd
, pnote
->note
.descdata
);
2245 /* FIXME: For version 1 and 2 notes we should try to
2246 calculate the end address by finding a symbol whose
2247 value is START, and then adding in its size.
2249 For now though, since v1 and v2 was not intended to
2250 handle gaps, we chose an artificially large end
2257 start
= bfd_get_64 (abfd
, pnote
->note
.descdata
);
2258 end
= bfd_get_64 (abfd
, pnote
->note
.descdata
+ 8);
2262 err
= _("corrupt GNU build attribute note: bad description size");
2266 if (is_open_note (pnote
))
2269 previous_open_start
= start
;
2271 pnote
->start
= previous_open_start
;
2274 previous_open_end
= end
;
2276 pnote
->end
= previous_open_end
;
2281 previous_func_start
= start
;
2283 pnote
->start
= previous_func_start
;
2286 previous_func_end
= end
;
2288 pnote
->end
= previous_func_end
;
2291 if (pnote
->note
.namedata
[pnote
->note
.namesz
- 1] != 0)
2293 err
= _("corrupt GNU build attribute note: name not NUL terminated");
2302 /* Check that the notes are valid. */
2305 err
= _("corrupt GNU build attribute notes: excess data at end");
2309 if (version_1_seen
== 0 && version_2_seen
== 0 && version_3_seen
== 0)
2312 err
= _("bad GNU build attribute notes: no known versions detected");
2315 /* This happens with glibc. No idea why. */
2316 non_fatal (_("%s[%s]: Warning: version note missing - assuming version 3"),
2317 bfd_get_filename (abfd
), bfd_section_name (sec
));
2322 if ( (version_1_seen
> 0 && version_2_seen
> 0)
2323 || (version_1_seen
> 0 && version_3_seen
> 0)
2324 || (version_2_seen
> 0 && version_3_seen
> 0))
2326 err
= _("bad GNU build attribute notes: multiple different versions");
2330 /* We are now only supporting the merging v3+ notes
2331 - it makes things much simpler. */
2332 if (version_3_seen
== 0)
2334 merge_debug ("%s: skipping merge - not using v3 notes", bfd_section_name (sec
));
2338 merge_debug ("Merging section %s which contains %ld notes\n",
2339 sec
->name
, pnotes_end
- pnotes
);
2341 /* Sort the notes. */
2342 qsort (pnotes
, pnotes_end
- pnotes
, sizeof (* pnotes
),
2343 compare_gnu_build_notes
);
2346 merge_debug ("Results of initial sort:\n");
2347 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2348 merge_debug ("offset %#08lx range %#08lx..%#08lx type %ld attribute %d namesz %ld\n",
2349 (pnote
->note
.namedata
- (char *) contents
) - 12,
2350 pnote
->start
, pnote
->end
,
2352 pnote
->note
.namedata
[3],
2357 /* Now merge the notes. The rules are:
2358 1. If a note has a zero range, it can be eliminated.
2359 2. If two notes have the same namedata then:
2360 2a. If one note's range is fully covered by the other note
2361 then it can be deleted.
2362 2b. If one note's range partially overlaps or adjoins the
2363 other note then if they are both of the same type (open
2364 or func) then they can be merged and one deleted. If
2365 they are of different types then they cannot be merged. */
2366 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2368 /* Skip already deleted notes.
2369 FIXME: Can this happen ? We are scanning forwards and
2370 deleting backwards after all. */
2371 if (is_deleted_note (pnote
))
2374 /* Rule 1 - delete 0-range notes. */
2375 if (pnote
->start
== pnote
->end
)
2377 merge_debug ("Delete note at offset %#08lx - empty range\n",
2378 (pnote
->note
.namedata
- (char *) contents
) - 12);
2379 pnote
->note
.type
= 0;
2384 objcopy_internal_note
* back
;
2386 /* Rule 2: Check to see if there is an identical previous note. */
2387 for (iter
= 0, back
= pnote
- 1; back
>= pnotes
; back
--)
2389 if (is_deleted_note (back
))
2392 /* Our sorting function should have placed all identically
2393 attributed notes together, so if we see a note of a different
2394 attribute type stop searching. */
2395 if (back
->note
.namesz
!= pnote
->note
.namesz
2396 || memcmp (back
->note
.namedata
,
2397 pnote
->note
.namedata
, pnote
->note
.namesz
) != 0)
2400 if (back
->start
== pnote
->start
2401 && back
->end
== pnote
->end
)
2403 merge_debug ("Delete note at offset %#08lx - duplicate of note at offset %#08lx\n",
2404 (pnote
->note
.namedata
- (char *) contents
) - 12,
2405 (back
->note
.namedata
- (char *) contents
) - 12);
2406 pnote
->note
.type
= 0;
2411 if (contained_by (pnote
, back
))
2413 merge_debug ("Delete note at offset %#08lx - fully contained by note at %#08lx\n",
2414 (pnote
->note
.namedata
- (char *) contents
) - 12,
2415 (back
->note
.namedata
- (char *) contents
) - 12);
2416 pnote
->note
.type
= 0;
2421 /* This should not happen as we have sorted the
2422 notes with earlier starting addresses first. */
2423 if (contained_by (back
, pnote
))
2424 merge_debug ("ERROR: UNEXPECTED CONTAINMENT\n");
2428 if (overlaps_or_adjoins (back
, pnote
)
2429 && is_func_note (back
) == is_func_note (pnote
))
2431 merge_debug ("Delete note at offset %#08lx - merge into note at %#08lx\n",
2432 (pnote
->note
.namedata
- (char *) contents
) - 12,
2433 (back
->note
.namedata
- (char *) contents
) - 12);
2435 back
->end
= back
->end
> pnote
->end
? back
->end
: pnote
->end
;
2436 back
->start
= back
->start
< pnote
->start
? back
->start
: pnote
->start
;
2437 pnote
->note
.type
= 0;
2441 /* Don't scan too far back however. */
2444 /* FIXME: Not sure if this can ever be triggered. */
2445 merge_debug ("ITERATION LIMIT REACHED\n");
2450 if (! is_deleted_note (pnote
))
2451 merge_debug ("Unable to do anything with note at %#08lx\n",
2452 (pnote
->note
.namedata
- (char *) contents
) - 12);
2456 /* Resort the notes. */
2457 merge_debug ("Final sorting of notes\n");
2458 qsort (pnotes
, pnotes_end
- pnotes
, sizeof (* pnotes
), sort_gnu_build_notes
);
2460 /* Reconstruct the ELF notes. */
2461 bfd_byte
* new_contents
;
2464 bfd_size_type new_size
;
2465 bfd_vma prev_start
= 0;
2466 bfd_vma prev_end
= 0;
2468 /* Not sure how, but the notes might grow in size.
2469 (eg see PR 1774507). Allow for this here. */
2470 new = new_contents
= xmalloc (size
* 2);
2471 for (pnote
= pnotes
, old
= contents
;
2475 bfd_size_type note_size
= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2477 if (! is_deleted_note (pnote
))
2479 /* Create the note, potentially using the
2480 address range of the previous note. */
2481 if (pnote
->start
== prev_start
&& pnote
->end
== prev_end
)
2483 bfd_put_32 (abfd
, pnote
->note
.namesz
, new);
2484 bfd_put_32 (abfd
, 0, new + 4);
2485 bfd_put_32 (abfd
, pnote
->note
.type
, new + 8);
2487 memcpy (new, pnote
->note
.namedata
, pnote
->note
.namesz
);
2488 if (pnote
->note
.namesz
< pnote
->padded_namesz
)
2489 memset (new + pnote
->note
.namesz
, 0, pnote
->padded_namesz
- pnote
->note
.namesz
);
2490 new += pnote
->padded_namesz
;
2494 bfd_put_32 (abfd
, pnote
->note
.namesz
, new);
2495 bfd_put_32 (abfd
, is_64bit (abfd
) ? 16 : 8, new + 4);
2496 bfd_put_32 (abfd
, pnote
->note
.type
, new + 8);
2498 memcpy (new, pnote
->note
.namedata
, pnote
->note
.namesz
);
2499 if (pnote
->note
.namesz
< pnote
->padded_namesz
)
2500 memset (new + pnote
->note
.namesz
, 0, pnote
->padded_namesz
- pnote
->note
.namesz
);
2501 new += pnote
->padded_namesz
;
2502 if (is_64bit (abfd
))
2504 bfd_put_64 (abfd
, pnote
->start
, new);
2505 bfd_put_64 (abfd
, pnote
->end
, new + 8);
2510 bfd_put_32 (abfd
, pnote
->start
, new);
2511 bfd_put_32 (abfd
, pnote
->end
, new + 4);
2515 prev_start
= pnote
->start
;
2516 prev_end
= pnote
->end
;
2524 merge_debug ("Results of merge:\n");
2525 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2526 if (! is_deleted_note (pnote
))
2527 merge_debug ("offset %#08lx range %#08lx..%#08lx type %ld attribute %d namesz %ld\n",
2528 (pnote
->note
.namedata
- (char *) contents
) - 12,
2529 pnote
->start
, pnote
->end
,
2531 pnote
->note
.namedata
[3],
2536 new_size
= new - new_contents
;
2537 if (new_size
< size
)
2539 memcpy (contents
, new_contents
, new_size
);
2542 free (new_contents
);
2547 bfd_set_error (bfd_error_bad_value
);
2548 bfd_nonfatal_message (NULL
, abfd
, sec
, err
);
2556 /* Copy object file IBFD onto OBFD.
2557 Returns TRUE upon success, FALSE otherwise. */
2560 copy_object (bfd
*ibfd
, bfd
*obfd
, const bfd_arch_info_type
*input_arch
)
2564 asection
**osections
= NULL
;
2566 asection
*gnu_debuglink_section
= NULL
;
2567 bfd_size_type
*gaps
= NULL
;
2568 bfd_size_type max_gap
= 0;
2571 enum bfd_architecture iarch
;
2575 if (ibfd
->xvec
->byteorder
!= obfd
->xvec
->byteorder
2576 && ibfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
2577 && obfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
)
2579 /* PR 17636: Call non-fatal so that we return to our parent who
2580 may need to tidy temporary files. */
2581 non_fatal (_("Unable to change endianness of input file(s)"));
2585 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
2587 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
2591 if (ibfd
->sections
== NULL
)
2593 non_fatal (_("error: the input file '%s' has no sections"),
2594 bfd_get_archive_filename (ibfd
));
2598 if (bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
)
2600 if ((do_debug_sections
& compress
) != 0
2601 && do_debug_sections
!= compress
)
2603 non_fatal (_("--compress-debug-sections=[zlib|zlib-gnu|zlib-gabi] is unsupported on `%s'"),
2604 bfd_get_archive_filename (ibfd
));
2608 if (do_elf_stt_common
)
2610 non_fatal (_("--elf-stt-common=[yes|no] is unsupported on `%s'"),
2611 bfd_get_archive_filename (ibfd
));
2617 printf (_("copy from `%s' [%s] to `%s' [%s]\n"),
2618 bfd_get_archive_filename (ibfd
), bfd_get_target (ibfd
),
2619 bfd_get_filename (obfd
), bfd_get_target (obfd
));
2628 start
= bfd_get_start_address (ibfd
);
2629 start
+= change_start
;
2632 /* Neither the start address nor the flags
2633 need to be set for a core file. */
2634 if (bfd_get_format (obfd
) != bfd_core
)
2638 flags
= bfd_get_file_flags (ibfd
);
2639 flags
|= bfd_flags_to_set
;
2640 flags
&= ~bfd_flags_to_clear
;
2641 flags
&= bfd_applicable_file_flags (obfd
);
2643 if (strip_symbols
== STRIP_ALL
)
2644 flags
&= ~HAS_RELOC
;
2646 if (!bfd_set_start_address (obfd
, start
)
2647 || !bfd_set_file_flags (obfd
, flags
))
2649 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2654 /* Copy architecture of input file to output file. */
2655 iarch
= bfd_get_arch (ibfd
);
2656 imach
= bfd_get_mach (ibfd
);
2659 if (iarch
== bfd_arch_unknown
)
2661 iarch
= input_arch
->arch
;
2662 imach
= input_arch
->mach
;
2665 non_fatal (_("Input file `%s' ignores binary architecture parameter."),
2666 bfd_get_archive_filename (ibfd
));
2668 if (iarch
== bfd_arch_unknown
2669 && bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
2670 && bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
2672 const struct elf_backend_data
*bed
= get_elf_backend_data (obfd
);
2676 if (!bfd_set_arch_mach (obfd
, iarch
, imach
)
2677 && (ibfd
->target_defaulted
2678 || bfd_get_arch (ibfd
) != bfd_get_arch (obfd
)))
2680 if (bfd_get_arch (ibfd
) == bfd_arch_unknown
)
2681 non_fatal (_("Unable to recognise the format of the input file `%s'"),
2682 bfd_get_archive_filename (ibfd
));
2684 non_fatal (_("Output file cannot represent architecture `%s'"),
2685 bfd_printable_arch_mach (bfd_get_arch (ibfd
),
2686 bfd_get_mach (ibfd
)));
2690 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
2692 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2696 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
2697 && bfd_pei_p (obfd
))
2699 /* Set up PE parameters. */
2700 pe_data_type
*pe
= pe_data (obfd
);
2702 /* Copy PE parameters before changing them. */
2703 if (bfd_get_flavour (ibfd
) == bfd_target_coff_flavour
2704 && bfd_pei_p (ibfd
))
2705 pe
->pe_opthdr
= pe_data (ibfd
)->pe_opthdr
;
2707 if (pe_file_alignment
!= (bfd_vma
) -1)
2708 pe
->pe_opthdr
.FileAlignment
= pe_file_alignment
;
2710 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
2712 if (pe_heap_commit
!= (bfd_vma
) -1)
2713 pe
->pe_opthdr
.SizeOfHeapCommit
= pe_heap_commit
;
2715 if (pe_heap_reserve
!= (bfd_vma
) -1)
2716 pe
->pe_opthdr
.SizeOfHeapCommit
= pe_heap_reserve
;
2718 if (pe_image_base
!= (bfd_vma
) -1)
2719 pe
->pe_opthdr
.ImageBase
= pe_image_base
;
2721 if (pe_section_alignment
!= (bfd_vma
) -1)
2722 pe
->pe_opthdr
.SectionAlignment
= pe_section_alignment
;
2724 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
2726 if (pe_stack_commit
!= (bfd_vma
) -1)
2727 pe
->pe_opthdr
.SizeOfStackCommit
= pe_stack_commit
;
2729 if (pe_stack_reserve
!= (bfd_vma
) -1)
2730 pe
->pe_opthdr
.SizeOfStackCommit
= pe_stack_reserve
;
2732 if (pe_subsystem
!= -1)
2733 pe
->pe_opthdr
.Subsystem
= pe_subsystem
;
2735 if (pe_major_subsystem_version
!= -1)
2736 pe
->pe_opthdr
.MajorSubsystemVersion
= pe_major_subsystem_version
;
2738 if (pe_minor_subsystem_version
!= -1)
2739 pe
->pe_opthdr
.MinorSubsystemVersion
= pe_minor_subsystem_version
;
2741 if (pe_file_alignment
> pe_section_alignment
)
2743 char file_alignment
[20], section_alignment
[20];
2745 sprintf_vma (file_alignment
, pe_file_alignment
);
2746 sprintf_vma (section_alignment
, pe_section_alignment
);
2747 non_fatal (_("warning: file alignment (0x%s) > section alignment (0x%s)"),
2749 file_alignment
, section_alignment
);
2756 if (osympp
!= isympp
)
2762 symsize
= bfd_get_symtab_upper_bound (ibfd
);
2765 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2769 osympp
= isympp
= (asymbol
**) xmalloc (symsize
);
2770 symcount
= bfd_canonicalize_symtab (ibfd
, isympp
);
2773 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2776 /* PR 17512: file: d6323821
2777 If the symbol table could not be loaded do not pretend that we have
2778 any symbols. This trips us up later on when we load the relocs. */
2782 osympp
= isympp
= NULL
;
2785 /* BFD mandates that all output sections be created and sizes set before
2786 any output is done. Thus, we traverse all sections multiple times. */
2787 bfd_map_over_sections (ibfd
, setup_section
, obfd
);
2789 if (!extract_symbol
)
2790 setup_bfd_headers (ibfd
, obfd
);
2792 if (add_sections
!= NULL
)
2794 struct section_add
*padd
;
2795 struct section_list
*pset
;
2797 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
2801 pset
= find_section_list (padd
->name
, FALSE
,
2802 SECTION_CONTEXT_SET_FLAGS
);
2804 flags
= pset
->flags
| SEC_HAS_CONTENTS
;
2806 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DATA
;
2808 /* bfd_make_section_with_flags() does not return very helpful
2809 error codes, so check for the most likely user error first. */
2810 if (bfd_get_section_by_name (obfd
, padd
->name
))
2812 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2813 _("can't add section '%s'"), padd
->name
);
2818 /* We use LINKER_CREATED here so that the backend hooks
2819 will create any special section type information,
2820 instead of presuming we know what we're doing merely
2821 because we set the flags. */
2822 padd
->section
= bfd_make_section_with_flags
2823 (obfd
, padd
->name
, flags
| SEC_LINKER_CREATED
);
2824 if (padd
->section
== NULL
)
2826 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2827 _("can't create section `%s'"),
2833 if (!bfd_set_section_size (padd
->section
, padd
->size
))
2835 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2839 pset
= find_section_list (padd
->name
, FALSE
,
2840 SECTION_CONTEXT_SET_VMA
| SECTION_CONTEXT_ALTER_VMA
);
2842 && !bfd_set_section_vma (padd
->section
, pset
->vma_val
))
2844 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2848 pset
= find_section_list (padd
->name
, FALSE
,
2849 SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_ALTER_LMA
);
2852 padd
->section
->lma
= pset
->lma_val
;
2854 if (!bfd_set_section_alignment
2855 (padd
->section
, bfd_section_alignment (padd
->section
)))
2857 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2864 if (update_sections
!= NULL
)
2866 struct section_add
*pupdate
;
2868 for (pupdate
= update_sections
;
2870 pupdate
= pupdate
->next
)
2872 pupdate
->section
= bfd_get_section_by_name (ibfd
, pupdate
->name
);
2873 if (pupdate
->section
== NULL
)
2875 non_fatal (_("error: %s not found, can't be updated"), pupdate
->name
);
2879 osec
= pupdate
->section
->output_section
;
2880 if (!bfd_set_section_size (osec
, pupdate
->size
))
2882 bfd_nonfatal_message (NULL
, obfd
, osec
, NULL
);
2888 merged_note_section
* merged_note_sections
= NULL
;
2891 /* This palaver is necessary because we must set the output
2892 section size first, before its contents are ready. */
2893 for (osec
= ibfd
->sections
; osec
!= NULL
; osec
= osec
->next
)
2895 if (! is_mergeable_note_section (ibfd
, osec
))
2898 /* If the section is going to be completly deleted then
2899 do not bother to merge it. */
2900 if (osec
->output_section
== NULL
)
2903 bfd_size_type size
= bfd_section_size (osec
);
2907 bfd_nonfatal_message (NULL
, ibfd
, osec
,
2908 _("warning: note section is empty"));
2912 merged_note_section
* merged
= xmalloc (sizeof * merged
);
2913 merged
->contents
= NULL
;
2914 if (! bfd_get_full_section_contents (ibfd
, osec
, & merged
->contents
))
2916 bfd_nonfatal_message (NULL
, ibfd
, osec
,
2917 _("warning: could not load note section"));
2922 merged
->size
= merge_gnu_build_notes (ibfd
, osec
, size
,
2925 /* FIXME: Once we have read the contents in, we must write
2926 them out again. So even if the mergeing has achieved
2927 nothing we still add this entry to the merge list. */
2929 if (size
!= merged
->size
2930 && !bfd_set_section_size (osec
->output_section
, merged
->size
))
2932 bfd_nonfatal_message (NULL
, obfd
, osec
,
2933 _("warning: failed to set merged notes size"));
2934 free (merged
->contents
);
2939 /* Add section to list of merged sections. */
2941 merged
->next
= merged_note_sections
;
2942 merged_note_sections
= merged
;
2946 if (dump_sections
!= NULL
)
2948 struct section_add
* pdump
;
2950 for (pdump
= dump_sections
; pdump
!= NULL
; pdump
= pdump
->next
)
2952 osec
= bfd_get_section_by_name (ibfd
, pdump
->name
);
2955 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
2956 _("can't dump section '%s' - it does not exist"),
2961 if ((bfd_section_flags (osec
) & SEC_HAS_CONTENTS
) == 0)
2963 bfd_nonfatal_message (NULL
, ibfd
, osec
,
2964 _("can't dump section - it has no contents"));
2968 bfd_size_type size
= bfd_section_size (osec
);
2971 bfd_nonfatal_message (NULL
, ibfd
, osec
,
2972 _("can't dump section - it is empty"));
2977 f
= fopen (pdump
->filename
, FOPEN_WB
);
2980 bfd_nonfatal_message (pdump
->filename
, NULL
, NULL
,
2981 _("could not open section dump file"));
2986 if (bfd_malloc_and_get_section (ibfd
, osec
, &contents
))
2988 if (fwrite (contents
, 1, size
, f
) != size
)
2990 non_fatal (_("error writing section contents to %s (error: %s)"),
2999 bfd_nonfatal_message (NULL
, ibfd
, osec
,
3000 _("could not retrieve section contents"));
3007 if (gnu_debuglink_filename
!= NULL
)
3009 /* PR 15125: Give a helpful warning message if
3010 the debuglink section already exists, and
3011 allow the rest of the copy to complete. */
3012 if (bfd_get_section_by_name (obfd
, ".gnu_debuglink"))
3014 non_fatal (_("%s: debuglink section already exists"),
3015 bfd_get_filename (obfd
));
3016 gnu_debuglink_filename
= NULL
;
3020 gnu_debuglink_section
= bfd_create_gnu_debuglink_section
3021 (obfd
, gnu_debuglink_filename
);
3023 if (gnu_debuglink_section
== NULL
)
3025 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3026 _("cannot create debug link section `%s'"),
3027 gnu_debuglink_filename
);
3031 /* Special processing for PE format files. We
3032 have no way to distinguish PE from COFF here. */
3033 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
)
3035 bfd_vma debuglink_vma
;
3036 asection
* highest_section
;
3038 /* The PE spec requires that all sections be adjacent and sorted
3039 in ascending order of VMA. It also specifies that debug
3040 sections should be last. This is despite the fact that debug
3041 sections are not loaded into memory and so in theory have no
3044 This means that the debuglink section must be given a non-zero
3045 VMA which makes it contiguous with other debug sections. So
3046 walk the current section list, find the section with the
3047 highest VMA and start the debuglink section after that one. */
3048 for (osec
= obfd
->sections
, highest_section
= NULL
;
3052 && (highest_section
== NULL
3053 || osec
->vma
> highest_section
->vma
))
3054 highest_section
= osec
;
3056 if (highest_section
)
3057 debuglink_vma
= BFD_ALIGN (highest_section
->vma
3058 + highest_section
->size
,
3059 /* FIXME: We ought to be using
3060 COFF_PAGE_SIZE here or maybe
3061 bfd_section_alignment() (if it
3062 was set) but since this is for PE
3063 and we know the required alignment
3064 it is easier just to hard code it. */
3067 /* Umm, not sure what to do in this case. */
3068 debuglink_vma
= 0x1000;
3070 bfd_set_section_vma (gnu_debuglink_section
, debuglink_vma
);
3075 c
= bfd_count_sections (obfd
);
3077 && (gap_fill_set
|| pad_to_set
))
3081 /* We must fill in gaps between the sections and/or we must pad
3082 the last section to a specified address. We do this by
3083 grabbing a list of the sections, sorting them by VMA, and
3084 increasing the section sizes as required to fill the gaps.
3085 We write out the gap contents below. */
3087 osections
= (asection
**) xmalloc (c
* sizeof (asection
*));
3089 bfd_map_over_sections (obfd
, get_sections
, &set
);
3091 qsort (osections
, c
, sizeof (asection
*), compare_section_lma
);
3093 gaps
= (bfd_size_type
*) xmalloc (c
* sizeof (bfd_size_type
));
3094 memset (gaps
, 0, c
* sizeof (bfd_size_type
));
3098 for (i
= 0; i
< c
- 1; i
++)
3102 bfd_vma gap_start
, gap_stop
;
3104 flags
= bfd_section_flags (osections
[i
]);
3105 if ((flags
& SEC_HAS_CONTENTS
) == 0
3106 || (flags
& SEC_LOAD
) == 0)
3109 size
= bfd_section_size (osections
[i
]);
3110 gap_start
= bfd_section_lma (osections
[i
]) + size
;
3111 gap_stop
= bfd_section_lma (osections
[i
+ 1]);
3112 if (gap_start
< gap_stop
)
3114 if (!bfd_set_section_size (osections
[i
],
3115 size
+ (gap_stop
- gap_start
)))
3117 bfd_nonfatal_message (NULL
, obfd
, osections
[i
],
3118 _("Can't fill gap after section"));
3122 gaps
[i
] = gap_stop
- gap_start
;
3123 if (max_gap
< gap_stop
- gap_start
)
3124 max_gap
= gap_stop
- gap_start
;
3134 lma
= bfd_section_lma (osections
[c
- 1]);
3135 size
= bfd_section_size (osections
[c
- 1]);
3136 if (lma
+ size
< pad_to
)
3138 if (!bfd_set_section_size (osections
[c
- 1], pad_to
- lma
))
3140 bfd_nonfatal_message (NULL
, obfd
, osections
[c
- 1],
3141 _("can't add padding"));
3146 gaps
[c
- 1] = pad_to
- (lma
+ size
);
3147 if (max_gap
< pad_to
- (lma
+ size
))
3148 max_gap
= pad_to
- (lma
+ size
);
3154 /* Symbol filtering must happen after the output sections
3155 have been created, but before their contents are set. */
3157 if (convert_debugging
)
3158 dhandle
= read_debugging_info (ibfd
, isympp
, symcount
, FALSE
);
3160 if (strip_symbols
== STRIP_DEBUG
3161 || strip_symbols
== STRIP_ALL
3162 || strip_symbols
== STRIP_UNNEEDED
3163 || strip_symbols
== STRIP_NONDEBUG
3164 || strip_symbols
== STRIP_DWO
3165 || strip_symbols
== STRIP_NONDWO
3166 || discard_locals
!= LOCALS_UNDEF
3168 || htab_elements (strip_specific_htab
) != 0
3169 || htab_elements (keep_specific_htab
) != 0
3170 || htab_elements (localize_specific_htab
) != 0
3171 || htab_elements (globalize_specific_htab
) != 0
3172 || htab_elements (keepglobal_specific_htab
) != 0
3173 || htab_elements (weaken_specific_htab
) != 0
3174 || htab_elements (redefine_specific_htab
) != 0
3175 || prefix_symbols_string
3178 || convert_debugging
3179 || change_leading_char
3180 || remove_leading_char
3181 || section_rename_list
3185 /* Mark symbols used in output relocations so that they
3186 are kept, even if they are local labels or static symbols.
3188 Note we iterate over the input sections examining their
3189 relocations since the relocations for the output sections
3190 haven't been set yet. mark_symbols_used_in_relocations will
3191 ignore input sections which have no corresponding output
3193 if (strip_symbols
!= STRIP_ALL
)
3195 bfd_set_error (bfd_error_no_error
);
3196 bfd_map_over_sections (ibfd
,
3197 mark_symbols_used_in_relocations
,
3199 if (bfd_get_error () != bfd_error_no_error
)
3206 osympp
= (asymbol
**) xmalloc ((symcount
+ add_symbols
+ 1) * sizeof (asymbol
*));
3207 symcount
= filter_symbols (ibfd
, obfd
, osympp
, isympp
, symcount
);
3210 if (convert_debugging
&& dhandle
!= NULL
)
3214 res
= write_debugging_info (obfd
, dhandle
, &symcount
, &osympp
);
3217 dhandle
= NULL
; /* Paranoia... */
3226 bfd_set_symtab (obfd
, osympp
, symcount
);
3228 /* This has to happen before section positions are set. */
3229 bfd_map_over_sections (ibfd
, copy_relocations_in_section
, obfd
);
3231 /* This has to happen after the symbol table has been set. */
3232 bfd_map_over_sections (ibfd
, copy_section
, obfd
);
3234 if (add_sections
!= NULL
)
3236 struct section_add
*padd
;
3238 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
3240 if (! bfd_set_section_contents (obfd
, padd
->section
, padd
->contents
,
3243 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
3249 if (update_sections
!= NULL
)
3251 struct section_add
*pupdate
;
3253 for (pupdate
= update_sections
;
3255 pupdate
= pupdate
->next
)
3257 osec
= pupdate
->section
->output_section
;
3258 if (! bfd_set_section_contents (obfd
, osec
, pupdate
->contents
,
3261 bfd_nonfatal_message (NULL
, obfd
, osec
, NULL
);
3267 if (merged_note_sections
!= NULL
)
3269 merged_note_section
* merged
= NULL
;
3271 for (osec
= obfd
->sections
; osec
!= NULL
; osec
= osec
->next
)
3273 if (! is_mergeable_note_section (obfd
, osec
))
3277 merged
= merged_note_sections
;
3279 /* It is likely that output sections are in the same order
3280 as the input sections, but do not assume that this is
3282 if (strcmp (bfd_section_name (merged
->sec
),
3283 bfd_section_name (osec
)) != 0)
3285 for (merged
= merged_note_sections
;
3287 merged
= merged
->next
)
3288 if (strcmp (bfd_section_name (merged
->sec
),
3289 bfd_section_name (osec
)) == 0)
3294 bfd_nonfatal_message
3296 _("error: failed to locate merged notes"));
3301 if (merged
->contents
== NULL
)
3303 bfd_nonfatal_message
3305 _("error: failed to merge notes"));
3309 if (! bfd_set_section_contents (obfd
, osec
, merged
->contents
, 0,
3312 bfd_nonfatal_message
3314 _("error: failed to copy merged notes into output"));
3318 merged
= merged
->next
;
3321 /* Free the memory. */
3322 merged_note_section
* next
;
3323 for (merged
= merged_note_sections
; merged
!= NULL
; merged
= next
)
3325 next
= merged
->next
;
3326 free (merged
->contents
);
3330 else if (merge_notes
&& ! is_strip
)
3331 non_fatal (_("%s: Could not find any mergeable note sections"),
3332 bfd_get_filename (ibfd
));
3334 if (gnu_debuglink_filename
!= NULL
)
3336 if (! bfd_fill_in_gnu_debuglink_section
3337 (obfd
, gnu_debuglink_section
, gnu_debuglink_filename
))
3339 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3340 _("cannot fill debug link section `%s'"),
3341 gnu_debuglink_filename
);
3346 if (gap_fill_set
|| pad_to_set
)
3350 /* Fill in the gaps. */
3353 buf
= (bfd_byte
*) xmalloc (max_gap
);
3354 memset (buf
, gap_fill
, max_gap
);
3356 c
= bfd_count_sections (obfd
);
3357 for (i
= 0; i
< c
; i
++)
3365 off
= bfd_section_size (osections
[i
]) - left
;
3376 if (! bfd_set_section_contents (obfd
, osections
[i
], buf
,
3379 bfd_nonfatal_message (NULL
, obfd
, osections
[i
], NULL
);
3395 /* Allow the BFD backend to copy any private data it understands
3396 from the input BFD to the output BFD. This is done last to
3397 permit the routine to look at the filtered symbol table, which is
3398 important for the ECOFF code at least. */
3399 if (! bfd_copy_private_bfd_data (ibfd
, obfd
))
3401 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3402 _("error copying private BFD data"));
3406 /* Switch to the alternate machine code. We have to do this at the
3407 very end, because we only initialize the header when we create
3408 the first section. */
3409 if (use_alt_mach_code
!= 0)
3411 if (! bfd_alt_mach_code (obfd
, use_alt_mach_code
))
3413 non_fatal (_("this target does not support %lu alternative machine codes"),
3415 if (bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
3417 non_fatal (_("treating that number as an absolute e_machine value instead"));
3418 elf_elfheader (obfd
)->e_machine
= use_alt_mach_code
;
3421 non_fatal (_("ignoring the alternative value"));
3428 /* Read each archive element in turn from IBFD, copy the
3429 contents to temp file, and keep the temp file handle.
3430 If 'force_output_target' is TRUE then make sure that
3431 all elements in the new archive are of the type
3435 copy_archive (bfd
*ibfd
, bfd
*obfd
, const char *output_target
,
3436 bfd_boolean force_output_target
,
3437 const bfd_arch_info_type
*input_arch
)
3441 struct name_list
*next
;
3445 bfd
**ptr
= &obfd
->archive_head
;
3448 const char *filename
;
3450 /* PR 24281: It is not clear what should happen when copying a thin archive.
3451 One part is straight forward - if the output archive is in a different
3452 directory from the input archive then any relative paths in the library
3453 should be adjusted to the new location. But if any transformation
3454 options are active (eg strip, rename, add, etc) then the implication is
3455 that these should be applied to the files pointed to by the archive.
3456 But since objcopy is not destructive, this means that new files must be
3457 created, and there is no guidance for the names of the new files. (Plus
3458 this conflicts with one of the goals of thin libraries - only taking up
3459 a minimal amount of space in the file system).
3461 So for now we fail if an attempt is made to copy such libraries. */
3462 if (ibfd
->is_thin_archive
)
3465 bfd_set_error (bfd_error_invalid_operation
);
3466 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
3467 _("sorry: copying thin archives is not currently supported"));
3471 /* Make a temp directory to hold the contents. */
3472 dir
= make_tempdir (bfd_get_filename (obfd
));
3474 fatal (_("cannot create tempdir for archive copying (error: %s)"),
3477 if (strip_symbols
== STRIP_ALL
)
3478 obfd
->has_armap
= FALSE
;
3480 obfd
->has_armap
= ibfd
->has_armap
;
3481 obfd
->is_thin_archive
= ibfd
->is_thin_archive
;
3484 obfd
->flags
|= BFD_DETERMINISTIC_OUTPUT
;
3488 this_element
= bfd_openr_next_archived_file (ibfd
, NULL
);
3490 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
3493 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
3494 goto cleanup_and_exit
;
3497 while (!status
&& this_element
!= NULL
)
3503 int stat_status
= 0;
3504 bfd_boolean del
= TRUE
;
3505 bfd_boolean ok_object
;
3507 /* PR binutils/17533: Do not allow directory traversal
3508 outside of the current directory tree by archive members. */
3509 if (! is_valid_archive_path (bfd_get_filename (this_element
)))
3511 non_fatal (_("illegal pathname found in archive member: %s"),
3512 bfd_get_filename (this_element
));
3514 goto cleanup_and_exit
;
3517 /* Create an output file for this member. */
3518 output_name
= concat (dir
, "/",
3519 bfd_get_filename (this_element
), (char *) 0);
3521 /* If the file already exists, make another temp dir. */
3522 if (stat (output_name
, &buf
) >= 0)
3524 char * tmpdir
= make_tempdir (output_name
);
3529 non_fatal (_("cannot create tempdir for archive copying (error: %s)"),
3532 goto cleanup_and_exit
;
3535 l
= (struct name_list
*) xmalloc (sizeof (struct name_list
));
3540 output_name
= concat (tmpdir
, "/",
3541 bfd_get_filename (this_element
), (char *) 0);
3546 stat_status
= bfd_stat_arch_elt (this_element
, &buf
);
3548 if (stat_status
!= 0)
3549 non_fatal (_("internal stat error on %s"),
3550 bfd_get_filename (this_element
));
3553 l
= (struct name_list
*) xmalloc (sizeof (struct name_list
));
3554 l
->name
= output_name
;
3559 ok_object
= bfd_check_format (this_element
, bfd_object
);
3561 bfd_nonfatal_message (NULL
, this_element
, NULL
,
3562 _("Unable to recognise the format of file"));
3564 /* PR binutils/3110: Cope with archives
3565 containing multiple target types. */
3566 if (force_output_target
|| !ok_object
)
3567 output_bfd
= bfd_openw (output_name
, output_target
);
3569 output_bfd
= bfd_openw (output_name
, bfd_get_target (this_element
));
3571 if (output_bfd
== NULL
)
3573 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3575 goto cleanup_and_exit
;
3580 del
= !copy_object (this_element
, output_bfd
, input_arch
);
3582 if (del
&& bfd_get_arch (this_element
) == bfd_arch_unknown
)
3583 /* Try again as an unknown object file. */
3585 else if (!bfd_close (output_bfd
))
3587 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3588 /* Error in new object file. Don't change archive. */
3595 del
= !copy_unknown_object (this_element
, output_bfd
);
3596 if (!bfd_close_all_done (output_bfd
))
3598 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3599 /* Error in new object file. Don't change archive. */
3606 unlink (output_name
);
3611 if (preserve_dates
&& stat_status
== 0)
3612 set_times (output_name
, &buf
);
3614 /* Open the newly output file and attach to our list. */
3615 output_bfd
= bfd_openr (output_name
, output_target
);
3617 l
->obfd
= output_bfd
;
3620 ptr
= &output_bfd
->archive_next
;
3622 last_element
= this_element
;
3624 this_element
= bfd_openr_next_archived_file (ibfd
, last_element
);
3626 bfd_close (last_element
);
3631 filename
= bfd_get_filename (obfd
);
3632 if (!bfd_close (obfd
))
3635 bfd_nonfatal_message (filename
, NULL
, NULL
, NULL
);
3638 filename
= bfd_get_filename (ibfd
);
3639 if (!bfd_close (ibfd
))
3642 bfd_nonfatal_message (filename
, NULL
, NULL
, NULL
);
3646 /* Delete all the files that we opened. */
3648 struct name_list
* next
;
3650 for (l
= list
; l
!= NULL
; l
= next
)
3652 if (l
->obfd
== NULL
)
3656 bfd_close (l
->obfd
);
3668 set_long_section_mode (bfd
*output_bfd
, bfd
*input_bfd
, enum long_section_name_handling style
)
3670 /* This is only relevant to Coff targets. */
3671 if (bfd_get_flavour (output_bfd
) == bfd_target_coff_flavour
)
3674 && bfd_get_flavour (input_bfd
) == bfd_target_coff_flavour
)
3675 style
= bfd_coff_long_section_names (input_bfd
) ? ENABLE
: DISABLE
;
3676 bfd_coff_set_long_section_names (output_bfd
, style
!= DISABLE
);
3680 /* The top-level control. */
3683 copy_file (const char *input_filename
, const char *output_filename
,
3684 const char *input_target
, const char *output_target
,
3685 const bfd_arch_info_type
*input_arch
)
3688 char **obj_matching
;
3689 char **core_matching
;
3690 off_t size
= get_file_size (input_filename
);
3695 non_fatal (_("error: the input file '%s' is empty"),
3701 /* To allow us to do "strip *" without dying on the first
3702 non-object file, failures are nonfatal. */
3703 ibfd
= bfd_openr (input_filename
, input_target
);
3706 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3711 switch (do_debug_sections
)
3715 case compress_gnu_zlib
:
3716 case compress_gabi_zlib
:
3717 ibfd
->flags
|= BFD_COMPRESS
;
3718 /* Don't check if input is ELF here since this information is
3719 only available after bfd_check_format_matches is called. */
3720 if (do_debug_sections
!= compress_gnu_zlib
)
3721 ibfd
->flags
|= BFD_COMPRESS_GABI
;
3724 ibfd
->flags
|= BFD_DECOMPRESS
;
3730 switch (do_elf_stt_common
)
3732 case elf_stt_common
:
3733 ibfd
->flags
|= BFD_CONVERT_ELF_COMMON
| BFD_USE_ELF_STT_COMMON
;
3736 case no_elf_stt_common
:
3737 ibfd
->flags
|= BFD_CONVERT_ELF_COMMON
;
3743 if (bfd_check_format (ibfd
, bfd_archive
))
3745 bfd_boolean force_output_target
;
3748 /* bfd_get_target does not return the correct value until
3749 bfd_check_format succeeds. */
3750 if (output_target
== NULL
)
3752 output_target
= bfd_get_target (ibfd
);
3753 force_output_target
= FALSE
;
3756 force_output_target
= TRUE
;
3758 obfd
= bfd_openw (output_filename
, output_target
);
3761 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3766 if (gnu_debuglink_filename
!= NULL
)
3768 non_fatal (_("--add-gnu-debuglink ignored for archive %s"),
3769 bfd_get_filename (ibfd
));
3770 gnu_debuglink_filename
= NULL
;
3773 /* This is a no-op on non-Coff targets. */
3774 set_long_section_mode (obfd
, ibfd
, long_section_names
);
3776 copy_archive (ibfd
, obfd
, output_target
, force_output_target
, input_arch
);
3778 else if (bfd_check_format_matches (ibfd
, bfd_object
, &obj_matching
))
3783 /* bfd_get_target does not return the correct value until
3784 bfd_check_format succeeds. */
3785 if (output_target
== NULL
)
3786 output_target
= bfd_get_target (ibfd
);
3788 obfd
= bfd_openw (output_filename
, output_target
);
3791 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3795 /* This is a no-op on non-Coff targets. */
3796 set_long_section_mode (obfd
, ibfd
, long_section_names
);
3798 if (! copy_object (ibfd
, obfd
, input_arch
))
3801 /* PR 17512: file: 0f15796a.
3802 If the file could not be copied it may not be in a writeable
3803 state. So use bfd_close_all_done to avoid the possibility of
3804 writing uninitialised data into the file. */
3805 if (! (status
? bfd_close_all_done (obfd
) : bfd_close (obfd
)))
3808 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3812 if (!bfd_close (ibfd
))
3815 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3821 bfd_error_type obj_error
= bfd_get_error ();
3822 bfd_error_type core_error
;
3824 if (bfd_check_format_matches (ibfd
, bfd_core
, &core_matching
))
3826 /* This probably can't happen.. */
3827 if (obj_error
== bfd_error_file_ambiguously_recognized
)
3828 free (obj_matching
);
3832 core_error
= bfd_get_error ();
3833 /* Report the object error in preference to the core error. */
3834 if (obj_error
!= core_error
)
3835 bfd_set_error (obj_error
);
3837 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3839 if (obj_error
== bfd_error_file_ambiguously_recognized
)
3841 list_matching_formats (obj_matching
);
3842 free (obj_matching
);
3844 if (core_error
== bfd_error_file_ambiguously_recognized
)
3846 list_matching_formats (core_matching
);
3847 free (core_matching
);
3854 /* Add a name to the section renaming list. */
3857 add_section_rename (const char * old_name
, const char * new_name
,
3860 section_rename
* srename
;
3862 /* Check for conflicts first. */
3863 for (srename
= section_rename_list
; srename
!= NULL
; srename
= srename
->next
)
3864 if (strcmp (srename
->old_name
, old_name
) == 0)
3866 /* Silently ignore duplicate definitions. */
3867 if (strcmp (srename
->new_name
, new_name
) == 0
3868 && srename
->flags
== flags
)
3871 fatal (_("Multiple renames of section %s"), old_name
);
3874 srename
= (section_rename
*) xmalloc (sizeof (* srename
));
3876 srename
->old_name
= old_name
;
3877 srename
->new_name
= new_name
;
3878 srename
->flags
= flags
;
3879 srename
->next
= section_rename_list
;
3881 section_rename_list
= srename
;
3884 /* Check the section rename list for a new name of the input section
3885 called OLD_NAME. Returns the new name if one is found and sets
3886 RETURNED_FLAGS if non-NULL to the flags to be used for this section. */
3889 find_section_rename (const char *old_name
, flagword
*returned_flags
)
3891 const section_rename
*srename
;
3893 for (srename
= section_rename_list
; srename
!= NULL
; srename
= srename
->next
)
3894 if (strcmp (srename
->old_name
, old_name
) == 0)
3896 if (returned_flags
!= NULL
&& srename
->flags
!= (flagword
) -1)
3897 *returned_flags
= srename
->flags
;
3899 return srename
->new_name
;
3905 /* Once each of the sections is copied, we may still need to do some
3906 finalization work for private section headers. Do that here. */
3909 setup_bfd_headers (bfd
*ibfd
, bfd
*obfd
)
3911 /* Allow the BFD backend to copy any private data it understands
3912 from the input section to the output section. */
3913 if (! bfd_copy_private_header_data (ibfd
, obfd
))
3916 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
3917 _("error in private header data"));
3921 /* All went well. */
3925 /* Create a section in OBFD with the same
3926 name and attributes as ISECTION in IBFD. */
3929 setup_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
3931 bfd
*obfd
= (bfd
*) obfdarg
;
3932 struct section_list
*p
;
3940 char *prefix
= NULL
;
3941 bfd_boolean make_nobits
;
3942 unsigned int alignment
;
3944 if (is_strip_section (ibfd
, isection
))
3947 /* Get the, possibly new, name of the output section. */
3948 name
= bfd_section_name (isection
);
3949 flags
= bfd_section_flags (isection
);
3950 if (bfd_get_flavour (ibfd
) != bfd_get_flavour (obfd
))
3952 flags
&= bfd_applicable_section_flags (ibfd
);
3953 flags
&= bfd_applicable_section_flags (obfd
);
3955 name
= find_section_rename (name
, &flags
);
3957 /* Prefix sections. */
3958 if (prefix_alloc_sections_string
3959 && (bfd_section_flags (isection
) & SEC_ALLOC
) != 0)
3960 prefix
= prefix_alloc_sections_string
;
3961 else if (prefix_sections_string
)
3962 prefix
= prefix_sections_string
;
3968 n
= (char *) xmalloc (strlen (prefix
) + strlen (name
) + 1);
3974 make_nobits
= FALSE
;
3976 p
= find_section_list (bfd_section_name (isection
), FALSE
,
3977 SECTION_CONTEXT_SET_FLAGS
);
3979 flags
= p
->flags
| (flags
& (SEC_HAS_CONTENTS
| SEC_RELOC
));
3980 else if (strip_symbols
== STRIP_NONDEBUG
3981 && (flags
& (SEC_ALLOC
| SEC_GROUP
)) != 0
3982 && !is_nondebug_keep_contents_section (ibfd
, isection
))
3984 flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
| SEC_GROUP
);
3985 if (bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
3989 /* Twiddle the input section flags so that it seems to
3990 elf.c:copy_private_bfd_data that section flags have not
3991 changed between input and output sections. This hack
3992 prevents wholesale rewriting of the program headers. */
3993 isection
->flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
| SEC_GROUP
);
3997 osection
= bfd_make_section_anyway_with_flags (obfd
, name
, flags
);
3999 if (osection
== NULL
)
4001 err
= _("failed to create output section");
4006 elf_section_type (osection
) = SHT_NOBITS
;
4008 size
= bfd_section_size (isection
);
4009 size
= bfd_convert_section_size (ibfd
, isection
, obfd
, size
);
4011 size
= (size
+ interleave
- 1) / interleave
* copy_width
;
4012 else if (extract_symbol
)
4014 if (!bfd_set_section_size (osection
, size
))
4016 err
= _("failed to set size");
4020 vma
= bfd_section_vma (isection
);
4021 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4022 SECTION_CONTEXT_ALTER_VMA
| SECTION_CONTEXT_SET_VMA
);
4025 if (p
->context
& SECTION_CONTEXT_SET_VMA
)
4031 vma
+= change_section_address
;
4033 if (!bfd_set_section_vma (osection
, vma
))
4035 err
= _("failed to set vma");
4039 lma
= isection
->lma
;
4040 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4041 SECTION_CONTEXT_ALTER_LMA
| SECTION_CONTEXT_SET_LMA
);
4044 if (p
->context
& SECTION_CONTEXT_ALTER_LMA
)
4050 lma
+= change_section_address
;
4052 osection
->lma
= lma
;
4054 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4055 SECTION_CONTEXT_SET_ALIGNMENT
);
4057 alignment
= p
->alignment
;
4059 alignment
= bfd_section_alignment (isection
);
4061 /* FIXME: This is probably not enough. If we change the LMA we
4062 may have to recompute the header for the file as well. */
4063 if (!bfd_set_section_alignment (osection
, alignment
))
4065 err
= _("failed to set alignment");
4069 /* Copy merge entity size. */
4070 osection
->entsize
= isection
->entsize
;
4072 /* Copy compress status. */
4073 osection
->compress_status
= isection
->compress_status
;
4075 /* This used to be mangle_section; we do here to avoid using
4076 bfd_get_section_by_name since some formats allow multiple
4077 sections with the same name. */
4078 isection
->output_section
= osection
;
4079 isection
->output_offset
= 0;
4081 if ((isection
->flags
& SEC_GROUP
) != 0)
4083 asymbol
*gsym
= group_signature (isection
);
4087 gsym
->flags
|= BSF_KEEP
;
4088 if (bfd_get_flavour (ibfd
) == bfd_target_elf_flavour
)
4089 elf_group_id (isection
) = gsym
;
4093 /* Allow the BFD backend to copy any private data it understands
4094 from the input section to the output section. */
4095 if (!bfd_copy_private_section_data (ibfd
, isection
, obfd
, osection
))
4097 err
= _("failed to copy private data");
4101 /* All went well. */
4106 bfd_nonfatal_message (NULL
, obfd
, osection
, err
);
4109 /* Return TRUE if input section ISECTION should be skipped. */
4112 skip_section (bfd
*ibfd
, sec_ptr isection
, bfd_boolean skip_copy
)
4118 /* If we have already failed earlier on,
4119 do not keep on generating complaints now. */
4126 if (is_strip_section (ibfd
, isection
))
4129 if (is_update_section (ibfd
, isection
))
4132 /* When merging a note section we skip the copying of the contents,
4133 but not the copying of the relocs associated with the contents. */
4134 if (skip_copy
&& is_mergeable_note_section (ibfd
, isection
))
4137 flags
= bfd_section_flags (isection
);
4138 if ((flags
& SEC_GROUP
) != 0)
4141 osection
= isection
->output_section
;
4142 size
= bfd_section_size (isection
);
4144 if (size
== 0 || osection
== 0)
4150 /* Add section SECTION_PATTERN to the list of sections that will have their
4151 relocations removed. */
4154 handle_remove_relocations_option (const char *section_pattern
)
4156 find_section_list (section_pattern
, TRUE
, SECTION_CONTEXT_REMOVE_RELOCS
);
4159 /* Return TRUE if ISECTION from IBFD should have its relocations removed,
4160 otherwise return FALSE. If the user has requested that relocations be
4161 removed from a section that does not have relocations then this
4162 function will still return TRUE. */
4165 discard_relocations (bfd
*ibfd ATTRIBUTE_UNUSED
, asection
*isection
)
4167 return (find_section_list (bfd_section_name (isection
), FALSE
,
4168 SECTION_CONTEXT_REMOVE_RELOCS
) != NULL
);
4171 /* Wrapper for dealing with --remove-section (-R) command line arguments.
4172 A special case is detected here, if the user asks to remove a relocation
4173 section (one starting with ".rela" or ".rel") then this removal must
4174 be done using a different technique in a relocatable object. */
4177 handle_remove_section_option (const char *section_pattern
)
4179 find_section_list (section_pattern
, TRUE
, SECTION_CONTEXT_REMOVE
);
4180 if (strncmp (section_pattern
, ".rel", 4) == 0)
4182 section_pattern
+= 4;
4183 if (*section_pattern
== 'a')
4185 if (*section_pattern
)
4186 handle_remove_relocations_option (section_pattern
);
4188 sections_removed
= TRUE
;
4191 /* Copy relocations in input section ISECTION of IBFD to an output
4192 section with the same name in OBFDARG. If stripping then don't
4193 copy any relocation info. */
4196 copy_relocations_in_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
4198 bfd
*obfd
= (bfd
*) obfdarg
;
4204 if (skip_section (ibfd
, isection
, FALSE
))
4207 osection
= isection
->output_section
;
4209 /* Core files and DWO files do not need to be relocated. */
4210 if (bfd_get_format (obfd
) == bfd_core
4211 || strip_symbols
== STRIP_NONDWO
4212 || discard_relocations (ibfd
, isection
))
4216 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
4220 /* Do not complain if the target does not support relocations. */
4221 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
4226 bfd_nonfatal_message (NULL
, ibfd
, isection
, NULL
);
4234 bfd_set_reloc (obfd
, osection
, NULL
, 0);
4235 osection
->flags
&= ~SEC_RELOC
;
4239 if (isection
->orelocation
!= NULL
)
4241 /* Some other function has already set up the output relocs
4242 for us, so scan those instead of the default relocs. */
4243 relcount
= isection
->reloc_count
;
4244 relpp
= isection
->orelocation
;
4248 relpp
= (arelent
**) xmalloc (relsize
);
4249 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, isympp
);
4253 bfd_nonfatal_message (NULL
, ibfd
, isection
,
4254 _("relocation count is negative"));
4259 if (strip_symbols
== STRIP_ALL
)
4261 /* Remove relocations which are not in
4262 keep_strip_specific_list. */
4263 arelent
**temp_relpp
;
4264 long temp_relcount
= 0;
4267 temp_relpp
= (arelent
**) xmalloc (relsize
);
4268 for (i
= 0; i
< relcount
; i
++)
4270 /* PR 17512: file: 9e907e0c. */
4271 if (relpp
[i
]->sym_ptr_ptr
4273 && * relpp
[i
]->sym_ptr_ptr
)
4274 if (is_specified_symbol (bfd_asymbol_name (*relpp
[i
]->sym_ptr_ptr
),
4275 keep_specific_htab
))
4276 temp_relpp
[temp_relcount
++] = relpp
[i
];
4278 relcount
= temp_relcount
;
4279 if (isection
->orelocation
== NULL
)
4284 bfd_set_reloc (obfd
, osection
, relcount
== 0 ? NULL
: relpp
, relcount
);
4287 osection
->flags
&= ~SEC_RELOC
;
4293 /* Copy the data of input section ISECTION of IBFD
4294 to an output section with the same name in OBFD. */
4297 copy_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
4299 bfd
*obfd
= (bfd
*) obfdarg
;
4300 struct section_list
*p
;
4304 if (skip_section (ibfd
, isection
, TRUE
))
4307 osection
= isection
->output_section
;
4308 /* The output SHF_COMPRESSED section size is different from input if
4309 ELF classes of input and output aren't the same. We can't use
4310 the output section size since --interleave will shrink the output
4311 section. Size will be updated if the section is converted. */
4312 size
= bfd_section_size (isection
);
4314 if (bfd_section_flags (isection
) & SEC_HAS_CONTENTS
4315 && bfd_section_flags (osection
) & SEC_HAS_CONTENTS
)
4317 bfd_byte
*memhunk
= NULL
;
4319 if (!bfd_get_full_section_contents (ibfd
, isection
, &memhunk
)
4320 || !bfd_convert_section_contents (ibfd
, isection
, obfd
,
4324 bfd_nonfatal_message (NULL
, ibfd
, isection
, NULL
);
4331 /* We don't handle leftover bytes (too many possible behaviors,
4332 and we don't know what the user wants). The section length
4333 must be a multiple of the number of bytes to swap. */
4334 if ((size
% reverse_bytes
) == 0)
4339 for (i
= 0; i
< size
; i
+= reverse_bytes
)
4340 for (j
= 0; j
< (unsigned long)(reverse_bytes
/ 2); j
++)
4342 bfd_byte
*m
= (bfd_byte
*) memhunk
;
4345 m
[i
+ j
] = m
[(i
+ reverse_bytes
) - (j
+ 1)];
4346 m
[(i
+ reverse_bytes
) - (j
+ 1)] = b
;
4350 /* User must pad the section up in order to do this. */
4351 fatal (_("cannot reverse bytes: length of section %s must be evenly divisible by %d"),
4352 bfd_section_name (isection
), reverse_bytes
);
4357 /* Keep only every `copy_byte'th byte in MEMHUNK. */
4358 char *from
= (char *) memhunk
+ copy_byte
;
4359 char *to
= (char *) memhunk
;
4360 char *end
= (char *) memhunk
+ size
;
4363 /* If the section address is not exactly divisible by the interleave,
4364 then we must bias the from address. If the copy_byte is less than
4365 the bias, then we must skip forward one interleave, and increment
4367 int extra
= isection
->lma
% interleave
;
4369 if (copy_byte
< extra
)
4372 for (; from
< end
; from
+= interleave
)
4373 for (i
= 0; i
< copy_width
; i
++)
4375 if (&from
[i
] >= end
)
4380 size
= (size
+ interleave
- 1 - copy_byte
) / interleave
* copy_width
;
4381 osection
->lma
/= interleave
;
4382 if (copy_byte
< extra
)
4386 if (!bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
4389 bfd_nonfatal_message (NULL
, obfd
, osection
, NULL
);
4395 else if ((p
= find_section_list (bfd_section_name (isection
),
4396 FALSE
, SECTION_CONTEXT_SET_FLAGS
)) != NULL
4397 && (p
->flags
& SEC_HAS_CONTENTS
) != 0)
4399 void *memhunk
= xmalloc (size
);
4401 /* We don't permit the user to turn off the SEC_HAS_CONTENTS
4402 flag--they can just remove the section entirely and add it
4403 back again. However, we do permit them to turn on the
4404 SEC_HAS_CONTENTS flag, and take it to mean that the section
4405 contents should be zeroed out. */
4407 memset (memhunk
, 0, size
);
4408 if (! bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
4411 bfd_nonfatal_message (NULL
, obfd
, osection
, NULL
);
4419 /* Get all the sections. This is used when --gap-fill or --pad-to is
4423 get_sections (bfd
*obfd ATTRIBUTE_UNUSED
, asection
*osection
, void *secppparg
)
4425 asection
***secppp
= (asection
***) secppparg
;
4427 **secppp
= osection
;
4431 /* Sort sections by LMA. This is called via qsort, and is used when
4432 --gap-fill or --pad-to is used. We force non loadable or empty
4433 sections to the front, where they are easier to ignore. */
4436 compare_section_lma (const void *arg1
, const void *arg2
)
4438 const asection
*sec1
= *(const asection
**) arg1
;
4439 const asection
*sec2
= *(const asection
**) arg2
;
4440 flagword flags1
, flags2
;
4442 /* Sort non loadable sections to the front. */
4443 flags1
= sec1
->flags
;
4444 flags2
= sec2
->flags
;
4445 if ((flags1
& SEC_HAS_CONTENTS
) == 0
4446 || (flags1
& SEC_LOAD
) == 0)
4448 if ((flags2
& SEC_HAS_CONTENTS
) != 0
4449 && (flags2
& SEC_LOAD
) != 0)
4454 if ((flags2
& SEC_HAS_CONTENTS
) == 0
4455 || (flags2
& SEC_LOAD
) == 0)
4459 /* Sort sections by LMA. */
4460 if (sec1
->lma
> sec2
->lma
)
4462 if (sec1
->lma
< sec2
->lma
)
4465 /* Sort sections with the same LMA by size. */
4466 if (bfd_section_size (sec1
) > bfd_section_size (sec2
))
4468 if (bfd_section_size (sec1
) < bfd_section_size (sec2
))
4471 if (sec1
->id
> sec2
->id
)
4473 if (sec1
->id
< sec2
->id
)
4478 /* Mark all the symbols which will be used in output relocations with
4479 the BSF_KEEP flag so that those symbols will not be stripped.
4481 Ignore relocations which will not appear in the output file. */
4484 mark_symbols_used_in_relocations (bfd
*ibfd
, sec_ptr isection
, void *symbolsarg
)
4486 asymbol
**symbols
= (asymbol
**) symbolsarg
;
4491 /* Ignore an input section with no corresponding output section. */
4492 if (isection
->output_section
== NULL
)
4495 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
4498 /* Do not complain if the target does not support relocations. */
4499 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
4501 bfd_fatal (bfd_get_filename (ibfd
));
4507 relpp
= (arelent
**) xmalloc (relsize
);
4508 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, symbols
);
4510 bfd_fatal (bfd_get_filename (ibfd
));
4512 /* Examine each symbol used in a relocation. If it's not one of the
4513 special bfd section symbols, then mark it with BSF_KEEP. */
4514 for (i
= 0; i
< relcount
; i
++)
4516 /* See PRs 20923 and 20930 for reproducers for the NULL tests. */
4517 if (relpp
[i
]->sym_ptr_ptr
!= NULL
4518 && * relpp
[i
]->sym_ptr_ptr
!= NULL
4519 && *relpp
[i
]->sym_ptr_ptr
!= bfd_com_section_ptr
->symbol
4520 && *relpp
[i
]->sym_ptr_ptr
!= bfd_abs_section_ptr
->symbol
4521 && *relpp
[i
]->sym_ptr_ptr
!= bfd_und_section_ptr
->symbol
)
4522 (*relpp
[i
]->sym_ptr_ptr
)->flags
|= BSF_KEEP
;
4529 /* Write out debugging information. */
4532 write_debugging_info (bfd
*obfd
, void *dhandle
,
4533 long *symcountp ATTRIBUTE_UNUSED
,
4534 asymbol
***symppp ATTRIBUTE_UNUSED
)
4536 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
4537 || bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
4539 bfd_byte
*syms
, *strings
= NULL
;
4540 bfd_size_type symsize
, stringsize
;
4541 asection
*stabsec
, *stabstrsec
;
4544 if (! write_stabs_in_sections_debugging_info (obfd
, dhandle
, &syms
,
4549 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DEBUGGING
;
4550 stabsec
= bfd_make_section_with_flags (obfd
, ".stab", flags
);
4551 stabstrsec
= bfd_make_section_with_flags (obfd
, ".stabstr", flags
);
4553 || stabstrsec
== NULL
4554 || !bfd_set_section_size (stabsec
, symsize
)
4555 || !bfd_set_section_size (stabstrsec
, stringsize
)
4556 || !bfd_set_section_alignment (stabsec
, 2)
4557 || !bfd_set_section_alignment (stabstrsec
, 0))
4559 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4560 _("can't create debugging section"));
4565 /* We can get away with setting the section contents now because
4566 the next thing the caller is going to do is copy over the
4567 real sections. We may someday have to split the contents
4568 setting out of this function. */
4569 if (! bfd_set_section_contents (obfd
, stabsec
, syms
, 0, symsize
)
4570 || ! bfd_set_section_contents (obfd
, stabstrsec
, strings
, 0,
4573 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4574 _("can't set debugging section contents"));
4582 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4583 _("don't know how to write debugging information for %s"),
4584 bfd_get_target (obfd
));
4588 /* If neither -D nor -U was specified explicitly,
4589 then use the configured default. */
4591 default_deterministic (void)
4593 if (deterministic
< 0)
4594 deterministic
= DEFAULT_AR_DETERMINISTIC
;
4598 strip_main (int argc
, char *argv
[])
4600 char *input_target
= NULL
;
4601 char *output_target
= NULL
;
4602 bfd_boolean show_version
= FALSE
;
4603 bfd_boolean formats_info
= FALSE
;
4606 char *output_file
= NULL
;
4607 bfd_boolean merge_notes_set
= FALSE
;
4609 while ((c
= getopt_long (argc
, argv
, "I:O:F:K:MN:R:o:sSpdgxXHhVvwDU",
4610 strip_options
, (int *) 0)) != EOF
)
4615 input_target
= optarg
;
4618 output_target
= optarg
;
4621 input_target
= output_target
= optarg
;
4624 handle_remove_section_option (optarg
);
4626 case OPTION_KEEP_SECTION
:
4627 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_KEEP
);
4629 case OPTION_REMOVE_RELOCS
:
4630 handle_remove_relocations_option (optarg
);
4633 strip_symbols
= STRIP_ALL
;
4637 case 'd': /* Historic BSD alias for -g. Used by early NetBSD. */
4638 strip_symbols
= STRIP_DEBUG
;
4640 case OPTION_STRIP_DWO
:
4641 strip_symbols
= STRIP_DWO
;
4643 case OPTION_STRIP_UNNEEDED
:
4644 strip_symbols
= STRIP_UNNEEDED
;
4647 add_specific_symbol (optarg
, keep_specific_htab
);
4651 merge_notes_set
= TRUE
;
4653 case OPTION_NO_MERGE_NOTES
:
4654 merge_notes
= FALSE
;
4655 merge_notes_set
= TRUE
;
4658 add_specific_symbol (optarg
, strip_specific_htab
);
4661 output_file
= optarg
;
4664 preserve_dates
= TRUE
;
4667 deterministic
= TRUE
;
4670 deterministic
= FALSE
;
4673 discard_locals
= LOCALS_ALL
;
4676 discard_locals
= LOCALS_START_L
;
4682 show_version
= TRUE
;
4684 case OPTION_FORMATS_INFO
:
4685 formats_info
= TRUE
;
4687 case OPTION_ONLY_KEEP_DEBUG
:
4688 strip_symbols
= STRIP_NONDEBUG
;
4690 case OPTION_KEEP_FILE_SYMBOLS
:
4691 keep_file_symbols
= 1;
4694 /* We've been given a long option. */
4701 strip_usage (stdout
, 0);
4703 strip_usage (stderr
, 1);
4707 /* If the user has not expressly chosen to merge/not-merge ELF notes
4708 then enable the merging unless we are stripping debug or dwo info. */
4709 if (! merge_notes_set
4710 && (strip_symbols
== STRIP_UNDEF
4711 || strip_symbols
== STRIP_ALL
4712 || strip_symbols
== STRIP_UNNEEDED
4713 || strip_symbols
== STRIP_NONDEBUG
4714 || strip_symbols
== STRIP_NONDWO
))
4724 print_version ("strip");
4726 default_deterministic ();
4728 /* Default is to strip all symbols. */
4729 if (strip_symbols
== STRIP_UNDEF
4730 && discard_locals
== LOCALS_UNDEF
4731 && htab_elements (strip_specific_htab
) == 0)
4732 strip_symbols
= STRIP_ALL
;
4734 if (output_target
== NULL
)
4735 output_target
= input_target
;
4739 || (output_file
!= NULL
&& (i
+ 1) < argc
))
4740 strip_usage (stderr
, 1);
4742 for (; i
< argc
; i
++)
4744 int hold_status
= status
;
4745 struct stat statbuf
;
4748 if (get_file_size (argv
[i
]) < 1)
4755 /* No need to check the return value of stat().
4756 It has already been checked in get_file_size(). */
4757 stat (argv
[i
], &statbuf
);
4759 if (output_file
== NULL
4760 || filename_cmp (argv
[i
], output_file
) == 0)
4761 tmpname
= make_tempname (argv
[i
]);
4763 tmpname
= output_file
;
4765 if (tmpname
== NULL
)
4767 bfd_nonfatal_message (argv
[i
], NULL
, NULL
,
4768 _("could not create temporary file to hold stripped copy"));
4774 copy_file (argv
[i
], tmpname
, input_target
, output_target
, NULL
);
4778 set_times (tmpname
, &statbuf
);
4779 if (output_file
!= tmpname
)
4780 status
= (smart_rename (tmpname
,
4781 output_file
? output_file
: argv
[i
],
4782 preserve_dates
) != 0);
4784 status
= hold_status
;
4787 unlink_if_ordinary (tmpname
);
4788 if (output_file
!= tmpname
)
4795 /* Set up PE subsystem. */
4798 set_pe_subsystem (const char *s
)
4800 const char *version
, *subsystem
;
4810 { "native", 0, IMAGE_SUBSYSTEM_NATIVE
},
4811 { "windows", 0, IMAGE_SUBSYSTEM_WINDOWS_GUI
},
4812 { "console", 0, IMAGE_SUBSYSTEM_WINDOWS_CUI
},
4813 { "posix", 0, IMAGE_SUBSYSTEM_POSIX_CUI
},
4814 { "wince", 0, IMAGE_SUBSYSTEM_WINDOWS_CE_GUI
},
4815 { "efi-app", 1, IMAGE_SUBSYSTEM_EFI_APPLICATION
},
4816 { "efi-bsd", 1, IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER
},
4817 { "efi-rtd", 1, IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER
},
4818 { "sal-rtd", 1, IMAGE_SUBSYSTEM_SAL_RUNTIME_DRIVER
},
4819 { "xbox", 0, IMAGE_SUBSYSTEM_XBOX
}
4825 /* Check for the presence of a version number. */
4826 version
= strchr (s
, ':');
4827 if (version
== NULL
)
4831 int len
= version
- s
;
4835 version
= copy
+ 1 + len
;
4836 pe_major_subsystem_version
= strtoul (version
, ©
, 0);
4838 pe_minor_subsystem_version
= strtoul (copy
+ 1, ©
, 0);
4840 non_fatal (_("%s: bad version in PE subsystem"), s
);
4843 /* Check for numeric subsystem. */
4844 value
= (short) strtol (subsystem
, ©
, 0);
4847 for (i
= 0; i
< ARRAY_SIZE (v
); i
++)
4848 if (v
[i
].value
== value
)
4850 pe_subsystem
= value
;
4851 set_def
= v
[i
].set_def
;
4857 /* Search for subsystem by name. */
4858 for (i
= 0; i
< ARRAY_SIZE (v
); i
++)
4859 if (strcmp (subsystem
, v
[i
].name
) == 0)
4861 pe_subsystem
= v
[i
].value
;
4862 set_def
= v
[i
].set_def
;
4870 fatal (_("unknown PE subsystem: %s"), s
);
4875 if (pe_file_alignment
== (bfd_vma
) -1)
4876 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
4877 if (pe_section_alignment
== (bfd_vma
) -1)
4878 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
4882 free ((char *) subsystem
);
4885 /* Convert EFI target to PEI target. */
4888 convert_efi_target (char *efi
)
4894 if (strcmp (efi
+ 4, "ia32") == 0)
4896 /* Change ia32 to i386. */
4901 else if (strcmp (efi
+ 4, "x86_64") == 0)
4903 /* Change x86_64 to x86-64. */
4908 /* Allocate and return a pointer to a struct section_add, initializing the
4909 structure using ARG, a string in the format "sectionname=filename".
4910 The returned structure will have its next pointer set to NEXT. The
4911 OPTION field is the name of the command line option currently being
4912 parsed, and is only used if an error needs to be reported. */
4914 static struct section_add
*
4915 init_section_add (const char *arg
,
4916 struct section_add
*next
,
4919 struct section_add
*pa
;
4922 s
= strchr (arg
, '=');
4924 fatal (_("bad format for %s"), option
);
4926 pa
= (struct section_add
*) xmalloc (sizeof (struct section_add
));
4927 pa
->name
= xstrndup (arg
, s
- arg
);
4928 pa
->filename
= s
+ 1;
4930 pa
->contents
= NULL
;
4936 /* Load the file specified in PA, allocating memory to hold the file
4937 contents, and store a pointer to the allocated memory in the contents
4938 field of PA. The size field of PA is also updated. All errors call
4942 section_add_load_file (struct section_add
*pa
)
4947 /* We don't use get_file_size so that we can do
4948 --add-section .note.GNU_stack=/dev/null
4949 get_file_size doesn't work on /dev/null. */
4951 f
= fopen (pa
->filename
, FOPEN_RB
);
4953 fatal (_("cannot open: %s: %s"),
4954 pa
->filename
, strerror (errno
));
4958 pa
->contents
= (bfd_byte
*) xmalloc (alloc
);
4966 pa
->contents
= (bfd_byte
*) xrealloc (pa
->contents
, alloc
);
4969 got
= fread (pa
->contents
+ off
, 1, alloc
- off
, f
);
4971 fatal (_("%s: fread failed"), pa
->filename
);
4982 copy_main (int argc
, char *argv
[])
4984 char *input_filename
= NULL
;
4985 char *output_filename
= NULL
;
4987 char *input_target
= NULL
;
4988 char *output_target
= NULL
;
4989 bfd_boolean show_version
= FALSE
;
4990 bfd_boolean change_warn
= TRUE
;
4991 bfd_boolean formats_info
= FALSE
;
4992 bfd_boolean use_globalize
= FALSE
;
4993 bfd_boolean use_keep_global
= FALSE
;
4995 struct stat statbuf
;
4996 const bfd_arch_info_type
*input_arch
= NULL
;
4998 while ((c
= getopt_long (argc
, argv
, "b:B:i:I:j:K:MN:s:O:d:F:L:G:R:SpgxXHhVvW:wDU",
4999 copy_options
, (int *) 0)) != EOF
)
5004 copy_byte
= atoi (optarg
);
5006 fatal (_("byte number must be non-negative"));
5010 input_arch
= bfd_scan_arch (optarg
);
5011 if (input_arch
== NULL
)
5012 fatal (_("architecture %s unknown"), optarg
);
5018 interleave
= atoi (optarg
);
5020 fatal (_("interleave must be positive"));
5026 case OPTION_INTERLEAVE_WIDTH
:
5027 copy_width
= atoi (optarg
);
5029 fatal(_("interleave width must be positive"));
5033 case 's': /* "source" - 'I' is preferred */
5034 input_target
= optarg
;
5038 case 'd': /* "destination" - 'O' is preferred */
5039 output_target
= optarg
;
5043 input_target
= output_target
= optarg
;
5047 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_COPY
);
5048 sections_copied
= TRUE
;
5052 handle_remove_section_option (optarg
);
5055 case OPTION_KEEP_SECTION
:
5056 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_KEEP
);
5059 case OPTION_REMOVE_RELOCS
:
5060 handle_remove_relocations_option (optarg
);
5064 strip_symbols
= STRIP_ALL
;
5068 strip_symbols
= STRIP_DEBUG
;
5071 case OPTION_STRIP_DWO
:
5072 strip_symbols
= STRIP_DWO
;
5075 case OPTION_STRIP_UNNEEDED
:
5076 strip_symbols
= STRIP_UNNEEDED
;
5079 case OPTION_ONLY_KEEP_DEBUG
:
5080 strip_symbols
= STRIP_NONDEBUG
;
5083 case OPTION_KEEP_FILE_SYMBOLS
:
5084 keep_file_symbols
= 1;
5087 case OPTION_ADD_GNU_DEBUGLINK
:
5088 long_section_names
= ENABLE
;
5089 gnu_debuglink_filename
= optarg
;
5093 add_specific_symbol (optarg
, keep_specific_htab
);
5099 case OPTION_NO_MERGE_NOTES
:
5100 merge_notes
= FALSE
;
5104 add_specific_symbol (optarg
, strip_specific_htab
);
5107 case OPTION_STRIP_UNNEEDED_SYMBOL
:
5108 add_specific_symbol (optarg
, strip_unneeded_htab
);
5112 add_specific_symbol (optarg
, localize_specific_htab
);
5115 case OPTION_GLOBALIZE_SYMBOL
:
5116 use_globalize
= TRUE
;
5117 add_specific_symbol (optarg
, globalize_specific_htab
);
5121 use_keep_global
= TRUE
;
5122 add_specific_symbol (optarg
, keepglobal_specific_htab
);
5126 add_specific_symbol (optarg
, weaken_specific_htab
);
5130 preserve_dates
= TRUE
;
5134 deterministic
= TRUE
;
5138 deterministic
= FALSE
;
5146 discard_locals
= LOCALS_ALL
;
5150 discard_locals
= LOCALS_START_L
;
5158 show_version
= TRUE
;
5161 case OPTION_FORMATS_INFO
:
5162 formats_info
= TRUE
;
5169 case OPTION_ADD_SECTION
:
5170 add_sections
= init_section_add (optarg
, add_sections
,
5172 section_add_load_file (add_sections
);
5175 case OPTION_UPDATE_SECTION
:
5176 update_sections
= init_section_add (optarg
, update_sections
,
5177 "--update-section");
5178 section_add_load_file (update_sections
);
5181 case OPTION_DUMP_SECTION
:
5182 dump_sections
= init_section_add (optarg
, dump_sections
,
5186 case OPTION_ADD_SYMBOL
:
5189 struct addsym_node
*newsym
= xmalloc (sizeof *newsym
);
5191 newsym
->next
= NULL
;
5192 s
= strchr (optarg
, '=');
5194 fatal (_("bad format for %s"), "--add-symbol");
5195 t
= strchr (s
+ 1, ':');
5197 newsym
->symdef
= xstrndup (optarg
, s
- optarg
);
5200 newsym
->section
= xstrndup (s
+ 1, t
- (s
+ 1));
5201 newsym
->symval
= strtol (t
+ 1, NULL
, 0);
5205 newsym
->section
= NULL
;
5206 newsym
->symval
= strtol (s
+ 1, NULL
, 0);
5210 t
= strchr (t
+ 1, ',');
5211 newsym
->othersym
= NULL
;
5213 newsym
->flags
= parse_symflags (t
+1, &newsym
->othersym
);
5215 newsym
->flags
= BSF_GLOBAL
;
5217 /* Keep 'othersym' symbols at the front of the list. */
5218 if (newsym
->othersym
)
5220 newsym
->next
= add_sym_list
;
5222 add_sym_tail
= &newsym
->next
;
5223 add_sym_list
= newsym
;
5227 *add_sym_tail
= newsym
;
5228 add_sym_tail
= &newsym
->next
;
5234 case OPTION_CHANGE_START
:
5235 change_start
= parse_vma (optarg
, "--change-start");
5238 case OPTION_CHANGE_SECTION_ADDRESS
:
5239 case OPTION_CHANGE_SECTION_LMA
:
5240 case OPTION_CHANGE_SECTION_VMA
:
5242 struct section_list
* p
;
5243 unsigned int context
= 0;
5247 char *option
= NULL
;
5252 case OPTION_CHANGE_SECTION_ADDRESS
:
5253 option
= "--change-section-address";
5254 context
= SECTION_CONTEXT_ALTER_LMA
| SECTION_CONTEXT_ALTER_VMA
;
5256 case OPTION_CHANGE_SECTION_LMA
:
5257 option
= "--change-section-lma";
5258 context
= SECTION_CONTEXT_ALTER_LMA
;
5260 case OPTION_CHANGE_SECTION_VMA
:
5261 option
= "--change-section-vma";
5262 context
= SECTION_CONTEXT_ALTER_VMA
;
5266 s
= strchr (optarg
, '=');
5269 s
= strchr (optarg
, '+');
5272 s
= strchr (optarg
, '-');
5274 fatal (_("bad format for %s"), option
);
5279 /* Correct the context. */
5282 case OPTION_CHANGE_SECTION_ADDRESS
:
5283 context
= SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_SET_VMA
;
5285 case OPTION_CHANGE_SECTION_LMA
:
5286 context
= SECTION_CONTEXT_SET_LMA
;
5288 case OPTION_CHANGE_SECTION_VMA
:
5289 context
= SECTION_CONTEXT_SET_VMA
;
5295 name
= (char *) xmalloc (len
+ 1);
5296 strncpy (name
, optarg
, len
);
5299 p
= find_section_list (name
, TRUE
, context
);
5301 val
= parse_vma (s
+ 1, option
);
5307 case OPTION_CHANGE_SECTION_ADDRESS
:
5311 case OPTION_CHANGE_SECTION_LMA
:
5315 case OPTION_CHANGE_SECTION_VMA
:
5322 case OPTION_CHANGE_ADDRESSES
:
5323 change_section_address
= parse_vma (optarg
, "--change-addresses");
5324 change_start
= change_section_address
;
5327 case OPTION_CHANGE_WARNINGS
:
5331 case OPTION_CHANGE_LEADING_CHAR
:
5332 change_leading_char
= TRUE
;
5335 case OPTION_COMPRESS_DEBUG_SECTIONS
:
5338 if (strcasecmp (optarg
, "none") == 0)
5339 do_debug_sections
= decompress
;
5340 else if (strcasecmp (optarg
, "zlib") == 0)
5341 do_debug_sections
= compress_zlib
;
5342 else if (strcasecmp (optarg
, "zlib-gnu") == 0)
5343 do_debug_sections
= compress_gnu_zlib
;
5344 else if (strcasecmp (optarg
, "zlib-gabi") == 0)
5345 do_debug_sections
= compress_gabi_zlib
;
5347 fatal (_("unrecognized --compress-debug-sections type `%s'"),
5351 do_debug_sections
= compress
;
5354 case OPTION_DEBUGGING
:
5355 convert_debugging
= TRUE
;
5358 case OPTION_DECOMPRESS_DEBUG_SECTIONS
:
5359 do_debug_sections
= decompress
;
5362 case OPTION_ELF_STT_COMMON
:
5363 if (strcasecmp (optarg
, "yes") == 0)
5364 do_elf_stt_common
= elf_stt_common
;
5365 else if (strcasecmp (optarg
, "no") == 0)
5366 do_elf_stt_common
= no_elf_stt_common
;
5368 fatal (_("unrecognized --elf-stt-common= option `%s'"),
5372 case OPTION_GAP_FILL
:
5374 bfd_vma gap_fill_vma
;
5376 gap_fill_vma
= parse_vma (optarg
, "--gap-fill");
5377 gap_fill
= (bfd_byte
) gap_fill_vma
;
5378 if ((bfd_vma
) gap_fill
!= gap_fill_vma
)
5382 sprintf_vma (buff
, gap_fill_vma
);
5384 non_fatal (_("Warning: truncating gap-fill from 0x%s to 0x%x"),
5387 gap_fill_set
= TRUE
;
5391 case OPTION_NO_CHANGE_WARNINGS
:
5392 change_warn
= FALSE
;
5396 pad_to
= parse_vma (optarg
, "--pad-to");
5400 case OPTION_REMOVE_LEADING_CHAR
:
5401 remove_leading_char
= TRUE
;
5404 case OPTION_REDEFINE_SYM
:
5406 /* Insert this redefinition onto redefine_specific_htab. */
5410 const char *nextarg
;
5411 char *source
, *target
;
5413 s
= strchr (optarg
, '=');
5415 fatal (_("bad format for %s"), "--redefine-sym");
5418 source
= (char *) xmalloc (len
+ 1);
5419 strncpy (source
, optarg
, len
);
5423 len
= strlen (nextarg
);
5424 target
= (char *) xmalloc (len
+ 1);
5425 strcpy (target
, nextarg
);
5427 add_redefine_and_check ("--redefine-sym", source
, target
);
5434 case OPTION_REDEFINE_SYMS
:
5435 add_redefine_syms_file (optarg
);
5438 case OPTION_SET_SECTION_FLAGS
:
5440 struct section_list
*p
;
5445 s
= strchr (optarg
, '=');
5447 fatal (_("bad format for %s"), "--set-section-flags");
5450 name
= (char *) xmalloc (len
+ 1);
5451 strncpy (name
, optarg
, len
);
5454 p
= find_section_list (name
, TRUE
, SECTION_CONTEXT_SET_FLAGS
);
5456 p
->flags
= parse_flags (s
+ 1);
5460 case OPTION_SET_SECTION_ALIGNMENT
:
5462 struct section_list
*p
;
5468 s
= strchr (optarg
, '=');
5470 fatal (_("bad format for --set-section-alignment: argument needed"));
5472 align
= atoi (s
+ 1);
5474 fatal (_("bad format for --set-section-alignment: numeric argument needed"));
5476 /* Convert integer alignment into a power-of-two alignment. */
5478 while ((align
& 1) == 0)
5485 /* Number has more than on 1, i.e. wasn't a power of 2. */
5486 fatal (_("bad format for --set-section-alignment: alignment is not a power of two"));
5488 /* Add the alignment setting to the section list. */
5490 name
= (char *) xmalloc (len
+ 1);
5491 strncpy (name
, optarg
, len
);
5494 p
= find_section_list (name
, TRUE
, SECTION_CONTEXT_SET_ALIGNMENT
);
5496 p
->alignment
= palign
;
5500 case OPTION_RENAME_SECTION
:
5503 const char *eq
, *fl
;
5508 eq
= strchr (optarg
, '=');
5510 fatal (_("bad format for %s"), "--rename-section");
5514 fatal (_("bad format for %s"), "--rename-section");
5516 old_name
= (char *) xmalloc (len
+ 1);
5517 strncpy (old_name
, optarg
, len
);
5521 fl
= strchr (eq
, ',');
5524 flags
= parse_flags (fl
+ 1);
5534 fatal (_("bad format for %s"), "--rename-section");
5536 new_name
= (char *) xmalloc (len
+ 1);
5537 strncpy (new_name
, eq
, len
);
5540 add_section_rename (old_name
, new_name
, flags
);
5544 case OPTION_SET_START
:
5545 set_start
= parse_vma (optarg
, "--set-start");
5546 set_start_set
= TRUE
;
5549 case OPTION_SREC_LEN
:
5550 _bfd_srec_len
= parse_vma (optarg
, "--srec-len");
5553 case OPTION_SREC_FORCES3
:
5554 _bfd_srec_forceS3
= TRUE
;
5557 case OPTION_STRIP_SYMBOLS
:
5558 add_specific_symbols (optarg
, strip_specific_htab
,
5559 &strip_specific_buffer
);
5562 case OPTION_STRIP_UNNEEDED_SYMBOLS
:
5563 add_specific_symbols (optarg
, strip_unneeded_htab
,
5564 &strip_unneeded_buffer
);
5567 case OPTION_KEEP_SYMBOLS
:
5568 add_specific_symbols (optarg
, keep_specific_htab
,
5569 &keep_specific_buffer
);
5572 case OPTION_LOCALIZE_HIDDEN
:
5573 localize_hidden
= TRUE
;
5576 case OPTION_LOCALIZE_SYMBOLS
:
5577 add_specific_symbols (optarg
, localize_specific_htab
,
5578 &localize_specific_buffer
);
5581 case OPTION_LONG_SECTION_NAMES
:
5582 if (!strcmp ("enable", optarg
))
5583 long_section_names
= ENABLE
;
5584 else if (!strcmp ("disable", optarg
))
5585 long_section_names
= DISABLE
;
5586 else if (!strcmp ("keep", optarg
))
5587 long_section_names
= KEEP
;
5589 fatal (_("unknown long section names option '%s'"), optarg
);
5592 case OPTION_GLOBALIZE_SYMBOLS
:
5593 use_globalize
= TRUE
;
5594 add_specific_symbols (optarg
, globalize_specific_htab
,
5595 &globalize_specific_buffer
);
5598 case OPTION_KEEPGLOBAL_SYMBOLS
:
5599 use_keep_global
= TRUE
;
5600 add_specific_symbols (optarg
, keepglobal_specific_htab
,
5601 &keepglobal_specific_buffer
);
5604 case OPTION_WEAKEN_SYMBOLS
:
5605 add_specific_symbols (optarg
, weaken_specific_htab
,
5606 &weaken_specific_buffer
);
5609 case OPTION_ALT_MACH_CODE
:
5610 use_alt_mach_code
= strtoul (optarg
, NULL
, 0);
5611 if (use_alt_mach_code
== 0)
5612 fatal (_("unable to parse alternative machine code"));
5615 case OPTION_PREFIX_SYMBOLS
:
5616 prefix_symbols_string
= optarg
;
5619 case OPTION_PREFIX_SECTIONS
:
5620 prefix_sections_string
= optarg
;
5623 case OPTION_PREFIX_ALLOC_SECTIONS
:
5624 prefix_alloc_sections_string
= optarg
;
5627 case OPTION_READONLY_TEXT
:
5628 bfd_flags_to_set
|= WP_TEXT
;
5629 bfd_flags_to_clear
&= ~WP_TEXT
;
5632 case OPTION_WRITABLE_TEXT
:
5633 bfd_flags_to_clear
|= WP_TEXT
;
5634 bfd_flags_to_set
&= ~WP_TEXT
;
5638 bfd_flags_to_set
|= D_PAGED
;
5639 bfd_flags_to_clear
&= ~D_PAGED
;
5643 bfd_flags_to_clear
|= D_PAGED
;
5644 bfd_flags_to_set
&= ~D_PAGED
;
5647 case OPTION_EXTRACT_DWO
:
5648 strip_symbols
= STRIP_NONDWO
;
5651 case OPTION_EXTRACT_SYMBOL
:
5652 extract_symbol
= TRUE
;
5655 case OPTION_REVERSE_BYTES
:
5657 int prev
= reverse_bytes
;
5659 reverse_bytes
= atoi (optarg
);
5660 if ((reverse_bytes
<= 0) || ((reverse_bytes
% 2) != 0))
5661 fatal (_("number of bytes to reverse must be positive and even"));
5663 if (prev
&& prev
!= reverse_bytes
)
5664 non_fatal (_("Warning: ignoring previous --reverse-bytes value of %d"),
5669 case OPTION_FILE_ALIGNMENT
:
5670 pe_file_alignment
= parse_vma (optarg
, "--file-alignment");
5676 pe_heap_reserve
= strtoul (optarg
, &end
, 0);
5678 || (*end
!= '.' && *end
!= '\0'))
5679 non_fatal (_("%s: invalid reserve value for --heap"),
5681 else if (*end
!= '\0')
5683 pe_heap_commit
= strtoul (end
+ 1, &end
, 0);
5685 non_fatal (_("%s: invalid commit value for --heap"),
5691 case OPTION_IMAGE_BASE
:
5692 pe_image_base
= parse_vma (optarg
, "--image-base");
5695 case OPTION_PE_SECTION_ALIGNMENT
:
5696 pe_section_alignment
= parse_vma (optarg
,
5697 "--section-alignment");
5700 case OPTION_SUBSYSTEM
:
5701 set_pe_subsystem (optarg
);
5707 pe_stack_reserve
= strtoul (optarg
, &end
, 0);
5709 || (*end
!= '.' && *end
!= '\0'))
5710 non_fatal (_("%s: invalid reserve value for --stack"),
5712 else if (*end
!= '\0')
5714 pe_stack_commit
= strtoul (end
+ 1, &end
, 0);
5716 non_fatal (_("%s: invalid commit value for --stack"),
5722 case OPTION_VERILOG_DATA_WIDTH
:
5723 VerilogDataWidth
= parse_vma (optarg
, "--verilog-data-width");
5724 if (VerilogDataWidth
< 1)
5725 fatal (_("verilog data width must be at least 1 byte"));
5729 /* We've been given a long option. */
5734 copy_usage (stdout
, 0);
5737 copy_usage (stderr
, 1);
5741 if (use_globalize
&& use_keep_global
)
5742 fatal(_("--globalize-symbol(s) is incompatible with -G/--keep-global-symbol(s)"));
5751 print_version ("objcopy");
5753 if (interleave
&& copy_byte
== -1)
5754 fatal (_("interleave start byte must be set with --byte"));
5756 if (copy_byte
>= interleave
)
5757 fatal (_("byte number must be less than interleave"));
5759 if (copy_width
> interleave
- copy_byte
)
5760 fatal (_("interleave width must be less than or equal to interleave - byte`"));
5762 if (optind
== argc
|| optind
+ 2 < argc
)
5763 copy_usage (stderr
, 1);
5765 input_filename
= argv
[optind
];
5766 if (optind
+ 1 < argc
)
5767 output_filename
= argv
[optind
+ 1];
5769 default_deterministic ();
5771 /* Default is to strip no symbols. */
5772 if (strip_symbols
== STRIP_UNDEF
&& discard_locals
== LOCALS_UNDEF
)
5773 strip_symbols
= STRIP_NONE
;
5775 if (output_target
== NULL
)
5776 output_target
= input_target
;
5778 /* Convert input EFI target to PEI target. */
5779 if (input_target
!= NULL
5780 && strncmp (input_target
, "efi-", 4) == 0)
5784 efi
= xstrdup (output_target
+ 4);
5785 if (strncmp (efi
, "bsdrv-", 6) == 0
5786 || strncmp (efi
, "rtdrv-", 6) == 0)
5788 else if (strncmp (efi
, "app-", 4) != 0)
5789 fatal (_("unknown input EFI target: %s"), input_target
);
5792 convert_efi_target (efi
);
5795 /* Convert output EFI target to PEI target. */
5796 if (output_target
!= NULL
5797 && strncmp (output_target
, "efi-", 4) == 0)
5801 efi
= xstrdup (output_target
+ 4);
5802 if (strncmp (efi
, "app-", 4) == 0)
5804 if (pe_subsystem
== -1)
5805 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_APPLICATION
;
5807 else if (strncmp (efi
, "bsdrv-", 6) == 0)
5809 if (pe_subsystem
== -1)
5810 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER
;
5813 else if (strncmp (efi
, "rtdrv-", 6) == 0)
5815 if (pe_subsystem
== -1)
5816 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER
;
5820 fatal (_("unknown output EFI target: %s"), output_target
);
5822 if (pe_file_alignment
== (bfd_vma
) -1)
5823 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
5824 if (pe_section_alignment
== (bfd_vma
) -1)
5825 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
5827 output_target
= efi
;
5828 convert_efi_target (efi
);
5832 if (stat (input_filename
, & statbuf
) < 0)
5833 fatal (_("warning: could not locate '%s'. System error message: %s"),
5834 input_filename
, strerror (errno
));
5836 /* If there is no destination file, or the source and destination files
5837 are the same, then create a temp and rename the result into the input. */
5838 if (output_filename
== NULL
5839 || filename_cmp (input_filename
, output_filename
) == 0)
5840 tmpname
= make_tempname (input_filename
);
5842 tmpname
= output_filename
;
5844 if (tmpname
== NULL
)
5845 fatal (_("warning: could not create temporary file whilst copying '%s', (error: %s)"),
5846 input_filename
, strerror (errno
));
5848 copy_file (input_filename
, tmpname
, input_target
, output_target
, input_arch
);
5852 set_times (tmpname
, &statbuf
);
5853 if (tmpname
!= output_filename
)
5854 status
= (smart_rename (tmpname
, input_filename
,
5855 preserve_dates
) != 0);
5858 unlink_if_ordinary (tmpname
);
5860 if (tmpname
!= output_filename
)
5865 struct section_list
*p
;
5867 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
5871 if (p
->context
& (SECTION_CONTEXT_SET_VMA
| SECTION_CONTEXT_ALTER_VMA
))
5875 sprintf_vma (buff
, p
->vma_val
);
5877 /* xgettext:c-format */
5878 non_fatal (_("%s %s%c0x%s never used"),
5879 "--change-section-vma",
5881 p
->context
& SECTION_CONTEXT_SET_VMA
? '=' : '+',
5885 if (p
->context
& (SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_ALTER_LMA
))
5889 sprintf_vma (buff
, p
->lma_val
);
5891 /* xgettext:c-format */
5892 non_fatal (_("%s %s%c0x%s never used"),
5893 "--change-section-lma",
5895 p
->context
& SECTION_CONTEXT_SET_LMA
? '=' : '+',
5902 if (strip_specific_buffer
)
5903 free (strip_specific_buffer
);
5905 if (strip_unneeded_buffer
)
5906 free (strip_unneeded_buffer
);
5908 if (keep_specific_buffer
)
5909 free (keep_specific_buffer
);
5911 if (localize_specific_buffer
)
5912 free (globalize_specific_buffer
);
5914 if (globalize_specific_buffer
)
5915 free (globalize_specific_buffer
);
5917 if (keepglobal_specific_buffer
)
5918 free (keepglobal_specific_buffer
);
5920 if (weaken_specific_buffer
)
5921 free (weaken_specific_buffer
);
5927 main (int argc
, char *argv
[])
5929 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
5930 setlocale (LC_MESSAGES
, "");
5932 #if defined (HAVE_SETLOCALE)
5933 setlocale (LC_CTYPE
, "");
5935 bindtextdomain (PACKAGE
, LOCALEDIR
);
5936 textdomain (PACKAGE
);
5938 program_name
= argv
[0];
5939 xmalloc_set_program_name (program_name
);
5941 START_PROGRESS (program_name
, 0);
5943 expandargv (&argc
, &argv
);
5945 strip_symbols
= STRIP_UNDEF
;
5946 discard_locals
= LOCALS_UNDEF
;
5948 if (bfd_init () != BFD_INIT_MAGIC
)
5949 fatal (_("fatal error: libbfd ABI mismatch"));
5950 set_default_bfd_target ();
5954 int i
= strlen (program_name
);
5955 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
5956 /* Drop the .exe suffix, if any. */
5957 if (i
> 4 && FILENAME_CMP (program_name
+ i
- 4, ".exe") == 0)
5960 program_name
[i
] = '\0';
5963 is_strip
= (i
>= 5 && FILENAME_CMP (program_name
+ i
- 5, "strip") == 0);
5966 create_symbol_htabs ();
5969 bfd_set_error_program_name (argv
[0]);
5972 strip_main (argc
, argv
);
5974 copy_main (argc
, argv
);
5976 END_PROGRESS (program_name
);