1 /* tc-sparc.h - Macros and type defines for the sparc.
2    Copyright (C) 1989, 90-95, 1996 Free Software Foundation, Inc.
3 
4    This file is part of GAS, the GNU Assembler.
5 
6    GAS is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as
8    published by the Free Software Foundation; either version 2,
9    or (at your option) any later version.
10 
11    GAS is distributed in the hope that it will be useful, but
12    WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See
14    the GNU General Public License for more details.
15 
16    You should have received a copy of the GNU General Public
17    License along with GAS; see the file COPYING.  If not, write
18    to the Free Software Foundation, 59 Temple Place - Suite 330,
19    Boston, MA 02111-1307, USA.  */
20 
21 #define TC_SPARC 1
22 
23 #define LOCAL_LABELS_FB 1
24 
25 #define TARGET_ARCH bfd_arch_sparc
26 
27 /* This is used to set the default value for `target_big_endian'.  */
28 #define TARGET_BYTES_BIG_ENDIAN 1
29 
30 #ifdef OBJ_AOUT
31 #ifdef TE_NetBSD
32 #define TARGET_FORMAT "a.out-sparc-netbsd"
33 #else
34 #ifdef TE_SPARCAOUT
35 extern int target_big_endian;
36 #define TARGET_FORMAT (target_big_endian ? "a.out-sunos-big" : "a.out-sparc-little")
37 /* Bi-endian support may eventually be unconditional, but until things are
38    working well it's only provided for targets that need it.  */
39 #define SPARC_BIENDIAN
40 #else
41 #define TARGET_FORMAT "a.out-sunos-big"
42 #endif
43 #endif
44 #endif
45 #ifdef OBJ_BOUT
46 #define TARGET_FORMAT "b.out.big"
47 #endif
48 #ifdef OBJ_ELF
49 #ifdef SPARC_ARCH64
50 #define TARGET_FORMAT "elf64-sparc"
51 #else
52 #define TARGET_FORMAT "elf32-sparc"
53 #endif
54 #define LOCAL_LABEL(name)	(((name)[0] == '.' && (name)[1] == 'L') || !strncmp ((name), "_.L_", 4))
55 #endif
56 #define WORKING_DOT_WORD
57 
58 #define md_convert_frag(b,s,f)		{as_fatal ("sparc convert_frag\n");}
59 #define md_create_long_jump(p,f,t,fr,s)	as_fatal("sparc_create_long_jump")
60 #define md_create_short_jump(p,f,t,fr,s) as_fatal("sparc_create_short_jump")
61 #define md_estimate_size_before_relax(f,s) \
62 			(as_fatal("estimate_size_before_relax called"),1)
63 void tc_aout_pre_write_hook ();
64 
65 #define LISTING_HEADER "SPARC GAS "
66 
67 extern int sparc_pic_code;
68 
69 /* We require .word, et. al., to be aligned correctly.  */
70 #define md_cons_align(nbytes) sparc_cons_align (nbytes)
71 extern void sparc_cons_align PARAMS ((int));
72 #define HANDLE_ALIGN(fragp) sparc_handle_align (fragp)
73 extern void sparc_handle_align ();
74 
75 #if defined (OBJ_ELF) || defined (OBJ_AOUT)
76 
77 /* This expression evaluates to false if the relocation is for a local
78    object for which we still want to do the relocation at runtime.
79    True if we are willing to perform this relocation while building
80    the .o file.
81 
82    If the reloc is against an externally visible symbol, then the
83    a.out assembler should not do the relocation if generating PIC, and
84    the ELF assembler should never do the relocation.  */
85 
86 #ifdef OBJ_ELF
87 #define obj_relocate_extern 0
88 #else
89 #define obj_relocate_extern (! sparc_pic_code)
90 #endif
91 
92 #define TC_RELOC_RTSYM_LOC_FIXUP(FIX)  \
93   (obj_relocate_extern \
94    || (FIX)->fx_addsy == NULL \
95    || (! S_IS_EXTERNAL ((FIX)->fx_addsy) \
96        && ! S_IS_WEAK ((FIX)->fx_addsy) \
97        && S_IS_DEFINED ((FIX)->fx_addsy) \
98        && ! S_IS_COMMON ((FIX)->fx_addsy)))
99 #endif
100 
101 /* I know that "call 0" fails in sparc-coff if this doesn't return 1.  I
102    don't know about other relocation types, or other formats, yet.  */
103 #ifdef OBJ_COFF
104 #define TC_FORCE_RELOCATION(FIXP)	\
105 	((FIXP)->fx_r_type == BFD_RELOC_32_PCREL_S2 \
106 	 && ((FIXP)->fx_addsy == 0 \
107 	     || S_GET_SEGMENT ((FIXP)->fx_addsy) == absolute_section))
108 #define RELOC_REQUIRES_SYMBOL
109 #endif
110 
111 #define TC_HANDLES_FX_DONE
112 
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
117    any non PC relative reloc.  */
118 #define tc_fix_adjustable(FIX)				\
119   (! S_IS_EXTERNAL ((FIX)->fx_addsy)			\
120    && ! S_IS_WEAK ((FIX)->fx_addsy)			\
121    && (! sparc_pic_code					\
122        || (FIX)->fx_pcrel				\
123        || ((FIX)->fx_subsy != NULL			\
124 	   && (S_GET_SEGMENT ((FIX)->fx_subsy)		\
125 	       == S_GET_SEGMENT ((FIX)->fx_addsy)))))
126 #endif
127 
128 #ifdef OBJ_AOUT
129 /* When generating PIC code, we must not adjust any reloc which will
130    turn into a reloc against the global offset table.  */
131 #define tc_fix_adjustable(FIX) \
132   (! sparc_pic_code \
133    || (FIX)->fx_pcrel \
134    || (FIX)->fx_r_type == BFD_RELOC_16 \
135    || (FIX)->fx_r_type == BFD_RELOC_32)
136 #endif
137 
138 #define md_operand(x)
139 
140 extern void sparc_md_end PARAMS ((void));
141 #define md_end() sparc_md_end ()
142 
143 /* end of tc-sparc.h */
144