[deliverable/binutils-gdb.git] / gas / config / tc-sparc.h

/* tc-sparc.h - Macros and type defines for the sparc.
   Copyright 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998,
   1999, 2000, 2001 Free Software Foundation, Inc.

   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.  */

#ifndef TC_SPARC
#define TC_SPARC 1

#ifdef ANSI_PROTOTYPES
struct frag;
#endif

/* This is used to set the default value for `target_big_endian'.  */
#define TARGET_BYTES_BIG_ENDIAN 1

#define LOCAL_LABELS_FB 1

#define TARGET_ARCH bfd_arch_sparc

extern const char *sparc_target_format PARAMS ((void));
#define TARGET_FORMAT sparc_target_format ()

#define RELOC_EXPANSION_POSSIBLE
#define MAX_RELOC_EXPANSION 2

#if 0
#ifdef TE_SPARCAOUT
/* Bi-endian support may eventually be unconditional, but until things are
   working well it's only provided for targets that need it.  */
#define SPARC_BIENDIAN
#endif
#endif
/* Make it unconditional and check if -EL is valid after option parsing */
#define SPARC_BIENDIAN

#define WORKING_DOT_WORD

#define md_convert_frag(b,s,f) \
  as_fatal (_("sparc convert_frag\n"))
#define md_estimate_size_before_relax(f,s) \
  (as_fatal (_("estimate_size_before_relax called")), 1)

#define LISTING_HEADER "SPARC GAS "

extern int sparc_pic_code;

/* We require .word, et. al., to be aligned correctly.  */
#define md_cons_align(nbytes) sparc_cons_align (nbytes)
extern void sparc_cons_align PARAMS ((int));

#define HANDLE_ALIGN(fragp) sparc_handle_align (fragp)
extern void sparc_handle_align PARAMS ((struct frag *));

#define MAX_MEM_FOR_RS_ALIGN_CODE  (3 + 4 + 4)

#if defined (OBJ_ELF) || defined (OBJ_AOUT)

/* This expression evaluates to false if the relocation is for a local
   object for which we still want to do the relocation at runtime.
   True if we are willing to perform this relocation while building
   the .o file.

   If the reloc is against an externally visible symbol, then the
   a.out assembler should not do the relocation if generating PIC, and
   the ELF assembler should never do the relocation.  */

#ifdef OBJ_ELF
#define obj_relocate_extern 0
#else
#define obj_relocate_extern (! sparc_pic_code)
#endif

#define TC_RELOC_RTSYM_LOC_FIXUP(FIX)  \
  (obj_relocate_extern \
   || (FIX)->fx_addsy == NULL \
   || (! S_IS_EXTERNAL ((FIX)->fx_addsy) \
       && ! S_IS_WEAK ((FIX)->fx_addsy) \
       && S_IS_DEFINED ((FIX)->fx_addsy) \
       && ! S_IS_COMMON ((FIX)->fx_addsy)))
#endif

/* I know that "call 0" fails in sparc-coff if this doesn't return 1.  I
   don't know about other relocation types, or other formats, yet.  */
#ifdef OBJ_COFF
#define TC_FORCE_RELOCATION(FIXP)	\
	((FIXP)->fx_r_type == BFD_RELOC_32_PCREL_S2 \
	 && ((FIXP)->fx_addsy == 0 \
	     || S_GET_SEGMENT ((FIXP)->fx_addsy) == absolute_section))
#define RELOC_REQUIRES_SYMBOL
#endif

#ifdef OBJ_ELF
#define TC_FORCE_RELOCATION(fixp) elf32_sparc_force_relocation(fixp)
extern int elf32_sparc_force_relocation PARAMS ((struct fix *));
#endif

#ifdef OBJ_ELF
/* Keep relocations against global symbols.  Don't turn them into
   relocations against sections.  This is required for the dynamic
   linker to operate properly.  When generating PIC, we need to keep
   any non PC relative reloc.  The PIC part of this test must be
   parallel to the code in tc_gen_reloc which converts relocations to
   GOT relocations.  */
