]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blobdiff - bfd/cisco-core.c
Update year range in copyright notice of binutils files
[thirdparty/binutils-gdb.git] / bfd / cisco-core.c
index e1fa17795d3002d397443c601dde49981ca74288..db63ba9bfb202e0925e0a00b360de8fc5b53fd0a 100644 (file)
@@ -1,25 +1,25 @@
 /* BFD back-end for CISCO crash dumps.
+   Copyright (C) 1994-2022 Free Software Foundation, Inc.
 
-Copyright 1994 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.
+   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 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., 51 Franklin Street - Fifth Floor, Boston,
+   MA 02110-1301, 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.  */
-
-#include "bfd.h"
 #include "sysdep.h"
+#include "bfd.h"
 #include "libbfd.h"
 /* core_file_failing_signal returns a host signal (this probably should
    be fixed).  */
@@ -36,58 +36,85 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 # define SIGBUS 10
 #endif
 \f
-#define CRASH_INFO (0xffc)
-#define CRASH_MAGIC 0xdead1234
+int crash_info_locs[] =
+{
+  0x0250,      /* mips, ppc, x86, i960 */
+  0x0400,      /* m68k, mips, x86, i960 */
+  0x0FFC,      /* m68k, mips, ppc, x86, i960 */
+  0x3000,      /* ppc */
+  0x4FFC,      /* m68k */
+  -1
+};
+
+#define CRASH_MAGIC    0xdead1234
+#define MASK_ADDR(x)   ((x) & 0x0fffffff)      /* Mask crash info address */
 
-typedef enum {
-    CRASH_REASON_NOTCRASHED = 0,
-    CRASH_REASON_EXCEPTION = 1,
-    CRASH_REASON_CORRUPT = 2,
-  } crashreason;
+typedef enum
+{
+  CRASH_REASON_NOTCRASHED = 0,
+  CRASH_REASON_EXCEPTION = 1,
+  CRASH_REASON_CORRUPT = 2,
+} crashreason;
 
-struct crashinfo_external
+typedef struct
 {
-  char magic[4];                       /* Magic number */
+  char magic[4];               /* Magic number */
   char version[4];             /* Version number */
   char reason[4];              /* Crash reason */
   char cpu_vector[4];          /* CPU vector for exceptions */
   char registers[4];           /* Pointer to saved registers */
   char rambase[4];             /* Base of RAM (not in V1 crash info) */
-};
-\f
+  char textbase[4];            /* Base of .text section (not in V3 crash info) */
+  char database[4];            /* Base of .data section (not in V3 crash info) */
+  char bssbase[4];             /* Base of .bss section (not in V3 crash info) */
+} crashinfo_external;
+
 struct cisco_core_struct
 {
   int sig;
 };
+
+#define cisco_core_file_matches_executable_p generic_core_file_matches_executable_p
+#define cisco_core_file_pid _bfd_nocore_core_file_pid
 \f
