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