#define tc_fix_adjustable(FIX)						\
  (! S_IS_EXTERNAL ((FIX)->fx_addsy)					\
   && ! S_IS_WEAK ((FIX)->fx_addsy)					\
   && (FIX)->fx_r_type != BFD_RELOC_VTABLE_INHERIT			\
   && (FIX)->fx_r_type != BFD_RELOC_VTABLE_ENTRY			\
   && (! sparc_pic_code							\
       || ((FIX)->fx_r_type != BFD_RELOC_HI22				\
	   && (FIX)->fx_r_type != BFD_RELOC_LO10			\
	   && (FIX)->fx_r_type != BFD_RELOC_SPARC13			\
	   && ((FIX)->fx_r_type != BFD_RELOC_32_PCREL_S2		\
	       || (S_IS_DEFINED ((FIX)->fx_addsy)			\
		   && ! S_IS_COMMON ((FIX)->fx_addsy)			\
		   && ! S_IS_EXTERNAL ((FIX)->fx_addsy)			\
		   && ! S_IS_WEAK ((FIX)->fx_addsy)))			\
	   && ((FIX)->fx_pcrel						\
	       || ((FIX)->fx_subsy != NULL				\
		   && (S_GET_SEGMENT ((FIX)->fx_subsy)			\
		       == S_GET_SEGMENT ((FIX)->fx_addsy)))		\
	       || S_IS_LOCAL ((FIX)->fx_addsy)))))

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

#ifdef OBJ_AOUT
/* When generating PIC code, we must not adjust any reloc which will
   turn into a reloc against the global offset table, nor any reloc
   which we will need if a symbol is overridden.  */
#define tc_fix_adjustable(FIX)						\
  (! sparc_pic_code							\
   || ((FIX)->fx_pcrel							\
       && ((FIX)->fx_addsy == NULL					\
	   || (! S_IS_EXTERNAL ((FIX)->fx_addsy)			\
	       && ! S_IS_WEAK ((FIX)->fx_addsy))))			\
   || (FIX)->fx_r_type == BFD_RELOC_16					\
   || (FIX)->fx_r_type == BFD_RELOC_32)
#endif

#define elf_tc_final_processing sparc_elf_final_processing
extern void sparc_elf_final_processing PARAMS ((void));

#define md_operand(x)

extern void sparc_md_end PARAMS ((void));
#define md_end() sparc_md_end ()

#endif

#ifdef OBJ_ELF
#define TC_PARSE_CONS_EXPRESSION(EXP, NBYTES) sparc_cons (EXP, NBYTES)
extern void sparc_cons PARAMS ((expressionS *, int));
#endif

#define TC_CONS_FIX_NEW cons_fix_new_sparc
extern void cons_fix_new_sparc
  PARAMS ((struct frag *, int, unsigned int, struct expressionS *));

#define TC_FIX_TYPE	valueT

#define TC_INIT_FIX_DATA(X)			\
  do						\
     {						\
       (X)->tc_fix_data = 0;			\
     }						\
  while (0)

#define TC_FIX_DATA_PRINT(FILE, FIXP)					\
  do									\
    {									\
      fprintf ((FILE), "addend2=%ld\n",   				\
	      (unsigned long) (FIXP)->tc_fix_data);			\
    }									\
  while (0)

#define DWARF2_LINE_MIN_INSN_LENGTH 4

/* end of tc-sparc.h */
Commit	Line	Data
252b5132	1	/* tc-sparc.h - Macros and type defines for the sparc.
f7e42eb4	2	Copyright 1989, 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1997, 1998,
94f592af	3	1999, 2000, 2001 Free Software Foundation, Inc.
252b5132 RH	4
	5	This file is part of GAS, the GNU Assembler.
	6
	7	GAS is free software; you can redistribute it and/or modify
	8	it under the terms of the GNU General Public License as
	9	published by the Free Software Foundation; either version 2,
	10	or (at your option) any later version.
	11
	12	GAS is distributed in the hope that it will be useful, but
	13	WITHOUT ANY WARRANTY; without even the implied warranty of
	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See
	15	the GNU General Public License for more details.
	16
	17	You should have received a copy of the GNU General Public
	18	License along with GAS; see the file COPYING. If not, write
	19	to the Free Software Foundation, 59 Temple Place - Suite 330,
	20	Boston, MA 02111-1307, USA. */
	21
	22	#ifndef TC_SPARC
	23	#define TC_SPARC 1
	24
	25	#ifdef ANSI_PROTOTYPES
	26	struct frag;
	27	#endif
	28
	29	/* This is used to set the default value for `target_big_endian'. */
	30	#define TARGET_BYTES_BIG_ENDIAN 1
	31
	32	#define LOCAL_LABELS_FB 1
	33
	34	#define TARGET_ARCH bfd_arch_sparc
	35
	36	extern const char *sparc_target_format PARAMS ((void));
	37	#define TARGET_FORMAT sparc_target_format ()
	38
