[thirdparty/binutils-gdb.git] / gas / config / tc-ppc.h

/* tc-ppc.h -- Header file for tc-ppc.c.
   Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002
   Free Software Foundation, Inc.
   Written by Ian Lance Taylor, Cygnus Support.

   This file is part of GAS, the GNU Assembler.

   GAS is free software; you can redistribute it and/or modify
   it under the terms of the GNU General Public License as published by
   the Free Software Foundation; either version 2, or (at your option)
   any later version.

   GAS is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.

   You should have received a copy of the GNU General Public License
   along with GAS; see the file COPYING.  If not, write to the Free
   Software Foundation, 59 Temple Place - Suite 330, Boston, MA
   02111-1307, USA.  */

#define TC_PPC

#ifdef ANSI_PROTOTYPES
struct fix;
#endif

/* Set the endianness we are using.  Default to big endian.  */
#ifndef TARGET_BYTES_BIG_ENDIAN
#define TARGET_BYTES_BIG_ENDIAN 1
#endif

#ifndef BFD_ASSEMBLER
 #error PowerPC support requires BFD_ASSEMBLER
#endif

/* If OBJ_COFF is defined, and TE_PE is not defined, we are assembling
   XCOFF for AIX or PowerMac.  If TE_PE is defined, we are assembling
   COFF for Windows NT.  */

#ifdef OBJ_COFF
#ifndef TE_PE
#define OBJ_XCOFF
#endif
#endif

/* The target BFD architecture.  */
#define TARGET_ARCH (ppc_arch ())
#define TARGET_MACH (ppc_mach ())
extern enum bfd_architecture ppc_arch PARAMS ((void));
extern unsigned long ppc_mach PARAMS ((void));

/* Whether or not the target is big endian */
extern int target_big_endian;

/* The target BFD format.  */
#define TARGET_FORMAT (ppc_target_format ())
extern char *ppc_target_format PARAMS ((void));

/* Permit temporary numeric labels.  */
#define LOCAL_LABELS_FB 1

/* $ is used to refer to the current location.  */
#define DOLLAR_DOT

/* Strings do not use backslash escapes under COFF.  */
#ifdef OBJ_COFF
#define NO_STRING_ESCAPES
#endif

#ifdef OBJ_ELF
#define DIFF_EXPR_OK		/* foo-. gets turned into PC relative relocs */
#endif

#if TARGET_BYTES_BIG_ENDIAN
#define PPC_BIG_ENDIAN 1
#else
#define PPC_BIG_ENDIAN 0
#endif

/* We don't need to handle .word strangely.  */
#define WORKING_DOT_WORD

#define MAX_MEM_FOR_RS_ALIGN_CODE 4
#define HANDLE_ALIGN(FRAGP)						\
  if ((FRAGP)->fr_type == rs_align_code) 				\
    {									\
      valueT count = ((FRAGP)->fr_next->fr_address			\
		      - ((FRAGP)->fr_address + (FRAGP)->fr_fix));	\
      if (count != 0 && (count & 3) == 0)				\
	{								\
	  unsigned char *dest = (FRAGP)->fr_literal + (FRAGP)->fr_fix;	\
									\
	  (FRAGP)->fr_var = 4;						\
	  if (target_big_endian)					\
	    {								\
	      *dest++ = 0x60;						\
	      *dest++ = 0;						\
	      *dest++ = 0;						\
	      *dest++ = 0;						\
	    }								\
	  else								\
	    {								\
	      *dest++ = 0;						\
	      *dest++ = 0;						\
	      *dest++ = 0;						\
	      *dest++ = 0x60;						\
	    }								\
	}								\
    }

\f
#ifdef TE_PE

/* Question marks are permitted in symbol names.  */
#define LEX_QM 1

/* Don't adjust TOC relocs.  */
#define tc_fix_adjustable(FIX) ppc_pe_fix_adjustable (FIX)
extern int ppc_pe_fix_adjustable PARAMS ((struct fix *));

#endif

#ifdef OBJ_XCOFF

/* Declarations needed when generating XCOFF code.  XCOFF is an
   extension of COFF, used only on the RS/6000.  Rather than create an
   obj-xcoff, we just use obj-coff, and handle the extensions here in
   tc-ppc.  */

