gdb: add target_ops::supports_displaced_step
[deliverable/binutils-gdb.git] / binutils / addr2line.c
index 174a0348908046e76f59b2821df981208304f7b3..846720fc81886dae7896c7aed38baeb49293c560 100644 (file)
@@ -1,12 +1,12 @@
 /* addr2line.c -- convert addresses to line number and function name
 /* addr2line.c -- convert addresses to line number and function name
-   Copyright 1997, 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
+   Copyright (C) 1997-2020 Free Software Foundation, Inc.
    Contributed by Ulrich Lauther <Ulrich.Lauther@mchp.siemens.de>
 
    This file is part of GNU Binutils.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    Contributed by Ulrich Lauther <Ulrich.Lauther@mchp.siemens.de>
 
    This file is part of GNU Binutils.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
-   the Free Software Foundation; either version 2, or (at your option)
+   the Free Software Foundation; either version 3, or (at your option)
    any later version.
 
    This program is distributed in the hope that it will be useful,
    any later version.
 
    This program is distributed in the hope that it will be useful,
@@ -16,7 +16,9 @@
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
-   Foundation, 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+   Foundation, 51 Franklin Street - Fifth Floor, Boston,
+   MA 02110-1301, USA.  */
+
 
 /* Derived from objdump.c and nm.c by Ulrich.Lauther@mchp.siemens.de
 
 
 /* Derived from objdump.c and nm.c by Ulrich.Lauther@mchp.siemens.de
 
    both forms write results to stdout, the second form reads addresses
    to be converted from stdin.  */
 
    both forms write results to stdout, the second form reads addresses
    to be converted from stdin.  */
 
-#include <string.h>
-
+#include "sysdep.h"
 #include "bfd.h"
 #include "getopt.h"
 #include "libiberty.h"
 #include "demangle.h"
 #include "bucomm.h"
 #include "bfd.h"
 #include "getopt.h"
 #include "libiberty.h"
 #include "demangle.h"
 #include "bucomm.h"
-#include "budemang.h"
+#include "elf-bfd.h"
+
+static bfd_boolean unwind_inlines;     /* -i, unwind inlined functions. */
+static bfd_boolean with_addresses;     /* -a, show addresses.  */
+static bfd_boolean with_functions;     /* -f, show function names.  */
+static bfd_boolean do_demangle;                /* -C, demangle names.  */
+static bfd_boolean pretty_print;       /* -p, print on one line.  */
+static bfd_boolean base_names;         /* -s, strip directory names.  */
 
 
-static boolean with_functions; /* -f, show function names.  */
-static boolean do_demangle;    /* -C, demangle names.  */
-static boolean base_names;     /* -s, strip directory names.  */
+/* Flags passed to the name demangler.  */
+static int demangle_flags = DMGL_PARAMS | DMGL_ANSI;
 
 static int naddr;              /* Number of addresses to process.  */
 static char **addr;            /* Hex addresses to process.  */
 
 static int naddr;              /* Number of addresses to process.  */
 static char **addr;            /* Hex addresses to process.  */
@@ -48,44 +55,57 @@ static asymbol **syms;              /* Symbol table.  */
 
 static struct option long_options[] =
 {
 
 static struct option long_options[] =
 {
+  {"addresses", no_argument, NULL, 'a'},
   {"basenames", no_argument, NULL, 's'},
   {"demangle", optional_argument, NULL, 'C'},
   {"exe", required_argument, NULL, 'e'},
   {"functions", no_argument, NULL, 'f'},
   {"basenames", no_argument, NULL, 's'},
   {"demangle", optional_argument, NULL, 'C'},
   {"exe", required_argument, NULL, 'e'},
   {"functions", no_argument, NULL, 'f'},
+  {"inlines", no_argument, NULL, 'i'},
+  {"pretty-print", no_argument, NULL, 'p'},
+  {"recurse-limit", no_argument, NULL, 'R'},
+  {"recursion-limit", no_argument, NULL, 'R'},  
+  {"no-recurse-limit", no_argument, NULL, 'r'},
+  {"no-recursion-limit", no_argument, NULL, 'r'},  
+  {"section", required_argument, NULL, 'j'},
   {"target", required_argument, NULL, 'b'},
   {"help", no_argument, NULL, 'H'},
   {"version", no_argument, NULL, 'V'},
   {0, no_argument, 0, 0}
 };
 
   {"target", required_argument, NULL, 'b'},
   {"help", no_argument, NULL, 'H'},
   {"version", no_argument, NULL, 'V'},
   {0, no_argument, 0, 0}
 };
 
