gas/config/tc-alpha.h

   1 /* This file is tc-alpha.h
   2    Copyright (C) 1994-2024 Free Software Foundation, Inc.
   3    Written by Ken Raeburn <raeburn@cygnus.com>.
   4
   5    This file is part of GAS, the GNU Assembler.
   6
   7    GAS is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 3, or (at your option)
  10    any later version.
  11
  12    GAS is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with GAS; see the file COPYING.  If not, write to the Free
  19    Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
  20    02110-1301, USA.  */
  21
  22 #define TC_ALPHA
  23
  24 #define TARGET_BYTES_BIG_ENDIAN 0
  25
  26 #define WORKING_DOT_WORD
  27
  28 #define TARGET_ARCH                     bfd_arch_alpha
  29
  30 #ifdef TE_FreeBSD
  31 #define ELF_TARGET_FORMAT       "elf64-alpha-freebsd"
  32 #endif
  33 #ifndef ELF_TARGET_FORMAT
  34 #define ELF_TARGET_FORMAT       "elf64-alpha"
  35 #endif
  36
  37 #define TARGET_FORMAT (OUTPUT_FLAVOR == bfd_target_ecoff_flavour        \
  38                        ? "ecoff-littlealpha"                            \
  39                        : OUTPUT_FLAVOR == bfd_target_elf_flavour        \
  40                        ? ELF_TARGET_FORMAT                              \
  41                        : OUTPUT_FLAVOR == bfd_target_evax_flavour       \
  42                        ? "vms-alpha"                                    \
  43                        : "unknown-format")
  44
  45 #define NEED_LITERAL_POOL
  46 #define REPEAT_CONS_EXPRESSIONS
  47
  48 struct fix;
  49 struct alpha_reloc_tag;
  50
  51 extern int alpha_force_relocation (struct fix *);
  52 extern int alpha_fix_adjustable   (struct fix *);
  53
  54 extern unsigned long alpha_gprmask, alpha_fprmask;
  55 extern valueT alpha_gp_value;
  56
  57 #define TC_FORCE_RELOCATION(FIX)        alpha_force_relocation (FIX)
  58 #define tc_fix_adjustable(FIX)          alpha_fix_adjustable (FIX)
  59 #define RELOC_REQUIRES_SYMBOL
  60
  61 /* Values passed to md_apply_fix don't include the symbol value.  */
  62 #define MD_APPLY_SYM_VALUE(FIX) 0
  63
  64 #define md_convert_frag(b,s,f)          as_fatal ("alpha convert_frag\n")
  65 #define md_estimate_size_before_relax(f,s) \
  66                         (as_fatal ("estimate_size_before_relax called"),1)
  67 #define md_operand(x)
  68
  69 #ifdef OBJ_EVAX
  70 #define TC_VALIDATE_FIX_SUB(FIX, SEG) 1
  71
  72 #define tc_canonicalize_symbol_name evax_shorten_name
  73
  74 #define TC_CONS_FIX_NEW(FRAG,OFF,LEN,EXP,RELOC) \
  75       (void) RELOC,                             \
  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 #ifdef OBJ_EVAX
  84 #define TC_IMPLICIT_LCOMM_ALIGNMENT(SIZE, P2VAR) (P2VAR) = 3
  85 #else
  86 #define TC_IMPLICIT_LCOMM_ALIGNMENT(size, align) \
  87   do                                                    \
  88     {                                                   \
  89       align = 0;                                        \
  90       if (size > 1)                                     \
  91         {                                               \
  92           addressT temp = 1;                            \
  93           while ((size & temp) == 0)                    \
  94             ++align, temp <<= 1;                        \
  95         }                                               \
  96     }                                                   \
  97   while (0)
  98 #endif
  99
 100 #define md_number_to_chars              number_to_chars_littleendian
 101
 102 extern int tc_get_register (int);
 103 extern void alpha_frob_ecoff_data (void);
 104
 105 #define tc_frob_label(sym) alpha_define_label (sym)
 106 extern void alpha_define_label (symbolS *);
 107
 108 #define md_cons_align(nbytes) alpha_cons_align (nbytes)
 109 extern void alpha_cons_align (int);
 110
 111 #define HANDLE_ALIGN(fragp) alpha_handle_align (fragp)
 112 extern void alpha_handle_align (struct frag *);
 113
 114 #define MAX_MEM_FOR_RS_ALIGN_CODE  (3 + 4 + 8)
 115
 116 #ifdef OBJ_ECOFF
 117 #define tc_frob_file_before_adjust() alpha_frob_file_before_adjust ()
 118 extern void alpha_frob_file_before_adjust (void);
 119
 120 #define TC_VALIDATE_FIX_SUB(FIX, SEG) \
 121   ((md_register_arithmetic || (SEG) != reg_section)     \
 122    && ((FIX)->fx_r_type == BFD_RELOC_GPREL32            \
 123        || (FIX)->fx_r_type == BFD_RELOC_GPREL16))
 124 #endif
 125
 126 #define DIFF_EXPR_OK   /* foo-. gets turned into PC relative relocs.  */
 127
 128 #ifdef OBJ_ELF
 129 #define md_elf_section_letter           alpha_elf_section_letter
 130 extern bfd_vma alpha_elf_section_letter (int, const char **);
 131 #define md_elf_section_flags            alpha_elf_section_flags
 132 extern flagword alpha_elf_section_flags (flagword, bfd_vma, int);
 133 #endif
 134
 135 /* Whether to add support for explicit !relocation_op!sequence_number.  At the
 136    moment, only do this for ELF, though ECOFF could use it as well.  */
 137
 138 #ifdef OBJ_ELF
 139 #define RELOC_OP_P
 140 #endif
 141
 142 #ifndef OBJ_EVAX
 143 /* Before the relocations are written, reorder them, so that user
 144    supplied !lituse relocations follow the appropriate !literal
 145    relocations.  Also convert the gas-internal relocations to the
 146    appropriate linker relocations.  */
 147 #define tc_frob_file_before_fix() alpha_before_fix ()
 148 extern void alpha_before_fix (void);
 149 #endif
 150
 151 #ifdef OBJ_ELF
 152 #define md_finish  alpha_elf_md_finish
 153 extern void alpha_elf_md_finish (void);
 154 #endif
 155
 156 /* New fields for supporting explicit relocations (such as !literal to mark
 157    where a pointer is loaded from the global table, and !lituse_base to track
 158    all of the normal uses of that pointer).  */
 159
 160 #define TC_FIX_TYPE struct alpha_fix_tag
 161
 162 struct alpha_fix_tag
 163 {
 164   struct fix *next_reloc;               /* Next !lituse or !gpdisp.  */
 165   struct alpha_reloc_tag *info;         /* Other members with same sequence.  */
 166 };
 167
 168 /* Initialize the TC_FIX_TYPE field.  */
 169 #define TC_INIT_FIX_DATA(FIX)                                           \
 170 do {                                                                    \
 171   FIX->tc_fix_data.next_reloc = NULL;                                   \
 172   FIX->tc_fix_data.info = NULL;                                         \
 173 } while (0)
 174
 175 /* Work with DEBUG5 to print fields in tc_fix_type.  */
 176 #define TC_FIX_DATA_PRINT(STREAM, FIX)                                  \
 177 do {                                                                    \
 178   if (FIX->tc_fix_data.info)                                            \
 179     fprintf (STREAM, "\tinfo = 0x%lx, next_reloc = 0x%lx\n", \
 180              (long) FIX->tc_fix_data.info,                              \
 181              (long) FIX->tc_fix_data.next_reloc);                       \
 182 } while (0)
 183
 184 #define TARGET_USE_CFIPOP 1
 185
 186 #define tc_cfi_frame_initial_instructions alpha_cfi_frame_initial_instructions
 187 extern void alpha_cfi_frame_initial_instructions (void);
 188
 189 #define DWARF2_LINE_MIN_INSN_LENGTH     4
 190 #define DWARF2_DEFAULT_RETURN_COLUMN    26
 191 #define DWARF2_CIE_DATA_ALIGNMENT       (-8)