[deliverable/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, 2003,
   2004 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;						\
	    }								\
	}								\
    }

#define md_frag_check(FRAGP) \
  if ((FRAGP)->has_code							\
      && (((FRAGP)->fr_address + (FRAGP)->insn_addr) & 3) != 0)		\
    as_bad_where ((FRAGP)->fr_file, (FRAGP)->fr_line,			\
		  _("instruction address is not a multiple of 4"));
\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 */

extern const char       ppc_symbol_chars[];
#define tc_symbol_chars ppc_symbol_chars

#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)

#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));

#endif /* OBJ_ELF */

#if defined (OBJ_ELF) || defined (OBJ_XCOFF)
#define TC_FORCE_RELOCATION(FIX) ppc_force_relocation (FIX)
extern int ppc_force_relocation PARAMS ((struct fix *));
#endif

/* 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));

#define TARGET_USE_CFIPOP 1

#define tc_cfi_frame_initial_instructions ppc_cfi_frame_initial_instructions
extern void ppc_cfi_frame_initial_instructions PARAMS ((void));

#define tc_regname_to_dw2regnum tc_ppc_regname_to_dw2regnum
extern int tc_ppc_regname_to_dw2regnum PARAMS ((const char *regname));

extern int ppc_cie_data_alignment;

#define DWARF2_LINE_MIN_INSN_LENGTH     4
#define DWARF2_DEFAULT_RETURN_COLUMN    0x41
#define DWARF2_CIE_DATA_ALIGNMENT       ppc_cie_data_alignment
Commit	Line	Data
252b5132	1	/* tc-ppc.h -- Header file for tc-ppc.c.
09b935ac AM	2	Copyright 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003,
09b935ac AM	3	2004 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
09b935ac AM	113	#define md_frag_check(FRAGP) \
	114	if ((FRAGP)->has_code \
	115	&& (((FRAGP)->fr_address + (FRAGP)->insn_addr) & 3) != 0) \
	116	as_bad_where ((FRAGP)->fr_file, (FRAGP)->fr_line, \
	117	_("instruction address is not a multiple of 4"));
252b5132 RH	118	\f
	119	#ifdef TE_PE
	120
	121	/* Question marks are permitted in symbol names. */
	122	#define LEX_QM 1
	123
	124	/* Don't adjust TOC relocs. */
a161fe53	125	#define tc_fix_adjustable(FIX) ppc_pe_fix_adjustable (FIX)
252b5132 RH	126	extern int ppc_pe_fix_adjustable PARAMS ((struct fix *));
	127
	128	#endif
	129
	130	#ifdef OBJ_XCOFF
	131
	132	/* Declarations needed when generating XCOFF code. XCOFF is an
	133	extension of COFF, used only on the RS/6000. Rather than create an
	134	obj-xcoff, we just use obj-coff, and handle the extensions here in
	135	tc-ppc. */
	136
	137	/* We need to keep some information for symbols. */
	138	struct ppc_tc_sy
	139	{
	140	/* We keep a few linked lists of symbols. */
49309057	141	symbolS *next;
252b5132 RH	142	/* Non-zero if the symbol should be output. The RS/6000 assembler
	143	only outputs symbols that are external or are mentioned in a
	144	.globl or .lglobl statement. */
	145	int output;
	146	/* The symbol class. */
	147	int class;
	148	/* The real name, if the symbol was renamed. */
	149	char *real_name;
	150	/* For a csect symbol, the subsegment we are using. This is zero
	151	for symbols that are not csects. */
	152	subsegT subseg;
	153	/* For a csect or common symbol, the alignment to use. */
	154	int align;
	155	/* For a function symbol, a symbol whose value is the size. The
	156	field is NULL if there is no size. */
49309057	157	symbolS *size;
252b5132 RH	158	/* For a csect symbol, the last symbol which has been defined in
	159	this csect, or NULL if none have been defined so far. For a .bs
	160	symbol, the referenced csect symbol. */
49309057	161	symbolS *within;
252b5132 RH	162	};
	163
	164	#define TC_SYMFIELD_TYPE struct ppc_tc_sy
	165
	166	/* We need an additional auxent for function symbols. */
	167	#define OBJ_COFF_MAX_AUXENTRIES 2
	168
	169	/* Square and curly brackets are permitted in symbol names. */
	170	#define LEX_BR 3
	171
	172	/* Canonicalize the symbol name. */
	173	#define tc_canonicalize_symbol_name(name) ppc_canonicalize_symbol_name (name)
	174	extern char ppc_canonicalize_symbol_name PARAMS ((char ));
	175
	176	/* Get the symbol class from the name. */
	177	#define tc_symbol_new_hook(sym) ppc_symbol_new_hook (sym)
49309057	178	extern void ppc_symbol_new_hook PARAMS ((symbolS *));
252b5132 RH	179
	180	/* Set the symbol class of a label based on the csect. */
	181	#define tc_frob_label(sym) ppc_frob_label (sym)
49309057	182	extern void ppc_frob_label PARAMS ((symbolS *));
252b5132 RH	183
252b5132 RH	184	/* TOC relocs requires special handling. */
a161fe53	185	#define tc_fix_adjustable(FIX) ppc_fix_adjustable (FIX)
252b5132 RH	186	extern int ppc_fix_adjustable PARAMS ((struct fix *));
252b5132 RH	187
252b5132 RH	188	/* We need to set the section VMA. */
	189	#define tc_frob_section(sec) ppc_frob_section (sec)
	190	extern void ppc_frob_section PARAMS ((asection *));
	191
	192	/* Finish up the symbol. */
	193	#define tc_frob_symbol(sym, punt) punt = ppc_frob_symbol (sym)
