* buildsym.c (patch_subfile_name): Update last_source_file
[external/binutils.git] / gdb / coredep.c
1 /* Extract registers from a "standard" core file, for GDB.
2    Copyright (C) 1988-1991  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., 675 Mass Ave, Cambridge, MA 02139, USA.  */
19
20 /* core.c is supposed to be the more machine-independent aspects of this;
21    this file is more machine-specific.  */
22
23 #include "defs.h"
24 #include <sys/types.h>
25 #include <sys/param.h>
26 #include "gdbcore.h"
27 #include "value.h" /* For supply_register.  */
28 #include "inferior.h" /* For ARCH_NUM_REGS. */
29
30 /* These are needed on various systems to expand REGISTER_U_ADDR.  */
31 #ifndef USG
32 #include <sys/dir.h>
33 #include <sys/file.h>
34 #include <sys/stat.h>
35 #include <sys/user.h>
36 #ifndef NO_PTRACE_H
37 # ifdef PTRACE_IN_WRONG_PLACE
38 #  include <ptrace.h>
39 # else /* !PTRACE_IN_WRONG_PLACE */
40 #  include <sys/ptrace.h>
41 # endif /* !PTRACE_IN_WRONG_PLACE */
42 #endif /* NO_PTRACE_H */
43 #endif
44
45 #ifndef CORE_REGISTER_ADDR
46 #define CORE_REGISTER_ADDR(regno, regptr) register_addr(regno, regptr)
47 #endif /* CORE_REGISTER_ADDR */
48
49 #ifdef NEED_SYS_CORE_H
50 #include <sys/core.h>
51 #endif
52
53 /* Extract the register values out of the core file and store
54    them where `read_register' will find them.
55
56    CORE_REG_SECT points to the register values themselves, read into memory.
57    CORE_REG_SIZE is the size of that area.
58    WHICH says which set of registers we are handling (0 = int, 2 = float
59          on machines where they are discontiguous).
60    REG_ADDR is the offset from u.u_ar0 to the register values relative to
61             core_reg_sect.  This is used with old-fashioned core files to
62             locate the registers in a large upage-plus-stack ".reg" section.
63             Original upage address X is at location core_reg_sect+x+reg_addr.
64  */
65
66 void
67 fetch_core_registers (core_reg_sect, core_reg_size, which, reg_addr)
68      char *core_reg_sect;
69      unsigned core_reg_size;
70      int which;
71      unsigned reg_addr;
72 {
73   register int regno;
74   register unsigned int addr;
75   int bad_reg = -1;
76   register reg_ptr = -reg_addr;         /* Original u.u_ar0 is -reg_addr. */
77   int numregs = ARCH_NUM_REGS;
78
79   /* If u.u_ar0 was an absolute address in the core file, relativize it now,
80      so we can use it as an offset into core_reg_sect.  When we're done,
81      "register 0" will be at core_reg_sect+reg_ptr, and we can use
82      CORE_REGISTER_ADDR to offset to the other registers.  If this is a modern
83      core file without a upage, reg_ptr will be zero and this is all a big
84      NOP.  */
85   if (reg_ptr > core_reg_size)
86     reg_ptr -= KERNEL_U_ADDR;
87
88   for (regno = 0; regno < numregs; regno++)
89     {
90       addr = CORE_REGISTER_ADDR (regno, reg_ptr);
91       if (addr >= core_reg_size) {
92         if (bad_reg < 0)
93           bad_reg = regno;
94       } else {
95         supply_register (regno, core_reg_sect + addr);
96       }
97     }
98   if (bad_reg >= 0)
99     {
100       error ("Register %s not found in core file.", reg_names[bad_reg]);
101     }
102 }
103
104
105 #ifdef REGISTER_U_ADDR
106
107 /* Return the address in the core dump or inferior of register REGNO.
108    BLOCKEND is the address of the end of the user structure.  */
109
110 unsigned int
111 register_addr (regno, blockend)
112      int regno;
113      int blockend;
114 {
115   int addr;
116
117   if (regno < 0 || regno >= ARCH_NUM_REGS)
118     error ("Invalid register number %d.", regno);
119
120   REGISTER_U_ADDR (addr, blockend, regno);
121
122   return addr;
123 }
124
125 #endif /* REGISTER_U_ADDR */