* core.c (core_open): Improve error message for bad file.
[binutils-gdb.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 "param.h"
25 #include "gdbcore.h"
26 #include <stdio.h>
27
28 /* Some of these are needed on various systems, perhaps, to expand
29 REGISTER_U_ADDR appropriately? */
30 /* #include <sys/core.h> */
31 #include <sys/param.h>
32 #include <sys/dir.h>
33 #include <sys/file.h>
34 #include <sys/stat.h>
35 #include <sys/user.h>
36 #ifndef USG
37 #include <sys/ptrace.h>
38 #endif
39
40
41 /* Extract the register values out of the core file and store
42 them where `read_register' will find them.
43
44 CORE_REG_SECT points to the register values themselves, read into memory.
45 CORE_REG_SIZE is the size of that area.
46 WHICH says which set of registers we are handling (0 = int, 2 = float
47 on machines where they are discontiguous).
48 REG_ADDR is the offset from u.u_ar0 to the register values relative to
49 core_reg_sect. This is used with old-fashioned core files to
50 locate the registers in a large upage-plus-stack ".reg" section.
51 Original upage address X is at location core_reg_sect+x+reg_addr.
52 */
53
54 void
55 fetch_core_registers (core_reg_sect, core_reg_size, which, reg_addr)
56 char *core_reg_sect;
57 unsigned core_reg_size;
58 int which;
59 unsigned reg_addr;
60 {
61 register int regno;
62 register unsigned int addr;
63 int bad_reg = -1;
64 register reg_ptr = -reg_addr; /* Original u.u_ar0 is -reg_addr. */
65
66 /* If u.u_ar0 was an absolute address in the core file, relativize it now,
67 so we can use it as an offset into core_reg_sect. When we're done,
68 "register 0" will be at core_reg_sect+reg_ptr, and we can use
69 register_addr to offset to the other registers. If this is a modern
70 core file without a upage, reg_ptr will be zero and this is all a big
71 NOP. */
72 if (reg_ptr > core_reg_size)
73 reg_ptr -= KERNEL_U_ADDR;
74 if (reg_ptr > core_reg_size)
75 fprintf (stderr, "Can't find registers in core file\n");
76
77 for (regno = 0; regno < NUM_REGS; regno++)
78 {
79 addr = register_addr (regno, reg_ptr);
80 if (addr >= core_reg_size) {
81 if (bad_reg < 0)
82 bad_reg = regno;
83 } else {
84 supply_register (regno, core_reg_sect + addr);
85 }
86 }
87 if (bad_reg > 0)
88 {
89 error ("Register %s not found in core file.", reg_names[bad_reg]);
90 }
91 }
92
93
94 #ifdef REGISTER_U_ADDR
95
96 /* Return the address in the core dump or inferior of register REGNO.
97 BLOCKEND is the address of the end of the user structure. */
98
99 unsigned int
100 register_addr (regno, blockend)
101 int regno;
102 int blockend;
103 {
104 int addr;
105
106 if (regno < 0 || regno >= NUM_REGS)
107 error ("Invalid register number %d.", regno);
108
109 REGISTER_U_ADDR (addr, blockend, regno);
110
111 return addr;
112 }
113
114 #endif /* REGISTER_U_ADDR */