| 1 | /* This file is tc-arm.h |
| 2 | Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, |
| 3 | 2004, 2005, 2006, 2007 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 | #ifdef OBJ_ELF |
| 127 | |
| 128 | /* For ELF objects THUMB_IS_FUNC is inferred from |
| 129 | ARM_IS_TUMB and the function type. */ |
| 130 | #define THUMB_IS_FUNC(s) \ |
| 131 | ((arm_is_eabi () \ |
| 132 | && (ARM_IS_THUMB (s)) \ |
| 133 | && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION)) \ |
| 134 | || (ARM_GET_FLAG (s) & THUMB_FLAG_FUNC)) |
| 135 | |
| 136 | #else |
| 137 | #define THUMB_IS_FUNC(s) (ARM_GET_FLAG (s) & THUMB_FLAG_FUNC) |
| 138 | #endif |
| 139 | |
| 140 | #define ARM_SET_THUMB(s,t) ((t) ? ARM_SET_FLAG (s, ARM_FLAG_THUMB) : ARM_RESET_FLAG (s, ARM_FLAG_THUMB)) |
| 141 | #define ARM_SET_INTERWORK(s,t) ((t) ? ARM_SET_FLAG (s, ARM_FLAG_INTERWORK) : ARM_RESET_FLAG (s, ARM_FLAG_INTERWORK)) |
| 142 | #define THUMB_SET_FUNC(s,t) ((t) ? ARM_SET_FLAG (s, THUMB_FLAG_FUNC) : ARM_RESET_FLAG (s, THUMB_FLAG_FUNC)) |
| 143 | |
| 144 | void arm_copy_symbol_attributes (symbolS *, symbolS *); |
| 145 | #ifndef TC_COPY_SYMBOL_ATTRIBUTES |
| 146 | #define TC_COPY_SYMBOL_ATTRIBUTES(DEST, SRC) \ |
| 147 | (arm_copy_symbol_attributes (DEST, SRC)) |
| 148 | #endif |
| 149 | |
| 150 | #define TC_START_LABEL(C,STR) (c == ':' || (c == '/' && arm_data_in_code ())) |
| 151 | #define tc_canonicalize_symbol_name(str) arm_canonicalize_symbol_name (str); |
| 152 | #define obj_adjust_symtab() arm_adjust_symtab () |
| 153 | |
| 154 | #define LISTING_HEADER "ARM GAS " |
| 155 | |
| 156 | #define OPTIONAL_REGISTER_PREFIX '%' |
| 157 | |
| 158 | #define LOCAL_LABEL(name) (name[0] == '.' && name[1] == 'L') |
| 159 | #define LOCAL_LABELS_FB 1 |
| 160 | |
| 161 | /* This expression evaluates to true if the relocation is for a local |
| 162 | object for which we still want to do the relocation at runtime. |
| 163 | False if we are willing to perform this relocation while building |
| 164 | the .o file. GOTOFF does not need to be checked here because it is |
| 165 | not pcrel. I am not sure if some of the others are ever used with |
| 166 | pcrel, but it is easier to be safe than sorry. */ |
| 167 | |
| 168 | #define TC_FORCE_RELOCATION_LOCAL(FIX) \ |
| 169 | (!(FIX)->fx_pcrel \ |
| 170 | || (FIX)->fx_r_type == BFD_RELOC_ARM_GOT32 \ |
| 171 | || (FIX)->fx_r_type == BFD_RELOC_32 \ |
| 172 | || TC_FORCE_RELOCATION (FIX)) |
| 173 | |
| 174 | /* Force output of R_ARM_REL32 relocations against thumb function symbols. |
| 175 | This is needed to ensure the low bit is handled correctly. */ |
| 176 | #define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEG) \ |
| 177 | (THUMB_IS_FUNC ((FIX)->fx_addsy) \ |
| 178 | || !SEG_NORMAL (SEG)) |
| 179 | |
| 180 | #define TC_CONS_FIX_NEW cons_fix_new_arm |
| 181 | |
| 182 | #define MAX_MEM_FOR_RS_ALIGN_CODE 31 |
| 183 | |
| 184 | /* For frags in code sections we need to record whether they contain |
| 185 | ARM code or THUMB code. This is that if they have to be aligned, |
| 186 | they can contain the correct type of no-op instruction. */ |
| 187 | #define TC_FRAG_TYPE int |
| 188 | #define TC_FRAG_INIT(fragp) arm_init_frag (fragp) |
| 189 | #define HANDLE_ALIGN(fragp) arm_handle_align (fragp) |
| 190 | |
| 191 | #define md_do_align(N, FILL, LEN, MAX, LABEL) \ |
| 192 | if (FILL == NULL && (N) != 0 && ! need_pass_2 && subseg_text_p (now_seg)) \ |
| 193 | { \ |
| 194 | arm_frag_align_code (N, MAX); \ |
| 195 | goto LABEL; \ |
| 196 | } |
| 197 | |
| 198 | #define DWARF2_LINE_MIN_INSN_LENGTH 2 |
| 199 | |
| 200 | /* The lr register is r14. */ |
| 201 | #define DWARF2_DEFAULT_RETURN_COLUMN 14 |
| 202 | |
| 203 | /* Registers are generally saved at negative offsets to the CFA. */ |
| 204 | #define DWARF2_CIE_DATA_ALIGNMENT (-4) |
| 205 | |
| 206 | #ifdef OBJ_ELF |
| 207 | # define obj_frob_symbol(sym, punt) armelf_frob_symbol ((sym), & (punt)) |
| 208 | # define md_elf_section_change_hook() arm_elf_change_section () |
| 209 | # define md_elf_section_type(str, len) arm_elf_section_type (str, len) |
| 210 | # define GLOBAL_OFFSET_TABLE_NAME "_GLOBAL_OFFSET_TABLE_" |
| 211 | # define TC_SEGMENT_INFO_TYPE struct arm_segment_info_type |
| 212 | |
| 213 | /* This is not really an alignment operation, but it's something we |
| 214 | need to do at the same time: whenever we are figuring out the |
| 215 | alignment for data, we should check whether a $d symbol is |
| 216 | necessary. */ |
| 217 | # define md_cons_align(nbytes) mapping_state (MAP_DATA) |
| 218 | |
| 219 | enum mstate |
| 220 | { |
| 221 | MAP_UNDEFINED = 0, /* Must be zero, for seginfo in new sections. */ |
| 222 | MAP_DATA, |
| 223 | MAP_ARM, |
| 224 | MAP_THUMB |
| 225 | }; |
| 226 | |
| 227 | void mapping_state (enum mstate); |
| 228 | |
| 229 | struct arm_segment_info_type |
| 230 | { |
| 231 | enum mstate mapstate; |
| 232 | unsigned int marked_pr_dependency; |
| 233 | }; |
| 234 | |
| 235 | /* We want .cfi_* pseudo-ops for generating unwind info. */ |
| 236 | #define TARGET_USE_CFIPOP 1 |
| 237 | |
| 238 | /* CFI hooks. */ |
| 239 | #define tc_regname_to_dw2regnum tc_arm_regname_to_dw2regnum |
| 240 | #define tc_cfi_frame_initial_instructions tc_arm_frame_initial_instructions |
| 241 | |
| 242 | #else /* Not OBJ_ELF. */ |
| 243 | #define GLOBAL_OFFSET_TABLE_NAME "__GLOBAL_OFFSET_TABLE_" |
| 244 | #endif |
| 245 | |
| 246 | #if defined OBJ_ELF || defined OBJ_COFF |
| 247 | |
| 248 | # define EXTERN_FORCE_RELOC 1 |
| 249 | # define tc_fix_adjustable(FIX) arm_fix_adjustable (FIX) |
| 250 | /* Values passed to md_apply_fix don't include the symbol value. */ |
| 251 | # define MD_APPLY_SYM_VALUE(FIX) 0 |
| 252 | # define TC_VALIDATE_FIX(FIX, SEGTYPE, LABEL) arm_validate_fix (FIX) |
| 253 | |
| 254 | #endif |
| 255 | |
| 256 | #define MD_PCREL_FROM_SECTION(F,S) md_pcrel_from_section(F,S) |
| 257 | |
| 258 | extern long md_pcrel_from_section (struct fix *, segT); |
| 259 | extern void arm_frag_align_code (int, int); |
| 260 | extern void arm_validate_fix (struct fix *); |
| 261 | extern const char * elf32_arm_target_format (void); |
| 262 | extern void arm_elf_change_section (void); |
| 263 | extern int arm_force_relocation (struct fix *); |
| 264 | extern void arm_cleanup (void); |
| 265 | extern void arm_start_line_hook (void); |
| 266 | extern void arm_frob_label (symbolS *); |
| 267 | extern int arm_data_in_code (void); |
| 268 | extern char * arm_canonicalize_symbol_name (char *); |
| 269 | extern void arm_adjust_symtab (void); |
| 270 | extern void armelf_frob_symbol (symbolS *, int *); |
| 271 | extern void cons_fix_new_arm (fragS *, int, int, expressionS *); |
| 272 | extern void arm_init_frag (struct frag *); |
| 273 | extern void arm_handle_align (struct frag *); |
| 274 | extern bfd_boolean arm_fix_adjustable (struct fix *); |
| 275 | extern int arm_elf_section_type (const char *, size_t); |
| 276 | extern int tc_arm_regname_to_dw2regnum (char *regname); |
| 277 | extern void tc_arm_frame_initial_instructions (void); |
| 278 | |
| 279 | #ifdef TE_PE |
| 280 | |
| 281 | #define O_secrel O_md1 |
| 282 | |
| 283 | #define TC_DWARF2_EMIT_OFFSET tc_pe_dwarf2_emit_offset |
| 284 | void tc_pe_dwarf2_emit_offset (symbolS *, unsigned int); |
| 285 | |
| 286 | #endif /* TE_PE */ |