OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [binutils-2.18.50/] [binutils/] [nm.c] - Diff between revs 38 and 156

Only display areas with differences | Details | Blame | View Log

Rev 38 Rev 156
/* nm.c -- Describe symbol table of a rel file.
/* nm.c -- Describe symbol table of a rel file.
   Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
   Copyright 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000,
   2001, 2002, 2003, 2004, 2005, 2007
   2001, 2002, 2003, 2004, 2005, 2007
   Free Software Foundation, Inc.
   Free Software Foundation, Inc.
 
 
   This file is part of GNU Binutils.
   This file is part of GNU Binutils.
 
 
   This program is free software; you can redistribute it and/or modify
   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
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 3 of the License, or
   the Free Software Foundation; either version 3 of the License, or
   (at your option) any later version.
   (at your option) any later version.
 
 
   This program is distributed in the hope that it will be useful,
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   GNU General Public License for more details.
 
 
   You should have received a copy of the GNU General Public License
   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   along with this program; if not, write to the Free Software
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA
   02110-1301, USA.  */
   02110-1301, USA.  */
 
 
#include "sysdep.h"
#include "sysdep.h"
#include "bfd.h"
#include "bfd.h"
#include "progress.h"
#include "progress.h"
#include "getopt.h"
#include "getopt.h"
#include "aout/stab_gnu.h"
#include "aout/stab_gnu.h"
#include "aout/ranlib.h"
#include "aout/ranlib.h"
#include "demangle.h"
#include "demangle.h"
#include "libiberty.h"
#include "libiberty.h"
#include "elf-bfd.h"
#include "elf-bfd.h"
#include "elf/common.h"
#include "elf/common.h"
#include "bucomm.h"
#include "bucomm.h"
 
 
/* When sorting by size, we use this structure to hold the size and a
/* When sorting by size, we use this structure to hold the size and a
   pointer to the minisymbol.  */
   pointer to the minisymbol.  */
 
 
struct size_sym
struct size_sym
{
{
  const void *minisym;
  const void *minisym;
  bfd_vma size;
  bfd_vma size;
};
};
 
 
/* When fetching relocs, we use this structure to pass information to
/* When fetching relocs, we use this structure to pass information to
   get_relocs.  */
   get_relocs.  */
 
 
struct get_relocs_info
struct get_relocs_info
{
{
  asection **secs;
  asection **secs;
  arelent ***relocs;
  arelent ***relocs;
  long *relcount;
  long *relcount;
  asymbol **syms;
  asymbol **syms;
};
};
 
 
struct extended_symbol_info
struct extended_symbol_info
{
{
  symbol_info *sinfo;
  symbol_info *sinfo;
  bfd_vma ssize;
  bfd_vma ssize;
  elf_symbol_type *elfinfo;
  elf_symbol_type *elfinfo;
  /* FIXME: We should add more fields for Type, Line, Section.  */
  /* FIXME: We should add more fields for Type, Line, Section.  */
};
};
#define SYM_NAME(sym)        (sym->sinfo->name)
#define SYM_NAME(sym)        (sym->sinfo->name)
#define SYM_VALUE(sym)       (sym->sinfo->value)
#define SYM_VALUE(sym)       (sym->sinfo->value)
#define SYM_TYPE(sym)        (sym->sinfo->type)
#define SYM_TYPE(sym)        (sym->sinfo->type)
#define SYM_STAB_NAME(sym)   (sym->sinfo->stab_name)
#define SYM_STAB_NAME(sym)   (sym->sinfo->stab_name)
#define SYM_STAB_DESC(sym)   (sym->sinfo->stab_desc)
#define SYM_STAB_DESC(sym)   (sym->sinfo->stab_desc)
#define SYM_STAB_OTHER(sym)  (sym->sinfo->stab_other)
#define SYM_STAB_OTHER(sym)  (sym->sinfo->stab_other)
#define SYM_SIZE(sym) \
#define SYM_SIZE(sym) \
  (sym->elfinfo ? sym->elfinfo->internal_elf_sym.st_size: sym->ssize)
  (sym->elfinfo ? sym->elfinfo->internal_elf_sym.st_size: sym->ssize)
 
 
/* The output formatting functions.  */
/* The output formatting functions.  */
static void print_object_filename_bsd (char *);
static void print_object_filename_bsd (char *);
static void print_object_filename_sysv (char *);
static void print_object_filename_sysv (char *);
static void print_object_filename_posix (char *);
static void print_object_filename_posix (char *);
static void print_archive_filename_bsd (char *);
static void print_archive_filename_bsd (char *);
static void print_archive_filename_sysv (char *);
static void print_archive_filename_sysv (char *);
static void print_archive_filename_posix (char *);
static void print_archive_filename_posix (char *);
static void print_archive_member_bsd (char *, const char *);
static void print_archive_member_bsd (char *, const char *);
static void print_archive_member_sysv (char *, const char *);
static void print_archive_member_sysv (char *, const char *);
static void print_archive_member_posix (char *, const char *);
static void print_archive_member_posix (char *, const char *);
static void print_symbol_filename_bsd (bfd *, bfd *);
static void print_symbol_filename_bsd (bfd *, bfd *);
static void print_symbol_filename_sysv (bfd *, bfd *);
static void print_symbol_filename_sysv (bfd *, bfd *);
static void print_symbol_filename_posix (bfd *, bfd *);
static void print_symbol_filename_posix (bfd *, bfd *);
static void print_value (bfd *, bfd_vma);
static void print_value (bfd *, bfd_vma);
static void print_symbol_info_bsd (struct extended_symbol_info *, bfd *);
static void print_symbol_info_bsd (struct extended_symbol_info *, bfd *);
static void print_symbol_info_sysv (struct extended_symbol_info *, bfd *);
static void print_symbol_info_sysv (struct extended_symbol_info *, bfd *);
static void print_symbol_info_posix (struct extended_symbol_info *, bfd *);
static void print_symbol_info_posix (struct extended_symbol_info *, bfd *);
 
 
/* Support for different output formats.  */
/* Support for different output formats.  */
struct output_fns
struct output_fns
  {
  {
    /* Print the name of an object file given on the command line.  */
    /* Print the name of an object file given on the command line.  */
    void (*print_object_filename) (char *);
    void (*print_object_filename) (char *);
 
 
    /* Print the name of an archive file given on the command line.  */
    /* Print the name of an archive file given on the command line.  */
    void (*print_archive_filename) (char *);
    void (*print_archive_filename) (char *);
 
 
    /* Print the name of an archive member file.  */
    /* Print the name of an archive member file.  */
    void (*print_archive_member) (char *, const char *);
    void (*print_archive_member) (char *, const char *);
 
 
    /* Print the name of the file (and archive, if there is one)
    /* Print the name of the file (and archive, if there is one)
       containing a symbol.  */
       containing a symbol.  */
    void (*print_symbol_filename) (bfd *, bfd *);
    void (*print_symbol_filename) (bfd *, bfd *);
 
 
    /* Print a line of information about a symbol.  */
    /* Print a line of information about a symbol.  */
    void (*print_symbol_info) (struct extended_symbol_info *, bfd *);
    void (*print_symbol_info) (struct extended_symbol_info *, bfd *);
  };
  };
 
 
static struct output_fns formats[] =
static struct output_fns formats[] =
{
{
  {print_object_filename_bsd,
  {print_object_filename_bsd,
   print_archive_filename_bsd,
   print_archive_filename_bsd,
   print_archive_member_bsd,
   print_archive_member_bsd,
   print_symbol_filename_bsd,
   print_symbol_filename_bsd,
   print_symbol_info_bsd},
   print_symbol_info_bsd},
  {print_object_filename_sysv,
  {print_object_filename_sysv,
   print_archive_filename_sysv,
   print_archive_filename_sysv,
   print_archive_member_sysv,
   print_archive_member_sysv,
   print_symbol_filename_sysv,
   print_symbol_filename_sysv,
   print_symbol_info_sysv},
   print_symbol_info_sysv},
  {print_object_filename_posix,
  {print_object_filename_posix,
   print_archive_filename_posix,
   print_archive_filename_posix,
   print_archive_member_posix,
   print_archive_member_posix,
   print_symbol_filename_posix,
   print_symbol_filename_posix,
   print_symbol_info_posix}
   print_symbol_info_posix}
};
};
 
 
/* Indices in `formats'.  */
/* Indices in `formats'.  */
#define FORMAT_BSD 0
#define FORMAT_BSD 0
#define FORMAT_SYSV 1
#define FORMAT_SYSV 1
#define FORMAT_POSIX 2
#define FORMAT_POSIX 2
#define FORMAT_DEFAULT FORMAT_BSD
#define FORMAT_DEFAULT FORMAT_BSD
 
 
/* The output format to use.  */
/* The output format to use.  */
static struct output_fns *format = &formats[FORMAT_DEFAULT];
static struct output_fns *format = &formats[FORMAT_DEFAULT];
 
 
/* Command options.  */
/* Command options.  */
 
 
static int do_demangle = 0;      /* Pretty print C++ symbol names.  */
static int do_demangle = 0;      /* Pretty print C++ symbol names.  */
static int external_only = 0;    /* Print external symbols only.  */
static int external_only = 0;    /* Print external symbols only.  */
static int defined_only = 0;     /* Print defined 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 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_debug_syms = 0;/* Print debugger-only symbols too.  */
static int print_armap = 0;      /* Describe __.SYMDEF data in archive files.  */
static int print_armap = 0;      /* Describe __.SYMDEF data in archive files.  */
static int print_size = 0;       /* Print size of defined symbols.  */
static int print_size = 0;       /* Print size of defined symbols.  */
static int reverse_sort = 0;     /* Sort in downward(alpha or numeric) order.  */
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_numerically = 0;/* Sort in numeric rather than alpha order.  */
static int sort_by_size = 0;     /* Sort by size of symbol.  */
static int sort_by_size = 0;     /* Sort by size of symbol.  */
static int undefined_only = 0;   /* Print undefined symbols only.  */
static int undefined_only = 0;   /* Print undefined symbols only.  */
static int dynamic = 0;          /* Print dynamic symbols.  */
static int dynamic = 0;          /* Print dynamic symbols.  */
static int show_version = 0;     /* Show the version number.  */
static int show_version = 0;     /* Show the version number.  */
static int show_stats = 0;       /* Show statistics.  */
static int show_stats = 0;       /* Show statistics.  */
static int show_synthetic = 0;   /* Display synthesized symbols too.  */
static int show_synthetic = 0;   /* Display synthesized symbols too.  */
static int line_numbers = 0;     /* Print line numbers for symbols.  */
static int line_numbers = 0;     /* Print line numbers for symbols.  */
static int allow_special_symbols = 0;  /* Allow special symbols.  */
static int allow_special_symbols = 0;  /* Allow special symbols.  */
 
 
/* When to print the names of files.  Not mutually exclusive in SYSV format.  */
/* 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_file = 0;        /* Once per file, on its own line.  */
static int filename_per_symbol = 0;      /* Once per symbol, at start of line.  */
static int filename_per_symbol = 0;      /* Once per symbol, at start of line.  */
 
 
/* Print formats for printing a symbol value.  */
/* Print formats for printing a symbol value.  */
static char value_format_32bit[] = "%08lx";
static char value_format_32bit[] = "%08lx";
#if BFD_HOST_64BIT_LONG
#if BFD_HOST_64BIT_LONG
static char value_format_64bit[] = "%016lx";
static char value_format_64bit[] = "%016lx";
#elif BFD_HOST_64BIT_LONG_LONG
#elif BFD_HOST_64BIT_LONG_LONG
static char value_format_64bit[] = "%016llx";
static char value_format_64bit[] = "%016llx";
#endif
#endif
static int print_width = 0;
static int print_width = 0;
static int print_radix = 16;
static int print_radix = 16;
/* Print formats for printing stab info.  */
/* Print formats for printing stab info.  */
static char other_format[] = "%02x";
static char other_format[] = "%02x";
static char desc_format[] = "%04x";
static char desc_format[] = "%04x";
 
 
static char *target = NULL;
static char *target = NULL;
 
 
/* Used to cache the line numbers for a BFD.  */
/* Used to cache the line numbers for a BFD.  */
static bfd *lineno_cache_bfd;
static bfd *lineno_cache_bfd;
static bfd *lineno_cache_rel_bfd;
static bfd *lineno_cache_rel_bfd;
 
 
#define OPTION_TARGET 200
#define OPTION_TARGET 200
 
 
static struct option long_options[] =
static struct option long_options[] =
{
{
  {"debug-syms", no_argument, &print_debug_syms, 1},
  {"debug-syms", no_argument, &print_debug_syms, 1},
  {"demangle", optional_argument, 0, 'C'},
  {"demangle", optional_argument, 0, 'C'},
  {"dynamic", no_argument, &dynamic, 1},
  {"dynamic", no_argument, &dynamic, 1},
  {"extern-only", no_argument, &external_only, 1},
  {"extern-only", no_argument, &external_only, 1},
  {"format", required_argument, 0, 'f'},
  {"format", required_argument, 0, 'f'},
  {"help", no_argument, 0, 'h'},
  {"help", no_argument, 0, 'h'},
  {"line-numbers", no_argument, 0, 'l'},
  {"line-numbers", no_argument, 0, 'l'},
  {"no-cplus", no_argument, &do_demangle, 0},  /* Linux compatibility.  */
  {"no-cplus", no_argument, &do_demangle, 0},  /* Linux compatibility.  */
  {"no-demangle", no_argument, &do_demangle, 0},
  {"no-demangle", no_argument, &do_demangle, 0},
  {"no-sort", no_argument, &no_sort, 1},
  {"no-sort", no_argument, &no_sort, 1},
  {"numeric-sort", no_argument, &sort_numerically, 1},
  {"numeric-sort", no_argument, &sort_numerically, 1},
  {"portability", no_argument, 0, 'P'},
  {"portability", no_argument, 0, 'P'},
  {"print-armap", no_argument, &print_armap, 1},
  {"print-armap", no_argument, &print_armap, 1},
  {"print-file-name", no_argument, 0, 'o'},
  {"print-file-name", no_argument, 0, 'o'},
  {"print-size", no_argument, 0, 'S'},
  {"print-size", no_argument, 0, 'S'},
  {"radix", required_argument, 0, 't'},
  {"radix", required_argument, 0, 't'},
  {"reverse-sort", no_argument, &reverse_sort, 1},
  {"reverse-sort", no_argument, &reverse_sort, 1},
  {"size-sort", no_argument, &sort_by_size, 1},
  {"size-sort", no_argument, &sort_by_size, 1},
  {"special-syms", no_argument, &allow_special_symbols, 1},
  {"special-syms", no_argument, &allow_special_symbols, 1},
  {"stats", no_argument, &show_stats, 1},
  {"stats", no_argument, &show_stats, 1},
  {"synthetic", no_argument, &show_synthetic, 1},
  {"synthetic", no_argument, &show_synthetic, 1},
  {"target", required_argument, 0, OPTION_TARGET},
  {"target", required_argument, 0, OPTION_TARGET},
  {"defined-only", no_argument, &defined_only, 1},
  {"defined-only", no_argument, &defined_only, 1},
  {"undefined-only", no_argument, &undefined_only, 1},
  {"undefined-only", no_argument, &undefined_only, 1},
  {"version", no_argument, &show_version, 1},
  {"version", no_argument, &show_version, 1},
  {0, no_argument, 0, 0}
  {0, no_argument, 0, 0}
};
};


