1 /* BFD back end for NetBSD style core files
2    Copyright 1988, 1989, 1991, 1992, 1993, 1996, 1998, 1999, 2000, 2001,
3    2002, 2003, 2004, 2005
4    Free Software Foundation, Inc.
5    Written by Paul Kranenburg, EUR
6 
7    This file is part of BFD, the Binary File Descriptor library.
8 
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 2 of the License, or
12    (at your option) any later version.
13 
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18 
19    You should have received a copy of the GNU General Public License
20    along with this program; if not, write to the Free Software
21    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.  */
22 
23 #include "bfd.h"
24 #include "sysdep.h"
25 #include "libbfd.h"
26 #include "libaout.h"           /* BFD a.out internal data structures.  */
27 
28 #include <sys/param.h>
29 #include <sys/dir.h>
30 #include <signal.h>
31 #include <sys/core.h>
32 
33 /* The machine ID for OpenBSD/sparc64 and older versions of
34    NetBSD/sparc64 overlaps with M_MIPS1.  */
35 #define M_SPARC64_OPENBSD	M_MIPS1
36 
37 /* Offset of StackGhost cookie within `struct md_coredump' on
38    OpenBSD/sparc.  */
39 #define SPARC_WCOOKIE_OFFSET	344
40 
41 /* Offset of StackGhost cookie within `struct md_coredump' on
42    OpenBSD/sparc64.  */
43 #define SPARC64_WCOOKIE_OFFSET	832
44 
45 struct netbsd_core_struct
46 {
47   struct core core;
48 } *rawptr;
49 
50 /* Handle NetBSD-style core dump file.  */
51 
52 static const bfd_target *
netbsd_core_file_p(bfd * abfd)53 netbsd_core_file_p (bfd *abfd)
54 {
55   int val;
56   unsigned i;
57   file_ptr offset;
58   asection *asect;
59   struct core core;
60   struct coreseg coreseg;
61   bfd_size_type amt = sizeof core;
62 
63   val = bfd_bread (&core, amt, abfd);
64   if (val != sizeof core)
65     {
66       /* Too small to be a core file.  */
67       bfd_set_error (bfd_error_wrong_format);
68       return 0;
69     }
70 
71   if (CORE_GETMAGIC (core) != COREMAGIC)
72     {
73       bfd_set_error (bfd_error_wrong_format);
74       return 0;
75     }
76 
77   amt = sizeof (struct netbsd_core_struct);
78   rawptr = (struct netbsd_core_struct *) bfd_zalloc (abfd, amt);
79   if (rawptr == NULL)
80     return 0;
81 
82   rawptr->core = core;
83   abfd->tdata.netbsd_core_data = rawptr;
84 
85   offset = core.c_hdrsize;
86   for (i = 0; i < core.c_nseg; i++)
87     {
88       const char *sname;
89       flagword flags;
90 
91       if (bfd_seek (abfd, offset, SEEK_SET) != 0)
92 	goto punt;
93 
94       val = bfd_bread (&coreseg, sizeof coreseg, abfd);
95       if (val != sizeof coreseg)
96 	{
97 	  bfd_set_error (bfd_error_file_truncated);
98 	  goto punt;
99 	}
100       if (CORE_GETMAGIC (coreseg) != CORESEGMAGIC)
101 	{
102 	  bfd_set_error (bfd_error_wrong_format);
103 	  goto punt;
104 	}
105 
106       offset += core.c_seghdrsize;
107 
108       switch (CORE_GETFLAG (coreseg))
109 	{
110 	case CORE_CPU:
111 	  sname = ".reg";
112 	  flags = SEC_ALLOC + SEC_HAS_CONTENTS;
113 	  break;
114 	case CORE_DATA:
115 	  sname = ".data";
116 	  flags = SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS;
117 	  break;
118 	case CORE_STACK:
119 	  sname = ".stack";
120 	  flags = SEC_ALLOC + SEC_LOAD + SEC_HAS_CONTENTS;
121 	  break;
122 	default:
123 	  sname = ".unknown";
124 	  flags = SEC_ALLOC + SEC_HAS_CONTENTS;
125 	  break;
126 	}
127       asect = bfd_make_section_anyway (abfd, sname);
128       if (asect == NULL)
129 	goto punt;
130 
131       asect->flags = flags;
132       asect->size = coreseg.c_size;
133       asect->vma = coreseg.c_addr;
134       asect->filepos = offset;
135       asect->alignment_power = 2;
136 
137       if (CORE_GETFLAG (coreseg) == CORE_CPU)
138 	{
139 	  bfd_size_type wcookie_offset;
140 
141 	  switch (CORE_GETMID (core))
142 	    {
143 	    case M_SPARC_NETBSD:
144 	      wcookie_offset = SPARC_WCOOKIE_OFFSET;
145 	      break;
146 	    case M_SPARC64_OPENBSD:
147 	      wcookie_offset = SPARC64_WCOOKIE_OFFSET;
148 	      break;
149 	    default:
150 	      wcookie_offset = 0;
151 	      break;
152 	    }
153 
154 	  if (wcookie_offset > 0 && coreseg.c_size > wcookie_offset)
155 	    {
156 	      /* Truncate the .reg section.  */
157 	      asect->size = wcookie_offset;
158 
159 	      /* And create the .wcookie section.  */
160 	      asect = bfd_make_section_anyway (abfd, ".wcookie");
161 	      if (asect == NULL)
162 		goto punt;
163 
164 	      asect->flags = SEC_ALLOC + SEC_HAS_CONTENTS;
165 	      asect->size = coreseg.c_size - wcookie_offset;
166 	      asect->vma = 0;
167 	      asect->filepos = offset + wcookie_offset;
168 	      asect->alignment_power = 2;
169 	    }
170 	}
171 
172       offset += coreseg.c_size;
173     }
174 
175   /* Set architecture from machine ID.  */
176   switch (CORE_GETMID (core))
177     {
178     case M_ALPHA_NETBSD:
179       bfd_default_set_arch_mach (abfd, bfd_arch_alpha, 0);
180       break;
181 
182     case M_ARM6_NETBSD:
183       bfd_default_set_arch_mach (abfd, bfd_arch_arm, bfd_mach_arm_3);
184       break;
185 
186     case M_X86_64_NETBSD:
187       bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_x86_64);
188       break;
189 
190     case M_386_NETBSD:
191       bfd_default_set_arch_mach (abfd, bfd_arch_i386, bfd_mach_i386_i386);
192       break;
193 
194     case M_68K_NETBSD:
195     case M_68K4K_NETBSD:
196       bfd_default_set_arch_mach (abfd, bfd_arch_m68k, 0);
197       break;
198 
199     case M_88K_OPENBSD:
200       bfd_default_set_arch_mach (abfd, bfd_arch_m88k, 0);
201       break;
202 
203     case M_HPPA_OPENBSD:
204       bfd_default_set_arch_mach (abfd, bfd_arch_hppa, bfd_mach_hppa11);
205       break;
206 
207     case M_POWERPC_NETBSD:
208       bfd_default_set_arch_mach (abfd, bfd_arch_powerpc, bfd_mach_ppc);
209       break;
210 
211     case M_SPARC_NETBSD:
212       bfd_default_set_arch_mach (abfd, bfd_arch_sparc, bfd_mach_sparc);
213       break;
214 
215     case M_SPARC64_NETBSD:
216     case M_SPARC64_OPENBSD:
217       bfd_default_set_arch_mach (abfd, bfd_arch_sparc, bfd_mach_sparc_v9);
218       break;
219 
220     case M_VAX_NETBSD:
221     case M_VAX4K_NETBSD:
222       bfd_default_set_arch_mach (abfd, bfd_arch_vax, 0);
223       break;
224     }
225 
226   /* OK, we believe you.  You're a core file (sure, sure).  */
227   return abfd->xvec;
228 
229  punt:
230   bfd_release (abfd, abfd->tdata.any);
231   abfd->tdata.any = NULL;
232   bfd_section_list_clear (abfd);
233   return 0;
234 }
235 
236 static char*
netbsd_core_file_failing_command(bfd * abfd)237 netbsd_core_file_failing_command (bfd *abfd)
238 {
239   /*return core_command (abfd);*/
240   return abfd->tdata.netbsd_core_data->core.c_name;
241 }
242 
243 static int
netbsd_core_file_failing_signal(bfd * abfd)244 netbsd_core_file_failing_signal (bfd *abfd)
245 {
246   /*return core_signal (abfd);*/
247   return abfd->tdata.netbsd_core_data->core.c_signo;
248 }
249 
250 static bfd_boolean
netbsd_core_file_matches_executable_p(bfd * core_bfd ATTRIBUTE_UNUSED,bfd * exec_bfd ATTRIBUTE_UNUSED)251 netbsd_core_file_matches_executable_p  (bfd *core_bfd ATTRIBUTE_UNUSED,
252 					bfd *exec_bfd ATTRIBUTE_UNUSED)
253 {
254   /* FIXME, We have no way of telling at this point.  */
255   return TRUE;
256 }
257 
258 /* If somebody calls any byte-swapping routines, shoot them.  */
259 
260 static void
swap_abort(void)261 swap_abort (void)
262 {
263  /* This way doesn't require any declaration for ANSI to fuck up.  */
264   abort ();
265 }
266 
267 #define	NO_GET ((bfd_vma (*) (const void *)) swap_abort)
268 #define	NO_PUT ((void (*) (bfd_vma, void *)) swap_abort)
269 #define	NO_GETS ((bfd_signed_vma (*) (const void *)) swap_abort)
270 #define	NO_GET64 ((bfd_uint64_t (*) (const void *)) swap_abort)
271 #define	NO_PUT64 ((void (*) (bfd_uint64_t, void *)) swap_abort)
272 #define	NO_GETS64 ((bfd_int64_t (*) (const void *)) swap_abort)
273 
274 const bfd_target netbsd_core_vec =
275   {
276     "netbsd-core",
277     bfd_target_unknown_flavour,
278     BFD_ENDIAN_UNKNOWN,		/* Target byte order.  */
279     BFD_ENDIAN_UNKNOWN,		/* Target headers byte order.  */
280     (HAS_RELOC | EXEC_P |	/* Object flags.  */
281      HAS_LINENO | HAS_DEBUG |
282      HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
283     (SEC_HAS_CONTENTS |		/* Section flags.  */
284      SEC_ALLOC | SEC_LOAD | SEC_RELOC),
285     0,				/* Symbol prefix.  */
286     ' ',			/* ar_pad_char.  */
287     16,				/* ar_max_namelen.  */
288     NO_GET64, NO_GETS64, NO_PUT64,	/* 64 bit data.  */
289     NO_GET, NO_GETS, NO_PUT,		/* 32 bit data.  */
290     NO_GET, NO_GETS, NO_PUT,		/* 16 bit data.  */
291     NO_GET64, NO_GETS64, NO_PUT64,	/* 64 bit hdrs.  */
292     NO_GET, NO_GETS, NO_PUT,		/* 32 bit hdrs.  */
293     NO_GET, NO_GETS, NO_PUT,		/* 16 bit hdrs.  */
294 
295     {					/* bfd_check_format.  */
296       _bfd_dummy_target,		/* Unknown format.  */
297       _bfd_dummy_target,		/* Object file.  */
298       _bfd_dummy_target,		/* Archive.  */
299       netbsd_core_file_p		/* A core file.  */
300     },
301     {					/* bfd_set_format.  */
302       bfd_false, bfd_false,
303       bfd_false, bfd_false
304     },
305     {					/* bfd_write_contents.  */
306       bfd_false, bfd_false,
307       bfd_false, bfd_false
308     },
309 
310     BFD_JUMP_TABLE_GENERIC (_bfd_generic),
311     BFD_JUMP_TABLE_COPY (_bfd_generic),
312     BFD_JUMP_TABLE_CORE (netbsd),
313     BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
314     BFD_JUMP_TABLE_SYMBOLS (_bfd_nosymbols),
315     BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
316     BFD_JUMP_TABLE_WRITE (_bfd_generic),
317     BFD_JUMP_TABLE_LINK (_bfd_nolink),
318     BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
319 
320     NULL,
321 
322     (PTR) 0			        /* Backend_data.  */
323   };
324