gas/config/tc-alpha.h

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