* binutils-all/readelf.exp (-wi test): Add cris-*-* to xfails.
[deliverable/binutils-gdb.git] / gdb / mipsread.c
index 9a90dd16d270a5ff0ea48a165091ff4651a59f42..1a1c6683296a7e4e4fc638d5cb928b5d54b2feb6 100644 (file)
@@ -1,30 +1,31 @@
 /* Read a symbol table in MIPS' format (Third-Eye).
-   Copyright 1986, 1987, 1989, 1990, 1991, 1992, 1993, 1994
+   Copyright 1986, 87, 89, 90, 91, 92, 93, 94, 95, 96, 1998
    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 2 of the License, or
+   (at your option) any later version.
 
-This program is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
+   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., 675 Mass Ave, Cambridge, MA 02139, USA.  */
+   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.  */
 
 /* Read symbols from an ECOFF file.  Most of the work is done in
    mdebugread.c.  */
 
 #include "defs.h"
-#include <string.h>
+#include "gdb_string.h"
 #include "bfd.h"
 #include "symtab.h"
 #include "symfile.h"
@@ -41,25 +42,19 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 #include "elf/common.h"
 #include "elf/mips.h"
 
-static void
-mipscoff_new_init PARAMS ((struct objfile *));
+extern void _initialize_mipsread (void);
 
-static void
-mipscoff_symfile_init PARAMS ((struct objfile *));
+static void mipscoff_new_init (struct objfile *);
 
-static void
-mipscoff_symfile_read PARAMS ((struct objfile *, struct section_offsets *,
-                              int));
+static void mipscoff_symfile_init (struct objfile *);
 
-static void
-mipscoff_symfile_finish PARAMS ((struct objfile *));
+static void mipscoff_symfile_read (struct objfile *, int);
 
-static struct section_offsets *
-mipscoff_symfile_offsets PARAMS ((struct objfile *, CORE_ADDR));
+static void mipscoff_symfile_finish (struct objfile *);
 
 static void
-read_alphacoff_dynamic_symtab PARAMS ((struct section_offsets *,
-                                      struct objfile *objfile));
+read_alphacoff_dynamic_symtab (struct section_offsets *,
+                              struct objfile *objfile);
 
 /* Initialize anything that needs initializing when a completely new
    symbol file is specified (not just adding some symbols from another
@@ -68,8 +63,7 @@ read_alphacoff_dynamic_symtab PARAMS ((struct section_offsets *,
 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 ();
@@ -79,51 +73,58 @@ mipscoff_new_init (ignore)
 /* 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, int mainline)
 {
   bfd *abfd = objfile->obfd;
-  struct cleanup * back_to;
+  struct cleanup *back_to;
 
   init_minimal_symbol_collection ();
-  back_to = make_cleanup (discard_minimal_symbols, 0);
+  back_to = make_cleanup_discard_minimal_symbols ();
 
   /* Now that the executable file is positioned at symbol table,
      process it and define symbols accordingly.  */
 
-  if (ecoff_slurp_symbolic_info (abfd) == false)
+  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 ()));
 
   mdebug_build_psymtabs (objfile, &ecoff_backend (abfd)->debug_swap,
-                        &ecoff_data (abfd)->debug_info, section_offsets);
+                        &ecoff_data (abfd)->debug_info);
 
-  /* Add the dynamic symbols if we are reading the main symbol table.  */
+  /* Add alpha coff dynamic symbols.  */
 
-  if (mainline)
-    read_alphacoff_dynamic_symtab (section_offsets, objfile);
-
-  if (!have_partial_symbols ())
-    {
-      wrap_here ("");
-      printf_filtered ("(no debugging symbols found)...");
-      wrap_here ("");
-    }
+  read_alphacoff_dynamic_symtab (objfile->section_offsets, 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);
+       }
+    }
+
   do_cleanups (back_to);
 }
 
@@ -131,34 +132,10 @@ mipscoff_symfile_read (objfile, section_offsets, mainline)
    particular objfile.  */
 
 static void
-mipscoff_symfile_finish (objfile)
-     struct objfile *objfile;
+mipscoff_symfile_finish (struct objfile *objfile)
 {
 }
 
-/* Fake up identical offsets for all sections.  */
-
-static struct section_offsets *
-mipscoff_symfile_offsets (objfile, addr)
-     struct objfile *objfile;
-     CORE_ADDR addr;
-{
-  struct section_offsets *section_offsets;
-  int i;
-
-  objfile->num_sections = SECT_OFF_MAX;
-  section_offsets = ((struct section_offsets *)
-                    obstack_alloc (&objfile->psymbol_obstack,
-                                   (sizeof (struct section_offsets)
-                                    + (sizeof (section_offsets->offsets)
-                                       * (SECT_OFF_MAX - 1)))));
-
-  for (i = 0; i < SECT_OFF_MAX; i++)
-    ANOFFSET (section_offsets, i) = addr;
-
-  return section_offsets;
-}
-
 /* 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
@@ -171,38 +148,44 @@ mipscoff_symfile_offsets (objfile, addr)
 
 /* 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 */