/* We need to keep some information for symbols.  */
struct ppc_tc_sy
{
  /* We keep a few linked lists of symbols.  */
  symbolS *next;
  /* Non-zero if the symbol should be output.  The RS/6000 assembler
     only outputs symbols that are external or are mentioned in a
     .globl or .lglobl statement.  */
  int output;
  /* The symbol class.  */
  int class;
  /* The real name, if the symbol was renamed.  */
  char *real_name;
  /* For a csect symbol, the subsegment we are using.  This is zero
     for symbols that are not csects.  */
  subsegT subseg;
  /* For a csect or common symbol, the alignment to use.  */
  int align;
  /* For a function symbol, a symbol whose value is the size.  The
     field is NULL if there is no size.  */
  symbolS *size;
  /* For a csect symbol, the last symbol which has been defined in
     this csect, or NULL if none have been defined so far.  For a .bs
     symbol, the referenced csect symbol.  */
  symbolS *within;
};

#define TC_SYMFIELD_TYPE struct ppc_tc_sy

/* We need an additional auxent for function symbols.  */
#define OBJ_COFF_MAX_AUXENTRIES 2

/* Square and curly brackets are permitted in symbol names.  */
#define LEX_BR 3

/* Canonicalize the symbol name.  */
#define tc_canonicalize_symbol_name(name) ppc_canonicalize_symbol_name (name)
extern char *ppc_canonicalize_symbol_name PARAMS ((char *));

/* Get the symbol class from the name.  */
#define tc_symbol_new_hook(sym) ppc_symbol_new_hook (sym)
extern void ppc_symbol_new_hook PARAMS ((symbolS *));

/* Set the symbol class of a label based on the csect.  */
#define tc_frob_label(sym) ppc_frob_label (sym)
extern void ppc_frob_label PARAMS ((symbolS *));

/* TOC relocs requires special handling.  */
#define tc_fix_adjustable(FIX) ppc_fix_adjustable (FIX)
extern int ppc_fix_adjustable PARAMS ((struct fix *));

/* We need to set the section VMA.  */
#define tc_frob_section(sec) ppc_frob_section (sec)
extern void ppc_frob_section PARAMS ((asection *));

/* Finish up the symbol.  */
#define tc_frob_symbol(sym, punt) punt = ppc_frob_symbol (sym)
extern int ppc_frob_symbol PARAMS ((symbolS *));

/* Finish up the entire symtab.  */
#define tc_adjust_symtab() ppc_adjust_symtab ()
extern void ppc_adjust_symtab PARAMS ((void));

/* We also need to copy, in particular, the class of the symbol,
   over what obj-coff would otherwise have copied.  */
#define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src)			\
do {								\
  if (SF_GET_GET_SEGMENT (dest))				\
    S_SET_SEGMENT (dest, S_GET_SEGMENT (src));			\
  symbol_get_tc (dest)->size = symbol_get_tc (src)->size;	\
  symbol_get_tc (dest)->align = symbol_get_tc (src)->align;	\
  symbol_get_tc (dest)->class = symbol_get_tc (src)->class;	\
  symbol_get_tc (dest)->within = symbol_get_tc (src)->within;	\
} while (0)

#endif /* OBJ_XCOFF */

#ifdef OBJ_ELF

/* Support for SHF_EXCLUDE and SHT_ORDERED */
extern int ppc_section_letter PARAMS ((int, char **));
extern int ppc_section_type PARAMS ((char *, size_t));
extern int ppc_section_word PARAMS ((char *, size_t));
extern int ppc_section_flags PARAMS ((int, int, int));

#define md_elf_section_letter(LETTER, PTR_MSG)	ppc_section_letter (LETTER, PTR_MSG)
#define md_elf_section_type(STR, LEN)		ppc_section_type (STR, LEN)
#define md_elf_section_word(STR, LEN)		ppc_section_word (STR, LEN)
#define md_elf_section_flags(FLAGS, ATTR, TYPE)	ppc_section_flags (FLAGS, ATTR, TYPE)

/* Add extra PPC sections -- Note, for now, make .sbss2 and .PPC.EMB.sbss0 a
   normal section, and not a bss section so that the linker doesn't crater
   when trying to make more than 2 sections.  */
