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