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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [bfd/] [hppabsd-core.c] - Blame information for rev 298

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 24 jeremybenn
/* BFD back-end for HPPA BSD core files.
2
   Copyright 1993, 1994, 1995, 1998, 1999, 2001, 2002, 2003, 2004, 2005,
3
   2006, 2007 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 3 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., 51 Franklin Street - Fifth Floor, Boston,
20
   MA 02110-1301, USA.
21
 
22
   Written by the Center for Software Science at the University of Utah
23
   and by Cygnus Support.
24
 
25
   The core file structure for the Utah 4.3BSD and OSF1 ports on the
26
   PA is a mix between traditional cores and hpux cores -- just
27
   different enough that supporting this format would tend to add
28
   gross hacks to trad-core.c or hpux-core.c.  So instead we keep any
29
   gross hacks isolated to this file.  */
30
 
31
/* This file can only be compiled on systems which use HPPA-BSD style
32
   core files.
33
 
34
   I would not expect this to be of use to any other host/target, but
35
   you never know.  */
36
 
37
#include "sysdep.h"
38
#include "bfd.h"
39
#include "libbfd.h"
40
 
41
#if defined (HOST_HPPABSD)
42
 
43
#include "machine/vmparam.h"
44
 
45
#include <sys/param.h>
46
#include <sys/dir.h>
47
#include <signal.h>
48
#include <machine/reg.h>
49
#include <sys/user.h>           /* After a.out.h  */
50
#include <sys/file.h>
51
 
52
static asection *make_bfd_asection
53
  PARAMS ((bfd *, const char *, flagword, bfd_size_type, file_ptr,
54
           unsigned int));
55
static const bfd_target *hppabsd_core_core_file_p
56
  PARAMS ((bfd *));
57
static char *hppabsd_core_core_file_failing_command
58
  PARAMS ((bfd *));
59
static int hppabsd_core_core_file_failing_signal
60
  PARAMS ((bfd *));
61
#define hppabsd_core_core_file_matches_executable_p generic_core_file_matches_executable_p
62
static void swap_abort
63
  PARAMS ((void));
64
 
65
/* These are stored in the bfd's tdata.  */
66
 
67
struct hppabsd_core_struct
68
  {
69
    int sig;
70
    char cmd[MAXCOMLEN + 1];
71
    asection *data_section;
72
    asection *stack_section;
73
    asection *reg_section;
74
  };
75
 
76
#define core_hdr(bfd) ((bfd)->tdata.hppabsd_core_data)
77
#define core_signal(bfd) (core_hdr(bfd)->sig)
78
#define core_command(bfd) (core_hdr(bfd)->cmd)
79
#define core_datasec(bfd) (core_hdr(bfd)->data_section)
80
#define core_stacksec(bfd) (core_hdr(bfd)->stack_section)
81
#define core_regsec(bfd) (core_hdr(bfd)->reg_section)
82
 
83
static asection *
84
make_bfd_asection (abfd, name, flags, size, offset, alignment_power)
85
     bfd *abfd;
86
     const char *name;
87
     flagword flags;
88
     bfd_size_type size;
89
     file_ptr offset;
90
     unsigned int alignment_power;
91
{
92
  asection *asect;
93
 
94
  asect = bfd_make_section_with_flags (abfd, name, flags);
95
  if (!asect)
96
    return NULL;
97
 
98
  asect->size = size;
99
  asect->filepos = offset;
100
  asect->alignment_power = alignment_power;
101
 
102
  return asect;
103
}
104
 
105
static const bfd_target *
106
hppabsd_core_core_file_p (abfd)
107
     bfd *abfd;
108
{
109
  int val;
110
  struct user u;
111
  struct hppabsd_core_struct *coredata;
112
  int clicksz;
113
 
114
  /* Try to read in the u-area.  We will need information from this
115
     to know how to grok the rest of the core structures.  */
116
  val = bfd_bread ((void *) &u, (bfd_size_type) sizeof u, abfd);
117
  if (val != sizeof u)
118
    {
119
      if (bfd_get_error () != bfd_error_system_call)
120
        bfd_set_error (bfd_error_wrong_format);
121
      return NULL;
122
    }
123
 
124
  /* Get the page size out of the u structure.  This will be different
125
     for PA 1.0 machines and PA 1.1 machines.   Yuk!  */
126
  clicksz = u.u_pcb.pcb_pgsz;
127
 
128
  /* clicksz must be a power of two >= 2k.  */
129
  if (clicksz < 0x800
130
      || clicksz != (clicksz & -clicksz))
131
    {
132
      bfd_set_error (bfd_error_wrong_format);
133
      return NULL;
134
    }
135
 
136
  /* Sanity checks.  Make sure the size of the core file matches the
137
     the size computed from information within the core itself.  */
138
  {
139
    struct stat statbuf;
140
 
141
    if (bfd_stat (abfd, &statbuf) < 0)
142
      return NULL;
143
 
144
    if (NBPG * (UPAGES + u.u_dsize + u.u_ssize) > statbuf.st_size)
145
      {
146
        bfd_set_error (bfd_error_file_truncated);
147
        return NULL;
148
      }
149
    if (clicksz * (UPAGES + u.u_dsize + u.u_ssize) < statbuf.st_size)
150
      {
151
        /* The file is too big.  Maybe it's not a core file
152
           or we otherwise have bad values for u_dsize and u_ssize).  */
153
        bfd_set_error (bfd_error_wrong_format);
154
        return NULL;
155
      }
156
  }
157
 
158
  /* OK, we believe you.  You're a core file (sure, sure).  */
159
 
160
  coredata = (struct hppabsd_core_struct *)
161
    bfd_zalloc (abfd, (bfd_size_type) sizeof (struct hppabsd_core_struct));
162
  if (!coredata)
163
    return NULL;
164
 
165
  /* Make the core data and available via the tdata part of the BFD.  */
166
  abfd->tdata.hppabsd_core_data = coredata;
167
 
168
  /* Create the sections.  */
169
  core_stacksec (abfd) = make_bfd_asection (abfd, ".stack",
170
                                           SEC_ALLOC + SEC_HAS_CONTENTS,
171
                                           clicksz * u.u_ssize,
172
                                           NBPG * (USIZE + KSTAKSIZE)
173
                                             + clicksz * u.u_dsize, 2);
174
  if (core_stacksec (abfd) == NULL)
175
    goto fail;
176
  core_stacksec (abfd)->vma = USRSTACK;
177
 
178
  core_datasec (abfd) = make_bfd_asection (abfd, ".data",
179
                                          SEC_ALLOC + SEC_LOAD
180
                                            + SEC_HAS_CONTENTS,
181
                                          clicksz * u.u_dsize,
182
                                          NBPG * (USIZE + KSTAKSIZE), 2);
183
  if (core_datasec (abfd) == NULL)
184
    goto fail;
185
  core_datasec (abfd)->vma = UDATASEG;
186
 
187
  core_regsec (abfd) = make_bfd_asection (abfd, ".reg",
188
                                         SEC_HAS_CONTENTS,
189
                                         KSTAKSIZE * NBPG,
190
                                         NBPG * USIZE, 2);
191
  if (core_regsec (abfd) == NULL)
192
    goto fail;
193
  core_regsec (abfd)->vma = 0;
194
 
195
  strncpy (core_command (abfd), u.u_comm, MAXCOMLEN + 1);
196
  core_signal (abfd) = u.u_code;
197
  return abfd->xvec;
198
 
199
 fail:
200
  bfd_release (abfd, abfd->tdata.any);
201
  abfd->tdata.any = NULL;
202
  bfd_section_list_clear (abfd);
203
  return NULL;
204
}
205
 
