Automatic date update in version.in

[deliverable/binutils-gdb.git] / bfd / coff-tic54x.c

diff --git a/bfd/coff-tic54x.c b/bfd/coff-tic54x.c
index cb465f958cbd75272fb0416da4c94251bb441415..e44cc62d3501687b3eb75c2c85db73bafc292b8e 100644 (file)
--- a/bfd/coff-tic54x.c
+++ b/bfd/coff-tic54x.c
@@ -1,13 +1,12 @@
 /* BFD back-end for TMS320C54X coff binaries.
 /* BFD back-end for TMS320C54X coff binaries.

-   Copyright 1999, 2000, 2001, 2002, 2003, 2004, 2005
-   Free Software Foundation, Inc.
+   Copyright (C) 1999-2016 Free Software Foundation, Inc.

    Contributed by Timothy Wall (twall@cygnus.com)
 
    This file is part of BFD, the Binary File Descriptor library.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    Contributed by Timothy Wall (twall@cygnus.com)
 
    This file is part of BFD, the Binary File Descriptor library.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by

-   the Free Software Foundation; either version 2 of the License, or
+   the Free Software Foundation; either version 3 of the License, or

    (at your option) any later version.
 
    This program is distributed in the hope that it will be useful,
    (at your option) any later version.
 
    This program is distributed in the hope that it will be useful,


@@ -17,11 +16,11 @@
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software

-   Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+   Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA

    02110-1301, USA.  */
 
    02110-1301, USA.  */
 

-#include "bfd.h"

 #include "sysdep.h"
 #include "sysdep.h"

+#include "bfd.h"

 #include "libbfd.h"
 #include "bfdlink.h"
 #include "coff/tic54x.h"
 #include "libbfd.h"
 #include "bfdlink.h"
 #include "coff/tic54x.h"


@@ -31,22 +30,9 @@
 #undef  F_LSYMS
 #define        F_LSYMS         F_LSYMS_TICOFF
 
 #undef  F_LSYMS
 #define        F_LSYMS         F_LSYMS_TICOFF
 

