1 /* objcopy.c -- copy object file from input to output, optionally massaging it.
2 Copyright (C) 1991-2021 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 && (CONST_STRNEQ (sec
->name
, GNU_BUILD_ATTRS_SECTION_NAME
)))
1320 /* See if a non-group section is being removed. */
1323 is_strip_section_1 (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1325 if (find_section_list (bfd_section_name (sec
), FALSE
, SECTION_CONTEXT_KEEP
)
1329 if (sections_removed
|| sections_copied
)
1331 struct section_list
*p
;
1332 struct section_list
*q
;
1334 p
= find_section_list (bfd_section_name (sec
), FALSE
,
1335 SECTION_CONTEXT_REMOVE
);
1336 q
= find_section_list (bfd_section_name (sec
), FALSE
,
1337 SECTION_CONTEXT_COPY
);
1340 fatal (_("error: section %s matches both remove and copy options"),
1341 bfd_section_name (sec
));
1342 if (p
&& is_update_section (abfd
, sec
))
1343 fatal (_("error: section %s matches both update and remove options"),
1344 bfd_section_name (sec
));
1348 if (sections_copied
&& q
== NULL
)
1352 if ((bfd_section_flags (sec
) & SEC_DEBUGGING
) != 0)
1354 if (strip_symbols
== STRIP_DEBUG
1355 || strip_symbols
== STRIP_UNNEEDED
1356 || strip_symbols
== STRIP_ALL
1357 || discard_locals
== LOCALS_ALL
1358 || convert_debugging
)
1360 /* By default we don't want to strip .reloc section.
1361 This section has for pe-coff special meaning. See
1362 pe-dll.c file in ld, and peXXigen.c in bfd for details. */
1363 if (strcmp (bfd_section_name (sec
), ".reloc") != 0)
1367 if (strip_symbols
== STRIP_DWO
)
1368 return is_dwo_section (abfd
, sec
);
1370 if (strip_symbols
== STRIP_NONDEBUG
)
1374 if (strip_symbols
== STRIP_NONDWO
)
1375 return !is_dwo_section (abfd
, sec
);
1380 /* See if a section is being removed. */
1383 is_strip_section (bfd
*abfd ATTRIBUTE_UNUSED
, asection
*sec
)
1385 if (is_strip_section_1 (abfd
, sec
))
1388 if ((bfd_section_flags (sec
) & SEC_GROUP
) != 0)
1392 asection
*elt
, *first
;
1394 gsym
= group_signature (sec
);
1395 /* Strip groups without a valid signature. */
1400 If we are going to strip the group signature symbol, then
1401 strip the group section too. */
1403 if ((strip_symbols
== STRIP_ALL
1404 && !is_specified_symbol (gname
, keep_specific_htab
))
1405 || is_specified_symbol (gname
, strip_specific_htab
))
1408 /* Remove the group section if all members are removed. */
1409 first
= elt
= elf_next_in_group (sec
);
1412 if (!is_strip_section_1 (abfd
, elt
))
1414 elt
= elf_next_in_group (elt
);
1426 is_nondebug_keep_contents_section (bfd
*ibfd
, asection
*isection
)
1428 /* Always keep ELF note sections. */
1429 if (bfd_get_flavour (ibfd
) == bfd_target_elf_flavour
)
1430 return elf_section_type (isection
) == SHT_NOTE
;
1432 /* Always keep the .buildid section for PE/COFF.
1434 Strictly, this should be written "always keep the section storing the debug
1435 directory", but that may be the .text section for objects produced by some
1436 tools, which it is not sensible to keep. */
1437 if (bfd_get_flavour (ibfd
) == bfd_target_coff_flavour
)
1438 return strcmp (bfd_section_name (isection
), ".buildid") == 0;
1443 /* Return true if SYM is a hidden symbol. */
1446 is_hidden_symbol (asymbol
*sym
)
1448 elf_symbol_type
*elf_sym
;
1450 elf_sym
= elf_symbol_from (sym
);
1451 if (elf_sym
!= NULL
)
1452 switch (ELF_ST_VISIBILITY (elf_sym
->internal_elf_sym
.st_other
))
1461 /* Empty name is hopefully never a valid symbol name. */
1462 static const char * empty_name
= "";
1465 need_sym_before (struct addsym_node
**node
, const char *sym
)
1468 struct addsym_node
*ptr
= add_sym_list
;
1470 /* 'othersym' symbols are at the front of the list. */
1471 for (count
= 0; count
< add_symbols
; count
++)
1475 if (ptr
->othersym
== empty_name
)
1477 else if (strcmp (ptr
->othersym
, sym
) == 0)
1479 free ((char *) ptr
->othersym
);
1480 ptr
->othersym
= empty_name
;
1490 create_new_symbol (struct addsym_node
*ptr
, bfd
*obfd
)
1492 asymbol
*sym
= bfd_make_empty_symbol (obfd
);
1494 bfd_set_asymbol_name (sym
, ptr
->symdef
);
1495 sym
->value
= ptr
->symval
;
1496 sym
->flags
= ptr
->flags
;
1499 asection
*sec
= bfd_get_section_by_name (obfd
, ptr
->section
);
1501 fatal (_("Section %s not found"), ptr
->section
);
1505 sym
->section
= bfd_abs_section_ptr
;
1509 /* Choose which symbol entries to copy; put the result in OSYMS.
1510 We don't copy in place, because that confuses the relocs.
1511 Return the number of symbols to print. */
1514 filter_symbols (bfd
*abfd
, bfd
*obfd
, asymbol
**osyms
,
1515 asymbol
**isyms
, long symcount
)
1517 asymbol
**from
= isyms
, **to
= osyms
;
1518 long src_count
= 0, dst_count
= 0;
1519 int relocatable
= (abfd
->flags
& (EXEC_P
| DYNAMIC
)) == 0;
1521 for (; src_count
< symcount
; src_count
++)
1523 asymbol
*sym
= from
[src_count
];
1524 flagword flags
= sym
->flags
;
1525 char *name
= (char *) bfd_asymbol_name (sym
);
1527 bfd_boolean used_in_reloc
= FALSE
;
1528 bfd_boolean undefined
;
1529 bfd_boolean rem_leading_char
;
1530 bfd_boolean add_leading_char
;
1532 undefined
= bfd_is_und_section (bfd_asymbol_section (sym
));
1536 struct addsym_node
*ptr
;
1538 if (need_sym_before (&ptr
, name
))
1539 to
[dst_count
++] = create_new_symbol (ptr
, obfd
);
1542 if (htab_elements (redefine_specific_htab
) || section_rename_list
)
1546 new_name
= (char *) lookup_sym_redefinition (name
);
1547 if (new_name
== name
1548 && (flags
& BSF_SECTION_SYM
) != 0)
1549 new_name
= (char *) find_section_rename (name
, NULL
);
1550 bfd_set_asymbol_name (sym
, new_name
);
1554 /* Check if we will remove the current leading character. */
1557 && name
[0] == bfd_get_symbol_leading_char (abfd
)
1558 && (change_leading_char
1559 || (remove_leading_char
1560 && ((flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0
1562 || bfd_is_com_section (bfd_asymbol_section (sym
))))));
1564 /* Check if we will add a new leading character. */
1567 && (bfd_get_symbol_leading_char (obfd
) != '\0')
1568 && (bfd_get_symbol_leading_char (abfd
) == '\0'
1569 || (name
[0] == bfd_get_symbol_leading_char (abfd
)));
1571 /* Short circuit for change_leading_char if we can do it in-place. */
1572 if (rem_leading_char
&& add_leading_char
&& !prefix_symbols_string
)
1574 name
[0] = bfd_get_symbol_leading_char (obfd
);
1575 bfd_set_asymbol_name (sym
, name
);
1576 rem_leading_char
= FALSE
;
1577 add_leading_char
= FALSE
;
1580 /* Remove leading char. */
1581 if (rem_leading_char
)
1582 bfd_set_asymbol_name (sym
, ++name
);
1584 /* Add new leading char and/or prefix. */
1585 if (add_leading_char
|| prefix_symbols_string
)
1588 size_t len
= strlen (name
) + 1;
1590 if (add_leading_char
)
1592 if (prefix_symbols_string
)
1593 len
+= strlen (prefix_symbols_string
);
1595 ptr
= n
= (char *) xmalloc (len
);
1596 if (add_leading_char
)
1597 *ptr
++ = bfd_get_symbol_leading_char (obfd
);
1599 if (prefix_symbols_string
)
1601 strcpy (ptr
, prefix_symbols_string
);
1602 ptr
+= strlen (prefix_symbols_string
);
1606 bfd_set_asymbol_name (sym
, n
);
1610 if (strip_symbols
== STRIP_ALL
)
1612 else if ((flags
& BSF_KEEP
) != 0 /* Used in relocation. */
1613 || ((flags
& BSF_SECTION_SYM
) != 0
1614 && ((*bfd_asymbol_section (sym
)->symbol_ptr_ptr
)->flags
1618 used_in_reloc
= TRUE
;
1620 else if (relocatable
/* Relocatable file. */
1621 && ((flags
& (BSF_GLOBAL
| BSF_WEAK
)) != 0
1622 || bfd_is_com_section (bfd_asymbol_section (sym
))))
1624 else if (bfd_decode_symclass (sym
) == 'I')
1625 /* Global symbols in $idata sections need to be retained
1626 even if relocatable is FALSE. External users of the
1627 library containing the $idata section may reference these
1630 else if ((flags
& BSF_GLOBAL
) != 0 /* Global symbol. */
1631 || (flags
& BSF_WEAK
) != 0
1633 || bfd_is_com_section (bfd_asymbol_section (sym
)))
1634 keep
= strip_symbols
!= STRIP_UNNEEDED
;
1635 else if ((flags
& BSF_DEBUGGING
) != 0) /* Debugging symbol. */
1636 keep
= (strip_symbols
!= STRIP_DEBUG
1637 && strip_symbols
!= STRIP_UNNEEDED
1638 && ! convert_debugging
);
1639 else if (bfd_coff_get_comdat_section (abfd
, bfd_asymbol_section (sym
)))
1640 /* COMDAT sections store special information in local
1641 symbols, so we cannot risk stripping any of them. */
1643 else /* Local symbol. */
1644 keep
= (strip_symbols
!= STRIP_UNNEEDED
1645 && (discard_locals
!= LOCALS_ALL
1646 && (discard_locals
!= LOCALS_START_L
1647 || ! bfd_is_local_label (abfd
, sym
))));
1649 if (keep
&& is_specified_symbol (name
, strip_specific_htab
))
1651 /* There are multiple ways to set 'keep' above, but if it
1652 was the relocatable symbol case, then that's an error. */
1655 non_fatal (_("not stripping symbol `%s' because it is named in a relocation"), name
);
1663 && !(flags
& BSF_KEEP
)
1664 && is_specified_symbol (name
, strip_unneeded_htab
))
1668 && ((keep_file_symbols
&& (flags
& BSF_FILE
))
1669 || is_specified_symbol (name
, keep_specific_htab
)))
1672 if (keep
&& is_strip_section (abfd
, bfd_asymbol_section (sym
)))
1677 if ((flags
& BSF_GLOBAL
) != 0
1678 && (weaken
|| is_specified_symbol (name
, weaken_specific_htab
)))
1680 sym
->flags
&= ~ BSF_GLOBAL
;
1681 sym
->flags
|= BSF_WEAK
;
1685 && (flags
& (BSF_GLOBAL
| BSF_WEAK
))
1686 && (is_specified_symbol (name
, localize_specific_htab
)
1687 || (htab_elements (keepglobal_specific_htab
) != 0
1688 && ! is_specified_symbol (name
, keepglobal_specific_htab
))
1689 || (localize_hidden
&& is_hidden_symbol (sym
))))
1691 sym
->flags
&= ~ (BSF_GLOBAL
| BSF_WEAK
);
1692 sym
->flags
|= BSF_LOCAL
;
1696 && (flags
& BSF_LOCAL
)
1697 && is_specified_symbol (name
, globalize_specific_htab
))
1699 sym
->flags
&= ~ BSF_LOCAL
;
1700 sym
->flags
|= BSF_GLOBAL
;
1703 to
[dst_count
++] = sym
;
1708 struct addsym_node
*ptr
= add_sym_list
;
1710 for (src_count
= 0; src_count
< add_symbols
; src_count
++)
1714 if (ptr
->othersym
!= empty_name
)
1715 fatal (_("'before=%s' not found"), ptr
->othersym
);
1718 to
[dst_count
++] = create_new_symbol (ptr
, obfd
);
1724 to
[dst_count
] = NULL
;
1729 /* Find the redefined name of symbol SOURCE. */
1732 lookup_sym_redefinition (const char *source
)
1734 struct redefine_node key_node
= {(char *) source
, NULL
};
1735 struct redefine_node
*redef_node
1736 = (struct redefine_node
*) htab_find (redefine_specific_htab
, &key_node
);
1738 return redef_node
== NULL
? source
: redef_node
->target
;
1741 /* Insert a node into symbol redefine hash tabel. */
1744 add_redefine_and_check (const char *cause
, const char *source
,
1747 struct redefine_node
*new_node
1748 = (struct redefine_node
*) xmalloc (sizeof (struct redefine_node
));
1750 new_node
->source
= strdup (source
);
1751 new_node
->target
= strdup (target
);
1753 if (htab_find (redefine_specific_htab
, new_node
) != HTAB_EMPTY_ENTRY
)
1754 fatal (_("%s: Multiple redefinition of symbol \"%s\""),
1757 if (htab_find (redefine_specific_reverse_htab
, target
) != HTAB_EMPTY_ENTRY
)
1758 fatal (_("%s: Symbol \"%s\" is target of more than one redefinition"),
1761 /* Insert the NEW_NODE into hash table for quick search. */
1762 add_specific_symbol_node (new_node
, redefine_specific_htab
);
1764 /* Insert the target string into the reverse hash table, this is needed for
1765 duplicated target string check. */
1766 add_specific_symbol (new_node
->target
, redefine_specific_reverse_htab
);
1770 /* Handle the --redefine-syms option. Read lines containing "old new"
1771 from the file, and add them to the symbol redefine list. */
1774 add_redefine_syms_file (const char *filename
)
1783 file
= fopen (filename
, "r");
1785 fatal (_("couldn't open symbol redefinition file %s (error: %s)"),
1786 filename
, strerror (errno
));
1789 buf
= (char *) xmalloc (bufsize
+ 1 /* For the terminating NUL. */);
1797 /* Collect the input symbol name. */
1798 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1806 buf
= (char *) xrealloc (buf
, bufsize
+ 1);
1814 /* Eat white space between the symbol names. */
1815 while (IS_WHITESPACE (c
))
1817 if (c
== '#' || IS_LINE_TERMINATOR (c
))
1822 /* Collect the output symbol name. */
1824 while (! IS_WHITESPACE (c
) && ! IS_LINE_TERMINATOR (c
) && c
!= EOF
)
1832 buf
= (char *) xrealloc (buf
, bufsize
+ 1);
1840 /* Eat white space at end of line. */
1841 while (! IS_LINE_TERMINATOR(c
) && c
!= EOF
&& IS_WHITESPACE (c
))
1846 if ((c
== '\r' && (c
= getc (file
)) == '\n')
1847 || c
== '\n' || c
== EOF
)
1850 /* Append the redefinition to the list. */
1852 add_redefine_and_check (filename
, &buf
[0], &buf
[outsym_off
]);
1863 fatal (_("%s:%d: garbage found at end of line"), filename
, lineno
);
1865 if (len
!= 0 && (outsym_off
== 0 || outsym_off
== len
))
1866 fatal (_("%s:%d: missing new symbol name"), filename
, lineno
);
1869 /* Eat the rest of the line and finish it. */
1870 while (c
!= '\n' && c
!= EOF
)
1876 fatal (_("%s:%d: premature end of file"), filename
, lineno
);
1882 /* Copy unknown object file IBFD onto OBFD.
1883 Returns TRUE upon success, FALSE otherwise. */
1886 copy_unknown_object (bfd
*ibfd
, bfd
*obfd
)
1894 if (bfd_stat_arch_elt (ibfd
, &buf
) != 0)
1896 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1903 non_fatal (_("stat returns negative size for `%s'"),
1904 bfd_get_archive_filename (ibfd
));
1908 if (bfd_seek (ibfd
, (file_ptr
) 0, SEEK_SET
) != 0)
1910 bfd_nonfatal (bfd_get_archive_filename (ibfd
));
1915 printf (_("copy from `%s' [unknown] to `%s' [unknown]\n"),
1916 bfd_get_archive_filename (ibfd
), bfd_get_filename (obfd
));
1918 cbuf
= (char *) xmalloc (BUFSIZE
);
1920 while (ncopied
< size
)
1922 tocopy
= size
- ncopied
;
1923 if (tocopy
> BUFSIZE
)
1926 if (bfd_bread (cbuf
, (bfd_size_type
) tocopy
, ibfd
)
1927 != (bfd_size_type
) tocopy
)
1929 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
1934 if (bfd_bwrite (cbuf
, (bfd_size_type
) tocopy
, obfd
)
1935 != (bfd_size_type
) tocopy
)
1937 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
1945 /* We should at least to be able to read it back when copying an
1946 unknown object in an archive. */
1947 chmod (bfd_get_filename (obfd
), buf
.st_mode
| S_IRUSR
);
1952 typedef struct objcopy_internal_note
1954 Elf_Internal_Note note
;
1955 unsigned long padded_namesz
;
1958 } objcopy_internal_note
;
1960 #define DEBUG_MERGE 0
1963 #define merge_debug(format, ...) fprintf (stderr, format, ## __VA_ARGS__)
1965 #define merge_debug(format, ...)
1968 /* Returns TRUE iff PNOTE1 overlaps or adjoins PNOTE2. */
1971 overlaps_or_adjoins (objcopy_internal_note
* pnote1
,
1972 objcopy_internal_note
* pnote2
)
1974 if (pnote1
->end
< pnote2
->start
)
1975 /* FIXME: Alignment of 16 bytes taken from x86_64 binaries.
1976 Really we should extract the alignment of the section
1977 covered by the notes. */
1978 return BFD_ALIGN (pnote1
->end
, 16) < pnote2
->start
;
1980 if (pnote2
->end
< pnote2
->start
)
1981 return BFD_ALIGN (pnote2
->end
, 16) < pnote1
->start
;
1983 if (pnote1
->end
< pnote2
->end
)
1986 if (pnote2
->end
< pnote1
->end
)
1992 /* Returns TRUE iff NEEDLE is fully contained by HAYSTACK. */
1995 contained_by (objcopy_internal_note
* needle
,
1996 objcopy_internal_note
* haystack
)
1998 return needle
->start
>= haystack
->start
&& needle
->end
<= haystack
->end
;
2002 is_open_note (objcopy_internal_note
* pnote
)
2004 return pnote
->note
.type
== NT_GNU_BUILD_ATTRIBUTE_OPEN
;
2008 is_func_note (objcopy_internal_note
* pnote
)
2010 return pnote
->note
.type
== NT_GNU_BUILD_ATTRIBUTE_FUNC
;
2014 is_deleted_note (objcopy_internal_note
* pnote
)
2016 return pnote
->note
.type
== 0;
2020 is_version_note (objcopy_internal_note
* pnote
)
2022 return (pnote
->note
.namesz
> 4
2023 && pnote
->note
.namedata
[0] == 'G'
2024 && pnote
->note
.namedata
[1] == 'A'
2025 && pnote
->note
.namedata
[2] == '$'
2026 && pnote
->note
.namedata
[3] == GNU_BUILD_ATTRIBUTE_VERSION
);
2030 is_64bit (bfd
* abfd
)
2032 /* Should never happen, but let's be paranoid. */
2033 if (bfd_get_flavour (abfd
) != bfd_target_elf_flavour
)
2036 return elf_elfheader (abfd
)->e_ident
[EI_CLASS
] == ELFCLASS64
;
2039 /* This sorting function is used to get the notes into an order
2040 that makes merging easy. */
2043 compare_gnu_build_notes (const void * data1
, const void * data2
)
2045 objcopy_internal_note
* pnote1
= (objcopy_internal_note
*) data1
;
2046 objcopy_internal_note
* pnote2
= (objcopy_internal_note
*) data2
;
2048 /* Sort notes based upon the attribute they record. */
2049 int cmp
= memcmp (pnote1
->note
.namedata
+ 3,
2050 pnote2
->note
.namedata
+ 3,
2051 pnote1
->note
.namesz
< pnote2
->note
.namesz
?
2052 pnote1
->note
.namesz
- 3 : pnote2
->note
.namesz
- 3);
2056 if (pnote1
->end
< pnote2
->start
)
2058 if (pnote1
->start
> pnote2
->end
)
2061 /* Overlaps - we should merge the two ranges. */
2062 if (pnote1
->start
< pnote2
->start
)
2064 if (pnote1
->end
> pnote2
->end
)
2066 if (pnote1
->end
< pnote2
->end
)
2069 /* Put OPEN notes before function notes. */
2070 if (is_open_note (pnote1
) && ! is_open_note (pnote2
))
2072 if (! is_open_note (pnote1
) && is_open_note (pnote2
))
2078 /* This sorting function is used to get the notes into an order
2079 that makes eliminating address ranges easier. */
2082 sort_gnu_build_notes (const void * data1
, const void * data2
)
2084 objcopy_internal_note
* pnote1
= (objcopy_internal_note
*) data1
;
2085 objcopy_internal_note
* pnote2
= (objcopy_internal_note
*) data2
;
2087 if (pnote1
->note
.type
!= pnote2
->note
.type
)
2089 /* Move deleted notes to the end. */
2090 if (is_deleted_note (pnote1
)) /* 1: OFD 2: OFD */
2093 /* Move OPEN notes to the start. */
2094 if (is_open_note (pnote1
)) /* 1: OF 2: OFD */
2097 if (is_deleted_note (pnote2
)) /* 1: F 2: O D */
2100 return 1; /* 1: F 2: O */
2103 /* Sort by starting address. */
2104 if (pnote1
->start
< pnote2
->start
)
2106 if (pnote1
->start
> pnote2
->start
)
2109 /* Then by end address (bigger range first). */
2110 if (pnote1
->end
> pnote2
->end
)
2112 if (pnote1
->end
< pnote2
->end
)
2115 /* Then by attribute type. */
2116 if (pnote1
->note
.namesz
> 4
2117 && pnote2
->note
.namesz
> 4
2118 && pnote1
->note
.namedata
[3] != pnote2
->note
.namedata
[3])
2119 return pnote1
->note
.namedata
[3] - pnote2
->note
.namedata
[3];
2124 /* Merge the notes on SEC, removing redundant entries.
2125 Returns the new, smaller size of the section upon success. */
2127 static bfd_size_type
2128 merge_gnu_build_notes (bfd
* abfd
,
2131 bfd_byte
* contents
)
2133 objcopy_internal_note
* pnotes_end
;
2134 objcopy_internal_note
* pnotes
= NULL
;
2135 objcopy_internal_note
* pnote
;
2136 bfd_size_type remain
= size
;
2137 unsigned version_1_seen
= 0;
2138 unsigned version_2_seen
= 0;
2139 unsigned version_3_seen
= 0;
2140 const char * err
= NULL
;
2141 bfd_byte
* in
= contents
;
2142 unsigned long previous_func_start
= 0;
2143 unsigned long previous_open_start
= 0;
2144 unsigned long previous_func_end
= 0;
2145 unsigned long previous_open_end
= 0;
2148 relsize
= bfd_get_reloc_upper_bound (abfd
, sec
);
2154 /* If there are relocs associated with this section then we
2155 cannot safely merge it. */
2156 relpp
= (arelent
**) xmalloc (relsize
);
2157 relcount
= bfd_canonicalize_reloc (abfd
, sec
, relpp
, isympp
);
2162 non_fatal (_("%s[%s]: Cannot merge - there are relocations against this section"),
2163 bfd_get_filename (abfd
), bfd_section_name (sec
));
2168 /* Make a copy of the notes and convert to our internal format.
2169 Minimum size of a note is 12 bytes. Also locate the version
2170 notes and check them. */
2171 pnote
= pnotes
= (objcopy_internal_note
*)
2172 xcalloc ((size
/ 12), sizeof (* pnote
));
2173 while (remain
>= 12)
2177 pnote
->note
.namesz
= bfd_get_32 (abfd
, in
);
2178 pnote
->note
.descsz
= bfd_get_32 (abfd
, in
+ 4);
2179 pnote
->note
.type
= bfd_get_32 (abfd
, in
+ 8);
2180 pnote
->padded_namesz
= (pnote
->note
.namesz
+ 3) & ~3;
2182 if (((pnote
->note
.descsz
+ 3) & ~3) != pnote
->note
.descsz
)
2184 err
= _("corrupt GNU build attribute note: description size not a factor of 4");
2188 if (pnote
->note
.type
!= NT_GNU_BUILD_ATTRIBUTE_OPEN
2189 && pnote
->note
.type
!= NT_GNU_BUILD_ATTRIBUTE_FUNC
)
2191 err
= _("corrupt GNU build attribute note: wrong note type");
2195 if (pnote
->padded_namesz
+ pnote
->note
.descsz
+ 12 > remain
)
2197 err
= _("corrupt GNU build attribute note: note too big");
2201 if (pnote
->note
.namesz
< 2)
2203 err
= _("corrupt GNU build attribute note: name too small");
2207 pnote
->note
.namedata
= (char *)(in
+ 12);
2208 pnote
->note
.descdata
= (char *)(in
+ 12 + pnote
->padded_namesz
);
2210 remain
-= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2211 in
+= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2213 if (pnote
->note
.namesz
> 2
2214 && pnote
->note
.namedata
[0] == '$'
2215 && pnote
->note
.namedata
[1] == GNU_BUILD_ATTRIBUTE_VERSION
2216 && pnote
->note
.namedata
[2] == '1')
2218 else if (is_version_note (pnote
))
2220 if (pnote
->note
.namedata
[4] == '2')
2222 else if (pnote
->note
.namedata
[4] == '3')
2226 err
= _("corrupt GNU build attribute note: unsupported version");
2231 switch (pnote
->note
.descsz
)
2238 start
= bfd_get_32 (abfd
, pnote
->note
.descdata
);
2239 /* FIXME: For version 1 and 2 notes we should try to
2240 calculate the end address by finding a symbol whose
2241 value is START, and then adding in its size.
2243 For now though, since v1 and v2 was not intended to
2244 handle gaps, we chose an artificially large end
2250 if (! is_64bit (abfd
))
2252 start
= bfd_get_32 (abfd
, pnote
->note
.descdata
);
2253 end
= bfd_get_32 (abfd
, pnote
->note
.descdata
+ 4);
2257 start
= bfd_get_64 (abfd
, pnote
->note
.descdata
);
2258 /* FIXME: For version 1 and 2 notes we should try to
2259 calculate the end address by finding a symbol whose
2260 value is START, and then adding in its size.
2262 For now though, since v1 and v2 was not intended to
2263 handle gaps, we chose an artificially large end
2270 start
= bfd_get_64 (abfd
, pnote
->note
.descdata
);
2271 end
= bfd_get_64 (abfd
, pnote
->note
.descdata
+ 8);
2275 err
= _("corrupt GNU build attribute note: bad description size");
2279 if (is_open_note (pnote
))
2282 previous_open_start
= start
;
2284 pnote
->start
= previous_open_start
;
2287 previous_open_end
= end
;
2289 pnote
->end
= previous_open_end
;
2294 previous_func_start
= start
;
2296 pnote
->start
= previous_func_start
;
2299 previous_func_end
= end
;
2301 pnote
->end
= previous_func_end
;
2304 if (pnote
->note
.namedata
[pnote
->note
.namesz
- 1] != 0)
2306 err
= _("corrupt GNU build attribute note: name not NUL terminated");
2315 /* Check that the notes are valid. */
2318 err
= _("corrupt GNU build attribute notes: excess data at end");
2322 if (version_1_seen
== 0 && version_2_seen
== 0 && version_3_seen
== 0)
2325 err
= _("bad GNU build attribute notes: no known versions detected");
2328 /* This happens with glibc. No idea why. */
2329 non_fatal (_("%s[%s]: Warning: version note missing - assuming version 3"),
2330 bfd_get_filename (abfd
), bfd_section_name (sec
));
2335 if ( (version_1_seen
> 0 && version_2_seen
> 0)
2336 || (version_1_seen
> 0 && version_3_seen
> 0)
2337 || (version_2_seen
> 0 && version_3_seen
> 0))
2339 err
= _("bad GNU build attribute notes: multiple different versions");
2343 /* We are now only supporting the merging v3+ notes
2344 - it makes things much simpler. */
2345 if (version_3_seen
== 0)
2347 merge_debug ("%s: skipping merge - not using v3 notes", bfd_section_name (sec
));
2351 merge_debug ("Merging section %s which contains %ld notes\n",
2352 sec
->name
, pnotes_end
- pnotes
);
2354 /* Sort the notes. */
2355 qsort (pnotes
, pnotes_end
- pnotes
, sizeof (* pnotes
),
2356 compare_gnu_build_notes
);
2359 merge_debug ("Results of initial sort:\n");
2360 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2361 merge_debug ("offset %#08lx range %#08lx..%#08lx type %ld attribute %d namesz %ld\n",
2362 (pnote
->note
.namedata
- (char *) contents
) - 12,
2363 pnote
->start
, pnote
->end
,
2365 pnote
->note
.namedata
[3],
2370 /* Now merge the notes. The rules are:
2371 1. If a note has a zero range, it can be eliminated.
2372 2. If two notes have the same namedata then:
2373 2a. If one note's range is fully covered by the other note
2374 then it can be deleted.
2375 2b. If one note's range partially overlaps or adjoins the
2376 other note then if they are both of the same type (open
2377 or func) then they can be merged and one deleted. If
2378 they are of different types then they cannot be merged. */
2379 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2381 /* Skip already deleted notes.
2382 FIXME: Can this happen ? We are scanning forwards and
2383 deleting backwards after all. */
2384 if (is_deleted_note (pnote
))
2387 /* Rule 1 - delete 0-range notes. */
2388 if (pnote
->start
== pnote
->end
)
2390 merge_debug ("Delete note at offset %#08lx - empty range\n",
2391 (pnote
->note
.namedata
- (char *) contents
) - 12);
2392 pnote
->note
.type
= 0;
2397 objcopy_internal_note
* back
;
2399 /* Rule 2: Check to see if there is an identical previous note. */
2400 for (iter
= 0, back
= pnote
- 1; back
>= pnotes
; back
--)
2402 if (is_deleted_note (back
))
2405 /* Our sorting function should have placed all identically
2406 attributed notes together, so if we see a note of a different
2407 attribute type stop searching. */
2408 if (back
->note
.namesz
!= pnote
->note
.namesz
2409 || memcmp (back
->note
.namedata
,
2410 pnote
->note
.namedata
, pnote
->note
.namesz
) != 0)
2413 if (back
->start
== pnote
->start
2414 && back
->end
== pnote
->end
)
2416 merge_debug ("Delete note at offset %#08lx - duplicate of note at offset %#08lx\n",
2417 (pnote
->note
.namedata
- (char *) contents
) - 12,
2418 (back
->note
.namedata
- (char *) contents
) - 12);
2419 pnote
->note
.type
= 0;
2424 if (contained_by (pnote
, back
))
2426 merge_debug ("Delete note at offset %#08lx - fully contained by note at %#08lx\n",
2427 (pnote
->note
.namedata
- (char *) contents
) - 12,
2428 (back
->note
.namedata
- (char *) contents
) - 12);
2429 pnote
->note
.type
= 0;
2434 /* This should not happen as we have sorted the
2435 notes with earlier starting addresses first. */
2436 if (contained_by (back
, pnote
))
2437 merge_debug ("ERROR: UNEXPECTED CONTAINMENT\n");
2441 if (overlaps_or_adjoins (back
, pnote
)
2442 && is_func_note (back
) == is_func_note (pnote
))
2444 merge_debug ("Delete note at offset %#08lx - merge into note at %#08lx\n",
2445 (pnote
->note
.namedata
- (char *) contents
) - 12,
2446 (back
->note
.namedata
- (char *) contents
) - 12);
2448 back
->end
= back
->end
> pnote
->end
? back
->end
: pnote
->end
;
2449 back
->start
= back
->start
< pnote
->start
? back
->start
: pnote
->start
;
2450 pnote
->note
.type
= 0;
2454 /* Don't scan too far back however. */
2457 /* FIXME: Not sure if this can ever be triggered. */
2458 merge_debug ("ITERATION LIMIT REACHED\n");
2463 if (! is_deleted_note (pnote
))
2464 merge_debug ("Unable to do anything with note at %#08lx\n",
2465 (pnote
->note
.namedata
- (char *) contents
) - 12);
2469 /* Resort the notes. */
2470 merge_debug ("Final sorting of notes\n");
2471 qsort (pnotes
, pnotes_end
- pnotes
, sizeof (* pnotes
), sort_gnu_build_notes
);
2473 /* Reconstruct the ELF notes. */
2474 bfd_byte
* new_contents
;
2477 bfd_size_type new_size
;
2478 bfd_vma prev_start
= 0;
2479 bfd_vma prev_end
= 0;
2481 /* Not sure how, but the notes might grow in size.
2482 (eg see PR 1774507). Allow for this here. */
2483 new = new_contents
= xmalloc (size
* 2);
2484 for (pnote
= pnotes
, old
= contents
;
2488 bfd_size_type note_size
= 12 + pnote
->padded_namesz
+ pnote
->note
.descsz
;
2490 if (! is_deleted_note (pnote
))
2492 /* Create the note, potentially using the
2493 address range of the previous note. */
2494 if (pnote
->start
== prev_start
&& pnote
->end
== prev_end
)
2496 bfd_put_32 (abfd
, pnote
->note
.namesz
, new);
2497 bfd_put_32 (abfd
, 0, new + 4);
2498 bfd_put_32 (abfd
, pnote
->note
.type
, new + 8);
2500 memcpy (new, pnote
->note
.namedata
, pnote
->note
.namesz
);
2501 if (pnote
->note
.namesz
< pnote
->padded_namesz
)
2502 memset (new + pnote
->note
.namesz
, 0, pnote
->padded_namesz
- pnote
->note
.namesz
);
2503 new += pnote
->padded_namesz
;
2507 bfd_put_32 (abfd
, pnote
->note
.namesz
, new);
2508 bfd_put_32 (abfd
, is_64bit (abfd
) ? 16 : 8, new + 4);
2509 bfd_put_32 (abfd
, pnote
->note
.type
, new + 8);
2511 memcpy (new, pnote
->note
.namedata
, pnote
->note
.namesz
);
2512 if (pnote
->note
.namesz
< pnote
->padded_namesz
)
2513 memset (new + pnote
->note
.namesz
, 0, pnote
->padded_namesz
- pnote
->note
.namesz
);
2514 new += pnote
->padded_namesz
;
2515 if (is_64bit (abfd
))
2517 bfd_put_64 (abfd
, pnote
->start
, new);
2518 bfd_put_64 (abfd
, pnote
->end
, new + 8);
2523 bfd_put_32 (abfd
, pnote
->start
, new);
2524 bfd_put_32 (abfd
, pnote
->end
, new + 4);
2528 prev_start
= pnote
->start
;
2529 prev_end
= pnote
->end
;
2537 merge_debug ("Results of merge:\n");
2538 for (pnote
= pnotes
; pnote
< pnotes_end
; pnote
++)
2539 if (! is_deleted_note (pnote
))
2540 merge_debug ("offset %#08lx range %#08lx..%#08lx type %ld attribute %d namesz %ld\n",
2541 (pnote
->note
.namedata
- (char *) contents
) - 12,
2542 pnote
->start
, pnote
->end
,
2544 pnote
->note
.namedata
[3],
2549 new_size
= new - new_contents
;
2550 if (new_size
< size
)
2552 memcpy (contents
, new_contents
, new_size
);
2555 free (new_contents
);
2560 bfd_set_error (bfd_error_bad_value
);
2561 bfd_nonfatal_message (NULL
, abfd
, sec
, err
);
2570 check_new_section_flags (flagword flags
, bfd
* abfd
, const char * secname
)
2572 /* Only set the SEC_COFF_SHARED flag on COFF files.
2573 The same bit value is used by ELF targets to indicate
2574 compressed sections, and setting that flag here breaks
2576 if ((flags
& SEC_COFF_SHARED
)
2577 && bfd_get_flavour (abfd
) != bfd_target_coff_flavour
)
2579 non_fatal (_("%s[%s]: Note - dropping 'share' flag as output format is not COFF"),
2580 bfd_get_filename (abfd
), secname
);
2581 flags
&= ~ SEC_COFF_SHARED
;
2586 /* Copy object file IBFD onto OBFD.
2587 Returns TRUE upon success, FALSE otherwise. */
2590 copy_object (bfd
*ibfd
, bfd
*obfd
, const bfd_arch_info_type
*input_arch
)
2594 asection
**osections
= NULL
;
2596 asection
*gnu_debuglink_section
= NULL
;
2597 bfd_size_type
*gaps
= NULL
;
2598 bfd_size_type max_gap
= 0;
2601 enum bfd_architecture iarch
;
2603 unsigned int num_sec
, i
;
2605 if (ibfd
->xvec
->byteorder
!= obfd
->xvec
->byteorder
2606 && ibfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
2607 && obfd
->xvec
->byteorder
!= BFD_ENDIAN_UNKNOWN
)
2609 /* PR 17636: Call non-fatal so that we return to our parent who
2610 may need to tidy temporary files. */
2611 non_fatal (_("unable to change endianness of '%s'"),
2612 bfd_get_archive_filename (ibfd
));
2616 if (ibfd
->read_only
)
2618 non_fatal (_("unable to modify '%s' due to errors"),
2619 bfd_get_archive_filename (ibfd
));
2623 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
2625 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
2629 if (ibfd
->sections
== NULL
)
2631 non_fatal (_("error: the input file '%s' has no sections"),
2632 bfd_get_archive_filename (ibfd
));
2636 if (bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
)
2638 if ((do_debug_sections
& compress
) != 0
2639 && do_debug_sections
!= compress
)
2641 non_fatal (_("--compress-debug-sections=[zlib|zlib-gnu|zlib-gabi] is unsupported on `%s'"),
2642 bfd_get_archive_filename (ibfd
));
2646 if (do_elf_stt_common
)
2648 non_fatal (_("--elf-stt-common=[yes|no] is unsupported on `%s'"),
2649 bfd_get_archive_filename (ibfd
));
2655 printf (_("copy from `%s' [%s] to `%s' [%s]\n"),
2656 bfd_get_archive_filename (ibfd
), bfd_get_target (ibfd
),
2657 bfd_get_filename (obfd
), bfd_get_target (obfd
));
2666 start
= bfd_get_start_address (ibfd
);
2667 start
+= change_start
;
2670 /* Neither the start address nor the flags
2671 need to be set for a core file. */
2672 if (bfd_get_format (obfd
) != bfd_core
)
2676 flags
= bfd_get_file_flags (ibfd
);
2677 flags
|= bfd_flags_to_set
;
2678 flags
&= ~bfd_flags_to_clear
;
2679 flags
&= bfd_applicable_file_flags (obfd
);
2681 if (strip_symbols
== STRIP_ALL
)
2682 flags
&= ~HAS_RELOC
;
2684 if (!bfd_set_start_address (obfd
, start
)
2685 || !bfd_set_file_flags (obfd
, flags
))
2687 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2692 /* Copy architecture of input file to output file. */
2693 iarch
= bfd_get_arch (ibfd
);
2694 imach
= bfd_get_mach (ibfd
);
2697 if (iarch
== bfd_arch_unknown
)
2699 iarch
= input_arch
->arch
;
2700 imach
= input_arch
->mach
;
2703 non_fatal (_("Input file `%s' ignores binary architecture parameter."),
2704 bfd_get_archive_filename (ibfd
));
2706 if (iarch
== bfd_arch_unknown
2707 && bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
2708 && bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
2710 const struct elf_backend_data
*bed
= get_elf_backend_data (obfd
);
2714 if (!bfd_set_arch_mach (obfd
, iarch
, imach
)
2715 && (ibfd
->target_defaulted
2716 || bfd_get_arch (ibfd
) != bfd_get_arch (obfd
)))
2718 if (bfd_get_arch (ibfd
) == bfd_arch_unknown
)
2719 non_fatal (_("Unable to recognise the format of the input file `%s'"),
2720 bfd_get_archive_filename (ibfd
));
2722 non_fatal (_("Output file cannot represent architecture `%s'"),
2723 bfd_printable_arch_mach (bfd_get_arch (ibfd
),
2724 bfd_get_mach (ibfd
)));
2728 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
2730 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2734 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
2735 && bfd_pei_p (obfd
))
2737 /* Set up PE parameters. */
2738 pe_data_type
*pe
= pe_data (obfd
);
2740 /* Copy PE parameters before changing them. */
2741 if (bfd_get_flavour (ibfd
) == bfd_target_coff_flavour
2742 && bfd_pei_p (ibfd
))
2743 pe
->pe_opthdr
= pe_data (ibfd
)->pe_opthdr
;
2745 if (pe_file_alignment
!= (bfd_vma
) -1)
2746 pe
->pe_opthdr
.FileAlignment
= pe_file_alignment
;
2748 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
2750 if (pe_heap_commit
!= (bfd_vma
) -1)
2751 pe
->pe_opthdr
.SizeOfHeapCommit
= pe_heap_commit
;
2753 if (pe_heap_reserve
!= (bfd_vma
) -1)
2754 pe
->pe_opthdr
.SizeOfHeapCommit
= pe_heap_reserve
;
2756 if (pe_image_base
!= (bfd_vma
) -1)
2757 pe
->pe_opthdr
.ImageBase
= pe_image_base
;
2759 if (pe_section_alignment
!= (bfd_vma
) -1)
2760 pe
->pe_opthdr
.SectionAlignment
= pe_section_alignment
;
2762 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
2764 if (pe_stack_commit
!= (bfd_vma
) -1)
2765 pe
->pe_opthdr
.SizeOfStackCommit
= pe_stack_commit
;
2767 if (pe_stack_reserve
!= (bfd_vma
) -1)
2768 pe
->pe_opthdr
.SizeOfStackCommit
= pe_stack_reserve
;
2770 if (pe_subsystem
!= -1)
2771 pe
->pe_opthdr
.Subsystem
= pe_subsystem
;
2773 if (pe_major_subsystem_version
!= -1)
2774 pe
->pe_opthdr
.MajorSubsystemVersion
= pe_major_subsystem_version
;
2776 if (pe_minor_subsystem_version
!= -1)
2777 pe
->pe_opthdr
.MinorSubsystemVersion
= pe_minor_subsystem_version
;
2779 if (pe_file_alignment
> pe_section_alignment
)
2781 char file_alignment
[20], section_alignment
[20];
2783 sprintf_vma (file_alignment
, pe_file_alignment
);
2784 sprintf_vma (section_alignment
, pe_section_alignment
);
2785 non_fatal (_("warning: file alignment (0x%s) > section alignment (0x%s)"),
2787 file_alignment
, section_alignment
);
2791 && bfd_get_flavour (ibfd
) == bfd_target_coff_flavour
2792 && bfd_pei_p (ibfd
))
2793 pe
->timestamp
= pe_data (ibfd
)->coff
.timestamp
;
2799 if (osympp
!= isympp
)
2805 symsize
= bfd_get_symtab_upper_bound (ibfd
);
2808 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2812 osympp
= isympp
= (asymbol
**) xmalloc (symsize
);
2813 symcount
= bfd_canonicalize_symtab (ibfd
, isympp
);
2816 bfd_nonfatal_message (NULL
, ibfd
, NULL
, NULL
);
2819 /* PR 17512: file: d6323821
2820 If the symbol table could not be loaded do not pretend that we have
2821 any symbols. This trips us up later on when we load the relocs. */
2825 osympp
= isympp
= NULL
;
2828 /* BFD mandates that all output sections be created and sizes set before
2829 any output is done. Thus, we traverse all sections multiple times. */
2830 bfd_map_over_sections (ibfd
, setup_section
, obfd
);
2832 if (!extract_symbol
)
2833 setup_bfd_headers (ibfd
, obfd
);
2835 if (add_sections
!= NULL
)
2837 struct section_add
*padd
;
2838 struct section_list
*pset
;
2840 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
2844 pset
= find_section_list (padd
->name
, FALSE
,
2845 SECTION_CONTEXT_SET_FLAGS
);
2848 flags
= pset
->flags
| SEC_HAS_CONTENTS
;
2849 flags
= check_new_section_flags (flags
, obfd
, padd
->name
);
2852 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DATA
;
2854 /* bfd_make_section_with_flags() does not return very helpful
2855 error codes, so check for the most likely user error first. */
2856 if (bfd_get_section_by_name (obfd
, padd
->name
))
2858 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2859 _("can't add section '%s'"), padd
->name
);
2864 /* We use LINKER_CREATED here so that the backend hooks
2865 will create any special section type information,
2866 instead of presuming we know what we're doing merely
2867 because we set the flags. */
2868 padd
->section
= bfd_make_section_with_flags
2869 (obfd
, padd
->name
, flags
| SEC_LINKER_CREATED
);
2870 if (padd
->section
== NULL
)
2872 bfd_nonfatal_message (NULL
, obfd
, NULL
,
2873 _("can't create section `%s'"),
2879 if (!bfd_set_section_size (padd
->section
, padd
->size
))
2881 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2885 pset
= find_section_list (padd
->name
, FALSE
,
2886 SECTION_CONTEXT_SET_VMA
| SECTION_CONTEXT_ALTER_VMA
);
2888 && !bfd_set_section_vma (padd
->section
, pset
->vma_val
))
2890 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2894 pset
= find_section_list (padd
->name
, FALSE
,
2895 SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_ALTER_LMA
);
2898 padd
->section
->lma
= pset
->lma_val
;
2900 if (!bfd_set_section_alignment
2901 (padd
->section
, bfd_section_alignment (padd
->section
)))
2903 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
2910 if (update_sections
!= NULL
)
2912 struct section_add
*pupdate
;
2914 for (pupdate
= update_sections
;
2916 pupdate
= pupdate
->next
)
2918 pupdate
->section
= bfd_get_section_by_name (ibfd
, pupdate
->name
);
2919 if (pupdate
->section
== NULL
)
2921 non_fatal (_("error: %s not found, can't be updated"), pupdate
->name
);
2925 osec
= pupdate
->section
->output_section
;
2926 if (!bfd_set_section_size (osec
, pupdate
->size
))
2928 bfd_nonfatal_message (NULL
, obfd
, osec
, NULL
);
2934 merged_note_section
* merged_note_sections
= NULL
;
2937 /* This palaver is necessary because we must set the output
2938 section size first, before its contents are ready. */
2939 for (osec
= ibfd
->sections
; osec
!= NULL
; osec
= osec
->next
)
2941 if (! is_mergeable_note_section (ibfd
, osec
))
2944 /* If the section is going to be completly deleted then
2945 do not bother to merge it. */
2946 if (osec
->output_section
== NULL
)
2949 bfd_size_type size
= bfd_section_size (osec
);
2953 bfd_nonfatal_message (NULL
, ibfd
, osec
,
2954 _("warning: note section is empty"));
2958 merged_note_section
* merged
= xmalloc (sizeof * merged
);
2959 merged
->contents
= NULL
;
2960 if (! bfd_get_full_section_contents (ibfd
, osec
, & merged
->contents
))
2962 bfd_nonfatal_message (NULL
, ibfd
, osec
,
2963 _("warning: could not load note section"));
2968 merged
->size
= merge_gnu_build_notes (ibfd
, osec
, size
,
2971 /* FIXME: Once we have read the contents in, we must write
2972 them out again. So even if the mergeing has achieved
2973 nothing we still add this entry to the merge list. */
2975 if (size
!= merged
->size
2976 && !bfd_set_section_size (osec
->output_section
, merged
->size
))
2978 bfd_nonfatal_message (NULL
, obfd
, osec
,
2979 _("warning: failed to set merged notes size"));
2980 free (merged
->contents
);
2985 /* Add section to list of merged sections. */
2987 merged
->next
= merged_note_sections
;
2988 merged_note_sections
= merged
;
2992 if (dump_sections
!= NULL
)
2994 struct section_add
* pdump
;
2996 for (pdump
= dump_sections
; pdump
!= NULL
; pdump
= pdump
->next
)
3001 osec
= bfd_get_section_by_name (ibfd
, pdump
->name
);
3004 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
3005 _("can't dump section '%s' - it does not exist"),
3010 if ((bfd_section_flags (osec
) & SEC_HAS_CONTENTS
) == 0)
3012 bfd_nonfatal_message (NULL
, ibfd
, osec
,
3013 _("can't dump section - it has no contents"));
3017 bfd_size_type size
= bfd_section_size (osec
);
3018 /* Note - we allow the dumping of zero-sized sections,
3019 creating an empty file. */
3021 f
= fopen (pdump
->filename
, FOPEN_WB
);
3024 bfd_nonfatal_message (pdump
->filename
, NULL
, NULL
,
3025 _("could not open section dump file"));
3029 if (bfd_malloc_and_get_section (ibfd
, osec
, &contents
))
3031 if (size
!= 0 && fwrite (contents
, 1, size
, f
) != size
)
3033 non_fatal (_("error writing section contents to %s (error: %s)"),
3042 bfd_nonfatal_message (NULL
, ibfd
, osec
,
3043 _("could not retrieve section contents"));
3050 if (gnu_debuglink_filename
!= NULL
)
3052 /* PR 15125: Give a helpful warning message if
3053 the debuglink section already exists, and
3054 allow the rest of the copy to complete. */
3055 if (bfd_get_section_by_name (obfd
, ".gnu_debuglink"))
3057 non_fatal (_("%s: debuglink section already exists"),
3058 bfd_get_filename (obfd
));
3059 gnu_debuglink_filename
= NULL
;
3063 gnu_debuglink_section
= bfd_create_gnu_debuglink_section
3064 (obfd
, gnu_debuglink_filename
);
3066 if (gnu_debuglink_section
== NULL
)
3068 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3069 _("cannot create debug link section `%s'"),
3070 gnu_debuglink_filename
);
3074 /* Special processing for PE format files. We
3075 have no way to distinguish PE from COFF here. */
3076 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
)
3078 bfd_vma debuglink_vma
;
3079 asection
* highest_section
;
3081 /* The PE spec requires that all sections be adjacent and sorted
3082 in ascending order of VMA. It also specifies that debug
3083 sections should be last. This is despite the fact that debug
3084 sections are not loaded into memory and so in theory have no
3087 This means that the debuglink section must be given a non-zero
3088 VMA which makes it contiguous with other debug sections. So
3089 walk the current section list, find the section with the
3090 highest VMA and start the debuglink section after that one. */
3091 for (osec
= obfd
->sections
, highest_section
= NULL
;
3095 && (highest_section
== NULL
3096 || osec
->vma
> highest_section
->vma
))
3097 highest_section
= osec
;
3099 if (highest_section
)
3100 debuglink_vma
= BFD_ALIGN (highest_section
->vma
3101 + highest_section
->size
,
3102 /* FIXME: We ought to be using
3103 COFF_PAGE_SIZE here or maybe
3104 bfd_section_alignment() (if it
3105 was set) but since this is for PE
3106 and we know the required alignment
3107 it is easier just to hard code it. */
3110 /* Umm, not sure what to do in this case. */
3111 debuglink_vma
= 0x1000;
3113 bfd_set_section_vma (gnu_debuglink_section
, debuglink_vma
);
3118 num_sec
= bfd_count_sections (obfd
);
3120 && (gap_fill_set
|| pad_to_set
))
3124 /* We must fill in gaps between the sections and/or we must pad
3125 the last section to a specified address. We do this by
3126 grabbing a list of the sections, sorting them by VMA, and
3127 increasing the section sizes as required to fill the gaps.
3128 We write out the gap contents below. */
3130 osections
= xmalloc (num_sec
* sizeof (*osections
));
3132 bfd_map_over_sections (obfd
, get_sections
, &set
);
3134 qsort (osections
, num_sec
, sizeof (*osections
), compare_section_lma
);
3136 gaps
= xmalloc (num_sec
* sizeof (*gaps
));
3137 memset (gaps
, 0, num_sec
* sizeof (*gaps
));
3141 for (i
= 0; i
< num_sec
- 1; i
++)
3144 bfd_size_type size
; /* Octets. */
3145 bfd_vma gap_start
, gap_stop
; /* Octets. */
3146 unsigned int opb1
= bfd_octets_per_byte (obfd
, osections
[i
]);
3147 unsigned int opb2
= bfd_octets_per_byte (obfd
, osections
[i
+1]);
3149 flags
= bfd_section_flags (osections
[i
]);
3150 if ((flags
& SEC_HAS_CONTENTS
) == 0
3151 || (flags
& SEC_LOAD
) == 0)
3154 size
= bfd_section_size (osections
[i
]);
3155 gap_start
= bfd_section_lma (osections
[i
]) * opb1
+ size
;
3156 gap_stop
= bfd_section_lma (osections
[i
+ 1]) * opb2
;
3157 if (gap_start
< gap_stop
)
3159 if (!bfd_set_section_size (osections
[i
],
3160 size
+ (gap_stop
- gap_start
)))
3162 bfd_nonfatal_message (NULL
, obfd
, osections
[i
],
3163 _("Can't fill gap after section"));
3167 gaps
[i
] = gap_stop
- gap_start
;
3168 if (max_gap
< gap_stop
- gap_start
)
3169 max_gap
= gap_stop
- gap_start
;
3176 bfd_vma lma
; /* Octets. */
3177 bfd_size_type size
; /* Octets. */
3178 unsigned int opb
= bfd_octets_per_byte (obfd
, osections
[num_sec
- 1]);
3179 bfd_vma _pad_to
= pad_to
* opb
;
3181 lma
= bfd_section_lma (osections
[num_sec
- 1]) * opb
;
3182 size
= bfd_section_size (osections
[num_sec
- 1]);
3183 if (lma
+ size
< _pad_to
)
3185 if (!bfd_set_section_size (osections
[num_sec
- 1], _pad_to
- lma
))
3187 bfd_nonfatal_message (NULL
, obfd
, osections
[num_sec
- 1],
3188 _("can't add padding"));
3193 gaps
[num_sec
- 1] = _pad_to
- (lma
+ size
);
3194 if (max_gap
< _pad_to
- (lma
+ size
))
3195 max_gap
= _pad_to
- (lma
+ size
);
3201 /* Symbol filtering must happen after the output sections
3202 have been created, but before their contents are set. */
3204 if (convert_debugging
)
3205 dhandle
= read_debugging_info (ibfd
, isympp
, symcount
, FALSE
);
3207 if ((obfd
->flags
& (EXEC_P
| DYNAMIC
)) != 0
3208 && (obfd
->flags
& HAS_RELOC
) == 0)
3210 if (bfd_keep_unused_section_symbols (obfd
))
3212 /* Non-relocatable inputs may not have the unused section
3213 symbols. Mark all section symbols as used to generate
3216 for (asect
= obfd
->sections
; asect
!= NULL
; asect
= asect
->next
)
3218 asect
->symbol
->flags
|= BSF_SECTION_SYM_USED
;
3222 /* Non-relocatable inputs may have the unused section symbols.
3223 Mark all section symbols as unused to excluded them. */
3225 for (s
= 0; s
< symcount
; s
++)
3226 if ((isympp
[s
]->flags
& BSF_SECTION_SYM_USED
))
3227 isympp
[s
]->flags
&= ~BSF_SECTION_SYM_USED
;
3231 if (strip_symbols
== STRIP_DEBUG
3232 || strip_symbols
== STRIP_ALL
3233 || strip_symbols
== STRIP_UNNEEDED
3234 || strip_symbols
== STRIP_NONDEBUG
3235 || strip_symbols
== STRIP_DWO
3236 || strip_symbols
== STRIP_NONDWO
3237 || discard_locals
!= LOCALS_UNDEF
3239 || htab_elements (strip_specific_htab
) != 0
3240 || htab_elements (keep_specific_htab
) != 0
3241 || htab_elements (localize_specific_htab
) != 0
3242 || htab_elements (globalize_specific_htab
) != 0
3243 || htab_elements (keepglobal_specific_htab
) != 0
3244 || htab_elements (weaken_specific_htab
) != 0
3245 || htab_elements (redefine_specific_htab
) != 0
3246 || prefix_symbols_string
3249 || convert_debugging
3250 || change_leading_char
3251 || remove_leading_char
3252 || section_rename_list
3256 /* Mark symbols used in output relocations so that they
3257 are kept, even if they are local labels or static symbols.
3259 Note we iterate over the input sections examining their
3260 relocations since the relocations for the output sections
3261 haven't been set yet. mark_symbols_used_in_relocations will
3262 ignore input sections which have no corresponding output
3264 if (strip_symbols
!= STRIP_ALL
)
3266 bfd_set_error (bfd_error_no_error
);
3267 bfd_map_over_sections (ibfd
,
3268 mark_symbols_used_in_relocations
,
3270 if (bfd_get_error () != bfd_error_no_error
)
3277 osympp
= (asymbol
**) xmalloc ((symcount
+ add_symbols
+ 1) * sizeof (asymbol
*));
3278 symcount
= filter_symbols (ibfd
, obfd
, osympp
, isympp
, symcount
);
3281 if (convert_debugging
&& dhandle
!= NULL
)
3285 res
= write_debugging_info (obfd
, dhandle
, &symcount
, &osympp
);
3288 dhandle
= NULL
; /* Paranoia... */
3297 bfd_set_symtab (obfd
, osympp
, symcount
);
3299 /* This has to happen before section positions are set. */
3300 bfd_map_over_sections (ibfd
, copy_relocations_in_section
, obfd
);
3302 /* This has to happen after the symbol table has been set. */
3303 bfd_map_over_sections (ibfd
, copy_section
, obfd
);
3305 if (add_sections
!= NULL
)
3307 struct section_add
*padd
;
3309 for (padd
= add_sections
; padd
!= NULL
; padd
= padd
->next
)
3311 if (! bfd_set_section_contents (obfd
, padd
->section
, padd
->contents
,
3314 bfd_nonfatal_message (NULL
, obfd
, padd
->section
, NULL
);
3320 if (update_sections
!= NULL
)
3322 struct section_add
*pupdate
;
3324 for (pupdate
= update_sections
;
3326 pupdate
= pupdate
->next
)
3328 osec
= pupdate
->section
->output_section
;
3329 if (! bfd_set_section_contents (obfd
, osec
, pupdate
->contents
,
3332 bfd_nonfatal_message (NULL
, obfd
, osec
, NULL
);
3338 if (merged_note_sections
!= NULL
)
3340 merged_note_section
* merged
= NULL
;
3342 for (osec
= obfd
->sections
; osec
!= NULL
; osec
= osec
->next
)
3344 if (! is_mergeable_note_section (obfd
, osec
))
3348 merged
= merged_note_sections
;
3350 /* It is likely that output sections are in the same order
3351 as the input sections, but do not assume that this is
3353 if (merged
->sec
->output_section
!= osec
)
3355 for (merged
= merged_note_sections
;
3357 merged
= merged
->next
)
3358 if (merged
->sec
->output_section
== osec
)
3363 bfd_nonfatal_message
3365 _("error: failed to locate merged notes"));
3370 if (merged
->contents
== NULL
)
3372 bfd_nonfatal_message
3374 _("error: failed to merge notes"));
3378 if (! bfd_set_section_contents (obfd
, osec
, merged
->contents
, 0,
3381 bfd_nonfatal_message
3383 _("error: failed to copy merged notes into output"));
3387 merged
= merged
->next
;
3390 /* Free the memory. */
3391 merged_note_section
* next
;
3392 for (merged
= merged_note_sections
; merged
!= NULL
; merged
= next
)
3394 next
= merged
->next
;
3395 free (merged
->contents
);
3399 else if (merge_notes
&& ! is_strip
)
3400 non_fatal (_("%s: Could not find any mergeable note sections"),
3401 bfd_get_filename (ibfd
));
3403 if (gnu_debuglink_filename
!= NULL
)
3405 if (! bfd_fill_in_gnu_debuglink_section
3406 (obfd
, gnu_debuglink_section
, gnu_debuglink_filename
))
3408 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3409 _("cannot fill debug link section `%s'"),
3410 gnu_debuglink_filename
);
3419 /* Fill in the gaps. */
3422 buf
= (bfd_byte
*) xmalloc (max_gap
);
3423 memset (buf
, gap_fill
, max_gap
);
3425 for (i
= 0; i
< num_sec
; i
++)
3433 off
= bfd_section_size (osections
[i
]) - left
;
3444 if (! bfd_set_section_contents (obfd
, osections
[i
], buf
,
3447 bfd_nonfatal_message (NULL
, obfd
, osections
[i
], NULL
);
3463 /* Allow the BFD backend to copy any private data it understands
3464 from the input BFD to the output BFD. This is done last to
3465 permit the routine to look at the filtered symbol table, which is
3466 important for the ECOFF code at least. */
3467 if (! bfd_copy_private_bfd_data (ibfd
, obfd
))
3469 bfd_nonfatal_message (NULL
, obfd
, NULL
,
3470 _("error copying private BFD data"));
3474 /* Switch to the alternate machine code. We have to do this at the
3475 very end, because we only initialize the header when we create
3476 the first section. */
3477 if (use_alt_mach_code
!= 0)
3479 if (! bfd_alt_mach_code (obfd
, use_alt_mach_code
))
3481 non_fatal (_("this target does not support %lu alternative machine codes"),
3483 if (bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
3485 non_fatal (_("treating that number as an absolute e_machine value instead"));
3486 elf_elfheader (obfd
)->e_machine
= use_alt_mach_code
;
3489 non_fatal (_("ignoring the alternative value"));
3496 /* Read each archive element in turn from IBFD, copy the
3497 contents to temp file, and keep the temp file handle.
3498 If 'force_output_target' is TRUE then make sure that
3499 all elements in the new archive are of the type
3503 copy_archive (bfd
*ibfd
, bfd
*obfd
, const char *output_target
,
3504 bfd_boolean force_output_target
,
3505 const bfd_arch_info_type
*input_arch
)
3509 struct name_list
*next
;
3513 bfd
**ptr
= &obfd
->archive_head
;
3516 const char *filename
;
3518 /* PR 24281: It is not clear what should happen when copying a thin archive.
3519 One part is straight forward - if the output archive is in a different
3520 directory from the input archive then any relative paths in the library
3521 should be adjusted to the new location. But if any transformation
3522 options are active (eg strip, rename, add, etc) then the implication is
3523 that these should be applied to the files pointed to by the archive.
3524 But since objcopy is not destructive, this means that new files must be
3525 created, and there is no guidance for the names of the new files. (Plus
3526 this conflicts with one of the goals of thin libraries - only taking up
3527 a minimal amount of space in the file system).
3529 So for now we fail if an attempt is made to copy such libraries. */
3530 if (ibfd
->is_thin_archive
)
3533 bfd_set_error (bfd_error_invalid_operation
);
3534 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
3535 _("sorry: copying thin archives is not currently supported"));
3539 /* Make a temp directory to hold the contents. */
3540 dir
= make_tempdir (bfd_get_filename (obfd
));
3542 fatal (_("cannot create tempdir for archive copying (error: %s)"),
3545 if (strip_symbols
== STRIP_ALL
)
3546 obfd
->has_armap
= FALSE
;
3548 obfd
->has_armap
= ibfd
->has_armap
;
3549 obfd
->is_thin_archive
= ibfd
->is_thin_archive
;
3552 obfd
->flags
|= BFD_DETERMINISTIC_OUTPUT
;
3556 this_element
= bfd_openr_next_archived_file (ibfd
, NULL
);
3558 if (!bfd_set_format (obfd
, bfd_get_format (ibfd
)))
3561 bfd_nonfatal_message (NULL
, obfd
, NULL
, NULL
);
3562 goto cleanup_and_exit
;
3565 while (!status
&& this_element
!= NULL
)
3571 int stat_status
= 0;
3572 bfd_boolean del
= TRUE
;
3573 bfd_boolean ok_object
;
3575 /* PR binutils/17533: Do not allow directory traversal
3576 outside of the current directory tree by archive members. */
3577 if (! is_valid_archive_path (bfd_get_filename (this_element
)))
3579 non_fatal (_("illegal pathname found in archive member: %s"),
3580 bfd_get_filename (this_element
));
3582 goto cleanup_and_exit
;
3585 /* Create an output file for this member. */
3586 output_name
= concat (dir
, "/",
3587 bfd_get_filename (this_element
), (char *) 0);
3589 /* If the file already exists, make another temp dir. */
3590 if (stat (output_name
, &buf
) >= 0)
3592 char * tmpdir
= make_tempdir (output_name
);
3597 non_fatal (_("cannot create tempdir for archive copying (error: %s)"),
3600 goto cleanup_and_exit
;
3603 l
= (struct name_list
*) xmalloc (sizeof (struct name_list
));
3608 output_name
= concat (tmpdir
, "/",
3609 bfd_get_filename (this_element
), (char *) 0);
3614 stat_status
= bfd_stat_arch_elt (this_element
, &buf
);
3616 if (stat_status
!= 0)
3617 non_fatal (_("internal stat error on %s"),
3618 bfd_get_filename (this_element
));
3621 l
= (struct name_list
*) xmalloc (sizeof (struct name_list
));
3622 l
->name
= output_name
;
3627 ok_object
= bfd_check_format (this_element
, bfd_object
);
3629 bfd_nonfatal_message (NULL
, this_element
, NULL
,
3630 _("Unable to recognise the format of file"));
3632 /* PR binutils/3110: Cope with archives
3633 containing multiple target types. */
3634 if (force_output_target
|| !ok_object
)
3635 output_bfd
= bfd_openw (output_name
, output_target
);
3637 output_bfd
= bfd_openw (output_name
, bfd_get_target (this_element
));
3639 if (output_bfd
== NULL
)
3641 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3643 goto cleanup_and_exit
;
3648 del
= !copy_object (this_element
, output_bfd
, input_arch
);
3650 if (del
&& bfd_get_arch (this_element
) == bfd_arch_unknown
)
3651 /* Try again as an unknown object file. */
3653 else if (!bfd_close (output_bfd
))
3655 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3656 /* Error in new object file. Don't change archive. */
3663 del
= !copy_unknown_object (this_element
, output_bfd
);
3664 if (!bfd_close_all_done (output_bfd
))
3666 bfd_nonfatal_message (output_name
, NULL
, NULL
, NULL
);
3667 /* Error in new object file. Don't change archive. */
3674 unlink (output_name
);
3679 if (preserve_dates
&& stat_status
== 0)
3680 set_times (output_name
, &buf
);
3682 /* Open the newly output file and attach to our list. */
3683 output_bfd
= bfd_openr (output_name
, output_target
);
3685 l
->obfd
= output_bfd
;
3688 ptr
= &output_bfd
->archive_next
;
3690 last_element
= this_element
;
3692 this_element
= bfd_openr_next_archived_file (ibfd
, last_element
);
3694 bfd_close (last_element
);
3699 filename
= bfd_get_filename (obfd
);
3700 if (!bfd_close (obfd
))
3703 bfd_nonfatal_message (filename
, NULL
, NULL
, NULL
);
3706 filename
= bfd_get_filename (ibfd
);
3707 if (!bfd_close (ibfd
))
3710 bfd_nonfatal_message (filename
, NULL
, NULL
, NULL
);
3714 /* Delete all the files that we opened. */
3716 struct name_list
* next
;
3718 for (l
= list
; l
!= NULL
; l
= next
)
3720 if (l
->obfd
== NULL
)
3724 bfd_close (l
->obfd
);
3736 set_long_section_mode (bfd
*output_bfd
, bfd
*input_bfd
, enum long_section_name_handling style
)
3738 /* This is only relevant to Coff targets. */
3739 if (bfd_get_flavour (output_bfd
) == bfd_target_coff_flavour
)
3742 && bfd_get_flavour (input_bfd
) == bfd_target_coff_flavour
)
3743 style
= bfd_coff_long_section_names (input_bfd
) ? ENABLE
: DISABLE
;
3744 bfd_coff_set_long_section_names (output_bfd
, style
!= DISABLE
);
3748 /* The top-level control. */
3751 copy_file (const char *input_filename
, const char *output_filename
, int ofd
,
3752 struct stat
*in_stat
, const char *input_target
,
3753 const char *output_target
, const bfd_arch_info_type
*input_arch
)
3756 char **obj_matching
;
3757 char **core_matching
;
3758 off_t size
= get_file_size (input_filename
);
3763 non_fatal (_("error: the input file '%s' is empty"),
3769 /* To allow us to do "strip *" without dying on the first
3770 non-object file, failures are nonfatal. */
3771 ibfd
= bfd_openr (input_filename
, input_target
);
3772 if (ibfd
== NULL
|| fstat (fileno ((FILE *) ibfd
->iostream
), in_stat
) != 0)
3774 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3779 switch (do_debug_sections
)
3783 case compress_gnu_zlib
:
3784 case compress_gabi_zlib
:
3785 ibfd
->flags
|= BFD_COMPRESS
;
3786 /* Don't check if input is ELF here since this information is
3787 only available after bfd_check_format_matches is called. */
3788 if (do_debug_sections
!= compress_gnu_zlib
)
3789 ibfd
->flags
|= BFD_COMPRESS_GABI
;
3792 ibfd
->flags
|= BFD_DECOMPRESS
;
3798 switch (do_elf_stt_common
)
3800 case elf_stt_common
:
3801 ibfd
->flags
|= BFD_CONVERT_ELF_COMMON
| BFD_USE_ELF_STT_COMMON
;
3804 case no_elf_stt_common
:
3805 ibfd
->flags
|= BFD_CONVERT_ELF_COMMON
;
3811 if (bfd_check_format (ibfd
, bfd_archive
))
3813 bfd_boolean force_output_target
;
3816 /* bfd_get_target does not return the correct value until
3817 bfd_check_format succeeds. */
3818 if (output_target
== NULL
)
3820 output_target
= bfd_get_target (ibfd
);
3821 force_output_target
= FALSE
;
3824 force_output_target
= TRUE
;
3827 obfd
= bfd_fdopenw (output_filename
, output_target
, ofd
);
3829 obfd
= bfd_openw (output_filename
, output_target
);
3834 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3839 if (gnu_debuglink_filename
!= NULL
)
3841 non_fatal (_("--add-gnu-debuglink ignored for archive %s"),
3842 bfd_get_filename (ibfd
));
3843 gnu_debuglink_filename
= NULL
;
3846 /* This is a no-op on non-Coff targets. */
3847 set_long_section_mode (obfd
, ibfd
, long_section_names
);
3849 copy_archive (ibfd
, obfd
, output_target
, force_output_target
, input_arch
);
3851 else if (bfd_check_format_matches (ibfd
, bfd_object
, &obj_matching
))
3856 /* bfd_get_target does not return the correct value until
3857 bfd_check_format succeeds. */
3858 if (output_target
== NULL
)
3859 output_target
= bfd_get_target (ibfd
);
3862 obfd
= bfd_fdopenw (output_filename
, output_target
, ofd
);
3864 obfd
= bfd_openw (output_filename
, output_target
);
3869 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3874 /* This is a no-op on non-Coff targets. */
3875 set_long_section_mode (obfd
, ibfd
, long_section_names
);
3877 if (! copy_object (ibfd
, obfd
, input_arch
))
3880 /* PR 17512: file: 0f15796a.
3881 If the file could not be copied it may not be in a writeable
3882 state. So use bfd_close_all_done to avoid the possibility of
3883 writing uninitialised data into the file. */
3884 if (! (status
? bfd_close_all_done (obfd
) : bfd_close (obfd
)))
3887 bfd_nonfatal_message (output_filename
, NULL
, NULL
, NULL
);
3891 if (!bfd_close (ibfd
))
3894 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3900 bfd_error_type obj_error
= bfd_get_error ();
3901 bfd_error_type core_error
;
3903 if (bfd_check_format_matches (ibfd
, bfd_core
, &core_matching
))
3905 /* This probably can't happen.. */
3906 if (obj_error
== bfd_error_file_ambiguously_recognized
)
3907 free (obj_matching
);
3911 core_error
= bfd_get_error ();
3912 /* Report the object error in preference to the core error. */
3913 if (obj_error
!= core_error
)
3914 bfd_set_error (obj_error
);
3916 bfd_nonfatal_message (input_filename
, NULL
, NULL
, NULL
);
3918 if (obj_error
== bfd_error_file_ambiguously_recognized
)
3920 list_matching_formats (obj_matching
);
3921 free (obj_matching
);
3923 if (core_error
== bfd_error_file_ambiguously_recognized
)
3925 list_matching_formats (core_matching
);
3926 free (core_matching
);
3933 /* Add a name to the section renaming list. */
3936 add_section_rename (const char * old_name
, const char * new_name
,
3939 section_rename
* srename
;
3941 /* Check for conflicts first. */
3942 for (srename
= section_rename_list
; srename
!= NULL
; srename
= srename
->next
)
3943 if (strcmp (srename
->old_name
, old_name
) == 0)
3945 /* Silently ignore duplicate definitions. */
3946 if (strcmp (srename
->new_name
, new_name
) == 0
3947 && srename
->flags
== flags
)
3950 fatal (_("Multiple renames of section %s"), old_name
);
3953 srename
= (section_rename
*) xmalloc (sizeof (* srename
));
3955 srename
->old_name
= old_name
;
3956 srename
->new_name
= new_name
;
3957 srename
->flags
= flags
;
3958 srename
->next
= section_rename_list
;
3960 section_rename_list
= srename
;
3963 /* Check the section rename list for a new name of the input section
3964 called OLD_NAME. Returns the new name if one is found and sets
3965 RETURNED_FLAGS if non-NULL to the flags to be used for this section. */
3968 find_section_rename (const char *old_name
, flagword
*returned_flags
)
3970 const section_rename
*srename
;
3972 for (srename
= section_rename_list
; srename
!= NULL
; srename
= srename
->next
)
3973 if (strcmp (srename
->old_name
, old_name
) == 0)
3975 if (returned_flags
!= NULL
&& srename
->flags
!= (flagword
) -1)
3976 *returned_flags
= srename
->flags
;
3978 return srename
->new_name
;
3984 /* Once each of the sections is copied, we may still need to do some
3985 finalization work for private section headers. Do that here. */
3988 setup_bfd_headers (bfd
*ibfd
, bfd
*obfd
)
3990 /* Allow the BFD backend to copy any private data it understands
3991 from the input section to the output section. */
3992 if (! bfd_copy_private_header_data (ibfd
, obfd
))
3995 bfd_nonfatal_message (NULL
, ibfd
, NULL
,
3996 _("error in private header data"));
4000 /* All went well. */
4004 /* Create a section in OBFD with the same
4005 name and attributes as ISECTION in IBFD. */
4008 setup_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
4010 bfd
*obfd
= (bfd
*) obfdarg
;
4011 struct section_list
*p
;
4019 const char * new_name
;
4020 char *prefix
= NULL
;
4021 bfd_boolean make_nobits
;
4022 unsigned int alignment
;
4024 if (is_strip_section (ibfd
, isection
))
4027 /* Get the, possibly new, name of the output section. */
4028 name
= bfd_section_name (isection
);
4029 flags
= bfd_section_flags (isection
);
4030 if (bfd_get_flavour (ibfd
) != bfd_get_flavour (obfd
))
4032 flags
&= bfd_applicable_section_flags (ibfd
);
4033 flags
&= bfd_applicable_section_flags (obfd
);
4035 new_name
= find_section_rename (name
, &flags
);
4036 if (new_name
!= name
)
4039 flags
= check_new_section_flags (flags
, obfd
, name
);
4042 /* Prefix sections. */
4043 if (prefix_alloc_sections_string
4044 && (bfd_section_flags (isection
) & SEC_ALLOC
) != 0)
4045 prefix
= prefix_alloc_sections_string
;
4046 else if (prefix_sections_string
)
4047 prefix
= prefix_sections_string
;
4053 n
= (char *) xmalloc (strlen (prefix
) + strlen (name
) + 1);
4059 make_nobits
= FALSE
;
4061 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4062 SECTION_CONTEXT_SET_FLAGS
);
4065 flags
= p
->flags
| (flags
& (SEC_HAS_CONTENTS
| SEC_RELOC
));
4066 flags
= check_new_section_flags (flags
, obfd
, bfd_section_name (isection
));
4068 else if (strip_symbols
== STRIP_NONDEBUG
4069 && (flags
& (SEC_ALLOC
| SEC_GROUP
)) != 0
4070 && !is_nondebug_keep_contents_section (ibfd
, isection
))
4072 flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
| SEC_GROUP
);
4073 if (bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
4077 /* Twiddle the input section flags so that it seems to
4078 elf.c:copy_private_bfd_data that section flags have not
4079 changed between input and output sections. This hack
4080 prevents wholesale rewriting of the program headers. */
4081 isection
->flags
&= ~(SEC_HAS_CONTENTS
| SEC_LOAD
| SEC_GROUP
);
4085 osection
= bfd_make_section_anyway_with_flags (obfd
, name
, flags
);
4087 if (osection
== NULL
)
4089 err
= _("failed to create output section");
4094 elf_section_type (osection
) = SHT_NOBITS
;
4096 size
= bfd_section_size (isection
);
4097 size
= bfd_convert_section_size (ibfd
, isection
, obfd
, size
);
4099 size
= (size
+ interleave
- 1) / interleave
* copy_width
;
4100 else if (extract_symbol
)
4102 if (!bfd_set_section_size (osection
, size
))
4104 err
= _("failed to set size");
4108 vma
= bfd_section_vma (isection
);
4109 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4110 SECTION_CONTEXT_ALTER_VMA
| SECTION_CONTEXT_SET_VMA
);
4113 if (p
->context
& SECTION_CONTEXT_SET_VMA
)
4119 vma
+= change_section_address
;
4121 if (!bfd_set_section_vma (osection
, vma
))
4123 err
= _("failed to set vma");
4127 lma
= isection
->lma
;
4128 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4129 SECTION_CONTEXT_ALTER_LMA
| SECTION_CONTEXT_SET_LMA
);
4132 if (p
->context
& SECTION_CONTEXT_ALTER_LMA
)
4138 lma
+= change_section_address
;
4140 osection
->lma
= lma
;
4142 p
= find_section_list (bfd_section_name (isection
), FALSE
,
4143 SECTION_CONTEXT_SET_ALIGNMENT
);
4145 alignment
= p
->alignment
;
4147 alignment
= bfd_section_alignment (isection
);
4149 /* FIXME: This is probably not enough. If we change the LMA we
4150 may have to recompute the header for the file as well. */
4151 if (!bfd_set_section_alignment (osection
, alignment
))
4153 err
= _("failed to set alignment");
4157 /* Copy merge entity size. */
4158 osection
->entsize
= isection
->entsize
;
4160 /* Copy compress status. */
4161 osection
->compress_status
= isection
->compress_status
;
4163 /* This used to be mangle_section; we do here to avoid using
4164 bfd_get_section_by_name since some formats allow multiple
4165 sections with the same name. */
4166 isection
->output_section
= osection
;
4167 isection
->output_offset
= 0;
4169 if ((isection
->flags
& SEC_GROUP
) != 0)
4171 asymbol
*gsym
= group_signature (isection
);
4175 gsym
->flags
|= BSF_KEEP
;
4176 if (bfd_get_flavour (ibfd
) == bfd_target_elf_flavour
)
4177 elf_group_id (isection
) = gsym
;
4181 /* Allow the BFD backend to copy any private data it understands
4182 from the input section to the output section. */
4183 if (!bfd_copy_private_section_data (ibfd
, isection
, obfd
, osection
))
4185 err
= _("failed to copy private data");
4189 /* All went well. */
4194 bfd_nonfatal_message (NULL
, obfd
, osection
, err
);
4197 /* Return TRUE if input section ISECTION should be skipped. */
4200 skip_section (bfd
*ibfd
, sec_ptr isection
, bfd_boolean skip_copy
)
4206 /* If we have already failed earlier on,
4207 do not keep on generating complaints now. */
4214 if (is_strip_section (ibfd
, isection
))
4217 if (is_update_section (ibfd
, isection
))
4220 /* When merging a note section we skip the copying of the contents,
4221 but not the copying of the relocs associated with the contents. */
4222 if (skip_copy
&& is_mergeable_note_section (ibfd
, isection
))
4225 flags
= bfd_section_flags (isection
);
4226 if ((flags
& SEC_GROUP
) != 0)
4229 osection
= isection
->output_section
;
4230 size
= bfd_section_size (isection
);
4232 if (size
== 0 || osection
== 0)
4238 /* Add section SECTION_PATTERN to the list of sections that will have their
4239 relocations removed. */
4242 handle_remove_relocations_option (const char *section_pattern
)
4244 find_section_list (section_pattern
, TRUE
, SECTION_CONTEXT_REMOVE_RELOCS
);
4247 /* Return TRUE if ISECTION from IBFD should have its relocations removed,
4248 otherwise return FALSE. If the user has requested that relocations be
4249 removed from a section that does not have relocations then this
4250 function will still return TRUE. */
4253 discard_relocations (bfd
*ibfd ATTRIBUTE_UNUSED
, asection
*isection
)
4255 return (find_section_list (bfd_section_name (isection
), FALSE
,
4256 SECTION_CONTEXT_REMOVE_RELOCS
) != NULL
);
4259 /* Wrapper for dealing with --remove-section (-R) command line arguments.
4260 A special case is detected here, if the user asks to remove a relocation
4261 section (one starting with ".rela" or ".rel") then this removal must
4262 be done using a different technique in a relocatable object. */
4265 handle_remove_section_option (const char *section_pattern
)
4267 find_section_list (section_pattern
, TRUE
, SECTION_CONTEXT_REMOVE
);
4268 if (strncmp (section_pattern
, ".rel", 4) == 0)
4270 section_pattern
+= 4;
4271 if (*section_pattern
== 'a')
4273 if (*section_pattern
)
4274 handle_remove_relocations_option (section_pattern
);
4276 sections_removed
= TRUE
;
4279 /* Copy relocations in input section ISECTION of IBFD to an output
4280 section with the same name in OBFDARG. If stripping then don't
4281 copy any relocation info. */
4284 copy_relocations_in_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
4286 bfd
*obfd
= (bfd
*) obfdarg
;
4292 if (skip_section (ibfd
, isection
, FALSE
))
4295 osection
= isection
->output_section
;
4297 /* Core files and DWO files do not need to be relocated. */
4298 if (bfd_get_format (obfd
) == bfd_core
4299 || strip_symbols
== STRIP_NONDWO
4300 || discard_relocations (ibfd
, isection
))
4304 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
4308 /* Do not complain if the target does not support relocations. */
4309 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
4314 bfd_nonfatal_message (NULL
, ibfd
, isection
, NULL
);
4322 bfd_set_reloc (obfd
, osection
, NULL
, 0);
4323 osection
->flags
&= ~SEC_RELOC
;
4327 if (isection
->orelocation
!= NULL
)
4329 /* Some other function has already set up the output relocs
4330 for us, so scan those instead of the default relocs. */
4331 relcount
= isection
->reloc_count
;
4332 relpp
= isection
->orelocation
;
4336 relpp
= (arelent
**) xmalloc (relsize
);
4337 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, isympp
);
4341 bfd_nonfatal_message (NULL
, ibfd
, isection
,
4342 _("relocation count is negative"));
4348 if (strip_symbols
== STRIP_ALL
)
4350 /* Remove relocations which are not in
4351 keep_strip_specific_list. */
4352 arelent
**temp_relpp
;
4353 long temp_relcount
= 0;
4356 temp_relpp
= (arelent
**) xmalloc (relsize
);
4357 for (i
= 0; i
< relcount
; i
++)
4359 /* PR 17512: file: 9e907e0c. */
4360 if (relpp
[i
]->sym_ptr_ptr
4362 && * relpp
[i
]->sym_ptr_ptr
)
4363 if (is_specified_symbol (bfd_asymbol_name (*relpp
[i
]->sym_ptr_ptr
),
4364 keep_specific_htab
))
4365 temp_relpp
[temp_relcount
++] = relpp
[i
];
4367 relcount
= temp_relcount
;
4368 if (relpp
!= isection
->orelocation
)
4373 bfd_set_reloc (obfd
, osection
, relcount
== 0 ? NULL
: relpp
, relcount
);
4376 osection
->flags
&= ~SEC_RELOC
;
4377 if (relpp
!= isection
->orelocation
)
4383 /* Copy the data of input section ISECTION of IBFD
4384 to an output section with the same name in OBFD. */
4387 copy_section (bfd
*ibfd
, sec_ptr isection
, void *obfdarg
)
4389 bfd
*obfd
= (bfd
*) obfdarg
;
4390 struct section_list
*p
;
4394 if (skip_section (ibfd
, isection
, TRUE
))
4397 osection
= isection
->output_section
;
4398 /* The output SHF_COMPRESSED section size is different from input if
4399 ELF classes of input and output aren't the same. We can't use
4400 the output section size since --interleave will shrink the output
4401 section. Size will be updated if the section is converted. */
4402 size
= bfd_section_size (isection
);
4404 if (bfd_section_flags (isection
) & SEC_HAS_CONTENTS
4405 && bfd_section_flags (osection
) & SEC_HAS_CONTENTS
)
4407 bfd_byte
*memhunk
= NULL
;
4409 if (!bfd_get_full_section_contents (ibfd
, isection
, &memhunk
)
4410 || !bfd_convert_section_contents (ibfd
, isection
, obfd
,
4414 bfd_nonfatal_message (NULL
, ibfd
, isection
, NULL
);
4421 /* We don't handle leftover bytes (too many possible behaviors,
4422 and we don't know what the user wants). The section length
4423 must be a multiple of the number of bytes to swap. */
4424 if ((size
% reverse_bytes
) == 0)
4429 for (i
= 0; i
< size
; i
+= reverse_bytes
)
4430 for (j
= 0; j
< (unsigned long)(reverse_bytes
/ 2); j
++)
4432 bfd_byte
*m
= (bfd_byte
*) memhunk
;
4435 m
[i
+ j
] = m
[(i
+ reverse_bytes
) - (j
+ 1)];
4436 m
[(i
+ reverse_bytes
) - (j
+ 1)] = b
;
4440 /* User must pad the section up in order to do this. */
4441 fatal (_("cannot reverse bytes: length of section %s must be evenly divisible by %d"),
4442 bfd_section_name (isection
), reverse_bytes
);
4447 /* Keep only every `copy_byte'th byte in MEMHUNK. */
4448 char *from
= (char *) memhunk
+ copy_byte
;
4449 char *to
= (char *) memhunk
;
4450 char *end
= (char *) memhunk
+ size
;
4453 /* If the section address is not exactly divisible by the interleave,
4454 then we must bias the from address. If the copy_byte is less than
4455 the bias, then we must skip forward one interleave, and increment
4457 int extra
= isection
->lma
% interleave
;
4459 if (copy_byte
< extra
)
4462 for (; from
< end
; from
+= interleave
)
4463 for (i
= 0; i
< copy_width
; i
++)
4465 if (&from
[i
] >= end
)
4470 size
= (size
+ interleave
- 1 - copy_byte
) / interleave
* copy_width
;
4471 osection
->lma
/= interleave
;
4472 if (copy_byte
< extra
)
4476 if (!bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
4479 bfd_nonfatal_message (NULL
, obfd
, osection
, NULL
);
4485 else if ((p
= find_section_list (bfd_section_name (isection
),
4486 FALSE
, SECTION_CONTEXT_SET_FLAGS
)) != NULL
4487 && (p
->flags
& SEC_HAS_CONTENTS
) != 0)
4489 void *memhunk
= xmalloc (size
);
4491 /* We don't permit the user to turn off the SEC_HAS_CONTENTS
4492 flag--they can just remove the section entirely and add it
4493 back again. However, we do permit them to turn on the
4494 SEC_HAS_CONTENTS flag, and take it to mean that the section
4495 contents should be zeroed out. */
4497 memset (memhunk
, 0, size
);
4498 if (! bfd_set_section_contents (obfd
, osection
, memhunk
, 0, size
))
4501 bfd_nonfatal_message (NULL
, obfd
, osection
, NULL
);
4509 /* Get all the sections. This is used when --gap-fill or --pad-to is
4513 get_sections (bfd
*obfd ATTRIBUTE_UNUSED
, asection
*osection
, void *secppparg
)
4515 asection
***secppp
= (asection
***) secppparg
;
4517 **secppp
= osection
;
4521 /* Sort sections by LMA. This is called via qsort, and is used when
4522 --gap-fill or --pad-to is used. We force non loadable or empty
4523 sections to the front, where they are easier to ignore. */
4526 compare_section_lma (const void *arg1
, const void *arg2
)
4528 const asection
*sec1
= *(const asection
**) arg1
;
4529 const asection
*sec2
= *(const asection
**) arg2
;
4530 flagword flags1
, flags2
;
4532 /* Sort non loadable sections to the front. */
4533 flags1
= sec1
->flags
;
4534 flags2
= sec2
->flags
;
4535 if ((flags1
& SEC_HAS_CONTENTS
) == 0
4536 || (flags1
& SEC_LOAD
) == 0)
4538 if ((flags2
& SEC_HAS_CONTENTS
) != 0
4539 && (flags2
& SEC_LOAD
) != 0)
4544 if ((flags2
& SEC_HAS_CONTENTS
) == 0
4545 || (flags2
& SEC_LOAD
) == 0)
4549 /* Sort sections by LMA. */
4550 if (sec1
->lma
> sec2
->lma
)
4552 if (sec1
->lma
< sec2
->lma
)
4555 /* Sort sections with the same LMA by size. */
4556 if (bfd_section_size (sec1
) > bfd_section_size (sec2
))
4558 if (bfd_section_size (sec1
) < bfd_section_size (sec2
))
4561 if (sec1
->id
> sec2
->id
)
4563 if (sec1
->id
< sec2
->id
)
4568 /* Mark all the symbols which will be used in output relocations with
4569 the BSF_KEEP flag so that those symbols will not be stripped.
4571 Ignore relocations which will not appear in the output file. */
4574 mark_symbols_used_in_relocations (bfd
*ibfd
, sec_ptr isection
, void *symbolsarg
)
4576 asymbol
**symbols
= (asymbol
**) symbolsarg
;
4581 /* Ignore an input section with no corresponding output section. */
4582 if (isection
->output_section
== NULL
)
4585 relsize
= bfd_get_reloc_upper_bound (ibfd
, isection
);
4588 /* Do not complain if the target does not support relocations. */
4589 if (relsize
== -1 && bfd_get_error () == bfd_error_invalid_operation
)
4591 bfd_fatal (bfd_get_filename (ibfd
));
4597 relpp
= (arelent
**) xmalloc (relsize
);
4598 relcount
= bfd_canonicalize_reloc (ibfd
, isection
, relpp
, symbols
);
4600 bfd_fatal (bfd_get_filename (ibfd
));
4602 /* Examine each symbol used in a relocation. If it's not one of the
4603 special bfd section symbols, then mark it with BSF_KEEP. */
4604 for (i
= 0; i
< relcount
; i
++)
4606 /* See PRs 20923 and 20930 for reproducers for the NULL tests. */
4607 if (relpp
[i
]->sym_ptr_ptr
!= NULL
4608 && * relpp
[i
]->sym_ptr_ptr
!= NULL
4609 && *relpp
[i
]->sym_ptr_ptr
!= bfd_com_section_ptr
->symbol
4610 && *relpp
[i
]->sym_ptr_ptr
!= bfd_abs_section_ptr
->symbol
4611 && *relpp
[i
]->sym_ptr_ptr
!= bfd_und_section_ptr
->symbol
)
4612 (*relpp
[i
]->sym_ptr_ptr
)->flags
|= BSF_KEEP
;
4619 /* Write out debugging information. */
4622 write_debugging_info (bfd
*obfd
, void *dhandle
,
4623 long *symcountp ATTRIBUTE_UNUSED
,
4624 asymbol
***symppp ATTRIBUTE_UNUSED
)
4626 if (bfd_get_flavour (obfd
) == bfd_target_coff_flavour
4627 || bfd_get_flavour (obfd
) == bfd_target_elf_flavour
)
4629 bfd_byte
*syms
, *strings
= NULL
;
4630 bfd_size_type symsize
, stringsize
;
4631 asection
*stabsec
, *stabstrsec
;
4634 if (! write_stabs_in_sections_debugging_info (obfd
, dhandle
, &syms
,
4639 flags
= SEC_HAS_CONTENTS
| SEC_READONLY
| SEC_DEBUGGING
;
4640 stabsec
= bfd_make_section_with_flags (obfd
, ".stab", flags
);
4641 stabstrsec
= bfd_make_section_with_flags (obfd
, ".stabstr", flags
);
4643 || stabstrsec
== NULL
4644 || !bfd_set_section_size (stabsec
, symsize
)
4645 || !bfd_set_section_size (stabstrsec
, stringsize
)
4646 || !bfd_set_section_alignment (stabsec
, 2)
4647 || !bfd_set_section_alignment (stabstrsec
, 0))
4649 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4650 _("can't create debugging section"));
4655 /* We can get away with setting the section contents now because
4656 the next thing the caller is going to do is copy over the
4657 real sections. We may someday have to split the contents
4658 setting out of this function. */
4659 if (! bfd_set_section_contents (obfd
, stabsec
, syms
, 0, symsize
)
4660 || ! bfd_set_section_contents (obfd
, stabstrsec
, strings
, 0,
4663 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4664 _("can't set debugging section contents"));
4672 bfd_nonfatal_message (NULL
, obfd
, NULL
,
4673 _("don't know how to write debugging information for %s"),
4674 bfd_get_target (obfd
));
4678 /* If neither -D nor -U was specified explicitly,
4679 then use the configured default. */
4681 default_deterministic (void)
4683 if (deterministic
< 0)
4684 deterministic
= DEFAULT_AR_DETERMINISTIC
;
4688 strip_main (int argc
, char *argv
[])
4690 char *input_target
= NULL
;
4691 char *output_target
= NULL
;
4692 bfd_boolean show_version
= FALSE
;
4693 bfd_boolean formats_info
= FALSE
;
4696 char *output_file
= NULL
;
4697 bfd_boolean merge_notes_set
= FALSE
;
4699 while ((c
= getopt_long (argc
, argv
, "I:O:F:K:MN:R:o:sSpdgxXHhVvwDU",
4700 strip_options
, (int *) 0)) != EOF
)
4705 input_target
= optarg
;
4708 output_target
= optarg
;
4711 input_target
= output_target
= optarg
;
4714 handle_remove_section_option (optarg
);
4716 case OPTION_KEEP_SECTION
:
4717 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_KEEP
);
4719 case OPTION_REMOVE_RELOCS
:
4720 handle_remove_relocations_option (optarg
);
4723 strip_symbols
= STRIP_ALL
;
4727 case 'd': /* Historic BSD alias for -g. Used by early NetBSD. */
4728 strip_symbols
= STRIP_DEBUG
;
4730 case OPTION_STRIP_DWO
:
4731 strip_symbols
= STRIP_DWO
;
4733 case OPTION_STRIP_UNNEEDED
:
4734 strip_symbols
= STRIP_UNNEEDED
;
4737 add_specific_symbol (optarg
, keep_specific_htab
);
4741 merge_notes_set
= TRUE
;
4743 case OPTION_NO_MERGE_NOTES
:
4744 merge_notes
= FALSE
;
4745 merge_notes_set
= TRUE
;
4748 add_specific_symbol (optarg
, strip_specific_htab
);
4751 output_file
= optarg
;
4754 preserve_dates
= TRUE
;
4757 deterministic
= TRUE
;
4760 deterministic
= FALSE
;
4763 discard_locals
= LOCALS_ALL
;
4766 discard_locals
= LOCALS_START_L
;
4772 show_version
= TRUE
;
4774 case OPTION_FORMATS_INFO
:
4775 formats_info
= TRUE
;
4777 case OPTION_ONLY_KEEP_DEBUG
:
4778 strip_symbols
= STRIP_NONDEBUG
;
4780 case OPTION_KEEP_FILE_SYMBOLS
:
4781 keep_file_symbols
= 1;
4784 /* We've been given a long option. */
4791 strip_usage (stdout
, 0);
4793 strip_usage (stderr
, 1);
4797 /* If the user has not expressly chosen to merge/not-merge ELF notes
4798 then enable the merging unless we are stripping debug or dwo info. */
4799 if (! merge_notes_set
4800 && (strip_symbols
== STRIP_UNDEF
4801 || strip_symbols
== STRIP_ALL
4802 || strip_symbols
== STRIP_UNNEEDED
4803 || strip_symbols
== STRIP_NONDEBUG
4804 || strip_symbols
== STRIP_NONDWO
))
4814 print_version ("strip");
4816 default_deterministic ();
4818 /* Default is to strip all symbols. */
4819 if (strip_symbols
== STRIP_UNDEF
4820 && discard_locals
== LOCALS_UNDEF
4821 && htab_elements (strip_specific_htab
) == 0)
4822 strip_symbols
= STRIP_ALL
;
4824 if (output_target
== NULL
)
4825 output_target
= input_target
;
4829 || (output_file
!= NULL
&& (i
+ 1) < argc
))
4830 strip_usage (stderr
, 1);
4832 for (; i
< argc
; i
++)
4834 int hold_status
= status
;
4835 struct stat statbuf
;
4840 if (get_file_size (argv
[i
]) < 1)
4846 if (output_file
== NULL
4847 || filename_cmp (argv
[i
], output_file
) == 0)
4848 tmpname
= make_tempname (argv
[i
], &tmpfd
);
4850 tmpname
= output_file
;
4853 #if !defined (_WIN32) || defined (__CYGWIN32__)
4854 /* Retain a copy of TMPFD since we will need it for SMART_RENAME. */
4855 || (tmpfd
>= 0 && (copyfd
= dup (tmpfd
)) == -1)
4859 bfd_nonfatal_message (argv
[i
], NULL
, NULL
,
4860 _("could not create temporary file to hold stripped copy"));
4866 copy_file (argv
[i
], tmpname
, tmpfd
, &statbuf
, input_target
,
4867 output_target
, NULL
);
4871 set_times (tmpname
, &statbuf
);
4872 if (output_file
!= tmpname
)
4873 status
= (smart_rename (tmpname
,
4874 output_file
? output_file
: argv
[i
],
4875 copyfd
, &statbuf
, preserve_dates
) != 0);
4877 status
= hold_status
;
4881 #if !defined (_WIN32) || defined (__CYGWIN32__)
4885 unlink_if_ordinary (tmpname
);
4887 if (output_file
!= tmpname
)
4894 /* Set up PE subsystem. */
4897 set_pe_subsystem (const char *s
)
4899 const char *version
, *subsystem
;
4909 { "native", 0, IMAGE_SUBSYSTEM_NATIVE
},
4910 { "windows", 0, IMAGE_SUBSYSTEM_WINDOWS_GUI
},
4911 { "console", 0, IMAGE_SUBSYSTEM_WINDOWS_CUI
},
4912 { "posix", 0, IMAGE_SUBSYSTEM_POSIX_CUI
},
4913 { "wince", 0, IMAGE_SUBSYSTEM_WINDOWS_CE_GUI
},
4914 { "efi-app", 1, IMAGE_SUBSYSTEM_EFI_APPLICATION
},
4915 { "efi-bsd", 1, IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER
},
4916 { "efi-rtd", 1, IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER
},
4917 { "sal-rtd", 1, IMAGE_SUBSYSTEM_SAL_RUNTIME_DRIVER
},
4918 { "xbox", 0, IMAGE_SUBSYSTEM_XBOX
}
4924 /* Check for the presence of a version number. */
4925 version
= strchr (s
, ':');
4926 if (version
== NULL
)
4930 int len
= version
- s
;
4934 version
= copy
+ 1 + len
;
4935 pe_major_subsystem_version
= strtoul (version
, ©
, 0);
4937 pe_minor_subsystem_version
= strtoul (copy
+ 1, ©
, 0);
4939 non_fatal (_("%s: bad version in PE subsystem"), s
);
4942 /* Check for numeric subsystem. */
4943 value
= (short) strtol (subsystem
, ©
, 0);
4946 for (i
= 0; i
< ARRAY_SIZE (v
); i
++)
4947 if (v
[i
].value
== value
)
4949 pe_subsystem
= value
;
4950 set_def
= v
[i
].set_def
;
4956 /* Search for subsystem by name. */
4957 for (i
= 0; i
< ARRAY_SIZE (v
); i
++)
4958 if (strcmp (subsystem
, v
[i
].name
) == 0)
4960 pe_subsystem
= v
[i
].value
;
4961 set_def
= v
[i
].set_def
;
4969 fatal (_("unknown PE subsystem: %s"), s
);
4974 if (pe_file_alignment
== (bfd_vma
) -1)
4975 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
4976 if (pe_section_alignment
== (bfd_vma
) -1)
4977 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
4981 free ((char *) subsystem
);
4984 /* Convert EFI target to PEI target. */
4987 convert_efi_target (char *efi
)
4993 if (strcmp (efi
+ 4, "ia32") == 0)
4995 /* Change ia32 to i386. */
5000 else if (strcmp (efi
+ 4, "x86_64") == 0)
5002 /* Change x86_64 to x86-64. */
5007 /* Allocate and return a pointer to a struct section_add, initializing the
5008 structure using ARG, a string in the format "sectionname=filename".
5009 The returned structure will have its next pointer set to NEXT. The
5010 OPTION field is the name of the command line option currently being
5011 parsed, and is only used if an error needs to be reported. */
5013 static struct section_add
*
5014 init_section_add (const char *arg
,
5015 struct section_add
*next
,
5018 struct section_add
*pa
;
5021 s
= strchr (arg
, '=');
5023 fatal (_("bad format for %s"), option
);
5025 pa
= (struct section_add
*) xmalloc (sizeof (struct section_add
));
5026 pa
->name
= xstrndup (arg
, s
- arg
);
5027 pa
->filename
= s
+ 1;
5029 pa
->contents
= NULL
;
5035 /* Load the file specified in PA, allocating memory to hold the file
5036 contents, and store a pointer to the allocated memory in the contents
5037 field of PA. The size field of PA is also updated. All errors call
5041 section_add_load_file (struct section_add
*pa
)
5046 /* We don't use get_file_size so that we can do
5047 --add-section .note.GNU_stack=/dev/null
5048 get_file_size doesn't work on /dev/null. */
5050 f
= fopen (pa
->filename
, FOPEN_RB
);
5052 fatal (_("cannot open: %s: %s"),
5053 pa
->filename
, strerror (errno
));
5057 pa
->contents
= (bfd_byte
*) xmalloc (alloc
);
5065 pa
->contents
= (bfd_byte
*) xrealloc (pa
->contents
, alloc
);
5068 got
= fread (pa
->contents
+ off
, 1, alloc
- off
, f
);
5070 fatal (_("%s: fread failed"), pa
->filename
);
5081 copy_main (int argc
, char *argv
[])
5083 char *input_filename
= NULL
;
5084 char *output_filename
= NULL
;
5086 char *input_target
= NULL
;
5087 char *output_target
= NULL
;
5088 bfd_boolean show_version
= FALSE
;
5089 bfd_boolean change_warn
= TRUE
;
5090 bfd_boolean formats_info
= FALSE
;
5091 bfd_boolean use_globalize
= FALSE
;
5092 bfd_boolean use_keep_global
= FALSE
;
5095 struct stat statbuf
;
5096 const bfd_arch_info_type
*input_arch
= NULL
;
5098 while ((c
= getopt_long (argc
, argv
, "b:B:i:I:j:K:MN:s:O:d:F:L:G:R:SpgxXHhVvW:wDU",
5099 copy_options
, (int *) 0)) != EOF
)
5104 copy_byte
= atoi (optarg
);
5106 fatal (_("byte number must be non-negative"));
5110 input_arch
= bfd_scan_arch (optarg
);
5111 if (input_arch
== NULL
)
5112 fatal (_("architecture %s unknown"), optarg
);
5118 interleave
= atoi (optarg
);
5120 fatal (_("interleave must be positive"));
5126 case OPTION_INTERLEAVE_WIDTH
:
5127 copy_width
= atoi (optarg
);
5129 fatal(_("interleave width must be positive"));
5133 case 's': /* "source" - 'I' is preferred */
5134 input_target
= optarg
;
5138 case 'd': /* "destination" - 'O' is preferred */
5139 output_target
= optarg
;
5143 input_target
= output_target
= optarg
;
5147 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_COPY
);
5148 sections_copied
= TRUE
;
5152 handle_remove_section_option (optarg
);
5155 case OPTION_KEEP_SECTION
:
5156 find_section_list (optarg
, TRUE
, SECTION_CONTEXT_KEEP
);
5159 case OPTION_REMOVE_RELOCS
:
5160 handle_remove_relocations_option (optarg
);
5164 strip_symbols
= STRIP_ALL
;
5168 strip_symbols
= STRIP_DEBUG
;
5171 case OPTION_STRIP_DWO
:
5172 strip_symbols
= STRIP_DWO
;
5175 case OPTION_STRIP_UNNEEDED
:
5176 strip_symbols
= STRIP_UNNEEDED
;
5179 case OPTION_ONLY_KEEP_DEBUG
:
5180 strip_symbols
= STRIP_NONDEBUG
;
5183 case OPTION_KEEP_FILE_SYMBOLS
:
5184 keep_file_symbols
= 1;
5187 case OPTION_ADD_GNU_DEBUGLINK
:
5188 long_section_names
= ENABLE
;
5189 gnu_debuglink_filename
= optarg
;
5193 add_specific_symbol (optarg
, keep_specific_htab
);
5199 case OPTION_NO_MERGE_NOTES
:
5200 merge_notes
= FALSE
;
5204 add_specific_symbol (optarg
, strip_specific_htab
);
5207 case OPTION_STRIP_UNNEEDED_SYMBOL
:
5208 add_specific_symbol (optarg
, strip_unneeded_htab
);
5212 add_specific_symbol (optarg
, localize_specific_htab
);
5215 case OPTION_GLOBALIZE_SYMBOL
:
5216 use_globalize
= TRUE
;
5217 add_specific_symbol (optarg
, globalize_specific_htab
);
5221 use_keep_global
= TRUE
;
5222 add_specific_symbol (optarg
, keepglobal_specific_htab
);
5226 add_specific_symbol (optarg
, weaken_specific_htab
);
5230 preserve_dates
= TRUE
;
5234 deterministic
= TRUE
;
5238 deterministic
= FALSE
;
5246 discard_locals
= LOCALS_ALL
;
5250 discard_locals
= LOCALS_START_L
;
5258 show_version
= TRUE
;
5261 case OPTION_FORMATS_INFO
:
5262 formats_info
= TRUE
;
5269 case OPTION_ADD_SECTION
:
5270 add_sections
= init_section_add (optarg
, add_sections
,
5272 section_add_load_file (add_sections
);
5275 case OPTION_UPDATE_SECTION
:
5276 update_sections
= init_section_add (optarg
, update_sections
,
5277 "--update-section");
5278 section_add_load_file (update_sections
);
5281 case OPTION_DUMP_SECTION
:
5282 dump_sections
= init_section_add (optarg
, dump_sections
,
5286 case OPTION_ADD_SYMBOL
:
5289 struct addsym_node
*newsym
= xmalloc (sizeof *newsym
);
5291 newsym
->next
= NULL
;
5292 s
= strchr (optarg
, '=');
5294 fatal (_("bad format for %s"), "--add-symbol");
5295 t
= strchr (s
+ 1, ':');
5297 newsym
->symdef
= xstrndup (optarg
, s
- optarg
);
5300 newsym
->section
= xstrndup (s
+ 1, t
- (s
+ 1));
5301 newsym
->symval
= strtol (t
+ 1, NULL
, 0);
5305 newsym
->section
= NULL
;
5306 newsym
->symval
= strtol (s
+ 1, NULL
, 0);
5310 t
= strchr (t
+ 1, ',');
5311 newsym
->othersym
= NULL
;
5313 newsym
->flags
= parse_symflags (t
+1, &newsym
->othersym
);
5315 newsym
->flags
= BSF_GLOBAL
;
5317 /* Keep 'othersym' symbols at the front of the list. */
5318 if (newsym
->othersym
)
5320 newsym
->next
= add_sym_list
;
5322 add_sym_tail
= &newsym
->next
;
5323 add_sym_list
= newsym
;
5327 *add_sym_tail
= newsym
;
5328 add_sym_tail
= &newsym
->next
;
5334 case OPTION_CHANGE_START
:
5335 change_start
= parse_vma (optarg
, "--change-start");
5338 case OPTION_CHANGE_SECTION_ADDRESS
:
5339 case OPTION_CHANGE_SECTION_LMA
:
5340 case OPTION_CHANGE_SECTION_VMA
:
5342 struct section_list
* p
;
5343 unsigned int context
= 0;
5347 char *option
= NULL
;
5352 case OPTION_CHANGE_SECTION_ADDRESS
:
5353 option
= "--change-section-address";
5354 context
= SECTION_CONTEXT_ALTER_LMA
| SECTION_CONTEXT_ALTER_VMA
;
5356 case OPTION_CHANGE_SECTION_LMA
:
5357 option
= "--change-section-lma";
5358 context
= SECTION_CONTEXT_ALTER_LMA
;
5360 case OPTION_CHANGE_SECTION_VMA
:
5361 option
= "--change-section-vma";
5362 context
= SECTION_CONTEXT_ALTER_VMA
;
5366 s
= strchr (optarg
, '=');
5369 s
= strchr (optarg
, '+');
5372 s
= strchr (optarg
, '-');
5374 fatal (_("bad format for %s"), option
);
5379 /* Correct the context. */
5382 case OPTION_CHANGE_SECTION_ADDRESS
:
5383 context
= SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_SET_VMA
;
5385 case OPTION_CHANGE_SECTION_LMA
:
5386 context
= SECTION_CONTEXT_SET_LMA
;
5388 case OPTION_CHANGE_SECTION_VMA
:
5389 context
= SECTION_CONTEXT_SET_VMA
;
5395 name
= (char *) xmalloc (len
+ 1);
5396 strncpy (name
, optarg
, len
);
5399 p
= find_section_list (name
, TRUE
, context
);
5401 val
= parse_vma (s
+ 1, option
);
5407 case OPTION_CHANGE_SECTION_ADDRESS
:
5411 case OPTION_CHANGE_SECTION_LMA
:
5415 case OPTION_CHANGE_SECTION_VMA
:
5422 case OPTION_CHANGE_ADDRESSES
:
5423 change_section_address
= parse_vma (optarg
, "--change-addresses");
5424 change_start
= change_section_address
;
5427 case OPTION_CHANGE_WARNINGS
:
5431 case OPTION_CHANGE_LEADING_CHAR
:
5432 change_leading_char
= TRUE
;
5435 case OPTION_COMPRESS_DEBUG_SECTIONS
:
5438 if (strcasecmp (optarg
, "none") == 0)
5439 do_debug_sections
= decompress
;
5440 else if (strcasecmp (optarg
, "zlib") == 0)
5441 do_debug_sections
= compress_zlib
;
5442 else if (strcasecmp (optarg
, "zlib-gnu") == 0)
5443 do_debug_sections
= compress_gnu_zlib
;
5444 else if (strcasecmp (optarg
, "zlib-gabi") == 0)
5445 do_debug_sections
= compress_gabi_zlib
;
5447 fatal (_("unrecognized --compress-debug-sections type `%s'"),
5451 do_debug_sections
= compress
;
5454 case OPTION_DEBUGGING
:
5455 convert_debugging
= TRUE
;
5458 case OPTION_DECOMPRESS_DEBUG_SECTIONS
:
5459 do_debug_sections
= decompress
;
5462 case OPTION_ELF_STT_COMMON
:
5463 if (strcasecmp (optarg
, "yes") == 0)
5464 do_elf_stt_common
= elf_stt_common
;
5465 else if (strcasecmp (optarg
, "no") == 0)
5466 do_elf_stt_common
= no_elf_stt_common
;
5468 fatal (_("unrecognized --elf-stt-common= option `%s'"),
5472 case OPTION_GAP_FILL
:
5474 bfd_vma gap_fill_vma
;
5476 gap_fill_vma
= parse_vma (optarg
, "--gap-fill");
5477 gap_fill
= (bfd_byte
) gap_fill_vma
;
5478 if ((bfd_vma
) gap_fill
!= gap_fill_vma
)
5482 sprintf_vma (buff
, gap_fill_vma
);
5484 non_fatal (_("Warning: truncating gap-fill from 0x%s to 0x%x"),
5487 gap_fill_set
= TRUE
;
5491 case OPTION_NO_CHANGE_WARNINGS
:
5492 change_warn
= FALSE
;
5496 pad_to
= parse_vma (optarg
, "--pad-to");
5500 case OPTION_REMOVE_LEADING_CHAR
:
5501 remove_leading_char
= TRUE
;
5504 case OPTION_REDEFINE_SYM
:
5506 /* Insert this redefinition onto redefine_specific_htab. */
5510 const char *nextarg
;
5511 char *source
, *target
;
5513 s
= strchr (optarg
, '=');
5515 fatal (_("bad format for %s"), "--redefine-sym");
5518 source
= (char *) xmalloc (len
+ 1);
5519 strncpy (source
, optarg
, len
);
5523 len
= strlen (nextarg
);
5524 target
= (char *) xmalloc (len
+ 1);
5525 strcpy (target
, nextarg
);
5527 add_redefine_and_check ("--redefine-sym", source
, target
);
5534 case OPTION_REDEFINE_SYMS
:
5535 add_redefine_syms_file (optarg
);
5538 case OPTION_SET_SECTION_FLAGS
:
5540 struct section_list
*p
;
5545 s
= strchr (optarg
, '=');
5547 fatal (_("bad format for %s"), "--set-section-flags");
5550 name
= (char *) xmalloc (len
+ 1);
5551 strncpy (name
, optarg
, len
);
5554 p
= find_section_list (name
, TRUE
, SECTION_CONTEXT_SET_FLAGS
);
5556 p
->flags
= parse_flags (s
+ 1);
5560 case OPTION_SET_SECTION_ALIGNMENT
:
5562 struct section_list
*p
;
5568 s
= strchr (optarg
, '=');
5570 fatal (_("bad format for --set-section-alignment: argument needed"));
5572 align
= atoi (s
+ 1);
5574 fatal (_("bad format for --set-section-alignment: numeric argument needed"));
5576 /* Convert integer alignment into a power-of-two alignment. */
5578 while ((align
& 1) == 0)
5585 /* Number has more than on 1, i.e. wasn't a power of 2. */
5586 fatal (_("bad format for --set-section-alignment: alignment is not a power of two"));
5588 /* Add the alignment setting to the section list. */
5590 name
= (char *) xmalloc (len
+ 1);
5591 strncpy (name
, optarg
, len
);
5594 p
= find_section_list (name
, TRUE
, SECTION_CONTEXT_SET_ALIGNMENT
);
5596 p
->alignment
= palign
;
5600 case OPTION_RENAME_SECTION
:
5603 const char *eq
, *fl
;
5608 eq
= strchr (optarg
, '=');
5610 fatal (_("bad format for %s"), "--rename-section");
5614 fatal (_("bad format for %s"), "--rename-section");
5616 old_name
= (char *) xmalloc (len
+ 1);
5617 strncpy (old_name
, optarg
, len
);
5621 fl
= strchr (eq
, ',');
5624 flags
= parse_flags (fl
+ 1);
5634 fatal (_("bad format for %s"), "--rename-section");
5636 new_name
= (char *) xmalloc (len
+ 1);
5637 strncpy (new_name
, eq
, len
);
5640 add_section_rename (old_name
, new_name
, flags
);
5644 case OPTION_SET_START
:
5645 set_start
= parse_vma (optarg
, "--set-start");
5646 set_start_set
= TRUE
;
5649 case OPTION_SREC_LEN
:
5650 _bfd_srec_len
= parse_vma (optarg
, "--srec-len");
5653 case OPTION_SREC_FORCES3
:
5654 _bfd_srec_forceS3
= TRUE
;
5657 case OPTION_STRIP_SYMBOLS
:
5658 add_specific_symbols (optarg
, strip_specific_htab
,
5659 &strip_specific_buffer
);
5662 case OPTION_STRIP_UNNEEDED_SYMBOLS
:
5663 add_specific_symbols (optarg
, strip_unneeded_htab
,
5664 &strip_unneeded_buffer
);
5667 case OPTION_KEEP_SYMBOLS
:
5668 add_specific_symbols (optarg
, keep_specific_htab
,
5669 &keep_specific_buffer
);
5672 case OPTION_LOCALIZE_HIDDEN
:
5673 localize_hidden
= TRUE
;
5676 case OPTION_LOCALIZE_SYMBOLS
:
5677 add_specific_symbols (optarg
, localize_specific_htab
,
5678 &localize_specific_buffer
);
5681 case OPTION_LONG_SECTION_NAMES
:
5682 if (!strcmp ("enable", optarg
))
5683 long_section_names
= ENABLE
;
5684 else if (!strcmp ("disable", optarg
))
5685 long_section_names
= DISABLE
;
5686 else if (!strcmp ("keep", optarg
))
5687 long_section_names
= KEEP
;
5689 fatal (_("unknown long section names option '%s'"), optarg
);
5692 case OPTION_GLOBALIZE_SYMBOLS
:
5693 use_globalize
= TRUE
;
5694 add_specific_symbols (optarg
, globalize_specific_htab
,
5695 &globalize_specific_buffer
);
5698 case OPTION_KEEPGLOBAL_SYMBOLS
:
5699 use_keep_global
= TRUE
;
5700 add_specific_symbols (optarg
, keepglobal_specific_htab
,
5701 &keepglobal_specific_buffer
);
5704 case OPTION_WEAKEN_SYMBOLS
:
5705 add_specific_symbols (optarg
, weaken_specific_htab
,
5706 &weaken_specific_buffer
);
5709 case OPTION_ALT_MACH_CODE
:
5710 use_alt_mach_code
= strtoul (optarg
, NULL
, 0);
5711 if (use_alt_mach_code
== 0)
5712 fatal (_("unable to parse alternative machine code"));
5715 case OPTION_PREFIX_SYMBOLS
:
5716 prefix_symbols_string
= optarg
;
5719 case OPTION_PREFIX_SECTIONS
:
5720 prefix_sections_string
= optarg
;
5723 case OPTION_PREFIX_ALLOC_SECTIONS
:
5724 prefix_alloc_sections_string
= optarg
;
5727 case OPTION_READONLY_TEXT
:
5728 bfd_flags_to_set
|= WP_TEXT
;
5729 bfd_flags_to_clear
&= ~WP_TEXT
;
5732 case OPTION_WRITABLE_TEXT
:
5733 bfd_flags_to_clear
|= WP_TEXT
;
5734 bfd_flags_to_set
&= ~WP_TEXT
;
5738 bfd_flags_to_set
|= D_PAGED
;
5739 bfd_flags_to_clear
&= ~D_PAGED
;
5743 bfd_flags_to_clear
|= D_PAGED
;
5744 bfd_flags_to_set
&= ~D_PAGED
;
5747 case OPTION_EXTRACT_DWO
:
5748 strip_symbols
= STRIP_NONDWO
;
5751 case OPTION_EXTRACT_SYMBOL
:
5752 extract_symbol
= TRUE
;
5755 case OPTION_REVERSE_BYTES
:
5757 int prev
= reverse_bytes
;
5759 reverse_bytes
= atoi (optarg
);
5760 if ((reverse_bytes
<= 0) || ((reverse_bytes
% 2) != 0))
5761 fatal (_("number of bytes to reverse must be positive and even"));
5763 if (prev
&& prev
!= reverse_bytes
)
5764 non_fatal (_("Warning: ignoring previous --reverse-bytes value of %d"),
5769 case OPTION_FILE_ALIGNMENT
:
5770 pe_file_alignment
= parse_vma (optarg
, "--file-alignment");
5776 pe_heap_reserve
= strtoul (optarg
, &end
, 0);
5778 || (*end
!= '.' && *end
!= '\0'))
5779 non_fatal (_("%s: invalid reserve value for --heap"),
5781 else if (*end
!= '\0')
5783 pe_heap_commit
= strtoul (end
+ 1, &end
, 0);
5785 non_fatal (_("%s: invalid commit value for --heap"),
5791 case OPTION_IMAGE_BASE
:
5792 pe_image_base
= parse_vma (optarg
, "--image-base");
5795 case OPTION_PE_SECTION_ALIGNMENT
:
5796 pe_section_alignment
= parse_vma (optarg
,
5797 "--section-alignment");
5800 case OPTION_SUBSYSTEM
:
5801 set_pe_subsystem (optarg
);
5807 pe_stack_reserve
= strtoul (optarg
, &end
, 0);
5809 || (*end
!= '.' && *end
!= '\0'))
5810 non_fatal (_("%s: invalid reserve value for --stack"),
5812 else if (*end
!= '\0')
5814 pe_stack_commit
= strtoul (end
+ 1, &end
, 0);
5816 non_fatal (_("%s: invalid commit value for --stack"),
5822 case OPTION_VERILOG_DATA_WIDTH
:
5823 VerilogDataWidth
= parse_vma (optarg
, "--verilog-data-width");
5824 if (VerilogDataWidth
< 1)
5825 fatal (_("verilog data width must be at least 1 byte"));
5829 /* We've been given a long option. */
5834 copy_usage (stdout
, 0);
5837 copy_usage (stderr
, 1);
5841 if (use_globalize
&& use_keep_global
)
5842 fatal(_("--globalize-symbol(s) is incompatible with -G/--keep-global-symbol(s)"));
5851 print_version ("objcopy");
5853 if (interleave
&& copy_byte
== -1)
5854 fatal (_("interleave start byte must be set with --byte"));
5856 if (copy_byte
>= interleave
)
5857 fatal (_("byte number must be less than interleave"));
5859 if (copy_width
> interleave
- copy_byte
)
5860 fatal (_("interleave width must be less than or equal to interleave - byte`"));
5862 if (optind
== argc
|| optind
+ 2 < argc
)
5863 copy_usage (stderr
, 1);
5865 input_filename
= argv
[optind
];
5866 if (optind
+ 1 < argc
)
5867 output_filename
= argv
[optind
+ 1];
5869 default_deterministic ();
5871 /* Default is to strip no symbols. */
5872 if (strip_symbols
== STRIP_UNDEF
&& discard_locals
== LOCALS_UNDEF
)
5873 strip_symbols
= STRIP_NONE
;
5875 if (output_target
== NULL
)
5876 output_target
= input_target
;
5878 /* Convert input EFI target to PEI target. */
5879 if (input_target
!= NULL
5880 && strncmp (input_target
, "efi-", 4) == 0)
5884 efi
= xstrdup (output_target
+ 4);
5885 if (strncmp (efi
, "bsdrv-", 6) == 0
5886 || strncmp (efi
, "rtdrv-", 6) == 0)
5888 else if (strncmp (efi
, "app-", 4) != 0)
5889 fatal (_("unknown input EFI target: %s"), input_target
);
5892 convert_efi_target (efi
);
5895 /* Convert output EFI target to PEI target. */
5896 if (output_target
!= NULL
5897 && strncmp (output_target
, "efi-", 4) == 0)
5901 efi
= xstrdup (output_target
+ 4);
5902 if (strncmp (efi
, "app-", 4) == 0)
5904 if (pe_subsystem
== -1)
5905 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_APPLICATION
;
5907 else if (strncmp (efi
, "bsdrv-", 6) == 0)
5909 if (pe_subsystem
== -1)
5910 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER
;
5913 else if (strncmp (efi
, "rtdrv-", 6) == 0)
5915 if (pe_subsystem
== -1)
5916 pe_subsystem
= IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER
;
5920 fatal (_("unknown output EFI target: %s"), output_target
);
5922 if (pe_file_alignment
== (bfd_vma
) -1)
5923 pe_file_alignment
= PE_DEF_FILE_ALIGNMENT
;
5924 if (pe_section_alignment
== (bfd_vma
) -1)
5925 pe_section_alignment
= PE_DEF_SECTION_ALIGNMENT
;
5927 output_target
= efi
;
5928 convert_efi_target (efi
);
5931 /* If there is no destination file, or the source and destination files
5932 are the same, then create a temp and rename the result into the input. */
5933 if (output_filename
== NULL
5934 || filename_cmp (input_filename
, output_filename
) == 0)
5935 tmpname
= make_tempname (input_filename
, &tmpfd
);
5937 tmpname
= output_filename
;
5940 #if !defined (_WIN32) || defined (__CYGWIN32__)
5941 /* Retain a copy of TMPFD since we will need it for SMART_RENAME. */
5942 || (tmpfd
>= 0 && (copyfd
= dup (tmpfd
)) == -1)
5946 fatal (_("warning: could not create temporary file whilst copying '%s', (error: %s)"),
5947 input_filename
, strerror (errno
));
5950 copy_file (input_filename
, tmpname
, tmpfd
, &statbuf
, input_target
,
5951 output_target
, input_arch
);
5955 set_times (tmpname
, &statbuf
);
5956 if (tmpname
!= output_filename
)
5957 status
= (smart_rename (tmpname
, input_filename
, copyfd
, &statbuf
,
5958 preserve_dates
) != 0);
5962 #if !defined (_WIN32) || defined (__CYGWIN32__)
5966 unlink_if_ordinary (tmpname
);
5969 if (tmpname
!= output_filename
)
5974 struct section_list
*p
;
5976 for (p
= change_sections
; p
!= NULL
; p
= p
->next
)
5980 if (p
->context
& (SECTION_CONTEXT_SET_VMA
| SECTION_CONTEXT_ALTER_VMA
))
5984 sprintf_vma (buff
, p
->vma_val
);
5986 /* xgettext:c-format */
5987 non_fatal (_("%s %s%c0x%s never used"),
5988 "--change-section-vma",
5990 p
->context
& SECTION_CONTEXT_SET_VMA
? '=' : '+',
5994 if (p
->context
& (SECTION_CONTEXT_SET_LMA
| SECTION_CONTEXT_ALTER_LMA
))
5998 sprintf_vma (buff
, p
->lma_val
);
6000 /* xgettext:c-format */
6001 non_fatal (_("%s %s%c0x%s never used"),
6002 "--change-section-lma",
6004 p
->context
& SECTION_CONTEXT_SET_LMA
? '=' : '+',
6011 if (strip_specific_buffer
)
6012 free (strip_specific_buffer
);
6014 if (strip_unneeded_buffer
)
6015 free (strip_unneeded_buffer
);
6017 if (keep_specific_buffer
)
6018 free (keep_specific_buffer
);
6020 if (localize_specific_buffer
)
6021 free (globalize_specific_buffer
);
6023 if (globalize_specific_buffer
)
6024 free (globalize_specific_buffer
);
6026 if (keepglobal_specific_buffer
)
6027 free (keepglobal_specific_buffer
);
6029 if (weaken_specific_buffer
)
6030 free (weaken_specific_buffer
);
6036 main (int argc
, char *argv
[])
6038 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
6039 setlocale (LC_MESSAGES
, "");
6041 #if defined (HAVE_SETLOCALE)
6042 setlocale (LC_CTYPE
, "");
6044 bindtextdomain (PACKAGE
, LOCALEDIR
);
6045 textdomain (PACKAGE
);
6047 program_name
= argv
[0];
6048 xmalloc_set_program_name (program_name
);
6050 START_PROGRESS (program_name
, 0);
6052 expandargv (&argc
, &argv
);
6054 strip_symbols
= STRIP_UNDEF
;
6055 discard_locals
= LOCALS_UNDEF
;
6057 if (bfd_init () != BFD_INIT_MAGIC
)
6058 fatal (_("fatal error: libbfd ABI mismatch"));
6059 set_default_bfd_target ();
6063 int i
= strlen (program_name
);
6064 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
6065 /* Drop the .exe suffix, if any. */
6066 if (i
> 4 && FILENAME_CMP (program_name
+ i
- 4, ".exe") == 0)
6069 program_name
[i
] = '\0';
6072 is_strip
= (i
>= 5 && FILENAME_CMP (program_name
+ i
- 5, "strip") == 0);
6075 create_symbol_htabs ();
6078 bfd_set_error_program_name (argv
[0]);
6081 strip_main (argc
, argv
);
6083 copy_main (argc
, argv
);
6085 END_PROGRESS (program_name
);