daily update

[binutils.git] / bfd / vms.c

diff --git a/bfd/vms.c b/bfd/vms.c
index 273c6f9961f3f6397cc36583e6053371b9bd7e1e..94fa84e044cefa0d4b0dc1970f609c933de68bd1 100644 (file)
--- a/bfd/vms.c
+++ b/bfd/vms.c
@@ -63,7 +63,7 @@ static boolean vms_construct_extended_name_table
   PARAMS ((bfd *abfd, char **tabloc, bfd_size_type *tablen,
           const char **name));
 static void vms_truncate_arname
   PARAMS ((bfd *abfd, char **tabloc, bfd_size_type *tablen,
           const char **name));
 static void vms_truncate_arname

-  PARAMS ((bfd *abfd, CONST char *pathname, char *arhdr));
+  PARAMS ((bfd *abfd, const char *pathname, char *arhdr));

 static boolean vms_write_armap
   PARAMS ((bfd *arch, unsigned int elength, struct orl *map,
           unsigned int orl_count, int stridx));
 static boolean vms_write_armap
   PARAMS ((bfd *arch, unsigned int elength, struct orl *map,
           unsigned int orl_count, int stridx));


@@ -71,7 +71,7 @@ static PTR vms_read_ar_hdr PARAMS ((bfd *abfd));
 static bfd *vms_get_elt_at_index PARAMS ((bfd *abfd, symindex index));
 static bfd *vms_openr_next_archived_file PARAMS ((bfd *arch, bfd *prev));
 static boolean vms_update_armap_timestamp PARAMS ((bfd *abfd));
 static bfd *vms_get_elt_at_index PARAMS ((bfd *abfd, symindex index));
 static bfd *vms_openr_next_archived_file PARAMS ((bfd *arch, bfd *prev));
 static boolean vms_update_armap_timestamp PARAMS ((bfd *abfd));

-static int vms_generic_stat_arch_elt PARAMS ((bfd *abfd, struct stat *stat));
+static int vms_generic_stat_arch_elt PARAMS ((bfd *, struct stat *));

 static long vms_get_symtab_upper_bound PARAMS ((bfd *abfd));
 static long vms_get_symtab PARAMS ((bfd *abfd, asymbol **symbols));
 static void vms_print_symbol
 static long vms_get_symtab_upper_bound PARAMS ((bfd *abfd));
 static long vms_get_symtab PARAMS ((bfd *abfd, asymbol **symbols));
 static void vms_print_symbol


@@ -110,6 +110,8 @@ static boolean vms_bfd_relax_section
           boolean *again));
 static boolean vms_bfd_gc_sections
   PARAMS ((bfd *abfd, struct bfd_link_info *link_info));
           boolean *again));
 static boolean vms_bfd_gc_sections
   PARAMS ((bfd *abfd, struct bfd_link_info *link_info));

+static boolean vms_bfd_merge_sections
+  PARAMS ((bfd *abfd, struct bfd_link_info *link_info));

 static struct bfd_link_hash_table *vms_bfd_link_hash_table_create
   PARAMS ((bfd *abfd));
 static boolean vms_bfd_link_add_symbols
 static struct bfd_link_hash_table *vms_bfd_link_hash_table_create
   PARAMS ((bfd *abfd));
 static boolean vms_bfd_link_add_symbols


