OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [insight/] [bfd/] [hppabsd-core.c] - Blame information for rev 1765

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 578 markom
/* BFD back-end for HPPA BSD core files.
2
   Copyright 1993, 1994, 1995, 1998, 1999, 2001
3
   Free Software Foundation, Inc.
4
 
5
   This file is part of BFD, the Binary File Descriptor library.
6
 
7
   This program is free software; you can redistribute it and/or modify
8
   it under the terms of the GNU General Public License as published by
9
   the Free Software Foundation; either version 2 of the License, or
10
   (at your option) any later version.
11
 
12
   This program is distributed in the hope that it will be useful,
13
   but WITHOUT ANY WARRANTY; without even the implied warranty of
14
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15
   GNU General Public License for more details.
16
 
17
   You should have received a copy of the GNU General Public License
18
   along with this program; if not, write to the Free Software
19
   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
20
 
21
   Written by the Center for Software Science at the University of Utah
22
   and by Cygnus Support.
23
 
24
   The core file structure for the Utah 4.3BSD and OSF1 ports on the
25
   PA is a mix between traditional cores and hpux cores -- just
26
   different enough that supporting this format would tend to add
27
   gross hacks to trad-core.c or hpux-core.c.  So instead we keep any
28
   gross hacks isolated to this file.  */
29
 
30
/* This file can only be compiled on systems which use HPPA-BSD style
31
   core files.
32
 
33
   I would not expect this to be of use to any other host/target, but
34
   you never know.  */
35
 
36
#include "bfd.h"
37
#include "sysdep.h"
38
#include "libbfd.h"
39
 
40
#if defined (HOST_HPPABSD)
41
 
42
#include "machine/vmparam.h"
43
 
44
#include <sys/param.h>
45
#include <sys/dir.h>
46
#include <signal.h>
47
#include <machine/reg.h>
48
#include <sys/user.h>           /* After a.out.h  */
49
#include <sys/file.h>
50
 
51
static asection *make_bfd_asection PARAMS ((bfd *, CONST char *,
52
                                            flagword, bfd_size_type,
53
                                            file_ptr, unsigned int));
54
static asymbol *hppabsd_core_make_empty_symbol PARAMS ((bfd *));
55
static const bfd_target *hppabsd_core_core_file_p PARAMS ((bfd *));
56
static char *hppabsd_core_core_file_failing_command PARAMS ((bfd *));
57
static int hppabsd_core_core_file_failing_signal PARAMS ((bfd *));
58
static boolean hppabsd_core_core_file_matches_executable_p
59
  PARAMS ((bfd *, bfd *));
60
static void swap_abort PARAMS ((void));
61
 
62
/* These are stored in the bfd's tdata.  */
63
 
64
struct hppabsd_core_struct
65
  {
66
    int sig;
67
    char cmd[MAXCOMLEN + 1];
68
    asection *data_section;
69
    asection *stack_section;
70
    asection *reg_section;
71
  };
72
 
73
#define core_hdr(bfd) ((bfd)->tdata.hppabsd_core_data)
74
#define core_signal(bfd) (core_hdr(bfd)->sig)
75
#define core_command(bfd) (core_hdr(bfd)->cmd)
76
#define core_datasec(bfd) (core_hdr(bfd)->data_section)
77
#define core_stacksec(bfd) (core_hdr(bfd)->stack_section)
78
#define core_regsec(bfd) (core_hdr(bfd)->reg_section)
79
 
80
static asection *
81
make_bfd_asection (abfd, name, flags, _raw_size, offset, alignment_power)
82
     bfd *abfd;
83
     CONST char *name;
84
     flagword flags;
85
     bfd_size_type _raw_size;
86
     file_ptr offset;
87
     unsigned int alignment_power;
88
{
89
  asection *asect;
90
 
91
  asect = bfd_make_section (abfd, name);
92
  if (!asect)
93
    return NULL;
94
 
95
  asect->flags = flags;
96
  asect->_raw_size = _raw_size;
97
  asect->filepos = offset;
98
  asect->alignment_power = alignment_power;
99
 
100
  return asect;
101
}
102
 
103
static asymbol *
104
hppabsd_core_make_empty_symbol (abfd)
105
     bfd *abfd;
106
{
107
  asymbol *new = (asymbol *) bfd_zalloc (abfd, sizeof (asymbol));
108
  if (new)
109
    new->the_bfd = abfd;
110
  return new;
111
}
112
 