/* Some error-reporting functions.  */
/* Some error-reporting functions.  */
 
 
static void
static void
usage (FILE *stream, int status)
usage (FILE *stream, int status)
{
{
  fprintf (stream, _("Usage: %s [option(s)] [file(s)]\n"), program_name);
  fprintf (stream, _("Usage: %s [option(s)] [file(s)]\n"), program_name);
  fprintf (stream, _(" List symbols in [file(s)] (a.out by default).\n"));
  fprintf (stream, _(" List symbols in [file(s)] (a.out by default).\n"));
  fprintf (stream, _(" The options are:\n\
  fprintf (stream, _(" The options are:\n\
  -a, --debug-syms       Display debugger-only symbols\n\
  -a, --debug-syms       Display debugger-only symbols\n\
  -A, --print-file-name  Print name of the input file before every symbol\n\
  -A, --print-file-name  Print name of the input file before every symbol\n\
  -B                     Same as --format=bsd\n\
  -B                     Same as --format=bsd\n\
  -C, --demangle[=STYLE] Decode low-level symbol names into user-level names\n\
  -C, --demangle[=STYLE] Decode low-level symbol names into user-level names\n\
                          The STYLE, if specified, can be `auto' (the default),\n\
                          The STYLE, if specified, can be `auto' (the default),\n\
                          `gnu', `lucid', `arm', `hp', `edg', `gnu-v3', `java'\n\
                          `gnu', `lucid', `arm', `hp', `edg', `gnu-v3', `java'\n\
                          or `gnat'\n\
                          or `gnat'\n\
      --no-demangle      Do not demangle low-level symbol names\n\
      --no-demangle      Do not demangle low-level symbol names\n\
  -D, --dynamic          Display dynamic symbols instead of normal symbols\n\
  -D, --dynamic          Display dynamic symbols instead of normal symbols\n\
      --defined-only     Display only defined symbols\n\
      --defined-only     Display only defined symbols\n\
  -e                     (ignored)\n\
  -e                     (ignored)\n\
  -f, --format=FORMAT    Use the output format FORMAT.  FORMAT can be `bsd',\n\
  -f, --format=FORMAT    Use the output format FORMAT.  FORMAT can be `bsd',\n\
                           `sysv' or `posix'.  The default is `bsd'\n\
                           `sysv' or `posix'.  The default is `bsd'\n\
  -g, --extern-only      Display only external symbols\n\
  -g, --extern-only      Display only external symbols\n\
  -l, --line-numbers     Use debugging information to find a filename and\n\
  -l, --line-numbers     Use debugging information to find a filename and\n\
                           line number for each symbol\n\
                           line number for each symbol\n\
  -n, --numeric-sort     Sort symbols numerically by address\n\
  -n, --numeric-sort     Sort symbols numerically by address\n\
  -o                     Same as -A\n\
  -o                     Same as -A\n\
  -p, --no-sort          Do not sort the symbols\n\
  -p, --no-sort          Do not sort the symbols\n\
  -P, --portability      Same as --format=posix\n\
  -P, --portability      Same as --format=posix\n\
  -r, --reverse-sort     Reverse the sense of the sort\n\
  -r, --reverse-sort     Reverse the sense of the sort\n\
  -S, --print-size       Print size of defined symbols\n\
  -S, --print-size       Print size of defined symbols\n\
  -s, --print-armap      Include index for symbols from archive members\n\
  -s, --print-armap      Include index for symbols from archive members\n\
      --size-sort        Sort symbols by size\n\
      --size-sort        Sort symbols by size\n\
      --special-syms     Include special symbols in the output\n\
      --special-syms     Include special symbols in the output\n\
      --synthetic        Display synthetic symbols as well\n\
      --synthetic        Display synthetic symbols as well\n\
  -t, --radix=RADIX      Use RADIX for printing symbol values\n\
  -t, --radix=RADIX      Use RADIX for printing symbol values\n\
      --target=BFDNAME   Specify the target object format as BFDNAME\n\
      --target=BFDNAME   Specify the target object format as BFDNAME\n\
  -u, --undefined-only   Display only undefined symbols\n\
  -u, --undefined-only   Display only undefined symbols\n\
  -X 32_64               (ignored)\n\
  -X 32_64               (ignored)\n\
  @FILE                  Read options from FILE\n\
  @FILE                  Read options from FILE\n\
  -h, --help             Display this information\n\
  -h, --help             Display this information\n\
  -V, --version          Display this program's version number\n\
  -V, --version          Display this program's version number\n\
\n"));
\n"));
  list_supported_targets (program_name, stream);
  list_supported_targets (program_name, stream);
  if (REPORT_BUGS_TO[0] && status == 0)
  if (REPORT_BUGS_TO[0] && status == 0)
    fprintf (stream, _("Report bugs to %s.\n"), REPORT_BUGS_TO);
    fprintf (stream, _("Report bugs to %s.\n"), REPORT_BUGS_TO);
  exit (status);
  exit (status);
}
}
 
 
/* Set the radix for the symbol value and size according to RADIX.  */
/* Set the radix for the symbol value and size according to RADIX.  */
 
 
static void
static void
set_print_radix (char *radix)
set_print_radix (char *radix)
{
{
  switch (*radix)
  switch (*radix)
    {
    {
    case 'x':
    case 'x':
      break;
      break;
    case 'd':
    case 'd':
    case 'o':
    case 'o':
      if (*radix == 'd')
      if (*radix == 'd')
        print_radix = 10;
        print_radix = 10;
      else
      else
        print_radix = 8;
        print_radix = 8;
      value_format_32bit[4] = *radix;
      value_format_32bit[4] = *radix;
#if BFD_HOST_64BIT_LONG
#if BFD_HOST_64BIT_LONG
      value_format_64bit[5] = *radix;
      value_format_64bit[5] = *radix;
#elif BFD_HOST_64BIT_LONG_LONG
#elif BFD_HOST_64BIT_LONG_LONG
      value_format_64bit[6] = *radix;
      value_format_64bit[6] = *radix;
#endif
#endif
      other_format[3] = desc_format[3] = *radix;
      other_format[3] = desc_format[3] = *radix;
      break;
      break;
    default:
    default:
      fatal (_("%s: invalid radix"), radix);
      fatal (_("%s: invalid radix"), radix);
    }
    }
}
}
 
 
static void
static void
set_output_format (char *f)
set_output_format (char *f)
{
{
  int i;
  int i;
 
 
  switch (*f)
  switch (*f)
    {
    {
    case 'b':
    case 'b':
    case 'B':
    case 'B':
      i = FORMAT_BSD;
      i = FORMAT_BSD;
      break;
      break;
    case 'p':
    case 'p':
    case 'P':
    case 'P':
      i = FORMAT_POSIX;
      i = FORMAT_POSIX;
      break;
      break;
    case 's':
    case 's':
    case 'S':
    case 'S':
      i = FORMAT_SYSV;
      i = FORMAT_SYSV;
      break;
      break;
    default:
    default:
      fatal (_("%s: invalid output format"), f);
      fatal (_("%s: invalid output format"), f);
    }
    }
  format = &formats[i];
  format = &formats[i];
}
}


static const char *
static const char *
get_symbol_type (unsigned int type)
get_symbol_type (unsigned int type)
{
{
  static char buff [32];
  static char buff [32];
 
 
  switch (type)
  switch (type)
    {
    {
    case STT_NOTYPE:   return "NOTYPE";
    case STT_NOTYPE:   return "NOTYPE";
    case STT_OBJECT:   return "OBJECT";
    case STT_OBJECT:   return "OBJECT";
    case STT_FUNC:     return "FUNC";
    case STT_FUNC:     return "FUNC";
    case STT_SECTION:  return "SECTION";
    case STT_SECTION:  return "SECTION";
    case STT_FILE:     return "FILE";
    case STT_FILE:     return "FILE";
    case STT_COMMON:   return "COMMON";
    case STT_COMMON:   return "COMMON";
    case STT_TLS:      return "TLS";
    case STT_TLS:      return "TLS";
    default:
    default:
      if (type >= STT_LOPROC && type <= STT_HIPROC)
      if (type >= STT_LOPROC && type <= STT_HIPROC)
        sprintf (buff, _("<processor specific>: %d"), type);
        sprintf (buff, _("<processor specific>: %d"), type);
      else if (type >= STT_LOOS && type <= STT_HIOS)
      else if (type >= STT_LOOS && type <= STT_HIOS)
        sprintf (buff, _("<OS specific>: %d"), type);
        sprintf (buff, _("<OS specific>: %d"), type);
      else
      else
        sprintf (buff, _("<unknown>: %d"), type);
        sprintf (buff, _("<unknown>: %d"), type);
      return buff;
      return buff;
    }
    }
}
}


/* Print symbol name NAME, read from ABFD, with printf format FORMAT,
/* Print symbol name NAME, read from ABFD, with printf format FORMAT,
   demangling it if requested.  */
   demangling it if requested.  */
 
 
static void
static void
print_symname (const char *format, const char *name, bfd *abfd)
print_symname (const char *format, const char *name, bfd *abfd)
{
{
  if (do_demangle && *name)
  if (do_demangle && *name)
    {
    {
      char *res = bfd_demangle (abfd, name, DMGL_ANSI | DMGL_PARAMS);
      char *res = bfd_demangle (abfd, name, DMGL_ANSI | DMGL_PARAMS);
 
 
      if (res != NULL)
      if (res != NULL)
        {
        {
          printf (format, res);
          printf (format, res);
          free (res);
          free (res);
          return;
          return;
        }
        }
    }
    }
 
 
  printf (format, name);
  printf (format, name);
}
}
 
 
static void
static void
print_symdef_entry (bfd *abfd)
print_symdef_entry (bfd *abfd)
{
{
  symindex idx = BFD_NO_MORE_SYMBOLS;
  symindex idx = BFD_NO_MORE_SYMBOLS;
  carsym *thesym;
  carsym *thesym;
  bfd_boolean everprinted = FALSE;
  bfd_boolean everprinted = FALSE;
 
 
  for (idx = bfd_get_next_mapent (abfd, idx, &thesym);
  for (idx = bfd_get_next_mapent (abfd, idx, &thesym);
       idx != BFD_NO_MORE_SYMBOLS;
       idx != BFD_NO_MORE_SYMBOLS;
       idx = bfd_get_next_mapent (abfd, idx, &thesym))
       idx = bfd_get_next_mapent (abfd, idx, &thesym))
    {
    {
      bfd *elt;
      bfd *elt;
      if (!everprinted)
      if (!everprinted)
        {
        {
          printf (_("\nArchive index:\n"));
          printf (_("\nArchive index:\n"));
          everprinted = TRUE;
          everprinted = TRUE;
        }
        }
      elt = bfd_get_elt_at_index (abfd, idx);
      elt = bfd_get_elt_at_index (abfd, idx);
      if (elt == NULL)
      if (elt == NULL)
        bfd_fatal ("bfd_get_elt_at_index");
        bfd_fatal ("bfd_get_elt_at_index");
      if (thesym->name != (char *) NULL)
      if (thesym->name != (char *) NULL)
        {
        {
          print_symname ("%s", thesym->name, abfd);
          print_symname ("%s", thesym->name, abfd);
          printf (" in %s\n", bfd_get_filename (elt));
          printf (" in %s\n", bfd_get_filename (elt));
        }
        }
    }
    }
}
}


/* Choose which symbol entries to print;
/* Choose which symbol entries to print;
   compact them downward to get rid of the rest.
   compact them downward to get rid of the rest.
   Return the number of symbols to be printed.  */
   Return the number of symbols to be printed.  */
 
 
static long
static long
filter_symbols (bfd *abfd, bfd_boolean dynamic, void *minisyms,
filter_symbols (bfd *abfd, bfd_boolean dynamic, void *minisyms,
                long symcount, unsigned int size)
                long symcount, unsigned int size)
{
{
  bfd_byte *from, *fromend, *to;
  bfd_byte *from, *fromend, *to;
  asymbol *store;
  asymbol *store;
 
 
  store = bfd_make_empty_symbol (abfd);
  store = bfd_make_empty_symbol (abfd);
  if (store == NULL)
  if (store == NULL)
    bfd_fatal (bfd_get_filename (abfd));
    bfd_fatal (bfd_get_filename (abfd));
 
 
  from = (bfd_byte *) minisyms;
  from = (bfd_byte *) minisyms;
  fromend = from + symcount * size;
  fromend = from + symcount * size;
  to = (bfd_byte *) minisyms;
  to = (bfd_byte *) minisyms;
 
 
  for (; from < fromend; from += size)
  for (; from < fromend; from += size)
    {
    {
      int keep = 0;
      int keep = 0;
      asymbol *sym;
      asymbol *sym;
 
 
      PROGRESS (1);
      PROGRESS (1);
 
 
      sym = bfd_minisymbol_to_symbol (abfd, dynamic, (const void *) from, store);
      sym = bfd_minisymbol_to_symbol (abfd, dynamic, (const void *) from, store);
      if (sym == NULL)
      if (sym == NULL)
        bfd_fatal (bfd_get_filename (abfd));
        bfd_fatal (bfd_get_filename (abfd));
 
 
      if (undefined_only)
      if (undefined_only)
        keep = bfd_is_und_section (sym->section);
        keep = bfd_is_und_section (sym->section);
      else if (external_only)
      else if (external_only)
        keep = ((sym->flags & BSF_GLOBAL) != 0
        keep = ((sym->flags & BSF_GLOBAL) != 0
                || (sym->flags & BSF_WEAK) != 0
                || (sym->flags & BSF_WEAK) != 0
                || bfd_is_und_section (sym->section)
                || bfd_is_und_section (sym->section)
                || bfd_is_com_section (sym->section));
                || bfd_is_com_section (sym->section));
      else
      else
        keep = 1;
        keep = 1;
 
 
      if (keep
      if (keep
          && ! print_debug_syms
          && ! print_debug_syms
          && (sym->flags & BSF_DEBUGGING) != 0)
          && (sym->flags & BSF_DEBUGGING) != 0)
        keep = 0;
        keep = 0;
 
 
      if (keep
      if (keep
          && sort_by_size
          && sort_by_size
          && (bfd_is_abs_section (sym->section)
          && (bfd_is_abs_section (sym->section)
              || bfd_is_und_section (sym->section)))
              || bfd_is_und_section (sym->section)))
        keep = 0;
        keep = 0;
 
 
      if (keep
      if (keep
          && defined_only)
          && defined_only)
        {
        {
          if (bfd_is_und_section (sym->section))
          if (bfd_is_und_section (sym->section))
            keep = 0;
            keep = 0;
        }
        }
 
 
      if (keep
      if (keep
          && bfd_is_target_special_symbol (abfd, sym)
          && bfd_is_target_special_symbol (abfd, sym)
          && ! allow_special_symbols)
          && ! allow_special_symbols)
        keep = 0;
        keep = 0;
 
 
      if (keep)
      if (keep)
        {
        {
          memcpy (to, from, size);
          memcpy (to, from, size);
          to += size;
          to += size;
        }
        }
    }
    }
 
 
  return (to - (bfd_byte *) minisyms) / size;
  return (to - (bfd_byte *) minisyms) / size;
}
}


/* These globals are used to pass information into the sorting
/* These globals are used to pass information into the sorting
   routines.  */
   routines.  */
static bfd *sort_bfd;
static bfd *sort_bfd;
static bfd_boolean sort_dynamic;
static bfd_boolean sort_dynamic;
static asymbol *sort_x;
static asymbol *sort_x;
static asymbol *sort_y;
static asymbol *sort_y;
 
 
/* Symbol-sorting predicates */
/* Symbol-sorting predicates */
#define valueof(x) ((x)->section->vma + (x)->value)
#define valueof(x) ((x)->section->vma + (x)->value)
 
 
/* Numeric sorts.  Undefined symbols are always considered "less than"
/* Numeric sorts.  Undefined symbols are always considered "less than"
   defined symbols with zero values.  Common symbols are not treated
   defined symbols with zero values.  Common symbols are not treated
   specially -- i.e., their sizes are used as their "values".  */
   specially -- i.e., their sizes are used as their "values".  */
 
 
static int
static int
non_numeric_forward (const void *P_x, const void *P_y)
non_numeric_forward (const void *P_x, const void *P_y)
{
{
  asymbol *x, *y;
  asymbol *x, *y;
  const char *xn, *yn;
  const char *xn, *yn;
 
 
  x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x);
  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);
  y = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y);
  if (x == NULL || y == NULL)
  if (x == NULL || y == NULL)
    bfd_fatal (bfd_get_filename (sort_bfd));
    bfd_fatal (bfd_get_filename (sort_bfd));
 
 
  xn = bfd_asymbol_name (x);
  xn = bfd_asymbol_name (x);
  yn = bfd_asymbol_name (y);
  yn = bfd_asymbol_name (y);
 
 
  if (yn == NULL)
  if (yn == NULL)
    return xn != NULL;
    return xn != NULL;
  if (xn == NULL)
  if (xn == NULL)
    return -1;
    return -1;
 
 
#ifdef HAVE_STRCOLL
#ifdef HAVE_STRCOLL
  /* Solaris 2.5 has a bug in strcoll.
  /* Solaris 2.5 has a bug in strcoll.
     strcoll returns invalid values when confronted with empty strings.  */
     strcoll returns invalid values when confronted with empty strings.  */
  if (*yn == '\0')
  if (*yn == '\0')
    return *xn != '\0';
    return *xn != '\0';
  if (*xn == '\0')
  if (*xn == '\0')
    return -1;
    return -1;
 
 
  return strcoll (xn, yn);
  return strcoll (xn, yn);
#else
#else
  return strcmp (xn, yn);
  return strcmp (xn, yn);
#endif
#endif
}
}
 
 
static int
static int
non_numeric_reverse (const void *x, const void *y)
non_numeric_reverse (const void *x, const void *y)
{
{
  return - non_numeric_forward (x, y);
  return - non_numeric_forward (x, y);
}
}
 
 
static int
static int
numeric_forward (const void *P_x, const void *P_y)
numeric_forward (const void *P_x, const void *P_y)
{
{
  asymbol *x, *y;
  asymbol *x, *y;
  asection *xs, *ys;
  asection *xs, *ys;
 
 
  x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x);
  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);
  y =  bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y);
  if (x == NULL || y == NULL)
  if (x == NULL || y == NULL)
    bfd_fatal (bfd_get_filename (sort_bfd));
    bfd_fatal (bfd_get_filename (sort_bfd));
 
 
  xs = bfd_get_section (x);
  xs = bfd_get_section (x);
  ys = bfd_get_section (y);
  ys = bfd_get_section (y);
 
 
  if (bfd_is_und_section (xs))
  if (bfd_is_und_section (xs))
    {
    {
      if (! bfd_is_und_section (ys))
      if (! bfd_is_und_section (ys))
        return -1;
        return -1;
    }
    }
  else if (bfd_is_und_section (ys))
  else if (bfd_is_und_section (ys))
    return 1;
    return 1;
  else if (valueof (x) != valueof (y))
  else if (valueof (x) != valueof (y))
    return valueof (x) < valueof (y) ? -1 : 1;
    return valueof (x) < valueof (y) ? -1 : 1;
 
 
  return non_numeric_forward (P_x, P_y);
  return non_numeric_forward (P_x, P_y);
}
}
 
 
static int
static int
numeric_reverse (const void *x, const void *y)
numeric_reverse (const void *x, const void *y)
{
{
  return - numeric_forward (x, y);
  return - numeric_forward (x, y);
}
}
 
 
static int (*(sorters[2][2])) (const void *, const void *) =
static int (*(sorters[2][2])) (const void *, const void *) =
{
{
  { non_numeric_forward, non_numeric_reverse },
  { non_numeric_forward, non_numeric_reverse },
  { numeric_forward, numeric_reverse }
  { numeric_forward, numeric_reverse }
};
};
 
 
/* This sort routine is used by sort_symbols_by_size.  It is similar
/* 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
   to numeric_forward, but when symbols have the same value it sorts
   by section VMA.  This simplifies the sort_symbols_by_size code
   by section VMA.  This simplifies the sort_symbols_by_size code
   which handles symbols at the end of sections.  Also, this routine
   which handles symbols at the end of sections.  Also, this routine
   tries to sort file names before other symbols with the same value.
   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
   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
   sort_symbols_by_size choose the non file name symbol, leading to
   more meaningful output.  For similar reasons, this code sorts
   more meaningful output.  For similar reasons, this code sorts
   gnu_compiled_* and gcc2_compiled before other symbols with the same
   gnu_compiled_* and gcc2_compiled before other symbols with the same
   value.  */
   value.  */
 
 