@@ -230,14 +232,15 @@ vms_initialize (abfd)
      bfd *abfd;
 {
   int i;
      bfd *abfd;
 {
   int i;

+  bfd_size_type amt;

 
   if (abfd->tdata.any != 0)
     return true;
 
 
   if (abfd->tdata.any != 0)
     return true;
 

-  bfd_set_start_address (abfd, (bfd_vma)-1);
+  bfd_set_start_address (abfd, (bfd_vma) -1);

 
 

-  abfd->tdata.any = ((struct vms_private_data_struct*)
-                    bfd_malloc (sizeof (struct vms_private_data_struct)));
+  amt = sizeof (struct vms_private_data_struct);
+  abfd->tdata.any = (struct vms_private_data_struct*) bfd_malloc (amt);

   if (abfd->tdata.any == 0)
     return false;
 
   if (abfd->tdata.any == 0)
     return false;
 


@@ -253,8 +256,8 @@ vms_initialize (abfd)
   PRIV (fixup_done) = false;
   PRIV (sections) = NULL;
 
   PRIV (fixup_done) = false;
   PRIV (sections) = NULL;
 

-  PRIV (stack) = ((struct stack_struct *)
-                bfd_malloc (sizeof (struct stack_struct) * STACKSIZE));
+  amt = sizeof (struct stack_struct) * STACKSIZE;
+  PRIV (stack) = (struct stack_struct *) bfd_malloc (amt);

   if (PRIV (stack) == 0)
     {
      vms_init_no_mem1:
   if (PRIV (stack) == 0)
     {
      vms_init_no_mem1:


@@ -264,8 +267,8 @@ vms_initialize (abfd)
     }
   PRIV (stackptr) = 0;
 
     }
   PRIV (stackptr) = 0;
 

-  PRIV (vms_symbol_table) = ((struct bfd_hash_table *)
-                            bfd_malloc (sizeof (struct bfd_hash_table)));
+  amt = sizeof (struct bfd_hash_table);
+  PRIV (vms_symbol_table) = (struct bfd_hash_table *) bfd_malloc (amt);

   if (PRIV (vms_symbol_table) == 0)
     {
      vms_init_no_mem2:
   if (PRIV (vms_symbol_table) == 0)
     {
      vms_init_no_mem2:


@@ -277,9 +280,8 @@ vms_initialize (abfd)
   if (!bfd_hash_table_init (PRIV (vms_symbol_table), _bfd_vms_hash_newfunc))
     return false;
 
   if (!bfd_hash_table_init (PRIV (vms_symbol_table), _bfd_vms_hash_newfunc))
     return false;
 

-  PRIV (location_stack) = ((struct location_struct *)
-                         bfd_malloc (sizeof (struct location_struct)
-                                     * LOCATION_SAVE_SIZE));
+  amt = sizeof (struct location_struct) * LOCATION_SAVE_SIZE;
+  PRIV (location_stack) = (struct location_struct *) bfd_malloc (amt);

   if (PRIV (location_stack) == 0)
     {
      vms_init_no_mem3:
   if (PRIV (location_stack) == 0)
     {
      vms_init_no_mem3:


@@ -399,7 +401,7 @@ vms_object_p (abfd)
       return 0;
     }
 
       return 0;
     }
 

-  if (bfd_seek (abfd, 0L, SEEK_SET))
+  if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET))

     {
       bfd_set_error (bfd_error_file_truncated);
       return 0;
     {
       bfd_set_error (bfd_error_file_truncated);
       return 0;


@@ -738,8 +740,9 @@ vms_new_section_hook (abfd, section)
 
   if (abfd->section_count > PRIV (section_count))
     {
 
   if (abfd->section_count > PRIV (section_count))
     {

-      PRIV (sections) = ((asection **)
-                           bfd_realloc (PRIV (sections), abfd->section_count * sizeof (asection *)));
+      bfd_size_type amt = abfd->section_count;
+      amt *= sizeof (asection *);
+      PRIV (sections) = (asection **) bfd_realloc (PRIV (sections), amt);

       if (PRIV (sections) == 0)
        return false;
       PRIV (section_count) = abfd->section_count;
       if (PRIV (sections) == 0)
        return false;
       PRIV (section_count) = abfd->section_count;


@@ -976,7 +979,7 @@ vms_construct_extended_name_table (abfd, tabloc, tablen, name)
 static void
 vms_truncate_arname (abfd, pathname, arhdr)
      bfd *abfd ATTRIBUTE_UNUSED;
 static void
 vms_truncate_arname (abfd, pathname, arhdr)
      bfd *abfd ATTRIBUTE_UNUSED;

-     CONST char *pathname ATTRIBUTE_UNUSED;
+     const char *pathname ATTRIBUTE_UNUSED;

      char *arhdr ATTRIBUTE_UNUSED;
 {
 #if VMS_DEBUG
      char *arhdr ATTRIBUTE_UNUSED;
 {
 #if VMS_DEBUG


@@ -1049,14 +1052,14 @@ vms_get_elt_at_index (abfd, index)
    -> bfd_generic_stat_arch_elt  */
 
 static int
    -> bfd_generic_stat_arch_elt  */
 
 static int

-vms_generic_stat_arch_elt (abfd, stat)
+vms_generic_stat_arch_elt (abfd, st)

      bfd *abfd;
      bfd *abfd;

-     struct stat *stat;
+     struct stat *st;

 {
 #if VMS_DEBUG
 {
 #if VMS_DEBUG

-  vms_debug (1, "vms_generic_stat_arch_elt(%p, %p)\n", abfd, stat);
+  vms_debug (1, "vms_generic_stat_arch_elt(%p, %p)\n", abfd, st);

 #endif
 #endif

-  return bfd_generic_stat_arch_elt(abfd, stat);
+  return bfd_generic_stat_arch_elt (abfd, st);

 }
 
 /* This is a new function in bfd 2.5  */
 }
 
 /* This is a new function in bfd 2.5  */


@@ -1145,7 +1148,9 @@ asymbol *
 _bfd_vms_make_empty_symbol (abfd)
      bfd *abfd;
 {
 _bfd_vms_make_empty_symbol (abfd)
      bfd *abfd;
 {

-  asymbol *symbol = (asymbol *)bfd_zalloc(abfd, sizeof (asymbol));
+  asymbol *symbol;
+
+  symbol = (asymbol *) bfd_zalloc(abfd, (bfd_size_type) sizeof (asymbol));

 
 #if VMS_DEBUG
   vms_debug (1, "_bfd_vms_make_empty_symbol(%p)\n", abfd);
 
 #if VMS_DEBUG
   vms_debug (1, "_bfd_vms_make_empty_symbol(%p)\n", abfd);


@@ -1168,7 +1173,7 @@ _bfd_vms_make_empty_symbol (abfd)
 
 static void
 vms_print_symbol (abfd, file, symbol, how)
 
 static void
 vms_print_symbol (abfd, file, symbol, how)

-     bfd *abfd ATTRIBUTE_UNUSED;
+     bfd *abfd;

      PTR file;
      asymbol *symbol;
      bfd_print_symbol_type how;
      PTR file;
      asymbol *symbol;
      bfd_print_symbol_type how;


@@ -1186,9 +1191,9 @@ vms_print_symbol (abfd, file, symbol, how)
 
       case bfd_print_symbol_all:
        {
 
       case bfd_print_symbol_all:
        {

-         CONST char *section_name = symbol->section->name;
+         const char *section_name = symbol->section->name;

 
 

-         bfd_print_symbol_vandf((PTR)file,symbol);
+         bfd_print_symbol_vandf (abfd, (PTR)file, symbol);

 
          fprintf ((FILE *)file," %-8s %s", section_name, symbol->name);
         }
 
          fprintf ((FILE *)file," %-8s %s", section_name, symbol->name);
         }


@@ -1291,8 +1296,8 @@ vms_find_nearest_line (abfd, section, symbols, offset, file, func, line)
      asection *section ATTRIBUTE_UNUSED;
      asymbol **symbols ATTRIBUTE_UNUSED;
      bfd_vma offset ATTRIBUTE_UNUSED;
      asection *section ATTRIBUTE_UNUSED;
      asymbol **symbols ATTRIBUTE_UNUSED;
      bfd_vma offset ATTRIBUTE_UNUSED;

-     CONST char **file ATTRIBUTE_UNUSED;
-     CONST char **func ATTRIBUTE_UNUSED;
+     const char **file ATTRIBUTE_UNUSED;
+     const char **func ATTRIBUTE_UNUSED;

      unsigned int *line ATTRIBUTE_UNUSED;
 {
 #if VMS_DEBUG
      unsigned int *line ATTRIBUTE_UNUSED;
 {
 #if VMS_DEBUG


@@ -1784,6 +1789,17 @@ vms_bfd_gc_sections (abfd, link_info)
   return true;
 }
 
   return true;
 }
 

+static boolean
+vms_bfd_merge_sections (abfd, link_info)
+     bfd *abfd ATTRIBUTE_UNUSED;
+     struct bfd_link_info *link_info ATTRIBUTE_UNUSED;
+{
+#if VMS_DEBUG
+  vms_debug (1, "vms_bfd_merge_sections(%p, %p)\n", abfd, link_info);
+#endif
+  return true;
+}
+

 /* Create a hash table for the linker.  Different backends store
    different information in this table.  */
 
 /* Create a hash table for the linker.  Different backends store
    different information in this table.  */