1 /*****************************************************************************/
5 /* Symbol table entry forward for the ca65 macroassembler */
9 /* (C) 1998-2003 Ullrich von Bassewitz */
11 /* D-70794 Filderstadt */
12 /* EMail: uz@cc65.org */
15 /* This software is provided 'as-is', without any expressed or implied */
16 /* warranty. In no event will the authors be held liable for any damages */
17 /* arising from the use of this software. */
19 /* Permission is granted to anyone to use this software for any purpose, */
20 /* including commercial applications, and to alter it and redistribute it */
21 /* freely, subject to the following restrictions: */
23 /* 1. The origin of this software must not be misrepresented; you must not */
24 /* claim that you wrote the original software. If you use this software */
25 /* in a product, an acknowledgment in the product documentation would be */
26 /* appreciated but is not required. */
27 /* 2. Altered source versions must be plainly marked as such, and must not */
28 /* be misrepresented as being the original software. */
29 /* 3. This notice may not be removed or altered from any source */
32 /*****************************************************************************/
52 /*****************************************************************************/
54 /*****************************************************************************/
58 /* Bits for the Flags value in SymEntry */
59 #define SF_NONE 0x0000 /* Empty flag set */
60 #define SF_USER 0x0001 /* User bit */
61 #define SF_UNUSED 0x0002 /* Unused entry */
62 #define SF_EXPORT 0x0004 /* Export this symbol */
63 #define SF_IMPORT 0x0008 /* Import this symbol */
64 #define SF_GLOBAL 0x0010 /* Global symbol */
65 #define SF_LOCAL 0x0020 /* Cheap local symbol */
66 #define SF_LABEL 0x0080 /* Used as a label */
67 #define SF_FORCED 0x0100 /* Forced import, SF_IMPORT also set */
68 #define SF_INDEXED 0x0800 /* Index is valid */
69 #define SF_MULTDEF 0x2000 /* Multiply defined symbol */
70 #define SF_DEFINED 0x4000 /* Defined */
71 #define SF_REFERENCED 0x8000 /* Referenced */
73 /* Arguments for SymFind... */
74 #define SYM_FIND_EXISTING 0
75 #define SYM_ALLOC_NEW 1
77 /* Structure of a symbol table entry */
78 typedef struct SymEntry SymEntry;
80 SymEntry* Left; /* Lexically smaller entry */
81 SymEntry* Right; /* Lexically larger entry */
82 SymEntry* List; /* List of all entries */
83 SymEntry* Locals; /* Root of subtree for local symbols */
84 struct SymTable* SymTab; /* Table this symbol is in, 0 for locals */
85 FilePos Pos; /* File position for this symbol */
86 unsigned Flags; /* Symbol flags */
87 unsigned Index; /* Index of import/export entries */
89 struct ExprNode* Expr; /* Symbol expression */
90 SymEntry* Sym; /* Symbol (if trampoline entry) */
92 Collection ExprRefs; /* Expressions using this symbol */
93 unsigned char ExportSize; /* Export address size */
94 unsigned char AddrSize; /* Address size of label */
95 unsigned char ConDesPrio[CD_TYPE_COUNT]; /* ConDes priorities... */
96 /* ...actually value+1 (used as flag) */
97 unsigned Name; /* Name index in global string pool */
100 /* List of all symbol table entries */
101 extern SymEntry* SymList;
103 /* Pointer to last defined symbol */
104 extern SymEntry* SymLast;
108 /*****************************************************************************/
110 /*****************************************************************************/
114 SymEntry* NewSymEntry (const char* Name, unsigned Flags);
115 /* Allocate a symbol table entry, initialize and return it */
117 int SymSearchTree (SymEntry* T, const char* Name, SymEntry** E);
118 /* Search in the given tree for a name. If we find the symbol, the function
119 * will return 0 and put the entry pointer into E. If we did not find the
120 * symbol, and the tree is empty, E is set to NULL. If the tree is not empty,
121 * E will be set to the last entry, and the result of the function is <0 if
122 * the entry should be inserted on the left side, and >0 if it should get
123 * inserted on the right side.
126 #if defined(HAVE_INLINE)
127 INLINE void SymAddExprRef (SymEntry* Sym, struct ExprNode* Expr)
128 /* Add an expression reference to this symbol */
130 CollAppend (&Sym->ExprRefs, Expr);
133 #define SymAddExprRef(Sym,Expr) CollAppend (&(Sym)->ExprRefs, Expr)
136 #if defined(HAVE_INLINE)
137 INLINE void SymDelExprRef (SymEntry* Sym, struct ExprNode* Expr)
138 /* Delete an expression reference to this symbol */
140 CollDeleteItem (&Sym->ExprRefs, Expr);
143 #define SymDelExprRef(Sym,Expr) CollDeleteItem (&(Sym)->ExprRefs, Expr)
146 void SymTransferExprRefs (SymEntry* From, SymEntry* To);
147 /* Transfer all expression references from one symbol to another. */
149 void SymDef (SymEntry* Sym, ExprNode* Expr, unsigned char AddrSize, unsigned Flags);
150 /* Mark a symbol as defined */
152 void SymRef (SymEntry* Sym);
153 /* Mark the given symbol as referenced */
155 void SymImport (SymEntry* Sym, unsigned char AddrSize, unsigned Flags);
156 /* Mark the given symbol as an imported symbol */
158 void SymExport (SymEntry* Sym, unsigned char AddrSize, unsigned Flags);
159 /* Mark the given symbol as an exported symbol */
161 void SymGlobal (SymEntry* Sym, unsigned char AddrSize, unsigned Flags);
162 /* Mark the given symbol as a global symbol, that is, as a symbol that is
163 * either imported or exported.
166 void SymConDes (SymEntry* Sym, unsigned char AddrSize, unsigned Type, unsigned Prio);
167 /* Mark the given symbol as a module constructor/destructor. This will also
168 * mark the symbol as an export. Initializers may never be zero page symbols.
171 #if defined(HAVE_INLINE)
172 INLINE int SymIsDef (const SymEntry* S)
173 /* Return true if the given symbol is already defined */
175 return (S->Flags & SF_DEFINED) != 0;
178 # define SymIsDef(S) (((S)->Flags & SF_DEFINED) != 0)
181 #if defined(HAVE_INLINE)
182 INLINE int SymIsRef (const SymEntry* S)
183 /* Return true if the given symbol has been referenced */
185 return (S->Flags & SF_REFERENCED) != 0;
188 # define SymIsRef(S) (((S)->Flags & SF_REFERENCED) != 0)
191 #if defined(HAVE_INLINE)
192 INLINE int SymIsImport (const SymEntry* S)
193 /* Return true if the given symbol is marked as import */
195 /* Check the import flag */
196 return (S->Flags & SF_IMPORT) != 0;
199 # define SymIsImport(S) (((S)->Flags & SF_IMPORT) != 0)
202 int SymIsConst (SymEntry* Sym, long* Val);
203 /* Return true if the given symbol has a constant value. If Val is not NULL
204 * and the symbol has a constant value, store it's value there.
207 #if defined(HAVE_INLINE)
208 INLINE int SymHasExpr (const SymEntry* S)
209 /* Return true if the given symbol has an associated expression */
211 /* Check the expression */
212 return ((S->Flags & (SF_DEFINED|SF_IMPORT)) == SF_DEFINED);
215 # define SymHasExpr(S) (((S)->Flags & (SF_DEFINED|SF_IMPORT)) != SF_DEFINED)
218 #if defined(HAVE_INLINE)
219 INLINE void SymMarkUser (SymEntry* S)
220 /* Set a user mark on the specified symbol */
226 # define SymMarkUser(S) ((S)->Flags |= SF_USER)
229 #if defined(HAVE_INLINE)
230 INLINE void SymUnmarkUser (SymEntry* S)
231 /* Remove a user mark from the specified symbol */
234 S->Flags &= ~SF_USER;
237 # define SymUnmarkUser(S) ((S)->Flags &= ~SF_USER)
240 #if defined(HAVE_INLINE)
241 INLINE int SymHasUserMark (SymEntry* S)
242 /* Return the state of the user mark for the specified symbol */
245 return (S->Flags & SF_USER) != 0;
248 # define SymHasUserMark(S) (((S)->Flags & SF_USER) != 0)
251 struct SymTable* GetSymParentScope (SymEntry* S);
252 /* Get the parent scope of the symbol (not the one it is defined in). Return
253 * NULL if the symbol is a cheap local, or defined on global level.
256 struct ExprNode* GetSymExpr (SymEntry* Sym);
257 /* Get the expression for a non-const symbol */
259 const struct ExprNode* SymResolve (const SymEntry* Sym);
260 /* Helper function for DumpExpr. Resolves a symbol into an expression or return
261 * NULL. Do not call in other contexts!
264 #if defined(HAVE_INLINE)
265 INLINE const char* GetSymName (const SymEntry* S)
266 /* Return the name of the symbol */
268 return GetString (S->Name);
271 # define GetSymName(S) GetString ((S)->Name)
274 #if defined(HAVE_INLINE)
275 INLINE unsigned char GetSymAddrSize (const SymEntry* S)
276 /* Return the address size of the symbol. Beware: This function will just
277 * return the AddrSize member, it will not look at the expression!
283 # define GetSymAddrSize(S) ((S)->AddrSize)
286 long GetSymVal (SymEntry* Sym);
287 /* Return the value of a symbol assuming it's constant. FAIL will be called
288 * in case the symbol is undefined or not constant.
291 unsigned GetSymIndex (const SymEntry* Sym);
292 /* Return the symbol index for the given symbol */
294 #if defined(HAVE_INLINE)
295 INLINE const FilePos* GetSymPos (const SymEntry* S)
296 /* Return the position of first occurence in the source for the given symbol */
301 # define GetSymPos(S) (&(S)->Pos)
306 /* End of symentry.h */