1 /* write.h
2    Copyright 1987, 1992, 1993, 1994, 1995, 1996, 1997, 1999, 2000, 2001,
3    2002, 2003 Free Software Foundation, Inc.
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 published by
9    the Free Software Foundation; either version 2, or (at your option)
10    any later version.
11 
12    GAS is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16 
17    You should have received a copy of the GNU General Public License
18    along with GAS; see the file COPYING.  If not, write to the Free
19    Software Foundation, 59 Temple Place - Suite 330, Boston, MA
20    02111-1307, USA.  */
21 
22 #ifndef __write_h__
23 #define __write_h__
24 
25 #ifndef TC_I960
26 #ifdef hpux
27 #define EXEC_MACHINE_TYPE HP9000S200_ID
28 #endif
29 #endif /* TC_I960 */
30 
31 #ifndef BFD_ASSEMBLER
32 
33 #ifndef LOCAL_LABEL
34 #define LOCAL_LABEL(name) (name [0] == 'L' )
35 #endif
36 
37 #define S_LOCAL_NAME(s) (LOCAL_LABEL (S_GET_NAME (s)))
38 
39 #endif /* ! BFD_ASSEMBLER */
40 
41 /* This is the name of a fake symbol which will never appear in the
42    assembler output.  S_IS_LOCAL detects it because of the \001.  */
43 #ifndef FAKE_LABEL_NAME
44 #define FAKE_LABEL_NAME "L0\001"
45 #endif
46 
47 #include "bit_fix.h"
48 
49 /*
50  * FixSs may be built up in any order.
51  */
52 
53 struct fix
54 {
55   /* These small fields are grouped together for compactness of
56      this structure, and efficiency of access on some architectures.  */
57 
58   /* pc-relative offset adjust (only used by m68k) */
59   char fx_pcrel_adjust;
60 
61   /* How many bytes are involved? */
62   unsigned char fx_size;
63 
64   /* Is this a pc-relative relocation?  */
65   unsigned fx_pcrel : 1;
66 
67   /* Is this a relocation to a procedure linkage table entry?  If so,
68      some of the reductions we try to apply are invalid.  A better way
69      might be to represent PLT entries with different kinds of
70      symbols, and use normal relocations (with undefined symbols);
71      look into it for version 2.6.  */
72   unsigned fx_plt : 1;
73 
74   /* (TIGCC 20040920) Is this an unoptimizable reloc? -- Kevin Kofler  */
75   unsigned fx_unoptimizable : 1;
76 
77   /* Is this value an immediate displacement?  */
78   /* Only used on i960 and ns32k; merge it into TC_FIX_TYPE sometime.  */
79   unsigned fx_im_disp : 1;
80 
81   /* A bit for the CPU specific code.
82      This probably can be folded into tc_fix_data, below.  */
83   unsigned fx_tcbit : 1;
84 
85   /* Has this relocation already been applied?  */
86   unsigned fx_done : 1;
87 
88   /* Suppress overflow complaints on large addends.  This is used
89      in the PowerPC ELF config to allow large addends on the
90      BFD_RELOC_{LO16,HI16,HI16_S} relocations.
91 
92      @@ Can this be determined from BFD?  */
93   unsigned fx_no_overflow : 1;
94 
95   /* The value is signed when checking for overflow.  */
96   unsigned fx_signed : 1;
97 
98   /* Which frag does this fix apply to?  */
99   fragS *fx_frag;
100 
101   /* Where is the first byte to fix up?  */
102   long fx_where;
103 
104   /* NULL or Symbol whose value we add in.  */
105   symbolS *fx_addsy;
106 
107   /* NULL or Symbol whose value we subtract.  */
108   symbolS *fx_subsy;
109 
110   /* Absolute number we add in.  */
111   valueT fx_offset;
112 
113   /* The value of dot when the fixup expression was parsed.  */
114   addressT fx_dot_value;
115 
116   /* Next fixS in linked list, or NULL.  */
117   struct fix *fx_next;
118 
119   /* If NULL, no bitfix's to do.  */
120   /* Only i960-coff and ns32k use this, and i960-coff stores an
121      integer.  This can probably be folded into tc_fix_data, below.
122      @@ Alpha also uses it, but only to disable certain relocation
123      processing.  */
124   bit_fixS *fx_bit_fixP;
125 
126 #ifdef BFD_ASSEMBLER
127   bfd_reloc_code_real_type fx_r_type;
128 #else
129 #ifdef NEED_FX_R_TYPE
130   /* Hack for machines where the type of reloc can't be
131      worked out by looking at how big it is.  */
132   int fx_r_type;
133 #endif
134 #endif
135 
136   /* This field is sort of misnamed.  It appears to be a sort of random
137      scratch field, for use by the back ends.  The main gas code doesn't
138      do anything but initialize it to zero.  The use of it does need to
139      be coordinated between the cpu and format files, though.  E.g., some
140      coff targets pass the `addend' field from the cpu file via this
141      field.  I don't know why the `fx_offset' field above can't be used
142      for that; investigate later and document. KR  */
143   valueT fx_addnumber;
144 
145   /* The location of the instruction which created the reloc, used
146      in error messages.  */
147   char *fx_file;
148   unsigned fx_line;
149 
150 #ifdef USING_CGEN
151   struct {
152     /* CGEN_INSN entry for this instruction.  */
153     const struct cgen_insn *insn;
154     /* Target specific data, usually reloc number.  */
155     int opinfo;
156   } fx_cgen;
157 #endif
158 
159 #ifdef TC_FIX_TYPE
160   /* Location where a backend can attach additional data
161      needed to perform fixups.  */
162   TC_FIX_TYPE tc_fix_data;
163 #endif
164 };
165 
166 typedef struct fix fixS;
167 
168 extern int finalize_syms;
169 extern symbolS *abs_section_sym;
170 extern addressT dot_value;
171 
172 #ifndef BFD_ASSEMBLER
173 extern char *next_object_file_charP;
174 
175 #ifndef MANY_SEGMENTS
176 COMMON fixS *text_fix_root, *text_fix_tail;	/* Chains fixSs.  */
177 COMMON fixS *data_fix_root, *data_fix_tail;	/* Chains fixSs.  */
178 COMMON fixS *bss_fix_root, *bss_fix_tail;	/* Chains fixSs.  */
179 extern struct frag *text_last_frag;		/* Last frag in segment.  */
180 extern struct frag *data_last_frag;		/* Last frag in segment.  */
181 #endif
182 COMMON fixS **seg_fix_rootP, **seg_fix_tailP;	/* -> one of above.  */
183 #endif
184 
185 extern long string_byte_count;
186 extern int section_alignment[];
187 
188 extern bit_fixS *bit_fix_new
189   (int size, int offset, long base_type, long base_adj, long min,
190    long max, long add);
191 extern void append (char **charPP, char *fromP, unsigned long length);
192 extern void record_alignment (segT seg, int align);
193 extern int get_recorded_alignment (segT seg);
194 extern void subsegs_finish (void);
195 extern void write_object_file (void);
196 extern long relax_frag (segT, fragS *, long);
197 extern int relax_segment (struct frag * seg_frag_root, segT seg_type);
198 
199 extern void number_to_chars_littleendian (char *, valueT, int);
200 extern void number_to_chars_bigendian (char *, valueT, int);
201 
202 #ifdef BFD_ASSEMBLER
203 extern fixS *fix_new
204   (fragS * frag, int where, int size, symbolS * add_symbol,
205    offsetT offset, int pcrel, bfd_reloc_code_real_type r_type);
206 extern fixS *fix_new_exp
207   (fragS * frag, int where, int size, expressionS *exp, int pcrel,
208    bfd_reloc_code_real_type r_type);
209 #else
210 extern fixS *fix_new
211   (fragS * frag, int where, int size, symbolS * add_symbol,
212    offsetT offset, int pcrel, int r_type);
213 extern fixS *fix_new_exp
214   (fragS * frag, int where, int size, expressionS *exp, int pcrel,
215    int r_type);
216 #endif
217 
218 extern void write_print_statistics (FILE *);
219 
220 #endif /* __write_h__ */
221