bfd/aout-tic30.c

   1 /* BFD back-end for TMS320C30 a.out binaries.
   2    Copyright (C) 1998-2019 Free Software Foundation, Inc.
   3    Contributed by Steven Haworth (steve@pm.cse.rmit.edu.au)
   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 3 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., 51 Franklin Street - Fifth Floor, Boston, MA
  20    02110-1301, USA.  */
  21
  22 #define TARGET_IS_BIG_ENDIAN_P
  23 #define N_HEADER_IN_TEXT(x)     1
  24 #define TEXT_START_ADDR         1024
  25 #define TARGET_PAGE_SIZE        128
  26 #define SEGMENT_SIZE            TARGET_PAGE_SIZE
  27 #define DEFAULT_ARCH            bfd_arch_tic30
  28 #define ARCH_SIZE 32
  29
  30 /* Do not "beautify" the CONCAT* macro args.  Traditional C will not
  31    remove whitespace added here, and thus will fail to concatenate
  32    the tokens.  */
  33 #define MY(OP) CONCAT2 (tic30_aout_,OP)
  34 #define TARGETNAME "a.out-tic30"
  35 #define NAME(x,y) CONCAT3 (tic30_aout,_32_,y)
  36
  37 #include "sysdep.h"
  38 #include "bfd.h"
  39 #include "libaout.h"
  40 #include "aout/aout64.h"
  41 #include "aout/stab_gnu.h"
  42 #include "aout/ar.h"
  43
  44 #define MY_reloc_howto(BFD, REL, IN, EX, PC)   tic30_aout_reloc_howto (BFD, REL, & IN, & EX, & PC)
  45
  46 #define MY_final_link_relocate    tic30_aout_final_link_relocate
  47 #define MY_object_p               tic30_aout_object_p
  48 #define MY_mkobject               NAME (aout,mkobject)
  49 #define MY_write_object_contents  tic30_aout_write_object_contents
  50 #define MY_set_sizes              tic30_aout_set_sizes
  51
  52 #ifndef MY_exec_hdr_flags
  53 #define MY_exec_hdr_flags 1
  54 #endif
  55
  56 #ifndef MY_backend_data
  57
  58 #ifndef MY_zmagic_contiguous
  59 #define MY_zmagic_contiguous 0
  60 #endif
  61 #ifndef MY_text_includes_header
  62 #define MY_text_includes_header 0
  63 #endif
  64 #ifndef MY_entry_is_text_address
  65 #define MY_entry_is_text_address 0
  66 #endif
  67 #ifndef MY_exec_header_not_counted
  68 #define MY_exec_header_not_counted 1
  69 #endif
  70 #ifndef MY_add_dynamic_symbols
  71 #define MY_add_dynamic_symbols 0
  72 #endif
  73 #ifndef MY_add_one_symbol
  74 #define MY_add_one_symbol 0
  75 #endif
  76 #ifndef MY_link_dynamic_object
  77 #define MY_link_dynamic_object 0
  78 #endif
  79 #ifndef MY_write_dynamic_symbol
  80 #define MY_write_dynamic_symbol 0
  81 #endif
  82 #ifndef MY_check_dynamic_reloc
  83 #define MY_check_dynamic_reloc 0
  84 #endif
  85 #ifndef MY_finish_dynamic_link
  86 #define MY_finish_dynamic_link 0
  87 #endif
  88
  89 static bfd_boolean
  90 tic30_aout_set_sizes (bfd *abfd)
  91 {
  92   adata (abfd).page_size = TARGET_PAGE_SIZE;
  93
  94 #ifdef SEGMENT_SIZE
  95   adata (abfd).segment_size = SEGMENT_SIZE;
  96 #else
  97   adata (abfd).segment_size = TARGET_PAGE_SIZE;
  98 #endif
  99
 100 #ifdef ZMAGIC_DISK_BLOCK_SIZE
 101   adata (abfd).zmagic_disk_block_size = ZMAGIC_DISK_BLOCK_SIZE;
 102 #else
 103   adata (abfd).zmagic_disk_block_size = TARGET_PAGE_SIZE;
 104 #endif
 105
 106   adata (abfd).exec_bytes_size = EXEC_BYTES_SIZE;
 107
 108   return TRUE;
 109 }
 110
 111 static const struct aout_backend_data tic30_aout_backend_data =
 112 {
 113   MY_zmagic_contiguous,
 114   MY_text_includes_header,
 115   MY_entry_is_text_address,
 116   MY_exec_hdr_flags,
 117   0,                            /* Text vma?  */
 118   MY_set_sizes,
 119   MY_exec_header_not_counted,
 120   MY_add_dynamic_symbols,
 121   MY_add_one_symbol,
 122   MY_link_dynamic_object,
 123   MY_write_dynamic_symbol,
 124   MY_check_dynamic_reloc,
 125   MY_finish_dynamic_link
 126 };
 127 #define MY_backend_data &tic30_aout_backend_data
 128 #endif
 129
 130 static reloc_howto_type *
 131   tic30_aout_reloc_howto (bfd *, struct reloc_std_external *, int *, int *, int *);
 132 static bfd_reloc_status_type
 133   tic30_aout_final_link_relocate
 134     (reloc_howto_type *, bfd *, asection *, bfd_byte *, bfd_vma, bfd_vma, bfd_vma);
 135
 136 /* FIXME: This is wrong.  aoutx.h should really only be included by
 137    aout32.c.  */
 138
 139 #include "aoutx.h"
 140
 141 /* This function is used to work out pc-relative offsets for the
 142    TMS320C30.  The data already placed by md_pcrel_from within gas is
 143    useless for a relocation, so we just get the offset value and place
 144    a version of this within the object code.
 145    tic30_aout_final_link_relocate will then calculate the required
 146    relocation to add on to the value in the object code.  */
 147
 148 static bfd_reloc_status_type
 149 tic30_aout_fix_pcrel_16 (bfd *abfd,
 150                          arelent *reloc_entry,
 151                          asymbol *symbol ATTRIBUTE_UNUSED,
 152                          void * data,
 153                          asection *input_section ATTRIBUTE_UNUSED,
 154                          bfd *output_bfd ATTRIBUTE_UNUSED,
 155                          char **error_message ATTRIBUTE_UNUSED)
 156 {
 157   bfd_vma relocation = 1;
 158   bfd_byte offset_data = bfd_get_8 (abfd, (bfd_byte *) data + reloc_entry->address - 1);
 159
 160   /* The byte before the location of the fix contains bits 23-16 of
 161      the pcrel instruction.  Bit 21 is set for a delayed instruction
 162      which requires on offset of 3 instead of 1.  */
 163   if (offset_data & 0x20)
 164     relocation -= 3;
 165   else
 166     relocation -= 1;
 167   bfd_put_16 (abfd, relocation, (bfd_byte *) data + reloc_entry->address);
 168   return bfd_reloc_ok;
 169 }
 170
 171 /* This function is used as a callback for 16-bit relocs.  This is
 172    required for relocations between segments.  A line in aoutx.h
 173    requires that any relocations for the data section should point to
 174    the end of the aligned text section, plus an offset.  By default,
 175    this does not happen, therefore this function takes care of
 176    that.  */
 177
 178 static bfd_reloc_status_type
 179 tic30_aout_fix_16 (bfd *abfd,
 180                    arelent *reloc_entry,
 181                    asymbol *symbol,
 182                    void * data,
 183                    asection *input_section ATTRIBUTE_UNUSED,
 184                    bfd *output_bfd,
 185                    char **error_message ATTRIBUTE_UNUSED)
 186 {
 187   bfd_vma relocation;
 188
 189   /* Make sure that the symbol's section is defined.  */
 190   if (bfd_is_und_section (symbol->section) && (symbol->flags & BSF_WEAK) == 0)
 191     return output_bfd ? bfd_reloc_ok : bfd_reloc_undefined;
 192   /* Get the size of the input section and turn it into the TMS320C30
 193      32-bit address format.  */
 194   relocation = (symbol->section->vma >> 2);
 195   relocation += bfd_get_16 (abfd, (bfd_byte *) data + reloc_entry->address);
 196   bfd_put_16 (abfd, relocation, (bfd_byte *) data + reloc_entry->address);
 197   return bfd_reloc_ok;
 198 }
 199
 200 /* This function does the same thing as tic30_aout_fix_16 except for 32
 201    bit relocations.  */
 202
 203 static bfd_reloc_status_type
 204 tic30_aout_fix_32 (bfd *abfd,
 205                    arelent *reloc_entry,
 206                    asymbol *symbol,
 207                    void * data,
 208                    asection *input_section ATTRIBUTE_UNUSED,
 209                    bfd *output_bfd,
 210                    char **error_message ATTRIBUTE_UNUSED)
 211 {
 212   bfd_vma relocation;
 213
 214   /* Make sure that the symbol's section is defined.  */
 215   if (bfd_is_und_section (symbol->section) && (symbol->flags & BSF_WEAK) == 0)
 216     return output_bfd ? bfd_reloc_ok : bfd_reloc_undefined;
 217   /* Get the size of the input section and turn it into the TMS320C30
 218      32-bit address format.  */
 219   relocation = (symbol->section->vma >> 2);
 220   relocation += bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
 221   bfd_put_32 (abfd, relocation, (bfd_byte *) data + reloc_entry->address);
 222   return bfd_reloc_ok;
 223 }
 224
 225 /* This table lists the relocation types for the TMS320C30.  There are
 226    only a few relocations required, and all must be divided by 4 (>>
 227    2) to get the 32-bit addresses in the format the TMS320C30 likes
 228    it.  */
 229 reloc_howto_type tic30_aout_howto_table[] =
 230 {
 231   EMPTY_HOWTO (-1),
 232   HOWTO (1, 2, 1, 16, FALSE, 0, 0, tic30_aout_fix_16,
 233          "16", FALSE, 0x0000FFFF, 0x0000FFFF, FALSE),
 234   HOWTO (2, 2, 2, 24, FALSE, 0, complain_overflow_bitfield, NULL,
 235          "24", FALSE, 0x00FFFFFF, 0x00FFFFFF, FALSE),
 236   HOWTO (3, 18, 3, 24, FALSE, 0, complain_overflow_bitfield, NULL,
 237          "LDP", FALSE, 0x00FF0000, 0x000000FF, FALSE),
 238   HOWTO (4, 2, 4, 32, FALSE, 0, complain_overflow_bitfield, tic30_aout_fix_32,
 239          "32", FALSE, 0xFFFFFFFF, 0xFFFFFFFF, FALSE),
 240   HOWTO (5, 2, 1, 16, TRUE, 0, complain_overflow_signed,
 241          tic30_aout_fix_pcrel_16, "PCREL", TRUE, 0x0000FFFF, 0x0000FFFF, TRUE),
 242   EMPTY_HOWTO (-1),
 243   EMPTY_HOWTO (-1),
 244   EMPTY_HOWTO (-1),
 245   EMPTY_HOWTO (-1),
 246   EMPTY_HOWTO (-1)
 247 };
 248
 249
 250 static reloc_howto_type *
 251 tic30_aout_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 252                               bfd_reloc_code_real_type code)
 253 {
 254   switch (code)
 255     {
 256     case BFD_RELOC_8:
 257     case BFD_RELOC_TIC30_LDP:
 258       return &tic30_aout_howto_table[3];
 259     case BFD_RELOC_16:
 260       return &tic30_aout_howto_table[1];
 261     case BFD_RELOC_24:
 262       return &tic30_aout_howto_table[2];
 263     case BFD_RELOC_16_PCREL:
 264       return &tic30_aout_howto_table[5];
 265     case BFD_RELOC_32:
 266       return &tic30_aout_howto_table[4];
 267     default:
 268       return NULL;
 269     }
 270 }
 271
 272 static reloc_howto_type *
 273 tic30_aout_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
 274                               const char *r_name)
 275 {
 276   unsigned int i;
 277
 278   for (i = 0;
 279        i < (sizeof (tic30_aout_howto_table)
 280             / sizeof (tic30_aout_howto_table[0]));
 281        i++)
 282     if (tic30_aout_howto_table[i].name != NULL
 283         && strcasecmp (tic30_aout_howto_table[i].name, r_name) == 0)
 284       return &tic30_aout_howto_table[i];
 285
 286   return NULL;
 287 }
 288
 289 static reloc_howto_type *
 290 tic30_aout_reloc_howto (bfd *abfd,
 291                         struct reloc_std_external *relocs,
 292                         int *r_index,
 293                         int *r_extern,
 294                         int *r_pcrel)
 295 {
 296   unsigned int r_length;
 297   unsigned int r_pcrel_done;
 298   int howto_index;
 299
 300   *r_pcrel = 0;
 301   if (bfd_header_big_endian (abfd))
 302     {
 303       *r_index = ((relocs->r_index[0] << 16) | (relocs->r_index[1] << 8) | relocs->r_index[2]);
 304       *r_extern = (0 != (relocs->r_type[0] & RELOC_STD_BITS_EXTERN_BIG));
 305       r_pcrel_done = (0 != (relocs->r_type[0] & RELOC_STD_BITS_PCREL_BIG));
 306       r_length = ((relocs->r_type[0] & RELOC_STD_BITS_LENGTH_BIG) >> RELOC_STD_BITS_LENGTH_SH_BIG);
 307     }
 308   else
 309     {
 310       *r_index = ((relocs->r_index[2] << 16) | (relocs->r_index[1] << 8) | relocs->r_index[0]);
 311       *r_extern = (0 != (relocs->r_type[0] & RELOC_STD_BITS_EXTERN_LITTLE));
 312       r_pcrel_done = (0 != (relocs->r_type[0] & RELOC_STD_BITS_PCREL_LITTLE));
 313       r_length = ((relocs->r_type[0] & RELOC_STD_BITS_LENGTH_LITTLE) >> RELOC_STD_BITS_LENGTH_SH_LITTLE);
 314     }
 315   howto_index = r_length + 4 * r_pcrel_done;
 316   return tic30_aout_howto_table + howto_index;
 317 }
 318
 319 /* These macros will get 24-bit values from the bfd definition.
 320    Big-endian only.  */
 321 #define bfd_getb_24(BFD,ADDR)                   \
 322  (bfd_get_8 (BFD, ADDR    ) << 16) |            \
 323  (bfd_get_8 (BFD, ADDR + 1) <<  8) |            \
 324  (bfd_get_8 (BFD, ADDR + 2)      )
 325
 326 #define bfd_putb_24(BFD,DATA,ADDR)                              \
 327  bfd_put_8 (BFD, (bfd_byte) ((DATA >> 16) & 0xFF), ADDR    );   \
 328  bfd_put_8 (BFD, (bfd_byte) ((DATA >>  8) & 0xFF), ADDR + 1);   \
 329  bfd_put_8 (BFD, (bfd_byte) ( DATA        & 0xFF), ADDR + 2)
 330
 331 /* Set parameters about this a.out file that are machine-dependent.
 332    This routine is called from some_aout_object_p just before it returns.  */
 333
 334 static const bfd_target *
 335 tic30_aout_callback (bfd *abfd)
 336 {
 337   struct internal_exec *execp = exec_hdr (abfd);
 338   unsigned int arch_align_power;
 339   unsigned long arch_align;
 340
 341   /* Calculate the file positions of the parts of a newly read aout header.  */
 342   obj_textsec (abfd)->size = N_TXTSIZE (execp);
 343
 344   /* The virtual memory addresses of the sections.  */
 345   obj_textsec (abfd)->vma = N_TXTADDR (execp);
 346   obj_datasec (abfd)->vma = N_DATADDR (execp);
 347   obj_bsssec (abfd)->vma = N_BSSADDR (execp);
 348
 349   obj_textsec (abfd)->lma = obj_textsec (abfd)->vma;
 350   obj_datasec (abfd)->lma = obj_datasec (abfd)->vma;
 351   obj_bsssec (abfd)->lma = obj_bsssec (abfd)->vma;
 352
 353   /* The file offsets of the sections.  */
 354   obj_textsec (abfd)->filepos = N_TXTOFF (execp);
 355   obj_datasec (abfd)->filepos = N_DATOFF (execp);
 356
 357   /* The file offsets of the relocation info.  */
 358   obj_textsec (abfd)->rel_filepos = N_TRELOFF (execp);
 359   obj_datasec (abfd)->rel_filepos = N_DRELOFF (execp);
 360
 361   /* The file offsets of the string table and symbol table.  */
 362   obj_sym_filepos (abfd) = N_SYMOFF (execp);
 363   obj_str_filepos (abfd) = N_STROFF (execp);
 364
 365   /* Determine the architecture and machine type of the object file.  */
 366 #ifdef SET_ARCH_MACH
 367   SET_ARCH_MACH (abfd, execp);
 368 #else
 369   bfd_default_set_arch_mach (abfd, DEFAULT_ARCH, 0L);
 370 #endif
 371
 372   /* Now that we know the architecture, set the alignments of the
 373      sections.  This is normally done by NAME (aout,new_section_hook),
 374      but when the initial sections were created the architecture had
 375      not yet been set.  However, for backward compatibility, we don't
 376      set the alignment power any higher than as required by the size
 377      of the section.  */
 378   arch_align_power = bfd_get_arch_info (abfd)->section_align_power;
 379   arch_align = 1 << arch_align_power;
 380   if ((BFD_ALIGN (obj_textsec (abfd)->size, arch_align)
 381        == obj_textsec (abfd)->size)
 382       && (BFD_ALIGN (obj_datasec (abfd)->size, arch_align)
 383           == obj_datasec (abfd)->size)
 384       && (BFD_ALIGN (obj_bsssec (abfd)->size, arch_align)
 385           == obj_bsssec (abfd)->size))
 386     {
 387       obj_textsec (abfd)->alignment_power = arch_align_power;
 388       obj_datasec (abfd)->alignment_power = arch_align_power;
 389       obj_bsssec (abfd)->alignment_power = arch_align_power;
 390     }
 391   return abfd->xvec;
 392 }
 393
 394 static bfd_reloc_status_type
 395 tic30_aout_relocate_contents (reloc_howto_type *howto,
 396                               bfd *input_bfd,
 397                               bfd_vma relocation,
 398                               bfd_byte *location)
 399 {
 400   bfd_vma x;
 401   bfd_boolean overflow;
 402
 403   if (howto->size < 0)
 404     relocation = -relocation;
 405
 406   switch (howto->size)
 407     {
 408     default:
 409     case 0:
 410       abort ();
 411       break;
 412     case 1:
 413       x = bfd_get_16 (input_bfd, location);
 414       break;
 415     case 2:
 416       x = bfd_getb_24 (input_bfd, location);
 417       break;
 418     case 3:
 419       x = bfd_get_8 (input_bfd, location);
 420       break;
 421     case 4:
 422       x = bfd_get_32 (input_bfd, location);
 423       break;
 424     }
 425
 426   overflow = FALSE;
 427
 428   if (howto->complain_on_overflow != complain_overflow_dont)
 429     {
 430       bfd_vma check;
 431       bfd_signed_vma signed_check;
 432       bfd_vma add;
 433       bfd_signed_vma signed_add;
 434
 435       if (howto->rightshift == 0)
 436         {
 437           check = relocation;
 438           signed_check = (bfd_signed_vma) relocation;
 439         }
 440       else
 441         {
 442           check = relocation >> howto->rightshift;
 443           if ((bfd_signed_vma) relocation >= 0)
 444             signed_check = check;
 445           else
 446             signed_check = (check | ((bfd_vma) - 1 & ~((bfd_vma) - 1 >> howto->rightshift)));
 447         }
 448       add = x & howto->src_mask;
 449       signed_add = add;
 450       if ((add & (((~howto->src_mask) >> 1) & howto->src_mask)) != 0)
 451         signed_add -= (((~howto->src_mask) >> 1) & howto->src_mask) << 1;
 452       if (howto->bitpos == 0)
 453         {
 454           check += add;
 455           signed_check += signed_add;
 456         }
 457       else
 458         {
 459           check += add >> howto->bitpos;
 460           if (signed_add >= 0)
 461             signed_check += add >> howto->bitpos;
 462           else
 463             signed_check += ((add >> howto->bitpos) | ((bfd_vma) - 1 & ~((bfd_vma) - 1 >> howto->bitpos)));
 464         }
 465       switch (howto->complain_on_overflow)
 466         {
 467         case complain_overflow_signed:
 468           {
 469             bfd_signed_vma reloc_signed_max = (1 << (howto->bitsize - 1)) - 1;
 470             bfd_signed_vma reloc_signed_min = ~reloc_signed_max;
 471
 472             if (signed_check > reloc_signed_max || signed_check < reloc_signed_min)
 473               overflow = TRUE;
 474           }
 475           break;
 476         case complain_overflow_unsigned:
 477           {
 478             bfd_vma reloc_unsigned_max = (((1 << (howto->bitsize - 1)) - 1) << 1) | 1;
 479
 480             if (check > reloc_unsigned_max)
 481               overflow = TRUE;
 482           }
 483           break;
 484         case complain_overflow_bitfield:
 485           {
 486             bfd_vma reloc_bits = (((1 << (howto->bitsize - 1)) - 1) << 1) | 1;
 487
 488             if ((check & ~reloc_bits) != 0
 489                 && (((bfd_vma) signed_check & ~reloc_bits)
 490                     != ((bfd_vma) -1 & ~reloc_bits)))
 491               overflow = TRUE;
 492           }
 493           break;
 494         default:
 495           abort ();
 496         }
 497     }
 498   relocation >>= (bfd_vma) howto->rightshift;
 499   relocation <<= (bfd_vma) howto->bitpos;
 500   x = ((x & ~howto->dst_mask) | (((x & howto->src_mask) + relocation) & howto->dst_mask));
 501   switch (howto->size)
 502     {
 503     default:
 504     case 0:
 505       abort ();
 506       break;
 507     case 1:
 508       bfd_put_16 (input_bfd, x, location);
 509       break;
 510     case 2:
 511       bfd_putb_24 (input_bfd, x, location);
 512       break;
 513     case 3:
 514       bfd_put_8 (input_bfd, x, location);
 515       break;
 516     case 4:
 517       bfd_put_32 (input_bfd, x, location);
 518       break;
 519     }
 520   return overflow ? bfd_reloc_overflow : bfd_reloc_ok;
 521 }
 522
 523 static bfd_reloc_status_type
 524 tic30_aout_final_link_relocate (reloc_howto_type *howto,
 525                                 bfd *input_bfd,
 526                                 asection *input_section,
 527                                 bfd_byte *contents,
 528                                 bfd_vma address,
 529                                 bfd_vma value,
 530                                 bfd_vma addend)
 531 {
 532   bfd_vma relocation;
 533
 534   if (address > bfd_get_section_limit (input_bfd, input_section))
 535     return bfd_reloc_outofrange;
 536
 537   relocation = value + addend;
 538   if (howto->pc_relative)
 539     {
 540       relocation -= (input_section->output_section->vma + input_section->output_offset);
 541       if (howto->pcrel_offset)
 542         relocation -= address;
 543     }
 544   return tic30_aout_relocate_contents (howto, input_bfd, relocation,
 545                                        contents + address);
 546 }
 547
 548 /* Finish up the reading of an a.out file header.  */
 549
 550 static const bfd_target *
 551 tic30_aout_object_p (bfd *abfd)
 552 {
 553   struct external_exec exec_bytes;      /* Raw exec header from file.  */
 554   struct internal_exec exec;            /* Cleaned-up exec header.  */
 555   const bfd_target *target;
 556   bfd_size_type amt = EXEC_BYTES_SIZE;
 557
 558   if (bfd_bread (& exec_bytes, amt, abfd) != amt)
 559     {
 560       if (bfd_get_error () != bfd_error_system_call)
 561         bfd_set_error (bfd_error_wrong_format);
 562       return 0;
 563     }
 564
 565 #ifdef SWAP_MAGIC
 566   exec.a_info = SWAP_MAGIC (exec_bytes.e_info);
 567 #else
 568   exec.a_info = H_GET_32 (abfd, exec_bytes.e_info);
 569 #endif /* SWAP_MAGIC */
 570
 571   if (N_BADMAG (&exec))
 572     return 0;
 573 #ifdef MACHTYPE_OK
 574   if (!(MACHTYPE_OK (N_MACHTYPE (&exec))))
 575     return 0;
 576 #endif
 577
 578   NAME (aout, swap_exec_header_in) (abfd, &exec_bytes, &exec);
 579
 580 #ifdef SWAP_MAGIC
 581   /* Swap_exec_header_in read in a_info with the wrong byte order.  */
 582   exec.a_info = SWAP_MAGIC (exec_bytes.e_info);
 583 #endif
 584
 585   target = NAME (aout, some_aout_object_p) (abfd, &exec, tic30_aout_callback);
 586
 587 #ifdef ENTRY_CAN_BE_ZERO
 588   /* The NEWSOS3 entry-point is/was 0, which (amongst other lossage)
 589      means that it isn't obvious if EXEC_P should be set.
 590      All of the following must be true for an executable:
 591      There must be no relocations, the bfd can be neither an
 592      archive nor an archive element, and the file must be executable.  */
 593
 594   if (exec.a_trsize + exec.a_drsize == 0
 595       && bfd_get_format (abfd) == bfd_object && abfd->my_archive == NULL)
 596     {
 597       struct stat buf;
 598 #ifndef S_IXUSR
 599 #define S_IXUSR 0100            /* Execute by owner.  */
 600 #endif
 601       if (stat (abfd->filename, &buf) == 0 && (buf.st_mode & S_IXUSR))
 602         abfd->flags |= EXEC_P;
 603     }
 604 #endif
 605
 606   return target;
 607 }
 608
 609 /* Copy private section data.  This actually does nothing with the
 610    sections.  It copies the subformat field.  We copy it here, because
 611    we need to know whether this is a QMAGIC file before we set the
 612    section contents, and copy_private_bfd_data is not called until
 613    after the section contents have been set.  */
 614
 615 static bfd_boolean
 616 MY_bfd_copy_private_section_data (bfd *ibfd,
 617                                   asection *isec ATTRIBUTE_UNUSED,
 618                                   bfd *obfd,
 619                                   asection *osec ATTRIBUTE_UNUSED)
 620 {
 621   if (bfd_get_flavour (obfd) == bfd_target_aout_flavour)
 622     obj_aout_subformat (obfd) = obj_aout_subformat (ibfd);
 623   return TRUE;
 624 }
 625
 626 /* Write an object file.
 627    Section contents have already been written.  We write the
 628    file header, symbols, and relocation.  */
 629
 630 static bfd_boolean
 631 tic30_aout_write_object_contents (bfd *abfd)
 632 {
 633   struct external_exec exec_bytes;
 634   struct internal_exec *execp = exec_hdr (abfd);
 635
 636   obj_reloc_entry_size (abfd) = RELOC_STD_SIZE;
 637
 638   {
 639     if (adata (abfd).magic == undecided_magic)
 640       NAME (aout, adjust_sizes_and_vmas) (abfd);
 641
 642     execp->a_syms = bfd_get_symcount (abfd) * EXTERNAL_NLIST_SIZE;
 643     execp->a_entry = bfd_get_start_address (abfd);
 644
 645     execp->a_trsize = ((obj_textsec (abfd)->reloc_count) * obj_reloc_entry_size (abfd));
 646     execp->a_drsize = ((obj_datasec (abfd)->reloc_count) * obj_reloc_entry_size (abfd));
 647     NAME (aout, swap_exec_header_out) (abfd, execp, &exec_bytes);
 648
 649     if (adata (abfd).exec_bytes_size > 0)
 650       {
 651         bfd_size_type amt;
 652
 653         if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET) != 0)
 654           return FALSE;
 655         amt = adata (abfd).exec_bytes_size;
 656         if (bfd_bwrite (& exec_bytes, amt, abfd) != amt)
 657           return FALSE;
 658       }
 659
 660     /* Now write out reloc info, followed by syms and strings.  */
 661     if (bfd_get_outsymbols (abfd) != (asymbol **) NULL
 662         && bfd_get_symcount (abfd) != 0)
 663       {
 664         if (bfd_seek (abfd, (file_ptr) (N_SYMOFF (execp)), SEEK_SET) != 0)
 665           return FALSE;
 666
 667         if (!NAME (aout, write_syms) (abfd))
 668           return FALSE;
 669       }
 670
 671     if (bfd_seek (abfd, (file_ptr) (N_TRELOFF (execp)), SEEK_SET) != 0)
 672       return FALSE;
 673     if (!NAME (aout, squirt_out_relocs) (abfd, obj_textsec (abfd)))
 674       return FALSE;
 675
 676     if (bfd_seek (abfd, (file_ptr) (N_DRELOFF (execp)), SEEK_SET) != 0)
 677       return FALSE;
 678     if (!NAME (aout, squirt_out_relocs) (abfd, obj_datasec (abfd)))
 679       return FALSE;
 680   }
 681
 682   return TRUE;
 683 }
 684
 685 #ifndef MY_final_link_callback
 686
 687 /* Callback for the final_link routine to set the section offsets.  */
 688
 689 static void
 690 MY_final_link_callback (bfd *abfd,
 691                         file_ptr *ptreloff,
 692                         file_ptr *pdreloff,
 693                         file_ptr *psymoff)
 694 {
 695   struct internal_exec *execp = exec_hdr (abfd);
 696
 697   *ptreloff = obj_datasec (abfd)->filepos + execp->a_data;
 698   *pdreloff = *ptreloff + execp->a_trsize;
 699   *psymoff = *pdreloff + execp->a_drsize;
 700 }
 701
 702 #endif
 703
 704 #ifndef MY_bfd_final_link
 705
 706 /* Final link routine.  We need to use a call back to get the correct
 707    offsets in the output file.  */
 708
 709 static bfd_boolean
 710 MY_bfd_final_link (bfd *abfd, struct bfd_link_info *info)
 711 {
 712   struct internal_exec *execp = exec_hdr (abfd);
 713   asection *objsym_section;
 714   file_ptr pos;
 715   bfd_vma vma = 0;
 716
 717   /* Set the executable header size to 0, as we don't want one for an
 718      output.  FIXME: Really?  tic30_aout_object_p doesn't accept such
 719      an executable!  */
 720   adata (abfd).exec_bytes_size = 0;
 721
 722   pos = adata (abfd).exec_bytes_size;
 723   /* ??? Why are we looking at create_object_symbols_section?  */
 724   objsym_section = info->create_object_symbols_section;
 725   if (objsym_section != NULL)
 726     vma = objsym_section->vma;
 727
 728   /* Text.  */
 729   if (obj_textsec (abfd) != NULL)
 730     {
 731       pos += vma;
 732       obj_textsec (abfd)->filepos = pos;
 733       obj_textsec (abfd)->vma = vma;
 734       obj_textsec (abfd)->user_set_vma = 1;
 735       execp->a_text = obj_textsec (abfd)->size;
 736       pos += obj_textsec (abfd)->size;
 737       vma += obj_textsec (abfd)->size;
 738     }
 739
 740   /* Data.  */
 741   if (obj_datasec (abfd) != NULL)
 742     {
 743       if (abfd->flags & D_PAGED)
 744         {
 745           if (objsym_section != NULL
 746               && objsym_section->next != NULL
 747               && objsym_section->next->vma != 0)
 748             obj_datasec (abfd)->vma = objsym_section->next->vma;
 749           else
 750             obj_datasec (abfd)->vma = BFD_ALIGN (vma, adata (abfd).segment_size);
 751         }
 752       else
 753         obj_datasec (abfd)->vma = BFD_ALIGN (vma, 4);
 754
 755       if (obj_datasec (abfd)->vma < vma)
 756         obj_datasec (abfd)->vma = BFD_ALIGN (vma, 4);
 757
 758       pos += obj_datasec (abfd)->vma - vma;
 759       obj_datasec (abfd)->filepos = pos;
 760       obj_datasec (abfd)->user_set_vma = 1;
 761
 762       vma = obj_datasec (abfd)->vma;
 763       if (obj_textsec (abfd) != NULL)
 764         {
 765           execp->a_text = vma - obj_textsec (abfd)->vma;
 766           obj_textsec (abfd)->size = execp->a_text;
 767         }
 768       execp->a_data = obj_datasec (abfd)->size;
 769       vma += obj_datasec (abfd)->size;
 770     }
 771
 772   /* Since BSS follows data immediately, see if it needs alignment.  */
 773   if (obj_bsssec (abfd) != NULL)
 774     {
 775       int pad;
 776
 777       pad = align_power (vma, obj_bsssec (abfd)->alignment_power) - vma;
 778       if (obj_datasec (abfd) != NULL)
 779         {
 780           obj_datasec (abfd)->size += pad;
 781           execp->a_data += pad;
 782         }
 783       else if (obj_textsec (abfd) != NULL)
 784         {
 785           obj_textsec (abfd)->size += pad;
 786           execp->a_text += pad;
 787         }
 788
 789       /* BSS.  */
 790       vma += pad;
 791       obj_bsssec (abfd)->vma = vma;
 792       obj_bsssec (abfd)->user_set_vma = 1;
 793     }
 794
 795   /* We are fully resized, so don't readjust in final_link.  */
 796   adata (abfd).magic = z_magic;
 797
 798   return NAME (aout, final_link) (abfd, info, MY_final_link_callback);
 799 }
 800
 801 #endif
 802
 803 static enum machine_type
 804 tic30_aout_machine_type (enum bfd_architecture arch,
 805                          unsigned long machine ATTRIBUTE_UNUSED,
 806                          bfd_boolean *unknown)
 807 {
 808   enum machine_type arch_flags;
 809
 810   arch_flags = M_UNKNOWN;
 811   *unknown = TRUE;
 812
 813   switch (arch)
 814     {
 815     case bfd_arch_tic30:
 816       *unknown = FALSE;
 817       break;
 818     default:
 819       arch_flags = M_UNKNOWN;
 820     }
 821   if (arch_flags != M_UNKNOWN)
 822     *unknown = FALSE;
 823   return arch_flags;
 824 }
 825
 826 static bfd_boolean
 827 tic30_aout_set_arch_mach (bfd *abfd,
 828                           enum bfd_architecture arch,
 829                           unsigned long machine)
 830 {
 831   if (!bfd_default_set_arch_mach (abfd, arch, machine))
 832     return FALSE;
 833   if (arch != bfd_arch_unknown)
 834     {
 835       bfd_boolean unknown;
 836       tic30_aout_machine_type (arch, machine, &unknown);
 837       if (unknown)
 838         return FALSE;
 839     }
 840   obj_reloc_entry_size (abfd) = RELOC_STD_SIZE;
 841   return (*aout_backend_info (abfd)->set_sizes) (abfd);
 842 }
 843
 844 /* We assume BFD generic archive files.  */
 845 #ifndef MY_openr_next_archived_file
 846 #define MY_openr_next_archived_file     bfd_generic_openr_next_archived_file
 847 #endif
 848 #ifndef MY_get_elt_at_index
 849 #define MY_get_elt_at_index             _bfd_generic_get_elt_at_index
 850 #endif
 851 #ifndef MY_generic_stat_arch_elt
 852 #define MY_generic_stat_arch_elt        bfd_generic_stat_arch_elt
 853 #endif
 854 #ifndef MY_slurp_armap
 855 #define MY_slurp_armap                  bfd_slurp_bsd_armap
 856 #endif
 857 #ifndef MY_slurp_extended_name_table
 858 #define MY_slurp_extended_name_table    _bfd_slurp_extended_name_table
 859 #endif
 860 #ifndef MY_construct_extended_name_table
 861 #define MY_construct_extended_name_table \
 862   _bfd_archive_bsd_construct_extended_name_table
 863 #endif
 864 #ifndef MY_write_armap
 865 #define MY_write_armap                  _bfd_bsd_write_armap
 866 #endif
 867 #ifndef MY_read_ar_hdr
 868 #define MY_read_ar_hdr                  _bfd_generic_read_ar_hdr
 869 #endif
 870 #ifndef MY_write_ar_hdr
 871 #define MY_write_ar_hdr                 _bfd_generic_write_ar_hdr
 872 #endif
 873 #ifndef MY_truncate_arname
 874 #define MY_truncate_arname              bfd_bsd_truncate_arname
 875 #endif
 876 #ifndef MY_update_armap_timestamp
 877 #define MY_update_armap_timestamp       _bfd_archive_bsd_update_armap_timestamp
 878 #endif
 879
 880 /* No core file defined here -- configure in trad-core.c separately.  */
 881 #ifndef MY_core_file_failing_command
 882 #define MY_core_file_failing_command    _bfd_nocore_core_file_failing_command
 883 #endif
 884 #ifndef MY_core_file_failing_signal
 885 #define MY_core_file_failing_signal     _bfd_nocore_core_file_failing_signal
 886 #endif
 887 #ifndef MY_core_file_matches_executable_p
 888 #define MY_core_file_matches_executable_p       \
 889                                 _bfd_nocore_core_file_matches_executable_p
 890 #endif
 891 #ifndef MY_core_file_pid
 892 #define MY_core_file_pid                _bfd_nocore_core_file_pid
 893 #endif
 894 #ifndef MY_core_file_p
 895 #define MY_core_file_p                  _bfd_dummy_target
 896 #endif
 897
 898 #ifndef MY_bfd_debug_info_start
 899 #define MY_bfd_debug_info_start         _bfd_void_bfd
 900 #endif
 901 #ifndef MY_bfd_debug_info_end
 902 #define MY_bfd_debug_info_end           _bfd_void_bfd
 903 #endif
 904 #ifndef MY_bfd_debug_info_accumulate
 905 #define MY_bfd_debug_info_accumulate    _bfd_void_bfd_asection
 906 #endif
 907
 908 #ifndef MY_core_file_failing_command
 909 #define MY_core_file_failing_command NAME (aout, core_file_failing_command)
 910 #endif
 911 #ifndef MY_core_file_failing_signal
 912 #define MY_core_file_failing_signal NAME (aout, core_file_failing_signal)
 913 #endif
 914 #ifndef MY_core_file_matches_executable_p
 915 #define MY_core_file_matches_executable_p NAME (aout, core_file_matches_executable_p)
 916 #endif
 917 #ifndef MY_set_section_contents
 918 #define MY_set_section_contents NAME (aout, set_section_contents)
 919 #endif
 920 #ifndef MY_get_section_contents
 921 #define MY_get_section_contents aout_32_get_section_contents
 922 #endif
 923 #ifndef MY_get_section_contents_in_window
 924 #define MY_get_section_contents_in_window _bfd_generic_get_section_contents_in_window
 925 #endif
 926 #ifndef MY_new_section_hook
 927 #define MY_new_section_hook NAME (aout, new_section_hook)
 928 #endif
 929 #ifndef MY_get_symtab_upper_bound
 930 #define MY_get_symtab_upper_bound NAME (aout, get_symtab_upper_bound)
 931 #endif
 932 #ifndef MY_canonicalize_symtab
 933 #define MY_canonicalize_symtab NAME (aout, canonicalize_symtab)
 934 #endif
 935 #ifndef MY_get_reloc_upper_bound
 936 #define MY_get_reloc_upper_bound NAME (aout, get_reloc_upper_bound)
 937 #endif
 938 #ifndef MY_canonicalize_reloc
 939 #define MY_canonicalize_reloc NAME (aout, canonicalize_reloc)
 940 #endif
 941 #ifndef MY_set_reloc
 942 #define MY_set_reloc _bfd_generic_set_reloc
 943 #endif
 944 #ifndef MY_make_empty_symbol
 945 #define MY_make_empty_symbol NAME (aout, make_empty_symbol)
 946 #endif
 947 #ifndef MY_print_symbol
 948 #define MY_print_symbol NAME (aout, print_symbol)
 949 #endif
 950 #ifndef MY_get_symbol_info
 951 #define MY_get_symbol_info NAME (aout, get_symbol_info)
 952 #endif
 953 #ifndef MY_get_symbol_version_string
 954 #define MY_get_symbol_version_string \
 955   _bfd_nosymbols_get_symbol_version_string
 956 #endif
 957 #ifndef MY_get_lineno
 958 #define MY_get_lineno NAME (aout, get_lineno)
 959 #endif
 960 #ifndef MY_set_arch_mach
 961 #define MY_set_arch_mach tic30_aout_set_arch_mach
 962 #endif
 963 #ifndef MY_find_nearest_line
 964 #define MY_find_nearest_line NAME (aout, find_nearest_line)
 965 #endif
 966 #ifndef MY_find_line
 967 #define MY_find_line _bfd_nosymbols_find_line
 968 #endif
 969 #ifndef MY_find_inliner_info
 970 #define MY_find_inliner_info _bfd_nosymbols_find_inliner_info
 971 #endif
 972 #ifndef MY_sizeof_headers
 973 #define MY_sizeof_headers NAME (aout, sizeof_headers)
 974 #endif
 975 #ifndef MY_bfd_get_relocated_section_contents
 976 #define MY_bfd_get_relocated_section_contents \
 977                         bfd_generic_get_relocated_section_contents
 978 #endif
 979 #ifndef MY_bfd_relax_section
 980 #define MY_bfd_relax_section bfd_generic_relax_section
 981 #endif
 982 #ifndef MY_bfd_gc_sections
 983 #define MY_bfd_gc_sections bfd_generic_gc_sections
 984 #endif
 985 #ifndef MY_bfd_lookup_section_flags
 986 #define MY_bfd_lookup_section_flags bfd_generic_lookup_section_flags
 987 #endif
 988 #ifndef MY_bfd_merge_sections
 989 #define MY_bfd_merge_sections bfd_generic_merge_sections
 990 #endif
 991 #ifndef MY_bfd_is_group_section
 992 #define MY_bfd_is_group_section bfd_generic_is_group_section
 993 #endif
 994 #ifndef MY_bfd_discard_group
 995 #define MY_bfd_discard_group bfd_generic_discard_group
 996 #endif
 997 #ifndef MY_section_already_linked
 998 #define MY_section_already_linked \
 999   _bfd_generic_section_already_linked
