1 /* BFD backend for core files which use the ptrace_user structure
2 Copyright 1993 Free Software Foundation, Inc.
3 The structure of this file is based on trad-core.c written by John Gilmore
5 Modified to work with the ptrace_user structure by Kevin A. Buettner.
6 (Longterm it may be better to merge this file with trad-core.c)
8 This file is part of BFD, the Binary File Descriptor library.
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
15 This program is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 To use this file on a particular host, configure the host with these
25 parameters in the config/h-HOST file:
27 HDEFINES=-DPTRACE_CORE
28 HDEPFILES=ptrace-core.o
39 #include <sys/types.h>
40 #include <sys/param.h>
45 #include <sys/ptrace.h>
48 struct trad_core_struct
50 asection
*data_section
;
51 asection
*stack_section
;
52 asection
*reg_section
;
56 #define core_upage(bfd) (&((bfd)->tdata.trad_core_data->u))
57 #define core_datasec(bfd) ((bfd)->tdata.trad_core_data->data_section)
58 #define core_stacksec(bfd) ((bfd)->tdata.trad_core_data->stack_section)
59 #define core_regsec(bfd) ((bfd)->tdata.trad_core_data->reg_section)
61 /* forward declarations */
63 bfd_target
* ptrace_unix_core_file_p
PARAMS ((bfd
*abfd
));
64 char * ptrace_unix_core_file_failing_command
PARAMS ((bfd
*abfd
));
65 int ptrace_unix_core_file_failing_signal
PARAMS ((bfd
*abfd
));
66 boolean ptrace_unix_core_file_matches_executable_p
67 PARAMS ((bfd
*core_bfd
, bfd
*exec_bfd
));
71 ptrace_unix_core_file_p (abfd
)
78 val
= bfd_read ((void *)&u
, 1, sizeof u
, abfd
);
79 if (val
!= sizeof u
|| u
.pt_magic
!= _BCS_PTRACE_MAGIC
80 || u
.pt_rev
!= _BCS_PTRACE_REV
)
82 /* Too small to be a core file */
83 bfd_set_error (bfd_error_wrong_format
);
87 /* OK, we believe you. You're a core file (sure, sure). */
89 /* Allocate both the upage and the struct core_data at once, so
90 a single free() will free them both. */
91 rawptr
= (struct trad_core_struct
*)
92 bfd_zalloc (abfd
, sizeof (struct trad_core_struct
));
95 bfd_set_error (bfd_error_no_memory
);
99 abfd
->tdata
.trad_core_data
= rawptr
;
101 rawptr
->u
= u
; /*Copy the uarea into the tdata part of the bfd */
103 /* Create the sections. This is raunchy, but bfd_close wants to free
106 core_stacksec(abfd
) = (asection
*) bfd_zmalloc (sizeof (asection
));
107 if (core_stacksec (abfd
) == NULL
) {
109 bfd_set_error (bfd_error_no_memory
);
110 free ((void *)rawptr
);
113 core_datasec (abfd
) = (asection
*) zalloc (sizeof (asection
));
114 if (core_datasec (abfd
) == NULL
) {
116 free ((void *)core_stacksec (abfd
));
119 core_regsec (abfd
) = (asection
*) zalloc (sizeof (asection
));
120 if (core_regsec (abfd
) == NULL
) {
121 free ((void *)core_datasec (abfd
));
125 core_stacksec (abfd
)->name
= ".stack";
126 core_datasec (abfd
)->name
= ".data";
127 core_regsec (abfd
)->name
= ".reg";
129 /* FIXME: Need to worry about shared memory, library data, and library
130 text. I don't think that any of these things are supported on the
131 system on which I am developing this for though. */
134 core_stacksec (abfd
)->flags
= SEC_ALLOC
+ SEC_LOAD
+ SEC_HAS_CONTENTS
;
135 core_datasec (abfd
)->flags
= SEC_ALLOC
+ SEC_LOAD
+ SEC_HAS_CONTENTS
;
136 core_regsec (abfd
)->flags
= SEC_ALLOC
+ SEC_HAS_CONTENTS
;
138 core_datasec (abfd
)->_raw_size
= u
.pt_dsize
;
139 core_stacksec (abfd
)->_raw_size
= u
.pt_ssize
;
140 core_regsec (abfd
)->_raw_size
= sizeof(u
);
142 core_datasec (abfd
)->vma
= u
.pt_o_data_start
;
143 core_stacksec (abfd
)->vma
= USRSTACK
- u
.pt_ssize
;
144 core_regsec (abfd
)->vma
= 0 - sizeof(u
); /* see trad-core.c */
146 core_datasec (abfd
)->filepos
= (int) u
.pt_dataptr
;
147 core_stacksec (abfd
)->filepos
= (int) (u
.pt_dataptr
+ u
.pt_dsize
);
148 core_regsec (abfd
)->filepos
= 0; /* Register segment is ptrace_user */
150 /* Align to word at least */
151 core_stacksec (abfd
)->alignment_power
= 2;
152 core_datasec (abfd
)->alignment_power
= 2;
153 core_regsec (abfd
)->alignment_power
= 2;
155 abfd
->sections
= core_stacksec (abfd
);
156 core_stacksec (abfd
)->next
= core_datasec (abfd
);
157 core_datasec (abfd
)->next
= core_regsec (abfd
);
158 abfd
->section_count
= 3;
164 ptrace_unix_core_file_failing_command (abfd
)
167 char *com
= abfd
->tdata
.trad_core_data
->u
.pt_comm
;
176 ptrace_unix_core_file_failing_signal (abfd
)
179 return abfd
->tdata
.trad_core_data
->u
.pt_sigframe
.sig_num
;
184 ptrace_unix_core_file_matches_executable_p (core_bfd
, exec_bfd
)
185 bfd
*core_bfd
, *exec_bfd
;
187 /* FIXME: Use pt_timdat field of the ptrace_user structure to match
188 the date of the executable */
192 /* If somebody calls any byte-swapping routines, shoot them. */
196 abort(); /* This way doesn't require any declaration for ANSI to fuck up */
198 #define NO_GET ((bfd_vma (*) PARAMS (( const bfd_byte *))) swap_abort )
199 #define NO_PUT ((void (*) PARAMS ((bfd_vma, bfd_byte *))) swap_abort )
200 #define NO_SIGNED_GET \
201 ((bfd_signed_vma (*) PARAMS ((const bfd_byte *))) swap_abort )
203 bfd_target ptrace_core_vec
=
206 bfd_target_unknown_flavour
,
207 true, /* target byte order */
208 true, /* target headers byte order */
209 (HAS_RELOC
| EXEC_P
| /* object flags */
210 HAS_LINENO
| HAS_DEBUG
|
211 HAS_SYMS
| HAS_LOCALS
| WP_TEXT
| D_PAGED
),
212 (SEC_HAS_CONTENTS
| SEC_ALLOC
| SEC_LOAD
| SEC_RELOC
), /* section flags */
213 0, /* symbol prefix */
214 ' ', /* ar_pad_char */
215 16, /* ar_max_namelen */
216 3, /* minimum alignment power */
217 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 64 bit data */
218 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 32 bit data */
219 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 16 bit data */
220 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 64 bit hdrs */
221 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 32 bit hdrs */
222 NO_GET
, NO_SIGNED_GET
, NO_PUT
, /* 16 bit hdrs */
224 { /* bfd_check_format */
225 _bfd_dummy_target
, /* unknown format */
226 _bfd_dummy_target
, /* object file */
227 _bfd_dummy_target
, /* archive */
228 ptrace_unix_core_file_p
/* a core file */
230 { /* bfd_set_format */
231 bfd_false
, bfd_false
,
234 { /* bfd_write_contents */
235 bfd_false
, bfd_false
,
239 BFD_JUMP_TABLE_GENERIC (_bfd_generic
),
240 BFD_JUMP_TABLE_COPY (_bfd_generic
),
241 BFD_JUMP_TABLE_CORE (ptrace_unix
),
242 BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive
),
243 BFD_JUMP_TABLE_SYMBOLS (_bfd_nosymbols
),
244 BFD_JUMP_TABLE_RELOCS (_bfd_norelocs
),
245 BFD_JUMP_TABLE_WRITE (_bfd_generic
),
246 BFD_JUMP_TABLE_LINK (_bfd_nolink
),
248 (PTR
) 0 /* backend_data */
251 #endif /* PTRACE_CORE */