[bfd]

[deliverable/binutils-gdb.git] / bfd / hppabsd-core.c

diff --git a/bfd/hppabsd-core.c b/bfd/hppabsd-core.c
index 0a3e6b224d218fcf21ffe689176af3716d15c384..31aa2f14270dfd1ff2a82f9e21c7535b0ac46716 100644 (file)
--- a/bfd/hppabsd-core.c
+++ b/bfd/hppabsd-core.c
@@ -1,5 +1,6 @@
 /* BFD back-end for HPPA BSD core files.
 /* BFD back-end for HPPA BSD core files.

-   Copyright 1993, 94, 95, 97, 1998 Free Software Foundation, Inc.
+   Copyright 1993, 1994, 1995, 1998, 1999, 2001, 2002
+   Free Software Foundation, Inc.

 
    This file is part of BFD, the Binary File Descriptor library.
 
 
    This file is part of BFD, the Binary File Descriptor library.
 


@@ -18,14 +19,13 @@
    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
    Written by the Center for Software Science at the University of Utah
    Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 
    Written by the Center for Software Science at the University of Utah

-   and by Cygnus Support. 
+   and by Cygnus Support.

 
    The core file structure for the Utah 4.3BSD and OSF1 ports on the
    PA is a mix between traditional cores and hpux cores -- just
    different enough that supporting this format would tend to add
    gross hacks to trad-core.c or hpux-core.c.  So instead we keep any
    gross hacks isolated to this file.  */
 
    The core file structure for the Utah 4.3BSD and OSF1 ports on the
    PA is a mix between traditional cores and hpux cores -- just
    different enough that supporting this format would tend to add
    gross hacks to trad-core.c or hpux-core.c.  So instead we keep any
    gross hacks isolated to this file.  */

-   

 
 /* This file can only be compiled on systems which use HPPA-BSD style
    core files.
 
 /* This file can only be compiled on systems which use HPPA-BSD style
    core files.


@@ -48,16 +48,19 @@
 #include <sys/user.h>          /* After a.out.h  */
 #include <sys/file.h>
 
 #include <sys/user.h>          /* After a.out.h  */
 #include <sys/file.h>
 

-static asection *make_bfd_asection PARAMS ((bfd *, CONST char *,
-                                           flagword, bfd_size_type,
-                                           file_ptr, unsigned int));
-static asymbol *hppabsd_core_make_empty_symbol PARAMS ((bfd *));
-static const bfd_target *hppabsd_core_core_file_p PARAMS ((bfd *));
-static char *hppabsd_core_core_file_failing_command PARAMS ((bfd *));
-static int hppabsd_core_core_file_failing_signal PARAMS ((bfd *));
-static boolean hppabsd_core_core_file_matches_executable_p
+static asection *make_bfd_asection
+  PARAMS ((bfd *, const char *, flagword, bfd_size_type, file_ptr,
+          unsigned int));
+static const bfd_target *hppabsd_core_core_file_p
+  PARAMS ((bfd *));
+static char *hppabsd_core_core_file_failing_command
+  PARAMS ((bfd *));
+static int hppabsd_core_core_file_failing_signal
+  PARAMS ((bfd *));
+static bfd_boolean hppabsd_core_core_file_matches_executable_p

   PARAMS ((bfd *, bfd *));
   PARAMS ((bfd *, bfd *));

-static void swap_abort PARAMS ((void));
+static void swap_abort
+  PARAMS ((void));

 
 /* These are stored in the bfd's tdata.  */
 
 
 /* These are stored in the bfd's tdata.  */
 


@@ -80,7 +83,7 @@ struct hppabsd_core_struct
 static asection *
 make_bfd_asection (abfd, name, flags, _raw_size, offset, alignment_power)
      bfd *abfd;
 static asection *
 make_bfd_asection (abfd, name, flags, _raw_size, offset, alignment_power)
      bfd *abfd;

-     CONST char *name;
+     const char *name;

      flagword flags;
      bfd_size_type _raw_size;
      file_ptr offset;
      flagword flags;
      bfd_size_type _raw_size;
      file_ptr offset;


@@ -100,16 +103,6 @@ make_bfd_asection (abfd, name, flags, _raw_size, offset, alignment_power)
   return asect;
 }
 
   return asect;
 }
 

