xref: /netbsd-src/external/gpl3/binutils.old/dist/gas/config/tc-arm.h (revision fdd524d4ccd2bb0c6f67401e938dabf773eb0372)
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, 2012  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 /* We support double slash line-comments for compatibility with the ARM AArch64 Assembler.  */
83 #define DOUBLESLASH_LINE_COMMENTS
84 
85 #define tc_symbol_chars arm_symbol_chars
86 extern const char arm_symbol_chars[];
87 
88 #define TC_FORCE_RELOCATION(FIX) arm_force_relocation (FIX)
89 
90 extern unsigned int arm_frag_max_var (struct frag *);
91 #define md_frag_max_var arm_frag_max_var
92 
93 #define md_relax_frag(segment, fragp, stretch) \
94   arm_relax_frag (segment, fragp, stretch)
95 extern int arm_relax_frag (asection *, struct frag *, long);
96 
97 #define md_optimize_expr(l,o,r)		arm_optimize_expr (l, o, r)
98 extern int arm_optimize_expr (expressionS *, operatorT, expressionS *);
99 
100 #define md_cleanup() arm_cleanup ()
101 
102 #define md_start_line_hook() arm_start_line_hook ()
103 
104 #define tc_frob_label(S) arm_frob_label (S)
105 
106 /* We also need to mark assembler created symbols:  */
107 #define tc_frob_fake_label(S) arm_frob_label (S)
108 
109 #ifdef OBJ_ELF
110 #define md_end arm_md_end
111 extern void arm_md_end (void);
112 bfd_boolean arm_is_eabi (void);
113 #endif
114 
115 /* NOTE: The fake label creation in stabs.c:s_stab_generic() has
116    deliberately not been updated to mark assembler created stabs
117    symbols as Thumb.  */
118 
119 #define TC_FIX_TYPE int
120 #define TC_INIT_FIX_DATA(FIX) ((FIX)->tc_fix_data = 0)
121 
122 /* We need to keep some local information on symbols.  */
123 
124 #define TC_SYMFIELD_TYPE 	unsigned int
125 #define ARM_GET_FLAG(s)   	(*symbol_get_tc (s))
126 #define ARM_SET_FLAG(s,v) 	(*symbol_get_tc (s) |= (v))
127 #define ARM_RESET_FLAG(s,v) 	(*symbol_get_tc (s) &= ~(v))
128 
129 #define ARM_FLAG_THUMB 		(1 << 0)	/* The symbol is a Thumb symbol rather than an Arm symbol.  */
130 #define ARM_FLAG_INTERWORK 	(1 << 1)	/* The symbol is attached to code that supports interworking.  */
131 #define THUMB_FLAG_FUNC		(1 << 2)	/* The symbol is attached to the start of a Thumb function.  */
132 
133 #define ARM_IS_THUMB(s)		(ARM_GET_FLAG (s) & ARM_FLAG_THUMB)
134 #define ARM_IS_INTERWORK(s)	(ARM_GET_FLAG (s) & ARM_FLAG_INTERWORK)
135 
136 #ifdef OBJ_ELF
137 
138 /* For ELF objects THUMB_IS_FUNC is inferred from
139    ARM_IS_THUMB and the function type.  */
140 #define THUMB_IS_FUNC(s)					\
141   ((s) != NULL							\
142    && ((arm_is_eabi ()						\
143 	&& (ARM_IS_THUMB (s))					\
144 	&& (symbol_get_bfdsym (s)->flags & BSF_FUNCTION))	\
145        || (ARM_GET_FLAG (s) & THUMB_FLAG_FUNC)))
146 
147 #define ARM_IS_FUNC(s)					\
148   (((s) != NULL						\
149     && arm_is_eabi ()					\
150     && !(ARM_IS_THUMB (s))				\
151     /* && !(THUMB_FLAG_FUNC & ARM_GET_FLAG (s)) \ */	\
152     && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION)))
153 
154 
155 #else
156 
157 #define THUMB_IS_FUNC(s)	((s) && ARM_GET_FLAG (s) & THUMB_FLAG_FUNC)
158 #define ARM_IS_FUNC(s)          (!THUMB_IS_FUNC (s) \
159 				 && (s) && (symbol_get_bfdsym (s)->flags & BSF_FUNCTION))
160 #endif
161 
162 #define ARM_SET_THUMB(s,t)      ((t) ? ARM_SET_FLAG (s, ARM_FLAG_THUMB)     : ARM_RESET_FLAG (s, ARM_FLAG_THUMB))
163 #define ARM_SET_INTERWORK(s,t)  ((t) ? ARM_SET_FLAG (s, ARM_FLAG_INTERWORK) : ARM_RESET_FLAG (s, ARM_FLAG_INTERWORK))
164 #define THUMB_SET_FUNC(s,t)     ((t) ? ARM_SET_FLAG (s, THUMB_FLAG_FUNC)    : ARM_RESET_FLAG (s, THUMB_FLAG_FUNC))
165 
166 void arm_copy_symbol_attributes (symbolS *, symbolS *);
167 
168 #ifndef TC_COPY_SYMBOL_ATTRIBUTES
169 #define TC_COPY_SYMBOL_ATTRIBUTES(DEST, SRC) \
170   (arm_copy_symbol_attributes (DEST, SRC))
171 #endif
172 
173 #define TC_START_LABEL(C,S,STR)            (C == ':' || (C == '/' && arm_data_in_code ()))
174 #define tc_canonicalize_symbol_name(str) arm_canonicalize_symbol_name (str);
175 #define obj_adjust_symtab() 		 arm_adjust_symtab ()
176 
177 #define LISTING_HEADER "ARM GAS "
178 
179 #define OPTIONAL_REGISTER_PREFIX '%'
180 
181 #define LOCAL_LABEL(name)  (name[0] == '.' && name[1] == 'L')
182 #define LOCAL_LABELS_FB    1
183 
184 /* This expression evaluates to true if the relocation is for a local
185    object for which we still want to do the relocation at runtime.
186    False if we are willing to perform this relocation while building
187    the .o file.  GOTOFF does not need to be checked here because it is
188    not pcrel.  I am not sure if some of the others are ever used with
189    pcrel, but it is easier to be safe than sorry.  */
190 
191 #define TC_FORCE_RELOCATION_LOCAL(FIX)			\
192   (!(FIX)->fx_pcrel					\
193    || (FIX)->fx_r_type == BFD_RELOC_ARM_GOT32		\
194    || (FIX)->fx_r_type == BFD_RELOC_32			\
195    || ((FIX)->fx_addsy != NULL && S_IS_WEAK ((FIX)->fx_addsy))	\
196    || TC_FORCE_RELOCATION (FIX))
197 
198 /* Force output of R_ARM_REL32 relocations against thumb function symbols.
199    This is needed to ensure the low bit is handled correctly.  */
200 #define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEG)	\
201   (THUMB_IS_FUNC ((FIX)->fx_addsy)		\
202    || !SEG_NORMAL (SEG))
203 
204 #define TC_FORCE_RELOCATION_ABS(FIX)			\
205   (((FIX)->fx_pcrel					\
206     && (FIX)->fx_r_type != BFD_RELOC_32			\
207     && (FIX)->fx_r_type != BFD_RELOC_ARM_GOT32)		\
208    || TC_FORCE_RELOCATION(FIX))
209 
210 #define TC_CONS_FIX_NEW cons_fix_new_arm
211 
212 #define MAX_MEM_ALIGNMENT_BYTES    6
213 #define MAX_MEM_FOR_RS_ALIGN_CODE ((1 << MAX_MEM_ALIGNMENT_BYTES) - 1)
214 
215 /* For frags in code sections we need to record whether they contain
216    ARM code or THUMB code.  This is that if they have to be aligned,
217    they can contain the correct type of no-op instruction.  */
218 struct arm_frag_type
219 {
220   int thumb_mode;
221 #ifdef OBJ_ELF
222   /* If there is a mapping symbol at offset 0 in this frag,
223      it will be saved in FIRST_MAP.  If there are any mapping
224      symbols in this frag, the last one will be saved in
225      LAST_MAP.  */
226   symbolS *first_map, *last_map;
227 #endif
228 };
229 
230 #define TC_FRAG_TYPE		struct arm_frag_type
231 /* NOTE: max_chars is a local variable from frag_var / frag_variant.  */
232 #define TC_FRAG_INIT(fragp)	arm_init_frag (fragp, max_chars)
233 #define HANDLE_ALIGN(fragp)	arm_handle_align (fragp)
234 
235 #define md_do_align(N, FILL, LEN, MAX, LABEL)					\
236   if (FILL == NULL && (N) != 0 && ! need_pass_2 && subseg_text_p (now_seg))	\
237     {										\
238       arm_frag_align_code (N, MAX);						\
239       goto LABEL;								\
240     }
241 
242 #define DWARF2_LINE_MIN_INSN_LENGTH 	2
243 
244 /* The lr register is r14.  */
245 #define DWARF2_DEFAULT_RETURN_COLUMN  14
246 
247 /* Registers are generally saved at negative offsets to the CFA.  */
248 #define DWARF2_CIE_DATA_ALIGNMENT     (-4)
249 
250 /* State variables for IT block handling.  */
251 enum it_state
252 {
253   OUTSIDE_IT_BLOCK, MANUAL_IT_BLOCK, AUTOMATIC_IT_BLOCK
254 };
255 struct current_it
256 {
257   int mask;
258   enum it_state state;
259   int cc;
260   int block_length;
261   char *insn;
262   int state_handled;
263   int warn_deprecated;
264   int insn_cond;
265 };
266 
267 #ifdef OBJ_ELF
268 # define obj_frob_symbol(sym, punt)	armelf_frob_symbol ((sym), & (punt))
269 # define md_elf_section_change_hook()	arm_elf_change_section ()
270 # define md_elf_section_type(str, len)	arm_elf_section_type (str, len)
271 # define GLOBAL_OFFSET_TABLE_NAME	"_GLOBAL_OFFSET_TABLE_"
272 # define TC_SEGMENT_INFO_TYPE 		struct arm_segment_info_type
273 
274 /* This is not really an alignment operation, but it's something we
275    need to do at the same time: whenever we are figuring out the
276    alignment for data, we should check whether a $d symbol is
277    necessary.  */
278 # define md_cons_align(nbytes)		mapping_state (MAP_DATA)
279 
280 enum mstate
281 {
282   MAP_UNDEFINED = 0, /* Must be zero, for seginfo in new sections.  */
283   MAP_DATA,
284   MAP_ARM,
285   MAP_THUMB
286 };
287 
288 void mapping_state (enum mstate);
289 
290 struct arm_segment_info_type
291 {
292   enum mstate mapstate;
293 
294   /* Bit N indicates that an R_ARM_NONE relocation has been output for
295      __aeabi_unwind_cpp_prN already if set. This enables dependencies to be
296      emitted only once per section, to save unnecessary bloat.  */
297   unsigned int marked_pr_dependency;
298 
299   struct current_it current_it;
300 };
301 
302 /* We want .cfi_* pseudo-ops for generating unwind info.  */
303 #define TARGET_USE_CFIPOP              1
304 
305 /* CFI hooks.  */
306 #define tc_regname_to_dw2regnum            tc_arm_regname_to_dw2regnum
307 #define tc_cfi_frame_initial_instructions  tc_arm_frame_initial_instructions
308 
309 #else /* Not OBJ_ELF.  */
310 #define GLOBAL_OFFSET_TABLE_NAME "__GLOBAL_OFFSET_TABLE_"
311 #endif
312 
313 #if defined OBJ_ELF || defined OBJ_COFF
314 
315 # define EXTERN_FORCE_RELOC 			1
316 # define tc_fix_adjustable(FIX) 		arm_fix_adjustable (FIX)
317 #endif
318 
319 #ifdef OBJ_ELF
320 /* Values passed to md_apply_fix don't include the symbol value.  */
321 # define MD_APPLY_SYM_VALUE(FIX) 		arm_apply_sym_value (FIX)
322 #endif
323 
324 #ifdef OBJ_COFF
325 # define TC_VALIDATE_FIX(FIX, SEGTYPE, LABEL)	arm_validate_fix (FIX)
326 /* Values passed to md_apply_fix don't include the symbol value.  */
327 # define MD_APPLY_SYM_VALUE(FIX) 		0
328 #endif
329 
330 #define MD_PCREL_FROM_SECTION(F,S) md_pcrel_from_section(F,S)
331 
332 extern long md_pcrel_from_section (struct fix *, segT);
333 extern void arm_frag_align_code (int, int);
334 extern void arm_validate_fix (struct fix *);
335 extern const char * elf32_arm_target_format (void);
336 extern void arm_elf_change_section (void);
337 extern int arm_force_relocation (struct fix *);
338 extern void arm_cleanup (void);
339 extern void arm_start_line_hook (void);
340 extern void arm_frob_label (symbolS *);
341 extern int arm_data_in_code (void);
342 extern char * arm_canonicalize_symbol_name (char *);
343 extern void arm_adjust_symtab (void);
344 extern void armelf_frob_symbol (symbolS *, int *);
345 extern void cons_fix_new_arm (fragS *, int, int, expressionS *);
346 extern void arm_init_frag (struct frag *, int);
347 extern void arm_handle_align (struct frag *);
348 extern bfd_boolean arm_fix_adjustable (struct fix *);
349 extern int arm_elf_section_type (const char *, size_t);
350 extern int tc_arm_regname_to_dw2regnum (char *regname);
351 extern void tc_arm_frame_initial_instructions (void);
352 
353 #ifdef TE_PE
354 
355 #define O_secrel O_md1
356 
357 #define TC_DWARF2_EMIT_OFFSET  tc_pe_dwarf2_emit_offset
358 void tc_pe_dwarf2_emit_offset (symbolS *, unsigned int);
359 
360 #endif /* TE_PE */
361 
362 #ifdef OBJ_ELF
363 #define CONVERT_SYMBOLIC_ATTRIBUTE(name) arm_convert_symbolic_attribute (name)
364 extern int arm_convert_symbolic_attribute (const char *);
365 extern int arm_apply_sym_value (struct fix *);
366 #endif
367