1 /* This file is tc-sh.h
2    Copyright (C) 1993-2021 Free Software Foundation, Inc.
3 
4    This file is part of GAS, the GNU Assembler.
5 
6    GAS is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 3, or (at your option)
9    any later version.
10 
11    GAS is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15 
16    You should have received a copy of the GNU General Public License
17    along with GAS; see the file COPYING.  If not, write to
18    the Free Software Foundation, 51 Franklin Street - Fifth Floor,
19    Boston, MA 02110-1301, USA.  */
20 
21 #define TC_SH
22 
23 #define TARGET_ARCH bfd_arch_sh
24 
25 /* The type fixS is defined (to struct fix) in write.h, but write.h uses
26    definitions from this file.  To avoid problems with including write.h
27    after the "right" definitions, don't; just forward-declare struct fix
28    here.  */
29 struct fix;
30 struct segment_info_struct;
31 struct internal_reloc;
32 
33 /* Whether -relax was used.  */
34 extern int sh_relax;
35 
36 /* Whether -small was used.  */
37 extern int sh_small;
38 
39 /* Don't try to break words.  */
40 #define WORKING_DOT_WORD
41 
42 /* We require .long, et. al., to be aligned correctly.  */
43 #define md_cons_align(nbytes) sh_cons_align (nbytes)
44 extern void sh_cons_align (int);
45 
46 /* We need to optimize expr with taking account of rs_align_test
47    frags.  */
48 
49 #ifdef OBJ_ELF
50 #define md_optimize_expr(l,o,r) sh_optimize_expr (l, o, r)
51 extern int sh_optimize_expr (expressionS *, operatorT, expressionS *);
52 #endif
53 
54 /* When relaxing, we need to generate relocations for alignment
55    directives.  */
56 #define HANDLE_ALIGN(frag) sh_handle_align (frag)
57 extern void sh_handle_align (fragS *);
58 
59 #define MAX_MEM_FOR_RS_ALIGN_CODE (1 + 2)
60 
61 /* We need to force out some relocations when relaxing.  */
62 #define TC_FORCE_RELOCATION(fix) sh_force_relocation (fix)
63 extern int sh_force_relocation (struct fix *);
64 
65 /* This macro decides whether a particular reloc is an entry in a
66    switch table.  It is used when relaxing, because the linker needs
67    to know about all such entries so that it can adjust them if
68    necessary.  */
69 
70 #define SWITCH_TABLE(FIX)				\
71   ((FIX)->fx_addsy != NULL				\
72    && (FIX)->fx_subsy != NULL				\
73    && S_GET_SEGMENT ((FIX)->fx_addsy) == text_section	\
74    && S_GET_SEGMENT ((FIX)->fx_subsy) == text_section	\
75    && ((FIX)->fx_r_type == BFD_RELOC_32			\
76        || (FIX)->fx_r_type == BFD_RELOC_16		\
77        || (FIX)->fx_r_type == BFD_RELOC_8))
78 
79 #define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEC)		\
80   (GENERIC_FORCE_RELOCATION_SUB_SAME (FIX, SEC)		\
81    || TC_FORCE_RELOCATION (FIX)				\
82    || (sh_relax && SWITCH_TABLE (FIX)))
83 
84 /* Don't complain when we leave fx_subsy around.  */
85 #define TC_VALIDATE_FIX_SUB(FIX, SEG)			\
86   ((md_register_arithmetic || (SEG) != reg_section)	\
87    && sh_relax && SWITCH_TABLE (FIX))
88 
89 #define MD_PCREL_FROM_SECTION(FIX, SEC) md_pcrel_from_section (FIX, SEC)
90 
91 /* SH_COUNT relocs are allowed outside of frag.
92    The target is also buggy and sets fix size too large for other relocs.  */
93 #define TC_FX_SIZE_SLACK(FIX) \
94   ((FIX)->fx_r_type == BFD_RELOC_SH_COUNT ? -1 : 2)
95 
96 #define IGNORE_NONSTANDARD_ESCAPES
97 
98 #define LISTING_HEADER \
99   (!target_big_endian \
100    ? "Renesas / SuperH SH GAS Little Endian" \
101    : "Renesas / SuperH SH GAS Big Endian")
102 
103 #define md_operand(x)
104 
105 extern const struct relax_type md_relax_table[];
106 #define TC_GENERIC_RELAX_TABLE md_relax_table
107 
108 /* We record, for each section, whether we have most recently output a
109    CODE reloc or a DATA reloc.  */
110 struct sh_segment_info_type
111 {
112   int in_code : 1;
113 };
114 #define TC_SEGMENT_INFO_TYPE struct sh_segment_info_type
115 
116 /* We call a routine to emit a reloc for a label, so that the linker
117    can align loads and stores without crossing a label.  */
118 extern void sh_frob_label (symbolS *);
119 #define tc_frob_label(sym) sh_frob_label (sym)
120 
121 /* We call a routine to flush pending output in order to output a DATA
122    reloc when required.  */
123 extern void sh_flush_pending_output (void);
124 #define md_flush_pending_output() sh_flush_pending_output ()
125 
126 #define tc_frob_file_before_adjust sh_frob_file
127 extern void sh_frob_file (void);
128 
129 
130 #ifdef OBJ_COFF
131 /* COFF specific definitions.  */
132 
133 #define COFF_MAGIC (!target_big_endian ? SH_ARCH_MAGIC_LITTLE : SH_ARCH_MAGIC_BIG)
134 
135 #define tc_coff_symbol_emit_hook(a) ; /* Not used.  */
136 
137 #define TC_KEEP_FX_OFFSET 1
138 
139 #define SEG_NAME(SEG) segment_name (SEG)
140 
141 /* We align most sections to a 16 byte boundary.  */
142 #define SUB_SEGMENT_ALIGN(SEG, FRCHAIN)			\
143   (startswith (SEG_NAME (SEG), ".stabstr")		\
144    ? 0							\
145    : ((startswith (SEG_NAME (SEG), ".stab")	\
146        || strcmp (SEG_NAME (SEG), ".ctors") == 0	\
147        || strcmp (SEG_NAME (SEG), ".dtors") == 0)	\
148       ? 2						\
149       : (sh_small ? 2 : 4)))
150 
151 #endif /* OBJ_COFF */
152 
153 #ifdef OBJ_ELF
154 /* ELF specific definitions.  */
155 
156 /* Whether or not the target is big endian.  */
157 extern int target_big_endian;
158 #ifdef TE_LINUX
159 #define TARGET_FORMAT (!target_big_endian ? "elf32-sh-linux" : "elf32-shbig-linux")
160 #elif defined(TE_NetBSD)
161 #define TARGET_FORMAT (!target_big_endian ? "elf32-shl-nbsd" : "elf32-sh-nbsd")
162 #elif defined (TE_VXWORKS)
163 #define TARGET_FORMAT (!target_big_endian ? "elf32-shl-vxworks" : "elf32-sh-vxworks")
164 #elif defined (TE_UCLINUX)
165 #define TARGET_FORMAT sh_uclinux_target_format ()
166 extern const char * sh_uclinux_target_format (void);
167 #else
168 #define TARGET_FORMAT (!target_big_endian ? "elf32-shl" : "elf32-sh")
169 #endif
170 
171 #define elf_tc_final_processing sh_elf_final_processing
172 extern void sh_elf_final_processing (void);
173 
174 #define DIFF_EXPR_OK		/* foo-. gets turned into PC relative relocs.  */
175 
176 #define GLOBAL_OFFSET_TABLE_NAME "_GLOBAL_OFFSET_TABLE_"
177 
178 /* This is the relocation type for direct references to
179    GLOBAL_OFFSET_TABLE.  It comes up in complicated expressions such
180    as _GLOBAL_OFFSET_TABLE_+[.-.L284], which cannot be expressed
181    normally with the regular expressions.  The fixup specified here
182    when used at runtime implies that we should add the address of the
183    GOT to the specified location, and as a result we have simplified
184    the expression into something we can use.  */
185 #define TC_RELOC_GLOBAL_OFFSET_TABLE BFD_RELOC_SH_GOTPC
186 
187 #define tc_fix_adjustable(FIX) sh_fix_adjustable(FIX)
188 extern bool sh_fix_adjustable (struct fix *);
189 
190 /* Values passed to md_apply_fix don't include symbol values.  */
191 #define MD_APPLY_SYM_VALUE(FIX) 0
192 
193 /* This expression evaluates to true if the relocation is for a local object
194    for which we still want to do the relocation at runtime.  False if we
195    are willing to perform this relocation while building the .o file.
196 
197    We can't resolve references to the GOT or the PLT when creating the
198    object file, since these tables are only created by the linker.
199    Also, if the symbol is global, weak, common or not defined, the
200    assembler can't compute the appropriate reloc, since its location
201    can only be determined at link time.  */
202 
203 #define TC_FORCE_RELOCATION_LOCAL(FIX)			\
204   (GENERIC_FORCE_RELOCATION_LOCAL (FIX)			\
205    || (FIX)->fx_r_type == BFD_RELOC_32_PLT_PCREL	\
206    || (FIX)->fx_r_type == BFD_RELOC_32_GOT_PCREL	\
207    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPC)
208 
209 #define TC_FORCE_RELOCATION_SUB_LOCAL(FIX, SEG)		\
210   ((!md_register_arithmetic && (SEG) == reg_section)	\
211    || (sh_relax && SWITCH_TABLE (FIX)))
212 
213 /* This keeps the subtracted symbol around, for use by PLT_PCREL
214    relocs.  */
215 #define TC_FORCE_RELOCATION_SUB_ABS(FIX, SEG)		\
216   ((FIX)->fx_r_type == BFD_RELOC_32_PLT_PCREL		\
217    || (!md_register_arithmetic && (SEG) == reg_section))
218 
219 /* Don't complain when we leave fx_subsy around.  */
220 #undef TC_VALIDATE_FIX_SUB
221 #define TC_VALIDATE_FIX_SUB(FIX, SEG)			\
222   ((md_register_arithmetic || (SEG) != reg_section)	\
223    && ((FIX)->fx_r_type == BFD_RELOC_32_PLT_PCREL	\
224        || (sh_relax && SWITCH_TABLE (FIX))))
225 
226 #define md_parse_name(name, exprP, mode, nextcharP) \
227   sh_parse_name ((name), (exprP), (mode), (nextcharP))
228 int sh_parse_name (char const *, expressionS *,
229 		   enum expr_mode, char *);
230 
231 #define TC_CONS_FIX_NEW(FRAG, OFF, LEN, EXP, RELOC)	\
232   sh_cons_fix_new ((FRAG), (OFF), (LEN), (EXP), (RELOC))
233 void sh_cons_fix_new (fragS *, int, int, expressionS *,
234 		      bfd_reloc_code_real_type);
235 
236 /* This is used to construct expressions out of @GOTOFF, @PLT and @GOT
237    symbols.  The relocation type is stored in X_md.  */
238 #define O_PIC_reloc O_md1
239 
240 #define TARGET_USE_CFIPOP 1
241 
242 #define tc_cfi_frame_initial_instructions sh_cfi_frame_initial_instructions
243 extern void sh_cfi_frame_initial_instructions (void);
244 
245 #define tc_regname_to_dw2regnum sh_regname_to_dw2regnum
246 extern int sh_regname_to_dw2regnum (char *);
247 
248 /* All SH instructions are multiples of 16 bits.  */
249 #define DWARF2_LINE_MIN_INSN_LENGTH 2
250 #define DWARF2_DEFAULT_RETURN_COLUMN 17
251 #define DWARF2_CIE_DATA_ALIGNMENT (-4)
252 
253 #endif /* OBJ_ELF */
254 
255 #define H_TICK_HEX 1
256