-static asymbol *
-hppabsd_core_make_empty_symbol (abfd)
-     bfd *abfd;
-{
-  asymbol *new = (asymbol *) bfd_zalloc (abfd, sizeof (asymbol));
-  if (new)
-    new->the_bfd = abfd;
-  return new;
-}
-

 static const bfd_target *
 hppabsd_core_core_file_p (abfd)
      bfd *abfd;
 static const bfd_target *
 hppabsd_core_core_file_p (abfd)
      bfd *abfd;


@@ -121,7 +114,7 @@ hppabsd_core_core_file_p (abfd)
 
   /* Try to read in the u-area.  We will need information from this
      to know how to grok the rest of the core structures.  */
 
   /* Try to read in the u-area.  We will need information from this
      to know how to grok the rest of the core structures.  */

-  val = bfd_read ((void *) &u, 1, sizeof u, abfd);
+  val = bfd_bread ((void *) &u, (bfd_size_type) sizeof u, abfd);

   if (val != sizeof u)
     {
       if (bfd_get_error () != bfd_error_system_call)
   if (val != sizeof u)
     {
       if (bfd_get_error () != bfd_error_system_call)


@@ -141,7 +134,6 @@ hppabsd_core_core_file_p (abfd)
       return NULL;
     }
 
       return NULL;
     }
 

-

   /* Sanity checks.  Make sure the size of the core file matches the
      the size computed from information within the core itself.  */
   {
   /* Sanity checks.  Make sure the size of the core file matches the
      the size computed from information within the core itself.  */
   {


@@ -169,7 +161,7 @@ hppabsd_core_core_file_p (abfd)
   /* OK, we believe you.  You're a core file (sure, sure).  */
 
   coredata = (struct hppabsd_core_struct *)
   /* OK, we believe you.  You're a core file (sure, sure).  */
 
   coredata = (struct hppabsd_core_struct *)

-    bfd_zalloc (abfd, sizeof (struct hppabsd_core_struct));
+    bfd_zalloc (abfd, (bfd_size_type) sizeof (struct hppabsd_core_struct));

   if (!coredata)
     return NULL;
 
   if (!coredata)
     return NULL;
 


@@ -180,26 +172,38 @@ hppabsd_core_core_file_p (abfd)
   core_stacksec (abfd) = make_bfd_asection (abfd, ".stack",
                                           SEC_ALLOC + SEC_HAS_CONTENTS,
                                           clicksz * u.u_ssize,
   core_stacksec (abfd) = make_bfd_asection (abfd, ".stack",
                                           SEC_ALLOC + SEC_HAS_CONTENTS,
                                           clicksz * u.u_ssize,

-                                          NBPG * (USIZE + KSTAKSIZE) 
+                                          NBPG * (USIZE + KSTAKSIZE)

                                             + clicksz * u.u_dsize, 2);
                                             + clicksz * u.u_dsize, 2);

-  core_stacksec (abfd)->vma = USRSTACK; 
+  if (core_stacksec (abfd) == NULL)
+    goto fail;
+  core_stacksec (abfd)->vma = USRSTACK;

 
   core_datasec (abfd) = make_bfd_asection (abfd, ".data",
                                          SEC_ALLOC + SEC_LOAD
                                            + SEC_HAS_CONTENTS,
                                          clicksz * u.u_dsize,
                                          NBPG * (USIZE + KSTAKSIZE), 2);
 
   core_datasec (abfd) = make_bfd_asection (abfd, ".data",
                                          SEC_ALLOC + SEC_LOAD
                                            + SEC_HAS_CONTENTS,
                                          clicksz * u.u_dsize,
                                          NBPG * (USIZE + KSTAKSIZE), 2);

+  if (core_datasec (abfd) == NULL)
+    goto fail;

   core_datasec (abfd)->vma = UDATASEG;
 
   core_regsec (abfd) = make_bfd_asection (abfd, ".reg",
                                         SEC_HAS_CONTENTS,
                                         KSTAKSIZE * NBPG,
                                         NBPG * USIZE, 2);
   core_datasec (abfd)->vma = UDATASEG;
 
   core_regsec (abfd) = make_bfd_asection (abfd, ".reg",
                                         SEC_HAS_CONTENTS,
                                         KSTAKSIZE * NBPG,
                                         NBPG * USIZE, 2);

+  if (core_regsec (abfd) == NULL)
+    goto fail;

   core_regsec (abfd)->vma = 0;
 
   strncpy (core_command (abfd), u.u_comm, MAXCOMLEN + 1);
   core_signal (abfd) = u.u_code;
   return abfd->xvec;
   core_regsec (abfd)->vma = 0;
 
   strncpy (core_command (abfd), u.u_comm, MAXCOMLEN + 1);
   core_signal (abfd) = u.u_code;
   return abfd->xvec;

+
+ fail:
+  bfd_release (abfd, abfd->tdata.any);
+  abfd->tdata.any = NULL;
+  bfd_section_list_clear (abfd);
+  return NULL;

 }
 
 static char *
 }
 
 static char *