dabe3bbc RH	39	#define RELOC_EXPANSION_POSSIBLE
	40	#define MAX_RELOC_EXPANSION 2
	41
252b5132 RH	42	#if 0
	43	#ifdef TE_SPARCAOUT
	44	/* Bi-endian support may eventually be unconditional, but until things are
	45	working well it's only provided for targets that need it. */
	46	#define SPARC_BIENDIAN
	47	#endif
	48	#endif
	49	/* Make it unconditional and check if -EL is valid after option parsing */
	50	#define SPARC_BIENDIAN
	51
	52	#define WORKING_DOT_WORD
	53
0a9ef439 RH	54	#define md_convert_frag(b,s,f) \
0a9ef439 RH	55	as_fatal (_("sparc convert_frag\n"))
252b5132	56	#define md_estimate_size_before_relax(f,s) \
07726851	57	(as_fatal (_("estimate_size_before_relax called")), 1)
252b5132 RH	58
	59	#define LISTING_HEADER "SPARC GAS "
	60
	61	extern int sparc_pic_code;
	62
252b5132 RH	63	/* We require .word, et. al., to be aligned correctly. */
	64	#define md_cons_align(nbytes) sparc_cons_align (nbytes)
	65	extern void sparc_cons_align PARAMS ((int));
0a9ef439	66
252b5132 RH	67	#define HANDLE_ALIGN(fragp) sparc_handle_align (fragp)
	68	extern void sparc_handle_align PARAMS ((struct frag *));
	69
0a9ef439 RH	70	#define MAX_MEM_FOR_RS_ALIGN_CODE (3 + 4 + 4)
0a9ef439 RH	71
252b5132 RH	72	#if defined (OBJ_ELF) \|\| defined (OBJ_AOUT)
	73
	74	/* This expression evaluates to false if the relocation is for a local
	75	object for which we still want to do the relocation at runtime.
	76	True if we are willing to perform this relocation while building
	77	the .o file.
	78
	79	If the reloc is against an externally visible symbol, then the
	80	a.out assembler should not do the relocation if generating PIC, and
	81	the ELF assembler should never do the relocation. */
	82
	83	#ifdef OBJ_ELF
	84	#define obj_relocate_extern 0
	85	#else
	86	#define obj_relocate_extern (! sparc_pic_code)
	87	#endif
	88
	89	#define TC_RELOC_RTSYM_LOC_FIXUP(FIX) \
	90	(obj_relocate_extern \
	91	\|\| (FIX)->fx_addsy == NULL \
	92	\|\| (! S_IS_EXTERNAL ((FIX)->fx_addsy) \
	93	&& ! S_IS_WEAK ((FIX)->fx_addsy) \
	94	&& S_IS_DEFINED ((FIX)->fx_addsy) \
	95	&& ! S_IS_COMMON ((FIX)->fx_addsy)))
	96	#endif
	97
	98	/* I know that "call 0" fails in sparc-coff if this doesn't return 1. I
	99	don't know about other relocation types, or other formats, yet. */
	100	#ifdef OBJ_COFF
	101	#define TC_FORCE_RELOCATION(FIXP) \
	102	((FIXP)->fx_r_type == BFD_RELOC_32_PCREL_S2 \
	103	&& ((FIXP)->fx_addsy == 0 \
	104	\|\| S_GET_SEGMENT ((FIXP)->fx_addsy) == absolute_section))
	105	#define RELOC_REQUIRES_SYMBOL
	106	#endif
	107
	108	#ifdef OBJ_ELF
	109	#define TC_FORCE_RELOCATION(fixp) elf32_sparc_force_relocation(fixp)
	110	extern int elf32_sparc_force_relocation PARAMS ((struct fix *));
	111	#endif
	112
252b5132 RH	113	#ifdef OBJ_ELF
	114	/* Keep relocations against global symbols. Don't turn them into
	115	relocations against sections. This is required for the dynamic
	116	linker to operate properly. When generating PIC, we need to keep
153b546a ILT	117	any non PC relative reloc. The PIC part of this test must be
	118	parallel to the code in tc_gen_reloc which converts relocations to
	119	GOT relocations. */
