| 1 | /* tc-ppc.h -- Header file for tc-ppc.c. |
| 2 | Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001 |
| 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 PARAMS ((void)); |
| 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 | #endif /* OBJ_XCOFF */ |
| 190 | |
| 191 | #ifdef OBJ_ELF |
| 192 | |
| 193 | /* Branch prediction relocations must force relocation, as must |
| 194 | the vtable description relocs. */ |
| 195 | #define TC_FORCE_RELOCATION(FIXP) \ |
| 196 | ((FIXP)->fx_r_type == BFD_RELOC_PPC_B16_BRTAKEN \ |
| 197 | || (FIXP)->fx_r_type == BFD_RELOC_PPC_B16_BRNTAKEN \ |
| 198 | || (FIXP)->fx_r_type == BFD_RELOC_PPC_BA16_BRTAKEN \ |
| 199 | || (FIXP)->fx_r_type == BFD_RELOC_PPC_BA16_BRNTAKEN \ |
| 200 | || (FIXP)->fx_r_type == BFD_RELOC_VTABLE_INHERIT \ |
| 201 | || (FIXP)->fx_r_type == BFD_RELOC_VTABLE_ENTRY) |
| 202 | |
| 203 | #define TC_FORCE_RELOCATION_SECTION(FIXP,SEC) \ |
| 204 | (TC_FORCE_RELOCATION (FIXP) \ |
| 205 | || ((FIXP)->fx_addsy && !(FIXP)->fx_subsy \ |
| 206 | && S_GET_SEGMENT ((FIXP)->fx_addsy) != SEC)) |
| 207 | |
| 208 | /* Support for SHF_EXCLUDE and SHT_ORDERED */ |
| 209 | extern int ppc_section_letter PARAMS ((int, char **)); |
| 210 | extern int ppc_section_type PARAMS ((char *, size_t)); |
| 211 | extern int ppc_section_word PARAMS ((char *, size_t)); |
| 212 | extern int ppc_section_flags PARAMS ((int, int, int)); |
| 213 | |
| 214 | #define md_elf_section_letter(LETTER, PTR_MSG) ppc_section_letter (LETTER, PTR_MSG) |
| 215 | #define md_elf_section_type(STR, LEN) ppc_section_type (STR, LEN) |
| 216 | #define md_elf_section_word(STR, LEN) ppc_section_word (STR, LEN) |
| 217 | #define md_elf_section_flags(FLAGS, ATTR, TYPE) ppc_section_flags (FLAGS, ATTR, TYPE) |
| 218 | |
| 219 | /* Add extra PPC sections -- Note, for now, make .sbss2 and .PPC.EMB.sbss0 a |
| 220 | normal section, and not a bss section so that the linker doesn't crater |
| 221 | when trying to make more than 2 sections. */ |
| 222 | #define ELF_TC_SPECIAL_SECTIONS \ |
| 223 | { ".tags", SHT_ORDERED, SHF_ALLOC }, \ |
| 224 | { ".sdata", SHT_PROGBITS, SHF_ALLOC + SHF_WRITE }, \ |
| 225 | { ".sbss", SHT_NOBITS, SHF_ALLOC + SHF_WRITE }, \ |
| 226 | { ".sdata2", SHT_PROGBITS, SHF_ALLOC }, \ |
| 227 | { ".sbss2", SHT_PROGBITS, SHF_ALLOC }, \ |
| 228 | { ".PPC.EMB.sdata0", SHT_PROGBITS, SHF_ALLOC }, \ |
| 229 | { ".PPC.EMB.sbss0", SHT_PROGBITS, SHF_ALLOC }, |
| 230 | |
| 231 | #define tc_comment_chars ppc_comment_chars |
| 232 | extern const char *ppc_comment_chars; |
| 233 | |
| 234 | /* Keep relocations relative to the GOT, or non-PC relative. */ |
| 235 | #define tc_fix_adjustable(FIX) \ |
| 236 | ((FIX)->fx_r_type != BFD_RELOC_16_GOTOFF \ |
| 237 | && (FIX)->fx_r_type != BFD_RELOC_LO16_GOTOFF \ |
| 238 | && (FIX)->fx_r_type != BFD_RELOC_HI16_GOTOFF \ |
| 239 | && (FIX)->fx_r_type != BFD_RELOC_HI16_S_GOTOFF \ |
| 240 | && (FIX)->fx_r_type != BFD_RELOC_GPREL16 \ |
| 241 | && (FIX)->fx_r_type != BFD_RELOC_VTABLE_INHERIT \ |
| 242 | && (FIX)->fx_r_type != BFD_RELOC_VTABLE_ENTRY \ |
| 243 | && ! S_IS_EXTERNAL ((FIX)->fx_addsy) \ |
| 244 | && ! S_IS_WEAK ((FIX)->fx_addsy) \ |
| 245 | && ((FIX)->fx_pcrel \ |
| 246 | || ((FIX)->fx_subsy != NULL \ |
| 247 | && (S_GET_SEGMENT ((FIX)->fx_subsy) \ |
| 248 | == S_GET_SEGMENT ((FIX)->fx_addsy))) \ |
| 249 | || S_IS_LOCAL ((FIX)->fx_addsy))) |
| 250 | |
| 251 | /* We must never ever try to resolve references to externally visible |
| 252 | symbols in the assembler, because the .o file might go into a shared |
| 253 | library, and some other shared library might override that symbol. */ |
| 254 | #define TC_RELOC_RTSYM_LOC_FIXUP(FIX) \ |
| 255 | ((FIX)->fx_addsy == NULL \ |
| 256 | || (! S_IS_EXTERNAL ((FIX)->fx_addsy) \ |
| 257 | && ! S_IS_WEAK ((FIX)->fx_addsy) \ |
| 258 | && S_IS_DEFINED ((FIX)->fx_addsy) \ |
| 259 | && ! S_IS_COMMON ((FIX)->fx_addsy))) |
| 260 | |
| 261 | #define DWARF2_LINE_MIN_INSN_LENGTH 4 |
| 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, c) ppc_parse_name (name, exp) |
| 272 | extern int ppc_parse_name PARAMS ((const char *, struct expressionS *)); |
| 273 | |
| 274 | #define md_operand(x) |