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
26 #include "libiberty.h"
29 #include "filenames.h"
32 #include "coff/internal.h"
34 #include "safe-ctype.h"
36 /* FIXME: See bfd/peXXigen.c for why we include an architecture specific
37 header in generic PE code. */
38 #include "coff/i386.h"
41 static bfd_vma pe_file_alignment
= (bfd_vma
) -1;
42 static bfd_vma pe_heap_commit
= (bfd_vma
) -1;
43 static bfd_vma pe_heap_reserve
= (bfd_vma
) -1;
44 static bfd_vma pe_image_base
= (bfd_vma
) -1;
45 static bfd_vma pe_section_alignment
= (bfd_vma
) -1;
46 static bfd_vma pe_stack_commit
= (bfd_vma
) -1;
47 static bfd_vma pe_stack_reserve
= (bfd_vma
) -1;
48 static short pe_subsystem
= -1;
49 static short pe_major_subsystem_version
= -1;
50 static short pe_minor_subsystem_version
= -1;
52 struct is_specified_symbol_predicate_data
58 /* A node includes symbol name mapping to support redefine_sym. */
67 struct addsym_node
*next
;
72 const char * othersym
;
75 typedef struct section_rename
77 const char * old_name
;
78 const char * new_name
;
80 struct section_rename
* next
;
84 /* List of sections to be renamed. */
85 static section_rename
*section_rename_list
;
87 static asymbol
**isympp
= NULL
; /* Input symbols. */
88 static asymbol
**osympp
= NULL
; /* Output symbols that survive stripping. */
90 /* If `copy_byte' >= 0, copy 'copy_width' byte(s) of every `interleave' bytes. */
91 static int copy_byte
= -1;
92 static int interleave
= 0; /* Initialised to 4 in copy_main(). */
93 static int copy_width
= 1;
95 static bfd_boolean verbose
; /* Print file and target names. */
96 static bfd_boolean preserve_dates
; /* Preserve input file timestamp. */
97 static int deterministic
= -1; /* Enable deterministic archives. */
98 static int status
= 0; /* Exit status. */
100 static bfd_boolean merge_notes
= FALSE
; /* Merge note sections. */
102 typedef struct merged_note_section
104 asection
* sec
; /* The section that is being merged. */
105 bfd_byte
* contents
;/* New contents of the section. */
106 bfd_size_type size
; /* New size of the section. */
107 struct merged_note_section
* next
; /* Link to next merged note section. */
108 } merged_note_section
;
113 STRIP_NONE
, /* Don't strip. */
114 STRIP_DEBUG
, /* Strip all debugger symbols. */
115 STRIP_UNNEEDED
, /* Strip unnecessary symbols. */
116 STRIP_NONDEBUG
, /* Strip everything but debug info. */
117 STRIP_DWO
, /* Strip all DWO info. */
118 STRIP_NONDWO
, /* Strip everything but DWO info. */
119 STRIP_ALL
/* Strip all symbols. */
122 /* Which symbols to remove. */
123 static enum strip_action strip_symbols
= STRIP_UNDEF
;
128 LOCALS_START_L
, /* Discard locals starting with L. */
129 LOCALS_ALL
/* Discard all locals. */
132 /* Which local symbols to remove. Overrides STRIP_ALL. */
133 static enum locals_action discard_locals
;
135 /* Structure used to hold lists of sections and actions to take. */
138 struct section_list
* next
; /* Next section to change. */
139 const char * pattern
; /* Section name pattern. */
140 bfd_boolean used
; /* Whether this entry was used. */
142 unsigned int context
; /* What to do with matching sections. */
143 /* Flag bits used in the context field.
144 COPY and REMOVE are mutually exlusive. SET and ALTER are mutually exclusive. */
145 #define SECTION_CONTEXT_REMOVE (1 << 0) /* Remove this section. */
146 #define SECTION_CONTEXT_COPY (1 << 1) /* Copy this section, delete all non-copied section. */
147 #define SECTION_CONTEXT_KEEP (1 << 2) /* Keep this section. */
148 #define SECTION_CONTEXT_SET_VMA (1 << 3) /* Set the sections' VMA address. */
149 #define SECTION_CONTEXT_ALTER_VMA (1 << 4) /* Increment or decrement the section's VMA address. */
150 #define SECTION_CONTEXT_SET_LMA (1 << 5) /* Set the sections' LMA address. */
151 #define SECTION_CONTEXT_ALTER_LMA (1 << 6) /* Increment or decrement the section's LMA address. */
152 #define SECTION_CONTEXT_SET_FLAGS (1 << 7) /* Set the section's flags. */
153 #define SECTION_CONTEXT_REMOVE_RELOCS (1 << 8) /* Remove relocations for this section. */
154 #define SECTION_CONTEXT_SET_ALIGNMENT (1 << 9) /* Set alignment for section. */
156 bfd_vma vma_val
; /* Amount to change by or set to. */
157 bfd_vma lma_val
; /* Amount to change by or set to. */
158 flagword flags
; /* What to set the section flags to. */
159 unsigned int alignment
; /* Alignment of output section. */
162 static struct section_list
*change_sections
;
164 /* TRUE if some sections are to be removed. */
165 static bfd_boolean sections_removed
;
167 /* TRUE if only some sections are to be copied. */
168 static bfd_boolean sections_copied
;
170 /* Changes to the start address. */
171 static bfd_vma change_start
= 0;
172 static bfd_boolean set_start_set
= FALSE
;
173 static bfd_vma set_start
;
175 /* Changes to section addresses. */
176 static bfd_vma change_section_address
= 0;
178 /* Filling gaps between sections. */
179 static bfd_boolean gap_fill_set
= FALSE
;
180 static bfd_byte gap_fill
= 0;
182 /* Pad to a given address. */
183 static bfd_boolean pad_to_set
= FALSE
;
184 static bfd_vma pad_to
;
186 /* Use alternative machine code? */
187 static unsigned long use_alt_mach_code
= 0;
189 /* Output BFD flags user wants to set or clear */
190 static flagword bfd_flags_to_set
;
191 static flagword bfd_flags_to_clear
;
193 /* List of sections to add. */
196 /* Next section to add. */
197 struct section_add
*next
;
198 /* Name of section to add. */
200 /* Name of file holding section contents. */
201 const char *filename
;
204 /* Contents of file. */
206 /* BFD section, after it has been added. */
210 /* List of sections to add to the output BFD. */
211 static struct section_add
*add_sections
;
213 /* List of sections to update in the output BFD. */
214 static struct section_add
*update_sections
;
216 /* List of sections to dump from the output BFD. */
217 static struct section_add
*dump_sections
;
219 /* If non-NULL the argument to --add-gnu-debuglink.
220 This should be the filename to store in the .gnu_debuglink section. */
221 static const char * gnu_debuglink_filename
= NULL
;
223 /* Whether to convert debugging information. */
224 static bfd_boolean convert_debugging
= FALSE
;
226 /* Whether to compress/decompress DWARF debug sections. */
231 compress_zlib
= compress
| 1 << 1,
232 compress_gnu_zlib
= compress
| 1 << 2,
233 compress_gabi_zlib
= compress
| 1 << 3,
235 } do_debug_sections
= nothing
;
237 /* Whether to generate ELF common symbols with the STT_COMMON type. */
238 static enum bfd_link_elf_stt_common do_elf_stt_common
= unchanged
;
240 /* Whether to change the leading character in symbol names. */
241 static bfd_boolean change_leading_char
= FALSE
;
243 /* Whether to remove the leading character from global symbol names. */
244 static bfd_boolean remove_leading_char
= FALSE
;
246 /* Whether to permit wildcard in symbol comparison. */
247 static bfd_boolean wildcard
= FALSE
;
249 /* True if --localize-hidden is in effect. */
250 static bfd_boolean localize_hidden
= FALSE
;
252 /* List of symbols to strip, keep, localize, keep-global, weaken,
254 static htab_t strip_specific_htab
= NULL
;
255 static htab_t strip_unneeded_htab
= NULL
;
256 static htab_t keep_specific_htab
= NULL
;
257 static htab_t localize_specific_htab
= NULL
;
258 static htab_t globalize_specific_htab
= NULL
;
259 static htab_t keepglobal_specific_htab
= NULL
;
260 static htab_t weaken_specific_htab
= NULL
;
261 static htab_t redefine_specific_htab
= NULL
;
262 static htab_t redefine_specific_reverse_htab
= NULL
;
263 static struct addsym_node
*add_sym_list
= NULL
, **add_sym_tail
= &add_sym_list
;
264 static int add_symbols
= 0;
266 static char *strip_specific_buffer
= NULL
;
267 static char *strip_unneeded_buffer
= NULL
;
268 static char *keep_specific_buffer
= NULL
;
269 static char *localize_specific_buffer
= NULL
;
270 static char *globalize_specific_buffer
= NULL
;
271 static char *keepglobal_specific_buffer
= NULL
;
272 static char *weaken_specific_buffer
= NULL
;
274 /* If this is TRUE, we weaken global symbols (set BSF_WEAK). */
275 static bfd_boolean weaken
= FALSE
;
277 /* If this is TRUE, we retain BSF_FILE symbols. */
278 static bfd_boolean keep_file_symbols
= FALSE
;
280 /* Prefix symbols/sections. */
281 static char *prefix_symbols_string
= 0;
282 static char *prefix_sections_string
= 0;
283 static char *prefix_alloc_sections_string
= 0;
285 /* True if --extract-symbol was passed on the command line. */
286 static bfd_boolean extract_symbol
= FALSE
;
288 /* If `reverse_bytes' is nonzero, then reverse the order of every chunk
289 of <reverse_bytes> bytes within each output section. */
290 static int reverse_bytes
= 0;
292 /* For Coff objects, we may want to allow or disallow long section names,
293 or preserve them where found in the inputs. Debug info relies on them. */
294 enum long_section_name_handling
301 /* The default long section handling mode is to preserve them.
302 This is also the only behaviour for 'strip'. */
303 static enum long_section_name_handling long_section_names
= KEEP
;
305 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
306 enum command_line_switch
308 OPTION_ADD_SECTION
=150,
309 OPTION_ADD_GNU_DEBUGLINK
,
311 OPTION_ALT_MACH_CODE
,
312 OPTION_CHANGE_ADDRESSES
,
313 OPTION_CHANGE_LEADING_CHAR
,
314 OPTION_CHANGE_SECTION_ADDRESS
,
315 OPTION_CHANGE_SECTION_LMA
,
316 OPTION_CHANGE_SECTION_VMA
,
318 OPTION_CHANGE_WARNINGS
,
319 OPTION_COMPRESS_DEBUG_SECTIONS
,
321 OPTION_DECOMPRESS_DEBUG_SECTIONS
,
323 OPTION_ELF_STT_COMMON
,
325 OPTION_EXTRACT_SYMBOL
,
326 OPTION_FILE_ALIGNMENT
,
329 OPTION_GLOBALIZE_SYMBOL
,
330 OPTION_GLOBALIZE_SYMBOLS
,
334 OPTION_INTERLEAVE_WIDTH
,
335 OPTION_KEEPGLOBAL_SYMBOLS
,
336 OPTION_KEEP_FILE_SYMBOLS
,
339 OPTION_LOCALIZE_HIDDEN
,
340 OPTION_LOCALIZE_SYMBOLS
,
341 OPTION_LONG_SECTION_NAMES
,
343 OPTION_NO_MERGE_NOTES
,
344 OPTION_NO_CHANGE_WARNINGS
,
345 OPTION_ONLY_KEEP_DEBUG
,
347 OPTION_PREFIX_ALLOC_SECTIONS
,
348 OPTION_PREFIX_SECTIONS
,
349 OPTION_PREFIX_SYMBOLS
,
351 OPTION_READONLY_TEXT
,
353 OPTION_REDEFINE_SYMS
,
354 OPTION_REMOVE_LEADING_CHAR
,
355 OPTION_REMOVE_RELOCS
,
356 OPTION_RENAME_SECTION
,
357 OPTION_REVERSE_BYTES
,
358 OPTION_PE_SECTION_ALIGNMENT
,
359 OPTION_SET_SECTION_FLAGS
,
360 OPTION_SET_SECTION_ALIGNMENT
,
366 OPTION_STRIP_SYMBOLS
,
367 OPTION_STRIP_UNNEEDED
,
368 OPTION_STRIP_UNNEEDED_SYMBOL
,
369 OPTION_STRIP_UNNEEDED_SYMBOLS
,
371 OPTION_UPDATE_SECTION
,
372 OPTION_VERILOG_DATA_WIDTH
,
374 OPTION_WEAKEN_SYMBOLS
,
378 /* Options to handle if running as "strip". */
380 static struct option strip_options
[] =
382 {"disable-deterministic-archives", no_argument
, 0, 'U'},
383 {"discard-all", no_argument
, 0, 'x'},
384 {"discard-locals", no_argument
, 0, 'X'},
385 {"enable-deterministic-archives", no_argument
, 0, 'D'},
386 {"format", required_argument
, 0, 'F'}, /* Obsolete */
387 {"help", no_argument
, 0, 'h'},
388 {"info", no_argument
, 0, OPTION_FORMATS_INFO
},
389 {"input-format", required_argument
, 0, 'I'}, /* Obsolete */
390 {"input-target", required_argument
, 0, 'I'},
391 {"keep-file-symbols", no_argument
, 0, OPTION_KEEP_FILE_SYMBOLS
},
392 {"keep-section", required_argument
, 0, OPTION_KEEP_SECTION
},
393 {"keep-symbol", required_argument
, 0, 'K'},
394 {"merge-notes", no_argument
, 0, 'M'},
395 {"no-merge-notes", no_argument
, 0, OPTION_NO_MERGE_NOTES
},
396 {"only-keep-debug", no_argument
, 0, OPTION_ONLY_KEEP_DEBUG
},
397 {"output-file", required_argument
, 0, 'o'},
398 {"output-format", required_argument
, 0, 'O'}, /* Obsolete */
399 {"output-target", required_argument
, 0, 'O'},
400 {"preserve-dates", no_argument
, 0, 'p'},
401 {"remove-section", required_argument
, 0, 'R'},
402 {"remove-relocations", required_argument
, 0, OPTION_REMOVE_RELOCS
},
403 {"strip-all", no_argument
, 0, 's'},
404 {"strip-debug", no_argument
, 0, 'S'},
405 {"strip-dwo", no_argument
, 0, OPTION_STRIP_DWO
},
406 {"strip-symbol", required_argument
, 0, 'N'},
407 {"strip-unneeded", no_argument
, 0, OPTION_STRIP_UNNEEDED
},
408 {"target", required_argument
, 0, 'F'},
409 {"verbose", no_argument
, 0, 'v'},
410 {"version", no_argument
, 0, 'V'},
411 {"wildcard", no_argument
, 0, 'w'},
412 {0, no_argument
, 0, 0}
415 /* Options to handle if running as "objcopy". */
417 static struct option copy_options
[] =
419 {"add-gnu-debuglink", required_argument
, 0, OPTION_ADD_GNU_DEBUGLINK
},
420 {"add-section", required_argument
, 0, OPTION_ADD_SECTION
},
421 {"add-symbol", required_argument
, 0, OPTION_ADD_SYMBOL
},
422 {"adjust-section-vma", required_argument
, 0, OPTION_CHANGE_SECTION_ADDRESS
},
423 {"adjust-start", required_argument
, 0, OPTION_CHANGE_START
},
424 {"adjust-vma", required_argument
, 0, OPTION_CHANGE_ADDRESSES
},
425 {"adjust-warnings", no_argument
, 0, OPTION_CHANGE_WARNINGS
},
426 {"alt-machine-code", required_argument
, 0, OPTION_ALT_MACH_CODE
},
427 {"binary-architecture", required_argument
, 0, 'B'},
428 {"byte", required_argument
, 0, 'b'},
429 {"change-addresses", required_argument
, 0, OPTION_CHANGE_ADDRESSES
},
430 {"change-leading-char", no_argument
, 0, OPTION_CHANGE_LEADING_CHAR
},
431 {"change-section-address", required_argument
, 0, OPTION_CHANGE_SECTION_ADDRESS
},
432 {"change-section-lma", required_argument
, 0, OPTION_CHANGE_SECTION_LMA
},
433 {"change-section-vma", required_argument
, 0, OPTION_CHANGE_SECTION_VMA
},
434 {"change-start", required_argument
, 0, OPTION_CHANGE_START
},
435 {"change-warnings", no_argument
, 0, OPTION_CHANGE_WARNINGS
},
436 {"compress-debug-sections", optional_argument
, 0, OPTION_COMPRESS_DEBUG_SECTIONS
},
437 {"debugging", no_argument
, 0, OPTION_DEBUGGING
},
438 {"decompress-debug-sections", no_argument
, 0, OPTION_DECOMPRESS_DEBUG_SECTIONS
},
439 {"disable-deterministic-archives", no_argument
, 0, 'U'},
440 {"discard-all", no_argument
, 0, 'x'},
441 {"discard-locals", no_argument
, 0, 'X'},
442 {"dump-section", required_argument
, 0, OPTION_DUMP_SECTION
},
443 {"elf-stt-common", required_argument
, 0, OPTION_ELF_STT_COMMON
},
444 {"enable-deterministic-archives", no_argument
, 0, 'D'},
445 {"extract-dwo", no_argument
, 0, OPTION_EXTRACT_DWO
},
446 {"extract-symbol", no_argument
, 0, OPTION_EXTRACT_SYMBOL
},
447 {"file-alignment", required_argument
, 0, OPTION_FILE_ALIGNMENT
},
448 {"format", required_argument
, 0, 'F'}, /* Obsolete */
449 {"gap-fill", required_argument
, 0, OPTION_GAP_FILL
},
450 {"globalize-symbol", required_argument
, 0, OPTION_GLOBALIZE_SYMBOL
},
451 {"globalize-symbols", required_argument
, 0, OPTION_GLOBALIZE_SYMBOLS
},
452 {"heap", required_argument
, 0, OPTION_HEAP
},
453 {"help", no_argument
, 0, 'h'},
454 {"image-base", required_argument
, 0 , OPTION_IMAGE_BASE
},
455 {"impure", no_argument
, 0, OPTION_IMPURE
},
456 {"info", no_argument
, 0, OPTION_FORMATS_INFO
},
457 {"input-format", required_argument
, 0, 'I'}, /* Obsolete */
458 {"input-target", required_argument
, 0, 'I'},
459 {"interleave", optional_argument
, 0, 'i'},
460 {"interleave-width", required_argument
, 0, OPTION_INTERLEAVE_WIDTH
},
461 {"keep-file-symbols", no_argument
, 0, OPTION_KEEP_FILE_SYMBOLS
},
462 {"keep-global-symbol", required_argument
, 0, 'G'},
463 {"keep-global-symbols", required_argument
, 0, OPTION_KEEPGLOBAL_SYMBOLS
},
464 {"keep-section", required_argument
, 0, OPTION_KEEP_SECTION
},
465 {"keep-symbol", required_argument
, 0, 'K'},
466 {"keep-symbols", required_argument
, 0, OPTION_KEEP_SYMBOLS
},
467 {"localize-hidden", no_argument
, 0, OPTION_LOCALIZE_HIDDEN
},
468 {"localize-symbol", required_argument
, 0, 'L'},
469 {"localize-symbols", required_argument
, 0, OPTION_LOCALIZE_SYMBOLS
},
470 {"long-section-names", required_argument
, 0, OPTION_LONG_SECTION_NAMES
},
471 {"merge-notes", no_argument
, 0, 'M'},
472 {"no-merge-notes", no_argument
, 0, OPTION_NO_MERGE_NOTES
},
473 {"no-adjust-warnings", no_argument
, 0, OPTION_NO_CHANGE_WARNINGS
},
474 {"no-change-warnings", no_argument
, 0, OPTION_NO_CHANGE_WARNINGS
},
475 {"only-keep-debug", no_argument
, 0, OPTION_ONLY_KEEP_DEBUG
},
476 {"only-section", required_argument
, 0, 'j'},
477 {"output-format", required_argument
, 0, 'O'}, /* Obsolete */
478 {"output-target", required_argument
, 0, 'O'},
479 {"pad-to", required_argument
, 0, OPTION_PAD_TO
},
480 {"prefix-alloc-sections", required_argument
, 0, OPTION_PREFIX_ALLOC_SECTIONS
},
481 {"prefix-sections", required_argument
, 0, OPTION_PREFIX_SECTIONS
},
482 {"prefix-symbols", required_argument
, 0, OPTION_PREFIX_SYMBOLS
},
483 {"preserve-dates", no_argument
, 0, 'p'},
484 {"pure", no_argument
, 0, OPTION_PURE
},
485 {"readonly-text", no_argument
, 0, OPTION_READONLY_TEXT
},
486 {"redefine-sym", required_argument
, 0, OPTION_REDEFINE_SYM
},
487 {"redefine-syms", required_argument
, 0, OPTION_REDEFINE_SYMS
},
488 {"remove-leading-char", no_argument
, 0, OPTION_REMOVE_LEADING_CHAR
},
489 {"remove-section", required_argument
, 0, 'R'},
490 {"remove-relocations", required_argument
, 0, OPTION_REMOVE_RELOCS
},
491 {"rename-section", required_argument
, 0, OPTION_RENAME_SECTION
},
492 {"reverse-bytes", required_argument
, 0, OPTION_REVERSE_BYTES
},
493 {"section-alignment", required_argument
, 0, OPTION_PE_SECTION_ALIGNMENT
},
494 {"set-section-flags", required_argument
, 0, OPTION_SET_SECTION_FLAGS
},
495 {"set-section-alignment", required_argument
, 0, OPTION_SET_SECTION_ALIGNMENT
},
496 {"set-start", required_argument
, 0, OPTION_SET_START
},
497 {"srec-forceS3", no_argument
, 0, OPTION_SREC_FORCES3
},
498 {"srec-len", required_argument
, 0, OPTION_SREC_LEN
},
499 {"stack", required_argument
, 0, OPTION_STACK
},
500 {"strip-all", no_argument
, 0, 'S'},
501 {"strip-debug", no_argument
, 0, 'g'},
502 {"strip-dwo", no_argument
, 0, OPTION_STRIP_DWO
},
503 {"strip-symbol", required_argument
, 0, 'N'},
504 {"strip-symbols", required_argument
, 0, OPTION_STRIP_SYMBOLS
},
505 {"strip-unneeded", no_argument
, 0, OPTION_STRIP_UNNEEDED
},
506 {"strip-unneeded-symbol", required_argument
, 0, OPTION_STRIP_UNNEEDED_SYMBOL
},
507 {"strip-unneeded-symbols", required_argument
, 0, OPTION_STRIP_UNNEEDED_SYMBOLS
},
508 {"subsystem", required_argument
, 0, OPTION_SUBSYSTEM
},
509 {"target", required_argument
, 0, 'F'},
510 {"update-section", required_argument
, 0, OPTION_UPDATE_SECTION
},
511 {"verbose", no_argument
, 0, 'v'},
512 {"verilog-data-width", required_argument
, 0, OPTION_VERILOG_DATA_WIDTH
},
513 {"version", no_argument
, 0, 'V'},
514 {"weaken", no_argument
, 0, OPTION_WEAKEN
},
515 {"weaken-symbol", required_argument
, 0, 'W'},
516 {"weaken-symbols", required_argument
, 0, OPTION_WEAKEN_SYMBOLS
},
517 {"wildcard", no_argument
, 0, 'w'},
518 {"writable-text", no_argument
, 0, OPTION_WRITABLE_TEXT
},
519 {0, no_argument
, 0, 0}
523 extern char *program_name
;
525 /* This flag distinguishes between strip and objcopy:
526 1 means this is 'strip'; 0 means this is 'objcopy'.
527 -1 means if we should use argv[0] to decide. */
530 /* The maximum length of an S record. This variable is defined in srec.c
531 and can be modified by the --srec-len parameter. */
532 extern unsigned int _bfd_srec_len
;
534 /* Restrict the generation of Srecords to type S3 only.
535 This variable is defined in bfd/srec.c and can be toggled
536 on by the --srec-forceS3 command line switch. */
537 extern bfd_boolean _bfd_srec_forceS3
;
539 /* Width of data in bytes for verilog output.
540 This variable is declared in bfd/verilog.c and can be modified by
541 the --verilog-data-width parameter. */
542 extern unsigned int VerilogDataWidth
;
544 /* Forward declarations. */
545 static void setup_section (bfd
*, asection
*, void *);
546 static void setup_bfd_headers (bfd
*, bfd
*);
547 static void copy_relocations_in_section (bfd
*, asection
*, void *);
548 static void copy_section (bfd
*, asection
*, void *);
549 static void get_sections (bfd
*, asection
*, void *);
550 static int compare_section_lma (const void *, const void *);
551 static void mark_symbols_used_in_relocations (bfd
*, asection
*, void *);
552 static bfd_boolean
write_debugging_info (bfd
*, void *, long *, asymbol
***);
553 static const char *lookup_sym_redefinition (const char *);
554 static const char *find_section_rename (const char *, flagword
*);
556 ATTRIBUTE_NORETURN
static void
557 copy_usage (FILE *stream
, int exit_status
)
559 fprintf (stream
, _("Usage: %s [option(s)] in-file [out-file]\n"), program_name
);
560 fprintf (stream
, _(" Copies a binary file, possibly transforming it in the process\n"));
561 fprintf (stream
, _(" The options are:\n"));
562 fprintf (stream
, _("\
563 -I --input-target <bfdname> Assume input file is in format <bfdname>\n\
564 -O --output-target <bfdname> Create an output file in format <bfdname>\n\
565 -B --binary-architecture <arch> Set output arch, when input is arch-less\n\
566 -F --target <bfdname> Set both input and output format to <bfdname>\n\
567 --debugging Convert debugging information, if possible\n\
568 -p --preserve-dates Copy modified/access timestamps to the output\n"));
569 if (DEFAULT_AR_DETERMINISTIC
)
570 fprintf (stream
, _("\
571 -D --enable-deterministic-archives\n\
572 Produce deterministic output when stripping archives (default)\n\
573 -U --disable-deterministic-archives\n\
574 Disable -D behavior\n"));
576 fprintf (stream
, _("\
577 -D --enable-deterministic-archives\n\
578 Produce deterministic output when stripping archives\n\
579 -U --disable-deterministic-archives\n\
580 Disable -D behavior (default)\n"));
581 fprintf (stream
, _("\
582 -j --only-section <name> Only copy section <name> into the output\n\
583 --add-gnu-debuglink=<file> Add section .gnu_debuglink linking to <file>\n\
584 -R --remove-section <name> Remove section <name> from the output\n\
585 --remove-relocations <name> Remove relocations from section <name>\n\
586 -S --strip-all Remove all symbol and relocation information\n\
587 -g --strip-debug Remove all debugging symbols & sections\n\
588 --strip-dwo Remove all DWO sections\n\
589 --strip-unneeded Remove all symbols not needed by relocations\n\
590 -N --strip-symbol <name> Do not copy symbol <name>\n\
591 --strip-unneeded-symbol <name>\n\
592 Do not copy symbol <name> unless needed by\n\
594 --only-keep-debug Strip everything but the debug information\n\
595 --extract-dwo Copy only DWO sections\n\
596 --extract-symbol Remove section contents but keep symbols\n\
597 --keep-section <name> Do not strip section <name>\n\
598 -K --keep-symbol <name> Do not strip symbol <name>\n\
599 --keep-file-symbols Do not strip file symbol(s)\n\
600 --localize-hidden Turn all ELF hidden symbols into locals\n\
601 -L --localize-symbol <name> Force symbol <name> to be marked as a local\n\
602 --globalize-symbol <name> Force symbol <name> to be marked as a global\n\
603 -G --keep-global-symbol <name> Localize all symbols except <name>\n\
604 -W --weaken-symbol <name> Force symbol <name> to be marked as a weak\n\
605 --weaken Force all global symbols to be marked as weak\n\
606 -w --wildcard Permit wildcard in symbol comparison\n\
607 -x --discard-all Remove all non-global symbols\n\
608 -X --discard-locals Remove any compiler-generated symbols\n\
609 -i --interleave[=<number>] Only copy N out of every <number> bytes\n\
610 --interleave-width <number> Set N for --interleave\n\
611 -b --byte <num> Select byte <num> in every interleaved block\n\
612 --gap-fill <val> Fill gaps between sections with <val>\n\
613 --pad-to <addr> Pad the last section up to address <addr>\n\
614 --set-start <addr> Set the start address to <addr>\n\
615 {--change-start|--adjust-start} <incr>\n\
616 Add <incr> to the start address\n\
617 {--change-addresses|--adjust-vma} <incr>\n\
618 Add <incr> to LMA, VMA and start addresses\n\
619 {--change-section-address|--adjust-section-vma} <name>{=|+|-}<val>\n\
620 Change LMA and VMA of section <name> by <val>\n\
621 --change-section-lma <name>{=|+|-}<val>\n\
622 Change the LMA of section <name> by <val>\n\
623 --change-section-vma <name>{=|+|-}<val>\n\
624 Change the VMA of section <name> by <val>\n\
625 {--[no-]change-warnings|--[no-]adjust-warnings}\n\
626 Warn if a named section does not exist\n\
627 --set-section-flags <name>=<flags>\n\
628 Set section <name>'s properties to <flags>\n\
629 --set-section-alignment <name>=<align>\n\
630 Set section <name>'s alignment to <align> bytes\n\
631 --add-section <name>=<file> Add section <name> found in <file> to output\n\
632 --update-section <name>=<file>\n\
633 Update contents of section <name> with\n\
634 contents found in <file>\n\
635 --dump-section <name>=<file> Dump the contents of section <name> into <file>\n\
636 --rename-section <old>=<new>[,<flags>] Rename section <old> to <new>\n\
637 --long-section-names {enable|disable|keep}\n\
638 Handle long section names in Coff objects.\n\
639 --change-leading-char Force output format's leading character style\n\
640 --remove-leading-char Remove leading character from global symbols\n\
641 --reverse-bytes=<num> Reverse <num> bytes at a time, in output sections with content\n\
642 --redefine-sym <old>=<new> Redefine symbol name <old> to <new>\n\
643 --redefine-syms <file> --redefine-sym for all symbol pairs \n\
645 --srec-len <number> Restrict the length of generated Srecords\n\
646 --srec-forceS3 Restrict the type of generated Srecords to S3\n\
647 --strip-symbols <file> -N for all symbols listed in <file>\n\
648 --strip-unneeded-symbols <file>\n\
649 --strip-unneeded-symbol for all symbols listed\n\
651 --keep-symbols <file> -K for all symbols listed in <file>\n\
652 --localize-symbols <file> -L for all symbols listed in <file>\n\
653 --globalize-symbols <file> --globalize-symbol for all in <file>\n\
654 --keep-global-symbols <file> -G for all symbols listed in <file>\n\
655 --weaken-symbols <file> -W for all symbols listed in <file>\n\
656 --add-symbol <name>=[<section>:]<value>[,<flags>] Add a symbol\n\
657 --alt-machine-code <index> Use the target's <index>'th alternative machine\n\
658 --writable-text Mark the output text as writable\n\
659 --readonly-text Make the output text write protected\n\
660 --pure Mark the output file as demand paged\n\
661 --impure Mark the output file as impure\n\
662 --prefix-symbols <prefix> Add <prefix> to start of every symbol name\n\
663 --prefix-sections <prefix> Add <prefix> to start of every section name\n\
664 --prefix-alloc-sections <prefix>\n\
665 Add <prefix> to start of every allocatable\n\
667 --file-alignment <num> Set PE file alignment to <num>\n\
668 --heap <reserve>[,<commit>] Set PE reserve/commit heap to <reserve>/\n\
670 --image-base <address> Set PE image base to <address>\n\
671 --section-alignment <num> Set PE section alignment to <num>\n\
672 --stack <reserve>[,<commit>] Set PE reserve/commit stack to <reserve>/\n\
674 --subsystem <name>[:<version>]\n\
675 Set PE subsystem to <name> [& <version>]\n\
676 --compress-debug-sections[={none|zlib|zlib-gnu|zlib-gabi}]\n\
677 Compress DWARF debug sections using zlib\n\
678 --decompress-debug-sections Decompress DWARF debug sections using zlib\n\
679 --elf-stt-common=[yes|no] Generate ELF common symbols with STT_COMMON\n\
681 --verilog-data-width <number> Specifies data width, in bytes, for verilog output\n\
682 -M --merge-notes Remove redundant entries in note sections\n\
683 --no-merge-notes Do not attempt to remove redundant notes (default)\n\
684 -v --verbose List all object files modified\n\
685 @<file> Read options from <file>\n\
686 -V --version Display this program's version number\n\
687 -h --help Display this output\n\
688 --info List object formats & architectures supported\n\
690 list_supported_targets (program_name
, stream
);
691 if (REPORT_BUGS_TO
[0] && exit_status
== 0)
692 fprintf (stream
, _("Report bugs to %s\n"), REPORT_BUGS_TO
);
696 ATTRIBUTE_NORETURN
static void
697 strip_usage (FILE *stream
, int exit_status
)
699 fprintf (stream
, _("Usage: %s <option(s)> in-file(s)\n"), program_name
);
700 fprintf (stream
, _(" Removes symbols and sections from files\n"));
701 fprintf (stream
, _(" The options are:\n"));
702 fprintf (stream
, _("\
703 -I --input-target=<bfdname> Assume input file is in format <bfdname>\n\
704 -O --output-target=<bfdname> Create an output file in format <bfdname>\n\
705 -F --target=<bfdname> Set both input and output format to <bfdname>\n\
706 -p --preserve-dates Copy modified/access timestamps to the output\n\
708 if (DEFAULT_AR_DETERMINISTIC
)
709 fprintf (stream
, _("\
710 -D --enable-deterministic-archives\n\
711 Produce deterministic output when stripping archives (default)\n\
712 -U --disable-deterministic-archives\n\
713 Disable -D behavior\n"));
715 fprintf (stream
, _("\
716 -D --enable-deterministic-archives\n\
717 Produce deterministic output when stripping archives\n\
718 -U --disable-deterministic-archives\n\
719 Disable -D behavior (default)\n"));
720 fprintf (stream
, _("\
721 -R --remove-section=<name> Also remove section <name> from the output\n\
722 --remove-relocations <name> Remove relocations from section <name>\n\
723 -s --strip-all Remove all symbol and relocation information\n\
724 -g -S -d --strip-debug Remove all debugging symbols & sections\n\
725 --strip-dwo Remove all DWO sections\n\
726 --strip-unneeded Remove all symbols not needed by relocations\n\
727 --only-keep-debug Strip everything but the debug information\n\
728 -M --merge-notes Remove redundant entries in note sections (default)\n\
729 --no-merge-notes Do not attempt to remove redundant notes\n\
730 -N --strip-symbol=<name> Do not copy symbol <name>\n\
731 --keep-section=<name> Do not strip section <name>\n\
732 -K --keep-symbol=<name> Do not strip symbol <name>\n\
733 --keep-file-symbols Do not strip file symbol(s)\n\
734 -w --wildcard Permit wildcard in symbol comparison\n\
735 -x --discard-all Remove all non-global symbols\n\
736 -X --discard-locals Remove any compiler-generated symbols\n\
737 -v --verbose List all object files modified\n\
738 -V --version Display this program's version number\n\
739 -h --help Display this output\n\
740 --info List object formats & architectures supported\n\
741 -o <file> Place stripped output into <file>\n\
744 list_supported_targets (program_name
, stream
);
745 if (REPORT_BUGS_TO
[0] && exit_status
== 0)
746 fprintf (stream
, _("Report bugs to %s\n"), REPORT_BUGS_TO
);
750 /* Parse section flags into a flagword, with a fatal error if the
751 string can't be parsed. */
754 parse_flags (const char *s
)
764 snext
= strchr (s
, ',');
774 #define PARSE_FLAG(fname,fval) \
775 else if (strncasecmp (fname, s, len) == 0) ret |= fval
776 PARSE_FLAG ("alloc", SEC_ALLOC
);
777 PARSE_FLAG ("load", SEC_LOAD
);
778 PARSE_FLAG ("noload", SEC_NEVER_LOAD
);
779 PARSE_FLAG ("readonly", SEC_READONLY
);
780 PARSE_FLAG ("debug", SEC_DEBUGGING
);
781 PARSE_FLAG ("code", SEC_CODE
);
782 PARSE_FLAG ("data", SEC_DATA
);
783 PARSE_FLAG ("rom", SEC_ROM
);
784 PARSE_FLAG ("exclude", SEC_EXCLUDE
);
785 PARSE_FLAG ("share", SEC_COFF_SHARED
);
786 PARSE_FLAG ("contents", SEC_HAS_CONTENTS
);
787 PARSE_FLAG ("merge", SEC_MERGE
);
788 PARSE_FLAG ("strings", SEC_STRINGS
);
794 copy
= (char *) xmalloc (len
+ 1);
795 strncpy (copy
, s
, len
);
797 non_fatal (_("unrecognized section flag `%s'"), copy
);
798 fatal (_("supported flags: %s"),
799 "alloc, load, noload, readonly, debug, code, data, rom, exclude, share, contents, merge, strings");
809 /* Parse symbol flags into a flagword, with a fatal error if the
810 string can't be parsed. */
813 parse_symflags (const char *s
, const char **other
)
823 snext
= strchr (s
, ',');
832 #define PARSE_FLAG(fname, fval) \
833 else if (len == sizeof fname - 1 \
834 && strncasecmp (fname, s, len) == 0) \
837 #define PARSE_OTHER(fname, fval) \
838 else if (len >= sizeof fname \
839 && strncasecmp (fname, s, sizeof fname - 1) == 0) \
840 fval = xstrndup (s + sizeof fname - 1, len - sizeof fname + 1)
843 PARSE_FLAG ("local", BSF_LOCAL
);
844 PARSE_FLAG ("global", BSF_GLOBAL
);
845 PARSE_FLAG ("export", BSF_EXPORT
);
846 PARSE_FLAG ("debug", BSF_DEBUGGING
);
847 PARSE_FLAG ("function", BSF_FUNCTION
);
848 PARSE_FLAG ("weak", BSF_WEAK
);
849 PARSE_FLAG ("section", BSF_SECTION_SYM
);
850 PARSE_FLAG ("constructor", BSF_CONSTRUCTOR
);
851 PARSE_FLAG ("warning", BSF_WARNING
);
852 PARSE_FLAG ("indirect", BSF_INDIRECT
);
853 PARSE_FLAG ("file", BSF_FILE
);
854 PARSE_FLAG ("object", BSF_OBJECT
);
855 PARSE_FLAG ("synthetic", BSF_SYNTHETIC
);
856 PARSE_FLAG ("indirect-function", BSF_GNU_INDIRECT_FUNCTION
| BSF_FUNCTION
);
857 PARSE_FLAG ("unique-object", BSF_GNU_UNIQUE
| BSF_OBJECT
);
858 PARSE_OTHER ("before=", *other
);
866 copy
= (char *) xmalloc (len
+ 1);
867 strncpy (copy
, s
, len
);
869 non_fatal (_("unrecognized symbol flag `%s'"), copy
);
870 fatal (_("supported flags: %s"),
871 "local, global, export, debug, function, weak, section, "
872 "constructor, warning, indirect, file, object, synthetic, "
873 "indirect-function, unique-object, before=<othersym>");
883 /* Find and optionally add an entry in the change_sections list.
885 We need to be careful in how we match section names because of the support
886 for wildcard characters. For example suppose that the user has invoked
889 --set-section-flags .debug_*=debug
890 --set-section-flags .debug_str=readonly,debug
891 --change-section-address .debug_*ranges=0x1000
893 With the idea that all debug sections will receive the DEBUG flag, the
894 .debug_str section will also receive the READONLY flag and the
895 .debug_ranges and .debug_aranges sections will have their address set to
896 0x1000. (This may not make much sense, but it is just an example).
898 When adding the section name patterns to the section list we need to make
899 sure that previous entries do not match with the new entry, unless the
900 match is exact. (In which case we assume that the user is overriding
901 the previous entry with the new context).
903 When matching real section names to the section list we make use of the
904 wildcard characters, but we must do so in context. Eg if we are setting
905 section addresses then we match for .debug_ranges but not for .debug_info.
907 Finally, if ADD is false and we do find a match, we mark the section list
910 static struct section_list
*
911 find_section_list (const char *name
, bfd_boolean add
, unsigned int context
)
913 struct section_list
*p
, *match
= NULL
;
915 /* assert ((context & ((1 << 7) - 1)) != 0); */
917 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
921 if (strcmp (p
->pattern
, name
) == 0)
923 /* Check for context conflicts. */
924 if (((p
->context
& SECTION_CONTEXT_REMOVE
)
925 && (context
& SECTION_CONTEXT_COPY
))
926 || ((context
& SECTION_CONTEXT_REMOVE
)
927 && (p
->context
& SECTION_CONTEXT_COPY
)))
928 fatal (_("error: %s both copied and removed"), name
);
930 if (((p
->context
& SECTION_CONTEXT_SET_VMA
)
931 && (context
& SECTION_CONTEXT_ALTER_VMA
))
932 || ((context
& SECTION_CONTEXT_SET_VMA
)
933 && (context
& SECTION_CONTEXT_ALTER_VMA
)))
934 fatal (_("error: %s both sets and alters VMA"), name
);
936 if (((p
->context
& SECTION_CONTEXT_SET_LMA
)
937 && (context
& SECTION_CONTEXT_ALTER_LMA
))
938 || ((context
& SECTION_CONTEXT_SET_LMA
)
939 && (context
& SECTION_CONTEXT_ALTER_LMA
)))
940 fatal (_("error: %s both sets and alters LMA"), name
);
942 /* Extend the context. */
943 p
->context
|= context
;
947 /* If we are not adding a new name/pattern then
948 only check for a match if the context applies. */
949 else if (p
->context
& context
)
951 /* We could check for the presence of wildchar characters
952 first and choose between calling strcmp and fnmatch,
953 but is that really worth it ? */
954 if (p
->pattern
[0] == '!')
956 if (fnmatch (p
->pattern
+ 1, name
, 0) == 0)
964 if (fnmatch (p
->pattern
, name
, 0) == 0)
980 p
= (struct section_list
*) xmalloc (sizeof (struct section_list
));
983 p
->context
= context
;
988 p
->next
= change_sections
;
994 /* S1 is the entry node already in the table, S2 is the key node. */
997 eq_string_redefnode (const void *s1
, const void *s2
)
999 struct redefine_node
*node1
= (struct redefine_node
*) s1
;
1000 struct redefine_node
*node2
= (struct redefine_node
*) s2
;
1001 return !strcmp ((const char *) node1
->source
, (const char *) node2
->source
);
1004 /* P is redefine node. Hash value is generated from its "source" filed. */
1007 htab_hash_redefnode (const void *p
)
1009 struct redefine_node
*redefnode
= (struct redefine_node
*) p
;
1010 return htab_hash_string (redefnode
->source
);
1013 /* Create hashtab used for redefine node. */
1016 create_symbol2redef_htab (void)
1018 return htab_create_alloc (16, htab_hash_redefnode
, eq_string_redefnode
, NULL
,
1022 /* There is htab_hash_string but no htab_eq_string. Makes sense. */
1025 eq_string (const void *s1
, const void *s2
)
1027 return strcmp ((const char *) s1
, (const char *) s2
) == 0;
1031 create_symbol_htab (void)
1033 return htab_create_alloc (16, htab_hash_string
, eq_string
, NULL
, xcalloc
, free
);
1037 create_symbol_htabs (void)
1039 strip_specific_htab
= create_symbol_htab ();
1040 strip_unneeded_htab
= create_symbol_htab ();
1041 keep_specific_htab
= create_symbol_htab ();
1042 localize_specific_htab
= create_symbol_htab ();
1043 globalize_specific_htab
= create_symbol_htab ();
1044 keepglobal_specific_htab
= create_symbol_htab ();
1045 weaken_specific_htab
= create_symbol_htab ();
1046 redefine_specific_htab
= create_symbol2redef_htab ();
1047 /* As there is no bidirectional hash table in libiberty, need a reverse table
1048 to check duplicated target string. */
1049 redefine_specific_reverse_htab
= create_symbol_htab ();
1052 /* Add a symbol to strip_specific_list. */
1055 add_specific_symbol (const char *name
, htab_t htab
)
1057 *htab_find_slot (htab
, name
, INSERT
) = (char *) name
;
1060 /* Like add_specific_symbol, but the element type is void *. */
1063 add_specific_symbol_node (const void *node
, htab_t htab
)
1065 *htab_find_slot (htab
, node
, INSERT
) = (void *) node
;
1068 /* Add symbols listed in `filename' to strip_specific_list. */
1070 #define IS_WHITESPACE(c) ((c) == ' ' || (c) == '\t')
1071 #define IS_LINE_TERMINATOR(c) ((c) == '\n' || (c) == '\r' || (c) == '\0')
1074 add_specific_symbols (const char *filename
, htab_t htab
, char **buffer_p
)
1080 unsigned int line_count
;
1082 size
= get_file_size (filename
);
1089 buffer
= (char *) xmalloc (size
+ 2);
1090 f
= fopen (filename
, FOPEN_RT
);
1092 fatal (_("cannot open '%s': %s"), filename
, strerror (errno
));
1094 if (fread (buffer
, 1, size
, f
) == 0 || ferror (f
))
1095 fatal (_("%s: fread failed"), filename
);
1098 buffer
[size
] = '\n';
1099 buffer
[size
+ 1] = '\0';
1103 for (line
= buffer
; * line
!= '\0'; line
++)
1108 int finished
= FALSE
;
1110 for (eol
= line
;; eol
++)
1116 /* Cope with \n\r. */
1124 /* Cope with \r\n. */
1135 /* Line comment, Terminate the line here, in case a
1136 name is present and then allow the rest of the
1137 loop to find the real end of the line. */
1149 /* A name may now exist somewhere between 'line' and 'eol'.
1150 Strip off leading whitespace and trailing whitespace,
1151 then add it to the list. */
1152 for (name
= line
; IS_WHITESPACE (* name
); name
++)
1154 for (name_end
= name
;
1155 (! IS_WHITESPACE (* name_end
))
1156 && (! IS_LINE_TERMINATOR (* name_end
));
1160 if (! IS_LINE_TERMINATOR (* name_end
))
1164 for (extra
= name_end
+ 1; IS_WHITESPACE (* extra
); extra
++)
1167 if (! IS_LINE_TERMINATOR (* extra
))
1168 non_fatal (_("%s:%d: Ignoring rubbish found on this line"),
1169 filename
, line_count
);
1174 if (name_end
> name
)
1175 add_specific_symbol (name
, htab
);
1177 /* Advance line pointer to end of line. The 'eol ++' in the for
1178 loop above will then advance us to the start of the next line. */
1183 /* Do not free the buffer. Parts of it will have been referenced
1184 in the calls to add_specific_symbol. */
1188 /* See whether a symbol should be stripped or kept
1189 based on strip_specific_list and keep_symbols. */
1192 is_specified_symbol_predicate (void **slot
, void *data
)
1194 struct is_specified_symbol_predicate_data
*d
=
1195 (struct is_specified_symbol_predicate_data
*) data
;
1196 const char *slot_name
= (char *) *slot
;
1198 if (*slot_name
!= '!')
1200 if (! fnmatch (slot_name
, d
->name
, 0))
1203 /* Continue traversal, there might be a non-match rule. */
1209 if (! fnmatch (slot_name
+ 1, d
->name
, 0))
1212 /* Stop traversal. */
1217 /* Continue traversal. */
1222 is_specified_symbol (const char *name
, htab_t htab
)
1226 struct is_specified_symbol_predicate_data data
;
1231 htab_traverse (htab
, is_specified_symbol_predicate
, &data
);
1236 return htab_find (htab
, name
) != NULL
;
1239 /* Return a pointer to the symbol used as a signature for GROUP. */
1242 group_signature (asection
*group
)
1244 bfd
*abfd
= group
->owner
;
1245 Elf_Internal_Shdr
*ghdr
;
1247 /* PR 20089: An earlier error may have prevented us from loading the symbol table. */
1251 if (bfd_get_flavour (abfd
) != bfd_target_elf_flavour
)
1254 ghdr
= &elf_section_data (group
)->this_hdr
;
1255 if (ghdr
->sh_link
== elf_onesymtab (abfd
))
1257 const struct elf_backend_data
*bed
= get_elf_backend_data (abfd
);
1258 Elf_Internal_Shdr
*symhdr
= &elf_symtab_hdr (abfd
);
1260 if (ghdr
->sh_info
> 0
1261 && ghdr
->sh_info
< symhdr
->sh_size
/ bed
->s
->sizeof_sym
)
1262 return isympp
[ghdr
->sh_info
- 1];
1267 /* Return TRUE if the section is a DWO section. */
1270 is_dwo_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1275 if (sec
== NULL
|| (name
= bfd_section_name (sec
)) == NULL
)
1278 len
= strlen (name
);
1282 return strncmp (name
+ len
- 4, ".dwo", 4) == 0;
1285 /* Return TRUE if section SEC is in the update list. */
1288 is_update_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1290 if (update_sections
!= NULL
)
1292 struct section_add
*pupdate
;
1294 for (pupdate
= update_sections
;
1296 pupdate
= pupdate
->next
)
1298 if (strcmp (sec
->name
, pupdate
->name
) == 0)
1307 is_mergeable_note_section (bfd
* abfd
, asection
* sec
)
1310 && bfd_get_flavour (abfd
) == bfd_target_elf_flavour
1311 && elf_section_data (sec
)->this_hdr
.sh_type
== SHT_NOTE
1312 /* FIXME: We currently only support merging GNU_BUILD_NOTEs.
1313 We should add support for more note types. */
1314 && ((elf_section_data (sec
)->this_hdr
.sh_flags
& SHF_GNU_BUILD_NOTE
) != 0
1315 /* Old versions of GAS (prior to 2.27) could not set the section
1316 flags to OS-specific values, so we also accept sections that
1317 start with the expected name. */
1318 || (CONST_STRNEQ (sec
->name
, GNU_BUILD_ATTRS_SECTION_NAME
))))
1324 /* See if a non-group section is being removed. */
1327 is_strip_section_1 (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1329 if (find_section_list (bfd_section_name (sec
), FALSE
, SECTION_CONTEXT_KEEP
)
1333 if (sections_removed
|| sections_copied
)
1335 struct section_list
*p
;
1336 struct section_list
*q
;
1338 p
= find_section_list (bfd_section_name (sec
), FALSE
,
1339 SECTION_CONTEXT_REMOVE
);
1340 q
= find_section_list (bfd_section_name (sec
), FALSE
,
1341 SECTION_CONTEXT_COPY
);
1344 fatal (_("error: section %s matches both remove and copy options"),
1345 bfd_section_name (sec
));
1346 if (p
&& is_update_section (abfd
, sec
))
1347 fatal (_("error: section %s matches both update and remove options"),
1348 bfd_section_name (sec
));
1352 if (sections_copied
&& q
== NULL
)
1356 if ((bfd_section_flags (sec
) & SEC_DEBUGGING
) != 0)
1358 if (strip_symbols
== STRIP_DEBUG
1359 || strip_symbols
== STRIP_UNNEEDED
1360 || strip_symbols
== STRIP_ALL
1361 || discard_locals
== LOCALS_ALL
1362 || convert_debugging
)
1364 /* By default we don't want to strip .reloc section.
1365 This section has for pe-coff special meaning. See
1366 pe-dll.c file in ld, and peXXigen.c in bfd for details. */
1367 if (strcmp (bfd_section_name (sec
), ".reloc") != 0)
1371 if (strip_symbols
== STRIP_DWO
)
1372 return is_dwo_section (abfd
, sec
);
1374 if (strip_symbols
== STRIP_NONDEBUG
)
1378 if (strip_symbols
== STRIP_NONDWO
)
1379 return !is_dwo_section (abfd
, sec
);
1384 /* See if a section is being removed. */
1387 is_strip_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1389 if (is_strip_section_1 (abfd
, sec
))
1392 if ((bfd_section_flags (sec
) & SEC_GROUP
) != 0)
1396 asection
*elt
, *first
;
1398 gsym
= group_signature (sec
);
1399 /* Strip groups without a valid signature. */
1404 If we are going to strip the group signature symbol, then
1405 strip the group section too. */
1407 if ((strip_symbols
== STRIP_ALL
1408 && !is_specified_symbol (gname
, keep_specific_htab
))
1409 || is_specified_symbol (gname
, strip_specific_htab
))
1412 /* Remove the group section if all members are removed. */
1413 first
= elt
= elf_next_in_group (sec
);
1416 if (!is_strip_section_1 (abfd
, elt
))
1418 elt
= elf_next_in_group (elt
);
1430 is_nondebug_keep_contents_section (bfd
*ibfd
, asection
*isection
)
1432 /* Always keep ELF note sections. */
1433 if (bfd_get_flavour (ibfd
) == bfd_target_elf_flavour
)
1434 return elf_section_type (isection
) == SHT_NOTE
;
1436 /* Always keep the .buildid section for PE/COFF.
1438 Strictly, this should be written "always keep the section storing the debug
1439 directory", but that may be the .text section for objects produced by some
1440 tools, which it is not sensible to keep. */
1441 if (bfd_get_flavour (ibfd
) == bfd_target_coff_flavour
)
1442 return strcmp (bfd_section_name (isection
), ".buildid") == 0;
1447 /* Return true if SYM is a hidden symbol. */
1450 is_hidden_symbol (asymbol
*sym
)
1452 elf_symbol_type
*elf_sym
;
1454 elf_sym
= elf_symbol_from (sym
);
1455 if (elf_sym
!= NULL
)
1456 switch (ELF_ST_VISIBILITY (elf_sym
->internal_elf_sym
.st_other
))
1465 /* Empty name is hopefully never a valid symbol name. */
1466 static const char * empty_name
= "";
1469 need_sym_before (struct addsym_node
**node
, const char *sym
)
1472 struct addsym_node
*ptr
= add_sym_list
;
1474 /* 'othersym' symbols are at the front of the list. */
1475 for (count
= 0; count
< add_symbols
; count
++)
1479 if (ptr
->othersym
== empty_name
)
1481 else if (strcmp (ptr
->othersym
, sym
) == 0)
1483 free ((char *) ptr
->othersym
);
1484 ptr
->othersym
= empty_name
;
1494 create_new_symbol (struct addsym_node
*ptr
, bfd
*obfd
)
1496 asymbol
*sym
= bfd_make_empty_symbol (obfd
);
1498 bfd_set_asymbol_name (sym
, ptr
->symdef
);
1499 sym
->value
= ptr
->symval
;
1500 sym
->flags
= ptr
->flags
;
1503 asection
*sec
= bfd_get_section_by_name (obfd
, ptr
->section
);
1505 fatal (_("Section %s not found"), ptr
->section
);
1509 sym
->section
= bfd_abs_section_ptr
;
1513 /* Choose which symbol entries to copy; put the result in OSYMS.
1514 We don't copy in place, because that confuses the relocs.
1515 Return the number of symbols to print. */
1518 filter_symbols (bfd
*abfd
, bfd
*obfd
, asymbol
**osyms
,
1519 asymbol
**isyms
, long symcount
)
1521 asymbol
**from
= isyms
, **to
= osyms
;
1522 long src_count
= 0, dst_count
= 0;
1523 int relocatable
= (abfd
->flags
& (EXEC_P
| DYNAMIC
)) == 0;
1525 for (; src_count
< symcount
; src_count
++)
1527 asymbol
*sym
= from
[src_count
];
1528 flagword flags
= sym
->flags
;
1529 char *name
= (char *) bfd_asymbol_name (sym
);
1531 bfd_boolean used_in_reloc
= FALSE
;
1532 bfd_boolean undefined
;
1533 bfd_boolean rem_leading_char
;
1534 bfd_boolean add_leading_char
;
1536 undefined
= bfd_is_und_section (bfd_asymbol_section (sym
));
1540 struct addsym_node
*ptr
;
1542 if (need_sym_before (&ptr
, name
))
1543 to
[dst_count
++] = create_new_symbol (ptr
, obfd
);
1546 if (htab_elements (redefine_specific_htab
) || section_rename_list
)
1550 new_name
= (char *) lookup_sym_redefinition (name
);
1551 if (new_name
== name
1552 && (flags
& BSF_SECTION_SYM
) != 0)
1553 new_name
= (char *) find_section_rename (name
, NULL
);
1554 bfd_set_asymbol_name (sym
, new_name
);
1558 /* Check if we will remove the current leading character. */
1561 && name
[0] == bfd_get_symbol_leading_char (abfd
)
1562 && (change_leading_char
1563 || (remove_leading_char
1564 && ((flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0
1566 || bfd_is_com_section (bfd_asymbol_section (sym
))))));
1568 /* Check if we will add a new leading character. */
1571 && (bfd_get_symbol_leading_char (obfd
) != '\0')
1572 && (bfd_get_symbol_leading_char (abfd
) == '\0'
1573 || (name
[0] == bfd_get_symbol_leading_char (abfd
)));
1575 /* Short circuit for change_leading_char if we can do it in-place. */
1576 if (rem_leading_char
&& add_leading_char
&& !prefix_symbols_string
)
1578 name
[0] = bfd_get_symbol_leading_char (obfd
);
1579 bfd_set_asymbol_name (sym
, name
);
1580 rem_leading_char
= FALSE
;
1581 add_leading_char
= FALSE
;
1584 /* Remove leading char. */
1585 if (rem_leading_char
)
1586 bfd_set_asymbol_name (sym
, ++name
);
1588 /* Add new leading char and/or prefix. */
1589 if (add_leading_char
|| prefix_symbols_string
)
1592 size_t len
= strlen (name
) + 1;
1594 if (add_leading_char
)
1596 if (prefix_symbols_string
)
1597 len
+= strlen (prefix_symbols_string
);
1599 ptr
= n
= (char *) xmalloc (len
);
1600 if (add_leading_char
)
1601 *ptr
++ = bfd_get_symbol_leading_char (obfd
);
1603 if (prefix_symbols_string
)
1605 strcpy (ptr
, prefix_symbols_string
);
1606 ptr
+= strlen (prefix_symbols_string
);
1610 bfd_set_asymbol_name (sym
, n
);
1614 if (strip_symbols
== STRIP_ALL
)
1616 else if ((flags
& BSF_KEEP
) != 0 /* Used in relocation. */
1617 || ((flags
& BSF_SECTION_SYM
) != 0
1618 && ((*bfd_asymbol_section (sym
)->symbol_ptr_ptr
)->flags
1622 used_in_reloc
= TRUE
;
1624 else if (relocatable
/* Relocatable file. */
1625 && ((flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0
1626 || bfd_is_com_section (bfd_asymbol_section (sym
))))
1628 else if (bfd_decode_symclass (sym
) == 'I')
1629 /* Global symbols in $idata sections need to be retained
1630 even if relocatable is FALSE. External users of the
1631 library containing the $idata section may reference these
1634 else if ((flags
& BSF_GLOBAL
) != 0 /* Global symbol. */
1635 || (flags
& BSF_WEAK
) != 0
1637 || bfd_is_com_section (bfd_asymbol_section (sym
)))
1638 keep
= strip_symbols
!= STRIP_UNNEEDED
;
1639 else if ((flags
& BSF_DEBUGGING
) != 0) /* Debugging symbol. */
1640 keep
= (strip_symbols
!= STRIP_DEBUG
1641 && strip_symbols
!= STRIP_UNNEEDED
1642 && ! convert_debugging
);
1643 else if (bfd_coff_get_comdat_section (abfd
, bfd_asymbol_section (sym
)))
1644 /* COMDAT sections store special information in local
1645 symbols, so we cannot risk stripping any of them. */
1647 else /* Local symbol. */
1648 keep
= (strip_symbols
!= STRIP_UNNEEDED
1649 && (discard_locals
!= LOCALS_ALL
1650 && (discard_locals
!= LOCALS_START_L
1651 || ! bfd_is_local_label (abfd
, sym
))));
1653 if (keep
&& is_specified_symbol (name
, strip_specific_htab
))
1655 /* There are multiple ways to set 'keep' above, but if it
1656 was the relocatable symbol case, then that's an error. */
1659 non_fatal (_("not stripping symbol `%s' because it is named in a relocation"), name
);
1667 && !(flags
& BSF_KEEP
)
1668 && is_specified_symbol (name
, strip_unneeded_htab
))
1672 && ((keep_file_symbols
&& (flags
& BSF_FILE
))
1673 || is_specified_symbol (name
, keep_specific_htab
)))
1676 if (keep
&& is_strip_section (abfd
, bfd_asymbol_section (sym
)))
1681 if ((flags
& BSF_GLOBAL
) != 0
1682 && (weaken
|| is_specified_symbol (name
, weaken_specific_htab
)))
1684 sym
->flags
&= ~ BSF_GLOBAL
;
1685 sym
->flags
|= BSF_WEAK
;
1689 && (flags
& (BSF_GLOBAL
| BSF_WEAK
))
1690 && (is_specified_symbol (name
, localize_specific_htab
)
1691 || (htab_elements (keepglobal_specific_htab
) != 0
1692 && ! is_specified_symbol (name
, keepglobal_specific_htab
))
1693 || (localize_hidden
&& is_hidden_symbol (sym
))))
1695 sym
->flags
&= ~ (BSF_GLOBAL
| BSF_WEAK
);
1696 sym
->flags
|= BSF_LOCAL
;
1700 && (flags
& BSF_LOCAL
)
1701 && is_specified_symbol (name
, globalize_specific_htab
))
1703 sym
->flags
&= ~ BSF_LOCAL
;
1704 sym
->flags
|= BSF_GLOBAL
;
1707 to
[dst_count
++] = sym
;
1712 struct addsym_node
*ptr
= add_sym_list
;
1714 for (src_count
= 0; src_count
< add_symbols
; src_count
++)
1718 if (ptr
->othersym
!= empty_name
)
1719 fatal (_("'before=%s' not found"), ptr
->othersym
);
1722 to
[dst_count
++] = create_new_symbol (ptr
, obfd
);
1728 to
[dst_count
] = NULL
;
1733 /* Find the redefined name of symbol SOURCE. */
1736 lookup_sym_redefinition (const char *source
)
1738 struct redefine_node key_node
= {(char *) source
, NULL
};
1739 struct redefine_node
*redef_node
1740 = (struct redefine_node
*) htab_find (redefine_specific_htab
, &key_node
);
1742 return redef_node
== NULL
? source
: redef_node
->target
;
1745 /* Insert a node into symbol redefine hash tabel. */
1748 add_redefine_and_check (const char *cause
, const char *source
,
1751 struct redefine_node
*new_node
1752 = (struct redefine_node
*) xmalloc (sizeof (struct redefine_node
));
1754 new_node
->source
= strdup (source
);
1755 new_node
->target
= strdup (target
);
1757 if (htab_find (redefine_specific_htab
, new_node
) != HTAB_EMPTY_ENTRY
)
1758 fatal (_("%s: Multiple redefinition of symbol \"%s\""),
1761 if (htab_find (redefine_specific_reverse_htab
, target
) != HTAB_EMPTY_ENTRY
)
1762 fatal (_("%s: Symbol \"%s\" is target of more than one redefinition"),
1765 /* Insert the NEW_NODE into hash table for quick search. */
1766 add_specific_symbol_node (new_node
, redefine_specific_htab
);
1768 /* Insert the target string into the reverse hash table, this is needed for
1769 duplicated target string check. */
1770 add_specific_symbol (new_node
->target
, redefine_specific_reverse_htab
);
1774 /* Handle the --redefine-syms option. Read lines containing "old new"
1775 from the file, and add them to the symbol redefine list. */
1778 add_redefine_syms_file (const char *filename
)
1787 file
= fopen (filename
, "r");
1789 fatal (_("couldn't open symbol redefinition file %s (error: %s)"),
1790 filename
, strerror (errno
));
1793 buf
= (char *) xmalloc (bufsize
+ 1 /* For the terminating NUL. */);
1801 /* Collect the input symbol name. */
1802 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1810 buf
= (char *) xrealloc (buf
, bufsize
+ 1);
1818 /* Eat white space between the symbol names. */
1819 while (IS_WHITESPACE (c
))
1821 if (c
== '#' || IS_LINE_TERMINATOR (c
))
1826 /* Collect the output symbol name. */
1828 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1836 buf
= (char *) xrealloc (buf
, bufsize
+ 1);
1844 /* Eat white space at end of line. */
1845 while (! IS_LINE_TERMINATOR(c
) && c
!= EOF
&& IS_WHITESPACE (c
))
1850 if ((c
== '\r' && (c
= getc (file
)) == '\n')
1851 || c
== '\n' || c
== EOF
)
1854 /* Append the redefinition to the list. */
1856 add_redefine_and_check (filename
, &buf
[0], &buf
[outsym_off
]);
1867 fatal (_("%s:%d: garbage found at end of line"), filename
, lineno
);
1869 if (len
!= 0 && (outsym_off
== 0 || outsym_off
== len
))
1870 fatal (_("%s:%d: missing new symbol name"), filename
, lineno
);
1873 /* Eat the rest of the line and finish it. */
1874 while (c
!= '\n' && c
!= EOF
)
1880 fatal (_("%s:%d: premature end of file"), filename
, lineno
);
1886 /* Copy unknown object file IBFD onto OBFD.
1887 Returns TRUE upon success, FALSE otherwise. */
1890 copy_unknown_object (bfd
*ibfd
, bfd
*obfd
)
1898 if (bfd_stat_arch_elt (ibfd
, &buf
) != 0)
1900 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1907 non_fatal (_("stat returns negative size for `%s'"),
1908 bfd_get_archive_filename (ibfd
));
1912 if (bfd_seek (ibfd
, (file_ptr
) 0, SEEK_SET
) != 0)
1914 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1919 printf (_("copy from `%s' [unknown] to `%s' [unknown]\n"),
1920 bfd_get_archive_filename (ibfd
), bfd_get_filename (obfd
));
1922 cbuf
= (char *) xmalloc (BUFSIZE
);
1924 while (ncopied
< size
)
1926 tocopy
= size
- ncopied
;
1927 if (tocopy
> BUFSIZE
)
1930 if (bfd_bread (cbuf
, (bfd_size_type
) tocopy
, ibfd
)
1931 != (bfd_size_type
) tocopy
)
1933 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1938 if (bfd_bwrite (cbuf
, (bfd_size_type
) tocopy
, obfd
)
1939 != (bfd_size_type
) tocopy
)
1941 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
1949 /* We should at least to be able to read it back when copying an
1950 unknown object in an archive. */
1951 chmod (bfd_get_filename (obfd
), buf
.st_mode
| S_IRUSR
);
1956 typedef struct objcopy_internal_note
1958 Elf_Internal_Note note
;
1959 unsigned long padded_namesz
;
1962 } objcopy_internal_note
;
1964 #define DEBUG_MERGE 0
1967 #define merge_debug(format, ...) fprintf (stderr, format, ## __VA_ARGS__)
1969 #define merge_debug(format, ...)
1972 /* Returns TRUE iff PNOTE1 overlaps or adjoins PNOTE2. */
1975 overlaps_or_adjoins (objcopy_internal_note
* pnote1
,
1976 objcopy_internal_note
* pnote2
)
1978 if (pnote1
->end
< pnote2
->start
)
1979 /* FIXME: Alignment of 16 bytes taken from x86_64 binaries.
1980 Really we should extract the alignment of the section
1981 covered by the notes. */
1982 return BFD_ALIGN (pnote1
->end
, 16) < pnote2
->start
;
1984 if (pnote2
->end
< pnote2
->start
)
1985 return BFD_ALIGN (pnote2
->end
, 16) < pnote1
->start
;
1987 if (pnote1
->end
< pnote2
->end
)
1990 if (pnote2
->end
< pnote1
->end
)
1996 /* Returns TRUE iff NEEDLE is fully contained by HAYSTACK. */
1999 contained_by (objcopy_internal_note
* needle
,
2000 objcopy_internal_note
* haystack
)
2002 return needle
->start
>= haystack
->start
&& needle
->end
<= haystack
->end
;
2006 is_open_note (objcopy_internal_note
* pnote
)
2008 return pnote
->note
.type
== NT_GNU_BUILD_ATTRIBUTE_OPEN
;
2012 is_func_note (objcopy_internal_note
* pnote
)
2014 return pnote
->note
.type
== NT_GNU_BUILD_ATTRIBUTE_FUNC
;
2018 is_deleted_note (objcopy_internal_note
* pnote
)
2020 return pnote
->note
.type
== 0;
2024 is_version_note (objcopy_internal_note
* pnote
)
2026 return (pnote
->note
.namesz
> 4
2027 && pnote
->note
.namedata
[0] == 'G'
2028 && pnote
->note
.namedata
[1] == 'A'
2029 && pnote
->note
.namedata
[2] == '$'
2030 && pnote
->note
.namedata
[3] == GNU_BUILD_ATTRIBUTE_VERSION
);
2034 is_64bit (bfd
* abfd
)
2036 /* Should never happen, but let's be paranoid. */
2037 if (bfd_get_flavour (abfd
) != bfd_target_elf_flavour
)
2040 return elf_elfheader (abfd
)->e_ident
[EI_CLASS
] == ELFCLASS64
;
2043 /* This sorting function is used to get the notes into an order
2044 that makes merging easy. */
2047 compare_gnu_build_notes (const void * data1
, const void * data2
)
2049 objcopy_internal_note
* pnote1
= (objcopy_internal_note
*) data1
;
2050 objcopy_internal_note
* pnote2
= (objcopy_internal_note
*) data2
;
2052 /* Sort notes based upon the attribute they record. */
2053 int cmp
= memcmp (pnote1
->note
.namedata
+ 3,
2054 pnote2
->note
.namedata
+ 3,
2055 pnote1
->note
.namesz
< pnote2
->note
.namesz
?
2056 pnote1
->note
.namesz
- 3 : pnote2
->note
.namesz
- 3);
2060 if (pnote1
->end
< pnote2
->start
)
2062 if (pnote1
->start
> pnote2
->end
)
2065 /* Overlaps - we should merge the two ranges. */
2066 if (pnote1
->start
< pnote2
->start
)
2068 if (pnote1
->end
> pnote2
->end
)
2070 if (pnote1
->end
< pnote2
->end
)
2073 /* Put OPEN notes before function notes. */
2074 if (is_open_note (pnote1
) && ! is_open_note (pnote2
))
2076 if (! is_open_note (pnote1
) && is_open_note (pnote2
))
2082 /* This sorting function is used to get the notes into an order
2083 that makes eliminating address ranges easier. */
2086 sort_gnu_build_notes (const void * data1
, const void * data2
)
2088 objcopy_internal_note
* pnote1
= (objcopy_internal_note
*) data1
;
2089 objcopy_internal_note
* pnote2
= (objcopy_internal_note
*) data2
;
2091 if (pnote1
->note
.type
!= pnote2
->note
.type
)
2093 /* Move deleted notes to the end. */
2094 if (is_deleted_note (pnote1
)) /* 1: OFD 2: OFD */
2097 /* Move OPEN notes to the start. */
2098 if (is_open_note (pnote1
)) /* 1: OF 2: OFD */
2101 if (is_deleted_note (pnote2
)) /* 1: F 2: O D */
2104 return 1; /* 1: F 2: O */
2107 /* Sort by starting address. */
2108 if (pnote1
->start
< pnote2
->start
)
2110 if (pnote1
->start
> pnote2
->start
)
2113 /* Then by end address (bigger range first). */
2114 if (pnote1
->end
> pnote2
->end
)
2116 if (pnote1
->end
< pnote2
->end
)
2119 /* Then by attribute type. */
2120 if (pnote1
->note
.namesz
> 4
2121 && pnote2
->note
.namesz
> 4
2122 && pnote1
->note
.namedata
[3] != pnote2
->note
.namedata
[3])
2123 return pnote1
->note
.namedata
[3] - pnote2
->note
.namedata
[3];
2128 /* Merge the notes on SEC, removing redundant entries.
2129 Returns the new, smaller size of the section upon success. */
2131 static bfd_size_type
2132 merge_gnu_build_notes (bfd
* abfd
,
2135 bfd_byte
* contents
)
2137 objcopy_internal_note
* pnotes_end
;
2138 objcopy_internal_note
* pnotes
= NULL
;
2139 objcopy_internal_note
* pnote
;
2140 bfd_size_type remain
= size
;
2141 unsigned version_1_seen
= 0;
2142 unsigned version_2_seen
= 0;
2143 unsigned version_3_seen
= 0;
2144 const char * err
= NULL
;
2145 bfd_byte
* in
= contents
;
2146 unsigned long previous_func_start
= 0;
2147 unsigned long previous_open_start
= 0;
2148 unsigned long previous_func_end
= 0;
2149 unsigned long previous_open_end
= 0;
2152 relsize
= bfd_get_reloc_upper_bound (abfd
, sec
);
2158 /* If there are relocs associated with this section then we
2159 cannot safely merge it. */
2160 relpp
= (arelent
**) xmalloc (relsize
);
2161 relcount
= bfd_canonicalize_reloc (abfd
, sec
, relpp
, isympp
);
2166 non_fatal (_("%s[%s]: Cannot merge - there are relocations against this section"),
2167 bfd_get_filename (abfd
), bfd_section_name (sec
));
2172 /* Make a copy of the notes and convert to our internal format.
2173 Minimum size of a note is 12 bytes. Also locate the version
2174 notes and check them. */
2175 pnote
= pnotes
= (objcopy_internal_note
*)
2176 xcalloc ((size
/ 12), sizeof (* pnote
));
2177 while (remain
>= 12)
2181 pnote
->note
.namesz
= bfd_get_32 (abfd
, in
);
2182 pnote
->note
.descsz
= bfd_get_32 (abfd
, in
+ 4);
2183 pnote
->note
.type
= bfd_get_32 (abfd
, in
+ 8);
2184 pnote
->padded_namesz
= (pnote
->note
.namesz
+ 3) & ~3;
2186 if (((pnote
->note
.descsz
+ 3) & ~3) != pnote
->note
.descsz
)
2188 err
= _("corrupt GNU build attribute note: description size not a factor of 4");
2192 if (pnote
->note
.type
!= NT_GNU_BUILD_ATTRIBUTE_OPEN
2193 && pnote
->note
.type
!= NT_GNU_BUILD_ATTRIBUTE_FUNC
)
2195 err
= _("corrupt GNU build attribute note: wrong note type");
2199 if (pnote
->padded_namesz
+ pnote
->note
.descsz
+ 12 > remain
)
2201 err
= _("corrupt GNU build attribute note: note too big");
2205 if (pnote
->note
.namesz
< 2)
2207 err
= _("corrupt GNU build attribute note: name too small");
2211 pnote
->note
.namedata
= (char *)(in
+ 12);
2212 pnote
->note
.descdata
= (char *)(in
+ 12 + pnote
->padded_namesz
);
2214 remain
-= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2215 in
+= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2217 if (pnote
->note
.namesz
> 2
2218 && pnote
->note
.namedata
[0] == '$'
2219 && pnote
->note
.namedata
[1] == GNU_BUILD_ATTRIBUTE_VERSION
2220 && pnote
->note
.namedata
[2] == '1')
2222 else if (is_version_note (pnote
))
2224 if (pnote
->note
.namedata
[4] == '2')
2226 else if (pnote
->note
.namedata
[4] == '3')
2230 err
= _("corrupt GNU build attribute note: unsupported version");
2235 switch (pnote
->note
.descsz
)
2242 start
= bfd_get_32 (abfd
, pnote
->note
.descdata
);
2243 /* FIXME: For version 1 and 2 notes we should try to
2244 calculate the end address by finding a symbol whose
2245 value is START, and then adding in its size.
2247 For now though, since v1 and v2 was not intended to
2248 handle gaps, we chose an artificially large end
2254 if (! is_64bit (abfd
))
2256 start
= bfd_get_32 (abfd
, pnote
->note
.descdata
);
2257 end
= bfd_get_32 (abfd
, pnote
->note
.descdata
+ 4);
2261 start
= bfd_get_64 (abfd
, pnote
->note
.descdata
);
2262 /* FIXME: For version 1 and 2 notes we should try to
2263 calculate the end address by finding a symbol whose
2264 value is START, and then adding in its size.
2266 For now though, since v1 and v2 was not intended to
2267 handle gaps, we chose an artificially large end
2274 start
= bfd_get_64 (abfd
, pnote
->note
.descdata
);
2275 end
= bfd_get_64 (abfd
, pnote
->note
.descdata
+ 8);
2279 err
= _("corrupt GNU build attribute note: bad description size");
2283 if (is_open_note (pnote
))
2286 previous_open_start
= start
;
2288 pnote
->start
= previous_open_start
;
2291 previous_open_end
= end
;
2293 pnote
->end
= previous_open_end
;
2298 previous_func_start
= start
;
2300 pnote
->start
= previous_func_start
;
2303 previous_func_end
= end
;
2305 pnote
->end
= previous_func_end
;
2308 if (pnote
->note
.namedata
[pnote
->note
.namesz
- 1] != 0)
2310 err
= _("corrupt GNU build attribute note: name not NUL terminated");
2319 /* Check that the notes are valid. */
2322 err
= _("corrupt GNU build attribute notes: excess data at end");
2326 if (version_1_seen
== 0 && version_2_seen
== 0 && version_3_seen
== 0)
2329 err
= _("bad GNU build attribute notes: no known versions detected");
2332 /* This happens with glibc. No idea why. */
2333 non_fatal (_("%s[%s]: Warning: version note missing - assuming version 3"),
2334 bfd_get_filename (abfd
), bfd_section_name (sec
));
2339 if ( (version_1_seen
> 0 && version_2_seen
> 0)
2340 || (version_1_seen
> 0 && version_3_seen
> 0)
2341 || (version_2_seen
> 0 && version_3_seen
> 0))
2343 err
= _("bad GNU build attribute notes: multiple different versions");
2347 /* We are now only supporting the merging v3+ notes
2348 - it makes things much simpler. */
2349 if (version_3_seen
== 0)
2351 merge_debug ("%s: skipping merge - not using v3 notes", bfd_section_name (sec
));
2355 merge_debug ("Merging section %s which contains %ld notes\n",
2356 sec
->name
, pnotes_end
- pnotes
);
2358 /* Sort the notes. */
2359 qsort (pnotes
, pnotes_end
- pnotes
, sizeof (* pnotes
),
2360 compare_gnu_build_notes
);
2363 merge_debug ("Results of initial sort:\n");
2364 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2365 merge_debug ("offset %#08lx range %#08lx..%#08lx type %ld attribute %d namesz %ld\n",
2366 (pnote
->note
.namedata
- (char *) contents
) - 12,
2367 pnote
->start
, pnote
->end
,
2369 pnote
->note
.namedata
[3],
2374 /* Now merge the notes. The rules are:
2375 1. If a note has a zero range, it can be eliminated.
2376 2. If two notes have the same namedata then:
2377 2a. If one note's range is fully covered by the other note
2378 then it can be deleted.
2379 2b. If one note's range partially overlaps or adjoins the
2380 other note then if they are both of the same type (open
2381 or func) then they can be merged and one deleted. If
2382 they are of different types then they cannot be merged. */
2383 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2385 /* Skip already deleted notes.
2386 FIXME: Can this happen ? We are scanning forwards and
2387 deleting backwards after all. */
2388 if (is_deleted_note (pnote
))
2391 /* Rule 1 - delete 0-range notes. */
2392 if (pnote
->start
== pnote
->end
)
2394 merge_debug ("Delete note at offset %#08lx - empty range\n",
2395 (pnote
->note
.namedata
- (char *) contents
) - 12);
2396 pnote
->note
.type
= 0;
2401 objcopy_internal_note
* back
;
2403 /* Rule 2: Check to see if there is an identical previous note. */
2404 for (iter
= 0, back
= pnote
- 1; back
>= pnotes
; back
--)
2406 if (is_deleted_note (back
))
2409 /* Our sorting function should have placed all identically
2410 attributed notes together, so if we see a note of a different
2411 attribute type stop searching. */
2412 if (back
->note
.namesz
!= pnote
->note
.namesz
2413 || memcmp (back
->note
.namedata
,
2414 pnote
->note
.namedata
, pnote
->note
.namesz
) != 0)
2417 if (back
->start
== pnote
->start
2418 && back
->end
== pnote
->end
)
2420 merge_debug ("Delete note at offset %#08lx - duplicate of note at offset %#08lx\n",
2421 (pnote
->note
.namedata
- (char *) contents
) - 12,
2422 (back
->note
.namedata
- (char *) contents
) - 12);
2423 pnote
->note
.type
= 0;
2428 if (contained_by (pnote
, back
))
2430 merge_debug ("Delete note at offset %#08lx - fully contained by note at %#08lx\n",
2431 (pnote
->note
.namedata
- (char *) contents
) - 12,
2432 (back
->note
.namedata
- (char *) contents
) - 12);
2433 pnote
->note
.type
= 0;
2438 /* This should not happen as we have sorted the
2439 notes with earlier starting addresses first. */
2440 if (contained_by (back
, pnote
))
2441 merge_debug ("ERROR: UNEXPECTED CONTAINMENT\n");
2445 if (overlaps_or_adjoins (back
, pnote
)
2446 && is_func_note (back
) == is_func_note (pnote
))
2448 merge_debug ("Delete note at offset %#08lx - merge into note at %#08lx\n",
2449 (pnote
->note
.namedata
- (char *) contents
) - 12,
2450 (back
->note
.namedata
- (char *) contents
) - 12);
2452 back
->end
= back
->end
> pnote
->end
? back
->end
: pnote
->end
;
2453 back
->start
= back
->start
< pnote
->start
? back
->start
: pnote
->start
;
2454 pnote
->note
.type
= 0;
2458 /* Don't scan too far back however. */
2461 /* FIXME: Not sure if this can ever be triggered. */
2462 merge_debug ("ITERATION LIMIT REACHED\n");
2467 if (! is_deleted_note (pnote
))
2468 merge_debug ("Unable to do anything with note at %#08lx\n",
2469 (pnote
->note
.namedata
- (char *) contents
) - 12);
2473 /* Resort the notes. */
2474 merge_debug ("Final sorting of notes\n");
2475 qsort (pnotes
, pnotes_end
- pnotes
, sizeof (* pnotes
), sort_gnu_build_notes
);
2477 /* Reconstruct the ELF notes. */
2478 bfd_byte
* new_contents
;
2481 bfd_size_type new_size
;
2482 bfd_vma prev_start
= 0;
2483 bfd_vma prev_end
= 0;
2485 /* Not sure how, but the notes might grow in size.
2486 (eg see PR 1774507). Allow for this here. */
2487 new = new_contents
= xmalloc (size
* 2);
2488 for (pnote
= pnotes
, old
= contents
;
2492 bfd_size_type note_size
= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2494 if (! is_deleted_note (pnote
))
2496 /* Create the note, potentially using the
2497 address range of the previous note. */
2498 if (pnote
->start
== prev_start
&& pnote
->end
== prev_end
)
2500 bfd_put_32 (abfd
, pnote
->note
.namesz
, new);
2501 bfd_put_32 (abfd
, 0, new + 4);
2502 bfd_put_32 (abfd
, pnote
->note
.type
, new + 8);
2504 memcpy (new, pnote
->note
.namedata
, pnote
->note
.namesz
);
2505 if (pnote
->note
.namesz
< pnote
->padded_namesz
)
2506 memset (new + pnote
->note
.namesz
, 0, pnote
->padded_namesz
- pnote
->note
.namesz
);
2507 new += pnote
->padded_namesz
;
2511 bfd_put_32 (abfd
, pnote
->note
.namesz
, new);
2512 bfd_put_32 (abfd
, is_64bit (abfd
) ? 16 : 8, new + 4);
2513 bfd_put_32 (abfd
, pnote
->note
.type
, new + 8);
2515 memcpy (new, pnote
->note
.namedata
, pnote
->note
.namesz
);
2516 if (pnote
->note
.namesz
< pnote
->padded_namesz
)
2517 memset (new + pnote
->note
.namesz
, 0, pnote
->padded_namesz
- pnote
->note
.namesz
);
2518 new += pnote
->padded_namesz
;
2519 if (is_64bit (abfd
))
2521 bfd_put_64 (abfd
, pnote
->start
, new);
2522 bfd_put_64 (abfd
, pnote
->end
, new + 8);
2527 bfd_put_32 (abfd
, pnote
->start
, new);
2528 bfd_put_32 (abfd
, pnote
->end
, new + 4);
2532 prev_start
= pnote
->start
;
2533 prev_end
= pnote
->end
;
2541 merge_debug ("Results of merge:\n");
2542 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2543 if (! is_deleted_note (pnote
))
2544 merge_debug ("offset %#08lx range %#08lx..%#08lx type %ld attribute %d namesz %ld\n",
2545 (pnote
->note
.namedata
- (char *) contents
) - 12,
2546 pnote
->start
, pnote
->end
,
2548 pnote
->note
.namedata
[3],
2553 new_size
= new - new_contents
;
2554 if (new_size
< size
)
2556 memcpy (contents
, new_contents
, new_size
);
2559 free (new_contents
);
2564 bfd_set_error (bfd_error_bad_value
);
2565 bfd_nonfatal_message (NULL
, abfd
, sec
, err
);
2574 check_new_section_flags (flagword flags
, bfd
* abfd
, const char * secname
)
2576 /* Only set the SEC_COFF_SHARED flag on COFF files.
2577 The same bit value is used by ELF targets to indicate
2578 compressed sections, and setting that flag here breaks
2580 if ((flags
& SEC_COFF_SHARED
)
2581 && bfd_get_flavour (abfd
) != bfd_target_coff_flavour
)
2583 non_fatal (_("%s[%s]: Note - dropping 'share' flag as output format is not COFF"),
2584 bfd_get_filename (abfd
), secname
);
2585 flags
&= ~ SEC_COFF_SHARED
;
2590 /* Copy object file IBFD onto OBFD.
2591 Returns TRUE upon success, FALSE otherwise. */
2594 copy_object (bfd
*ibfd
, bfd
*obfd
, const bfd_arch_info_type
*input_arch
)
2598 asection
**osections
= NULL
;
2600 asection
*gnu_debuglink_section
= NULL
;
2601 bfd_size_type
*gaps
= NULL
;
2602 bfd_size_type max_gap
= 0;
2605 enum bfd_architecture iarch
;
2607 unsigned int num_sec
, i
;
2609 if (ibfd
->xvec
->byteorder
!= obfd
->xvec
->byteorder
2610 && ibfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
2611 && obfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
)
2613 /* PR 17636: Call non-fatal so that we return to our parent who
2614 may need to tidy temporary files. */
2615 non_fatal (_("unable to change endianness of '%s'"),
2616 bfd_get_archive_filename (ibfd
));
2620 if (ibfd
->read_only
)
2622 non_fatal (_("unable to modify '%s' due to errors"),
2623 bfd_get_archive_filename (ibfd
));
2627 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
2629 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
2633 if (ibfd
->sections
== NULL
)
2635 non_fatal (_("error: the input file '%s' has no sections"),
2636 bfd_get_archive_filename (ibfd
));
2640 if (bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
)
2642 if ((do_debug_sections
& compress
) != 0
2643 && do_debug_sections
!= compress
)
2645 non_fatal (_("--compress-debug-sections=[zlib|zlib-gnu|zlib-gabi] is unsupported on `%s'"),
2646 bfd_get_archive_filename (ibfd
));
2650 if (do_elf_stt_common
)
2652 non_fatal (_("--elf-stt-common=[yes|no] is unsupported on `%s'"),
2653 bfd_get_archive_filename (ibfd
));
2659 printf (_("copy from `%s' [%s] to `%s' [%s]\n"),
2660 bfd_get_archive_filename (ibfd
), bfd_get_target (ibfd
),
2661 bfd_get_filename (obfd
), bfd_get_target (obfd
));
2670 start
= bfd_get_start_address (ibfd
);
2671 start
+= change_start
;
2674 /* Neither the start address nor the flags
2675 need to be set for a core file. */
2676 if (bfd_get_format (obfd
) != bfd_core
)
2680 flags
= bfd_get_file_flags (ibfd
);
2681 flags
|= bfd_flags_to_set
;
2682 flags
&= ~bfd_flags_to_clear
;
2683 flags
&= bfd_applicable_file_flags (obfd
);
2685 if (strip_symbols
== STRIP_ALL
)
2686 flags
&= ~HAS_RELOC
;
2688 if (!bfd_set_start_address (obfd
, start
)
2689 || !bfd_set_file_flags (obfd
, flags
))
2691 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2696 /* Copy architecture of input file to output file. */
2697 iarch
= bfd_get_arch (ibfd
);
2698 imach
= bfd_get_mach (ibfd
);
2701 if (iarch
== bfd_arch_unknown
)
2703 iarch
= input_arch
->arch
;
2704 imach
= input_arch
->mach
;
2707 non_fatal (_("Input file `%s' ignores binary architecture parameter."),
2708 bfd_get_archive_filename (ibfd
));
2710 if (iarch
== bfd_arch_unknown
2711 && bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
2712 && bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
2714 const struct elf_backend_data
*bed
= get_elf_backend_data (obfd
);
2718 if (!bfd_set_arch_mach (obfd
, iarch
, imach
)
2719 && (ibfd
->target_defaulted
2720 || bfd_get_arch (ibfd
) != bfd_get_arch (obfd
)))
2722 if (bfd_get_arch (ibfd
) == bfd_arch_unknown
)
2723 non_fatal (_("Unable to recognise the format of the input file `%s'"),
2724 bfd_get_archive_filename (ibfd
));
2726 non_fatal (_("Output file cannot represent architecture `%s'"),
2727 bfd_printable_arch_mach (bfd_get_arch (ibfd
),
2728 bfd_get_mach (ibfd
)));
2732 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
2734 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2738 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
2739 && bfd_pei_p (obfd
))
2741 /* Set up PE parameters. */
2742 pe_data_type
*pe
= pe_data (obfd
);
2744 /* Copy PE parameters before changing them. */
2745 if (bfd_get_flavour (ibfd
) == bfd_target_coff_flavour
2746 && bfd_pei_p (ibfd
))
2747 pe
->pe_opthdr
= pe_data (ibfd
)->pe_opthdr
;
2749 if (pe_file_alignment
!= (bfd_vma
) -1)
2750 pe
->pe_opthdr
.FileAlignment
= pe_file_alignment
;
2752 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
2754 if (pe_heap_commit
!= (bfd_vma
) -1)
2755 pe
->pe_opthdr
.SizeOfHeapCommit
= pe_heap_commit
;
2757 if (pe_heap_reserve
!= (bfd_vma
) -1)
2758 pe
->pe_opthdr
.SizeOfHeapCommit
= pe_heap_reserve
;
2760 if (pe_image_base
!= (bfd_vma
) -1)
2761 pe
->pe_opthdr
.ImageBase
= pe_image_base
;
2763 if (pe_section_alignment
!= (bfd_vma
) -1)
2764 pe
->pe_opthdr
.SectionAlignment
= pe_section_alignment
;
2766 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
2768 if (pe_stack_commit
!= (bfd_vma
) -1)
2769 pe
->pe_opthdr
.SizeOfStackCommit
= pe_stack_commit
;
2771 if (pe_stack_reserve
!= (bfd_vma
) -1)
2772 pe
->pe_opthdr
.SizeOfStackCommit
= pe_stack_reserve
;
2774 if (pe_subsystem
!= -1)
2775 pe
->pe_opthdr
.Subsystem
= pe_subsystem
;
2777 if (pe_major_subsystem_version
!= -1)
2778 pe
->pe_opthdr
.MajorSubsystemVersion
= pe_major_subsystem_version
;
2780 if (pe_minor_subsystem_version
!= -1)
2781 pe
->pe_opthdr
.MinorSubsystemVersion
= pe_minor_subsystem_version
;
2783 if (pe_file_alignment
> pe_section_alignment
)
2785 char file_alignment
[20], section_alignment
[20];
2787 sprintf_vma (file_alignment
, pe_file_alignment
);
2788 sprintf_vma (section_alignment
, pe_section_alignment
);
2789 non_fatal (_("warning: file alignment (0x%s) > section alignment (0x%s)"),
2791 file_alignment
, section_alignment
);
2795 && bfd_get_flavour (ibfd
) == bfd_target_coff_flavour
2796 && bfd_pei_p (ibfd
))
2797 pe
->timestamp
= pe_data (ibfd
)->coff
.timestamp
;
2803 if (osympp
!= isympp
)
2809 symsize
= bfd_get_symtab_upper_bound (ibfd
);
2812 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2816 osympp
= isympp
= (asymbol
**) xmalloc (symsize
);
2817 symcount
= bfd_canonicalize_symtab (ibfd
, isympp
);
2820 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2823 /* PR 17512: file: d6323821
2824 If the symbol table could not be loaded do not pretend that we have
2825 any symbols. This trips us up later on when we load the relocs. */
2829 osympp
= isympp
= NULL
;
2832 /* BFD mandates that all output sections be created and sizes set before
2833 any output is done. Thus, we traverse all sections multiple times. */
2834 bfd_map_over_sections (ibfd
, setup_section
, obfd
);
2836 if (!extract_symbol
)
2837 setup_bfd_headers (ibfd
, obfd
);
2839 if (add_sections
!= NULL
)
2841 struct section_add
*padd
;
2842 struct section_list
*pset
;
2844 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
2848 pset
= find_section_list (padd
->name
, FALSE
,
2849 SECTION_CONTEXT_SET_FLAGS
);
2852 flags
= pset
->flags
| SEC_HAS_CONTENTS
;
2853 flags
= check_new_section_flags (flags
, obfd
, padd
->name
);
2856 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DATA
;
2858 /* bfd_make_section_with_flags() does not return very helpful
2859 error codes, so check for the most likely user error first. */
2860 if (bfd_get_section_by_name (obfd
, padd
->name
))
2862 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2863 _("can't add section '%s'"), padd
->name
);
2868 /* We use LINKER_CREATED here so that the backend hooks
2869 will create any special section type information,
2870 instead of presuming we know what we're doing merely
2871 because we set the flags. */
2872 padd
->section
= bfd_make_section_with_flags
2873 (obfd
, padd
->name
, flags
| SEC_LINKER_CREATED
);
2874 if (padd
->section
== NULL
)
2876 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2877 _("can't create section `%s'"),
2883 if (!bfd_set_section_size (padd
->section
, padd
->size
))
2885 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2889 pset
= find_section_list (padd
->name
, FALSE
,
2890 SECTION_CONTEXT_SET_VMA
| SECTION_CONTEXT_ALTER_VMA
);
2892 && !bfd_set_section_vma (padd
->section
, pset
->vma_val
))
2894 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2898 pset
= find_section_list (padd
->name
, FALSE
,
2899 SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_ALTER_LMA
);
2902 padd
->section
->lma
= pset
->lma_val
;
2904 if (!bfd_set_section_alignment
2905 (padd
->section
, bfd_section_alignment (padd
->section
)))
2907 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2914 if (update_sections
!= NULL
)
2916 struct section_add
*pupdate
;
2918 for (pupdate
= update_sections
;
2920 pupdate
= pupdate
->next
)
2922 pupdate
->section
= bfd_get_section_by_name (ibfd
, pupdate
->name
);
2923 if (pupdate
->section
== NULL
)
2925 non_fatal (_("error: %s not found, can't be updated"), pupdate
->name
);
2929 osec
= pupdate
->section
->output_section
;
2930 if (!bfd_set_section_size (osec
, pupdate
->size
))
2932 bfd_nonfatal_message (NULL
, obfd
, osec
, NULL
);
2938 merged_note_section
* merged_note_sections
= NULL
;
2941 /* This palaver is necessary because we must set the output
2942 section size first, before its contents are ready. */
2943 for (osec
= ibfd
->sections
; osec
!= NULL
; osec
= osec
->next
)
2945 if (! is_mergeable_note_section (ibfd
, osec
))
2948 /* If the section is going to be completly deleted then
2949 do not bother to merge it. */
2950 if (osec
->output_section
== NULL
)
2953 bfd_size_type size
= bfd_section_size (osec
);
2957 bfd_nonfatal_message (NULL
, ibfd
, osec
,
2958 _("warning: note section is empty"));
2962 merged_note_section
* merged
= xmalloc (sizeof * merged
);
2963 merged
->contents
= NULL
;
2964 if (! bfd_get_full_section_contents (ibfd
, osec
, & merged
->contents
))
2966 bfd_nonfatal_message (NULL
, ibfd
, osec
,
2967 _("warning: could not load note section"));
2972 merged
->size
= merge_gnu_build_notes (ibfd
, osec
, size
,
2975 /* FIXME: Once we have read the contents in, we must write
2976 them out again. So even if the mergeing has achieved
2977 nothing we still add this entry to the merge list. */
2979 if (size
!= merged
->size
2980 && !bfd_set_section_size (osec
->output_section
, merged
->size
))
2982 bfd_nonfatal_message (NULL
, obfd
, osec
,
2983 _("warning: failed to set merged notes size"));
2984 free (merged
->contents
);
2989 /* Add section to list of merged sections. */
2991 merged
->next
= merged_note_sections
;
2992 merged_note_sections
= merged
;
2996 if (dump_sections
!= NULL
)
2998 struct section_add
* pdump
;
3000 for (pdump
= dump_sections
; pdump
!= NULL
; pdump
= pdump
->next
)
3005 osec
= bfd_get_section_by_name (ibfd
, pdump
->name
);
3008 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
3009 _("can't dump section '%s' - it does not exist"),
3014 if ((bfd_section_flags (osec
) & SEC_HAS_CONTENTS
) == 0)
3016 bfd_nonfatal_message (NULL
, ibfd
, osec
,
3017 _("can't dump section - it has no contents"));
3021 bfd_size_type size
= bfd_section_size (osec
);
3022 /* Note - we allow the dumping of zero-sized sections,
3023 creating an empty file. */
3025 f
= fopen (pdump
->filename
, FOPEN_WB
);
3028 bfd_nonfatal_message (pdump
->filename
, NULL
, NULL
,
3029 _("could not open section dump file"));
3033 if (bfd_malloc_and_get_section (ibfd
, osec
, &contents
))
3035 if (size
!= 0 && fwrite (contents
, 1, size
, f
) != size
)
3037 non_fatal (_("error writing section contents to %s (error: %s)"),
3046 bfd_nonfatal_message (NULL
, ibfd
, osec
,
3047 _("could not retrieve section contents"));
3054 if (gnu_debuglink_filename
!= NULL
)
3056 /* PR 15125: Give a helpful warning message if
3057 the debuglink section already exists, and
3058 allow the rest of the copy to complete. */
3059 if (bfd_get_section_by_name (obfd
, ".gnu_debuglink"))
3061 non_fatal (_("%s: debuglink section already exists"),
3062 bfd_get_filename (obfd
));
3063 gnu_debuglink_filename
= NULL
;
3067 gnu_debuglink_section
= bfd_create_gnu_debuglink_section
3068 (obfd
, gnu_debuglink_filename
);
3070 if (gnu_debuglink_section
== NULL
)
3072 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3073 _("cannot create debug link section `%s'"),
3074 gnu_debuglink_filename
);
3078 /* Special processing for PE format files. We
3079 have no way to distinguish PE from COFF here. */
3080 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
)
3082 bfd_vma debuglink_vma
;
3083 asection
* highest_section
;
3085 /* The PE spec requires that all sections be adjacent and sorted
3086 in ascending order of VMA. It also specifies that debug
3087 sections should be last. This is despite the fact that debug
3088 sections are not loaded into memory and so in theory have no
3091 This means that the debuglink section must be given a non-zero
3092 VMA which makes it contiguous with other debug sections. So
3093 walk the current section list, find the section with the
3094 highest VMA and start the debuglink section after that one. */
3095 for (osec
= obfd
->sections
, highest_section
= NULL
;
3099 && (highest_section
== NULL
3100 || osec
->vma
> highest_section
->vma
))
3101 highest_section
= osec
;
3103 if (highest_section
)
3104 debuglink_vma
= BFD_ALIGN (highest_section
->vma
3105 + highest_section
->size
,
3106 /* FIXME: We ought to be using
3107 COFF_PAGE_SIZE here or maybe
3108 bfd_section_alignment() (if it
3109 was set) but since this is for PE
3110 and we know the required alignment
3111 it is easier just to hard code it. */
3114 /* Umm, not sure what to do in this case. */
3115 debuglink_vma
= 0x1000;
3117 bfd_set_section_vma (gnu_debuglink_section
, debuglink_vma
);
3122 num_sec
= bfd_count_sections (obfd
);
3124 && (gap_fill_set
|| pad_to_set
))
3128 /* We must fill in gaps between the sections and/or we must pad
3129 the last section to a specified address. We do this by
3130 grabbing a list of the sections, sorting them by VMA, and
3131 increasing the section sizes as required to fill the gaps.
3132 We write out the gap contents below. */
3134 osections
= xmalloc (num_sec
* sizeof (*osections
));
3136 bfd_map_over_sections (obfd
, get_sections
, &set
);
3138 qsort (osections
, num_sec
, sizeof (*osections
), compare_section_lma
);
3140 gaps
= xmalloc (num_sec
* sizeof (*gaps
));
3141 memset (gaps
, 0, num_sec
* sizeof (*gaps
));
3145 for (i
= 0; i
< num_sec
- 1; i
++)
3148 bfd_size_type size
; /* Octets. */
3149 bfd_vma gap_start
, gap_stop
; /* Octets. */
3150 unsigned int opb1
= bfd_octets_per_byte (obfd
, osections
[i
]);
3151 unsigned int opb2
= bfd_octets_per_byte (obfd
, osections
[i
+1]);
3153 flags
= bfd_section_flags (osections
[i
]);
3154 if ((flags
& SEC_HAS_CONTENTS
) == 0
3155 || (flags
& SEC_LOAD
) == 0)
3158 size
= bfd_section_size (osections
[i
]);
3159 gap_start
= bfd_section_lma (osections
[i
]) * opb1
+ size
;
3160 gap_stop
= bfd_section_lma (osections
[i
+ 1]) * opb2
;
3161 if (gap_start
< gap_stop
)
3163 if (!bfd_set_section_size (osections
[i
],
3164 size
+ (gap_stop
- gap_start
)))
3166 bfd_nonfatal_message (NULL
, obfd
, osections
[i
],
3167 _("Can't fill gap after section"));
3171 gaps
[i
] = gap_stop
- gap_start
;
3172 if (max_gap
< gap_stop
- gap_start
)
3173 max_gap
= gap_stop
- gap_start
;
3180 bfd_vma lma
; /* Octets. */
3181 bfd_size_type size
; /* Octets. */
3182 unsigned int opb
= bfd_octets_per_byte (obfd
, osections
[num_sec
- 1]);
3183 bfd_vma _pad_to
= pad_to
* opb
;
3185 lma
= bfd_section_lma (osections
[num_sec
- 1]) * opb
;
3186 size
= bfd_section_size (osections
[num_sec
- 1]);
3187 if (lma
+ size
< _pad_to
)
3189 if (!bfd_set_section_size (osections
[num_sec
- 1], _pad_to
- lma
))
3191 bfd_nonfatal_message (NULL
, obfd
, osections
[num_sec
- 1],
3192 _("can't add padding"));
3197 gaps
[num_sec
- 1] = _pad_to
- (lma
+ size
);
3198 if (max_gap
< _pad_to
- (lma
+ size
))
3199 max_gap
= _pad_to
- (lma
+ size
);
3205 /* Symbol filtering must happen after the output sections
3206 have been created, but before their contents are set. */
3208 if (convert_debugging
)
3209 dhandle
= read_debugging_info (ibfd
, isympp
, symcount
, FALSE
);
3211 if (strip_symbols
== STRIP_DEBUG
3212 || strip_symbols
== STRIP_ALL
3213 || strip_symbols
== STRIP_UNNEEDED
3214 || strip_symbols
== STRIP_NONDEBUG
3215 || strip_symbols
== STRIP_DWO
3216 || strip_symbols
== STRIP_NONDWO
3217 || discard_locals
!= LOCALS_UNDEF
3219 || htab_elements (strip_specific_htab
) != 0
3220 || htab_elements (keep_specific_htab
) != 0
3221 || htab_elements (localize_specific_htab
) != 0
3222 || htab_elements (globalize_specific_htab
) != 0
3223 || htab_elements (keepglobal_specific_htab
) != 0
3224 || htab_elements (weaken_specific_htab
) != 0
3225 || htab_elements (redefine_specific_htab
) != 0
3226 || prefix_symbols_string
3229 || convert_debugging
3230 || change_leading_char
3231 || remove_leading_char
3232 || section_rename_list
3236 /* Mark symbols used in output relocations so that they
3237 are kept, even if they are local labels or static symbols.
3239 Note we iterate over the input sections examining their
3240 relocations since the relocations for the output sections
3241 haven't been set yet. mark_symbols_used_in_relocations will
3242 ignore input sections which have no corresponding output
3244 if (strip_symbols
!= STRIP_ALL
)
3246 bfd_set_error (bfd_error_no_error
);
3247 bfd_map_over_sections (ibfd
,
3248 mark_symbols_used_in_relocations
,
3250 if (bfd_get_error () != bfd_error_no_error
)
3257 osympp
= (asymbol
**) xmalloc ((symcount
+ add_symbols
+ 1) * sizeof (asymbol
*));
3258 symcount
= filter_symbols (ibfd
, obfd
, osympp
, isympp
, symcount
);
3261 if (convert_debugging
&& dhandle
!= NULL
)
3265 res
= write_debugging_info (obfd
, dhandle
, &symcount
, &osympp
);
3268 dhandle
= NULL
; /* Paranoia... */
3277 bfd_set_symtab (obfd
, osympp
, symcount
);
3279 /* This has to happen before section positions are set. */
3280 bfd_map_over_sections (ibfd
, copy_relocations_in_section
, obfd
);
3282 /* This has to happen after the symbol table has been set. */
3283 bfd_map_over_sections (ibfd
, copy_section
, obfd
);
3285 if (add_sections
!= NULL
)
3287 struct section_add
*padd
;
3289 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
3291 if (! bfd_set_section_contents (obfd
, padd
->section
, padd
->contents
,
3294 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
3300 if (update_sections
!= NULL
)
3302 struct section_add
*pupdate
;
3304 for (pupdate
= update_sections
;
3306 pupdate
= pupdate
->next
)
3308 osec
= pupdate
->section
->output_section
;
3309 if (! bfd_set_section_contents (obfd
, osec
, pupdate
->contents
,
3312 bfd_nonfatal_message (NULL
, obfd
, osec
, NULL
);
3318 if (merged_note_sections
!= NULL
)
3320 merged_note_section
* merged
= NULL
;
3322 for (osec
= obfd
->sections
; osec
!= NULL
; osec
= osec
->next
)
3324 if (! is_mergeable_note_section (obfd
, osec
))
3328 merged
= merged_note_sections
;
3330 /* It is likely that output sections are in the same order
3331 as the input sections, but do not assume that this is
3333 if (merged
->sec
->output_section
!= osec
)
3335 for (merged
= merged_note_sections
;
3337 merged
= merged
->next
)
3338 if (merged
->sec
->output_section
== osec
)
3343 bfd_nonfatal_message
3345 _("error: failed to locate merged notes"));
3350 if (merged
->contents
== NULL
)
3352 bfd_nonfatal_message
3354 _("error: failed to merge notes"));
3358 if (! bfd_set_section_contents (obfd
, osec
, merged
->contents
, 0,
3361 bfd_nonfatal_message
3363 _("error: failed to copy merged notes into output"));
3367 merged
= merged
->next
;
3370 /* Free the memory. */
3371 merged_note_section
* next
;
3372 for (merged
= merged_note_sections
; merged
!= NULL
; merged
= next
)
3374 next
= merged
->next
;
3375 free (merged
->contents
);
3379 else if (merge_notes
&& ! is_strip
)
3380 non_fatal (_("%s: Could not find any mergeable note sections"),
3381 bfd_get_filename (ibfd
));
3383 if (gnu_debuglink_filename
!= NULL
)
3385 if (! bfd_fill_in_gnu_debuglink_section
3386 (obfd
, gnu_debuglink_section
, gnu_debuglink_filename
))
3388 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3389 _("cannot fill debug link section `%s'"),
3390 gnu_debuglink_filename
);
3399 /* Fill in the gaps. */
3402 buf
= (bfd_byte
*) xmalloc (max_gap
);
3403 memset (buf
, gap_fill
, max_gap
);
3405 for (i
= 0; i
< num_sec
; i
++)
3413 off
= bfd_section_size (osections
[i
]) - left
;
3424 if (! bfd_set_section_contents (obfd
, osections
[i
], buf
,
3427 bfd_nonfatal_message (NULL
, obfd
, osections
[i
], NULL
);
3443 /* Allow the BFD backend to copy any private data it understands
3444 from the input BFD to the output BFD. This is done last to
3445 permit the routine to look at the filtered symbol table, which is
3446 important for the ECOFF code at least. */
3447 if (! bfd_copy_private_bfd_data (ibfd
, obfd
))
3449 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3450 _("error copying private BFD data"));
3454 /* Switch to the alternate machine code. We have to do this at the
3455 very end, because we only initialize the header when we create
3456 the first section. */
3457 if (use_alt_mach_code
!= 0)
3459 if (! bfd_alt_mach_code (obfd
, use_alt_mach_code
))
3461 non_fatal (_("this target does not support %lu alternative machine codes"),
3463 if (bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
3465 non_fatal (_("treating that number as an absolute e_machine value instead"));
3466 elf_elfheader (obfd
)->e_machine
= use_alt_mach_code
;
3469 non_fatal (_("ignoring the alternative value"));
3476 /* Read each archive element in turn from IBFD, copy the
3477 contents to temp file, and keep the temp file handle.
3478 If 'force_output_target' is TRUE then make sure that
3479 all elements in the new archive are of the type
3483 copy_archive (bfd
*ibfd
, bfd
*obfd
, const char *output_target
,
3484 bfd_boolean force_output_target
,
3485 const bfd_arch_info_type
*input_arch
)
3489 struct name_list
*next
;
3493 bfd
**ptr
= &obfd
->archive_head
;
3496 const char *filename
;
3498 /* PR 24281: It is not clear what should happen when copying a thin archive.
3499 One part is straight forward - if the output archive is in a different
3500 directory from the input archive then any relative paths in the library
3501 should be adjusted to the new location. But if any transformation
3502 options are active (eg strip, rename, add, etc) then the implication is
3503 that these should be applied to the files pointed to by the archive.
3504 But since objcopy is not destructive, this means that new files must be
3505 created, and there is no guidance for the names of the new files. (Plus
3506 this conflicts with one of the goals of thin libraries - only taking up
3507 a minimal amount of space in the file system).
3509 So for now we fail if an attempt is made to copy such libraries. */
3510 if (ibfd
->is_thin_archive
)
3513 bfd_set_error (bfd_error_invalid_operation
);
3514 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
3515 _("sorry: copying thin archives is not currently supported"));
3519 /* Make a temp directory to hold the contents. */
3520 dir
= make_tempdir (bfd_get_filename (obfd
));
3522 fatal (_("cannot create tempdir for archive copying (error: %s)"),
3525 if (strip_symbols
== STRIP_ALL
)
3526 obfd
->has_armap
= FALSE
;
3528 obfd
->has_armap
= ibfd
->has_armap
;
3529 obfd
->is_thin_archive
= ibfd
->is_thin_archive
;
3532 obfd
->flags
|= BFD_DETERMINISTIC_OUTPUT
;
3536 this_element
= bfd_openr_next_archived_file (ibfd
, NULL
);
3538 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
3541 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
3542 goto cleanup_and_exit
;
3545 while (!status
&& this_element
!= NULL
)
3551 int stat_status
= 0;
3552 bfd_boolean del
= TRUE
;
3553 bfd_boolean ok_object
;
3555 /* PR binutils/17533: Do not allow directory traversal
3556 outside of the current directory tree by archive members. */
3557 if (! is_valid_archive_path (bfd_get_filename (this_element
)))
3559 non_fatal (_("illegal pathname found in archive member: %s"),
3560 bfd_get_filename (this_element
));
3562 goto cleanup_and_exit
;
3565 /* Create an output file for this member. */
3566 output_name
= concat (dir
, "/",
3567 bfd_get_filename (this_element
), (char *) 0);
3569 /* If the file already exists, make another temp dir. */
3570 if (stat (output_name
, &buf
) >= 0)
3572 char * tmpdir
= make_tempdir (output_name
);
3577 non_fatal (_("cannot create tempdir for archive copying (error: %s)"),
3580 goto cleanup_and_exit
;
3583 l
= (struct name_list
*) xmalloc (sizeof (struct name_list
));
3588 output_name
= concat (tmpdir
, "/",
3589 bfd_get_filename (this_element
), (char *) 0);
3594 stat_status
= bfd_stat_arch_elt (this_element
, &buf
);
3596 if (stat_status
!= 0)
3597 non_fatal (_("internal stat error on %s"),
3598 bfd_get_filename (this_element
));
3601 l
= (struct name_list
*) xmalloc (sizeof (struct name_list
));
3602 l
->name
= output_name
;
3607 ok_object
= bfd_check_format (this_element
, bfd_object
);
3609 bfd_nonfatal_message (NULL
, this_element
, NULL
,
3610 _("Unable to recognise the format of file"));
3612 /* PR binutils/3110: Cope with archives
3613 containing multiple target types. */
3614 if (force_output_target
|| !ok_object
)
3615 output_bfd
= bfd_openw (output_name
, output_target
);
3617 output_bfd
= bfd_openw (output_name
, bfd_get_target (this_element
));
3619 if (output_bfd
== NULL
)
3621 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3623 goto cleanup_and_exit
;
3628 del
= !copy_object (this_element
, output_bfd
, input_arch
);
3630 if (del
&& bfd_get_arch (this_element
) == bfd_arch_unknown
)
3631 /* Try again as an unknown object file. */
3633 else if (!bfd_close (output_bfd
))
3635 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3636 /* Error in new object file. Don't change archive. */
3643 del
= !copy_unknown_object (this_element
, output_bfd
);
3644 if (!bfd_close_all_done (output_bfd
))
3646 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3647 /* Error in new object file. Don't change archive. */
3654 unlink (output_name
);
3659 if (preserve_dates
&& stat_status
== 0)
3660 set_times (output_name
, &buf
);
3662 /* Open the newly output file and attach to our list. */
3663 output_bfd
= bfd_openr (output_name
, output_target
);
3665 l
->obfd
= output_bfd
;
3668 ptr
= &output_bfd
->archive_next
;
3670 last_element
= this_element
;
3672 this_element
= bfd_openr_next_archived_file (ibfd
, last_element
);
3674 bfd_close (last_element
);
3679 filename
= bfd_get_filename (obfd
);
3680 if (!bfd_close (obfd
))
3683 bfd_nonfatal_message (filename
, NULL
, NULL
, NULL
);
3686 filename
= bfd_get_filename (ibfd
);
3687 if (!bfd_close (ibfd
))
3690 bfd_nonfatal_message (filename
, NULL
, NULL
, NULL
);
3694 /* Delete all the files that we opened. */
3696 struct name_list
* next
;
3698 for (l
= list
; l
!= NULL
; l
= next
)
3700 if (l
->obfd
== NULL
)
3704 bfd_close (l
->obfd
);
3716 set_long_section_mode (bfd
*output_bfd
, bfd
*input_bfd
, enum long_section_name_handling style
)
3718 /* This is only relevant to Coff targets. */
3719 if (bfd_get_flavour (output_bfd
) == bfd_target_coff_flavour
)
3722 && bfd_get_flavour (input_bfd
) == bfd_target_coff_flavour
)
3723 style
= bfd_coff_long_section_names (input_bfd
) ? ENABLE
: DISABLE
;
3724 bfd_coff_set_long_section_names (output_bfd
, style
!= DISABLE
);
3728 /* The top-level control. */
3731 copy_file (const char *input_filename
, const char *output_filename
, int ofd
,
3732 struct stat
*in_stat
, const char *input_target
,
3733 const char *output_target
, const bfd_arch_info_type
*input_arch
)
3736 char **obj_matching
;
3737 char **core_matching
;
3738 off_t size
= get_file_size (input_filename
);
3743 non_fatal (_("error: the input file '%s' is empty"),
3749 /* To allow us to do "strip *" without dying on the first
3750 non-object file, failures are nonfatal. */
3751 ibfd
= bfd_openr (input_filename
, input_target
);
3752 if (ibfd
== NULL
|| fstat (fileno (ibfd
->iostream
), in_stat
) != 0)
3754 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3759 switch (do_debug_sections
)
3763 case compress_gnu_zlib
:
3764 case compress_gabi_zlib
:
3765 ibfd
->flags
|= BFD_COMPRESS
;
3766 /* Don't check if input is ELF here since this information is
3767 only available after bfd_check_format_matches is called. */
3768 if (do_debug_sections
!= compress_gnu_zlib
)
3769 ibfd
->flags
|= BFD_COMPRESS_GABI
;
3772 ibfd
->flags
|= BFD_DECOMPRESS
;
3778 switch (do_elf_stt_common
)
3780 case elf_stt_common
:
3781 ibfd
->flags
|= BFD_CONVERT_ELF_COMMON
| BFD_USE_ELF_STT_COMMON
;
3784 case no_elf_stt_common
:
3785 ibfd
->flags
|= BFD_CONVERT_ELF_COMMON
;
3791 if (bfd_check_format (ibfd
, bfd_archive
))
3793 bfd_boolean force_output_target
;
3796 /* bfd_get_target does not return the correct value until
3797 bfd_check_format succeeds. */
3798 if (output_target
== NULL
)
3800 output_target
= bfd_get_target (ibfd
);
3801 force_output_target
= FALSE
;
3804 force_output_target
= TRUE
;
3807 obfd
= bfd_fdopenw (output_filename
, output_target
, ofd
);
3809 obfd
= bfd_openw (output_filename
, output_target
);
3814 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3819 if (gnu_debuglink_filename
!= NULL
)
3821 non_fatal (_("--add-gnu-debuglink ignored for archive %s"),
3822 bfd_get_filename (ibfd
));
3823 gnu_debuglink_filename
= NULL
;
3826 /* This is a no-op on non-Coff targets. */
3827 set_long_section_mode (obfd
, ibfd
, long_section_names
);
3829 copy_archive (ibfd
, obfd
, output_target
, force_output_target
, input_arch
);
3831 else if (bfd_check_format_matches (ibfd
, bfd_object
, &obj_matching
))
3836 /* bfd_get_target does not return the correct value until
3837 bfd_check_format succeeds. */
3838 if (output_target
== NULL
)
3839 output_target
= bfd_get_target (ibfd
);
3842 obfd
= bfd_fdopenw (output_filename
, output_target
, ofd
);
3844 obfd
= bfd_openw (output_filename
, output_target
);
3849 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3854 /* This is a no-op on non-Coff targets. */
3855 set_long_section_mode (obfd
, ibfd
, long_section_names
);
3857 if (! copy_object (ibfd
, obfd
, input_arch
))
3860 /* PR 17512: file: 0f15796a.
3861 If the file could not be copied it may not be in a writeable
3862 state. So use bfd_close_all_done to avoid the possibility of
3863 writing uninitialised data into the file. */
3864 if (! (status
? bfd_close_all_done (obfd
) : bfd_close (obfd
)))
3867 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3871 if (!bfd_close (ibfd
))
3874 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3880 bfd_error_type obj_error
= bfd_get_error ();
3881 bfd_error_type core_error
;
3883 if (bfd_check_format_matches (ibfd
, bfd_core
, &core_matching
))
3885 /* This probably can't happen.. */
3886 if (obj_error
== bfd_error_file_ambiguously_recognized
)
3887 free (obj_matching
);
3891 core_error
= bfd_get_error ();
3892 /* Report the object error in preference to the core error. */
3893 if (obj_error
!= core_error
)
3894 bfd_set_error (obj_error
);
3896 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3898 if (obj_error
== bfd_error_file_ambiguously_recognized
)
3900 list_matching_formats (obj_matching
);
3901 free (obj_matching
);
3903 if (core_error
== bfd_error_file_ambiguously_recognized
)
3905 list_matching_formats (core_matching
);
3906 free (core_matching
);
3913 /* Add a name to the section renaming list. */
3916 add_section_rename (const char * old_name
, const char * new_name
,
3919 section_rename
* srename
;
3921 /* Check for conflicts first. */
3922 for (srename
= section_rename_list
; srename
!= NULL
; srename
= srename
->next
)
3923 if (strcmp (srename
->old_name
, old_name
) == 0)
3925 /* Silently ignore duplicate definitions. */
3926 if (strcmp (srename
->new_name
, new_name
) == 0
3927 && srename
->flags
== flags
)
3930 fatal (_("Multiple renames of section %s"), old_name
);
3933 srename
= (section_rename
*) xmalloc (sizeof (* srename
));
3935 srename
->old_name
= old_name
;
3936 srename
->new_name
= new_name
;
3937 srename
->flags
= flags
;
3938 srename
->next
= section_rename_list
;
3940 section_rename_list
= srename
;
3943 /* Check the section rename list for a new name of the input section
3944 called OLD_NAME. Returns the new name if one is found and sets
3945 RETURNED_FLAGS if non-NULL to the flags to be used for this section. */
3948 find_section_rename (const char *old_name
, flagword
*returned_flags
)
3950 const section_rename
*srename
;
3952 for (srename
= section_rename_list
; srename
!= NULL
; srename
= srename
->next
)
3953 if (strcmp (srename
->old_name
, old_name
) == 0)
3955 if (returned_flags
!= NULL
&& srename
->flags
!= (flagword
) -1)
3956 *returned_flags
= srename
->flags
;
3958 return srename
->new_name
;
3964 /* Once each of the sections is copied, we may still need to do some
3965 finalization work for private section headers. Do that here. */
3968 setup_bfd_headers (bfd
*ibfd
, bfd
*obfd
)
3970 /* Allow the BFD backend to copy any private data it understands
3971 from the input section to the output section. */
3972 if (! bfd_copy_private_header_data (ibfd
, obfd
))
3975 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
3976 _("error in private header data"));
3980 /* All went well. */
3984 /* Create a section in OBFD with the same
3985 name and attributes as ISECTION in IBFD. */
3988 setup_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
3990 bfd
*obfd
= (bfd
*) obfdarg
;
3991 struct section_list
*p
;
3999 const char * new_name
;
4000 char *prefix
= NULL
;
4001 bfd_boolean make_nobits
;
4002 unsigned int alignment
;
4004 if (is_strip_section (ibfd
, isection
))
4007 /* Get the, possibly new, name of the output section. */
4008 name
= bfd_section_name (isection
);
4009 flags
= bfd_section_flags (isection
);
4010 if (bfd_get_flavour (ibfd
) != bfd_get_flavour (obfd
))
4012 flags
&= bfd_applicable_section_flags (ibfd
);
4013 flags
&= bfd_applicable_section_flags (obfd
);
4015 new_name
= find_section_rename (name
, &flags
);
4016 if (new_name
!= name
)
4019 flags
= check_new_section_flags (flags
, obfd
, name
);
4022 /* Prefix sections. */
4023 if (prefix_alloc_sections_string
4024 && (bfd_section_flags (isection
) & SEC_ALLOC
) != 0)
4025 prefix
= prefix_alloc_sections_string
;
4026 else if (prefix_sections_string
)
4027 prefix
= prefix_sections_string
;
4033 n
= (char *) xmalloc (strlen (prefix
) + strlen (name
) + 1);
4039 make_nobits
= FALSE
;
4041 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4042 SECTION_CONTEXT_SET_FLAGS
);
4045 flags
= p
->flags
| (flags
& (SEC_HAS_CONTENTS
| SEC_RELOC
));
4046 flags
= check_new_section_flags (flags
, obfd
, bfd_section_name (isection
));
4048 else if (strip_symbols
== STRIP_NONDEBUG
4049 && (flags
& (SEC_ALLOC
| SEC_GROUP
)) != 0
4050 && !is_nondebug_keep_contents_section (ibfd
, isection
))
4052 flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
| SEC_GROUP
);
4053 if (bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
4057 /* Twiddle the input section flags so that it seems to
4058 elf.c:copy_private_bfd_data that section flags have not
4059 changed between input and output sections. This hack
4060 prevents wholesale rewriting of the program headers. */
4061 isection
->flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
| SEC_GROUP
);
4065 osection
= bfd_make_section_anyway_with_flags (obfd
, name
, flags
);
4067 if (osection
== NULL
)
4069 err
= _("failed to create output section");
4074 elf_section_type (osection
) = SHT_NOBITS
;
4076 size
= bfd_section_size (isection
);
4077 size
= bfd_convert_section_size (ibfd
, isection
, obfd
, size
);
4079 size
= (size
+ interleave
- 1) / interleave
* copy_width
;
4080 else if (extract_symbol
)
4082 if (!bfd_set_section_size (osection
, size
))
4084 err
= _("failed to set size");
4088 vma
= bfd_section_vma (isection
);
4089 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4090 SECTION_CONTEXT_ALTER_VMA
| SECTION_CONTEXT_SET_VMA
);
4093 if (p
->context
& SECTION_CONTEXT_SET_VMA
)
4099 vma
+= change_section_address
;
4101 if (!bfd_set_section_vma (osection
, vma
))
4103 err
= _("failed to set vma");
4107 lma
= isection
->lma
;
4108 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4109 SECTION_CONTEXT_ALTER_LMA
| SECTION_CONTEXT_SET_LMA
);
4112 if (p
->context
& SECTION_CONTEXT_ALTER_LMA
)
4118 lma
+= change_section_address
;
4120 osection
->lma
= lma
;
4122 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4123 SECTION_CONTEXT_SET_ALIGNMENT
);
4125 alignment
= p
->alignment
;
4127 alignment
= bfd_section_alignment (isection
);
4129 /* FIXME: This is probably not enough. If we change the LMA we
4130 may have to recompute the header for the file as well. */
4131 if (!bfd_set_section_alignment (osection
, alignment
))
4133 err
= _("failed to set alignment");
4137 /* Copy merge entity size. */
4138 osection
->entsize
= isection
->entsize
;
4140 /* Copy compress status. */
4141 osection
->compress_status
= isection
->compress_status
;
4143 /* This used to be mangle_section; we do here to avoid using
4144 bfd_get_section_by_name since some formats allow multiple
4145 sections with the same name. */
4146 isection
->output_section
= osection
;
4147 isection
->output_offset
= 0;
4149 if ((isection
->flags
& SEC_GROUP
) != 0)
4151 asymbol
*gsym
= group_signature (isection
);
4155 gsym
->flags
|= BSF_KEEP
;
4156 if (bfd_get_flavour (ibfd
) == bfd_target_elf_flavour
)
4157 elf_group_id (isection
) = gsym
;
4161 /* Allow the BFD backend to copy any private data it understands
4162 from the input section to the output section. */
4163 if (!bfd_copy_private_section_data (ibfd
, isection
, obfd
, osection
))
4165 err
= _("failed to copy private data");
4169 /* All went well. */
4174 bfd_nonfatal_message (NULL
, obfd
, osection
, err
);
4177 /* Return TRUE if input section ISECTION should be skipped. */
4180 skip_section (bfd
*ibfd
, sec_ptr isection
, bfd_boolean skip_copy
)
4186 /* If we have already failed earlier on,
4187 do not keep on generating complaints now. */
4194 if (is_strip_section (ibfd
, isection
))
4197 if (is_update_section (ibfd
, isection
))
4200 /* When merging a note section we skip the copying of the contents,
4201 but not the copying of the relocs associated with the contents. */
4202 if (skip_copy
&& is_mergeable_note_section (ibfd
, isection
))
4205 flags
= bfd_section_flags (isection
);
4206 if ((flags
& SEC_GROUP
) != 0)
4209 osection
= isection
->output_section
;
4210 size
= bfd_section_size (isection
);
4212 if (size
== 0 || osection
== 0)
4218 /* Add section SECTION_PATTERN to the list of sections that will have their
4219 relocations removed. */
4222 handle_remove_relocations_option (const char *section_pattern
)
4224 find_section_list (section_pattern
, TRUE
, SECTION_CONTEXT_REMOVE_RELOCS
);
4227 /* Return TRUE if ISECTION from IBFD should have its relocations removed,
4228 otherwise return FALSE. If the user has requested that relocations be
4229 removed from a section that does not have relocations then this
4230 function will still return TRUE. */
4233 discard_relocations (bfd
*ibfd ATTRIBUTE_UNUSED
, asection
*isection
)
4235 return (find_section_list (bfd_section_name (isection
), FALSE
,
4236 SECTION_CONTEXT_REMOVE_RELOCS
) != NULL
);
4239 /* Wrapper for dealing with --remove-section (-R) command line arguments.
4240 A special case is detected here, if the user asks to remove a relocation
4241 section (one starting with ".rela" or ".rel") then this removal must
4242 be done using a different technique in a relocatable object. */
4245 handle_remove_section_option (const char *section_pattern
)
4247 find_section_list (section_pattern
, TRUE
, SECTION_CONTEXT_REMOVE
);
4248 if (strncmp (section_pattern
, ".rel", 4) == 0)
4250 section_pattern
+= 4;
4251 if (*section_pattern
== 'a')
4253 if (*section_pattern
)
4254 handle_remove_relocations_option (section_pattern
);
4256 sections_removed
= TRUE
;
4259 /* Copy relocations in input section ISECTION of IBFD to an output
4260 section with the same name in OBFDARG. If stripping then don't
4261 copy any relocation info. */
4264 copy_relocations_in_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
4266 bfd
*obfd
= (bfd
*) obfdarg
;
4272 if (skip_section (ibfd
, isection
, FALSE
))
4275 osection
= isection
->output_section
;
4277 /* Core files and DWO files do not need to be relocated. */
4278 if (bfd_get_format (obfd
) == bfd_core
4279 || strip_symbols
== STRIP_NONDWO
4280 || discard_relocations (ibfd
, isection
))
4284 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
4288 /* Do not complain if the target does not support relocations. */
4289 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
4294 bfd_nonfatal_message (NULL
, ibfd
, isection
, NULL
);
4302 bfd_set_reloc (obfd
, osection
, NULL
, 0);
4303 osection
->flags
&= ~SEC_RELOC
;
4307 if (isection
->orelocation
!= NULL
)
4309 /* Some other function has already set up the output relocs
4310 for us, so scan those instead of the default relocs. */
4311 relcount
= isection
->reloc_count
;
4312 relpp
= isection
->orelocation
;
4316 relpp
= (arelent
**) xmalloc (relsize
);
4317 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, isympp
);
4321 bfd_nonfatal_message (NULL
, ibfd
, isection
,
4322 _("relocation count is negative"));
4328 if (strip_symbols
== STRIP_ALL
)
4330 /* Remove relocations which are not in
4331 keep_strip_specific_list. */
4332 arelent
**temp_relpp
;
4333 long temp_relcount
= 0;
4336 temp_relpp
= (arelent
**) xmalloc (relsize
);
4337 for (i
= 0; i
< relcount
; i
++)
4339 /* PR 17512: file: 9e907e0c. */
4340 if (relpp
[i
]->sym_ptr_ptr
4342 && * relpp
[i
]->sym_ptr_ptr
)
4343 if (is_specified_symbol (bfd_asymbol_name (*relpp
[i
]->sym_ptr_ptr
),
4344 keep_specific_htab
))
4345 temp_relpp
[temp_relcount
++] = relpp
[i
];
4347 relcount
= temp_relcount
;
4348 if (relpp
!= isection
->orelocation
)
4353 bfd_set_reloc (obfd
, osection
, relcount
== 0 ? NULL
: relpp
, relcount
);
4356 osection
->flags
&= ~SEC_RELOC
;
4357 if (relpp
!= isection
->orelocation
)
4363 /* Copy the data of input section ISECTION of IBFD
4364 to an output section with the same name in OBFD. */
4367 copy_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
4369 bfd
*obfd
= (bfd
*) obfdarg
;
4370 struct section_list
*p
;
4374 if (skip_section (ibfd
, isection
, TRUE
))
4377 osection
= isection
->output_section
;
4378 /* The output SHF_COMPRESSED section size is different from input if
4379 ELF classes of input and output aren't the same. We can't use
4380 the output section size since --interleave will shrink the output
4381 section. Size will be updated if the section is converted. */
4382 size
= bfd_section_size (isection
);
4384 if (bfd_section_flags (isection
) & SEC_HAS_CONTENTS
4385 && bfd_section_flags (osection
) & SEC_HAS_CONTENTS
)
4387 bfd_byte
*memhunk
= NULL
;
4389 if (!bfd_get_full_section_contents (ibfd
, isection
, &memhunk
)
4390 || !bfd_convert_section_contents (ibfd
, isection
, obfd
,
4394 bfd_nonfatal_message (NULL
, ibfd
, isection
, NULL
);
4401 /* We don't handle leftover bytes (too many possible behaviors,
4402 and we don't know what the user wants). The section length
4403 must be a multiple of the number of bytes to swap. */
4404 if ((size
% reverse_bytes
) == 0)
4409 for (i
= 0; i
< size
; i
+= reverse_bytes
)
4410 for (j
= 0; j
< (unsigned long)(reverse_bytes
/ 2); j
++)
4412 bfd_byte
*m
= (bfd_byte
*) memhunk
;
4415 m
[i
+ j
] = m
[(i
+ reverse_bytes
) - (j
+ 1)];
4416 m
[(i
+ reverse_bytes
) - (j
+ 1)] = b
;
4420 /* User must pad the section up in order to do this. */
4421 fatal (_("cannot reverse bytes: length of section %s must be evenly divisible by %d"),
4422 bfd_section_name (isection
), reverse_bytes
);
4427 /* Keep only every `copy_byte'th byte in MEMHUNK. */
4428 char *from
= (char *) memhunk
+ copy_byte
;
4429 char *to
= (char *) memhunk
;
4430 char *end
= (char *) memhunk
+ size
;
4433 /* If the section address is not exactly divisible by the interleave,
4434 then we must bias the from address. If the copy_byte is less than
4435 the bias, then we must skip forward one interleave, and increment
4437 int extra
= isection
->lma
% interleave
;
4439 if (copy_byte
< extra
)
4442 for (; from
< end
; from
+= interleave
)
4443 for (i
= 0; i
< copy_width
; i
++)
4445 if (&from
[i
] >= end
)
4450 size
= (size
+ interleave
- 1 - copy_byte
) / interleave
* copy_width
;
4451 osection
->lma
/= interleave
;
4452 if (copy_byte
< extra
)
4456 if (!bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
4459 bfd_nonfatal_message (NULL
, obfd
, osection
, NULL
);
4465 else if ((p
= find_section_list (bfd_section_name (isection
),
4466 FALSE
, SECTION_CONTEXT_SET_FLAGS
)) != NULL
4467 && (p
->flags
& SEC_HAS_CONTENTS
) != 0)
4469 void *memhunk
= xmalloc (size
);
4471 /* We don't permit the user to turn off the SEC_HAS_CONTENTS
4472 flag--they can just remove the section entirely and add it
4473 back again. However, we do permit them to turn on the
4474 SEC_HAS_CONTENTS flag, and take it to mean that the section
4475 contents should be zeroed out. */
4477 memset (memhunk
, 0, size
);
4478 if (! bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
4481 bfd_nonfatal_message (NULL
, obfd
, osection
, NULL
);
4489 /* Get all the sections. This is used when --gap-fill or --pad-to is
4493 get_sections (bfd
*obfd ATTRIBUTE_UNUSED
, asection
*osection
, void *secppparg
)
4495 asection
***secppp
= (asection
***) secppparg
;
4497 **secppp
= osection
;
4501 /* Sort sections by LMA. This is called via qsort, and is used when
4502 --gap-fill or --pad-to is used. We force non loadable or empty
4503 sections to the front, where they are easier to ignore. */
4506 compare_section_lma (const void *arg1
, const void *arg2
)
4508 const asection
*sec1
= *(const asection
**) arg1
;
4509 const asection
*sec2
= *(const asection
**) arg2
;
4510 flagword flags1
, flags2
;
4512 /* Sort non loadable sections to the front. */
4513 flags1
= sec1
->flags
;
4514 flags2
= sec2
->flags
;
4515 if ((flags1
& SEC_HAS_CONTENTS
) == 0
4516 || (flags1
& SEC_LOAD
) == 0)
4518 if ((flags2
& SEC_HAS_CONTENTS
) != 0
4519 && (flags2
& SEC_LOAD
) != 0)
4524 if ((flags2
& SEC_HAS_CONTENTS
) == 0
4525 || (flags2
& SEC_LOAD
) == 0)
4529 /* Sort sections by LMA. */
4530 if (sec1
->lma
> sec2
->lma
)
4532 if (sec1
->lma
< sec2
->lma
)
4535 /* Sort sections with the same LMA by size. */
4536 if (bfd_section_size (sec1
) > bfd_section_size (sec2
))
4538 if (bfd_section_size (sec1
) < bfd_section_size (sec2
))
4541 if (sec1
->id
> sec2
->id
)
4543 if (sec1
->id
< sec2
->id
)
4548 /* Mark all the symbols which will be used in output relocations with
4549 the BSF_KEEP flag so that those symbols will not be stripped.
4551 Ignore relocations which will not appear in the output file. */
4554 mark_symbols_used_in_relocations (bfd
*ibfd
, sec_ptr isection
, void *symbolsarg
)
4556 asymbol
**symbols
= (asymbol
**) symbolsarg
;
4561 /* Ignore an input section with no corresponding output section. */
4562 if (isection
->output_section
== NULL
)
4565 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
4568 /* Do not complain if the target does not support relocations. */
4569 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
4571 bfd_fatal (bfd_get_filename (ibfd
));
4577 relpp
= (arelent
**) xmalloc (relsize
);
4578 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, symbols
);
4580 bfd_fatal (bfd_get_filename (ibfd
));
4582 /* Examine each symbol used in a relocation. If it's not one of the
4583 special bfd section symbols, then mark it with BSF_KEEP. */
4584 for (i
= 0; i
< relcount
; i
++)
4586 /* See PRs 20923 and 20930 for reproducers for the NULL tests. */
4587 if (relpp
[i
]->sym_ptr_ptr
!= NULL
4588 && * relpp
[i
]->sym_ptr_ptr
!= NULL
4589 && *relpp
[i
]->sym_ptr_ptr
!= bfd_com_section_ptr
->symbol
4590 && *relpp
[i
]->sym_ptr_ptr
!= bfd_abs_section_ptr
->symbol
4591 && *relpp
[i
]->sym_ptr_ptr
!= bfd_und_section_ptr
->symbol
)
4592 (*relpp
[i
]->sym_ptr_ptr
)->flags
|= BSF_KEEP
;
4599 /* Write out debugging information. */
4602 write_debugging_info (bfd
*obfd
, void *dhandle
,
4603 long *symcountp ATTRIBUTE_UNUSED
,
4604 asymbol
***symppp ATTRIBUTE_UNUSED
)
4606 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
4607 || bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
4609 bfd_byte
*syms
, *strings
= NULL
;
4610 bfd_size_type symsize
, stringsize
;
4611 asection
*stabsec
, *stabstrsec
;
4614 if (! write_stabs_in_sections_debugging_info (obfd
, dhandle
, &syms
,
4619 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DEBUGGING
;
4620 stabsec
= bfd_make_section_with_flags (obfd
, ".stab", flags
);
4621 stabstrsec
= bfd_make_section_with_flags (obfd
, ".stabstr", flags
);
4623 || stabstrsec
== NULL
4624 || !bfd_set_section_size (stabsec
, symsize
)
4625 || !bfd_set_section_size (stabstrsec
, stringsize
)
4626 || !bfd_set_section_alignment (stabsec
, 2)
4627 || !bfd_set_section_alignment (stabstrsec
, 0))
4629 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4630 _("can't create debugging section"));
4635 /* We can get away with setting the section contents now because
4636 the next thing the caller is going to do is copy over the
4637 real sections. We may someday have to split the contents
4638 setting out of this function. */
4639 if (! bfd_set_section_contents (obfd
, stabsec
, syms
, 0, symsize
)
4640 || ! bfd_set_section_contents (obfd
, stabstrsec
, strings
, 0,
4643 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4644 _("can't set debugging section contents"));
4652 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4653 _("don't know how to write debugging information for %s"),
4654 bfd_get_target (obfd
));
4658 /* If neither -D nor -U was specified explicitly,
4659 then use the configured default. */
4661 default_deterministic (void)
4663 if (deterministic
< 0)
4664 deterministic
= DEFAULT_AR_DETERMINISTIC
;
4668 strip_main (int argc
, char *argv
[])
4670 char *input_target
= NULL
;
4671 char *output_target
= NULL
;
4672 bfd_boolean show_version
= FALSE
;
4673 bfd_boolean formats_info
= FALSE
;
4676 char *output_file
= NULL
;
4677 bfd_boolean merge_notes_set
= FALSE
;
4679 while ((c
= getopt_long (argc
, argv
, "I:O:F:K:MN:R:o:sSpdgxXHhVvwDU",
4680 strip_options
, (int *) 0)) != EOF
)
4685 input_target
= optarg
;
4688 output_target
= optarg
;
4691 input_target
= output_target
= optarg
;
4694 handle_remove_section_option (optarg
);
4696 case OPTION_KEEP_SECTION
:
4697 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_KEEP
);
4699 case OPTION_REMOVE_RELOCS
:
4700 handle_remove_relocations_option (optarg
);
4703 strip_symbols
= STRIP_ALL
;
4707 case 'd': /* Historic BSD alias for -g. Used by early NetBSD. */
4708 strip_symbols
= STRIP_DEBUG
;
4710 case OPTION_STRIP_DWO
:
4711 strip_symbols
= STRIP_DWO
;
4713 case OPTION_STRIP_UNNEEDED
:
4714 strip_symbols
= STRIP_UNNEEDED
;
4717 add_specific_symbol (optarg
, keep_specific_htab
);
4721 merge_notes_set
= TRUE
;
4723 case OPTION_NO_MERGE_NOTES
:
4724 merge_notes
= FALSE
;
4725 merge_notes_set
= TRUE
;
4728 add_specific_symbol (optarg
, strip_specific_htab
);
4731 output_file
= optarg
;
4734 preserve_dates
= TRUE
;
4737 deterministic
= TRUE
;
4740 deterministic
= FALSE
;
4743 discard_locals
= LOCALS_ALL
;
4746 discard_locals
= LOCALS_START_L
;
4752 show_version
= TRUE
;
4754 case OPTION_FORMATS_INFO
:
4755 formats_info
= TRUE
;
4757 case OPTION_ONLY_KEEP_DEBUG
:
4758 strip_symbols
= STRIP_NONDEBUG
;
4760 case OPTION_KEEP_FILE_SYMBOLS
:
4761 keep_file_symbols
= 1;
4764 /* We've been given a long option. */
4771 strip_usage (stdout
, 0);
4773 strip_usage (stderr
, 1);
4777 /* If the user has not expressly chosen to merge/not-merge ELF notes
4778 then enable the merging unless we are stripping debug or dwo info. */
4779 if (! merge_notes_set
4780 && (strip_symbols
== STRIP_UNDEF
4781 || strip_symbols
== STRIP_ALL
4782 || strip_symbols
== STRIP_UNNEEDED
4783 || strip_symbols
== STRIP_NONDEBUG
4784 || strip_symbols
== STRIP_NONDWO
))
4794 print_version ("strip");
4796 default_deterministic ();
4798 /* Default is to strip all symbols. */
4799 if (strip_symbols
== STRIP_UNDEF
4800 && discard_locals
== LOCALS_UNDEF
4801 && htab_elements (strip_specific_htab
) == 0)
4802 strip_symbols
= STRIP_ALL
;
4804 if (output_target
== NULL
)
4805 output_target
= input_target
;
4809 || (output_file
!= NULL
&& (i
+ 1) < argc
))
4810 strip_usage (stderr
, 1);
4812 for (; i
< argc
; i
++)
4814 int hold_status
= status
;
4815 struct stat statbuf
;
4819 if (get_file_size (argv
[i
]) < 1)
4825 if (output_file
== NULL
4826 || filename_cmp (argv
[i
], output_file
) == 0)
4827 tmpname
= make_tempname (argv
[i
], &tmpfd
);
4829 tmpname
= output_file
;
4831 if (tmpname
== NULL
)
4833 bfd_nonfatal_message (argv
[i
], NULL
, NULL
,
4834 _("could not create temporary file to hold stripped copy"));
4840 copy_file (argv
[i
], tmpname
, tmpfd
, &statbuf
, input_target
,
4841 output_target
, NULL
);
4845 set_times (tmpname
, &statbuf
);
4846 if (output_file
!= tmpname
)
4847 status
= (smart_rename (tmpname
,
4848 output_file
? output_file
: argv
[i
],
4849 preserve_dates
) != 0);
4851 status
= hold_status
;
4854 unlink_if_ordinary (tmpname
);
4855 if (output_file
!= tmpname
)
4862 /* Set up PE subsystem. */
4865 set_pe_subsystem (const char *s
)
4867 const char *version
, *subsystem
;
4877 { "native", 0, IMAGE_SUBSYSTEM_NATIVE
},
4878 { "windows", 0, IMAGE_SUBSYSTEM_WINDOWS_GUI
},
4879 { "console", 0, IMAGE_SUBSYSTEM_WINDOWS_CUI
},
4880 { "posix", 0, IMAGE_SUBSYSTEM_POSIX_CUI
},
4881 { "wince", 0, IMAGE_SUBSYSTEM_WINDOWS_CE_GUI
},
4882 { "efi-app", 1, IMAGE_SUBSYSTEM_EFI_APPLICATION
},
4883 { "efi-bsd", 1, IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER
},
4884 { "efi-rtd", 1, IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER
},
4885 { "sal-rtd", 1, IMAGE_SUBSYSTEM_SAL_RUNTIME_DRIVER
},
4886 { "xbox", 0, IMAGE_SUBSYSTEM_XBOX
}
4892 /* Check for the presence of a version number. */
4893 version
= strchr (s
, ':');
4894 if (version
== NULL
)
4898 int len
= version
- s
;
4902 version
= copy
+ 1 + len
;
4903 pe_major_subsystem_version
= strtoul (version
, ©
, 0);
4905 pe_minor_subsystem_version
= strtoul (copy
+ 1, ©
, 0);
4907 non_fatal (_("%s: bad version in PE subsystem"), s
);
4910 /* Check for numeric subsystem. */
4911 value
= (short) strtol (subsystem
, ©
, 0);
4914 for (i
= 0; i
< ARRAY_SIZE (v
); i
++)
4915 if (v
[i
].value
== value
)
4917 pe_subsystem
= value
;
4918 set_def
= v
[i
].set_def
;
4924 /* Search for subsystem by name. */
4925 for (i
= 0; i
< ARRAY_SIZE (v
); i
++)
4926 if (strcmp (subsystem
, v
[i
].name
) == 0)
4928 pe_subsystem
= v
[i
].value
;
4929 set_def
= v
[i
].set_def
;
4937 fatal (_("unknown PE subsystem: %s"), s
);
4942 if (pe_file_alignment
== (bfd_vma
) -1)
4943 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
4944 if (pe_section_alignment
== (bfd_vma
) -1)
4945 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
4949 free ((char *) subsystem
);
4952 /* Convert EFI target to PEI target. */
4955 convert_efi_target (char *efi
)
4961 if (strcmp (efi
+ 4, "ia32") == 0)
4963 /* Change ia32 to i386. */
4968 else if (strcmp (efi
+ 4, "x86_64") == 0)
4970 /* Change x86_64 to x86-64. */
4975 /* Allocate and return a pointer to a struct section_add, initializing the
4976 structure using ARG, a string in the format "sectionname=filename".
4977 The returned structure will have its next pointer set to NEXT. The
4978 OPTION field is the name of the command line option currently being
4979 parsed, and is only used if an error needs to be reported. */
4981 static struct section_add
*
4982 init_section_add (const char *arg
,
4983 struct section_add
*next
,
4986 struct section_add
*pa
;
4989 s
= strchr (arg
, '=');
4991 fatal (_("bad format for %s"), option
);
4993 pa
= (struct section_add
*) xmalloc (sizeof (struct section_add
));
4994 pa
->name
= xstrndup (arg
, s
- arg
);
4995 pa
->filename
= s
+ 1;
4997 pa
->contents
= NULL
;
5003 /* Load the file specified in PA, allocating memory to hold the file
5004 contents, and store a pointer to the allocated memory in the contents
5005 field of PA. The size field of PA is also updated. All errors call
5009 section_add_load_file (struct section_add
*pa
)
5014 /* We don't use get_file_size so that we can do
5015 --add-section .note.GNU_stack=/dev/null
5016 get_file_size doesn't work on /dev/null. */
5018 f
= fopen (pa
->filename
, FOPEN_RB
);
5020 fatal (_("cannot open: %s: %s"),
5021 pa
->filename
, strerror (errno
));
5025 pa
->contents
= (bfd_byte
*) xmalloc (alloc
);
5033 pa
->contents
= (bfd_byte
*) xrealloc (pa
->contents
, alloc
);
5036 got
= fread (pa
->contents
+ off
, 1, alloc
- off
, f
);
5038 fatal (_("%s: fread failed"), pa
->filename
);
5049 copy_main (int argc
, char *argv
[])
5051 char *input_filename
= NULL
;
5052 char *output_filename
= NULL
;
5054 char *input_target
= NULL
;
5055 char *output_target
= NULL
;
5056 bfd_boolean show_version
= FALSE
;
5057 bfd_boolean change_warn
= TRUE
;
5058 bfd_boolean formats_info
= FALSE
;
5059 bfd_boolean use_globalize
= FALSE
;
5060 bfd_boolean use_keep_global
= FALSE
;
5062 struct stat statbuf
;
5063 const bfd_arch_info_type
*input_arch
= NULL
;
5065 while ((c
= getopt_long (argc
, argv
, "b:B:i:I:j:K:MN:s:O:d:F:L:G:R:SpgxXHhVvW:wDU",
5066 copy_options
, (int *) 0)) != EOF
)
5071 copy_byte
= atoi (optarg
);
5073 fatal (_("byte number must be non-negative"));
5077 input_arch
= bfd_scan_arch (optarg
);
5078 if (input_arch
== NULL
)
5079 fatal (_("architecture %s unknown"), optarg
);
5085 interleave
= atoi (optarg
);
5087 fatal (_("interleave must be positive"));
5093 case OPTION_INTERLEAVE_WIDTH
:
5094 copy_width
= atoi (optarg
);
5096 fatal(_("interleave width must be positive"));
5100 case 's': /* "source" - 'I' is preferred */
5101 input_target
= optarg
;
5105 case 'd': /* "destination" - 'O' is preferred */
5106 output_target
= optarg
;
5110 input_target
= output_target
= optarg
;
5114 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_COPY
);
5115 sections_copied
= TRUE
;
5119 handle_remove_section_option (optarg
);
5122 case OPTION_KEEP_SECTION
:
5123 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_KEEP
);
5126 case OPTION_REMOVE_RELOCS
:
5127 handle_remove_relocations_option (optarg
);
5131 strip_symbols
= STRIP_ALL
;
5135 strip_symbols
= STRIP_DEBUG
;
5138 case OPTION_STRIP_DWO
:
5139 strip_symbols
= STRIP_DWO
;
5142 case OPTION_STRIP_UNNEEDED
:
5143 strip_symbols
= STRIP_UNNEEDED
;
5146 case OPTION_ONLY_KEEP_DEBUG
:
5147 strip_symbols
= STRIP_NONDEBUG
;
5150 case OPTION_KEEP_FILE_SYMBOLS
:
5151 keep_file_symbols
= 1;
5154 case OPTION_ADD_GNU_DEBUGLINK
:
5155 long_section_names
= ENABLE
;
5156 gnu_debuglink_filename
= optarg
;
5160 add_specific_symbol (optarg
, keep_specific_htab
);
5166 case OPTION_NO_MERGE_NOTES
:
5167 merge_notes
= FALSE
;
5171 add_specific_symbol (optarg
, strip_specific_htab
);
5174 case OPTION_STRIP_UNNEEDED_SYMBOL
:
5175 add_specific_symbol (optarg
, strip_unneeded_htab
);
5179 add_specific_symbol (optarg
, localize_specific_htab
);
5182 case OPTION_GLOBALIZE_SYMBOL
:
5183 use_globalize
= TRUE
;
5184 add_specific_symbol (optarg
, globalize_specific_htab
);
5188 use_keep_global
= TRUE
;
5189 add_specific_symbol (optarg
, keepglobal_specific_htab
);
5193 add_specific_symbol (optarg
, weaken_specific_htab
);
5197 preserve_dates
= TRUE
;
5201 deterministic
= TRUE
;
5205 deterministic
= FALSE
;
5213 discard_locals
= LOCALS_ALL
;
5217 discard_locals
= LOCALS_START_L
;
5225 show_version
= TRUE
;
5228 case OPTION_FORMATS_INFO
:
5229 formats_info
= TRUE
;
5236 case OPTION_ADD_SECTION
:
5237 add_sections
= init_section_add (optarg
, add_sections
,
5239 section_add_load_file (add_sections
);
5242 case OPTION_UPDATE_SECTION
:
5243 update_sections
= init_section_add (optarg
, update_sections
,
5244 "--update-section");
5245 section_add_load_file (update_sections
);
5248 case OPTION_DUMP_SECTION
:
5249 dump_sections
= init_section_add (optarg
, dump_sections
,
5253 case OPTION_ADD_SYMBOL
:
5256 struct addsym_node
*newsym
= xmalloc (sizeof *newsym
);
5258 newsym
->next
= NULL
;
5259 s
= strchr (optarg
, '=');
5261 fatal (_("bad format for %s"), "--add-symbol");
5262 t
= strchr (s
+ 1, ':');
5264 newsym
->symdef
= xstrndup (optarg
, s
- optarg
);
5267 newsym
->section
= xstrndup (s
+ 1, t
- (s
+ 1));
5268 newsym
->symval
= strtol (t
+ 1, NULL
, 0);
5272 newsym
->section
= NULL
;
5273 newsym
->symval
= strtol (s
+ 1, NULL
, 0);
5277 t
= strchr (t
+ 1, ',');
5278 newsym
->othersym
= NULL
;
5280 newsym
->flags
= parse_symflags (t
+1, &newsym
->othersym
);
5282 newsym
->flags
= BSF_GLOBAL
;
5284 /* Keep 'othersym' symbols at the front of the list. */
5285 if (newsym
->othersym
)
5287 newsym
->next
= add_sym_list
;
5289 add_sym_tail
= &newsym
->next
;
5290 add_sym_list
= newsym
;
5294 *add_sym_tail
= newsym
;
5295 add_sym_tail
= &newsym
->next
;
5301 case OPTION_CHANGE_START
:
5302 change_start
= parse_vma (optarg
, "--change-start");
5305 case OPTION_CHANGE_SECTION_ADDRESS
:
5306 case OPTION_CHANGE_SECTION_LMA
:
5307 case OPTION_CHANGE_SECTION_VMA
:
5309 struct section_list
* p
;
5310 unsigned int context
= 0;
5314 char *option
= NULL
;
5319 case OPTION_CHANGE_SECTION_ADDRESS
:
5320 option
= "--change-section-address";
5321 context
= SECTION_CONTEXT_ALTER_LMA
| SECTION_CONTEXT_ALTER_VMA
;
5323 case OPTION_CHANGE_SECTION_LMA
:
5324 option
= "--change-section-lma";
5325 context
= SECTION_CONTEXT_ALTER_LMA
;
5327 case OPTION_CHANGE_SECTION_VMA
:
5328 option
= "--change-section-vma";
5329 context
= SECTION_CONTEXT_ALTER_VMA
;
5333 s
= strchr (optarg
, '=');
5336 s
= strchr (optarg
, '+');
5339 s
= strchr (optarg
, '-');
5341 fatal (_("bad format for %s"), option
);
5346 /* Correct the context. */
5349 case OPTION_CHANGE_SECTION_ADDRESS
:
5350 context
= SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_SET_VMA
;
5352 case OPTION_CHANGE_SECTION_LMA
:
5353 context
= SECTION_CONTEXT_SET_LMA
;
5355 case OPTION_CHANGE_SECTION_VMA
:
5356 context
= SECTION_CONTEXT_SET_VMA
;
5362 name
= (char *) xmalloc (len
+ 1);
5363 strncpy (name
, optarg
, len
);
5366 p
= find_section_list (name
, TRUE
, context
);
5368 val
= parse_vma (s
+ 1, option
);
5374 case OPTION_CHANGE_SECTION_ADDRESS
:
5378 case OPTION_CHANGE_SECTION_LMA
:
5382 case OPTION_CHANGE_SECTION_VMA
:
5389 case OPTION_CHANGE_ADDRESSES
:
5390 change_section_address
= parse_vma (optarg
, "--change-addresses");
5391 change_start
= change_section_address
;
5394 case OPTION_CHANGE_WARNINGS
:
5398 case OPTION_CHANGE_LEADING_CHAR
:
5399 change_leading_char
= TRUE
;
5402 case OPTION_COMPRESS_DEBUG_SECTIONS
:
5405 if (strcasecmp (optarg
, "none") == 0)
5406 do_debug_sections
= decompress
;
5407 else if (strcasecmp (optarg
, "zlib") == 0)
5408 do_debug_sections
= compress_zlib
;
5409 else if (strcasecmp (optarg
, "zlib-gnu") == 0)
5410 do_debug_sections
= compress_gnu_zlib
;
5411 else if (strcasecmp (optarg
, "zlib-gabi") == 0)
5412 do_debug_sections
= compress_gabi_zlib
;
5414 fatal (_("unrecognized --compress-debug-sections type `%s'"),
5418 do_debug_sections
= compress
;
5421 case OPTION_DEBUGGING
:
5422 convert_debugging
= TRUE
;
5425 case OPTION_DECOMPRESS_DEBUG_SECTIONS
:
5426 do_debug_sections
= decompress
;
5429 case OPTION_ELF_STT_COMMON
:
5430 if (strcasecmp (optarg
, "yes") == 0)
5431 do_elf_stt_common
= elf_stt_common
;
5432 else if (strcasecmp (optarg
, "no") == 0)
5433 do_elf_stt_common
= no_elf_stt_common
;
5435 fatal (_("unrecognized --elf-stt-common= option `%s'"),
5439 case OPTION_GAP_FILL
:
5441 bfd_vma gap_fill_vma
;
5443 gap_fill_vma
= parse_vma (optarg
, "--gap-fill");
5444 gap_fill
= (bfd_byte
) gap_fill_vma
;
5445 if ((bfd_vma
) gap_fill
!= gap_fill_vma
)
5449 sprintf_vma (buff
, gap_fill_vma
);
5451 non_fatal (_("Warning: truncating gap-fill from 0x%s to 0x%x"),
5454 gap_fill_set
= TRUE
;
5458 case OPTION_NO_CHANGE_WARNINGS
:
5459 change_warn
= FALSE
;
5463 pad_to
= parse_vma (optarg
, "--pad-to");
5467 case OPTION_REMOVE_LEADING_CHAR
:
5468 remove_leading_char
= TRUE
;
5471 case OPTION_REDEFINE_SYM
:
5473 /* Insert this redefinition onto redefine_specific_htab. */
5477 const char *nextarg
;
5478 char *source
, *target
;
5480 s
= strchr (optarg
, '=');
5482 fatal (_("bad format for %s"), "--redefine-sym");
5485 source
= (char *) xmalloc (len
+ 1);
5486 strncpy (source
, optarg
, len
);
5490 len
= strlen (nextarg
);
5491 target
= (char *) xmalloc (len
+ 1);
5492 strcpy (target
, nextarg
);
5494 add_redefine_and_check ("--redefine-sym", source
, target
);
5501 case OPTION_REDEFINE_SYMS
:
5502 add_redefine_syms_file (optarg
);
5505 case OPTION_SET_SECTION_FLAGS
:
5507 struct section_list
*p
;
5512 s
= strchr (optarg
, '=');
5514 fatal (_("bad format for %s"), "--set-section-flags");
5517 name
= (char *) xmalloc (len
+ 1);
5518 strncpy (name
, optarg
, len
);
5521 p
= find_section_list (name
, TRUE
, SECTION_CONTEXT_SET_FLAGS
);
5523 p
->flags
= parse_flags (s
+ 1);
5527 case OPTION_SET_SECTION_ALIGNMENT
:
5529 struct section_list
*p
;
5535 s
= strchr (optarg
, '=');
5537 fatal (_("bad format for --set-section-alignment: argument needed"));
5539 align
= atoi (s
+ 1);
5541 fatal (_("bad format for --set-section-alignment: numeric argument needed"));
5543 /* Convert integer alignment into a power-of-two alignment. */
5545 while ((align
& 1) == 0)
5552 /* Number has more than on 1, i.e. wasn't a power of 2. */
5553 fatal (_("bad format for --set-section-alignment: alignment is not a power of two"));
5555 /* Add the alignment setting to the section list. */
5557 name
= (char *) xmalloc (len
+ 1);
5558 strncpy (name
, optarg
, len
);
5561 p
= find_section_list (name
, TRUE
, SECTION_CONTEXT_SET_ALIGNMENT
);
5563 p
->alignment
= palign
;
5567 case OPTION_RENAME_SECTION
:
5570 const char *eq
, *fl
;
5575 eq
= strchr (optarg
, '=');
5577 fatal (_("bad format for %s"), "--rename-section");
5581 fatal (_("bad format for %s"), "--rename-section");
5583 old_name
= (char *) xmalloc (len
+ 1);
5584 strncpy (old_name
, optarg
, len
);
5588 fl
= strchr (eq
, ',');
5591 flags
= parse_flags (fl
+ 1);
5601 fatal (_("bad format for %s"), "--rename-section");
5603 new_name
= (char *) xmalloc (len
+ 1);
5604 strncpy (new_name
, eq
, len
);
5607 add_section_rename (old_name
, new_name
, flags
);
5611 case OPTION_SET_START
:
5612 set_start
= parse_vma (optarg
, "--set-start");
5613 set_start_set
= TRUE
;
5616 case OPTION_SREC_LEN
:
5617 _bfd_srec_len
= parse_vma (optarg
, "--srec-len");
5620 case OPTION_SREC_FORCES3
:
5621 _bfd_srec_forceS3
= TRUE
;
5624 case OPTION_STRIP_SYMBOLS
:
5625 add_specific_symbols (optarg
, strip_specific_htab
,
5626 &strip_specific_buffer
);
5629 case OPTION_STRIP_UNNEEDED_SYMBOLS
:
5630 add_specific_symbols (optarg
, strip_unneeded_htab
,
5631 &strip_unneeded_buffer
);
5634 case OPTION_KEEP_SYMBOLS
:
5635 add_specific_symbols (optarg
, keep_specific_htab
,
5636 &keep_specific_buffer
);
5639 case OPTION_LOCALIZE_HIDDEN
:
5640 localize_hidden
= TRUE
;
5643 case OPTION_LOCALIZE_SYMBOLS
:
5644 add_specific_symbols (optarg
, localize_specific_htab
,
5645 &localize_specific_buffer
);
5648 case OPTION_LONG_SECTION_NAMES
:
5649 if (!strcmp ("enable", optarg
))
5650 long_section_names
= ENABLE
;
5651 else if (!strcmp ("disable", optarg
))
5652 long_section_names
= DISABLE
;
5653 else if (!strcmp ("keep", optarg
))
5654 long_section_names
= KEEP
;
5656 fatal (_("unknown long section names option '%s'"), optarg
);
5659 case OPTION_GLOBALIZE_SYMBOLS
:
5660 use_globalize
= TRUE
;
5661 add_specific_symbols (optarg
, globalize_specific_htab
,
5662 &globalize_specific_buffer
);
5665 case OPTION_KEEPGLOBAL_SYMBOLS
:
5666 use_keep_global
= TRUE
;
5667 add_specific_symbols (optarg
, keepglobal_specific_htab
,
5668 &keepglobal_specific_buffer
);
5671 case OPTION_WEAKEN_SYMBOLS
:
5672 add_specific_symbols (optarg
, weaken_specific_htab
,
5673 &weaken_specific_buffer
);
5676 case OPTION_ALT_MACH_CODE
:
5677 use_alt_mach_code
= strtoul (optarg
, NULL
, 0);
5678 if (use_alt_mach_code
== 0)
5679 fatal (_("unable to parse alternative machine code"));
5682 case OPTION_PREFIX_SYMBOLS
:
5683 prefix_symbols_string
= optarg
;
5686 case OPTION_PREFIX_SECTIONS
:
5687 prefix_sections_string
= optarg
;
5690 case OPTION_PREFIX_ALLOC_SECTIONS
:
5691 prefix_alloc_sections_string
= optarg
;
5694 case OPTION_READONLY_TEXT
:
5695 bfd_flags_to_set
|= WP_TEXT
;
5696 bfd_flags_to_clear
&= ~WP_TEXT
;
5699 case OPTION_WRITABLE_TEXT
:
5700 bfd_flags_to_clear
|= WP_TEXT
;
5701 bfd_flags_to_set
&= ~WP_TEXT
;
5705 bfd_flags_to_set
|= D_PAGED
;
5706 bfd_flags_to_clear
&= ~D_PAGED
;
5710 bfd_flags_to_clear
|= D_PAGED
;
5711 bfd_flags_to_set
&= ~D_PAGED
;
5714 case OPTION_EXTRACT_DWO
:
5715 strip_symbols
= STRIP_NONDWO
;
5718 case OPTION_EXTRACT_SYMBOL
:
5719 extract_symbol
= TRUE
;
5722 case OPTION_REVERSE_BYTES
:
5724 int prev
= reverse_bytes
;
5726 reverse_bytes
= atoi (optarg
);
5727 if ((reverse_bytes
<= 0) || ((reverse_bytes
% 2) != 0))
5728 fatal (_("number of bytes to reverse must be positive and even"));
5730 if (prev
&& prev
!= reverse_bytes
)
5731 non_fatal (_("Warning: ignoring previous --reverse-bytes value of %d"),
5736 case OPTION_FILE_ALIGNMENT
:
5737 pe_file_alignment
= parse_vma (optarg
, "--file-alignment");
5743 pe_heap_reserve
= strtoul (optarg
, &end
, 0);
5745 || (*end
!= '.' && *end
!= '\0'))
5746 non_fatal (_("%s: invalid reserve value for --heap"),
5748 else if (*end
!= '\0')
5750 pe_heap_commit
= strtoul (end
+ 1, &end
, 0);
5752 non_fatal (_("%s: invalid commit value for --heap"),
5758 case OPTION_IMAGE_BASE
:
5759 pe_image_base
= parse_vma (optarg
, "--image-base");
5762 case OPTION_PE_SECTION_ALIGNMENT
:
5763 pe_section_alignment
= parse_vma (optarg
,
5764 "--section-alignment");
5767 case OPTION_SUBSYSTEM
:
5768 set_pe_subsystem (optarg
);
5774 pe_stack_reserve
= strtoul (optarg
, &end
, 0);
5776 || (*end
!= '.' && *end
!= '\0'))
5777 non_fatal (_("%s: invalid reserve value for --stack"),
5779 else if (*end
!= '\0')
5781 pe_stack_commit
= strtoul (end
+ 1, &end
, 0);
5783 non_fatal (_("%s: invalid commit value for --stack"),
5789 case OPTION_VERILOG_DATA_WIDTH
:
5790 VerilogDataWidth
= parse_vma (optarg
, "--verilog-data-width");
5791 if (VerilogDataWidth
< 1)
5792 fatal (_("verilog data width must be at least 1 byte"));
5796 /* We've been given a long option. */
5801 copy_usage (stdout
, 0);
5804 copy_usage (stderr
, 1);
5808 if (use_globalize
&& use_keep_global
)
5809 fatal(_("--globalize-symbol(s) is incompatible with -G/--keep-global-symbol(s)"));
5818 print_version ("objcopy");
5820 if (interleave
&& copy_byte
== -1)
5821 fatal (_("interleave start byte must be set with --byte"));
5823 if (copy_byte
>= interleave
)
5824 fatal (_("byte number must be less than interleave"));
5826 if (copy_width
> interleave
- copy_byte
)
5827 fatal (_("interleave width must be less than or equal to interleave - byte`"));
5829 if (optind
== argc
|| optind
+ 2 < argc
)
5830 copy_usage (stderr
, 1);
5832 input_filename
= argv
[optind
];
5833 if (optind
+ 1 < argc
)
5834 output_filename
= argv
[optind
+ 1];
5836 default_deterministic ();
5838 /* Default is to strip no symbols. */
5839 if (strip_symbols
== STRIP_UNDEF
&& discard_locals
== LOCALS_UNDEF
)
5840 strip_symbols
= STRIP_NONE
;
5842 if (output_target
== NULL
)
5843 output_target
= input_target
;
5845 /* Convert input EFI target to PEI target. */
5846 if (input_target
!= NULL
5847 && strncmp (input_target
, "efi-", 4) == 0)
5851 efi
= xstrdup (output_target
+ 4);
5852 if (strncmp (efi
, "bsdrv-", 6) == 0
5853 || strncmp (efi
, "rtdrv-", 6) == 0)
5855 else if (strncmp (efi
, "app-", 4) != 0)
5856 fatal (_("unknown input EFI target: %s"), input_target
);
5859 convert_efi_target (efi
);
5862 /* Convert output EFI target to PEI target. */
5863 if (output_target
!= NULL
5864 && strncmp (output_target
, "efi-", 4) == 0)
5868 efi
= xstrdup (output_target
+ 4);
5869 if (strncmp (efi
, "app-", 4) == 0)
5871 if (pe_subsystem
== -1)
5872 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_APPLICATION
;
5874 else if (strncmp (efi
, "bsdrv-", 6) == 0)
5876 if (pe_subsystem
== -1)
5877 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER
;
5880 else if (strncmp (efi
, "rtdrv-", 6) == 0)
5882 if (pe_subsystem
== -1)
5883 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER
;
5887 fatal (_("unknown output EFI target: %s"), output_target
);
5889 if (pe_file_alignment
== (bfd_vma
) -1)
5890 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
5891 if (pe_section_alignment
== (bfd_vma
) -1)
5892 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
5894 output_target
= efi
;
5895 convert_efi_target (efi
);
5898 /* If there is no destination file, or the source and destination files
5899 are the same, then create a temp and rename the result into the input. */
5900 if (output_filename
== NULL
5901 || filename_cmp (input_filename
, output_filename
) == 0)
5902 tmpname
= make_tempname (input_filename
, &tmpfd
);
5904 tmpname
= output_filename
;
5906 if (tmpname
== NULL
)
5907 fatal (_("warning: could not create temporary file whilst copying '%s', (error: %s)"),
5908 input_filename
, strerror (errno
));
5910 copy_file (input_filename
, tmpname
, tmpfd
, &statbuf
, input_target
,
5911 output_target
, input_arch
);
5915 set_times (tmpname
, &statbuf
);
5916 if (tmpname
!= output_filename
)
5917 status
= (smart_rename (tmpname
, input_filename
,
5918 preserve_dates
) != 0);
5921 unlink_if_ordinary (tmpname
);
5923 if (tmpname
!= output_filename
)
5928 struct section_list
*p
;
5930 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
5934 if (p
->context
& (SECTION_CONTEXT_SET_VMA
| SECTION_CONTEXT_ALTER_VMA
))
5938 sprintf_vma (buff
, p
->vma_val
);
5940 /* xgettext:c-format */
5941 non_fatal (_("%s %s%c0x%s never used"),
5942 "--change-section-vma",
5944 p
->context
& SECTION_CONTEXT_SET_VMA
? '=' : '+',
5948 if (p
->context
& (SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_ALTER_LMA
))
5952 sprintf_vma (buff
, p
->lma_val
);
5954 /* xgettext:c-format */
5955 non_fatal (_("%s %s%c0x%s never used"),
5956 "--change-section-lma",
5958 p
->context
& SECTION_CONTEXT_SET_LMA
? '=' : '+',
5965 if (strip_specific_buffer
)
5966 free (strip_specific_buffer
);
5968 if (strip_unneeded_buffer
)
5969 free (strip_unneeded_buffer
);
5971 if (keep_specific_buffer
)
5972 free (keep_specific_buffer
);
5974 if (localize_specific_buffer
)
5975 free (globalize_specific_buffer
);
5977 if (globalize_specific_buffer
)
5978 free (globalize_specific_buffer
);
5980 if (keepglobal_specific_buffer
)
5981 free (keepglobal_specific_buffer
);
5983 if (weaken_specific_buffer
)
5984 free (weaken_specific_buffer
);
5990 main (int argc
, char *argv
[])
5992 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
5993 setlocale (LC_MESSAGES
, "");
5995 #if defined (HAVE_SETLOCALE)
5996 setlocale (LC_CTYPE
, "");
5998 bindtextdomain (PACKAGE
, LOCALEDIR
);
5999 textdomain (PACKAGE
);
6001 program_name
= argv
[0];
6002 xmalloc_set_program_name (program_name
);
6004 START_PROGRESS (program_name
, 0);
6006 expandargv (&argc
, &argv
);
6008 strip_symbols
= STRIP_UNDEF
;
6009 discard_locals
= LOCALS_UNDEF
;
6011 if (bfd_init () != BFD_INIT_MAGIC
)
6012 fatal (_("fatal error: libbfd ABI mismatch"));
6013 set_default_bfd_target ();
6017 int i
= strlen (program_name
);
6018 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
6019 /* Drop the .exe suffix, if any. */
6020 if (i
> 4 && FILENAME_CMP (program_name
+ i
- 4, ".exe") == 0)
6023 program_name
[i
] = '\0';
6026 is_strip
= (i
>= 5 && FILENAME_CMP (program_name
+ i
- 5, "strip") == 0);
6029 create_symbol_htabs ();
6032 bfd_set_error_program_name (argv
[0]);
6035 strip_main (argc
, argv
);
6037 copy_main (argc
, argv
);
6039 END_PROGRESS (program_name
);