1 /* This file is tc-arm.h
2    Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
3    2004 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 2, 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 #  else
70 #   define TARGET_FORMAT (target_big_endian ? "pe-arm-big" : "pe-arm-little")
71 #  endif
72 # else
73 #  define TARGET_FORMAT (target_big_endian ? "coff-arm-big" : "coff-arm-little")
74 # endif
75 #elif defined OBJ_ELF
76 # define ARM_BI_ENDIAN
77 # define TARGET_FORMAT	elf32_arm_target_format ()
78 #endif
79 
80 #define TC_FORCE_RELOCATION(FIX) arm_force_relocation (FIX)
81 
82 #define md_relax_frag(segment, fragp, stretch) \
83   arm_relax_frag(segment, fragp, stretch)
84 extern int arm_relax_frag (asection *, struct frag *, long);
85 
86 #define md_optimize_expr(l,o,r)		arm_optimize_expr (l, o, r)
87 extern int arm_optimize_expr (expressionS *, operatorT, expressionS *);
88 
89 #define md_cleanup() arm_cleanup ()
90 
91 #define md_start_line_hook() arm_start_line_hook ()
92 
93 #define tc_frob_label(S) arm_frob_label (S)
94 
95 /* We also need to mark assembler created symbols:  */
96 #define tc_frob_fake_label(S) arm_frob_label (S)
97 
98 #ifdef OBJ_ELF
99 #define md_end arm_md_end
100 extern void arm_md_end (void);
101 #endif
102 
103 /* NOTE: The fake label creation in stabs.c:s_stab_generic() has
104    deliberately not been updated to mark assembler created stabs
105    symbols as Thumb.  */
106 
107 #define TC_FIX_TYPE int
108 #define TC_INIT_FIX_DATA(FIX) ((FIX)->tc_fix_data = 0)
109 
110 /* We need to keep some local information on symbols.  */
111 
112 #define TC_SYMFIELD_TYPE 	unsigned int
113 #define ARM_GET_FLAG(s)   	(*symbol_get_tc (s))
114 #define ARM_SET_FLAG(s,v) 	(*symbol_get_tc (s) |= (v))
115 #define ARM_RESET_FLAG(s,v) 	(*symbol_get_tc (s) &= ~(v))
116 
117 #define ARM_FLAG_THUMB 		(1 << 0)	/* The symbol is a Thumb symbol rather than an Arm symbol.  */
118 #define ARM_FLAG_INTERWORK 	(1 << 1)	/* The symbol is attached to code that supports interworking.  */
119 #define THUMB_FLAG_FUNC		(1 << 2)	/* The symbol is attached to the start of a Thumb function.  */
120 
121 #define ARM_IS_THUMB(s)		(ARM_GET_FLAG (s) & ARM_FLAG_THUMB)
122 #define ARM_IS_INTERWORK(s)	(ARM_GET_FLAG (s) & ARM_FLAG_INTERWORK)
123 #define THUMB_IS_FUNC(s)	(ARM_GET_FLAG (s) & THUMB_FLAG_FUNC)
124 
125 #define ARM_SET_THUMB(s,t)      ((t) ? ARM_SET_FLAG (s, ARM_FLAG_THUMB)     : ARM_RESET_FLAG (s, ARM_FLAG_THUMB))
126 #define ARM_SET_INTERWORK(s,t)  ((t) ? ARM_SET_FLAG (s, ARM_FLAG_INTERWORK) : ARM_RESET_FLAG (s, ARM_FLAG_INTERWORK))
127 #define THUMB_SET_FUNC(s,t)     ((t) ? ARM_SET_FLAG (s, THUMB_FLAG_FUNC)    : ARM_RESET_FLAG (s, THUMB_FLAG_FUNC))
128 
129 #define TC_START_LABEL(C,STR)            (c == ':' || (c == '/' && arm_data_in_code ()))
130 #define tc_canonicalize_symbol_name(str) arm_canonicalize_symbol_name (str);
131 #define obj_adjust_symtab() 		 arm_adjust_symtab ()
132 
133 #define LISTING_HEADER "ARM GAS "
134 
135 #define OPTIONAL_REGISTER_PREFIX '%'
136 
137 #define LOCAL_LABEL(name)  (name[0] == '.' && name[1] == 'L')
138 #define LOCAL_LABELS_FB    1
139 
140 /* This expression evaluates to true if the relocation is for a local
141    object for which we still want to do the relocation at runtime.
142    False if we are willing to perform this relocation while building
143    the .o file.  GOTOFF does not need to be checked here because it is
144    not pcrel.  I am not sure if some of the others are ever used with
145    pcrel, but it is easier to be safe than sorry.  */
146 
147 #define TC_FORCE_RELOCATION_LOCAL(FIX)			\
148   (!(FIX)->fx_pcrel					\
149    || (FIX)->fx_plt					\
150    || (FIX)->fx_r_type == BFD_RELOC_ARM_GOT32		\
151    || (FIX)->fx_r_type == BFD_RELOC_32			\
152    || TC_FORCE_RELOCATION (FIX))
153 
154 /* Force output of R_ARM_REL32 relocations against thumb function symbols.
155    This is needed to ensure the low bit is handled correctly.  */
156 #define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEG)	\
157   (THUMB_IS_FUNC ((FIX)->fx_addsy)		\
158    || !SEG_NORMAL (SEG))
159 
160 #define TC_CONS_FIX_NEW cons_fix_new_arm
161 
162 #define MAX_MEM_FOR_RS_ALIGN_CODE 31
163 
164 /* For frags in code sections we need to record whether they contain
165    ARM code or THUMB code.  This is that if they have to be aligned,
166    they can contain the correct type of no-op instruction.  */
167 #define TC_FRAG_TYPE		int
168 #define TC_FRAG_INIT(fragp)	arm_init_frag (fragp)
169 #define HANDLE_ALIGN(fragp)	arm_handle_align (fragp)
170 
171 #define md_do_align(N, FILL, LEN, MAX, LABEL)					\
172   if (FILL == NULL && (N) != 0 && ! need_pass_2 && subseg_text_p (now_seg))	\
173     {										\
174       arm_frag_align_code (N, MAX);						\
175       goto LABEL;								\
176     }
177 
178 #ifdef OBJ_ELF
179 # define DWARF2_LINE_MIN_INSN_LENGTH 	2
180 # define obj_frob_symbol(sym, punt)	armelf_frob_symbol ((sym), & (punt))
181 # define md_elf_section_change_hook()	arm_elf_change_section ()
182 # define md_elf_section_type(str, len)	arm_elf_section_type (str, len)
183 # define GLOBAL_OFFSET_TABLE_NAME	"_GLOBAL_OFFSET_TABLE_"
184 # define TC_SEGMENT_INFO_TYPE 		struct arm_segment_info_type
185 
186 enum mstate
187 {
188   MAP_UNDEFINED = 0, /* Must be zero, for seginfo in new sections.  */
189   MAP_DATA,
190   MAP_ARM,
191   MAP_THUMB
192 };
193 
194 struct arm_segment_info_type
195 {
196   enum mstate mapstate;
197   unsigned int marked_pr_dependency;
198 };
199 
200 /* We want .cfi_* pseudo-ops for generating unwind info.  */
201 #define TARGET_USE_CFIPOP              1
202 
203 /* The lr register is r14.  */
204 #define DWARF2_DEFAULT_RETURN_COLUMN  14
205 
206 /* Registers are generally saved at negative offsets to the CFA.  */
207 #define DWARF2_CIE_DATA_ALIGNMENT     -4
208 
209 /* CFI hooks.  */
210 #define tc_regname_to_dw2regnum            tc_arm_regname_to_dw2regnum
211 #define tc_cfi_frame_initial_instructions  tc_arm_frame_initial_instructions
212 
213 #else /* Not OBJ_ELF.  */
214 #define GLOBAL_OFFSET_TABLE_NAME "__GLOBAL_OFFSET_TABLE_"
215 #endif
216 
217 #if defined OBJ_ELF || defined OBJ_COFF
218 
219 # define EXTERN_FORCE_RELOC 			1
220 # define tc_fix_adjustable(FIX) 		arm_fix_adjustable (FIX)
221 /* Values passed to md_apply_fix don't include the symbol value.  */
222 # define MD_APPLY_SYM_VALUE(FIX) 		0
223 # define TC_VALIDATE_FIX(FIX, SEGTYPE, LABEL)	arm_validate_fix (FIX)
224 
225 #endif
226 
227 #define MD_PCREL_FROM_SECTION(F,S) md_pcrel_from_section(F,S)
228 
229 extern long md_pcrel_from_section (struct fix *, segT);
230 extern void arm_frag_align_code (int, int);
231 extern void arm_validate_fix (struct fix *);
232 extern const char * elf32_arm_target_format (void);
233 extern void arm_elf_change_section (void);
234 extern int arm_force_relocation (struct fix *);
235 extern void arm_cleanup (void);
236 extern void arm_start_line_hook (void);
237 extern void arm_frob_label (symbolS *);
238 extern int arm_data_in_code (void);
239 extern char * arm_canonicalize_symbol_name (char *);
240 extern void arm_adjust_symtab (void);
241 extern void armelf_frob_symbol (symbolS *, int *);
242 extern void cons_fix_new_arm (fragS *, int, int, expressionS *);
243 extern void arm_init_frag (struct frag *);
244 extern void arm_handle_align (struct frag *);
245 extern bfd_boolean arm_fix_adjustable (struct fix *);
246 extern int arm_elf_section_type (const char *, size_t);
247 extern int tc_arm_regname_to_dw2regnum (const char *regname);
248 extern void tc_arm_frame_initial_instructions (void);
249