bfd/netbsd-core.c

   1 /* BFD back end for NetBSD style core files
   2    Copyright 1988, 1989, 1991, 1992, 1993, 1996, 1998, 1999, 2000, 2001,
   3    2002, 2003, 2004, 2005, 2006, 2007
   4    Free Software Foundation, Inc.
   5    Written by Paul Kranenburg, EUR
   6
   7    This file is part of BFD, the Binary File Descriptor library.
   8
   9    This program is free software; you can redistribute it and/or modify
  10    it under the terms of the GNU General Public License as published by
  11    the Free Software Foundation; either version 3 of the License, or
  12    (at your option) any later version.
  13
  14    This program is distributed in the hope that it will be useful,
  15    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17    GNU General Public License for more details.
  18
  19    You should have received a copy of the GNU General Public License
  20    along with this program; if not, write to the Free Software
  21    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  22    MA 02110-1301, USA.  */
  23
  24 #include "sysdep.h"
  25 #include "bfd.h"
  26 #include "libbfd.h"
  27 #include "libaout.h"           /* BFD a.out internal data structures.  */
  28
  29 #include <sys/param.h>
  30 #include <sys/dir.h>
  31 #include <signal.h>
  32 #include <sys/core.h>
  33
  34 /* The machine ID for OpenBSD/sparc64 and older versions of
  35    NetBSD/sparc64 overlaps with M_MIPS1.  */
  36 #define M_SPARC64_OPENBSD       M_MIPS1
  37
  38 /* Offset of StackGhost cookie within `struct md_coredump' on
  39    OpenBSD/sparc.  */
  40 #define SPARC_WCOOKIE_OFFSET    344
  41
  42 /* Offset of StackGhost cookie within `struct md_coredump' on
  43    OpenBSD/sparc64.  */
  44 #define SPARC64_WCOOKIE_OFFSET  832
  45
  46 #define netbsd_core_file_matches_executable_p generic_core_file_matches_executable_p
  47
  48 struct netbsd_core_struct
  49 {
  50   struct core core;
  51 } *rawptr;
  52
  53 /* Handle NetBSD-style core dump file.  */
  54
  55 static const bfd_target *
  56 netbsd_core_file_p (bfd *abfd)
  57 {
  58   int val;
  59   unsigned i;
  60   file_ptr offset;
  61   asection *asect;
  62   struct core core;
  63   struct coreseg coreseg;
  64   bfd_size_type amt = sizeof core;
  65
  66   val = bfd_bread (&core, amt, abfd);
  67   if (val != sizeof core)
  68     {
  69       /* Too small to be a core file.  */
  70       bfd_set_error (bfd_error_wrong_format);
  71       return 0;
  72     }
  73
  74   if (CORE_GETMAGIC (core) != COREMAGIC)
  75     {
  76       bfd_set_error (bfd_error_wrong_format);
  77       return 0;
  78     }
  79
  80   amt = sizeof (struct netbsd_core_struct);
  81   rawptr = (struct netbsd_core_struct *) bfd_zalloc (abfd, amt);
  82   if (rawptr == NULL)
  83     return 0;
  84
  85   rawptr->core = core;
  86   abfd->tdata.netbsd_core_data = rawptr;
  87
  88   offset = core.c_hdrsize;
  89   for (i = 0; i < core.c_nseg; i++)
  90     {
  91       const char *sname;
  92       flagword flags;
  93
  94       if (bfd_seek (abfd, offset, SEEK_SET) != 0)
  95         goto punt;
  96
  97       val = bfd_bread (&coreseg, sizeof coreseg, abfd);
  98       if (val != sizeof coreseg)
  99         {
 100           bfd_set_error (bfd_error_file_truncated);
 101           goto punt;
 102         }
 103       if (CORE_GETMAGIC (coreseg) != CORESEGMAGIC)
 104         {
 105           bfd_set_error (bfd_error_wrong_format);
 106           goto punt;
 107         }
 108
 109       offset += core.c_seghdrsize;
 110
 111       switch (CORE_GETFLAG (coreseg))
 112         {
 113         case CORE_CPU:
 114           sname = ".reg";
 115           flags = SEC_ALLOC + SEC_HAS_CONTENTS;
 116           break;
 117         case CORE_DATA:
 118           sname = ".data";
 119           flags = SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS;
 120           break;
 121         case CORE_STACK:
 122           sname = ".stack";
 123           flags = SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS;
 124           break;
 125         default:
 126           sname = ".unknown";
 127           flags = SEC_ALLOC + SEC_HAS_CONTENTS;
 128           break;
 129         }
 130       asect = bfd_make_section_anyway_with_flags (abfd, sname, flags);
 131       if (asect == NULL)
 132         goto punt;
 133
 134       asect->size = coreseg.c_size;
 135       asect->vma = coreseg.c_addr;
 136       asect->filepos = offset;
 137       asect->alignment_power = 2;
 138
 139       if (CORE_GETFLAG (coreseg) == CORE_CPU)
 140         {
 141           bfd_size_type wcookie_offset;
 142
 143           switch (CORE_GETMID (core))
 144             {
 145             case M_SPARC_NETBSD:
 146               wcookie_offset = SPARC_WCOOKIE_OFFSET;
 147               break;
 148             case M_SPARC64_OPENBSD:
 149               wcookie_offset = SPARC64_WCOOKIE_OFFSET;
 150               break;
 151             default:
 152               wcookie_offset = 0;
 153               break;
 154             }
 155
 156           if (wcookie_offset > 0 && coreseg.c_size > wcookie_offset)
 157             {
 158               /* Truncate the .reg section.  */
 159               asect->size = wcookie_offset;
 160
 161               /* And create the .wcookie section.  */
 162               flags = SEC_ALLOC + SEC_HAS_CONTENTS;
 163               asect = bfd_make_section_anyway_with_flags (abfd, ".wcookie",
 164                                                           flags);
 165               if (asect == NULL)
 166                 goto punt;
 167
 168               asect->size = coreseg.c_size - wcookie_offset;
 169               asect->vma = 0;
 170               asect->filepos = offset + wcookie_offset;
 171               asect->alignment_power = 2;
 172             }
 173         }
 174
 175       offset += coreseg.c_size;
 176     }
 177
 178   /* Set architecture from machine ID.  */
 179   switch (CORE_GETMID (core))
 180     {
 181     case M_ALPHA_NETBSD:
 182       bfd_default_set_arch_mach (abfd, bfd_arch_alpha, 0);
 183       break;
 184
 185     case M_ARM6_NETBSD:
 186       bfd_default_set_arch_mach (abfd, bfd_arch_arm, bfd_mach_arm_3);
 187       break;
 188
 189     case M_X86_64_NETBSD:
 190       bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
 191       break;
 192
 193     case M_386_NETBSD:
 194       bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_i386_i386);
 195       break;
 196
 197     case M_68K_NETBSD:
 198     case M_68K4K_NETBSD:
 199       bfd_default_set_arch_mach (abfd, bfd_arch_m68k, 0);
 200       break;
 201
 202     case M_88K_OPENBSD:
 203       bfd_default_set_arch_mach (abfd, bfd_arch_m88k, 0);
 204       break;
 205
 206     case M_HPPA_OPENBSD:
 207       bfd_default_set_arch_mach (abfd, bfd_arch_hppa, bfd_mach_hppa11);
 208       break;
 209
 210     case M_POWERPC_NETBSD:
 211       bfd_default_set_arch_mach (abfd, bfd_arch_powerpc, bfd_mach_ppc);
 212       break;
 213
 214     case M_SPARC_NETBSD:
 215       bfd_default_set_arch_mach (abfd, bfd_arch_sparc, bfd_mach_sparc);
 216       break;
 217
 218     case M_SPARC64_NETBSD:
 219     case M_SPARC64_OPENBSD:
 220       bfd_default_set_arch_mach (abfd, bfd_arch_sparc, bfd_mach_sparc_v9);
 221       break;
 222
 223     case M_VAX_NETBSD:
 224     case M_VAX4K_NETBSD:
 225       bfd_default_set_arch_mach (abfd, bfd_arch_vax, 0);
 226       break;
 227     }
 228
 229   /* OK, we believe you.  You're a core file (sure, sure).  */
 230   return abfd->xvec;
 231
 232  punt:
 233   bfd_release (abfd, abfd->tdata.any);
 234   abfd->tdata.any = NULL;
 235   bfd_section_list_clear (abfd);
 236   return 0;
 237 }
 238
 239 static char*
 240 netbsd_core_file_failing_command (bfd *abfd)
 241 {
 242   /*return core_command (abfd);*/
 243   return abfd->tdata.netbsd_core_data->core.c_name;
 244 }
 245
 246 static int
 247 netbsd_core_file_failing_signal (bfd *abfd)
 248 {
 249   /*return core_signal (abfd);*/
 250   return abfd->tdata.netbsd_core_data->core.c_signo;
 251 }
 252 \f
 253 /* If somebody calls any byte-swapping routines, shoot them.  */
 254
 255 static void
 256 swap_abort (void)
 257 {
 258  /* This way doesn't require any declaration for ANSI to fuck up.  */
 259   abort ();
 260 }
 261
 262 #define NO_GET ((bfd_vma (*) (const void *)) swap_abort)
 263 #define NO_PUT ((void (*) (bfd_vma, void *)) swap_abort)
 264 #define NO_GETS ((bfd_signed_vma (*) (const void *)) swap_abort)
 265 #define NO_GET64 ((bfd_uint64_t (*) (const void *)) swap_abort)
 266 #define NO_PUT64 ((void (*) (bfd_uint64_t, void *)) swap_abort)
 267 #define NO_GETS64 ((bfd_int64_t (*) (const void *)) swap_abort)
 268
 269 const bfd_target netbsd_core_vec =
 270   {
 271     "netbsd-core",
 272     bfd_target_unknown_flavour,
 273     BFD_ENDIAN_UNKNOWN,         /* Target byte order.  */
 274     BFD_ENDIAN_UNKNOWN,         /* Target headers byte order.  */
 275     (HAS_RELOC | EXEC_P |       /* Object flags.  */
 276      HAS_LINENO | HAS_DEBUG |
 277      HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
 278     (SEC_HAS_CONTENTS |         /* Section flags.  */
 279      SEC_ALLOC | SEC_LOAD | SEC_RELOC),
 280     0,                          /* Symbol prefix.  */
 281     ' ',                        /* ar_pad_char.  */
 282     16,                         /* ar_max_namelen.  */
 283     NO_GET64, NO_GETS64, NO_PUT64,      /* 64 bit data.  */
 284     NO_GET, NO_GETS, NO_PUT,            /* 32 bit data.  */
 285     NO_GET, NO_GETS, NO_PUT,            /* 16 bit data.  */
 286     NO_GET64, NO_GETS64, NO_PUT64,      /* 64 bit hdrs.  */
 287     NO_GET, NO_GETS, NO_PUT,            /* 32 bit hdrs.  */
 288     NO_GET, NO_GETS, NO_PUT,            /* 16 bit hdrs.  */
 289
 290     {                                   /* bfd_check_format.  */
 291       _bfd_dummy_target,                /* Unknown format.  */
 292       _bfd_dummy_target,                /* Object file.  */
 293       _bfd_dummy_target,                /* Archive.  */
 294       netbsd_core_file_p                /* A core file.  */
 295     },
 296     {                                   /* bfd_set_format.  */
 297       bfd_false, bfd_false,
 298       bfd_false, bfd_false
 299     },
 300     {                                   /* bfd_write_contents.  */
 301       bfd_false, bfd_false,
 302       bfd_false, bfd_false
 303     },
 304
 305     BFD_JUMP_TABLE_GENERIC (_bfd_generic),
 306     BFD_JUMP_TABLE_COPY (_bfd_generic),
 307     BFD_JUMP_TABLE_CORE (netbsd),
 308     BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
 309     BFD_JUMP_TABLE_SYMBOLS (_bfd_nosymbols),
 310     BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
 311     BFD_JUMP_TABLE_WRITE (_bfd_generic),
 312     BFD_JUMP_TABLE_LINK (_bfd_nolink),
 313     BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
 314
 315     NULL,
 316
 317     (PTR) 0                             /* Backend_data.  */
 318   };