1 /* objdump.c -- dump information about an object file.
2 Copyright (C) 1990-2017 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, or (at your option)
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, 51 Franklin Street - Fifth Floor, Boston,
19 MA 02110-1301, USA. */
24 Objdump displays information about one or more object files, either on
25 their own, or inside libraries. It is commonly used as a disassembler,
26 but it can also display information about file headers, symbol tables,
27 relocations, debugging directives and more.
29 The flow of execution is as follows:
31 1. Command line arguments are checked for control switches and the
32 information to be displayed is selected.
34 2. Any remaining arguments are assumed to be object files, and they are
35 processed in order by display_bfd(). If the file is an archive each
36 of its elements is processed in turn.
38 3. The file's target architecture and binary file format are determined
39 by bfd_check_format(). If they are recognised, then dump_bfd() is
42 4. dump_bfd() in turn calls separate functions to display the requested
43 item(s) of information(s). For example disassemble_data() is called if
44 a disassembly has been requested.
46 When disassembling the code loops through blocks of instructions bounded
47 by symbols, calling disassemble_bytes() on each block. The actual
48 disassembling is done by the libopcodes library, via a function pointer
49 supplied by the disassembler() function. */
60 #include "safe-ctype.h"
62 #include "libiberty.h"
64 #include "filenames.h"
73 /* Internal headers for the ELF .stab-dump code - sorry. */
74 #define BYTES_IN_WORD 32
75 #include "aout/aout64.h"
78 static int exit_status
= 0;
80 static char *default_target
= NULL
; /* Default at runtime. */
82 /* The following variables are set based on arguments passed on the
84 static int show_version
= 0; /* Show the version number. */
85 static int dump_section_contents
; /* -s */
86 static int dump_section_headers
; /* -h */
87 static bfd_boolean dump_file_header
; /* -f */
88 static int dump_symtab
; /* -t */
89 static int dump_dynamic_symtab
; /* -T */
90 static int dump_reloc_info
; /* -r */
91 static int dump_dynamic_reloc_info
; /* -R */
92 static int dump_ar_hdrs
; /* -a */
93 static int dump_private_headers
; /* -p */
94 static char *dump_private_options
; /* -P */
95 static int prefix_addresses
; /* --prefix-addresses */
96 static int with_line_numbers
; /* -l */
97 static bfd_boolean with_source_code
; /* -S */
98 static int show_raw_insn
; /* --show-raw-insn */
99 static int dump_dwarf_section_info
; /* --dwarf */
100 static int dump_stab_section_info
; /* --stabs */
101 static int do_demangle
; /* -C, --demangle */
102 static bfd_boolean disassemble
; /* -d */
103 static bfd_boolean disassemble_all
; /* -D */
104 static int disassemble_zeroes
; /* --disassemble-zeroes */
105 static bfd_boolean formats_info
; /* -i */
106 static int wide_output
; /* -w */
107 static int insn_width
; /* --insn-width */
108 static bfd_vma start_address
= (bfd_vma
) -1; /* --start-address */
109 static bfd_vma stop_address
= (bfd_vma
) -1; /* --stop-address */
110 static int dump_debugging
; /* --debugging */
111 static int dump_debugging_tags
; /* --debugging-tags */
112 static int suppress_bfd_header
;
113 static int dump_special_syms
= 0; /* --special-syms */
114 static bfd_vma adjust_section_vma
= 0; /* --adjust-vma */
115 static int file_start_context
= 0; /* --file-start-context */
116 static bfd_boolean display_file_offsets
;/* -F */
117 static const char *prefix
; /* --prefix */
118 static int prefix_strip
; /* --prefix-strip */
119 static size_t prefix_length
;
120 static bfd_boolean unwind_inlines
; /* --inlines. */
122 /* A structure to record the sections mentioned in -j switches. */
125 const char * name
; /* The name of the section. */
126 bfd_boolean seen
; /* A flag to indicate that the section has been found in one or more input files. */
127 struct only
* next
; /* Pointer to the next structure in the list. */
129 /* Pointer to an array of 'only' structures.
130 This pointer is NULL if the -j switch has not been used. */
131 static struct only
* only_list
= NULL
;
133 /* Variables for handling include file path table. */
134 static const char **include_paths
;
135 static int include_path_count
;
137 /* Extra info to pass to the section disassembler and address printing
139 struct objdump_disasm_info
143 bfd_boolean require_sec
;
144 arelent
** dynrelbuf
;
146 disassembler_ftype disassemble_fn
;
150 /* Architecture to disassemble for, or default if NULL. */
151 static char *machine
= NULL
;
153 /* Target specific options to the disassembler. */
154 static char *disassembler_options
= NULL
;
156 /* Endianness to disassemble for, or default if BFD_ENDIAN_UNKNOWN. */
157 static enum bfd_endian endian
= BFD_ENDIAN_UNKNOWN
;
159 /* The symbol table. */
160 static asymbol
**syms
;
162 /* Number of symbols in `syms'. */
163 static long symcount
= 0;
165 /* The sorted symbol table. */
166 static asymbol
**sorted_syms
;
168 /* Number of symbols in `sorted_syms'. */
169 static long sorted_symcount
= 0;
171 /* The dynamic symbol table. */
172 static asymbol
**dynsyms
;
174 /* The synthetic symbol table. */
175 static asymbol
*synthsyms
;
176 static long synthcount
= 0;
178 /* Number of symbols in `dynsyms'. */
179 static long dynsymcount
= 0;
181 static bfd_byte
*stabs
;
182 static bfd_size_type stab_size
;
185 static bfd_size_type stabstr_size
;
187 static bfd_boolean is_relocatable
= FALSE
;
189 /* Handlers for -P/--private. */
190 static const struct objdump_private_desc
* const objdump_private_vectors
[] =
192 OBJDUMP_PRIVATE_VECTORS
196 static void usage (FILE *, int) ATTRIBUTE_NORETURN
;
198 usage (FILE *stream
, int status
)
200 fprintf (stream
, _("Usage: %s <option(s)> <file(s)>\n"), program_name
);
201 fprintf (stream
, _(" Display information from object <file(s)>.\n"));
202 fprintf (stream
, _(" At least one of the following switches must be given:\n"));
203 fprintf (stream
, _("\
204 -a, --archive-headers Display archive header information\n\
205 -f, --file-headers Display the contents of the overall file header\n\
206 -p, --private-headers Display object format specific file header contents\n\
207 -P, --private=OPT,OPT... Display object format specific contents\n\
208 -h, --[section-]headers Display the contents of the section headers\n\
209 -x, --all-headers Display the contents of all headers\n\
210 -d, --disassemble Display assembler contents of executable sections\n\
211 -D, --disassemble-all Display assembler contents of all sections\n\
212 -S, --source Intermix source code with disassembly\n\
213 -s, --full-contents Display the full contents of all sections requested\n\
214 -g, --debugging Display debug information in object file\n\
215 -e, --debugging-tags Display debug information using ctags style\n\
216 -G, --stabs Display (in raw form) any STABS info in the file\n\
217 -W[lLiaprmfFsoRt] or\n\
218 --dwarf[=rawline,=decodedline,=info,=abbrev,=pubnames,=aranges,=macro,=frames,\n\
219 =frames-interp,=str,=loc,=Ranges,=pubtypes,\n\
220 =gdb_index,=trace_info,=trace_abbrev,=trace_aranges,\n\
222 Display DWARF info in the file\n\
223 -t, --syms Display the contents of the symbol table(s)\n\
224 -T, --dynamic-syms Display the contents of the dynamic symbol table\n\
225 -r, --reloc Display the relocation entries in the file\n\
226 -R, --dynamic-reloc Display the dynamic relocation entries in the file\n\
227 @<file> Read options from <file>\n\
228 -v, --version Display this program's version number\n\
229 -i, --info List object formats and architectures supported\n\
230 -H, --help Display this information\n\
234 const struct objdump_private_desc
* const *desc
;
236 fprintf (stream
, _("\n The following switches are optional:\n"));
237 fprintf (stream
, _("\
238 -b, --target=BFDNAME Specify the target object format as BFDNAME\n\
239 -m, --architecture=MACHINE Specify the target architecture as MACHINE\n\
240 -j, --section=NAME Only display information for section NAME\n\
241 -M, --disassembler-options=OPT Pass text OPT on to the disassembler\n\
242 -EB --endian=big Assume big endian format when disassembling\n\
243 -EL --endian=little Assume little endian format when disassembling\n\
244 --file-start-context Include context from start of file (with -S)\n\
245 -I, --include=DIR Add DIR to search list for source files\n\
246 -l, --line-numbers Include line numbers and filenames in output\n\
247 -F, --file-offsets Include file offsets when displaying information\n\
248 -C, --demangle[=STYLE] Decode mangled/processed symbol names\n\
249 The STYLE, if specified, can be `auto', `gnu',\n\
250 `lucid', `arm', `hp', `edg', `gnu-v3', `java'\n\
252 -w, --wide Format output for more than 80 columns\n\
253 -z, --disassemble-zeroes Do not skip blocks of zeroes when disassembling\n\
254 --start-address=ADDR Only process data whose address is >= ADDR\n\
255 --stop-address=ADDR Only process data whose address is <= ADDR\n\
256 --prefix-addresses Print complete address alongside disassembly\n\
257 --[no-]show-raw-insn Display hex alongside symbolic disassembly\n\
258 --insn-width=WIDTH Display WIDTH bytes on a single line for -d\n\
259 --adjust-vma=OFFSET Add OFFSET to all displayed section addresses\n\
260 --special-syms Include special symbols in symbol dumps\n\
261 --inlines Print all inlines for source line (with -l)\n\
262 --prefix=PREFIX Add PREFIX to absolute paths for -S\n\
263 --prefix-strip=LEVEL Strip initial directory names for -S\n"));
264 fprintf (stream
, _("\
265 --dwarf-depth=N Do not display DIEs at depth N or greater\n\
266 --dwarf-start=N Display DIEs starting with N, at the same depth\n\
268 --dwarf-check Make additional dwarf internal consistency checks.\
270 list_supported_targets (program_name
, stream
);
271 list_supported_architectures (program_name
, stream
);
273 disassembler_usage (stream
);
275 if (objdump_private_vectors
[0] != NULL
)
278 _("\nOptions supported for -P/--private switch:\n"));
279 for (desc
= objdump_private_vectors
; *desc
!= NULL
; desc
++)
280 (*desc
)->help (stream
);
283 if (REPORT_BUGS_TO
[0] && status
== 0)
284 fprintf (stream
, _("Report bugs to %s.\n"), REPORT_BUGS_TO
);
288 /* 150 isn't special; it's just an arbitrary non-ASCII char value. */
292 OPTION_START_ADDRESS
,
305 static struct option long_options
[]=
307 {"adjust-vma", required_argument
, NULL
, OPTION_ADJUST_VMA
},
308 {"all-headers", no_argument
, NULL
, 'x'},
309 {"private-headers", no_argument
, NULL
, 'p'},
310 {"private", required_argument
, NULL
, 'P'},
311 {"architecture", required_argument
, NULL
, 'm'},
312 {"archive-headers", no_argument
, NULL
, 'a'},
313 {"debugging", no_argument
, NULL
, 'g'},
314 {"debugging-tags", no_argument
, NULL
, 'e'},
315 {"demangle", optional_argument
, NULL
, 'C'},
316 {"disassemble", no_argument
, NULL
, 'd'},
317 {"disassemble-all", no_argument
, NULL
, 'D'},
318 {"disassembler-options", required_argument
, NULL
, 'M'},
319 {"disassemble-zeroes", no_argument
, NULL
, 'z'},
320 {"dynamic-reloc", no_argument
, NULL
, 'R'},
321 {"dynamic-syms", no_argument
, NULL
, 'T'},
322 {"endian", required_argument
, NULL
, OPTION_ENDIAN
},
323 {"file-headers", no_argument
, NULL
, 'f'},
324 {"file-offsets", no_argument
, NULL
, 'F'},
325 {"file-start-context", no_argument
, &file_start_context
, 1},
326 {"full-contents", no_argument
, NULL
, 's'},
327 {"headers", no_argument
, NULL
, 'h'},
328 {"help", no_argument
, NULL
, 'H'},
329 {"info", no_argument
, NULL
, 'i'},
330 {"line-numbers", no_argument
, NULL
, 'l'},
331 {"no-show-raw-insn", no_argument
, &show_raw_insn
, -1},
332 {"prefix-addresses", no_argument
, &prefix_addresses
, 1},
333 {"reloc", no_argument
, NULL
, 'r'},
334 {"section", required_argument
, NULL
, 'j'},
335 {"section-headers", no_argument
, NULL
, 'h'},
336 {"show-raw-insn", no_argument
, &show_raw_insn
, 1},
337 {"source", no_argument
, NULL
, 'S'},
338 {"special-syms", no_argument
, &dump_special_syms
, 1},
339 {"include", required_argument
, NULL
, 'I'},
340 {"dwarf", optional_argument
, NULL
, OPTION_DWARF
},
341 {"stabs", no_argument
, NULL
, 'G'},
342 {"start-address", required_argument
, NULL
, OPTION_START_ADDRESS
},
343 {"stop-address", required_argument
, NULL
, OPTION_STOP_ADDRESS
},
344 {"syms", no_argument
, NULL
, 't'},
345 {"target", required_argument
, NULL
, 'b'},
346 {"version", no_argument
, NULL
, 'V'},
347 {"wide", no_argument
, NULL
, 'w'},
348 {"prefix", required_argument
, NULL
, OPTION_PREFIX
},
349 {"prefix-strip", required_argument
, NULL
, OPTION_PREFIX_STRIP
},
350 {"insn-width", required_argument
, NULL
, OPTION_INSN_WIDTH
},
351 {"dwarf-depth", required_argument
, 0, OPTION_DWARF_DEPTH
},
352 {"dwarf-start", required_argument
, 0, OPTION_DWARF_START
},
353 {"dwarf-check", no_argument
, 0, OPTION_DWARF_CHECK
},
354 {"inlines", no_argument
, 0, OPTION_INLINES
},
355 {0, no_argument
, 0, 0}
359 nonfatal (const char *msg
)
365 /* Returns TRUE if the specified section should be dumped. */
368 process_section_p (asection
* section
)
372 if (only_list
== NULL
)
375 for (only
= only_list
; only
; only
= only
->next
)
376 if (strcmp (only
->name
, section
->name
) == 0)
385 /* Add an entry to the 'only' list. */
388 add_only (char * name
)
392 /* First check to make sure that we do not
393 already have an entry for this name. */
394 for (only
= only_list
; only
; only
= only
->next
)
395 if (strcmp (only
->name
, name
) == 0)
398 only
= xmalloc (sizeof * only
);
401 only
->next
= only_list
;
405 /* Release the memory used by the 'only' list.
406 PR 11225: Issue a warning message for unseen sections.
407 Only do this if none of the sections were seen. This is mainly to support
408 tools like the GAS testsuite where an object file is dumped with a list of
409 generic section names known to be present in a range of different file
413 free_only_list (void)
415 bfd_boolean at_least_one_seen
= FALSE
;
419 if (only_list
== NULL
)
422 for (only
= only_list
; only
; only
= only
->next
)
425 at_least_one_seen
= TRUE
;
429 for (only
= only_list
; only
; only
= next
)
431 if (! at_least_one_seen
)
433 non_fatal (_("section '%s' mentioned in a -j option, "
434 "but not found in any input file"),
445 dump_section_header (bfd
*abfd
, asection
*section
, void *data
)
448 unsigned int opb
= bfd_octets_per_byte (abfd
);
449 int longest_section_name
= *((int *) data
);
451 /* Ignore linker created section. See elfNN_ia64_object_p in
453 if (section
->flags
& SEC_LINKER_CREATED
)
456 /* PR 10413: Skip sections that we are ignoring. */
457 if (! process_section_p (section
))
460 printf ("%3d %-*s %08lx ", section
->index
, longest_section_name
,
461 bfd_get_section_name (abfd
, section
),
462 (unsigned long) bfd_section_size (abfd
, section
) / opb
);
463 bfd_printf_vma (abfd
, bfd_get_section_vma (abfd
, section
));
465 bfd_printf_vma (abfd
, section
->lma
);
466 printf (" %08lx 2**%u", (unsigned long) section
->filepos
,
467 bfd_get_section_alignment (abfd
, section
));
473 if (section->flags & x) { printf ("%s%s", comma, y); comma = ", "; }
475 PF (SEC_HAS_CONTENTS
, "CONTENTS");
476 PF (SEC_ALLOC
, "ALLOC");
477 PF (SEC_CONSTRUCTOR
, "CONSTRUCTOR");
478 PF (SEC_LOAD
, "LOAD");
479 PF (SEC_RELOC
, "RELOC");
480 PF (SEC_READONLY
, "READONLY");
481 PF (SEC_CODE
, "CODE");
482 PF (SEC_DATA
, "DATA");
484 PF (SEC_DEBUGGING
, "DEBUGGING");
485 PF (SEC_NEVER_LOAD
, "NEVER_LOAD");
486 PF (SEC_EXCLUDE
, "EXCLUDE");
487 PF (SEC_SORT_ENTRIES
, "SORT_ENTRIES");
488 if (bfd_get_arch (abfd
) == bfd_arch_tic54x
)
490 PF (SEC_TIC54X_BLOCK
, "BLOCK");
491 PF (SEC_TIC54X_CLINK
, "CLINK");
493 PF (SEC_SMALL_DATA
, "SMALL_DATA");
494 if (bfd_get_flavour (abfd
) == bfd_target_coff_flavour
)
496 PF (SEC_COFF_SHARED
, "SHARED");
497 PF (SEC_COFF_NOREAD
, "NOREAD");
499 else if (bfd_get_flavour (abfd
) == bfd_target_elf_flavour
)
500 PF (SEC_ELF_PURECODE
, "PURECODE");
501 PF (SEC_THREAD_LOCAL
, "THREAD_LOCAL");
502 PF (SEC_GROUP
, "GROUP");
503 if (bfd_get_arch (abfd
) == bfd_arch_mep
)
505 PF (SEC_MEP_VLIW
, "VLIW");
508 if ((section
->flags
& SEC_LINK_ONCE
) != 0)
511 struct coff_comdat_info
*comdat
;
513 switch (section
->flags
& SEC_LINK_DUPLICATES
)
517 case SEC_LINK_DUPLICATES_DISCARD
:
518 ls
= "LINK_ONCE_DISCARD";
520 case SEC_LINK_DUPLICATES_ONE_ONLY
:
521 ls
= "LINK_ONCE_ONE_ONLY";
523 case SEC_LINK_DUPLICATES_SAME_SIZE
:
524 ls
= "LINK_ONCE_SAME_SIZE";
526 case SEC_LINK_DUPLICATES_SAME_CONTENTS
:
527 ls
= "LINK_ONCE_SAME_CONTENTS";
530 printf ("%s%s", comma
, ls
);
532 comdat
= bfd_coff_get_comdat_section (abfd
, section
);
534 printf (" (COMDAT %s %ld)", comdat
->name
, comdat
->symbol
);
543 /* Called on each SECTION in ABFD, update the int variable pointed to by
544 DATA which contains the string length of the longest section name. */
547 find_longest_section_name (bfd
*abfd
, asection
*section
, void *data
)
549 int *longest_so_far
= (int *) data
;
553 /* Ignore linker created section. */
554 if (section
->flags
& SEC_LINKER_CREATED
)
557 /* Skip sections that we are ignoring. */
558 if (! process_section_p (section
))
561 name
= bfd_get_section_name (abfd
, section
);
562 len
= (int) strlen (name
);
563 if (len
> *longest_so_far
)
564 *longest_so_far
= len
;
568 dump_headers (bfd
*abfd
)
570 /* The default width of 13 is just an arbitrary choice. */
571 int max_section_name_length
= 13;
577 /* With BFD64, non-ELF returns -1 and wants always 64 bit addresses. */
578 if (bfd_get_arch_size (abfd
) == 32)
584 printf (_("Sections:\n"));
587 bfd_map_over_sections (abfd
, find_longest_section_name
,
588 &max_section_name_length
);
590 printf (_("Idx %-*s Size %-*s%-*sFile off Algn"),
591 max_section_name_length
, "Name",
592 bfd_vma_width
, "VMA",
593 bfd_vma_width
, "LMA");
596 printf (_(" Flags"));
599 bfd_map_over_sections (abfd
, dump_section_header
,
600 &max_section_name_length
);
604 slurp_symtab (bfd
*abfd
)
609 if (!(bfd_get_file_flags (abfd
) & HAS_SYMS
))
615 storage
= bfd_get_symtab_upper_bound (abfd
);
618 non_fatal (_("failed to read symbol table from: %s"), bfd_get_filename (abfd
));
619 bfd_fatal (_("error message was"));
622 sy
= (asymbol
**) xmalloc (storage
);
624 symcount
= bfd_canonicalize_symtab (abfd
, sy
);
626 bfd_fatal (bfd_get_filename (abfd
));
630 /* Read in the dynamic symbols. */
633 slurp_dynamic_symtab (bfd
*abfd
)
638 storage
= bfd_get_dynamic_symtab_upper_bound (abfd
);
641 if (!(bfd_get_file_flags (abfd
) & DYNAMIC
))
643 non_fatal (_("%s: not a dynamic object"), bfd_get_filename (abfd
));
649 bfd_fatal (bfd_get_filename (abfd
));
652 sy
= (asymbol
**) xmalloc (storage
);
654 dynsymcount
= bfd_canonicalize_dynamic_symtab (abfd
, sy
);
656 bfd_fatal (bfd_get_filename (abfd
));
660 /* Some symbol names are significant and should be kept in the
661 table of sorted symbol names, even if they are marked as
662 debugging/section symbols. */
665 is_significant_symbol_name (const char * name
)
667 return strcmp (name
, ".plt") == 0
668 || strcmp (name
, ".got") == 0
669 || strcmp (name
, ".plt.got") == 0;
672 /* Filter out (in place) symbols that are useless for disassembly.
673 COUNT is the number of elements in SYMBOLS.
674 Return the number of useful symbols. */
677 remove_useless_symbols (asymbol
**symbols
, long count
)
679 asymbol
**in_ptr
= symbols
, **out_ptr
= symbols
;
683 asymbol
*sym
= *in_ptr
++;
685 if (sym
->name
== NULL
|| sym
->name
[0] == '\0')
687 if ((sym
->flags
& (BSF_DEBUGGING
| BSF_SECTION_SYM
))
688 && ! is_significant_symbol_name (sym
->name
))
690 if (bfd_is_und_section (sym
->section
)
691 || bfd_is_com_section (sym
->section
))
696 return out_ptr
- symbols
;
699 /* Sort symbols into value order. */
702 compare_symbols (const void *ap
, const void *bp
)
704 const asymbol
*a
= * (const asymbol
**) ap
;
705 const asymbol
*b
= * (const asymbol
**) bp
;
715 if (bfd_asymbol_value (a
) > bfd_asymbol_value (b
))
717 else if (bfd_asymbol_value (a
) < bfd_asymbol_value (b
))
720 if (a
->section
> b
->section
)
722 else if (a
->section
< b
->section
)
725 an
= bfd_asymbol_name (a
);
726 bn
= bfd_asymbol_name (b
);
730 /* The symbols gnu_compiled and gcc2_compiled convey no real
731 information, so put them after other symbols with the same value. */
732 af
= (strstr (an
, "gnu_compiled") != NULL
733 || strstr (an
, "gcc2_compiled") != NULL
);
734 bf
= (strstr (bn
, "gnu_compiled") != NULL
735 || strstr (bn
, "gcc2_compiled") != NULL
);
742 /* We use a heuristic for the file name, to try to sort it after
743 more useful symbols. It may not work on non Unix systems, but it
744 doesn't really matter; the only difference is precisely which
745 symbol names get printed. */
747 #define file_symbol(s, sn, snl) \
748 (((s)->flags & BSF_FILE) != 0 \
749 || ((sn)[(snl) - 2] == '.' \
750 && ((sn)[(snl) - 1] == 'o' \
751 || (sn)[(snl) - 1] == 'a')))
753 af
= file_symbol (a
, an
, anl
);
754 bf
= file_symbol (b
, bn
, bnl
);
761 /* Try to sort global symbols before local symbols before function
762 symbols before debugging symbols. */
767 if ((aflags
& BSF_DEBUGGING
) != (bflags
& BSF_DEBUGGING
))
769 if ((aflags
& BSF_DEBUGGING
) != 0)
774 if ((aflags
& BSF_FUNCTION
) != (bflags
& BSF_FUNCTION
))
776 if ((aflags
& BSF_FUNCTION
) != 0)
781 if ((aflags
& BSF_LOCAL
) != (bflags
& BSF_LOCAL
))
783 if ((aflags
& BSF_LOCAL
) != 0)
788 if ((aflags
& BSF_GLOBAL
) != (bflags
& BSF_GLOBAL
))
790 if ((aflags
& BSF_GLOBAL
) != 0)
796 if (bfd_get_flavour (bfd_asymbol_bfd (a
)) == bfd_target_elf_flavour
797 && bfd_get_flavour (bfd_asymbol_bfd (b
)) == bfd_target_elf_flavour
)
802 if ((a
->flags
& BSF_SYNTHETIC
) == 0)
803 asz
= ((elf_symbol_type
*) a
)->internal_elf_sym
.st_size
;
805 if ((b
->flags
& BSF_SYNTHETIC
) == 0)
806 bsz
= ((elf_symbol_type
*) b
)->internal_elf_sym
.st_size
;
808 return asz
> bsz
? -1 : 1;
811 /* Symbols that start with '.' might be section names, so sort them
812 after symbols that don't start with '.'. */
813 if (an
[0] == '.' && bn
[0] != '.')
815 if (an
[0] != '.' && bn
[0] == '.')
818 /* Finally, if we can't distinguish them in any other way, try to
819 get consistent results by sorting the symbols by name. */
820 return strcmp (an
, bn
);
823 /* Sort relocs into address order. */
826 compare_relocs (const void *ap
, const void *bp
)
828 const arelent
*a
= * (const arelent
**) ap
;
829 const arelent
*b
= * (const arelent
**) bp
;
831 if (a
->address
> b
->address
)
833 else if (a
->address
< b
->address
)
836 /* So that associated relocations tied to the same address show up
837 in the correct order, we don't do any further sorting. */
846 /* Print an address (VMA) to the output stream in INFO.
847 If SKIP_ZEROES is TRUE, omit leading zeroes. */
850 objdump_print_value (bfd_vma vma
, struct disassemble_info
*inf
,
851 bfd_boolean skip_zeroes
)
855 struct objdump_disasm_info
*aux
;
857 aux
= (struct objdump_disasm_info
*) inf
->application_data
;
858 bfd_sprintf_vma (aux
->abfd
, buf
, vma
);
863 for (p
= buf
; *p
== '0'; ++p
)
868 (*inf
->fprintf_func
) (inf
->stream
, "%s", p
);
871 /* Print the name of a symbol. */
874 objdump_print_symname (bfd
*abfd
, struct disassemble_info
*inf
,
878 const char *name
, *version_string
= NULL
;
879 bfd_boolean hidden
= FALSE
;
882 name
= bfd_asymbol_name (sym
);
883 if (do_demangle
&& name
[0] != '\0')
885 /* Demangle the name. */
886 alloc
= bfd_demangle (abfd
, name
, DMGL_ANSI
| DMGL_PARAMS
);
891 if ((sym
->flags
& BSF_SYNTHETIC
) == 0)
892 version_string
= bfd_get_symbol_version_string (abfd
, sym
, &hidden
);
894 if (bfd_is_und_section (bfd_get_section (sym
)))
899 (*inf
->fprintf_func
) (inf
->stream
, "%s", name
);
900 if (version_string
&& *version_string
!= '\0')
901 (*inf
->fprintf_func
) (inf
->stream
, hidden
? "@%s" : "@@%s",
907 if (version_string
&& *version_string
!= '\0')
908 printf (hidden
? "@%s" : "@@%s", version_string
);
915 /* Locate a symbol given a bfd and a section (from INFO->application_data),
916 and a VMA. If INFO->application_data->require_sec is TRUE, then always
917 require the symbol to be in the section. Returns NULL if there is no
918 suitable symbol. If PLACE is not NULL, then *PLACE is set to the index
919 of the symbol in sorted_syms. */
922 find_symbol_for_address (bfd_vma vma
,
923 struct disassemble_info
*inf
,
926 /* @@ Would it speed things up to cache the last two symbols returned,
927 and maybe their address ranges? For many processors, only one memory
928 operand can be present at a time, so the 2-entry cache wouldn't be
929 constantly churned by code doing heavy memory accesses. */
931 /* Indices in `sorted_syms'. */
933 long max_count
= sorted_symcount
;
935 struct objdump_disasm_info
*aux
;
939 bfd_boolean want_section
;
941 if (sorted_symcount
< 1)
944 aux
= (struct objdump_disasm_info
*) inf
->application_data
;
947 opb
= inf
->octets_per_byte
;
949 /* Perform a binary search looking for the closest symbol to the
950 required value. We are searching the range (min, max_count]. */
951 while (min
+ 1 < max_count
)
955 thisplace
= (max_count
+ min
) / 2;
956 sym
= sorted_syms
[thisplace
];
958 if (bfd_asymbol_value (sym
) > vma
)
959 max_count
= thisplace
;
960 else if (bfd_asymbol_value (sym
) < vma
)
969 /* The symbol we want is now in min, the low end of the range we
970 were searching. If there are several symbols with the same
971 value, we want the first (non-section/non-debugging) one. */
974 && (bfd_asymbol_value (sorted_syms
[thisplace
])
975 == bfd_asymbol_value (sorted_syms
[thisplace
- 1]))
976 && ((sorted_syms
[thisplace
- 1]->flags
977 & (BSF_SECTION_SYM
| BSF_DEBUGGING
)) == 0)
981 /* Prefer a symbol in the current section if we have multple symbols
982 with the same value, as can occur with overlays or zero size
985 while (min
< max_count
986 && (bfd_asymbol_value (sorted_syms
[min
])
987 == bfd_asymbol_value (sorted_syms
[thisplace
])))
989 if (sorted_syms
[min
]->section
== sec
990 && inf
->symbol_is_valid (sorted_syms
[min
], inf
))
997 return sorted_syms
[thisplace
];
1002 /* If the file is relocatable, and the symbol could be from this
1003 section, prefer a symbol from this section over symbols from
1004 others, even if the other symbol's value might be closer.
1006 Note that this may be wrong for some symbol references if the
1007 sections have overlapping memory ranges, but in that case there's
1008 no way to tell what's desired without looking at the relocation
1011 Also give the target a chance to reject symbols. */
1012 want_section
= (aux
->require_sec
1013 || ((abfd
->flags
& HAS_RELOC
) != 0
1014 && vma
>= bfd_get_section_vma (abfd
, sec
)
1015 && vma
< (bfd_get_section_vma (abfd
, sec
)
1016 + bfd_section_size (abfd
, sec
) / opb
)));
1017 if ((sorted_syms
[thisplace
]->section
!= sec
&& want_section
)
1018 || ! inf
->symbol_is_valid (sorted_syms
[thisplace
], inf
))
1021 long newplace
= sorted_symcount
;
1023 for (i
= min
- 1; i
>= 0; i
--)
1025 if ((sorted_syms
[i
]->section
== sec
|| !want_section
)
1026 && inf
->symbol_is_valid (sorted_syms
[i
], inf
))
1028 if (newplace
== sorted_symcount
)
1031 if (bfd_asymbol_value (sorted_syms
[i
])
1032 != bfd_asymbol_value (sorted_syms
[newplace
]))
1035 /* Remember this symbol and keep searching until we reach
1036 an earlier address. */
1041 if (newplace
!= sorted_symcount
)
1042 thisplace
= newplace
;
1045 /* We didn't find a good symbol with a smaller value.
1046 Look for one with a larger value. */
1047 for (i
= thisplace
+ 1; i
< sorted_symcount
; i
++)
1049 if ((sorted_syms
[i
]->section
== sec
|| !want_section
)
1050 && inf
->symbol_is_valid (sorted_syms
[i
], inf
))
1058 if ((sorted_syms
[thisplace
]->section
!= sec
&& want_section
)
1059 || ! inf
->symbol_is_valid (sorted_syms
[thisplace
], inf
))
1060 /* There is no suitable symbol. */
1064 /* If we have not found an exact match for the specified address
1065 and we have dynamic relocations available, then we can produce
1066 a better result by matching a relocation to the address and
1067 using the symbol associated with that relocation. */
1069 && aux
->dynrelbuf
!= NULL
1070 && sorted_syms
[thisplace
]->value
!= vma
1071 /* If we have matched a synthetic symbol, then stick with that. */
1072 && (sorted_syms
[thisplace
]->flags
& BSF_SYNTHETIC
) == 0)
1077 for (rel_count
= aux
->dynrelcount
, rel_pp
= aux
->dynrelbuf
;
1080 arelent
* rel
= rel_pp
[rel_count
];
1082 if (rel
->address
== vma
1083 && rel
->sym_ptr_ptr
!= NULL
1084 /* Absolute relocations do not provide a more helpful symbolic address. */
1085 && ! bfd_is_abs_section ((* rel
->sym_ptr_ptr
)->section
))
1088 * place
= thisplace
;
1089 return * rel
->sym_ptr_ptr
;
1092 /* We are scanning backwards, so if we go below the target address
1094 if (rel_pp
[rel_count
]->address
< vma
)
1102 return sorted_syms
[thisplace
];
1105 /* Print an address and the offset to the nearest symbol. */
1108 objdump_print_addr_with_sym (bfd
*abfd
, asection
*sec
, asymbol
*sym
,
1109 bfd_vma vma
, struct disassemble_info
*inf
,
1110 bfd_boolean skip_zeroes
)
1112 objdump_print_value (vma
, inf
, skip_zeroes
);
1118 (*inf
->fprintf_func
) (inf
->stream
, " <%s",
1119 bfd_get_section_name (abfd
, sec
));
1120 secaddr
= bfd_get_section_vma (abfd
, sec
);
1123 (*inf
->fprintf_func
) (inf
->stream
, "-0x");
1124 objdump_print_value (secaddr
- vma
, inf
, TRUE
);
1126 else if (vma
> secaddr
)
1128 (*inf
->fprintf_func
) (inf
->stream
, "+0x");
1129 objdump_print_value (vma
- secaddr
, inf
, TRUE
);
1131 (*inf
->fprintf_func
) (inf
->stream
, ">");
1135 (*inf
->fprintf_func
) (inf
->stream
, " <");
1137 objdump_print_symname (abfd
, inf
, sym
);
1139 if (bfd_asymbol_value (sym
) == vma
)
1141 /* Undefined symbols in an executables and dynamic objects do not have
1142 a value associated with them, so it does not make sense to display
1143 an offset relative to them. Normally we would not be provided with
1144 this kind of symbol, but the target backend might choose to do so,
1145 and the code in find_symbol_for_address might return an as yet
1146 unresolved symbol associated with a dynamic reloc. */
1147 else if ((bfd_get_file_flags (abfd
) & (EXEC_P
| DYNAMIC
))
1148 && bfd_is_und_section (sym
->section
))
1150 else if (bfd_asymbol_value (sym
) > vma
)
1152 (*inf
->fprintf_func
) (inf
->stream
, "-0x");
1153 objdump_print_value (bfd_asymbol_value (sym
) - vma
, inf
, TRUE
);
1155 else if (vma
> bfd_asymbol_value (sym
))
1157 (*inf
->fprintf_func
) (inf
->stream
, "+0x");
1158 objdump_print_value (vma
- bfd_asymbol_value (sym
), inf
, TRUE
);
1161 (*inf
->fprintf_func
) (inf
->stream
, ">");
1164 if (display_file_offsets
)
1165 inf
->fprintf_func (inf
->stream
, _(" (File Offset: 0x%lx)"),
1166 (long int)(sec
->filepos
+ (vma
- sec
->vma
)));
1169 /* Print an address (VMA), symbolically if possible.
1170 If SKIP_ZEROES is TRUE, don't output leading zeroes. */
1173 objdump_print_addr (bfd_vma vma
,
1174 struct disassemble_info
*inf
,
1175 bfd_boolean skip_zeroes
)
1177 struct objdump_disasm_info
*aux
;
1178 asymbol
*sym
= NULL
;
1179 bfd_boolean skip_find
= FALSE
;
1181 aux
= (struct objdump_disasm_info
*) inf
->application_data
;
1183 if (sorted_symcount
< 1)
1185 (*inf
->fprintf_func
) (inf
->stream
, "0x");
1186 objdump_print_value (vma
, inf
, skip_zeroes
);
1188 if (display_file_offsets
)
1189 inf
->fprintf_func (inf
->stream
, _(" (File Offset: 0x%lx)"),
1190 (long int)(aux
->sec
->filepos
+ (vma
- aux
->sec
->vma
)));
1194 if (aux
->reloc
!= NULL
1195 && aux
->reloc
->sym_ptr_ptr
!= NULL
1196 && * aux
->reloc
->sym_ptr_ptr
!= NULL
)
1198 sym
= * aux
->reloc
->sym_ptr_ptr
;
1200 /* Adjust the vma to the reloc. */
1201 vma
+= bfd_asymbol_value (sym
);
1203 if (bfd_is_und_section (bfd_get_section (sym
)))
1208 sym
= find_symbol_for_address (vma
, inf
, NULL
);
1210 objdump_print_addr_with_sym (aux
->abfd
, aux
->sec
, sym
, vma
, inf
,
1214 /* Print VMA to INFO. This function is passed to the disassembler
1218 objdump_print_address (bfd_vma vma
, struct disassemble_info
*inf
)
1220 objdump_print_addr (vma
, inf
, ! prefix_addresses
);
1223 /* Determine if the given address has a symbol associated with it. */
1226 objdump_symbol_at_address (bfd_vma vma
, struct disassemble_info
* inf
)
1230 sym
= find_symbol_for_address (vma
, inf
, NULL
);
1232 return (sym
!= NULL
&& (bfd_asymbol_value (sym
) == vma
));
1235 /* Hold the last function name and the last line number we displayed
1236 in a disassembly. */
1238 static char *prev_functionname
;
1239 static unsigned int prev_line
;
1240 static unsigned int prev_discriminator
;
1242 /* We keep a list of all files that we have seen when doing a
1243 disassembly with source, so that we know how much of the file to
1244 display. This can be important for inlined functions. */
1246 struct print_file_list
1248 struct print_file_list
*next
;
1249 const char *filename
;
1250 const char *modname
;
1253 const char **linemap
;
1256 unsigned max_printed
;
1260 static struct print_file_list
*print_files
;
1262 /* The number of preceding context lines to show when we start
1263 displaying a file for the first time. */
1265 #define SHOW_PRECEDING_CONTEXT_LINES (5)
1267 /* Read a complete file into memory. */
1270 slurp_file (const char *fn
, size_t *size
, struct stat
*fst
)
1273 int ps
= getpagesize ();
1277 int fd
= open (fn
, O_RDONLY
| O_BINARY
);
1281 if (fstat (fd
, fst
) < 0)
1286 *size
= fst
->st_size
;
1288 msize
= (*size
+ ps
- 1) & ~(ps
- 1);
1289 map
= mmap (NULL
, msize
, PROT_READ
, MAP_SHARED
, fd
, 0);
1290 if (map
!= (char *) -1L)
1296 map
= (const char *) malloc (*size
);
1297 if (!map
|| (size_t) read (fd
, (char *) map
, *size
) != *size
)
1299 free ((void *) map
);
1306 #define line_map_decrease 5
1308 /* Precompute array of lines for a mapped file. */
1310 static const char **
1311 index_file (const char *map
, size_t size
, unsigned int *maxline
)
1313 const char *p
, *lstart
, *end
;
1314 int chars_per_line
= 45; /* First iteration will use 40. */
1315 unsigned int lineno
;
1316 const char **linemap
= NULL
;
1317 unsigned long line_map_size
= 0;
1323 for (p
= map
; p
< end
; p
++)
1327 if (p
+ 1 < end
&& p
[1] == '\r')
1330 else if (*p
== '\r')
1332 if (p
+ 1 < end
&& p
[1] == '\n')
1338 /* End of line found. */
1340 if (linemap
== NULL
|| line_map_size
< lineno
+ 1)
1342 unsigned long newsize
;
1344 chars_per_line
-= line_map_decrease
;
1345 if (chars_per_line
<= 1)
1347 line_map_size
= size
/ chars_per_line
+ 1;
1348 if (line_map_size
< lineno
+ 1)
1349 line_map_size
= lineno
+ 1;
1350 newsize
= line_map_size
* sizeof (char *);
1351 linemap
= (const char **) xrealloc (linemap
, newsize
);
1354 linemap
[lineno
++] = lstart
;
1362 /* Tries to open MODNAME, and if successful adds a node to print_files
1363 linked list and returns that node. Returns NULL on failure. */
1365 static struct print_file_list
*
1366 try_print_file_open (const char *origname
, const char *modname
, struct stat
*fst
)
1368 struct print_file_list
*p
;
1370 p
= (struct print_file_list
*) xmalloc (sizeof (struct print_file_list
));
1372 p
->map
= slurp_file (modname
, &p
->mapsize
, fst
);
1379 p
->linemap
= index_file (p
->map
, p
->mapsize
, &p
->maxline
);
1382 p
->filename
= origname
;
1383 p
->modname
= modname
;
1384 p
->next
= print_files
;
1390 /* If the source file, as described in the symtab, is not found
1391 try to locate it in one of the paths specified with -I
1392 If found, add location to print_files linked list. */
1394 static struct print_file_list
*
1395 update_source_path (const char *filename
, bfd
*abfd
)
1397 struct print_file_list
*p
;
1402 p
= try_print_file_open (filename
, filename
, &fst
);
1405 if (include_path_count
== 0)
1408 /* Get the name of the file. */
1409 fname
= lbasename (filename
);
1411 /* If file exists under a new path, we need to add it to the list
1412 so that show_line knows about it. */
1413 for (i
= 0; i
< include_path_count
; i
++)
1415 char *modname
= concat (include_paths
[i
], "/", fname
,
1418 p
= try_print_file_open (filename
, modname
, &fst
);
1428 long mtime
= bfd_get_mtime (abfd
);
1430 if (fst
.st_mtime
> mtime
)
1431 warn (_("source file %s is more recent than object file\n"),
1438 /* Print a source file line. */
1441 print_line (struct print_file_list
*p
, unsigned int linenum
)
1447 if (linenum
>= p
->maxline
)
1449 l
= p
->linemap
[linenum
];
1450 /* Test fwrite return value to quiet glibc warning. */
1451 len
= strcspn (l
, "\n\r");
1452 if (len
== 0 || fwrite (l
, len
, 1, stdout
) == 1)
1456 /* Print a range of source code lines. */
1459 dump_lines (struct print_file_list
*p
, unsigned int start
, unsigned int end
)
1463 while (start
<= end
)
1465 print_line (p
, start
);
1470 /* Show the line number, or the source line, in a disassembly
1474 show_line (bfd
*abfd
, asection
*section
, bfd_vma addr_offset
)
1476 const char *filename
;
1477 const char *functionname
;
1478 unsigned int linenumber
;
1479 unsigned int discriminator
;
1483 if (! with_line_numbers
&& ! with_source_code
)
1486 if (! bfd_find_nearest_line_discriminator (abfd
, section
, syms
, addr_offset
,
1487 &filename
, &functionname
,
1488 &linenumber
, &discriminator
))
1491 if (filename
!= NULL
&& *filename
== '\0')
1493 if (functionname
!= NULL
&& *functionname
== '\0')
1494 functionname
= NULL
;
1497 && IS_ABSOLUTE_PATH (filename
)
1501 const char *fname
= filename
;
1503 path
= xmalloc (prefix_length
+ PATH_MAX
+ 1);
1506 memcpy (path
, prefix
, prefix_length
);
1507 path_up
= path
+ prefix_length
;
1509 /* Build relocated filename, stripping off leading directories
1510 from the initial filename if requested. */
1511 if (prefix_strip
> 0)
1516 /* Skip selected directory levels. */
1517 for (s
= fname
+ 1; *s
!= '\0' && level
< prefix_strip
; s
++)
1518 if (IS_DIR_SEPARATOR(*s
))
1525 /* Update complete filename. */
1526 strncpy (path_up
, fname
, PATH_MAX
);
1527 path_up
[PATH_MAX
] = '\0';
1535 if (with_line_numbers
)
1537 if (functionname
!= NULL
1538 && (prev_functionname
== NULL
1539 || strcmp (functionname
, prev_functionname
) != 0))
1540 printf ("%s():\n", functionname
);
1541 if (linenumber
> 0 && (linenumber
!= prev_line
||
1542 (discriminator
!= prev_discriminator
)))
1544 if (discriminator
> 0)
1545 printf ("%s:%u (discriminator %u)\n", filename
== NULL
? "???" : filename
,
1546 linenumber
, discriminator
);
1548 printf ("%s:%u\n", filename
== NULL
? "???" : filename
, linenumber
);
1552 const char *filename2
;
1553 const char *functionname2
;
1556 while (bfd_find_inliner_info (abfd
, &filename2
, &functionname2
,
1558 printf ("inlined by %s:%u (%s)\n", filename2
, line2
,
1563 if (with_source_code
1567 struct print_file_list
**pp
, *p
;
1570 for (pp
= &print_files
; *pp
!= NULL
; pp
= &(*pp
)->next
)
1571 if (filename_cmp ((*pp
)->filename
, filename
) == 0)
1578 filename
= xstrdup (filename
);
1579 p
= update_source_path (filename
, abfd
);
1582 if (p
!= NULL
&& linenumber
!= p
->last_line
)
1584 if (file_start_context
&& p
->first
)
1588 l
= linenumber
- SHOW_PRECEDING_CONTEXT_LINES
;
1589 if (l
>= linenumber
)
1591 if (p
->max_printed
>= l
)
1593 if (p
->max_printed
< linenumber
)
1594 l
= p
->max_printed
+ 1;
1599 dump_lines (p
, l
, linenumber
);
1600 if (p
->max_printed
< linenumber
)
1601 p
->max_printed
= linenumber
;
1602 p
->last_line
= linenumber
;
1607 if (functionname
!= NULL
1608 && (prev_functionname
== NULL
1609 || strcmp (functionname
, prev_functionname
) != 0))
1611 if (prev_functionname
!= NULL
)
1612 free (prev_functionname
);
1613 prev_functionname
= (char *) xmalloc (strlen (functionname
) + 1);
1614 strcpy (prev_functionname
, functionname
);
1617 if (linenumber
> 0 && linenumber
!= prev_line
)
1618 prev_line
= linenumber
;
1620 if (discriminator
!= prev_discriminator
)
1621 prev_discriminator
= discriminator
;
1627 /* Pseudo FILE object for strings. */
1635 /* sprintf to a "stream". */
1637 static int ATTRIBUTE_PRINTF_2
1638 objdump_sprintf (SFILE
*f
, const char *format
, ...)
1645 size_t space
= f
->alloc
- f
->pos
;
1647 va_start (args
, format
);
1648 n
= vsnprintf (f
->buffer
+ f
->pos
, space
, format
, args
);
1654 f
->alloc
= (f
->alloc
+ n
) * 2;
1655 f
->buffer
= (char *) xrealloc (f
->buffer
, f
->alloc
);
1662 /* The number of zeroes we want to see before we start skipping them.
1663 The number is arbitrarily chosen. */
1665 #define DEFAULT_SKIP_ZEROES 8
1667 /* The number of zeroes to skip at the end of a section. If the
1668 number of zeroes at the end is between SKIP_ZEROES_AT_END and
1669 SKIP_ZEROES, they will be disassembled. If there are fewer than
1670 SKIP_ZEROES_AT_END, they will be skipped. This is a heuristic
1671 attempt to avoid disassembling zeroes inserted by section
1674 #define DEFAULT_SKIP_ZEROES_AT_END 3
1676 /* Disassemble some data in memory between given values. */
1679 disassemble_bytes (struct disassemble_info
* inf
,
1680 disassembler_ftype disassemble_fn
,
1683 bfd_vma start_offset
,
1684 bfd_vma stop_offset
,
1687 arelent
** relppend
)
1689 struct objdump_disasm_info
*aux
;
1691 int octets_per_line
;
1692 int skip_addr_chars
;
1693 bfd_vma addr_offset
;
1694 unsigned int opb
= inf
->octets_per_byte
;
1695 unsigned int skip_zeroes
= inf
->skip_zeroes
;
1696 unsigned int skip_zeroes_at_end
= inf
->skip_zeroes_at_end
;
1700 aux
= (struct objdump_disasm_info
*) inf
->application_data
;
1704 sfile
.buffer
= (char *) xmalloc (sfile
.alloc
);
1708 octets_per_line
= insn_width
;
1710 octets_per_line
= 4;
1712 octets_per_line
= 16;
1714 /* Figure out how many characters to skip at the start of an
1715 address, to make the disassembly look nicer. We discard leading
1716 zeroes in chunks of 4, ensuring that there is always a leading
1718 skip_addr_chars
= 0;
1719 if (! prefix_addresses
)
1723 bfd_sprintf_vma (aux
->abfd
, buf
, section
->vma
+ section
->size
/ opb
);
1725 while (buf
[skip_addr_chars
] == '0')
1728 /* Don't discard zeros on overflow. */
1729 if (buf
[skip_addr_chars
] == '\0' && section
->vma
!= 0)
1730 skip_addr_chars
= 0;
1732 if (skip_addr_chars
!= 0)
1733 skip_addr_chars
= (skip_addr_chars
- 1) & -4;
1736 inf
->insn_info_valid
= 0;
1738 addr_offset
= start_offset
;
1739 while (addr_offset
< stop_offset
)
1742 bfd_boolean need_nl
= FALSE
;
1743 int previous_octets
;
1745 /* Remember the length of the previous instruction. */
1746 previous_octets
= octets
;
1749 /* Make sure we don't use relocs from previous instructions. */
1752 /* If we see more than SKIP_ZEROES octets of zeroes, we just
1754 for (z
= addr_offset
* opb
; z
< stop_offset
* opb
; z
++)
1757 if (! disassemble_zeroes
1758 && (inf
->insn_info_valid
== 0
1759 || inf
->branch_delay_insns
== 0)
1760 && (z
- addr_offset
* opb
>= skip_zeroes
1761 || (z
== stop_offset
* opb
&&
1762 z
- addr_offset
* opb
< skip_zeroes_at_end
)))
1764 /* If there are more nonzero octets to follow, we only skip
1765 zeroes in multiples of 4, to try to avoid running over
1766 the start of an instruction which happens to start with
1768 if (z
!= stop_offset
* opb
)
1769 z
= addr_offset
* opb
+ ((z
- addr_offset
* opb
) &~ 3);
1771 octets
= z
- addr_offset
* opb
;
1773 /* If we are going to display more data, and we are displaying
1774 file offsets, then tell the user how many zeroes we skip
1775 and the file offset from where we resume dumping. */
1776 if (display_file_offsets
&& ((addr_offset
+ (octets
/ opb
)) < stop_offset
))
1777 printf ("\t... (skipping %d zeroes, resuming at file offset: 0x%lx)\n",
1779 (unsigned long) (section
->filepos
1780 + (addr_offset
+ (octets
/ opb
))));
1790 if (with_line_numbers
|| with_source_code
)
1791 show_line (aux
->abfd
, section
, addr_offset
);
1793 if (! prefix_addresses
)
1797 bfd_sprintf_vma (aux
->abfd
, buf
, section
->vma
+ addr_offset
);
1798 for (s
= buf
+ skip_addr_chars
; *s
== '0'; s
++)
1802 printf ("%s:\t", buf
+ skip_addr_chars
);
1806 aux
->require_sec
= TRUE
;
1807 objdump_print_address (section
->vma
+ addr_offset
, inf
);
1808 aux
->require_sec
= FALSE
;
1815 inf
->fprintf_func
= (fprintf_ftype
) objdump_sprintf
;
1816 inf
->stream
= &sfile
;
1817 inf
->bytes_per_line
= 0;
1818 inf
->bytes_per_chunk
= 0;
1819 inf
->flags
= disassemble_all
? DISASSEMBLE_DATA
: 0;
1821 inf
->flags
|= USER_SPECIFIED_MACHINE_TYPE
;
1823 if (inf
->disassembler_needs_relocs
1824 && (bfd_get_file_flags (aux
->abfd
) & EXEC_P
) == 0
1825 && (bfd_get_file_flags (aux
->abfd
) & DYNAMIC
) == 0
1826 && *relppp
< relppend
)
1828 bfd_signed_vma distance_to_rel
;
1830 distance_to_rel
= (**relppp
)->address
1831 - (rel_offset
+ addr_offset
);
1833 /* Check to see if the current reloc is associated with
1834 the instruction that we are about to disassemble. */
1835 if (distance_to_rel
== 0
1836 /* FIXME: This is wrong. We are trying to catch
1837 relocs that are addressed part way through the
1838 current instruction, as might happen with a packed
1839 VLIW instruction. Unfortunately we do not know the
1840 length of the current instruction since we have not
1841 disassembled it yet. Instead we take a guess based
1842 upon the length of the previous instruction. The
1843 proper solution is to have a new target-specific
1844 disassembler function which just returns the length
1845 of an instruction at a given address without trying
1846 to display its disassembly. */
1847 || (distance_to_rel
> 0
1848 && distance_to_rel
< (bfd_signed_vma
) (previous_octets
/ opb
)))
1850 inf
->flags
|= INSN_HAS_RELOC
;
1851 aux
->reloc
= **relppp
;
1855 if (! disassemble_all
1856 && (section
->flags
& (SEC_CODE
| SEC_HAS_CONTENTS
))
1857 == (SEC_CODE
| SEC_HAS_CONTENTS
))
1858 /* Set a stop_vma so that the disassembler will not read
1859 beyond the next symbol. We assume that symbols appear on
1860 the boundaries between instructions. We only do this when
1861 disassembling code of course, and when -D is in effect. */
1862 inf
->stop_vma
= section
->vma
+ stop_offset
;
1864 octets
= (*disassemble_fn
) (section
->vma
+ addr_offset
, inf
);
1867 inf
->fprintf_func
= (fprintf_ftype
) fprintf
;
1868 inf
->stream
= stdout
;
1869 if (insn_width
== 0 && inf
->bytes_per_line
!= 0)
1870 octets_per_line
= inf
->bytes_per_line
;
1871 if (octets
< (int) opb
)
1874 printf ("%s\n", sfile
.buffer
);
1877 non_fatal (_("disassemble_fn returned length %d"),
1888 octets
= octets_per_line
;
1889 if (addr_offset
+ octets
/ opb
> stop_offset
)
1890 octets
= (stop_offset
- addr_offset
) * opb
;
1892 for (j
= addr_offset
* opb
; j
< addr_offset
* opb
+ octets
; ++j
)
1894 if (ISPRINT (data
[j
]))
1895 buf
[j
- addr_offset
* opb
] = data
[j
];
1897 buf
[j
- addr_offset
* opb
] = '.';
1899 buf
[j
- addr_offset
* opb
] = '\0';
1902 if (prefix_addresses
1904 : show_raw_insn
>= 0)
1908 /* If ! prefix_addresses and ! wide_output, we print
1909 octets_per_line octets per line. */
1911 if (pb
> octets_per_line
&& ! prefix_addresses
&& ! wide_output
)
1912 pb
= octets_per_line
;
1914 if (inf
->bytes_per_chunk
)
1915 bpc
= inf
->bytes_per_chunk
;
1919 for (j
= addr_offset
* opb
; j
< addr_offset
* opb
+ pb
; j
+= bpc
)
1921 /* PR 21580: Check for a buffer ending early. */
1922 if (j
+ bpc
<= stop_offset
* opb
)
1926 if (inf
->display_endian
== BFD_ENDIAN_LITTLE
)
1928 for (k
= bpc
- 1; k
>= 0; k
--)
1929 printf ("%02x", (unsigned) data
[j
+ k
]);
1933 for (k
= 0; k
< bpc
; k
++)
1934 printf ("%02x", (unsigned) data
[j
+ k
]);
1940 for (; pb
< octets_per_line
; pb
+= bpc
)
1944 for (k
= 0; k
< bpc
; k
++)
1949 /* Separate raw data from instruction by extra space. */
1959 printf ("%s", sfile
.buffer
);
1961 if (prefix_addresses
1963 : show_raw_insn
>= 0)
1971 j
= addr_offset
* opb
+ pb
;
1973 bfd_sprintf_vma (aux
->abfd
, buf
, section
->vma
+ j
/ opb
);
1974 for (s
= buf
+ skip_addr_chars
; *s
== '0'; s
++)
1978 printf ("%s:\t", buf
+ skip_addr_chars
);
1980 pb
+= octets_per_line
;
1983 for (; j
< addr_offset
* opb
+ pb
; j
+= bpc
)
1985 /* PR 21619: Check for a buffer ending early. */
1986 if (j
+ bpc
<= stop_offset
* opb
)
1990 if (inf
->display_endian
== BFD_ENDIAN_LITTLE
)
1992 for (k
= bpc
- 1; k
>= 0; k
--)
1993 printf ("%02x", (unsigned) data
[j
+ k
]);
1997 for (k
= 0; k
< bpc
; k
++)
1998 printf ("%02x", (unsigned) data
[j
+ k
]);
2012 while ((*relppp
) < relppend
2013 && (**relppp
)->address
< rel_offset
+ addr_offset
+ octets
/ opb
)
2015 if (dump_reloc_info
|| dump_dynamic_reloc_info
)
2026 objdump_print_value (section
->vma
- rel_offset
+ q
->address
,
2029 if (q
->howto
== NULL
)
2030 printf (": *unknown*\t");
2031 else if (q
->howto
->name
)
2032 printf (": %s\t", q
->howto
->name
);
2034 printf (": %d\t", q
->howto
->type
);
2036 if (q
->sym_ptr_ptr
== NULL
|| *q
->sym_ptr_ptr
== NULL
)
2037 printf ("*unknown*");
2040 const char *sym_name
;
2042 sym_name
= bfd_asymbol_name (*q
->sym_ptr_ptr
);
2043 if (sym_name
!= NULL
&& *sym_name
!= '\0')
2044 objdump_print_symname (aux
->abfd
, inf
, *q
->sym_ptr_ptr
);
2049 sym_sec
= bfd_get_section (*q
->sym_ptr_ptr
);
2050 sym_name
= bfd_get_section_name (aux
->abfd
, sym_sec
);
2051 if (sym_name
== NULL
|| *sym_name
== '\0')
2052 sym_name
= "*unknown*";
2053 printf ("%s", sym_name
);
2059 bfd_signed_vma addend
= q
->addend
;
2067 objdump_print_value (addend
, inf
, TRUE
);
2079 addr_offset
+= octets
/ opb
;
2082 free (sfile
.buffer
);
2086 disassemble_section (bfd
*abfd
, asection
*section
, void *inf
)
2088 const struct elf_backend_data
* bed
;
2089 bfd_vma sign_adjust
= 0;
2090 struct disassemble_info
* pinfo
= (struct disassemble_info
*) inf
;
2091 struct objdump_disasm_info
* paux
;
2092 unsigned int opb
= pinfo
->octets_per_byte
;
2093 bfd_byte
* data
= NULL
;
2094 bfd_size_type datasize
= 0;
2095 arelent
** rel_pp
= NULL
;
2096 arelent
** rel_ppstart
= NULL
;
2097 arelent
** rel_ppend
;
2098 bfd_vma stop_offset
;
2099 asymbol
* sym
= NULL
;
2103 unsigned long addr_offset
;
2105 /* Sections that do not contain machine
2106 code are not normally disassembled. */
2107 if (! disassemble_all
2108 && only_list
== NULL
2109 && ((section
->flags
& (SEC_CODE
| SEC_HAS_CONTENTS
))
2110 != (SEC_CODE
| SEC_HAS_CONTENTS
)))
2113 if (! process_section_p (section
))
2116 datasize
= bfd_get_section_size (section
);
2120 if (start_address
== (bfd_vma
) -1
2121 || start_address
< section
->vma
)
2124 addr_offset
= start_address
- section
->vma
;
2126 if (stop_address
== (bfd_vma
) -1)
2127 stop_offset
= datasize
/ opb
;
2130 if (stop_address
< section
->vma
)
2133 stop_offset
= stop_address
- section
->vma
;
2134 if (stop_offset
> datasize
/ opb
)
2135 stop_offset
= datasize
/ opb
;
2138 if (addr_offset
>= stop_offset
)
2141 /* Decide which set of relocs to use. Load them if necessary. */
2142 paux
= (struct objdump_disasm_info
*) pinfo
->application_data
;
2143 if (paux
->dynrelbuf
&& dump_dynamic_reloc_info
)
2145 rel_pp
= paux
->dynrelbuf
;
2146 rel_count
= paux
->dynrelcount
;
2147 /* Dynamic reloc addresses are absolute, non-dynamic are section
2148 relative. REL_OFFSET specifies the reloc address corresponding
2149 to the start of this section. */
2150 rel_offset
= section
->vma
;
2158 if ((section
->flags
& SEC_RELOC
) != 0
2159 && (dump_reloc_info
|| pinfo
->disassembler_needs_relocs
))
2163 relsize
= bfd_get_reloc_upper_bound (abfd
, section
);
2165 bfd_fatal (bfd_get_filename (abfd
));
2169 rel_ppstart
= rel_pp
= (arelent
**) xmalloc (relsize
);
2170 rel_count
= bfd_canonicalize_reloc (abfd
, section
, rel_pp
, syms
);
2172 bfd_fatal (bfd_get_filename (abfd
));
2174 /* Sort the relocs by address. */
2175 qsort (rel_pp
, rel_count
, sizeof (arelent
*), compare_relocs
);
2179 rel_ppend
= rel_pp
+ rel_count
;
2181 data
= (bfd_byte
*) xmalloc (datasize
);
2183 if (!bfd_get_section_contents (abfd
, section
, data
, 0, datasize
))
2185 non_fatal (_("Reading section %s failed because: %s"),
2186 section
->name
, bfd_errmsg (bfd_get_error ()));
2190 paux
->sec
= section
;
2191 pinfo
->buffer
= data
;
2192 pinfo
->buffer_vma
= section
->vma
;
2193 pinfo
->buffer_length
= datasize
;
2194 pinfo
->section
= section
;
2196 /* Skip over the relocs belonging to addresses below the
2198 while (rel_pp
< rel_ppend
2199 && (*rel_pp
)->address
< rel_offset
+ addr_offset
)
2202 printf (_("\nDisassembly of section %s:\n"), section
->name
);
2204 /* Find the nearest symbol forwards from our current position. */
2205 paux
->require_sec
= TRUE
;
2206 sym
= (asymbol
*) find_symbol_for_address (section
->vma
+ addr_offset
,
2207 (struct disassemble_info
*) inf
,
2209 paux
->require_sec
= FALSE
;
2211 /* PR 9774: If the target used signed addresses then we must make
2212 sure that we sign extend the value that we calculate for 'addr'
2213 in the loop below. */
2214 if (bfd_get_flavour (abfd
) == bfd_target_elf_flavour
2215 && (bed
= get_elf_backend_data (abfd
)) != NULL
2216 && bed
->sign_extend_vma
)
2217 sign_adjust
= (bfd_vma
) 1 << (bed
->s
->arch_size
- 1);
2219 /* Disassemble a block of instructions up to the address associated with
2220 the symbol we have just found. Then print the symbol and find the
2221 next symbol on. Repeat until we have disassembled the entire section
2222 or we have reached the end of the address range we are interested in. */
2223 while (addr_offset
< stop_offset
)
2227 bfd_vma nextstop_offset
;
2230 addr
= section
->vma
+ addr_offset
;
2231 addr
= ((addr
& ((sign_adjust
<< 1) - 1)) ^ sign_adjust
) - sign_adjust
;
2233 if (sym
!= NULL
&& bfd_asymbol_value (sym
) <= addr
)
2238 (x
< sorted_symcount
2239 && (bfd_asymbol_value (sorted_syms
[x
]) <= addr
));
2243 pinfo
->symbols
= sorted_syms
+ place
;
2244 pinfo
->num_symbols
= x
- place
;
2245 pinfo
->symtab_pos
= place
;
2249 pinfo
->symbols
= NULL
;
2250 pinfo
->num_symbols
= 0;
2251 pinfo
->symtab_pos
= -1;
2254 if (! prefix_addresses
)
2256 pinfo
->fprintf_func (pinfo
->stream
, "\n");
2257 objdump_print_addr_with_sym (abfd
, section
, sym
, addr
,
2259 pinfo
->fprintf_func (pinfo
->stream
, ":\n");
2262 if (sym
!= NULL
&& bfd_asymbol_value (sym
) > addr
)
2264 else if (sym
== NULL
)
2268 #define is_valid_next_sym(SYM) \
2269 ((SYM)->section == section \
2270 && (bfd_asymbol_value (SYM) > bfd_asymbol_value (sym)) \
2271 && pinfo->symbol_is_valid (SYM, pinfo))
2273 /* Search forward for the next appropriate symbol in
2274 SECTION. Note that all the symbols are sorted
2275 together into one big array, and that some sections
2276 may have overlapping addresses. */
2277 while (place
< sorted_symcount
2278 && ! is_valid_next_sym (sorted_syms
[place
]))
2281 if (place
>= sorted_symcount
)
2284 nextsym
= sorted_syms
[place
];
2287 if (sym
!= NULL
&& bfd_asymbol_value (sym
) > addr
)
2288 nextstop_offset
= bfd_asymbol_value (sym
) - section
->vma
;
2289 else if (nextsym
== NULL
)
2290 nextstop_offset
= stop_offset
;
2292 nextstop_offset
= bfd_asymbol_value (nextsym
) - section
->vma
;
2294 if (nextstop_offset
> stop_offset
2295 || nextstop_offset
<= addr_offset
)
2296 nextstop_offset
= stop_offset
;
2298 /* If a symbol is explicitly marked as being an object
2299 rather than a function, just dump the bytes without
2300 disassembling them. */
2303 || sym
->section
!= section
2304 || bfd_asymbol_value (sym
) > addr
2305 || ((sym
->flags
& BSF_OBJECT
) == 0
2306 && (strstr (bfd_asymbol_name (sym
), "gnu_compiled")
2308 && (strstr (bfd_asymbol_name (sym
), "gcc2_compiled")
2310 || (sym
->flags
& BSF_FUNCTION
) != 0)
2315 disassemble_bytes (pinfo
, paux
->disassemble_fn
, insns
, data
,
2316 addr_offset
, nextstop_offset
,
2317 rel_offset
, &rel_pp
, rel_ppend
);
2319 addr_offset
= nextstop_offset
;
2325 if (rel_ppstart
!= NULL
)
2329 /* Disassemble the contents of an object file. */
2332 disassemble_data (bfd
*abfd
)
2334 struct disassemble_info disasm_info
;
2335 struct objdump_disasm_info aux
;
2339 prev_functionname
= NULL
;
2341 prev_discriminator
= 0;
2343 /* We make a copy of syms to sort. We don't want to sort syms
2344 because that will screw up the relocs. */
2345 sorted_symcount
= symcount
? symcount
: dynsymcount
;
2346 sorted_syms
= (asymbol
**) xmalloc ((sorted_symcount
+ synthcount
)
2347 * sizeof (asymbol
*));
2348 memcpy (sorted_syms
, symcount
? syms
: dynsyms
,
2349 sorted_symcount
* sizeof (asymbol
*));
2351 sorted_symcount
= remove_useless_symbols (sorted_syms
, sorted_symcount
);
2353 for (i
= 0; i
< synthcount
; ++i
)
2355 sorted_syms
[sorted_symcount
] = synthsyms
+ i
;
2359 /* Sort the symbols into section and symbol order. */
2360 qsort (sorted_syms
, sorted_symcount
, sizeof (asymbol
*), compare_symbols
);
2362 init_disassemble_info (&disasm_info
, stdout
, (fprintf_ftype
) fprintf
);
2364 disasm_info
.application_data
= (void *) &aux
;
2366 aux
.require_sec
= FALSE
;
2367 aux
.dynrelbuf
= NULL
;
2368 aux
.dynrelcount
= 0;
2371 disasm_info
.print_address_func
= objdump_print_address
;
2372 disasm_info
.symbol_at_address_func
= objdump_symbol_at_address
;
2374 if (machine
!= NULL
)
2376 const bfd_arch_info_type
*inf
= bfd_scan_arch (machine
);
2379 fatal (_("can't use supplied machine %s"), machine
);
2381 abfd
->arch_info
= inf
;
2384 if (endian
!= BFD_ENDIAN_UNKNOWN
)
2386 struct bfd_target
*xvec
;
2388 xvec
= (struct bfd_target
*) xmalloc (sizeof (struct bfd_target
));
2389 memcpy (xvec
, abfd
->xvec
, sizeof (struct bfd_target
));
2390 xvec
->byteorder
= endian
;
2394 /* Use libopcodes to locate a suitable disassembler. */
2395 aux
.disassemble_fn
= disassembler (bfd_get_arch (abfd
),
2396 bfd_big_endian (abfd
),
2397 bfd_get_mach (abfd
), abfd
);
2398 if (!aux
.disassemble_fn
)
2400 non_fatal (_("can't disassemble for architecture %s\n"),
2401 bfd_printable_arch_mach (bfd_get_arch (abfd
), 0));
2406 disasm_info
.flavour
= bfd_get_flavour (abfd
);
2407 disasm_info
.arch
= bfd_get_arch (abfd
);
2408 disasm_info
.mach
= bfd_get_mach (abfd
);
2409 disasm_info
.disassembler_options
= disassembler_options
;
2410 disasm_info
.octets_per_byte
= bfd_octets_per_byte (abfd
);
2411 disasm_info
.skip_zeroes
= DEFAULT_SKIP_ZEROES
;
2412 disasm_info
.skip_zeroes_at_end
= DEFAULT_SKIP_ZEROES_AT_END
;
2413 disasm_info
.disassembler_needs_relocs
= FALSE
;
2415 if (bfd_big_endian (abfd
))
2416 disasm_info
.display_endian
= disasm_info
.endian
= BFD_ENDIAN_BIG
;
2417 else if (bfd_little_endian (abfd
))
2418 disasm_info
.display_endian
= disasm_info
.endian
= BFD_ENDIAN_LITTLE
;
2420 /* ??? Aborting here seems too drastic. We could default to big or little
2422 disasm_info
.endian
= BFD_ENDIAN_UNKNOWN
;
2424 /* Allow the target to customize the info structure. */
2425 disassemble_init_for_target (& disasm_info
);
2427 /* Pre-load the dynamic relocs as we may need them during the disassembly. */
2429 long relsize
= bfd_get_dynamic_reloc_upper_bound (abfd
);
2431 if (relsize
< 0 && dump_dynamic_reloc_info
)
2432 bfd_fatal (bfd_get_filename (abfd
));
2436 aux
.dynrelbuf
= (arelent
**) xmalloc (relsize
);
2437 aux
.dynrelcount
= bfd_canonicalize_dynamic_reloc (abfd
,
2440 if (aux
.dynrelcount
< 0)
2441 bfd_fatal (bfd_get_filename (abfd
));
2443 /* Sort the relocs by address. */
2444 qsort (aux
.dynrelbuf
, aux
.dynrelcount
, sizeof (arelent
*),
2448 disasm_info
.symtab
= sorted_syms
;
2449 disasm_info
.symtab_size
= sorted_symcount
;
2451 bfd_map_over_sections (abfd
, disassemble_section
, & disasm_info
);
2453 if (aux
.dynrelbuf
!= NULL
)
2454 free (aux
.dynrelbuf
);
2459 load_specific_debug_section (enum dwarf_section_display_enum debug
,
2460 asection
*sec
, void *file
)
2462 struct dwarf_section
*section
= &debug_displays
[debug
].section
;
2463 bfd
*abfd
= (bfd
*) file
;
2466 /* If it is already loaded, do nothing. */
2467 if (section
->start
!= NULL
)
2470 section
->reloc_info
= NULL
;
2471 section
->num_relocs
= 0;
2472 section
->address
= bfd_get_section_vma (abfd
, sec
);
2473 section
->size
= bfd_get_section_size (sec
);
2474 section
->start
= NULL
;
2475 section
->user_data
= sec
;
2476 ret
= bfd_get_full_section_contents (abfd
, sec
, §ion
->start
);
2480 free_debug_section (debug
);
2481 printf (_("\nCan't get contents for section '%s'.\n"),
2486 if (is_relocatable
&& debug_displays
[debug
].relocate
)
2488 bfd_cache_section_contents (sec
, section
->start
);
2490 ret
= bfd_simple_get_relocated_section_contents (abfd
,
2497 free_debug_section (debug
);
2498 printf (_("\nCan't get contents for section '%s'.\n"),
2505 reloc_size
= bfd_get_reloc_upper_bound (abfd
, sec
);
2508 unsigned long reloc_count
;
2511 relocs
= (arelent
**) xmalloc (reloc_size
);
2513 reloc_count
= bfd_canonicalize_reloc (abfd
, sec
, relocs
, NULL
);
2514 if (reloc_count
== 0)
2518 section
->reloc_info
= relocs
;
2519 section
->num_relocs
= reloc_count
;
2528 reloc_at (struct dwarf_section
* dsec
, dwarf_vma offset
)
2533 if (dsec
== NULL
|| dsec
->reloc_info
== NULL
)
2536 relocs
= (arelent
**) dsec
->reloc_info
;
2538 for (; (rp
= * relocs
) != NULL
; ++ relocs
)
2539 if (rp
->address
== offset
)
2546 load_debug_section (enum dwarf_section_display_enum debug
, void *file
)
2548 struct dwarf_section
*section
= &debug_displays
[debug
].section
;
2549 bfd
*abfd
= (bfd
*) file
;
2552 /* If it is already loaded, do nothing. */
2553 if (section
->start
!= NULL
)
2556 /* Locate the debug section. */
2557 sec
= bfd_get_section_by_name (abfd
, section
->uncompressed_name
);
2559 section
->name
= section
->uncompressed_name
;
2562 sec
= bfd_get_section_by_name (abfd
, section
->compressed_name
);
2564 section
->name
= section
->compressed_name
;
2569 return load_specific_debug_section (debug
, sec
, file
);
2573 free_debug_section (enum dwarf_section_display_enum debug
)
2575 struct dwarf_section
*section
= &debug_displays
[debug
].section
;
2577 if (section
->start
== NULL
)
2580 /* PR 17512: file: 0f67f69d. */
2581 if (section
->user_data
!= NULL
)
2583 asection
* sec
= (asection
*) section
->user_data
;
2585 /* If we are freeing contents that are also pointed to by the BFD
2586 library's section structure then make sure to update those pointers
2587 too. Otherwise, the next time we try to load data for this section
2588 we can end up using a stale pointer. */
2589 if (section
->start
== sec
->contents
)
2591 sec
->contents
= NULL
;
2592 sec
->flags
&= ~ SEC_IN_MEMORY
;
2593 sec
->compress_status
= COMPRESS_SECTION_NONE
;
2597 free ((char *) section
->start
);
2598 section
->start
= NULL
;
2599 section
->address
= 0;
2604 dump_dwarf_section (bfd
*abfd
, asection
*section
,
2605 void *arg ATTRIBUTE_UNUSED
)
2607 const char *name
= bfd_get_section_name (abfd
, section
);
2611 if (CONST_STRNEQ (name
, ".gnu.linkonce.wi."))
2612 match
= ".debug_info";
2616 for (i
= 0; i
< max
; i
++)
2617 if ((strcmp (debug_displays
[i
].section
.uncompressed_name
, match
) == 0
2618 || strcmp (debug_displays
[i
].section
.compressed_name
, match
) == 0)
2619 && debug_displays
[i
].enabled
!= NULL
2620 && *debug_displays
[i
].enabled
)
2622 struct dwarf_section
*sec
= &debug_displays
[i
].section
;
2624 if (strcmp (sec
->uncompressed_name
, match
) == 0)
2625 sec
->name
= sec
->uncompressed_name
;
2627 sec
->name
= sec
->compressed_name
;
2628 if (load_specific_debug_section ((enum dwarf_section_display_enum
) i
,
2631 debug_displays
[i
].display (sec
, abfd
);
2633 if (i
!= info
&& i
!= abbrev
)
2634 free_debug_section ((enum dwarf_section_display_enum
) i
);
2640 /* Dump the dwarf debugging information. */
2643 dump_dwarf (bfd
*abfd
)
2645 is_relocatable
= (abfd
->flags
& (EXEC_P
| DYNAMIC
)) == 0;
2647 eh_addr_size
= bfd_arch_bits_per_address (abfd
) / 8;
2649 if (bfd_big_endian (abfd
))
2650 byte_get
= byte_get_big_endian
;
2651 else if (bfd_little_endian (abfd
))
2652 byte_get
= byte_get_little_endian
;
2654 /* PR 17512: file: objdump-s-endless-loop.tekhex. */
2656 warn (_("File %s does not contain any dwarf debug information\n"),
2657 bfd_get_filename (abfd
));
2661 switch (bfd_get_arch (abfd
))
2664 switch (bfd_get_mach (abfd
))
2666 case bfd_mach_x86_64
:
2667 case bfd_mach_x86_64_intel_syntax
:
2668 case bfd_mach_x86_64_nacl
:
2669 case bfd_mach_x64_32
:
2670 case bfd_mach_x64_32_intel_syntax
:
2671 case bfd_mach_x64_32_nacl
:
2672 init_dwarf_regnames_x86_64 ();
2676 init_dwarf_regnames_i386 ();
2681 case bfd_arch_iamcu
:
2682 init_dwarf_regnames_iamcu ();
2685 case bfd_arch_aarch64
:
2686 init_dwarf_regnames_aarch64();
2690 init_dwarf_regnames_s390 ();
2697 bfd_map_over_sections (abfd
, dump_dwarf_section
, NULL
);
2699 free_debug_memory ();
2702 /* Read ABFD's stabs section STABSECT_NAME, and return a pointer to
2703 it. Return NULL on failure. */
2706 read_section_stabs (bfd
*abfd
, const char *sect_name
, bfd_size_type
*size_ptr
)
2712 stabsect
= bfd_get_section_by_name (abfd
, sect_name
);
2713 if (stabsect
== NULL
)
2715 printf (_("No %s section present\n\n"), sect_name
);
2719 size
= bfd_section_size (abfd
, stabsect
);
2720 contents
= (char *) xmalloc (size
);
2722 if (! bfd_get_section_contents (abfd
, stabsect
, contents
, 0, size
))
2724 non_fatal (_("reading %s section of %s failed: %s"),
2725 sect_name
, bfd_get_filename (abfd
),
2726 bfd_errmsg (bfd_get_error ()));
2737 /* Stabs entries use a 12 byte format:
2738 4 byte string table index
2740 1 byte stab other field
2741 2 byte stab desc field
2743 FIXME: This will have to change for a 64 bit object format. */
2745 #define STRDXOFF (0)
2747 #define OTHEROFF (5)
2750 #define STABSIZE (12)
2752 /* Print ABFD's stabs section STABSECT_NAME (in `stabs'),
2753 using string table section STRSECT_NAME (in `strtab'). */
2756 print_section_stabs (bfd
*abfd
,
2757 const char *stabsect_name
,
2758 unsigned *string_offset_ptr
)
2761 unsigned file_string_table_offset
= 0;
2762 unsigned next_file_string_table_offset
= *string_offset_ptr
;
2763 bfd_byte
*stabp
, *stabs_end
;
2766 stabs_end
= stabp
+ stab_size
;
2768 printf (_("Contents of %s section:\n\n"), stabsect_name
);
2769 printf ("Symnum n_type n_othr n_desc n_value n_strx String\n");
2771 /* Loop through all symbols and print them.
2773 We start the index at -1 because there is a dummy symbol on
2774 the front of stabs-in-{coff,elf} sections that supplies sizes. */
2775 for (i
= -1; stabp
<= stabs_end
- STABSIZE
; stabp
+= STABSIZE
, i
++)
2779 unsigned char type
, other
;
2780 unsigned short desc
;
2783 strx
= bfd_h_get_32 (abfd
, stabp
+ STRDXOFF
);
2784 type
= bfd_h_get_8 (abfd
, stabp
+ TYPEOFF
);
2785 other
= bfd_h_get_8 (abfd
, stabp
+ OTHEROFF
);
2786 desc
= bfd_h_get_16 (abfd
, stabp
+ DESCOFF
);
2787 value
= bfd_h_get_32 (abfd
, stabp
+ VALOFF
);
2789 printf ("\n%-6d ", i
);
2790 /* Either print the stab name, or, if unnamed, print its number
2791 again (makes consistent formatting for tools like awk). */
2792 name
= bfd_get_stab_name (type
);
2794 printf ("%-6s", name
);
2795 else if (type
== N_UNDF
)
2798 printf ("%-6d", type
);
2799 printf (" %-6d %-6d ", other
, desc
);
2800 bfd_printf_vma (abfd
, value
);
2801 printf (" %-6lu", strx
);
2803 /* Symbols with type == 0 (N_UNDF) specify the length of the
2804 string table associated with this file. We use that info
2805 to know how to relocate the *next* file's string table indices. */
2808 file_string_table_offset
= next_file_string_table_offset
;
2809 next_file_string_table_offset
+= value
;
2813 bfd_size_type amt
= strx
+ file_string_table_offset
;
2815 /* Using the (possibly updated) string table offset, print the
2816 string (if any) associated with this symbol. */
2817 if (amt
< stabstr_size
)
2818 /* PR 17512: file: 079-79389-0.001:0.1. */
2819 printf (" %.*s", (int)(stabstr_size
- amt
), strtab
+ amt
);
2825 *string_offset_ptr
= next_file_string_table_offset
;
2830 const char * section_name
;
2831 const char * string_section_name
;
2832 unsigned string_offset
;
2837 find_stabs_section (bfd
*abfd
, asection
*section
, void *names
)
2840 stab_section_names
* sought
= (stab_section_names
*) names
;
2842 /* Check for section names for which stabsect_name is a prefix, to
2843 handle .stab.N, etc. */
2844 len
= strlen (sought
->section_name
);
2846 /* If the prefix matches, and the files section name ends with a
2847 nul or a digit, then we match. I.e., we want either an exact
2848 match or a section followed by a number. */
2849 if (strncmp (sought
->section_name
, section
->name
, len
) == 0
2850 && (section
->name
[len
] == 0
2851 || (section
->name
[len
] == '.' && ISDIGIT (section
->name
[len
+ 1]))))
2854 strtab
= read_section_stabs (abfd
, sought
->string_section_name
,
2859 stabs
= (bfd_byte
*) read_section_stabs (abfd
, section
->name
,
2862 print_section_stabs (abfd
, section
->name
, &sought
->string_offset
);
2868 dump_stabs_section (bfd
*abfd
, char *stabsect_name
, char *strsect_name
)
2870 stab_section_names s
;
2872 s
.section_name
= stabsect_name
;
2873 s
.string_section_name
= strsect_name
;
2874 s
.string_offset
= 0;
2876 bfd_map_over_sections (abfd
, find_stabs_section
, & s
);
2882 /* Dump the any sections containing stabs debugging information. */
2885 dump_stabs (bfd
*abfd
)
2887 dump_stabs_section (abfd
, ".stab", ".stabstr");
2888 dump_stabs_section (abfd
, ".stab.excl", ".stab.exclstr");
2889 dump_stabs_section (abfd
, ".stab.index", ".stab.indexstr");
2892 dump_stabs_section (abfd
, "LC_SYMTAB.stabs", "LC_SYMTAB.stabstr");
2894 dump_stabs_section (abfd
, "$GDB_SYMBOLS$", "$GDB_STRINGS$");
2898 dump_bfd_header (bfd
*abfd
)
2902 printf (_("architecture: %s, "),
2903 bfd_printable_arch_mach (bfd_get_arch (abfd
),
2904 bfd_get_mach (abfd
)));
2905 printf (_("flags 0x%08x:\n"), abfd
->flags
& ~BFD_FLAGS_FOR_BFD_USE_MASK
);
2907 #define PF(x, y) if (abfd->flags & x) {printf("%s%s", comma, y); comma=", ";}
2908 PF (HAS_RELOC
, "HAS_RELOC");
2909 PF (EXEC_P
, "EXEC_P");
2910 PF (HAS_LINENO
, "HAS_LINENO");
2911 PF (HAS_DEBUG
, "HAS_DEBUG");
2912 PF (HAS_SYMS
, "HAS_SYMS");
2913 PF (HAS_LOCALS
, "HAS_LOCALS");
2914 PF (DYNAMIC
, "DYNAMIC");
2915 PF (WP_TEXT
, "WP_TEXT");
2916 PF (D_PAGED
, "D_PAGED");
2917 PF (BFD_IS_RELAXABLE
, "BFD_IS_RELAXABLE");
2918 printf (_("\nstart address 0x"));
2919 bfd_printf_vma (abfd
, abfd
->start_address
);
2925 dump_bfd_private_header (bfd
*abfd
)
2927 bfd_print_private_bfd_data (abfd
, stdout
);
2931 dump_target_specific (bfd
*abfd
)
2933 const struct objdump_private_desc
* const *desc
;
2934 struct objdump_private_option
*opt
;
2937 /* Find the desc. */
2938 for (desc
= objdump_private_vectors
; *desc
!= NULL
; desc
++)
2939 if ((*desc
)->filter (abfd
))
2944 non_fatal (_("option -P/--private not supported by this file"));
2948 /* Clear all options. */
2949 for (opt
= (*desc
)->options
; opt
->name
; opt
++)
2950 opt
->selected
= FALSE
;
2952 /* Decode options. */
2953 b
= dump_private_options
;
2956 e
= strchr (b
, ',');
2961 for (opt
= (*desc
)->options
; opt
->name
; opt
++)
2962 if (strcmp (opt
->name
, b
) == 0)
2964 opt
->selected
= TRUE
;
2967 if (opt
->name
== NULL
)
2968 non_fatal (_("target specific dump '%s' not supported"), b
);
2979 (*desc
)->dump (abfd
);
2982 /* Display a section in hexadecimal format with associated characters.
2983 Each line prefixed by the zero padded address. */
2986 dump_section (bfd
*abfd
, asection
*section
, void *dummy ATTRIBUTE_UNUSED
)
2989 bfd_size_type datasize
;
2990 bfd_vma addr_offset
;
2991 bfd_vma start_offset
;
2992 bfd_vma stop_offset
;
2993 unsigned int opb
= bfd_octets_per_byte (abfd
);
2994 /* Bytes per line. */
2995 const int onaline
= 16;
3000 if ((section
->flags
& SEC_HAS_CONTENTS
) == 0)
3003 if (! process_section_p (section
))
3006 if ((datasize
= bfd_section_size (abfd
, section
)) == 0)
3009 /* Compute the address range to display. */
3010 if (start_address
== (bfd_vma
) -1
3011 || start_address
< section
->vma
)
3014 start_offset
= start_address
- section
->vma
;
3016 if (stop_address
== (bfd_vma
) -1)
3017 stop_offset
= datasize
/ opb
;
3020 if (stop_address
< section
->vma
)
3023 stop_offset
= stop_address
- section
->vma
;
3025 if (stop_offset
> datasize
/ opb
)
3026 stop_offset
= datasize
/ opb
;
3029 if (start_offset
>= stop_offset
)
3032 printf (_("Contents of section %s:"), section
->name
);
3033 if (display_file_offsets
)
3034 printf (_(" (Starting at file offset: 0x%lx)"),
3035 (unsigned long) (section
->filepos
+ start_offset
));
3038 if (!bfd_get_full_section_contents (abfd
, section
, &data
))
3040 non_fatal (_("Reading section %s failed because: %s"),
3041 section
->name
, bfd_errmsg (bfd_get_error ()));
3047 bfd_sprintf_vma (abfd
, buf
, start_offset
+ section
->vma
);
3048 if (strlen (buf
) >= sizeof (buf
))
3052 while (buf
[count
] == '0' && buf
[count
+1] != '\0')
3054 count
= strlen (buf
) - count
;
3058 bfd_sprintf_vma (abfd
, buf
, stop_offset
+ section
->vma
- 1);
3059 if (strlen (buf
) >= sizeof (buf
))
3063 while (buf
[count
] == '0' && buf
[count
+1] != '\0')
3065 count
= strlen (buf
) - count
;
3069 for (addr_offset
= start_offset
;
3070 addr_offset
< stop_offset
; addr_offset
+= onaline
/ opb
)
3074 bfd_sprintf_vma (abfd
, buf
, (addr_offset
+ section
->vma
));
3075 count
= strlen (buf
);
3076 if ((size_t) count
>= sizeof (buf
))
3080 while (count
< width
)
3085 fputs (buf
+ count
- width
, stdout
);
3088 for (j
= addr_offset
* opb
;
3089 j
< addr_offset
* opb
+ onaline
; j
++)
3091 if (j
< stop_offset
* opb
)
3092 printf ("%02x", (unsigned) (data
[j
]));
3100 for (j
= addr_offset
* opb
;
3101 j
< addr_offset
* opb
+ onaline
; j
++)
3103 if (j
>= stop_offset
* opb
)
3106 printf ("%c", ISPRINT (data
[j
]) ? data
[j
] : '.');
3113 /* Actually display the various requested regions. */
3116 dump_data (bfd
*abfd
)
3118 bfd_map_over_sections (abfd
, dump_section
, NULL
);
3121 /* Should perhaps share code and display with nm? */
3124 dump_symbols (bfd
*abfd ATTRIBUTE_UNUSED
, bfd_boolean dynamic
)
3133 max_count
= dynsymcount
;
3134 printf ("DYNAMIC SYMBOL TABLE:\n");
3139 max_count
= symcount
;
3140 printf ("SYMBOL TABLE:\n");
3144 printf (_("no symbols\n"));
3146 for (count
= 0; count
< max_count
; count
++)
3150 if (*current
== NULL
)
3151 printf (_("no information for symbol number %ld\n"), count
);
3153 else if ((cur_bfd
= bfd_asymbol_bfd (*current
)) == NULL
)
3154 printf (_("could not determine the type of symbol number %ld\n"),
3157 else if (process_section_p ((* current
)->section
)
3158 && (dump_special_syms
3159 || !bfd_is_target_special_symbol (cur_bfd
, *current
)))
3161 const char *name
= (*current
)->name
;
3163 if (do_demangle
&& name
!= NULL
&& *name
!= '\0')
3167 /* If we want to demangle the name, we demangle it
3168 here, and temporarily clobber it while calling
3169 bfd_print_symbol. FIXME: This is a gross hack. */
3170 alloc
= bfd_demangle (cur_bfd
, name
, DMGL_ANSI
| DMGL_PARAMS
);
3172 (*current
)->name
= alloc
;
3173 bfd_print_symbol (cur_bfd
, stdout
, *current
,
3174 bfd_print_symbol_all
);
3177 (*current
)->name
= name
;
3182 bfd_print_symbol (cur_bfd
, stdout
, *current
,
3183 bfd_print_symbol_all
);
3193 dump_reloc_set (bfd
*abfd
, asection
*sec
, arelent
**relpp
, long relcount
)
3196 char *last_filename
, *last_functionname
;
3197 unsigned int last_line
;
3198 unsigned int last_discriminator
;
3200 /* Get column headers lined up reasonably. */
3208 bfd_sprintf_vma (abfd
, buf
, (bfd_vma
) -1);
3209 width
= strlen (buf
) - 7;
3211 printf ("OFFSET %*s TYPE %*s VALUE \n", width
, "", 12, "");
3214 last_filename
= NULL
;
3215 last_functionname
= NULL
;
3217 last_discriminator
= 0;
3219 for (p
= relpp
; relcount
&& *p
!= NULL
; p
++, relcount
--)
3222 const char *filename
, *functionname
;
3223 unsigned int linenumber
;
3224 unsigned int discriminator
;
3225 const char *sym_name
;
3226 const char *section_name
;
3227 bfd_vma addend2
= 0;
3229 if (start_address
!= (bfd_vma
) -1
3230 && q
->address
< start_address
)
3232 if (stop_address
!= (bfd_vma
) -1
3233 && q
->address
> stop_address
)
3236 if (with_line_numbers
3238 && bfd_find_nearest_line_discriminator (abfd
, sec
, syms
, q
->address
,
3239 &filename
, &functionname
,
3240 &linenumber
, &discriminator
))
3242 if (functionname
!= NULL
3243 && (last_functionname
== NULL
3244 || strcmp (functionname
, last_functionname
) != 0))
3246 printf ("%s():\n", functionname
);
3247 if (last_functionname
!= NULL
)
3248 free (last_functionname
);
3249 last_functionname
= xstrdup (functionname
);
3253 && (linenumber
!= last_line
3254 || (filename
!= NULL
3255 && last_filename
!= NULL
3256 && filename_cmp (filename
, last_filename
) != 0)
3257 || (discriminator
!= last_discriminator
)))
3259 if (discriminator
> 0)
3260 printf ("%s:%u\n", filename
== NULL
? "???" : filename
, linenumber
);
3262 printf ("%s:%u (discriminator %u)\n", filename
== NULL
? "???" : filename
,
3263 linenumber
, discriminator
);
3264 last_line
= linenumber
;
3265 last_discriminator
= discriminator
;
3266 if (last_filename
!= NULL
)
3267 free (last_filename
);
3268 if (filename
== NULL
)
3269 last_filename
= NULL
;
3271 last_filename
= xstrdup (filename
);
3275 if (q
->sym_ptr_ptr
&& *q
->sym_ptr_ptr
)
3277 sym_name
= (*(q
->sym_ptr_ptr
))->name
;
3278 section_name
= (*(q
->sym_ptr_ptr
))->section
->name
;
3283 section_name
= NULL
;
3286 bfd_printf_vma (abfd
, q
->address
);
3287 if (q
->howto
== NULL
)
3288 printf (" *unknown* ");
3289 else if (q
->howto
->name
)
3291 const char *name
= q
->howto
->name
;
3293 /* R_SPARC_OLO10 relocations contain two addends.
3294 But because 'arelent' lacks enough storage to
3295 store them both, the 64-bit ELF Sparc backend
3296 records this as two relocations. One R_SPARC_LO10
3297 and one R_SPARC_13, both pointing to the same
3298 address. This is merely so that we have some
3299 place to store both addend fields.
3301 Undo this transformation, otherwise the output
3302 will be confusing. */
3303 if (abfd
->xvec
->flavour
== bfd_target_elf_flavour
3304 && elf_tdata(abfd
)->elf_header
->e_machine
== EM_SPARCV9
3306 && !strcmp (q
->howto
->name
, "R_SPARC_LO10"))
3308 arelent
*q2
= *(p
+ 1);
3311 && q
->address
== q2
->address
3312 && !strcmp (q2
->howto
->name
, "R_SPARC_13"))
3314 name
= "R_SPARC_OLO10";
3315 addend2
= q2
->addend
;
3319 printf (" %-16s ", name
);
3322 printf (" %-16d ", q
->howto
->type
);
3326 objdump_print_symname (abfd
, NULL
, *q
->sym_ptr_ptr
);
3330 if (section_name
== NULL
)
3331 section_name
= "*unknown*";
3332 printf ("[%s]", section_name
);
3337 bfd_signed_vma addend
= q
->addend
;
3345 bfd_printf_vma (abfd
, addend
);
3350 bfd_printf_vma (abfd
, addend2
);
3356 if (last_filename
!= NULL
)
3357 free (last_filename
);
3358 if (last_functionname
!= NULL
)
3359 free (last_functionname
);
3363 dump_relocs_in_section (bfd
*abfd
,
3365 void *dummy ATTRIBUTE_UNUSED
)
3371 if ( bfd_is_abs_section (section
)
3372 || bfd_is_und_section (section
)
3373 || bfd_is_com_section (section
)
3374 || (! process_section_p (section
))
3375 || ((section
->flags
& SEC_RELOC
) == 0))
3378 relsize
= bfd_get_reloc_upper_bound (abfd
, section
);
3380 bfd_fatal (bfd_get_filename (abfd
));
3382 printf ("RELOCATION RECORDS FOR [%s]:", section
->name
);
3386 printf (" (none)\n\n");
3390 if ((bfd_get_file_flags (abfd
) & (BFD_IN_MEMORY
| BFD_LINKER_CREATED
)) == 0
3391 && relsize
> bfd_get_file_size (abfd
))
3393 printf (" (too many: 0x%x)\n", section
->reloc_count
);
3394 bfd_set_error (bfd_error_file_truncated
);
3395 bfd_fatal (bfd_get_filename (abfd
));
3398 relpp
= (arelent
**) xmalloc (relsize
);
3399 relcount
= bfd_canonicalize_reloc (abfd
, section
, relpp
, syms
);
3404 non_fatal (_("failed to read relocs in: %s"), bfd_get_filename (abfd
));
3405 bfd_fatal (_("error message was"));
3407 else if (relcount
== 0)
3408 printf (" (none)\n\n");
3412 dump_reloc_set (abfd
, section
, relpp
, relcount
);
3419 dump_relocs (bfd
*abfd
)
3421 bfd_map_over_sections (abfd
, dump_relocs_in_section
, NULL
);
3425 dump_dynamic_relocs (bfd
*abfd
)
3431 relsize
= bfd_get_dynamic_reloc_upper_bound (abfd
);
3433 bfd_fatal (bfd_get_filename (abfd
));
3435 printf ("DYNAMIC RELOCATION RECORDS");
3438 printf (" (none)\n\n");
3441 relpp
= (arelent
**) xmalloc (relsize
);
3442 relcount
= bfd_canonicalize_dynamic_reloc (abfd
, relpp
, dynsyms
);
3445 bfd_fatal (bfd_get_filename (abfd
));
3446 else if (relcount
== 0)
3447 printf (" (none)\n\n");
3451 dump_reloc_set (abfd
, NULL
, relpp
, relcount
);
3458 /* Creates a table of paths, to search for source files. */
3461 add_include_path (const char *path
)
3465 include_path_count
++;
3466 include_paths
= (const char **)
3467 xrealloc (include_paths
, include_path_count
* sizeof (*include_paths
));
3468 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
3469 if (path
[1] == ':' && path
[2] == 0)
3470 path
= concat (path
, ".", (const char *) 0);
3472 include_paths
[include_path_count
- 1] = path
;
3476 adjust_addresses (bfd
*abfd ATTRIBUTE_UNUSED
,
3480 if ((section
->flags
& SEC_DEBUGGING
) == 0)
3482 bfd_boolean
*has_reloc_p
= (bfd_boolean
*) arg
;
3483 section
->vma
+= adjust_section_vma
;
3485 section
->lma
+= adjust_section_vma
;
3489 /* Dump selected contents of ABFD. */
3492 dump_bfd (bfd
*abfd
)
3494 /* If we are adjusting section VMA's, change them all now. Changing
3495 the BFD information is a hack. However, we must do it, or
3496 bfd_find_nearest_line will not do the right thing. */
3497 if (adjust_section_vma
!= 0)
3499 bfd_boolean has_reloc
= (abfd
->flags
& HAS_RELOC
);
3500 bfd_map_over_sections (abfd
, adjust_addresses
, &has_reloc
);
3503 if (! dump_debugging_tags
&& ! suppress_bfd_header
)
3504 printf (_("\n%s: file format %s\n"), bfd_get_filename (abfd
),
3507 print_arelt_descr (stdout
, abfd
, TRUE
);
3508 if (dump_file_header
)
3509 dump_bfd_header (abfd
);
3510 if (dump_private_headers
)
3511 dump_bfd_private_header (abfd
);
3512 if (dump_private_options
!= NULL
)
3513 dump_target_specific (abfd
);
3514 if (! dump_debugging_tags
&& ! suppress_bfd_header
)
3521 || dump_dwarf_section_info
)
3522 syms
= slurp_symtab (abfd
);
3524 if (dump_section_headers
)
3525 dump_headers (abfd
);
3527 if (dump_dynamic_symtab
|| dump_dynamic_reloc_info
3528 || (disassemble
&& bfd_get_dynamic_symtab_upper_bound (abfd
) > 0))
3529 dynsyms
= slurp_dynamic_symtab (abfd
);
3532 synthcount
= bfd_get_synthetic_symtab (abfd
, symcount
, syms
,
3533 dynsymcount
, dynsyms
, &synthsyms
);
3539 dump_symbols (abfd
, FALSE
);
3540 if (dump_dynamic_symtab
)
3541 dump_symbols (abfd
, TRUE
);
3542 if (dump_dwarf_section_info
)
3544 if (dump_stab_section_info
)
3546 if (dump_reloc_info
&& ! disassemble
)
3548 if (dump_dynamic_reloc_info
&& ! disassemble
)
3549 dump_dynamic_relocs (abfd
);
3550 if (dump_section_contents
)
3553 disassemble_data (abfd
);
3559 dhandle
= read_debugging_info (abfd
, syms
, symcount
, TRUE
);
3560 if (dhandle
!= NULL
)
3562 if (!print_debugging_info (stdout
, dhandle
, abfd
, syms
,
3564 dump_debugging_tags
? TRUE
: FALSE
))
3566 non_fatal (_("%s: printing debugging information failed"),
3567 bfd_get_filename (abfd
));
3571 /* PR 6483: If there was no STABS or IEEE debug
3572 info in the file, try DWARF instead. */
3573 else if (! dump_dwarf_section_info
)
3575 dwarf_select_sections_all ();
3604 display_object_bfd (bfd
*abfd
)
3608 if (bfd_check_format_matches (abfd
, bfd_object
, &matching
))
3614 if (bfd_get_error () == bfd_error_file_ambiguously_recognized
)
3616 nonfatal (bfd_get_filename (abfd
));
3617 list_matching_formats (matching
);
3622 if (bfd_get_error () != bfd_error_file_not_recognized
)
3624 nonfatal (bfd_get_filename (abfd
));
3628 if (bfd_check_format_matches (abfd
, bfd_core
, &matching
))
3634 nonfatal (bfd_get_filename (abfd
));
3636 if (bfd_get_error () == bfd_error_file_ambiguously_recognized
)
3638 list_matching_formats (matching
);
3644 display_any_bfd (bfd
*file
, int level
)
3646 /* Decompress sections unless dumping the section contents. */
3647 if (!dump_section_contents
)
3648 file
->flags
|= BFD_DECOMPRESS
;
3650 /* If the file is an archive, process all of its elements. */
3651 if (bfd_check_format (file
, bfd_archive
))
3654 bfd
*last_arfile
= NULL
;
3657 printf (_("In archive %s:\n"), bfd_get_filename (file
));
3658 else if (level
> 100)
3660 /* Prevent corrupted files from spinning us into an
3661 infinite loop. 100 is an arbitrary heuristic. */
3662 fatal (_("Archive nesting is too deep"));
3666 printf (_("In nested archive %s:\n"), bfd_get_filename (file
));
3670 bfd_set_error (bfd_error_no_error
);
3672 arfile
= bfd_openr_next_archived_file (file
, arfile
);
3675 if (bfd_get_error () != bfd_error_no_more_archived_files
)
3676 nonfatal (bfd_get_filename (file
));
3680 display_any_bfd (arfile
, level
+ 1);
3682 if (last_arfile
!= NULL
)
3684 bfd_close (last_arfile
);
3685 /* PR 17512: file: ac585d01. */
3686 if (arfile
== last_arfile
)
3692 last_arfile
= arfile
;
3695 if (last_arfile
!= NULL
)
3696 bfd_close (last_arfile
);
3699 display_object_bfd (file
);
3703 display_file (char *filename
, char *target
, bfd_boolean last_file
)
3707 if (get_file_size (filename
) < 1)
3713 file
= bfd_openr (filename
, target
);
3716 nonfatal (filename
);
3720 display_any_bfd (file
, 0);
3722 /* This is an optimization to improve the speed of objdump, especially when
3723 dumping a file with lots of associated debug informatiom. Calling
3724 bfd_close on such a file can take a non-trivial amount of time as there
3725 are lots of lists to walk and buffers to free. This is only really
3726 necessary however if we are about to load another file and we need the
3727 memory back. Otherwise, if we are about to exit, then we can save (a lot
3728 of) time by only doing a quick close, and allowing the OS to reclaim the
3733 bfd_close_all_done (file
);
3737 main (int argc
, char **argv
)
3740 char *target
= default_target
;
3741 bfd_boolean seenflag
= FALSE
;
3743 #if defined (HAVE_SETLOCALE)
3744 #if defined (HAVE_LC_MESSAGES)
3745 setlocale (LC_MESSAGES
, "");
3747 setlocale (LC_CTYPE
, "");
3750 bindtextdomain (PACKAGE
, LOCALEDIR
);
3751 textdomain (PACKAGE
);
3753 program_name
= *argv
;
3754 xmalloc_set_program_name (program_name
);
3755 bfd_set_error_program_name (program_name
);
3757 START_PROGRESS (program_name
, 0);
3759 expandargv (&argc
, &argv
);
3762 set_default_bfd_target ();
3764 while ((c
= getopt_long (argc
, argv
,
3765 "pP:ib:m:M:VvCdDlfFaHhrRtTxsSI:j:wE:zgeGW::",
3766 long_options
, (int *) 0))
3772 break; /* We've been given a long option. */
3779 if (disassembler_options
)
3780 /* Ignore potential memory leak for now. */
3781 options
= concat (disassembler_options
, ",",
3782 optarg
, (const char *) NULL
);
3785 disassembler_options
= remove_whitespace_and_extra_commas (options
);
3792 display_file_offsets
= TRUE
;
3795 with_line_numbers
= TRUE
;
3804 enum demangling_styles style
;
3806 style
= cplus_demangle_name_to_style (optarg
);
3807 if (style
== unknown_demangling
)
3808 fatal (_("unknown demangling style `%s'"),
3811 cplus_demangle_set_style (style
);
3815 do_wide
= wide_output
= TRUE
;
3817 case OPTION_ADJUST_VMA
:
3818 adjust_section_vma
= parse_vma (optarg
, "--adjust-vma");
3820 case OPTION_START_ADDRESS
:
3821 start_address
= parse_vma (optarg
, "--start-address");
3822 if ((stop_address
!= (bfd_vma
) -1) && stop_address
<= start_address
)
3823 fatal (_("error: the start address should be before the end address"));
3825 case OPTION_STOP_ADDRESS
:
3826 stop_address
= parse_vma (optarg
, "--stop-address");
3827 if ((start_address
!= (bfd_vma
) -1) && stop_address
<= start_address
)
3828 fatal (_("error: the stop address should be after the start address"));
3832 prefix_length
= strlen (prefix
);
3833 /* Remove an unnecessary trailing '/' */
3834 while (IS_DIR_SEPARATOR (prefix
[prefix_length
- 1]))
3837 case OPTION_PREFIX_STRIP
:
3838 prefix_strip
= atoi (optarg
);
3839 if (prefix_strip
< 0)
3840 fatal (_("error: prefix strip must be non-negative"));
3842 case OPTION_INSN_WIDTH
:
3843 insn_width
= strtoul (optarg
, NULL
, 0);
3844 if (insn_width
<= 0)
3845 fatal (_("error: instruction width must be positive"));
3847 case OPTION_INLINES
:
3848 unwind_inlines
= TRUE
;
3851 if (strcmp (optarg
, "B") == 0)
3852 endian
= BFD_ENDIAN_BIG
;
3853 else if (strcmp (optarg
, "L") == 0)
3854 endian
= BFD_ENDIAN_LITTLE
;
3857 nonfatal (_("unrecognized -E option"));
3862 if (strncmp (optarg
, "big", strlen (optarg
)) == 0)
3863 endian
= BFD_ENDIAN_BIG
;
3864 else if (strncmp (optarg
, "little", strlen (optarg
)) == 0)
3865 endian
= BFD_ENDIAN_LITTLE
;
3868 non_fatal (_("unrecognized --endian type `%s'"), optarg
);
3875 dump_file_header
= TRUE
;
3879 formats_info
= TRUE
;
3883 add_include_path (optarg
);
3886 dump_private_headers
= TRUE
;
3890 dump_private_options
= optarg
;
3894 dump_private_headers
= TRUE
;
3896 dump_reloc_info
= TRUE
;
3897 dump_file_header
= TRUE
;
3898 dump_ar_hdrs
= TRUE
;
3899 dump_section_headers
= TRUE
;
3907 dump_dynamic_symtab
= TRUE
;
3915 disassemble_zeroes
= TRUE
;
3919 disassemble_all
= TRUE
;
3924 with_source_code
= TRUE
;
3933 dump_debugging_tags
= 1;
3938 dump_dwarf_section_info
= TRUE
;
3941 dwarf_select_sections_by_letters (optarg
);
3943 dwarf_select_sections_all ();
3946 dump_dwarf_section_info
= TRUE
;
3949 dwarf_select_sections_by_names (optarg
);
3951 dwarf_select_sections_all ();
3953 case OPTION_DWARF_DEPTH
:
3956 dwarf_cutoff_level
= strtoul (optarg
, & cp
, 0);
3959 case OPTION_DWARF_START
:
3962 dwarf_start_die
= strtoul (optarg
, & cp
, 0);
3963 suppress_bfd_header
= 1;
3966 case OPTION_DWARF_CHECK
:
3970 dump_stab_section_info
= TRUE
;
3974 dump_section_contents
= TRUE
;
3978 dump_reloc_info
= TRUE
;
3982 dump_dynamic_reloc_info
= TRUE
;
3986 dump_ar_hdrs
= TRUE
;
3990 dump_section_headers
= TRUE
;
3995 show_version
= TRUE
;
4001 /* No need to set seenflag or to break - usage() does not return. */
4008 print_version ("objdump");
4014 exit_status
= display_info ();
4018 display_file ("a.out", target
, TRUE
);
4020 for (; optind
< argc
;)
4022 display_file (argv
[optind
], target
, optind
== argc
- 1);
4029 END_PROGRESS (program_name
);