#define ELF_TC_SPECIAL_SECTIONS \
  { ".tags",		SHT_ORDERED,	SHF_ALLOC },			\
  { ".sdata",		SHT_PROGBITS,	SHF_ALLOC + SHF_WRITE },	\
  { ".sbss",		SHT_NOBITS,	SHF_ALLOC + SHF_WRITE },	\
  { ".sdata2",		SHT_PROGBITS,	SHF_ALLOC },			\
  { ".sbss2",		SHT_PROGBITS,	SHF_ALLOC },			\
  { ".PPC.EMB.apuinfo",       SHT_NOTE,       0 }, \
  { ".PPC.EMB.sdata0",	SHT_PROGBITS,	SHF_ALLOC },			\
  { ".PPC.EMB.sbss0",	SHT_PROGBITS,	SHF_ALLOC },			\
  /* Extra sections for 64-bit ELF PPC.  */				\
  { ".toc",		SHT_PROGBITS,	SHF_ALLOC + SHF_WRITE},		\
  { ".tocbss",		SHT_NOBITS,	SHF_ALLOC + SHF_WRITE},

#define tc_comment_chars ppc_comment_chars
extern const char *ppc_comment_chars;

/* Keep relocations relative to the GOT, or non-PC relative.  */
#define tc_fix_adjustable(FIX) ppc_fix_adjustable (FIX)
extern int ppc_fix_adjustable PARAMS ((struct fix *));

/* Values passed to md_apply_fix3 don't include symbol values.  */
#define MD_APPLY_SYM_VALUE(FIX) 0

#define tc_frob_file_before_adjust ppc_frob_file_before_adjust
extern void ppc_frob_file_before_adjust PARAMS ((void));

#define DWARF2_LINE_MIN_INSN_LENGTH 4
#endif /* OBJ_ELF */

#define TC_FORCE_RELOCATION(FIX) ppc_force_relocation (FIX)
extern int ppc_force_relocation PARAMS ((struct fix *));

/* call md_pcrel_from_section, not md_pcrel_from */
#define MD_PCREL_FROM_SECTION(FIX, SEC) md_pcrel_from_section(FIX, SEC)
extern long md_pcrel_from_section PARAMS ((struct fix *, segT));

#define md_parse_name(name, exp, c) ppc_parse_name (name, exp)
extern int ppc_parse_name PARAMS ((const char *, struct expressionS *));

#define md_operand(x)

#define md_cleanup() ppc_cleanup ()
 extern void ppc_cleanup PARAMS ((void));
Commit	Line	Data
252b5132	1	/* tc-ppc.h -- Header file for tc-ppc.c.
5d6255fe	2	Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002
2c1c4c62	3	Free Software Foundation, Inc.
252b5132 RH	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
81d4177b	21	02111-1307, USA. */
252b5132 RH	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 ())
7f6d05e8	50	#define TARGET_MACH (ppc_mach ())
252b5132	51	extern enum bfd_architecture ppc_arch PARAMS ((void));
7f6d05e8	52	extern unsigned long ppc_mach PARAMS ((void));
252b5132 RH	53
	54	/* Whether or not the target is big endian */
	55	extern int target_big_endian;
	56
	57	/* The target BFD format. */
7f6d05e8	58	#define TARGET_FORMAT (ppc_target_format ())
0baf16f2	59	extern char *ppc_target_format PARAMS ((void));
252b5132 RH	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
0baf16f2 AM	85	#define MAX_MEM_FOR_RS_ALIGN_CODE 4
	86	#define HANDLE_ALIGN(FRAGP) \
	87	if ((FRAGP)->fr_type == rs_align_code) \
	88	{ \
	89	valueT count = ((FRAGP)->fr_next->fr_address \
	90	- ((FRAGP)->fr_address + (FRAGP)->fr_fix)); \
	91	if (count != 0 && (count & 3) == 0) \
	92	{ \
	93	unsigned char *dest = (FRAGP)->fr_literal + (FRAGP)->fr_fix; \
	94	\
	95	(FRAGP)->fr_var = 4; \
	96	if (target_big_endian) \
	97	{ \
	98	*dest++ = 0x60; \
	99	*dest++ = 0; \
	100	*dest++ = 0; \
	101	*dest++ = 0; \
	102	} \
	103	else \
	104	{ \
	105	*dest++ = 0; \
	106	*dest++ = 0; \
	107	*dest++ = 0; \
	108	*dest++ = 0x60; \
	109	} \
	110	} \
	111	}
	112
252b5132 RH	113	\f
	114	#ifdef TE_PE
	115
	116	/* Question marks are permitted in symbol names. */
	117	#define LEX_QM 1
	118
	119	/* Don't adjust TOC relocs. */