-static const bfd_target *
-cisco_core_file_p (abfd)
-     bfd *abfd;
+/* Examine the file for a crash info struct at the offset given by
+   CRASH_INFO_LOC.  */
+
+static bfd_cleanup
+cisco_core_file_validate (bfd *abfd, int crash_info_loc)
 {
   char buf[4];
   unsigned int crashinfo_offset;
-  struct crashinfo_external crashinfo;
-  int nread;
+  crashinfo_external crashinfo;
+  bfd_size_type nread;
+  unsigned int magic;
+  unsigned int version;
   unsigned int rambase;
   sec_ptr asect;
   struct stat statbuf;
+  size_t amt;
+  flagword flags;
 
-  if (bfd_seek (abfd, CRASH_INFO, SEEK_SET) != 0)
+  if (bfd_seek (abfd, (file_ptr) crash_info_loc, SEEK_SET) != 0)
     return NULL;
 
-  nread = bfd_read (buf, 1, 4, abfd);
+  nread = bfd_bread (buf, (bfd_size_type) 4, abfd);
   if (nread != 4)
     {
       if (bfd_get_error () != bfd_error_system_call)
        bfd_set_error (bfd_error_wrong_format);
       return NULL;
     }
-  crashinfo_offset = bfd_get_32 (abfd, buf);
+  crashinfo_offset = MASK_ADDR (bfd_get_32 (abfd, buf));
 
-  if (bfd_seek (abfd, crashinfo_offset, SEEK_SET) != 0)
-    return NULL;
+  if (bfd_seek (abfd, (file_ptr) crashinfo_offset, SEEK_SET) != 0)
+    {
+      /* Most likely we failed because of a bogus (huge) offset */
+      bfd_set_error (bfd_error_wrong_format);
+      return NULL;
+    }
 
-  nread = bfd_read (&crashinfo, 1, sizeof (crashinfo), abfd);
+  nread = bfd_bread (&crashinfo, (bfd_size_type) sizeof (crashinfo), abfd);
   if (nread != sizeof (crashinfo))
     {
       if (bfd_get_error () != bfd_error_system_call)
@@ -101,31 +128,33 @@ cisco_core_file_p (abfd)
       return NULL;
     }
 
-  if (bfd_get_32 (abfd, crashinfo.magic) != CRASH_MAGIC)
+  magic = bfd_get_32 (abfd, crashinfo.magic);
+  if (magic != CRASH_MAGIC)
     {
       bfd_set_error (bfd_error_wrong_format);
       return NULL;
     }
 
-  switch (bfd_get_32 (abfd, crashinfo.version))
+  version = bfd_get_32 (abfd, crashinfo.version);
+  if (version == 0)
     {
-    case 0:
       bfd_set_error (bfd_error_wrong_format);
       return NULL;
-    case 1:
+    }
+  else if (version == 1)
+    {
+      /* V1 core dumps don't specify the dump base, assume 0 */
       rambase = 0;
-      break;
-    default:
-    case 2:
+    }
+  else
+    {
       rambase = bfd_get_32 (abfd, crashinfo.rambase);
-      break;
     }
 
   /* OK, we believe you.  You're a core file.  */
 
-  abfd->tdata.cisco_core_data =
-    ((struct cisco_core_struct *)
-     bfd_zmalloc (sizeof (struct cisco_core_struct)));
+  amt = sizeof (struct cisco_core_struct);
+  abfd->tdata.cisco_core_data = (struct cisco_core_struct *) bfd_zmalloc (amt);
   if (abfd->tdata.cisco_core_data == NULL)
     return NULL;
 
@@ -150,21 +179,21 @@ cisco_core_file_p (abfd)
 
       switch (bfd_get_32 (abfd, crashinfo.cpu_vector))
        {
-          /* bus error           */
+          /* bus error           */
        case 2 : abfd->tdata.cisco_core_data->sig = SIGBUS; break;
-          /* address error       */
+          /* address error       */
        case 3 : abfd->tdata.cisco_core_data->sig = SIGBUS; break;
           /* illegal instruction */
        case 4 : abfd->tdata.cisco_core_data->sig = SIGILL;  break;
-          /* zero divide         */
+          /* zero divide         */
        case 5 : abfd->tdata.cisco_core_data->sig = SIGFPE;  break;
-          /* chk instruction     */
+          /* chk instruction     */
        case 6 : abfd->tdata.cisco_core_data->sig = SIGFPE; break;
-          /* trapv instruction   */
+          /* trapv instruction   */
        case 7 : abfd->tdata.cisco_core_data->sig = SIGFPE; break;
           /* privilege violation */
        case 8 : abfd->tdata.cisco_core_data->sig = SIGSEGV; break;
-          /* trace trap          */
+          /* trace trap          */
        case 9 : abfd->tdata.cisco_core_data->sig = SIGTRAP;  break;
           /* line 1010 emulator  */
        case 10: abfd->tdata.cisco_core_data->sig = SIGILL;  break;
@@ -175,24 +204,24 @@ cisco_core_file_p (abfd)
             this cannot be triggered by software.  Call it a SIGBUS.  */
        case 13: abfd->tdata.cisco_core_data->sig = SIGBUS;  break;
 
-         /* interrupt           */
+         /* interrupt           */
        case 31: abfd->tdata.cisco_core_data->sig = SIGINT;  break;
-         /* breakpoint          */
+         /* breakpoint          */
        case 33: abfd->tdata.cisco_core_data->sig = SIGTRAP;  break;
 
-         /* floating point err  */
+         /* floating point err  */
        case 48: abfd->tdata.cisco_core_data->sig = SIGFPE;  break;
-         /* floating point err  */
+         /* floating point err  */
        case 49: abfd->tdata.cisco_core_data->sig = SIGFPE;  break;
-         /* zero divide         */
+         /* zero divide         */
        case 50: abfd->tdata.cisco_core_data->sig = SIGFPE;  break;
-         /* underflow           */
+         /* underflow           */
        case 51: abfd->tdata.cisco_core_data->sig = SIGFPE;  break;
-         /* operand error       */
+         /* operand error       */
        case 52: abfd->tdata.cisco_core_data->sig = SIGFPE;  break;
-          /* overflow            */
+          /* overflow            */
        case 53: abfd->tdata.cisco_core_data->sig = SIGFPE;  break;
-         /* NAN                 */
+         /* NAN                 */
        case 54: abfd->tdata.cisco_core_data->sig = SIGFPE;  break;
        default:
 #ifndef SIGEMT
@@ -208,122 +237,192 @@ cisco_core_file_p (abfd)
       break;
     }
 
-  abfd->sections = NULL;
-  abfd->section_count = 0;
+  /* Create a ".data" section that maps the entire file, which is
+     essentially a dump of the target system's RAM.  */
 
-  asect = (asection *) bfd_zmalloc (sizeof (asection));
+  flags = SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS;
+  asect = bfd_make_section_anyway_with_flags (abfd, ".data", flags);
+  if (asect == NULL)
+    goto error_return;
+  /* The size of memory is the size of the core file itself.  */
+  asect->size = statbuf.st_size;
+  asect->vma = rambase;
+  asect->filepos = 0;
+
+  /* Create a ".crash" section to allow access to the saved
+     crash information.  */
+
+  flags = SEC_HAS_CONTENTS;
+  asect = bfd_make_section_anyway_with_flags (abfd, ".crash", flags);
   if (asect == NULL)
     goto error_return;
-  asect->name = ".reg";
-  asect->flags = SEC_HAS_CONTENTS;
-  /* This can be bigger than the real size.  Set it to the size of the whole
-     core file.  */
-  asect->_raw_size = statbuf.st_size;
   asect->vma = 0;
-  asect->filepos = bfd_get_32 (abfd, crashinfo.registers) - rambase;
-  asect->next = abfd->sections;
-  abfd->sections = asect;
-  ++abfd->section_count;
+  asect->filepos = crashinfo_offset;
+  asect->size = sizeof (crashinfo);
+
+  /* Create a ".reg" section to allow access to the saved
+     registers.  */
 
-  /* There is only one section containing data from the target system's RAM.
-     We call it .data.  */
-  asect = (asection *) bfd_zmalloc (sizeof (asection));
+  asect = bfd_make_section_anyway_with_flags (abfd, ".reg", flags);
   if (asect == NULL)
     goto error_return;
-  asect->name = ".data";
-  asect->flags = SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS;
-  /* The size of memory is the size of the core file itself.  */
-  asect->_raw_size = statbuf.st_size;
-  asect->vma = rambase;
-  asect->filepos = 0;
-  asect->next = abfd->sections;
-  abfd->sections = asect;
-  ++abfd->section_count;
+  asect->vma = 0;
+  asect->filepos = bfd_get_32 (abfd, crashinfo.registers) - rambase;
+  /* Since we don't know the exact size of the saved register info,
+     choose a register section size that is either the remaining part
+     of the file, or 1024, whichever is smaller.  */
+  nread = statbuf.st_size - asect->filepos;
+  asect->size = (nread < 1024) ? nread : 1024;
+
+  return _bfd_no_cleanup;
 
-  return abfd->xvec;
+  /* Get here if we have already started filling out the BFD
+     and there is an error of some kind.  */
 
  error_return:
-  {
-    sec_ptr nextsect;
-    for (asect = abfd->sections; asect != NULL;)
-      {
-       nextsect = asect->next;
-       free (asect);
-       asect = nextsect;
-      }
-    free (abfd->tdata.cisco_core_data);
-    return NULL;
-  }
+  bfd_release (abfd, abfd->tdata.any);
+  abfd->tdata.any = NULL;
+  bfd_section_list_clear (abfd);
+  return NULL;
 }
 
