gas/config/tc-s390.h

   1 /* tc-s390.h -- Header file for tc-s390.c.
   2    Copyright 2000, 2001, 2002 Free Software Foundation, Inc.
   3    Written by Martin Schwidefsky (schwidefsky@de.ibm.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 2, 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, 59 Temple Place - Suite 330, Boston, MA
  20    02111-1307, USA.  */
  21
  22 #define TC_S390
  23
  24 #ifdef ANSI_PROTOTYPES
  25 struct fix;
  26 #endif
  27
  28 #ifndef BFD_ASSEMBLER
  29  #error S390 support requires BFD_ASSEMBLER
  30 #endif
  31
  32 /* This expression evaluates to false if the relocation is for a local object
  33    for which we still want to do the relocation at runtime.  True if we
  34    are willing to perform this relocation while building the .o file.
  35    This is only used for pcrel relocations, so GOTOFF does not need to be
  36    checked here.  I am not sure if some of the others are ever used with
  37    pcrel, but it is easier to be safe than sorry.  */
  38
  39 #define TC_RELOC_RTSYM_LOC_FIXUP(FIX)        \
  40   ((FIX)->fx_r_type != BFD_RELOC_390_GOTENT  \
  41    && ((FIX)->fx_addsy == NULL               \
  42        || (! S_IS_EXTERNAL ((FIX)->fx_addsy)      \
  43            && ! S_IS_WEAK ((FIX)->fx_addsy)  \
  44            && S_IS_DEFINED ((FIX)->fx_addsy)      \
  45            && ! S_IS_COMMON ((FIX)->fx_addsy))))
  46
  47 #define TC_FORCE_RELOCATION(FIXP) tc_s390_force_relocation(FIXP)
  48 extern int tc_s390_force_relocation PARAMS ((struct fix *));
  49
  50 #define tc_fix_adjustable(X)  tc_s390_fix_adjustable(X)
  51 extern int tc_s390_fix_adjustable PARAMS ((struct fix *));
  52
  53 #define TC_FIX_ADJUSTABLE(fixP) \
  54   (! symbol_used_in_reloc_p ((fixP)->fx_addsy) && tc_fix_adjustable (fixP))
  55
  56 /* The target BFD architecture.  */
  57 #define TARGET_ARCH bfd_arch_s390
  58 extern enum bfd_architecture s390_arch PARAMS ((void));
  59
  60 /* The target BFD format.  */
  61 #define TARGET_FORMAT s390_target_format()
  62 extern const char *s390_target_format PARAMS ((void));
  63
  64 /* Set the endianness we are using.  */
  65 #define TARGET_BYTES_BIG_ENDIAN 1
  66
  67 /* Whether or not the target is big endian */
  68 extern int target_big_endian;
  69
  70 /* Permit temporary numeric labels.  */
  71 #define LOCAL_LABELS_FB 1
  72
  73 /* $ is used to refer to the current location.  */
  74 /* #define DOLLAR_DOT */
  75
  76 /* We need to be able to make relocations involving the difference of
  77    two symbols.  This includes the difference of two symbols when
  78    one of them is undefined (this comes up in PIC code generation).
  79  */
  80 #define UNDEFINED_DIFFERENCE_OK
  81
  82 /* foo-. gets turned into PC relative relocs */
  83 #define DIFF_EXPR_OK
  84
  85 /* We don't need to handle .word strangely.  */
  86 #define WORKING_DOT_WORD
  87
  88 #define md_number_to_chars           number_to_chars_bigendian
  89
  90 #define md_do_align(n, fill, len, max, around)                          \
  91 if ((n) && !need_pass_2 && (fill == 0) &&                               \
  92     (bfd_get_section_flags (stdoutput, now_seg) & SEC_CODE) != 0) {     \
  93   char *p;                                                              \
  94   p = frag_var (rs_align_code, 15, 1, (relax_substateT) max,            \
  95                 (symbolS *) 0, (offsetT) (n), (char *) 0);              \
  96   *p = 0x07;                                                            \
  97   goto around;                                                          \
  98 }
  99
 100 extern void s390_align_code PARAMS ((fragS *, int));
 101
 102 #define HANDLE_ALIGN(fragP)                                             \
 103 if (fragP->fr_type == rs_align_code)                                    \
 104   s390_align_code (fragP, (fragP->fr_next->fr_address                   \
 105                            - fragP->fr_address                          \
 106                            - fragP->fr_fix));
 107
 108 /* call md_pcrel_from_section, not md_pcrel_from */
 109 #define MD_PCREL_FROM_SECTION(FIXP, SEC) md_pcrel_from_section(FIXP, SEC)
 110 extern long md_pcrel_from_section PARAMS ((struct fix *, segT));
 111
 112 #define md_operand(x)
 113
 114 extern void s390_md_end PARAMS ((void));
 115 #define md_end() s390_md_end ()