a161fe53	120	#define tc_fix_adjustable(FIX) ppc_pe_fix_adjustable (FIX)
252b5132 RH	121	extern int ppc_pe_fix_adjustable PARAMS ((struct fix *));
	122
	123	#endif
	124
	125	#ifdef OBJ_XCOFF
	126
	127	/* Declarations needed when generating XCOFF code. XCOFF is an
	128	extension of COFF, used only on the RS/6000. Rather than create an
	129	obj-xcoff, we just use obj-coff, and handle the extensions here in
	130	tc-ppc. */
	131
	132	/* We need to keep some information for symbols. */
	133	struct ppc_tc_sy
	134	{
	135	/* We keep a few linked lists of symbols. */
49309057	136	symbolS *next;
252b5132 RH	137	/* Non-zero if the symbol should be output. The RS/6000 assembler
	138	only outputs symbols that are external or are mentioned in a
	139	.globl or .lglobl statement. */
	140	int output;
	141	/* The symbol class. */
	142	int class;
	143	/* The real name, if the symbol was renamed. */
	144	char *real_name;
	145	/* For a csect symbol, the subsegment we are using. This is zero
	146	for symbols that are not csects. */
	147	subsegT subseg;
	148	/* For a csect or common symbol, the alignment to use. */
	149	int align;
	150	/* For a function symbol, a symbol whose value is the size. The
	151	field is NULL if there is no size. */
49309057	152	symbolS *size;
252b5132 RH	153	/* For a csect symbol, the last symbol which has been defined in
	154	this csect, or NULL if none have been defined so far. For a .bs
	155	symbol, the referenced csect symbol. */
49309057	156	symbolS *within;
252b5132 RH	157	};
	158
	159	#define TC_SYMFIELD_TYPE struct ppc_tc_sy
	160
	161	/* We need an additional auxent for function symbols. */
	162	#define OBJ_COFF_MAX_AUXENTRIES 2
	163
	164	/* Square and curly brackets are permitted in symbol names. */
	165	#define LEX_BR 3
	166
	167	/* Canonicalize the symbol name. */
	168	#define tc_canonicalize_symbol_name(name) ppc_canonicalize_symbol_name (name)
	169	extern char ppc_canonicalize_symbol_name PARAMS ((char ));
	170
	171	/* Get the symbol class from the name. */
	172	#define tc_symbol_new_hook(sym) ppc_symbol_new_hook (sym)
49309057	173	extern void ppc_symbol_new_hook PARAMS ((symbolS *));
252b5132 RH	174
	175	/* Set the symbol class of a label based on the csect. */
	176	#define tc_frob_label(sym) ppc_frob_label (sym)
49309057	177	extern void ppc_frob_label PARAMS ((symbolS *));
252b5132 RH	178
252b5132 RH	179	/* TOC relocs requires special handling. */
a161fe53	180	#define tc_fix_adjustable(FIX) ppc_fix_adjustable (FIX)
252b5132 RH	181	extern int ppc_fix_adjustable PARAMS ((struct fix *));
252b5132 RH	182
252b5132 RH	183	/* We need to set the section VMA. */
	184	#define tc_frob_section(sec) ppc_frob_section (sec)
	185	extern void ppc_frob_section PARAMS ((asection *));
	186
	187	/* Finish up the symbol. */
	188	#define tc_frob_symbol(sym, punt) punt = ppc_frob_symbol (sym)
49309057	189	extern int ppc_frob_symbol PARAMS ((symbolS *));
252b5132 RH	190
	191	/* Finish up the entire symtab. */
	192	#define tc_adjust_symtab() ppc_adjust_symtab ()
	193	extern void ppc_adjust_symtab PARAMS ((void));
	194
2c1c4c62 GK	195	/* We also need to copy, in particular, the class of the symbol,
	196	over what obj-coff would otherwise have copied. */
	197	#define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
	198	do { \
	199	if (SF_GET_GET_SEGMENT (dest)) \
	200	S_SET_SEGMENT (dest, S_GET_SEGMENT (src)); \
	201	symbol_get_tc (dest)->size = symbol_get_tc (src)->size; \
	202	symbol_get_tc (dest)->align = symbol_get_tc (src)->align; \
	203	symbol_get_tc (dest)->class = symbol_get_tc (src)->class; \
	204	symbol_get_tc (dest)->within = symbol_get_tc (src)->within; \
	205	} while (0)
	206
252b5132 RH	207	#endif /* OBJ_XCOFF */
	208
	209	#ifdef OBJ_ELF
	210
