* somread.c (som_symtab_read): Handle dynamic relocation for both
authorJeff Law <law@redhat.com>
Thu, 9 Feb 1995 19:16:47 +0000 (19:16 +0000)
committerJeff Law <law@redhat.com>
Thu, 9 Feb 1995 19:16:47 +0000 (19:16 +0000)
text and data symbols.
(som_symfile_offsets): If objfile is a shared library, then get
text and data offsets from the shared library structures.
* somsolib.c (som_solib_add): Copy the bfd pointer from the
objfile rather than reopening the file again.
(som_solib_section_offsets): New function.
* somsolib.h (som_solib_section_offsets): Declare.

gdb/ChangeLog
gdb/somread.c
gdb/somsolib.c
gdb/somsolib.h

index f74db0a225f62d2b69610d615469a3965a67c114..dccc1f8f507f001e4d037e964706b37e58212dce 100644 (file)
@@ -1,3 +1,14 @@
+Thu Feb  9 12:09:09 1995  Jeff Law  (law@snake.cs.utah.edu)
+
+       * somread.c (som_symtab_read): Handle dynamic relocation for both
+       text and data symbols.
+       (som_symfile_offsets): If objfile is a shared library, then get
+       text and data offsets from the shared library structures.
+       * somsolib.c (som_solib_add): Copy the bfd pointer from the
+       objfile rather than reopening the file again.
+       (som_solib_section_offsets): New function.
+       * somsolib.h (som_solib_section_offsets): Declare.
+
 Wed Feb  8 20:32:18 1995  Jim Kingdon  <kingdon@deneb.cygnus.com>
 
        * config/sparc/tm-sun4sol2.h, dbxread.c: Rename
index afb7642e9cff99ca59d1db8d189d8a5b1ead57c2..ae04617d3d79cfae7593acd61384f6ead05d46f5 100644 (file)
@@ -103,11 +103,11 @@ som_symtab_read (abfd, objfile, section_offsets)
   struct symbol_dictionary_record *buf, *bufp, *endbufp;
   char *symname;
   CONST int symsize = sizeof (struct symbol_dictionary_record);
-  CORE_ADDR text_offset;
+  CORE_ADDR text_offset, data_offset;
 
 
-  /* FIXME.  Data stuff needs dynamic relocation too!  */
   text_offset = ANOFFSET (section_offsets, 0);
+  data_offset = ANOFFSET (section_offsets, 1);
 
   number_of_symbols = bfd_get_symcount (abfd);
 
@@ -190,6 +190,7 @@ som_symtab_read (abfd, objfile, section_offsets)
 
            case ST_DATA:
              symname = bufp->name.n_strx + stringtab;
+             bufp->symbol_value += data_offset;
              ms_type = mst_data;
              break;
            default:
@@ -270,6 +271,7 @@ som_symtab_read (abfd, objfile, section_offsets)
 
            case ST_DATA:
              symname = bufp->name.n_strx + stringtab;
+             bufp->symbol_value += data_offset;
              ms_type = mst_file_data;
              goto check_strange_names;
 
@@ -411,8 +413,13 @@ som_symfile_offsets (objfile, addr)
                   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;
+  /* First see if we're a shared library.  If so, get the section
+     offsets from the library, else get them from addr.  */
+  if (!som_solib_section_offsets (objfile, section_offsets))
+    {
+      for (i = 0; i < SECT_OFF_MAX; i++)
+       ANOFFSET (section_offsets, i) = addr;
+    }
 
   return section_offsets;
 }
index 41b6c2b5c4cf7c68f77987d6e08b7f1605e6f53c..a42654208c727f69ee6c867d350bbd457639c5f7 100644 (file)
@@ -338,8 +338,7 @@ som_solib_add (arg_string, from_tty, target)
       addr = (CORE_ADDR)new_so->som_solib.next;
 
       new_so->objfile = symbol_file_add (name, from_tty, text_addr, 0, 0, 0);
-      new_so->abfd = bfd_openr (name, gnutarget);
-      new_so->abfd->cacheable = true;
+      new_so->abfd = new_so->objfile->obfd;
 
       if (!bfd_check_format (new_so->abfd, bfd_object))
        {
@@ -571,6 +570,43 @@ som_solib_get_got_by_pc (addr)
   return got_value;
 }
 
+int
+som_solib_section_offsets (objfile, offsets)
+     struct objfile *objfile;
+     struct section_offsets *offsets;
+{
+  struct so_list *so_list = so_list_head;
+
+  while (so_list)
+    {
+      /* Oh what a pain!  We need the offsets before so_list->objfile
+        is valid.  The BFDs will never match.  Make a best guess.  */
+      if (!strcmp (so_list->som_solib.name, objfile->name))
+       {
+         asection *private_section;
+
+         /* The text offset is easy.  */
+         ANOFFSET (offsets, 0) = so_list->som_solib.text_addr;
+
+         /* We should look at presumed_dp in the SOM header, but
+            that's not easily available.  This should be OK though.  */
+         private_section = bfd_get_section_by_name (objfile->obfd,
+                                                    "$PRIVATE$");
+         if (!private_section)
+           {
+             warning ("Unable to find $PRIVATE$ in shared library!");
+             ANOFFSET (offsets, 1) = 0;
+             return 1;
+           }
+         ANOFFSET (offsets, 1) = (so_list->som_solib.data_start
+                                  - private_section->vma);
+         return 1;
+       }
+      so_list = so_list->next;
+    }
+  return 0;
+}
+
 /* Dump information about all the currently loaded shared libraries.  */
 
 static void
index 8df2062de505604be14ccddbd2478a1c7c567673..800e706fcb2e0485a581ad5a5408d22df54dda7b 100644 (file)
@@ -22,6 +22,8 @@ and by Cygnus Support.  */
 
 #ifdef __STDC__                /* Forward decl's for prototypes */
 struct target_ops;
+struct objfile;
+struct section_offsets;
 #endif
 
 /* Called to add symbols from a shared library to gdb's symbol table. */
@@ -35,6 +37,9 @@ som_solib_add PARAMS ((char *, int, struct target_ops *));
 extern CORE_ADDR
 som_solib_get_got_by_pc PARAMS ((CORE_ADDR));
 
+extern int
+som_solib_section_offsets PARAMS ((struct objfile *, struct section_offsets *));
+
 /* Function to be called when the inferior starts up, to discover the names
    of shared libraries that are dynamically linked, the base addresses to
    which they are linked, and sufficient information to read in their symbols