1 /*****************************************************************************/
5 /* Disassembler attribute table */
9 /* (C) 2000 Ullrich von Bassewitz */
11 /* D-70597 Stuttgart */
12 /* EMail: uz@musoftware.de */
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 /*****************************************************************************/
59 static unsigned char AttrTab [0x10000];
62 static const char* SymTab [0x10000];
66 /*****************************************************************************/
68 /*****************************************************************************/
72 void AddrCheck (unsigned Addr)
73 /* Check if the given address has a valid range */
75 if (Addr >= 0x10000) {
76 Error ("Address out of range: %08X", Addr);
82 void MarkRange (unsigned Start, unsigned End, attr_t Attr)
83 /* Mark a range with the given attribute */
85 /* Do it easy here... */
86 while (Start <= End) {
87 MarkAddr (Start++, Attr);
93 void MarkAddr (unsigned Addr, attr_t Attr)
94 /* Mark an address with an attribute */
96 /* Check the given address */
99 /* We must not have more than one style bit */
100 if (Attr & atStyleMask) {
101 if (AttrTab[Addr] & atStyleMask) {
102 Error ("Duplicate style for address %04X", Addr);
107 AttrTab[Addr] |= Attr;
112 const char* MakeLabelName (unsigned Addr)
113 /* Make the default label name from the given address and return it in a
117 static char LabelBuf [32];
118 xsprintf (LabelBuf, sizeof (LabelBuf), "L%04X", Addr);
124 void AddLabel (unsigned Addr, const char* Name)
127 /* Check the given address */
130 /* Must not have two symbols for one address */
131 if (SymTab[Addr] != 0) {
132 if (strcmp (SymTab[Addr], Name) == 0) {
133 /* Allow label if it has the same name */
136 Error ("Duplicate label for address %04X: %s/%s", Addr, SymTab[Addr], Name);
139 /* Create a new label */
140 SymTab[Addr] = xstrdup (Name);
145 int HaveLabel (unsigned Addr)
146 /* Check if there is a label for the given address */
148 /* Check the given address */
151 /* Check for a label */
152 return (SymTab[Addr] != 0);
157 const char* GetLabel (unsigned Addr)
158 /* Return the label for an address */
160 /* Check the given address */
163 /* Return the label if any */
169 unsigned char GetStyle (unsigned Addr)
170 /* Return the style attribute for the given address */
172 /* Check the given address */
175 /* Return the attribute */
176 return (AttrTab[Addr] & atStyleMask);
181 static void DefineConst (unsigned Addr)
182 /* Define an address constant */
184 Output ("%s", SymTab [Addr]);
186 Output ("= $%04X", Addr);
192 void DefOutOfRangeLabels (void)
193 /* Output any labels that are out of the loaded code range */
200 for (Addr = 0; Addr < CodeStart; ++Addr) {
207 for (Addr = CodeEnd+1; Addr < 0x10000; ++Addr) {