113
static const bfd_target *
114
hppabsd_core_core_file_p (abfd)
115
     bfd *abfd;
116
{
117
  int val;
118
  struct user u;
119
  struct hppabsd_core_struct *coredata;
120
  int clicksz;
121
 
122
  /* Try to read in the u-area.  We will need information from this
123
     to know how to grok the rest of the core structures.  */
124
  val = bfd_read ((void *) &u, 1, sizeof u, abfd);
125
  if (val != sizeof u)
126
    {
127
      if (bfd_get_error () != bfd_error_system_call)
128
        bfd_set_error (bfd_error_wrong_format);
129
      return NULL;
130
    }
131
 
132
  /* Get the page size out of the u structure.  This will be different
133
     for PA 1.0 machines and PA 1.1 machines.   Yuk!  */
134
  clicksz = u.u_pcb.pcb_pgsz;
135
 
136
  /* clicksz must be a power of two >= 2k.  */
137
  if (clicksz < 0x800
138
      || clicksz != (clicksz & -clicksz))
139
    {
140
      bfd_set_error (bfd_error_wrong_format);
141
      return NULL;
142
    }
143
 
144
  /* Sanity checks.  Make sure the size of the core file matches the
145
     the size computed from information within the core itself.  */
146
  {
147
    FILE *stream = bfd_cache_lookup (abfd);
148
    struct stat statbuf;
149
    if (stream == NULL || fstat (fileno (stream), &statbuf) < 0)
150
      {
151
        bfd_set_error (bfd_error_system_call);
152
        return NULL;
153
      }
154
    if (NBPG * (UPAGES + u.u_dsize + u.u_ssize) > statbuf.st_size)
155
      {
156
        bfd_set_error (bfd_error_file_truncated);
157
        return NULL;
158
      }
159
    if (clicksz * (UPAGES + u.u_dsize + u.u_ssize) < statbuf.st_size)
160
      {
161
        /* The file is too big.  Maybe it's not a core file
162
           or we otherwise have bad values for u_dsize and u_ssize).  */
163
        bfd_set_error (bfd_error_wrong_format);
164
        return NULL;
165
      }
166
  }
167
 
168
  /* OK, we believe you.  You're a core file (sure, sure).  */
169
 
170
  coredata = (struct hppabsd_core_struct *)
171
    bfd_zalloc (abfd, sizeof (struct hppabsd_core_struct));
172
  if (!coredata)
173
    return NULL;
174
 
175
  /* Make the core data and available via the tdata part of the BFD.  */
176
  abfd->tdata.hppabsd_core_data = coredata;
177
 
178
  /* Create the sections.  */
179
  core_stacksec (abfd) = make_bfd_asection (abfd, ".stack",
180
                                           SEC_ALLOC + SEC_HAS_CONTENTS,
181
                                           clicksz * u.u_ssize,
182
                                           NBPG * (USIZE + KSTAKSIZE)
183
                                             + clicksz * u.u_dsize, 2);
184
  core_stacksec (abfd)->vma = USRSTACK;
185
 
186
  core_datasec (abfd) = make_bfd_asection (abfd, ".data",
187
                                          SEC_ALLOC + SEC_LOAD
188
                                            + SEC_HAS_CONTENTS,
189
                                          clicksz * u.u_dsize,
190
                                          NBPG * (USIZE + KSTAKSIZE), 2);
191
  core_datasec (abfd)->vma = UDATASEG;
192
 
193
  core_regsec (abfd) = make_bfd_asection (abfd, ".reg",
194
                                         SEC_HAS_CONTENTS,
195
                                         KSTAKSIZE * NBPG,
196
                                         NBPG * USIZE, 2);
197
  core_regsec (abfd)->vma = 0;
198
 
199
  strncpy (core_command (abfd), u.u_comm, MAXCOMLEN + 1);
200
  core_signal (abfd) = u.u_code;
201
  return abfd->xvec;
202
}
203
 
204
static char *
205
hppabsd_core_core_file_failing_command (abfd)
206
     bfd *abfd;
207
{
208
  return core_command (abfd);
209
}
210
 
211
/* ARGSUSED */
212
static int
213
hppabsd_core_core_file_failing_signal (abfd)
214
     bfd *abfd;
215
{
216
  return core_signal (abfd);
217
}
218
 