252b5132 RH	211	/* Support for SHF_EXCLUDE and SHT_ORDERED */
252b5132 RH	212	extern int ppc_section_letter PARAMS ((int, char **));
9de8d8f1 RH	213	extern int ppc_section_type PARAMS ((char *, size_t));
9de8d8f1 RH	214	extern int ppc_section_word PARAMS ((char *, size_t));
252b5132 RH	215	extern int ppc_section_flags PARAMS ((int, int, int));
	216
	217	#define md_elf_section_letter(LETTER, PTR_MSG) ppc_section_letter (LETTER, PTR_MSG)
9de8d8f1 RH	218	#define md_elf_section_type(STR, LEN) ppc_section_type (STR, LEN)
9de8d8f1 RH	219	#define md_elf_section_word(STR, LEN) ppc_section_word (STR, LEN)
252b5132 RH	220	#define md_elf_section_flags(FLAGS, ATTR, TYPE) ppc_section_flags (FLAGS, ATTR, TYPE)
	221
	222	/* Add extra PPC sections -- Note, for now, make .sbss2 and .PPC.EMB.sbss0 a
	223	normal section, and not a bss section so that the linker doesn't crater
	224	when trying to make more than 2 sections. */
	225	#define ELF_TC_SPECIAL_SECTIONS \
2b3c4602 AM	226	{ ".tags", SHT_ORDERED, SHF_ALLOC }, \
	227	{ ".sdata", SHT_PROGBITS, SHF_ALLOC + SHF_WRITE }, \
	228	{ ".sbss", SHT_NOBITS, SHF_ALLOC + SHF_WRITE }, \
	229	{ ".sdata2", SHT_PROGBITS, SHF_ALLOC }, \
	230	{ ".sbss2", SHT_PROGBITS, SHF_ALLOC }, \
6a0c61b7	231	{ ".PPC.EMB.apuinfo", SHT_NOTE, 0 }, \
2b3c4602 AM	232	{ ".PPC.EMB.sdata0", SHT_PROGBITS, SHF_ALLOC }, \
	233	{ ".PPC.EMB.sbss0", SHT_PROGBITS, SHF_ALLOC }, \
	234	/* Extra sections for 64-bit ELF PPC. */ \
	235	{ ".toc", SHT_PROGBITS, SHF_ALLOC + SHF_WRITE}, \
	236	{ ".tocbss", SHT_NOBITS, SHF_ALLOC + SHF_WRITE},
252b5132 RH	237
	238	#define tc_comment_chars ppc_comment_chars
	239	extern const char *ppc_comment_chars;
	240
81d4177b	241	/* Keep relocations relative to the GOT, or non-PC relative. */
a161fe53	242	#define tc_fix_adjustable(FIX) ppc_fix_adjustable (FIX)
0baf16f2	243	extern int ppc_fix_adjustable PARAMS ((struct fix *));
252b5132	244
a161fe53 AM	245	/* Values passed to md_apply_fix3 don't include symbol values. */
a161fe53 AM	246	#define MD_APPLY_SYM_VALUE(FIX) 0
252b5132	247
7e8d4ab4 AM	248	#define tc_frob_file_before_adjust ppc_frob_file_before_adjust
7e8d4ab4 AM	249	extern void ppc_frob_file_before_adjust PARAMS ((void));
0baf16f2	250
5d6f4f16	251	#define DWARF2_LINE_MIN_INSN_LENGTH 4
252b5132 RH	252	#endif /* OBJ_ELF */
252b5132 RH	253
a161fe53 AM	254	#define TC_FORCE_RELOCATION(FIX) ppc_force_relocation (FIX)
	255	extern int ppc_force_relocation PARAMS ((struct fix *));
	256
252b5132	257	/* call md_pcrel_from_section, not md_pcrel_from */
a161fe53	258	#define MD_PCREL_FROM_SECTION(FIX, SEC) md_pcrel_from_section(FIX, SEC)
252b5132 RH	259	extern long md_pcrel_from_section PARAMS ((struct fix *, segT));
252b5132 RH	260
a8a22e33	261	#define md_parse_name(name, exp, c) ppc_parse_name (name, exp)
252b5132 RH	262	extern int ppc_parse_name PARAMS ((const char , struct expressionS ));
	263
	264	#define md_operand(x)
6a0c61b7 EZ	265
	266	#define md_cleanup() ppc_cleanup ()
	267	extern void ppc_cleanup PARAMS ((void));