gdb: add target_ops::supports_displaced_step
[deliverable/binutils-gdb.git] / gdb / mipsread.c
index 8e7d19d33d8d3a1ef966b51c784639c3dc33e93f..6e39538e952d1ce53123f3d6e077b6d53f361227 100644 (file)
@@ -1,37 +1,34 @@
 /* Read a symbol table in MIPS' format (Third-Eye).
-   Copyright 1986, 1987, 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996
-   Free Software Foundation, Inc.
+
+   Copyright (C) 1986-2020 Free Software Foundation, Inc.
+
    Contributed by Alessandro Forin (af@cs.cmu.edu) at CMU.  Major work
    by Per Bothner, John Gilmore and Ian Lance Taylor at Cygnus Support.
 
-This file is part of GDB.
+   This file is part of GDB.
 
-This program is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2 of the License, or
-(at your option) any later version.
+   This program is 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 3 of the License, or
+   (at your option) any later version.
 
-This program is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
 
-You should have received a copy of the GNU General Public License
-along with this program; if not, write to the Free Software
-Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
 
 /* Read symbols from an ECOFF file.  Most of the work is done in
    mdebugread.c.  */
 
 #include "defs.h"
-#include "gdb_string.h"
 #include "bfd.h"
 #include "symtab.h"
-#include "symfile.h"
 #include "objfiles.h"
-#include "buildsym.h"
 #include "stabsread.h"
-#include "gdb-stabs.h"
+#include "mdebugread.h"
 
 #include "coff/sym.h"
 #include "coff/internal.h"
@@ -39,260 +36,194 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 #include "libcoff.h"           /* Private BFD COFF information.  */
 #include "libecoff.h"          /* Private BFD ECOFF information.  */
 #include "elf/common.h"
+#include "elf/internal.h"
 #include "elf/mips.h"
 
-static void
-mipscoff_new_init PARAMS ((struct objfile *));
-
-static void
-mipscoff_symfile_init PARAMS ((struct objfile *));
-
-static void
-mipscoff_symfile_read PARAMS ((struct objfile *, struct section_offsets *,
-                              int));
-
-static void
-mipscoff_symfile_finish PARAMS ((struct objfile *));
+#include "psymtab.h"
 
 static void
-read_alphacoff_dynamic_symtab PARAMS ((struct section_offsets *,
-                                      struct objfile *objfile));
+read_alphacoff_dynamic_symtab (minimal_symbol_reader &,
+                              struct objfile *objfile);
 
 /* Initialize anything that needs initializing when a completely new
    symbol file is specified (not just adding some symbols from another
    file, e.g. a shared library).  */
 
-extern CORE_ADDR sigtramp_address;
-
 static void
-mipscoff_new_init (ignore)
-     struct objfile *ignore;
+mipscoff_new_init (struct objfile *ignore)
 {
-  sigtramp_address = 0;
   stabsread_new_init ();
-  buildsym_new_init ();
 }
 
 /* Initialize to read a symbol file (nothing to do).  */
 
 static void
-mipscoff_symfile_init (objfile)
-     struct objfile *objfile;
+mipscoff_symfile_init (struct objfile *objfile)
 {
 }
 
 /* Read a symbol file from a file.  */
 
 static void
-mipscoff_symfile_read (objfile, section_offsets, mainline)
-     struct objfile *objfile;
-     struct section_offsets *section_offsets;
-     int mainline;
+mipscoff_symfile_read (struct objfile *objfile, symfile_add_flags symfile_flags)
 {
   bfd *abfd = objfile->obfd;
-  struct cleanup * back_to;
 
-  init_minimal_symbol_collection ();
-  back_to = make_cleanup (discard_minimal_symbols, 0);
+  minimal_symbol_reader reader (objfile);
 
   /* Now that the executable file is positioned at symbol table,
      process it and define symbols accordingly.  */
 
   if (!((*ecoff_backend (abfd)->debug_swap.read_debug_info)
-       (abfd, (asection *) NULL, &ecoff_data (abfd)->debug_info)))
-    error ("Error reading symbol table: %s", bfd_errmsg (bfd_get_error ()));
+       (abfd, NULL, &ecoff_data (abfd)->debug_info)))
+    error (_("Error reading symbol table: %s"), bfd_errmsg (bfd_get_error ()));
 