@@ -218,34 +222,20 @@ hppabsd_core_core_file_failing_signal (abfd)
 }
 
 /* ARGSUSED */
 }
 
 /* ARGSUSED */

-static boolean
+static bfd_boolean

 hppabsd_core_core_file_matches_executable_p (core_bfd, exec_bfd)
      bfd *core_bfd, *exec_bfd;
 {
   /* There's no way to know this...  */
 hppabsd_core_core_file_matches_executable_p (core_bfd, exec_bfd)
      bfd *core_bfd, *exec_bfd;
 {
   /* There's no way to know this...  */

-  return true;
+  return TRUE;

 }
 }

-

 \f
 \f

-#define hppabsd_core_get_symtab_upper_bound \
-  _bfd_nosymbols_get_symtab_upper_bound
-#define hppabsd_core_get_symtab _bfd_nosymbols_get_symtab
-#define hppabsd_core_print_symbol _bfd_nosymbols_print_symbol
-#define hppabsd_core_get_symbol_info _bfd_nosymbols_get_symbol_info
-#define hppabsd_core_bfd_is_local_label_name \
-  _bfd_nosymbols_bfd_is_local_label_name
-#define hppabsd_core_get_lineno _bfd_nosymbols_get_lineno
-#define hppabsd_core_find_nearest_line _bfd_nosymbols_find_nearest_line
-#define hppabsd_core_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol
-#define hppabsd_core_read_minisymbols _bfd_nosymbols_read_minisymbols
-#define hppabsd_core_minisymbol_to_symbol _bfd_nosymbols_minisymbol_to_symbol
-

 /* If somebody calls any byte-swapping routines, shoot them.  */
 static void
 swap_abort ()
 {
   /* This way doesn't require any declaration for ANSI to fuck up.  */
 /* If somebody calls any byte-swapping routines, shoot them.  */
 static void
 swap_abort ()
 {
   /* This way doesn't require any declaration for ANSI to fuck up.  */

-  abort ();    
+  abort ();

 }
 
 #define        NO_GET  ((bfd_vma (*) PARAMS ((   const bfd_byte *))) swap_abort )
 }
 
 #define        NO_GET  ((bfd_vma (*) PARAMS ((   const bfd_byte *))) swap_abort )


@@ -287,19 +277,19 @@ const bfd_target hppabsd_core_vec =
      bfd_false, bfd_false,
      bfd_false, bfd_false
     },
      bfd_false, bfd_false,
      bfd_false, bfd_false
     },

-    
-       BFD_JUMP_TABLE_GENERIC (_bfd_generic),
-       BFD_JUMP_TABLE_COPY (_bfd_generic),
-       BFD_JUMP_TABLE_CORE (hppabsd_core),
-       BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
-       BFD_JUMP_TABLE_SYMBOLS (hppabsd_core),
-       BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
-       BFD_JUMP_TABLE_WRITE (_bfd_generic),
-       BFD_JUMP_TABLE_LINK (_bfd_nolink),
-       BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
+
+    BFD_JUMP_TABLE_GENERIC (_bfd_generic),
+    BFD_JUMP_TABLE_COPY (_bfd_generic),
+    BFD_JUMP_TABLE_CORE (hppabsd_core),
+    BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
+    BFD_JUMP_TABLE_SYMBOLS (_bfd_nosymbols),
+    BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
+    BFD_JUMP_TABLE_WRITE (_bfd_generic),
+    BFD_JUMP_TABLE_LINK (_bfd_nolink),
+    BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),

 
     NULL,
 
     NULL,

-    
+

     (PTR) 0                    /* backend_data */
 };
 #endif
     (PTR) 0                    /* backend_data */
 };
 #endif