static int
static int
size_forward1 (const void *P_x, const void *P_y)
size_forward1 (const void *P_x, const void *P_y)
{
{
  asymbol *x, *y;
  asymbol *x, *y;
  asection *xs, *ys;
  asection *xs, *ys;
  const char *xn, *yn;
  const char *xn, *yn;
  size_t xnl, ynl;
  size_t xnl, ynl;
  int xf, yf;
  int xf, yf;
 
 
  x = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_x, sort_x);
  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);
  y = bfd_minisymbol_to_symbol (sort_bfd, sort_dynamic, P_y, sort_y);
  if (x == NULL || y == NULL)
  if (x == NULL || y == NULL)
    bfd_fatal (bfd_get_filename (sort_bfd));
    bfd_fatal (bfd_get_filename (sort_bfd));
 
 
  xs = bfd_get_section (x);
  xs = bfd_get_section (x);
  ys = bfd_get_section (y);
  ys = bfd_get_section (y);
 
 
  if (bfd_is_und_section (xs))
  if (bfd_is_und_section (xs))
    abort ();
    abort ();
  if (bfd_is_und_section (ys))
  if (bfd_is_und_section (ys))
    abort ();
    abort ();
 
 
  if (valueof (x) != valueof (y))
  if (valueof (x) != valueof (y))
    return valueof (x) < valueof (y) ? -1 : 1;
    return valueof (x) < valueof (y) ? -1 : 1;
 
 
  if (xs->vma != ys->vma)
  if (xs->vma != ys->vma)
    return xs->vma < ys->vma ? -1 : 1;
    return xs->vma < ys->vma ? -1 : 1;
 
 
  xn = bfd_asymbol_name (x);
  xn = bfd_asymbol_name (x);
  yn = bfd_asymbol_name (y);
  yn = bfd_asymbol_name (y);
  xnl = strlen (xn);
  xnl = strlen (xn);
  ynl = strlen (yn);
  ynl = strlen (yn);
 
 
  /* The symbols gnu_compiled and gcc2_compiled convey even less
  /* The symbols gnu_compiled and gcc2_compiled convey even less
     information than the file name, so sort them out first.  */
     information than the file name, so sort them out first.  */
 
 
  xf = (strstr (xn, "gnu_compiled") != NULL
  xf = (strstr (xn, "gnu_compiled") != NULL
        || strstr (xn, "gcc2_compiled") != NULL);
        || strstr (xn, "gcc2_compiled") != NULL);
  yf = (strstr (yn, "gnu_compiled") != NULL
  yf = (strstr (yn, "gnu_compiled") != NULL
        || strstr (yn, "gcc2_compiled") != NULL);
        || strstr (yn, "gcc2_compiled") != NULL);
 
 
  if (xf && ! yf)
  if (xf && ! yf)
    return -1;
    return -1;
  if (! xf && yf)
  if (! xf && yf)
    return 1;
    return 1;
 
 
  /* We use a heuristic for the file name.  It may not work on non
  /* 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
     Unix systems, but it doesn't really matter; the only difference
     is precisely which symbol names get printed.  */
     is precisely which symbol names get printed.  */
 
 