-  mdebug_build_psymtabs (objfile, &ecoff_backend (abfd)->debug_swap,
-                        &ecoff_data (abfd)->debug_info, section_offsets);
+  mdebug_build_psymtabs (reader, objfile, &ecoff_backend (abfd)->debug_swap,
+                        &ecoff_data (abfd)->debug_info);
 
   /* Add alpha coff dynamic symbols.  */
 
-  read_alphacoff_dynamic_symtab (section_offsets, objfile);
+  read_alphacoff_dynamic_symtab (reader, objfile);
 
   /* Install any minimal symbols that have been collected as the current
-     minimal symbols for this objfile. */
-
-  install_minimal_symbols (objfile);
-
-  /* If the entry_file bounds are still unknown after processing the
-     partial symbols, then try to set them from the minimal symbols
-     surrounding the entry_point.  */
-
-  if (mainline
-      && objfile->ei.entry_point != INVALID_ENTRY_POINT
-      && objfile->ei.entry_file_lowpc == INVALID_ENTRY_LOWPC)
-    {
-      struct minimal_symbol *m;
-
-      m = lookup_minimal_symbol_by_pc (objfile->ei.entry_point);
-      if (m && SYMBOL_NAME (m + 1))
-       {
-         objfile->ei.entry_file_lowpc = SYMBOL_VALUE_ADDRESS (m);
-         objfile->ei.entry_file_highpc = SYMBOL_VALUE_ADDRESS (m + 1);
-       }
-    }
+     minimal symbols for this objfile.  */
 
-  do_cleanups (back_to);
+  reader.install ();
 }
 
 /* Perform any local cleanups required when we are done with a
    particular objfile.  */
 
 static void
-mipscoff_symfile_finish (objfile)
-     struct objfile *objfile;
+mipscoff_symfile_finish (struct objfile *objfile)
 {
 }
 
 /* Alpha OSF/1 encapsulates the dynamic symbols in ELF format in a
-   standard coff section.  The ELF format for the symbols differs from
-   the format defined in elf/external.h. It seems that a normal ELF 32 bit
-   format is used, and the representation only changes because longs are
-   64 bit on the alpha. In addition, the handling of text/data section
-   indices for symbols is different from the ELF ABI.
-   As the BFD linker currently does not support dynamic linking on the alpha,
-   there seems to be no reason to pollute BFD with another mixture of object
-   file formats for now.  */
+   standard COFF section.  The ELF format for the symbols differs from
+   the format defined in elf/external.h.  It seems that a normal ELF
+   32-bit format is used, and the representation only changes because
+   longs are 64-bit on the alpha.  In addition, the handling of
+   text/data section indices for symbols is different from the ELF
+   ABI.  As the BFD linker currently does not support dynamic linking
+   on the alpha, there seems to be no reason to pollute BFD with
+   another mixture of object file formats for now.  */
 
 /* Format of an alpha external ELF symbol.  */
 
