* stabs.texinfo: Clean up stuff about visibility and virtual
[platform/upstream/binutils.git] / bfd / coff-m68k.c
1 /* BFD back-end for Motorola 68000 COFF binaries.
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 #include "bfd.h"
22 #include "sysdep.h"
23 #include "libbfd.h"
24 #include "obstack.h"
25 #include "coff/m68k.h"
26 #include "coff/internal.h"
27 #include "libcoff.h"
28
29 #ifdef ONLY_DECLARE_RELOCS
30 extern reloc_howto_type m68kcoff_howto_table[];
31 #else
32 reloc_howto_type m68kcoff_howto_table[] = 
33 {
34   HOWTO(R_RELBYTE,             0,  0,   8,  false, 0, true,  true,0,"8",        true, 0x000000ff,0x000000ff, false),
35   HOWTO(R_RELWORD,             0,  1,   16, false, 0, true,  true,0,"16",       true, 0x0000ffff,0x0000ffff, false),
36   HOWTO(R_RELLONG,             0,  2,   32, false, 0, true,  true,0,"32",       true, 0xffffffff,0xffffffff, false),
37   HOWTO(R_PCRBYTE,             0,  0,   8,  true,  0, false, true,0,"DISP8",    true, 0x000000ff,0x000000ff, false),
38   HOWTO(R_PCRWORD,             0,  1,   16, true,  0, false, true,0,"DISP16",   true, 0x0000ffff,0x0000ffff, false),
39   HOWTO(R_PCRLONG,             0,  2,   32, true,  0, false, true,0,"DISP32",   true, 0xffffffff,0xffffffff, false),
40   HOWTO(R_RELLONG_NEG,         0,  -2,  32, false, 0, true,  true,0,"-32",      true, 0xffffffff,0xffffffff, false),
41 };
42 #endif /* not ONLY_DECLARE_RELOCS */
43
44 #ifndef BADMAG
45 #define BADMAG(x) M68KBADMAG(x)
46 #endif
47 #define M68 1           /* Customize coffcode.h */
48
49 /* Turn a howto into a reloc number */
50
51 #ifdef ONLY_DECLARE_RELOCS
52 extern void m68k_rtype2howto PARAMS ((arelent *internal, int relocentry));
53 extern int m68k_howto2rtype PARAMS ((CONST struct reloc_howto_struct *));
54 #else
55 void
56 m68k_rtype2howto(internal, relocentry)
57      arelent *internal;
58      int relocentry;
59 {
60   switch (relocentry) 
61   {
62    case R_RELBYTE:      internal->howto = m68kcoff_howto_table + 0; break;
63    case R_RELWORD:      internal->howto = m68kcoff_howto_table + 1; break;
64    case R_RELLONG:      internal->howto = m68kcoff_howto_table + 2; break;
65    case R_PCRBYTE:      internal->howto = m68kcoff_howto_table + 3; break;
66    case R_PCRWORD:      internal->howto = m68kcoff_howto_table + 4; break;
67    case R_PCRLONG:      internal->howto = m68kcoff_howto_table + 5; break;
68    case R_RELLONG_NEG:  internal->howto = m68kcoff_howto_table + 6; break;
69   }
70 }
71
72 int 
73 m68k_howto2rtype (internal)
74      CONST struct reloc_howto_struct *internal;
75 {
76   if (internal->pc_relative) 
77   {
78     switch (internal->bitsize) 
79     {
80      case 32: return R_PCRLONG;
81      case 16: return R_PCRWORD;
82      case 8: return R_PCRBYTE;
83     }
84   }
85   else 
86   {
87     switch (internal->bitsize) 
88      {
89       case 32: return R_RELLONG;
90       case 16: return R_RELWORD;
91       case 8: return R_RELBYTE;
92      }
93   }
94   return R_RELLONG;    
95 }
96 #endif /* not ONLY_DECLARE_RELOCS */
97
98 #define RTYPE2HOWTO(internal, relocentry) \
99   m68k_rtype2howto(internal, (relocentry)->r_type)
100
101 #define SELECT_RELOC(external, internal) \
102   external = m68k_howto2rtype(internal);
103
104 #include "coffcode.h"
105
106 bfd_target 
107 #ifdef TARGET_SYM
108   TARGET_SYM =
109 #else
110   m68kcoff_vec =
111 #endif
112 {
113 #ifdef TARGET_NAME
114   TARGET_NAME,
115 #else
116   "coff-m68k",                  /* name */
117 #endif
118   bfd_target_coff_flavour,
119   true,                         /* data byte order is big */
120   true,                         /* header byte order is big */
121
122   (HAS_RELOC | EXEC_P |         /* object flags */
123    HAS_LINENO | HAS_DEBUG |
124    HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT),
125
126   (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
127 #ifdef NAMES_HAVE_UNDERSCORE
128   '_',
129 #else
130   0,                            /* leading underscore */
131 #endif
132   '/',                          /* ar_pad_char */
133   15,                           /* ar_max_namelen */
134   1,                            /* minimum section alignment */
135   _do_getb64, _do_getb_signed_64, _do_putb64,
136      _do_getb32, _do_getb_signed_32, _do_putb32,
137      _do_getb16, _do_getb_signed_16, _do_putb16, /* data */
138   _do_getb64, _do_getb_signed_64, _do_putb64,
139      _do_getb32, _do_getb_signed_32, _do_putb32,
140      _do_getb16, _do_getb_signed_16, _do_putb16, /* hdrs */
141
142  {_bfd_dummy_target, coff_object_p, /* bfd_check_format */
143    bfd_generic_archive_p, _bfd_dummy_target},
144  {bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format */
145    bfd_false},
146  {bfd_false, coff_write_object_contents, /* bfd_write_contents */
147    _bfd_write_archive_contents, bfd_false},
148
149   JUMP_TABLE(coff),
150   COFF_SWAP_TABLE
151  };