diff options
Diffstat (limited to 'binutils/nm.c')
-rw-r--r-- | binutils/nm.c | 1558 |
1 files changed, 0 insertions, 1558 deletions
diff --git a/binutils/nm.c b/binutils/nm.c deleted file mode 100644 index c51b7fbcc40..00000000000 --- a/binutils/nm.c +++ /dev/null @@ -1,1558 +0,0 @@ -/* nm.c -- Describe symbol table of a rel file. - Copyright 1991, 92, 93, 94, 95, 96, 97, 98, 1999 - Free Software Foundation, Inc. - - This file is part of GNU Binutils. - - This program is free software; you can redistribute it and/or modify - it under the terms of the GNU General Public License as published by - the Free Software Foundation; either version 2 of the License, or - (at your option) any later version. - - This program is distributed in the hope that it will be useful, - but WITHOUT ANY WARRANTY; without even the implied warranty of - MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the - GNU General Public License for more details. - - You should have received a copy of the GNU General Public License - along with this program; if not, write to the Free Software - Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA - 02111-1307, USA. */ - -#include "bfd.h" -#include "progress.h" -#include "bucomm.h" -#include "getopt.h" -#include "aout/stab_gnu.h" -#include "aout/ranlib.h" -#include "demangle.h" -#include "libiberty.h" - -/* When sorting by size, we use this structure to hold the size and a - pointer to the minisymbol. */ - -struct size_sym -{ - const PTR minisym; - bfd_vma size; -}; - -/* When fetching relocs, we use this structure to pass information to - get_relocs. */ - -struct get_relocs_info -{ - asection **secs; - arelent ***relocs; - long *relcount; - asymbol **syms; -}; - -static void -usage PARAMS ((FILE *, int)); - -static void -set_print_radix PARAMS ((char *)); - -static void -set_output_format PARAMS ((char *)); - -static void -display_archive PARAMS ((bfd *)); - -static boolean -display_file PARAMS ((char *filename)); - -static void -display_rel_file PARAMS ((bfd * file, bfd * archive)); - -static long -filter_symbols PARAMS ((bfd *, boolean, PTR, long, unsigned int)); - -static long -sort_symbols_by_size PARAMS ((bfd *, boolean, PTR, long, unsigned int, - struct size_sym **)); - -static void -print_symbols PARAMS ((bfd *, boolean, PTR, long, unsigned int, bfd *)); - -static void -print_size_symbols PARAMS ((bfd *, boolean, struct size_sym *, long, bfd *)); - -static void -print_symname PARAMS ((const char *, const char *, bfd *)); - -static void -print_symbol PARAMS ((bfd *, asymbol *, bfd *)); - -static void -print_symdef_entry PARAMS ((bfd * abfd)); - -/* The sorting functions. */ - -static int -numeric_forward PARAMS ((const PTR, const PTR)); - -static int -numeric_reverse PARAMS ((const PTR, const PTR)); - -static int -non_numeric_forward PARAMS ((const PTR, const PTR)); - -static int -non_numeric_reverse PARAMS ((const PTR, const PTR)); - -static int -size_forward1 PARAMS ((const PTR, const PTR)); - -static int -size_forward2 PARAMS ((const PTR, const PTR)); - -/* The output formatting functions. */ - -static void -print_object_filename_bsd PARAMS ((char *filename)); - -static void -print_object_filename_sysv PARAMS ((char *filename)); - -static void -print_object_filename_posix PARAMS ((char *filename)); - - -static void -print_archive_filename_bsd PARAMS ((char *filename)); - -static void -print_archive_filename_sysv PARAMS ((char *filename)); - -static void -print_archive_filename_posix PARAMS ((char *filename)); - - -static void -print_archive_member_bsd PARAMS ((char *archive, CONST char *filename)); - -static void -print_archive_member_sysv PARAMS ((char *archive, CONST char *filename)); - -static void -print_archive_member_posix PARAMS ((char *archive, CONST char *filename)); - - -static void -print_symbol_filename_bsd PARAMS ((bfd * archive_bfd, bfd * abfd)); - -static void -print_symbol_filename_sysv PARAMS ((bfd * archive_bfd, bfd * abfd)); - -static void -print_symbol_filename_posix PARAMS ((bfd * archive_bfd, bfd * abfd)); - - -static void -print_value PARAMS ((bfd_vma)); - -static void -print_symbol_info_bsd PARAMS ((symbol_info * info, bfd * abfd)); - -static void -print_symbol_info_sysv PARAMS ((symbol_info * info, bfd * abfd)); - -static void -print_symbol_info_posix PARAMS ((symbol_info * info, bfd * abfd)); - -static void -get_relocs PARAMS ((bfd *, asection *, PTR)); - -/* Support for different output formats. */ -struct output_fns - { - /* Print the name of an object file given on the command line. */ - void (*print_object_filename) PARAMS ((char *filename)); - - /* Print the name of an archive file given on the command line. */ - void (*print_archive_filename) PARAMS ((char *filename)); - - /* Print the name of an archive member file. */ - void (*print_archive_member) PARAMS ((char *archive, CONST char *filename)); - - /* Print the name of the file (and archive, if there is one) - containing a symbol. */ - void (*print_symbol_filename) PARAMS ((bfd * archive_bfd, bfd * abfd)); - - /* Print a line of information about a symbol. */ - void (*print_symbol_info) PARAMS ((symbol_info * info, bfd * abfd)); - }; -static struct output_fns formats[] = -{ - {print_object_filename_bsd, - print_archive_filename_bsd, - print_archive_member_bsd, - print_symbol_filename_bsd, - print_symbol_info_bsd}, - {print_object_filename_sysv, - print_archive_filename_sysv, - print_archive_member_sysv, - print_symbol_filename_sysv, - print_symbol_info_sysv}, - {print_object_filename_posix, - print_archive_filename_posix, - print_archive_member_posix, - print_symbol_filename_posix, - print_symbol_info_posix} -}; - -/* Indices in `formats'. */ -#define FORMAT_BSD 0 -#define FORMAT_SYSV 1 -#define FORMAT_POSIX 2 -#define FORMAT_DEFAULT FORMAT_BSD - -/* The output format to use. */ -static struct output_fns *format = &formats[FORMAT_DEFAULT]; - - -/* Command options. */ - -static int do_demangle = 0; /* Pretty print C++ symbol names. */ -static int external_only = 0; /* print external symbols only */ -static int defined_only = 0; /* Print defined symbols only */ -static int no_sort = 0; /* don't sort; print syms in order found */ -static int print_debug_syms = 0; /* print debugger-only symbols too */ -static int print_armap = 0; /* describe __.SYMDEF data in archive files. */ -static int reverse_sort = 0; /* sort in downward(alpha or numeric) order */ -static int sort_numerically = 0; /* sort in numeric rather than alpha order */ -static int sort_by_size = 0; /* sort by size of symbol */ -static int undefined_only = 0; /* print undefined symbols only */ -static int dynamic = 0; /* print dynamic symbols. */ -static int show_version = 0; /* show the version number */ -static int show_stats = 0; /* show statistics */ -static int line_numbers = 0; /* print line numbers for symbols */ - -/* When to print the names of files. Not mutually exclusive in SYSV format. */ -static int filename_per_file = 0; /* Once per file, on its own line. */ -static int filename_per_symbol = 0; /* Once per symbol, at start of line. */ - -/* Print formats for printing a symbol value. */ -#ifndef BFD64 -static char value_format[] = "%08lx"; -#else -#if BFD_HOST_64BIT_LONG -static char value_format[] = "%016lx"; -#else -/* We don't use value_format for this case. */ -#endif -#endif -static int print_radix = 16; -/* Print formats for printing stab info. */ -static char other_format[] = "%02x"; -static char desc_format[] = "%04x"; - -static char *target = NULL; - -/* Used to cache the line numbers for a BFD. */ -static bfd *lineno_cache_bfd; -static bfd *lineno_cache_rel_bfd; - -static struct option long_options[] = -{ - {"debug-syms", no_argument, &print_debug_syms, 1}, - {"demangle", no_argument, &do_demangle, 1}, - {"dynamic", no_argument, &dynamic, 1}, - {"extern-only", no_argument, &external_only, 1}, - {"format", required_argument, 0, 'f'}, - {"help", no_argument, 0, 'h'}, - {"line-numbers", no_argument, 0, 'l'}, - {"no-cplus", no_argument, &do_demangle, 0}, /* Linux compatibility. */ - {"no-demangle", no_argument, &do_demangle, 0}, - {"no-sort", no_argument, &no_sort, 1}, - {"numeric-sort", no_argument, &sort_numerically, 1}, - {"portability", no_argument, 0, 'P'}, - {"print-armap", no_argument, &print_armap, 1}, - {"print-file-name", no_argument, 0, 'o'}, - {"radix", required_argument, 0, 't'}, - {"reverse-sort", no_argument, &reverse_sort, 1}, - {"size-sort", no_argument, &sort_by_size, 1}, - {"stats", no_argument, &show_stats, 1}, - {"target", required_argument, 0, 200}, - {"defined-only", no_argument, &defined_only, 1}, - {"undefined-only", no_argument, &undefined_only, 1}, - {"version", no_argument, &show_version, 1}, - {0, no_argument, 0, 0} -}; - -/* Some error-reporting functions */ - -static void -usage (stream, status) - FILE *stream; - int status; -{ - fprintf (stream, _("\ -Usage: %s [-aABCDglnopPrsuvV] [-t radix] [--radix=radix] [--target=bfdname]\n\ - [--debug-syms] [--extern-only] [--print-armap] [--print-file-name]\n\ - [--numeric-sort] [--no-sort] [--reverse-sort] [--size-sort]\n\ - [--undefined-only] [--portability] [-f {bsd,sysv,posix}]\n\ - [--format={bsd,sysv,posix}] [--demangle] [--no-demangle] [--dynamic]\n\ - [--defined-only] [--line-numbers]\n\ - [--version] [--help]\n\ - [file...]\n"), - program_name); - list_supported_targets (program_name, stream); - if (status == 0) - fprintf (stream, _("Report bugs to bug-gnu-utils@gnu.org\n")); - exit (status); -} - -/* Set the radix for the symbol value and size according to RADIX. */ - -static void -set_print_radix (radix) - char *radix; -{ - switch (*radix) - { - case 'x': - break; - case 'd': - case 'o': - if (*radix == 'd') - print_radix = 10; - else - print_radix = 8; -#ifndef BFD64 - value_format[4] = *radix; -#else -#if BFD_HOST_64BIT_LONG - value_format[5] = *radix; -#else - /* This case requires special handling for octal and decimal - printing. */ -#endif -#endif - other_format[3] = desc_format[3] = *radix; - break; - default: - fprintf (stderr, _("%s: %s: invalid radix\n"), program_name, radix); - exit (1); - } -} - -static void -set_output_format (f) - char *f; -{ - int i; - - switch (*f) - { - case 'b': - case 'B': - i = FORMAT_BSD; - break; - case 'p': - case 'P': - i = FORMAT_POSIX; - break; - case 's': - case 'S': - i = FORMAT_SYSV; - break; - default: - fprintf (stderr, _("%s: %s: invalid output format\n"), program_name, f); - exit (1); - } - format = &formats[i]; -} - -int -main (argc, argv) - int argc; - char **argv; -{ - int c; - int retval; - -#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES) - setlocale (LC_MESSAGES, ""); -#endif - bindtextdomain (PACKAGE, LOCALEDIR); - textdomain (PACKAGE); - - program_name = *argv; - xmalloc_set_program_name (program_name); - - START_PROGRESS (program_name, 0); - - bfd_init (); - set_default_bfd_target (); - - while ((c = getopt_long (argc, argv, "aABCDef:glnopPrst:uvV", long_options, (int *) 0)) != EOF) - { - switch (c) - { - case 'a': - print_debug_syms = 1; - break; - case 'A': - case 'o': - filename_per_symbol = 1; - break; - case 'B': /* For MIPS compatibility. */ - set_output_format ("bsd"); - break; - case 'C': - do_demangle = 1; - break; - case 'D': - dynamic = 1; - break; - case 'e': - /* Ignored for HP/UX compatibility. */ - break; - case 'f': - set_output_format (optarg); - break; - case 'g': - external_only = 1; - break; - case 'h': - usage (stdout, 0); - case 'l': - line_numbers = 1; - break; - case 'n': - case 'v': - sort_numerically = 1; - break; - case 'p': - no_sort = 1; - break; - case 'P': - set_output_format ("posix"); - break; - case 'r': - reverse_sort = 1; - break; - case 's': - print_armap = 1; - break; - case 't': - set_print_radix (optarg); - break; - case 'u': - undefined_only = 1; - break; - case 'V': - show_version = 1; - break; - - case 200: /* --target */ - target = optarg; - break; - - case 0: /* A long option that just sets a flag. */ - break; - - default: - usage (stderr, 1); - } - } - - if (show_version) - print_version ("nm"); - - /* OK, all options now parsed. If no filename specified, do a.out. */ - if (optind == argc) - return !display_file ("a.out"); - - retval = 0; - - if (argc - optind > 1) - filename_per_file = 1; - - /* We were given several filenames to do. */ - while (optind < argc) - { - PROGRESS (1); - if (!display_file (argv[optind++])) - retval++; - } - - END_PROGRESS (program_name); - -#ifdef HAVE_SBRK - if (show_stats) - { - char *lim = (char *) sbrk (0); - - fprintf (stderr, _("%s: data size %ld\n"), program_name, - (long) (lim - (char *) &environ)); - } -#endif - - exit (retval); - return retval; -} - -static void -display_archive (file) - bfd *file; -{ - bfd *arfile = NULL; - bfd *last_arfile = NULL; - char **matching; - - (*format->print_archive_filename) (bfd_get_filename (file)); - - if (print_armap) - print_symdef_entry (file); - - for (;;) - { - PROGRESS (1); - - arfile = bfd_openr_next_archived_file (file, arfile); - - if (arfile == NULL) - { - if (bfd_get_error () != bfd_error_no_more_archived_files) - bfd_fatal (bfd_get_filename (file)); - break; - } - - if (bfd_check_format_matches (arfile, bfd_object, &matching)) - { - (*format->print_archive_member) (bfd_get_filename (file), - bfd_get_filename (arfile)); - display_rel_file (arfile, file); - } - else - { - bfd_nonfatal (bfd_get_filename (arfile)); - if (bfd_get_error () == bfd_error_file_ambiguously_recognized) - { - list_matching_formats (matching); - free (matching); - } - } - - if (last_arfile != NULL) - { - bfd_close (last_arfile); - lineno_cache_bfd = NULL; - lineno_cache_rel_bfd = NULL; - } - last_arfile = arfile; - } - - if (last_arfile != NULL) - { - bfd_close (last_arfile); - lineno_cache_bfd = NULL; - lineno_cache_rel_bfd = NULL; - } -} - -static boolean -display_file (filename) - char *filename; -{ - boolean retval = true; - bfd *file; - char **matching; - - file = bfd_openr (filename, target); - if (file == NULL) - { - bfd_nonfatal (filename); - return false; - } - - if (bfd_check_format (file, bfd_archive)) - { - display_archive (file); - } - else if (bfd_check_format_matches (file, bfd_object, &matching)) - { - (*format->print_object_filename) (filename); - display_rel_file (file, NULL); - } - else - { - bfd_nonfatal (filename); - if (bfd_get_error () == bfd_error_file_ambiguously_recognized) - { - list_matching_formats (matching); - free (matching); - } - retval = false; - } - - if (bfd_close (file) == false) - bfd_fatal (filename); - - lineno_cache_bfd = NULL; - lineno_cache_rel_bfd = NULL; - - return retval; -} - -/* These globals are used to pass information into the sorting - routines. */ -static bfd *sort_bfd; -static boolean sort_dynamic; -static asymbol *sort_x; -static asymbol *sort_y; - -/* Symbol-sorting predicates */ -#define valueof(x) ((x)->section->vma + (x)->value) - -/* Numeric sorts. Undefined symbols are always considered "less than" - defined symbols with zero values. Common symbols are not treated - specially -- i.e., their sizes are used as their "values". */ - -static int -numeric_forward (P_x, P_y) - const PTR P_x; - const PTR P_y; -{ - asymbol *x, *y; - asection *xs, *ys; - - x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x); - y = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y); - if (x == NULL || y == NULL) - bfd_fatal (bfd_get_filename (sort_bfd)); - - xs = bfd_get_section (x); - ys = bfd_get_section (y); - - if (bfd_is_und_section (xs)) - { - if (! bfd_is_und_section (ys)) - return -1; - } - else if (bfd_is_und_section (ys)) - return 1; - else if (valueof (x) != valueof (y)) - return valueof (x) < valueof (y) ? -1 : 1; - - return non_numeric_forward (P_x, P_y); -} - -static int -numeric_reverse (x, y) - const PTR x; - const PTR y; -{ - return - numeric_forward (x, y); -} - -static int -non_numeric_forward (P_x, P_y) - const PTR P_x; - const PTR P_y; -{ - asymbol *x, *y; - const char *xn, *yn; - - x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x); - y = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y); - if (x == NULL || y == NULL) - bfd_fatal (bfd_get_filename (sort_bfd)); - - xn = bfd_asymbol_name (x); - yn = bfd_asymbol_name (y); - - return ((xn == NULL) ? ((yn == NULL) ? 0 : -1) : - ((yn == NULL) ? 1 : strcmp (xn, yn))); -} - -static int -non_numeric_reverse (x, y) - const PTR x; - const PTR y; -{ - return - non_numeric_forward (x, y); -} - -static int (*(sorters[2][2])) PARAMS ((const PTR, const PTR)) = -{ - { non_numeric_forward, non_numeric_reverse }, - { numeric_forward, numeric_reverse } -}; - -/* This sort routine is used by sort_symbols_by_size. It is similar - to numeric_forward, but when symbols have the same value it sorts - by section VMA. This simplifies the sort_symbols_by_size code - which handles symbols at the end of sections. Also, this routine - tries to sort file names before other symbols with the same value. - That will make the file name have a zero size, which will make - sort_symbols_by_size choose the non file name symbol, leading to - more meaningful output. For similar reasons, this code sorts - gnu_compiled_* and gcc2_compiled before other symbols with the same - value. */ - -static int -size_forward1 (P_x, P_y) - const PTR P_x; - const PTR P_y; -{ - asymbol *x, *y; - asection *xs, *ys; - const char *xn, *yn; - size_t xnl, ynl; - int xf, yf; - - x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x); - y = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y); - if (x == NULL || y == NULL) - bfd_fatal (bfd_get_filename (sort_bfd)); - - xs = bfd_get_section (x); - ys = bfd_get_section (y); - - if (bfd_is_und_section (xs)) - abort (); - if (bfd_is_und_section (ys)) - abort (); - - if (valueof (x) != valueof (y)) - return valueof (x) < valueof (y) ? -1 : 1; - - if (xs->vma != ys->vma) - return xs->vma < ys->vma ? -1 : 1; - - xn = bfd_asymbol_name (x); - yn = bfd_asymbol_name (y); - xnl = strlen (xn); - ynl = strlen (yn); - - /* The symbols gnu_compiled and gcc2_compiled convey even less - information than the file name, so sort them out first. */ - - xf = (strstr (xn, "gnu_compiled") != NULL - || strstr (xn, "gcc2_compiled") != NULL); - yf = (strstr (yn, "gnu_compiled") != NULL - || strstr (yn, "gcc2_compiled") != NULL); - - if (xf && ! yf) - return -1; - if (! xf && yf) - return 1; - - /* We use a heuristic for the file name. It may not work on non - Unix systems, but it doesn't really matter; the only difference - is precisely which symbol names get printed. */ - -#define file_symbol(s, sn, snl) \ - (((s)->flags & BSF_FILE) != 0 \ - || ((sn)[(snl) - 2] == '.' \ - && ((sn)[(snl) - 1] == 'o' \ - || (sn)[(snl) - 1] == 'a'))) - - xf = file_symbol (x, xn, xnl); - yf = file_symbol (y, yn, ynl); - - if (xf && ! yf) - return -1; - if (! xf && yf) - return 1; - - return non_numeric_forward (P_x, P_y); -} - -/* This sort routine is used by sort_symbols_by_size. It is sorting - an array of size_sym structures into size order. */ - -static int -size_forward2 (P_x, P_y) - const PTR P_x; - const PTR P_y; -{ - const struct size_sym *x = (const struct size_sym *) P_x; - const struct size_sym *y = (const struct size_sym *) P_y; - - if (x->size < y->size) - return reverse_sort ? 1 : -1; - else if (x->size > y->size) - return reverse_sort ? -1 : 1; - else - return sorters[0][reverse_sort] (x->minisym, y->minisym); -} - -/* Sort the symbols by size. We guess the size by assuming that the - difference between the address of a symbol and the address of the - next higher symbol is the size. FIXME: ELF actually stores a size - with each symbol. We should use it. */ - -static long -sort_symbols_by_size (abfd, dynamic, minisyms, symcount, size, symsizesp) - bfd *abfd; - boolean dynamic; - PTR minisyms; - long symcount; - unsigned int size; - struct size_sym **symsizesp; -{ - struct size_sym *symsizes; - bfd_byte *from, *fromend; - asymbol *sym = NULL; - asymbol *store_sym, *store_next; - - qsort (minisyms, symcount, size, size_forward1); - - /* We are going to return a special set of symbols and sizes to - print. */ - symsizes = (struct size_sym *) xmalloc (symcount * sizeof (struct size_sym)); - *symsizesp = symsizes; - - /* Note that filter_symbols has already removed all absolute and - undefined symbols. Here we remove all symbols whose size winds - up as zero. */ - - from = (bfd_byte *) minisyms; - fromend = from + symcount * size; - - store_sym = sort_x; - store_next = sort_y; - - if (from < fromend) - { - sym = bfd_minisymbol_to_symbol (abfd, dynamic, (const PTR) from, - store_sym); - if (sym == NULL) - bfd_fatal (bfd_get_filename (abfd)); - } - - for (; from < fromend; from += size) - { - asymbol *next; - asection *sec; - bfd_vma sz; - asymbol *temp; - - if (from + size < fromend) - { - next = bfd_minisymbol_to_symbol (abfd, - dynamic, - (const PTR) (from + size), - store_next); - if (next == NULL) - bfd_fatal (bfd_get_filename (abfd)); - } - else - next = NULL; - - sec = bfd_get_section (sym); - - if (bfd_is_com_section (sec)) - sz = sym->value; - else - { - if (from + size < fromend - && sec == bfd_get_section (next)) - sz = valueof (next) - valueof (sym); - else - sz = (bfd_get_section_vma (abfd, sec) - + bfd_section_size (abfd, sec) - - valueof (sym)); - } - - if (sz != 0) - { - symsizes->minisym = (const PTR) from; - symsizes->size = sz; - ++symsizes; - } - - sym = next; - - temp = store_sym; - store_sym = store_next; - store_next = temp; - } - - symcount = symsizes - *symsizesp; - - /* We must now sort again by size. */ - qsort ((PTR) *symsizesp, symcount, sizeof (struct size_sym), size_forward2); - - return symcount; -} - -/* If ARCHIVE_BFD is non-NULL, it is the archive containing ABFD. */ - -static void -display_rel_file (abfd, archive_bfd) - bfd *abfd; - bfd *archive_bfd; -{ - long symcount; - PTR minisyms; - unsigned int size; - struct size_sym *symsizes; - - if (! dynamic) - { - if (!(bfd_get_file_flags (abfd) & HAS_SYMS)) - { - fprintf (stderr, _("%s: no symbols\n"), bfd_get_filename (abfd)); - return; - } - } - - symcount = bfd_read_minisymbols (abfd, dynamic, &minisyms, &size); - if (symcount < 0) - bfd_fatal (bfd_get_filename (abfd)); - - if (symcount == 0) - { - fprintf (stderr, _("%s: no symbols\n"), bfd_get_filename (abfd)); - return; - } - - /* Discard the symbols we don't want to print. - It's OK to do this in place; we'll free the storage anyway - (after printing). */ - - symcount = filter_symbols (abfd, dynamic, minisyms, symcount, size); - - symsizes = NULL; - if (! no_sort) - { - sort_bfd = abfd; - sort_dynamic = dynamic; - sort_x = bfd_make_empty_symbol (abfd); - sort_y = bfd_make_empty_symbol (abfd); - if (sort_x == NULL || sort_y == NULL) - bfd_fatal (bfd_get_filename (abfd)); - - if (! sort_by_size) - qsort (minisyms, symcount, size, - sorters[sort_numerically][reverse_sort]); - else - symcount = sort_symbols_by_size (abfd, dynamic, minisyms, symcount, - size, &symsizes); - } - - if (! sort_by_size) - print_symbols (abfd, dynamic, minisyms, symcount, size, archive_bfd); - else - print_size_symbols (abfd, dynamic, symsizes, symcount, archive_bfd); - - free (minisyms); -} - -/* Choose which symbol entries to print; - compact them downward to get rid of the rest. - Return the number of symbols to be printed. */ - -static long -filter_symbols (abfd, dynamic, minisyms, symcount, size) - bfd *abfd; - boolean dynamic; - PTR minisyms; - long symcount; - unsigned int size; -{ - bfd_byte *from, *fromend, *to; - asymbol *store; - - store = bfd_make_empty_symbol (abfd); - if (store == NULL) - bfd_fatal (bfd_get_filename (abfd)); - - from = (bfd_byte *) minisyms; - fromend = from + symcount * size; - to = (bfd_byte *) minisyms; - - for (; from < fromend; from += size) - { - int keep = 0; - asymbol *sym; - - PROGRESS (1); - - sym = bfd_minisymbol_to_symbol (abfd, dynamic, (const PTR) from, store); - if (sym == NULL) - bfd_fatal (bfd_get_filename (abfd)); - - if (undefined_only) - keep = bfd_is_und_section (sym->section); - else if (external_only) - keep = ((sym->flags & BSF_GLOBAL) != 0 - || (sym->flags & BSF_WEAK) != 0 - || bfd_is_und_section (sym->section) - || bfd_is_com_section (sym->section)); - else - keep = 1; - - if (keep - && ! print_debug_syms - && (sym->flags & BSF_DEBUGGING) != 0) - keep = 0; - - if (keep - && sort_by_size - && (bfd_is_abs_section (sym->section) - || bfd_is_und_section (sym->section))) - keep = 0; - - if (keep - && defined_only) - { - if (bfd_is_und_section (sym->section)) - keep = 0; - } - - if (keep) - { - memcpy (to, from, size); - to += size; - } - } - - return (to - (bfd_byte *) minisyms) / size; -} - -/* Print symbol name NAME, read from ABFD, with printf format FORMAT, - demangling it if requested. */ - -static void -print_symname (format, name, abfd) - const char *format; - const char *name; - bfd *abfd; -{ - if (do_demangle && *name) - { - char *res; - - /* In this mode, give a user-level view of the symbol name - even if it's not mangled; strip off any leading - underscore. */ - if (bfd_get_symbol_leading_char (abfd) == name[0]) - name++; - - res = cplus_demangle (name, DMGL_ANSI | DMGL_PARAMS); - if (res) - { - printf (format, res); - free (res); - return; - } - } - - printf (format, name); -} - -/* Print the symbols. If ARCHIVE_BFD is non-NULL, it is the archive - containing ABFD. */ - -static void -print_symbols (abfd, dynamic, minisyms, symcount, size, archive_bfd) - bfd *abfd; - boolean dynamic; - PTR minisyms; - long symcount; - unsigned int size; - bfd *archive_bfd; -{ - asymbol *store; - bfd_byte *from, *fromend; - - store = bfd_make_empty_symbol (abfd); - if (store == NULL) - bfd_fatal (bfd_get_filename (abfd)); - - from = (bfd_byte *) minisyms; - fromend = from + symcount * size; - for (; from < fromend; from += size) - { - asymbol *sym; - - sym = bfd_minisymbol_to_symbol (abfd, dynamic, from, store); - if (sym == NULL) - bfd_fatal (bfd_get_filename (abfd)); - - print_symbol (abfd, sym, archive_bfd); - } -} - -/* Print the symbols when sorting by size. */ - -static void -print_size_symbols (abfd, dynamic, symsizes, symcount, archive_bfd) - bfd *abfd; - boolean dynamic; - struct size_sym *symsizes; - long symcount; - bfd *archive_bfd; -{ - asymbol *store; - struct size_sym *from, *fromend; - - store = bfd_make_empty_symbol (abfd); - if (store == NULL) - bfd_fatal (bfd_get_filename (abfd)); - - from = symsizes; - fromend = from + symcount; - for (; from < fromend; from++) - { - asymbol *sym; - - sym = bfd_minisymbol_to_symbol (abfd, dynamic, from->minisym, store); - if (sym == NULL) - bfd_fatal (bfd_get_filename (abfd)); - - /* Set the symbol value so that we actually display the symbol - size. */ - sym->value = from->size - bfd_section_vma (abfd, bfd_get_section (sym)); - - print_symbol (abfd, sym, archive_bfd); - } -} - -/* Print a single symbol. */ - -static void -print_symbol (abfd, sym, archive_bfd) - bfd *abfd; - asymbol *sym; - bfd *archive_bfd; -{ - PROGRESS (1); - - (*format->print_symbol_filename) (archive_bfd, abfd); - - if (undefined_only) - { - if (bfd_is_und_section (bfd_get_section (sym))) - print_symname ("%s", bfd_asymbol_name (sym), abfd); - } - else - { - symbol_info syminfo; - - bfd_get_symbol_info (abfd, sym, &syminfo); - (*format->print_symbol_info) (&syminfo, abfd); - } - - if (line_numbers) - { - static asymbol **syms; - static long symcount; - const char *filename, *functionname; - unsigned int lineno; - - /* We need to get the canonical symbols in order to call - bfd_find_nearest_line. This is inefficient, but, then, you - don't have to use --line-numbers. */ - if (abfd != lineno_cache_bfd && syms != NULL) - { - free (syms); - syms = NULL; - } - if (syms == NULL) - { - long symsize; - - symsize = bfd_get_symtab_upper_bound (abfd); - if (symsize < 0) - bfd_fatal (bfd_get_filename (abfd)); - syms = (asymbol **) xmalloc (symsize); - symcount = bfd_canonicalize_symtab (abfd, syms); - if (symcount < 0) - bfd_fatal (bfd_get_filename (abfd)); - lineno_cache_bfd = abfd; - } - - if (bfd_is_und_section (bfd_get_section (sym))) - { - static asection **secs; - static arelent ***relocs; - static long *relcount; - static unsigned int seccount; - unsigned int i; - const char *symname; - - /* For an undefined symbol, we try to find a reloc for the - symbol, and print the line number of the reloc. */ - - if (abfd != lineno_cache_rel_bfd && relocs != NULL) - { - for (i = 0; i < seccount; i++) - if (relocs[i] != NULL) - free (relocs[i]); - free (secs); - free (relocs); - free (relcount); - secs = NULL; - relocs = NULL; - relcount = NULL; - } - - if (relocs == NULL) - { - struct get_relocs_info info; - - seccount = bfd_count_sections (abfd); - - secs = (asection **) xmalloc (seccount * sizeof *secs); - relocs = (arelent ***) xmalloc (seccount * sizeof *relocs); - relcount = (long *) xmalloc (seccount * sizeof *relcount); - - info.secs = secs; - info.relocs = relocs; - info.relcount = relcount; - info.syms = syms; - bfd_map_over_sections (abfd, get_relocs, (PTR) &info); - lineno_cache_rel_bfd = abfd; - } - - symname = bfd_asymbol_name (sym); - for (i = 0; i < seccount; i++) - { - long j; - - for (j = 0; j < relcount[i]; j++) - { - arelent *r; - - r = relocs[i][j]; - if (r->sym_ptr_ptr != NULL - && (*r->sym_ptr_ptr)->section == sym->section - && (*r->sym_ptr_ptr)->value == sym->value - && strcmp (symname, - bfd_asymbol_name (*r->sym_ptr_ptr)) == 0 - && bfd_find_nearest_line (abfd, secs[i], syms, - r->address, &filename, - &functionname, &lineno)) - { - /* We only print the first one we find. */ - printf ("\t%s:%u", filename, lineno); - i = seccount; - break; - } - } - } - } - else if (bfd_get_section (sym)->owner == abfd) - { - if (bfd_find_nearest_line (abfd, bfd_get_section (sym), syms, - sym->value, &filename, &functionname, - &lineno) - && filename != NULL - && lineno != 0) - { - printf ("\t%s:%u", filename, lineno); - } - } - } - - putchar ('\n'); -} - -/* The following 3 groups of functions are called unconditionally, - once at the start of processing each file of the appropriate type. - They should check `filename_per_file' and `filename_per_symbol', - as appropriate for their output format, to determine whether to - print anything. */ - -/* Print the name of an object file given on the command line. */ - -static void -print_object_filename_bsd (filename) - char *filename; -{ - if (filename_per_file && !filename_per_symbol) - printf ("\n%s:\n", filename); -} - -static void -print_object_filename_sysv (filename) - char *filename; -{ - if (undefined_only) - printf (_("\n\nUndefined symbols from %s:\n\n"), filename); - else - printf (_("\n\nSymbols from %s:\n\n"), filename); - printf (_("\ -Name Value Class Type Size Line Section\n\n")); -} - -static void -print_object_filename_posix (filename) - char *filename; -{ - if (filename_per_file && !filename_per_symbol) - printf ("%s:\n", filename); -} - -/* Print the name of an archive file given on the command line. */ - -static void -print_archive_filename_bsd (filename) - char *filename; -{ - if (filename_per_file) - printf ("\n%s:\n", filename); -} - -static void -print_archive_filename_sysv (filename) - char *filename; -{ -} - -static void -print_archive_filename_posix (filename) - char *filename; -{ -} - -/* Print the name of an archive member file. */ - -static void -print_archive_member_bsd (archive, filename) - char *archive; - CONST char *filename; -{ - if (!filename_per_symbol) - printf ("\n%s:\n", filename); -} - -static void -print_archive_member_sysv (archive, filename) - char *archive; - CONST char *filename; -{ - if (undefined_only) - printf (_("\n\nUndefined symbols from %s[%s]:\n\n"), archive, filename); - else - printf (_("\n\nSymbols from %s[%s]:\n\n"), archive, filename); - printf (_("\ -Name Value Class Type Size Line Section\n\n")); -} - -static void -print_archive_member_posix (archive, filename) - char *archive; - CONST char *filename; -{ - if (!filename_per_symbol) - printf ("%s[%s]:\n", archive, filename); -} - -/* Print the name of the file (and archive, if there is one) - containing a symbol. */ - -static void -print_symbol_filename_bsd (archive_bfd, abfd) - bfd *archive_bfd, *abfd; -{ - if (filename_per_symbol) - { - if (archive_bfd) - printf ("%s:", bfd_get_filename (archive_bfd)); - printf ("%s:", bfd_get_filename (abfd)); - } -} - -static void -print_symbol_filename_sysv (archive_bfd, abfd) - bfd *archive_bfd, *abfd; -{ - if (filename_per_symbol) - { - if (archive_bfd) - printf ("%s:", bfd_get_filename (archive_bfd)); - printf ("%s:", bfd_get_filename (abfd)); - } -} - -static void -print_symbol_filename_posix (archive_bfd, abfd) - bfd *archive_bfd, *abfd; -{ - if (filename_per_symbol) - { - if (archive_bfd) - printf ("%s[%s]: ", bfd_get_filename (archive_bfd), - bfd_get_filename (abfd)); - else - printf ("%s: ", bfd_get_filename (abfd)); - } -} - -/* Print a symbol value. */ - -static void -print_value (val) - bfd_vma val; -{ -#if ! defined (BFD64) || BFD_HOST_64BIT_LONG - printf (value_format, val); -#else - /* We have a 64 bit value to print, but the host is only 32 bit. */ - if (print_radix == 16) - fprintf_vma (stdout, val); - else - { - char buf[30]; - char *s; - - s = buf + sizeof buf; - *--s = '\0'; - while (val > 0) - { - *--s = (val % print_radix) + '0'; - val /= print_radix; - } - while ((buf + sizeof buf - 1) - s < 16) - *--s = '0'; - printf ("%s", s); - } -#endif -} - -/* Print a line of information about a symbol. */ - -static void -print_symbol_info_bsd (info, abfd) - symbol_info *info; - bfd *abfd; -{ - if (info->type == 'U') - { - printf ("%*s", -#ifdef BFD64 - 16, -#else - 8, -#endif - ""); - } - else - print_value (info->value); - printf (" %c", info->type); - if (info->type == '-') - { - /* A stab. */ - printf (" "); - printf (other_format, info->stab_other); - printf (" "); - printf (desc_format, info->stab_desc); - printf (" %5s", info->stab_name); - } - print_symname (" %s", info->name, abfd); -} - -static void -print_symbol_info_sysv (info, abfd) - symbol_info *info; - bfd *abfd; -{ - print_symname ("%-20s|", info->name, abfd); /* Name */ - if (info->type == 'U') - printf (" "); /* Value */ - else - print_value (info->value); - printf ("| %c |", info->type); /* Class */ - if (info->type == '-') - { - /* A stab. */ - printf ("%18s| ", info->stab_name); /* (C) Type */ - printf (desc_format, info->stab_desc); /* Size */ - printf ("| |"); /* Line, Section */ - } - else - printf (" | | |"); /* Type, Size, Line, Section */ -} - -static void -print_symbol_info_posix (info, abfd) - symbol_info *info; - bfd *abfd; -{ - print_symname ("%s ", info->name, abfd); - printf ("%c ", info->type); - if (info->type == 'U') - printf (" "); - else - print_value (info->value); - /* POSIX.2 wants the symbol size printed here, when applicable; - BFD currently doesn't provide it, so we take the easy way out by - considering it to never be applicable. */ -} - -static void -print_symdef_entry (abfd) - bfd *abfd; -{ - symindex idx = BFD_NO_MORE_SYMBOLS; - carsym *thesym; - boolean everprinted = false; - - for (idx = bfd_get_next_mapent (abfd, idx, &thesym); - idx != BFD_NO_MORE_SYMBOLS; - idx = bfd_get_next_mapent (abfd, idx, &thesym)) - { - bfd *elt; - if (!everprinted) - { - printf (_("\nArchive index:\n")); - everprinted = true; - } - elt = bfd_get_elt_at_index (abfd, idx); - if (elt == NULL) - bfd_fatal ("bfd_get_elt_at_index"); - if (thesym->name != (char *) NULL) - { - print_symname ("%s", thesym->name, abfd); - printf (" in %s\n", bfd_get_filename (elt)); - } - } -} - -/* This function is used to get the relocs for a particular section. - It is called via bfd_map_over_sections. */ - -static void -get_relocs (abfd, sec, dataarg) - bfd *abfd; - asection *sec; - PTR dataarg; -{ - struct get_relocs_info *data = (struct get_relocs_info *) dataarg; - - *data->secs = sec; - - if ((sec->flags & SEC_RELOC) == 0) - { - *data->relocs = NULL; - *data->relcount = 0; - } - else - { - long relsize; - - relsize = bfd_get_reloc_upper_bound (abfd, sec); - if (relsize < 0) - bfd_fatal (bfd_get_filename (abfd)); - - *data->relocs = (arelent **) xmalloc (relsize); - *data->relcount = bfd_canonicalize_reloc (abfd, sec, *data->relocs, - data->syms); - if (*data->relcount < 0) - bfd_fatal (bfd_get_filename (abfd)); - } - - ++data->secs; - ++data->relocs; - ++data->relcount; -} |