252b5132 RH	120	#define tc_fix_adjustable(FIX) \
	121	(! S_IS_EXTERNAL ((FIX)->fx_addsy) \
	122	&& ! S_IS_WEAK ((FIX)->fx_addsy) \
d2e71411 ILT	123	&& (FIX)->fx_r_type != BFD_RELOC_VTABLE_INHERIT \
d2e71411 ILT	124	&& (FIX)->fx_r_type != BFD_RELOC_VTABLE_ENTRY \
252b5132	125	&& (! sparc_pic_code \
a1f2d742 ILT	126	\|\| ((FIX)->fx_r_type != BFD_RELOC_HI22 \
	127	&& (FIX)->fx_r_type != BFD_RELOC_LO10 \
	128	&& (FIX)->fx_r_type != BFD_RELOC_SPARC13 \
	129	&& ((FIX)->fx_r_type != BFD_RELOC_32_PCREL_S2 \
	130	\|\| (S_IS_DEFINED ((FIX)->fx_addsy) \
	131	&& ! S_IS_COMMON ((FIX)->fx_addsy) \
	132	&& ! S_IS_EXTERNAL ((FIX)->fx_addsy) \
	133	&& ! S_IS_WEAK ((FIX)->fx_addsy))) \
	134	&& ((FIX)->fx_pcrel \
	135	\|\| ((FIX)->fx_subsy != NULL \
	136	&& (S_GET_SEGMENT ((FIX)->fx_subsy) \
	137	== S_GET_SEGMENT ((FIX)->fx_addsy))) \
	138	\|\| S_IS_LOCAL ((FIX)->fx_addsy)))))
6d8809aa RH	139
	140	/* Finish up the entire symtab. */
	141	#define tc_adjust_symtab() sparc_adjust_symtab ()
	142	extern void sparc_adjust_symtab PARAMS ((void));
252b5132 RH	143	#endif
	144
	145	#ifdef OBJ_AOUT
	146	/* When generating PIC code, we must not adjust any reloc which will
	147	turn into a reloc against the global offset table, nor any reloc
	148	which we will need if a symbol is overridden. */
	149	#define tc_fix_adjustable(FIX) \
	150	(! sparc_pic_code \
	151	\|\| ((FIX)->fx_pcrel \
	152	&& ((FIX)->fx_addsy == NULL \
	153	\|\| (! S_IS_EXTERNAL ((FIX)->fx_addsy) \
	154	&& ! S_IS_WEAK ((FIX)->fx_addsy)))) \
	155	\|\| (FIX)->fx_r_type == BFD_RELOC_16 \
	156	\|\| (FIX)->fx_r_type == BFD_RELOC_32)
	157	#endif
	158
	159	#define elf_tc_final_processing sparc_elf_final_processing
	160	extern void sparc_elf_final_processing PARAMS ((void));
	161
	162	#define md_operand(x)
	163
	164	extern void sparc_md_end PARAMS ((void));
	165	#define md_end() sparc_md_end ()
	166
	167	#endif
	168
bd5e6e7e JJ	169	#ifdef OBJ_ELF
	170	#define TC_PARSE_CONS_EXPRESSION(EXP, NBYTES) sparc_cons (EXP, NBYTES)
	171	extern void sparc_cons PARAMS ((expressionS *, int));
	172	#endif
	173
252b5132 RH	174	#define TC_CONS_FIX_NEW cons_fix_new_sparc
	175	extern void cons_fix_new_sparc
	176	PARAMS ((struct frag , int, unsigned int, struct expressionS ));
	177
dabe3bbc RH	178	#define TC_FIX_TYPE valueT
	179
	180	#define TC_INIT_FIX_DATA(X) \
	181	do \
	182	{ \
	183	(X)->tc_fix_data = 0; \
	184	} \
814f6641	185	while (0)
dabe3bbc RH	186
	187	#define TC_FIX_DATA_PRINT(FILE, FIXP) \
	188	do \
	189	{ \
814f6641	190	fprintf ((FILE), "addend2=%ld\n", \
dabe3bbc RH	191	(unsigned long) (FIXP)->tc_fix_data); \
dabe3bbc RH	192	} \
814f6641	193	while (0)
dabe3bbc	194
b8e904dc JJ	195	#define DWARF2_LINE_MIN_INSN_LENGTH 4
b8e904dc JJ	196
252b5132	197	/* end of tc-sparc.h */