206
static char *
207
hppabsd_core_core_file_failing_command (abfd)
208
     bfd *abfd;
209
{
210
  return core_command (abfd);
211
}
212
 
213
static int
214
hppabsd_core_core_file_failing_signal (abfd)
215
     bfd *abfd;
216
{
217
  return core_signal (abfd);
218
}
219
 
220
/* If somebody calls any byte-swapping routines, shoot them.  */
221
static void
222
swap_abort ()
223
{
224
  /* This way doesn't require any declaration for ANSI to fuck up.  */
225
  abort ();
226
}
227
 
228
#define NO_GET ((bfd_vma (*) (const void *)) swap_abort)
229
#define NO_PUT ((void (*) (bfd_vma, void *)) swap_abort)
230
#define NO_GETS ((bfd_signed_vma (*) (const void *)) swap_abort)
231
#define NO_GET64 ((bfd_uint64_t (*) (const void *)) swap_abort)
232
#define NO_PUT64 ((void (*) (bfd_uint64_t, void *)) swap_abort)
233
#define NO_GETS64 ((bfd_int64_t (*) (const void *)) swap_abort)
234
 
235
const bfd_target hppabsd_core_vec =
236
  {
237
    "hppabsd-core",
238
    bfd_target_unknown_flavour,
239
    BFD_ENDIAN_BIG,             /* target byte order */
240
    BFD_ENDIAN_BIG,             /* target headers byte order */
241
    (HAS_RELOC | EXEC_P |       /* object flags */
242
     HAS_LINENO | HAS_DEBUG |
243
     HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
244
    (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
245
    0,                                                      /* symbol prefix */
246
    ' ',                                                   /* ar_pad_char */
247
    16,                                                    /* ar_max_namelen */
248
    NO_GET64, NO_GETS64, NO_PUT64,      /* 64 bit data */
249
    NO_GET, NO_GETS, NO_PUT,            /* 32 bit data */
250
    NO_GET, NO_GETS, NO_PUT,            /* 16 bit data */
251
    NO_GET64, NO_GETS64, NO_PUT64,      /* 64 bit hdrs */
252
    NO_GET, NO_GETS, NO_PUT,            /* 32 bit hdrs */
253
    NO_GET, NO_GETS, NO_PUT,            /* 16 bit hdrs */
254
 
255
    {                           /* bfd_check_format */
256
      _bfd_dummy_target,                /* unknown format */
257
      _bfd_dummy_target,                /* object file */
258
      _bfd_dummy_target,                /* archive */
259
      hppabsd_core_core_file_p          /* a core file */
260
    },
261
    {                           /* bfd_set_format */
262
      bfd_false, bfd_false,
263
      bfd_false, bfd_false
264
    },
265
    {                           /* bfd_write_contents */
266
      bfd_false, bfd_false,
267
      bfd_false, bfd_false
268
    },
269
 
270
    BFD_JUMP_TABLE_GENERIC (_bfd_generic),
271
    BFD_JUMP_TABLE_COPY (_bfd_generic),
272
    BFD_JUMP_TABLE_CORE (hppabsd_core),
273
    BFD_JUMP_TABLE_ARCHIVE (_bfd_noarchive),
274
    BFD_JUMP_TABLE_SYMBOLS (_bfd_nosymbols),
275
    BFD_JUMP_TABLE_RELOCS (_bfd_norelocs),
276
    BFD_JUMP_TABLE_WRITE (_bfd_generic),
277
    BFD_JUMP_TABLE_LINK (_bfd_nolink),
278
    BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
279
 
280
    NULL,
281
 
282
    (PTR) 0                      /* backend_data */
283
  };
284
#endif

powered by: WebSVN 2.1.0

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