gas/config/tc-hppa.h

   1 /* tc-hppa.h -- Header file for the PA
   2    Copyright (C) 1989, 93, 94, 95, 96, 1997 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 published by
   8    the Free Software Foundation; either version 1, or (at your option)
   9    any later version.
  10
  11    GAS is distributed in the hope that it will be useful,
  12    but WITHOUT ANY WARRANTY; without even the implied warranty of
  13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14    GNU General Public License for more details.
  15
  16    You should have received a copy of the GNU General Public License
  17    along with GAS; see the file COPYING.  If not, write to the Free
  18    Software Foundation, 59 Temple Place - Suite 330, Boston, MA
  19    02111-1307, USA.  */
  20
  21
  22 /* HP PA-RISC support was contributed by the Center for Software Science
  23    at the University of Utah.  */
  24
  25 /* Please refrain from exposing the world to the internals of tc-hppa.c
  26    when this file is included.  This means only declaring exported functions,
  27    (please PARAMize them!) not exporting structures and data items which
  28    are used solely within tc-hppa.c, etc.
  29
  30    Also refrain from adding any more object file dependent code, there is
  31    already far too much object file format dependent code in this file.
  32    In theory this file should contain only exported functions, structures
  33    and data declarations common to all PA assemblers.  */
  34
  35 #ifndef _TC_HPPA_H
  36 #define _TC_HPPA_H
  37
  38 #ifndef TC_HPPA
  39 #define TC_HPPA 1
  40 #endif
  41
  42 #define TARGET_BYTES_BIG_ENDIAN 1
  43
  44 #define TARGET_ARCH bfd_arch_hppa
  45
  46 /* FIXME.  The lack of a place to put things which are both target cpu
  47    and target format dependent makes hacks like this necessary.  */
  48 #ifdef OBJ_ELF
  49 #include "bfd/elf32-hppa.h"
  50 #define TARGET_FORMAT "elf32-hppa"
  51 #endif
  52
  53 #ifdef OBJ_SOM
  54 #include "bfd/som.h"
  55 #define TARGET_FORMAT "som"
  56 #endif
  57
  58 /* FIXME.  Why oh why aren't these defined somewhere globally?  */
  59 #ifndef FALSE
  60 #define FALSE   (0)
  61 #define TRUE    (!FALSE)
  62 #endif
  63
  64 #define ASEC_NULL (asection *)0
  65
  66 /* Labels are not required to have a colon for a suffix.  */
  67 #define LABELS_WITHOUT_COLONS
  68
  69 /* FIXME.  This should be static and declared in tc-hppa.c, but
  70    pa_define_label gets used outside of tc-hppa.c via tc_frob_label.
  71    Should also be PARAMized, but symbolS isn't available here.  */
  72 extern void pa_define_label ();
  73
  74 /* FIXME.  Types not available here, so they can't be PARAMized.  */
  75 extern void parse_cons_expression_hppa ();
  76 extern void cons_fix_new_hppa ();
  77 extern int hppa_force_relocation ();
  78
  79 /* This gets called before writing the object file to make sure
  80    things like entry/exit and proc/procend pairs match.  */
  81 extern void pa_check_eof PARAMS ((void));
  82 #define tc_frob_file pa_check_eof
  83
  84 #define tc_frob_label(sym) pa_define_label (sym)
  85
  86 /* The PA does not need support for either of these.  */
  87 #define tc_crawl_symbol_chain(headers) {;}
  88 #define tc_headers_hook(headers) {;}
  89
  90 #define RELOC_EXPANSION_POSSIBLE
  91 #define MAX_RELOC_EXPANSION 6
  92
  93 /* FIXME.  More things which are both HPPA and ELF specific.  There is
  94    nowhere to put such things.  */
  95 #ifdef OBJ_ELF
  96 #define elf_tc_final_processing elf_hppa_final_processing
  97 void elf_hppa_final_processing PARAMS ((void));
  98 #endif
  99
 100 /* The PA needs to parse field selectors in .byte, etc.  */
 101
 102 #define TC_PARSE_CONS_EXPRESSION(EXP, NBYTES) \
 103   parse_cons_expression_hppa (EXP)
 104 #define TC_CONS_FIX_NEW cons_fix_new_hppa
 105
 106 /* On the PA, an equal sign often appears as a condition or nullification
 107    completer in an instruction.  This can be detected by checking the
 108    previous character, if the character is a comma, then the equal is
 109    being used as part of an instruction.  */
 110 #define TC_EQUAL_IN_INSN(C, PTR)        ((C) == ',')
 111
 112 /* Similarly for an exclamation point.  It is used in FP comparison
 113    instructions and as an end of line marker.  When used in an instruction
 114    it will always follow a comma.  */
 115 #define TC_EOL_IN_INSN(PTR)     (*(PTR) == '!' && (PTR)[-1] == ',')
 116
 117 #define tc_fix_adjustable hppa_fix_adjustable
 118
 119 /* Because of the strange PA calling conventions, it is sometimes
 120    necessary to emit a relocation for a call even though it would
 121    normally appear safe to handle it completely within GAS.  */
 122 #define TC_FORCE_RELOCATION(FIXP) hppa_force_relocation (FIXP)
 123
 124 #ifdef OBJ_SOM
 125 /* If a symbol is imported, but never used, then the symbol should
 126    *not* end up in the symbol table.  Likewise for absolute symbols
 127    with local scope.  */
 128 #define tc_frob_symbol(sym,punt) \
 129     if ((S_GET_SEGMENT (sym) == &bfd_und_section && sym->sy_used == 0) \
 130         || (S_GET_SEGMENT (sym) == &bfd_abs_section \
 131             && (sym->bsym->flags & BSF_EXPORT) == 0)) \
 132       punt = 1
 133
 134 /* We need to be able to make relocations involving the difference of
 135    two symbols.  This includes the difference of two symbols when
 136    one of them is undefined (this comes up in PIC code generation).
 137
 138    We don't define DIFF_EXPR_OK because it does the wrong thing if
 139    the add symbol is undefined and the sub symbol is a symbol in
 140    the same section as the relocation.  We also need some way to
 141    specialize some code in adjust_reloc_syms.  */
 142 #define UNDEFINED_DIFFERENCE_OK
 143 #endif
 144
 145 #ifdef OBJ_ELF
 146 /* Arggg.  The generic BFD ELF code always adds in the section->vma
 147    to non-common symbols.  This is a lose on the PA.   To make matters
 148    worse, the generic ELF code already defined obj_frob_symbol.  */
 149 #define tc_frob_symbol(sym,punt) \
 150   { \
 151     if (S_GET_SEGMENT (sym) != &bfd_com_section \
 152         && S_GET_SEGMENT (sym) != &bfd_und_section) \
 153       S_SET_VALUE ((sym), (S_GET_VALUE (sym) - (sym)->bsym->section->vma)); \
 154     if ((S_GET_SEGMENT (sym) == &bfd_und_section && sym->sy_used == 0) \
 155         || (S_GET_SEGMENT (sym) == &bfd_abs_section \
 156             && (sym->bsym->flags & BSF_EXPORT) == 0)) \
 157       punt = 1; \
 158   }
 159 #endif
 160
 161 #define md_operand(x)
 162
 163 #define TC_FIX_TYPE PTR
 164 #define TC_INIT_FIX_DATA(FIXP) ((FIXP)->tc_fix_data = NULL)
 165
 166 #endif /* _TC_HPPA_H */