#define file_symbol(s, sn, snl)                 \
#define file_symbol(s, sn, snl)                 \
  (((s)->flags & BSF_FILE) != 0                  \
  (((s)->flags & BSF_FILE) != 0                  \
   || ((sn)[(snl) - 2] == '.'                   \
   || ((sn)[(snl) - 2] == '.'                   \
       && ((sn)[(snl) - 1] == 'o'               \
       && ((sn)[(snl) - 1] == 'o'               \
           || (sn)[(snl) - 1] == 'a')))
           || (sn)[(snl) - 1] == 'a')))
 
 
  xf = file_symbol (x, xn, xnl);
  xf = file_symbol (x, xn, xnl);
  yf = file_symbol (y, yn, ynl);
  yf = file_symbol (y, yn, ynl);
 
 
  if (xf && ! yf)
  if (xf && ! yf)
    return -1;
    return -1;
  if (! xf && yf)
  if (! xf && yf)
    return 1;
    return 1;
 
 
  return non_numeric_forward (P_x, P_y);
  return non_numeric_forward (P_x, P_y);
}
}
 
 
/* This sort routine is used by sort_symbols_by_size.  It is sorting
/* This sort routine is used by sort_symbols_by_size.  It is sorting
   an array of size_sym structures into size order.  */
   an array of size_sym structures into size order.  */
 
 
static int
static int
size_forward2 (const void *P_x, const void *P_y)
size_forward2 (const void *P_x, const void *P_y)
{
{
  const struct size_sym *x = (const struct size_sym *) P_x;
  const struct size_sym *x = (const struct size_sym *) P_x;
  const struct size_sym *y = (const struct size_sym *) P_y;
  const struct size_sym *y = (const struct size_sym *) P_y;
 
 
  if (x->size < y->size)
  if (x->size < y->size)
    return reverse_sort ? 1 : -1;
    return reverse_sort ? 1 : -1;
  else if (x->size > y->size)
  else if (x->size > y->size)
    return reverse_sort ? -1 : 1;
    return reverse_sort ? -1 : 1;
  else
  else
    return sorters[0][reverse_sort] (x->minisym, y->minisym);
    return sorters[0][reverse_sort] (x->minisym, y->minisym);
}
}
 
 
/* Sort the symbols by size.  ELF provides a size but for other formats
/* Sort the symbols by size.  ELF provides a size but for other formats
   we have to make a guess by assuming that the difference between the
   we have to make a guess by assuming that the difference between the
   address of a symbol and the address of the next higher symbol is the
   address of a symbol and the address of the next higher symbol is the
   size.  */
   size.  */
 
 
static long
static long
sort_symbols_by_size (bfd *abfd, bfd_boolean dynamic, void *minisyms,
sort_symbols_by_size (bfd *abfd, bfd_boolean dynamic, void *minisyms,
                      long symcount, unsigned int size,
                      long symcount, unsigned int size,
                      struct size_sym **symsizesp)
                      struct size_sym **symsizesp)
{
{
  struct size_sym *symsizes;
  struct size_sym *symsizes;
  bfd_byte *from, *fromend;
  bfd_byte *from, *fromend;
  asymbol *sym = NULL;
  asymbol *sym = NULL;
  asymbol *store_sym, *store_next;
  asymbol *store_sym, *store_next;
 
 
  qsort (minisyms, symcount, size, size_forward1);
  qsort (minisyms, symcount, size, size_forward1);
 
 
  /* We are going to return a special set of symbols and sizes to
  /* We are going to return a special set of symbols and sizes to
     print.  */
     print.  */
  symsizes = xmalloc (symcount * sizeof (struct size_sym));
  symsizes = xmalloc (symcount * sizeof (struct size_sym));
  *symsizesp = symsizes;
  *symsizesp = symsizes;
 
 
  /* Note that filter_symbols has already removed all absolute and
  /* Note that filter_symbols has already removed all absolute and
     undefined symbols.  Here we remove all symbols whose size winds
     undefined symbols.  Here we remove all symbols whose size winds
     up as zero.  */
     up as zero.  */
  from = (bfd_byte *) minisyms;
  from = (bfd_byte *) minisyms;
  fromend = from + symcount * size;
  fromend = from + symcount * size;
 
 
  store_sym = sort_x;
  store_sym = sort_x;
  store_next = sort_y;
  store_next = sort_y;
 
 
  if (from < fromend)
  if (from < fromend)
    {
    {
      sym = bfd_minisymbol_to_symbol (abfd, dynamic, (const void *) from,
      sym = bfd_minisymbol_to_symbol (abfd, dynamic, (const void *) from,
                                      store_sym);
                                      store_sym);
      if (sym == NULL)
      if (sym == NULL)
        bfd_fatal (bfd_get_filename (abfd));
        bfd_fatal (bfd_get_filename (abfd));
    }
    }
 
 
  for (; from < fromend; from += size)
  for (; from < fromend; from += size)
    {
    {
      asymbol *next;
      asymbol *next;
      asection *sec;
      asection *sec;
      bfd_vma sz;
      bfd_vma sz;
      asymbol *temp;
      asymbol *temp;
 
 
      if (from + size < fromend)
      if (from + size < fromend)
        {
        {
          next = bfd_minisymbol_to_symbol (abfd,
          next = bfd_minisymbol_to_symbol (abfd,
                                           dynamic,
                                           dynamic,
                                           (const void *) (from + size),
                                           (const void *) (from + size),
                                           store_next);
                                           store_next);
          if (next == NULL)
          if (next == NULL)
            bfd_fatal (bfd_get_filename (abfd));
            bfd_fatal (bfd_get_filename (abfd));
        }
        }
      else
      else
        next = NULL;
        next = NULL;
 
 
      sec = bfd_get_section (sym);
      sec = bfd_get_section (sym);
 
 
      if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
      if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
        sz = ((elf_symbol_type *) sym)->internal_elf_sym.st_size;
        sz = ((elf_symbol_type *) sym)->internal_elf_sym.st_size;
      else if (bfd_is_com_section (sec))
      else if (bfd_is_com_section (sec))
        sz = sym->value;
        sz = sym->value;
      else
      else
        {
        {
          if (from + size < fromend
          if (from + size < fromend
              && sec == bfd_get_section (next))
              && sec == bfd_get_section (next))
            sz = valueof (next) - valueof (sym);
            sz = valueof (next) - valueof (sym);
          else
          else
            sz = (bfd_get_section_vma (abfd, sec)
            sz = (bfd_get_section_vma (abfd, sec)
                  + bfd_section_size (abfd, sec)
                  + bfd_section_size (abfd, sec)
                  - valueof (sym));
                  - valueof (sym));
        }
        }
 
 
      if (sz != 0)
      if (sz != 0)
        {
        {
          symsizes->minisym = (const void *) from;
          symsizes->minisym = (const void *) from;
          symsizes->size = sz;
          symsizes->size = sz;
          ++symsizes;
          ++symsizes;
        }
        }
 
 
      sym = next;
      sym = next;
 
 
      temp = store_sym;
      temp = store_sym;
      store_sym = store_next;
      store_sym = store_next;
      store_next = temp;
      store_next = temp;
    }
    }
 
 
  symcount = symsizes - *symsizesp;
  symcount = symsizes - *symsizesp;
 
 
  /* We must now sort again by size.  */
  /* We must now sort again by size.  */
  qsort ((void *) *symsizesp, symcount, sizeof (struct size_sym), size_forward2);
  qsort ((void *) *symsizesp, symcount, sizeof (struct size_sym), size_forward2);
 
 
  return symcount;
  return symcount;
}
}
 
 
/* This function is used to get the relocs for a particular section.
/* This function is used to get the relocs for a particular section.
   It is called via bfd_map_over_sections.  */
   It is called via bfd_map_over_sections.  */
 
 
