Commit | Line | Data |
---|---|---|
252b5132 | 1 | /* tc-hppa.h -- Header file for the PA |
abd63a32 | 2 | Copyright (C) 1989, 93, 94, 95, 96, 97, 98, 99, 2000 |
a0f75b47 | 3 | Free Software Foundation, Inc. |
252b5132 RH |
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 | ||
252b5132 | 49 | #ifdef OBJ_ELF |
3f9b03b5 | 50 | #if BFD_ARCH_SIZE == 64 |
b388df87 JL |
51 | #include "bfd/elf64-hppa.h" |
52 | #define TARGET_FORMAT "elf64-hppa" | |
53 | #else | |
252b5132 RH |
54 | #include "bfd/elf32-hppa.h" |
55 | #define TARGET_FORMAT "elf32-hppa" | |
56 | #endif | |
b388df87 | 57 | #endif |
252b5132 RH |
58 | |
59 | #ifdef OBJ_SOM | |
60 | #include "bfd/som.h" | |
61 | #define TARGET_FORMAT "som" | |
62 | #endif | |
63 | ||
64 | /* FIXME. Why oh why aren't these defined somewhere globally? */ | |
65 | #ifndef FALSE | |
66 | #define FALSE (0) | |
67 | #define TRUE (!FALSE) | |
68 | #endif | |
69 | ||
70 | #define ASEC_NULL (asection *)0 | |
71 | ||
72 | /* Labels are not required to have a colon for a suffix. */ | |
abd63a32 | 73 | #define LABELS_WITHOUT_COLONS 1 |
252b5132 RH |
74 | |
75 | /* FIXME. This should be static and declared in tc-hppa.c, but | |
76 | pa_define_label gets used outside of tc-hppa.c via tc_frob_label. | |
77 | Should also be PARAMized, but symbolS isn't available here. */ | |
78 | extern void pa_define_label (); | |
79 | ||
80 | /* FIXME. Types not available here, so they can't be PARAMized. */ | |
81 | extern void parse_cons_expression_hppa (); | |
82 | extern void cons_fix_new_hppa (); | |
83 | extern int hppa_force_relocation (); | |
84 | ||
85 | /* This gets called before writing the object file to make sure | |
86 | things like entry/exit and proc/procend pairs match. */ | |
87 | extern void pa_check_eof PARAMS ((void)); | |
88 | #define tc_frob_file pa_check_eof | |
89 | ||
90 | #define tc_frob_label(sym) pa_define_label (sym) | |
91 | ||
92 | /* The PA does not need support for either of these. */ | |
93 | #define tc_crawl_symbol_chain(headers) {;} | |
94 | #define tc_headers_hook(headers) {;} | |
95 | ||
96 | #define RELOC_EXPANSION_POSSIBLE | |
97 | #define MAX_RELOC_EXPANSION 6 | |
98 | ||
99 | /* FIXME. More things which are both HPPA and ELF specific. There is | |
100 | nowhere to put such things. */ | |
101 | #ifdef OBJ_ELF | |
102 | #define elf_tc_final_processing elf_hppa_final_processing | |
103 | void elf_hppa_final_processing PARAMS ((void)); | |
104 | #endif | |
105 | ||
106 | /* The PA needs to parse field selectors in .byte, etc. */ | |
107 | ||
108 | #define TC_PARSE_CONS_EXPRESSION(EXP, NBYTES) \ | |
109 | parse_cons_expression_hppa (EXP) | |
110 | #define TC_CONS_FIX_NEW cons_fix_new_hppa | |
111 | ||
112 | /* On the PA, an equal sign often appears as a condition or nullification | |
113 | completer in an instruction. This can be detected by checking the | |
114 | previous character, if the character is a comma, then the equal is | |
115 | being used as part of an instruction. */ | |
116 | #define TC_EQUAL_IN_INSN(C, PTR) ((C) == ',') | |
117 | ||
118 | /* Similarly for an exclamation point. It is used in FP comparison | |
119 | instructions and as an end of line marker. When used in an instruction | |
120 | it will always follow a comma. */ | |
121 | #define TC_EOL_IN_INSN(PTR) (*(PTR) == '!' && (PTR)[-1] == ',') | |
122 | ||
123 | #define tc_fix_adjustable hppa_fix_adjustable | |
124 | ||
125 | /* Because of the strange PA calling conventions, it is sometimes | |
126 | necessary to emit a relocation for a call even though it would | |
127 | normally appear safe to handle it completely within GAS. */ | |
128 | #define TC_FORCE_RELOCATION(FIXP) hppa_force_relocation (FIXP) | |
129 | ||
130 | #ifdef OBJ_SOM | |
131 | /* If a symbol is imported, but never used, then the symbol should | |
132 | *not* end up in the symbol table. Likewise for absolute symbols | |
133 | with local scope. */ | |
134 | #define tc_frob_symbol(sym,punt) \ | |
a0f75b47 | 135 | if ((S_GET_SEGMENT (sym) == &bfd_und_section && ! symbol_used_p (sym)) \ |
252b5132 | 136 | || (S_GET_SEGMENT (sym) == &bfd_abs_section \ |
a0f75b47 | 137 | && ! S_IS_EXTERNAL (sym))) \ |
252b5132 RH |
138 | punt = 1 |
139 | ||
140 | /* We need to be able to make relocations involving the difference of | |
141 | two symbols. This includes the difference of two symbols when | |
142 | one of them is undefined (this comes up in PIC code generation). | |
143 | ||
144 | We don't define DIFF_EXPR_OK because it does the wrong thing if | |
145 | the add symbol is undefined and the sub symbol is a symbol in | |
146 | the same section as the relocation. We also need some way to | |
147 | specialize some code in adjust_reloc_syms. */ | |
148 | #define UNDEFINED_DIFFERENCE_OK | |
149 | #endif | |
150 | ||
151 | #ifdef OBJ_ELF | |
152 | #define tc_frob_symbol(sym,punt) \ | |
153 | { \ | |
a0f75b47 | 154 | if ((S_GET_SEGMENT (sym) == &bfd_und_section && ! symbol_used_p (sym)) \ |
252b5132 | 155 | || (S_GET_SEGMENT (sym) == &bfd_abs_section \ |
54377754 JL |
156 | && ! S_IS_EXTERNAL (sym)) \ |
157 | || strcmp (S_GET_NAME (sym), "$global$") == 0) \ | |
252b5132 RH |
158 | punt = 1; \ |
159 | } | |
160 | #endif | |
161 | ||
162 | #define md_operand(x) | |
2d93dcc4 JL |
163 | #ifdef OBJ_ELF |
164 | #define md_end() pa_end_of_source () | |
165 | #endif | |
252b5132 RH |
166 | |
167 | #define TC_FIX_TYPE PTR | |
168 | #define TC_INIT_FIX_DATA(FIXP) ((FIXP)->tc_fix_data = NULL) | |
169 | ||
170 | #endif /* _TC_HPPA_H */ |