1 /* objcopy.c -- copy object file from input to output, optionally massaging it.
2 Copyright (C) 1991-2018 Free Software Foundation, Inc.
4 This file is part of GNU Binutils.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
25 #include "libiberty.h"
28 #include "filenames.h"
31 #include "coff/internal.h"
33 #include "safe-ctype.h"
35 /* FIXME: See bfd/peXXigen.c for why we include an architecture specific
36 header in generic PE code. */
37 #include "coff/i386.h"
40 static bfd_vma pe_file_alignment = (bfd_vma) -1;
41 static bfd_vma pe_heap_commit = (bfd_vma) -1;
42 static bfd_vma pe_heap_reserve = (bfd_vma) -1;
43 static bfd_vma pe_image_base = (bfd_vma) -1;
44 static bfd_vma pe_section_alignment = (bfd_vma) -1;
45 static bfd_vma pe_stack_commit = (bfd_vma) -1;
46 static bfd_vma pe_stack_reserve = (bfd_vma) -1;
47 static short pe_subsystem = -1;
48 static short pe_major_subsystem_version = -1;
49 static short pe_minor_subsystem_version = -1;
51 struct is_specified_symbol_predicate_data
57 /* A node includes symbol name mapping to support redefine_sym. */
66 struct addsym_node *next;
74 typedef struct section_rename
76 const char * old_name;
77 const char * new_name;
79 struct section_rename * next;
83 /* List of sections to be renamed. */
84 static section_rename *section_rename_list;
86 static asymbol **isympp = NULL; /* Input symbols. */
87 static asymbol **osympp = NULL; /* Output symbols that survive stripping. */
89 /* If `copy_byte' >= 0, copy 'copy_width' byte(s) of every `interleave' bytes. */
90 static int copy_byte = -1;
91 static int interleave = 0; /* Initialised to 4 in copy_main(). */
92 static int copy_width = 1;
94 static bfd_boolean verbose; /* Print file and target names. */
95 static bfd_boolean preserve_dates; /* Preserve input file timestamp. */
96 static int deterministic = -1; /* Enable deterministic archives. */
97 static int status = 0; /* Exit status. */
99 static bfd_boolean merge_notes = FALSE; /* Merge note sections. */
100 static bfd_byte * merged_notes = NULL; /* Contents on note section undergoing a merge. */
101 static bfd_size_type merged_size = 0; /* New, smaller size of the merged note section. */
106 STRIP_NONE, /* Don't strip. */
107 STRIP_DEBUG, /* Strip all debugger symbols. */
108 STRIP_UNNEEDED, /* Strip unnecessary symbols. */
109 STRIP_NONDEBUG, /* Strip everything but debug info. */
110 STRIP_DWO, /* Strip all DWO info. */
111 STRIP_NONDWO, /* Strip everything but DWO info. */
112 STRIP_ALL /* Strip all symbols. */
115 /* Which symbols to remove. */
116 static enum strip_action strip_symbols = STRIP_UNDEF;
121 LOCALS_START_L, /* Discard locals starting with L. */
122 LOCALS_ALL /* Discard all locals. */
125 /* Which local symbols to remove. Overrides STRIP_ALL. */
126 static enum locals_action discard_locals;
128 /* Structure used to hold lists of sections and actions to take. */
131 struct section_list * next; /* Next section to change. */
132 const char * pattern; /* Section name pattern. */
133 bfd_boolean used; /* Whether this entry was used. */
135 unsigned int context; /* What to do with matching sections. */
136 /* Flag bits used in the context field.
137 COPY and REMOVE are mutually exlusive. SET and ALTER are mutually exclusive. */
138 #define SECTION_CONTEXT_REMOVE (1 << 0) /* Remove this section. */
139 #define SECTION_CONTEXT_COPY (1 << 1) /* Copy this section, delete all non-copied section. */
140 #define SECTION_CONTEXT_SET_VMA (1 << 2) /* Set the sections' VMA address. */
141 #define SECTION_CONTEXT_ALTER_VMA (1 << 3) /* Increment or decrement the section's VMA address. */
142 #define SECTION_CONTEXT_SET_LMA (1 << 4) /* Set the sections' LMA address. */
143 #define SECTION_CONTEXT_ALTER_LMA (1 << 5) /* Increment or decrement the section's LMA address. */
144 #define SECTION_CONTEXT_SET_FLAGS (1 << 6) /* Set the section's flags. */
145 #define SECTION_CONTEXT_REMOVE_RELOCS (1 << 7) /* Remove relocations for this section. */
147 bfd_vma vma_val; /* Amount to change by or set to. */
148 bfd_vma lma_val; /* Amount to change by or set to. */
149 flagword flags; /* What to set the section flags to. */
152 static struct section_list *change_sections;
154 /* TRUE if some sections are to be removed. */
155 static bfd_boolean sections_removed;
157 /* TRUE if only some sections are to be copied. */
158 static bfd_boolean sections_copied;
160 /* Changes to the start address. */
161 static bfd_vma change_start = 0;
162 static bfd_boolean set_start_set = FALSE;
163 static bfd_vma set_start;
165 /* Changes to section addresses. */
166 static bfd_vma change_section_address = 0;
168 /* Filling gaps between sections. */
169 static bfd_boolean gap_fill_set = FALSE;
170 static bfd_byte gap_fill = 0;
172 /* Pad to a given address. */
173 static bfd_boolean pad_to_set = FALSE;
174 static bfd_vma pad_to;
176 /* Use alternative machine code? */
177 static unsigned long use_alt_mach_code = 0;
179 /* Output BFD flags user wants to set or clear */
180 static flagword bfd_flags_to_set;
181 static flagword bfd_flags_to_clear;
183 /* List of sections to add. */
186 /* Next section to add. */
187 struct section_add *next;
188 /* Name of section to add. */
190 /* Name of file holding section contents. */
191 const char *filename;
194 /* Contents of file. */
196 /* BFD section, after it has been added. */
200 /* List of sections to add to the output BFD. */
201 static struct section_add *add_sections;
203 /* List of sections to update in the output BFD. */
204 static struct section_add *update_sections;
206 /* List of sections to dump from the output BFD. */
207 static struct section_add *dump_sections;
209 /* If non-NULL the argument to --add-gnu-debuglink.
210 This should be the filename to store in the .gnu_debuglink section. */
211 static const char * gnu_debuglink_filename = NULL;
213 /* Whether to convert debugging information. */
214 static bfd_boolean convert_debugging = FALSE;
216 /* Whether to compress/decompress DWARF debug sections. */
221 compress_zlib = compress | 1 << 1,
222 compress_gnu_zlib = compress | 1 << 2,
223 compress_gabi_zlib = compress | 1 << 3,
225 } do_debug_sections = nothing;
227 /* Whether to generate ELF common symbols with the STT_COMMON type. */
228 static enum bfd_link_elf_stt_common do_elf_stt_common = unchanged;
230 /* Whether to change the leading character in symbol names. */
231 static bfd_boolean change_leading_char = FALSE;
233 /* Whether to remove the leading character from global symbol names. */
234 static bfd_boolean remove_leading_char = FALSE;
236 /* Whether to permit wildcard in symbol comparison. */
237 static bfd_boolean wildcard = FALSE;
239 /* True if --localize-hidden is in effect. */
240 static bfd_boolean localize_hidden = FALSE;
242 /* List of symbols to strip, keep, localize, keep-global, weaken,
244 static htab_t strip_specific_htab = NULL;
245 static htab_t strip_unneeded_htab = NULL;
246 static htab_t keep_specific_htab = NULL;
247 static htab_t localize_specific_htab = NULL;
248 static htab_t globalize_specific_htab = NULL;
249 static htab_t keepglobal_specific_htab = NULL;
250 static htab_t weaken_specific_htab = NULL;
251 static htab_t redefine_specific_htab = NULL;
252 static htab_t redefine_specific_reverse_htab = NULL;
253 static struct addsym_node *add_sym_list = NULL, **add_sym_tail = &add_sym_list;
254 static int add_symbols = 0;
256 /* If this is TRUE, we weaken global symbols (set BSF_WEAK). */
257 static bfd_boolean weaken = FALSE;
259 /* If this is TRUE, we retain BSF_FILE symbols. */
260 static bfd_boolean keep_file_symbols = FALSE;
262 /* Prefix symbols/sections. */
263 static char *prefix_symbols_string = 0;
264 static char *prefix_sections_string = 0;
265 static char *prefix_alloc_sections_string = 0;
267 /* True if --extract-symbol was passed on the command line. */
268 static bfd_boolean extract_symbol = FALSE;
270 /* If `reverse_bytes' is nonzero, then reverse the order of every chunk
271 of <reverse_bytes> bytes within each output section. */
272 static int reverse_bytes = 0;
274 /* For Coff objects, we may want to allow or disallow long section names,
275 or preserve them where found in the inputs. Debug info relies on them. */
276 enum long_section_name_handling
283 /* The default long section handling mode is to preserve them.
284 This is also the only behaviour for 'strip'. */
285 static enum long_section_name_handling long_section_names = KEEP;
287 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
288 enum command_line_switch
290 OPTION_ADD_SECTION=150,
291 OPTION_ADD_GNU_DEBUGLINK,
293 OPTION_ALT_MACH_CODE,
294 OPTION_CHANGE_ADDRESSES,
295 OPTION_CHANGE_LEADING_CHAR,
296 OPTION_CHANGE_SECTION_ADDRESS,
297 OPTION_CHANGE_SECTION_LMA,
298 OPTION_CHANGE_SECTION_VMA,
300 OPTION_CHANGE_WARNINGS,
301 OPTION_COMPRESS_DEBUG_SECTIONS,
303 OPTION_DECOMPRESS_DEBUG_SECTIONS,
305 OPTION_ELF_STT_COMMON,
307 OPTION_EXTRACT_SYMBOL,
308 OPTION_FILE_ALIGNMENT,
311 OPTION_GLOBALIZE_SYMBOL,
312 OPTION_GLOBALIZE_SYMBOLS,
316 OPTION_INTERLEAVE_WIDTH,
317 OPTION_KEEPGLOBAL_SYMBOLS,
318 OPTION_KEEP_FILE_SYMBOLS,
320 OPTION_LOCALIZE_HIDDEN,
321 OPTION_LOCALIZE_SYMBOLS,
322 OPTION_LONG_SECTION_NAMES,
324 OPTION_NO_MERGE_NOTES,
325 OPTION_NO_CHANGE_WARNINGS,
326 OPTION_ONLY_KEEP_DEBUG,
328 OPTION_PREFIX_ALLOC_SECTIONS,
329 OPTION_PREFIX_SECTIONS,
330 OPTION_PREFIX_SYMBOLS,
332 OPTION_READONLY_TEXT,
334 OPTION_REDEFINE_SYMS,
335 OPTION_REMOVE_LEADING_CHAR,
336 OPTION_REMOVE_RELOCS,
337 OPTION_RENAME_SECTION,
338 OPTION_REVERSE_BYTES,
339 OPTION_SECTION_ALIGNMENT,
340 OPTION_SET_SECTION_FLAGS,
346 OPTION_STRIP_SYMBOLS,
347 OPTION_STRIP_UNNEEDED,
348 OPTION_STRIP_UNNEEDED_SYMBOL,
349 OPTION_STRIP_UNNEEDED_SYMBOLS,
351 OPTION_UPDATE_SECTION,
353 OPTION_WEAKEN_SYMBOLS,
357 /* Options to handle if running as "strip". */
359 static struct option strip_options[] =
361 {"disable-deterministic-archives", no_argument, 0, 'U'},
362 {"discard-all", no_argument, 0, 'x'},
363 {"discard-locals", no_argument, 0, 'X'},
364 {"enable-deterministic-archives", no_argument, 0, 'D'},
365 {"format", required_argument, 0, 'F'}, /* Obsolete */
366 {"help", no_argument, 0, 'h'},
367 {"info", no_argument, 0, OPTION_FORMATS_INFO},
368 {"input-format", required_argument, 0, 'I'}, /* Obsolete */
369 {"input-target", required_argument, 0, 'I'},
370 {"keep-file-symbols", no_argument, 0, OPTION_KEEP_FILE_SYMBOLS},
371 {"keep-symbol", required_argument, 0, 'K'},
372 {"merge-notes", no_argument, 0, 'M'},
373 {"no-merge-notes", no_argument, 0, OPTION_NO_MERGE_NOTES},
374 {"only-keep-debug", no_argument, 0, OPTION_ONLY_KEEP_DEBUG},
375 {"output-file", required_argument, 0, 'o'},
376 {"output-format", required_argument, 0, 'O'}, /* Obsolete */
377 {"output-target", required_argument, 0, 'O'},
378 {"preserve-dates", no_argument, 0, 'p'},
379 {"remove-section", required_argument, 0, 'R'},
380 {"remove-relocations", required_argument, 0, OPTION_REMOVE_RELOCS},
381 {"strip-all", no_argument, 0, 's'},
382 {"strip-debug", no_argument, 0, 'S'},
383 {"strip-dwo", no_argument, 0, OPTION_STRIP_DWO},
384 {"strip-symbol", required_argument, 0, 'N'},
385 {"strip-unneeded", no_argument, 0, OPTION_STRIP_UNNEEDED},
386 {"target", required_argument, 0, 'F'},
387 {"verbose", no_argument, 0, 'v'},
388 {"version", no_argument, 0, 'V'},
389 {"wildcard", no_argument, 0, 'w'},
390 {0, no_argument, 0, 0}
393 /* Options to handle if running as "objcopy". */
395 static struct option copy_options[] =
397 {"add-gnu-debuglink", required_argument, 0, OPTION_ADD_GNU_DEBUGLINK},
398 {"add-section", required_argument, 0, OPTION_ADD_SECTION},
399 {"add-symbol", required_argument, 0, OPTION_ADD_SYMBOL},
400 {"adjust-section-vma", required_argument, 0, OPTION_CHANGE_SECTION_ADDRESS},
401 {"adjust-start", required_argument, 0, OPTION_CHANGE_START},
402 {"adjust-vma", required_argument, 0, OPTION_CHANGE_ADDRESSES},
403 {"adjust-warnings", no_argument, 0, OPTION_CHANGE_WARNINGS},
404 {"alt-machine-code", required_argument, 0, OPTION_ALT_MACH_CODE},
405 {"binary-architecture", required_argument, 0, 'B'},
406 {"byte", required_argument, 0, 'b'},
407 {"change-addresses", required_argument, 0, OPTION_CHANGE_ADDRESSES},
408 {"change-leading-char", no_argument, 0, OPTION_CHANGE_LEADING_CHAR},
409 {"change-section-address", required_argument, 0, OPTION_CHANGE_SECTION_ADDRESS},
410 {"change-section-lma", required_argument, 0, OPTION_CHANGE_SECTION_LMA},
411 {"change-section-vma", required_argument, 0, OPTION_CHANGE_SECTION_VMA},
412 {"change-start", required_argument, 0, OPTION_CHANGE_START},
413 {"change-warnings", no_argument, 0, OPTION_CHANGE_WARNINGS},
414 {"compress-debug-sections", optional_argument, 0, OPTION_COMPRESS_DEBUG_SECTIONS},
415 {"debugging", no_argument, 0, OPTION_DEBUGGING},
416 {"decompress-debug-sections", no_argument, 0, OPTION_DECOMPRESS_DEBUG_SECTIONS},
417 {"disable-deterministic-archives", no_argument, 0, 'U'},
418 {"discard-all", no_argument, 0, 'x'},
419 {"discard-locals", no_argument, 0, 'X'},
420 {"dump-section", required_argument, 0, OPTION_DUMP_SECTION},
421 {"elf-stt-common", required_argument, 0, OPTION_ELF_STT_COMMON},
422 {"enable-deterministic-archives", no_argument, 0, 'D'},
423 {"extract-dwo", no_argument, 0, OPTION_EXTRACT_DWO},
424 {"extract-symbol", no_argument, 0, OPTION_EXTRACT_SYMBOL},
425 {"file-alignment", required_argument, 0, OPTION_FILE_ALIGNMENT},
426 {"format", required_argument, 0, 'F'}, /* Obsolete */
427 {"gap-fill", required_argument, 0, OPTION_GAP_FILL},
428 {"globalize-symbol", required_argument, 0, OPTION_GLOBALIZE_SYMBOL},
429 {"globalize-symbols", required_argument, 0, OPTION_GLOBALIZE_SYMBOLS},
430 {"heap", required_argument, 0, OPTION_HEAP},
431 {"help", no_argument, 0, 'h'},
432 {"image-base", required_argument, 0 , OPTION_IMAGE_BASE},
433 {"impure", no_argument, 0, OPTION_IMPURE},
434 {"info", no_argument, 0, OPTION_FORMATS_INFO},
435 {"input-format", required_argument, 0, 'I'}, /* Obsolete */
436 {"input-target", required_argument, 0, 'I'},
437 {"interleave", optional_argument, 0, 'i'},
438 {"interleave-width", required_argument, 0, OPTION_INTERLEAVE_WIDTH},
439 {"keep-file-symbols", no_argument, 0, OPTION_KEEP_FILE_SYMBOLS},
440 {"keep-global-symbol", required_argument, 0, 'G'},
441 {"keep-global-symbols", required_argument, 0, OPTION_KEEPGLOBAL_SYMBOLS},
442 {"keep-symbol", required_argument, 0, 'K'},
443 {"keep-symbols", required_argument, 0, OPTION_KEEP_SYMBOLS},
444 {"localize-hidden", no_argument, 0, OPTION_LOCALIZE_HIDDEN},
445 {"localize-symbol", required_argument, 0, 'L'},
446 {"localize-symbols", required_argument, 0, OPTION_LOCALIZE_SYMBOLS},
447 {"long-section-names", required_argument, 0, OPTION_LONG_SECTION_NAMES},
448 {"merge-notes", no_argument, 0, 'M'},
449 {"no-merge-notes", no_argument, 0, OPTION_NO_MERGE_NOTES},
450 {"no-adjust-warnings", no_argument, 0, OPTION_NO_CHANGE_WARNINGS},
451 {"no-change-warnings", no_argument, 0, OPTION_NO_CHANGE_WARNINGS},
452 {"only-keep-debug", no_argument, 0, OPTION_ONLY_KEEP_DEBUG},
453 {"only-section", required_argument, 0, 'j'},
454 {"output-format", required_argument, 0, 'O'}, /* Obsolete */
455 {"output-target", required_argument, 0, 'O'},
456 {"pad-to", required_argument, 0, OPTION_PAD_TO},
457 {"prefix-alloc-sections", required_argument, 0, OPTION_PREFIX_ALLOC_SECTIONS},
458 {"prefix-sections", required_argument, 0, OPTION_PREFIX_SECTIONS},
459 {"prefix-symbols", required_argument, 0, OPTION_PREFIX_SYMBOLS},
460 {"preserve-dates", no_argument, 0, 'p'},
461 {"pure", no_argument, 0, OPTION_PURE},
462 {"readonly-text", no_argument, 0, OPTION_READONLY_TEXT},
463 {"redefine-sym", required_argument, 0, OPTION_REDEFINE_SYM},
464 {"redefine-syms", required_argument, 0, OPTION_REDEFINE_SYMS},
465 {"remove-leading-char", no_argument, 0, OPTION_REMOVE_LEADING_CHAR},
466 {"remove-section", required_argument, 0, 'R'},
467 {"remove-relocations", required_argument, 0, OPTION_REMOVE_RELOCS},
468 {"rename-section", required_argument, 0, OPTION_RENAME_SECTION},
469 {"reverse-bytes", required_argument, 0, OPTION_REVERSE_BYTES},
470 {"section-alignment", required_argument, 0, OPTION_SECTION_ALIGNMENT},
471 {"set-section-flags", required_argument, 0, OPTION_SET_SECTION_FLAGS},
472 {"set-start", required_argument, 0, OPTION_SET_START},
473 {"srec-forceS3", no_argument, 0, OPTION_SREC_FORCES3},
474 {"srec-len", required_argument, 0, OPTION_SREC_LEN},
475 {"stack", required_argument, 0, OPTION_STACK},
476 {"strip-all", no_argument, 0, 'S'},
477 {"strip-debug", no_argument, 0, 'g'},
478 {"strip-dwo", no_argument, 0, OPTION_STRIP_DWO},
479 {"strip-symbol", required_argument, 0, 'N'},
480 {"strip-symbols", required_argument, 0, OPTION_STRIP_SYMBOLS},
481 {"strip-unneeded", no_argument, 0, OPTION_STRIP_UNNEEDED},
482 {"strip-unneeded-symbol", required_argument, 0, OPTION_STRIP_UNNEEDED_SYMBOL},
483 {"strip-unneeded-symbols", required_argument, 0, OPTION_STRIP_UNNEEDED_SYMBOLS},
484 {"subsystem", required_argument, 0, OPTION_SUBSYSTEM},
485 {"target", required_argument, 0, 'F'},
486 {"update-section", required_argument, 0, OPTION_UPDATE_SECTION},
487 {"verbose", no_argument, 0, 'v'},
488 {"version", no_argument, 0, 'V'},
489 {"weaken", no_argument, 0, OPTION_WEAKEN},
490 {"weaken-symbol", required_argument, 0, 'W'},
491 {"weaken-symbols", required_argument, 0, OPTION_WEAKEN_SYMBOLS},
492 {"wildcard", no_argument, 0, 'w'},
493 {"writable-text", no_argument, 0, OPTION_WRITABLE_TEXT},
494 {0, no_argument, 0, 0}
498 extern char *program_name;
500 /* This flag distinguishes between strip and objcopy:
501 1 means this is 'strip'; 0 means this is 'objcopy'.
502 -1 means if we should use argv[0] to decide. */
505 /* The maximum length of an S record. This variable is defined in srec.c
506 and can be modified by the --srec-len parameter. */
507 extern unsigned int _bfd_srec_len;
509 /* Restrict the generation of Srecords to type S3 only.
510 This variable is defined in bfd/srec.c and can be toggled
511 on by the --srec-forceS3 command line switch. */
512 extern bfd_boolean _bfd_srec_forceS3;
514 /* Forward declarations. */
515 static void setup_section (bfd *, asection *, void *);
516 static void setup_bfd_headers (bfd *, bfd *);
517 static void copy_relocations_in_section (bfd *, asection *, void *);
518 static void copy_section (bfd *, asection *, void *);
519 static void get_sections (bfd *, asection *, void *);
520 static int compare_section_lma (const void *, const void *);
521 static void mark_symbols_used_in_relocations (bfd *, asection *, void *);
522 static bfd_boolean write_debugging_info (bfd *, void *, long *, asymbol ***);
523 static const char *lookup_sym_redefinition (const char *);
524 static const char *find_section_rename (const char *, flagword *);
526 ATTRIBUTE_NORETURN static void
527 copy_usage (FILE *stream, int exit_status)
529 fprintf (stream, _("Usage: %s [option(s)] in-file [out-file]\n"), program_name);
530 fprintf (stream, _(" Copies a binary file, possibly transforming it in the process\n"));
531 fprintf (stream, _(" The options are:\n"));
532 fprintf (stream, _("\
533 -I --input-target <bfdname> Assume input file is in format <bfdname>\n\
534 -O --output-target <bfdname> Create an output file in format <bfdname>\n\
535 -B --binary-architecture <arch> Set output arch, when input is arch-less\n\
536 -F --target <bfdname> Set both input and output format to <bfdname>\n\
537 --debugging Convert debugging information, if possible\n\
538 -p --preserve-dates Copy modified/access timestamps to the output\n"));
539 if (DEFAULT_AR_DETERMINISTIC)
540 fprintf (stream, _("\
541 -D --enable-deterministic-archives\n\
542 Produce deterministic output when stripping archives (default)\n\
543 -U --disable-deterministic-archives\n\
544 Disable -D behavior\n"));
546 fprintf (stream, _("\
547 -D --enable-deterministic-archives\n\
548 Produce deterministic output when stripping archives\n\
549 -U --disable-deterministic-archives\n\
550 Disable -D behavior (default)\n"));
551 fprintf (stream, _("\
552 -j --only-section <name> Only copy section <name> into the output\n\
553 --add-gnu-debuglink=<file> Add section .gnu_debuglink linking to <file>\n\
554 -R --remove-section <name> Remove section <name> from the output\n\
555 --remove-relocations <name> Remove relocations from section <name>\n\
556 -S --strip-all Remove all symbol and relocation information\n\
557 -g --strip-debug Remove all debugging symbols & sections\n\
558 --strip-dwo Remove all DWO sections\n\
559 --strip-unneeded Remove all symbols not needed by relocations\n\
560 -N --strip-symbol <name> Do not copy symbol <name>\n\
561 --strip-unneeded-symbol <name>\n\
562 Do not copy symbol <name> unless needed by\n\
564 --only-keep-debug Strip everything but the debug information\n\
565 --extract-dwo Copy only DWO sections\n\
566 --extract-symbol Remove section contents but keep symbols\n\
567 -K --keep-symbol <name> Do not strip symbol <name>\n\
568 --keep-file-symbols Do not strip file symbol(s)\n\
569 --localize-hidden Turn all ELF hidden symbols into locals\n\
570 -L --localize-symbol <name> Force symbol <name> to be marked as a local\n\
571 --globalize-symbol <name> Force symbol <name> to be marked as a global\n\
572 -G --keep-global-symbol <name> Localize all symbols except <name>\n\
573 -W --weaken-symbol <name> Force symbol <name> to be marked as a weak\n\
574 --weaken Force all global symbols to be marked as weak\n\
575 -w --wildcard Permit wildcard in symbol comparison\n\
576 -x --discard-all Remove all non-global symbols\n\
577 -X --discard-locals Remove any compiler-generated symbols\n\
578 -i --interleave[=<number>] Only copy N out of every <number> bytes\n\
579 --interleave-width <number> Set N for --interleave\n\
580 -b --byte <num> Select byte <num> in every interleaved block\n\
581 --gap-fill <val> Fill gaps between sections with <val>\n\
582 --pad-to <addr> Pad the last section up to address <addr>\n\
583 --set-start <addr> Set the start address to <addr>\n\
584 {--change-start|--adjust-start} <incr>\n\
585 Add <incr> to the start address\n\
586 {--change-addresses|--adjust-vma} <incr>\n\
587 Add <incr> to LMA, VMA and start addresses\n\
588 {--change-section-address|--adjust-section-vma} <name>{=|+|-}<val>\n\
589 Change LMA and VMA of section <name> by <val>\n\
590 --change-section-lma <name>{=|+|-}<val>\n\
591 Change the LMA of section <name> by <val>\n\
592 --change-section-vma <name>{=|+|-}<val>\n\
593 Change the VMA of section <name> by <val>\n\
594 {--[no-]change-warnings|--[no-]adjust-warnings}\n\
595 Warn if a named section does not exist\n\
596 --set-section-flags <name>=<flags>\n\
597 Set section <name>'s properties to <flags>\n\
598 --add-section <name>=<file> Add section <name> found in <file> to output\n\
599 --update-section <name>=<file>\n\
600 Update contents of section <name> with\n\
601 contents found in <file>\n\
602 --dump-section <name>=<file> Dump the contents of section <name> into <file>\n\
603 --rename-section <old>=<new>[,<flags>] Rename section <old> to <new>\n\
604 --long-section-names {enable|disable|keep}\n\
605 Handle long section names in Coff objects.\n\
606 --change-leading-char Force output format's leading character style\n\
607 --remove-leading-char Remove leading character from global symbols\n\
608 --reverse-bytes=<num> Reverse <num> bytes at a time, in output sections with content\n\
609 --redefine-sym <old>=<new> Redefine symbol name <old> to <new>\n\
610 --redefine-syms <file> --redefine-sym for all symbol pairs \n\
612 --srec-len <number> Restrict the length of generated Srecords\n\
613 --srec-forceS3 Restrict the type of generated Srecords to S3\n\
614 --strip-symbols <file> -N for all symbols listed in <file>\n\
615 --strip-unneeded-symbols <file>\n\
616 --strip-unneeded-symbol for all symbols listed\n\
618 --keep-symbols <file> -K for all symbols listed in <file>\n\
619 --localize-symbols <file> -L for all symbols listed in <file>\n\
620 --globalize-symbols <file> --globalize-symbol for all in <file>\n\
621 --keep-global-symbols <file> -G for all symbols listed in <file>\n\
622 --weaken-symbols <file> -W for all symbols listed in <file>\n\
623 --add-symbol <name>=[<section>:]<value>[,<flags>] Add a symbol\n\
624 --alt-machine-code <index> Use the target's <index>'th alternative machine\n\
625 --writable-text Mark the output text as writable\n\
626 --readonly-text Make the output text write protected\n\
627 --pure Mark the output file as demand paged\n\
628 --impure Mark the output file as impure\n\
629 --prefix-symbols <prefix> Add <prefix> to start of every symbol name\n\
630 --prefix-sections <prefix> Add <prefix> to start of every section name\n\
631 --prefix-alloc-sections <prefix>\n\
632 Add <prefix> to start of every allocatable\n\
634 --file-alignment <num> Set PE file alignment to <num>\n\
635 --heap <reserve>[,<commit>] Set PE reserve/commit heap to <reserve>/\n\
637 --image-base <address> Set PE image base to <address>\n\
638 --section-alignment <num> Set PE section alignment to <num>\n\
639 --stack <reserve>[,<commit>] Set PE reserve/commit stack to <reserve>/\n\
641 --subsystem <name>[:<version>]\n\
642 Set PE subsystem to <name> [& <version>]\n\
643 --compress-debug-sections[={none|zlib|zlib-gnu|zlib-gabi}]\n\
644 Compress DWARF debug sections using zlib\n\
645 --decompress-debug-sections Decompress DWARF debug sections using zlib\n\
646 --elf-stt-common=[yes|no] Generate ELF common symbols with STT_COMMON\n\
648 -M --merge-notes Remove redundant entries in note sections\n\
649 --no-merge-notes Do not attempt to remove redundant notes (default)\n\
650 -v --verbose List all object files modified\n\
651 @<file> Read options from <file>\n\
652 -V --version Display this program's version number\n\
653 -h --help Display this output\n\
654 --info List object formats & architectures supported\n\
656 list_supported_targets (program_name, stream);
657 if (REPORT_BUGS_TO[0] && exit_status == 0)
658 fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
662 ATTRIBUTE_NORETURN static void
663 strip_usage (FILE *stream, int exit_status)
665 fprintf (stream, _("Usage: %s <option(s)> in-file(s)\n"), program_name);
666 fprintf (stream, _(" Removes symbols and sections from files\n"));
667 fprintf (stream, _(" The options are:\n"));
668 fprintf (stream, _("\
669 -I --input-target=<bfdname> Assume input file is in format <bfdname>\n\
670 -O --output-target=<bfdname> Create an output file in format <bfdname>\n\
671 -F --target=<bfdname> Set both input and output format to <bfdname>\n\
672 -p --preserve-dates Copy modified/access timestamps to the output\n\
674 if (DEFAULT_AR_DETERMINISTIC)
675 fprintf (stream, _("\
676 -D --enable-deterministic-archives\n\
677 Produce deterministic output when stripping archives (default)\n\
678 -U --disable-deterministic-archives\n\
679 Disable -D behavior\n"));
681 fprintf (stream, _("\
682 -D --enable-deterministic-archives\n\
683 Produce deterministic output when stripping archives\n\
684 -U --disable-deterministic-archives\n\
685 Disable -D behavior (default)\n"));
686 fprintf (stream, _("\
687 -R --remove-section=<name> Also remove section <name> from the output\n\
688 --remove-relocations <name> Remove relocations from section <name>\n\
689 -s --strip-all Remove all symbol and relocation information\n\
690 -g -S -d --strip-debug Remove all debugging symbols & sections\n\
691 --strip-dwo Remove all DWO sections\n\
692 --strip-unneeded Remove all symbols not needed by relocations\n\
693 --only-keep-debug Strip everything but the debug information\n\
694 -M --merge-notes Remove redundant entries in note sections (default)\n\
695 --no-merge-notes Do not attempt to remove redundant notes\n\
696 -N --strip-symbol=<name> Do not copy symbol <name>\n\
697 -K --keep-symbol=<name> Do not strip symbol <name>\n\
698 --keep-file-symbols Do not strip file symbol(s)\n\
699 -w --wildcard Permit wildcard in symbol comparison\n\
700 -x --discard-all Remove all non-global symbols\n\
701 -X --discard-locals Remove any compiler-generated symbols\n\
702 -v --verbose List all object files modified\n\
703 -V --version Display this program's version number\n\
704 -h --help Display this output\n\
705 --info List object formats & architectures supported\n\
706 -o <file> Place stripped output into <file>\n\
709 list_supported_targets (program_name, stream);
710 if (REPORT_BUGS_TO[0] && exit_status == 0)
711 fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
715 /* Parse section flags into a flagword, with a fatal error if the
716 string can't be parsed. */
719 parse_flags (const char *s)
729 snext = strchr (s, ',');
739 #define PARSE_FLAG(fname,fval) \
740 else if (strncasecmp (fname, s, len) == 0) ret |= fval
741 PARSE_FLAG ("alloc", SEC_ALLOC);
742 PARSE_FLAG ("load", SEC_LOAD);
743 PARSE_FLAG ("noload", SEC_NEVER_LOAD);
744 PARSE_FLAG ("readonly", SEC_READONLY);
745 PARSE_FLAG ("debug", SEC_DEBUGGING);
746 PARSE_FLAG ("code", SEC_CODE);
747 PARSE_FLAG ("data", SEC_DATA);
748 PARSE_FLAG ("rom", SEC_ROM);
749 PARSE_FLAG ("share", SEC_COFF_SHARED);
750 PARSE_FLAG ("contents", SEC_HAS_CONTENTS);
751 PARSE_FLAG ("merge", SEC_MERGE);
752 PARSE_FLAG ("strings", SEC_STRINGS);
758 copy = (char *) xmalloc (len + 1);
759 strncpy (copy, s, len);
761 non_fatal (_("unrecognized section flag `%s'"), copy);
762 fatal (_("supported flags: %s"),
763 "alloc, load, noload, readonly, debug, code, data, rom, share, contents, merge, strings");
773 /* Parse symbol flags into a flagword, with a fatal error if the
774 string can't be parsed. */
777 parse_symflags (const char *s, char **other)
787 snext = strchr (s, ',');
796 #define PARSE_FLAG(fname, fval) \
797 else if (len == sizeof fname - 1 \
798 && strncasecmp (fname, s, len) == 0) \
801 #define PARSE_OTHER(fname, fval) \
802 else if (len >= sizeof fname \
803 && strncasecmp (fname, s, sizeof fname - 1) == 0) \
804 fval = xstrndup (s + sizeof fname - 1, len - sizeof fname + 1)
807 PARSE_FLAG ("local", BSF_LOCAL);
808 PARSE_FLAG ("global", BSF_GLOBAL);
809 PARSE_FLAG ("export", BSF_EXPORT);
810 PARSE_FLAG ("debug", BSF_DEBUGGING);
811 PARSE_FLAG ("function", BSF_FUNCTION);
812 PARSE_FLAG ("weak", BSF_WEAK);
813 PARSE_FLAG ("section", BSF_SECTION_SYM);
814 PARSE_FLAG ("constructor", BSF_CONSTRUCTOR);
815 PARSE_FLAG ("warning", BSF_WARNING);
816 PARSE_FLAG ("indirect", BSF_INDIRECT);
817 PARSE_FLAG ("file", BSF_FILE);
818 PARSE_FLAG ("object", BSF_OBJECT);
819 PARSE_FLAG ("synthetic", BSF_SYNTHETIC);
820 PARSE_FLAG ("indirect-function", BSF_GNU_INDIRECT_FUNCTION | BSF_FUNCTION);
821 PARSE_FLAG ("unique-object", BSF_GNU_UNIQUE | BSF_OBJECT);
822 PARSE_OTHER ("before=", *other);
830 copy = (char *) xmalloc (len + 1);
831 strncpy (copy, s, len);
833 non_fatal (_("unrecognized symbol flag `%s'"), copy);
834 fatal (_("supported flags: %s"),
835 "local, global, export, debug, function, weak, section, "
836 "constructor, warning, indirect, file, object, synthetic, "
837 "indirect-function, unique-object, before=<othersym>");
847 /* Find and optionally add an entry in the change_sections list.
849 We need to be careful in how we match section names because of the support
850 for wildcard characters. For example suppose that the user has invoked
853 --set-section-flags .debug_*=debug
854 --set-section-flags .debug_str=readonly,debug
855 --change-section-address .debug_*ranges=0x1000
857 With the idea that all debug sections will receive the DEBUG flag, the
858 .debug_str section will also receive the READONLY flag and the
859 .debug_ranges and .debug_aranges sections will have their address set to
860 0x1000. (This may not make much sense, but it is just an example).
862 When adding the section name patterns to the section list we need to make
863 sure that previous entries do not match with the new entry, unless the
864 match is exact. (In which case we assume that the user is overriding
865 the previous entry with the new context).
867 When matching real section names to the section list we make use of the
868 wildcard characters, but we must do so in context. Eg if we are setting
869 section addresses then we match for .debug_ranges but not for .debug_info.
871 Finally, if ADD is false and we do find a match, we mark the section list
874 static struct section_list *
875 find_section_list (const char *name, bfd_boolean add, unsigned int context)
877 struct section_list *p, *match = NULL;
879 /* assert ((context & ((1 << 7) - 1)) != 0); */
881 for (p = change_sections; p != NULL; p = p->next)
885 if (strcmp (p->pattern, name) == 0)
887 /* Check for context conflicts. */
888 if (((p->context & SECTION_CONTEXT_REMOVE)
889 && (context & SECTION_CONTEXT_COPY))
890 || ((context & SECTION_CONTEXT_REMOVE)
891 && (p->context & SECTION_CONTEXT_COPY)))
892 fatal (_("error: %s both copied and removed"), name);
894 if (((p->context & SECTION_CONTEXT_SET_VMA)
895 && (context & SECTION_CONTEXT_ALTER_VMA))
896 || ((context & SECTION_CONTEXT_SET_VMA)
897 && (context & SECTION_CONTEXT_ALTER_VMA)))
898 fatal (_("error: %s both sets and alters VMA"), name);
900 if (((p->context & SECTION_CONTEXT_SET_LMA)
901 && (context & SECTION_CONTEXT_ALTER_LMA))
902 || ((context & SECTION_CONTEXT_SET_LMA)
903 && (context & SECTION_CONTEXT_ALTER_LMA)))
904 fatal (_("error: %s both sets and alters LMA"), name);
906 /* Extend the context. */
907 p->context |= context;
911 /* If we are not adding a new name/pattern then
912 only check for a match if the context applies. */
913 else if (p->context & context)
915 /* We could check for the presence of wildchar characters
916 first and choose between calling strcmp and fnmatch,
917 but is that really worth it ? */
918 if (p->pattern [0] == '!')
920 if (fnmatch (p->pattern + 1, name, 0) == 0)
928 if (fnmatch (p->pattern, name, 0) == 0)
944 p = (struct section_list *) xmalloc (sizeof (struct section_list));
947 p->context = context;
951 p->next = change_sections;
957 /* S1 is the entry node already in the table, S2 is the key node. */
960 eq_string_redefnode (const void *s1, const void *s2)
962 struct redefine_node *node1 = (struct redefine_node *) s1;
963 struct redefine_node *node2 = (struct redefine_node *) s2;
964 return !strcmp ((const char *) node1->source, (const char *) node2->source);
967 /* P is redefine node. Hash value is generated from its "source" filed. */
970 htab_hash_redefnode (const void *p)
972 struct redefine_node *redefnode = (struct redefine_node *) p;
973 return htab_hash_string (redefnode->source);
976 /* Create hashtab used for redefine node. */
979 create_symbol2redef_htab (void)
981 return htab_create_alloc (16, htab_hash_redefnode, eq_string_redefnode, NULL,
985 /* There is htab_hash_string but no htab_eq_string. Makes sense. */
988 eq_string (const void *s1, const void *s2)
990 return strcmp ((const char *) s1, (const char *) s2) == 0;
994 create_symbol_htab (void)
996 return htab_create_alloc (16, htab_hash_string, eq_string, NULL, xcalloc, free);
1000 create_symbol_htabs (void)
1002 strip_specific_htab = create_symbol_htab ();
1003 strip_unneeded_htab = create_symbol_htab ();
1004 keep_specific_htab = create_symbol_htab ();
1005 localize_specific_htab = create_symbol_htab ();
1006 globalize_specific_htab = create_symbol_htab ();
1007 keepglobal_specific_htab = create_symbol_htab ();
1008 weaken_specific_htab = create_symbol_htab ();
1009 redefine_specific_htab = create_symbol2redef_htab ();
1010 /* As there is no bidirectional hash table in libiberty, need a reverse table
1011 to check duplicated target string. */
1012 redefine_specific_reverse_htab = create_symbol_htab ();
1015 /* Add a symbol to strip_specific_list. */
1018 add_specific_symbol (const char *name, htab_t htab)
1020 *htab_find_slot (htab, name, INSERT) = (char *) name;
1023 /* Like add_specific_symbol, but the element type is void *. */
1026 add_specific_symbol_node (const void *node, htab_t htab)
1028 *htab_find_slot (htab, node, INSERT) = (void *) node;
1031 /* Add symbols listed in `filename' to strip_specific_list. */
1033 #define IS_WHITESPACE(c) ((c) == ' ' || (c) == '\t')
1034 #define IS_LINE_TERMINATOR(c) ((c) == '\n' || (c) == '\r' || (c) == '\0')
1037 add_specific_symbols (const char *filename, htab_t htab)
1043 unsigned int line_count;
1045 size = get_file_size (filename);
1052 buffer = (char *) xmalloc (size + 2);
1053 f = fopen (filename, FOPEN_RT);
1055 fatal (_("cannot open '%s': %s"), filename, strerror (errno));
1057 if (fread (buffer, 1, size, f) == 0 || ferror (f))
1058 fatal (_("%s: fread failed"), filename);
1061 buffer [size] = '\n';
1062 buffer [size + 1] = '\0';
1066 for (line = buffer; * line != '\0'; line ++)
1071 int finished = FALSE;
1073 for (eol = line;; eol ++)
1079 /* Cope with \n\r. */
1087 /* Cope with \r\n. */
1098 /* Line comment, Terminate the line here, in case a
1099 name is present and then allow the rest of the
1100 loop to find the real end of the line. */
1112 /* A name may now exist somewhere between 'line' and 'eol'.
1113 Strip off leading whitespace and trailing whitespace,
1114 then add it to the list. */
1115 for (name = line; IS_WHITESPACE (* name); name ++)
1117 for (name_end = name;
1118 (! IS_WHITESPACE (* name_end))
1119 && (! IS_LINE_TERMINATOR (* name_end));
1123 if (! IS_LINE_TERMINATOR (* name_end))
1127 for (extra = name_end + 1; IS_WHITESPACE (* extra); extra ++)
1130 if (! IS_LINE_TERMINATOR (* extra))
1131 non_fatal (_("%s:%d: Ignoring rubbish found on this line"),
1132 filename, line_count);
1137 if (name_end > name)
1138 add_specific_symbol (name, htab);
1140 /* Advance line pointer to end of line. The 'eol ++' in the for
1141 loop above will then advance us to the start of the next line. */
1147 /* See whether a symbol should be stripped or kept
1148 based on strip_specific_list and keep_symbols. */
1151 is_specified_symbol_predicate (void **slot, void *data)
1153 struct is_specified_symbol_predicate_data *d =
1154 (struct is_specified_symbol_predicate_data *) data;
1155 const char *slot_name = (char *) *slot;
1157 if (*slot_name != '!')
1159 if (! fnmatch (slot_name, d->name, 0))
1162 /* Continue traversal, there might be a non-match rule. */
1168 if (! fnmatch (slot_name + 1, d->name, 0))
1171 /* Stop traversal. */
1176 /* Continue traversal. */
1181 is_specified_symbol (const char *name, htab_t htab)
1185 struct is_specified_symbol_predicate_data data;
1190 htab_traverse (htab, is_specified_symbol_predicate, &data);
1195 return htab_find (htab, name) != NULL;
1198 /* Return a pointer to the symbol used as a signature for GROUP. */
1201 group_signature (asection *group)
1203 bfd *abfd = group->owner;
1204 Elf_Internal_Shdr *ghdr;
1206 /* PR 20089: An earlier error may have prevented us from loading the symbol table. */
1210 if (bfd_get_flavour (abfd) != bfd_target_elf_flavour)
1213 ghdr = &elf_section_data (group)->this_hdr;
1214 if (ghdr->sh_link < elf_numsections (abfd))
1216 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
1217 Elf_Internal_Shdr *symhdr = elf_elfsections (abfd) [ghdr->sh_link];
1219 if (symhdr->sh_type == SHT_SYMTAB
1220 && ghdr->sh_info > 0
1221 && ghdr->sh_info < (symhdr->sh_size / bed->s->sizeof_sym))
1222 return isympp[ghdr->sh_info - 1];
1227 /* Return TRUE if the section is a DWO section. */
1230 is_dwo_section (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1232 const char *name = bfd_get_section_name (abfd, sec);
1233 int len = strlen (name);
1235 return strncmp (name + len - 4, ".dwo", 4) == 0;
1238 /* Return TRUE if section SEC is in the update list. */
1241 is_update_section (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1243 if (update_sections != NULL)
1245 struct section_add *pupdate;
1247 for (pupdate = update_sections;
1249 pupdate = pupdate->next)
1251 if (strcmp (sec->name, pupdate->name) == 0)
1260 is_merged_note_section (bfd * abfd, asection * sec)
1263 && bfd_get_flavour (abfd) == bfd_target_elf_flavour
1264 && elf_section_data (sec)->this_hdr.sh_type == SHT_NOTE
1265 /* FIXME: We currently only support merging GNU_BUILD_NOTEs.
1266 We should add support for more note types. */
1267 && ((elf_section_data (sec)->this_hdr.sh_flags & SHF_GNU_BUILD_NOTE) != 0
1268 /* Old versions of GAS (prior to 2.27) could not set the section
1269 flags to OS-specific values, so we also accept sections with the
1271 || (strcmp (sec->name, GNU_BUILD_ATTRS_SECTION_NAME) == 0)))
1277 /* See if a non-group section is being removed. */
1280 is_strip_section_1 (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1282 if (sections_removed || sections_copied)
1284 struct section_list *p;
1285 struct section_list *q;
1287 p = find_section_list (bfd_get_section_name (abfd, sec), FALSE,
1288 SECTION_CONTEXT_REMOVE);
1289 q = find_section_list (bfd_get_section_name (abfd, sec), FALSE,
1290 SECTION_CONTEXT_COPY);
1293 fatal (_("error: section %s matches both remove and copy options"),
1294 bfd_get_section_name (abfd, sec));
1295 if (p && is_update_section (abfd, sec))
1296 fatal (_("error: section %s matches both update and remove options"),
1297 bfd_get_section_name (abfd, sec));
1301 if (sections_copied && q == NULL)
1305 if ((bfd_get_section_flags (abfd, sec) & SEC_DEBUGGING) != 0)
1307 if (strip_symbols == STRIP_DEBUG
1308 || strip_symbols == STRIP_UNNEEDED
1309 || strip_symbols == STRIP_ALL
1310 || discard_locals == LOCALS_ALL
1311 || convert_debugging)
1313 /* By default we don't want to strip .reloc section.
1314 This section has for pe-coff special meaning. See
1315 pe-dll.c file in ld, and peXXigen.c in bfd for details. */
1316 if (strcmp (bfd_get_section_name (abfd, sec), ".reloc") != 0)
1320 if (strip_symbols == STRIP_DWO)
1321 return is_dwo_section (abfd, sec);
1323 if (strip_symbols == STRIP_NONDEBUG)
1327 if (strip_symbols == STRIP_NONDWO)
1328 return !is_dwo_section (abfd, sec);
1333 /* See if a section is being removed. */
1336 is_strip_section (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1338 if (is_strip_section_1 (abfd, sec))
1341 if ((bfd_get_section_flags (abfd, sec) & SEC_GROUP) != 0)
1345 asection *elt, *first;
1348 If we are going to strip the group signature symbol, then
1349 strip the group section too. */
1350 gsym = group_signature (sec);
1355 if ((strip_symbols == STRIP_ALL
1356 && !is_specified_symbol (gname, keep_specific_htab))
1357 || is_specified_symbol (gname, strip_specific_htab))
1360 /* Remove the group section if all members are removed. */
1361 first = elt = elf_next_in_group (sec);
1364 if (!is_strip_section_1 (abfd, elt))
1366 elt = elf_next_in_group (elt);
1378 is_nondebug_keep_contents_section (bfd *ibfd, asection *isection)
1380 /* Always keep ELF note sections. */
1381 if (ibfd->xvec->flavour == bfd_target_elf_flavour)
1382 return (elf_section_type (isection) == SHT_NOTE);
1384 /* Always keep the .buildid section for PE/COFF.
1386 Strictly, this should be written "always keep the section storing the debug
1387 directory", but that may be the .text section for objects produced by some
1388 tools, which it is not sensible to keep. */
1389 if (ibfd->xvec->flavour == bfd_target_coff_flavour)
1390 return (strcmp (bfd_get_section_name (ibfd, isection), ".buildid") == 0);
1395 /* Return true if SYM is a hidden symbol. */
1398 is_hidden_symbol (asymbol *sym)
1400 elf_symbol_type *elf_sym;
1402 elf_sym = elf_symbol_from (sym->the_bfd, sym);
1403 if (elf_sym != NULL)
1404 switch (ELF_ST_VISIBILITY (elf_sym->internal_elf_sym.st_other))
1414 need_sym_before (struct addsym_node **node, const char *sym)
1417 struct addsym_node *ptr = add_sym_list;
1419 /* 'othersym' symbols are at the front of the list. */
1420 for (count = 0; count < add_symbols; count++)
1424 else if (strcmp (ptr->othersym, sym) == 0)
1426 free (ptr->othersym);
1427 ptr->othersym = ""; /* Empty name is hopefully never a valid symbol name. */
1437 create_new_symbol (struct addsym_node *ptr, bfd *obfd)
1439 asymbol *sym = bfd_make_empty_symbol (obfd);
1441 bfd_asymbol_name (sym) = ptr->symdef;
1442 sym->value = ptr->symval;
1443 sym->flags = ptr->flags;
1446 asection *sec = bfd_get_section_by_name (obfd, ptr->section);
1448 fatal (_("Section %s not found"), ptr->section);
1452 sym->section = bfd_abs_section_ptr;
1456 /* Choose which symbol entries to copy; put the result in OSYMS.
1457 We don't copy in place, because that confuses the relocs.
1458 Return the number of symbols to print. */
1461 filter_symbols (bfd *abfd, bfd *obfd, asymbol **osyms,
1462 asymbol **isyms, long symcount)
1464 asymbol **from = isyms, **to = osyms;
1465 long src_count = 0, dst_count = 0;
1466 int relocatable = (abfd->flags & (EXEC_P | DYNAMIC)) == 0;
1468 for (; src_count < symcount; src_count++)
1470 asymbol *sym = from[src_count];
1471 flagword flags = sym->flags;
1472 char *name = (char *) bfd_asymbol_name (sym);
1474 bfd_boolean used_in_reloc = FALSE;
1475 bfd_boolean undefined;
1476 bfd_boolean rem_leading_char;
1477 bfd_boolean add_leading_char;
1479 undefined = bfd_is_und_section (bfd_get_section (sym));
1483 struct addsym_node *ptr;
1485 if (need_sym_before (&ptr, name))
1486 to[dst_count++] = create_new_symbol (ptr, obfd);
1489 if (htab_elements (redefine_specific_htab) || section_rename_list)
1493 new_name = (char *) lookup_sym_redefinition (name);
1494 if (new_name == name
1495 && (flags & BSF_SECTION_SYM) != 0)
1496 new_name = (char *) find_section_rename (name, NULL);
1497 bfd_asymbol_name (sym) = new_name;
1501 /* Check if we will remove the current leading character. */
1503 (name[0] == bfd_get_symbol_leading_char (abfd))
1504 && (change_leading_char
1505 || (remove_leading_char
1506 && ((flags & (BSF_GLOBAL | BSF_WEAK)) != 0
1508 || bfd_is_com_section (bfd_get_section (sym)))));
1510 /* Check if we will add a new leading character. */
1513 && (bfd_get_symbol_leading_char (obfd) != '\0')
1514 && (bfd_get_symbol_leading_char (abfd) == '\0'
1515 || (name[0] == bfd_get_symbol_leading_char (abfd)));
1517 /* Short circuit for change_leading_char if we can do it in-place. */
1518 if (rem_leading_char && add_leading_char && !prefix_symbols_string)
1520 name[0] = bfd_get_symbol_leading_char (obfd);
1521 bfd_asymbol_name (sym) = name;
1522 rem_leading_char = FALSE;
1523 add_leading_char = FALSE;
1526 /* Remove leading char. */
1527 if (rem_leading_char)
1528 bfd_asymbol_name (sym) = ++name;
1530 /* Add new leading char and/or prefix. */
1531 if (add_leading_char || prefix_symbols_string)
1535 ptr = n = (char *) xmalloc (1 + strlen (prefix_symbols_string)
1536 + strlen (name) + 1);
1537 if (add_leading_char)
1538 *ptr++ = bfd_get_symbol_leading_char (obfd);
1540 if (prefix_symbols_string)
1542 strcpy (ptr, prefix_symbols_string);
1543 ptr += strlen (prefix_symbols_string);
1547 bfd_asymbol_name (sym) = n;
1551 if (strip_symbols == STRIP_ALL)
1553 else if ((flags & BSF_KEEP) != 0 /* Used in relocation. */
1554 || ((flags & BSF_SECTION_SYM) != 0
1555 && ((*bfd_get_section (sym)->symbol_ptr_ptr)->flags
1559 used_in_reloc = TRUE;
1561 else if (relocatable /* Relocatable file. */
1562 && ((flags & (BSF_GLOBAL | BSF_WEAK)) != 0
1563 || bfd_is_com_section (bfd_get_section (sym))))
1565 else if (bfd_decode_symclass (sym) == 'I')
1566 /* Global symbols in $idata sections need to be retained
1567 even if relocatable is FALSE. External users of the
1568 library containing the $idata section may reference these
1571 else if ((flags & BSF_GLOBAL) != 0 /* Global symbol. */
1572 || (flags & BSF_WEAK) != 0
1574 || bfd_is_com_section (bfd_get_section (sym)))
1575 keep = strip_symbols != STRIP_UNNEEDED;
1576 else if ((flags & BSF_DEBUGGING) != 0) /* Debugging symbol. */
1577 keep = (strip_symbols != STRIP_DEBUG
1578 && strip_symbols != STRIP_UNNEEDED
1579 && ! convert_debugging);
1580 else if (bfd_coff_get_comdat_section (abfd, bfd_get_section (sym)))
1581 /* COMDAT sections store special information in local
1582 symbols, so we cannot risk stripping any of them. */
1584 else /* Local symbol. */
1585 keep = (strip_symbols != STRIP_UNNEEDED
1586 && (discard_locals != LOCALS_ALL
1587 && (discard_locals != LOCALS_START_L
1588 || ! bfd_is_local_label (abfd, sym))));
1590 if (keep && is_specified_symbol (name, strip_specific_htab))
1592 /* There are multiple ways to set 'keep' above, but if it
1593 was the relocatable symbol case, then that's an error. */
1596 non_fatal (_("not stripping symbol `%s' because it is named in a relocation"), name);
1604 && !(flags & BSF_KEEP)
1605 && is_specified_symbol (name, strip_unneeded_htab))
1609 && ((keep_file_symbols && (flags & BSF_FILE))
1610 || is_specified_symbol (name, keep_specific_htab)))
1613 if (keep && is_strip_section (abfd, bfd_get_section (sym)))
1618 if ((flags & BSF_GLOBAL) != 0
1619 && (weaken || is_specified_symbol (name, weaken_specific_htab)))
1621 sym->flags &= ~ BSF_GLOBAL;
1622 sym->flags |= BSF_WEAK;
1626 && (flags & (BSF_GLOBAL | BSF_WEAK))
1627 && (is_specified_symbol (name, localize_specific_htab)
1628 || (htab_elements (keepglobal_specific_htab) != 0
1629 && ! is_specified_symbol (name, keepglobal_specific_htab))
1630 || (localize_hidden && is_hidden_symbol (sym))))
1632 sym->flags &= ~ (BSF_GLOBAL | BSF_WEAK);
1633 sym->flags |= BSF_LOCAL;
1637 && (flags & BSF_LOCAL)
1638 && is_specified_symbol (name, globalize_specific_htab))
1640 sym->flags &= ~ BSF_LOCAL;
1641 sym->flags |= BSF_GLOBAL;
1644 to[dst_count++] = sym;
1649 struct addsym_node *ptr = add_sym_list;
1651 for (src_count = 0; src_count < add_symbols; src_count++)
1655 if (strcmp (ptr->othersym, ""))
1656 fatal (_("'before=%s' not found"), ptr->othersym);
1659 to[dst_count++] = create_new_symbol (ptr, obfd);
1665 to[dst_count] = NULL;
1670 /* Find the redefined name of symbol SOURCE. */
1673 lookup_sym_redefinition (const char *source)
1675 struct redefine_node key_node = {(char *) source, NULL};
1676 struct redefine_node *redef_node
1677 = (struct redefine_node *) htab_find (redefine_specific_htab, &key_node);
1679 return redef_node == NULL ? source : redef_node->target;
1682 /* Insert a node into symbol redefine hash tabel. */
1685 add_redefine_and_check (const char *cause, const char *source,
1688 struct redefine_node *new_node
1689 = (struct redefine_node *) xmalloc (sizeof (struct redefine_node));
1691 new_node->source = strdup (source);
1692 new_node->target = strdup (target);
1694 if (htab_find (redefine_specific_htab, new_node) != HTAB_EMPTY_ENTRY)
1695 fatal (_("%s: Multiple redefinition of symbol \"%s\""),
1698 if (htab_find (redefine_specific_reverse_htab, target) != HTAB_EMPTY_ENTRY)
1699 fatal (_("%s: Symbol \"%s\" is target of more than one redefinition"),
1702 /* Insert the NEW_NODE into hash table for quick search. */
1703 add_specific_symbol_node (new_node, redefine_specific_htab);
1705 /* Insert the target string into the reverse hash table, this is needed for
1706 duplicated target string check. */
1707 add_specific_symbol (new_node->target, redefine_specific_reverse_htab);
1711 /* Handle the --redefine-syms option. Read lines containing "old new"
1712 from the file, and add them to the symbol redefine list. */
1715 add_redefine_syms_file (const char *filename)
1724 file = fopen (filename, "r");
1726 fatal (_("couldn't open symbol redefinition file %s (error: %s)"),
1727 filename, strerror (errno));
1730 buf = (char *) xmalloc (bufsize + 1 /* For the terminating NUL. */);
1738 /* Collect the input symbol name. */
1739 while (! IS_WHITESPACE (c) && ! IS_LINE_TERMINATOR (c) && c != EOF)
1747 buf = (char *) xrealloc (buf, bufsize + 1);
1755 /* Eat white space between the symbol names. */
1756 while (IS_WHITESPACE (c))
1758 if (c == '#' || IS_LINE_TERMINATOR (c))
1763 /* Collect the output symbol name. */
1765 while (! IS_WHITESPACE (c) && ! IS_LINE_TERMINATOR (c) && c != EOF)
1773 buf = (char *) xrealloc (buf, bufsize + 1);
1781 /* Eat white space at end of line. */
1782 while (! IS_LINE_TERMINATOR(c) && c != EOF && IS_WHITESPACE (c))
1787 if ((c == '\r' && (c = getc (file)) == '\n')
1788 || c == '\n' || c == EOF)
1791 /* Append the redefinition to the list. */
1793 add_redefine_and_check (filename, &buf[0], &buf[outsym_off]);
1804 fatal (_("%s:%d: garbage found at end of line"), filename, lineno);
1806 if (len != 0 && (outsym_off == 0 || outsym_off == len))
1807 fatal (_("%s:%d: missing new symbol name"), filename, lineno);
1810 /* Eat the rest of the line and finish it. */
1811 while (c != '\n' && c != EOF)
1817 fatal (_("%s:%d: premature end of file"), filename, lineno);
1822 /* Copy unknown object file IBFD onto OBFD.
1823 Returns TRUE upon success, FALSE otherwise. */
1826 copy_unknown_object (bfd *ibfd, bfd *obfd)
1834 if (bfd_stat_arch_elt (ibfd, &buf) != 0)
1836 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
1843 non_fatal (_("stat returns negative size for `%s'"),
1844 bfd_get_archive_filename (ibfd));
1848 if (bfd_seek (ibfd, (file_ptr) 0, SEEK_SET) != 0)
1850 bfd_nonfatal (bfd_get_archive_filename (ibfd));
1855 printf (_("copy from `%s' [unknown] to `%s' [unknown]\n"),
1856 bfd_get_archive_filename (ibfd), bfd_get_filename (obfd));
1858 cbuf = (char *) xmalloc (BUFSIZE);
1860 while (ncopied < size)
1862 tocopy = size - ncopied;
1863 if (tocopy > BUFSIZE)
1866 if (bfd_bread (cbuf, (bfd_size_type) tocopy, ibfd)
1867 != (bfd_size_type) tocopy)
1869 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
1874 if (bfd_bwrite (cbuf, (bfd_size_type) tocopy, obfd)
1875 != (bfd_size_type) tocopy)
1877 bfd_nonfatal_message (NULL, obfd, NULL, NULL);
1885 /* We should at least to be able to read it back when copying an
1886 unknown object in an archive. */
1887 chmod (bfd_get_filename (obfd), buf.st_mode | S_IRUSR);
1892 /* Returns the number of bytes needed to store VAL. */
1894 static inline unsigned int
1895 num_bytes (unsigned long val)
1897 unsigned int count = 0;
1899 /* FIXME: There must be a faster way to do this. */
1908 typedef struct objcopy_internal_note
1910 Elf_Internal_Note note;
1913 bfd_boolean modified;
1914 } objcopy_internal_note;
1916 /* Returns TRUE if a gap does, or could, exist between the address range
1917 covered by PNOTE1 and PNOTE2. */
1920 gap_exists (objcopy_internal_note * pnote1,
1921 objcopy_internal_note * pnote2)
1923 /* Without range end notes, we assume that a gap might exist. */
1924 if (pnote1->end == 0 || pnote2->end == 0)
1927 /* FIXME: Alignment of 16 bytes taken from x86_64 binaries.
1928 Really we should extract the alignment of the section covered by the notes. */
1929 return BFD_ALIGN (pnote1->end, 16) < pnote2->start;
1933 is_open_note (objcopy_internal_note * pnote)
1935 return (pnote->note.type == NT_GNU_BUILD_ATTRIBUTE_OPEN);
1939 is_func_note (objcopy_internal_note * pnote)
1941 return (pnote->note.type == NT_GNU_BUILD_ATTRIBUTE_FUNC);
1945 is_64bit (bfd * abfd)
1947 /* Should never happen, but let's be paranoid. */
1948 if (bfd_get_flavour (abfd) != bfd_target_elf_flavour)
1951 return elf_elfheader (abfd)->e_ident[EI_CLASS] == ELFCLASS64;
1954 /* Merge the notes on SEC, removing redundant entries.
1955 Returns the new, smaller size of the section upon success. */
1957 static bfd_size_type
1958 merge_gnu_build_notes (bfd * abfd, asection * sec, bfd_size_type size, bfd_byte * contents)
1960 objcopy_internal_note * pnotes_end;
1961 objcopy_internal_note * pnotes = NULL;
1962 objcopy_internal_note * pnote;
1963 bfd_size_type remain = size;
1964 unsigned version_1_seen = 0;
1965 unsigned version_2_seen = 0;
1966 unsigned version_3_seen = 0;
1967 bfd_boolean duplicate_found = FALSE;
1968 const char * err = NULL;
1969 bfd_byte * in = contents;
1970 int attribute_type_byte;
1972 unsigned long previous_func_start = 0;
1973 unsigned long previous_open_start = 0;
1974 unsigned long previous_func_end = 0;
1975 unsigned long previous_open_end = 0;
1979 relsize = bfd_get_reloc_upper_bound (abfd, sec);
1985 /* If there are relocs associated with this section then we
1986 cannot safely merge it. */
1987 relpp = (arelent **) xmalloc (relsize);
1988 relcount = bfd_canonicalize_reloc (abfd, sec, relpp, isympp);
1994 /* Make a copy of the notes and convert to our internal format.
1995 Minimum size of a note is 12 bytes. */
1996 pnote = pnotes = (objcopy_internal_note *) xcalloc ((size / 12), sizeof (* pnote));
1997 while (remain >= 12)
2001 pnote->note.namesz = (bfd_get_32 (abfd, in ) + 3) & ~3;
2002 pnote->note.descsz = (bfd_get_32 (abfd, in + 4) + 3) & ~3;
2003 pnote->note.type = bfd_get_32 (abfd, in + 8);
2005 if (pnote->note.type != NT_GNU_BUILD_ATTRIBUTE_OPEN
2006 && pnote->note.type != NT_GNU_BUILD_ATTRIBUTE_FUNC)
2008 err = _("corrupt GNU build attribute note: wrong note type");
2012 if (pnote->note.namesz + pnote->note.descsz + 12 > remain)
2014 err = _("corrupt GNU build attribute note: note too big");
2018 if (pnote->note.namesz < 2)
2020 err = _("corrupt GNU build attribute note: name too small");
2024 pnote->note.namedata = (char *)(in + 12);
2025 pnote->note.descdata = (char *)(in + 12 + pnote->note.namesz);
2027 remain -= 12 + pnote->note.namesz + pnote->note.descsz;
2028 in += 12 + pnote->note.namesz + pnote->note.descsz;
2030 if (pnote->note.namesz > 2
2031 && pnote->note.namedata[0] == '$'
2032 && pnote->note.namedata[1] == GNU_BUILD_ATTRIBUTE_VERSION
2033 && pnote->note.namedata[2] == '1')
2035 else if (pnote->note.namesz > 4
2036 && pnote->note.namedata[0] == 'G'
2037 && pnote->note.namedata[1] == 'A'
2038 && pnote->note.namedata[2] == '$'
2039 && pnote->note.namedata[3] == GNU_BUILD_ATTRIBUTE_VERSION)
2041 if (pnote->note.namedata[4] == '2')
2043 else if (pnote->note.namedata[4] == '3')
2047 err = _("corrupt GNU build attribute note: unsupported version");
2052 switch (pnote->note.descsz)
2059 start = bfd_get_32 (abfd, pnote->note.descdata);
2060 /* FIXME: For version 1 and 2 notes we should try to
2061 calculate the end address by finding a symbol whose
2062 value is START, and then adding in its size.
2064 For now though, since v1 and v2 was not intended to
2065 handle gaps, we chose an artificially large end
2071 if (! is_64bit (abfd))
2073 start = bfd_get_32 (abfd, pnote->note.descdata);
2074 end = bfd_get_32 (abfd, pnote->note.descdata + 4);
2078 start = bfd_get_64 (abfd, pnote->note.descdata);
2079 /* FIXME: For version 1 and 2 notes we should try to
2080 calculate the end address by finding a symbol whose
2081 value is START, and then adding in its size.
2083 For now though, since v1 and v2 was not intended to
2084 handle gaps, we chose an artificially large end
2091 start = bfd_get_64 (abfd, pnote->note.descdata);
2092 end = bfd_get_64 (abfd, pnote->note.descdata + 8);
2096 err = _("corrupt GNU build attribute note: bad description size");
2100 if (is_open_note (pnote))
2103 previous_open_start = start;
2105 pnote->start = previous_open_start;
2108 previous_open_end = end;
2110 pnote->end = previous_open_end;
2115 previous_func_start = start;
2117 pnote->start = previous_func_start;
2120 previous_func_end = end;
2122 pnote->end = previous_func_end;
2125 if (pnote->note.namedata[pnote->note.namesz - 1] != 0)
2127 err = _("corrupt GNU build attribute note: name not NUL terminated");
2136 /* Check that the notes are valid. */
2139 err = _("corrupt GNU build attribute notes: excess data at end");
2143 if (version_1_seen == 0 && version_2_seen == 0 && version_3_seen == 0)
2145 err = _("bad GNU build attribute notes: no known versions detected");
2149 if ((version_1_seen > 0 && version_2_seen > 0)
2150 || (version_1_seen > 0 && version_3_seen > 0)
2151 || (version_2_seen > 0 && version_3_seen > 0))
2153 err = _("bad GNU build attribute notes: multiple different versions");
2157 /* Merging is only needed if there is more than one version note... */
2158 if (version_1_seen == 1 || version_2_seen == 1 || version_3_seen == 1)
2161 attribute_type_byte = version_1_seen ? 1 : 3;
2162 val_start = attribute_type_byte + 1;
2164 /* The first note should be the first version note. */
2165 if (pnotes[0].note.namedata[attribute_type_byte] != GNU_BUILD_ATTRIBUTE_VERSION)
2167 err = _("bad GNU build attribute notes: first note not version note");
2171 /* Now merge the notes. The rules are:
2172 1. Preserve the ordering of the notes.
2173 2. Preserve any NT_GNU_BUILD_ATTRIBUTE_FUNC notes.
2174 3. Eliminate any NT_GNU_BUILD_ATTRIBUTE_OPEN notes that have the same
2175 full name field as the immediately preceeding note with the same type
2176 of name and whose address ranges coincide.
2177 IE - it there are gaps in the coverage of the notes, then these gaps
2179 4. Combine the numeric value of any NT_GNU_BUILD_ATTRIBUTE_OPEN notes
2180 of type GNU_BUILD_ATTRIBUTE_STACK_SIZE.
2181 5. If an NT_GNU_BUILD_ATTRIBUTE_OPEN note is going to be preserved and
2182 its description field is empty then the nearest preceeding OPEN note
2183 with a non-empty description field must also be preserved *OR* the
2184 description field of the note must be changed to contain the starting
2185 address to which it refers. */
2186 for (pnote = pnotes + 1; pnote < pnotes_end; pnote ++)
2189 objcopy_internal_note * back;
2190 objcopy_internal_note * prev_open_with_range = NULL;
2192 /* Rule 2 - preserve function notes. */
2193 if (! is_open_note (pnote))
2196 note_type = pnote->note.namedata[attribute_type_byte];
2198 /* Scan backwards from pnote, looking for duplicates.
2199 Clear the type field of any found - but do not delete them just yet. */
2200 for (back = pnote - 1; back >= pnotes; back --)
2202 int back_type = back->note.namedata[attribute_type_byte];
2204 /* If this is the first open note with an address
2205 range that we have encountered then record it. */
2206 if (prev_open_with_range == NULL
2207 && back->note.descsz > 0
2208 && ! is_func_note (back))
2209 prev_open_with_range = back;
2211 if (! is_open_note (back))
2214 /* If the two notes are different then keep on searching. */
2215 if (back_type != note_type)
2218 /* Rule 4 - combine stack size notes. */
2219 if (back_type == GNU_BUILD_ATTRIBUTE_STACK_SIZE)
2221 unsigned char * name;
2222 unsigned long note_val;
2223 unsigned long back_val;
2228 for (shift = 0, note_val = 0,
2229 bytes = pnote->note.namesz - val_start,
2230 name = (unsigned char *) pnote->note.namedata + val_start;
2233 byte = (* name ++) & 0xff;
2234 note_val |= byte << shift;
2238 for (shift = 0, back_val = 0,
2239 bytes = back->note.namesz - val_start,
2240 name = (unsigned char *) back->note.namedata + val_start;
2243 byte = (* name ++) & 0xff;
2244 back_val |= byte << shift;
2248 back_val += note_val;
2249 if (num_bytes (back_val) >= back->note.namesz - val_start)
2251 /* We have a problem - the new value requires more bytes of
2252 storage in the name field than are available. Currently
2253 we have no way of fixing this, so we just preserve both
2258 /* Write the new val into back. */
2259 name = (unsigned char *) back->note.namedata + val_start;
2260 while (name < (unsigned char *) back->note.namedata
2261 + back->note.namesz)
2263 byte = back_val & 0xff;
2270 duplicate_found = TRUE;
2271 pnote->note.type = 0;
2275 /* Rule 3 - combine identical open notes. */
2276 if (back->note.namesz == pnote->note.namesz
2277 && memcmp (back->note.namedata,
2278 pnote->note.namedata, back->note.namesz) == 0
2279 && ! gap_exists (back, pnote))
2281 duplicate_found = TRUE;
2282 pnote->note.type = 0;
2284 if (pnote->end > back->end)
2285 back->end = pnote->end;
2288 back->modified = TRUE;
2292 /* Rule 5 - Since we are keeping this note we must check to see
2293 if its description refers back to an earlier OPEN version
2294 note that has been scheduled for deletion. If so then we
2295 must make sure that version note is also preserved. */
2298 /* As of version 3 we can just
2299 move the range into the note. */
2300 pnote->modified = TRUE;
2301 pnote->note.type = NT_GNU_BUILD_ATTRIBUTE_FUNC;
2302 back->modified = TRUE;
2303 back->note.type = NT_GNU_BUILD_ATTRIBUTE_FUNC;
2307 if (pnote->note.descsz == 0
2308 && prev_open_with_range != NULL
2309 && prev_open_with_range->note.type == 0)
2310 prev_open_with_range->note.type = NT_GNU_BUILD_ATTRIBUTE_OPEN;
2313 /* We have found a similar attribute but the details do not match.
2314 Stop searching backwards. */
2319 if (duplicate_found)
2321 bfd_byte * new_contents;
2324 bfd_size_type new_size;
2325 bfd_vma prev_start = 0;
2326 bfd_vma prev_end = 0;
2328 /* Eliminate the duplicates. */
2329 new = new_contents = xmalloc (size);
2330 for (pnote = pnotes, old = contents;
2334 bfd_size_type note_size = 12 + pnote->note.namesz + pnote->note.descsz;
2336 if (pnote->note.type != 0)
2338 if (pnote->modified)
2340 /* If the note has been modified then we must copy it by
2341 hand, potentially adding in a new description field. */
2342 if (pnote->start == prev_start && pnote->end == prev_end)
2344 bfd_put_32 (abfd, pnote->note.namesz, new);
2345 bfd_put_32 (abfd, 0, new + 4);
2346 bfd_put_32 (abfd, pnote->note.type, new + 8);
2348 memcpy (new, pnote->note.namedata, pnote->note.namesz);
2349 new += pnote->note.namesz;
2353 bfd_put_32 (abfd, pnote->note.namesz, new);
2354 bfd_put_32 (abfd, is_64bit (abfd) ? 16 : 8, new + 4);
2355 bfd_put_32 (abfd, pnote->note.type, new + 8);
2357 memcpy (new, pnote->note.namedata, pnote->note.namesz);
2358 new += pnote->note.namesz;
2359 if (is_64bit (abfd))
2361 bfd_put_64 (abfd, pnote->start, new);
2362 bfd_put_64 (abfd, pnote->end, new + 8);
2367 bfd_put_32 (abfd, pnote->start, new);
2368 bfd_put_32 (abfd, pnote->end, new + 4);
2375 memcpy (new, old, note_size);
2378 prev_start = pnote->start;
2379 prev_end = pnote->end;
2385 new_size = new - new_contents;
2386 memcpy (contents, new_contents, new_size);
2388 free (new_contents);
2394 bfd_set_error (bfd_error_bad_value);
2395 bfd_nonfatal_message (NULL, abfd, sec, err);
2403 /* Copy object file IBFD onto OBFD.
2404 Returns TRUE upon success, FALSE otherwise. */
2407 copy_object (bfd *ibfd, bfd *obfd, const bfd_arch_info_type *input_arch)
2411 asection **osections = NULL;
2413 asection *gnu_debuglink_section = NULL;
2414 bfd_size_type *gaps = NULL;
2415 bfd_size_type max_gap = 0;
2418 enum bfd_architecture iarch;
2422 if (ibfd->xvec->byteorder != obfd->xvec->byteorder
2423 && ibfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN
2424 && obfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN)
2426 /* PR 17636: Call non-fatal so that we return to our parent who
2427 may need to tidy temporary files. */
2428 non_fatal (_("Unable to change endianness of input file(s)"));
2432 if (!bfd_set_format (obfd, bfd_get_format (ibfd)))
2434 bfd_nonfatal_message (NULL, obfd, NULL, NULL);
2438 if (ibfd->sections == NULL)
2440 non_fatal (_("error: the input file '%s' has no sections"),
2441 bfd_get_archive_filename (ibfd));
2445 if (ibfd->xvec->flavour != bfd_target_elf_flavour)
2447 if ((do_debug_sections & compress) != 0
2448 && do_debug_sections != compress)
2450 non_fatal (_("--compress-debug-sections=[zlib|zlib-gnu|zlib-gabi] is unsupported on `%s'"),
2451 bfd_get_archive_filename (ibfd));
2455 if (do_elf_stt_common)
2457 non_fatal (_("--elf-stt-common=[yes|no] is unsupported on `%s'"),
2458 bfd_get_archive_filename (ibfd));
2464 printf (_("copy from `%s' [%s] to `%s' [%s]\n"),
2465 bfd_get_archive_filename (ibfd), bfd_get_target (ibfd),
2466 bfd_get_filename (obfd), bfd_get_target (obfd));
2475 start = bfd_get_start_address (ibfd);
2476 start += change_start;
2479 /* Neither the start address nor the flags
2480 need to be set for a core file. */
2481 if (bfd_get_format (obfd) != bfd_core)
2485 flags = bfd_get_file_flags (ibfd);
2486 flags |= bfd_flags_to_set;
2487 flags &= ~bfd_flags_to_clear;
2488 flags &= bfd_applicable_file_flags (obfd);
2490 if (strip_symbols == STRIP_ALL)
2491 flags &= ~HAS_RELOC;
2493 if (!bfd_set_start_address (obfd, start)
2494 || !bfd_set_file_flags (obfd, flags))
2496 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
2501 /* Copy architecture of input file to output file. */
2502 iarch = bfd_get_arch (ibfd);
2503 imach = bfd_get_mach (ibfd);
2506 if (bfd_get_arch_info (ibfd) == NULL
2507 || bfd_get_arch_info (ibfd)->arch == bfd_arch_unknown)
2509 iarch = input_arch->arch;
2510 imach = input_arch->mach;
2513 non_fatal (_("Input file `%s' ignores binary architecture parameter."),
2514 bfd_get_archive_filename (ibfd));
2516 if (!bfd_set_arch_mach (obfd, iarch, imach)
2517 && (ibfd->target_defaulted
2518 || bfd_get_arch (ibfd) != bfd_get_arch (obfd)))
2520 if (bfd_get_arch (ibfd) == bfd_arch_unknown)
2521 non_fatal (_("Unable to recognise the format of the input file `%s'"),
2522 bfd_get_archive_filename (ibfd));
2524 non_fatal (_("Output file cannot represent architecture `%s'"),
2525 bfd_printable_arch_mach (bfd_get_arch (ibfd),
2526 bfd_get_mach (ibfd)));
2530 if (!bfd_set_format (obfd, bfd_get_format (ibfd)))
2532 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
2536 if (bfd_get_flavour (obfd) == bfd_target_coff_flavour
2537 && bfd_pei_p (obfd))
2539 /* Set up PE parameters. */
2540 pe_data_type *pe = pe_data (obfd);
2542 /* Copy PE parameters before changing them. */
2543 if (ibfd->xvec->flavour == bfd_target_coff_flavour
2544 && bfd_pei_p (ibfd))
2545 pe->pe_opthdr = pe_data (ibfd)->pe_opthdr;
2547 if (pe_file_alignment != (bfd_vma) -1)
2548 pe->pe_opthdr.FileAlignment = pe_file_alignment;
2550 pe_file_alignment = PE_DEF_FILE_ALIGNMENT;
2552 if (pe_heap_commit != (bfd_vma) -1)
2553 pe->pe_opthdr.SizeOfHeapCommit = pe_heap_commit;
2555 if (pe_heap_reserve != (bfd_vma) -1)
2556 pe->pe_opthdr.SizeOfHeapCommit = pe_heap_reserve;
2558 if (pe_image_base != (bfd_vma) -1)
2559 pe->pe_opthdr.ImageBase = pe_image_base;
2561 if (pe_section_alignment != (bfd_vma) -1)
2562 pe->pe_opthdr.SectionAlignment = pe_section_alignment;
2564 pe_section_alignment = PE_DEF_SECTION_ALIGNMENT;
2566 if (pe_stack_commit != (bfd_vma) -1)
2567 pe->pe_opthdr.SizeOfStackCommit = pe_stack_commit;
2569 if (pe_stack_reserve != (bfd_vma) -1)
2570 pe->pe_opthdr.SizeOfStackCommit = pe_stack_reserve;
2572 if (pe_subsystem != -1)
2573 pe->pe_opthdr.Subsystem = pe_subsystem;
2575 if (pe_major_subsystem_version != -1)
2576 pe->pe_opthdr.MajorSubsystemVersion = pe_major_subsystem_version;
2578 if (pe_minor_subsystem_version != -1)
2579 pe->pe_opthdr.MinorSubsystemVersion = pe_minor_subsystem_version;
2581 if (pe_file_alignment > pe_section_alignment)
2583 char file_alignment[20], section_alignment[20];
2585 sprintf_vma (file_alignment, pe_file_alignment);
2586 sprintf_vma (section_alignment, pe_section_alignment);
2587 non_fatal (_("warning: file alignment (0x%s) > section alignment (0x%s)"),
2589 file_alignment, section_alignment);
2596 if (osympp != isympp)
2602 symsize = bfd_get_symtab_upper_bound (ibfd);
2605 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
2609 osympp = isympp = (asymbol **) xmalloc (symsize);
2610 symcount = bfd_canonicalize_symtab (ibfd, isympp);
2613 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
2616 /* PR 17512: file: d6323821
2617 If the symbol table could not be loaded do not pretend that we have
2618 any symbols. This trips us up later on when we load the relocs. */
2622 osympp = isympp = NULL;
2625 /* BFD mandates that all output sections be created and sizes set before
2626 any output is done. Thus, we traverse all sections multiple times. */
2627 bfd_map_over_sections (ibfd, setup_section, obfd);
2629 if (!extract_symbol)
2630 setup_bfd_headers (ibfd, obfd);
2632 if (add_sections != NULL)
2634 struct section_add *padd;
2635 struct section_list *pset;
2637 for (padd = add_sections; padd != NULL; padd = padd->next)
2641 pset = find_section_list (padd->name, FALSE,
2642 SECTION_CONTEXT_SET_FLAGS);
2644 flags = pset->flags | SEC_HAS_CONTENTS;
2646 flags = SEC_HAS_CONTENTS | SEC_READONLY | SEC_DATA;
2648 /* bfd_make_section_with_flags() does not return very helpful
2649 error codes, so check for the most likely user error first. */
2650 if (bfd_get_section_by_name (obfd, padd->name))
2652 bfd_nonfatal_message (NULL, obfd, NULL,
2653 _("can't add section '%s'"), padd->name);
2658 /* We use LINKER_CREATED here so that the backend hooks
2659 will create any special section type information,
2660 instead of presuming we know what we're doing merely
2661 because we set the flags. */
2662 padd->section = bfd_make_section_with_flags
2663 (obfd, padd->name, flags | SEC_LINKER_CREATED);
2664 if (padd->section == NULL)
2666 bfd_nonfatal_message (NULL, obfd, NULL,
2667 _("can't create section `%s'"),
2673 if (! bfd_set_section_size (obfd, padd->section, padd->size))
2675 bfd_nonfatal_message (NULL, obfd, padd->section, NULL);
2679 pset = find_section_list (padd->name, FALSE,
2680 SECTION_CONTEXT_SET_VMA | SECTION_CONTEXT_ALTER_VMA);
2682 && ! bfd_set_section_vma (obfd, padd->section, pset->vma_val))
2684 bfd_nonfatal_message (NULL, obfd, padd->section, NULL);
2688 pset = find_section_list (padd->name, FALSE,
2689 SECTION_CONTEXT_SET_LMA | SECTION_CONTEXT_ALTER_LMA);
2692 padd->section->lma = pset->lma_val;
2694 if (! bfd_set_section_alignment
2695 (obfd, padd->section,
2696 bfd_section_alignment (obfd, padd->section)))
2698 bfd_nonfatal_message (NULL, obfd, padd->section, NULL);
2705 if (update_sections != NULL)
2707 struct section_add *pupdate;
2709 for (pupdate = update_sections;
2711 pupdate = pupdate->next)
2713 pupdate->section = bfd_get_section_by_name (ibfd, pupdate->name);
2714 if (pupdate->section == NULL)
2716 non_fatal (_("error: %s not found, can't be updated"), pupdate->name);
2720 osec = pupdate->section->output_section;
2721 if (! bfd_set_section_size (obfd, osec, pupdate->size))
2723 bfd_nonfatal_message (NULL, obfd, osec, NULL);
2731 /* This palaver is necessary because we must set the output
2732 section size first, before its contents are ready. */
2733 osec = bfd_get_section_by_name (ibfd, GNU_BUILD_ATTRS_SECTION_NAME);
2734 if (osec && is_merged_note_section (ibfd, osec))
2738 size = bfd_get_section_size (osec);
2741 bfd_nonfatal_message (NULL, ibfd, osec, _("warning: note section is empty"));
2742 merge_notes = FALSE;
2744 else if (! bfd_get_full_section_contents (ibfd, osec, & merged_notes))
2746 bfd_nonfatal_message (NULL, ibfd, osec, _("warning: could not load note section"));
2747 free (merged_notes);
2748 merged_notes = NULL;
2749 merge_notes = FALSE;
2753 merged_size = merge_gnu_build_notes (ibfd, osec, size, merged_notes);
2754 if (merged_size == size)
2756 /* Merging achieves nothing. */
2757 free (merged_notes);
2758 merged_notes = NULL;
2759 merge_notes = FALSE;
2764 if (osec->output_section == NULL
2765 || ! bfd_set_section_size (obfd, osec->output_section, merged_size))
2767 bfd_nonfatal_message (NULL, obfd, osec, _("warning: failed to set merged notes size"));
2768 free (merged_notes);
2769 merged_notes = NULL;
2770 merge_notes = FALSE;
2778 if (dump_sections != NULL)
2780 struct section_add * pdump;
2782 for (pdump = dump_sections; pdump != NULL; pdump = pdump->next)
2784 osec = bfd_get_section_by_name (ibfd, pdump->name);
2787 bfd_nonfatal_message (NULL, ibfd, NULL,
2788 _("can't dump section '%s' - it does not exist"),
2793 if ((bfd_get_section_flags (ibfd, osec) & SEC_HAS_CONTENTS) == 0)
2795 bfd_nonfatal_message (NULL, ibfd, osec,
2796 _("can't dump section - it has no contents"));
2800 bfd_size_type size = bfd_get_section_size (osec);
2803 bfd_nonfatal_message (NULL, ibfd, osec,
2804 _("can't dump section - it is empty"));
2809 f = fopen (pdump->filename, FOPEN_WB);
2812 bfd_nonfatal_message (pdump->filename, NULL, NULL,
2813 _("could not open section dump file"));
2818 if (bfd_malloc_and_get_section (ibfd, osec, &contents))
2820 if (fwrite (contents, 1, size, f) != size)
2822 non_fatal (_("error writing section contents to %s (error: %s)"),
2830 bfd_nonfatal_message (NULL, ibfd, osec,
2831 _("could not retrieve section contents"));
2838 if (gnu_debuglink_filename != NULL)
2840 /* PR 15125: Give a helpful warning message if
2841 the debuglink section already exists, and
2842 allow the rest of the copy to complete. */
2843 if (bfd_get_section_by_name (obfd, ".gnu_debuglink"))
2845 non_fatal (_("%s: debuglink section already exists"),
2846 bfd_get_filename (obfd));
2847 gnu_debuglink_filename = NULL;
2851 gnu_debuglink_section = bfd_create_gnu_debuglink_section
2852 (obfd, gnu_debuglink_filename);
2854 if (gnu_debuglink_section == NULL)
2856 bfd_nonfatal_message (NULL, obfd, NULL,
2857 _("cannot create debug link section `%s'"),
2858 gnu_debuglink_filename);
2862 /* Special processing for PE format files. We
2863 have no way to distinguish PE from COFF here. */
2864 if (bfd_get_flavour (obfd) == bfd_target_coff_flavour)
2866 bfd_vma debuglink_vma;
2867 asection * highest_section;
2869 /* The PE spec requires that all sections be adjacent and sorted
2870 in ascending order of VMA. It also specifies that debug
2871 sections should be last. This is despite the fact that debug
2872 sections are not loaded into memory and so in theory have no
2875 This means that the debuglink section must be given a non-zero
2876 VMA which makes it contiguous with other debug sections. So
2877 walk the current section list, find the section with the
2878 highest VMA and start the debuglink section after that one. */
2879 for (osec = obfd->sections, highest_section = NULL;
2883 && (highest_section == NULL
2884 || osec->vma > highest_section->vma))
2885 highest_section = osec;
2887 if (highest_section)
2888 debuglink_vma = BFD_ALIGN (highest_section->vma
2889 + highest_section->size,
2890 /* FIXME: We ought to be using
2891 COFF_PAGE_SIZE here or maybe
2892 bfd_get_section_alignment() (if it
2893 was set) but since this is for PE
2894 and we know the required alignment
2895 it is easier just to hard code it. */
2898 /* Umm, not sure what to do in this case. */
2899 debuglink_vma = 0x1000;
2901 bfd_set_section_vma (obfd, gnu_debuglink_section, debuglink_vma);
2906 c = bfd_count_sections (obfd);
2908 && (gap_fill_set || pad_to_set))
2912 /* We must fill in gaps between the sections and/or we must pad
2913 the last section to a specified address. We do this by
2914 grabbing a list of the sections, sorting them by VMA, and
2915 increasing the section sizes as required to fill the gaps.
2916 We write out the gap contents below. */
2918 osections = (asection **) xmalloc (c * sizeof (asection *));
2920 bfd_map_over_sections (obfd, get_sections, &set);
2922 qsort (osections, c, sizeof (asection *), compare_section_lma);
2924 gaps = (bfd_size_type *) xmalloc (c * sizeof (bfd_size_type));
2925 memset (gaps, 0, c * sizeof (bfd_size_type));
2929 for (i = 0; i < c - 1; i++)
2933 bfd_vma gap_start, gap_stop;
2935 flags = bfd_get_section_flags (obfd, osections[i]);
2936 if ((flags & SEC_HAS_CONTENTS) == 0
2937 || (flags & SEC_LOAD) == 0)
2940 size = bfd_section_size (obfd, osections[i]);
2941 gap_start = bfd_section_lma (obfd, osections[i]) + size;
2942 gap_stop = bfd_section_lma (obfd, osections[i + 1]);
2943 if (gap_start < gap_stop)
2945 if (! bfd_set_section_size (obfd, osections[i],
2946 size + (gap_stop - gap_start)))
2948 bfd_nonfatal_message (NULL, obfd, osections[i],
2949 _("Can't fill gap after section"));
2953 gaps[i] = gap_stop - gap_start;
2954 if (max_gap < gap_stop - gap_start)
2955 max_gap = gap_stop - gap_start;
2965 lma = bfd_section_lma (obfd, osections[c - 1]);
2966 size = bfd_section_size (obfd, osections[c - 1]);
2967 if (lma + size < pad_to)
2969 if (! bfd_set_section_size (obfd, osections[c - 1],
2972 bfd_nonfatal_message (NULL, obfd, osections[c - 1],
2973 _("can't add padding"));
2978 gaps[c - 1] = pad_to - (lma + size);
2979 if (max_gap < pad_to - (lma + size))
2980 max_gap = pad_to - (lma + size);
2986 /* Symbol filtering must happen after the output sections
2987 have been created, but before their contents are set. */
2989 if (convert_debugging)
2990 dhandle = read_debugging_info (ibfd, isympp, symcount, FALSE);
2992 if (strip_symbols == STRIP_DEBUG
2993 || strip_symbols == STRIP_ALL
2994 || strip_symbols == STRIP_UNNEEDED
2995 || strip_symbols == STRIP_NONDEBUG
2996 || strip_symbols == STRIP_DWO
2997 || strip_symbols == STRIP_NONDWO
2998 || discard_locals != LOCALS_UNDEF
3000 || htab_elements (strip_specific_htab) != 0
3001 || htab_elements (keep_specific_htab) != 0
3002 || htab_elements (localize_specific_htab) != 0
3003 || htab_elements (globalize_specific_htab) != 0
3004 || htab_elements (keepglobal_specific_htab) != 0
3005 || htab_elements (weaken_specific_htab) != 0
3006 || htab_elements (redefine_specific_htab) != 0
3007 || prefix_symbols_string
3010 || convert_debugging
3011 || change_leading_char
3012 || remove_leading_char
3013 || section_rename_list
3017 /* Mark symbols used in output relocations so that they
3018 are kept, even if they are local labels or static symbols.
3020 Note we iterate over the input sections examining their
3021 relocations since the relocations for the output sections
3022 haven't been set yet. mark_symbols_used_in_relocations will
3023 ignore input sections which have no corresponding output
3025 if (strip_symbols != STRIP_ALL)
3026 bfd_map_over_sections (ibfd,
3027 mark_symbols_used_in_relocations,
3029 osympp = (asymbol **) xmalloc ((symcount + add_symbols + 1) * sizeof (asymbol *));
3030 symcount = filter_symbols (ibfd, obfd, osympp, isympp, symcount);
3033 if (convert_debugging && dhandle != NULL)
3035 if (! write_debugging_info (obfd, dhandle, &symcount, &osympp))
3042 bfd_set_symtab (obfd, osympp, symcount);
3044 /* This has to happen before section positions are set. */
3045 bfd_map_over_sections (ibfd, copy_relocations_in_section, obfd);
3047 /* This has to happen after the symbol table has been set. */
3048 bfd_map_over_sections (ibfd, copy_section, obfd);
3050 if (add_sections != NULL)
3052 struct section_add *padd;
3054 for (padd = add_sections; padd != NULL; padd = padd->next)
3056 if (! bfd_set_section_contents (obfd, padd->section, padd->contents,
3059 bfd_nonfatal_message (NULL, obfd, padd->section, NULL);
3065 if (update_sections != NULL)
3067 struct section_add *pupdate;
3069 for (pupdate = update_sections;
3071 pupdate = pupdate->next)
3073 osec = pupdate->section->output_section;
3074 if (! bfd_set_section_contents (obfd, osec, pupdate->contents,
3077 bfd_nonfatal_message (NULL, obfd, osec, NULL);
3085 osec = bfd_get_section_by_name (obfd, GNU_BUILD_ATTRS_SECTION_NAME);
3086 if (osec && is_merged_note_section (obfd, osec))
3088 if (! bfd_set_section_contents (obfd, osec, merged_notes, 0, merged_size))
3090 bfd_nonfatal_message (NULL, obfd, osec, _("error: failed to copy merged notes into output"));
3094 else if (! is_strip)
3095 bfd_nonfatal_message (NULL, obfd, osec, _("could not find any mergeable note sections"));
3096 free (merged_notes);
3097 merged_notes = NULL;
3098 merge_notes = FALSE;
3101 if (gnu_debuglink_filename != NULL)
3103 if (! bfd_fill_in_gnu_debuglink_section
3104 (obfd, gnu_debuglink_section, gnu_debuglink_filename))
3106 bfd_nonfatal_message (NULL, obfd, NULL,
3107 _("cannot fill debug link section `%s'"),
3108 gnu_debuglink_filename);
3113 if (gap_fill_set || pad_to_set)
3117 /* Fill in the gaps. */
3120 buf = (bfd_byte *) xmalloc (max_gap);
3121 memset (buf, gap_fill, max_gap);
3123 c = bfd_count_sections (obfd);
3124 for (i = 0; i < c; i++)
3132 off = bfd_section_size (obfd, osections[i]) - left;
3143 if (! bfd_set_section_contents (obfd, osections[i], buf,
3146 bfd_nonfatal_message (NULL, obfd, osections[i], NULL);
3157 /* Allow the BFD backend to copy any private data it understands
3158 from the input BFD to the output BFD. This is done last to
3159 permit the routine to look at the filtered symbol table, which is
3160 important for the ECOFF code at least. */
3161 if (! bfd_copy_private_bfd_data (ibfd, obfd))
3163 bfd_nonfatal_message (NULL, obfd, NULL,
3164 _("error copying private BFD data"));
3168 /* Switch to the alternate machine code. We have to do this at the
3169 very end, because we only initialize the header when we create
3170 the first section. */
3171 if (use_alt_mach_code != 0)
3173 if (! bfd_alt_mach_code (obfd, use_alt_mach_code))
3175 non_fatal (_("this target does not support %lu alternative machine codes"),
3177 if (bfd_get_flavour (obfd) == bfd_target_elf_flavour)
3179 non_fatal (_("treating that number as an absolute e_machine value instead"));
3180 elf_elfheader (obfd)->e_machine = use_alt_mach_code;
3183 non_fatal (_("ignoring the alternative value"));
3190 /* Read each archive element in turn from IBFD, copy the
3191 contents to temp file, and keep the temp file handle.
3192 If 'force_output_target' is TRUE then make sure that
3193 all elements in the new archive are of the type
3197 copy_archive (bfd *ibfd, bfd *obfd, const char *output_target,
3198 bfd_boolean force_output_target,
3199 const bfd_arch_info_type *input_arch)
3203 struct name_list *next;
3207 bfd **ptr = &obfd->archive_head;
3210 const char *filename;
3212 /* Make a temp directory to hold the contents. */
3213 dir = make_tempdir (bfd_get_filename (obfd));
3215 fatal (_("cannot create tempdir for archive copying (error: %s)"),
3218 if (strip_symbols == STRIP_ALL)
3219 obfd->has_armap = FALSE;
3221 obfd->has_armap = ibfd->has_armap;
3222 obfd->is_thin_archive = ibfd->is_thin_archive;
3225 obfd->flags |= BFD_DETERMINISTIC_OUTPUT;
3229 this_element = bfd_openr_next_archived_file (ibfd, NULL);
3231 if (!bfd_set_format (obfd, bfd_get_format (ibfd)))
3234 bfd_nonfatal_message (NULL, obfd, NULL, NULL);
3235 goto cleanup_and_exit;
3238 while (!status && this_element != NULL)
3244 int stat_status = 0;
3245 bfd_boolean del = TRUE;
3246 bfd_boolean ok_object;
3248 /* PR binutils/17533: Do not allow directory traversal
3249 outside of the current directory tree by archive members. */
3250 if (! is_valid_archive_path (bfd_get_filename (this_element)))
3252 non_fatal (_("illegal pathname found in archive member: %s"),
3253 bfd_get_filename (this_element));
3255 goto cleanup_and_exit;
3258 /* Create an output file for this member. */
3259 output_name = concat (dir, "/",
3260 bfd_get_filename (this_element), (char *) 0);
3262 /* If the file already exists, make another temp dir. */
3263 if (stat (output_name, &buf) >= 0)
3265 output_name = make_tempdir (output_name);
3266 if (output_name == NULL)
3268 non_fatal (_("cannot create tempdir for archive copying (error: %s)"),
3271 goto cleanup_and_exit;
3274 l = (struct name_list *) xmalloc (sizeof (struct name_list));
3275 l->name = output_name;
3279 output_name = concat (output_name, "/",
3280 bfd_get_filename (this_element), (char *) 0);
3285 stat_status = bfd_stat_arch_elt (this_element, &buf);
3287 if (stat_status != 0)
3288 non_fatal (_("internal stat error on %s"),
3289 bfd_get_filename (this_element));
3292 l = (struct name_list *) xmalloc (sizeof (struct name_list));
3293 l->name = output_name;
3298 ok_object = bfd_check_format (this_element, bfd_object);
3300 bfd_nonfatal_message (NULL, this_element, NULL,
3301 _("Unable to recognise the format of file"));
3303 /* PR binutils/3110: Cope with archives
3304 containing multiple target types. */
3305 if (force_output_target || !ok_object)
3306 output_bfd = bfd_openw (output_name, output_target);
3308 output_bfd = bfd_openw (output_name, bfd_get_target (this_element));
3310 if (output_bfd == NULL)
3312 bfd_nonfatal_message (output_name, NULL, NULL, NULL);
3314 goto cleanup_and_exit;
3319 del = !copy_object (this_element, output_bfd, input_arch);
3321 if (del && bfd_get_arch (this_element) == bfd_arch_unknown)
3322 /* Try again as an unknown object file. */
3324 else if (!bfd_close (output_bfd))
3326 bfd_nonfatal_message (output_name, NULL, NULL, NULL);
3327 /* Error in new object file. Don't change archive. */
3334 del = !copy_unknown_object (this_element, output_bfd);
3335 if (!bfd_close_all_done (output_bfd))
3337 bfd_nonfatal_message (output_name, NULL, NULL, NULL);
3338 /* Error in new object file. Don't change archive. */
3345 unlink (output_name);
3350 if (preserve_dates && stat_status == 0)
3351 set_times (output_name, &buf);
3353 /* Open the newly output file and attach to our list. */
3354 output_bfd = bfd_openr (output_name, output_target);
3356 l->obfd = output_bfd;
3359 ptr = &output_bfd->archive_next;
3361 last_element = this_element;
3363 this_element = bfd_openr_next_archived_file (ibfd, last_element);
3365 bfd_close (last_element);
3370 filename = bfd_get_filename (obfd);
3371 if (!bfd_close (obfd))
3374 bfd_nonfatal_message (filename, NULL, NULL, NULL);
3377 filename = bfd_get_filename (ibfd);
3378 if (!bfd_close (ibfd))
3381 bfd_nonfatal_message (filename, NULL, NULL, NULL);
3385 /* Delete all the files that we opened. */
3386 for (l = list; l != NULL; l = l->next)
3388 if (l->obfd == NULL)
3392 bfd_close (l->obfd);
3401 set_long_section_mode (bfd *output_bfd, bfd *input_bfd, enum long_section_name_handling style)
3403 /* This is only relevant to Coff targets. */
3404 if (bfd_get_flavour (output_bfd) == bfd_target_coff_flavour)
3407 && bfd_get_flavour (input_bfd) == bfd_target_coff_flavour)
3408 style = bfd_coff_long_section_names (input_bfd) ? ENABLE : DISABLE;
3409 bfd_coff_set_long_section_names (output_bfd, style != DISABLE);
3413 /* The top-level control. */
3416 copy_file (const char *input_filename, const char *output_filename,
3417 const char *input_target, const char *output_target,
3418 const bfd_arch_info_type *input_arch)
3421 char **obj_matching;
3422 char **core_matching;
3423 off_t size = get_file_size (input_filename);
3428 non_fatal (_("error: the input file '%s' is empty"),
3434 /* To allow us to do "strip *" without dying on the first
3435 non-object file, failures are nonfatal. */
3436 ibfd = bfd_openr (input_filename, input_target);
3439 bfd_nonfatal_message (input_filename, NULL, NULL, NULL);
3444 switch (do_debug_sections)
3448 case compress_gnu_zlib:
3449 case compress_gabi_zlib:
3450 ibfd->flags |= BFD_COMPRESS;
3451 /* Don't check if input is ELF here since this information is
3452 only available after bfd_check_format_matches is called. */
3453 if (do_debug_sections != compress_gnu_zlib)
3454 ibfd->flags |= BFD_COMPRESS_GABI;
3457 ibfd->flags |= BFD_DECOMPRESS;
3463 switch (do_elf_stt_common)
3465 case elf_stt_common:
3466 ibfd->flags |= BFD_CONVERT_ELF_COMMON | BFD_USE_ELF_STT_COMMON;
3469 case no_elf_stt_common:
3470 ibfd->flags |= BFD_CONVERT_ELF_COMMON;
3476 if (bfd_check_format (ibfd, bfd_archive))
3478 bfd_boolean force_output_target;
3481 /* bfd_get_target does not return the correct value until
3482 bfd_check_format succeeds. */
3483 if (output_target == NULL)
3485 output_target = bfd_get_target (ibfd);
3486 force_output_target = FALSE;
3489 force_output_target = TRUE;
3491 obfd = bfd_openw (output_filename, output_target);
3494 bfd_nonfatal_message (output_filename, NULL, NULL, NULL);
3498 /* This is a no-op on non-Coff targets. */
3499 set_long_section_mode (obfd, ibfd, long_section_names);
3501 copy_archive (ibfd, obfd, output_target, force_output_target, input_arch);
3503 else if (bfd_check_format_matches (ibfd, bfd_object, &obj_matching))
3508 /* bfd_get_target does not return the correct value until
3509 bfd_check_format succeeds. */
3510 if (output_target == NULL)
3511 output_target = bfd_get_target (ibfd);
3513 obfd = bfd_openw (output_filename, output_target);
3516 bfd_nonfatal_message (output_filename, NULL, NULL, NULL);
3520 /* This is a no-op on non-Coff targets. */
3521 set_long_section_mode (obfd, ibfd, long_section_names);
3523 if (! copy_object (ibfd, obfd, input_arch))
3526 /* PR 17512: file: 0f15796a.
3527 If the file could not be copied it may not be in a writeable
3528 state. So use bfd_close_all_done to avoid the possibility of
3529 writing uninitialised data into the file. */
3530 if (! (status ? bfd_close_all_done (obfd) : bfd_close (obfd)))
3533 bfd_nonfatal_message (output_filename, NULL, NULL, NULL);
3537 if (!bfd_close (ibfd))
3540 bfd_nonfatal_message (input_filename, NULL, NULL, NULL);
3546 bfd_error_type obj_error = bfd_get_error ();
3547 bfd_error_type core_error;
3549 if (bfd_check_format_matches (ibfd, bfd_core, &core_matching))
3551 /* This probably can't happen.. */
3552 if (obj_error == bfd_error_file_ambiguously_recognized)
3553 free (obj_matching);
3557 core_error = bfd_get_error ();
3558 /* Report the object error in preference to the core error. */
3559 if (obj_error != core_error)
3560 bfd_set_error (obj_error);
3562 bfd_nonfatal_message (input_filename, NULL, NULL, NULL);
3564 if (obj_error == bfd_error_file_ambiguously_recognized)
3566 list_matching_formats (obj_matching);
3567 free (obj_matching);
3569 if (core_error == bfd_error_file_ambiguously_recognized)
3571 list_matching_formats (core_matching);
3572 free (core_matching);
3579 /* Add a name to the section renaming list. */
3582 add_section_rename (const char * old_name, const char * new_name,
3585 section_rename * srename;
3587 /* Check for conflicts first. */
3588 for (srename = section_rename_list; srename != NULL; srename = srename->next)
3589 if (strcmp (srename->old_name, old_name) == 0)
3591 /* Silently ignore duplicate definitions. */
3592 if (strcmp (srename->new_name, new_name) == 0
3593 && srename->flags == flags)
3596 fatal (_("Multiple renames of section %s"), old_name);
3599 srename = (section_rename *) xmalloc (sizeof (* srename));
3601 srename->old_name = old_name;
3602 srename->new_name = new_name;
3603 srename->flags = flags;
3604 srename->next = section_rename_list;
3606 section_rename_list = srename;
3609 /* Check the section rename list for a new name of the input section
3610 called OLD_NAME. Returns the new name if one is found and sets
3611 RETURNED_FLAGS if non-NULL to the flags to be used for this section. */
3614 find_section_rename (const char *old_name, flagword *returned_flags)
3616 const section_rename *srename;
3618 for (srename = section_rename_list; srename != NULL; srename = srename->next)
3619 if (strcmp (srename->old_name, old_name) == 0)
3621 if (returned_flags != NULL && srename->flags != (flagword) -1)
3622 *returned_flags = srename->flags;
3624 return srename->new_name;
3630 /* Once each of the sections is copied, we may still need to do some
3631 finalization work for private section headers. Do that here. */
3634 setup_bfd_headers (bfd *ibfd, bfd *obfd)
3636 /* Allow the BFD backend to copy any private data it understands
3637 from the input section to the output section. */
3638 if (! bfd_copy_private_header_data (ibfd, obfd))
3641 bfd_nonfatal_message (NULL, ibfd, NULL,
3642 _("error in private header data"));
3646 /* All went well. */
3650 /* Create a section in OBFD with the same
3651 name and attributes as ISECTION in IBFD. */
3654 setup_section (bfd *ibfd, sec_ptr isection, void *obfdarg)
3656 bfd *obfd = (bfd *) obfdarg;
3657 struct section_list *p;
3665 char *prefix = NULL;
3666 bfd_boolean make_nobits;
3668 if (is_strip_section (ibfd, isection))
3671 /* Get the, possibly new, name of the output section. */
3672 name = bfd_section_name (ibfd, isection);
3673 flags = bfd_get_section_flags (ibfd, isection);
3674 name = find_section_rename (name, &flags);
3676 /* Prefix sections. */
3677 if ((prefix_alloc_sections_string)
3678 && (bfd_get_section_flags (ibfd, isection) & SEC_ALLOC))
3679 prefix = prefix_alloc_sections_string;
3680 else if (prefix_sections_string)
3681 prefix = prefix_sections_string;
3687 n = (char *) xmalloc (strlen (prefix) + strlen (name) + 1);
3693 make_nobits = FALSE;
3695 p = find_section_list (bfd_section_name (ibfd, isection), FALSE,
3696 SECTION_CONTEXT_SET_FLAGS);
3698 flags = p->flags | (flags & (SEC_HAS_CONTENTS | SEC_RELOC));
3699 else if (strip_symbols == STRIP_NONDEBUG
3700 && (flags & (SEC_ALLOC | SEC_GROUP)) != 0
3701 && !is_nondebug_keep_contents_section (ibfd, isection))
3703 flags &= ~(SEC_HAS_CONTENTS | SEC_LOAD | SEC_GROUP);
3704 if (obfd->xvec->flavour == bfd_target_elf_flavour)
3708 /* Twiddle the input section flags so that it seems to
3709 elf.c:copy_private_bfd_data that section flags have not
3710 changed between input and output sections. This hack
3711 prevents wholesale rewriting of the program headers. */
3712 isection->flags &= ~(SEC_HAS_CONTENTS | SEC_LOAD | SEC_GROUP);
3716 osection = bfd_make_section_anyway_with_flags (obfd, name, flags);
3718 if (osection == NULL)
3720 err = _("failed to create output section");
3725 elf_section_type (osection) = SHT_NOBITS;
3727 size = bfd_section_size (ibfd, isection);
3728 size = bfd_convert_section_size (ibfd, isection, obfd, size);
3730 size = (size + interleave - 1) / interleave * copy_width;
3731 else if (extract_symbol)
3733 if (! bfd_set_section_size (obfd, osection, size))
3735 err = _("failed to set size");
3739 vma = bfd_section_vma (ibfd, isection);
3740 p = find_section_list (bfd_section_name (ibfd, isection), FALSE,
3741 SECTION_CONTEXT_ALTER_VMA | SECTION_CONTEXT_SET_VMA);
3744 if (p->context & SECTION_CONTEXT_SET_VMA)
3750 vma += change_section_address;
3752 if (! bfd_set_section_vma (obfd, osection, vma))
3754 err = _("failed to set vma");
3758 lma = isection->lma;
3759 p = find_section_list (bfd_section_name (ibfd, isection), FALSE,
3760 SECTION_CONTEXT_ALTER_LMA | SECTION_CONTEXT_SET_LMA);
3763 if (p->context & SECTION_CONTEXT_ALTER_LMA)
3769 lma += change_section_address;
3771 osection->lma = lma;
3773 /* FIXME: This is probably not enough. If we change the LMA we
3774 may have to recompute the header for the file as well. */
3775 if (!bfd_set_section_alignment (obfd,
3777 bfd_section_alignment (ibfd, isection)))
3779 err = _("failed to set alignment");
3783 /* Copy merge entity size. */
3784 osection->entsize = isection->entsize;
3786 /* Copy compress status. */
3787 osection->compress_status = isection->compress_status;
3789 /* This used to be mangle_section; we do here to avoid using
3790 bfd_get_section_by_name since some formats allow multiple
3791 sections with the same name. */
3792 isection->output_section = osection;
3793 isection->output_offset = 0;
3795 if ((isection->flags & SEC_GROUP) != 0)
3797 asymbol *gsym = group_signature (isection);
3801 gsym->flags |= BSF_KEEP;
3802 if (ibfd->xvec->flavour == bfd_target_elf_flavour)
3803 elf_group_id (isection) = gsym;
3807 /* Allow the BFD backend to copy any private data it understands
3808 from the input section to the output section. */
3809 if (!bfd_copy_private_section_data (ibfd, isection, obfd, osection))
3811 err = _("failed to copy private data");
3815 /* All went well. */
3820 bfd_nonfatal_message (NULL, obfd, osection, err);
3823 /* Return TRUE if input section ISECTION should be skipped. */
3826 skip_section (bfd *ibfd, sec_ptr isection, bfd_boolean skip_copy)
3832 /* If we have already failed earlier on,
3833 do not keep on generating complaints now. */
3840 if (is_strip_section (ibfd, isection))
3843 if (is_update_section (ibfd, isection))
3846 /* When merging a note section we skip the copying of the contents,
3847 but not the copying of the relocs associated with the contents. */
3848 if (skip_copy && is_merged_note_section (ibfd, isection))
3851 flags = bfd_get_section_flags (ibfd, isection);
3852 if ((flags & SEC_GROUP) != 0)
3855 osection = isection->output_section;
3856 size = bfd_get_section_size (isection);
3858 if (size == 0 || osection == 0)
3864 /* Add section SECTION_PATTERN to the list of sections that will have their
3865 relocations removed. */
3868 handle_remove_relocations_option (const char *section_pattern)
3870 find_section_list (section_pattern, TRUE, SECTION_CONTEXT_REMOVE_RELOCS);
3873 /* Return TRUE if ISECTION from IBFD should have its relocations removed,
3874 otherwise return FALSE. If the user has requested that relocations be
3875 removed from a section that does not have relocations then this
3876 function will still return TRUE. */
3879 discard_relocations (bfd *ibfd ATTRIBUTE_UNUSED, asection *isection)
3881 return (find_section_list (bfd_section_name (ibfd, isection), FALSE,
3882 SECTION_CONTEXT_REMOVE_RELOCS) != NULL);
3885 /* Wrapper for dealing with --remove-section (-R) command line arguments.
3886 A special case is detected here, if the user asks to remove a relocation
3887 section (one starting with ".rela." or ".rel.") then this removal must
3888 be done using a different technique. */
3891 handle_remove_section_option (const char *section_pattern)
3893 if (strncmp (section_pattern, ".rela.", 6) == 0)
3894 handle_remove_relocations_option (section_pattern + 5);
3895 else if (strncmp (section_pattern, ".rel.", 5) == 0)
3896 handle_remove_relocations_option (section_pattern + 4);
3899 find_section_list (section_pattern, TRUE, SECTION_CONTEXT_REMOVE);
3900 sections_removed = TRUE;
3904 /* Copy relocations in input section ISECTION of IBFD to an output
3905 section with the same name in OBFDARG. If stripping then don't
3906 copy any relocation info. */
3909 copy_relocations_in_section (bfd *ibfd, sec_ptr isection, void *obfdarg)
3911 bfd *obfd = (bfd *) obfdarg;
3917 if (skip_section (ibfd, isection, FALSE))
3920 osection = isection->output_section;
3922 /* Core files and DWO files do not need to be relocated. */
3923 if (bfd_get_format (obfd) == bfd_core
3924 || strip_symbols == STRIP_NONDWO
3925 || discard_relocations (ibfd, isection))
3929 relsize = bfd_get_reloc_upper_bound (ibfd, isection);
3933 /* Do not complain if the target does not support relocations. */
3934 if (relsize == -1 && bfd_get_error () == bfd_error_invalid_operation)
3939 bfd_nonfatal_message (NULL, ibfd, isection, NULL);
3947 bfd_set_reloc (obfd, osection, NULL, 0);
3948 osection->flags &= ~SEC_RELOC;
3952 if (isection->orelocation != NULL)
3954 /* Some other function has already set up the output relocs
3955 for us, so scan those instead of the default relocs. */
3956 relcount = isection->reloc_count;
3957 relpp = isection->orelocation;
3961 relpp = (arelent **) xmalloc (relsize);
3962 relcount = bfd_canonicalize_reloc (ibfd, isection, relpp, isympp);
3966 bfd_nonfatal_message (NULL, ibfd, isection,
3967 _("relocation count is negative"));
3972 if (strip_symbols == STRIP_ALL)
3974 /* Remove relocations which are not in
3975 keep_strip_specific_list. */
3976 arelent **temp_relpp;
3977 long temp_relcount = 0;
3980 temp_relpp = (arelent **) xmalloc (relsize);
3981 for (i = 0; i < relcount; i++)
3983 /* PR 17512: file: 9e907e0c. */
3984 if (relpp[i]->sym_ptr_ptr
3986 && * relpp[i]->sym_ptr_ptr)
3987 if (is_specified_symbol (bfd_asymbol_name (*relpp[i]->sym_ptr_ptr),
3988 keep_specific_htab))
3989 temp_relpp [temp_relcount++] = relpp [i];
3991 relcount = temp_relcount;
3992 if (isection->orelocation == NULL)
3997 bfd_set_reloc (obfd, osection, relcount == 0 ? NULL : relpp, relcount);
4000 osection->flags &= ~SEC_RELOC;
4006 /* Copy the data of input section ISECTION of IBFD
4007 to an output section with the same name in OBFD. */
4010 copy_section (bfd *ibfd, sec_ptr isection, void *obfdarg)
4012 bfd *obfd = (bfd *) obfdarg;
4013 struct section_list *p;
4017 if (skip_section (ibfd, isection, TRUE))
4020 osection = isection->output_section;
4021 /* The output SHF_COMPRESSED section size is different from input if
4022 ELF classes of input and output aren't the same. We can't use
4023 the output section size since --interleave will shrink the output
4024 section. Size will be updated if the section is converted. */
4025 size = bfd_get_section_size (isection);
4027 if (bfd_get_section_flags (ibfd, isection) & SEC_HAS_CONTENTS
4028 && bfd_get_section_flags (obfd, osection) & SEC_HAS_CONTENTS)
4030 bfd_byte *memhunk = NULL;
4032 if (!bfd_get_full_section_contents (ibfd, isection, &memhunk)
4033 || !bfd_convert_section_contents (ibfd, isection, obfd,
4037 bfd_nonfatal_message (NULL, ibfd, isection, NULL);
4044 /* We don't handle leftover bytes (too many possible behaviors,
4045 and we don't know what the user wants). The section length
4046 must be a multiple of the number of bytes to swap. */
4047 if ((size % reverse_bytes) == 0)
4052 for (i = 0; i < size; i += reverse_bytes)
4053 for (j = 0; j < (unsigned long)(reverse_bytes / 2); j++)
4055 bfd_byte *m = (bfd_byte *) memhunk;
4058 m[i + j] = m[(i + reverse_bytes) - (j + 1)];
4059 m[(i + reverse_bytes) - (j + 1)] = b;
4063 /* User must pad the section up in order to do this. */
4064 fatal (_("cannot reverse bytes: length of section %s must be evenly divisible by %d"),
4065 bfd_section_name (ibfd, isection), reverse_bytes);
4070 /* Keep only every `copy_byte'th byte in MEMHUNK. */
4071 char *from = (char *) memhunk + copy_byte;
4072 char *to = (char *) memhunk;
4073 char *end = (char *) memhunk + size;
4076 /* If the section address is not exactly divisible by the interleave,
4077 then we must bias the from address. If the copy_byte is less than
4078 the bias, then we must skip forward one interleave, and increment
4080 int extra = isection->lma % interleave;
4082 if (copy_byte < extra)
4085 for (; from < end; from += interleave)
4086 for (i = 0; i < copy_width; i++)
4088 if (&from[i] >= end)
4093 size = (size + interleave - 1 - copy_byte) / interleave * copy_width;
4094 osection->lma /= interleave;
4095 if (copy_byte < extra)
4099 if (!bfd_set_section_contents (obfd, osection, memhunk, 0, size))
4102 bfd_nonfatal_message (NULL, obfd, osection, NULL);
4108 else if ((p = find_section_list (bfd_get_section_name (ibfd, isection),
4109 FALSE, SECTION_CONTEXT_SET_FLAGS)) != NULL
4110 && (p->flags & SEC_HAS_CONTENTS) != 0)
4112 void *memhunk = xmalloc (size);
4114 /* We don't permit the user to turn off the SEC_HAS_CONTENTS
4115 flag--they can just remove the section entirely and add it
4116 back again. However, we do permit them to turn on the
4117 SEC_HAS_CONTENTS flag, and take it to mean that the section
4118 contents should be zeroed out. */
4120 memset (memhunk, 0, size);
4121 if (! bfd_set_section_contents (obfd, osection, memhunk, 0, size))
4124 bfd_nonfatal_message (NULL, obfd, osection, NULL);
4132 /* Get all the sections. This is used when --gap-fill or --pad-to is
4136 get_sections (bfd *obfd ATTRIBUTE_UNUSED, asection *osection, void *secppparg)
4138 asection ***secppp = (asection ***) secppparg;
4140 **secppp = osection;
4144 /* Sort sections by VMA. This is called via qsort, and is used when
4145 --gap-fill or --pad-to is used. We force non loadable or empty
4146 sections to the front, where they are easier to ignore. */
4149 compare_section_lma (const void *arg1, const void *arg2)
4151 const asection *const *sec1 = (const asection * const *) arg1;
4152 const asection *const *sec2 = (const asection * const *) arg2;
4153 flagword flags1, flags2;
4155 /* Sort non loadable sections to the front. */
4156 flags1 = (*sec1)->flags;
4157 flags2 = (*sec2)->flags;
4158 if ((flags1 & SEC_HAS_CONTENTS) == 0
4159 || (flags1 & SEC_LOAD) == 0)
4161 if ((flags2 & SEC_HAS_CONTENTS) != 0
4162 && (flags2 & SEC_LOAD) != 0)
4167 if ((flags2 & SEC_HAS_CONTENTS) == 0
4168 || (flags2 & SEC_LOAD) == 0)
4172 /* Sort sections by LMA. */
4173 if ((*sec1)->lma > (*sec2)->lma)
4175 else if ((*sec1)->lma < (*sec2)->lma)
4178 /* Sort sections with the same LMA by size. */
4179 if (bfd_get_section_size (*sec1) > bfd_get_section_size (*sec2))
4181 else if (bfd_get_section_size (*sec1) < bfd_get_section_size (*sec2))
4187 /* Mark all the symbols which will be used in output relocations with
4188 the BSF_KEEP flag so that those symbols will not be stripped.
4190 Ignore relocations which will not appear in the output file. */
4193 mark_symbols_used_in_relocations (bfd *ibfd, sec_ptr isection, void *symbolsarg)
4195 asymbol **symbols = (asymbol **) symbolsarg;
4200 /* Ignore an input section with no corresponding output section. */
4201 if (isection->output_section == NULL)
4204 relsize = bfd_get_reloc_upper_bound (ibfd, isection);
4207 /* Do not complain if the target does not support relocations. */
4208 if (relsize == -1 && bfd_get_error () == bfd_error_invalid_operation)
4210 bfd_fatal (bfd_get_filename (ibfd));
4216 relpp = (arelent **) xmalloc (relsize);
4217 relcount = bfd_canonicalize_reloc (ibfd, isection, relpp, symbols);
4219 bfd_fatal (bfd_get_filename (ibfd));
4221 /* Examine each symbol used in a relocation. If it's not one of the
4222 special bfd section symbols, then mark it with BSF_KEEP. */
4223 for (i = 0; i < relcount; i++)
4225 /* See PRs 20923 and 20930 for reproducers for the NULL tests. */
4226 if (relpp[i]->sym_ptr_ptr != NULL
4227 && * relpp[i]->sym_ptr_ptr != NULL
4228 && *relpp[i]->sym_ptr_ptr != bfd_com_section_ptr->symbol
4229 && *relpp[i]->sym_ptr_ptr != bfd_abs_section_ptr->symbol
4230 && *relpp[i]->sym_ptr_ptr != bfd_und_section_ptr->symbol)
4231 (*relpp[i]->sym_ptr_ptr)->flags |= BSF_KEEP;
4238 /* Write out debugging information. */
4241 write_debugging_info (bfd *obfd, void *dhandle,
4242 long *symcountp ATTRIBUTE_UNUSED,
4243 asymbol ***symppp ATTRIBUTE_UNUSED)
4245 if (bfd_get_flavour (obfd) == bfd_target_ieee_flavour)
4246 return write_ieee_debugging_info (obfd, dhandle);
4248 if (bfd_get_flavour (obfd) == bfd_target_coff_flavour
4249 || bfd_get_flavour (obfd) == bfd_target_elf_flavour)
4251 bfd_byte *syms, *strings;
4252 bfd_size_type symsize, stringsize;
4253 asection *stabsec, *stabstrsec;
4256 if (! write_stabs_in_sections_debugging_info (obfd, dhandle, &syms,
4261 flags = SEC_HAS_CONTENTS | SEC_READONLY | SEC_DEBUGGING;
4262 stabsec = bfd_make_section_with_flags (obfd, ".stab", flags);
4263 stabstrsec = bfd_make_section_with_flags (obfd, ".stabstr", flags);
4265 || stabstrsec == NULL
4266 || ! bfd_set_section_size (obfd, stabsec, symsize)
4267 || ! bfd_set_section_size (obfd, stabstrsec, stringsize)
4268 || ! bfd_set_section_alignment (obfd, stabsec, 2)
4269 || ! bfd_set_section_alignment (obfd, stabstrsec, 0))
4271 bfd_nonfatal_message (NULL, obfd, NULL,
4272 _("can't create debugging section"));
4276 /* We can get away with setting the section contents now because
4277 the next thing the caller is going to do is copy over the
4278 real sections. We may someday have to split the contents
4279 setting out of this function. */
4280 if (! bfd_set_section_contents (obfd, stabsec, syms, 0, symsize)
4281 || ! bfd_set_section_contents (obfd, stabstrsec, strings, 0,
4284 bfd_nonfatal_message (NULL, obfd, NULL,
4285 _("can't set debugging section contents"));
4292 bfd_nonfatal_message (NULL, obfd, NULL,
4293 _("don't know how to write debugging information for %s"),
4294 bfd_get_target (obfd));
4298 /* If neither -D nor -U was specified explicitly,
4299 then use the configured default. */
4301 default_deterministic (void)
4303 if (deterministic < 0)
4304 deterministic = DEFAULT_AR_DETERMINISTIC;
4308 strip_main (int argc, char *argv[])
4310 char *input_target = NULL;
4311 char *output_target = NULL;
4312 bfd_boolean show_version = FALSE;
4313 bfd_boolean formats_info = FALSE;
4316 char *output_file = NULL;
4320 while ((c = getopt_long (argc, argv, "I:O:F:K:MN:R:o:sSpdgxXHhVvwDU",
4321 strip_options, (int *) 0)) != EOF)
4326 input_target = optarg;
4329 output_target = optarg;
4332 input_target = output_target = optarg;
4335 handle_remove_section_option (optarg);
4337 case OPTION_REMOVE_RELOCS:
4338 handle_remove_relocations_option (optarg);
4341 strip_symbols = STRIP_ALL;
4345 case 'd': /* Historic BSD alias for -g. Used by early NetBSD. */
4346 strip_symbols = STRIP_DEBUG;
4348 case OPTION_STRIP_DWO:
4349 strip_symbols = STRIP_DWO;
4351 case OPTION_STRIP_UNNEEDED:
4352 strip_symbols = STRIP_UNNEEDED;
4355 add_specific_symbol (optarg, keep_specific_htab);
4360 case OPTION_NO_MERGE_NOTES:
4361 merge_notes = FALSE;
4364 add_specific_symbol (optarg, strip_specific_htab);
4367 output_file = optarg;
4370 preserve_dates = TRUE;
4373 deterministic = TRUE;
4376 deterministic = FALSE;
4379 discard_locals = LOCALS_ALL;
4382 discard_locals = LOCALS_START_L;
4388 show_version = TRUE;
4390 case OPTION_FORMATS_INFO:
4391 formats_info = TRUE;
4393 case OPTION_ONLY_KEEP_DEBUG:
4394 strip_symbols = STRIP_NONDEBUG;
4396 case OPTION_KEEP_FILE_SYMBOLS:
4397 keep_file_symbols = 1;
4400 /* We've been given a long option. */
4407 strip_usage (stdout, 0);
4409 strip_usage (stderr, 1);
4420 print_version ("strip");
4422 default_deterministic ();
4424 /* Default is to strip all symbols. */
4425 if (strip_symbols == STRIP_UNDEF
4426 && discard_locals == LOCALS_UNDEF
4427 && htab_elements (strip_specific_htab) == 0)
4428 strip_symbols = STRIP_ALL;
4430 if (output_target == NULL)
4431 output_target = input_target;
4435 || (output_file != NULL && (i + 1) < argc))
4436 strip_usage (stderr, 1);
4438 for (; i < argc; i++)
4440 int hold_status = status;
4441 struct stat statbuf;
4444 if (get_file_size (argv[i]) < 1)
4451 /* No need to check the return value of stat().
4452 It has already been checked in get_file_size(). */
4453 stat (argv[i], &statbuf);
4455 if (output_file == NULL
4456 || filename_cmp (argv[i], output_file) == 0)
4457 tmpname = make_tempname (argv[i]);
4459 tmpname = output_file;
4461 if (tmpname == NULL)
4463 bfd_nonfatal_message (argv[i], NULL, NULL,
4464 _("could not create temporary file to hold stripped copy"));
4470 copy_file (argv[i], tmpname, input_target, output_target, NULL);
4474 set_times (tmpname, &statbuf);
4475 if (output_file != tmpname)
4476 status = (smart_rename (tmpname,
4477 output_file ? output_file : argv[i],
4478 preserve_dates) != 0);
4480 status = hold_status;
4483 unlink_if_ordinary (tmpname);
4484 if (output_file != tmpname)
4491 /* Set up PE subsystem. */
4494 set_pe_subsystem (const char *s)
4496 const char *version, *subsystem;
4506 { "native", 0, IMAGE_SUBSYSTEM_NATIVE },
4507 { "windows", 0, IMAGE_SUBSYSTEM_WINDOWS_GUI },
4508 { "console", 0, IMAGE_SUBSYSTEM_WINDOWS_CUI },
4509 { "posix", 0, IMAGE_SUBSYSTEM_POSIX_CUI },
4510 { "wince", 0, IMAGE_SUBSYSTEM_WINDOWS_CE_GUI },
4511 { "efi-app", 1, IMAGE_SUBSYSTEM_EFI_APPLICATION },
4512 { "efi-bsd", 1, IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER },
4513 { "efi-rtd", 1, IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER },
4514 { "sal-rtd", 1, IMAGE_SUBSYSTEM_SAL_RUNTIME_DRIVER },
4515 { "xbox", 0, IMAGE_SUBSYSTEM_XBOX }
4521 /* Check for the presence of a version number. */
4522 version = strchr (s, ':');
4523 if (version == NULL)
4527 int len = version - s;
4531 version = copy + 1 + len;
4532 pe_major_subsystem_version = strtoul (version, ©, 0);
4534 pe_minor_subsystem_version = strtoul (copy + 1, ©, 0);
4536 non_fatal (_("%s: bad version in PE subsystem"), s);
4539 /* Check for numeric subsystem. */
4540 value = (short) strtol (subsystem, ©, 0);
4543 for (i = 0; i < ARRAY_SIZE (v); i++)
4544 if (v[i].value == value)
4546 pe_subsystem = value;
4547 set_def = v[i].set_def;
4553 /* Search for subsystem by name. */
4554 for (i = 0; i < ARRAY_SIZE (v); i++)
4555 if (strcmp (subsystem, v[i].name) == 0)
4557 pe_subsystem = v[i].value;
4558 set_def = v[i].set_def;
4566 fatal (_("unknown PE subsystem: %s"), s);
4571 if (pe_file_alignment == (bfd_vma) -1)
4572 pe_file_alignment = PE_DEF_FILE_ALIGNMENT;
4573 if (pe_section_alignment == (bfd_vma) -1)
4574 pe_section_alignment = PE_DEF_SECTION_ALIGNMENT;
4578 free ((char *) subsystem);
4581 /* Convert EFI target to PEI target. */
4584 convert_efi_target (char *efi)
4590 if (strcmp (efi + 4, "ia32") == 0)
4592 /* Change ia32 to i386. */
4597 else if (strcmp (efi + 4, "x86_64") == 0)
4599 /* Change x86_64 to x86-64. */
4604 /* Allocate and return a pointer to a struct section_add, initializing the
4605 structure using ARG, a string in the format "sectionname=filename".
4606 The returned structure will have its next pointer set to NEXT. The
4607 OPTION field is the name of the command line option currently being
4608 parsed, and is only used if an error needs to be reported. */
4610 static struct section_add *
4611 init_section_add (const char *arg,
4612 struct section_add *next,
4615 struct section_add *pa;
4618 s = strchr (arg, '=');
4620 fatal (_("bad format for %s"), option);
4622 pa = (struct section_add *) xmalloc (sizeof (struct section_add));
4623 pa->name = xstrndup (arg, s - arg);
4624 pa->filename = s + 1;
4626 pa->contents = NULL;
4632 /* Load the file specified in PA, allocating memory to hold the file
4633 contents, and store a pointer to the allocated memory in the contents
4634 field of PA. The size field of PA is also updated. All errors call
4638 section_add_load_file (struct section_add *pa)
4643 /* We don't use get_file_size so that we can do
4644 --add-section .note.GNU_stack=/dev/null
4645 get_file_size doesn't work on /dev/null. */
4647 f = fopen (pa->filename, FOPEN_RB);
4649 fatal (_("cannot open: %s: %s"),
4650 pa->filename, strerror (errno));
4654 pa->contents = (bfd_byte *) xmalloc (alloc);
4662 pa->contents = (bfd_byte *) xrealloc (pa->contents, alloc);
4665 got = fread (pa->contents + off, 1, alloc - off, f);
4667 fatal (_("%s: fread failed"), pa->filename);
4678 copy_main (int argc, char *argv[])
4680 char *input_filename = NULL;
4681 char *output_filename = NULL;
4683 char *input_target = NULL;
4684 char *output_target = NULL;
4685 bfd_boolean show_version = FALSE;
4686 bfd_boolean change_warn = TRUE;
4687 bfd_boolean formats_info = FALSE;
4689 struct stat statbuf;
4690 const bfd_arch_info_type *input_arch = NULL;
4692 while ((c = getopt_long (argc, argv, "b:B:i:I:j:K:MN:s:O:d:F:L:G:R:SpgxXHhVvW:wDU",
4693 copy_options, (int *) 0)) != EOF)
4698 copy_byte = atoi (optarg);
4700 fatal (_("byte number must be non-negative"));
4704 input_arch = bfd_scan_arch (optarg);
4705 if (input_arch == NULL)
4706 fatal (_("architecture %s unknown"), optarg);
4712 interleave = atoi (optarg);
4714 fatal (_("interleave must be positive"));
4720 case OPTION_INTERLEAVE_WIDTH:
4721 copy_width = atoi (optarg);
4723 fatal(_("interleave width must be positive"));
4727 case 's': /* "source" - 'I' is preferred */
4728 input_target = optarg;
4732 case 'd': /* "destination" - 'O' is preferred */
4733 output_target = optarg;
4737 input_target = output_target = optarg;
4741 find_section_list (optarg, TRUE, SECTION_CONTEXT_COPY);
4742 sections_copied = TRUE;
4746 handle_remove_section_option (optarg);
4749 case OPTION_REMOVE_RELOCS:
4750 handle_remove_relocations_option (optarg);
4754 strip_symbols = STRIP_ALL;
4758 strip_symbols = STRIP_DEBUG;
4761 case OPTION_STRIP_DWO:
4762 strip_symbols = STRIP_DWO;
4765 case OPTION_STRIP_UNNEEDED:
4766 strip_symbols = STRIP_UNNEEDED;
4769 case OPTION_ONLY_KEEP_DEBUG:
4770 strip_symbols = STRIP_NONDEBUG;
4773 case OPTION_KEEP_FILE_SYMBOLS:
4774 keep_file_symbols = 1;
4777 case OPTION_ADD_GNU_DEBUGLINK:
4778 long_section_names = ENABLE ;
4779 gnu_debuglink_filename = optarg;
4783 add_specific_symbol (optarg, keep_specific_htab);
4789 case OPTION_NO_MERGE_NOTES:
4790 merge_notes = FALSE;
4794 add_specific_symbol (optarg, strip_specific_htab);
4797 case OPTION_STRIP_UNNEEDED_SYMBOL:
4798 add_specific_symbol (optarg, strip_unneeded_htab);
4802 add_specific_symbol (optarg, localize_specific_htab);
4805 case OPTION_GLOBALIZE_SYMBOL:
4806 add_specific_symbol (optarg, globalize_specific_htab);
4810 add_specific_symbol (optarg, keepglobal_specific_htab);
4814 add_specific_symbol (optarg, weaken_specific_htab);
4818 preserve_dates = TRUE;
4822 deterministic = TRUE;
4826 deterministic = FALSE;
4834 discard_locals = LOCALS_ALL;
4838 discard_locals = LOCALS_START_L;
4846 show_version = TRUE;
4849 case OPTION_FORMATS_INFO:
4850 formats_info = TRUE;
4857 case OPTION_ADD_SECTION:
4858 add_sections = init_section_add (optarg, add_sections,
4860 section_add_load_file (add_sections);
4863 case OPTION_UPDATE_SECTION:
4864 update_sections = init_section_add (optarg, update_sections,
4865 "--update-section");
4866 section_add_load_file (update_sections);
4869 case OPTION_DUMP_SECTION:
4870 dump_sections = init_section_add (optarg, dump_sections,
4874 case OPTION_ADD_SYMBOL:
4877 struct addsym_node *newsym = xmalloc (sizeof *newsym);
4879 newsym->next = NULL;
4880 s = strchr (optarg, '=');
4882 fatal (_("bad format for %s"), "--add-symbol");
4883 t = strchr (s + 1, ':');
4885 newsym->symdef = xstrndup (optarg, s - optarg);
4888 newsym->section = xstrndup (s + 1, t - (s + 1));
4889 newsym->symval = strtol (t + 1, NULL, 0);
4893 newsym->section = NULL;
4894 newsym->symval = strtol (s + 1, NULL, 0);
4898 t = strchr (t + 1, ',');
4899 newsym->othersym = NULL;
4901 newsym->flags = parse_symflags (t+1, &newsym->othersym);
4903 newsym->flags = BSF_GLOBAL;
4905 /* Keep 'othersym' symbols at the front of the list. */
4906 if (newsym->othersym)
4908 newsym->next = add_sym_list;
4910 add_sym_tail = &newsym->next;
4911 add_sym_list = newsym;
4915 *add_sym_tail = newsym;
4916 add_sym_tail = &newsym->next;
4922 case OPTION_CHANGE_START:
4923 change_start = parse_vma (optarg, "--change-start");
4926 case OPTION_CHANGE_SECTION_ADDRESS:
4927 case OPTION_CHANGE_SECTION_LMA:
4928 case OPTION_CHANGE_SECTION_VMA:
4930 struct section_list * p;
4931 unsigned int context = 0;
4935 char *option = NULL;
4940 case OPTION_CHANGE_SECTION_ADDRESS:
4941 option = "--change-section-address";
4942 context = SECTION_CONTEXT_ALTER_LMA | SECTION_CONTEXT_ALTER_VMA;
4944 case OPTION_CHANGE_SECTION_LMA:
4945 option = "--change-section-lma";
4946 context = SECTION_CONTEXT_ALTER_LMA;
4948 case OPTION_CHANGE_SECTION_VMA:
4949 option = "--change-section-vma";
4950 context = SECTION_CONTEXT_ALTER_VMA;
4954 s = strchr (optarg, '=');
4957 s = strchr (optarg, '+');
4960 s = strchr (optarg, '-');
4962 fatal (_("bad format for %s"), option);
4967 /* Correct the context. */
4970 case OPTION_CHANGE_SECTION_ADDRESS:
4971 context = SECTION_CONTEXT_SET_LMA | SECTION_CONTEXT_SET_VMA;
4973 case OPTION_CHANGE_SECTION_LMA:
4974 context = SECTION_CONTEXT_SET_LMA;
4976 case OPTION_CHANGE_SECTION_VMA:
4977 context = SECTION_CONTEXT_SET_VMA;
4983 name = (char *) xmalloc (len + 1);
4984 strncpy (name, optarg, len);
4987 p = find_section_list (name, TRUE, context);
4989 val = parse_vma (s + 1, option);
4995 case OPTION_CHANGE_SECTION_ADDRESS:
4999 case OPTION_CHANGE_SECTION_LMA:
5003 case OPTION_CHANGE_SECTION_VMA:
5010 case OPTION_CHANGE_ADDRESSES:
5011 change_section_address = parse_vma (optarg, "--change-addresses");
5012 change_start = change_section_address;
5015 case OPTION_CHANGE_WARNINGS:
5019 case OPTION_CHANGE_LEADING_CHAR:
5020 change_leading_char = TRUE;
5023 case OPTION_COMPRESS_DEBUG_SECTIONS:
5026 if (strcasecmp (optarg, "none") == 0)
5027 do_debug_sections = decompress;
5028 else if (strcasecmp (optarg, "zlib") == 0)
5029 do_debug_sections = compress_zlib;
5030 else if (strcasecmp (optarg, "zlib-gnu") == 0)
5031 do_debug_sections = compress_gnu_zlib;
5032 else if (strcasecmp (optarg, "zlib-gabi") == 0)
5033 do_debug_sections = compress_gabi_zlib;
5035 fatal (_("unrecognized --compress-debug-sections type `%s'"),
5039 do_debug_sections = compress;
5042 case OPTION_DEBUGGING:
5043 convert_debugging = TRUE;
5046 case OPTION_DECOMPRESS_DEBUG_SECTIONS:
5047 do_debug_sections = decompress;
5050 case OPTION_ELF_STT_COMMON:
5051 if (strcasecmp (optarg, "yes") == 0)
5052 do_elf_stt_common = elf_stt_common;
5053 else if (strcasecmp (optarg, "no") == 0)
5054 do_elf_stt_common = no_elf_stt_common;
5056 fatal (_("unrecognized --elf-stt-common= option `%s'"),
5060 case OPTION_GAP_FILL:
5062 bfd_vma gap_fill_vma;
5064 gap_fill_vma = parse_vma (optarg, "--gap-fill");
5065 gap_fill = (bfd_byte) gap_fill_vma;
5066 if ((bfd_vma) gap_fill != gap_fill_vma)
5070 sprintf_vma (buff, gap_fill_vma);
5072 non_fatal (_("Warning: truncating gap-fill from 0x%s to 0x%x"),
5075 gap_fill_set = TRUE;
5079 case OPTION_NO_CHANGE_WARNINGS:
5080 change_warn = FALSE;
5084 pad_to = parse_vma (optarg, "--pad-to");
5088 case OPTION_REMOVE_LEADING_CHAR:
5089 remove_leading_char = TRUE;
5092 case OPTION_REDEFINE_SYM:
5094 /* Insert this redefinition onto redefine_specific_htab. */
5098 const char *nextarg;
5099 char *source, *target;
5101 s = strchr (optarg, '=');
5103 fatal (_("bad format for %s"), "--redefine-sym");
5106 source = (char *) xmalloc (len + 1);
5107 strncpy (source, optarg, len);
5111 len = strlen (nextarg);
5112 target = (char *) xmalloc (len + 1);
5113 strcpy (target, nextarg);
5115 add_redefine_and_check ("--redefine-sym", source, target);
5122 case OPTION_REDEFINE_SYMS:
5123 add_redefine_syms_file (optarg);
5126 case OPTION_SET_SECTION_FLAGS:
5128 struct section_list *p;
5133 s = strchr (optarg, '=');
5135 fatal (_("bad format for %s"), "--set-section-flags");
5138 name = (char *) xmalloc (len + 1);
5139 strncpy (name, optarg, len);
5142 p = find_section_list (name, TRUE, SECTION_CONTEXT_SET_FLAGS);
5144 p->flags = parse_flags (s + 1);
5148 case OPTION_RENAME_SECTION:
5151 const char *eq, *fl;
5156 eq = strchr (optarg, '=');
5158 fatal (_("bad format for %s"), "--rename-section");
5162 fatal (_("bad format for %s"), "--rename-section");
5164 old_name = (char *) xmalloc (len + 1);
5165 strncpy (old_name, optarg, len);
5169 fl = strchr (eq, ',');
5172 flags = parse_flags (fl + 1);
5182 fatal (_("bad format for %s"), "--rename-section");
5184 new_name = (char *) xmalloc (len + 1);
5185 strncpy (new_name, eq, len);
5188 add_section_rename (old_name, new_name, flags);
5192 case OPTION_SET_START:
5193 set_start = parse_vma (optarg, "--set-start");
5194 set_start_set = TRUE;
5197 case OPTION_SREC_LEN:
5198 _bfd_srec_len = parse_vma (optarg, "--srec-len");
5201 case OPTION_SREC_FORCES3:
5202 _bfd_srec_forceS3 = TRUE;
5205 case OPTION_STRIP_SYMBOLS:
5206 add_specific_symbols (optarg, strip_specific_htab);
5209 case OPTION_STRIP_UNNEEDED_SYMBOLS:
5210 add_specific_symbols (optarg, strip_unneeded_htab);
5213 case OPTION_KEEP_SYMBOLS:
5214 add_specific_symbols (optarg, keep_specific_htab);
5217 case OPTION_LOCALIZE_HIDDEN:
5218 localize_hidden = TRUE;
5221 case OPTION_LOCALIZE_SYMBOLS:
5222 add_specific_symbols (optarg, localize_specific_htab);
5225 case OPTION_LONG_SECTION_NAMES:
5226 if (!strcmp ("enable", optarg))
5227 long_section_names = ENABLE;
5228 else if (!strcmp ("disable", optarg))
5229 long_section_names = DISABLE;
5230 else if (!strcmp ("keep", optarg))
5231 long_section_names = KEEP;
5233 fatal (_("unknown long section names option '%s'"), optarg);
5236 case OPTION_GLOBALIZE_SYMBOLS:
5237 add_specific_symbols (optarg, globalize_specific_htab);
5240 case OPTION_KEEPGLOBAL_SYMBOLS:
5241 add_specific_symbols (optarg, keepglobal_specific_htab);
5244 case OPTION_WEAKEN_SYMBOLS:
5245 add_specific_symbols (optarg, weaken_specific_htab);
5248 case OPTION_ALT_MACH_CODE:
5249 use_alt_mach_code = strtoul (optarg, NULL, 0);
5250 if (use_alt_mach_code == 0)
5251 fatal (_("unable to parse alternative machine code"));
5254 case OPTION_PREFIX_SYMBOLS:
5255 prefix_symbols_string = optarg;
5258 case OPTION_PREFIX_SECTIONS:
5259 prefix_sections_string = optarg;
5262 case OPTION_PREFIX_ALLOC_SECTIONS:
5263 prefix_alloc_sections_string = optarg;
5266 case OPTION_READONLY_TEXT:
5267 bfd_flags_to_set |= WP_TEXT;
5268 bfd_flags_to_clear &= ~WP_TEXT;
5271 case OPTION_WRITABLE_TEXT:
5272 bfd_flags_to_clear |= WP_TEXT;
5273 bfd_flags_to_set &= ~WP_TEXT;
5277 bfd_flags_to_set |= D_PAGED;
5278 bfd_flags_to_clear &= ~D_PAGED;
5282 bfd_flags_to_clear |= D_PAGED;
5283 bfd_flags_to_set &= ~D_PAGED;
5286 case OPTION_EXTRACT_DWO:
5287 strip_symbols = STRIP_NONDWO;
5290 case OPTION_EXTRACT_SYMBOL:
5291 extract_symbol = TRUE;
5294 case OPTION_REVERSE_BYTES:
5296 int prev = reverse_bytes;
5298 reverse_bytes = atoi (optarg);
5299 if ((reverse_bytes <= 0) || ((reverse_bytes % 2) != 0))
5300 fatal (_("number of bytes to reverse must be positive and even"));
5302 if (prev && prev != reverse_bytes)
5303 non_fatal (_("Warning: ignoring previous --reverse-bytes value of %d"),
5308 case OPTION_FILE_ALIGNMENT:
5309 pe_file_alignment = parse_vma (optarg, "--file-alignment");
5315 pe_heap_reserve = strtoul (optarg, &end, 0);
5317 || (*end != '.' && *end != '\0'))
5318 non_fatal (_("%s: invalid reserve value for --heap"),
5320 else if (*end != '\0')
5322 pe_heap_commit = strtoul (end + 1, &end, 0);
5324 non_fatal (_("%s: invalid commit value for --heap"),
5330 case OPTION_IMAGE_BASE:
5331 pe_image_base = parse_vma (optarg, "--image-base");
5334 case OPTION_SECTION_ALIGNMENT:
5335 pe_section_alignment = parse_vma (optarg,
5336 "--section-alignment");
5339 case OPTION_SUBSYSTEM:
5340 set_pe_subsystem (optarg);
5346 pe_stack_reserve = strtoul (optarg, &end, 0);
5348 || (*end != '.' && *end != '\0'))
5349 non_fatal (_("%s: invalid reserve value for --stack"),
5351 else if (*end != '\0')
5353 pe_stack_commit = strtoul (end + 1, &end, 0);
5355 non_fatal (_("%s: invalid commit value for --stack"),
5362 /* We've been given a long option. */
5367 copy_usage (stdout, 0);
5370 copy_usage (stderr, 1);
5381 print_version ("objcopy");
5383 if (interleave && copy_byte == -1)
5384 fatal (_("interleave start byte must be set with --byte"));
5386 if (copy_byte >= interleave)
5387 fatal (_("byte number must be less than interleave"));
5389 if (copy_width > interleave - copy_byte)
5390 fatal (_("interleave width must be less than or equal to interleave - byte`"));
5392 if (optind == argc || optind + 2 < argc)
5393 copy_usage (stderr, 1);
5395 input_filename = argv[optind];
5396 if (optind + 1 < argc)
5397 output_filename = argv[optind + 1];
5399 default_deterministic ();
5401 /* Default is to strip no symbols. */
5402 if (strip_symbols == STRIP_UNDEF && discard_locals == LOCALS_UNDEF)
5403 strip_symbols = STRIP_NONE;
5405 if (output_target == NULL)
5406 output_target = input_target;
5408 /* Convert input EFI target to PEI target. */
5409 if (input_target != NULL
5410 && strncmp (input_target, "efi-", 4) == 0)
5414 efi = xstrdup (output_target + 4);
5415 if (strncmp (efi, "bsdrv-", 6) == 0
5416 || strncmp (efi, "rtdrv-", 6) == 0)
5418 else if (strncmp (efi, "app-", 4) != 0)
5419 fatal (_("unknown input EFI target: %s"), input_target);
5422 convert_efi_target (efi);
5425 /* Convert output EFI target to PEI target. */
5426 if (output_target != NULL
5427 && strncmp (output_target, "efi-", 4) == 0)
5431 efi = xstrdup (output_target + 4);
5432 if (strncmp (efi, "app-", 4) == 0)
5434 if (pe_subsystem == -1)
5435 pe_subsystem = IMAGE_SUBSYSTEM_EFI_APPLICATION;
5437 else if (strncmp (efi, "bsdrv-", 6) == 0)
5439 if (pe_subsystem == -1)
5440 pe_subsystem = IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER;
5443 else if (strncmp (efi, "rtdrv-", 6) == 0)
5445 if (pe_subsystem == -1)
5446 pe_subsystem = IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER;
5450 fatal (_("unknown output EFI target: %s"), output_target);
5452 if (pe_file_alignment == (bfd_vma) -1)
5453 pe_file_alignment = PE_DEF_FILE_ALIGNMENT;
5454 if (pe_section_alignment == (bfd_vma) -1)
5455 pe_section_alignment = PE_DEF_SECTION_ALIGNMENT;
5457 output_target = efi;
5458 convert_efi_target (efi);
5462 if (stat (input_filename, & statbuf) < 0)
5463 fatal (_("warning: could not locate '%s'. System error message: %s"),
5464 input_filename, strerror (errno));
5466 /* If there is no destination file, or the source and destination files
5467 are the same, then create a temp and rename the result into the input. */
5468 if (output_filename == NULL
5469 || filename_cmp (input_filename, output_filename) == 0)
5470 tmpname = make_tempname (input_filename);
5472 tmpname = output_filename;
5474 if (tmpname == NULL)
5475 fatal (_("warning: could not create temporary file whilst copying '%s', (error: %s)"),
5476 input_filename, strerror (errno));
5478 copy_file (input_filename, tmpname, input_target, output_target, input_arch);
5482 set_times (tmpname, &statbuf);
5483 if (tmpname != output_filename)
5484 status = (smart_rename (tmpname, input_filename,
5485 preserve_dates) != 0);
5488 unlink_if_ordinary (tmpname);
5490 if (tmpname != output_filename)
5495 struct section_list *p;
5497 for (p = change_sections; p != NULL; p = p->next)
5501 if (p->context & (SECTION_CONTEXT_SET_VMA | SECTION_CONTEXT_ALTER_VMA))
5505 sprintf_vma (buff, p->vma_val);
5507 /* xgettext:c-format */
5508 non_fatal (_("%s %s%c0x%s never used"),
5509 "--change-section-vma",
5511 p->context & SECTION_CONTEXT_SET_VMA ? '=' : '+',
5515 if (p->context & (SECTION_CONTEXT_SET_LMA | SECTION_CONTEXT_ALTER_LMA))
5519 sprintf_vma (buff, p->lma_val);
5521 /* xgettext:c-format */
5522 non_fatal (_("%s %s%c0x%s never used"),
5523 "--change-section-lma",
5525 p->context & SECTION_CONTEXT_SET_LMA ? '=' : '+',
5536 main (int argc, char *argv[])
5538 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
5539 setlocale (LC_MESSAGES, "");
5541 #if defined (HAVE_SETLOCALE)
5542 setlocale (LC_CTYPE, "");
5544 bindtextdomain (PACKAGE, LOCALEDIR);
5545 textdomain (PACKAGE);
5547 program_name = argv[0];
5548 xmalloc_set_program_name (program_name);
5550 START_PROGRESS (program_name, 0);
5552 expandargv (&argc, &argv);
5554 strip_symbols = STRIP_UNDEF;
5555 discard_locals = LOCALS_UNDEF;
5558 set_default_bfd_target ();
5562 int i = strlen (program_name);
5563 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
5564 /* Drop the .exe suffix, if any. */
5565 if (i > 4 && FILENAME_CMP (program_name + i - 4, ".exe") == 0)
5568 program_name[i] = '\0';
5571 is_strip = (i >= 5 && FILENAME_CMP (program_name + i - 5, "strip") == 0);
5574 create_symbol_htabs ();
5577 bfd_set_error_program_name (argv[0]);
5580 strip_main (argc, argv);
5582 copy_main (argc, argv);
5584 END_PROGRESS (program_name);