1000 #endif
1001 #ifndef MY_bfd_define_common_symbol
1002 #define MY_bfd_define_common_symbol bfd_generic_define_common_symbol
1003 #endif
1004 #ifndef MY_bfd_link_hide_symbol
1005 #define MY_bfd_link_hide_symbol _bfd_generic_link_hide_symbol
1006 #endif
1007 #ifndef MY_bfd_define_start_stop
1008 #define MY_bfd_define_start_stop bfd_generic_define_start_stop
1009 #endif
1010 #ifndef MY_bfd_reloc_type_lookup
1011 #define MY_bfd_reloc_type_lookup tic30_aout_reloc_type_lookup
1012 #endif
1013 #ifndef MY_bfd_reloc_name_lookup
1014 #define MY_bfd_reloc_name_lookup tic30_aout_reloc_name_lookup
1015 #endif
1016 #ifndef MY_bfd_make_debug_symbol
1017 #define MY_bfd_make_debug_symbol 0
1018 #endif
1019 #ifndef MY_read_minisymbols
1020 #define MY_read_minisymbols NAME (aout, read_minisymbols)
1021 #endif
1022 #ifndef MY_minisymbol_to_symbol
1023 #define MY_minisymbol_to_symbol NAME (aout, minisymbol_to_symbol)
1024 #endif
1025 #ifndef MY_bfd_link_hash_table_create
1026 #define MY_bfd_link_hash_table_create NAME (aout, link_hash_table_create)
1027 #endif
1028 #ifndef MY_bfd_link_add_symbols
1029 #define MY_bfd_link_add_symbols NAME (aout, link_add_symbols)
1030 #endif
1031 #ifndef MY_bfd_link_just_syms
1032 #define MY_bfd_link_just_syms _bfd_generic_link_just_syms
1033 #endif
1034 #ifndef MY_bfd_copy_link_hash_symbol_type
1035 #define MY_bfd_copy_link_hash_symbol_type \
1036   _bfd_generic_copy_link_hash_symbol_type
1037 #endif
1038 #ifndef MY_bfd_link_split_section
1039 #define MY_bfd_link_split_section  _bfd_generic_link_split_section
1040 #endif
1041
1042 #ifndef MY_bfd_link_check_relocs
1043 #define MY_bfd_link_check_relocs   _bfd_generic_link_check_relocs
1044 #endif
1045
1046 #ifndef MY_bfd_copy_private_bfd_data
1047 #define MY_bfd_copy_private_bfd_data _bfd_generic_bfd_copy_private_bfd_data
1048 #endif
1049
1050 #ifndef MY_bfd_merge_private_bfd_data
1051 #define MY_bfd_merge_private_bfd_data _bfd_generic_bfd_merge_private_bfd_data
1052 #endif
1053
1054 #ifndef MY_bfd_copy_private_symbol_data
1055 #define MY_bfd_copy_private_symbol_data _bfd_generic_bfd_copy_private_symbol_data
1056 #endif
1057
1058 #ifndef MY_bfd_copy_private_header_data
1059 #define MY_bfd_copy_private_header_data _bfd_generic_bfd_copy_private_header_data
1060 #endif
1061
1062 #ifndef MY_bfd_print_private_bfd_data
1063 #define MY_bfd_print_private_bfd_data _bfd_generic_bfd_print_private_bfd_data
1064 #endif
1065
1066 #ifndef MY_bfd_set_private_flags
1067 #define MY_bfd_set_private_flags _bfd_generic_bfd_set_private_flags
1068 #endif
1069
1070 #ifndef MY_bfd_is_local_label_name
1071 #define MY_bfd_is_local_label_name bfd_generic_is_local_label_name
1072 #endif
1073
1074 #ifndef MY_bfd_is_target_special_symbol
1075 #define MY_bfd_is_target_special_symbol _bfd_bool_bfd_asymbol_false
1076 #endif
1077
1078 #ifndef MY_bfd_free_cached_info
1079 #define MY_bfd_free_cached_info NAME (aout, bfd_free_cached_info)
1080 #endif
1081
1082 #ifndef MY_close_and_cleanup
1083 #define MY_close_and_cleanup MY_bfd_free_cached_info
1084 #endif
1085
1086 #ifndef MY_get_dynamic_symtab_upper_bound
1087 #define MY_get_dynamic_symtab_upper_bound \
1088   _bfd_nodynamic_get_dynamic_symtab_upper_bound
1089 #endif
1090 #ifndef MY_canonicalize_dynamic_symtab
1091 #define MY_canonicalize_dynamic_symtab \
1092   _bfd_nodynamic_canonicalize_dynamic_symtab
1093 #endif
1094 #ifndef MY_get_synthetic_symtab
1095 #define MY_get_synthetic_symtab \
1096   _bfd_nodynamic_get_synthetic_symtab
1097 #endif
1098 #ifndef MY_get_dynamic_reloc_upper_bound
1099 #define MY_get_dynamic_reloc_upper_bound \
1100   _bfd_nodynamic_get_dynamic_reloc_upper_bound
1101 #endif
1102 #ifndef MY_canonicalize_dynamic_reloc
1103 #define MY_canonicalize_dynamic_reloc \
1104   _bfd_nodynamic_canonicalize_dynamic_reloc
1105 #endif
1106
1107 /* Aout symbols normally have leading underscores.  */
1108 #ifndef MY_symbol_leading_char
1109 #define MY_symbol_leading_char '_'
1110 #endif
1111
1112 /* Aout archives normally use spaces for padding.  */
1113 #ifndef AR_PAD_CHAR
1114 #define AR_PAD_CHAR ' '
1115 #endif
1116
1117 #ifndef MY_BFD_TARGET
1118 const bfd_target tic30_aout_vec =
1119 {
1120   TARGETNAME,                   /* Name.  */
1121   bfd_target_aout_flavour,
1122   BFD_ENDIAN_BIG,               /* Target byte order (big).  */
1123   BFD_ENDIAN_BIG,               /* Target headers byte order (big).  */
1124   (HAS_RELOC |                  /* Object flags.  */
1125    HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
1126   (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC),        /* Section flags.  */
1127   MY_symbol_leading_char,
1128   AR_PAD_CHAR,                  /* AR_pad_char.  */
1129   15,                           /* AR_max_namelen.  */
1130   0,                            /* match priority.  */
1131   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
1132   bfd_getb32, bfd_getb_signed_32, bfd_putb32,
1133   bfd_getb16, bfd_getb_signed_16, bfd_putb16,   /* Data.  */
1134   bfd_getb64, bfd_getb_signed_64, bfd_putb64,
1135   bfd_getb32, bfd_getb_signed_32, bfd_putb32,
1136   bfd_getb16, bfd_getb_signed_16, bfd_putb16,   /* Headers.  */
1137   {                             /* bfd_check_format.  */
1138     _bfd_dummy_target,
1139     MY_object_p,
1140     bfd_generic_archive_p,
1141     MY_core_file_p
1142   },
1143   {                             /* bfd_set_format.  */
1144     _bfd_bool_bfd_false_error,
1145     MY_mkobject,
1146     _bfd_generic_mkarchive,
1147     _bfd_bool_bfd_false_error
1148   },
1149   {                             /* bfd_write_contents.  */
1150     _bfd_bool_bfd_false_error,
1151     MY_write_object_contents,
1152     _bfd_write_archive_contents,
1153     _bfd_bool_bfd_false_error
1154   },
1155
1156   BFD_JUMP_TABLE_GENERIC (MY),
1157   BFD_JUMP_TABLE_COPY (MY),
1158   BFD_JUMP_TABLE_CORE (MY),
1159   BFD_JUMP_TABLE_ARCHIVE (MY),
1160   BFD_JUMP_TABLE_SYMBOLS (MY),
1161   BFD_JUMP_TABLE_RELOCS (MY),
1162   BFD_JUMP_TABLE_WRITE (MY),
1163   BFD_JUMP_TABLE_LINK (MY),
1164   BFD_JUMP_TABLE_DYNAMIC (MY),
1165
1166   NULL,
1167
1168   MY_backend_data
1169 };
1170 #endif /* MY_BFD_TARGET */