static void
static void
get_relocs (bfd *abfd, asection *sec, void *dataarg)
get_relocs (bfd *abfd, asection *sec, void *dataarg)
{
{
  struct get_relocs_info *data = (struct get_relocs_info *) dataarg;
  struct get_relocs_info *data = (struct get_relocs_info *) dataarg;
 
 
  *data->secs = sec;
  *data->secs = sec;
 
 
  if ((sec->flags & SEC_RELOC) == 0)
  if ((sec->flags & SEC_RELOC) == 0)
    {
    {
      *data->relocs = NULL;
      *data->relocs = NULL;
      *data->relcount = 0;
      *data->relcount = 0;
    }
    }
  else
  else
    {
    {
      long relsize;
      long relsize;
 
 
      relsize = bfd_get_reloc_upper_bound (abfd, sec);
      relsize = bfd_get_reloc_upper_bound (abfd, sec);
      if (relsize < 0)
      if (relsize < 0)
        bfd_fatal (bfd_get_filename (abfd));
        bfd_fatal (bfd_get_filename (abfd));
 
 
      *data->relocs = xmalloc (relsize);
      *data->relocs = xmalloc (relsize);
      *data->relcount = bfd_canonicalize_reloc (abfd, sec, *data->relocs,
      *data->relcount = bfd_canonicalize_reloc (abfd, sec, *data->relocs,
                                                data->syms);
                                                data->syms);
      if (*data->relcount < 0)
      if (*data->relcount < 0)
        bfd_fatal (bfd_get_filename (abfd));
        bfd_fatal (bfd_get_filename (abfd));
    }
    }
 
 
  ++data->secs;
  ++data->secs;
  ++data->relocs;
  ++data->relocs;
  ++data->relcount;
  ++data->relcount;
}
}
 
 
/* Print a single symbol.  */
/* Print a single symbol.  */
 
 
static void
static void
print_symbol (bfd *abfd, asymbol *sym, bfd_vma ssize, bfd *archive_bfd)
print_symbol (bfd *abfd, asymbol *sym, bfd_vma ssize, bfd *archive_bfd)
{
{
  symbol_info syminfo;
  symbol_info syminfo;
  struct extended_symbol_info info;
  struct extended_symbol_info info;
 
 
  PROGRESS (1);
  PROGRESS (1);
 
 
  format->print_symbol_filename (archive_bfd, abfd);
  format->print_symbol_filename (archive_bfd, abfd);
 
 
  bfd_get_symbol_info (abfd, sym, &syminfo);
  bfd_get_symbol_info (abfd, sym, &syminfo);
  info.sinfo = &syminfo;
  info.sinfo = &syminfo;
  info.ssize = ssize;
  info.ssize = ssize;
  if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
  if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
    info.elfinfo = (elf_symbol_type *) sym;
    info.elfinfo = (elf_symbol_type *) sym;
  else
  else
    info.elfinfo = NULL;
    info.elfinfo = NULL;
  format->print_symbol_info (&info, abfd);
  format->print_symbol_info (&info, abfd);
 
 
  if (line_numbers)
  if (line_numbers)
    {
    {
      static asymbol **syms;
      static asymbol **syms;
      static long symcount;
      static long symcount;
      const char *filename, *functionname;
      const char *filename, *functionname;
      unsigned int lineno;
      unsigned int lineno;
 
 
      /* We need to get the canonical symbols in order to call
      /* We need to get the canonical symbols in order to call
         bfd_find_nearest_line.  This is inefficient, but, then, you
         bfd_find_nearest_line.  This is inefficient, but, then, you
         don't have to use --line-numbers.  */
         don't have to use --line-numbers.  */
      if (abfd != lineno_cache_bfd && syms != NULL)
      if (abfd != lineno_cache_bfd && syms != NULL)
        {
        {
          free (syms);
          free (syms);
          syms = NULL;
          syms = NULL;
        }
        }
      if (syms == NULL)
      if (syms == NULL)
        {
        {
          long symsize;
          long symsize;
 
 
          symsize = bfd_get_symtab_upper_bound (abfd);
          symsize = bfd_get_symtab_upper_bound (abfd);
          if (symsize < 0)
          if (symsize < 0)
            bfd_fatal (bfd_get_filename (abfd));
            bfd_fatal (bfd_get_filename (abfd));
          syms = xmalloc (symsize);
          syms = xmalloc (symsize);
          symcount = bfd_canonicalize_symtab (abfd, syms);
          symcount = bfd_canonicalize_symtab (abfd, syms);
          if (symcount < 0)
          if (symcount < 0)
            bfd_fatal (bfd_get_filename (abfd));
            bfd_fatal (bfd_get_filename (abfd));
          lineno_cache_bfd = abfd;
          lineno_cache_bfd = abfd;
        }
        }
 
 
      if (bfd_is_und_section (bfd_get_section (sym)))
      if (bfd_is_und_section (bfd_get_section (sym)))
        {
        {
          static asection **secs;
          static asection **secs;
          static arelent ***relocs;
          static arelent ***relocs;
          static long *relcount;
          static long *relcount;
          static unsigned int seccount;
          static unsigned int seccount;
          unsigned int i;
          unsigned int i;
          const char *symname;
          const char *symname;
 
 
          /* For an undefined symbol, we try to find a reloc for the
          /* For an undefined symbol, we try to find a reloc for the
             symbol, and print the line number of the reloc.  */
             symbol, and print the line number of the reloc.  */
          if (abfd != lineno_cache_rel_bfd && relocs != NULL)
          if (abfd != lineno_cache_rel_bfd && relocs != NULL)
            {
            {
              for (i = 0; i < seccount; i++)
              for (i = 0; i < seccount; i++)
                if (relocs[i] != NULL)
                if (relocs[i] != NULL)
                  free (relocs[i]);
                  free (relocs[i]);
              free (secs);
              free (secs);
              free (relocs);
              free (relocs);
              free (relcount);
              free (relcount);
              secs = NULL;
              secs = NULL;
              relocs = NULL;
              relocs = NULL;
              relcount = NULL;
              relcount = NULL;
            }
            }
 
 
          if (relocs == NULL)
          if (relocs == NULL)
            {
            {
              struct get_relocs_info info;
              struct get_relocs_info info;
 
 
              seccount = bfd_count_sections (abfd);
              seccount = bfd_count_sections (abfd);
 
 
              secs = xmalloc (seccount * sizeof *secs);
              secs = xmalloc (seccount * sizeof *secs);
              relocs = xmalloc (seccount * sizeof *relocs);
              relocs = xmalloc (seccount * sizeof *relocs);
              relcount = xmalloc (seccount * sizeof *relcount);
              relcount = xmalloc (seccount * sizeof *relcount);
 
 
              info.secs = secs;
              info.secs = secs;
              info.relocs = relocs;
              info.relocs = relocs;
              info.relcount = relcount;
              info.relcount = relcount;
              info.syms = syms;
              info.syms = syms;
              bfd_map_over_sections (abfd, get_relocs, (void *) &info);
              bfd_map_over_sections (abfd, get_relocs, (void *) &info);
              lineno_cache_rel_bfd = abfd;
              lineno_cache_rel_bfd = abfd;
            }
            }
 
 
          symname = bfd_asymbol_name (sym);
          symname = bfd_asymbol_name (sym);
          for (i = 0; i < seccount; i++)
          for (i = 0; i < seccount; i++)
            {
            {
              long j;
              long j;
 
 
              for (j = 0; j < relcount[i]; j++)
              for (j = 0; j < relcount[i]; j++)
                {
                {
                  arelent *r;
                  arelent *r;
 
 
                  r = relocs[i][j];
                  r = relocs[i][j];
                  if (r->sym_ptr_ptr != NULL
                  if (r->sym_ptr_ptr != NULL
                      && (*r->sym_ptr_ptr)->section == sym->section
                      && (*r->sym_ptr_ptr)->section == sym->section
                      && (*r->sym_ptr_ptr)->value == sym->value
                      && (*r->sym_ptr_ptr)->value == sym->value
                      && strcmp (symname,
                      && strcmp (symname,
                                 bfd_asymbol_name (*r->sym_ptr_ptr)) == 0
                                 bfd_asymbol_name (*r->sym_ptr_ptr)) == 0
                      && bfd_find_nearest_line (abfd, secs[i], syms,
                      && bfd_find_nearest_line (abfd, secs[i], syms,
                                                r->address, &filename,
                                                r->address, &filename,
                                                &functionname, &lineno)
                                                &functionname, &lineno)
                      && filename != NULL)
                      && filename != NULL)
                    {
                    {
                      /* We only print the first one we find.  */
                      /* We only print the first one we find.  */
                      printf ("\t%s:%u", filename, lineno);
                      printf ("\t%s:%u", filename, lineno);
                      i = seccount;
                      i = seccount;
                      break;
                      break;
                    }
                    }
                }
                }
            }
            }
        }
        }
      else if (bfd_get_section (sym)->owner == abfd)
      else if (bfd_get_section (sym)->owner == abfd)
        {
        {
          if ((bfd_find_line (abfd, syms, sym, &filename, &lineno)
          if ((bfd_find_line (abfd, syms, sym, &filename, &lineno)
               || bfd_find_nearest_line (abfd, bfd_get_section (sym),
               || bfd_find_nearest_line (abfd, bfd_get_section (sym),
                                         syms, sym->value, &filename,
                                         syms, sym->value, &filename,
                                         &functionname, &lineno))
                                         &functionname, &lineno))
              && filename != NULL
              && filename != NULL
              && lineno != 0)
              && lineno != 0)
            printf ("\t%s:%u", filename, lineno);
            printf ("\t%s:%u", filename, lineno);
        }
        }
    }
    }
 
 
  putchar ('\n');
  putchar ('\n');
}
}


/* Print the symbols when sorting by size.  */
/* Print the symbols when sorting by size.  */
 
 
static void
static void
print_size_symbols (bfd *abfd, bfd_boolean dynamic,
print_size_symbols (bfd *abfd, bfd_boolean dynamic,
                    struct size_sym *symsizes, long symcount,
                    struct size_sym *symsizes, long symcount,
                    bfd *archive_bfd)
                    bfd *archive_bfd)
{
{
  asymbol *store;
  asymbol *store;
  struct size_sym *from, *fromend;
  struct size_sym *from, *fromend;
 
 
  store = bfd_make_empty_symbol (abfd);
  store = bfd_make_empty_symbol (abfd);
  if (store == NULL)
  if (store == NULL)
    bfd_fatal (bfd_get_filename (abfd));
    bfd_fatal (bfd_get_filename (abfd));
 
 
  from = symsizes;
  from = symsizes;
  fromend = from + symcount;
  fromend = from + symcount;
  for (; from < fromend; from++)
  for (; from < fromend; from++)
    {
    {
      asymbol *sym;
      asymbol *sym;
      bfd_vma ssize;
      bfd_vma ssize;
 
 
      sym = bfd_minisymbol_to_symbol (abfd, dynamic, from->minisym, store);
      sym = bfd_minisymbol_to_symbol (abfd, dynamic, from->minisym, store);
      if (sym == NULL)
      if (sym == NULL)
        bfd_fatal (bfd_get_filename (abfd));
        bfd_fatal (bfd_get_filename (abfd));
 
 
      /* For elf we have already computed the correct symbol size.  */
      /* For elf we have already computed the correct symbol size.  */
      if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
      if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
        ssize = from->size;
        ssize = from->size;
      else
      else
        ssize = from->size - bfd_section_vma (abfd, bfd_get_section (sym));
        ssize = from->size - bfd_section_vma (abfd, bfd_get_section (sym));
 
 
      print_symbol (abfd, sym, ssize, archive_bfd);
      print_symbol (abfd, sym, ssize, archive_bfd);
    }
    }
}
}
 
 


/* Print the symbols.  If ARCHIVE_BFD is non-NULL, it is the archive
/* Print the symbols.  If ARCHIVE_BFD is non-NULL, it is the archive
   containing ABFD.  */
   containing ABFD.  */
 
 
