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. */
1149 /* See whether a symbol should be stripped or kept
1150 based on strip_specific_list and keep_symbols. */
1153 is_specified_symbol_predicate (void **slot, void *data)
1155 struct is_specified_symbol_predicate_data *d =
1156 (struct is_specified_symbol_predicate_data *) data;
1157 const char *slot_name = (char *) *slot;
1159 if (*slot_name != '!')
1161 if (! fnmatch (slot_name, d->name, 0))
1164 /* Continue traversal, there might be a non-match rule. */
1170 if (! fnmatch (slot_name + 1, d->name, 0))
1173 /* Stop traversal. */
1178 /* Continue traversal. */
1183 is_specified_symbol (const char *name, htab_t htab)
1187 struct is_specified_symbol_predicate_data data;
1192 htab_traverse (htab, is_specified_symbol_predicate, &data);
1197 return htab_find (htab, name) != NULL;
1200 /* Return a pointer to the symbol used as a signature for GROUP. */
1203 group_signature (asection *group)
1205 bfd *abfd = group->owner;
1206 Elf_Internal_Shdr *ghdr;
1208 /* PR 20089: An earlier error may have prevented us from loading the symbol table. */
1212 if (bfd_get_flavour (abfd) != bfd_target_elf_flavour)
1215 ghdr = &elf_section_data (group)->this_hdr;
1216 if (ghdr->sh_link == elf_onesymtab (abfd))
1218 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
1219 Elf_Internal_Shdr *symhdr = &elf_symtab_hdr (abfd);
1221 if (ghdr->sh_info > 0
1222 && ghdr->sh_info < symhdr->sh_size / bed->s->sizeof_sym)
1223 return isympp[ghdr->sh_info - 1];
1228 /* Return TRUE if the section is a DWO section. */
1231 is_dwo_section (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1233 const char *name = bfd_get_section_name (abfd, sec);
1234 int len = strlen (name);
1236 return strncmp (name + len - 4, ".dwo", 4) == 0;
1239 /* Return TRUE if section SEC is in the update list. */
1242 is_update_section (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1244 if (update_sections != NULL)
1246 struct section_add *pupdate;
1248 for (pupdate = update_sections;
1250 pupdate = pupdate->next)
1252 if (strcmp (sec->name, pupdate->name) == 0)
1261 is_merged_note_section (bfd * abfd, asection * sec)
1264 && bfd_get_flavour (abfd) == bfd_target_elf_flavour
1265 && elf_section_data (sec)->this_hdr.sh_type == SHT_NOTE
1266 /* FIXME: We currently only support merging GNU_BUILD_NOTEs.
1267 We should add support for more note types. */
1268 && ((elf_section_data (sec)->this_hdr.sh_flags & SHF_GNU_BUILD_NOTE) != 0
1269 /* Old versions of GAS (prior to 2.27) could not set the section
1270 flags to OS-specific values, so we also accept sections with the
1272 || (strcmp (sec->name, GNU_BUILD_ATTRS_SECTION_NAME) == 0)))
1278 /* See if a non-group section is being removed. */
1281 is_strip_section_1 (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1283 if (sections_removed || sections_copied)
1285 struct section_list *p;
1286 struct section_list *q;
1288 p = find_section_list (bfd_get_section_name (abfd, sec), FALSE,
1289 SECTION_CONTEXT_REMOVE);
1290 q = find_section_list (bfd_get_section_name (abfd, sec), FALSE,
1291 SECTION_CONTEXT_COPY);
1294 fatal (_("error: section %s matches both remove and copy options"),
1295 bfd_get_section_name (abfd, sec));
1296 if (p && is_update_section (abfd, sec))
1297 fatal (_("error: section %s matches both update and remove options"),
1298 bfd_get_section_name (abfd, sec));
1302 if (sections_copied && q == NULL)
1306 if ((bfd_get_section_flags (abfd, sec) & SEC_DEBUGGING) != 0)
1308 if (strip_symbols == STRIP_DEBUG
1309 || strip_symbols == STRIP_UNNEEDED
1310 || strip_symbols == STRIP_ALL
1311 || discard_locals == LOCALS_ALL
1312 || convert_debugging)
1314 /* By default we don't want to strip .reloc section.
1315 This section has for pe-coff special meaning. See
1316 pe-dll.c file in ld, and peXXigen.c in bfd for details. */
1317 if (strcmp (bfd_get_section_name (abfd, sec), ".reloc") != 0)
1321 if (strip_symbols == STRIP_DWO)
1322 return is_dwo_section (abfd, sec);
1324 if (strip_symbols == STRIP_NONDEBUG)
1328 if (strip_symbols == STRIP_NONDWO)
1329 return !is_dwo_section (abfd, sec);
1334 /* See if a section is being removed. */
1337 is_strip_section (bfd *abfd ATTRIBUTE_UNUSED, asection *sec)
1339 if (is_strip_section_1 (abfd, sec))
1342 if ((bfd_get_section_flags (abfd, sec) & SEC_GROUP) != 0)
1346 asection *elt, *first;
1348 gsym = group_signature (sec);
1349 /* Strip groups without a valid signature. */
1354 If we are going to strip the group signature symbol, then
1355 strip the group section too. */
1357 if ((strip_symbols == STRIP_ALL
1358 && !is_specified_symbol (gname, keep_specific_htab))
1359 || is_specified_symbol (gname, strip_specific_htab))
1362 /* Remove the group section if all members are removed. */
1363 first = elt = elf_next_in_group (sec);
1366 if (!is_strip_section_1 (abfd, elt))
1368 elt = elf_next_in_group (elt);
1380 is_nondebug_keep_contents_section (bfd *ibfd, asection *isection)
1382 /* Always keep ELF note sections. */
1383 if (ibfd->xvec->flavour == bfd_target_elf_flavour)
1384 return (elf_section_type (isection) == SHT_NOTE);
1386 /* Always keep the .buildid section for PE/COFF.
1388 Strictly, this should be written "always keep the section storing the debug
1389 directory", but that may be the .text section for objects produced by some
1390 tools, which it is not sensible to keep. */
1391 if (ibfd->xvec->flavour == bfd_target_coff_flavour)
1392 return (strcmp (bfd_get_section_name (ibfd, isection), ".buildid") == 0);
1397 /* Return true if SYM is a hidden symbol. */
1400 is_hidden_symbol (asymbol *sym)
1402 elf_symbol_type *elf_sym;
1404 elf_sym = elf_symbol_from (sym->the_bfd, sym);
1405 if (elf_sym != NULL)
1406 switch (ELF_ST_VISIBILITY (elf_sym->internal_elf_sym.st_other))
1416 need_sym_before (struct addsym_node **node, const char *sym)
1419 struct addsym_node *ptr = add_sym_list;
1421 /* 'othersym' symbols are at the front of the list. */
1422 for (count = 0; count < add_symbols; count++)
1426 else if (strcmp (ptr->othersym, sym) == 0)
1428 free (ptr->othersym);
1429 ptr->othersym = ""; /* Empty name is hopefully never a valid symbol name. */
1439 create_new_symbol (struct addsym_node *ptr, bfd *obfd)
1441 asymbol *sym = bfd_make_empty_symbol (obfd);
1443 bfd_asymbol_name (sym) = ptr->symdef;
1444 sym->value = ptr->symval;
1445 sym->flags = ptr->flags;
1448 asection *sec = bfd_get_section_by_name (obfd, ptr->section);
1450 fatal (_("Section %s not found"), ptr->section);
1454 sym->section = bfd_abs_section_ptr;
1458 /* Choose which symbol entries to copy; put the result in OSYMS.
1459 We don't copy in place, because that confuses the relocs.
1460 Return the number of symbols to print. */
1463 filter_symbols (bfd *abfd, bfd *obfd, asymbol **osyms,
1464 asymbol **isyms, long symcount)
1466 asymbol **from = isyms, **to = osyms;
1467 long src_count = 0, dst_count = 0;
1468 int relocatable = (abfd->flags & (EXEC_P | DYNAMIC)) == 0;
1470 for (; src_count < symcount; src_count++)
1472 asymbol *sym = from[src_count];
1473 flagword flags = sym->flags;
1474 char *name = (char *) bfd_asymbol_name (sym);
1476 bfd_boolean used_in_reloc = FALSE;
1477 bfd_boolean undefined;
1478 bfd_boolean rem_leading_char;
1479 bfd_boolean add_leading_char;
1481 undefined = bfd_is_und_section (bfd_get_section (sym));
1485 struct addsym_node *ptr;
1487 if (need_sym_before (&ptr, name))
1488 to[dst_count++] = create_new_symbol (ptr, obfd);
1491 if (htab_elements (redefine_specific_htab) || section_rename_list)
1495 new_name = (char *) lookup_sym_redefinition (name);
1496 if (new_name == name
1497 && (flags & BSF_SECTION_SYM) != 0)
1498 new_name = (char *) find_section_rename (name, NULL);
1499 bfd_asymbol_name (sym) = new_name;
1503 /* Check if we will remove the current leading character. */
1505 (name[0] == bfd_get_symbol_leading_char (abfd))
1506 && (change_leading_char
1507 || (remove_leading_char
1508 && ((flags & (BSF_GLOBAL | BSF_WEAK)) != 0
1510 || bfd_is_com_section (bfd_get_section (sym)))));
1512 /* Check if we will add a new leading character. */
1515 && (bfd_get_symbol_leading_char (obfd) != '\0')
1516 && (bfd_get_symbol_leading_char (abfd) == '\0'
1517 || (name[0] == bfd_get_symbol_leading_char (abfd)));
1519 /* Short circuit for change_leading_char if we can do it in-place. */
1520 if (rem_leading_char && add_leading_char && !prefix_symbols_string)
1522 name[0] = bfd_get_symbol_leading_char (obfd);
1523 bfd_asymbol_name (sym) = name;
1524 rem_leading_char = FALSE;
1525 add_leading_char = FALSE;
1528 /* Remove leading char. */
1529 if (rem_leading_char)
1530 bfd_asymbol_name (sym) = ++name;
1532 /* Add new leading char and/or prefix. */
1533 if (add_leading_char || prefix_symbols_string)
1537 ptr = n = (char *) xmalloc (1 + strlen (prefix_symbols_string)
1538 + strlen (name) + 1);
1539 if (add_leading_char)
1540 *ptr++ = bfd_get_symbol_leading_char (obfd);
1542 if (prefix_symbols_string)
1544 strcpy (ptr, prefix_symbols_string);
1545 ptr += strlen (prefix_symbols_string);
1549 bfd_asymbol_name (sym) = n;
1553 if (strip_symbols == STRIP_ALL)
1555 else if ((flags & BSF_KEEP) != 0 /* Used in relocation. */
1556 || ((flags & BSF_SECTION_SYM) != 0
1557 && ((*bfd_get_section (sym)->symbol_ptr_ptr)->flags
1561 used_in_reloc = TRUE;
1563 else if (relocatable /* Relocatable file. */
1564 && ((flags & (BSF_GLOBAL | BSF_WEAK)) != 0
1565 || bfd_is_com_section (bfd_get_section (sym))))
1567 else if (bfd_decode_symclass (sym) == 'I')
1568 /* Global symbols in $idata sections need to be retained
1569 even if relocatable is FALSE. External users of the
1570 library containing the $idata section may reference these
1573 else if ((flags & BSF_GLOBAL) != 0 /* Global symbol. */
1574 || (flags & BSF_WEAK) != 0
1576 || bfd_is_com_section (bfd_get_section (sym)))
1577 keep = strip_symbols != STRIP_UNNEEDED;
1578 else if ((flags & BSF_DEBUGGING) != 0) /* Debugging symbol. */
1579 keep = (strip_symbols != STRIP_DEBUG
1580 && strip_symbols != STRIP_UNNEEDED
1581 && ! convert_debugging);
1582 else if (bfd_coff_get_comdat_section (abfd, bfd_get_section (sym)))
1583 /* COMDAT sections store special information in local
1584 symbols, so we cannot risk stripping any of them. */
1586 else /* Local symbol. */
1587 keep = (strip_symbols != STRIP_UNNEEDED
1588 && (discard_locals != LOCALS_ALL
1589 && (discard_locals != LOCALS_START_L
1590 || ! bfd_is_local_label (abfd, sym))));
1592 if (keep && is_specified_symbol (name, strip_specific_htab))
1594 /* There are multiple ways to set 'keep' above, but if it
1595 was the relocatable symbol case, then that's an error. */
1598 non_fatal (_("not stripping symbol `%s' because it is named in a relocation"), name);
1606 && !(flags & BSF_KEEP)
1607 && is_specified_symbol (name, strip_unneeded_htab))
1611 && ((keep_file_symbols && (flags & BSF_FILE))
1612 || is_specified_symbol (name, keep_specific_htab)))
1615 if (keep && is_strip_section (abfd, bfd_get_section (sym)))
1620 if ((flags & BSF_GLOBAL) != 0
1621 && (weaken || is_specified_symbol (name, weaken_specific_htab)))
1623 sym->flags &= ~ BSF_GLOBAL;
1624 sym->flags |= BSF_WEAK;
1628 && (flags & (BSF_GLOBAL | BSF_WEAK))
1629 && (is_specified_symbol (name, localize_specific_htab)
1630 || (htab_elements (keepglobal_specific_htab) != 0
1631 && ! is_specified_symbol (name, keepglobal_specific_htab))
1632 || (localize_hidden && is_hidden_symbol (sym))))
1634 sym->flags &= ~ (BSF_GLOBAL | BSF_WEAK);
1635 sym->flags |= BSF_LOCAL;
1639 && (flags & BSF_LOCAL)
1640 && is_specified_symbol (name, globalize_specific_htab))
1642 sym->flags &= ~ BSF_LOCAL;
1643 sym->flags |= BSF_GLOBAL;
1646 to[dst_count++] = sym;
1651 struct addsym_node *ptr = add_sym_list;
1653 for (src_count = 0; src_count < add_symbols; src_count++)
1657 if (strcmp (ptr->othersym, ""))
1658 fatal (_("'before=%s' not found"), ptr->othersym);
1661 to[dst_count++] = create_new_symbol (ptr, obfd);
1667 to[dst_count] = NULL;
1672 /* Find the redefined name of symbol SOURCE. */
1675 lookup_sym_redefinition (const char *source)
1677 struct redefine_node key_node = {(char *) source, NULL};
1678 struct redefine_node *redef_node
1679 = (struct redefine_node *) htab_find (redefine_specific_htab, &key_node);
1681 return redef_node == NULL ? source : redef_node->target;
1684 /* Insert a node into symbol redefine hash tabel. */
1687 add_redefine_and_check (const char *cause, const char *source,
1690 struct redefine_node *new_node
1691 = (struct redefine_node *) xmalloc (sizeof (struct redefine_node));
1693 new_node->source = strdup (source);
1694 new_node->target = strdup (target);
1696 if (htab_find (redefine_specific_htab, new_node) != HTAB_EMPTY_ENTRY)
1697 fatal (_("%s: Multiple redefinition of symbol \"%s\""),
1700 if (htab_find (redefine_specific_reverse_htab, target) != HTAB_EMPTY_ENTRY)
1701 fatal (_("%s: Symbol \"%s\" is target of more than one redefinition"),
1704 /* Insert the NEW_NODE into hash table for quick search. */
1705 add_specific_symbol_node (new_node, redefine_specific_htab);
1707 /* Insert the target string into the reverse hash table, this is needed for
1708 duplicated target string check. */
1709 add_specific_symbol (new_node->target, redefine_specific_reverse_htab);
1713 /* Handle the --redefine-syms option. Read lines containing "old new"
1714 from the file, and add them to the symbol redefine list. */
1717 add_redefine_syms_file (const char *filename)
1726 file = fopen (filename, "r");
1728 fatal (_("couldn't open symbol redefinition file %s (error: %s)"),
1729 filename, strerror (errno));
1732 buf = (char *) xmalloc (bufsize + 1 /* For the terminating NUL. */);
1740 /* Collect the input symbol name. */
1741 while (! IS_WHITESPACE (c) && ! IS_LINE_TERMINATOR (c) && c != EOF)
1749 buf = (char *) xrealloc (buf, bufsize + 1);
1757 /* Eat white space between the symbol names. */
1758 while (IS_WHITESPACE (c))
1760 if (c == '#' || IS_LINE_TERMINATOR (c))
1765 /* Collect the output symbol name. */
1767 while (! IS_WHITESPACE (c) && ! IS_LINE_TERMINATOR (c) && c != EOF)
1775 buf = (char *) xrealloc (buf, bufsize + 1);
1783 /* Eat white space at end of line. */
1784 while (! IS_LINE_TERMINATOR(c) && c != EOF && IS_WHITESPACE (c))
1789 if ((c == '\r' && (c = getc (file)) == '\n')
1790 || c == '\n' || c == EOF)
1793 /* Append the redefinition to the list. */
1795 add_redefine_and_check (filename, &buf[0], &buf[outsym_off]);
1806 fatal (_("%s:%d: garbage found at end of line"), filename, lineno);
1808 if (len != 0 && (outsym_off == 0 || outsym_off == len))
1809 fatal (_("%s:%d: missing new symbol name"), filename, lineno);
1812 /* Eat the rest of the line and finish it. */
1813 while (c != '\n' && c != EOF)
1819 fatal (_("%s:%d: premature end of file"), filename, lineno);
1825 /* Copy unknown object file IBFD onto OBFD.
1826 Returns TRUE upon success, FALSE otherwise. */
1829 copy_unknown_object (bfd *ibfd, bfd *obfd)
1837 if (bfd_stat_arch_elt (ibfd, &buf) != 0)
1839 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
1846 non_fatal (_("stat returns negative size for `%s'"),
1847 bfd_get_archive_filename (ibfd));
1851 if (bfd_seek (ibfd, (file_ptr) 0, SEEK_SET) != 0)
1853 bfd_nonfatal (bfd_get_archive_filename (ibfd));
1858 printf (_("copy from `%s' [unknown] to `%s' [unknown]\n"),
1859 bfd_get_archive_filename (ibfd), bfd_get_filename (obfd));
1861 cbuf = (char *) xmalloc (BUFSIZE);
1863 while (ncopied < size)
1865 tocopy = size - ncopied;
1866 if (tocopy > BUFSIZE)
1869 if (bfd_bread (cbuf, (bfd_size_type) tocopy, ibfd)
1870 != (bfd_size_type) tocopy)
1872 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
1877 if (bfd_bwrite (cbuf, (bfd_size_type) tocopy, obfd)
1878 != (bfd_size_type) tocopy)
1880 bfd_nonfatal_message (NULL, obfd, NULL, NULL);
1888 /* We should at least to be able to read it back when copying an
1889 unknown object in an archive. */
1890 chmod (bfd_get_filename (obfd), buf.st_mode | S_IRUSR);
1895 /* Returns the number of bytes needed to store VAL. */
1897 static inline unsigned int
1898 num_bytes (unsigned long val)
1900 unsigned int count = 0;
1902 /* FIXME: There must be a faster way to do this. */
1911 typedef struct objcopy_internal_note
1913 Elf_Internal_Note note;
1916 bfd_boolean modified;
1917 } objcopy_internal_note;
1919 /* Returns TRUE if a gap does, or could, exist between the address range
1920 covered by PNOTE1 and PNOTE2. */
1923 gap_exists (objcopy_internal_note * pnote1,
1924 objcopy_internal_note * pnote2)
1926 /* Without range end notes, we assume that a gap might exist. */
1927 if (pnote1->end == 0 || pnote2->end == 0)
1930 /* FIXME: Alignment of 16 bytes taken from x86_64 binaries.
1931 Really we should extract the alignment of the section covered by the notes. */
1932 return BFD_ALIGN (pnote1->end, 16) < pnote2->start;
1936 is_open_note (objcopy_internal_note * pnote)
1938 return (pnote->note.type == NT_GNU_BUILD_ATTRIBUTE_OPEN);
1942 is_func_note (objcopy_internal_note * pnote)
1944 return (pnote->note.type == NT_GNU_BUILD_ATTRIBUTE_FUNC);
1948 is_64bit (bfd * abfd)
1950 /* Should never happen, but let's be paranoid. */
1951 if (bfd_get_flavour (abfd) != bfd_target_elf_flavour)
1954 return elf_elfheader (abfd)->e_ident[EI_CLASS] == ELFCLASS64;
1957 /* Merge the notes on SEC, removing redundant entries.
1958 Returns the new, smaller size of the section upon success. */
1960 static bfd_size_type
1961 merge_gnu_build_notes (bfd * abfd, asection * sec, bfd_size_type size, bfd_byte * contents)
1963 objcopy_internal_note * pnotes_end;
1964 objcopy_internal_note * pnotes = NULL;
1965 objcopy_internal_note * pnote;
1966 bfd_size_type remain = size;
1967 unsigned version_1_seen = 0;
1968 unsigned version_2_seen = 0;
1969 unsigned version_3_seen = 0;
1970 bfd_boolean duplicate_found = FALSE;
1971 const char * err = NULL;
1972 bfd_byte * in = contents;
1973 int attribute_type_byte;
1975 unsigned long previous_func_start = 0;
1976 unsigned long previous_open_start = 0;
1977 unsigned long previous_func_end = 0;
1978 unsigned long previous_open_end = 0;
1982 relsize = bfd_get_reloc_upper_bound (abfd, sec);
1988 /* If there are relocs associated with this section then we
1989 cannot safely merge it. */
1990 relpp = (arelent **) xmalloc (relsize);
1991 relcount = bfd_canonicalize_reloc (abfd, sec, relpp, isympp);
1997 /* Make a copy of the notes and convert to our internal format.
1998 Minimum size of a note is 12 bytes. */
1999 pnote = pnotes = (objcopy_internal_note *) xcalloc ((size / 12), sizeof (* pnote));
2000 while (remain >= 12)
2004 pnote->note.namesz = (bfd_get_32 (abfd, in ) + 3) & ~3;
2005 pnote->note.descsz = (bfd_get_32 (abfd, in + 4) + 3) & ~3;
2006 pnote->note.type = bfd_get_32 (abfd, in + 8);
2008 if (pnote->note.type != NT_GNU_BUILD_ATTRIBUTE_OPEN
2009 && pnote->note.type != NT_GNU_BUILD_ATTRIBUTE_FUNC)
2011 err = _("corrupt GNU build attribute note: wrong note type");
2015 if (pnote->note.namesz + pnote->note.descsz + 12 > remain)
2017 err = _("corrupt GNU build attribute note: note too big");
2021 if (pnote->note.namesz < 2)
2023 err = _("corrupt GNU build attribute note: name too small");
2027 pnote->note.namedata = (char *)(in + 12);
2028 pnote->note.descdata = (char *)(in + 12 + pnote->note.namesz);
2030 remain -= 12 + pnote->note.namesz + pnote->note.descsz;
2031 in += 12 + pnote->note.namesz + pnote->note.descsz;
2033 if (pnote->note.namesz > 2
2034 && pnote->note.namedata[0] == '$'
2035 && pnote->note.namedata[1] == GNU_BUILD_ATTRIBUTE_VERSION
2036 && pnote->note.namedata[2] == '1')
2038 else if (pnote->note.namesz > 4
2039 && pnote->note.namedata[0] == 'G'
2040 && pnote->note.namedata[1] == 'A'
2041 && pnote->note.namedata[2] == '$'
2042 && pnote->note.namedata[3] == GNU_BUILD_ATTRIBUTE_VERSION)
2044 if (pnote->note.namedata[4] == '2')
2046 else if (pnote->note.namedata[4] == '3')
2050 err = _("corrupt GNU build attribute note: unsupported version");
2055 switch (pnote->note.descsz)
2062 start = bfd_get_32 (abfd, pnote->note.descdata);
2063 /* FIXME: For version 1 and 2 notes we should try to
2064 calculate the end address by finding a symbol whose
2065 value is START, and then adding in its size.
2067 For now though, since v1 and v2 was not intended to
2068 handle gaps, we chose an artificially large end
2074 if (! is_64bit (abfd))
2076 start = bfd_get_32 (abfd, pnote->note.descdata);
2077 end = bfd_get_32 (abfd, pnote->note.descdata + 4);
2081 start = bfd_get_64 (abfd, pnote->note.descdata);
2082 /* FIXME: For version 1 and 2 notes we should try to
2083 calculate the end address by finding a symbol whose
2084 value is START, and then adding in its size.
2086 For now though, since v1 and v2 was not intended to
2087 handle gaps, we chose an artificially large end
2094 start = bfd_get_64 (abfd, pnote->note.descdata);
2095 end = bfd_get_64 (abfd, pnote->note.descdata + 8);
2099 err = _("corrupt GNU build attribute note: bad description size");
2103 if (is_open_note (pnote))
2106 previous_open_start = start;
2108 pnote->start = previous_open_start;
2111 previous_open_end = end;
2113 pnote->end = previous_open_end;
2118 previous_func_start = start;
2120 pnote->start = previous_func_start;
2123 previous_func_end = end;
2125 pnote->end = previous_func_end;
2128 if (pnote->note.namedata[pnote->note.namesz - 1] != 0)
2130 err = _("corrupt GNU build attribute note: name not NUL terminated");
2139 /* Check that the notes are valid. */
2142 err = _("corrupt GNU build attribute notes: excess data at end");
2146 if (version_1_seen == 0 && version_2_seen == 0 && version_3_seen == 0)
2148 err = _("bad GNU build attribute notes: no known versions detected");
2152 if ((version_1_seen > 0 && version_2_seen > 0)
2153 || (version_1_seen > 0 && version_3_seen > 0)
2154 || (version_2_seen > 0 && version_3_seen > 0))
2156 err = _("bad GNU build attribute notes: multiple different versions");
2160 /* Merging is only needed if there is more than one version note... */
2161 if (version_1_seen == 1 || version_2_seen == 1 || version_3_seen == 1)
2164 attribute_type_byte = version_1_seen ? 1 : 3;
2165 val_start = attribute_type_byte + 1;
2167 /* The first note should be the first version note. */
2168 if (pnotes[0].note.namedata[attribute_type_byte] != GNU_BUILD_ATTRIBUTE_VERSION)
2170 err = _("bad GNU build attribute notes: first note not version note");
2174 /* Now merge the notes. The rules are:
2175 1. Preserve the ordering of the notes.
2176 2. Preserve any NT_GNU_BUILD_ATTRIBUTE_FUNC notes.
2177 3. Eliminate any NT_GNU_BUILD_ATTRIBUTE_OPEN notes that have the same
2178 full name field as the immediately preceeding note with the same type
2179 of name and whose address ranges coincide.
2180 IE - if there are gaps in the coverage of the notes, then these gaps
2182 4. Combine the numeric value of any NT_GNU_BUILD_ATTRIBUTE_OPEN notes
2183 of type GNU_BUILD_ATTRIBUTE_STACK_SIZE.
2184 5. If an NT_GNU_BUILD_ATTRIBUTE_OPEN note is going to be preserved and
2185 its description field is empty then the nearest preceeding OPEN note
2186 with a non-empty description field must also be preserved *OR* the
2187 description field of the note must be changed to contain the starting
2188 address to which it refers.
2189 6. Notes with the same start and end address can be deleted. */
2190 for (pnote = pnotes + 1; pnote < pnotes_end; pnote ++)
2193 objcopy_internal_note * back;
2194 objcopy_internal_note * prev_open_with_range = NULL;
2196 /* Rule 6 - delete 0-range notes. */
2197 if (pnote->start == pnote->end)
2199 duplicate_found = TRUE;
2200 pnote->note.type = 0;
2204 /* Rule 2 - preserve function notes. */
2205 if (! is_open_note (pnote))
2209 /* Check to see if there is an identical previous function note.
2210 This can happen with overlays for example. */
2211 for (iter = 0, back = pnote -1; back >= pnotes; back --)
2213 if (back->start == pnote->start
2214 && back->end == pnote->end
2215 && back->note.namesz == pnote->note.namesz
2216 && memcmp (back->note.namedata, pnote->note.namedata, pnote->note.namesz) == 0)
2218 fprintf (stderr, "DUP FUNXC\n");
2219 duplicate_found = TRUE;
2220 pnote->note.type = 0;
2224 /* Don't scan too far back however. */
2231 note_type = pnote->note.namedata[attribute_type_byte];
2233 /* Scan backwards from pnote, looking for duplicates.
2234 Clear the type field of any found - but do not delete them just yet. */
2235 for (back = pnote - 1; back >= pnotes; back --)
2237 int back_type = back->note.namedata[attribute_type_byte];
2239 /* If this is the first open note with an address
2240 range that we have encountered then record it. */
2241 if (prev_open_with_range == NULL
2242 && back->note.descsz > 0
2243 && ! is_func_note (back))
2244 prev_open_with_range = back;
2246 if (! is_open_note (back))
2249 /* If the two notes are different then keep on searching. */
2250 if (back_type != note_type)
2253 /* Rule 4 - combine stack size notes. */
2254 if (back_type == GNU_BUILD_ATTRIBUTE_STACK_SIZE)
2256 unsigned char * name;
2257 unsigned long note_val;
2258 unsigned long back_val;
2263 for (shift = 0, note_val = 0,
2264 bytes = pnote->note.namesz - val_start,
2265 name = (unsigned char *) pnote->note.namedata + val_start;
2268 byte = (* name ++) & 0xff;
2269 note_val |= byte << shift;
2273 for (shift = 0, back_val = 0,
2274 bytes = back->note.namesz - val_start,
2275 name = (unsigned char *) back->note.namedata + val_start;
2278 byte = (* name ++) & 0xff;
2279 back_val |= byte << shift;
2283 back_val += note_val;
2284 if (num_bytes (back_val) >= back->note.namesz - val_start)
2286 /* We have a problem - the new value requires more bytes of
2287 storage in the name field than are available. Currently
2288 we have no way of fixing this, so we just preserve both
2293 /* Write the new val into back. */
2294 name = (unsigned char *) back->note.namedata + val_start;
2295 while (name < (unsigned char *) back->note.namedata
2296 + back->note.namesz)
2298 byte = back_val & 0xff;
2305 duplicate_found = TRUE;
2306 pnote->note.type = 0;
2310 /* Rule 3 - combine identical open notes. */
2311 if (back->note.namesz == pnote->note.namesz
2312 && memcmp (back->note.namedata,
2313 pnote->note.namedata, back->note.namesz) == 0
2314 && ! gap_exists (back, pnote))
2316 duplicate_found = TRUE;
2317 pnote->note.type = 0;
2319 if (pnote->end > back->end)
2320 back->end = pnote->end;
2323 back->modified = TRUE;
2327 /* Rule 5 - Since we are keeping this note we must check to see
2328 if its description refers back to an earlier OPEN version
2329 note that has been scheduled for deletion. If so then we
2330 must make sure that version note is also preserved. */
2333 /* As of version 3 we can just
2334 move the range into the note. */
2335 pnote->modified = TRUE;
2336 pnote->note.type = NT_GNU_BUILD_ATTRIBUTE_FUNC;
2337 back->modified = TRUE;
2338 back->note.type = NT_GNU_BUILD_ATTRIBUTE_FUNC;
2342 if (pnote->note.descsz == 0
2343 && prev_open_with_range != NULL
2344 && prev_open_with_range->note.type == 0)
2345 prev_open_with_range->note.type = NT_GNU_BUILD_ATTRIBUTE_OPEN;
2348 /* We have found a similar attribute but the details do not match.
2349 Stop searching backwards. */
2354 if (duplicate_found)
2356 bfd_byte * new_contents;
2359 bfd_size_type new_size;
2360 bfd_vma prev_start = 0;
2361 bfd_vma prev_end = 0;
2363 /* Eliminate the duplicates. */
2364 new = new_contents = xmalloc (size);
2365 for (pnote = pnotes, old = contents;
2369 bfd_size_type note_size = 12 + pnote->note.namesz + pnote->note.descsz;
2371 if (pnote->note.type != 0)
2373 if (pnote->modified)
2375 /* If the note has been modified then we must copy it by
2376 hand, potentially adding in a new description field. */
2377 if (pnote->start == prev_start && pnote->end == prev_end)
2379 bfd_put_32 (abfd, pnote->note.namesz, new);
2380 bfd_put_32 (abfd, 0, new + 4);
2381 bfd_put_32 (abfd, pnote->note.type, new + 8);
2383 memcpy (new, pnote->note.namedata, pnote->note.namesz);
2384 new += pnote->note.namesz;
2388 bfd_put_32 (abfd, pnote->note.namesz, new);
2389 bfd_put_32 (abfd, is_64bit (abfd) ? 16 : 8, new + 4);
2390 bfd_put_32 (abfd, pnote->note.type, new + 8);
2392 memcpy (new, pnote->note.namedata, pnote->note.namesz);
2393 new += pnote->note.namesz;
2394 if (is_64bit (abfd))
2396 bfd_put_64 (abfd, pnote->start, new);
2397 bfd_put_64 (abfd, pnote->end, new + 8);
2402 bfd_put_32 (abfd, pnote->start, new);
2403 bfd_put_32 (abfd, pnote->end, new + 4);
2410 memcpy (new, old, note_size);
2413 prev_start = pnote->start;
2414 prev_end = pnote->end;
2420 new_size = new - new_contents;
2421 memcpy (contents, new_contents, new_size);
2423 free (new_contents);
2429 bfd_set_error (bfd_error_bad_value);
2430 bfd_nonfatal_message (NULL, abfd, sec, err);
2438 /* Copy object file IBFD onto OBFD.
2439 Returns TRUE upon success, FALSE otherwise. */
2442 copy_object (bfd *ibfd, bfd *obfd, const bfd_arch_info_type *input_arch)
2446 asection **osections = NULL;
2448 asection *gnu_debuglink_section = NULL;
2449 bfd_size_type *gaps = NULL;
2450 bfd_size_type max_gap = 0;
2453 enum bfd_architecture iarch;
2457 if (ibfd->xvec->byteorder != obfd->xvec->byteorder
2458 && ibfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN
2459 && obfd->xvec->byteorder != BFD_ENDIAN_UNKNOWN)
2461 /* PR 17636: Call non-fatal so that we return to our parent who
2462 may need to tidy temporary files. */
2463 non_fatal (_("Unable to change endianness of input file(s)"));
2467 if (!bfd_set_format (obfd, bfd_get_format (ibfd)))
2469 bfd_nonfatal_message (NULL, obfd, NULL, NULL);
2473 if (ibfd->sections == NULL)
2475 non_fatal (_("error: the input file '%s' has no sections"),
2476 bfd_get_archive_filename (ibfd));
2480 if (ibfd->xvec->flavour != bfd_target_elf_flavour)
2482 if ((do_debug_sections & compress) != 0
2483 && do_debug_sections != compress)
2485 non_fatal (_("--compress-debug-sections=[zlib|zlib-gnu|zlib-gabi] is unsupported on `%s'"),
2486 bfd_get_archive_filename (ibfd));
2490 if (do_elf_stt_common)
2492 non_fatal (_("--elf-stt-common=[yes|no] is unsupported on `%s'"),
2493 bfd_get_archive_filename (ibfd));
2499 printf (_("copy from `%s' [%s] to `%s' [%s]\n"),
2500 bfd_get_archive_filename (ibfd), bfd_get_target (ibfd),
2501 bfd_get_filename (obfd), bfd_get_target (obfd));
2510 start = bfd_get_start_address (ibfd);
2511 start += change_start;
2514 /* Neither the start address nor the flags
2515 need to be set for a core file. */
2516 if (bfd_get_format (obfd) != bfd_core)
2520 flags = bfd_get_file_flags (ibfd);
2521 flags |= bfd_flags_to_set;
2522 flags &= ~bfd_flags_to_clear;
2523 flags &= bfd_applicable_file_flags (obfd);
2525 if (strip_symbols == STRIP_ALL)
2526 flags &= ~HAS_RELOC;
2528 if (!bfd_set_start_address (obfd, start)
2529 || !bfd_set_file_flags (obfd, flags))
2531 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
2536 /* Copy architecture of input file to output file. */
2537 iarch = bfd_get_arch (ibfd);
2538 imach = bfd_get_mach (ibfd);
2541 if (bfd_get_arch_info (ibfd) == NULL
2542 || bfd_get_arch_info (ibfd)->arch == bfd_arch_unknown)
2544 iarch = input_arch->arch;
2545 imach = input_arch->mach;
2548 non_fatal (_("Input file `%s' ignores binary architecture parameter."),
2549 bfd_get_archive_filename (ibfd));
2551 if (!bfd_set_arch_mach (obfd, iarch, imach)
2552 && (ibfd->target_defaulted
2553 || bfd_get_arch (ibfd) != bfd_get_arch (obfd)))
2555 if (bfd_get_arch (ibfd) == bfd_arch_unknown)
2556 non_fatal (_("Unable to recognise the format of the input file `%s'"),
2557 bfd_get_archive_filename (ibfd));
2559 non_fatal (_("Output file cannot represent architecture `%s'"),
2560 bfd_printable_arch_mach (bfd_get_arch (ibfd),
2561 bfd_get_mach (ibfd)));
2565 if (!bfd_set_format (obfd, bfd_get_format (ibfd)))
2567 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
2571 if (bfd_get_flavour (obfd) == bfd_target_coff_flavour
2572 && bfd_pei_p (obfd))
2574 /* Set up PE parameters. */
2575 pe_data_type *pe = pe_data (obfd);
2577 /* Copy PE parameters before changing them. */
2578 if (ibfd->xvec->flavour == bfd_target_coff_flavour
2579 && bfd_pei_p (ibfd))
2580 pe->pe_opthdr = pe_data (ibfd)->pe_opthdr;
2582 if (pe_file_alignment != (bfd_vma) -1)
2583 pe->pe_opthdr.FileAlignment = pe_file_alignment;
2585 pe_file_alignment = PE_DEF_FILE_ALIGNMENT;
2587 if (pe_heap_commit != (bfd_vma) -1)
2588 pe->pe_opthdr.SizeOfHeapCommit = pe_heap_commit;
2590 if (pe_heap_reserve != (bfd_vma) -1)
2591 pe->pe_opthdr.SizeOfHeapCommit = pe_heap_reserve;
2593 if (pe_image_base != (bfd_vma) -1)
2594 pe->pe_opthdr.ImageBase = pe_image_base;
2596 if (pe_section_alignment != (bfd_vma) -1)
2597 pe->pe_opthdr.SectionAlignment = pe_section_alignment;
2599 pe_section_alignment = PE_DEF_SECTION_ALIGNMENT;
2601 if (pe_stack_commit != (bfd_vma) -1)
2602 pe->pe_opthdr.SizeOfStackCommit = pe_stack_commit;
2604 if (pe_stack_reserve != (bfd_vma) -1)
2605 pe->pe_opthdr.SizeOfStackCommit = pe_stack_reserve;
2607 if (pe_subsystem != -1)
2608 pe->pe_opthdr.Subsystem = pe_subsystem;
2610 if (pe_major_subsystem_version != -1)
2611 pe->pe_opthdr.MajorSubsystemVersion = pe_major_subsystem_version;
2613 if (pe_minor_subsystem_version != -1)
2614 pe->pe_opthdr.MinorSubsystemVersion = pe_minor_subsystem_version;
2616 if (pe_file_alignment > pe_section_alignment)
2618 char file_alignment[20], section_alignment[20];
2620 sprintf_vma (file_alignment, pe_file_alignment);
2621 sprintf_vma (section_alignment, pe_section_alignment);
2622 non_fatal (_("warning: file alignment (0x%s) > section alignment (0x%s)"),
2624 file_alignment, section_alignment);
2631 if (osympp != isympp)
2637 symsize = bfd_get_symtab_upper_bound (ibfd);
2640 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
2644 osympp = isympp = (asymbol **) xmalloc (symsize);
2645 symcount = bfd_canonicalize_symtab (ibfd, isympp);
2648 bfd_nonfatal_message (NULL, ibfd, NULL, NULL);
2651 /* PR 17512: file: d6323821
2652 If the symbol table could not be loaded do not pretend that we have
2653 any symbols. This trips us up later on when we load the relocs. */
2657 osympp = isympp = NULL;
2660 /* BFD mandates that all output sections be created and sizes set before
2661 any output is done. Thus, we traverse all sections multiple times. */
2662 bfd_map_over_sections (ibfd, setup_section, obfd);
2664 if (!extract_symbol)
2665 setup_bfd_headers (ibfd, obfd);
2667 if (add_sections != NULL)
2669 struct section_add *padd;
2670 struct section_list *pset;
2672 for (padd = add_sections; padd != NULL; padd = padd->next)
2676 pset = find_section_list (padd->name, FALSE,
2677 SECTION_CONTEXT_SET_FLAGS);
2679 flags = pset->flags | SEC_HAS_CONTENTS;
2681 flags = SEC_HAS_CONTENTS | SEC_READONLY | SEC_DATA;
2683 /* bfd_make_section_with_flags() does not return very helpful
2684 error codes, so check for the most likely user error first. */
2685 if (bfd_get_section_by_name (obfd, padd->name))
2687 bfd_nonfatal_message (NULL, obfd, NULL,
2688 _("can't add section '%s'"), padd->name);
2693 /* We use LINKER_CREATED here so that the backend hooks
2694 will create any special section type information,
2695 instead of presuming we know what we're doing merely
2696 because we set the flags. */
2697 padd->section = bfd_make_section_with_flags
2698 (obfd, padd->name, flags | SEC_LINKER_CREATED);
2699 if (padd->section == NULL)
2701 bfd_nonfatal_message (NULL, obfd, NULL,
2702 _("can't create section `%s'"),
2708 if (! bfd_set_section_size (obfd, padd->section, padd->size))
2710 bfd_nonfatal_message (NULL, obfd, padd->section, NULL);
2714 pset = find_section_list (padd->name, FALSE,
2715 SECTION_CONTEXT_SET_VMA | SECTION_CONTEXT_ALTER_VMA);
2717 && ! bfd_set_section_vma (obfd, padd->section, pset->vma_val))
2719 bfd_nonfatal_message (NULL, obfd, padd->section, NULL);
2723 pset = find_section_list (padd->name, FALSE,
2724 SECTION_CONTEXT_SET_LMA | SECTION_CONTEXT_ALTER_LMA);
2727 padd->section->lma = pset->lma_val;
2729 if (! bfd_set_section_alignment
2730 (obfd, padd->section,
2731 bfd_section_alignment (obfd, padd->section)))
2733 bfd_nonfatal_message (NULL, obfd, padd->section, NULL);
2740 if (update_sections != NULL)
2742 struct section_add *pupdate;
2744 for (pupdate = update_sections;
2746 pupdate = pupdate->next)
2748 pupdate->section = bfd_get_section_by_name (ibfd, pupdate->name);
2749 if (pupdate->section == NULL)
2751 non_fatal (_("error: %s not found, can't be updated"), pupdate->name);
2755 osec = pupdate->section->output_section;
2756 if (! bfd_set_section_size (obfd, osec, pupdate->size))
2758 bfd_nonfatal_message (NULL, obfd, osec, NULL);
2766 /* This palaver is necessary because we must set the output
2767 section size first, before its contents are ready. */
2768 osec = bfd_get_section_by_name (ibfd, GNU_BUILD_ATTRS_SECTION_NAME);
2769 if (osec && is_merged_note_section (ibfd, osec))
2773 size = bfd_get_section_size (osec);
2776 bfd_nonfatal_message (NULL, ibfd, osec, _("warning: note section is empty"));
2777 merge_notes = FALSE;
2779 else if (! bfd_get_full_section_contents (ibfd, osec, & merged_notes))
2781 bfd_nonfatal_message (NULL, ibfd, osec, _("warning: could not load note section"));
2782 free (merged_notes);
2783 merged_notes = NULL;
2784 merge_notes = FALSE;
2788 merged_size = merge_gnu_build_notes (ibfd, osec, size, merged_notes);
2789 if (merged_size == size)
2791 /* Merging achieves nothing. */
2792 free (merged_notes);
2793 merged_notes = NULL;
2794 merge_notes = FALSE;
2799 if (osec->output_section == NULL
2800 || ! bfd_set_section_size (obfd, osec->output_section, merged_size))
2802 bfd_nonfatal_message (NULL, obfd, osec, _("warning: failed to set merged notes size"));
2803 free (merged_notes);
2804 merged_notes = NULL;
2805 merge_notes = FALSE;
2813 if (dump_sections != NULL)
2815 struct section_add * pdump;
2817 for (pdump = dump_sections; pdump != NULL; pdump = pdump->next)
2819 osec = bfd_get_section_by_name (ibfd, pdump->name);
2822 bfd_nonfatal_message (NULL, ibfd, NULL,
2823 _("can't dump section '%s' - it does not exist"),
2828 if ((bfd_get_section_flags (ibfd, osec) & SEC_HAS_CONTENTS) == 0)
2830 bfd_nonfatal_message (NULL, ibfd, osec,
2831 _("can't dump section - it has no contents"));
2835 bfd_size_type size = bfd_get_section_size (osec);
2838 bfd_nonfatal_message (NULL, ibfd, osec,
2839 _("can't dump section - it is empty"));
2844 f = fopen (pdump->filename, FOPEN_WB);
2847 bfd_nonfatal_message (pdump->filename, NULL, NULL,
2848 _("could not open section dump file"));
2853 if (bfd_malloc_and_get_section (ibfd, osec, &contents))
2855 if (fwrite (contents, 1, size, f) != size)
2857 non_fatal (_("error writing section contents to %s (error: %s)"),
2866 bfd_nonfatal_message (NULL, ibfd, osec,
2867 _("could not retrieve section contents"));
2874 if (gnu_debuglink_filename != NULL)
2876 /* PR 15125: Give a helpful warning message if
2877 the debuglink section already exists, and
2878 allow the rest of the copy to complete. */
2879 if (bfd_get_section_by_name (obfd, ".gnu_debuglink"))
2881 non_fatal (_("%s: debuglink section already exists"),
2882 bfd_get_filename (obfd));
2883 gnu_debuglink_filename = NULL;
2887 gnu_debuglink_section = bfd_create_gnu_debuglink_section
2888 (obfd, gnu_debuglink_filename);
2890 if (gnu_debuglink_section == NULL)
2892 bfd_nonfatal_message (NULL, obfd, NULL,
2893 _("cannot create debug link section `%s'"),
2894 gnu_debuglink_filename);
2898 /* Special processing for PE format files. We
2899 have no way to distinguish PE from COFF here. */
2900 if (bfd_get_flavour (obfd) == bfd_target_coff_flavour)
2902 bfd_vma debuglink_vma;
2903 asection * highest_section;
2905 /* The PE spec requires that all sections be adjacent and sorted
2906 in ascending order of VMA. It also specifies that debug
2907 sections should be last. This is despite the fact that debug
2908 sections are not loaded into memory and so in theory have no
2911 This means that the debuglink section must be given a non-zero
2912 VMA which makes it contiguous with other debug sections. So
2913 walk the current section list, find the section with the
2914 highest VMA and start the debuglink section after that one. */
2915 for (osec = obfd->sections, highest_section = NULL;
2919 && (highest_section == NULL
2920 || osec->vma > highest_section->vma))
2921 highest_section = osec;
2923 if (highest_section)
2924 debuglink_vma = BFD_ALIGN (highest_section->vma
2925 + highest_section->size,
2926 /* FIXME: We ought to be using
2927 COFF_PAGE_SIZE here or maybe
2928 bfd_get_section_alignment() (if it
2929 was set) but since this is for PE
2930 and we know the required alignment
2931 it is easier just to hard code it. */
2934 /* Umm, not sure what to do in this case. */
2935 debuglink_vma = 0x1000;
2937 bfd_set_section_vma (obfd, gnu_debuglink_section, debuglink_vma);
2942 c = bfd_count_sections (obfd);
2944 && (gap_fill_set || pad_to_set))
2948 /* We must fill in gaps between the sections and/or we must pad
2949 the last section to a specified address. We do this by
2950 grabbing a list of the sections, sorting them by VMA, and
2951 increasing the section sizes as required to fill the gaps.
2952 We write out the gap contents below. */
2954 osections = (asection **) xmalloc (c * sizeof (asection *));
2956 bfd_map_over_sections (obfd, get_sections, &set);
2958 qsort (osections, c, sizeof (asection *), compare_section_lma);
2960 gaps = (bfd_size_type *) xmalloc (c * sizeof (bfd_size_type));
2961 memset (gaps, 0, c * sizeof (bfd_size_type));
2965 for (i = 0; i < c - 1; i++)
2969 bfd_vma gap_start, gap_stop;
2971 flags = bfd_get_section_flags (obfd, osections[i]);
2972 if ((flags & SEC_HAS_CONTENTS) == 0
2973 || (flags & SEC_LOAD) == 0)
2976 size = bfd_section_size (obfd, osections[i]);
2977 gap_start = bfd_section_lma (obfd, osections[i]) + size;
2978 gap_stop = bfd_section_lma (obfd, osections[i + 1]);
2979 if (gap_start < gap_stop)
2981 if (! bfd_set_section_size (obfd, osections[i],
2982 size + (gap_stop - gap_start)))
2984 bfd_nonfatal_message (NULL, obfd, osections[i],
2985 _("Can't fill gap after section"));
2989 gaps[i] = gap_stop - gap_start;
2990 if (max_gap < gap_stop - gap_start)
2991 max_gap = gap_stop - gap_start;
3001 lma = bfd_section_lma (obfd, osections[c - 1]);
3002 size = bfd_section_size (obfd, osections[c - 1]);
3003 if (lma + size < pad_to)
3005 if (! bfd_set_section_size (obfd, osections[c - 1],
3008 bfd_nonfatal_message (NULL, obfd, osections[c - 1],
3009 _("can't add padding"));
3014 gaps[c - 1] = pad_to - (lma + size);
3015 if (max_gap < pad_to - (lma + size))
3016 max_gap = pad_to - (lma + size);
3022 /* Symbol filtering must happen after the output sections
3023 have been created, but before their contents are set. */
3025 if (convert_debugging)
3026 dhandle = read_debugging_info (ibfd, isympp, symcount, FALSE);
3028 if (strip_symbols == STRIP_DEBUG
3029 || strip_symbols == STRIP_ALL
3030 || strip_symbols == STRIP_UNNEEDED
3031 || strip_symbols == STRIP_NONDEBUG
3032 || strip_symbols == STRIP_DWO
3033 || strip_symbols == STRIP_NONDWO
3034 || discard_locals != LOCALS_UNDEF
3036 || htab_elements (strip_specific_htab) != 0
3037 || htab_elements (keep_specific_htab) != 0
3038 || htab_elements (localize_specific_htab) != 0
3039 || htab_elements (globalize_specific_htab) != 0
3040 || htab_elements (keepglobal_specific_htab) != 0
3041 || htab_elements (weaken_specific_htab) != 0
3042 || htab_elements (redefine_specific_htab) != 0
3043 || prefix_symbols_string
3046 || convert_debugging
3047 || change_leading_char
3048 || remove_leading_char
3049 || section_rename_list
3053 /* Mark symbols used in output relocations so that they
3054 are kept, even if they are local labels or static symbols.
3056 Note we iterate over the input sections examining their
3057 relocations since the relocations for the output sections
3058 haven't been set yet. mark_symbols_used_in_relocations will
3059 ignore input sections which have no corresponding output
3061 if (strip_symbols != STRIP_ALL)
3063 bfd_set_error (bfd_error_no_error);
3064 bfd_map_over_sections (ibfd,
3065 mark_symbols_used_in_relocations,
3067 if (bfd_get_error () != bfd_error_no_error)
3074 osympp = (asymbol **) xmalloc ((symcount + add_symbols + 1) * sizeof (asymbol *));
3075 symcount = filter_symbols (ibfd, obfd, osympp, isympp, symcount);
3078 if (convert_debugging && dhandle != NULL)
3080 if (! write_debugging_info (obfd, dhandle, &symcount, &osympp))
3087 bfd_set_symtab (obfd, osympp, symcount);
3089 /* This has to happen before section positions are set. */
3090 bfd_map_over_sections (ibfd, copy_relocations_in_section, obfd);
3092 /* This has to happen after the symbol table has been set. */
3093 bfd_map_over_sections (ibfd, copy_section, obfd);
3095 if (add_sections != NULL)
3097 struct section_add *padd;
3099 for (padd = add_sections; padd != NULL; padd = padd->next)
3101 if (! bfd_set_section_contents (obfd, padd->section, padd->contents,
3104 bfd_nonfatal_message (NULL, obfd, padd->section, NULL);
3110 if (update_sections != NULL)
3112 struct section_add *pupdate;
3114 for (pupdate = update_sections;
3116 pupdate = pupdate->next)
3118 osec = pupdate->section->output_section;
3119 if (! bfd_set_section_contents (obfd, osec, pupdate->contents,
3122 bfd_nonfatal_message (NULL, obfd, osec, NULL);
3130 osec = bfd_get_section_by_name (obfd, GNU_BUILD_ATTRS_SECTION_NAME);
3131 if (osec && is_merged_note_section (obfd, osec))
3133 if (! bfd_set_section_contents (obfd, osec, merged_notes, 0, merged_size))
3135 bfd_nonfatal_message (NULL, obfd, osec, _("error: failed to copy merged notes into output"));
3139 else if (! is_strip)
3140 bfd_nonfatal_message (NULL, obfd, osec, _("could not find any mergeable note sections"));
3141 free (merged_notes);
3142 merged_notes = NULL;
3143 merge_notes = FALSE;
3146 if (gnu_debuglink_filename != NULL)
3148 if (! bfd_fill_in_gnu_debuglink_section
3149 (obfd, gnu_debuglink_section, gnu_debuglink_filename))
3151 bfd_nonfatal_message (NULL, obfd, NULL,
3152 _("cannot fill debug link section `%s'"),
3153 gnu_debuglink_filename);
3158 if (gap_fill_set || pad_to_set)
3162 /* Fill in the gaps. */
3165 buf = (bfd_byte *) xmalloc (max_gap);
3166 memset (buf, gap_fill, max_gap);
3168 c = bfd_count_sections (obfd);
3169 for (i = 0; i < c; i++)
3177 off = bfd_section_size (obfd, osections[i]) - left;
3188 if (! bfd_set_section_contents (obfd, osections[i], buf,
3191 bfd_nonfatal_message (NULL, obfd, osections[i], NULL);
3207 /* Allow the BFD backend to copy any private data it understands
3208 from the input BFD to the output BFD. This is done last to
3209 permit the routine to look at the filtered symbol table, which is
3210 important for the ECOFF code at least. */
3211 if (! bfd_copy_private_bfd_data (ibfd, obfd))
3213 bfd_nonfatal_message (NULL, obfd, NULL,
3214 _("error copying private BFD data"));
3218 /* Switch to the alternate machine code. We have to do this at the
3219 very end, because we only initialize the header when we create
3220 the first section. */
3221 if (use_alt_mach_code != 0)
3223 if (! bfd_alt_mach_code (obfd, use_alt_mach_code))
3225 non_fatal (_("this target does not support %lu alternative machine codes"),
3227 if (bfd_get_flavour (obfd) == bfd_target_elf_flavour)
3229 non_fatal (_("treating that number as an absolute e_machine value instead"));
3230 elf_elfheader (obfd)->e_machine = use_alt_mach_code;
3233 non_fatal (_("ignoring the alternative value"));
3240 /* Read each archive element in turn from IBFD, copy the
3241 contents to temp file, and keep the temp file handle.
3242 If 'force_output_target' is TRUE then make sure that
3243 all elements in the new archive are of the type
3247 copy_archive (bfd *ibfd, bfd *obfd, const char *output_target,
3248 bfd_boolean force_output_target,
3249 const bfd_arch_info_type *input_arch)
3253 struct name_list *next;
3257 bfd **ptr = &obfd->archive_head;
3260 const char *filename;
3262 /* Make a temp directory to hold the contents. */
3263 dir = make_tempdir (bfd_get_filename (obfd));
3265 fatal (_("cannot create tempdir for archive copying (error: %s)"),
3268 if (strip_symbols == STRIP_ALL)
3269 obfd->has_armap = FALSE;
3271 obfd->has_armap = ibfd->has_armap;
3272 obfd->is_thin_archive = ibfd->is_thin_archive;
3275 obfd->flags |= BFD_DETERMINISTIC_OUTPUT;
3279 this_element = bfd_openr_next_archived_file (ibfd, NULL);
3281 if (!bfd_set_format (obfd, bfd_get_format (ibfd)))
3284 bfd_nonfatal_message (NULL, obfd, NULL, NULL);
3285 goto cleanup_and_exit;
3288 while (!status && this_element != NULL)
3294 int stat_status = 0;
3295 bfd_boolean del = TRUE;
3296 bfd_boolean ok_object;
3298 /* PR binutils/17533: Do not allow directory traversal
3299 outside of the current directory tree by archive members. */
3300 if (! is_valid_archive_path (bfd_get_filename (this_element)))
3302 non_fatal (_("illegal pathname found in archive member: %s"),
3303 bfd_get_filename (this_element));
3305 goto cleanup_and_exit;
3308 /* Create an output file for this member. */
3309 output_name = concat (dir, "/",
3310 bfd_get_filename (this_element), (char *) 0);
3312 /* If the file already exists, make another temp dir. */
3313 if (stat (output_name, &buf) >= 0)
3315 char * tmpdir = make_tempdir (output_name);
3320 non_fatal (_("cannot create tempdir for archive copying (error: %s)"),
3323 goto cleanup_and_exit;
3326 l = (struct name_list *) xmalloc (sizeof (struct name_list));
3331 output_name = concat (tmpdir, "/",
3332 bfd_get_filename (this_element), (char *) 0);
3337 stat_status = bfd_stat_arch_elt (this_element, &buf);
3339 if (stat_status != 0)
3340 non_fatal (_("internal stat error on %s"),
3341 bfd_get_filename (this_element));
3344 l = (struct name_list *) xmalloc (sizeof (struct name_list));
3345 l->name = output_name;
3350 ok_object = bfd_check_format (this_element, bfd_object);
3352 bfd_nonfatal_message (NULL, this_element, NULL,
3353 _("Unable to recognise the format of file"));
3355 /* PR binutils/3110: Cope with archives
3356 containing multiple target types. */
3357 if (force_output_target || !ok_object)
3358 output_bfd = bfd_openw (output_name, output_target);
3360 output_bfd = bfd_openw (output_name, bfd_get_target (this_element));
3362 if (output_bfd == NULL)
3364 bfd_nonfatal_message (output_name, NULL, NULL, NULL);
3366 goto cleanup_and_exit;
3371 del = !copy_object (this_element, output_bfd, input_arch);
3373 if (del && bfd_get_arch (this_element) == bfd_arch_unknown)
3374 /* Try again as an unknown object file. */
3376 else if (!bfd_close (output_bfd))
3378 bfd_nonfatal_message (output_name, NULL, NULL, NULL);
3379 /* Error in new object file. Don't change archive. */
3386 del = !copy_unknown_object (this_element, output_bfd);
3387 if (!bfd_close_all_done (output_bfd))
3389 bfd_nonfatal_message (output_name, NULL, NULL, NULL);
3390 /* Error in new object file. Don't change archive. */
3397 unlink (output_name);
3402 if (preserve_dates && stat_status == 0)
3403 set_times (output_name, &buf);
3405 /* Open the newly output file and attach to our list. */
3406 output_bfd = bfd_openr (output_name, output_target);
3408 l->obfd = output_bfd;
3411 ptr = &output_bfd->archive_next;
3413 last_element = this_element;
3415 this_element = bfd_openr_next_archived_file (ibfd, last_element);
3417 bfd_close (last_element);
3422 filename = bfd_get_filename (obfd);
3423 if (!bfd_close (obfd))
3426 bfd_nonfatal_message (filename, NULL, NULL, NULL);
3429 filename = bfd_get_filename (ibfd);
3430 if (!bfd_close (ibfd))
3433 bfd_nonfatal_message (filename, NULL, NULL, NULL);
3437 /* Delete all the files that we opened. */
3439 struct name_list * next;
3441 for (l = list; l != NULL; l = next)
3443 if (l->obfd == NULL)
3447 bfd_close (l->obfd);
3459 set_long_section_mode (bfd *output_bfd, bfd *input_bfd, enum long_section_name_handling style)
3461 /* This is only relevant to Coff targets. */
3462 if (bfd_get_flavour (output_bfd) == bfd_target_coff_flavour)
3465 && bfd_get_flavour (input_bfd) == bfd_target_coff_flavour)
3466 style = bfd_coff_long_section_names (input_bfd) ? ENABLE : DISABLE;
3467 bfd_coff_set_long_section_names (output_bfd, style != DISABLE);
3471 /* The top-level control. */
3474 copy_file (const char *input_filename, const char *output_filename,
3475 const char *input_target, const char *output_target,
3476 const bfd_arch_info_type *input_arch)
3479 char **obj_matching;
3480 char **core_matching;
3481 off_t size = get_file_size (input_filename);
3486 non_fatal (_("error: the input file '%s' is empty"),
3492 /* To allow us to do "strip *" without dying on the first
3493 non-object file, failures are nonfatal. */
3494 ibfd = bfd_openr (input_filename, input_target);
3497 bfd_nonfatal_message (input_filename, NULL, NULL, NULL);
3502 switch (do_debug_sections)
3506 case compress_gnu_zlib:
3507 case compress_gabi_zlib:
3508 ibfd->flags |= BFD_COMPRESS;
3509 /* Don't check if input is ELF here since this information is
3510 only available after bfd_check_format_matches is called. */
3511 if (do_debug_sections != compress_gnu_zlib)
3512 ibfd->flags |= BFD_COMPRESS_GABI;
3515 ibfd->flags |= BFD_DECOMPRESS;
3521 switch (do_elf_stt_common)
3523 case elf_stt_common:
3524 ibfd->flags |= BFD_CONVERT_ELF_COMMON | BFD_USE_ELF_STT_COMMON;
3527 case no_elf_stt_common:
3528 ibfd->flags |= BFD_CONVERT_ELF_COMMON;
3534 if (bfd_check_format (ibfd, bfd_archive))
3536 bfd_boolean force_output_target;
3539 /* bfd_get_target does not return the correct value until
3540 bfd_check_format succeeds. */
3541 if (output_target == NULL)
3543 output_target = bfd_get_target (ibfd);
3544 force_output_target = FALSE;
3547 force_output_target = TRUE;
3549 obfd = bfd_openw (output_filename, output_target);
3552 bfd_nonfatal_message (output_filename, NULL, NULL, NULL);
3556 /* This is a no-op on non-Coff targets. */
3557 set_long_section_mode (obfd, ibfd, long_section_names);
3559 copy_archive (ibfd, obfd, output_target, force_output_target, input_arch);
3561 else if (bfd_check_format_matches (ibfd, bfd_object, &obj_matching))
3566 /* bfd_get_target does not return the correct value until
3567 bfd_check_format succeeds. */
3568 if (output_target == NULL)
3569 output_target = bfd_get_target (ibfd);
3571 obfd = bfd_openw (output_filename, output_target);
3574 bfd_nonfatal_message (output_filename, NULL, NULL, NULL);
3578 /* This is a no-op on non-Coff targets. */
3579 set_long_section_mode (obfd, ibfd, long_section_names);
3581 if (! copy_object (ibfd, obfd, input_arch))
3584 /* PR 17512: file: 0f15796a.
3585 If the file could not be copied it may not be in a writeable
3586 state. So use bfd_close_all_done to avoid the possibility of
3587 writing uninitialised data into the file. */
3588 if (! (status ? bfd_close_all_done (obfd) : bfd_close (obfd)))
3591 bfd_nonfatal_message (output_filename, NULL, NULL, NULL);
3595 if (!bfd_close (ibfd))
3598 bfd_nonfatal_message (input_filename, NULL, NULL, NULL);
3604 bfd_error_type obj_error = bfd_get_error ();
3605 bfd_error_type core_error;
3607 if (bfd_check_format_matches (ibfd, bfd_core, &core_matching))
3609 /* This probably can't happen.. */
3610 if (obj_error == bfd_error_file_ambiguously_recognized)
3611 free (obj_matching);
3615 core_error = bfd_get_error ();
3616 /* Report the object error in preference to the core error. */
3617 if (obj_error != core_error)
3618 bfd_set_error (obj_error);
3620 bfd_nonfatal_message (input_filename, NULL, NULL, NULL);
3622 if (obj_error == bfd_error_file_ambiguously_recognized)
3624 list_matching_formats (obj_matching);
3625 free (obj_matching);
3627 if (core_error == bfd_error_file_ambiguously_recognized)
3629 list_matching_formats (core_matching);
3630 free (core_matching);
3637 /* Add a name to the section renaming list. */
3640 add_section_rename (const char * old_name, const char * new_name,
3643 section_rename * srename;
3645 /* Check for conflicts first. */
3646 for (srename = section_rename_list; srename != NULL; srename = srename->next)
3647 if (strcmp (srename->old_name, old_name) == 0)
3649 /* Silently ignore duplicate definitions. */
3650 if (strcmp (srename->new_name, new_name) == 0
3651 && srename->flags == flags)
3654 fatal (_("Multiple renames of section %s"), old_name);
3657 srename = (section_rename *) xmalloc (sizeof (* srename));
3659 srename->old_name = old_name;
3660 srename->new_name = new_name;
3661 srename->flags = flags;
3662 srename->next = section_rename_list;
3664 section_rename_list = srename;
3667 /* Check the section rename list for a new name of the input section
3668 called OLD_NAME. Returns the new name if one is found and sets
3669 RETURNED_FLAGS if non-NULL to the flags to be used for this section. */
3672 find_section_rename (const char *old_name, flagword *returned_flags)
3674 const section_rename *srename;
3676 for (srename = section_rename_list; srename != NULL; srename = srename->next)
3677 if (strcmp (srename->old_name, old_name) == 0)
3679 if (returned_flags != NULL && srename->flags != (flagword) -1)
3680 *returned_flags = srename->flags;
3682 return srename->new_name;
3688 /* Once each of the sections is copied, we may still need to do some
3689 finalization work for private section headers. Do that here. */
3692 setup_bfd_headers (bfd *ibfd, bfd *obfd)
3694 /* Allow the BFD backend to copy any private data it understands
3695 from the input section to the output section. */
3696 if (! bfd_copy_private_header_data (ibfd, obfd))
3699 bfd_nonfatal_message (NULL, ibfd, NULL,
3700 _("error in private header data"));
3704 /* All went well. */
3708 /* Create a section in OBFD with the same
3709 name and attributes as ISECTION in IBFD. */
3712 setup_section (bfd *ibfd, sec_ptr isection, void *obfdarg)
3714 bfd *obfd = (bfd *) obfdarg;
3715 struct section_list *p;
3723 char *prefix = NULL;
3724 bfd_boolean make_nobits;
3726 if (is_strip_section (ibfd, isection))
3729 /* Get the, possibly new, name of the output section. */
3730 name = bfd_section_name (ibfd, isection);
3731 flags = bfd_get_section_flags (ibfd, isection);
3732 name = find_section_rename (name, &flags);
3734 /* Prefix sections. */
3735 if ((prefix_alloc_sections_string)
3736 && (bfd_get_section_flags (ibfd, isection) & SEC_ALLOC))
3737 prefix = prefix_alloc_sections_string;
3738 else if (prefix_sections_string)
3739 prefix = prefix_sections_string;
3745 n = (char *) xmalloc (strlen (prefix) + strlen (name) + 1);
3751 make_nobits = FALSE;
3753 p = find_section_list (bfd_section_name (ibfd, isection), FALSE,
3754 SECTION_CONTEXT_SET_FLAGS);
3756 flags = p->flags | (flags & (SEC_HAS_CONTENTS | SEC_RELOC));
3757 else if (strip_symbols == STRIP_NONDEBUG
3758 && (flags & (SEC_ALLOC | SEC_GROUP)) != 0
3759 && !is_nondebug_keep_contents_section (ibfd, isection))
3761 flags &= ~(SEC_HAS_CONTENTS | SEC_LOAD | SEC_GROUP);
3762 if (obfd->xvec->flavour == bfd_target_elf_flavour)
3766 /* Twiddle the input section flags so that it seems to
3767 elf.c:copy_private_bfd_data that section flags have not
3768 changed between input and output sections. This hack
3769 prevents wholesale rewriting of the program headers. */
3770 isection->flags &= ~(SEC_HAS_CONTENTS | SEC_LOAD | SEC_GROUP);
3774 osection = bfd_make_section_anyway_with_flags (obfd, name, flags);
3776 if (osection == NULL)
3778 err = _("failed to create output section");
3783 elf_section_type (osection) = SHT_NOBITS;
3785 size = bfd_section_size (ibfd, isection);
3786 size = bfd_convert_section_size (ibfd, isection, obfd, size);
3788 size = (size + interleave - 1) / interleave * copy_width;
3789 else if (extract_symbol)
3791 if (! bfd_set_section_size (obfd, osection, size))
3793 err = _("failed to set size");
3797 vma = bfd_section_vma (ibfd, isection);
3798 p = find_section_list (bfd_section_name (ibfd, isection), FALSE,
3799 SECTION_CONTEXT_ALTER_VMA | SECTION_CONTEXT_SET_VMA);
3802 if (p->context & SECTION_CONTEXT_SET_VMA)
3808 vma += change_section_address;
3810 if (! bfd_set_section_vma (obfd, osection, vma))
3812 err = _("failed to set vma");
3816 lma = isection->lma;
3817 p = find_section_list (bfd_section_name (ibfd, isection), FALSE,
3818 SECTION_CONTEXT_ALTER_LMA | SECTION_CONTEXT_SET_LMA);
3821 if (p->context & SECTION_CONTEXT_ALTER_LMA)
3827 lma += change_section_address;
3829 osection->lma = lma;
3831 /* FIXME: This is probably not enough. If we change the LMA we
3832 may have to recompute the header for the file as well. */
3833 if (!bfd_set_section_alignment (obfd,
3835 bfd_section_alignment (ibfd, isection)))
3837 err = _("failed to set alignment");
3841 /* Copy merge entity size. */
3842 osection->entsize = isection->entsize;
3844 /* Copy compress status. */
3845 osection->compress_status = isection->compress_status;
3847 /* This used to be mangle_section; we do here to avoid using
3848 bfd_get_section_by_name since some formats allow multiple
3849 sections with the same name. */
3850 isection->output_section = osection;
3851 isection->output_offset = 0;
3853 if ((isection->flags & SEC_GROUP) != 0)
3855 asymbol *gsym = group_signature (isection);
3859 gsym->flags |= BSF_KEEP;
3860 if (ibfd->xvec->flavour == bfd_target_elf_flavour)
3861 elf_group_id (isection) = gsym;
3865 /* Allow the BFD backend to copy any private data it understands
3866 from the input section to the output section. */
3867 if (!bfd_copy_private_section_data (ibfd, isection, obfd, osection))
3869 err = _("failed to copy private data");
3873 /* All went well. */
3878 bfd_nonfatal_message (NULL, obfd, osection, err);
3881 /* Return TRUE if input section ISECTION should be skipped. */
3884 skip_section (bfd *ibfd, sec_ptr isection, bfd_boolean skip_copy)
3890 /* If we have already failed earlier on,
3891 do not keep on generating complaints now. */
3898 if (is_strip_section (ibfd, isection))
3901 if (is_update_section (ibfd, isection))
3904 /* When merging a note section we skip the copying of the contents,
3905 but not the copying of the relocs associated with the contents. */
3906 if (skip_copy && is_merged_note_section (ibfd, isection))
3909 flags = bfd_get_section_flags (ibfd, isection);
3910 if ((flags & SEC_GROUP) != 0)
3913 osection = isection->output_section;
3914 size = bfd_get_section_size (isection);
3916 if (size == 0 || osection == 0)
3922 /* Add section SECTION_PATTERN to the list of sections that will have their
3923 relocations removed. */
3926 handle_remove_relocations_option (const char *section_pattern)
3928 find_section_list (section_pattern, TRUE, SECTION_CONTEXT_REMOVE_RELOCS);
3931 /* Return TRUE if ISECTION from IBFD should have its relocations removed,
3932 otherwise return FALSE. If the user has requested that relocations be
3933 removed from a section that does not have relocations then this
3934 function will still return TRUE. */
3937 discard_relocations (bfd *ibfd ATTRIBUTE_UNUSED, asection *isection)
3939 return (find_section_list (bfd_section_name (ibfd, isection), FALSE,
3940 SECTION_CONTEXT_REMOVE_RELOCS) != NULL);
3943 /* Wrapper for dealing with --remove-section (-R) command line arguments.
3944 A special case is detected here, if the user asks to remove a relocation
3945 section (one starting with ".rela." or ".rel.") then this removal must
3946 be done using a different technique in a relocatable object. */
3949 handle_remove_section_option (const char *section_pattern)
3951 if (strncmp (section_pattern, ".rela.", 6) == 0)
3952 handle_remove_relocations_option (section_pattern + 5);
3953 else if (strncmp (section_pattern, ".rel.", 5) == 0)
3954 handle_remove_relocations_option (section_pattern + 4);
3956 find_section_list (section_pattern, TRUE, SECTION_CONTEXT_REMOVE);
3957 sections_removed = TRUE;
3960 /* Copy relocations in input section ISECTION of IBFD to an output
3961 section with the same name in OBFDARG. If stripping then don't
3962 copy any relocation info. */
3965 copy_relocations_in_section (bfd *ibfd, sec_ptr isection, void *obfdarg)
3967 bfd *obfd = (bfd *) obfdarg;
3973 if (skip_section (ibfd, isection, FALSE))
3976 osection = isection->output_section;
3978 /* Core files and DWO files do not need to be relocated. */
3979 if (bfd_get_format (obfd) == bfd_core
3980 || strip_symbols == STRIP_NONDWO
3981 || discard_relocations (ibfd, isection))
3985 relsize = bfd_get_reloc_upper_bound (ibfd, isection);
3989 /* Do not complain if the target does not support relocations. */
3990 if (relsize == -1 && bfd_get_error () == bfd_error_invalid_operation)
3995 bfd_nonfatal_message (NULL, ibfd, isection, NULL);
4003 bfd_set_reloc (obfd, osection, NULL, 0);
4004 osection->flags &= ~SEC_RELOC;
4008 if (isection->orelocation != NULL)
4010 /* Some other function has already set up the output relocs
4011 for us, so scan those instead of the default relocs. */
4012 relcount = isection->reloc_count;
4013 relpp = isection->orelocation;
4017 relpp = (arelent **) xmalloc (relsize);
4018 relcount = bfd_canonicalize_reloc (ibfd, isection, relpp, isympp);
4022 bfd_nonfatal_message (NULL, ibfd, isection,
4023 _("relocation count is negative"));
4028 if (strip_symbols == STRIP_ALL)
4030 /* Remove relocations which are not in
4031 keep_strip_specific_list. */
4032 arelent **temp_relpp;
4033 long temp_relcount = 0;
4036 temp_relpp = (arelent **) xmalloc (relsize);
4037 for (i = 0; i < relcount; i++)
4039 /* PR 17512: file: 9e907e0c. */
4040 if (relpp[i]->sym_ptr_ptr
4042 && * relpp[i]->sym_ptr_ptr)
4043 if (is_specified_symbol (bfd_asymbol_name (*relpp[i]->sym_ptr_ptr),
4044 keep_specific_htab))
4045 temp_relpp [temp_relcount++] = relpp [i];
4047 relcount = temp_relcount;
4048 if (isection->orelocation == NULL)
4053 bfd_set_reloc (obfd, osection, relcount == 0 ? NULL : relpp, relcount);
4056 osection->flags &= ~SEC_RELOC;
4062 /* Copy the data of input section ISECTION of IBFD
4063 to an output section with the same name in OBFD. */
4066 copy_section (bfd *ibfd, sec_ptr isection, void *obfdarg)
4068 bfd *obfd = (bfd *) obfdarg;
4069 struct section_list *p;
4073 if (skip_section (ibfd, isection, TRUE))
4076 osection = isection->output_section;
4077 /* The output SHF_COMPRESSED section size is different from input if
4078 ELF classes of input and output aren't the same. We can't use
4079 the output section size since --interleave will shrink the output
4080 section. Size will be updated if the section is converted. */
4081 size = bfd_get_section_size (isection);
4083 if (bfd_get_section_flags (ibfd, isection) & SEC_HAS_CONTENTS
4084 && bfd_get_section_flags (obfd, osection) & SEC_HAS_CONTENTS)
4086 bfd_byte *memhunk = NULL;
4088 if (!bfd_get_full_section_contents (ibfd, isection, &memhunk)
4089 || !bfd_convert_section_contents (ibfd, isection, obfd,
4093 bfd_nonfatal_message (NULL, ibfd, isection, NULL);
4100 /* We don't handle leftover bytes (too many possible behaviors,
4101 and we don't know what the user wants). The section length
4102 must be a multiple of the number of bytes to swap. */
4103 if ((size % reverse_bytes) == 0)
4108 for (i = 0; i < size; i += reverse_bytes)
4109 for (j = 0; j < (unsigned long)(reverse_bytes / 2); j++)
4111 bfd_byte *m = (bfd_byte *) memhunk;
4114 m[i + j] = m[(i + reverse_bytes) - (j + 1)];
4115 m[(i + reverse_bytes) - (j + 1)] = b;
4119 /* User must pad the section up in order to do this. */
4120 fatal (_("cannot reverse bytes: length of section %s must be evenly divisible by %d"),
4121 bfd_section_name (ibfd, isection), reverse_bytes);
4126 /* Keep only every `copy_byte'th byte in MEMHUNK. */
4127 char *from = (char *) memhunk + copy_byte;
4128 char *to = (char *) memhunk;
4129 char *end = (char *) memhunk + size;
4132 /* If the section address is not exactly divisible by the interleave,
4133 then we must bias the from address. If the copy_byte is less than
4134 the bias, then we must skip forward one interleave, and increment
4136 int extra = isection->lma % interleave;
4138 if (copy_byte < extra)
4141 for (; from < end; from += interleave)
4142 for (i = 0; i < copy_width; i++)
4144 if (&from[i] >= end)
4149 size = (size + interleave - 1 - copy_byte) / interleave * copy_width;
4150 osection->lma /= interleave;
4151 if (copy_byte < extra)
4155 if (!bfd_set_section_contents (obfd, osection, memhunk, 0, size))
4158 bfd_nonfatal_message (NULL, obfd, osection, NULL);
4164 else if ((p = find_section_list (bfd_get_section_name (ibfd, isection),
4165 FALSE, SECTION_CONTEXT_SET_FLAGS)) != NULL
4166 && (p->flags & SEC_HAS_CONTENTS) != 0)
4168 void *memhunk = xmalloc (size);
4170 /* We don't permit the user to turn off the SEC_HAS_CONTENTS
4171 flag--they can just remove the section entirely and add it
4172 back again. However, we do permit them to turn on the
4173 SEC_HAS_CONTENTS flag, and take it to mean that the section
4174 contents should be zeroed out. */
4176 memset (memhunk, 0, size);
4177 if (! bfd_set_section_contents (obfd, osection, memhunk, 0, size))
4180 bfd_nonfatal_message (NULL, obfd, osection, NULL);
4188 /* Get all the sections. This is used when --gap-fill or --pad-to is
4192 get_sections (bfd *obfd ATTRIBUTE_UNUSED, asection *osection, void *secppparg)
4194 asection ***secppp = (asection ***) secppparg;
4196 **secppp = osection;
4200 /* Sort sections by VMA. This is called via qsort, and is used when
4201 --gap-fill or --pad-to is used. We force non loadable or empty
4202 sections to the front, where they are easier to ignore. */
4205 compare_section_lma (const void *arg1, const void *arg2)
4207 const asection *const *sec1 = (const asection * const *) arg1;
4208 const asection *const *sec2 = (const asection * const *) arg2;
4209 flagword flags1, flags2;
4211 /* Sort non loadable sections to the front. */
4212 flags1 = (*sec1)->flags;
4213 flags2 = (*sec2)->flags;
4214 if ((flags1 & SEC_HAS_CONTENTS) == 0
4215 || (flags1 & SEC_LOAD) == 0)
4217 if ((flags2 & SEC_HAS_CONTENTS) != 0
4218 && (flags2 & SEC_LOAD) != 0)
4223 if ((flags2 & SEC_HAS_CONTENTS) == 0
4224 || (flags2 & SEC_LOAD) == 0)
4228 /* Sort sections by LMA. */
4229 if ((*sec1)->lma > (*sec2)->lma)
4231 else if ((*sec1)->lma < (*sec2)->lma)
4234 /* Sort sections with the same LMA by size. */
4235 if (bfd_get_section_size (*sec1) > bfd_get_section_size (*sec2))
4237 else if (bfd_get_section_size (*sec1) < bfd_get_section_size (*sec2))
4243 /* Mark all the symbols which will be used in output relocations with
4244 the BSF_KEEP flag so that those symbols will not be stripped.
4246 Ignore relocations which will not appear in the output file. */
4249 mark_symbols_used_in_relocations (bfd *ibfd, sec_ptr isection, void *symbolsarg)
4251 asymbol **symbols = (asymbol **) symbolsarg;
4256 /* Ignore an input section with no corresponding output section. */
4257 if (isection->output_section == NULL)
4260 relsize = bfd_get_reloc_upper_bound (ibfd, isection);
4263 /* Do not complain if the target does not support relocations. */
4264 if (relsize == -1 && bfd_get_error () == bfd_error_invalid_operation)
4266 bfd_fatal (bfd_get_filename (ibfd));
4272 relpp = (arelent **) xmalloc (relsize);
4273 relcount = bfd_canonicalize_reloc (ibfd, isection, relpp, symbols);
4275 bfd_fatal (bfd_get_filename (ibfd));
4277 /* Examine each symbol used in a relocation. If it's not one of the
4278 special bfd section symbols, then mark it with BSF_KEEP. */
4279 for (i = 0; i < relcount; i++)
4281 /* See PRs 20923 and 20930 for reproducers for the NULL tests. */
4282 if (relpp[i]->sym_ptr_ptr != NULL
4283 && * relpp[i]->sym_ptr_ptr != NULL
4284 && *relpp[i]->sym_ptr_ptr != bfd_com_section_ptr->symbol
4285 && *relpp[i]->sym_ptr_ptr != bfd_abs_section_ptr->symbol
4286 && *relpp[i]->sym_ptr_ptr != bfd_und_section_ptr->symbol)
4287 (*relpp[i]->sym_ptr_ptr)->flags |= BSF_KEEP;
4294 /* Write out debugging information. */
4297 write_debugging_info (bfd *obfd, void *dhandle,
4298 long *symcountp ATTRIBUTE_UNUSED,
4299 asymbol ***symppp ATTRIBUTE_UNUSED)
4301 if (bfd_get_flavour (obfd) == bfd_target_coff_flavour
4302 || bfd_get_flavour (obfd) == bfd_target_elf_flavour)
4304 bfd_byte *syms, *strings = NULL;
4305 bfd_size_type symsize, stringsize;
4306 asection *stabsec, *stabstrsec;
4309 if (! write_stabs_in_sections_debugging_info (obfd, dhandle, &syms,
4314 flags = SEC_HAS_CONTENTS | SEC_READONLY | SEC_DEBUGGING;
4315 stabsec = bfd_make_section_with_flags (obfd, ".stab", flags);
4316 stabstrsec = bfd_make_section_with_flags (obfd, ".stabstr", flags);
4318 || stabstrsec == NULL
4319 || ! bfd_set_section_size (obfd, stabsec, symsize)
4320 || ! bfd_set_section_size (obfd, stabstrsec, stringsize)
4321 || ! bfd_set_section_alignment (obfd, stabsec, 2)
4322 || ! bfd_set_section_alignment (obfd, stabstrsec, 0))
4324 bfd_nonfatal_message (NULL, obfd, NULL,
4325 _("can't create debugging section"));
4330 /* We can get away with setting the section contents now because
4331 the next thing the caller is going to do is copy over the
4332 real sections. We may someday have to split the contents
4333 setting out of this function. */
4334 if (! bfd_set_section_contents (obfd, stabsec, syms, 0, symsize)
4335 || ! bfd_set_section_contents (obfd, stabstrsec, strings, 0,
4338 bfd_nonfatal_message (NULL, obfd, NULL,
4339 _("can't set debugging section contents"));
4347 bfd_nonfatal_message (NULL, obfd, NULL,
4348 _("don't know how to write debugging information for %s"),
4349 bfd_get_target (obfd));
4353 /* If neither -D nor -U was specified explicitly,
4354 then use the configured default. */
4356 default_deterministic (void)
4358 if (deterministic < 0)
4359 deterministic = DEFAULT_AR_DETERMINISTIC;
4363 strip_main (int argc, char *argv[])
4365 char *input_target = NULL;
4366 char *output_target = NULL;
4367 bfd_boolean show_version = FALSE;
4368 bfd_boolean formats_info = FALSE;
4371 char *output_file = NULL;
4375 while ((c = getopt_long (argc, argv, "I:O:F:K:MN:R:o:sSpdgxXHhVvwDU",
4376 strip_options, (int *) 0)) != EOF)
4381 input_target = optarg;
4384 output_target = optarg;
4387 input_target = output_target = optarg;
4390 handle_remove_section_option (optarg);
4392 case OPTION_REMOVE_RELOCS:
4393 handle_remove_relocations_option (optarg);
4396 strip_symbols = STRIP_ALL;
4400 case 'd': /* Historic BSD alias for -g. Used by early NetBSD. */
4401 strip_symbols = STRIP_DEBUG;
4403 case OPTION_STRIP_DWO:
4404 strip_symbols = STRIP_DWO;
4406 case OPTION_STRIP_UNNEEDED:
4407 strip_symbols = STRIP_UNNEEDED;
4410 add_specific_symbol (optarg, keep_specific_htab);
4415 case OPTION_NO_MERGE_NOTES:
4416 merge_notes = FALSE;
4419 add_specific_symbol (optarg, strip_specific_htab);
4422 output_file = optarg;
4425 preserve_dates = TRUE;
4428 deterministic = TRUE;
4431 deterministic = FALSE;
4434 discard_locals = LOCALS_ALL;
4437 discard_locals = LOCALS_START_L;
4443 show_version = TRUE;
4445 case OPTION_FORMATS_INFO:
4446 formats_info = TRUE;
4448 case OPTION_ONLY_KEEP_DEBUG:
4449 strip_symbols = STRIP_NONDEBUG;
4451 case OPTION_KEEP_FILE_SYMBOLS:
4452 keep_file_symbols = 1;
4455 /* We've been given a long option. */
4462 strip_usage (stdout, 0);
4464 strip_usage (stderr, 1);
4475 print_version ("strip");
4477 default_deterministic ();
4479 /* Default is to strip all symbols. */
4480 if (strip_symbols == STRIP_UNDEF
4481 && discard_locals == LOCALS_UNDEF
4482 && htab_elements (strip_specific_htab) == 0)
4483 strip_symbols = STRIP_ALL;
4485 if (output_target == NULL)
4486 output_target = input_target;
4490 || (output_file != NULL && (i + 1) < argc))
4491 strip_usage (stderr, 1);
4493 for (; i < argc; i++)
4495 int hold_status = status;
4496 struct stat statbuf;
4499 if (get_file_size (argv[i]) < 1)
4506 /* No need to check the return value of stat().
4507 It has already been checked in get_file_size(). */
4508 stat (argv[i], &statbuf);
4510 if (output_file == NULL
4511 || filename_cmp (argv[i], output_file) == 0)
4512 tmpname = make_tempname (argv[i]);
4514 tmpname = output_file;
4516 if (tmpname == NULL)
4518 bfd_nonfatal_message (argv[i], NULL, NULL,
4519 _("could not create temporary file to hold stripped copy"));
4525 copy_file (argv[i], tmpname, input_target, output_target, NULL);
4529 set_times (tmpname, &statbuf);
4530 if (output_file != tmpname)
4531 status = (smart_rename (tmpname,
4532 output_file ? output_file : argv[i],
4533 preserve_dates) != 0);
4535 status = hold_status;
4538 unlink_if_ordinary (tmpname);
4539 if (output_file != tmpname)
4546 /* Set up PE subsystem. */
4549 set_pe_subsystem (const char *s)
4551 const char *version, *subsystem;
4561 { "native", 0, IMAGE_SUBSYSTEM_NATIVE },
4562 { "windows", 0, IMAGE_SUBSYSTEM_WINDOWS_GUI },
4563 { "console", 0, IMAGE_SUBSYSTEM_WINDOWS_CUI },
4564 { "posix", 0, IMAGE_SUBSYSTEM_POSIX_CUI },
4565 { "wince", 0, IMAGE_SUBSYSTEM_WINDOWS_CE_GUI },
4566 { "efi-app", 1, IMAGE_SUBSYSTEM_EFI_APPLICATION },
4567 { "efi-bsd", 1, IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER },
4568 { "efi-rtd", 1, IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER },
4569 { "sal-rtd", 1, IMAGE_SUBSYSTEM_SAL_RUNTIME_DRIVER },
4570 { "xbox", 0, IMAGE_SUBSYSTEM_XBOX }
4576 /* Check for the presence of a version number. */
4577 version = strchr (s, ':');
4578 if (version == NULL)
4582 int len = version - s;
4586 version = copy + 1 + len;
4587 pe_major_subsystem_version = strtoul (version, ©, 0);
4589 pe_minor_subsystem_version = strtoul (copy + 1, ©, 0);
4591 non_fatal (_("%s: bad version in PE subsystem"), s);
4594 /* Check for numeric subsystem. */
4595 value = (short) strtol (subsystem, ©, 0);
4598 for (i = 0; i < ARRAY_SIZE (v); i++)
4599 if (v[i].value == value)
4601 pe_subsystem = value;
4602 set_def = v[i].set_def;
4608 /* Search for subsystem by name. */
4609 for (i = 0; i < ARRAY_SIZE (v); i++)
4610 if (strcmp (subsystem, v[i].name) == 0)
4612 pe_subsystem = v[i].value;
4613 set_def = v[i].set_def;
4621 fatal (_("unknown PE subsystem: %s"), s);
4626 if (pe_file_alignment == (bfd_vma) -1)
4627 pe_file_alignment = PE_DEF_FILE_ALIGNMENT;
4628 if (pe_section_alignment == (bfd_vma) -1)
4629 pe_section_alignment = PE_DEF_SECTION_ALIGNMENT;
4633 free ((char *) subsystem);
4636 /* Convert EFI target to PEI target. */
4639 convert_efi_target (char *efi)
4645 if (strcmp (efi + 4, "ia32") == 0)
4647 /* Change ia32 to i386. */
4652 else if (strcmp (efi + 4, "x86_64") == 0)
4654 /* Change x86_64 to x86-64. */
4659 /* Allocate and return a pointer to a struct section_add, initializing the
4660 structure using ARG, a string in the format "sectionname=filename".
4661 The returned structure will have its next pointer set to NEXT. The
4662 OPTION field is the name of the command line option currently being
4663 parsed, and is only used if an error needs to be reported. */
4665 static struct section_add *
4666 init_section_add (const char *arg,
4667 struct section_add *next,
4670 struct section_add *pa;
4673 s = strchr (arg, '=');
4675 fatal (_("bad format for %s"), option);
4677 pa = (struct section_add *) xmalloc (sizeof (struct section_add));
4678 pa->name = xstrndup (arg, s - arg);
4679 pa->filename = s + 1;
4681 pa->contents = NULL;
4687 /* Load the file specified in PA, allocating memory to hold the file
4688 contents, and store a pointer to the allocated memory in the contents
4689 field of PA. The size field of PA is also updated. All errors call
4693 section_add_load_file (struct section_add *pa)
4698 /* We don't use get_file_size so that we can do
4699 --add-section .note.GNU_stack=/dev/null
4700 get_file_size doesn't work on /dev/null. */
4702 f = fopen (pa->filename, FOPEN_RB);
4704 fatal (_("cannot open: %s: %s"),
4705 pa->filename, strerror (errno));
4709 pa->contents = (bfd_byte *) xmalloc (alloc);
4717 pa->contents = (bfd_byte *) xrealloc (pa->contents, alloc);
4720 got = fread (pa->contents + off, 1, alloc - off, f);
4722 fatal (_("%s: fread failed"), pa->filename);
4733 copy_main (int argc, char *argv[])
4735 char *input_filename = NULL;
4736 char *output_filename = NULL;
4738 char *input_target = NULL;
4739 char *output_target = NULL;
4740 bfd_boolean show_version = FALSE;
4741 bfd_boolean change_warn = TRUE;
4742 bfd_boolean formats_info = FALSE;
4744 struct stat statbuf;
4745 const bfd_arch_info_type *input_arch = NULL;
4747 while ((c = getopt_long (argc, argv, "b:B:i:I:j:K:MN:s:O:d:F:L:G:R:SpgxXHhVvW:wDU",
4748 copy_options, (int *) 0)) != EOF)
4753 copy_byte = atoi (optarg);
4755 fatal (_("byte number must be non-negative"));
4759 input_arch = bfd_scan_arch (optarg);
4760 if (input_arch == NULL)
4761 fatal (_("architecture %s unknown"), optarg);
4767 interleave = atoi (optarg);
4769 fatal (_("interleave must be positive"));
4775 case OPTION_INTERLEAVE_WIDTH:
4776 copy_width = atoi (optarg);
4778 fatal(_("interleave width must be positive"));
4782 case 's': /* "source" - 'I' is preferred */
4783 input_target = optarg;
4787 case 'd': /* "destination" - 'O' is preferred */
4788 output_target = optarg;
4792 input_target = output_target = optarg;
4796 find_section_list (optarg, TRUE, SECTION_CONTEXT_COPY);
4797 sections_copied = TRUE;
4801 handle_remove_section_option (optarg);
4804 case OPTION_REMOVE_RELOCS:
4805 handle_remove_relocations_option (optarg);
4809 strip_symbols = STRIP_ALL;
4813 strip_symbols = STRIP_DEBUG;
4816 case OPTION_STRIP_DWO:
4817 strip_symbols = STRIP_DWO;
4820 case OPTION_STRIP_UNNEEDED:
4821 strip_symbols = STRIP_UNNEEDED;
4824 case OPTION_ONLY_KEEP_DEBUG:
4825 strip_symbols = STRIP_NONDEBUG;
4828 case OPTION_KEEP_FILE_SYMBOLS:
4829 keep_file_symbols = 1;
4832 case OPTION_ADD_GNU_DEBUGLINK:
4833 long_section_names = ENABLE ;
4834 gnu_debuglink_filename = optarg;
4838 add_specific_symbol (optarg, keep_specific_htab);
4844 case OPTION_NO_MERGE_NOTES:
4845 merge_notes = FALSE;
4849 add_specific_symbol (optarg, strip_specific_htab);
4852 case OPTION_STRIP_UNNEEDED_SYMBOL:
4853 add_specific_symbol (optarg, strip_unneeded_htab);
4857 add_specific_symbol (optarg, localize_specific_htab);
4860 case OPTION_GLOBALIZE_SYMBOL:
4861 add_specific_symbol (optarg, globalize_specific_htab);
4865 add_specific_symbol (optarg, keepglobal_specific_htab);
4869 add_specific_symbol (optarg, weaken_specific_htab);
4873 preserve_dates = TRUE;
4877 deterministic = TRUE;
4881 deterministic = FALSE;
4889 discard_locals = LOCALS_ALL;
4893 discard_locals = LOCALS_START_L;
4901 show_version = TRUE;
4904 case OPTION_FORMATS_INFO:
4905 formats_info = TRUE;
4912 case OPTION_ADD_SECTION:
4913 add_sections = init_section_add (optarg, add_sections,
4915 section_add_load_file (add_sections);
4918 case OPTION_UPDATE_SECTION:
4919 update_sections = init_section_add (optarg, update_sections,
4920 "--update-section");
4921 section_add_load_file (update_sections);
4924 case OPTION_DUMP_SECTION:
4925 dump_sections = init_section_add (optarg, dump_sections,
4929 case OPTION_ADD_SYMBOL:
4932 struct addsym_node *newsym = xmalloc (sizeof *newsym);
4934 newsym->next = NULL;
4935 s = strchr (optarg, '=');
4937 fatal (_("bad format for %s"), "--add-symbol");
4938 t = strchr (s + 1, ':');
4940 newsym->symdef = xstrndup (optarg, s - optarg);
4943 newsym->section = xstrndup (s + 1, t - (s + 1));
4944 newsym->symval = strtol (t + 1, NULL, 0);
4948 newsym->section = NULL;
4949 newsym->symval = strtol (s + 1, NULL, 0);
4953 t = strchr (t + 1, ',');
4954 newsym->othersym = NULL;
4956 newsym->flags = parse_symflags (t+1, &newsym->othersym);
4958 newsym->flags = BSF_GLOBAL;
4960 /* Keep 'othersym' symbols at the front of the list. */
4961 if (newsym->othersym)
4963 newsym->next = add_sym_list;
4965 add_sym_tail = &newsym->next;
4966 add_sym_list = newsym;
4970 *add_sym_tail = newsym;
4971 add_sym_tail = &newsym->next;
4977 case OPTION_CHANGE_START:
4978 change_start = parse_vma (optarg, "--change-start");
4981 case OPTION_CHANGE_SECTION_ADDRESS:
4982 case OPTION_CHANGE_SECTION_LMA:
4983 case OPTION_CHANGE_SECTION_VMA:
4985 struct section_list * p;
4986 unsigned int context = 0;
4990 char *option = NULL;
4995 case OPTION_CHANGE_SECTION_ADDRESS:
4996 option = "--change-section-address";
4997 context = SECTION_CONTEXT_ALTER_LMA | SECTION_CONTEXT_ALTER_VMA;
4999 case OPTION_CHANGE_SECTION_LMA:
5000 option = "--change-section-lma";
5001 context = SECTION_CONTEXT_ALTER_LMA;
5003 case OPTION_CHANGE_SECTION_VMA:
5004 option = "--change-section-vma";
5005 context = SECTION_CONTEXT_ALTER_VMA;
5009 s = strchr (optarg, '=');
5012 s = strchr (optarg, '+');
5015 s = strchr (optarg, '-');
5017 fatal (_("bad format for %s"), option);
5022 /* Correct the context. */
5025 case OPTION_CHANGE_SECTION_ADDRESS:
5026 context = SECTION_CONTEXT_SET_LMA | SECTION_CONTEXT_SET_VMA;
5028 case OPTION_CHANGE_SECTION_LMA:
5029 context = SECTION_CONTEXT_SET_LMA;
5031 case OPTION_CHANGE_SECTION_VMA:
5032 context = SECTION_CONTEXT_SET_VMA;
5038 name = (char *) xmalloc (len + 1);
5039 strncpy (name, optarg, len);
5042 p = find_section_list (name, TRUE, context);
5044 val = parse_vma (s + 1, option);
5050 case OPTION_CHANGE_SECTION_ADDRESS:
5054 case OPTION_CHANGE_SECTION_LMA:
5058 case OPTION_CHANGE_SECTION_VMA:
5065 case OPTION_CHANGE_ADDRESSES:
5066 change_section_address = parse_vma (optarg, "--change-addresses");
5067 change_start = change_section_address;
5070 case OPTION_CHANGE_WARNINGS:
5074 case OPTION_CHANGE_LEADING_CHAR:
5075 change_leading_char = TRUE;
5078 case OPTION_COMPRESS_DEBUG_SECTIONS:
5081 if (strcasecmp (optarg, "none") == 0)
5082 do_debug_sections = decompress;
5083 else if (strcasecmp (optarg, "zlib") == 0)
5084 do_debug_sections = compress_zlib;
5085 else if (strcasecmp (optarg, "zlib-gnu") == 0)
5086 do_debug_sections = compress_gnu_zlib;
5087 else if (strcasecmp (optarg, "zlib-gabi") == 0)
5088 do_debug_sections = compress_gabi_zlib;
5090 fatal (_("unrecognized --compress-debug-sections type `%s'"),
5094 do_debug_sections = compress;
5097 case OPTION_DEBUGGING:
5098 convert_debugging = TRUE;
5101 case OPTION_DECOMPRESS_DEBUG_SECTIONS:
5102 do_debug_sections = decompress;
5105 case OPTION_ELF_STT_COMMON:
5106 if (strcasecmp (optarg, "yes") == 0)
5107 do_elf_stt_common = elf_stt_common;
5108 else if (strcasecmp (optarg, "no") == 0)
5109 do_elf_stt_common = no_elf_stt_common;
5111 fatal (_("unrecognized --elf-stt-common= option `%s'"),
5115 case OPTION_GAP_FILL:
5117 bfd_vma gap_fill_vma;
5119 gap_fill_vma = parse_vma (optarg, "--gap-fill");
5120 gap_fill = (bfd_byte) gap_fill_vma;
5121 if ((bfd_vma) gap_fill != gap_fill_vma)
5125 sprintf_vma (buff, gap_fill_vma);
5127 non_fatal (_("Warning: truncating gap-fill from 0x%s to 0x%x"),
5130 gap_fill_set = TRUE;
5134 case OPTION_NO_CHANGE_WARNINGS:
5135 change_warn = FALSE;
5139 pad_to = parse_vma (optarg, "--pad-to");
5143 case OPTION_REMOVE_LEADING_CHAR:
5144 remove_leading_char = TRUE;
5147 case OPTION_REDEFINE_SYM:
5149 /* Insert this redefinition onto redefine_specific_htab. */
5153 const char *nextarg;
5154 char *source, *target;
5156 s = strchr (optarg, '=');
5158 fatal (_("bad format for %s"), "--redefine-sym");
5161 source = (char *) xmalloc (len + 1);
5162 strncpy (source, optarg, len);
5166 len = strlen (nextarg);
5167 target = (char *) xmalloc (len + 1);
5168 strcpy (target, nextarg);
5170 add_redefine_and_check ("--redefine-sym", source, target);
5177 case OPTION_REDEFINE_SYMS:
5178 add_redefine_syms_file (optarg);
5181 case OPTION_SET_SECTION_FLAGS:
5183 struct section_list *p;
5188 s = strchr (optarg, '=');
5190 fatal (_("bad format for %s"), "--set-section-flags");
5193 name = (char *) xmalloc (len + 1);
5194 strncpy (name, optarg, len);
5197 p = find_section_list (name, TRUE, SECTION_CONTEXT_SET_FLAGS);
5199 p->flags = parse_flags (s + 1);
5203 case OPTION_RENAME_SECTION:
5206 const char *eq, *fl;
5211 eq = strchr (optarg, '=');
5213 fatal (_("bad format for %s"), "--rename-section");
5217 fatal (_("bad format for %s"), "--rename-section");
5219 old_name = (char *) xmalloc (len + 1);
5220 strncpy (old_name, optarg, len);
5224 fl = strchr (eq, ',');
5227 flags = parse_flags (fl + 1);
5237 fatal (_("bad format for %s"), "--rename-section");
5239 new_name = (char *) xmalloc (len + 1);
5240 strncpy (new_name, eq, len);
5243 add_section_rename (old_name, new_name, flags);
5247 case OPTION_SET_START:
5248 set_start = parse_vma (optarg, "--set-start");
5249 set_start_set = TRUE;
5252 case OPTION_SREC_LEN:
5253 _bfd_srec_len = parse_vma (optarg, "--srec-len");
5256 case OPTION_SREC_FORCES3:
5257 _bfd_srec_forceS3 = TRUE;
5260 case OPTION_STRIP_SYMBOLS:
5261 add_specific_symbols (optarg, strip_specific_htab);
5264 case OPTION_STRIP_UNNEEDED_SYMBOLS:
5265 add_specific_symbols (optarg, strip_unneeded_htab);
5268 case OPTION_KEEP_SYMBOLS:
5269 add_specific_symbols (optarg, keep_specific_htab);
5272 case OPTION_LOCALIZE_HIDDEN:
5273 localize_hidden = TRUE;
5276 case OPTION_LOCALIZE_SYMBOLS:
5277 add_specific_symbols (optarg, localize_specific_htab);
5280 case OPTION_LONG_SECTION_NAMES:
5281 if (!strcmp ("enable", optarg))
5282 long_section_names = ENABLE;
5283 else if (!strcmp ("disable", optarg))
5284 long_section_names = DISABLE;
5285 else if (!strcmp ("keep", optarg))
5286 long_section_names = KEEP;
5288 fatal (_("unknown long section names option '%s'"), optarg);
5291 case OPTION_GLOBALIZE_SYMBOLS:
5292 add_specific_symbols (optarg, globalize_specific_htab);
5295 case OPTION_KEEPGLOBAL_SYMBOLS:
5296 add_specific_symbols (optarg, keepglobal_specific_htab);
5299 case OPTION_WEAKEN_SYMBOLS:
5300 add_specific_symbols (optarg, weaken_specific_htab);
5303 case OPTION_ALT_MACH_CODE:
5304 use_alt_mach_code = strtoul (optarg, NULL, 0);
5305 if (use_alt_mach_code == 0)
5306 fatal (_("unable to parse alternative machine code"));
5309 case OPTION_PREFIX_SYMBOLS:
5310 prefix_symbols_string = optarg;
5313 case OPTION_PREFIX_SECTIONS:
5314 prefix_sections_string = optarg;
5317 case OPTION_PREFIX_ALLOC_SECTIONS:
5318 prefix_alloc_sections_string = optarg;
5321 case OPTION_READONLY_TEXT:
5322 bfd_flags_to_set |= WP_TEXT;
5323 bfd_flags_to_clear &= ~WP_TEXT;
5326 case OPTION_WRITABLE_TEXT:
5327 bfd_flags_to_clear |= WP_TEXT;
5328 bfd_flags_to_set &= ~WP_TEXT;
5332 bfd_flags_to_set |= D_PAGED;
5333 bfd_flags_to_clear &= ~D_PAGED;
5337 bfd_flags_to_clear |= D_PAGED;
5338 bfd_flags_to_set &= ~D_PAGED;
5341 case OPTION_EXTRACT_DWO:
5342 strip_symbols = STRIP_NONDWO;
5345 case OPTION_EXTRACT_SYMBOL:
5346 extract_symbol = TRUE;
5349 case OPTION_REVERSE_BYTES:
5351 int prev = reverse_bytes;
5353 reverse_bytes = atoi (optarg);
5354 if ((reverse_bytes <= 0) || ((reverse_bytes % 2) != 0))
5355 fatal (_("number of bytes to reverse must be positive and even"));
5357 if (prev && prev != reverse_bytes)
5358 non_fatal (_("Warning: ignoring previous --reverse-bytes value of %d"),
5363 case OPTION_FILE_ALIGNMENT:
5364 pe_file_alignment = parse_vma (optarg, "--file-alignment");
5370 pe_heap_reserve = strtoul (optarg, &end, 0);
5372 || (*end != '.' && *end != '\0'))
5373 non_fatal (_("%s: invalid reserve value for --heap"),
5375 else if (*end != '\0')
5377 pe_heap_commit = strtoul (end + 1, &end, 0);
5379 non_fatal (_("%s: invalid commit value for --heap"),
5385 case OPTION_IMAGE_BASE:
5386 pe_image_base = parse_vma (optarg, "--image-base");
5389 case OPTION_SECTION_ALIGNMENT:
5390 pe_section_alignment = parse_vma (optarg,
5391 "--section-alignment");
5394 case OPTION_SUBSYSTEM:
5395 set_pe_subsystem (optarg);
5401 pe_stack_reserve = strtoul (optarg, &end, 0);
5403 || (*end != '.' && *end != '\0'))
5404 non_fatal (_("%s: invalid reserve value for --stack"),
5406 else if (*end != '\0')
5408 pe_stack_commit = strtoul (end + 1, &end, 0);
5410 non_fatal (_("%s: invalid commit value for --stack"),
5417 /* We've been given a long option. */
5422 copy_usage (stdout, 0);
5425 copy_usage (stderr, 1);
5436 print_version ("objcopy");
5438 if (interleave && copy_byte == -1)
5439 fatal (_("interleave start byte must be set with --byte"));
5441 if (copy_byte >= interleave)
5442 fatal (_("byte number must be less than interleave"));
5444 if (copy_width > interleave - copy_byte)
5445 fatal (_("interleave width must be less than or equal to interleave - byte`"));
5447 if (optind == argc || optind + 2 < argc)
5448 copy_usage (stderr, 1);
5450 input_filename = argv[optind];
5451 if (optind + 1 < argc)
5452 output_filename = argv[optind + 1];
5454 default_deterministic ();
5456 /* Default is to strip no symbols. */
5457 if (strip_symbols == STRIP_UNDEF && discard_locals == LOCALS_UNDEF)
5458 strip_symbols = STRIP_NONE;
5460 if (output_target == NULL)
5461 output_target = input_target;
5463 /* Convert input EFI target to PEI target. */
5464 if (input_target != NULL
5465 && strncmp (input_target, "efi-", 4) == 0)
5469 efi = xstrdup (output_target + 4);
5470 if (strncmp (efi, "bsdrv-", 6) == 0
5471 || strncmp (efi, "rtdrv-", 6) == 0)
5473 else if (strncmp (efi, "app-", 4) != 0)
5474 fatal (_("unknown input EFI target: %s"), input_target);
5477 convert_efi_target (efi);
5480 /* Convert output EFI target to PEI target. */
5481 if (output_target != NULL
5482 && strncmp (output_target, "efi-", 4) == 0)
5486 efi = xstrdup (output_target + 4);
5487 if (strncmp (efi, "app-", 4) == 0)
5489 if (pe_subsystem == -1)
5490 pe_subsystem = IMAGE_SUBSYSTEM_EFI_APPLICATION;
5492 else if (strncmp (efi, "bsdrv-", 6) == 0)
5494 if (pe_subsystem == -1)
5495 pe_subsystem = IMAGE_SUBSYSTEM_EFI_BOOT_SERVICE_DRIVER;
5498 else if (strncmp (efi, "rtdrv-", 6) == 0)
5500 if (pe_subsystem == -1)
5501 pe_subsystem = IMAGE_SUBSYSTEM_EFI_RUNTIME_DRIVER;
5505 fatal (_("unknown output EFI target: %s"), output_target);
5507 if (pe_file_alignment == (bfd_vma) -1)
5508 pe_file_alignment = PE_DEF_FILE_ALIGNMENT;
5509 if (pe_section_alignment == (bfd_vma) -1)
5510 pe_section_alignment = PE_DEF_SECTION_ALIGNMENT;
5512 output_target = efi;
5513 convert_efi_target (efi);
5517 if (stat (input_filename, & statbuf) < 0)
5518 fatal (_("warning: could not locate '%s'. System error message: %s"),
5519 input_filename, strerror (errno));
5521 /* If there is no destination file, or the source and destination files
5522 are the same, then create a temp and rename the result into the input. */
5523 if (output_filename == NULL
5524 || filename_cmp (input_filename, output_filename) == 0)
5525 tmpname = make_tempname (input_filename);
5527 tmpname = output_filename;
5529 if (tmpname == NULL)
5530 fatal (_("warning: could not create temporary file whilst copying '%s', (error: %s)"),
5531 input_filename, strerror (errno));
5533 copy_file (input_filename, tmpname, input_target, output_target, input_arch);
5537 set_times (tmpname, &statbuf);
5538 if (tmpname != output_filename)
5539 status = (smart_rename (tmpname, input_filename,
5540 preserve_dates) != 0);
5543 unlink_if_ordinary (tmpname);
5545 if (tmpname != output_filename)
5550 struct section_list *p;
5552 for (p = change_sections; p != NULL; p = p->next)
5556 if (p->context & (SECTION_CONTEXT_SET_VMA | SECTION_CONTEXT_ALTER_VMA))
5560 sprintf_vma (buff, p->vma_val);
5562 /* xgettext:c-format */
5563 non_fatal (_("%s %s%c0x%s never used"),
5564 "--change-section-vma",
5566 p->context & SECTION_CONTEXT_SET_VMA ? '=' : '+',
5570 if (p->context & (SECTION_CONTEXT_SET_LMA | SECTION_CONTEXT_ALTER_LMA))
5574 sprintf_vma (buff, p->lma_val);
5576 /* xgettext:c-format */
5577 non_fatal (_("%s %s%c0x%s never used"),
5578 "--change-section-lma",
5580 p->context & SECTION_CONTEXT_SET_LMA ? '=' : '+',
5591 main (int argc, char *argv[])
5593 #if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
5594 setlocale (LC_MESSAGES, "");
5596 #if defined (HAVE_SETLOCALE)
5597 setlocale (LC_CTYPE, "");
5599 bindtextdomain (PACKAGE, LOCALEDIR);
5600 textdomain (PACKAGE);
5602 program_name = argv[0];
5603 xmalloc_set_program_name (program_name);
5605 START_PROGRESS (program_name, 0);
5607 expandargv (&argc, &argv);
5609 strip_symbols = STRIP_UNDEF;
5610 discard_locals = LOCALS_UNDEF;
5613 set_default_bfd_target ();
5617 int i = strlen (program_name);
5618 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
5619 /* Drop the .exe suffix, if any. */
5620 if (i > 4 && FILENAME_CMP (program_name + i - 4, ".exe") == 0)
5623 program_name[i] = '\0';
5626 is_strip = (i >= 5 && FILENAME_CMP (program_name + i - 5, "strip") == 0);
5629 create_symbol_htabs ();
5632 bfd_set_error_program_name (argv[0]);
5635 strip_main (argc, argv);
5637 copy_main (argc, argv);
5639 END_PROGRESS (program_name);