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