| 1 | /* tc-ia64.h -- Header file for tc-ia64.c. |
| 2 | Copyright 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc. |
| 3 | Contributed by David Mosberger-Tang <davidm@hpl.hp.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 |
| 19 | the Free Software Foundation, 59 Temple Place - Suite 330, |
| 20 | Boston, MA 02111-1307, USA. */ |
| 21 | |
| 22 | #include "opcode/ia64.h" |
| 23 | #include "elf/ia64.h" |
| 24 | |
| 25 | #define TC_IA64 |
| 26 | |
| 27 | /* Linux is little endian by default. HPUX is big endian by default. */ |
| 28 | #ifdef TE_HPUX |
| 29 | #define TARGET_BYTES_BIG_ENDIAN 1 |
| 30 | #define MD_FLAGS_DEFAULT EF_IA_64_BE |
| 31 | #else |
| 32 | #define TARGET_BYTES_BIG_ENDIAN 0 |
| 33 | #define MD_FLAGS_DEFAULT EF_IA_64_ABI64 |
| 34 | #endif /* TE_HPUX */ |
| 35 | |
| 36 | extern void (*ia64_number_to_chars) PARAMS ((char *, valueT, int)); |
| 37 | #define md_number_to_chars (*ia64_number_to_chars) |
| 38 | |
| 39 | extern void ia64_elf_section_change_hook PARAMS ((void)); |
| 40 | #define md_elf_section_change_hook ia64_elf_section_change_hook |
| 41 | |
| 42 | /* We record the endian for this section. 0 means default, 1 means |
| 43 | big endian and 2 means little endian. */ |
| 44 | struct ia64_segment_info_type |
| 45 | { |
| 46 | unsigned int endian : 2; |
| 47 | }; |
| 48 | |
| 49 | #define TC_SEGMENT_INFO_TYPE struct ia64_segment_info_type |
| 50 | |
| 51 | /* We need to set the default object file format in ia64_init and not in |
| 52 | md_begin. This is because parse_args is called before md_begin, and we |
| 53 | do not want md_begin to wipe out the flag settings set by options parsed in |
| 54 | md_parse_args. */ |
| 55 | |
| 56 | #define HOST_SPECIAL_INIT ia64_init |
| 57 | extern void ia64_init PARAMS ((int, char **)); |
| 58 | |
| 59 | #define TARGET_FORMAT ia64_target_format() |
| 60 | extern const char *ia64_target_format PARAMS ((void)); |
| 61 | |
| 62 | #define TARGET_ARCH bfd_arch_ia64 |
| 63 | #define DOUBLESLASH_LINE_COMMENTS /* allow //-style comments */ |
| 64 | |
| 65 | #define NEED_LITERAL_POOL /* need gp literal pool */ |
| 66 | #define RELOC_REQUIRES_SYMBOL |
| 67 | #define DIFF_EXPR_OK /* foo-. gets turned into PC relative relocs */ |
| 68 | #define NEED_INDEX_OPERATOR /* [ ] is index operator */ |
| 69 | |
| 70 | #define QUOTES_IN_INSN /* allow `string "foo;bar"' */ |
| 71 | #define LEX_AT LEX_NAME /* allow `@' inside name */ |
| 72 | #define LEX_QM LEX_NAME /* allow `?' inside name */ |
| 73 | #define LEX_HASH LEX_END_NAME /* allow `#' ending a name */ |
| 74 | |
| 75 | #define SUB_SEGMENT_ALIGN(SEG, FRCHAIN) 0 |
| 76 | |
| 77 | struct ia64_fix |
| 78 | { |
| 79 | int bigendian; /* byte order at fix location */ |
| 80 | enum ia64_opnd opnd; |
| 81 | }; |
| 82 | |
| 83 | extern void ia64_do_align PARAMS((int n)); |
| 84 | extern void ia64_end_of_source PARAMS((void)); |
| 85 | extern void ia64_start_line PARAMS((void)); |
| 86 | extern int ia64_unrecognized_line PARAMS((int ch)); |
| 87 | extern void ia64_frob_label PARAMS((struct symbol *sym)); |
| 88 | extern void ia64_flush_pending_output PARAMS((void)); |
| 89 | extern int ia64_parse_name (char *name, expressionS *e); |
| 90 | extern int ia64_optimize_expr PARAMS((expressionS *l, operatorT op, |
| 91 | expressionS *r)); |
| 92 | extern void ia64_cons_align PARAMS((int)); |
| 93 | extern void ia64_flush_insns PARAMS((void)); |
| 94 | extern int ia64_fix_adjustable PARAMS((struct fix *fix)); |
| 95 | extern int ia64_force_relocation PARAMS((struct fix *)); |
| 96 | extern void ia64_cons_fix_new PARAMS ((fragS *f, int where, int nbytes, |
| 97 | expressionS *exp)); |
| 98 | extern void ia64_validate_fix PARAMS ((struct fix *fix)); |
| 99 | extern char * ia64_canonicalize_symbol_name PARAMS ((char *)); |
| 100 | extern int ia64_elf_section_letter PARAMS ((int, char **)); |
| 101 | extern flagword ia64_elf_section_flags PARAMS ((flagword, int, int)); |
| 102 | extern int ia64_elf_section_type PARAMS ((const char *, size_t len)); |
| 103 | extern long ia64_pcrel_from_section PARAMS ((struct fix *fix, segT sec)); |
| 104 | extern void ia64_md_do_align PARAMS ((int, const char *, int, int)); |
| 105 | extern void ia64_handle_align PARAMS ((fragS *f)); |
| 106 | extern void ia64_after_parse_args PARAMS ((void)); |
| 107 | extern void ia64_dwarf2_emit_offset PARAMS ((symbolS *, unsigned int)); |
| 108 | extern void ia64_check_label PARAMS ((symbolS *)); |
| 109 | |
| 110 | #define md_end() ia64_end_of_source () |
| 111 | #define md_start_line_hook() ia64_start_line () |
| 112 | #define tc_unrecognized_line(ch) ia64_unrecognized_line (ch) |
| 113 | #define tc_frob_label(s) ia64_frob_label (s) |
| 114 | #define md_flush_pending_output() ia64_flush_pending_output () |
| 115 | #define md_parse_name(s,e,c) ia64_parse_name (s, e) |
| 116 | #define tc_canonicalize_symbol_name(s) ia64_canonicalize_symbol_name (s) |
| 117 | #define tc_canonicalize_section_name(s) ia64_canonicalize_symbol_name (s) |
| 118 | #define md_optimize_expr(l,o,r) ia64_optimize_expr (l, o, r) |
| 119 | #define md_cons_align(n) ia64_cons_align (n) |
| 120 | #define TC_FORCE_RELOCATION(f) ia64_force_relocation (f) |
| 121 | #define tc_fix_adjustable(f) ia64_fix_adjustable (f) |
| 122 | #define MD_APPLY_SYM_VALUE(FIX) 0 |
| 123 | #define md_convert_frag(b,s,f) as_fatal ("ia64_convert_frag") |
| 124 | #define md_create_long_jump(p,f,t,fr,s) as_fatal ("ia64_create_long_jump") |
| 125 | #define md_create_short_jump(p,f,t,fr,s) \ |
| 126 | as_fatal ("ia64_create_short_jump") |
| 127 | #define md_estimate_size_before_relax(f,s) \ |
| 128 | (as_fatal ("ia64_estimate_size_before_relax"), 1) |
| 129 | #define md_elf_section_letter ia64_elf_section_letter |
| 130 | #define md_elf_section_flags ia64_elf_section_flags |
| 131 | #define TC_FIX_TYPE struct ia64_fix |
| 132 | #define TC_INIT_FIX_DATA(f) { f->tc_fix_data.opnd = 0; } |
| 133 | #define TC_CONS_FIX_NEW(f,o,l,e) ia64_cons_fix_new (f, o, l, e) |
| 134 | #define TC_VALIDATE_FIX(fix,seg,skip) ia64_validate_fix (fix) |
| 135 | #define MD_PCREL_FROM_SECTION(fix,sec) ia64_pcrel_from_section (fix, sec) |
| 136 | #define md_section_align(seg,size) (size) |
| 137 | #define md_do_align(n,f,l,m,j) ia64_md_do_align (n,f,l,m) |
| 138 | #define HANDLE_ALIGN(f) ia64_handle_align (f) |
| 139 | #define md_elf_section_type(str,len) ia64_elf_section_type (str, len) |
| 140 | #define md_after_parse_args() ia64_after_parse_args () |
| 141 | #define TC_DWARF2_EMIT_OFFSET ia64_dwarf2_emit_offset |
| 142 | #define tc_check_label(l) ia64_check_label (l) |
| 143 | |
| 144 | #define MAX_MEM_FOR_RS_ALIGN_CODE (15 + 16) |
| 145 | |
| 146 | #define WORKING_DOT_WORD /* don't do broken word processing for now */ |
| 147 | |
| 148 | #define ELF_TC_SPECIAL_SECTIONS \ |
| 149 | { ".sbss", SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_IA_64_SHORT }, \ |
| 150 | { ".sdata", SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_IA_64_SHORT }, |
| 151 | |
| 152 | #define DWARF2_LINE_MIN_INSN_LENGTH 1 /* so slot-multipliers can be 1 */ |
| 153 | |
| 154 | /* This is the information required for unwind records in an ia64 |
| 155 | object file. This is required by GAS and the compiler runtime. */ |
| 156 | |
| 157 | /* These are the starting point masks for the various types of |
| 158 | unwind records. To create a record of type R3 for instance, one |
| 159 | starts by using the value UNW_R3 and or-ing in any other required values. |
| 160 | These values are also unique (in context), so they can be used to identify |
| 161 | the various record types as well. UNW_Bx and some UNW_Px do have the |
| 162 | same value, but Px can only occur in a prologue context, and Bx in |
| 163 | a body context. */ |
| 164 | |
| 165 | #define UNW_R1 0x00 |
| 166 | #define UNW_R2 0x40 |
| 167 | #define UNW_R3 0x60 |
| 168 | #define UNW_P1 0x80 |
| 169 | #define UNW_P2 0xA0 |
| 170 | #define UNW_P3 0xB0 |
| 171 | #define UNW_P4 0xB8 |
| 172 | #define UNW_P5 0xB9 |
| 173 | #define UNW_P6 0xC0 |
| 174 | #define UNW_P7 0xE0 |
| 175 | #define UNW_P8 0xF0 |
| 176 | #define UNW_P9 0xF1 |
| 177 | #define UNW_P10 0xFF |
| 178 | #define UNW_X1 0xF9 |
| 179 | #define UNW_X2 0xFA |
| 180 | #define UNW_X3 0xFB |
| 181 | #define UNW_X4 0xFC |
| 182 | #define UNW_B1 0x80 |
| 183 | #define UNW_B2 0xC0 |
| 184 | #define UNW_B3 0xE0 |
| 185 | #define UNW_B4 0xF0 |
| 186 | |
| 187 | /* These are all the various types of unwind records. */ |
| 188 | |
| 189 | typedef enum |
| 190 | { |
| 191 | prologue, prologue_gr, body, mem_stack_f, mem_stack_v, psp_gr, psp_sprel, |
| 192 | rp_when, rp_gr, rp_br, rp_psprel, rp_sprel, pfs_when, pfs_gr, pfs_psprel, |
| 193 | pfs_sprel, preds_when, preds_gr, preds_psprel, preds_sprel, |
| 194 | fr_mem, frgr_mem, gr_gr, gr_mem, br_mem, br_gr, spill_base, spill_mask, |
| 195 | unat_when, unat_gr, unat_psprel, unat_sprel, lc_when, lc_gr, lc_psprel, |
| 196 | lc_sprel, fpsr_when, fpsr_gr, fpsr_psprel, fpsr_sprel, |
| 197 | priunat_when_gr, priunat_when_mem, priunat_gr, priunat_psprel, |
| 198 | priunat_sprel, bsp_when, bsp_gr, bsp_psprel, bsp_sprel, bspstore_when, |
| 199 | bspstore_gr, bspstore_psprel, bspstore_sprel, rnat_when, rnat_gr, |
| 200 | rnat_psprel, rnat_sprel, epilogue, label_state, copy_state, |
| 201 | spill_psprel, spill_sprel, spill_reg, spill_psprel_p, spill_sprel_p, |
| 202 | spill_reg_p, unwabi |
| 203 | } unw_record_type; |
| 204 | |
| 205 | /* These structures declare the fields that can be used in each of the |
| 206 | 4 record formats, R, P, B and X. */ |
| 207 | |
| 208 | typedef struct unw_r_record |
| 209 | { |
| 210 | unsigned long rlen; |
| 211 | unsigned short grmask; |
| 212 | unsigned short grsave; |
| 213 | /* masks to represent the union of save.g, save.f, save.b, and |
| 214 | save.gf: */ |
| 215 | unsigned long imask_size; |
| 216 | struct |
| 217 | { |
| 218 | unsigned char *i; |
| 219 | unsigned long fr_mem; |
| 220 | unsigned char gr_mem; |
| 221 | unsigned char br_mem; |
| 222 | } mask; |
| 223 | } unw_r_record; |
| 224 | |
| 225 | typedef struct unw_p_record |
| 226 | { |
| 227 | void *imask; |
| 228 | unsigned long t; |
| 229 | unsigned long size; |
| 230 | unsigned long spoff; |
| 231 | unsigned long br; |
| 232 | unsigned long pspoff; |
| 233 | unsigned short gr; |
| 234 | unsigned short rmask; |
| 235 | unsigned short grmask; |
| 236 | unsigned long frmask; |
| 237 | unsigned short brmask; |
| 238 | unsigned char abi; |
| 239 | unsigned char context; |
| 240 | } unw_p_record; |
| 241 | |
| 242 | typedef struct unw_b_record |
| 243 | { |
| 244 | unsigned long t; |
| 245 | unsigned long label; |
| 246 | unsigned short ecount; |
| 247 | } unw_b_record; |
| 248 | |
| 249 | typedef struct unw_x_record |
| 250 | { |
| 251 | unsigned long t; |
| 252 | unsigned long spoff; |
| 253 | unsigned long pspoff; |
| 254 | unsigned short reg; |
| 255 | unsigned short treg; |
| 256 | unsigned short qp; |
| 257 | unsigned short ab; /* Value of the AB field.. */ |
| 258 | unsigned short xy; /* Value of the XY field.. */ |
| 259 | } unw_x_record; |
| 260 | |
| 261 | /* This structure is used to determine the specific record type and |
| 262 | its fields. */ |
| 263 | typedef struct unwind_record |
| 264 | { |
| 265 | unw_record_type type; |
| 266 | union { |
| 267 | unw_r_record r; |
| 268 | unw_p_record p; |
| 269 | unw_b_record b; |
| 270 | unw_x_record x; |
| 271 | } record; |
| 272 | } unwind_record; |
| 273 | |
| 274 | /* This expression evaluates to true if the relocation is for a local |
| 275 | object for which we still want to do the relocation at runtime. |
| 276 | False if we are willing to perform this relocation while building |
| 277 | the .o file. */ |
| 278 | |
| 279 | /* If the reloc type is BFD_RELOC_UNUSED, then this is for a TAG13/TAG13b field |
| 280 | which has no external reloc, so we must resolve the value now. */ |
| 281 | |
| 282 | #define TC_FORCE_RELOCATION_LOCAL(FIX) \ |
| 283 | ((FIX)->fx_r_type != BFD_RELOC_UNUSED \ |
| 284 | && (!(FIX)->fx_pcrel \ |
| 285 | || (FIX)->fx_plt \ |
| 286 | || TC_FORCE_RELOCATION (FIX))) |