49309057	194	extern int ppc_frob_symbol PARAMS ((symbolS *));
252b5132 RH	195
	196	/* Finish up the entire symtab. */
	197	#define tc_adjust_symtab() ppc_adjust_symtab ()
	198	extern void ppc_adjust_symtab PARAMS ((void));
	199
2c1c4c62 GK	200	/* We also need to copy, in particular, the class of the symbol,
	201	over what obj-coff would otherwise have copied. */
	202	#define OBJ_COPY_SYMBOL_ATTRIBUTES(dest,src) \
	203	do { \
	204	if (SF_GET_GET_SEGMENT (dest)) \
	205	S_SET_SEGMENT (dest, S_GET_SEGMENT (src)); \
	206	symbol_get_tc (dest)->size = symbol_get_tc (src)->size; \
	207	symbol_get_tc (dest)->align = symbol_get_tc (src)->align; \
	208	symbol_get_tc (dest)->class = symbol_get_tc (src)->class; \
	209	symbol_get_tc (dest)->within = symbol_get_tc (src)->within; \
	210	} while (0)
	211
252b5132 RH	212	#endif /* OBJ_XCOFF */
252b5132 RH	213
5ce8663f NC	214	extern const char ppc_symbol_chars[];
	215	#define tc_symbol_chars ppc_symbol_chars
	216
252b5132 RH	217	#ifdef OBJ_ELF
252b5132 RH	218
252b5132 RH	219	/* Support for SHF_EXCLUDE and SHT_ORDERED */
252b5132 RH	220	extern int ppc_section_letter PARAMS ((int, char **));
9de8d8f1 RH	221	extern int ppc_section_type PARAMS ((char *, size_t));
9de8d8f1 RH	222	extern int ppc_section_word PARAMS ((char *, size_t));
252b5132 RH	223	extern int ppc_section_flags PARAMS ((int, int, int));
	224
	225	#define md_elf_section_letter(LETTER, PTR_MSG) ppc_section_letter (LETTER, PTR_MSG)
9de8d8f1 RH	226	#define md_elf_section_type(STR, LEN) ppc_section_type (STR, LEN)
9de8d8f1 RH	227	#define md_elf_section_word(STR, LEN) ppc_section_word (STR, LEN)
252b5132 RH	228	#define md_elf_section_flags(FLAGS, ATTR, TYPE) ppc_section_flags (FLAGS, ATTR, TYPE)
252b5132 RH	229
252b5132 RH	230	#define tc_comment_chars ppc_comment_chars
	231	extern const char *ppc_comment_chars;
	232
81d4177b	233	/* Keep relocations relative to the GOT, or non-PC relative. */
a161fe53	234	#define tc_fix_adjustable(FIX) ppc_fix_adjustable (FIX)
0baf16f2	235	extern int ppc_fix_adjustable PARAMS ((struct fix *));
252b5132	236
a161fe53 AM	237	/* Values passed to md_apply_fix3 don't include symbol values. */
a161fe53 AM	238	#define MD_APPLY_SYM_VALUE(FIX) 0
252b5132	239
7e8d4ab4 AM	240	#define tc_frob_file_before_adjust ppc_frob_file_before_adjust
7e8d4ab4 AM	241	extern void ppc_frob_file_before_adjust PARAMS ((void));
0baf16f2	242
252b5132 RH	243	#endif /* OBJ_ELF */
252b5132 RH	244
5f5c1f75	245	#if defined (OBJ_ELF) \|\| defined (OBJ_XCOFF)
a161fe53 AM	246	#define TC_FORCE_RELOCATION(FIX) ppc_force_relocation (FIX)
a161fe53 AM	247	extern int ppc_force_relocation PARAMS ((struct fix *));
5f5c1f75	248	#endif
a161fe53	249
252b5132	250	/* call md_pcrel_from_section, not md_pcrel_from */
a161fe53	251	#define MD_PCREL_FROM_SECTION(FIX, SEC) md_pcrel_from_section(FIX, SEC)
252b5132 RH	252	extern long md_pcrel_from_section PARAMS ((struct fix *, segT));
252b5132 RH	253
a8a22e33	254	#define md_parse_name(name, exp, c) ppc_parse_name (name, exp)
252b5132 RH	255	extern int ppc_parse_name PARAMS ((const char , struct expressionS ));
	256
	257	#define md_operand(x)
6a0c61b7 EZ	258
	259	#define md_cleanup() ppc_cleanup ()
	260	extern void ppc_cleanup PARAMS ((void));
75e21f08 JJ	261
	262	#define TARGET_USE_CFIPOP 1
	263
	264	#define tc_cfi_frame_initial_instructions ppc_cfi_frame_initial_instructions
	265	extern void ppc_cfi_frame_initial_instructions PARAMS ((void));
	266
	267	#define tc_regname_to_dw2regnum tc_ppc_regname_to_dw2regnum
	268	extern int tc_ppc_regname_to_dw2regnum PARAMS ((const char *regname));
	269
	270	extern int ppc_cie_data_alignment;
	271
	272	#define DWARF2_LINE_MIN_INSN_LENGTH 4
	273	#define DWARF2_DEFAULT_RETURN_COLUMN 0x41
	274	#define DWARF2_CIE_DATA_ALIGNMENT ppc_cie_data_alignment