| 1 | /* This file is tc-alpha.h | 
|---|
| 2 | Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002 | 
|---|
| 3 | Free Software Foundation, Inc. | 
|---|
| 4 | Written by Ken Raeburn <raeburn@cygnus.com>. | 
|---|
| 5 |  | 
|---|
| 6 | This file is part of GAS, the GNU Assembler. | 
|---|
| 7 |  | 
|---|
| 8 | GAS is free software; you can redistribute it and/or modify | 
|---|
| 9 | it under the terms of the GNU General Public License as published by | 
|---|
| 10 | the Free Software Foundation; either version 2, or (at your option) | 
|---|
| 11 | any later version. | 
|---|
| 12 |  | 
|---|
| 13 | GAS is distributed in the hope that it will be useful, | 
|---|
| 14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|---|
| 15 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
|---|
| 16 | GNU General Public License for more details. | 
|---|
| 17 |  | 
|---|
| 18 | You should have received a copy of the GNU General Public License | 
|---|
| 19 | along with GAS; see the file COPYING.  If not, write to the Free | 
|---|
| 20 | Software Foundation, 59 Temple Place - Suite 330, Boston, MA | 
|---|
| 21 | 02111-1307, USA.  */ | 
|---|
| 22 |  | 
|---|
| 23 | #define TC_ALPHA | 
|---|
| 24 |  | 
|---|
| 25 | #define TARGET_BYTES_BIG_ENDIAN 0 | 
|---|
| 26 |  | 
|---|
| 27 | #define WORKING_DOT_WORD | 
|---|
| 28 |  | 
|---|
| 29 | #define TARGET_ARCH                     bfd_arch_alpha | 
|---|
| 30 |  | 
|---|
| 31 | #ifdef TE_FreeBSD | 
|---|
| 32 | #define ELF_TARGET_FORMAT       "elf64-alpha-freebsd" | 
|---|
| 33 | #endif | 
|---|
| 34 | #ifndef ELF_TARGET_FORMAT | 
|---|
| 35 | #define ELF_TARGET_FORMAT       "elf64-alpha" | 
|---|
| 36 | #endif | 
|---|
| 37 |  | 
|---|
| 38 | #define TARGET_FORMAT (OUTPUT_FLAVOR == bfd_target_ecoff_flavour        \ | 
|---|
| 39 | ? "ecoff-littlealpha"                            \ | 
|---|
| 40 | : OUTPUT_FLAVOR == bfd_target_elf_flavour        \ | 
|---|
| 41 | ? ELF_TARGET_FORMAT                              \ | 
|---|
| 42 | : OUTPUT_FLAVOR == bfd_target_evax_flavour       \ | 
|---|
| 43 | ? "vms-alpha"                                    \ | 
|---|
| 44 | : "unknown-format") | 
|---|
| 45 |  | 
|---|
| 46 | #define NEED_LITERAL_POOL | 
|---|
| 47 | #define REPEAT_CONS_EXPRESSIONS | 
|---|
| 48 |  | 
|---|
| 49 | struct fix; | 
|---|
| 50 | struct alpha_reloc_tag; | 
|---|
| 51 |  | 
|---|
| 52 | extern int alpha_force_relocation PARAMS ((struct fix *)); | 
|---|
| 53 | extern int alpha_fix_adjustable PARAMS ((struct fix *)); | 
|---|
| 54 |  | 
|---|
| 55 | extern unsigned long alpha_gprmask, alpha_fprmask; | 
|---|
| 56 | extern valueT alpha_gp_value; | 
|---|
| 57 |  | 
|---|
| 58 | #define TC_FORCE_RELOCATION(FIX)        alpha_force_relocation (FIX) | 
|---|
| 59 | #define tc_fix_adjustable(FIX)          alpha_fix_adjustable (FIX) | 
|---|
| 60 | #define RELOC_REQUIRES_SYMBOL | 
|---|
| 61 |  | 
|---|
| 62 | /* Values passed to md_apply_fix3 don't include the symbol value.  */ | 
|---|
| 63 | #define MD_APPLY_SYM_VALUE(FIX) 0 | 
|---|
| 64 |  | 
|---|
| 65 | #define md_convert_frag(b,s,f)          as_fatal ("alpha convert_frag\n") | 
|---|
| 66 | #define md_estimate_size_before_relax(f,s) \ | 
|---|
| 67 | (as_fatal ("estimate_size_before_relax called"),1) | 
|---|
| 68 | #define md_operand(x) | 
|---|
| 69 |  | 
|---|
| 70 | #ifdef OBJ_EVAX | 
|---|
| 71 |  | 
|---|
| 72 | /* This field keeps the symbols position in the link section.  */ | 
|---|
| 73 | #define OBJ_SYMFIELD_TYPE valueT | 
|---|
| 74 |  | 
|---|
| 75 | #define TC_CONS_FIX_NEW(FRAG,OFF,LEN,EXP) \ | 
|---|
| 76 | fix_new_exp (FRAG, OFF, (int)LEN, EXP, 0, \ | 
|---|
| 77 | LEN == 2 ? BFD_RELOC_16 \ | 
|---|
| 78 | : LEN == 4 ? BFD_RELOC_32 \ | 
|---|
| 79 | : LEN == 8 ? BFD_RELOC_64 \ | 
|---|
| 80 | : BFD_RELOC_ALPHA_LINKAGE); | 
|---|
| 81 | #endif | 
|---|
| 82 |  | 
|---|
| 83 | #define md_number_to_chars              number_to_chars_littleendian | 
|---|
| 84 |  | 
|---|
| 85 | extern int tc_get_register PARAMS ((int frame)); | 
|---|
| 86 | extern void alpha_frob_ecoff_data PARAMS ((void)); | 
|---|
| 87 |  | 
|---|
| 88 | #define tc_frob_label(sym) alpha_define_label (sym) | 
|---|
| 89 | extern void alpha_define_label PARAMS ((symbolS *)); | 
|---|
| 90 |  | 
|---|
| 91 | #define md_cons_align(nbytes) alpha_cons_align (nbytes) | 
|---|
| 92 | extern void alpha_cons_align PARAMS ((int)); | 
|---|
| 93 |  | 
|---|
| 94 | #define HANDLE_ALIGN(fragp) alpha_handle_align (fragp) | 
|---|
| 95 | extern void alpha_handle_align PARAMS ((struct frag *)); | 
|---|
| 96 |  | 
|---|
| 97 | #define MAX_MEM_FOR_RS_ALIGN_CODE  (3 + 4 + 8) | 
|---|
| 98 |  | 
|---|
| 99 | #ifdef OBJ_ECOFF | 
|---|
| 100 | #define tc_frob_file_before_adjust() alpha_frob_file_before_adjust () | 
|---|
| 101 | extern void alpha_frob_file_before_adjust PARAMS ((void)); | 
|---|
| 102 | #endif | 
|---|
| 103 |  | 
|---|
| 104 | #define DIFF_EXPR_OK   /* foo-. gets turned into PC relative relocs */ | 
|---|
| 105 |  | 
|---|
| 106 | #ifdef OBJ_ELF | 
|---|
| 107 | #define ELF_TC_SPECIAL_SECTIONS \ | 
|---|
| 108 | { ".sdata",   SHT_PROGBITS,   SHF_ALLOC + SHF_WRITE + SHF_ALPHA_GPREL  }, \ | 
|---|
| 109 | { ".sbss",    SHT_NOBITS,     SHF_ALLOC + SHF_WRITE + SHF_ALPHA_GPREL  }, | 
|---|
| 110 |  | 
|---|
| 111 | #define md_elf_section_letter           alpha_elf_section_letter | 
|---|
| 112 | extern int alpha_elf_section_letter PARAMS ((int, char **)); | 
|---|
| 113 | #define md_elf_section_flags            alpha_elf_section_flags | 
|---|
| 114 | extern flagword alpha_elf_section_flags PARAMS ((flagword, int, int)); | 
|---|
| 115 | #endif | 
|---|
| 116 |  | 
|---|
| 117 | /* Whether to add support for explict !relocation_op!sequence_number.  At the | 
|---|
| 118 | moment, only do this for ELF, though ECOFF could use it as well.  */ | 
|---|
| 119 |  | 
|---|
| 120 | #ifdef OBJ_ELF | 
|---|
| 121 | #define RELOC_OP_P | 
|---|
| 122 | #endif | 
|---|
| 123 |  | 
|---|
| 124 | /* Before the relocations are written, reorder them, so that user | 
|---|
| 125 | supplied !lituse relocations follow the appropriate !literal | 
|---|
| 126 | relocations.  Also convert the gas-internal relocations to the | 
|---|
| 127 | appropriate linker relocations.  */ | 
|---|
| 128 | #define tc_frob_file_before_fix() alpha_before_fix () | 
|---|
| 129 | extern void alpha_before_fix PARAMS ((void)); | 
|---|
| 130 |  | 
|---|
| 131 | /* New fields for supporting explicit relocations (such as !literal to mark | 
|---|
| 132 | where a pointer is loaded from the global table, and !lituse_base to track | 
|---|
| 133 | all of the normal uses of that pointer).  */ | 
|---|
| 134 |  | 
|---|
| 135 | #define TC_FIX_TYPE struct alpha_fix_tag | 
|---|
| 136 |  | 
|---|
| 137 | struct alpha_fix_tag | 
|---|
| 138 | { | 
|---|
| 139 | struct fix *next_reloc;               /* next !lituse or !gpdisp */ | 
|---|
| 140 | struct alpha_reloc_tag *info;         /* other members with same sequence */ | 
|---|
| 141 | }; | 
|---|
| 142 |  | 
|---|
| 143 | /* Initialize the TC_FIX_TYPE field.  */ | 
|---|
| 144 | #define TC_INIT_FIX_DATA(FIX)                                           \ | 
|---|
| 145 | do {                                                                    \ | 
|---|
| 146 | FIX->tc_fix_data.next_reloc = (struct fix *) 0;                       \ | 
|---|
| 147 | FIX->tc_fix_data.info = (struct alpha_reloc_tag *) 0;                 \ | 
|---|
| 148 | } while (0) | 
|---|
| 149 |  | 
|---|
| 150 | /* Work with DEBUG5 to print fields in tc_fix_type.  */ | 
|---|
| 151 | #define TC_FIX_DATA_PRINT(STREAM, FIX)                                  \ | 
|---|
| 152 | do {                                                                    \ | 
|---|
| 153 | if (FIX->tc_fix_data.info)                                            \ | 
|---|
| 154 | fprintf (STREAM, "\tinfo = 0x%lx, next_reloc = 0x%lx\n", \ | 
|---|
| 155 | (long) FIX->tc_fix_data.info,                              \ | 
|---|
| 156 | (long) FIX->tc_fix_data.next_reloc);                       \ | 
|---|
| 157 | } while (0) | 
|---|
| 158 |  | 
|---|
| 159 | #define DWARF2_LINE_MIN_INSN_LENGTH 4 | 
|---|