-typedef struct {
-  unsigned char        st_name[4];             /* Symbol name, index in string tbl */
-  unsigned char        st_pad[4];              /* Pad to long word boundary */
-  unsigned char        st_value[8];            /* Value of the symbol */
-  unsigned char        st_size[4];             /* Associated symbol size */
-  unsigned char        st_info[1];             /* Type and binding attributes */
-  unsigned char        st_other[1];            /* No defined meaning, 0 */
-  unsigned char        st_shndx[2];            /* Associated section index */
+typedef struct
+{
+  unsigned char st_name[4];    /* Symbol name, index in string table.  */
+  unsigned char st_pad[4];     /* Pad to long word boundary.  */
+  unsigned char st_value[8];   /* Value of the symbol.  */
+  unsigned char st_size[4];    /* Associated symbol size.  */
+  unsigned char st_info[1];    /* Type and binding attributes.  */
+  unsigned char st_other[1];   /* No defined meaning, 0.  */
+  unsigned char st_shndx[2];   /* Associated section index.  */
 } Elfalpha_External_Sym;
 
 /* Format of an alpha external ELF dynamic info structure.  */
 
-typedef struct {
-  unsigned char        d_tag[4];               /* Tag */
-  unsigned char        d_pad[4];               /* Pad to long word boundary */
-  union {
-    unsigned char d_ptr[8];            /* Pointer value */
-    unsigned char d_val[4];            /* Integer value */
-  } d_un;
+typedef struct
+{
+  unsigned char d_tag[4];      /* Tag.  */
+  unsigned char d_pad[4];      /* Pad to long word boundary.  */
+  union
+  {
+    unsigned char d_ptr[8];    /* Pointer value.  */
+    unsigned char d_val[4];    /* Integer value.  */
+  }
+  d_un;
 } Elfalpha_External_Dyn;
 
 /* Struct to obtain the section pointers for alpha dynamic symbol info.  */
 
-struct alphacoff_dynsecinfo {
-  asection *sym_sect;          /* Section pointer for .dynsym section */
-  asection *str_sect;          /* Section pointer for .dynstr section */
-  asection *dyninfo_sect;      /* Section pointer for .dynamic section */
-  asection *got_sect;          /* Section pointer for .got section */
+struct alphacoff_dynsecinfo
+{
+  asection *sym_sect;          /* Section pointer for .dynsym section.  */
+  asection *str_sect;          /* Section pointer for .dynstr section.  */
+  asection *dyninfo_sect;      /* Section pointer for .dynamic section.  */
+  asection *got_sect;          /* Section pointer for .got section.  */
 };
 
-static void
-alphacoff_locate_sections PARAMS ((bfd *, asection *, void *));
-
 /* We are called once per section from read_alphacoff_dynamic_symtab.
-   We need to examine each section we are passed, check to see
-   if it is something we are interested in processing, and
-   if so, stash away some access information for the section.  */
+   We need to examine each section we are passed, check to see if it
+   is something we are interested in processing, and if so, stash away
+   some access information for the section.  */
 
 static void
-alphacoff_locate_sections (ignore_abfd, sectp, sip)
-     bfd *ignore_abfd;
-     asection *sectp;
-     PTR sip;
+alphacoff_locate_sections (bfd *ignore_abfd, asection *sectp, void *sip)
 {
-  register struct alphacoff_dynsecinfo *si;
+  struct alphacoff_dynsecinfo *si;
 
   si = (struct alphacoff_dynsecinfo *) sip;
 
-  if (STREQ (sectp->name, ".dynsym"))
-    {
-      si->sym_sect = sectp;
-    }
-  else if (STREQ (sectp->name, ".dynstr"))
-    {
-      si->str_sect = sectp;
-    }
-  else if (STREQ (sectp->name, ".dynamic"))
-    {
-      si->dyninfo_sect = sectp;
-    }
-  else if (STREQ (sectp->name, ".got"))
-    {
+  if (strcmp (sectp->name, ".dynsym") == 0)
+    si->sym_sect = sectp;
+  else if (strcmp (sectp->name, ".dynstr") == 0)
+    si->str_sect = sectp;
+  else if (strcmp (sectp->name, ".dynamic") == 0)
+    si->dyninfo_sect = sectp;
+  else if (strcmp (sectp->name, ".got") == 0)
       si->got_sect = sectp;
-    }
 }
 
-/* Scan an alpha dynamic symbol table for symbols of interest and
-   add them to the minimal symbol table.  */
+/* Scan an alpha dynamic symbol table for symbols of interest and add
+   them to the minimal symbol table.  */
 
 static void
-read_alphacoff_dynamic_symtab (section_offsets, objfile)
-     struct section_offsets *section_offsets;
-     struct objfile *objfile;
+read_alphacoff_dynamic_symtab (minimal_symbol_reader &reader,
+                              struct objfile *objfile)
 {
   bfd *abfd = objfile->obfd;
   struct alphacoff_dynsecinfo si;
-  char *sym_secptr;
-  char *str_secptr;
-  char *dyninfo_secptr;
-  char *got_secptr;
-  bfd_size_type sym_secsize;
-  bfd_size_type str_secsize;
-  bfd_size_type dyninfo_secsize;
-  bfd_size_type got_secsize;
   int sym_count;
   int i;
   int stripped;
   Elfalpha_External_Sym *x_symp;
-  char *dyninfo_p;
-  char *dyninfo_end;
+  gdb_byte *dyninfo_p;
+  gdb_byte *dyninfo_end;
   int got_entry_size = 8;
   int dt_mips_local_gotno = -1;
   int dt_mips_gotsym = -1;
 
-
   /* We currently only know how to handle alpha dynamic symbols.  */
   if (bfd_get_arch (abfd) != bfd_arch_alpha)
     return;
 
   /* Locate the dynamic symbols sections and read them in.  */
   memset ((char *) &si, 0, sizeof (si));
-  bfd_map_over_sections (abfd, alphacoff_locate_sections, (PTR) &si);
-  if (si.sym_sect == NULL
-      || si.str_sect == NULL
-      || si.dyninfo_sect == NULL
-      || si.got_sect == NULL)
+  bfd_map_over_sections (abfd, alphacoff_locate_sections, (void *) & si);
+  if (si.sym_sect == NULL || si.str_sect == NULL
+      || si.dyninfo_sect == NULL || si.got_sect == NULL)
     return;
 
-  sym_secsize = bfd_get_section_size_before_reloc (si.sym_sect);
-  str_secsize = bfd_get_section_size_before_reloc (si.str_sect);
-  dyninfo_secsize = bfd_get_section_size_before_reloc (si.dyninfo_sect);
-  got_secsize = bfd_get_section_size_before_reloc (si.got_sect);
-  sym_secptr = alloca (sym_secsize);
-  str_secptr = alloca (str_secsize);
-  dyninfo_secptr = alloca (dyninfo_secsize);
-  got_secptr = alloca (got_secsize);
-
-  if (!bfd_get_section_contents (abfd, si.sym_sect, sym_secptr,
-                                (file_ptr)0, sym_secsize))
+  gdb::byte_vector sym_sec (bfd_section_size (si.sym_sect));
+  gdb::byte_vector str_sec (bfd_section_size (si.str_sect));
+  gdb::byte_vector dyninfo_sec (bfd_section_size (si.dyninfo_sect));
+  gdb::byte_vector got_sec (bfd_section_size (si.got_sect));
+
+  if (!bfd_get_section_contents (abfd, si.sym_sect, sym_sec.data (),
+                                (file_ptr) 0, sym_sec.size ()))
     return;
-  if (!bfd_get_section_contents (abfd, si.str_sect, str_secptr,
-                                (file_ptr)0, str_secsize))
+  if (!bfd_get_section_contents (abfd, si.str_sect, str_sec.data (),
+                                (file_ptr) 0, str_sec.size ()))
     return;
-  if (!bfd_get_section_contents (abfd, si.dyninfo_sect, dyninfo_secptr,
-                                (file_ptr)0, dyninfo_secsize))
+  if (!bfd_get_section_contents (abfd, si.dyninfo_sect, dyninfo_sec.data (),
+                                (file_ptr) 0, dyninfo_sec.size ()))
     return;
-  if (!bfd_get_section_contents (abfd, si.got_sect, got_secptr,
-                                (file_ptr)0, got_secsize))
+  if (!bfd_get_section_contents (abfd, si.got_sect, got_sec.data (),
+                                (file_ptr) 0, got_sec.size ()))
     return;
 
   /* Find the number of local GOT entries and the index for the
-     the first dynamic symbol in the GOT. */
-  for (dyninfo_p = dyninfo_secptr, dyninfo_end = dyninfo_p + dyninfo_secsize;
+     first dynamic symbol in the GOT.  */
+  for ((dyninfo_p = dyninfo_sec.data (),
+       dyninfo_end = dyninfo_p + dyninfo_sec.size ());
        dyninfo_p < dyninfo_end;
        dyninfo_p += sizeof (Elfalpha_External_Dyn))
     {
-      Elfalpha_External_Dyn *x_dynp = (Elfalpha_External_Dyn *)dyninfo_p;
+      Elfalpha_External_Dyn *x_dynp = (Elfalpha_External_Dyn *) dyninfo_p;
       long dyn_tag;
 
       dyn_tag = bfd_h_get_32 (abfd, (bfd_byte *) x_dynp->d_tag);
@@ -314,13 +245,13 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
   if (dt_mips_local_gotno < 0 || dt_mips_gotsym < 0)
     return;
 
-  /* Scan all dynamic symbols and enter them into the minimal symbol table
-     if appropriate.  */
-  sym_count = sym_secsize / sizeof (Elfalpha_External_Sym);
+  /* Scan all dynamic symbols and enter them into the minimal symbol
+     table if appropriate.  */
+  sym_count = sym_sec.size () / sizeof (Elfalpha_External_Sym);
   stripped = (bfd_get_symcount (abfd) == 0);
 
   /* Skip first symbol, which is a null dummy.  */
-  for (i = 1, x_symp = (Elfalpha_External_Sym *) sym_secptr + 1;
+  for (i = 1, x_symp = (Elfalpha_External_Sym *) sym_sec.data () + 1;
        i < sym_count;
        i++, x_symp++)
     {
@@ -333,15 +264,17 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
       enum minimal_symbol_type ms_type;
 
       strx = bfd_h_get_32 (abfd, (bfd_byte *) x_symp->st_name);
-      if (strx >= str_secsize)
+      if (strx >= str_sec.size ())
        continue;
-      name = str_secptr + strx;
+      name = (char *) (str_sec.data () + strx);
       if (*name == '\0' || *name == '.')
        continue;
 
       sym_value = bfd_h_get_64 (abfd, (bfd_byte *) x_symp->st_value);
       sym_info = bfd_h_get_8 (abfd, (bfd_byte *) x_symp->st_info);
       sym_shndx = bfd_h_get_16 (abfd, (bfd_byte *) x_symp->st_shndx);
+      if (sym_shndx >= (SHN_LORESERVE & 0xffff))
+       sym_shndx += SHN_LORESERVE - (SHN_LORESERVE & 0xffff);
       isglobal = (ELF_ST_BIND (sym_info) == STB_GLOBAL);
 
       if (sym_shndx == SHN_UNDEF)
@@ -359,32 +292,38 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
 
             If sym_value is zero, then we have to get the GOT entry
             for the symbol.
-            If the GOT entry is nonzero, it represents the quickstart
-            address of the function and we use that as the symbol value.
 
-            If the GOT entry is zero, the function address has to be resolved
-            by the runtime loader before the executable is started.
-            We are unable to find any meaningful address for these
-            functions in the executable file, so we skip them.  */
+            If the GOT entry is nonzero, it represents the quickstart
+            address of the function and we use that as the symbol
+            value.
+
+            If the GOT entry is zero, the function address has to be
+            resolved by the runtime loader before the executable is
+            started.  We are unable to find any meaningful address
+            for these functions in the executable file, so we skip
+            them.  */
          if (sym_value == 0)
            {
              int got_entry_offset =
                (i - dt_mips_gotsym + dt_mips_local_gotno) * got_entry_size;
 
-             if (got_entry_offset < 0 || got_entry_offset >= got_secsize)
+             if (got_entry_offset < 0
+                 || got_entry_offset >= got_sec.size ())
                continue;
              sym_value =
                bfd_h_get_64 (abfd,
-                             (bfd_byte *) (got_secptr + got_entry_offset));
+                             (bfd_byte *) (got_sec.data ()
+                                           + got_entry_offset));
              if (sym_value == 0)
                continue;
            }
        }
       else
        {
-         /* Symbols defined in the executable itself. We only care about
-            them if this is a stripped executable, otherwise they have
-            been retrieved from the normal symbol table already.  */
+         /* Symbols defined in the executable itself.  We only care
+            about them if this is a stripped executable, otherwise
+            they have been retrieved from the normal symbol table
+            already.  */
          if (!stripped)
            continue;
 
@@ -394,7 +333,6 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
                ms_type = mst_text;
              else
                ms_type = mst_file_text;
-             sym_value += ANOFFSET (section_offsets, SECT_OFF_TEXT);
            }
          else if (sym_shndx == SHN_MIPS_DATA)
            {
@@ -402,7 +340,6 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
                ms_type = mst_data;
              else
                ms_type = mst_file_data;
-             sym_value += ANOFFSET (section_offsets, SECT_OFF_DATA);
            }
          else if (sym_shndx == SHN_MIPS_ACOMMON)
            {
@@ -410,7 +347,6 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
                ms_type = mst_bss;
              else
                ms_type = mst_file_bss;
-             sym_value += ANOFFSET (section_offsets, SECT_OFF_BSS);
            }
          else if (sym_shndx == SHN_ABS)
            {
@@ -422,30 +358,30 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
            }
        }
 
-      prim_record_minimal_symbol (obsavestring (name,
-                                               strlen (name),
-                                               &objfile -> symbol_obstack),
-                                 sym_value,
-                                 ms_type,
-                                 objfile);
+      reader.record (name, sym_value, ms_type);
     }
 }
 
-/* Initialization */
+/* Initialization */
 
-static struct sym_fns ecoff_sym_fns =
+static const struct sym_fns ecoff_sym_fns =
 {
-  bfd_target_ecoff_flavour,
-  mipscoff_new_init,           /* sym_new_init: init anything gbl to entire symtab */
-  mipscoff_symfile_init,       /* sym_init: read initial info, setup for sym_read() */
-  mipscoff_symfile_read,       /* sym_read: read a symbol file into symtab */
-  mipscoff_symfile_finish,     /* sym_finish: finished with file, cleanup */
-  default_symfile_offsets,     /* sym_offsets: dummy FIXME til implem sym reloc */
-  NULL                         /* next: pointer to next struct sym_fns */
+  mipscoff_new_init,           /* init anything gbl to entire symtab */
+  mipscoff_symfile_init,       /* read initial info, setup for sym_read() */
+  mipscoff_symfile_read,       /* read a symbol file into symtab */
+  NULL,                                /* sym_read_psymbols */
+  mipscoff_symfile_finish,     /* finished with file, cleanup */
+  default_symfile_offsets,     /* dummy FIXME til implem sym reloc */
+  default_symfile_segments,    /* Get segment information from a file.  */
+  NULL,
+  default_symfile_relocate,    /* Relocate a debug section.  */
+  NULL,                                /* sym_probe_fns */
+  &psym_functions
 };
 
+void _initialize_mipsread ();
 void
 _initialize_mipsread ()
 {
-  add_symtab_fns (&ecoff_sym_fns);
+  add_symtab_fns (bfd_target_ecoff_flavour, &ecoff_sym_fns);
 }
This page took 0.032607 seconds and 4 git commands to generate.