Ignore:
Timestamp:
Aug 16, 2003, 6:59:22 PM (22 years ago)
Author:
bird
Message:

binutils v2.14 - offical sources.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/GNU/src/binutils/bfd/vms.c

    • Property cvs2svn:cvs-rev changed from 1.1 to 1.1.1.2
    r608 r609  
    11/* vms.c -- BFD back-end for VAX (openVMS/VAX) and
    22   EVAX (openVMS/Alpha) files.
    3    Copyright 1996, 1997, 1998, 1999, 2000, 2001
     3   Copyright 1996, 1997, 1998, 1999, 2000, 2001, 2002
    44   Free Software Foundation, Inc.
    55
    … …  
    2727#include "vms.h"
    2828
    29 static boolean vms_initialize PARAMS ((bfd *));
     29static bfd_boolean vms_initialize
     30  PARAMS ((bfd *));
    3031static unsigned int priv_section_count;
    31 static boolean fill_section_ptr PARAMS ((struct bfd_hash_entry *, PTR));
    32 static boolean vms_fixup_sections PARAMS ((bfd *));
    33 static boolean copy_symbols PARAMS ((struct bfd_hash_entry *, PTR));
     32static bfd_boolean fill_section_ptr
     33  PARAMS ((struct bfd_hash_entry *, PTR));
     34static bfd_boolean vms_fixup_sections
     35  PARAMS ((bfd *));
     36static bfd_boolean copy_symbols
     37  PARAMS ((struct bfd_hash_entry *, PTR));
    3438static bfd_reloc_status_type reloc_nil
    3539  PARAMS ((bfd *, arelent *, asymbol *, PTR, asection *, bfd *, char **));
    36 static const struct bfd_target *vms_object_p PARAMS ((bfd *abfd));
    37 static const struct bfd_target *vms_archive_p PARAMS ((bfd *abfd));
    38 static boolean vms_mkobject PARAMS ((bfd *abfd));
    39 static boolean vms_write_object_contents PARAMS ((bfd *abfd));
    40 static boolean vms_close_and_cleanup PARAMS ((bfd *abfd));
    41 static boolean vms_bfd_free_cached_info PARAMS ((bfd *abfd));
    42 static boolean vms_new_section_hook PARAMS ((bfd *abfd, asection *section));
    43 static boolean vms_get_section_contents
     40static const struct bfd_target *vms_object_p
     41  PARAMS ((bfd *abfd));
     42static const struct bfd_target *vms_archive_p
     43  PARAMS ((bfd *abfd));
     44static bfd_boolean vms_mkobject
     45  PARAMS ((bfd *abfd));
     46static bfd_boolean vms_write_object_contents
     47  PARAMS ((bfd *abfd));
     48static bfd_boolean vms_close_and_cleanup
     49  PARAMS ((bfd *abfd));
     50static bfd_boolean vms_bfd_free_cached_info
     51  PARAMS ((bfd *abfd));
     52static bfd_boolean vms_new_section_hook
     53  PARAMS ((bfd *abfd, asection *section));
     54static bfd_boolean vms_get_section_contents
    4455  PARAMS ((bfd *abfd, asection *section, PTR x1, file_ptr x2,
    4556           bfd_size_type x3));
    46 static boolean vms_get_section_contents_in_window
     57static bfd_boolean vms_get_section_contents_in_window
    4758  PARAMS ((bfd *abfd, asection *section, bfd_window *w, file_ptr offset,
    4859           bfd_size_type count));
    49 static boolean vms_bfd_copy_private_bfd_data PARAMS ((bfd *src, bfd *dest));
    50 static boolean vms_bfd_copy_private_section_data
     60static bfd_boolean vms_bfd_copy_private_bfd_data
     61  PARAMS ((bfd *src, bfd *dest));
     62static bfd_boolean vms_bfd_copy_private_section_data
    5163  PARAMS ((bfd *srcbfd, asection *srcsec, bfd *dstbfd, asection *dstsec));
    52 static boolean vms_bfd_copy_private_symbol_data
     64static bfd_boolean vms_bfd_copy_private_symbol_data
    5365  PARAMS ((bfd *ibfd, asymbol *isym, bfd *obfd, asymbol *osym));
    54 static boolean vms_bfd_print_private_bfd_data
     66static bfd_boolean vms_bfd_print_private_bfd_data
    5567  PARAMS ((bfd *abfd, void *file));
    56 static char *vms_core_file_failing_command PARAMS ((bfd *abfd));
    57 static int vms_core_file_failing_signal PARAMS ((bfd *abfd));
    58 static boolean vms_core_file_matches_executable_p
     68static char *vms_core_file_failing_command
     69  PARAMS ((bfd *abfd));
     70static int vms_core_file_failing_signal
     71  PARAMS ((bfd *abfd));
     72static bfd_boolean vms_core_file_matches_executable_p
    5973  PARAMS ((bfd *abfd, bfd *bbfd));
    60 static boolean vms_slurp_armap PARAMS ((bfd *abfd));
    61 static boolean vms_slurp_extended_name_table PARAMS ((bfd *abfd));
    62 static boolean vms_construct_extended_name_table
     74static bfd_boolean vms_slurp_armap
     75  PARAMS ((bfd *abfd));
     76static bfd_boolean vms_slurp_extended_name_table
     77  PARAMS ((bfd *abfd));
     78static bfd_boolean vms_construct_extended_name_table
    6379  PARAMS ((bfd *abfd, char **tabloc, bfd_size_type *tablen,
    6480           const char **name));
    6581static void vms_truncate_arname
    66   PARAMS ((bfd *abfd, CONST char *pathname, char *arhdr));
    67 static boolean vms_write_armap
     82  PARAMS ((bfd *abfd, const char *pathname, char *arhdr));
     83static bfd_boolean vms_write_armap
    6884  PARAMS ((bfd *arch, unsigned int elength, struct orl *map,
    6985           unsigned int orl_count, int stridx));
    70 static PTR vms_read_ar_hdr PARAMS ((bfd *abfd));
    71 static bfd *vms_get_elt_at_index PARAMS ((bfd *abfd, symindex index));
    72 static bfd *vms_openr_next_archived_file PARAMS ((bfd *arch, bfd *prev));
    73 static boolean vms_update_armap_timestamp PARAMS ((bfd *abfd));
    74 static int vms_generic_stat_arch_elt PARAMS ((bfd *abfd, struct stat *stat));
    75 static long vms_get_symtab_upper_bound PARAMS ((bfd *abfd));
    76 static long vms_get_symtab PARAMS ((bfd *abfd, asymbol **symbols));
     86static PTR vms_read_ar_hdr
     87  PARAMS ((bfd *abfd));
     88static bfd *vms_get_elt_at_index
     89  PARAMS ((bfd *abfd, symindex index));
     90static bfd *vms_openr_next_archived_file
     91  PARAMS ((bfd *arch, bfd *prev));
     92static bfd_boolean vms_update_armap_timestamp
     93  PARAMS ((bfd *abfd));
     94static int vms_generic_stat_arch_elt
     95  PARAMS ((bfd *, struct stat *));
     96static long vms_get_symtab_upper_bound
     97  PARAMS ((bfd *abfd));
     98static long vms_get_symtab
     99  PARAMS ((bfd *abfd, asymbol **symbols));
    77100static void vms_print_symbol
    78101  PARAMS ((bfd *abfd, PTR file, asymbol *symbol, bfd_print_symbol_type how));
    79102static void vms_get_symbol_info
    80103  PARAMS ((bfd *abfd, asymbol *symbol, symbol_info *ret));
    81 static boolean vms_bfd_is_local_label_name PARAMS ((bfd *abfd, const char *));
    82 static alent *vms_get_lineno PARAMS ((bfd *abfd, asymbol *symbol));
    83 static boolean vms_find_nearest_line
     104static bfd_boolean vms_bfd_is_local_label_name
     105  PARAMS ((bfd *abfd, const char *));
     106static alent *vms_get_lineno
     107  PARAMS ((bfd *abfd, asymbol *symbol));
     108static bfd_boolean vms_find_nearest_line
    84109  PARAMS ((bfd *abfd, asection *section, asymbol **symbols, bfd_vma offset,
    85110           const char **file, const char **func, unsigned int *line));
    … …  
    87112  PARAMS ((bfd *abfd, void *ptr, unsigned long size));
    88113static long vms_read_minisymbols
    89   PARAMS ((bfd *abfd, boolean dynamic, PTR *minisymsp, unsigned int *sizep));
     114  PARAMS ((bfd *abfd, bfd_boolean dynamic, PTR *minisymsp,
     115           unsigned int *sizep));
    90116static asymbol *vms_minisymbol_to_symbol
    91   PARAMS ((bfd *abfd, boolean dynamic, const PTR minisym, asymbol *sym));
    92 static long vms_get_reloc_upper_bound PARAMS ((bfd *abfd, asection *sect));
     117  PARAMS ((bfd *abfd, bfd_boolean dynamic, const PTR minisym, asymbol *sym));
     118static long vms_get_reloc_upper_bound
     119  PARAMS ((bfd *abfd, asection *sect));
    93120static long vms_canonicalize_reloc
    94121  PARAMS ((bfd *abfd, asection *srcsec, arelent **location,
    … …  
    96123static const struct reloc_howto_struct *vms_bfd_reloc_type_lookup
    97124  PARAMS ((bfd *abfd, bfd_reloc_code_real_type code));
    98 static boolean vms_set_arch_mach
     125static bfd_boolean vms_set_arch_mach
    99126  PARAMS ((bfd *abfd, enum bfd_architecture arch, unsigned long mach));
    100 static boolean vms_set_section_contents
     127static bfd_boolean vms_set_section_contents
    101128  PARAMS ((bfd *abfd, asection *section, PTR location, file_ptr offset,
    102129           bfd_size_type count));
    103 static int vms_sizeof_headers PARAMS ((bfd *abfd, boolean reloc));
     130static int vms_sizeof_headers
     131  PARAMS ((bfd *abfd, bfd_boolean reloc));
    104132static bfd_byte *vms_bfd_get_relocated_section_contents
    105133  PARAMS ((bfd *abfd, struct bfd_link_info *link_info,
    106134           struct bfd_link_order *link_order, bfd_byte *data,
    107            boolean relocateable, asymbol **symbols));
    108 static boolean vms_bfd_relax_section
     135           bfd_boolean relocateable, asymbol **symbols));
     136static bfd_boolean vms_bfd_relax_section
    109137  PARAMS ((bfd *abfd, asection *section, struct bfd_link_info *link_info,
    110            boolean *again));
    111 static boolean vms_bfd_gc_sections
     138           bfd_boolean *again));
     139static bfd_boolean vms_bfd_gc_sections
     140  PARAMS ((bfd *abfd, struct bfd_link_info *link_info));
     141static bfd_boolean vms_bfd_merge_sections
    112142  PARAMS ((bfd *abfd, struct bfd_link_info *link_info));
    113143static struct bfd_link_hash_table *vms_bfd_link_hash_table_create
    114144  PARAMS ((bfd *abfd));
    115 static boolean vms_bfd_link_add_symbols
     145static void vms_bfd_link_hash_table_free
     146  PARAMS ((struct bfd_link_hash_table *hash));
     147static bfd_boolean vms_bfd_link_add_symbols
    116148  PARAMS ((bfd *abfd, struct bfd_link_info *link_info));
    117 static boolean vms_bfd_final_link
     149static bfd_boolean vms_bfd_final_link
    118150  PARAMS ((bfd *abfd, struct bfd_link_info *link_info));
    119 static boolean vms_bfd_link_split_section
     151static bfd_boolean vms_bfd_link_split_section
    120152  PARAMS ((bfd *abfd, asection *section));
    121 static long vms_get_dynamic_symtab_upper_bound PARAMS ((bfd *abfd));
     153static long vms_get_dynamic_symtab_upper_bound
     154  PARAMS ((bfd *abfd));
    122155static long vms_canonicalize_dynamic_symtab
    123156  PARAMS ((bfd *abfd, asymbol **symbols));
    124 static long vms_get_dynamic_reloc_upper_bound PARAMS ((bfd *abfd));
     157static long vms_get_dynamic_reloc_upper_bound
     158  PARAMS ((bfd *abfd));
    125159static long vms_canonicalize_dynamic_reloc
    126160  PARAMS ((bfd *abfd, arelent **arel, asymbol **symbols));
    127 static boolean vms_bfd_merge_private_bfd_data PARAMS ((bfd *ibfd, bfd *obfd));
    128 static boolean vms_bfd_set_private_flags PARAMS ((bfd *abfd, flagword flags));
    129 
    130 #define vms_make_empty_symbol _bfd_vms_make_empty_symbol
     161static bfd_boolean vms_bfd_merge_private_bfd_data
     162  PARAMS ((bfd *ibfd, bfd *obfd));
     163static bfd_boolean vms_bfd_set_private_flags
     164  PARAMS ((bfd *abfd, flagword flags));
     165
     166#define vms_make_empty_symbol _bfd_generic_make_empty_symbol
     167#define vms_bfd_link_just_syms _bfd_generic_link_just_syms
     168#define vms_bfd_discard_group bfd_generic_discard_group
    131169
    132170
    … …  
    228266/* Initialize private data  */
    229267
    230 static boolean
     268static bfd_boolean
    231269vms_initialize (abfd)
    232270     bfd *abfd;
    233271{
    234272  int i;
    235 
    236   if (abfd->tdata.any != 0)
    237     return true;
    238 
    239   bfd_set_start_address (abfd, (bfd_vma)-1);
    240 
    241   abfd->tdata.any = ((struct vms_private_data_struct*)
    242                      bfd_malloc (sizeof (struct vms_private_data_struct)));
     273  bfd_size_type amt;
     274
     275  bfd_set_start_address (abfd, (bfd_vma) -1);
     276
     277  amt = sizeof (struct vms_private_data_struct);
     278  abfd->tdata.any = (struct vms_private_data_struct*) bfd_alloc (abfd, amt);
    243279  if (abfd->tdata.any == 0)
    244     return false;
     280    return FALSE;
    245281
    246282#ifdef __ALPHA
    … …  
    253289  PRIV (rec_length) = 0;
    254290  PRIV (file_format) = FF_UNKNOWN;
    255   PRIV (fixup_done) = false;
     291  PRIV (fixup_done) = FALSE;
    256292  PRIV (sections) = NULL;
    257293
    258   PRIV (stack) = ((struct stack_struct *)
    259                  bfd_malloc (sizeof (struct stack_struct) * STACKSIZE));
     294  amt = sizeof (struct stack_struct) * STACKSIZE;
     295  PRIV (stack) = (struct stack_struct *) bfd_alloc (abfd, amt);
    260296  if (PRIV (stack) == 0)
    261     {
    262      vms_init_no_mem1:
    263       free (abfd->tdata.any);
    264       abfd->tdata.any = 0;
    265       return false;
    266     }
     297    goto error_ret1;
    267298  PRIV (stackptr) = 0;
    268299
    269   PRIV (vms_symbol_table) = ((struct bfd_hash_table *)
    270                              bfd_malloc (sizeof (struct bfd_hash_table)));
     300  amt = sizeof (struct bfd_hash_table);
     301  PRIV (vms_symbol_table) = (struct bfd_hash_table *) bfd_alloc (abfd, amt);
    271302  if (PRIV (vms_symbol_table) == 0)
    272     {
    273      vms_init_no_mem2:
    274       free (PRIV (stack));
    275       PRIV (stack) = 0;
    276       goto vms_init_no_mem1;
    277     }
     303    goto error_ret1;
    278304
    279305  if (!bfd_hash_table_init (PRIV (vms_symbol_table), _bfd_vms_hash_newfunc))
    280     return false;
    281 
    282   PRIV (location_stack) = ((struct location_struct *)
    283                           bfd_malloc (sizeof (struct location_struct)
    284                                       * LOCATION_SAVE_SIZE));
     306    goto error_ret1;
     307
     308  amt = sizeof (struct location_struct) * LOCATION_SAVE_SIZE;
     309  PRIV (location_stack) = (struct location_struct *) bfd_alloc (abfd, amt);
    285310  if (PRIV (location_stack) == 0)
    286     {
    287      vms_init_no_mem3:
    288       free (PRIV (vms_symbol_table));
    289       PRIV (vms_symbol_table) = 0;
    290       goto vms_init_no_mem2;
    291     }
     311    goto error_ret2;
    292312
    293313  for (i = 0; i < VMS_SECTION_COUNT; i++)
    294314    PRIV (vms_section_table)[i] = NULL;
    295315
    296   PRIV (output_buf) = (unsigned char *) malloc (MAX_OUTREC_SIZE);
     316  amt = MAX_OUTREC_SIZE;
     317  PRIV (output_buf) = (unsigned char *) bfd_alloc (abfd, amt);
    297318  if (PRIV (output_buf) == 0)
    298     {
    299       free (PRIV (location_stack));
    300       PRIV (location_stack) = 0;
    301       goto vms_init_no_mem3;
    302     }
     319    goto error_ret2;
     320
    303321  PRIV (push_level) = 0;
    304322  PRIV (pushed_size) = 0;
    … …  
    307325  PRIV (output_alignment) = 1;
    308326
    309   return true;
     327  return TRUE;
     328
     329 error_ret2:
     330  bfd_hash_table_free (PRIV (vms_symbol_table));
     331 error_ret1:
     332  bfd_release (abfd, abfd->tdata.any);
     333  abfd->tdata.any = 0;
     334  return FALSE;
    310335}
    311336
    … …  
    319344   called from bfd_hash_traverse in vms_fixup_sections  */
    320345
    321 static boolean
     346static bfd_boolean
    322347fill_section_ptr (entry, sections)
    323348     struct bfd_hash_entry *entry;
    … …  
    345370    sym->flags |= BSF_SECTION_SYM;
    346371
    347   return true;
     372  return TRUE;
    348373}
    349374
    … …  
    357382        copy abfd->sections to PRIV(sections)  */
    358383
    359 static boolean
     384static bfd_boolean
    360385vms_fixup_sections (abfd)
    361386     bfd *abfd;
    362387{
    363388  if (PRIV (fixup_done))
    364     return true;
     389    return TRUE;
    365390
    366391  /*
    … …  
    373398                    (PTR) (PRIV (sections)));
    374399
    375   PRIV (fixup_done) = true;
    376 
    377   return true;
     400  PRIV (fixup_done) = TRUE;
     401
     402  return TRUE;
    378403}
    379404
    … …  
    391416  const struct bfd_target *target_vector = 0;
    392417  const bfd_arch_info_type *arch = 0;
     418  PTR tdata_save = abfd->tdata.any;
     419  bfd_vma saddr_save = bfd_get_start_address (abfd);
    393420
    394421#if VMS_DEBUG
    … …  
    397424
    398425  if (!vms_initialize (abfd))
    399     {
    400       fprintf (stderr, "vms_initialize () failed !!\n");
    401       return 0;
    402     }
    403 
    404   if (bfd_seek (abfd, 0L, SEEK_SET))
    405     {
    406       bfd_set_error (bfd_error_file_truncated);
    407       return 0;
    408     }
     426    goto error_ret;
     427
     428  if (bfd_seek (abfd, (file_ptr) 0, SEEK_SET))
     429    goto err_wrong_format;
    409430
    410431  prev_type = -1;
    … …  
    420441          vms_debug (2, "next_record failed\n");
    421442#endif
    422           bfd_set_error (bfd_error_wrong_format);
    423           return 0;
     443          goto err_wrong_format;
    424444        }
    425445
    … …  
    427447           && (PRIV (rec_type) != EOBJ_S_C_EGSD))
    428448        {
    429           if (vms_fixup_sections (abfd) == false)
     449          if (! vms_fixup_sections (abfd))
    430450            {
    431451#if VMS_DEBUG
    432452              vms_debug (2, "vms_fixup_sections failed\n");
    433453#endif
    434               bfd_set_error (bfd_error_wrong_format);
    435               return 0;
     454              goto err_wrong_format;
    436455            }
    437456        }
    … …  
    485504          vms_debug (2, "slurp type %d failed with %d\n", prev_type, err);
    486505#endif
    487           bfd_set_error (bfd_error_wrong_format);
    488           return 0;
     506          goto err_wrong_format;
    489507        }
    490508    }
    … …  
    493511  if (target_vector == &vms_vax_vec)
    494512    {
    495       if (vms_fixup_sections (abfd) == false)
     513      if (! vms_fixup_sections (abfd))
    496514        {
    497515#if VMS_DEBUG
    498516          vms_debug (2, "vms_fixup_sections failed\n");
    499517#endif
    500           bfd_set_error (bfd_error_wrong_format);
    501           return 0;
     518          goto err_wrong_format;
    502519        }
    503520
    … …  
    526543      vms_debug (2, "arch not found\n");
    527544#endif
    528       bfd_set_error (bfd_error_wrong_format);
    529       return 0;
     545      goto err_wrong_format;
    530546    }
    531547  abfd->arch_info = arch;
    532548
    533549  return target_vector;
     550
     551 err_wrong_format:
     552  bfd_set_error (bfd_error_wrong_format);
     553 error_ret:
     554  if (abfd->tdata.any != tdata_save && abfd->tdata.any != NULL)
     555    bfd_release (abfd, abfd->tdata.any);
     556  abfd->tdata.any = tdata_save;
     557  bfd_set_start_address (abfd, saddr_save);
     558  return NULL;
    534559}
    535560
    … …  
    550575/* Set the format of a file being written.  */
    551576
    552 static boolean
     577static bfd_boolean
    553578vms_mkobject (abfd)
    554579     bfd *abfd;
    … …  
    559584
    560585  if (!vms_initialize (abfd))
    561     {
    562       fprintf (stderr, "vms_initialize () failed !!\n");
    563       return 0;
    564     }
     586    return 0;
    565587
    566588  {
    … …  
    578600  }
    579601
    580   return true;
     602  return TRUE;
    581603}
    582604
    583605/* Write cached information into a file being written, at bfd_close.  */
    584606
    585 static boolean
     607static bfd_boolean
    586608vms_write_object_contents (abfd)
    587609     bfd *abfd;
    … …  
    596618        {
    597619          if (_bfd_vms_write_hdr (abfd, OBJ_S_C_HDR) != 0)
    598             return false;
     620            return FALSE;
    599621          if (_bfd_vms_write_gsd (abfd, OBJ_S_C_GSD) != 0)
    600             return false;
     622            return FALSE;
    601623          if (_bfd_vms_write_tir (abfd, OBJ_S_C_TIR) != 0)
    602             return false;
     624            return FALSE;
    603625          if (_bfd_vms_write_tbt (abfd, OBJ_S_C_TBT) != 0)
    604             return false;
     626            return FALSE;
    605627          if (_bfd_vms_write_dbg (abfd, OBJ_S_C_DBG) != 0)
    606             return false;
     628            return FALSE;
    607629          if (abfd->section_count > 255)
    608630            {
    609631              if (_bfd_vms_write_eom (abfd, OBJ_S_C_EOMW) != 0)
    610                 return false;
     632                return FALSE;
    611633            }
    612634          else
    613635            {
    614636              if (_bfd_vms_write_eom (abfd, OBJ_S_C_EOM) != 0)
    615                 return false;
     637                return FALSE;
    616638            }
    617639        }
    … …  
    619641        {
    620642          if (_bfd_vms_write_hdr (abfd, EOBJ_S_C_EMH) != 0)
    621             return false;
     643            return FALSE;
    622644          if (_bfd_vms_write_gsd (abfd, EOBJ_S_C_EGSD) != 0)
    623             return false;
     645            return FALSE;
    624646          if (_bfd_vms_write_tir (abfd, EOBJ_S_C_ETIR) != 0)
    625             return false;
     647            return FALSE;
    626648          if (_bfd_vms_write_tbt (abfd, EOBJ_S_C_ETBT) != 0)
    627             return false;
     649            return FALSE;
    628650          if (_bfd_vms_write_dbg (abfd, EOBJ_S_C_EDBG) != 0)
    629             return false;
     651            return FALSE;
    630652          if (_bfd_vms_write_eom (abfd, EOBJ_S_C_EEOM) != 0)
    631             return false;
     653            return FALSE;
    632654        }
    633655    }
    634   return true;
     656  return TRUE;
    635657}
    636658
    … …  
    639661/* Called when the BFD is being closed to do any necessary cleanup.  */
    640662
    641 static boolean
     663static bfd_boolean
    642664vms_close_and_cleanup (abfd)
    643665     bfd *abfd;
    644666{
    645   asection *sec;
    646   vms_section *es, *es1;
    647   int i;
    648 
    649667#if VMS_DEBUG
    650668  vms_debug (1, "vms_close_and_cleanup(%p)\n", abfd);
    651669#endif
    652670  if (abfd == 0)
    653     return true;
     671    return TRUE;
    654672
    655673  if (PRIV (vms_buf) != NULL)
    656     {
    657       free (PRIV (vms_buf));
    658       PRIV (vms_buf) = NULL;
    659     }
    660   PRIV (buf_size) = 0;
    661 
    662   if (PRIV (output_buf) != 0)
    663     {
    664       free (PRIV (output_buf));
    665       PRIV (output_buf) = 0;
    666     }
    667 
    668   sec = abfd->sections;
    669   while (sec != NULL)
    670     {
    671       if (sec->contents)
    672         free (sec->contents);
    673       sec = sec->next;
    674     }
     674    free (PRIV (vms_buf));
    675675
    676676  if (PRIV (sections) != NULL)
    677     {
    678       free (PRIV (sections));
    679       PRIV (sections) = NULL;
    680     }
     677    free (PRIV (sections));
    681678
    682679  if (PRIV (vms_symbol_table))
    683     {
    684       bfd_hash_table_free (PRIV (vms_symbol_table));
    685       PRIV (vms_symbol_table) = 0;
    686     }
    687 
    688   if (PRIV (stack))
    689     {
    690       free (PRIV (stack));
    691       PRIV (stack) = 0;
    692     }
    693 
    694   if (PRIV (location_stack))
    695     {
    696       free (PRIV (location_stack));
    697       PRIV (location_stack) = 0;
    698     }
    699 
    700   for (i = 0; i < VMS_SECTION_COUNT; i++)
    701     {
    702       es = PRIV (vms_section_table)[i];
    703       while (es != NULL)
    704         {
    705           es1 = es->next;
    706           free (es);
    707           es = es1;
    708         }
    709       PRIV (vms_section_table)[i] = NULL;
    710    }
    711 
    712   free (abfd->tdata.any);
     680    bfd_hash_table_free (PRIV (vms_symbol_table));
     681
     682  bfd_release (abfd, abfd->tdata.any);
    713683  abfd->tdata.any = NULL;
    714684
    715   return true;
     685  return TRUE;
    716686}
    717687
    718688/* Ask the BFD to free all cached information.  */
    719 static boolean
     689static bfd_boolean
    720690vms_bfd_free_cached_info (abfd)
    721691     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    724694  vms_debug (1, "vms_bfd_free_cached_info(%p)\n", abfd);
    725695#endif
    726   return true;
     696  return TRUE;
    727697}
    728698
    729699/* Called when a new section is created.  */
    730700
    731 static boolean
     701static bfd_boolean
    732702vms_new_section_hook (abfd, section)
    733703     bfd *abfd;
    734704     asection *section;
    735705{
    736 #if VMS_DEBUG
    737   vms_debug (1, "vms_new_section_hook (%p, [%d]%s), count %d\n", abfd, section->index, section->name, abfd->section_count);
    738 #endif
    739   bfd_set_section_alignment(abfd, section, 4);
    740 
    741   if (abfd->section_count > PRIV (section_count))
     706  /* Count hasn't been incremented yet.  */
     707  unsigned int section_count = abfd->section_count + 1;
     708
     709#if VMS_DEBUG
     710  vms_debug (1, "vms_new_section_hook (%p, [%d]%s), count %d\n",
     711             abfd, section->index, section->name, section_count);
     712#endif
     713  bfd_set_section_alignment (abfd, section, 4);
     714
     715  if (section_count > PRIV (section_count))
    742716    {
    743       PRIV (sections) = ((asection **)
    744                             bfd_realloc (PRIV (sections), abfd->section_count * sizeof (asection *)));
     717      bfd_size_type amt = section_count;
     718      amt *= sizeof (asection *);
     719      PRIV (sections) = (asection **) bfd_realloc (PRIV (sections), amt);
    745720      if (PRIV (sections) == 0)
    746         return false;
    747       PRIV (section_count) = abfd->section_count;
     721        return FALSE;
     722      PRIV (section_count) = section_count;
    748723    }
    749724#if VMS_DEBUG
    … …  
    755730#endif
    756731
    757   return true;
     732  return TRUE;
    758733}
    759734
    … …  
    762737   section data (starting at offset into section)  */
    763738
    764 static boolean
     739static bfd_boolean
    765740vms_get_section_contents (abfd, section, buf, offset, buf_size)
    766741     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    777752  /* shouldn't be called, since all sections are IN_MEMORY  */
    778753
    779   return false;
     754  return FALSE;
    780755}
    781756
    … …  
    784759   section data (starting at offset into section)  */
    785760
    786 static boolean
     761static bfd_boolean
    787762vms_get_section_contents_in_window (abfd, section, w, offset, count)
    788763     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    799774  /* shouldn't be called, since all sections are IN_MEMORY  */
    800775
    801   return false;
     776  return FALSE;
    802777}
    803778
    … …  
    807782   to another.  */
    808783
    809 static boolean
     784static bfd_boolean
    810785vms_bfd_copy_private_bfd_data (src, dest)
    811786     bfd *src ATTRIBUTE_UNUSED;
    … …  
    815790  vms_debug (1, "vms_bfd_copy_private_bfd_data(%p, %p)\n", src, dest);
    816791#endif
    817   return true;
     792  return TRUE;
    818793}
    819794
    820795/* Merge private BFD information from the BFD @var{ibfd} to the
    821    the output file BFD @var{obfd} when linking.  Return <<true>>
    822    on success, <<false>> on error.  Possible error returns are:
     796   the output file BFD @var{obfd} when linking.  Return <<TRUE>>
     797   on success, <<FALSE>> on error.  Possible error returns are:
    823798
    824799   o <<bfd_error_no_memory>> -
    825800     Not enough memory exists to create private data for @var{obfd}.  */
    826801
    827 static boolean
     802static bfd_boolean
    828803vms_bfd_merge_private_bfd_data (ibfd, obfd)
    829804     bfd *ibfd ATTRIBUTE_UNUSED;
    … …  
    833808  vms_debug (1,"vms_bfd_merge_private_bfd_data(%p, %p)\n", ibfd, obfd);
    834809#endif
    835   return true;
     810  return TRUE;
    836811}
    837812
    838813/* Set private BFD flag information in the BFD @var{abfd}.
    839    Return <<true>> on success, <<false>> on error.  Possible error
     814   Return <<TRUE>> on success, <<FALSE>> on error.  Possible error
    840815   returns are:
    841816
    … …  
    843818     Not enough memory exists to create private data for @var{obfd}.  */
    844819
    845 static boolean
     820static bfd_boolean
    846821vms_bfd_set_private_flags (abfd, flags)
    847822     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    851826  vms_debug (1,"vms_bfd_set_private_flags(%p, %lx)\n", abfd, (long)flags);
    852827#endif
    853   return true;
     828  return TRUE;
    854829}
    855830
    … …  
    857832   to another.  */
    858833
    859 static boolean
     834static bfd_boolean
    860835vms_bfd_copy_private_section_data (srcbfd, srcsec, dstbfd, dstsec)
    861836     bfd *srcbfd ATTRIBUTE_UNUSED;
    … …  
    868843                 srcbfd, srcsec->name, dstbfd, dstsec->name);
    869844#endif
    870   return true;
     845  return TRUE;
    871846}
    872847
    … …  
    874849   to another.  */
    875850
    876 static boolean
     851static bfd_boolean
    877852vms_bfd_copy_private_symbol_data (ibfd, isym, obfd, osym)
    878853     bfd *ibfd ATTRIBUTE_UNUSED;
    … …  
    885860                 ibfd, isym->name, obfd, osym->name);
    886861#endif
    887   return true;
     862  return TRUE;
    888863}
    889864
    … …  
    916891}
    917892
    918 /* Return true if the core file attached to core_bfd was generated
    919    by a run of the executable file attached to exec_bfd, false otherwise.  */
    920 
    921 static boolean
     893/* Return TRUE if the core file attached to core_bfd was generated
     894   by a run of the executable file attached to exec_bfd, FALSE otherwise.  */
     895
     896static bfd_boolean
    922897vms_core_file_matches_executable_p (abfd, bbfd)
    923898     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    927902  vms_debug (1, "vms_core_file_matches_executable_p(%p, %p)\n", abfd, bbfd);
    928903#endif
    929   return false;
     904  return FALSE;
    930905}
    931906
    … …  
    933908
    934909/* ???  do something with an archive map.
    935    Return false on error, true otherwise.  */
    936 
    937 static boolean
     910   Return FALSE on error, TRUE otherwise.  */
     911
     912static bfd_boolean
    938913vms_slurp_armap (abfd)
    939914     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    942917  vms_debug (1, "vms_slurp_armap(%p)\n", abfd);
    943918#endif
    944   return false;
     919  return FALSE;
    945920}
    946921
    947922/* ???  do something with an extended name table.
    948    Return false on error, true otherwise.  */
    949 
    950 static boolean
     923   Return FALSE on error, TRUE otherwise.  */
     924
     925static bfd_boolean
    951926vms_slurp_extended_name_table (abfd)
    952927     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    955930  vms_debug (1, "vms_slurp_extended_name_table(%p)\n", abfd);
    956931#endif
    957   return false;
     932  return FALSE;
    958933}
    959934
    960935/* ???  do something with an extended name table.
    961    Return false on error, true otherwise.  */
    962 
    963 static boolean
     936   Return FALSE on error, TRUE otherwise.  */
     937
     938static bfd_boolean
    964939vms_construct_extended_name_table (abfd, tabloc, tablen, name)
    965940     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    971946  vms_debug (1, "vms_construct_extended_name_table(%p)\n", abfd);
    972947#endif
    973   return false;
     948  return FALSE;
    974949}
    975950
    … …  
    979954vms_truncate_arname (abfd, pathname, arhdr)
    980955     bfd *abfd ATTRIBUTE_UNUSED;
    981      CONST char *pathname ATTRIBUTE_UNUSED;
     956     const char *pathname ATTRIBUTE_UNUSED;
    982957     char *arhdr ATTRIBUTE_UNUSED;
    983958{
    … …  
    990965/* ???  write archive map  */
    991966
    992 static boolean
     967static bfd_boolean
    993968vms_write_armap (arch, elength, map, orl_count, stridx)
    994969     bfd *arch ATTRIBUTE_UNUSED;
    … …  
    1002977        arch, elength, map, orl_count, stridx);
    1003978#endif
    1004   return true;
     979  return TRUE;
    1005980}
    1006981
    … …  
    10521027
    10531028static int
    1054 vms_generic_stat_arch_elt (abfd, stat)
     1029vms_generic_stat_arch_elt (abfd, st)
    10551030     bfd *abfd;
    1056      struct stat *stat;
    1057 {
    1058 #if VMS_DEBUG
    1059   vms_debug (1, "vms_generic_stat_arch_elt(%p, %p)\n", abfd, stat);
    1060 #endif
    1061   return bfd_generic_stat_arch_elt(abfd, stat);
     1031     struct stat *st;
     1032{
     1033#if VMS_DEBUG
     1034  vms_debug (1, "vms_generic_stat_arch_elt(%p, %p)\n", abfd, st);
     1035#endif
     1036  return bfd_generic_stat_arch_elt (abfd, st);
    10621037}
    10631038
    10641039/* This is a new function in bfd 2.5  */
    10651040
    1066 static boolean
     1041static bfd_boolean
    10671042vms_update_armap_timestamp (abfd)
    10681043     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    10711046  vms_debug (1, "vms_update_armap_timestamp(%p)\n", abfd);
    10721047#endif
    1073   return true;
     1048  return TRUE;
    10741049}
    10751050
    … …  
    10961071   init counter to 0 if entry == 0  */
    10971072
    1098 static boolean
     1073static bfd_boolean
    10991074copy_symbols (entry, arg)
    11001075     struct bfd_hash_entry *entry;
    … …  
    11081083    PRIV (symcache)[PRIV (symnum)++] = ((vms_symbol_entry *)entry)->symbol;
    11091084
    1110   return true;
     1085  return TRUE;
    11111086}
    11121087
    … …  
    11381113}
    11391114
    1140 /* Create a new asymbol structure for the BFD abfd and return a pointer
    1141    to it.
    1142    This routine is necessary because each back end has private information
    1143    surrounding the asymbol. Building your own asymbol and pointing to it
    1144    will not create the private information, and will cause problems later on.  */
    1145 
    1146 asymbol *
    1147 _bfd_vms_make_empty_symbol (abfd)
    1148      bfd *abfd;
    1149 {
    1150   asymbol *symbol = (asymbol *)bfd_zalloc(abfd, sizeof (asymbol));
    1151 
    1152 #if VMS_DEBUG
    1153   vms_debug (1, "_bfd_vms_make_empty_symbol(%p)\n", abfd);
    1154 #endif
    1155 
    1156   if (symbol == 0)
    1157     {
    1158       bfd_set_error (bfd_error_no_memory);
    1159       return 0;
    1160     }
    1161   symbol->the_bfd = abfd;
    1162 
    1163   return symbol;
    1164 }
    1165 
    11661115/* Print symbol to file according to how. how is one of
    11671116   bfd_print_symbol_name        just print the name
    … …  
    11711120static void
    11721121vms_print_symbol (abfd, file, symbol, how)
    1173      bfd *abfd ATTRIBUTE_UNUSED;
     1122     bfd *abfd;
    11741123     PTR file;
    11751124     asymbol *symbol;
    … …  
    11891138      case bfd_print_symbol_all:
    11901139        {
    1191           CONST char *section_name = symbol->section->name;
    1192 
    1193           bfd_print_symbol_vandf((PTR)file,symbol);
     1140          const char *section_name = symbol->section->name;
     1141
     1142          bfd_print_symbol_vandf (abfd, (PTR)file, symbol);
    11941143
    11951144          fprintf ((FILE *)file," %-8s %s", section_name, symbol->name);
    … …  
    12571206}
    12581207
    1259 /* Return true if the given symbol sym in the BFD abfd is
    1260    a compiler generated local label, else return false.  */
    1261 
    1262 static boolean
     1208/* Return TRUE if the given symbol sym in the BFD abfd is
     1209   a compiler generated local label, else return FALSE.  */
     1210
     1211static bfd_boolean
    12631212vms_bfd_is_local_label_name (abfd, name)
    12641213     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    12881237   location.  */
    12891238
    1290 static boolean
     1239static bfd_boolean
    12911240vms_find_nearest_line (abfd, section, symbols, offset, file, func, line)
    12921241     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    12941243     asymbol **symbols ATTRIBUTE_UNUSED;
    12951244     bfd_vma offset ATTRIBUTE_UNUSED;
    1296      CONST char **file ATTRIBUTE_UNUSED;
    1297      CONST char **func ATTRIBUTE_UNUSED;
     1245     const char **file ATTRIBUTE_UNUSED;
     1246     const char **func ATTRIBUTE_UNUSED;
    12981247     unsigned int *line ATTRIBUTE_UNUSED;
    12991248{
    … …  
    13021251              abfd, section->name, symbols, (long int)offset);
    13031252#endif
    1304   return false;
     1253  return FALSE;
    13051254}
    13061255
    … …  
    13281277vms_read_minisymbols (abfd, dynamic, minisymsp, sizep)
    13291278     bfd *abfd;
    1330      boolean dynamic;
     1279     bfd_boolean dynamic;
    13311280     PTR *minisymsp;
    13321281     unsigned int *sizep;
    … …  
    13451294vms_minisymbol_to_symbol (abfd, dynamic, minisym, sym)
    13461295     bfd *abfd;
    1347      boolean dynamic;
     1296     bfd_boolean dynamic;
    13481297     const PTR minisym;
    13491298     asymbol *sym;
    … …  
    13881337  vms_debug (1, "vms_canonicalize_reloc(%p, %s, <ret>, <ret>)\n", abfd, section->name);
    13891338#endif
    1390   return false;
     1339  return FALSE;
    13911340}
    13921341
    … …  
    14311380         0,                     /* size (0 = byte, 1 = short, 2 = long) */
    14321381         8,                     /* bitsize */
    1433          true,                  /* pc_relative */
     1382         TRUE,                  /* pc_relative */
    14341383         0,                     /* bitpos */
    14351384         complain_overflow_dont, /* complain_on_overflow */
    14361385         reloc_nil,             /* special_function */
    14371386         "IGNORE",              /* name */
    1438          true,                  /* partial_inplace */
     1387         TRUE,                  /* partial_inplace */
    14391388         0,                     /* src_mask */
    14401389         0,                     /* dst_mask */
    1441          true),                 /* pcrel_offset */
     1390         TRUE),                 /* pcrel_offset */
    14421391
    14431392  /* A 64 bit reference to a symbol.  */
    … …  
    14461395         4,                     /* size (0 = byte, 1 = short, 2 = long) */
    14471396         64,                    /* bitsize */
    1448          false,                 /* pc_relative */
     1397         FALSE,                 /* pc_relative */
    14491398         0,                     /* bitpos */
    14501399         complain_overflow_bitfield, /* complain_on_overflow */
    14511400         reloc_nil,             /* special_function */
    14521401         "REFQUAD",             /* name */
    1453          true,                  /* partial_inplace */
     1402         TRUE,                  /* partial_inplace */
    14541403         MINUS_ONE,             /* src_mask */
    14551404         MINUS_ONE,             /* dst_mask */
    1456          false),                /* pcrel_offset */
     1405         FALSE),                /* pcrel_offset */
    14571406
    14581407  /* A 21 bit branch.  The native assembler generates these for
    … …  
    14631412         2,                     /* size (0 = byte, 1 = short, 2 = long) */
    14641413         21,                    /* bitsize */
    1465          true,                  /* pc_relative */
     1414         TRUE,                  /* pc_relative */
    14661415         0,                     /* bitpos */
    14671416         complain_overflow_signed, /* complain_on_overflow */
    14681417         reloc_nil,             /* special_function */
    14691418         "BRADDR",              /* name */
    1470          true,                  /* partial_inplace */
     1419         TRUE,                  /* partial_inplace */
    14711420         0x1fffff,              /* src_mask */
    14721421         0x1fffff,              /* dst_mask */
    1473          false),                /* pcrel_offset */
     1422         FALSE),                /* pcrel_offset */
    14741423
    14751424  /* A hint for a jump to a register.  */
    … …  
    14781427         1,                     /* size (0 = byte, 1 = short, 2 = long) */
    14791428         14,                    /* bitsize */
    1480          true,                  /* pc_relative */
     1429         TRUE,                  /* pc_relative */
    14811430         0,                     /* bitpos */
    14821431         complain_overflow_dont, /* complain_on_overflow */
    14831432         reloc_nil,             /* special_function */
    14841433         "HINT",                /* name */
    1485          true,                  /* partial_inplace */
     1434         TRUE,                  /* partial_inplace */
    14861435         0x3fff,                /* src_mask */
    14871436         0x3fff,                /* dst_mask */
    1488          false),                /* pcrel_offset */
     1437         FALSE),                /* pcrel_offset */
    14891438
    14901439  /* 16 bit PC relative offset.  */
    … …  
    14931442         1,                     /* size (0 = byte, 1 = short, 2 = long) */
    14941443         16,                    /* bitsize */
    1495          true,                  /* pc_relative */
     1444         TRUE,                  /* pc_relative */
    14961445         0,                     /* bitpos */
    14971446         complain_overflow_signed, /* complain_on_overflow */
    14981447         reloc_nil,             /* special_function */
    14991448         "SREL16",              /* name */
    1500          true,                  /* partial_inplace */
     1449         TRUE,                  /* partial_inplace */
    15011450         0xffff,                /* src_mask */
    15021451         0xffff,                /* dst_mask */
    1503          false),                /* pcrel_offset */
     1452         FALSE),                /* pcrel_offset */
    15041453
    15051454  /* 32 bit PC relative offset.  */
    … …  
    15081457         2,                     /* size (0 = byte, 1 = short, 2 = long) */
    15091458         32,                    /* bitsize */
    1510          true,                  /* pc_relative */
     1459         TRUE,                  /* pc_relative */
    15111460         0,                     /* bitpos */
    15121461         complain_overflow_signed, /* complain_on_overflow */
    15131462         reloc_nil,             /* special_function */
    15141463         "SREL32",              /* name */
    1515          true,                  /* partial_inplace */
     1464         TRUE,                  /* partial_inplace */
    15161465         0xffffffff,            /* src_mask */
    15171466         0xffffffff,            /* dst_mask */
    1518          false),                /* pcrel_offset */
     1467         FALSE),                /* pcrel_offset */
    15191468
    15201469  /* A 64 bit PC relative offset.  */
    … …  
    15231472         4,                     /* size (0 = byte, 1 = short, 2 = long) */
    15241473         64,                    /* bitsize */
    1525          true,                  /* pc_relative */
     1474         TRUE,                  /* pc_relative */
    15261475         0,                     /* bitpos */
    15271476         complain_overflow_signed, /* complain_on_overflow */
    15281477         reloc_nil,             /* special_function */
    15291478         "SREL64",              /* name */
    1530          true,                  /* partial_inplace */
     1479         TRUE,                  /* partial_inplace */
    15311480         MINUS_ONE,             /* src_mask */
    15321481         MINUS_ONE,             /* dst_mask */
    1533          false),                /* pcrel_offset */
     1482         FALSE),                /* pcrel_offset */
    15341483
    15351484  /* Push a value on the reloc evaluation stack.  */
    … …  
    15381487         0,                     /* size (0 = byte, 1 = short, 2 = long) */
    15391488         0,                     /* bitsize */
    1540          false,                 /* pc_relative */
     1489         FALSE,                 /* pc_relative */
    15411490         0,                     /* bitpos */
    15421491         complain_overflow_dont, /* complain_on_overflow */
    15431492         reloc_nil,             /* special_function */
    15441493         "OP_PUSH",             /* name */
    1545          false,                 /* partial_inplace */
     1494         FALSE,                 /* partial_inplace */
    15461495         0,                     /* src_mask */
    15471496         0,                     /* dst_mask */
    1548          false),                /* pcrel_offset */
     1497         FALSE),                /* pcrel_offset */
    15491498
    15501499  /* Store the value from the stack at the given address.  Store it in
    … …  
    15541503         4,                     /* size (0 = byte, 1 = short, 2 = long) */
    15551504         64,                    /* bitsize */
    1556          false,                 /* pc_relative */
     1505         FALSE,                 /* pc_relative */
    15571506         0,                     /* bitpos */
    15581507         complain_overflow_dont, /* complain_on_overflow */
    15591508         reloc_nil,             /* special_function */
    15601509         "OP_STORE",            /* name */
    1561          false,                 /* partial_inplace */
     1510         FALSE,                 /* partial_inplace */
    15621511         0,                     /* src_mask */
    15631512         MINUS_ONE,             /* dst_mask */
    1564          false),                /* pcrel_offset */
     1513         FALSE),                /* pcrel_offset */
    15651514
    15661515  /* Subtract the reloc address from the value on the top of the
    … …  
    15701519         0,                     /* size (0 = byte, 1 = short, 2 = long) */
    15711520         0,                     /* bitsize */
    1572          false,                 /* pc_relative */
     1521         FALSE,                 /* pc_relative */
    15731522         0,                     /* bitpos */
    15741523         complain_overflow_dont, /* complain_on_overflow */
    15751524         reloc_nil,             /* special_function */
    15761525         "OP_PSUB",             /* name */
    1577          false,                 /* partial_inplace */
     1526         FALSE,                 /* partial_inplace */
    15781527         0,                     /* src_mask */
    15791528         0,                     /* dst_mask */
    1580          false),                /* pcrel_offset */
     1529         FALSE),                /* pcrel_offset */
    15811530
    15821531  /* Shift the value on the top of the relocation stack right by the
    … …  
    15861535         0,                     /* size (0 = byte, 1 = short, 2 = long) */
    15871536         0,                     /* bitsize */
    1588          false,                 /* pc_relative */
     1537         FALSE,                 /* pc_relative */
    15891538         0,                     /* bitpos */
    15901539         complain_overflow_dont, /* complain_on_overflow */
    15911540         reloc_nil,             /* special_function */
    15921541         "OP_PRSHIFT",          /* name */
    1593          false,                 /* partial_inplace */
     1542         FALSE,                 /* partial_inplace */
    15941543         0,                     /* src_mask */
    15951544         0,                     /* dst_mask */
    1596          false),                /* pcrel_offset */
     1545         FALSE),                /* pcrel_offset */
    15971546
    15981547  /* Hack. Linkage is done by linker.  */
    … …  
    16011550         8,                     /* size (0 = byte, 1 = short, 2 = long) */
    16021551         256,                   /* bitsize */
    1603          false,                 /* pc_relative */
     1552         FALSE,                 /* pc_relative */
    16041553         0,                     /* bitpos */
    16051554         complain_overflow_dont, /* complain_on_overflow */
    16061555         reloc_nil,             /* special_function */
    16071556         "LINKAGE",             /* name */
    1608          false,                 /* partial_inplace */
     1557         FALSE,                 /* partial_inplace */
    16091558         0,                     /* src_mask */
    16101559         0,                     /* dst_mask */
    1611          false),                /* pcrel_offset */
     1560         FALSE),                /* pcrel_offset */
    16121561
    16131562  /* A 32 bit reference to a symbol.  */
    … …  
    16161565         2,                     /* size (0 = byte, 1 = short, 2 = long) */
    16171566         32,                    /* bitsize */
    1618          false,                 /* pc_relative */
     1567         FALSE,                 /* pc_relative */
    16191568         0,                     /* bitpos */
    16201569         complain_overflow_bitfield, /* complain_on_overflow */
    16211570         reloc_nil,             /* special_function */
    16221571         "REFLONG",             /* name */
    1623          true,                  /* partial_inplace */
     1572         TRUE,                  /* partial_inplace */
    16241573         0xffffffff,            /* src_mask */
    16251574         0xffffffff,            /* dst_mask */
    1626          false),                /* pcrel_offset */
     1575         FALSE),                /* pcrel_offset */
    16271576
    16281577  /* A 64 bit reference to a procedure, written as 32 bit value.  */
    … …  
    16311580         4,                     /* size (0 = byte, 1 = short, 2 = long) */
    16321581         64,                    /* bitsize */
    1633          false,                 /* pc_relative */
     1582         FALSE,                 /* pc_relative */
    16341583         0,                     /* bitpos */
    16351584         complain_overflow_signed,/* complain_on_overflow */
    16361585         reloc_nil,             /* special_function */
    16371586         "CODEADDR",            /* name */
    1638          false,                 /* partial_inplace */
     1587         FALSE,                 /* partial_inplace */
    16391588         0xffffffff,            /* src_mask */
    16401589         0xffffffff,            /* dst_mask */
    1641          false),                /* pcrel_offset */
     1590         FALSE),                /* pcrel_offset */
    16421591
    16431592};
    … …  
    16861635   pointer.  */
    16871636
    1688 static boolean
     1637static bfd_boolean
    16891638vms_set_arch_mach (abfd, arch, mach)
    16901639     bfd *abfd;
    … …  
    16971646  abfd->arch_info = bfd_scan_arch("alpha");
    16981647
    1699   return true;
     1648  return TRUE;
    17001649}
    17011650
    … …  
    17041653   offset offset for count bytes.
    17051654
    1706    Normally true is returned, else false. Possible error returns are:
     1655   Normally TRUE is returned, else FALSE. Possible error returns are:
    17071656   o bfd_error_no_contents - The output section does not have the
    17081657        SEC_HAS_CONTENTS attribute, so nothing can be written to it.
    17091658   o and some more too  */
    17101659
    1711 static boolean
     1660static bfd_boolean
    17121661vms_set_section_contents (abfd, section, location, offset, count)
    17131662     bfd *abfd;
    … …  
    17321681vms_sizeof_headers (abfd, reloc)
    17331682     bfd *abfd ATTRIBUTE_UNUSED;
    1734      boolean reloc ATTRIBUTE_UNUSED;
     1683     bfd_boolean reloc ATTRIBUTE_UNUSED;
    17351684{
    17361685#if VMS_DEBUG
    … …  
    17501699     struct bfd_link_order *link_order ATTRIBUTE_UNUSED;
    17511700     bfd_byte *data ATTRIBUTE_UNUSED;
    1752      boolean relocateable ATTRIBUTE_UNUSED;
     1701     bfd_boolean relocateable ATTRIBUTE_UNUSED;
    17531702     asymbol **symbols ATTRIBUTE_UNUSED;
    17541703{
    … …  
    17621711/* ???  */
    17631712
    1764 static boolean
     1713static bfd_boolean
    17651714vms_bfd_relax_section (abfd, section, link_info, again)
    17661715     bfd *abfd ATTRIBUTE_UNUSED;
    17671716     asection *section ATTRIBUTE_UNUSED;
    17681717     struct bfd_link_info *link_info ATTRIBUTE_UNUSED;
    1769      boolean *again ATTRIBUTE_UNUSED;
     1718     bfd_boolean *again ATTRIBUTE_UNUSED;
    17701719{
    17711720#if VMS_DEBUG
    … …  
    17731722                                        abfd, section->name, link_info);
    17741723#endif
    1775   return true;
    1776 }
    1777 
    1778 static boolean
     1724  return TRUE;
     1725}
     1726
     1727static bfd_boolean
    17791728vms_bfd_gc_sections (abfd, link_info)
    17801729     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    17841733  vms_debug (1, "vms_bfd_gc_sections(%p, %p)\n", abfd, link_info);
    17851734#endif
    1786   return true;
     1735  return TRUE;
     1736}
     1737
     1738static bfd_boolean
     1739vms_bfd_merge_sections (abfd, link_info)
     1740     bfd *abfd ATTRIBUTE_UNUSED;
     1741     struct bfd_link_info *link_info ATTRIBUTE_UNUSED;
     1742{
     1743#if VMS_DEBUG
     1744  vms_debug (1, "vms_bfd_merge_sections(%p, %p)\n", abfd, link_info);
     1745#endif
     1746  return TRUE;
    17871747}
    17881748
    … …  
    18001760}
    18011761
     1762/* Free a linker hash table.  */
     1763
     1764static void
     1765vms_bfd_link_hash_table_free (hash)
     1766     struct bfd_link_hash_table *hash ATTRIBUTE_UNUSED;
     1767{
     1768#if VMS_DEBUG
     1769  vms_debug (1, "vms_bfd_link_hash_table_free(%p)\n", abfd);
     1770#endif
     1771}
     1772
    18021773/* Add symbols from this object file into the hash table.  */
    18031774
    1804 static boolean
     1775static bfd_boolean
    18051776vms_bfd_link_add_symbols (abfd, link_info)
    18061777     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    18101781  vms_debug (1, "vms_bfd_link_add_symbols(%p, %p)\n", abfd, link_info);
    18111782#endif
    1812   return false;
     1783  return FALSE;
    18131784}
    18141785
    … …  
    18161787   section of the BFD.  */
    18171788
    1818 static boolean
     1789static bfd_boolean
    18191790vms_bfd_final_link (abfd, link_info)
    18201791     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    18241795  vms_debug (1, "vms_bfd_final_link(%p, %p)\n", abfd, link_info);
    18251796#endif
    1826   return true;
     1797  return TRUE;
    18271798}
    18281799
    18291800/* Should this section be split up into smaller pieces during linking.  */
    18301801
    1831 static boolean
     1802static bfd_boolean
    18321803vms_bfd_link_split_section (abfd, section)
    18331804     bfd *abfd ATTRIBUTE_UNUSED;
    … …  
    18371808  vms_debug (1, "vms_bfd_link_split_section(%p, %s)\n", abfd, section->name);
    18381809#endif
    1839   return false;
     1810  return FALSE;
    18401811}
    18411812
    … …  
    18541825}
    18551826
    1856 static boolean
     1827static bfd_boolean
    18571828vms_bfd_print_private_bfd_data (abfd, file)
    18581829    bfd *abfd ATTRIBUTE_UNUSED;
Note: See TracChangeset for help on using the changeset viewer.