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