gas/config/tc-sparc.h

   1 /* tc-sparc.h - Macros and type defines for the sparc.
   2    Copyright (C) 1989, 90-96, 97, 98, 1999 Free Software Foundation, Inc.
   3
   4    This file is part of GAS, the GNU Assembler.
   5
   6    GAS is free software; you can redistribute it and/or modify
   7    it under the terms of the GNU General Public License as
   8    published by the Free Software Foundation; either version 2,
   9    or (at your option) any later version.
  10
  11    GAS is distributed in the hope that it will be useful, but
  12    WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
  14    the GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public
  17    License along with GAS; see the file COPYING.  If not, write
  18    to the Free Software Foundation, 59 Temple Place - Suite 330,
  19    Boston, MA 02111-1307, USA.  */
  20
  21 #ifndef TC_SPARC
  22 #define TC_SPARC 1
  23
  24 #ifdef ANSI_PROTOTYPES
  25 struct frag;
  26 #endif
  27
  28 /* This is used to set the default value for `target_big_endian'.  */
  29 #define TARGET_BYTES_BIG_ENDIAN 1
  30
  31 #define LOCAL_LABELS_FB 1
  32
  33 #define TARGET_ARCH bfd_arch_sparc
  34
  35 extern const char *sparc_target_format PARAMS ((void));
  36 #define TARGET_FORMAT sparc_target_format ()
  37
  38 #define RELOC_EXPANSION_POSSIBLE
  39 #define MAX_RELOC_EXPANSION 2
  40
  41 #if 0
  42 #ifdef TE_SPARCAOUT
  43 /* Bi-endian support may eventually be unconditional, but until things are
  44    working well it's only provided for targets that need it.  */
  45 #define SPARC_BIENDIAN
  46 #endif
  47 #endif
  48 /* Make it unconditional and check if -EL is valid after option parsing */
  49 #define SPARC_BIENDIAN
  50
  51 #define WORKING_DOT_WORD
  52
  53 #define md_convert_frag(b,s,f)          {as_fatal (_("sparc convert_frag\n"));}
  54 #define md_estimate_size_before_relax(f,s) \
  55                         (as_fatal(_("estimate_size_before_relax called")),1)
  56
  57 #define LISTING_HEADER "SPARC GAS "
  58
  59 extern int sparc_pic_code;
  60
  61 #define md_do_align(n, fill, len, max, around)                          \
  62 if ((n) && (n) <= 10 && !need_pass_2 && !(fill)                         \
  63     && subseg_text_p (now_seg))                                         \
  64   {                                                                     \
  65     char *p;                                                            \
  66     p = frag_var (rs_align_code, 1 << n, 1, (relax_substateT) 1024,     \
  67                   (symbolS *) 0, (offsetT) (n), (char *) 0);            \
  68     *p = 0x00;                                                          \
  69     goto around;                                                        \
  70   }
  71
  72 /* We require .word, et. al., to be aligned correctly.  */
  73 #define md_cons_align(nbytes) sparc_cons_align (nbytes)
  74 extern void sparc_cons_align PARAMS ((int));
  75 #define HANDLE_ALIGN(fragp) sparc_handle_align (fragp)
  76 extern void sparc_handle_align PARAMS ((struct frag *));
  77
  78 #if defined (OBJ_ELF) || defined (OBJ_AOUT)
  79
  80 /* This expression evaluates to false if the relocation is for a local
  81    object for which we still want to do the relocation at runtime.
  82    True if we are willing to perform this relocation while building
  83    the .o file.
  84
  85    If the reloc is against an externally visible symbol, then the
  86    a.out assembler should not do the relocation if generating PIC, and
  87    the ELF assembler should never do the relocation.  */
  88
  89 #ifdef OBJ_ELF
  90 #define obj_relocate_extern 0
  91 #else
  92 #define obj_relocate_extern (! sparc_pic_code)
  93 #endif
  94
  95 #define TC_RELOC_RTSYM_LOC_FIXUP(FIX)  \
  96   (obj_relocate_extern \
  97    || (FIX)->fx_addsy == NULL \
  98    || (! S_IS_EXTERNAL ((FIX)->fx_addsy) \
  99        && ! S_IS_WEAK ((FIX)->fx_addsy) \
 100        && S_IS_DEFINED ((FIX)->fx_addsy) \
 101        && ! S_IS_COMMON ((FIX)->fx_addsy)))
 102 #endif
 103
 104 /* I know that "call 0" fails in sparc-coff if this doesn't return 1.  I
 105    don't know about other relocation types, or other formats, yet.  */
 106 #ifdef OBJ_COFF
 107 #define TC_FORCE_RELOCATION(FIXP)       \
 108         ((FIXP)->fx_r_type == BFD_RELOC_32_PCREL_S2 \
 109          && ((FIXP)->fx_addsy == 0 \
 110              || S_GET_SEGMENT ((FIXP)->fx_addsy) == absolute_section))
 111 #define RELOC_REQUIRES_SYMBOL
 112 #endif
 113
 114 #ifdef OBJ_ELF
 115 #define TC_FORCE_RELOCATION(fixp) elf32_sparc_force_relocation(fixp)
 116 extern int elf32_sparc_force_relocation PARAMS ((struct fix *));
 117 #endif
 118
 119 #define MD_APPLY_FIX3
 120 #define TC_HANDLES_FX_DONE
 121
 122 #ifdef OBJ_ELF
 123 /* Keep relocations against global symbols.  Don't turn them into
 124    relocations against sections.  This is required for the dynamic
 125    linker to operate properly.  When generating PIC, we need to keep
 126    any non PC relative reloc.  The PIC part of this test must be
 127    parallel to the code in tc_gen_reloc which converts relocations to
 128    GOT relocations.  */
 129 #define tc_fix_adjustable(FIX)                                          \
 130   (! S_IS_EXTERNAL ((FIX)->fx_addsy)                                    \
 131    && ! S_IS_WEAK ((FIX)->fx_addsy)                                     \
 132    && (FIX)->fx_r_type != BFD_RELOC_VTABLE_INHERIT                      \
 133    && (FIX)->fx_r_type != BFD_RELOC_VTABLE_ENTRY                        \
 134    && (! sparc_pic_code                                                 \
 135        || ((FIX)->fx_r_type != BFD_RELOC_HI22                           \
 136            && (FIX)->fx_r_type != BFD_RELOC_LO10                        \
 137            && (FIX)->fx_r_type != BFD_RELOC_SPARC13                     \
 138            && ((FIX)->fx_r_type != BFD_RELOC_32_PCREL_S2                \
 139                || (S_IS_DEFINED ((FIX)->fx_addsy)                       \
 140                    && ! S_IS_COMMON ((FIX)->fx_addsy)                   \
 141                    && ! S_IS_EXTERNAL ((FIX)->fx_addsy)                 \
 142                    && ! S_IS_WEAK ((FIX)->fx_addsy)))                   \
 143            && ((FIX)->fx_pcrel                                          \
 144                || ((FIX)->fx_subsy != NULL                              \
 145                    && (S_GET_SEGMENT ((FIX)->fx_subsy)                  \
 146                        == S_GET_SEGMENT ((FIX)->fx_addsy)))             \
 147                || S_IS_LOCAL ((FIX)->fx_addsy)))))
 148
 149 /* Finish up the entire symtab.  */
 150 #define tc_adjust_symtab() sparc_adjust_symtab ()
 151 extern void sparc_adjust_symtab PARAMS ((void));
 152 #endif
 153
 154 #ifdef OBJ_AOUT
 155 /* When generating PIC code, we must not adjust any reloc which will
 156    turn into a reloc against the global offset table, nor any reloc
 157    which we will need if a symbol is overridden.  */
 158 #define tc_fix_adjustable(FIX)                                          \
 159   (! sparc_pic_code                                                     \
 160    || ((FIX)->fx_pcrel                                                  \
 161        && ((FIX)->fx_addsy == NULL                                      \
 162            || (! S_IS_EXTERNAL ((FIX)->fx_addsy)                        \
 163                && ! S_IS_WEAK ((FIX)->fx_addsy))))                      \
 164    || (FIX)->fx_r_type == BFD_RELOC_16                                  \
 165    || (FIX)->fx_r_type == BFD_RELOC_32)
 166 #endif
 167
 168 #define elf_tc_final_processing sparc_elf_final_processing
 169 extern void sparc_elf_final_processing PARAMS ((void));
 170
 171 #define md_operand(x)
 172
 173 extern void sparc_md_end PARAMS ((void));
 174 #define md_end() sparc_md_end ()
 175
 176 #endif
 177
 178 #define TC_CONS_FIX_NEW cons_fix_new_sparc
 179 extern void cons_fix_new_sparc
 180   PARAMS ((struct frag *, int, unsigned int, struct expressionS *));
 181
 182 #define TC_FIX_TYPE     valueT
 183
 184 #define TC_INIT_FIX_DATA(X)                     \
 185   do                                            \
 186      {                                          \
 187        (X)->tc_fix_data = 0;                    \
 188      }                                          \
 189   while(0)
 190
 191 #define TC_FIX_DATA_PRINT(FILE, FIXP)                                   \
 192   do                                                                    \
 193     {                                                                   \
 194       fprintf((FILE), "addend2=%ld\n",                                  \
 195               (unsigned long) (FIXP)->tc_fix_data);                     \
 196     }                                                                   \
 197   while(0)
 198
 199 /* end of tc-sparc.h */