* targets.c (bfd_target): Rearranged fields in target vector.
[external/binutils.git] / bfd / coff-apollo.c
1 /* BFD back-end for Apollo 68000 COFF binaries.
2    Copyright 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc.
3    By Troy Rollo (troy@cbme.unsw.edu.au)
4    Based on m68k standard COFF version Written by Cygnus Support.
5
6 This file is part of BFD, the Binary File Descriptor library.
7
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
12
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 GNU General Public License for more details.
17
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
21
22 #include "bfd.h"
23 #include "sysdep.h"
24 #include "libbfd.h"
25 #include "obstack.h"
26 #include "coff/apollo.h"
27 #include "coff/internal.h"
28 #include "libcoff.h"
29
30 #ifdef ONLY_DECLARE_RELOCS
31 extern reloc_howto_type apollocoff_howto_table[];
32 #else
33 reloc_howto_type apollocoff_howto_table[] = 
34 {
35   HOWTO(R_RELBYTE,             0,  0,   8,  false, 0, complain_overflow_bitfield, 0, "8",       true, 0x000000ff,0x000000ff, false),
36   HOWTO(R_RELWORD,             0,  1,   16, false, 0, complain_overflow_bitfield, 0, "16",      true, 0x0000ffff,0x0000ffff, false),
37   HOWTO(R_RELLONG,             0,  2,   32, false, 0, complain_overflow_bitfield, 0, "32",      true, 0xffffffff,0xffffffff, false),
38   HOWTO(R_PCRBYTE,             0,  0,   8,  true,  0, complain_overflow_signed, 0, "DISP8",    true, 0x000000ff,0x000000ff, false),
39   HOWTO(R_PCRWORD,             0,  1,   16, true,  0, complain_overflow_signed, 0, "DISP16",   true, 0x0000ffff,0x0000ffff, false),
40   HOWTO(R_PCRLONG,             0,  2,   32, true,  0, complain_overflow_signed, 0, "DISP32",   true, 0xffffffff,0xffffffff, false),
41   HOWTO(R_RELLONG_NEG,         0,  -2,  32, false, 0, complain_overflow_bitfield, 0, "-32",     true, 0xffffffff,0xffffffff, false),
42 };
43 #endif /* not ONLY_DECLARE_RELOCS */
44
45 #ifndef BADMAG
46 #define BADMAG(x) M68KBADMAG(x)
47 #endif
48 #define APOLLO_M68 1            /* Customize coffcode.h */
49
50 /* Turn a howto into a reloc number */
51
52 #ifdef ONLY_DECLARE_RELOCS
53 extern void apollo_rtype2howto PARAMS ((arelent *internal, int relocentry));
54 extern int apollo_howto2rtype PARAMS ((CONST struct reloc_howto_struct *));
55 #else
56 void
57 apollo_rtype2howto(internal, relocentry)
58      arelent *internal;
59      int relocentry;
60 {
61   switch (relocentry) 
62   {
63    case R_RELBYTE:      internal->howto = apollocoff_howto_table + 0; break;
64    case R_RELWORD:      internal->howto = apollocoff_howto_table + 1; break;
65    case R_RELLONG:      internal->howto = apollocoff_howto_table + 2; break;
66    case R_PCRBYTE:      internal->howto = apollocoff_howto_table + 3; break;
67    case R_PCRWORD:      internal->howto = apollocoff_howto_table + 4; break;
68    case R_PCRLONG:      internal->howto = apollocoff_howto_table + 5; break;
69    case R_RELLONG_NEG:  internal->howto = apollocoff_howto_table + 6; break;
70   }
71 }
72
73 int 
74 apollo_howto2rtype (internal)
75      CONST struct reloc_howto_struct *internal;
76 {
77   if (internal->pc_relative) 
78   {
79     switch (internal->bitsize) 
80     {
81      case 32: return R_PCRLONG;
82      case 16: return R_PCRWORD;
83      case 8: return R_PCRBYTE;
84     }
85   }
86   else
87   {
88     switch (internal->bitsize)
89      {
90       case 32: return R_RELLONG;
91       case 16: return R_RELWORD;
92       case 8: return R_RELBYTE;
93      }
94   }
95   return R_RELLONG;    
96 }
97 #endif /* not ONLY_DECLARE_RELOCS */
98
99 #define RTYPE2HOWTO(internal, relocentry) \
100   apollo_rtype2howto(internal, (relocentry)->r_type)
101
102 #define SELECT_RELOC(external, internal) \
103   external.r_type = apollo_howto2rtype(internal);
104
105 #include "coffcode.h"
106
107 bfd_target 
108 #ifdef TARGET_SYM
109   TARGET_SYM =
110 #else
111   apollocoff_vec =
112 #endif
113 {
114 #ifdef TARGET_NAME
115   TARGET_NAME,
116 #else
117   "apollo-m68k",                        /* name */
118 #endif
119   bfd_target_coff_flavour,
120   true,                         /* data byte order is big */
121   true,                         /* header byte order is big */
122
123   (HAS_RELOC | EXEC_P |         /* object flags */
124    HAS_LINENO | HAS_DEBUG |
125    HAS_SYMS | HAS_LOCALS | WP_TEXT),
126
127   (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
128 #ifdef NAMES_HAVE_UNDERSCORE
129   '_',
130 #else
131   0,                            /* leading underscore */
132 #endif
133   '/',                          /* ar_pad_char */
134   15,                           /* ar_max_namelen */
135   3,                            /* minimum section alignment */
136   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
137      bfd_getb32, bfd_getb_signed_32, bfd_putb32,
138      bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
139   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
140      bfd_getb32, bfd_getb_signed_32, bfd_putb32,
141      bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
142
143  {_bfd_dummy_target, coff_object_p, /* bfd_check_format */
144    bfd_generic_archive_p, _bfd_dummy_target},
145  {bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format */
146    bfd_false},
147  {bfd_false, coff_write_object_contents, /* bfd_write_contents */
148    _bfd_write_archive_contents, bfd_false},
149
150      BFD_JUMP_TABLE_GENERIC (coff),
151      BFD_JUMP_TABLE_COPY (coff),
152      BFD_JUMP_TABLE_CORE (_bfd_nocore),
153      BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff),
154      BFD_JUMP_TABLE_SYMBOLS (coff),
155      BFD_JUMP_TABLE_RELOCS (coff),
156      BFD_JUMP_TABLE_WRITE (coff),
157      BFD_JUMP_TABLE_LINK (coff),
158
159   COFF_SWAP_TABLE
160  };