contrib/binutils/gas/config/tc-alpha.h

   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 #ifndef VMS
  84 #define TC_IMPLICIT_LCOMM_ALIGNMENT(size, align) \
  85   do                                                    \
  86     {                                                   \
  87       align = 0;                                        \
  88       if (size > 1)                                     \
  89         {                                               \
  90           addressT temp = 1;                            \
  91           while ((size & temp) == 0)                    \
  92             ++align, temp <<= 1;                        \
  93         }                                               \
  94     }                                                   \
  95   while (0)
  96 #endif
  97
  98 #define md_number_to_chars              number_to_chars_littleendian
  99
 100 extern int tc_get_register PARAMS ((int frame));
 101 extern void alpha_frob_ecoff_data PARAMS ((void));
 102
 103 #define tc_frob_label(sym) alpha_define_label (sym)
 104 extern void alpha_define_label PARAMS ((symbolS *));
 105
 106 #define md_cons_align(nbytes) alpha_cons_align (nbytes)
 107 extern void alpha_cons_align PARAMS ((int));
 108
 109 #define HANDLE_ALIGN(fragp) alpha_handle_align (fragp)
 110 extern void alpha_handle_align PARAMS ((struct frag *));
 111
 112 #define MAX_MEM_FOR_RS_ALIGN_CODE  (3 + 4 + 8)
 113
 114 #ifdef OBJ_ECOFF
 115 #define tc_frob_file_before_adjust() alpha_frob_file_before_adjust ()
 116 extern void alpha_frob_file_before_adjust PARAMS ((void));
 117 #endif
 118
 119 #define DIFF_EXPR_OK   /* foo-. gets turned into PC relative relocs */
 120
 121 #ifdef OBJ_ELF
 122 #define md_elf_section_letter           alpha_elf_section_letter
 123 extern int alpha_elf_section_letter PARAMS ((int, char **));
 124 #define md_elf_section_flags            alpha_elf_section_flags
 125 extern flagword alpha_elf_section_flags PARAMS ((flagword, int, int));
 126 #endif
 127
 128 /* Whether to add support for explicit !relocation_op!sequence_number.  At the
 129    moment, only do this for ELF, though ECOFF could use it as well.  */
 130
 131 #ifdef OBJ_ELF
 132 #define RELOC_OP_P
 133 #endif
 134
 135 /* Before the relocations are written, reorder them, so that user
 136    supplied !lituse relocations follow the appropriate !literal
 137    relocations.  Also convert the gas-internal relocations to the
 138    appropriate linker relocations.  */
 139 #define tc_frob_file_before_fix() alpha_before_fix ()
 140 extern void alpha_before_fix PARAMS ((void));
 141
 142 #ifdef OBJ_ELF
 143 #define md_end  alpha_elf_md_end
 144 extern void alpha_elf_md_end PARAMS ((void));
 145 #endif
 146
 147 /* New fields for supporting explicit relocations (such as !literal to mark
 148    where a pointer is loaded from the global table, and !lituse_base to track
 149    all of the normal uses of that pointer).  */
 150
 151 #define TC_FIX_TYPE struct alpha_fix_tag
 152
 153 struct alpha_fix_tag
 154 {
 155   struct fix *next_reloc;               /* next !lituse or !gpdisp */
 156   struct alpha_reloc_tag *info;         /* other members with same sequence */
 157 };
 158
 159 /* Initialize the TC_FIX_TYPE field.  */
 160 #define TC_INIT_FIX_DATA(FIX)                                           \
 161 do {                                                                    \
 162   FIX->tc_fix_data.next_reloc = (struct fix *) 0;                       \
 163   FIX->tc_fix_data.info = (struct alpha_reloc_tag *) 0;                 \
 164 } while (0)
 165
 166 /* Work with DEBUG5 to print fields in tc_fix_type.  */
 167 #define TC_FIX_DATA_PRINT(STREAM, FIX)                                  \
 168 do {                                                                    \
 169   if (FIX->tc_fix_data.info)                                            \
 170     fprintf (STREAM, "\tinfo = 0x%lx, next_reloc = 0x%lx\n", \
 171              (long) FIX->tc_fix_data.info,                              \
 172              (long) FIX->tc_fix_data.next_reloc);                       \
 173 } while (0)
 174
 175 #define TARGET_USE_CFIPOP 1
 176
 177 #define tc_cfi_frame_initial_instructions alpha_cfi_frame_initial_instructions
 178 extern void alpha_cfi_frame_initial_instructions(void);
 179
 180 #define DWARF2_LINE_MIN_INSN_LENGTH     4
 181 #define DWARF2_DEFAULT_RETURN_COLUMN    26
 182 #define DWARF2_CIE_DATA_ALIGNMENT       -8