-} Elfalpha_External_Sym;
+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 */
+}
+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;
-} Elfalpha_External_Dyn;
+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 *));
+static void alphacoff_locate_sections (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
@@ -210,10 +193,7 @@ alphacoff_locate_sections PARAMS ((bfd *, asection *, void *));
    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, PTR sip)
 {
   register struct alphacoff_dynsecinfo *si;
 
@@ -241,9 +221,8 @@ alphacoff_locate_sections (ignore_abfd, sectp, sip)
    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 (struct section_offsets *section_offsets,
+                              struct objfile *objfile)
 {
   bfd *abfd = objfile->obfd;
   struct alphacoff_dynsecinfo si;
@@ -272,7 +251,7 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
 
   /* 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);
+  bfd_map_over_sections (abfd, alphacoff_locate_sections, (PTR) & si);
   if (si.sym_sect == NULL
       || si.str_sect == NULL
       || si.dyninfo_sect == NULL
@@ -289,16 +268,16 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
   got_secptr = alloca (got_secsize);
 
   if (!bfd_get_section_contents (abfd, si.sym_sect, sym_secptr,
-                                (file_ptr)0, sym_secsize))
+                                (file_ptr) 0, sym_secsize))
     return;
   if (!bfd_get_section_contents (abfd, si.str_sect, str_secptr,
-                                (file_ptr)0, str_secsize))
+                                (file_ptr) 0, str_secsize))
     return;
   if (!bfd_get_section_contents (abfd, si.dyninfo_sect, dyninfo_secptr,
-                                (file_ptr)0, dyninfo_secsize))
+                                (file_ptr) 0, dyninfo_secsize))
     return;
   if (!bfd_get_section_contents (abfd, si.got_sect, got_secptr,
-                                (file_ptr)0, got_secsize))
+                                (file_ptr) 0, got_secsize))
     return;
 
   /* Find the number of local GOT entries and the index for the
@@ -307,7 +286,7 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
        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);
@@ -315,12 +294,15 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
        break;
       else if (dyn_tag == DT_MIPS_LOCAL_GOTNO)
        {
-         dt_mips_local_gotno = bfd_h_get_32 (abfd,
-                                             (bfd_byte *) x_dynp->d_un.d_val);
+         if (dt_mips_local_gotno < 0)
+           dt_mips_local_gotno
+             = bfd_h_get_32 (abfd, (bfd_byte *) x_dynp->d_un.d_val);
        }
       else if (dyn_tag == DT_MIPS_GOTSYM)
        {
-         dt_mips_gotsym = bfd_h_get_32 (abfd, (bfd_byte *) x_dynp->d_un.d_val);
+         if (dt_mips_gotsym < 0)
+           dt_mips_gotsym
+             = bfd_h_get_32 (abfd, (bfd_byte *) x_dynp->d_un.d_val);
        }
     }
   if (dt_mips_local_gotno < 0 || dt_mips_gotsym < 0)
@@ -381,7 +363,7 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
          if (sym_value == 0)
            {
              int got_entry_offset =
-               (i - dt_mips_gotsym + dt_mips_local_gotno) * got_entry_size;
+             (i - dt_mips_gotsym + dt_mips_local_gotno) * got_entry_size;
 
              if (got_entry_offset < 0 || got_entry_offset >= got_secsize)
                continue;
@@ -406,7 +388,7 @@ 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);
+             sym_value += ANOFFSET (section_offsets, SECT_OFF_TEXT (objfile));
            }
          else if (sym_shndx == SHN_MIPS_DATA)
            {
@@ -414,7 +396,7 @@ 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);
+             sym_value += ANOFFSET (section_offsets, SECT_OFF_DATA (objfile));
            }
          else if (sym_shndx == SHN_MIPS_ACOMMON)
            {
@@ -422,7 +404,7 @@ 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);
+             sym_value += ANOFFSET (section_offsets, SECT_OFF_BSS (objfile));
            }
          else if (sym_shndx == SHN_ABS)
            {
@@ -434,12 +416,7 @@ read_alphacoff_dynamic_symtab (section_offsets, objfile)
            }
        }
 
-      prim_record_minimal_symbol (obsavestring (name,
-                                               strlen (name),
-                                               &objfile -> symbol_obstack),
-                                 sym_value,
-                                 ms_type,
-                                 objfile);
+      prim_record_minimal_symbol (name, sym_value, ms_type, objfile);
     }
 }
 
@@ -452,12 +429,12 @@ static struct sym_fns ecoff_sym_fns =
   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 */
-  mipscoff_symfile_offsets,    /* sym_offsets: dummy FIXME til implem sym reloc */
+  default_symfile_offsets,     /* sym_offsets: dummy FIXME til implem sym reloc */
   NULL                         /* next: pointer to next struct sym_fns */
 };
 
 void
-_initialize_mipsread ()
+_initialize_mipsread (void)
 {
   add_symtab_fns (&ecoff_sym_fns);
 }
This page took 0.04576 seconds and 4 git commands to generate.