01e1a5bc12
EF_IA_64_ARCHVER_1): New macros. Minor reformatting. * bfd/Makefile.am (BFD32_BACKENDS): Add new object vmsutil.lo (BFD32_BACKENDS_CFILES): Add new file vmsutil.c (vmsutil.lo): Add dependency rule * bfd/Makefile.in: Regenerate * bfd/config.bfd (ia64*-*-*vms*): Add case. * bfd/configure.in (bfd_elf64_ia64_vms_vec): Add case. * bfd/configure: Regenerate * bfd/vmsutil.[ch]: New files * bfd/elf-bfd.h (struct bfd_elf_special_section): Change type of attr to bfd_vma. * bfd/elfxx-ia64.c (elfNN_vms_post_process_headers, elfNN_vms_section_processing, elfNN_vms_final_write_processing, elfNN_vms_close_and_cleanup, elfNN_vms_section_from_shdr, elfNN_vms_object_p): New functions * bfd/targets.c (bfd_elf64_ia64_vms_vec): New target. * gas/configure.tgt(ia64-*-*vms*): New target. * gas/dwarf2dbg.h (dwarf2_loc_mark_labels): Make extern. * gas/tc.h (md_number_to_chars): Declare iff undefined. * gas/config/obj-elf.c (obj_elf_change_section): Change type of arg attr to bfd_vma. (obj_elf_parse_section_letters): Return a bfd_vma. Change type of variables attr, md_attr to bfd_vma. (obj_elf_section_word): Likewise. (obj_elf_section): Change type of variable attr to bfd_vma * gas/config/obj-elf.h (obj_elf_change_section): Change type of arg attr to bfd_vma * gas/config/tc-ia64.c (bfdver.h,time.h): Include. (ia64_elf_section_letter): Now returns a bfd_vma. Handle VMS specific attributes. (ia64_elf_section_flags): Arg attr now a bfd_vma. (ia64_init): Don't turn on dependency checking for VMS. (ia64_target_format): Check for VMS flag bit. (do_alias): Hande decc$ functions. (get_vms_time): New function. (ia64_vms_note): New function. * gas/config/tc-ia64.h (ia64_elf_section_letter): Now returns a bfd_vma. (ia64_elf_section_flags): Arg attr now a bfd_vma. (tc_init_after_args): Define for VMS. * gas/config/tc-alpha.c (alpha_elf_section_letter): Return a bfd_vma. (alpha_elf_section_flags): Change type of arg attr to bfd_vma. * gas/config/tc-alpha.h: Likewise. * gas/config/tc-i386.c (x86_64_section_letter): Return a bfd_vma. (x86_64_section_word): Return a bfd_vma. * gas/config/tc-i386.h: Likewise. * gas/config/tc-ip2k.c (ip2k_elf_section_flags): Change type of arg attr to bfd_vma. * gas/config/tc-ip2k.h: Likewise. * gas/config/tc-mep.c (mep_elf_section_letter): Return a bfd_vma. (mep_elf_section_flags): Change type of arg attr to bfd_vma. * gas/config/tc-mep.h: Likewise. * gas/config/tc-ppc.c (ppc_section_letter): Return a bfd_vma. (ppc_section_word): Return a bfd_vma. (ppc_section_flags): Change type of arg attr to bfd_vma. * gas/config/tc-ppc.h: Likewise. * gas/config/te-vms.h (DWARF2_DIR_SHOULD_END_WITH_SEPARATOR, DWAR2_FILE_TIME_NAME, DWARF2_FILE_SIZE_NAME, DWARF2_FILEN_NAME): New file with new macros * gas/dwarf2dbg.c (get_filenum, out_file_list): Default and call new macros.
43 lines
2.2 KiB
C
43 lines
2.2 KiB
C
#define TE_VMS
|
|
#include "obj-format.h"
|
|
|
|
extern int vms_file_stats_name (const char *, long long *, long *, char *, int *);
|
|
|
|
/* VMS debugger expects a separator. */
|
|
#define DWARF2_DIR_SHOULD_END_WITH_SEPARATOR 1
|
|
|
|
/* VMS debugger needs the file timestamp. */
|
|
#define DWARF2_FILE_TIME_NAME(FILENAME,DIRNAME) \
|
|
({ \
|
|
long long cdt; \
|
|
char *filename = (char *) alloca (strlen (FILENAME) + strlen (DIRNAME) + 1);\
|
|
strcpy (filename, DIRNAME); \
|
|
strcat (filename, FILENAME); \
|
|
((vms_file_stats_name (filename, &cdt, 0, 0, 0) == 0) ? cdt : 0); \
|
|
})
|
|
|
|
/* VMS debugger needs the file size. */
|
|
#define DWARF2_FILE_SIZE_NAME(FILENAME,DIRNAME) \
|
|
({ \
|
|
long siz; \
|
|
char *filename = (char *) alloca (strlen (FILENAME) + strlen (DIRNAME) + 1);\
|
|
strcpy (filename, DIRNAME); \
|
|
strcat (filename, FILENAME); \
|
|
((vms_file_stats_name (filename, 0, &siz, 0, 0) == 0) ? siz : 0); \
|
|
})
|
|
|
|
/* VMS debugger needs the filename with version appended. */
|
|
/* Longest filename on VMS is 255 characters. Largest version is 32768. */
|
|
#define DWARF2_FILE_NAME(FILENAME,DIRNAME) \
|
|
({ \
|
|
int ver; \
|
|
char buff [255 + 7]; \
|
|
char *filename = (char *) alloca (strlen (FILENAME) + strlen (DIRNAME) + 1);\
|
|
strcpy (filename, DIRNAME); \
|
|
strcat (filename, FILENAME); \
|
|
vms_file_stats_name (filename, 0, 0, 0, &ver); \
|
|
snprintf (buff, 255 + 7, "%s;%d", FILENAME, ver); \
|
|
buff; \
|
|
})
|
|
|