1 /* This file is tc-sh64.h
2    Copyright (C) 2000-2016 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_SH64
22 #include "config/tc-sh.h"
23 #include "elf/sh.h"
24 #include "elf32-sh64.h"
25 
26 /* We need to override the tc-sh.h settings of HANDLE_ALIGN and
27    MAX_MEM_FOR_RS_ALIGN_CODE; we might need to put in SHmedia NOP:s, not
28    SHcompact NOP:s.  */
29 #undef  HANDLE_ALIGN
30 #define HANDLE_ALIGN(frag) sh64_handle_align (frag)
31 extern void sh64_handle_align (fragS *);
32 
33 #undef  MAX_MEM_FOR_RS_ALIGN_CODE
34 #define MAX_MEM_FOR_RS_ALIGN_CODE sh64_max_mem_for_rs_align_code ()
35 extern int sh64_max_mem_for_rs_align_code (void);
36 
37 #undef  LISTING_HEADER
38 #define LISTING_HEADER					\
39   (target_big_endian ?					\
40      "SuperH SHcompact/SHmedia Big Endian GAS"		\
41    : "SuperH SHcompact/SHmedia Little Endian GAS")
42 
43 /* We need to record the new frag position after an .align.  */
44 extern void sh64_do_align (int, const char *, int, int);
45 #define md_do_align(n, fill, len, max, l) \
46  do { sh64_do_align (n, fill, len, max); goto l; } while (0)
47 
48 struct sh64_segment_info_type
49 {
50   /* The type of the section is initialized when the range_start_symbol
51      member is non-NULL.  */
52   symbolS *mode_start_symbol;
53   subsegT mode_start_subseg;
54 
55   /* A stored symbol indicating location of last call of
56      "md_flush_pending_output".  It is NULLed when we actually use it;
57      otherwise the contents is just filled in with segment, frag and
58      offset within frag.  */
59   symbolS *last_contents_mark;
60 
61   unsigned int emitted_ranges;
62   enum sh64_elf_cr_type contents_type;
63 
64   /* This is used by the SH1-4 parts; we set it to 0 for SHmedia code and
65      data.  */
66   unsigned int in_code : 1;
67 };
68 
69 #undef  TC_SEGMENT_INFO_TYPE
70 #define TC_SEGMENT_INFO_TYPE struct sh64_segment_info_type
71 
72 #undef  TARGET_FORMAT
73 #define TARGET_FORMAT sh64_target_format ()
74 extern const char *sh64_target_format (void);
75 
76 #define TARGET_MACH sh64_target_mach ()
77 extern int sh64_target_mach (void);
78 
79 #undef TC_FORCE_RELOCATION_LOCAL
80 #define TC_FORCE_RELOCATION_LOCAL(FIX)			\
81   (!(FIX)->fx_pcrel					\
82    || (FIX)->fx_r_type == BFD_RELOC_32_PLT_PCREL	\
83    || (FIX)->fx_r_type == BFD_RELOC_SH_PLT_LOW16	\
84    || (FIX)->fx_r_type == BFD_RELOC_SH_PLT_MEDLOW16	\
85    || (FIX)->fx_r_type == BFD_RELOC_SH_PLT_MEDHI16	\
86    || (FIX)->fx_r_type == BFD_RELOC_SH_PLT_HI16		\
87    || (FIX)->fx_r_type == BFD_RELOC_32_GOT_PCREL	\
88    || (FIX)->fx_r_type == BFD_RELOC_SH_GOT_LOW16	\
89    || (FIX)->fx_r_type == BFD_RELOC_SH_GOT_MEDLOW16	\
90    || (FIX)->fx_r_type == BFD_RELOC_SH_GOT_MEDHI16	\
91    || (FIX)->fx_r_type == BFD_RELOC_SH_GOT_HI16		\
92    || (FIX)->fx_r_type == BFD_RELOC_SH_GOT10BY4		\
93    || (FIX)->fx_r_type == BFD_RELOC_SH_GOT10BY8		\
94    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPLT32		\
95    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPLT_LOW16	\
96    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPLT_MEDLOW16	\
97    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPLT_MEDHI16	\
98    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPLT_HI16	\
99    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPLT10BY4	\
100    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPLT10BY8	\
101    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPC		\
102    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPC_LOW16	\
103    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPC_MEDLOW16	\
104    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPC_MEDHI16	\
105    || (FIX)->fx_r_type == BFD_RELOC_SH_GOTPC_HI16	\
106    || TC_FORCE_RELOCATION (FIX))
107 
108 #undef TC_FORCE_RELOCATION_SUB_SAME
109 #define TC_FORCE_RELOCATION_SUB_SAME(FIX, SEC)		\
110   (! SEG_NORMAL (SEC)					\
111    || TC_FORCE_RELOCATION (FIX)				\
112    || (sh_relax && SWITCH_TABLE (FIX))			\
113    || *symbol_get_tc ((FIX)->fx_addsy) != NULL)
114 
115 /* Don't complain when we leave fx_subsy around.  */
116 #undef TC_VALIDATE_FIX_SUB
117 #define TC_VALIDATE_FIX_SUB(FIX, SEG)			\
118   ((md_register_arithmetic || (SEG) != reg_section)	\
119    && ((FIX)->fx_r_type == BFD_RELOC_32_PLT_PCREL	\
120        || (sh_relax && SWITCH_TABLE (FIX))		\
121        || *symbol_get_tc ((FIX)->fx_addsy) != NULL))
122 
123 /* Note the kludge: we want to put back C, and we also want to consume the
124    expression, since we have handled it ourselves.  FIXME: What we really
125    need is a new GAS infrastructure feature: md_qualifier.  */
126 #undef md_parse_name
127 #define md_parse_name(NAME, EXP, MODE, CP) \
128  sh64_consume_datalabel (NAME, EXP, MODE, CP, operand)
129 extern int sh64_consume_datalabel (const char *, expressionS *,
130 				   enum expr_mode, char *,
131 				   segT (*) (expressionS *, enum expr_mode));
132 
133 /* Saying "$" is the same as saying ".".  */
134 #define DOLLAR_DOT
135 
136 #undef MD_PCREL_FROM_SECTION
137 #define MD_PCREL_FROM_SECTION(FIX, SEC)		\
138   shmedia_md_pcrel_from_section (FIX, SEC)
139 
140 extern valueT shmedia_md_pcrel_from_section (struct fix *, segT);
141 
142 /* We need to mark this symbol as a BranchTarget; setting st_other for it
143    and adding 1 to its value (temporarily).  */
144 extern void sh64_frob_label (symbolS *);
145 
146 #undef  tc_frob_label
147 #define tc_frob_label(sym) \
148   do { sh_frob_label (sym); sh64_frob_label (sym); } while (0)
149 
150 #define tc_symbol_new_hook(s) sh64_frob_label (s)
151 
152 /* We use this to mark our "datalabel" symbol copies.  The "mark" is NULL
153    for an ordinary symbol, and the pointer to the "ordinary" symbol for a
154    datalabel symbol.  */
155 #define TC_SYMFIELD_TYPE symbolS *
156 
157 #define tc_frob_symbol(symp, punt)		\
158  do						\
159    {						\
160      punt = sh64_exclude_symbol (symp);		\
161    }						\
162  while (0)
163 
164 extern int sh64_exclude_symbol (symbolS *);
165 
166 extern void sh64_adjust_symtab (void);
167 #define tc_adjust_symtab sh64_adjust_symtab
168 
169 #undef  md_flush_pending_output
170 #define md_flush_pending_output() sh64_flush_pending_output ()
171 extern void sh64_flush_pending_output (void);
172 
173 /* Note that tc-sh.c has a sh_frob_section, but it's called from
174    tc_frob_file_before_adjust.  */
175 #define tc_frob_section(sec) shmedia_frob_section_type (sec)
176 extern void shmedia_frob_section_type (asection *);
177 
178 /* We need to emit fixups relative to the frag in which the instruction
179    resides.  Safest way without calculating max fragment growth or making
180    it a fixed number is to provide a pointer to the opcode frag.
181 
182    We also need to emit the right NOP pattern in .align frags.  This is
183    done after the text-to-bits assembly pass, so we need to mark it with
184    the ISA setting at the time the .align was assembled.  */
185 #define TC_FRAG_TYPE struct sh64_tc_frag_data
186 
187 enum sh64_isa_values
188  {
189    sh64_isa_unspecified,
190    sh64_isa_shcompact,
191    sh64_isa_shmedia,
192 
193    /* Special guard value used in contexts when we don't know which ISA it
194       is, just that it's specified (not sh64_isa_unspecified).  */
195    sh64_isa_sh5_guard
196  };
197 
198 struct sh64_tc_frag_data
199 {
200   fragS *opc_frag;
201   enum sh64_isa_values isa;
202 };
203 
204 extern enum sh64_isa_values sh64_isa_mode;
205 
206 #define TC_FRAG_INIT(FRAGP)					\
207  do								\
208    {								\
209      (FRAGP)->tc_frag_data.opc_frag = sh64_last_insn_frag;	\
210      (FRAGP)->tc_frag_data.isa = sh64_isa_mode;			\
211    }								\
212  while (0)
213 
214 /* This variable is set whenever we generate (or grow) a new opcode frag
215    in shmedia_build_Mytes.  */
216 extern fragS *sh64_last_insn_frag;
217 
218 #define md_end() shmedia_md_end ()
219 void shmedia_md_end (void);
220 
221 /* Because we make .debug_line hold the SHmedia instruction address | 1,
222    we have to say we only have minimum byte-size insns.  */
223 #undef  DWARF2_LINE_MIN_INSN_LENGTH
224 #define DWARF2_LINE_MIN_INSN_LENGTH 1
225 
226 #define TC_FAKE_LABEL(NAME) sh64_fake_label(NAME)
227 extern int sh64_fake_label (const char *);
228