219
/* ARGSUSED */
220
static boolean
221
hppabsd_core_core_file_matches_executable_p (core_bfd, exec_bfd)
222
     bfd *core_bfd, *exec_bfd;
223
{
224
  /* There's no way to know this...  */
225
  return true;
226
}
227
 
228
#define hppabsd_core_get_symtab_upper_bound \
229
  _bfd_nosymbols_get_symtab_upper_bound
230
#define hppabsd_core_get_symtab _bfd_nosymbols_get_symtab
231
#define hppabsd_core_print_symbol _bfd_nosymbols_print_symbol
232
#define hppabsd_core_get_symbol_info _bfd_nosymbols_get_symbol_info
233
#define hppabsd_core_bfd_is_local_label_name \
234
  _bfd_nosymbols_bfd_is_local_label_name
235
#define hppabsd_core_get_lineno _bfd_nosymbols_get_lineno
236
#define hppabsd_core_find_nearest_line _bfd_nosymbols_find_nearest_line
237
#define hppabsd_core_bfd_make_debug_symbol _bfd_nosymbols_bfd_make_debug_symbol
238
#define hppabsd_core_read_minisymbols _bfd_nosymbols_read_minisymbols
239
#define hppabsd_core_minisymbol_to_symbol _bfd_nosymbols_minisymbol_to_symbol
240
 
241
/* If somebody calls any byte-swapping routines, shoot them.  */
242
static void
243
swap_abort ()
244
{
245
  /* This way doesn't require any declaration for ANSI to fuck up.  */
246
  abort ();
247
}
248
 
249
#define NO_GET  ((bfd_vma (*) PARAMS ((   const bfd_byte *))) swap_abort )
250
#define NO_PUT  ((void    (*) PARAMS ((bfd_vma, bfd_byte *))) swap_abort )
251
#define NO_SIGNED_GET \
252
  ((bfd_signed_vma (*) PARAMS ((const bfd_byte *))) swap_abort )
253
 
254
const bfd_target hppabsd_core_vec =
255
  {
256
    "hppabsd-core",
257
    bfd_target_unknown_flavour,
258
    BFD_ENDIAN_BIG,             /* target byte order */
259
    BFD_ENDIAN_BIG,             /* target headers byte order */
260
    (HAS_RELOC | EXEC_P |       /* object flags */
261
     HAS_LINENO | HAS_DEBUG |
262
     HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
263
    (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
264
    0,                                                      /* symbol prefix */
265
    ' ',                                                   /* ar_pad_char */
266
    16,                                                    /* ar_max_namelen */
267
    NO_GET, NO_SIGNED_GET, NO_PUT,      /* 64 bit data */
268
    NO_GET, NO_SIGNED_GET, NO_PUT,      /* 32 bit data */
269
    NO_GET, NO_SIGNED_GET, NO_PUT,      /* 16 bit data */
270
    NO_GET, NO_SIGNED_GET, NO_PUT,      /* 64 bit hdrs */
271
    NO_GET, NO_SIGNED_GET, NO_PUT,      /* 32 bit hdrs */
272
    NO_GET, NO_SIGNED_GET, NO_PUT,      /* 16 bit hdrs */
273
 
274
    {                           /* bfd_check_format */
275
     _bfd_dummy_target,         /* unknown format */
276
     _bfd_dummy_target,         /* object file */
277
     _bfd_dummy_target,         /* archive */
278
     hppabsd_core_core_file_p   /* a core file */
279
    },
280
    {                           /* bfd_set_format */
281
     bfd_false, bfd_false,
282
     bfd_false, bfd_false
283
    },
284
    {                           /* bfd_write_contents */
285
     bfd_false, bfd_false,
286
     bfd_false, bfd_false
287
    },
288
 
289
       BFD_JUMP_TABLE_GENERIC (_bfd_generic),
290
       BFD_JUMP_TABLE_COPY (_bfd_generic),
291
       BFD_JUMP_TABLE_CORE (hppabsd_core),
292
       BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
293
       BFD_JUMP_TABLE_SYMBOLS (hppabsd_core),
294
       BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
295
       BFD_JUMP_TABLE_WRITE (_bfd_generic),
296
       BFD_JUMP_TABLE_LINK (_bfd_nolink),
297
       BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
298
 
299
    NULL,
300
 
301
    (PTR) 0                      /* backend_data */
302
};
303
#endif

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.