1 /* tc-ppc.h -- Header file for tc-ppc.c.
2    Copyright (C) 1994-2014 Free Software Foundation, Inc.
3    Written by Ian Lance Taylor, Cygnus Support.
4 
5    This file is part of GAS, the GNU Assembler.
6 
7    GAS is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 3, or (at your option)
10    any later version.
11 
12    GAS is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16 
17    You should have received a copy of the GNU General Public License
18    along with GAS; see the file COPYING.  If not, write to the Free
19    Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
20    02110-1301, USA.  */
21 
22 #define TC_PPC
23 
24 #include "opcode/ppc.h"
25 
26 struct fix;
27 
28 /* Set the endianness we are using.  Default to big endian.  */
29 #ifndef TARGET_BYTES_BIG_ENDIAN
30 #define TARGET_BYTES_BIG_ENDIAN 1
31 #endif
32 
33 /* If OBJ_COFF is defined, and TE_PE is not defined, we are assembling
34    XCOFF for AIX or PowerMac.  If TE_PE is defined, we are assembling
35    COFF for Windows NT.  */
36 
37 #ifdef OBJ_COFF
38 #ifndef TE_PE
39 #define OBJ_XCOFF
40 #endif
41 #endif
42 
43 /* The target BFD architecture.  */
44 #define TARGET_ARCH (ppc_arch ())
45 #define TARGET_MACH (ppc_mach ())
46 extern enum bfd_architecture ppc_arch (void);
47 extern unsigned long ppc_mach (void);
48 
49 /* Whether or not the target is big endian */
50 extern int target_big_endian;
51 
52 /* The target BFD format.  */
53 #define TARGET_FORMAT (ppc_target_format ())
54 extern char *ppc_target_format (void);
55 
56 /* Permit temporary numeric labels.  */
57 #define LOCAL_LABELS_FB 1
58 
59 /* $ is used to refer to the current location.  */
60 #define DOLLAR_DOT
61 
62 /* Strings do not use backslash escapes under COFF.  */
63 #ifdef OBJ_COFF
64 #define NO_STRING_ESCAPES
65 #endif
66 
67 #ifdef OBJ_ELF
68 #define DIFF_EXPR_OK		/* foo-. gets turned into PC relative relocs */
69 #endif
70 
71 #if TARGET_BYTES_BIG_ENDIAN
72 #define PPC_BIG_ENDIAN 1
73 #else
74 #define PPC_BIG_ENDIAN 0
75 #endif
76 
77 /* We don't need to handle .word strangely.  */
78 #define WORKING_DOT_WORD
79 
80 #define MAX_MEM_FOR_RS_ALIGN_CODE 4
81 #define HANDLE_ALIGN(FRAGP)						\
82   if ((FRAGP)->fr_type == rs_align_code)				\
83     ppc_handle_align (FRAGP);
84 
85 extern void ppc_handle_align (struct frag *);
86 extern void ppc_frag_check (struct frag *);
87 
88 #define SUB_SEGMENT_ALIGN(SEG, FRCHAIN) 0
89 
90 #define md_frag_check(FRAGP) ppc_frag_check (FRAGP)
91 
92 /* Arrange to store the value of ppc_cpu at the site of a fixup
93    for later use in md_apply_fix.  */
94 struct _ppc_fix_extra
95 {
96   ppc_cpu_t ppc_cpu;
97 };
98 
99 extern ppc_cpu_t ppc_cpu;
100 
101 #define TC_FIX_TYPE struct _ppc_fix_extra
102 #define TC_INIT_FIX_DATA(FIXP) \
103   do { (FIXP)->tc_fix_data.ppc_cpu = ppc_cpu; } while (0)
104 
105 #ifdef TE_PE
106 
107 /* Question marks are permitted in symbol names.  */
108 #define LEX_QM 1
109 
110 /* Don't adjust TOC relocs.  */
111 #define tc_fix_adjustable(FIX) ppc_pe_fix_adjustable (FIX)
112 extern int ppc_pe_fix_adjustable (struct fix *);
113 
114 #endif
115 
116 #ifdef OBJ_XCOFF
117 
118 /* Declarations needed when generating XCOFF code.  XCOFF is an
119    extension of COFF, used only on the RS/6000.  Rather than create an
120    obj-xcoff, we just use obj-coff, and handle the extensions here in
121    tc-ppc.  */
122 
123 /* We need to keep some information for symbols.  */
124 struct ppc_tc_sy
125 {
126   /* We keep a few linked lists of symbols.  */
127   symbolS *next;
128   /* The real name, if the symbol was renamed.  */
129   char *real_name;
130   /* Non-zero if the symbol should be output.  The RS/6000 assembler
131      only outputs symbols that are external or are mentioned in a
132      .globl or .lglobl statement.  */
133   unsigned char output;
134   /* The symbol class.  */
135   short symbol_class;
136   /* For a csect or common symbol, the alignment to use.  */
137   unsigned char align;
138   /* For a csect symbol, the subsegment we are using.  This is zero
139      for symbols that are not csects.  */
140   subsegT subseg;
141   /* For a csect symbol, the last symbol which has been defined in
142      this csect, or NULL if none have been defined so far.
143      For a .bs symbol, the referenced csect symbol.
144      For a label, the enclosing csect.  */
145   symbolS *within;
146   union
147   {
148     /* For a function symbol, a symbol whose value is the size.  The
149        field is NULL if there is no size.  */
150     symbolS *size;
151     /* For a dwarf symbol, the corresponding dwarf subsection.  */
152     struct dw_subsection *dw;
153   } u;
154 };
155 
156 #define TC_SYMFIELD_TYPE struct ppc_tc_sy
157 
158 /* We need an additional auxent for function symbols.  */
159 #define OBJ_COFF_MAX_AUXENTRIES 2
160 
161 /* Square and curly brackets are permitted in symbol names.  */
162 #define LEX_BR 3
163 
164 /* Canonicalize the symbol name.  */
165 #define tc_canonicalize_symbol_name(name) ppc_canonicalize_symbol_name (name)
166 extern char *ppc_canonicalize_symbol_name (char *);
167 
168 /* Get the symbol class from the name.  */
169 #define tc_symbol_new_hook(sym) ppc_symbol_new_hook (sym)
170 extern void ppc_symbol_new_hook (symbolS *);
171 
172 /* Set the symbol class of a label based on the csect.  */
173 #define tc_frob_label(sym) ppc_frob_label (sym)
174 extern void ppc_frob_label (symbolS *);
175 
176 /* TOC relocs requires special handling.  */
177 #define tc_fix_adjustable(FIX) ppc_fix_adjustable (FIX)
178 extern int ppc_fix_adjustable (struct fix *);
179 
180 /* We need to set the section VMA.  */
181 #define tc_frob_section(sec) ppc_frob_section (sec)
182 extern void ppc_frob_section (asection *);
183 
184 /* Finish up the symbol.  */
185 #define tc_frob_symbol(sym, punt) punt = ppc_frob_symbol (sym)
186 extern int ppc_frob_symbol (symbolS *);
187 
188 /* Finish up the entire symtab.  */
189 #define tc_adjust_symtab() ppc_adjust_symtab ()
190 extern void ppc_adjust_symtab (void);
191 
192 /* We also need to copy, in particular, the class of the symbol,
193    over what obj-coff would otherwise have copied.  */
194 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src)			\
195 do {								\
196   if (SF_GET_GET_SEGMENT (dest))				\
197     S_SET_SEGMENT (dest, S_GET_SEGMENT (src));			\
198   symbol_get_tc (dest)->u = symbol_get_tc (src)->u;		\
199   symbol_get_tc (dest)->align = symbol_get_tc (src)->align;	\
200   symbol_get_tc (dest)->symbol_class = symbol_get_tc (src)->symbol_class;	\
201   symbol_get_tc (dest)->within = symbol_get_tc (src)->within;	\
202 } while (0)
203 
204 extern void ppc_xcoff_end (void);
205 #define md_end ppc_xcoff_end
206 
207 #define tc_new_dot_label(sym) ppc_new_dot_label (sym)
208 extern void ppc_new_dot_label (symbolS *);
209 
210 #endif /* OBJ_XCOFF */
211 
212 extern const char       ppc_symbol_chars[];
213 #define tc_symbol_chars ppc_symbol_chars
214 
215 #ifdef OBJ_ELF
216 
217 /* Support for SHT_ORDERED */
218 extern int ppc_section_type (char *, size_t);
219 extern int ppc_section_flags (flagword, bfd_vma, int);
220 
221 #define md_elf_section_type(STR, LEN)		ppc_section_type (STR, LEN)
222 #define md_elf_section_flags(FLAGS, ATTR, TYPE)	ppc_section_flags (FLAGS, ATTR, TYPE)
223 
224 #define tc_comment_chars ppc_comment_chars
225 extern const char *ppc_comment_chars;
226 
227 /* Keep relocations relative to the GOT, or non-PC relative.  */
228 #define tc_fix_adjustable(FIX) ppc_fix_adjustable (FIX)
229 extern int ppc_fix_adjustable (struct fix *);
230 
231 /* Values passed to md_apply_fix don't include symbol values.  */
232 #define MD_APPLY_SYM_VALUE(FIX) 0
233 
234 #define TC_PARSE_CONS_EXPRESSION(EXP, NBYTES) \
235   ppc_elf_parse_cons (EXP, NBYTES)
236 extern bfd_reloc_code_real_type ppc_elf_parse_cons (expressionS *,
237 						    unsigned int);
238 #define TC_CONS_FIX_CHECK(EXP, NBYTES, FIX) \
239   ppc_elf_cons_fix_check (EXP, NBYTES, FIX)
240 extern void ppc_elf_cons_fix_check (expressionS *, unsigned int, struct fix *);
241 
242 #define tc_frob_file_before_adjust ppc_frob_file_before_adjust
243 extern void ppc_frob_file_before_adjust (void);
244 
245 #define tc_adjust_symtab() ppc_elf_adjust_symtab ()
246 extern void ppc_elf_adjust_symtab (void);
247 
248 extern void ppc_elf_end (void);
249 #define md_end ppc_elf_end
250 
251 #endif /* OBJ_ELF */
252 
253 #if defined (OBJ_ELF) || defined (OBJ_XCOFF)
254 #define TC_FORCE_RELOCATION(FIX) ppc_force_relocation (FIX)
255 extern int ppc_force_relocation (struct fix *);
256 #endif
257 
258 /* call md_pcrel_from_section, not md_pcrel_from */
259 #define MD_PCREL_FROM_SECTION(FIX, SEC) md_pcrel_from_section(FIX, SEC)
260 extern long md_pcrel_from_section (struct fix *, segT);
261 
262 #define md_parse_name(name, exp, mode, c) ppc_parse_name (name, exp)
263 extern int ppc_parse_name (const char *, struct expressionS *);
264 
265 #define md_operand(x)
266 
267 #define md_cleanup() ppc_cleanup ()
268 extern void ppc_cleanup (void);
269 
270 /* ppc uses different register numbers between .eh_frame and .debug_frame.
271    This macro translates the .eh_frame register numbers to .debug_frame
272    register numbers.  */
273 #define md_reg_eh_frame_to_debug_frame(regno) \
274   ((regno) == 70 ? 64 /* cr2 */ : (regno))
275 
276 #define TARGET_USE_CFIPOP 1
277 
278 #define tc_cfi_frame_initial_instructions ppc_cfi_frame_initial_instructions
279 extern void ppc_cfi_frame_initial_instructions (void);
280 
281 #define tc_regname_to_dw2regnum tc_ppc_regname_to_dw2regnum
282 extern int tc_ppc_regname_to_dw2regnum (char *);
283 
284 extern int ppc_cie_data_alignment;
285 
286 extern int ppc_dwarf2_line_min_insn_length;
287 
288 #define DWARF2_LINE_MIN_INSN_LENGTH     ppc_dwarf2_line_min_insn_length
289 #define DWARF2_DEFAULT_RETURN_COLUMN    0x41
290 #define DWARF2_CIE_DATA_ALIGNMENT       ppc_cie_data_alignment
291