gdb/core-aout.c

   1 /* Extract registers from a "standard" core file, for GDB.
   2    Copyright (C) 1988-1995  Free Software Foundation, Inc.
   3
   4 This file is part of GDB.
   5
   6 This program is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 2 of the License, or
   9 (at your option) any later version.
  10
  11 This program is distributed in the hope that it will be useful,
  12 but WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14 GNU General Public License for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with this program; if not, write to the Free Software
  18 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
  19
  20 /* Typically used on systems that have a.out format executables.
  21    corefile.c is supposed to contain the more machine-independent
  22    aspects of reading registers from core files, while this file is
  23    more machine specific.  */
  24
  25 #include "defs.h"
  26 #include <sys/types.h>
  27 #include <sys/param.h>
  28 #include "gdbcore.h"
  29 #include "value.h" /* For supply_register.  */
  30 #include "inferior.h" /* For ARCH_NUM_REGS. */
  31
  32 /* These are needed on various systems to expand REGISTER_U_ADDR.  */
  33 #ifndef USG
  34 #include <sys/dir.h>
  35 #include <sys/file.h>
  36 #include "gdb_stat.h"
  37 #include <sys/user.h>
  38 #ifndef NO_PTRACE_H
  39 # ifdef PTRACE_IN_WRONG_PLACE
  40 #  include <ptrace.h>
  41 # else /* !PTRACE_IN_WRONG_PLACE */
  42 #  include <sys/ptrace.h>
  43 # endif /* !PTRACE_IN_WRONG_PLACE */
  44 #endif /* NO_PTRACE_H */
  45 #endif
  46
  47 #ifndef CORE_REGISTER_ADDR
  48 #define CORE_REGISTER_ADDR(regno, regptr) register_addr(regno, regptr)
  49 #endif /* CORE_REGISTER_ADDR */
  50
  51 #ifdef NEED_SYS_CORE_H
  52 #include <sys/core.h>
  53 #endif
  54
  55 static void
  56 fetch_core_registers PARAMS ((char *, unsigned, int, unsigned));
  57
  58 /* Extract the register values out of the core file and store
  59    them where `read_register' will find them.
  60
  61    CORE_REG_SECT points to the register values themselves, read into memory.
  62    CORE_REG_SIZE is the size of that area.
  63    WHICH says which set of registers we are handling (0 = int, 2 = float
  64          on machines where they are discontiguous).
  65    REG_ADDR is the offset from u.u_ar0 to the register values relative to
  66             core_reg_sect.  This is used with old-fashioned core files to
  67             locate the registers in a large upage-plus-stack ".reg" section.
  68             Original upage address X is at location core_reg_sect+x+reg_addr.
  69  */
  70
  71 static void
  72 fetch_core_registers (core_reg_sect, core_reg_size, which, reg_addr)
  73      char *core_reg_sect;
  74      unsigned core_reg_size;
  75      int which;
  76      unsigned reg_addr;
  77 {
  78   register int regno;
  79   register unsigned int addr;
  80   int bad_reg = -1;
  81   register reg_ptr = -reg_addr;         /* Original u.u_ar0 is -reg_addr. */
  82   int numregs = ARCH_NUM_REGS;
  83
  84   /* If u.u_ar0 was an absolute address in the core file, relativize it now,
  85      so we can use it as an offset into core_reg_sect.  When we're done,
  86      "register 0" will be at core_reg_sect+reg_ptr, and we can use
  87      CORE_REGISTER_ADDR to offset to the other registers.  If this is a modern
  88      core file without a upage, reg_ptr will be zero and this is all a big
  89      NOP.  */
  90   if (reg_ptr > (int) core_reg_size)
  91     reg_ptr -= KERNEL_U_ADDR;
  92
  93   for (regno = 0; regno < numregs; regno++)
  94     {
  95       addr = CORE_REGISTER_ADDR (regno, reg_ptr);
  96       if (addr >= core_reg_size) {
  97         if (bad_reg < 0)
  98           bad_reg = regno;
  99       } else {
 100         supply_register (regno, core_reg_sect + addr);
 101       }
 102     }
 103   if (bad_reg >= 0)
 104     {
 105       error ("Register %s not found in core file.", reg_names[bad_reg]);
 106     }
 107 }
 108
 109
 110 #ifdef REGISTER_U_ADDR
 111
 112 /* Return the address in the core dump or inferior of register REGNO.
 113    BLOCKEND is the address of the end of the user structure.  */
 114
 115 unsigned int
 116 register_addr (regno, blockend)
 117      int regno;
 118      int blockend;
 119 {
 120   int addr;
 121
 122   if (regno < 0 || regno >= ARCH_NUM_REGS)
 123     error ("Invalid register number %d.", regno);
 124
 125   REGISTER_U_ADDR (addr, blockend, regno);
 126
 127   return addr;
 128 }
 129
 130 #endif /* REGISTER_U_ADDR */
 131
 132 \f
 133 /* Register that we are able to handle aout (trad-core) file formats.  */
 134
 135 static struct core_fns aout_core_fns =
 136 {
 137   bfd_target_unknown_flavour,
 138   fetch_core_registers,
 139   NULL
 140 };
 141
 142 void
 143 _initialize_core_aout ()
 144 {
 145   add_core_fns (&aout_core_fns);
 146 }