-static void tic54x_reloc_processing
-  PARAMS ((arelent *, struct internal_reloc *, asymbol **, bfd *, asection *));
-static bfd_reloc_status_type tic54x_relocation
-  PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
-static bfd_boolean tic54x_set_section_contents
-  PARAMS ((bfd *, sec_ptr, const PTR, file_ptr, bfd_size_type));
-static reloc_howto_type *coff_tic54x_rtype_to_howto
-  PARAMS ((bfd *, asection *, struct internal_reloc *, struct coff_link_hash_entry *, struct internal_syment *, bfd_vma *));
-static bfd_boolean tic54x_set_arch_mach
-  PARAMS ((bfd *, enum bfd_architecture, unsigned long));
-static reloc_howto_type * tic54x_coff_reloc_type_lookup
-  PARAMS ((bfd *, bfd_reloc_code_real_type));
-static void tic54x_lookup_howto
-  PARAMS ((arelent *, struct internal_reloc *));
-static bfd_boolean ticoff_bfd_is_local_label_name
-  PARAMS ((bfd *, const char *));
+static void
+tic54x_reloc_processing (arelent *, struct internal_reloc *,
+                        asymbol **, bfd *, asection *);

 
 /* 32-bit operations
    The octet order is screwy.  words are LSB first (LS octet, actually), but
 
 /* 32-bit operations
    The octet order is screwy.  words are LSB first (LS octet, actually), but


@@ -97,26 +83,24 @@ tic54x_getl_signed_32 (const void *p)
 #define coff_set_section_load_page bfd_ticoff_set_section_load_page
 
 void
 #define coff_set_section_load_page bfd_ticoff_set_section_load_page
 
 void

-bfd_ticoff_set_section_load_page (sect, page)
-  asection *sect;
-  int page;
+bfd_ticoff_set_section_load_page (asection *sect,
+                                 int page)

 {
   sect->lma = (sect->lma & ADDR_MASK) | PG_TO_FLAG(page);
 }
 
 int
 {
   sect->lma = (sect->lma & ADDR_MASK) | PG_TO_FLAG(page);
 }
 
 int

-bfd_ticoff_get_section_load_page (sect)
-  asection *sect;
+bfd_ticoff_get_section_load_page (asection *sect)

 {
   int page;
 
   /* Provide meaningful defaults for predefined sections.  */
 {
   int page;
 
   /* Provide meaningful defaults for predefined sections.  */

-  if (sect == &bfd_com_section)
+  if (sect == bfd_com_section_ptr)

     page = PG_DATA;
 
     page = PG_DATA;
 

-  else if (sect == &bfd_und_section
-      || sect == &bfd_abs_section
-      || sect == &bfd_ind_section)
+  else if (bfd_is_und_section (sect)
+          || bfd_is_abs_section (sect)
+          || bfd_is_ind_section (sect))

     page = PG_PROG;
 
   else
     page = PG_PROG;
 
   else


@@ -129,10 +113,9 @@ bfd_ticoff_get_section_load_page (sect)
    (e.g. binary).  */
 
 static bfd_boolean
    (e.g. binary).  */
 
 static bfd_boolean

-tic54x_set_arch_mach (abfd, arch, machine)
-     bfd *abfd;
-     enum bfd_architecture arch;
-     unsigned long machine;
+tic54x_set_arch_mach (bfd *abfd,
+                     enum bfd_architecture arch,
+                     unsigned long machine)

 {
   if (arch == bfd_arch_unknown)
     arch = bfd_arch_tic54x;
 {
   if (arch == bfd_arch_unknown)
     arch = bfd_arch_tic54x;


@@ -144,15 +127,13 @@ tic54x_set_arch_mach (abfd, arch, machine)
 }
 
 static bfd_reloc_status_type
 }
 
 static bfd_reloc_status_type

-tic54x_relocation (abfd, reloc_entry, symbol, data, input_section,
-                   output_bfd, error_message)
-  bfd *abfd ATTRIBUTE_UNUSED;
-  arelent *reloc_entry;
-  asymbol *symbol ATTRIBUTE_UNUSED;
-  PTR data ATTRIBUTE_UNUSED;
-  asection *input_section;
-  bfd *output_bfd;
-  char **error_message ATTRIBUTE_UNUSED;
+tic54x_relocation (bfd *abfd ATTRIBUTE_UNUSED,
+                  arelent *reloc_entry,
+                  asymbol *symbol ATTRIBUTE_UNUSED,
+                  void * data ATTRIBUTE_UNUSED,
+                  asection *input_section,
+                  bfd *output_bfd,
+                  char **error_message ATTRIBUTE_UNUSED)

 {
   if (output_bfd != (bfd *) NULL)
     {
 {
   if (output_bfd != (bfd *) NULL)
     {


@@ -229,14 +210,14 @@ reloc_howto_type tic54x_howto_table[] =
   };
 
 #define coff_bfd_reloc_type_lookup tic54x_coff_reloc_type_lookup
   };
 
 #define coff_bfd_reloc_type_lookup tic54x_coff_reloc_type_lookup

+#define coff_bfd_reloc_name_lookup tic54x_coff_reloc_name_lookup

 
 /* For the case statement use the code values used tc_gen_reloc (defined in
    bfd/reloc.c) to map to the howto table entries.  */
 
 
 /* For the case statement use the code values used tc_gen_reloc (defined in
    bfd/reloc.c) to map to the howto table entries.  */
 

-reloc_howto_type *
-tic54x_coff_reloc_type_lookup (abfd, code)
-     bfd *abfd ATTRIBUTE_UNUSED;
-     bfd_reloc_code_real_type code;
+static reloc_howto_type *
+tic54x_coff_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
+                              bfd_reloc_code_real_type code)

 {
   switch (code)
     {
 {
   switch (code)
     {


@@ -259,13 +240,28 @@ tic54x_coff_reloc_type_lookup (abfd, code)
     }
 }
 
     }
 }
 

+static reloc_howto_type *
+tic54x_coff_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
+                              const char *r_name)
+{
+  unsigned int i;
+
+  for (i = 0;
+       i < sizeof (tic54x_howto_table) / sizeof (tic54x_howto_table[0]);
+       i++)
+    if (tic54x_howto_table[i].name != NULL
+       && strcasecmp (tic54x_howto_table[i].name, r_name) == 0)
+      return &tic54x_howto_table[i];
+
+  return NULL;
+}
+

 /* Code to turn a r_type into a howto ptr, uses the above howto table.
    Called after some initial checking by the tic54x_rtype_to_howto fn below.  */
 
 static void
 /* Code to turn a r_type into a howto ptr, uses the above howto table.
    Called after some initial checking by the tic54x_rtype_to_howto fn below.  */
 
 static void

-tic54x_lookup_howto (internal, dst)
-     arelent *internal;
-     struct internal_reloc *dst;
+tic54x_lookup_howto (arelent *internal,
+                    struct internal_reloc *dst)

 {
   unsigned i;
   int bank = (dst->r_symndx == -1) ? HOWTO_BANK : 0;
 {
   unsigned i;
   int bank = (dst->r_symndx == -1) ? HOWTO_BANK : 0;


@@ -290,13 +286,12 @@ tic54x_lookup_howto (internal, dst)
 #define coff_rtype_to_howto coff_tic54x_rtype_to_howto
 
 static reloc_howto_type *
 #define coff_rtype_to_howto coff_tic54x_rtype_to_howto
 
 static reloc_howto_type *

-coff_tic54x_rtype_to_howto (abfd, sec, rel, h, sym, addendp)
-     bfd *abfd ATTRIBUTE_UNUSED;
-     asection *sec;
-     struct internal_reloc *rel;
-     struct coff_link_hash_entry *h ATTRIBUTE_UNUSED;
-     struct internal_syment *sym ATTRIBUTE_UNUSED;
-     bfd_vma *addendp;
+coff_tic54x_rtype_to_howto (bfd *abfd ATTRIBUTE_UNUSED,
+                           asection *sec,
+                           struct internal_reloc *rel,
+                           struct coff_link_hash_entry *h ATTRIBUTE_UNUSED,
+                           struct internal_syment *sym ATTRIBUTE_UNUSED,
+                           bfd_vma *addendp)

 {
   arelent genrel;
 
 {
   arelent genrel;
 


@@ -317,9 +312,8 @@ coff_tic54x_rtype_to_howto (abfd, sec, rel, h, sym, addendp)
    labels.  */
 
 static bfd_boolean
    labels.  */
 
 static bfd_boolean

-ticoff_bfd_is_local_label_name (abfd, name)
-  bfd *abfd ATTRIBUTE_UNUSED;
-  const char *name;
+ticoff_bfd_is_local_label_name (bfd *abfd ATTRIBUTE_UNUSED,
+                               const char *name)

 {
   if (TICOFF_LOCAL_LABEL_P(name))
     return TRUE;
 {
   if (TICOFF_LOCAL_LABEL_P(name))
     return TRUE;


@@ -328,41 +322,35 @@ ticoff_bfd_is_local_label_name (abfd, name)
 
 #define coff_bfd_is_local_label_name ticoff_bfd_is_local_label_name
 
 
 #define coff_bfd_is_local_label_name ticoff_bfd_is_local_label_name
 

-/* Clear the r_reserved field in relocs.  */
-#define SWAP_OUT_RELOC_EXTRA(abfd,src,dst) \
-  do \
-    { \
-      dst->r_reserved[0] = 0; \
-      dst->r_reserved[1] = 0; \
-    } \
-  while (0)
-

 /* Customize coffcode.h; the default coff_ functions are set up to use COFF2;
    coff_bad_format_hook uses BADMAG, so set that for COFF2.  The COFF1
    and COFF0 vectors use custom _bad_format_hook procs instead of setting
    BADMAG.  */
 #define BADMAG(x) COFF2_BADMAG(x)
 /* Customize coffcode.h; the default coff_ functions are set up to use COFF2;
    coff_bad_format_hook uses BADMAG, so set that for COFF2.  The COFF1
    and COFF0 vectors use custom _bad_format_hook procs instead of setting
    BADMAG.  */
 #define BADMAG(x) COFF2_BADMAG(x)

+
+#ifndef bfd_pe_print_pdata
+#define bfd_pe_print_pdata     NULL
+#endif
+

 #include "coffcode.h"
 
 static bfd_boolean
 #include "coffcode.h"
 
 static bfd_boolean

-tic54x_set_section_contents (abfd, section, location, offset, bytes_to_do)
-     bfd *abfd;
-     sec_ptr section;
-     const PTR location;
-     file_ptr offset;
-     bfd_size_type bytes_to_do;
+tic54x_set_section_contents (bfd *abfd,
+                            sec_ptr section,
+                            const void * location,
+                            file_ptr offset,
+                            bfd_size_type bytes_to_do)

 {
   return coff_set_section_contents (abfd, section, location,
                                     offset, bytes_to_do);
 }
 
 static void
 {
   return coff_set_section_contents (abfd, section, location,
                                     offset, bytes_to_do);
 }
 
 static void

-tic54x_reloc_processing (relent, reloc, symbols, abfd, section)
-     arelent *relent;
-     struct internal_reloc *reloc;
-     asymbol **symbols;
-     bfd *abfd;
-     asection *section;
+tic54x_reloc_processing (arelent *relent,
+                        struct internal_reloc *reloc,
+                        asymbol **symbols,
+                        bfd *abfd,
+                        asection *section)

 {
   asymbol *ptr;
 
 {
   asymbol *ptr;
 


@@ -424,6 +412,7 @@ const bfd_target tic54x_coff0_vec =
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */

+    0,                         /* match priority.  */

     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */
     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */


@@ -449,7 +438,7 @@ const bfd_target tic54x_coff0_vec =
     BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
     NULL,
 
     BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
     NULL,
 

-    (PTR) & ticoff0_swap_table
+    & ticoff0_swap_table

   };
 
 /* TI COFF v0, SPARC tools (big-endian headers).  */
   };
 
 /* TI COFF v0, SPARC tools (big-endian headers).  */


@@ -468,6 +457,7 @@ const bfd_target tic54x_coff0_beh_vec =
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */

+    0,                         /* match priority.  */

     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */
     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */


@@ -494,7 +484,7 @@ const bfd_target tic54x_coff0_beh_vec =
 
     & tic54x_coff0_vec,
 
 
     & tic54x_coff0_vec,
 

-    (PTR) & ticoff0_swap_table
+    & ticoff0_swap_table

   };
 
 /* TI COFF v1, DOS tools (little-endian headers).  */
   };
 
 /* TI COFF v1, DOS tools (little-endian headers).  */


@@ -513,6 +503,7 @@ const bfd_target tic54x_coff1_vec =
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */

+    0,                         /* match priority.  */

     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */
     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */


@@ -539,7 +530,7 @@ const bfd_target tic54x_coff1_vec =
 
     & tic54x_coff0_beh_vec,
 
 
     & tic54x_coff0_beh_vec,
 

-    (PTR) & ticoff1_swap_table
+    & ticoff1_swap_table

 };
 
 /* TI COFF v1, SPARC tools (big-endian headers).  */
 };
 
 /* TI COFF v1, SPARC tools (big-endian headers).  */


@@ -558,6 +549,7 @@ const bfd_target tic54x_coff1_beh_vec =
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */

+    0,                         /* match priority.  */

     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */
     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */


@@ -584,7 +576,7 @@ const bfd_target tic54x_coff1_beh_vec =
 
     & tic54x_coff1_vec,
 
 
     & tic54x_coff1_vec,
 

-    (PTR) & ticoff1_swap_table
+    & ticoff1_swap_table

   };
 
 /* TI COFF v2, TI DOS tools output (little-endian headers).  */
   };
 
 /* TI COFF v2, TI DOS tools output (little-endian headers).  */


@@ -603,6 +595,7 @@ const bfd_target tic54x_coff2_vec =
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */

+    0,                         /* match priority.  */

     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */
     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */


@@ -648,6 +641,7 @@ const bfd_target tic54x_coff2_beh_vec =
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */
     '_',                               /* leading symbol underscore */
     '/',                               /* ar_pad_char */
     15,                                /* ar_max_namelen */

+    0,                         /* match priority.  */

     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */
     bfd_getl64, bfd_getl_signed_64, bfd_putl64,
     tic54x_getl32, tic54x_getl_signed_32, tic54x_putl32,
     bfd_getl16, bfd_getl_signed_16, bfd_putl16,        /* data */