bfd/newsos3.c

   1 /* BFD back-end for NewsOS3 (Sony, 68k) binaries.
   2    Copyright (C) 1990-1991 Free Software Foundation, Inc.
   3
   4 This file is part of BFD, the Binary File Descriptor library.
   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 #define TARGET_BYTE_ORDER_BIG_P 1
  21
  22 #define PAGE_SIZE       4096
  23 #define SEGMENT_SIZE    PAGE_SIZE
  24 #define TEXT_START_ADDR 0
  25 #define ARCH 32
  26 #define BYTES_IN_WORD 4
  27
  28 #include <ansidecl.h>
  29 #include <sysdep.h>
  30 #include "bfd.h"
  31 #include "libbfd.h"
  32 #include "aout64.h"
  33
  34 /**From: bothner@cs.wisc.edu***********************************************/
  35 #undef N_TXTOFF
  36 #define N_TXTOFF(x)   ( (N_MAGIC((x)) == ZMAGIC) ? PAGE_SIZE : EXEC_BYTES_SIZE)
  37 /**************************************************************************/
  38
  39 #include "stab.gnu.h"
  40 #include "ar.h"
  41 #include "libaout.h"           /* BFD a.out internal data structures */
  42 #if 0
  43 int vfprintf(file, format, args) /* Temporary crock! */
  44      FILE *file; char *format; char *args;
  45 {
  46     return _doprnt (format, args, file);
  47 }
  48 #endif
  49
  50
  51 bfd_target *newsos3_callback ();
  52
  53 bfd_target *
  54 DEFUN(newsos3_object_p,(abfd),
  55      bfd *abfd)
  56 {
  57   unsigned char magicbuf[4]; /* Raw bytes of magic number from file */
  58   unsigned long magic;          /* Swapped magic number */
  59
  60   bfd_error = system_call_error;
  61
  62   if (bfd_read ((PTR)magicbuf, 1, sizeof (magicbuf), abfd) !=
  63       sizeof (magicbuf))
  64     return 0;
  65   magic = bfd_h_get_32 (abfd, magicbuf);
  66
  67   if (N_BADMAG (*((struct internal_exec *) &magic))) return 0;
  68
  69   return aout_32_some_aout_object_p (abfd, newsos3_callback);
  70 }
  71
  72 /* Finish up the reading of a NEWS-OS a.out file header */
  73 bfd_target *
  74 DEFUN(newsos3_callback,(abfd),
  75       bfd *abfd)
  76 {
  77   struct internal_exec *execp = exec_hdr (abfd);
  78
  79   WORK_OUT_FILE_POSITIONS(abfd, execp) ;
  80
  81   /* Determine the architecture and machine type of the object file.
  82    */
  83   bfd_default_set_arch_mach(abfd, bfd_arch_m68k, 0);
  84
  85
  86   return abfd->xvec;
  87 }
  88
  89 /* Write an object file in NEWS-OS format.
  90    Section contents have already been written.  We write the
  91    file header, symbols, and relocation.  */
  92
  93 boolean
  94 DEFUN(newsos3_write_object_contents,(abfd),
  95       bfd *abfd)
  96 {
  97   bfd_size_type data_pad = 0;
  98   struct external_exec exec_bytes;
  99   struct internal_exec *execp = exec_hdr (abfd);
 100
 101   WRITE_HEADERS(abfd, execp);
 102   return true;
 103 }
 104 \f
 105 /* Transfer vectors for NEWS-OS version 3 */
 106
 107 /* We use BFD generic archive files.  */
 108 #define newsos_openr_next_archived_file bfd_generic_openr_next_archived_file
 109 #define newsos_generic_stat_arch_elt    bfd_generic_stat_arch_elt
 110 #define newsos_slurp_armap              bfd_slurp_bsd_armap
 111 #define newsos_slurp_extended_name_table        bfd_true
 112 #define newsos_write_armap              bsd_write_armap
 113 #define newsos_truncate_arname          bfd_bsd_truncate_arname
 114
 115 /* We don't support core files yet.  FIXME.  */
 116 #define newsos_core_file_failing_command        _bfd_dummy_core_file_failing_command
 117 #define newsos_core_file_failing_signal _bfd_dummy_core_file_failing_signal
 118 #define newsos_core_file_matches_executable_p   \
 119                                 _bfd_dummy_core_file_matches_executable_p
 120 #define newsos_core_file_p              _bfd_dummy_target
 121
 122 #define newsos_bfd_debug_info_start             bfd_void
 123 #define newsos_bfd_debug_info_end               bfd_void
 124 #define newsos_bfd_debug_info_accumulate        (PROTO(void,(*),(bfd*, struct sec *))) bfd_void
 125
 126 #define newsos_mkobject aout_32_mkobject
 127 #define newsos_close_and_cleanup aout_32_close_and_cleanup
 128 #define newsos_set_section_contents aout_32_set_section_contents
 129 #define newsos_get_section_contents aout_32_get_section_contents
 130 #define newsos_new_section_hook aout_32_new_section_hook
 131 #define newsos_get_symtab_upper_bound aout_32_get_symtab_upper_bound
 132 #define newsos_get_symtab aout_32_get_symtab
 133 #define newsos_get_reloc_upper_bound aout_32_get_reloc_upper_bound
 134 #define newsos_canonicalize_reloc aout_32_canonicalize_reloc
 135 #define newsos_make_empty_symbol aout_32_make_empty_symbol
 136 #define newsos_print_symbol aout_32_print_symbol
 137 #define newsos_get_lineno aout_32_get_lineno
 138 #define newsos_set_arch_mach aout_32_set_arch_mach
 139 #define newsos_find_nearest_line aout_32_find_nearest_line
 140 #define newsos_sizeof_headers aout_32_sizeof_headers
 141
 142
 143 /* We define our own versions of these routines.  */
 144
 145
 146 bfd_target newsos3_vec = /* Sony 68k-based machines running newsos3 */
 147 {
 148   "a.out-newsos3",              /* name */
 149   bfd_target_aout_flavour,
 150   true,                         /* target byte order */
 151   true,                         /* target headers byte order */
 152   (HAS_RELOC | EXEC_P |         /* object flags */
 153    HAS_LINENO | HAS_DEBUG |
 154    HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED),
 155   (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
 156   ' ',                          /* ar_pad_char */
 157   16,                           /* ar_max_namelen */
 158   1,                            /* minimum alignment */
 159   _do_getb64, _do_putb64,       _do_getb32, _do_putb32, _do_getb16, _do_putb16, /* data */
 160   _do_getb64, _do_putb64,       _do_getb32, _do_putb32, _do_getb16, _do_putb16, /* hdrs */
 161
 162     {_bfd_dummy_target, newsos3_object_p, /* bfd_check_format */
 163        bfd_generic_archive_p, newsos_core_file_p},
 164     {bfd_false, newsos_mkobject,        /* bfd_set_format */
 165        _bfd_generic_mkarchive, bfd_false},
 166     {bfd_false, newsos3_write_object_contents, /* bfd_write_contents */
 167        _bfd_write_archive_contents, bfd_false},
 168
 169   JUMP_TABLE(newsos)
 170 };