| 1 | /* This file is tc-arm.h |
| 2 | Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, |
| 3 | 2004, 2005, 2006, 2007, 2008, 2009 Free Software Foundation, Inc. |
| 4 | Contributed by Richard Earnshaw (rwe@pegasus.esprit.ec.org) |
| 5 | Modified by David Taylor (dtaylor@armltd.co.uk) |
| 6 | |
| 7 | This file is part of GAS, the GNU Assembler. |
| 8 | |
| 9 | GAS is free software; you can redistribute it and/or modify |
| 10 | it under the terms of the GNU General Public License as published by |
| 11 | the Free Software Foundation; either version 3, or (at your option) |
| 12 | any later version. |
| 13 | |
| 14 | GAS is distributed in the hope that it will be useful, |
| 15 | but WITHOUT ANY WARRANTY; without even the implied warranty of |
| 16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| 17 | GNU General Public License for more details. |
| 18 | |
| 19 | You should have received a copy of the GNU General Public License |
| 20 | along with GAS; see the file COPYING. If not, write to the Free |
| 21 | Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA |
| 22 | 02110-1301, USA. */ |
| 23 | |
| 24 | #define TC_ARM 1 |
| 25 | |
| 26 | #ifndef TARGET_BYTES_BIG_ENDIAN |
| 27 | #define TARGET_BYTES_BIG_ENDIAN 0 |
| 28 | #endif |
| 29 | |
| 30 | #define WORKING_DOT_WORD |
| 31 | |
| 32 | #define COFF_MAGIC ARMMAGIC |
| 33 | #define TARGET_ARCH bfd_arch_arm |
| 34 | |
| 35 | #define DIFF_EXPR_OK |
| 36 | |
| 37 | #ifdef LITTLE_ENDIAN |
| 38 | #undef LITTLE_ENDIAN |
| 39 | #endif |
| 40 | |
| 41 | #ifdef BIG_ENDIAN |
| 42 | #undef BIG_ENDIAN |
| 43 | #endif |
| 44 | |
| 45 | #define LITTLE_ENDIAN 1234 |
| 46 | #define BIG_ENDIAN 4321 |
| 47 | |
| 48 | struct fix; |
| 49 | |
| 50 | #if defined OBJ_AOUT |
| 51 | # if defined TE_RISCIX |
| 52 | # define TARGET_FORMAT "a.out-riscix" |
| 53 | # elif defined TE_LINUX |
| 54 | # define ARM_BI_ENDIAN |
| 55 | # define TARGET_FORMAT "a.out-arm-linux" |
| 56 | # elif defined TE_NetBSD |
| 57 | # define TARGET_FORMAT "a.out-arm-netbsd" |
| 58 | # else |
| 59 | # define ARM_BI_ENDIAN |
| 60 | # define TARGET_FORMAT (target_big_endian ? "a.out-arm-big" : "a.out-arm-little") |
| 61 | # endif |
| 62 | #elif defined OBJ_AIF |
| 63 | # define TARGET_FORMAT "aif" |
| 64 | #elif defined OBJ_COFF |
| 65 | # define ARM_BI_ENDIAN |
| 66 | # if defined TE_PE |
| 67 | # if defined TE_EPOC |
| 68 | # define TARGET_FORMAT (target_big_endian ? "epoc-pe-arm-big" : "epoc-pe-arm-little") |
| 69 | # elif defined TE_WINCE |
| 70 | # define TARGET_FORMAT (target_big_endian ? "pe-arm-wince-big" : "pe-arm-wince-little") |
| 71 | # else |
| 72 | # define TARGET_FORMAT (target_big_endian ? "pe-arm-big" : "pe-arm-little") |
| 73 | # endif |
| 74 | # else |
| 75 | # define TARGET_FORMAT (target_big_endian ? "coff-arm-big" : "coff-arm-little") |
| 76 | # endif |
| 77 | #elif defined OBJ_ELF |
| 78 | # define ARM_BI_ENDIAN |
| 79 | # define TARGET_FORMAT elf32_arm_target_format () |
| 80 | #endif |
| 81 | |
| 82 | #define TC_FORCE_RELOCATION(FIX) arm_force_relocation (FIX) |
| 83 | |
| 84 | #define md_relax_frag(segment, fragp, stretch) \ |
| 85 | arm_relax_frag (segment, fragp, stretch) |
| 86 | extern int arm_relax_frag (asection *, struct frag *, long); |
| 87 | |
| 88 | #define md_optimize_expr(l,o,r) arm_optimize_expr (l, o, r) |
| 89 | extern int arm_optimize_expr (expressionS *, operatorT, expressionS *); |
| 90 | |
| 91 | #define md_cleanup() arm_cleanup () |
| 92 | |
| 93 | #define md_start_line_hook() arm_start_line_hook () |
| 94 | |
| 95 | #define tc_frob_label(S) arm_frob_label (S) |
| 96 | |
| 97 | /* We also need to mark assembler created symbols: */ |
| 98 | #define tc_frob_fake_label(S) arm_frob_label (S) |
| 99 | |
| 100 | #ifdef OBJ_ELF |
| 101 | #define md_end arm_md_end |
| 102 | extern void arm_md_end (void); |
| 103 | bfd_boolean arm_is_eabi (void); |
| 104 | #endif |
| 105 | |
| 106 | /* NOTE: The fake label creation in stabs.c:s_stab_generic() has |
| 107 | deliberately not been updated to mark assembler created stabs |
| 108 | symbols as Thumb. */ |
| 109 | |
| 110 | #define TC_FIX_TYPE int |
| 111 | #define TC_INIT_FIX_DATA(FIX) ((FIX)->tc_fix_data = 0) |
| 112 | |
| 113 | /* We need to keep some local information on symbols. */ |
| 114 | |
| 115 | #define TC_SYMFIELD_TYPE unsigned int |
| 116 | #define ARM_GET_FLAG(s) (*symbol_get_tc (s)) |
| 117 | #define ARM_SET_FLAG(s,v) (*symbol_get_tc (s) |= (v)) |
| 118 | #define ARM_RESET_FLAG(s,v) (*symbol_get_tc (s) &= ~(v)) |
| 119 | |
| 120 | #define ARM_FLAG_THUMB (1 << 0) /* The symbol is a Thumb symbol rather than an Arm symbol. */ |
| 121 | #define ARM_FLAG_INTERWORK (1 << 1) /* The symbol is attached to code that supports interworking. */ |
| 122 | #define THUMB_FLAG_FUNC (1 << 2) /* The symbol is attached to the start of a Thumb function. */ |
| 123 | |
| 124 | #define ARM_IS_THUMB(s) (ARM_GET_FLAG (s) & ARM_FLAG_THUMB) |
| 125 | #define ARM_IS_INTERWORK(s) (ARM_GET_FLAG (s) & ARM_FLAG_INTERWORK) |
| 126 | |
| 127 | #ifdef OBJ_ELF |
| 128 | |
| 129 | /* For ELF objects THUMB_IS_FUNC is inferred from |
| 130 | ARM_IS_THUMB and the function type. */ |
| 131 | #define THUMB_IS_FUNC(s) \ |
| 132 | ((s) != NULL \ |
| 133 | && ((arm_is_eabi () \ |
| 134 | && (ARM_IS_THUMB (s)) \ |
| 135 | && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION)) \ |
| 136 | || (ARM_GET_FLAG (s) & THUMB_FLAG_FUNC))) |
| 137 | |
| 138 | #define ARM_IS_FUNC(s) \ |
| 139 | (((s) != NULL \ |
| 140 | && arm_is_eabi () \ |
| 141 | && !(ARM_IS_THUMB (s)) \ |
| 142 | /* && !(THUMB_FLAG_FUNC & ARM_GET_FLAG (s)) \ */ \ |
| 143 | && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION))) |
| 144 | |
| 145 | |
| 146 | #else |
| 147 | |
| 148 | #define THUMB_IS_FUNC(s) ((s) && ARM_GET_FLAG (s) & THUMB_FLAG_FUNC) |
| 149 | #define ARM_IS_FUNC(s) (!THUMB_IS_FUNC (s) \ |
| 150 | && (s) && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION)) |
| 151 | #endif |
| 152 | |
| 153 | #define ARM_SET_THUMB(s,t) ((t) ? ARM_SET_FLAG (s, ARM_FLAG_THUMB) : ARM_RESET_FLAG (s, ARM_FLAG_THUMB)) |
| 154 | #define ARM_SET_INTERWORK(s,t) ((t) ? ARM_SET_FLAG (s, ARM_FLAG_INTERWORK) : ARM_RESET_FLAG (s, ARM_FLAG_INTERWORK)) |
| 155 | #define THUMB_SET_FUNC(s,t) ((t) ? ARM_SET_FLAG (s, THUMB_FLAG_FUNC) : ARM_RESET_FLAG (s, THUMB_FLAG_FUNC)) |
| 156 | |
| 157 | void arm_copy_symbol_attributes (symbolS *, symbolS *); |
| 158 | |
| 159 | #ifndef TC_COPY_SYMBOL_ATTRIBUTES |
| 160 | #define TC_COPY_SYMBOL_ATTRIBUTES(DEST, SRC) \ |
| 161 | (arm_copy_symbol_attributes (DEST, SRC)) |
| 162 | #endif |
| 163 | |
| 164 | #define TC_START_LABEL(C,S,STR) (C == ':' || (C == '/' && arm_data_in_code ())) |
| 165 | #define tc_canonicalize_symbol_name(str) arm_canonicalize_symbol_name (str); |
| 166 | #define obj_adjust_symtab() arm_adjust_symtab () |
| 167 | |
| 168 | #define LISTING_HEADER "ARM GAS " |
| 169 | |
| 170 | #define OPTIONAL_REGISTER_PREFIX '%' |
| 171 | |
| 172 | #define LOCAL_LABEL(name) (name[0] == '.' && name[1] == 'L') |
| 173 | #define LOCAL_LABELS_FB 1 |
| 174 | |
| 175 | /* This expression evaluates to true if the relocation is for a local |
| 176 | object for which we still want to do the relocation at runtime. |
| 177 | False if we are willing to perform this relocation while building |
| 178 | the .o file. GOTOFF does not need to be checked here because it is |
| 179 | not pcrel. I am not sure if some of the others are ever used with |
| 180 | pcrel, but it is easier to be safe than sorry. */ |
| 181 | |
| 182 | #define TC_FORCE_RELOCATION_LOCAL(FIX) \ |
| 183 | (!(FIX)->fx_pcrel \ |
| 184 | || (FIX)->fx_r_type == BFD_RELOC_ARM_GOT32 \ |
| 185 | || (FIX)->fx_r_type == BFD_RELOC_32 \ |
| 186 | || ((FIX)->fx_addsy != NULL && S_IS_WEAK ((FIX)->fx_addsy)) \ |
| 187 | || TC_FORCE_RELOCATION (FIX)) |
| 188 | |
| 189 | /* Force output of R_ARM_REL32 relocations against thumb function symbols. |
| 190 | This is needed to ensure the low bit is handled correctly. */ |
| 191 | #define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEG) \ |
| 192 | (THUMB_IS_FUNC ((FIX)->fx_addsy) \ |
| 193 | || !SEG_NORMAL (SEG)) |
| 194 | |
| 195 | #define TC_CONS_FIX_NEW cons_fix_new_arm |
| 196 | |
| 197 | #define MAX_MEM_ALIGNMENT_BYTES 6 |
| 198 | #define MAX_MEM_FOR_RS_ALIGN_CODE ((1 << MAX_MEM_ALIGNMENT_BYTES) - 1) |
| 199 | |
| 200 | /* For frags in code sections we need to record whether they contain |
| 201 | ARM code or THUMB code. This is that if they have to be aligned, |
| 202 | they can contain the correct type of no-op instruction. */ |
| 203 | struct arm_frag_type |
| 204 | { |
| 205 | int thumb_mode; |
| 206 | #ifdef OBJ_ELF |
| 207 | /* If there is a mapping symbol at offset 0 in this frag, |
| 208 | it will be saved in FIRST_MAP. If there are any mapping |
| 209 | symbols in this frag, the last one will be saved in |
| 210 | LAST_MAP. */ |
| 211 | symbolS *first_map, *last_map; |
| 212 | #endif |
| 213 | }; |
| 214 | |
| 215 | #define TC_FRAG_TYPE struct arm_frag_type |
| 216 | /* NOTE: max_chars is a local variable from frag_var / frag_variant. */ |
| 217 | #define TC_FRAG_INIT(fragp) arm_init_frag (fragp, max_chars) |
| 218 | #define HANDLE_ALIGN(fragp) arm_handle_align (fragp) |
| 219 | |
| 220 | #define md_do_align(N, FILL, LEN, MAX, LABEL) \ |
| 221 | if (FILL == NULL && (N) != 0 && ! need_pass_2 && subseg_text_p (now_seg)) \ |
| 222 | { \ |
| 223 | arm_frag_align_code (N, MAX); \ |
| 224 | goto LABEL; \ |
| 225 | } |
| 226 | |
| 227 | #define DWARF2_LINE_MIN_INSN_LENGTH 2 |
| 228 | |
| 229 | /* The lr register is r14. */ |
| 230 | #define DWARF2_DEFAULT_RETURN_COLUMN 14 |
| 231 | |
| 232 | /* Registers are generally saved at negative offsets to the CFA. */ |
| 233 | #define DWARF2_CIE_DATA_ALIGNMENT (-4) |
| 234 | |
| 235 | /* State variables for IT block handling. */ |
| 236 | enum it_state |
| 237 | { |
| 238 | OUTSIDE_IT_BLOCK, MANUAL_IT_BLOCK, AUTOMATIC_IT_BLOCK |
| 239 | }; |
| 240 | struct current_it |
| 241 | { |
| 242 | int mask; |
| 243 | enum it_state state; |
| 244 | int cc; |
| 245 | int block_length; |
| 246 | char *insn; |
| 247 | int state_handled; |
| 248 | }; |
| 249 | |
| 250 | #ifdef OBJ_ELF |
| 251 | # define obj_frob_symbol(sym, punt) armelf_frob_symbol ((sym), & (punt)) |
| 252 | # define md_elf_section_change_hook() arm_elf_change_section () |
| 253 | # define md_elf_section_type(str, len) arm_elf_section_type (str, len) |
| 254 | # define GLOBAL_OFFSET_TABLE_NAME "_GLOBAL_OFFSET_TABLE_" |
| 255 | # define TC_SEGMENT_INFO_TYPE struct arm_segment_info_type |
| 256 | |
| 257 | /* This is not really an alignment operation, but it's something we |
| 258 | need to do at the same time: whenever we are figuring out the |
| 259 | alignment for data, we should check whether a $d symbol is |
| 260 | necessary. */ |
| 261 | # define md_cons_align(nbytes) mapping_state (MAP_DATA) |
| 262 | |
| 263 | enum mstate |
| 264 | { |
| 265 | MAP_UNDEFINED = 0, /* Must be zero, for seginfo in new sections. */ |
| 266 | MAP_DATA, |
| 267 | MAP_ARM, |
| 268 | MAP_THUMB |
| 269 | }; |
| 270 | |
| 271 | void mapping_state (enum mstate); |
| 272 | |
| 273 | struct arm_segment_info_type |
| 274 | { |
| 275 | enum mstate mapstate; |
| 276 | |
| 277 | /* Bit N indicates that an R_ARM_NONE relocation has been output for |
| 278 | __aeabi_unwind_cpp_prN already if set. This enables dependencies to be |
| 279 | emitted only once per section, to save unnecessary bloat. */ |
| 280 | unsigned int marked_pr_dependency; |
| 281 | |
| 282 | struct current_it current_it; |
| 283 | }; |
| 284 | |
| 285 | /* We want .cfi_* pseudo-ops for generating unwind info. */ |
| 286 | #define TARGET_USE_CFIPOP 1 |
| 287 | |
| 288 | /* CFI hooks. */ |
| 289 | #define tc_regname_to_dw2regnum tc_arm_regname_to_dw2regnum |
| 290 | #define tc_cfi_frame_initial_instructions tc_arm_frame_initial_instructions |
| 291 | |
| 292 | #else /* Not OBJ_ELF. */ |
| 293 | #define GLOBAL_OFFSET_TABLE_NAME "__GLOBAL_OFFSET_TABLE_" |
| 294 | #endif |
| 295 | |
| 296 | #if defined OBJ_ELF || defined OBJ_COFF |
| 297 | |
| 298 | # define EXTERN_FORCE_RELOC 1 |
| 299 | # define tc_fix_adjustable(FIX) arm_fix_adjustable (FIX) |
| 300 | #endif |
| 301 | |
| 302 | #ifdef OBJ_ELF |
| 303 | /* Values passed to md_apply_fix don't include the symbol value. */ |
| 304 | # define MD_APPLY_SYM_VALUE(FIX) arm_apply_sym_value (FIX) |
| 305 | #endif |
| 306 | |
| 307 | #ifdef OBJ_COFF |
| 308 | # define TC_VALIDATE_FIX(FIX, SEGTYPE, LABEL) arm_validate_fix (FIX) |
| 309 | /* Values passed to md_apply_fix don't include the symbol value. */ |
| 310 | # define MD_APPLY_SYM_VALUE(FIX) 0 |
| 311 | #endif |
| 312 | |
| 313 | #define MD_PCREL_FROM_SECTION(F,S) md_pcrel_from_section(F,S) |
| 314 | |
| 315 | extern long md_pcrel_from_section (struct fix *, segT); |
| 316 | extern void arm_frag_align_code (int, int); |
| 317 | extern void arm_validate_fix (struct fix *); |
| 318 | extern const char * elf32_arm_target_format (void); |
| 319 | extern void arm_elf_change_section (void); |
| 320 | extern int arm_force_relocation (struct fix *); |
| 321 | extern void arm_cleanup (void); |
| 322 | extern void arm_start_line_hook (void); |
| 323 | extern void arm_frob_label (symbolS *); |
| 324 | extern int arm_data_in_code (void); |
| 325 | extern char * arm_canonicalize_symbol_name (char *); |
| 326 | extern void arm_adjust_symtab (void); |
| 327 | extern void armelf_frob_symbol (symbolS *, int *); |
| 328 | extern void cons_fix_new_arm (fragS *, int, int, expressionS *); |
| 329 | extern void arm_init_frag (struct frag *, int); |
| 330 | extern void arm_handle_align (struct frag *); |
| 331 | extern bfd_boolean arm_fix_adjustable (struct fix *); |
| 332 | extern int arm_elf_section_type (const char *, size_t); |
| 333 | extern int tc_arm_regname_to_dw2regnum (char *regname); |
| 334 | extern void tc_arm_frame_initial_instructions (void); |
| 335 | |
| 336 | #ifdef TE_PE |
| 337 | |
| 338 | #define O_secrel O_md1 |
| 339 | |
| 340 | #define TC_DWARF2_EMIT_OFFSET tc_pe_dwarf2_emit_offset |
| 341 | void tc_pe_dwarf2_emit_offset (symbolS *, unsigned int); |
| 342 | |
| 343 | #endif /* TE_PE */ |
| 344 | |
| 345 | #ifdef OBJ_ELF |
| 346 | #define CONVERT_SYMBOLIC_ATTRIBUTE(name) arm_convert_symbolic_attribute (name) |
| 347 | extern int arm_convert_symbolic_attribute (const char *); |
| 348 | extern int arm_apply_sym_value (struct fix *); |
| 349 | #endif |