1 | /*****************************************************************************/ |
2 | /* */ |
3 | /* sizeof.c */ |
4 | /* */ |
5 | /* Handle sizes of types and data */ |
6 | /* */ |
7 | /* */ |
8 | /* */ |
9 | /* (C) 2003-2011, Ullrich von Bassewit */ |
10 | /* Roemerstrasse 52 */ |
11 | /* D-70794 Filderstadt */ |
12 | /* EMail: uz@cc65.org */ |
13 | /* */ |
14 | /* */ |
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. */ |
18 | /* */ |
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: */ |
22 | /* */ |
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 */ |
30 | /* distribution. */ |
31 | /* */ |
32 | /*****************************************************************************/ |
33 | |
34 | |
35 | |
36 | /* common */ |
37 | #include "addrsize.h" |
38 | |
39 | /* ca65 */ |
40 | #include "expr.h" |
41 | #include "sizeof.h" |
42 | #include "symtab.h" |
43 | |
44 | |
45 | |
46 | /*****************************************************************************/ |
47 | /* Data */ |
48 | /*****************************************************************************/ |
49 | |
50 | |
51 | |
52 | /* The name of the symbol used to encode the size. The name of this entry is |
53 | ** choosen so that it cannot be accessed by the user. |
54 | */ |
55 | static const StrBuf SizeEntryName = LIT_STRBUF_INITIALIZER (".size" ); |
56 | |
57 | |
58 | |
59 | /*****************************************************************************/ |
60 | /* Code */ |
61 | /*****************************************************************************/ |
62 | |
63 | |
64 | |
65 | int IsSizeOfSymbol (const SymEntry* Sym) |
66 | /* Return true if the given symbol is the one that encodes the size of some |
67 | ** entity. Sym may also be a NULL pointer in which case false is returned. |
68 | */ |
69 | { |
70 | return (Sym != 0 && SB_Compare (GetSymName (Sym), &SizeEntryName) == 0); |
71 | } |
72 | |
73 | |
74 | |
75 | SymEntry* FindSizeOfScope (SymTable* Scope) |
76 | /* Get the size of a scope. The function returns the symbol table entry that |
77 | ** encodes the size or NULL if there is no such entry. |
78 | */ |
79 | { |
80 | return SymFind (Scope, &SizeEntryName, SYM_FIND_EXISTING); |
81 | } |
82 | |
83 | |
84 | |
85 | SymEntry* FindSizeOfSymbol (SymEntry* Sym) |
86 | /* Get the size of a symbol table entry. The function returns the symbol table |
87 | ** entry that encodes the size of the symbol or NULL if there is no such entry. |
88 | */ |
89 | { |
90 | return SymFindLocal (Sym, &SizeEntryName, SYM_FIND_EXISTING); |
91 | } |
92 | |
93 | |
94 | |
95 | SymEntry* GetSizeOfScope (SymTable* Scope) |
96 | /* Get the size of a scope. The function returns the symbol table entry that |
97 | ** encodes the size, and will create a new entry if it does not exist. |
98 | */ |
99 | { |
100 | return SymFind (Scope, &SizeEntryName, SYM_ALLOC_NEW); |
101 | } |
102 | |
103 | |
104 | |
105 | SymEntry* GetSizeOfSymbol (SymEntry* Sym) |
106 | /* Get the size of a symbol table entry. The function returns the symbol table |
107 | ** entry that encodes the size of the symbol and will create a new one if it |
108 | ** does not exist. |
109 | */ |
110 | { |
111 | return SymFindLocal (Sym, &SizeEntryName, SYM_ALLOC_NEW); |
112 | } |
113 | |
114 | |
115 | |
116 | SymEntry* DefSizeOfScope (SymTable* Scope, long Size) |
117 | /* Define the size of a scope and return the size symbol */ |
118 | { |
119 | SymEntry* SizeSym = GetSizeOfScope (Scope); |
120 | SymDef (SizeSym, GenLiteralExpr (Size), ADDR_SIZE_DEFAULT, SF_NONE); |
121 | return SizeSym; |
122 | } |
123 | |
124 | |
125 | |
126 | SymEntry* DefSizeOfSymbol (SymEntry* Sym, long Size) |
127 | /* Define the size of a symbol and return the size symbol */ |
128 | { |
129 | SymEntry* SizeSym = GetSizeOfSymbol (Sym); |
130 | SymDef (SizeSym, GenLiteralExpr (Size), ADDR_SIZE_DEFAULT, SF_NONE); |
131 | return SizeSym; |
132 | } |
133 | |