static void
static void
print_symbols (bfd *abfd, bfd_boolean dynamic, void *minisyms, long symcount,
print_symbols (bfd *abfd, bfd_boolean dynamic, void *minisyms, long symcount,
               unsigned int size, bfd *archive_bfd)
               unsigned int size, bfd *archive_bfd)
{
{
  asymbol *store;
  asymbol *store;
  bfd_byte *from, *fromend;
  bfd_byte *from, *fromend;
 
 
  store = bfd_make_empty_symbol (abfd);
  store = bfd_make_empty_symbol (abfd);
  if (store == NULL)
  if (store == NULL)
    bfd_fatal (bfd_get_filename (abfd));
    bfd_fatal (bfd_get_filename (abfd));
 
 
  from = (bfd_byte *) minisyms;
  from = (bfd_byte *) minisyms;
  fromend = from + symcount * size;
  fromend = from + symcount * size;
  for (; from < fromend; from += size)
  for (; from < fromend; from += size)
    {
    {
      asymbol *sym;
      asymbol *sym;
 
 
      sym = bfd_minisymbol_to_symbol (abfd, dynamic, from, store);
      sym = bfd_minisymbol_to_symbol (abfd, dynamic, from, store);
      if (sym == NULL)
      if (sym == NULL)
        bfd_fatal (bfd_get_filename (abfd));
        bfd_fatal (bfd_get_filename (abfd));
 
 
      print_symbol (abfd, sym, (bfd_vma) 0, archive_bfd);
      print_symbol (abfd, sym, (bfd_vma) 0, archive_bfd);
    }
    }
}
}
 
 
/* If ARCHIVE_BFD is non-NULL, it is the archive containing ABFD.  */
/* If ARCHIVE_BFD is non-NULL, it is the archive containing ABFD.  */
 
 
static void
static void
display_rel_file (bfd *abfd, bfd *archive_bfd)
display_rel_file (bfd *abfd, bfd *archive_bfd)
{
{
  long symcount;
  long symcount;
  void *minisyms;
  void *minisyms;
  unsigned int size;
  unsigned int size;
  struct size_sym *symsizes;
  struct size_sym *symsizes;
 
 
  if (! dynamic)
  if (! dynamic)
    {
    {
      if (!(bfd_get_file_flags (abfd) & HAS_SYMS))
      if (!(bfd_get_file_flags (abfd) & HAS_SYMS))
        {
        {
          non_fatal (_("%s: no symbols"), bfd_get_filename (abfd));
          non_fatal (_("%s: no symbols"), bfd_get_filename (abfd));
          return;
          return;
        }
        }
    }
    }
 
 
  symcount = bfd_read_minisymbols (abfd, dynamic, &minisyms, &size);
  symcount = bfd_read_minisymbols (abfd, dynamic, &minisyms, &size);
  if (symcount < 0)
  if (symcount < 0)
    bfd_fatal (bfd_get_filename (abfd));
    bfd_fatal (bfd_get_filename (abfd));
 
 
  if (symcount == 0)
  if (symcount == 0)
    {
    {
      non_fatal (_("%s: no symbols"), bfd_get_filename (abfd));
      non_fatal (_("%s: no symbols"), bfd_get_filename (abfd));
      return;
      return;
    }
    }
 
 
  if (show_synthetic && size == sizeof (asymbol *))
  if (show_synthetic && size == sizeof (asymbol *))
    {
    {
      asymbol *synthsyms;
      asymbol *synthsyms;
      long synth_count;
      long synth_count;
      asymbol **static_syms = NULL;
      asymbol **static_syms = NULL;
      asymbol **dyn_syms = NULL;
      asymbol **dyn_syms = NULL;
      long static_count = 0;
      long static_count = 0;
      long dyn_count = 0;
      long dyn_count = 0;
 
 
      if (dynamic)
      if (dynamic)
        {
        {
          dyn_count = symcount;
          dyn_count = symcount;
          dyn_syms = minisyms;
          dyn_syms = minisyms;
        }
        }
      else
      else
        {
        {
          long storage = bfd_get_dynamic_symtab_upper_bound (abfd);
          long storage = bfd_get_dynamic_symtab_upper_bound (abfd);
 
 
          static_count = symcount;
          static_count = symcount;
          static_syms = minisyms;
          static_syms = minisyms;
 
 
          if (storage > 0)
          if (storage > 0)
            {
            {
              dyn_syms = xmalloc (storage);
              dyn_syms = xmalloc (storage);
              dyn_count = bfd_canonicalize_dynamic_symtab (abfd, dyn_syms);
              dyn_count = bfd_canonicalize_dynamic_symtab (abfd, dyn_syms);
              if (dyn_count < 0)
              if (dyn_count < 0)
                bfd_fatal (bfd_get_filename (abfd));
                bfd_fatal (bfd_get_filename (abfd));
            }
            }
        }
        }
      synth_count = bfd_get_synthetic_symtab (abfd, static_count, static_syms,
      synth_count = bfd_get_synthetic_symtab (abfd, static_count, static_syms,
                                              dyn_count, dyn_syms, &synthsyms);
                                              dyn_count, dyn_syms, &synthsyms);
      if (synth_count > 0)
      if (synth_count > 0)
        {
        {
          asymbol **symp;
          asymbol **symp;
          void *new_mini;
          void *new_mini;
          long i;
          long i;
 
 
          new_mini = xmalloc ((symcount + synth_count + 1) * sizeof (*symp));
          new_mini = xmalloc ((symcount + synth_count + 1) * sizeof (*symp));
          symp = new_mini;
          symp = new_mini;
          memcpy (symp, minisyms, symcount * sizeof (*symp));
          memcpy (symp, minisyms, symcount * sizeof (*symp));
          symp += symcount;
          symp += symcount;
          for (i = 0; i < synth_count; i++)
          for (i = 0; i < synth_count; i++)
            *symp++ = synthsyms + i;
            *symp++ = synthsyms + i;
          *symp = 0;
          *symp = 0;
          minisyms = new_mini;
          minisyms = new_mini;
          symcount += synth_count;
          symcount += synth_count;
        }
        }
    }
    }
 
 
  /* Discard the symbols we don't want to print.
  /* Discard the symbols we don't want to print.
     It's OK to do this in place; we'll free the storage anyway
     It's OK to do this in place; we'll free the storage anyway
     (after printing).  */
     (after printing).  */
 
 
  symcount = filter_symbols (abfd, dynamic, minisyms, symcount, size);
  symcount = filter_symbols (abfd, dynamic, minisyms, symcount, size);
 
 
  symsizes = NULL;
  symsizes = NULL;
  if (! no_sort)
  if (! no_sort)
    {
    {
      sort_bfd = abfd;
      sort_bfd = abfd;
      sort_dynamic = dynamic;
      sort_dynamic = dynamic;
      sort_x = bfd_make_empty_symbol (abfd);
      sort_x = bfd_make_empty_symbol (abfd);
      sort_y = bfd_make_empty_symbol (abfd);
      sort_y = bfd_make_empty_symbol (abfd);
      if (sort_x == NULL || sort_y == NULL)
      if (sort_x == NULL || sort_y == NULL)
        bfd_fatal (bfd_get_filename (abfd));
        bfd_fatal (bfd_get_filename (abfd));
 
 
      if (! sort_by_size)
      if (! sort_by_size)
        qsort (minisyms, symcount, size,
        qsort (minisyms, symcount, size,
               sorters[sort_numerically][reverse_sort]);
               sorters[sort_numerically][reverse_sort]);
      else
      else
        symcount = sort_symbols_by_size (abfd, dynamic, minisyms, symcount,
        symcount = sort_symbols_by_size (abfd, dynamic, minisyms, symcount,
                                         size, &symsizes);
                                         size, &symsizes);
    }
    }
 
 
  if (! sort_by_size)
  if (! sort_by_size)
    print_symbols (abfd, dynamic, minisyms, symcount, size, archive_bfd);
    print_symbols (abfd, dynamic, minisyms, symcount, size, archive_bfd);
  else
  else
    print_size_symbols (abfd, dynamic, symsizes, symcount, archive_bfd);
    print_size_symbols (abfd, dynamic, symsizes, symcount, archive_bfd);
 
 
  free (minisyms);
  free (minisyms);
}
}
 
 
static void
static void
set_print_width (bfd *file)
set_print_width (bfd *file)
{
{
  print_width = bfd_get_arch_size (file);
  print_width = bfd_get_arch_size (file);
 
 
  if (print_width == -1)
  if (print_width == -1)
    {
    {
      /* PR binutils/4292
      /* PR binutils/4292
         Guess the target's bitsize based on its name.
         Guess the target's bitsize based on its name.
         We assume here than any 64-bit format will include
         We assume here than any 64-bit format will include
         "64" somewhere in its name.  The only known exception
         "64" somewhere in its name.  The only known exception
         is the MMO object file format.  */
         is the MMO object file format.  */
      if (strstr (bfd_get_target (file), "64") != NULL
      if (strstr (bfd_get_target (file), "64") != NULL
          || strcmp (bfd_get_target (file), "mmo") == 0)
          || strcmp (bfd_get_target (file), "mmo") == 0)
        print_width = 64;
        print_width = 64;
      else
      else
        print_width = 32;
        print_width = 32;
    }
    }
}
}
 
 
static void
static void
display_archive (bfd *file)
display_archive (bfd *file)
{
{
  bfd *arfile = NULL;
  bfd *arfile = NULL;
  bfd *last_arfile = NULL;
  bfd *last_arfile = NULL;
  char **matching;
  char **matching;
 
 
  format->print_archive_filename (bfd_get_filename (file));
  format->print_archive_filename (bfd_get_filename (file));
 
 
  if (print_armap)
  if (print_armap)
    print_symdef_entry (file);
    print_symdef_entry (file);
 
 
  for (;;)
  for (;;)
    {
    {
      PROGRESS (1);
      PROGRESS (1);
 
 
      arfile = bfd_openr_next_archived_file (file, arfile);
      arfile = bfd_openr_next_archived_file (file, arfile);
 
 
      if (arfile == NULL)
      if (arfile == NULL)
        {
        {
          if (bfd_get_error () != bfd_error_no_more_archived_files)
          if (bfd_get_error () != bfd_error_no_more_archived_files)
            bfd_fatal (bfd_get_filename (file));
            bfd_fatal (bfd_get_filename (file));
          break;
          break;
        }
        }
 
 
      if (bfd_check_format_matches (arfile, bfd_object, &matching))
      if (bfd_check_format_matches (arfile, bfd_object, &matching))
        {
        {
          set_print_width (arfile);
          set_print_width (arfile);
          format->print_archive_member (bfd_get_filename (file),
          format->print_archive_member (bfd_get_filename (file),
                                        bfd_get_filename (arfile));
                                        bfd_get_filename (arfile));
          display_rel_file (arfile, file);
          display_rel_file (arfile, file);
        }
        }
      else
      else
        {
        {
          bfd_nonfatal (bfd_get_filename (arfile));
          bfd_nonfatal (bfd_get_filename (arfile));
          if (bfd_get_error () == bfd_error_file_ambiguously_recognized)
          if (bfd_get_error () == bfd_error_file_ambiguously_recognized)
            {
            {
              list_matching_formats (matching);
              list_matching_formats (matching);
              free (matching);
              free (matching);
            }
            }
        }
        }
 
 
      if (last_arfile != NULL)
      if (last_arfile != NULL)
        {
        {
          bfd_close (last_arfile);
          bfd_close (last_arfile);
          lineno_cache_bfd = NULL;
          lineno_cache_bfd = NULL;
          lineno_cache_rel_bfd = NULL;
          lineno_cache_rel_bfd = NULL;
        }
        }
      last_arfile = arfile;
      last_arfile = arfile;
    }
    }
 
 
  if (last_arfile != NULL)
  if (last_arfile != NULL)
    {
    {
      bfd_close (last_arfile);
      bfd_close (last_arfile);
      lineno_cache_bfd = NULL;
      lineno_cache_bfd = NULL;
      lineno_cache_rel_bfd = NULL;
      lineno_cache_rel_bfd = NULL;
    }
    }
}
}
 
 
static bfd_boolean
static bfd_boolean
display_file (char *filename)
display_file (char *filename)
{
{
  bfd_boolean retval = TRUE;
  bfd_boolean retval = TRUE;
  bfd *file;
  bfd *file;
  char **matching;
  char **matching;
 
 
  if (get_file_size (filename) < 1)
  if (get_file_size (filename) < 1)
    return FALSE;
    return FALSE;
 
 
  file = bfd_openr (filename, target);
  file = bfd_openr (filename, target);
  if (file == NULL)
  if (file == NULL)
    {
    {
      bfd_nonfatal (filename);
      bfd_nonfatal (filename);
      return FALSE;
      return FALSE;
    }
    }
 
 
  if (bfd_check_format (file, bfd_archive))
  if (bfd_check_format (file, bfd_archive))
    {
    {
      display_archive (file);
      display_archive (file);
    }
    }
  else if (bfd_check_format_matches (file, bfd_object, &matching))
  else if (bfd_check_format_matches (file, bfd_object, &matching))
    {
    {
      set_print_width (file);
      set_print_width (file);
      format->print_object_filename (filename);
      format->print_object_filename (filename);
      display_rel_file (file, NULL);
      display_rel_file (file, NULL);
    }
    }
  else
  else
    {
    {
      bfd_nonfatal (filename);
      bfd_nonfatal (filename);
      if (bfd_get_error () == bfd_error_file_ambiguously_recognized)
      if (bfd_get_error () == bfd_error_file_ambiguously_recognized)
        {
        {
          list_matching_formats (matching);
          list_matching_formats (matching);
          free (matching);
          free (matching);
        }
        }
      retval = FALSE;
      retval = FALSE;
    }
    }
 
 
  if (!bfd_close (file))
  if (!bfd_close (file))
    bfd_fatal (filename);
    bfd_fatal (filename);
 
 
  lineno_cache_bfd = NULL;
  lineno_cache_bfd = NULL;
  lineno_cache_rel_bfd = NULL;
  lineno_cache_rel_bfd = NULL;
 
 
  return retval;
  return retval;
}
}


