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 PAGE_SIZE       4096
  21 #define SEGMENT_SIZE    PAGE_SIZE
  22 #define TEXT_START_ADDR 0
  23 #define ARCH 32
  24 #define BYTES_IN_WORD 4
  25
  26 #include <ansidecl.h>
  27 #include <sysdep.h>
  28 #include "bfd.h"
  29 #include "libbfd.h"
  30 #include "aout64.h"
  31
  32 /**From: bothner@cs.wisc.edu***********************************************/
  33 #undef N_TXTOFF
  34 #define N_TXTOFF(x)   ( (N_MAGIC((x)) == ZMAGIC) ? PAGE_SIZE : EXEC_BYTES_SIZE)
  35 /**************************************************************************/
  36
  37 #include "stab.gnu.h"
  38 #include "ar.h"
  39 #include "libaout.h"           /* BFD a.out internal data structures */
  40 #if 0
  41 int vfprintf(file, format, args) /* Temporary crock! */
  42      FILE *file; char *format; char *args;
  43 {
  44     return _doprnt (format, args, file);
  45 }
  46 #endif
  47
  48
  49 bfd_target *newsos3_callback ();
  50
  51 bfd_target *
  52 DEFUN(newsos3_object_p,(abfd),
  53      bfd *abfd)
  54 {
  55   struct external_exec exec_bytes;
  56   struct internal_exec exec;
  57
  58   if (bfd_read ((PTR) &exec_bytes, 1, EXEC_BYTES_SIZE, abfd)
  59       != EXEC_BYTES_SIZE) {
  60     bfd_error = wrong_format;
  61     return 0;
  62   }
  63
  64   exec.a_info = bfd_h_get_32 (abfd, exec_bytes.e_info);
  65
  66   if (N_BADMAG (exec)) return 0;
  67
  68   NAME(aout,swap_exec_header_in)(abfd, &exec_bytes, &exec);
  69   return aout_32_some_aout_object_p (abfd, &exec, 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 };