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
;
184 static bfd_byte
*strtab
;
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 if (!bfd_malloc_and_get_section (abfd
, section
, &data
))
2183 non_fatal (_("Reading section %s failed because: %s"),
2184 section
->name
, bfd_errmsg (bfd_get_error ()));
2188 paux
->sec
= section
;
2189 pinfo
->buffer
= data
;
2190 pinfo
->buffer_vma
= section
->vma
;
2191 pinfo
->buffer_length
= datasize
;
2192 pinfo
->section
= section
;
2194 /* Skip over the relocs belonging to addresses below the
2196 while (rel_pp
< rel_ppend
2197 && (*rel_pp
)->address
< rel_offset
+ addr_offset
)
2200 printf (_("\nDisassembly of section %s:\n"), section
->name
);
2202 /* Find the nearest symbol forwards from our current position. */
2203 paux
->require_sec
= TRUE
;
2204 sym
= (asymbol
*) find_symbol_for_address (section
->vma
+ addr_offset
,
2205 (struct disassemble_info
*) inf
,
2207 paux
->require_sec
= FALSE
;
2209 /* PR 9774: If the target used signed addresses then we must make
2210 sure that we sign extend the value that we calculate for 'addr'
2211 in the loop below. */
2212 if (bfd_get_flavour (abfd
) == bfd_target_elf_flavour
2213 && (bed
= get_elf_backend_data (abfd
)) != NULL
2214 && bed
->sign_extend_vma
)
2215 sign_adjust
= (bfd_vma
) 1 << (bed
->s
->arch_size
- 1);
2217 /* Disassemble a block of instructions up to the address associated with
2218 the symbol we have just found. Then print the symbol and find the
2219 next symbol on. Repeat until we have disassembled the entire section
2220 or we have reached the end of the address range we are interested in. */
2221 while (addr_offset
< stop_offset
)
2225 bfd_vma nextstop_offset
;
2228 addr
= section
->vma
+ addr_offset
;
2229 addr
= ((addr
& ((sign_adjust
<< 1) - 1)) ^ sign_adjust
) - sign_adjust
;
2231 if (sym
!= NULL
&& bfd_asymbol_value (sym
) <= addr
)
2236 (x
< sorted_symcount
2237 && (bfd_asymbol_value (sorted_syms
[x
]) <= addr
));
2241 pinfo
->symbols
= sorted_syms
+ place
;
2242 pinfo
->num_symbols
= x
- place
;
2243 pinfo
->symtab_pos
= place
;
2247 pinfo
->symbols
= NULL
;
2248 pinfo
->num_symbols
= 0;
2249 pinfo
->symtab_pos
= -1;
2252 if (! prefix_addresses
)
2254 pinfo
->fprintf_func (pinfo
->stream
, "\n");
2255 objdump_print_addr_with_sym (abfd
, section
, sym
, addr
,
2257 pinfo
->fprintf_func (pinfo
->stream
, ":\n");
2260 if (sym
!= NULL
&& bfd_asymbol_value (sym
) > addr
)
2262 else if (sym
== NULL
)
2266 #define is_valid_next_sym(SYM) \
2267 ((SYM)->section == section \
2268 && (bfd_asymbol_value (SYM) > bfd_asymbol_value (sym)) \
2269 && pinfo->symbol_is_valid (SYM, pinfo))
2271 /* Search forward for the next appropriate symbol in
2272 SECTION. Note that all the symbols are sorted
2273 together into one big array, and that some sections
2274 may have overlapping addresses. */
2275 while (place
< sorted_symcount
2276 && ! is_valid_next_sym (sorted_syms
[place
]))
2279 if (place
>= sorted_symcount
)
2282 nextsym
= sorted_syms
[place
];
2285 if (sym
!= NULL
&& bfd_asymbol_value (sym
) > addr
)
2286 nextstop_offset
= bfd_asymbol_value (sym
) - section
->vma
;
2287 else if (nextsym
== NULL
)
2288 nextstop_offset
= stop_offset
;
2290 nextstop_offset
= bfd_asymbol_value (nextsym
) - section
->vma
;
2292 if (nextstop_offset
> stop_offset
2293 || nextstop_offset
<= addr_offset
)
2294 nextstop_offset
= stop_offset
;
2296 /* If a symbol is explicitly marked as being an object
2297 rather than a function, just dump the bytes without
2298 disassembling them. */
2301 || sym
->section
!= section
2302 || bfd_asymbol_value (sym
) > addr
2303 || ((sym
->flags
& BSF_OBJECT
) == 0
2304 && (strstr (bfd_asymbol_name (sym
), "gnu_compiled")
2306 && (strstr (bfd_asymbol_name (sym
), "gcc2_compiled")
2308 || (sym
->flags
& BSF_FUNCTION
) != 0)
2313 disassemble_bytes (pinfo
, paux
->disassemble_fn
, insns
, data
,
2314 addr_offset
, nextstop_offset
,
2315 rel_offset
, &rel_pp
, rel_ppend
);
2317 addr_offset
= nextstop_offset
;
2323 if (rel_ppstart
!= NULL
)
2327 /* Disassemble the contents of an object file. */
2330 disassemble_data (bfd
*abfd
)
2332 struct disassemble_info disasm_info
;
2333 struct objdump_disasm_info aux
;
2337 prev_functionname
= NULL
;
2339 prev_discriminator
= 0;
2341 /* We make a copy of syms to sort. We don't want to sort syms
2342 because that will screw up the relocs. */
2343 sorted_symcount
= symcount
? symcount
: dynsymcount
;
2344 sorted_syms
= (asymbol
**) xmalloc ((sorted_symcount
+ synthcount
)
2345 * sizeof (asymbol
*));
2346 memcpy (sorted_syms
, symcount
? syms
: dynsyms
,
2347 sorted_symcount
* sizeof (asymbol
*));
2349 sorted_symcount
= remove_useless_symbols (sorted_syms
, sorted_symcount
);
2351 for (i
= 0; i
< synthcount
; ++i
)
2353 sorted_syms
[sorted_symcount
] = synthsyms
+ i
;
2357 /* Sort the symbols into section and symbol order. */
2358 qsort (sorted_syms
, sorted_symcount
, sizeof (asymbol
*), compare_symbols
);
2360 init_disassemble_info (&disasm_info
, stdout
, (fprintf_ftype
) fprintf
);
2362 disasm_info
.application_data
= (void *) &aux
;
2364 aux
.require_sec
= FALSE
;
2365 aux
.dynrelbuf
= NULL
;
2366 aux
.dynrelcount
= 0;
2369 disasm_info
.print_address_func
= objdump_print_address
;
2370 disasm_info
.symbol_at_address_func
= objdump_symbol_at_address
;
2372 if (machine
!= NULL
)
2374 const bfd_arch_info_type
*inf
= bfd_scan_arch (machine
);
2377 fatal (_("can't use supplied machine %s"), machine
);
2379 abfd
->arch_info
= inf
;
2382 if (endian
!= BFD_ENDIAN_UNKNOWN
)
2384 struct bfd_target
*xvec
;
2386 xvec
= (struct bfd_target
*) xmalloc (sizeof (struct bfd_target
));
2387 memcpy (xvec
, abfd
->xvec
, sizeof (struct bfd_target
));
2388 xvec
->byteorder
= endian
;
2392 /* Use libopcodes to locate a suitable disassembler. */
2393 aux
.disassemble_fn
= disassembler (bfd_get_arch (abfd
),
2394 bfd_big_endian (abfd
),
2395 bfd_get_mach (abfd
), abfd
);
2396 if (!aux
.disassemble_fn
)
2398 non_fatal (_("can't disassemble for architecture %s\n"),
2399 bfd_printable_arch_mach (bfd_get_arch (abfd
), 0));
2404 disasm_info
.flavour
= bfd_get_flavour (abfd
);
2405 disasm_info
.arch
= bfd_get_arch (abfd
);
2406 disasm_info
.mach
= bfd_get_mach (abfd
);
2407 disasm_info
.disassembler_options
= disassembler_options
;
2408 disasm_info
.octets_per_byte
= bfd_octets_per_byte (abfd
);
2409 disasm_info
.skip_zeroes
= DEFAULT_SKIP_ZEROES
;
2410 disasm_info
.skip_zeroes_at_end
= DEFAULT_SKIP_ZEROES_AT_END
;
2411 disasm_info
.disassembler_needs_relocs
= FALSE
;
2413 if (bfd_big_endian (abfd
))
2414 disasm_info
.display_endian
= disasm_info
.endian
= BFD_ENDIAN_BIG
;
2415 else if (bfd_little_endian (abfd
))
2416 disasm_info
.display_endian
= disasm_info
.endian
= BFD_ENDIAN_LITTLE
;
2418 /* ??? Aborting here seems too drastic. We could default to big or little
2420 disasm_info
.endian
= BFD_ENDIAN_UNKNOWN
;
2422 /* Allow the target to customize the info structure. */
2423 disassemble_init_for_target (& disasm_info
);
2425 /* Pre-load the dynamic relocs as we may need them during the disassembly. */
2427 long relsize
= bfd_get_dynamic_reloc_upper_bound (abfd
);
2429 if (relsize
< 0 && dump_dynamic_reloc_info
)
2430 bfd_fatal (bfd_get_filename (abfd
));
2434 aux
.dynrelbuf
= (arelent
**) xmalloc (relsize
);
2435 aux
.dynrelcount
= bfd_canonicalize_dynamic_reloc (abfd
,
2438 if (aux
.dynrelcount
< 0)
2439 bfd_fatal (bfd_get_filename (abfd
));
2441 /* Sort the relocs by address. */
2442 qsort (aux
.dynrelbuf
, aux
.dynrelcount
, sizeof (arelent
*),
2446 disasm_info
.symtab
= sorted_syms
;
2447 disasm_info
.symtab_size
= sorted_symcount
;
2449 bfd_map_over_sections (abfd
, disassemble_section
, & disasm_info
);
2451 if (aux
.dynrelbuf
!= NULL
)
2452 free (aux
.dynrelbuf
);
2457 load_specific_debug_section (enum dwarf_section_display_enum debug
,
2458 asection
*sec
, void *file
)
2460 struct dwarf_section
*section
= &debug_displays
[debug
].section
;
2461 bfd
*abfd
= (bfd
*) file
;
2464 /* If it is already loaded, do nothing. */
2465 if (section
->start
!= NULL
)
2468 section
->reloc_info
= NULL
;
2469 section
->num_relocs
= 0;
2470 section
->address
= bfd_get_section_vma (abfd
, sec
);
2471 section
->size
= bfd_get_section_size (sec
);
2472 section
->start
= NULL
;
2473 section
->user_data
= sec
;
2474 ret
= bfd_get_full_section_contents (abfd
, sec
, §ion
->start
);
2478 free_debug_section (debug
);
2479 printf (_("\nCan't get contents for section '%s'.\n"),
2484 if (is_relocatable
&& debug_displays
[debug
].relocate
)
2486 bfd_cache_section_contents (sec
, section
->start
);
2488 ret
= bfd_simple_get_relocated_section_contents (abfd
,
2495 free_debug_section (debug
);
2496 printf (_("\nCan't get contents for section '%s'.\n"),
2503 reloc_size
= bfd_get_reloc_upper_bound (abfd
, sec
);
2506 unsigned long reloc_count
;
2509 relocs
= (arelent
**) xmalloc (reloc_size
);
2511 reloc_count
= bfd_canonicalize_reloc (abfd
, sec
, relocs
, NULL
);
2512 if (reloc_count
== 0)
2516 section
->reloc_info
= relocs
;
2517 section
->num_relocs
= reloc_count
;
2526 reloc_at (struct dwarf_section
* dsec
, dwarf_vma offset
)
2531 if (dsec
== NULL
|| dsec
->reloc_info
== NULL
)
2534 relocs
= (arelent
**) dsec
->reloc_info
;
2536 for (; (rp
= * relocs
) != NULL
; ++ relocs
)
2537 if (rp
->address
== offset
)
2544 load_debug_section (enum dwarf_section_display_enum debug
, void *file
)
2546 struct dwarf_section
*section
= &debug_displays
[debug
].section
;
2547 bfd
*abfd
= (bfd
*) file
;
2550 /* If it is already loaded, do nothing. */
2551 if (section
->start
!= NULL
)
2554 /* Locate the debug section. */
2555 sec
= bfd_get_section_by_name (abfd
, section
->uncompressed_name
);
2557 section
->name
= section
->uncompressed_name
;
2560 sec
= bfd_get_section_by_name (abfd
, section
->compressed_name
);
2562 section
->name
= section
->compressed_name
;
2567 return load_specific_debug_section (debug
, sec
, file
);
2571 free_debug_section (enum dwarf_section_display_enum debug
)
2573 struct dwarf_section
*section
= &debug_displays
[debug
].section
;
2575 if (section
->start
== NULL
)
2578 /* PR 17512: file: 0f67f69d. */
2579 if (section
->user_data
!= NULL
)
2581 asection
* sec
= (asection
*) section
->user_data
;
2583 /* If we are freeing contents that are also pointed to by the BFD
2584 library's section structure then make sure to update those pointers
2585 too. Otherwise, the next time we try to load data for this section
2586 we can end up using a stale pointer. */
2587 if (section
->start
== sec
->contents
)
2589 sec
->contents
= NULL
;
2590 sec
->flags
&= ~ SEC_IN_MEMORY
;
2591 sec
->compress_status
= COMPRESS_SECTION_NONE
;
2595 free ((char *) section
->start
);
2596 section
->start
= NULL
;
2597 section
->address
= 0;
2602 dump_dwarf_section (bfd
*abfd
, asection
*section
,
2603 void *arg ATTRIBUTE_UNUSED
)
2605 const char *name
= bfd_get_section_name (abfd
, section
);
2609 if (CONST_STRNEQ (name
, ".gnu.linkonce.wi."))
2610 match
= ".debug_info";
2614 for (i
= 0; i
< max
; i
++)
2615 if ((strcmp (debug_displays
[i
].section
.uncompressed_name
, match
) == 0
2616 || strcmp (debug_displays
[i
].section
.compressed_name
, match
) == 0)
2617 && debug_displays
[i
].enabled
!= NULL
2618 && *debug_displays
[i
].enabled
)
2620 struct dwarf_section
*sec
= &debug_displays
[i
].section
;
2622 if (strcmp (sec
->uncompressed_name
, match
) == 0)
2623 sec
->name
= sec
->uncompressed_name
;
2625 sec
->name
= sec
->compressed_name
;
2626 if (load_specific_debug_section ((enum dwarf_section_display_enum
) i
,
2629 debug_displays
[i
].display (sec
, abfd
);
2631 if (i
!= info
&& i
!= abbrev
)
2632 free_debug_section ((enum dwarf_section_display_enum
) i
);
2638 /* Dump the dwarf debugging information. */
2641 dump_dwarf (bfd
*abfd
)
2643 is_relocatable
= (abfd
->flags
& (EXEC_P
| DYNAMIC
)) == 0;
2645 eh_addr_size
= bfd_arch_bits_per_address (abfd
) / 8;
2647 if (bfd_big_endian (abfd
))
2648 byte_get
= byte_get_big_endian
;
2649 else if (bfd_little_endian (abfd
))
2650 byte_get
= byte_get_little_endian
;
2652 /* PR 17512: file: objdump-s-endless-loop.tekhex. */
2654 warn (_("File %s does not contain any dwarf debug information\n"),
2655 bfd_get_filename (abfd
));
2659 switch (bfd_get_arch (abfd
))
2662 switch (bfd_get_mach (abfd
))
2664 case bfd_mach_x86_64
:
2665 case bfd_mach_x86_64_intel_syntax
:
2666 case bfd_mach_x86_64_nacl
:
2667 case bfd_mach_x64_32
:
2668 case bfd_mach_x64_32_intel_syntax
:
2669 case bfd_mach_x64_32_nacl
:
2670 init_dwarf_regnames_x86_64 ();
2674 init_dwarf_regnames_i386 ();
2679 case bfd_arch_iamcu
:
2680 init_dwarf_regnames_iamcu ();
2683 case bfd_arch_aarch64
:
2684 init_dwarf_regnames_aarch64();
2688 init_dwarf_regnames_s390 ();
2695 bfd_map_over_sections (abfd
, dump_dwarf_section
, NULL
);
2697 free_debug_memory ();
2700 /* Read ABFD's stabs section STABSECT_NAME, and return a pointer to
2701 it. Return NULL on failure. */
2704 read_section_stabs (bfd
*abfd
, const char *sect_name
, bfd_size_type
*size_ptr
)
2709 stabsect
= bfd_get_section_by_name (abfd
, sect_name
);
2710 if (stabsect
== NULL
)
2712 printf (_("No %s section present\n\n"), sect_name
);
2716 if (!bfd_malloc_and_get_section (abfd
, stabsect
, &contents
))
2718 non_fatal (_("reading %s section of %s failed: %s"),
2719 sect_name
, bfd_get_filename (abfd
),
2720 bfd_errmsg (bfd_get_error ()));
2726 *size_ptr
= bfd_section_size (abfd
, stabsect
);
2731 /* Stabs entries use a 12 byte format:
2732 4 byte string table index
2734 1 byte stab other field
2735 2 byte stab desc field
2737 FIXME: This will have to change for a 64 bit object format. */
2739 #define STRDXOFF (0)
2741 #define OTHEROFF (5)
2744 #define STABSIZE (12)
2746 /* Print ABFD's stabs section STABSECT_NAME (in `stabs'),
2747 using string table section STRSECT_NAME (in `strtab'). */
2750 print_section_stabs (bfd
*abfd
,
2751 const char *stabsect_name
,
2752 unsigned *string_offset_ptr
)
2755 unsigned file_string_table_offset
= 0;
2756 unsigned next_file_string_table_offset
= *string_offset_ptr
;
2757 bfd_byte
*stabp
, *stabs_end
;
2760 stabs_end
= stabp
+ stab_size
;
2762 printf (_("Contents of %s section:\n\n"), stabsect_name
);
2763 printf ("Symnum n_type n_othr n_desc n_value n_strx String\n");
2765 /* Loop through all symbols and print them.
2767 We start the index at -1 because there is a dummy symbol on
2768 the front of stabs-in-{coff,elf} sections that supplies sizes. */
2769 for (i
= -1; stabp
<= stabs_end
- STABSIZE
; stabp
+= STABSIZE
, i
++)
2773 unsigned char type
, other
;
2774 unsigned short desc
;
2777 strx
= bfd_h_get_32 (abfd
, stabp
+ STRDXOFF
);
2778 type
= bfd_h_get_8 (abfd
, stabp
+ TYPEOFF
);
2779 other
= bfd_h_get_8 (abfd
, stabp
+ OTHEROFF
);
2780 desc
= bfd_h_get_16 (abfd
, stabp
+ DESCOFF
);
2781 value
= bfd_h_get_32 (abfd
, stabp
+ VALOFF
);
2783 printf ("\n%-6d ", i
);
2784 /* Either print the stab name, or, if unnamed, print its number
2785 again (makes consistent formatting for tools like awk). */
2786 name
= bfd_get_stab_name (type
);
2788 printf ("%-6s", name
);
2789 else if (type
== N_UNDF
)
2792 printf ("%-6d", type
);
2793 printf (" %-6d %-6d ", other
, desc
);
2794 bfd_printf_vma (abfd
, value
);
2795 printf (" %-6lu", strx
);
2797 /* Symbols with type == 0 (N_UNDF) specify the length of the
2798 string table associated with this file. We use that info
2799 to know how to relocate the *next* file's string table indices. */
2802 file_string_table_offset
= next_file_string_table_offset
;
2803 next_file_string_table_offset
+= value
;
2807 bfd_size_type amt
= strx
+ file_string_table_offset
;
2809 /* Using the (possibly updated) string table offset, print the
2810 string (if any) associated with this symbol. */
2811 if (amt
< stabstr_size
)
2812 /* PR 17512: file: 079-79389-0.001:0.1. */
2813 printf (" %.*s", (int)(stabstr_size
- amt
), strtab
+ amt
);
2819 *string_offset_ptr
= next_file_string_table_offset
;
2824 const char * section_name
;
2825 const char * string_section_name
;
2826 unsigned string_offset
;
2831 find_stabs_section (bfd
*abfd
, asection
*section
, void *names
)
2834 stab_section_names
* sought
= (stab_section_names
*) names
;
2836 /* Check for section names for which stabsect_name is a prefix, to
2837 handle .stab.N, etc. */
2838 len
= strlen (sought
->section_name
);
2840 /* If the prefix matches, and the files section name ends with a
2841 nul or a digit, then we match. I.e., we want either an exact
2842 match or a section followed by a number. */
2843 if (strncmp (sought
->section_name
, section
->name
, len
) == 0
2844 && (section
->name
[len
] == 0
2845 || (section
->name
[len
] == '.' && ISDIGIT (section
->name
[len
+ 1]))))
2848 strtab
= read_section_stabs (abfd
, sought
->string_section_name
,
2853 stabs
= read_section_stabs (abfd
, section
->name
, &stab_size
);
2855 print_section_stabs (abfd
, section
->name
, &sought
->string_offset
);
2861 dump_stabs_section (bfd
*abfd
, char *stabsect_name
, char *strsect_name
)
2863 stab_section_names s
;
2865 s
.section_name
= stabsect_name
;
2866 s
.string_section_name
= strsect_name
;
2867 s
.string_offset
= 0;
2869 bfd_map_over_sections (abfd
, find_stabs_section
, & s
);
2875 /* Dump the any sections containing stabs debugging information. */
2878 dump_stabs (bfd
*abfd
)
2880 dump_stabs_section (abfd
, ".stab", ".stabstr");
2881 dump_stabs_section (abfd
, ".stab.excl", ".stab.exclstr");
2882 dump_stabs_section (abfd
, ".stab.index", ".stab.indexstr");
2885 dump_stabs_section (abfd
, "LC_SYMTAB.stabs", "LC_SYMTAB.stabstr");
2887 dump_stabs_section (abfd
, "$GDB_SYMBOLS$", "$GDB_STRINGS$");
2891 dump_bfd_header (bfd
*abfd
)
2895 printf (_("architecture: %s, "),
2896 bfd_printable_arch_mach (bfd_get_arch (abfd
),
2897 bfd_get_mach (abfd
)));
2898 printf (_("flags 0x%08x:\n"), abfd
->flags
& ~BFD_FLAGS_FOR_BFD_USE_MASK
);
2900 #define PF(x, y) if (abfd->flags & x) {printf("%s%s", comma, y); comma=", ";}
2901 PF (HAS_RELOC
, "HAS_RELOC");
2902 PF (EXEC_P
, "EXEC_P");
2903 PF (HAS_LINENO
, "HAS_LINENO");
2904 PF (HAS_DEBUG
, "HAS_DEBUG");
2905 PF (HAS_SYMS
, "HAS_SYMS");
2906 PF (HAS_LOCALS
, "HAS_LOCALS");
2907 PF (DYNAMIC
, "DYNAMIC");
2908 PF (WP_TEXT
, "WP_TEXT");
2909 PF (D_PAGED
, "D_PAGED");
2910 PF (BFD_IS_RELAXABLE
, "BFD_IS_RELAXABLE");
2911 printf (_("\nstart address 0x"));
2912 bfd_printf_vma (abfd
, abfd
->start_address
);
2918 dump_bfd_private_header (bfd
*abfd
)
2920 bfd_print_private_bfd_data (abfd
, stdout
);
2924 dump_target_specific (bfd
*abfd
)
2926 const struct objdump_private_desc
* const *desc
;
2927 struct objdump_private_option
*opt
;
2930 /* Find the desc. */
2931 for (desc
= objdump_private_vectors
; *desc
!= NULL
; desc
++)
2932 if ((*desc
)->filter (abfd
))
2937 non_fatal (_("option -P/--private not supported by this file"));
2941 /* Clear all options. */
2942 for (opt
= (*desc
)->options
; opt
->name
; opt
++)
2943 opt
->selected
= FALSE
;
2945 /* Decode options. */
2946 b
= dump_private_options
;
2949 e
= strchr (b
, ',');
2954 for (opt
= (*desc
)->options
; opt
->name
; opt
++)
2955 if (strcmp (opt
->name
, b
) == 0)
2957 opt
->selected
= TRUE
;
2960 if (opt
->name
== NULL
)
2961 non_fatal (_("target specific dump '%s' not supported"), b
);
2972 (*desc
)->dump (abfd
);
2975 /* Display a section in hexadecimal format with associated characters.
2976 Each line prefixed by the zero padded address. */
2979 dump_section (bfd
*abfd
, asection
*section
, void *dummy ATTRIBUTE_UNUSED
)
2981 bfd_byte
*data
= NULL
;
2982 bfd_size_type datasize
;
2983 bfd_vma addr_offset
;
2984 bfd_vma start_offset
;
2985 bfd_vma stop_offset
;
2986 unsigned int opb
= bfd_octets_per_byte (abfd
);
2987 /* Bytes per line. */
2988 const int onaline
= 16;
2993 if ((section
->flags
& SEC_HAS_CONTENTS
) == 0)
2996 if (! process_section_p (section
))
2999 if ((datasize
= bfd_section_size (abfd
, section
)) == 0)
3002 /* Compute the address range to display. */
3003 if (start_address
== (bfd_vma
) -1
3004 || start_address
< section
->vma
)
3007 start_offset
= start_address
- section
->vma
;
3009 if (stop_address
== (bfd_vma
) -1)
3010 stop_offset
= datasize
/ opb
;
3013 if (stop_address
< section
->vma
)
3016 stop_offset
= stop_address
- section
->vma
;
3018 if (stop_offset
> datasize
/ opb
)
3019 stop_offset
= datasize
/ opb
;
3022 if (start_offset
>= stop_offset
)
3025 printf (_("Contents of section %s:"), section
->name
);
3026 if (display_file_offsets
)
3027 printf (_(" (Starting at file offset: 0x%lx)"),
3028 (unsigned long) (section
->filepos
+ start_offset
));
3031 if (!bfd_get_full_section_contents (abfd
, section
, &data
))
3033 non_fatal (_("Reading section %s failed because: %s"),
3034 section
->name
, bfd_errmsg (bfd_get_error ()));
3040 bfd_sprintf_vma (abfd
, buf
, start_offset
+ section
->vma
);
3041 if (strlen (buf
) >= sizeof (buf
))
3045 while (buf
[count
] == '0' && buf
[count
+1] != '\0')
3047 count
= strlen (buf
) - count
;
3051 bfd_sprintf_vma (abfd
, buf
, stop_offset
+ section
->vma
- 1);
3052 if (strlen (buf
) >= sizeof (buf
))
3056 while (buf
[count
] == '0' && buf
[count
+1] != '\0')
3058 count
= strlen (buf
) - count
;
3062 for (addr_offset
= start_offset
;
3063 addr_offset
< stop_offset
; addr_offset
+= onaline
/ opb
)
3067 bfd_sprintf_vma (abfd
, buf
, (addr_offset
+ section
->vma
));
3068 count
= strlen (buf
);
3069 if ((size_t) count
>= sizeof (buf
))
3073 while (count
< width
)
3078 fputs (buf
+ count
- width
, stdout
);
3081 for (j
= addr_offset
* opb
;
3082 j
< addr_offset
* opb
+ onaline
; j
++)
3084 if (j
< stop_offset
* opb
)
3085 printf ("%02x", (unsigned) (data
[j
]));
3093 for (j
= addr_offset
* opb
;
3094 j
< addr_offset
* opb
+ onaline
; j
++)
3096 if (j
>= stop_offset
* opb
)
3099 printf ("%c", ISPRINT (data
[j
]) ? data
[j
] : '.');
3106 /* Actually display the various requested regions. */
3109 dump_data (bfd
*abfd
)
3111 bfd_map_over_sections (abfd
, dump_section
, NULL
);
3114 /* Should perhaps share code and display with nm? */
3117 dump_symbols (bfd
*abfd ATTRIBUTE_UNUSED
, bfd_boolean dynamic
)
3126 max_count
= dynsymcount
;
3127 printf ("DYNAMIC SYMBOL TABLE:\n");
3132 max_count
= symcount
;
3133 printf ("SYMBOL TABLE:\n");
3137 printf (_("no symbols\n"));
3139 for (count
= 0; count
< max_count
; count
++)
3143 if (*current
== NULL
)
3144 printf (_("no information for symbol number %ld\n"), count
);
3146 else if ((cur_bfd
= bfd_asymbol_bfd (*current
)) == NULL
)
3147 printf (_("could not determine the type of symbol number %ld\n"),
3150 else if (process_section_p ((* current
)->section
)
3151 && (dump_special_syms
3152 || !bfd_is_target_special_symbol (cur_bfd
, *current
)))
3154 const char *name
= (*current
)->name
;
3156 if (do_demangle
&& name
!= NULL
&& *name
!= '\0')
3160 /* If we want to demangle the name, we demangle it
3161 here, and temporarily clobber it while calling
3162 bfd_print_symbol. FIXME: This is a gross hack. */
3163 alloc
= bfd_demangle (cur_bfd
, name
, DMGL_ANSI
| DMGL_PARAMS
);
3165 (*current
)->name
= alloc
;
3166 bfd_print_symbol (cur_bfd
, stdout
, *current
,
3167 bfd_print_symbol_all
);
3170 (*current
)->name
= name
;
3175 bfd_print_symbol (cur_bfd
, stdout
, *current
,
3176 bfd_print_symbol_all
);
3186 dump_reloc_set (bfd
*abfd
, asection
*sec
, arelent
**relpp
, long relcount
)
3189 char *last_filename
, *last_functionname
;
3190 unsigned int last_line
;
3191 unsigned int last_discriminator
;
3193 /* Get column headers lined up reasonably. */
3201 bfd_sprintf_vma (abfd
, buf
, (bfd_vma
) -1);
3202 width
= strlen (buf
) - 7;
3204 printf ("OFFSET %*s TYPE %*s VALUE \n", width
, "", 12, "");
3207 last_filename
= NULL
;
3208 last_functionname
= NULL
;
3210 last_discriminator
= 0;
3212 for (p
= relpp
; relcount
&& *p
!= NULL
; p
++, relcount
--)
3215 const char *filename
, *functionname
;
3216 unsigned int linenumber
;
3217 unsigned int discriminator
;
3218 const char *sym_name
;
3219 const char *section_name
;
3220 bfd_vma addend2
= 0;
3222 if (start_address
!= (bfd_vma
) -1
3223 && q
->address
< start_address
)
3225 if (stop_address
!= (bfd_vma
) -1
3226 && q
->address
> stop_address
)
3229 if (with_line_numbers
3231 && bfd_find_nearest_line_discriminator (abfd
, sec
, syms
, q
->address
,
3232 &filename
, &functionname
,
3233 &linenumber
, &discriminator
))
3235 if (functionname
!= NULL
3236 && (last_functionname
== NULL
3237 || strcmp (functionname
, last_functionname
) != 0))
3239 printf ("%s():\n", functionname
);
3240 if (last_functionname
!= NULL
)
3241 free (last_functionname
);
3242 last_functionname
= xstrdup (functionname
);
3246 && (linenumber
!= last_line
3247 || (filename
!= NULL
3248 && last_filename
!= NULL
3249 && filename_cmp (filename
, last_filename
) != 0)
3250 || (discriminator
!= last_discriminator
)))
3252 if (discriminator
> 0)
3253 printf ("%s:%u\n", filename
== NULL
? "???" : filename
, linenumber
);
3255 printf ("%s:%u (discriminator %u)\n", filename
== NULL
? "???" : filename
,
3256 linenumber
, discriminator
);
3257 last_line
= linenumber
;
3258 last_discriminator
= discriminator
;
3259 if (last_filename
!= NULL
)
3260 free (last_filename
);
3261 if (filename
== NULL
)
3262 last_filename
= NULL
;
3264 last_filename
= xstrdup (filename
);
3268 if (q
->sym_ptr_ptr
&& *q
->sym_ptr_ptr
)
3270 sym_name
= (*(q
->sym_ptr_ptr
))->name
;
3271 section_name
= (*(q
->sym_ptr_ptr
))->section
->name
;
3276 section_name
= NULL
;
3279 bfd_printf_vma (abfd
, q
->address
);
3280 if (q
->howto
== NULL
)
3281 printf (" *unknown* ");
3282 else if (q
->howto
->name
)
3284 const char *name
= q
->howto
->name
;
3286 /* R_SPARC_OLO10 relocations contain two addends.
3287 But because 'arelent' lacks enough storage to
3288 store them both, the 64-bit ELF Sparc backend
3289 records this as two relocations. One R_SPARC_LO10
3290 and one R_SPARC_13, both pointing to the same
3291 address. This is merely so that we have some
3292 place to store both addend fields.
3294 Undo this transformation, otherwise the output
3295 will be confusing. */
3296 if (abfd
->xvec
->flavour
== bfd_target_elf_flavour
3297 && elf_tdata(abfd
)->elf_header
->e_machine
== EM_SPARCV9
3299 && !strcmp (q
->howto
->name
, "R_SPARC_LO10"))
3301 arelent
*q2
= *(p
+ 1);
3304 && q
->address
== q2
->address
3305 && !strcmp (q2
->howto
->name
, "R_SPARC_13"))
3307 name
= "R_SPARC_OLO10";
3308 addend2
= q2
->addend
;
3312 printf (" %-16s ", name
);
3315 printf (" %-16d ", q
->howto
->type
);
3319 objdump_print_symname (abfd
, NULL
, *q
->sym_ptr_ptr
);
3323 if (section_name
== NULL
)
3324 section_name
= "*unknown*";
3325 printf ("[%s]", section_name
);
3330 bfd_signed_vma addend
= q
->addend
;
3338 bfd_printf_vma (abfd
, addend
);
3343 bfd_printf_vma (abfd
, addend2
);
3349 if (last_filename
!= NULL
)
3350 free (last_filename
);
3351 if (last_functionname
!= NULL
)
3352 free (last_functionname
);
3356 dump_relocs_in_section (bfd
*abfd
,
3358 void *dummy ATTRIBUTE_UNUSED
)
3364 if ( bfd_is_abs_section (section
)
3365 || bfd_is_und_section (section
)
3366 || bfd_is_com_section (section
)
3367 || (! process_section_p (section
))
3368 || ((section
->flags
& SEC_RELOC
) == 0))
3371 relsize
= bfd_get_reloc_upper_bound (abfd
, section
);
3373 bfd_fatal (bfd_get_filename (abfd
));
3375 printf ("RELOCATION RECORDS FOR [%s]:", section
->name
);
3379 printf (" (none)\n\n");
3383 if ((bfd_get_file_flags (abfd
) & (BFD_IN_MEMORY
| BFD_LINKER_CREATED
)) == 0
3384 && (ufile_ptr
) relsize
> bfd_get_file_size (abfd
))
3386 printf (" (too many: 0x%x)\n", section
->reloc_count
);
3387 bfd_set_error (bfd_error_file_truncated
);
3388 bfd_fatal (bfd_get_filename (abfd
));
3391 relpp
= (arelent
**) xmalloc (relsize
);
3392 relcount
= bfd_canonicalize_reloc (abfd
, section
, relpp
, syms
);
3397 non_fatal (_("failed to read relocs in: %s"), bfd_get_filename (abfd
));
3398 bfd_fatal (_("error message was"));
3400 else if (relcount
== 0)
3401 printf (" (none)\n\n");
3405 dump_reloc_set (abfd
, section
, relpp
, relcount
);
3412 dump_relocs (bfd
*abfd
)
3414 bfd_map_over_sections (abfd
, dump_relocs_in_section
, NULL
);
3418 dump_dynamic_relocs (bfd
*abfd
)
3424 relsize
= bfd_get_dynamic_reloc_upper_bound (abfd
);
3426 bfd_fatal (bfd_get_filename (abfd
));
3428 printf ("DYNAMIC RELOCATION RECORDS");
3431 printf (" (none)\n\n");
3434 relpp
= (arelent
**) xmalloc (relsize
);
3435 relcount
= bfd_canonicalize_dynamic_reloc (abfd
, relpp
, dynsyms
);
3438 bfd_fatal (bfd_get_filename (abfd
));
3439 else if (relcount
== 0)
3440 printf (" (none)\n\n");
3444 dump_reloc_set (abfd
, NULL
, relpp
, relcount
);
3451 /* Creates a table of paths, to search for source files. */
3454 add_include_path (const char *path
)
3458 include_path_count
++;
3459 include_paths
= (const char **)
3460 xrealloc (include_paths
, include_path_count
* sizeof (*include_paths
));
3461 #ifdef HAVE_DOS_BASED_FILE_SYSTEM
3462 if (path
[1] == ':' && path
[2] == 0)
3463 path
= concat (path
, ".", (const char *) 0);
3465 include_paths
[include_path_count
- 1] = path
;
3469 adjust_addresses (bfd
*abfd ATTRIBUTE_UNUSED
,
3473 if ((section
->flags
& SEC_DEBUGGING
) == 0)
3475 bfd_boolean
*has_reloc_p
= (bfd_boolean
*) arg
;
3476 section
->vma
+= adjust_section_vma
;
3478 section
->lma
+= adjust_section_vma
;
3482 /* Dump selected contents of ABFD. */
3485 dump_bfd (bfd
*abfd
)
3487 /* If we are adjusting section VMA's, change them all now. Changing
3488 the BFD information is a hack. However, we must do it, or
3489 bfd_find_nearest_line will not do the right thing. */
3490 if (adjust_section_vma
!= 0)
3492 bfd_boolean has_reloc
= (abfd
->flags
& HAS_RELOC
);
3493 bfd_map_over_sections (abfd
, adjust_addresses
, &has_reloc
);
3496 if (! dump_debugging_tags
&& ! suppress_bfd_header
)
3497 printf (_("\n%s: file format %s\n"), bfd_get_filename (abfd
),
3500 print_arelt_descr (stdout
, abfd
, TRUE
);
3501 if (dump_file_header
)
3502 dump_bfd_header (abfd
);
3503 if (dump_private_headers
)
3504 dump_bfd_private_header (abfd
);
3505 if (dump_private_options
!= NULL
)
3506 dump_target_specific (abfd
);
3507 if (! dump_debugging_tags
&& ! suppress_bfd_header
)
3514 || dump_dwarf_section_info
)
3515 syms
= slurp_symtab (abfd
);
3517 if (dump_section_headers
)
3518 dump_headers (abfd
);
3520 if (dump_dynamic_symtab
|| dump_dynamic_reloc_info
3521 || (disassemble
&& bfd_get_dynamic_symtab_upper_bound (abfd
) > 0))
3522 dynsyms
= slurp_dynamic_symtab (abfd
);
3525 synthcount
= bfd_get_synthetic_symtab (abfd
, symcount
, syms
,
3526 dynsymcount
, dynsyms
, &synthsyms
);
3532 dump_symbols (abfd
, FALSE
);
3533 if (dump_dynamic_symtab
)
3534 dump_symbols (abfd
, TRUE
);
3535 if (dump_dwarf_section_info
)
3537 if (dump_stab_section_info
)
3539 if (dump_reloc_info
&& ! disassemble
)
3541 if (dump_dynamic_reloc_info
&& ! disassemble
)
3542 dump_dynamic_relocs (abfd
);
3543 if (dump_section_contents
)
3546 disassemble_data (abfd
);
3552 dhandle
= read_debugging_info (abfd
, syms
, symcount
, TRUE
);
3553 if (dhandle
!= NULL
)
3555 if (!print_debugging_info (stdout
, dhandle
, abfd
, syms
,
3557 dump_debugging_tags
? TRUE
: FALSE
))
3559 non_fatal (_("%s: printing debugging information failed"),
3560 bfd_get_filename (abfd
));
3564 /* PR 6483: If there was no STABS or IEEE debug
3565 info in the file, try DWARF instead. */
3566 else if (! dump_dwarf_section_info
)
3568 dwarf_select_sections_all ();
3597 display_object_bfd (bfd
*abfd
)
3601 if (bfd_check_format_matches (abfd
, bfd_object
, &matching
))
3607 if (bfd_get_error () == bfd_error_file_ambiguously_recognized
)
3609 nonfatal (bfd_get_filename (abfd
));
3610 list_matching_formats (matching
);
3615 if (bfd_get_error () != bfd_error_file_not_recognized
)
3617 nonfatal (bfd_get_filename (abfd
));
3621 if (bfd_check_format_matches (abfd
, bfd_core
, &matching
))
3627 nonfatal (bfd_get_filename (abfd
));
3629 if (bfd_get_error () == bfd_error_file_ambiguously_recognized
)
3631 list_matching_formats (matching
);
3637 display_any_bfd (bfd
*file
, int level
)
3639 /* Decompress sections unless dumping the section contents. */
3640 if (!dump_section_contents
)
3641 file
->flags
|= BFD_DECOMPRESS
;
3643 /* If the file is an archive, process all of its elements. */
3644 if (bfd_check_format (file
, bfd_archive
))
3647 bfd
*last_arfile
= NULL
;
3650 printf (_("In archive %s:\n"), bfd_get_filename (file
));
3651 else if (level
> 100)
3653 /* Prevent corrupted files from spinning us into an
3654 infinite loop. 100 is an arbitrary heuristic. */
3655 fatal (_("Archive nesting is too deep"));
3659 printf (_("In nested archive %s:\n"), bfd_get_filename (file
));
3663 bfd_set_error (bfd_error_no_error
);
3665 arfile
= bfd_openr_next_archived_file (file
, arfile
);
3668 if (bfd_get_error () != bfd_error_no_more_archived_files
)
3669 nonfatal (bfd_get_filename (file
));
3673 display_any_bfd (arfile
, level
+ 1);
3675 if (last_arfile
!= NULL
)
3677 bfd_close (last_arfile
);
3678 /* PR 17512: file: ac585d01. */
3679 if (arfile
== last_arfile
)
3685 last_arfile
= arfile
;
3688 if (last_arfile
!= NULL
)
3689 bfd_close (last_arfile
);
3692 display_object_bfd (file
);
3696 display_file (char *filename
, char *target
, bfd_boolean last_file
)
3700 if (get_file_size (filename
) < 1)
3706 file
= bfd_openr (filename
, target
);
3709 nonfatal (filename
);
3713 display_any_bfd (file
, 0);
3715 /* This is an optimization to improve the speed of objdump, especially when
3716 dumping a file with lots of associated debug informatiom. Calling
3717 bfd_close on such a file can take a non-trivial amount of time as there
3718 are lots of lists to walk and buffers to free. This is only really
3719 necessary however if we are about to load another file and we need the
3720 memory back. Otherwise, if we are about to exit, then we can save (a lot
3721 of) time by only doing a quick close, and allowing the OS to reclaim the
3726 bfd_close_all_done (file
);
3730 main (int argc
, char **argv
)
3733 char *target
= default_target
;
3734 bfd_boolean seenflag
= FALSE
;
3736 #if defined (HAVE_SETLOCALE)
3737 #if defined (HAVE_LC_MESSAGES)
3738 setlocale (LC_MESSAGES
, "");
3740 setlocale (LC_CTYPE
, "");
3743 bindtextdomain (PACKAGE
, LOCALEDIR
);
3744 textdomain (PACKAGE
);
3746 program_name
= *argv
;
3747 xmalloc_set_program_name (program_name
);
3748 bfd_set_error_program_name (program_name
);
3750 START_PROGRESS (program_name
, 0);
3752 expandargv (&argc
, &argv
);
3755 set_default_bfd_target ();
3757 while ((c
= getopt_long (argc
, argv
,
3758 "pP:ib:m:M:VvCdDlfFaHhrRtTxsSI:j:wE:zgeGW::",
3759 long_options
, (int *) 0))
3765 break; /* We've been given a long option. */
3772 if (disassembler_options
)
3773 /* Ignore potential memory leak for now. */
3774 options
= concat (disassembler_options
, ",",
3775 optarg
, (const char *) NULL
);
3778 disassembler_options
= remove_whitespace_and_extra_commas (options
);
3785 display_file_offsets
= TRUE
;
3788 with_line_numbers
= TRUE
;
3797 enum demangling_styles style
;
3799 style
= cplus_demangle_name_to_style (optarg
);
3800 if (style
== unknown_demangling
)
3801 fatal (_("unknown demangling style `%s'"),
3804 cplus_demangle_set_style (style
);
3808 do_wide
= wide_output
= TRUE
;
3810 case OPTION_ADJUST_VMA
:
3811 adjust_section_vma
= parse_vma (optarg
, "--adjust-vma");
3813 case OPTION_START_ADDRESS
:
3814 start_address
= parse_vma (optarg
, "--start-address");
3815 if ((stop_address
!= (bfd_vma
) -1) && stop_address
<= start_address
)
3816 fatal (_("error: the start address should be before the end address"));
3818 case OPTION_STOP_ADDRESS
:
3819 stop_address
= parse_vma (optarg
, "--stop-address");
3820 if ((start_address
!= (bfd_vma
) -1) && stop_address
<= start_address
)
3821 fatal (_("error: the stop address should be after the start address"));
3825 prefix_length
= strlen (prefix
);
3826 /* Remove an unnecessary trailing '/' */
3827 while (IS_DIR_SEPARATOR (prefix
[prefix_length
- 1]))
3830 case OPTION_PREFIX_STRIP
:
3831 prefix_strip
= atoi (optarg
);
3832 if (prefix_strip
< 0)
3833 fatal (_("error: prefix strip must be non-negative"));
3835 case OPTION_INSN_WIDTH
:
3836 insn_width
= strtoul (optarg
, NULL
, 0);
3837 if (insn_width
<= 0)
3838 fatal (_("error: instruction width must be positive"));
3840 case OPTION_INLINES
:
3841 unwind_inlines
= TRUE
;
3844 if (strcmp (optarg
, "B") == 0)
3845 endian
= BFD_ENDIAN_BIG
;
3846 else if (strcmp (optarg
, "L") == 0)
3847 endian
= BFD_ENDIAN_LITTLE
;
3850 nonfatal (_("unrecognized -E option"));
3855 if (strncmp (optarg
, "big", strlen (optarg
)) == 0)
3856 endian
= BFD_ENDIAN_BIG
;
3857 else if (strncmp (optarg
, "little", strlen (optarg
)) == 0)
3858 endian
= BFD_ENDIAN_LITTLE
;
3861 non_fatal (_("unrecognized --endian type `%s'"), optarg
);
3868 dump_file_header
= TRUE
;
3872 formats_info
= TRUE
;
3876 add_include_path (optarg
);
3879 dump_private_headers
= TRUE
;
3883 dump_private_options
= optarg
;
3887 dump_private_headers
= TRUE
;
3889 dump_reloc_info
= TRUE
;
3890 dump_file_header
= TRUE
;
3891 dump_ar_hdrs
= TRUE
;
3892 dump_section_headers
= TRUE
;
3900 dump_dynamic_symtab
= TRUE
;
3908 disassemble_zeroes
= TRUE
;
3912 disassemble_all
= TRUE
;
3917 with_source_code
= TRUE
;
3926 dump_debugging_tags
= 1;
3931 dump_dwarf_section_info
= TRUE
;
3934 dwarf_select_sections_by_letters (optarg
);
3936 dwarf_select_sections_all ();
3939 dump_dwarf_section_info
= TRUE
;
3942 dwarf_select_sections_by_names (optarg
);
3944 dwarf_select_sections_all ();
3946 case OPTION_DWARF_DEPTH
:
3949 dwarf_cutoff_level
= strtoul (optarg
, & cp
, 0);
3952 case OPTION_DWARF_START
:
3955 dwarf_start_die
= strtoul (optarg
, & cp
, 0);
3956 suppress_bfd_header
= 1;
3959 case OPTION_DWARF_CHECK
:
3963 dump_stab_section_info
= TRUE
;
3967 dump_section_contents
= TRUE
;
3971 dump_reloc_info
= TRUE
;
3975 dump_dynamic_reloc_info
= TRUE
;
3979 dump_ar_hdrs
= TRUE
;
3983 dump_section_headers
= TRUE
;
3988 show_version
= TRUE
;
3994 /* No need to set seenflag or to break - usage() does not return. */
4001 print_version ("objdump");
4007 exit_status
= display_info ();
4011 display_file ("a.out", target
, TRUE
);
4013 for (; optind
< argc
;)
4015 display_file (argv
[optind
], target
, optind
== argc
- 1);
4022 END_PROGRESS (program_name
);