-static void usage PARAMS ((FILE *, int));
-static void slurp_symtab PARAMS ((bfd *));
-static void find_address_in_section PARAMS ((bfd *, asection *, PTR));
-static void translate_addresses PARAMS ((bfd *));
-static void process_file PARAMS ((const char *, const char *));
+static void usage (FILE *, int);
+static void slurp_symtab (bfd *);
+static void find_address_in_section (bfd *, asection *, void *);
+static void find_offset_in_section (bfd *, asection *);
+static void translate_addresses (bfd *, asection *);
 \f
 /* Print a usage message to STREAM and exit with STATUS.  */
 
 static void
 \f
 /* Print a usage message to STREAM and exit with STATUS.  */
 
 static void
-usage (stream, status)
-     FILE *stream;
-     int status;
+usage (FILE *stream, int status)
 {
   fprintf (stream, _("Usage: %s [option(s)] [addr(s)]\n"), program_name);
   fprintf (stream, _(" Convert addresses into line number/file name pairs.\n"));
   fprintf (stream, _(" If no addresses are specified on the command line, they will be read from stdin\n"));
   fprintf (stream, _(" The options are:\n\
 {
   fprintf (stream, _("Usage: %s [option(s)] [addr(s)]\n"), program_name);
   fprintf (stream, _(" Convert addresses into line number/file name pairs.\n"));
   fprintf (stream, _(" If no addresses are specified on the command line, they will be read from stdin\n"));
   fprintf (stream, _(" The options are:\n\
+  @<file>                Read options from <file>\n\
+  -a --addresses         Show addresses\n\
   -b --target=<bfdname>  Set the binary file format\n\
   -e --exe=<executable>  Set the input file name (default is a.out)\n\
   -b --target=<bfdname>  Set the binary file format\n\
   -e --exe=<executable>  Set the input file name (default is a.out)\n\
+  -i --inlines           Unwind inlined functions\n\
+  -j --section=<name>    Read section-relative offsets instead of addresses\n\
+  -p --pretty-print      Make the output easier to read for humans\n\
   -s --basenames         Strip directory names\n\
   -f --functions         Show function names\n\
   -C --demangle[=style]  Demangle function names\n\
   -s --basenames         Strip directory names\n\
   -f --functions         Show function names\n\
   -C --demangle[=style]  Demangle function names\n\
+  -R --recurse-limit     Enable a limit on recursion whilst demangling.  [Default]\n\
+  -r --no-recurse-limit  Disable a limit on recursion whilst demangling\n\
   -h --help              Display this information\n\
   -v --version           Display the program's version\n\
 \n"));
 
   list_supported_targets (program_name, stream);
   -h --help              Display this information\n\
   -v --version           Display the program's version\n\
 \n"));
 
   list_supported_targets (program_name, stream);
-  if (status == 0)
+  if (REPORT_BUGS_TO[0] && status == 0)
     fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
   exit (status);
 }
     fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
   exit (status);
 }
@@ -93,24 +113,50 @@ usage (stream, status)
 /* Read in the symbol table.  */
 
 static void
 /* Read in the symbol table.  */
 
 static void
-slurp_symtab (abfd)
-     bfd *abfd;
+slurp_symtab (bfd *abfd)
 {
   long storage;
   long symcount;
 {
   long storage;
   long symcount;
+  bfd_boolean dynamic = FALSE;
 
   if ((bfd_get_file_flags (abfd) & HAS_SYMS) == 0)
     return;
 
   storage = bfd_get_symtab_upper_bound (abfd);
 
   if ((bfd_get_file_flags (abfd) & HAS_SYMS) == 0)
     return;
 
   storage = bfd_get_symtab_upper_bound (abfd);
+  if (storage == 0)
+    {
+      storage = bfd_get_dynamic_symtab_upper_bound (abfd);
+      dynamic = TRUE;
+    }
   if (storage < 0)
     bfd_fatal (bfd_get_filename (abfd));
 
   syms = (asymbol **) xmalloc (storage);
   if (storage < 0)
     bfd_fatal (bfd_get_filename (abfd));
 
   syms = (asymbol **) xmalloc (storage);
-
-  symcount = bfd_canonicalize_symtab (abfd, syms);
+  if (dynamic)
+    symcount = bfd_canonicalize_dynamic_symtab (abfd, syms);
+  else
+    symcount = bfd_canonicalize_symtab (abfd, syms);
   if (symcount < 0)
     bfd_fatal (bfd_get_filename (abfd));
   if (symcount < 0)
     bfd_fatal (bfd_get_filename (abfd));
+
+  /* If there are no symbols left after canonicalization and
+     we have not tried the dynamic symbols then give them a go.  */
+  if (symcount == 0
+      && ! dynamic
+      && (storage = bfd_get_dynamic_symtab_upper_bound (abfd)) > 0)
+    {
+      free (syms);
+      syms = xmalloc (storage);
+      symcount = bfd_canonicalize_dynamic_symtab (abfd, syms);
+    }
+
+  /* PR 17512: file: 2a1d3b5b.
+     Do not pretend that we have some symbols when we don't.  */
+  if (symcount <= 0)
+    {
+      free (syms);
+      syms = NULL;
+    }
 }
 \f
 /* These global variables are used to pass information between
 }
 \f
 /* These global variables are used to pass information between
@@ -120,16 +166,15 @@ static bfd_vma pc;
 static const char *filename;
 static const char *functionname;
 static unsigned int line;
 static const char *filename;
 static const char *functionname;
 static unsigned int line;
-static boolean found;
+static unsigned int discriminator;
+static bfd_boolean found;
 
 /* Look for an address in a section.  This is called via
    bfd_map_over_sections.  */
 
 static void
 
 /* Look for an address in a section.  This is called via
    bfd_map_over_sections.  */
 
 static void
-find_address_in_section (abfd, section, data)
-     bfd *abfd;
-     asection *section;
-     PTR data ATTRIBUTE_UNUSED;
+find_address_in_section (bfd *abfd, asection *section,
+                        void *data ATTRIBUTE_UNUSED)
 {
   bfd_vma vma;
   bfd_size_type size;
 {
   bfd_vma vma;
   bfd_size_type size;
@@ -137,27 +182,49 @@ find_address_in_section (abfd, section, data)
   if (found)
     return;
 
   if (found)
     return;
 
-  if ((bfd_get_section_flags (abfd, section) & SEC_ALLOC) == 0)
+  if ((bfd_section_flags (section) & SEC_ALLOC) == 0)
     return;
 
     return;
 
-  vma = bfd_get_section_vma (abfd, section);
+  vma = bfd_section_vma (section);
   if (pc < vma)
     return;
 
   if (pc < vma)
     return;
 
-  size = bfd_get_section_size_before_reloc (section);
+  size = bfd_section_size (section);
   if (pc >= vma + size)
     return;
 
   if (pc >= vma + size)
     return;
 
-  found = bfd_find_nearest_line (abfd, section, syms, pc - vma,
-                                &filename, &functionname, &line);
+  found = bfd_find_nearest_line_discriminator (abfd, section, syms, pc - vma,
+                                               &filename, &functionname,
+                                               &line, &discriminator);
+}
+
+/* Look for an offset in a section.  This is directly called.  */
+
+static void
+find_offset_in_section (bfd *abfd, asection *section)
+{
+  bfd_size_type size;
+
+  if (found)
+    return;
+
+  if ((bfd_section_flags (section) & SEC_ALLOC) == 0)
+    return;
+
+  size = bfd_section_size (section);
+  if (pc >= size)
+    return;
+
+  found = bfd_find_nearest_line_discriminator (abfd, section, syms, pc,
+                                               &filename, &functionname,
+                                               &line, &discriminator);
 }
 
 /* Read hexadecimal addresses from stdin, translate into
    file_name:line_number and optionally function name.  */
 
 static void
 }
 
 /* Read hexadecimal addresses from stdin, translate into
    file_name:line_number and optionally function name.  */
 
 static void
-translate_addresses (abfd)
-     bfd *abfd;
+translate_addresses (bfd *abfd, asection *section)
 {
   int read_stdin = (naddr == 0);
 
 {
   int read_stdin = (naddr == 0);
 
@@ -179,47 +246,112 @@ translate_addresses (abfd)
          pc = bfd_scan_vma (*addr++, NULL, 16);
        }
 
          pc = bfd_scan_vma (*addr++, NULL, 16);
        }
 
-      found = false;
-      bfd_map_over_sections (abfd, find_address_in_section, (PTR) NULL);
+      if (bfd_get_flavour (abfd) == bfd_target_elf_flavour)
+       {
+         const struct elf_backend_data *bed = get_elf_backend_data (abfd);
+         bfd_vma sign = (bfd_vma) 1 << (bed->s->arch_size - 1);
+
+         pc &= (sign << 1) - 1;
+         if (bed->sign_extend_vma)
+           pc = (pc ^ sign) - sign;
+       }
+
+      if (with_addresses)
+        {
+          printf ("0x");
+          bfd_printf_vma (abfd, pc);
+
+          if (pretty_print)
+            printf (": ");
+          else
+            printf ("\n");
+        }
+
+      found = FALSE;
+      if (section)
+       find_offset_in_section (abfd, section);
+      else
+       bfd_map_over_sections (abfd, find_address_in_section, NULL);
 
       if (! found)
        {
          if (with_functions)
 
       if (! found)
        {
          if (with_functions)
-           printf ("??\n");
+           {
+             if (pretty_print)
+               printf ("?? ");
+             else
+               printf ("??\n");
+           }
          printf ("??:0\n");
        }
       else
        {
          printf ("??:0\n");
        }
       else
        {
-         if (with_functions)
-           {
-             const char *name;
-             char *alloc = NULL;
-
-             name = functionname;
-             if (name == NULL || *name == '\0')
-               name = "??";
-             else if (do_demangle)
-               {
-                 alloc = demangle (abfd, name);
-                 name = alloc;
-               }
-
-             printf ("%s\n", name);
-
-             if (alloc != NULL)
-               free (alloc);
-           }
-
-         if (base_names && filename != NULL)
-           {
-             char *h;
-
-             h = strrchr (filename, '/');
-             if (h != NULL)
-               filename = h + 1;
-           }
-
-         printf ("%s:%u\n", filename ? filename : "??", line);
+         while (1)
+            {
+              if (with_functions)
+                {
+                  const char *name;
+                  char *alloc = NULL;
+
+                  name = functionname;
+                  if (name == NULL || *name == '\0')
+                    name = "??";
+                  else if (do_demangle)
+                    {
+                      alloc = bfd_demangle (abfd, name, demangle_flags);
+                      if (alloc != NULL)
+                        name = alloc;
+                    }
+
+                  printf ("%s", name);
+                  if (pretty_print)
+                   /* Note for translators:  This printf is used to join the
+                      function name just printed above to the line number/
+                      file name pair that is about to be printed below.  Eg:
+
+                        foo at 123:bar.c  */
+                    printf (_(" at "));
+                  else
+                    printf ("\n");
+
+                 free (alloc);
+                }
+
+              if (base_names && filename != NULL)
+                {
+                  char *h;
+
+                  h = strrchr (filename, '/');
+                  if (h != NULL)
+                    filename = h + 1;
+                }
+
+              printf ("%s:", filename ? filename : "??");
+             if (line != 0)
+                {
+                  if (discriminator != 0)
+                    printf ("%u (discriminator %u)\n", line, discriminator);
+                  else
+                    printf ("%u\n", line);
+                }
+             else
+               printf ("?\n");
+              if (!unwind_inlines)
+                found = FALSE;
+              else
+                found = bfd_find_inliner_info (abfd, &filename, &functionname,
+                                              &line);
+              if (! found)
+                break;
+              if (pretty_print)
+               /* Note for translators: This printf is used to join the
+                  line number/file name pair that has just been printed with
+                  the line number/file name pair that is going to be printed
+                  by the next iteration of the while loop.  Eg:
+
+                    123:bar.c (inlined by) 456:main.c  */
+                printf (_(" (inlined by) "));
+            }
        }
 
       /* fflush() is essential for using this command as a server
        }
 
       /* fflush() is essential for using this command as a server
@@ -230,22 +362,28 @@ translate_addresses (abfd)
     }
 }
 
     }
 }
 
-/* Process a file.  */
+/* Process a file.  Returns an exit value for main().  */
 
 
-static void
-process_file (file_name, target)
-     const char *file_name;
-     const char *target;
+static int
+process_file (const char *file_name, const char *section_name,
+             const char *target)
 {
   bfd *abfd;
 {
   bfd *abfd;
+  asection *section;
   char **matching;
 
   char **matching;
 
+  if (get_file_size (file_name) < 1)
+    return 1;
+
   abfd = bfd_openr (file_name, target);
   if (abfd == NULL)
     bfd_fatal (file_name);
 
   abfd = bfd_openr (file_name, target);
   if (abfd == NULL)
     bfd_fatal (file_name);
 
+  /* Decompress sections.  */
+  abfd->flags |= BFD_DECOMPRESS;
+
   if (bfd_check_format (abfd, bfd_archive))
   if (bfd_check_format (abfd, bfd_archive))
-    fatal (_("%s: can not get addresses from archive"), file_name);
+    fatal (_("%s: cannot get addresses from archive"), file_name);
 
   if (! bfd_check_format_matches (abfd, bfd_object, &matching))
     {
 
   if (! bfd_check_format_matches (abfd, bfd_object, &matching))
     {
@@ -258,27 +396,32 @@ process_file (file_name, target)
       xexit (1);
     }
 
       xexit (1);
     }
 
+  if (section_name != NULL)
+    {
+      section = bfd_get_section_by_name (abfd, section_name);
+      if (section == NULL)
+       fatal (_("%s: cannot find section %s"), file_name, section_name);
+    }
+  else
+    section = NULL;
+
   slurp_symtab (abfd);
 
   slurp_symtab (abfd);
 
-  translate_addresses (abfd);
+  translate_addresses (abfd, section);
 
 
-  if (syms != NULL)
-    {
-      free (syms);
-      syms = NULL;
-    }
+  free (syms);
+  syms = NULL;
 
   bfd_close (abfd);
 
   bfd_close (abfd);
+
+  return 0;
 }
 \f
 }
 \f
-int main PARAMS ((int, char **));
-
 int
 int
-main (argc, argv)
-     int argc;
-     char **argv;
+main (int argc, char **argv)
 {
   const char *file_name;
 {
   const char *file_name;
+  const char *section_name;
   char *target;
   int c;
 
   char *target;
   int c;
 
@@ -293,24 +436,32 @@ main (argc, argv)
 
   program_name = *argv;
   xmalloc_set_program_name (program_name);
 
   program_name = *argv;
   xmalloc_set_program_name (program_name);
+  bfd_set_error_program_name (program_name);
 
 
-  bfd_init ();
+  expandargv (&argc, &argv);
+
+  if (bfd_init () != BFD_INIT_MAGIC)
+    fatal (_("fatal error: libbfd ABI mismatch"));
   set_default_bfd_target ();
 
   file_name = NULL;
   set_default_bfd_target ();
 
   file_name = NULL;
+  section_name = NULL;
   target = NULL;
   target = NULL;
-  while ((c = getopt_long (argc, argv, "b:Ce:sfHhVv", long_options, (int *) 0))
+  while ((c = getopt_long (argc, argv, "ab:Ce:rRsfHhij:pVv", long_options, (int *) 0))
         != EOF)
     {
       switch (c)
        {
        case 0:
          break;                /* We've been given a long option.  */
         != EOF)
     {
       switch (c)
        {
        case 0:
          break;                /* We've been given a long option.  */
+       case 'a':
+         with_addresses = TRUE;
+         break;
        case 'b':
          target = optarg;
          break;
        case 'C':
        case 'b':
          target = optarg;
          break;
        case 'C':
-         do_demangle = true;
+         do_demangle = TRUE;
          if (optarg != NULL)
            {
              enum demangling_styles style;
          if (optarg != NULL)
            {
              enum demangling_styles style;
@@ -323,15 +474,24 @@ main (argc, argv)
              cplus_demangle_set_style (style);
            }
          break;
              cplus_demangle_set_style (style);
            }
          break;
+       case 'r':
+         demangle_flags |= DMGL_NO_RECURSE_LIMIT;
+         break;
+       case 'R':
+         demangle_flags &= ~ DMGL_NO_RECURSE_LIMIT;
+         break;
        case 'e':
          file_name = optarg;
          break;
        case 's':
        case 'e':
          file_name = optarg;
          break;
        case 's':
-         base_names = true;
+         base_names = TRUE;
          break;
        case 'f':
          break;
        case 'f':
-         with_functions = true;
+         with_functions = TRUE;
          break;
          break;
+        case 'p':
+          pretty_print = TRUE;
+          break;
        case 'v':
        case 'V':
          print_version ("addr2line");
        case 'v':
        case 'V':
          print_version ("addr2line");
@@ -340,6 +500,12 @@ main (argc, argv)
        case 'H':
          usage (stdout, 0);
          break;
        case 'H':
          usage (stdout, 0);
          break;
+       case 'i':
+         unwind_inlines = TRUE;
+         break;
+       case 'j':
+         section_name = optarg;
+         break;
        default:
          usage (stderr, 1);
          break;
        default:
          usage (stderr, 1);
          break;
@@ -352,7 +518,5 @@ main (argc, argv)
   addr = argv + optind;
   naddr = argc - optind;
 
   addr = argv + optind;
   naddr = argc - optind;
 
-  process_file (file_name, target);
-
-  return 0;
+  return process_file (file_name, section_name, target);
 }
 }
This page took 0.029585 seconds and 4 git commands to generate.