-char *
-cisco_core_file_failing_command (abfd)
-     bfd *abfd;
+static bfd_cleanup
+cisco_core_file_p (bfd *abfd)
 {
-  return NULL;
+  int *crash_info_locp;
+  bfd_cleanup cleanup = NULL;
+
+  for (crash_info_locp = crash_info_locs;
+       *crash_info_locp != -1 && cleanup == NULL;
+       crash_info_locp++)
+    {
+      cleanup = cisco_core_file_validate (abfd, *crash_info_locp);
+    }
+  return cleanup;
 }
 
-int
-cisco_core_file_failing_signal (abfd)
-     bfd *abfd;
+static char *
+cisco_core_file_failing_command (bfd *abfd ATTRIBUTE_UNUSED)
 {
-  return abfd->tdata.cisco_core_data->sig;
+  return NULL;
 }
 
-boolean
-cisco_core_file_matches_executable_p (core_bfd, exec_bfd)
-     bfd *core_bfd;
-     bfd *exec_bfd;
+static int
+cisco_core_file_failing_signal (bfd *abfd ATTRIBUTE_UNUSED)
 {
-  return true;
+  return abfd->tdata.cisco_core_data->sig;
 }
 \f
-const bfd_target cisco_core_vec =
-  {
-    "trad-core",
-    bfd_target_unknown_flavour,
-    BFD_ENDIAN_BIG,            /* target byte order */
-    BFD_ENDIAN_BIG,            /* target headers byte order */
-    (HAS_RELOC | EXEC_P |      /* object flags */
-     HAS_LINENO | HAS_DEBUG |
-     HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
-    (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
-    0,                                                    /* symbol prefix */
-    ' ',                                                  /* ar_pad_char */
-    16,                                                           /* ar_max_namelen */
-    bfd_getb64, bfd_getb_signed_64, bfd_putb64,
-    bfd_getb32, bfd_getb_signed_32, bfd_putb32,
-    bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
-    bfd_getb64, bfd_getb_signed_64, bfd_putb64,
-    bfd_getb32, bfd_getb_signed_32, bfd_putb32,
-    bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
-
-    {                          /* bfd_check_format */
-     _bfd_dummy_target,                /* unknown format */
-     _bfd_dummy_target,                /* object file */
-     _bfd_dummy_target,                /* archive */
-     cisco_core_file_p /* a core file */
-    },
-    {                          /* bfd_set_format */
-     bfd_false, bfd_false,
-     bfd_false, bfd_false
-    },
-    {                          /* bfd_write_contents */
-     bfd_false, bfd_false,
-     bfd_false, bfd_false
-    },
-    
-       BFD_JUMP_TABLE_GENERIC (_bfd_generic),
-       BFD_JUMP_TABLE_COPY (_bfd_generic),
-       BFD_JUMP_TABLE_CORE (cisco),
-       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,
-    
-    (PTR) 0                    /* backend_data */
+extern const bfd_target core_cisco_le_vec;
+
+const bfd_target core_cisco_be_vec =
+{
+  "cisco-ios-core-big",
+  bfd_target_unknown_flavour,
+  BFD_ENDIAN_BIG,              /* target byte order */
+  BFD_ENDIAN_BIG,              /* target headers byte order */
+  (HAS_RELOC | EXEC_P          /* object flags */
+   | HAS_LINENO | HAS_DEBUG
+   | HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
+  (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
+  0,                           /* symbol prefix */
+  ' ',                         /* ar_pad_char */
+  16,                          /* ar_max_namelen */
+  0,                           /* match priority.  */
+  TARGET_KEEP_UNUSED_SECTION_SYMBOLS, /* keep unused section symbols.  */
+  bfd_getb64, bfd_getb_signed_64, bfd_putb64,
+  bfd_getb32, bfd_getb_signed_32, bfd_putb32,
+  bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
+  bfd_getb64, bfd_getb_signed_64, bfd_putb64,
+  bfd_getb32, bfd_getb_signed_32, bfd_putb32,
+  bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
+
+  {                            /* bfd_check_format */
+    _bfd_dummy_target,                 /* unknown format */
+    _bfd_dummy_target,                 /* object file */
+    _bfd_dummy_target,                 /* archive */
+    cisco_core_file_p                  /* a core file */
+  },
+  {                            /* bfd_set_format */
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error
+  },
+  {                            /* bfd_write_contents */
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error
+  },
+
+  BFD_JUMP_TABLE_GENERIC (_bfd_generic),
+  BFD_JUMP_TABLE_COPY (_bfd_generic),
+  BFD_JUMP_TABLE_CORE (cisco),
+  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),
+
+  &core_cisco_le_vec,
+
+  NULL                         /* backend_data */
+};
+
+const bfd_target core_cisco_le_vec =
+{
+  "cisco-ios-core-little",
+  bfd_target_unknown_flavour,
+  BFD_ENDIAN_LITTLE,           /* target byte order */
+  BFD_ENDIAN_LITTLE,           /* target headers byte order */
+  (HAS_RELOC | EXEC_P          /* object flags */
+   | HAS_LINENO | HAS_DEBUG
+   | HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
+  (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
+  0,                           /* symbol prefix */
+  ' ',                         /* ar_pad_char */
+  16,                          /* ar_max_namelen */
+  0,                           /* match_priority */
+  TARGET_KEEP_UNUSED_SECTION_SYMBOLS, /* keep unused section symbols.  */
+  bfd_getl64, bfd_getl_signed_64, bfd_putl64,
+  bfd_getl32, bfd_getl_signed_32, bfd_putl32,
+  bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* data */
+  bfd_getl64, bfd_getl_signed_64, bfd_putl64,
+  bfd_getl32, bfd_getl_signed_32, bfd_putl32,
+  bfd_getl16, bfd_getl_signed_16, bfd_putl16, /* hdrs */
+
+  {                            /* bfd_check_format */
+    _bfd_dummy_target,                 /* unknown format */
+    _bfd_dummy_target,                 /* object file */
+    _bfd_dummy_target,                 /* archive */
+    cisco_core_file_p                  /* a core file */
+  },
+  {                            /* bfd_set_format */
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error
+  },
+  {                            /* bfd_write_contents */
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error,
+    _bfd_bool_bfd_false_error
+  },
+
+  BFD_JUMP_TABLE_GENERIC (_bfd_generic),
+  BFD_JUMP_TABLE_COPY (_bfd_generic),
+  BFD_JUMP_TABLE_CORE (cisco),
+  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),
+
+  &core_cisco_be_vec,
+
+  NULL                         /* backend_data */
 };