home *** CD-ROM | disk | FTP | other *** search
/ Frozen Fish 1: Amiga / FrozenFish-Apr94.iso / bbs / gnu / gdb-4.12.tar.gz / gdb-4.12.tar / gdb-4.12 / bfd / coff-m88k.c < prev    next >
C/C++ Source or Header  |  1994-02-03  |  5KB  |  140 lines
  1. /* BFD back-end for Motorola 88000 COFF "Binary Compatability Standard" files.
  2.    Copyright 1990, 1991, 1992, 1993 Free Software Foundation, Inc.
  3.    Written by Cygnus Support.
  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., 675 Mass Ave, Cambridge, MA 02139, USA.  */
  20.  
  21. #define M88 1        /* Customize various include files */
  22. #include "bfd.h"
  23. #include "sysdep.h"
  24. #include "libbfd.h"
  25. #include "obstack.h"
  26. #include "coff/m88k.h"
  27. #include "coff/internal.h"
  28. #include "libcoff.h"
  29. #undef HOWTO_PREPARE
  30. /* Provided the symbol, returns the value reffed */
  31. #define HOWTO_PREPARE(relocation, symbol)     \
  32.   {                        \
  33.   if (symbol != (asymbol *)NULL) {        \
  34.     if (bfd_is_com_section (symbol->section)) { \
  35.       relocation = 0;                \
  36.     }                        \
  37.     else {                    \
  38.       relocation = symbol->value;        \
  39.     }                        \
  40.   }                        \
  41.   if (symbol->section != (asection *)NULL) {    \
  42.     relocation += symbol->section->output_section->vma +    \
  43.       symbol->section->output_offset;        \
  44.   }                        \
  45. }            
  46.  
  47.  
  48. static bfd_reloc_status_type 
  49. DEFUN(howto_hvrt16,(abfd, reloc_entry, symbol_in, data,
  50.             ignore_input_section, ignore_bfd, error_message),
  51.       bfd *abfd AND
  52.       arelent *reloc_entry AND
  53.       asymbol *symbol_in AND
  54.       PTR data AND
  55.       asection *ignore_input_section AND
  56.       bfd *ignore_bfd AND
  57.       char **error_message)
  58. {
  59.   long relocation = 0;
  60.   bfd_vma addr = reloc_entry->address;
  61.   long x = bfd_get_16(abfd, (bfd_byte *)data + addr);
  62.  
  63.   HOWTO_PREPARE(relocation, symbol_in);
  64.  
  65.   x = (x + relocation + reloc_entry->addend) >> 16;
  66.  
  67.   bfd_put_16(abfd, x, (bfd_byte *)data + addr);
  68.   return bfd_reloc_ok;
  69. }
  70.  
  71.  
  72.  
  73. static reloc_howto_type howto_table[] = 
  74. {
  75.   HOWTO(R_PCR16L,02,1,16,true, 0,complain_overflow_signed, 0, "PCR16L",false,0x0000ffff,0x0000ffff,true),
  76.   HOWTO(R_PCR26L,02,2,26,true, 0,complain_overflow_signed, 0, "PCR26L",false,0x03ffffff,0x03ffffff,true),
  77.   HOWTO(R_VRT16, 00,1,16,false,0,complain_overflow_bitfield, 0, "VRT16", false,0x0000ffff,0x0000ffff,true),
  78.   HOWTO(R_HVRT16,16,1,16,false,0,complain_overflow_dont,howto_hvrt16,"HVRT16",false,0x0000ffff,0x0000ffff,true),
  79.   HOWTO(R_LVRT16,00,1,16,false,0,complain_overflow_dont, 0, "LVRT16",false,0x0000ffff,0x0000ffff,true),
  80.   HOWTO(R_VRT32, 00,2,32,false,0,complain_overflow_bitfield, 0, "VRT32", false,0xffffffff,0xffffffff,true),
  81. };
  82.  
  83.  
  84. /* Code to swap in the reloc offset */
  85. #define SWAP_IN_RELOC_OFFSET   bfd_h_get_16
  86. #define SWAP_OUT_RELOC_OFFSET bfd_h_put_16
  87.  
  88.  
  89. /* Code to turn an external r_type into a pointer to an entry in the
  90.    above howto table */
  91. #define RTYPE2HOWTO(cache_ptr, dst)                    \
  92.         if ((dst)->r_type >= R_PCR16L && (dst)->r_type <= R_VRT32) {\
  93.         cache_ptr->howto = howto_table + (dst)->r_type - R_PCR16L;\
  94.         cache_ptr->addend += (dst)->r_offset << 16;        \
  95.         }                                \
  96.         else {                            \
  97.         BFD_ASSERT(0);                        \
  98.         }
  99.  
  100.  
  101.  
  102. #define BADMAG(x) MC88BADMAG(x)
  103. #include "coffcode.h"
  104.  
  105. #undef coff_write_armap
  106.  
  107. bfd_target m88kbcs_vec =
  108. {
  109.   "coff-m88kbcs",        /* name */
  110.   bfd_target_coff_flavour,
  111.   true,                /* data byte order is big */
  112.   true,                /* header byte order is big */
  113.  
  114.   (HAS_RELOC | EXEC_P |        /* object flags */
  115.    HAS_LINENO | HAS_DEBUG |
  116.    HAS_SYMS | HAS_LOCALS | WP_TEXT),
  117.  
  118.   (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
  119.   '_',                /* leading underscore */
  120.   '/',                /* ar_pad_char */
  121.   15,                /* ar_max_namelen */
  122.   3,                /* default alignment power */
  123.   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
  124.      bfd_getb32, bfd_getb_signed_32, bfd_putb32,
  125.      bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
  126.   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
  127.      bfd_getb32, bfd_getb_signed_32, bfd_putb32,
  128.      bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
  129.  
  130.     {_bfd_dummy_target, coff_object_p, /* bfd_check_format */
  131.        bfd_generic_archive_p, _bfd_dummy_target},
  132.     {bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format */
  133.        bfd_false},
  134.     {bfd_false, coff_write_object_contents, /* bfd_write_contents */
  135.        _bfd_write_archive_contents, bfd_false},
  136.  
  137.   JUMP_TABLE(coff),
  138.   COFF_SWAP_TABLE,
  139. };
  140.