Add XCOFF64 support.
[external/binutils.git] / gas / config / tc-ppc.h
1 /* tc-ppc.h -- Header file for tc-ppc.c.
2    Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000
3    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, 59 Temple Place - Suite 330, Boston, MA
21    02111-1307, USA. */
22
23 #define TC_PPC
24
25 #ifdef ANSI_PROTOTYPES
26 struct fix;
27 #endif
28
29 /* Set the endianness we are using.  Default to big endian.  */
30 #ifndef TARGET_BYTES_BIG_ENDIAN
31 #define TARGET_BYTES_BIG_ENDIAN 1
32 #endif
33
34 #ifndef BFD_ASSEMBLER
35  #error PowerPC support requires BFD_ASSEMBLER
36 #endif
37
38 /* If OBJ_COFF is defined, and TE_PE is not defined, we are assembling
39    XCOFF for AIX or PowerMac.  If TE_PE is defined, we are assembling
40    COFF for Windows NT.  */
41
42 #ifdef OBJ_COFF
43 #ifndef TE_PE
44 #define OBJ_XCOFF
45 #endif
46 #endif
47
48 /* The target BFD architecture.  */
49 #define TARGET_ARCH (ppc_arch ())
50 #define TARGET_MACH (ppc_mach ())
51 extern enum bfd_architecture ppc_arch PARAMS ((void));
52 extern unsigned long ppc_mach PARAMS ((void));
53
54 /* Whether or not the target is big endian */
55 extern int target_big_endian;
56
57 /* The target BFD format.  */
58 #define TARGET_FORMAT (ppc_target_format ())
59 extern char* ppc_target_format ();
60
61 /* Permit temporary numeric labels.  */
62 #define LOCAL_LABELS_FB 1
63
64 /* $ is used to refer to the current location.  */
65 #define DOLLAR_DOT
66
67 /* Strings do not use backslash escapes under COFF.  */
68 #ifdef OBJ_COFF
69 #define NO_STRING_ESCAPES
70 #endif
71
72 #ifdef OBJ_ELF
73 #define DIFF_EXPR_OK            /* foo-. gets turned into PC relative relocs */
74 #endif
75
76 #if TARGET_BYTES_BIG_ENDIAN
77 #define PPC_BIG_ENDIAN 1
78 #else
79 #define PPC_BIG_ENDIAN 0
80 #endif
81
82 /* We don't need to handle .word strangely.  */
83 #define WORKING_DOT_WORD
84
85 /* We set the fx_done field appropriately in md_apply_fix.  */
86 #define TC_HANDLES_FX_DONE
87 \f
88 #ifdef TE_PE
89
90 /* Question marks are permitted in symbol names.  */
91 #define LEX_QM 1
92
93 /* Don't adjust TOC relocs.  */
94 #define tc_fix_adjustable(fixp) ppc_pe_fix_adjustable (fixp)
95 extern int ppc_pe_fix_adjustable PARAMS ((struct fix *));
96
97 #endif
98
99 #ifdef OBJ_XCOFF
100
101 /* Declarations needed when generating XCOFF code.  XCOFF is an
102    extension of COFF, used only on the RS/6000.  Rather than create an
103    obj-xcoff, we just use obj-coff, and handle the extensions here in
104    tc-ppc.  */
105
106 /* We need to keep some information for symbols.  */
107 struct ppc_tc_sy
108 {
109   /* We keep a few linked lists of symbols.  */
110   symbolS *next;
111   /* Non-zero if the symbol should be output.  The RS/6000 assembler
112      only outputs symbols that are external or are mentioned in a
113      .globl or .lglobl statement.  */
114   int output;
115   /* The symbol class.  */
116   int class;
117   /* The real name, if the symbol was renamed.  */
118   char *real_name;
119   /* For a csect symbol, the subsegment we are using.  This is zero
120      for symbols that are not csects.  */
121   subsegT subseg;
122   /* For a csect or common symbol, the alignment to use.  */
123   int align;
124   /* For a function symbol, a symbol whose value is the size.  The
125      field is NULL if there is no size.  */
126   symbolS *size;
127   /* For a csect symbol, the last symbol which has been defined in
128      this csect, or NULL if none have been defined so far.  For a .bs
129      symbol, the referenced csect symbol.  */
130   symbolS *within;
131 };
132
133 #define TC_SYMFIELD_TYPE struct ppc_tc_sy
134
135 /* We need an additional auxent for function symbols.  */
136 #define OBJ_COFF_MAX_AUXENTRIES 2
137
138 /* Square and curly brackets are permitted in symbol names.  */
139 #define LEX_BR 3
140
141 /* Canonicalize the symbol name.  */
142 #define tc_canonicalize_symbol_name(name) ppc_canonicalize_symbol_name (name)
143 extern char *ppc_canonicalize_symbol_name PARAMS ((char *));
144
145 /* Get the symbol class from the name.  */
146 #define tc_symbol_new_hook(sym) ppc_symbol_new_hook (sym)
147 extern void ppc_symbol_new_hook PARAMS ((symbolS *));
148
149 /* Set the symbol class of a label based on the csect.  */
150 #define tc_frob_label(sym) ppc_frob_label (sym)
151 extern void ppc_frob_label PARAMS ((symbolS *));
152
153 /* TOC relocs requires special handling.  */
154 #define tc_fix_adjustable(fixp) ppc_fix_adjustable (fixp)
155 extern int ppc_fix_adjustable PARAMS ((struct fix *));
156
157 /* A relocation from one csect to another must be kept.  */
158 #define TC_FORCE_RELOCATION(FIXP) ppc_force_relocation (FIXP)
159 extern int ppc_force_relocation PARAMS ((struct fix *));
160
161 /* We need to set the section VMA.  */
162 #define tc_frob_section(sec) ppc_frob_section (sec)
163 extern void ppc_frob_section PARAMS ((asection *));
164
165 /* Finish up the symbol.  */
166 #define tc_frob_symbol(sym, punt) punt = ppc_frob_symbol (sym)
167 extern int ppc_frob_symbol PARAMS ((symbolS *));
168
169 /* Finish up the entire symtab.  */
170 #define tc_adjust_symtab() ppc_adjust_symtab ()
171 extern void ppc_adjust_symtab PARAMS ((void));
172
173 /* Niclas Andersson <nican@ida.liu.se> says this is needed.  */
174 extern int ppc_subseg_align PARAMS ((void));
175 #define SUB_SEGMENT_ALIGN(SEG) ppc_subseg_align()
176
177 /* We also need to copy, in particular, the class of the symbol,
178    over what obj-coff would otherwise have copied.  */
179 #define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src)                    \
180 do {                                                            \
181   if (SF_GET_GET_SEGMENT (dest))                                \
182     S_SET_SEGMENT (dest, S_GET_SEGMENT (src));                  \
183   symbol_get_tc (dest)->size = symbol_get_tc (src)->size;       \
184   symbol_get_tc (dest)->align = symbol_get_tc (src)->align;     \
185   symbol_get_tc (dest)->class = symbol_get_tc (src)->class;     \
186   symbol_get_tc (dest)->within = symbol_get_tc (src)->within;   \
187 } while (0)
188
189
190 #endif /* OBJ_XCOFF */
191
192 #ifdef OBJ_ELF
193
194 /* Branch prediction relocations must force relocation, as must
195    the vtable description relocs.  */
196 #define TC_FORCE_RELOCATION(FIXP)                                       \
197 ((FIXP)->fx_r_type == BFD_RELOC_PPC_B16_BRTAKEN                         \
198  || (FIXP)->fx_r_type == BFD_RELOC_PPC_B16_BRNTAKEN                     \
199  || (FIXP)->fx_r_type == BFD_RELOC_PPC_BA16_BRTAKEN                     \
200  || (FIXP)->fx_r_type == BFD_RELOC_PPC_BA16_BRNTAKEN                    \
201  || (FIXP)->fx_r_type == BFD_RELOC_VTABLE_INHERIT                       \
202  || (FIXP)->fx_r_type == BFD_RELOC_VTABLE_ENTRY)
203
204 #define TC_FORCE_RELOCATION_SECTION(FIXP,SEC)                           \
205 (TC_FORCE_RELOCATION (FIXP)                                             \
206  || ((FIXP)->fx_addsy && !(FIXP)->fx_subsy                              \
207      && S_GET_SEGMENT ((FIXP)->fx_addsy) != SEC))
208
209 /* Support for SHF_EXCLUDE and SHT_ORDERED */
210 extern int ppc_section_letter PARAMS ((int, char **));
211 extern int ppc_section_type PARAMS ((char *, size_t));
212 extern int ppc_section_word PARAMS ((char *, size_t));
213 extern int ppc_section_flags PARAMS ((int, int, int));
214
215 #define md_elf_section_letter(LETTER, PTR_MSG)  ppc_section_letter (LETTER, PTR_MSG)
216 #define md_elf_section_type(STR, LEN)           ppc_section_type (STR, LEN)
217 #define md_elf_section_word(STR, LEN)           ppc_section_word (STR, LEN)
218 #define md_elf_section_flags(FLAGS, ATTR, TYPE) ppc_section_flags (FLAGS, ATTR, TYPE)
219
220 /* Add extra PPC sections -- Note, for now, make .sbss2 and .PPC.EMB.sbss0 a
221    normal section, and not a bss section so that the linker doesn't crater
222    when trying to make more than 2 sections.  */
223 #define ELF_TC_SPECIAL_SECTIONS \
224   { ".tags",            SHT_ORDERED,    SHF_ALLOC }, \
225   { ".sdata",           SHT_PROGBITS,   SHF_ALLOC + SHF_WRITE }, \
226   { ".sbss",            SHT_NOBITS,     SHF_ALLOC + SHF_WRITE }, \
227   { ".sdata2",          SHT_PROGBITS,   SHF_ALLOC }, \
228   { ".sbss2",           SHT_PROGBITS,   SHF_ALLOC }, \
229   { ".PPC.EMB.sdata0",  SHT_PROGBITS,   SHF_ALLOC }, \
230   { ".PPC.EMB.sbss0",   SHT_PROGBITS,   SHF_ALLOC },
231
232 #define tc_comment_chars ppc_comment_chars
233 extern const char *ppc_comment_chars;
234
235 /* Keep relocations relative to the GOT, or non-PC relative. */
236 #define tc_fix_adjustable(FIX)                                          \
237   ((FIX)->fx_r_type != BFD_RELOC_16_GOTOFF                              \
238    && (FIX)->fx_r_type != BFD_RELOC_LO16_GOTOFF                         \
239    && (FIX)->fx_r_type != BFD_RELOC_HI16_GOTOFF                         \
240    && (FIX)->fx_r_type != BFD_RELOC_HI16_S_GOTOFF                       \
241    && (FIX)->fx_r_type != BFD_RELOC_GPREL16                             \
242    && (FIX)->fx_r_type != BFD_RELOC_VTABLE_INHERIT                      \
243    && (FIX)->fx_r_type != BFD_RELOC_VTABLE_ENTRY                        \
244    && ! S_IS_EXTERNAL ((FIX)->fx_addsy)                                 \
245    && ! S_IS_WEAK ((FIX)->fx_addsy)                                     \
246    && ((FIX)->fx_pcrel                                                  \
247        || ((FIX)->fx_subsy != NULL                                      \
248            && (S_GET_SEGMENT ((FIX)->fx_subsy)                          \
249                == S_GET_SEGMENT ((FIX)->fx_addsy)))                     \
250        || S_IS_LOCAL ((FIX)->fx_addsy)))
251
252 /* We must never ever try to resolve references to externally visible
253    symbols in the assembler, because the .o file might go into a shared
254    library, and some other shared library might override that symbol.  */
255 #define TC_RELOC_RTSYM_LOC_FIXUP(FIX)  \
256   ((FIX)->fx_addsy == NULL \
257    || (! S_IS_EXTERNAL ((FIX)->fx_addsy) \
258        && ! S_IS_WEAK ((FIX)->fx_addsy) \
259        && S_IS_DEFINED ((FIX)->fx_addsy) \
260        && ! S_IS_COMMON ((FIX)->fx_addsy)))
261
262 #endif /* OBJ_ELF */
263
264 /* call md_apply_fix3 with segment instead of md_apply_fix */
265 #define MD_APPLY_FIX3
266
267 /* call md_pcrel_from_section, not md_pcrel_from */
268 #define MD_PCREL_FROM_SECTION(FIXP, SEC) md_pcrel_from_section(FIXP, SEC)
269 extern long md_pcrel_from_section PARAMS ((struct fix *, segT));
270
271 #define md_parse_name(name, exp) ppc_parse_name (name, exp)
272 extern int ppc_parse_name PARAMS ((const char *, struct expressionS *));
273
274 #define md_operand(x)
275