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