2 Copyright (C) 1987-2019 Free Software Foundation, Inc.
4 This file is part of GAS, the GNU Assembler.
6 GAS is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3, or (at your option)
11 GAS is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with GAS; see the file COPYING. If not, write to the Free
18 Software Foundation, 51 Franklin Street - Fifth Floor, Boston, MA
21 extern struct obstack notes; /* eg FixS live here. */
23 extern struct obstack cond_obstack; /* this is where we track .ifdef/.endif
24 (if we do that at all). */
26 extern symbolS *symbol_rootP; /* all the symbol nodes */
27 extern symbolS *symbol_lastP; /* last struct symbol we made, or NULL */
29 extern symbolS abs_symbol;
30 extern symbolS dot_symbol;
32 extern int symbol_table_frozen;
34 /* This is non-zero if symbols are case sensitive, which is the
36 extern int symbols_case_sensitive;
38 char * symbol_relc_make_expr (expressionS *);
39 char * symbol_relc_make_sym (symbolS *);
40 char * symbol_relc_make_value (offsetT);
41 char *decode_local_label_name (char *s);
42 symbolS *symbol_find (const char *name);
43 symbolS *symbol_find_noref (const char *name, int noref);
44 symbolS *symbol_find_exact (const char *name);
45 symbolS *symbol_find_exact_noref (const char *name, int noref);
46 symbolS *symbol_find_or_make (const char *name);
47 symbolS *symbol_make (const char *name);
48 symbolS *symbol_new (const char *name, segT segment, valueT value,
50 symbolS *symbol_create (const char *name, segT segment, valueT value,
52 struct local_symbol *local_symbol_make (const char *name, segT section,
53 valueT val, fragS *frag);
54 symbolS *symbol_clone (symbolS *, int);
55 #undef symbol_clone_if_forward_ref
56 symbolS *symbol_clone_if_forward_ref (symbolS *, int);
57 #define symbol_clone_if_forward_ref(s) symbol_clone_if_forward_ref (s, 0)
58 symbolS *symbol_temp_new (segT, valueT, fragS *);
59 symbolS *symbol_temp_new_now (void);
60 symbolS *symbol_temp_new_now_octets (void);
61 symbolS *symbol_temp_make (void);
63 symbolS *colon (const char *sym_name);
64 void local_colon (int n);
65 void symbol_begin (void);
66 void dot_symbol_init (void);
67 void symbol_print_statistics (FILE *);
68 void symbol_table_insert (symbolS * symbolP);
69 valueT resolve_symbol_value (symbolS *);
70 void resolve_local_symbol_values (void);
71 int snapshot_symbol (symbolS **, valueT *, segT *, fragS **);
73 void print_symbol_value (symbolS *);
74 void print_expr (expressionS *);
75 void print_expr_1 (FILE *, expressionS *);
76 void print_symbol_value_1 (FILE *, symbolS *);
78 int dollar_label_defined (long l);
79 void dollar_label_clear (void);
80 void define_dollar_label (long l);
81 char *dollar_label_name (long l, int augend);
83 void fb_label_instance_inc (long label);
84 char *fb_label_name (long n, long augend);
86 extern void copy_symbol_attributes (symbolS *, symbolS *);
88 /* Get and set the values of symbols. These used to be macros. */
89 extern valueT S_GET_VALUE (symbolS *);
90 extern void S_SET_VALUE (symbolS *, valueT);
92 extern int S_IS_FUNCTION (symbolS *);
93 extern int S_IS_EXTERNAL (symbolS *);
94 extern int S_IS_WEAK (symbolS *);
95 extern int S_IS_WEAKREFR (symbolS *);
96 extern int S_IS_WEAKREFD (symbolS *);
97 extern int S_IS_COMMON (symbolS *);
98 extern int S_IS_DEFINED (symbolS *);
99 extern int S_FORCE_RELOC (symbolS *, int);
100 extern int S_IS_DEBUG (symbolS *);
101 extern int S_IS_LOCAL (symbolS *);
102 extern int S_IS_STABD (symbolS *);
103 extern int S_CAN_BE_REDEFINED (const symbolS *);
104 extern int S_IS_VOLATILE (const symbolS *);
105 extern int S_IS_FORWARD_REF (const symbolS *);
106 extern const char *S_GET_NAME (symbolS *);
107 extern segT S_GET_SEGMENT (symbolS *);
108 extern void S_SET_SEGMENT (symbolS *, segT);
109 extern void S_SET_EXTERNAL (symbolS *);
110 extern void S_SET_NAME (symbolS *, const char *);
111 extern void S_CLEAR_EXTERNAL (symbolS *);
112 extern void S_SET_WEAK (symbolS *);
113 extern void S_SET_WEAKREFR (symbolS *);
114 extern void S_CLEAR_WEAKREFR (symbolS *);
115 extern void S_SET_WEAKREFD (symbolS *);
116 extern void S_CLEAR_WEAKREFD (symbolS *);
117 extern void S_SET_THREAD_LOCAL (symbolS *);
118 extern void S_SET_VOLATILE (symbolS *);
119 extern void S_CLEAR_VOLATILE (symbolS *);
120 extern void S_SET_FORWARD_REF (symbolS *);
122 #ifndef WORKING_DOT_WORD
125 /* Linked list -- one of these structures per ".word x-y+C"
127 struct broken_word *next_broken_word;
128 /* Segment and subsegment for broken word. */
131 /* Which frag is this broken word in? */
133 /* Where in the frag is it? */
134 char *word_goes_here;
135 /* Where to add the break. */
136 fragS *dispfrag; /* where to add the break */
137 /* Operands of expression. */
142 int added; /* nasty thing happened yet? */
143 /* 1: added and has a long-jump */
144 /* 2: added but uses someone elses long-jump */
146 /* Pointer to broken_word with a similar long-jump. */
147 struct broken_word *use_jump;
149 extern struct broken_word *broken_words;
150 #endif /* ifdef WORKING_DOT_WORD */
153 * Current means for getting from symbols to segments and vice verse.
154 * This will change for infinite-segments support (e.g. COFF).
156 extern const segT N_TYPE_seg[]; /* subseg.c */
158 #define SEGMENT_TO_SYMBOL_TYPE(seg) ( seg_N_TYPE [(int) (seg)] )
159 extern const short seg_N_TYPE[];/* subseg.c */
161 #define N_REGISTER 30 /* Fake N_TYPE value for SEG_REGISTER */
163 void symbol_clear_list_pointers (symbolS * symbolP);
165 void symbol_insert (symbolS * addme, symbolS * target,
166 symbolS ** rootP, symbolS ** lastP);
167 void symbol_remove (symbolS * symbolP, symbolS ** rootP,
170 extern symbolS *symbol_previous (symbolS *);
172 extern int symbol_on_chain (symbolS *s, symbolS *rootPP, symbolS *lastPP);
174 void verify_symbol_chain (symbolS * rootP, symbolS * lastP);
176 void symbol_append (symbolS * addme, symbolS * target,
177 symbolS ** rootP, symbolS ** lastP);
179 extern symbolS *symbol_next (symbolS *);
181 extern expressionS *symbol_get_value_expression (symbolS *);
182 extern void symbol_set_value_expression (symbolS *, const expressionS *);
183 extern offsetT *symbol_X_add_number (symbolS *);
184 extern void symbol_set_value_now (symbolS *);
185 extern void symbol_set_value_now_octets (symbolS *);
186 extern void symbol_set_frag (symbolS *, fragS *);
187 extern fragS *symbol_get_frag (symbolS *);
188 extern void symbol_mark_used (symbolS *);
189 extern void symbol_clear_used (symbolS *);
190 extern int symbol_used_p (symbolS *);
191 extern void symbol_mark_used_in_reloc (symbolS *);
192 extern void symbol_clear_used_in_reloc (symbolS *);
193 extern int symbol_used_in_reloc_p (symbolS *);
194 extern void symbol_mark_mri_common (symbolS *);
195 extern void symbol_clear_mri_common (symbolS *);
196 extern int symbol_mri_common_p (symbolS *);
197 extern void symbol_mark_written (symbolS *);
198 extern void symbol_clear_written (symbolS *);
199 extern int symbol_written_p (symbolS *);
200 extern void symbol_mark_resolved (symbolS *);
201 extern int symbol_resolved_p (symbolS *);
202 extern int symbol_section_p (symbolS *);
203 extern int symbol_equated_p (symbolS *);
204 extern int symbol_equated_reloc_p (symbolS *);
205 extern int symbol_constant_p (symbolS *);
206 extern int symbol_shadow_p (symbolS *);
207 extern symbolS *symbol_symbolS (symbolS *);
208 extern asymbol *symbol_get_bfdsym (symbolS *);
209 extern void symbol_set_bfdsym (symbolS *, asymbol *);
210 extern int symbol_same_p (symbolS *, symbolS *);
211 extern int symbol_octets_p (symbolS *);
213 #ifdef OBJ_SYMFIELD_TYPE
214 OBJ_SYMFIELD_TYPE *symbol_get_obj (symbolS *);
215 void symbol_set_obj (symbolS *, OBJ_SYMFIELD_TYPE *);
218 #ifdef TC_SYMFIELD_TYPE
219 TC_SYMFIELD_TYPE *symbol_get_tc (symbolS *);
220 void symbol_set_tc (symbolS *, TC_SYMFIELD_TYPE *);