/* The following 3 groups of functions are called unconditionally,
/* The following 3 groups of functions are called unconditionally,
   once at the start of processing each file of the appropriate type.
   once at the start of processing each file of the appropriate type.
   They should check `filename_per_file' and `filename_per_symbol',
   They should check `filename_per_file' and `filename_per_symbol',
   as appropriate for their output format, to determine whether to
   as appropriate for their output format, to determine whether to
   print anything.  */
   print anything.  */


/* Print the name of an object file given on the command line.  */
/* Print the name of an object file given on the command line.  */
 
 
static void
static void
print_object_filename_bsd (char *filename)
print_object_filename_bsd (char *filename)
{
{
  if (filename_per_file && !filename_per_symbol)
  if (filename_per_file && !filename_per_symbol)
    printf ("\n%s:\n", filename);
    printf ("\n%s:\n", filename);
}
}
 
 
static void
static void
print_object_filename_sysv (char *filename)
print_object_filename_sysv (char *filename)
{
{
  if (undefined_only)
  if (undefined_only)
    printf (_("\n\nUndefined symbols from %s:\n\n"), filename);
    printf (_("\n\nUndefined symbols from %s:\n\n"), filename);
  else
  else
    printf (_("\n\nSymbols from %s:\n\n"), filename);
    printf (_("\n\nSymbols from %s:\n\n"), filename);
  if (print_width == 32)
  if (print_width == 32)
    printf (_("\
    printf (_("\
Name                  Value   Class        Type         Size     Line  Section\n\n"));
Name                  Value   Class        Type         Size     Line  Section\n\n"));
  else
  else
    printf (_("\
    printf (_("\
Name                  Value           Class        Type         Size             Line  Section\n\n"));
Name                  Value           Class        Type         Size             Line  Section\n\n"));
}
}
 
 
static void
static void
print_object_filename_posix (char *filename)
print_object_filename_posix (char *filename)
{
{
  if (filename_per_file && !filename_per_symbol)
  if (filename_per_file && !filename_per_symbol)
    printf ("%s:\n", filename);
    printf ("%s:\n", filename);
}
}


/* Print the name of an archive file given on the command line.  */
/* Print the name of an archive file given on the command line.  */
 
 
static void
static void
print_archive_filename_bsd (char *filename)
print_archive_filename_bsd (char *filename)
{
{
  if (filename_per_file)
  if (filename_per_file)
    printf ("\n%s:\n", filename);
    printf ("\n%s:\n", filename);
}
}
 
 
static void
static void
print_archive_filename_sysv (char *filename ATTRIBUTE_UNUSED)
print_archive_filename_sysv (char *filename ATTRIBUTE_UNUSED)
{
{
}
}
 
 
static void
static void
print_archive_filename_posix (char *filename ATTRIBUTE_UNUSED)
print_archive_filename_posix (char *filename ATTRIBUTE_UNUSED)
{
{
}
}


/* Print the name of an archive member file.  */
/* Print the name of an archive member file.  */
 
 
static void
static void
print_archive_member_bsd (char *archive ATTRIBUTE_UNUSED,
print_archive_member_bsd (char *archive ATTRIBUTE_UNUSED,
                          const char *filename)
                          const char *filename)
{
{
  if (!filename_per_symbol)
  if (!filename_per_symbol)
    printf ("\n%s:\n", filename);
    printf ("\n%s:\n", filename);
}
}
 
 
static void
static void
print_archive_member_sysv (char *archive, const char *filename)
print_archive_member_sysv (char *archive, const char *filename)
{
{
  if (undefined_only)
  if (undefined_only)
    printf (_("\n\nUndefined symbols from %s[%s]:\n\n"), archive, filename);
    printf (_("\n\nUndefined symbols from %s[%s]:\n\n"), archive, filename);
  else
  else
    printf (_("\n\nSymbols from %s[%s]:\n\n"), archive, filename);
    printf (_("\n\nSymbols from %s[%s]:\n\n"), archive, filename);
  if (print_width == 32)
  if (print_width == 32)
    printf (_("\
    printf (_("\
Name                  Value   Class        Type         Size     Line  Section\n\n"));
Name                  Value   Class        Type         Size     Line  Section\n\n"));
  else
  else
    printf (_("\
    printf (_("\
Name                  Value           Class        Type         Size             Line  Section\n\n"));
Name                  Value           Class        Type         Size             Line  Section\n\n"));
}
}
 
 
static void
static void
print_archive_member_posix (char *archive, const char *filename)
print_archive_member_posix (char *archive, const char *filename)
{
{
  if (!filename_per_symbol)
  if (!filename_per_symbol)
    printf ("%s[%s]:\n", archive, filename);
    printf ("%s[%s]:\n", archive, filename);
}
}


/* Print the name of the file (and archive, if there is one)
/* Print the name of the file (and archive, if there is one)
   containing a symbol.  */
   containing a symbol.  */
 
 
static void
static void
print_symbol_filename_bsd (bfd *archive_bfd, bfd *abfd)
print_symbol_filename_bsd (bfd *archive_bfd, bfd *abfd)
{
{
  if (filename_per_symbol)
  if (filename_per_symbol)
    {
    {
      if (archive_bfd)
      if (archive_bfd)
        printf ("%s:", bfd_get_filename (archive_bfd));
        printf ("%s:", bfd_get_filename (archive_bfd));
      printf ("%s:", bfd_get_filename (abfd));
      printf ("%s:", bfd_get_filename (abfd));
    }
    }
}
}
 
 
static void
static void
print_symbol_filename_sysv (bfd *archive_bfd, bfd *abfd)
print_symbol_filename_sysv (bfd *archive_bfd, bfd *abfd)
{
{
  if (filename_per_symbol)
  if (filename_per_symbol)
    {
    {
      if (archive_bfd)
      if (archive_bfd)
        printf ("%s:", bfd_get_filename (archive_bfd));
        printf ("%s:", bfd_get_filename (archive_bfd));
      printf ("%s:", bfd_get_filename (abfd));
      printf ("%s:", bfd_get_filename (abfd));
    }
    }
}
}
 
 
static void
static void
print_symbol_filename_posix (bfd *archive_bfd, bfd *abfd)
print_symbol_filename_posix (bfd *archive_bfd, bfd *abfd)
{
{
  if (filename_per_symbol)
  if (filename_per_symbol)
    {
    {
      if (archive_bfd)
      if (archive_bfd)
        printf ("%s[%s]: ", bfd_get_filename (archive_bfd),
        printf ("%s[%s]: ", bfd_get_filename (archive_bfd),
                bfd_get_filename (abfd));
                bfd_get_filename (abfd));
      else
      else
        printf ("%s: ", bfd_get_filename (abfd));
        printf ("%s: ", bfd_get_filename (abfd));
    }
    }
}
}


/* Print a symbol value.  */
/* Print a symbol value.  */
 
 
static void
static void
print_value (bfd *abfd ATTRIBUTE_UNUSED, bfd_vma val)
print_value (bfd *abfd ATTRIBUTE_UNUSED, bfd_vma val)
{
{
  switch (print_width)
  switch (print_width)
    {
    {
    case 32:
    case 32:
      printf (value_format_32bit, (unsigned long) val);
      printf (value_format_32bit, (unsigned long) val);
      break;
      break;
 
 
    case 64:
    case 64:
#if BFD_HOST_64BIT_LONG || BFD_HOST_64BIT_LONG_LONG
#if BFD_HOST_64BIT_LONG || BFD_HOST_64BIT_LONG_LONG
      printf (value_format_64bit, val);
      printf (value_format_64bit, val);
#else
#else
      /* We have a 64 bit value to print, but the host is only 32 bit.  */
      /* We have a 64 bit value to print, but the host is only 32 bit.  */
      if (print_radix == 16)
      if (print_radix == 16)
        bfd_fprintf_vma (abfd, stdout, val);
        bfd_fprintf_vma (abfd, stdout, val);
      else
      else
        {
        {
          char buf[30];
          char buf[30];
          char *s;
          char *s;
 
 
          s = buf + sizeof buf;
          s = buf + sizeof buf;
          *--s = '\0';
          *--s = '\0';
          while (val > 0)
          while (val > 0)
            {
            {
              *--s = (val % print_radix) + '0';
              *--s = (val % print_radix) + '0';
              val /= print_radix;
              val /= print_radix;
            }
            }
          while ((buf + sizeof buf - 1) - s < 16)
          while ((buf + sizeof buf - 1) - s < 16)
            *--s = '0';
            *--s = '0';
          printf ("%s", s);
          printf ("%s", s);
        }
        }
#endif
#endif
      break;
      break;
 
 
    default:
    default:
      fatal (_("Print width has not been initialized (%d)"), print_width);
      fatal (_("Print width has not been initialized (%d)"), print_width);
      break;
      break;
    }
    }
}
}
 
 
/* Print a line of information about a symbol.  */
/* Print a line of information about a symbol.  */
 
 
static void
static void
print_symbol_info_bsd (struct extended_symbol_info *info, bfd *abfd)
print_symbol_info_bsd (struct extended_symbol_info *info, bfd *abfd)
{
{
  if (bfd_is_undefined_symclass (SYM_TYPE (info)))
  if (bfd_is_undefined_symclass (SYM_TYPE (info)))
    {
    {
      if (print_width == 64)
      if (print_width == 64)
        printf ("        ");
        printf ("        ");
      printf ("        ");
      printf ("        ");
    }
    }
  else
  else
    {
    {
      /* Normally we print the value of the symbol.  If we are printing the
      /* Normally we print the value of the symbol.  If we are printing the
         size or sorting by size then we print its size, except for the
         size or sorting by size then we print its size, except for the
         (weird) special case where both flags are defined, in which case we
         (weird) special case where both flags are defined, in which case we
         print both values.  This conforms to documented behaviour.  */
         print both values.  This conforms to documented behaviour.  */
      if (sort_by_size && !print_size)
      if (sort_by_size && !print_size)
        print_value (abfd, SYM_SIZE (info));
        print_value (abfd, SYM_SIZE (info));
      else
      else
        print_value (abfd, SYM_VALUE (info));
        print_value (abfd, SYM_VALUE (info));
 
 
      if (print_size && SYM_SIZE (info))
      if (print_size && SYM_SIZE (info))
        {
        {
          printf (" ");
          printf (" ");
          print_value (abfd, SYM_SIZE (info));
          print_value (abfd, SYM_SIZE (info));
        }
        }
    }
    }
 
 
  printf (" %c", SYM_TYPE (info));
  printf (" %c", SYM_TYPE (info));
 
 
  if (SYM_TYPE (info) == '-')
  if (SYM_TYPE (info) == '-')
    {
    {
      /* A stab.  */
      /* A stab.  */
      printf (" ");
      printf (" ");
      printf (other_format, SYM_STAB_OTHER (info));
      printf (other_format, SYM_STAB_OTHER (info));
      printf (" ");
      printf (" ");
      printf (desc_format, SYM_STAB_DESC (info));
      printf (desc_format, SYM_STAB_DESC (info));
      printf (" %5s", SYM_STAB_NAME (info));
      printf (" %5s", SYM_STAB_NAME (info));
    }
    }
  print_symname (" %s", SYM_NAME (info), abfd);
  print_symname (" %s", SYM_NAME (info), abfd);
}
}
 
 
static void
static void
print_symbol_info_sysv (struct extended_symbol_info *info, bfd *abfd)
print_symbol_info_sysv (struct extended_symbol_info *info, bfd *abfd)
{
{
  print_symname ("%-20s|", SYM_NAME (info), abfd);
  print_symname ("%-20s|", SYM_NAME (info), abfd);
 
 
  if (bfd_is_undefined_symclass (SYM_TYPE (info)))
  if (bfd_is_undefined_symclass (SYM_TYPE (info)))
    {
    {
      if (print_width == 32)
      if (print_width == 32)
        printf ("        ");
        printf ("        ");
      else
      else
        printf ("                ");
        printf ("                ");
    }
    }
  else
  else
    print_value (abfd, SYM_VALUE (info));
    print_value (abfd, SYM_VALUE (info));
 
 
  printf ("|   %c  |", SYM_TYPE (info));
  printf ("|   %c  |", SYM_TYPE (info));
 
 
  if (SYM_TYPE (info) == '-')
  if (SYM_TYPE (info) == '-')
    {
    {
      /* A stab.  */
      /* A stab.  */
      printf ("%18s|  ", SYM_STAB_NAME (info));         /* (C) Type.  */
      printf ("%18s|  ", SYM_STAB_NAME (info));         /* (C) Type.  */
      printf (desc_format, SYM_STAB_DESC (info));       /* Size.  */
      printf (desc_format, SYM_STAB_DESC (info));       /* Size.  */
      printf ("|     |");                               /* Line, Section.  */
      printf ("|     |");                               /* Line, Section.  */
    }
    }
  else
  else
    {
    {
      /* Type, Size, Line, Section */
      /* Type, Size, Line, Section */
      if (info->elfinfo)
      if (info->elfinfo)
        printf ("%18s|",
        printf ("%18s|",
                get_symbol_type (ELF_ST_TYPE (info->elfinfo->internal_elf_sym.st_info)));
                get_symbol_type (ELF_ST_TYPE (info->elfinfo->internal_elf_sym.st_info)));
      else
      else
        printf ("                  |");
        printf ("                  |");
 
 
      if (SYM_SIZE (info))
      if (SYM_SIZE (info))
        print_value (abfd, SYM_SIZE (info));
        print_value (abfd, SYM_SIZE (info));
      else
      else
        {
        {
          if (print_width == 32)
          if (print_width == 32)
            printf ("        ");
            printf ("        ");
          else
          else
            printf ("                ");
            printf ("                ");
        }
        }
 
 
      if (info->elfinfo)
      if (info->elfinfo)
        printf("|     |%s", info->elfinfo->symbol.section->name);
        printf("|     |%s", info->elfinfo->symbol.section->name);
      else
      else
        printf("|     |");
        printf("|     |");
    }
    }
}
}
 
 
static void
static void
print_symbol_info_posix (struct extended_symbol_info *info, bfd *abfd)
print_symbol_info_posix (struct extended_symbol_info *info, bfd *abfd)
{
{
  print_symname ("%s ", SYM_NAME (info), abfd);
  print_symname ("%s ", SYM_NAME (info), abfd);
  printf ("%c ", SYM_TYPE (info));
  printf ("%c ", SYM_TYPE (info));
 
 
  if (bfd_is_undefined_symclass (SYM_TYPE (info)))
  if (bfd_is_undefined_symclass (SYM_TYPE (info)))
    printf ("        ");
    printf ("        ");
  else
  else
    {
    {
      print_value (abfd, SYM_VALUE (info));
      print_value (abfd, SYM_VALUE (info));
      printf (" ");
      printf (" ");
      if (SYM_SIZE (info))
      if (SYM_SIZE (info))
        print_value (abfd, SYM_SIZE (info));
        print_value (abfd, SYM_SIZE (info));
    }
    }
}
}


int
int
main (int argc, char **argv)
main (int argc, char **argv)
{
{
  int c;
  int c;
  int retval;
  int retval;
 
 
#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
  setlocale (LC_MESSAGES, "");
  setlocale (LC_MESSAGES, "");
#endif
#endif
#if defined (HAVE_SETLOCALE)
#if defined (HAVE_SETLOCALE)
  setlocale (LC_CTYPE, "");
  setlocale (LC_CTYPE, "");
  setlocale (LC_COLLATE, "");
  setlocale (LC_COLLATE, "");
#endif
#endif
  bindtextdomain (PACKAGE, LOCALEDIR);
  bindtextdomain (PACKAGE, LOCALEDIR);
  textdomain (PACKAGE);
  textdomain (PACKAGE);
 
 
  program_name = *argv;
  program_name = *argv;
  xmalloc_set_program_name (program_name);
  xmalloc_set_program_name (program_name);
 
 
  START_PROGRESS (program_name, 0);
  START_PROGRESS (program_name, 0);
 
 
  expandargv (&argc, &argv);
  expandargv (&argc, &argv);
 
 
  bfd_init ();
  bfd_init ();
  set_default_bfd_target ();
  set_default_bfd_target ();
 
 
  while ((c = getopt_long (argc, argv, "aABCDef:gHhlnopPrSst:uvVvX:",
  while ((c = getopt_long (argc, argv, "aABCDef:gHhlnopPrSst:uvVvX:",
                           long_options, (int *) 0)) != EOF)
                           long_options, (int *) 0)) != EOF)
    {
    {
      switch (c)
      switch (c)
        {
        {
        case 'a':
        case 'a':
          print_debug_syms = 1;
          print_debug_syms = 1;
          break;
          break;
        case 'A':
        case 'A':
        case 'o':
        case 'o':
          filename_per_symbol = 1;
          filename_per_symbol = 1;
          break;
          break;
        case 'B':               /* For MIPS compatibility.  */
        case 'B':               /* For MIPS compatibility.  */
          set_output_format ("bsd");
          set_output_format ("bsd");
          break;
          break;
        case 'C':
        case 'C':
          do_demangle = 1;
          do_demangle = 1;
          if (optarg != NULL)
          if (optarg != NULL)
            {
            {
              enum demangling_styles style;
              enum demangling_styles style;
 
 
              style = cplus_demangle_name_to_style (optarg);
              style = cplus_demangle_name_to_style (optarg);
              if (style == unknown_demangling)
              if (style == unknown_demangling)
                fatal (_("unknown demangling style `%s'"),
                fatal (_("unknown demangling style `%s'"),
                       optarg);
                       optarg);
 
 
              cplus_demangle_set_style (style);
              cplus_demangle_set_style (style);
            }
            }
          break;
          break;
        case 'D':
        case 'D':
          dynamic = 1;
          dynamic = 1;
          break;
          break;
        case 'e':
        case 'e':
          /* Ignored for HP/UX compatibility.  */
          /* Ignored for HP/UX compatibility.  */
          break;
          break;
        case 'f':
        case 'f':
          set_output_format (optarg);
          set_output_format (optarg);
          break;
          break;
        case 'g':
        case 'g':
          external_only = 1;
          external_only = 1;
          break;
          break;
        case 'H':
        case 'H':
        case 'h':
        case 'h':
          usage (stdout, 0);
          usage (stdout, 0);
        case 'l':
        case 'l':
          line_numbers = 1;
          line_numbers = 1;
          break;
          break;
        case 'n':
        case 'n':
        case 'v':
        case 'v':
          sort_numerically = 1;
          sort_numerically = 1;
          break;
          break;
        case 'p':
        case 'p':
          no_sort = 1;
          no_sort = 1;
          break;
          break;
        case 'P':
        case 'P':
          set_output_format ("posix");
          set_output_format ("posix");
          break;
          break;
        case 'r':
        case 'r':
          reverse_sort = 1;
          reverse_sort = 1;
          break;
          break;
        case 's':
        case 's':
          print_armap = 1;
          print_armap = 1;
          break;
          break;
        case 'S':
        case 'S':
          print_size = 1;
          print_size = 1;
          break;
          break;
        case 't':
        case 't':
          set_print_radix (optarg);
          set_print_radix (optarg);
          break;
          break;
        case 'u':
        case 'u':
          undefined_only = 1;
          undefined_only = 1;
          break;
          break;
        case 'V':
        case 'V':
          show_version = 1;
          show_version = 1;
          break;
          break;
        case 'X':
        case 'X':
          /* Ignored for (partial) AIX compatibility.  On AIX, the
          /* Ignored for (partial) AIX compatibility.  On AIX, the
             argument has values 32, 64, or 32_64, and specifies that
             argument has values 32, 64, or 32_64, and specifies that
             only 32-bit, only 64-bit, or both kinds of objects should
             only 32-bit, only 64-bit, or both kinds of objects should
             be examined.  The default is 32.  So plain AIX nm on a
             be examined.  The default is 32.  So plain AIX nm on a
             library archive with both kinds of objects will ignore
             library archive with both kinds of objects will ignore
             the 64-bit ones.  For GNU nm, the default is and always
             the 64-bit ones.  For GNU nm, the default is and always
             has been -X 32_64, and other options are not supported.  */
             has been -X 32_64, and other options are not supported.  */
          if (strcmp (optarg, "32_64") != 0)
          if (strcmp (optarg, "32_64") != 0)
            fatal (_("Only -X 32_64 is supported"));
            fatal (_("Only -X 32_64 is supported"));
          break;
          break;
 
 
        case OPTION_TARGET:     /* --target */
        case OPTION_TARGET:     /* --target */
          target = optarg;
          target = optarg;
          break;
          break;
 
 
        case 0:          /* A long option that just sets a flag.  */
        case 0:          /* A long option that just sets a flag.  */
          break;
          break;
 
 
        default:
        default:
          usage (stderr, 1);
          usage (stderr, 1);
        }
        }
    }
    }
 
 
  if (show_version)
  if (show_version)
    print_version ("nm");
    print_version ("nm");
 
 
  if (sort_by_size && undefined_only)
  if (sort_by_size && undefined_only)
    {
    {
      non_fatal (_("Using the --size-sort and --undefined-only options together"));
      non_fatal (_("Using the --size-sort and --undefined-only options together"));
      non_fatal (_("will produce no output, since undefined symbols have no size."));
      non_fatal (_("will produce no output, since undefined symbols have no size."));
      return 0;
      return 0;
    }
    }
 
 
  /* OK, all options now parsed.  If no filename specified, do a.out.  */
  /* OK, all options now parsed.  If no filename specified, do a.out.  */
  if (optind == argc)
  if (optind == argc)
    return !display_file ("a.out");
    return !display_file ("a.out");
 
 
  retval = 0;
  retval = 0;
 
 
  if (argc - optind > 1)
  if (argc - optind > 1)
    filename_per_file = 1;
    filename_per_file = 1;
 
 
  /* We were given several filenames to do.  */
  /* We were given several filenames to do.  */
  while (optind < argc)
  while (optind < argc)
    {
    {
      PROGRESS (1);
      PROGRESS (1);
      if (!display_file (argv[optind++]))
      if (!display_file (argv[optind++]))
        retval++;
        retval++;
    }
    }
 
 
  END_PROGRESS (program_name);
  END_PROGRESS (program_name);
 
 
#ifdef HAVE_SBRK
#ifdef HAVE_SBRK
  if (show_stats)
  if (show_stats)
    {
    {
      char *lim = (char *) sbrk (0);
      char *lim = (char *) sbrk (0);
 
 
      non_fatal (_("data size %ld"), (long) (lim - (char *) &environ));
      non_fatal (_("data size %ld"), (long) (lim - (char *) &environ));
    }
    }
#endif
#endif
 
 
  exit (retval);
  exit (retval);
  return retval;
  return retval;
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.