Mercurial > hg-old > index.cgi
annotate lwasm/lwasm.h @ 350:f5666775d76f
Even more pseudo ops
author | lost@starbug |
---|---|
date | Sat, 27 Mar 2010 22:59:15 -0600 |
parents | dcd2978a7d18 |
children | 4dba8c7e242c |
rev | line source |
---|---|
323 | 1 /* |
2 lwasm.h | |
3 | |
4 Copyright © 2010 William Astle | |
5 | |
6 This file is part of LWTOOLS. | |
7 | |
8 LWTOOLS is free software: you can redistribute it and/or modify it under the | |
9 terms of the GNU General Public License as published by the Free Software | |
10 Foundation, either version 3 of the License, or (at your option) any later | |
11 version. | |
12 | |
13 This program is distributed in the hope that it will be useful, but WITHOUT | |
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or | |
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for | |
16 more details. | |
17 | |
18 You should have received a copy of the GNU General Public License along with | |
19 this program. If not, see <http://www.gnu.org/licenses/>. | |
20 */ | |
21 | |
22 #ifndef ___lwasm_h_seen___ | |
23 #define ___lwasm_h_seen___ | |
24 | |
337 | 25 #include <lw_expr.h> |
324 | 26 #include <lw_stringlist.h> |
329 | 27 #include <lw_stack.h> |
324 | 28 |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
29 |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
30 // these are allowed chars BELOW 0x80 for symbols |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
31 // first is symbol start chars, second is anywhere in symbol |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
32 #define SSYMCHARS "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz_@$" |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
33 #define SYMCHARS SSYMCHARS ".?0123456789" |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
34 |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
35 typedef struct asmstate_s asmstate_t; |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
36 |
337 | 37 enum |
38 { | |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
39 lwasm_expr_linelen = 1, // length of ref'd line |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
40 lwasm_expr_lineaddr = 2, // addr of ref'd line |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
41 lwasm_expr_nextbp = 3, // next branch point |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
42 lwasm_expr_prevbp = 4 // previous branch point |
337 | 43 }; |
44 | |
323 | 45 enum lwasm_output_e |
46 { | |
47 OUTPUT_DECB = 0, // DECB multirecord format | |
48 OUTPUT_RAW, // raw sequence of bytes | |
49 OUTPUT_OBJ, // proprietary object file format | |
50 OUTPUT_RAWREL, // raw bytes where ORG causes a SEEK in the file | |
51 OUTPUT_OS9 // os9 module target | |
52 }; | |
53 | |
54 enum lwasm_target_e | |
55 { | |
56 TARGET_6309 = 0, // target 6309 CPU | |
57 TARGET_6809 // target 6809 CPU (no 6309 ops) | |
58 }; | |
59 | |
325 | 60 enum lwasm_flags_e |
61 { | |
62 FLAG_NONE = 0, | |
63 FLAG_LIST = 0x0001, | |
64 FLAG_DEPEND = 0x0002 | |
65 }; | |
66 | |
67 enum lwasm_pragmas_e | |
68 { | |
69 PRAGMA_NONE = 0, // no pragmas in effect | |
70 PRAGMA_DOLLARNOTLOCAL = 0x0001, // dollar sign does not make a symbol local | |
71 PRAGMA_NOINDEX0TONONE = 0x0002, // do not change implicit 0,R to ,R | |
72 PRAGMA_UNDEFEXTERN = 0x0004, // undefined symbols are considered to be external | |
73 PRAGMA_CESCAPES = 0x0008, // allow C style escapes in fcc, fcs, fcn, etc. | |
74 PRAGMA_IMPORTUNDEFEXPORT = 0x0010 // imports symbol if undefined upon export | |
75 }; | |
76 | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
77 typedef struct lwasm_error_s lwasm_error_t; |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
78 struct lwasm_error_s |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
79 { |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
80 char *mess; // actual error message |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
81 lwasm_error_t *next; // ptr to next error |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
82 }; |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
83 |
347 | 84 struct line_expr_s |
85 { | |
86 lw_expr_t expr; | |
87 int id; | |
88 struct line_expr_s *next; | |
89 }; | |
90 | |
337 | 91 typedef struct line_s line_t; |
92 struct line_s | |
93 { | |
94 lw_expr_t addr; // assembly address of the line | |
95 int len; // the "size" this line occupies (address space wise) (-1 if unknown) | |
96 int insn; // number of insn in insn table | |
342 | 97 int symset; // set if the line symbol was consumed by the instruction |
340 | 98 char *sym; // symbol, if any, on the line |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
99 unsigned char *output; // output bytes |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
100 int outputl; // size of output |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
101 int outputbl; // size of output buffer |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
102 lwasm_error_t *err; // list of errors |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
103 line_t *prev; // previous line |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
104 line_t *next; // next line |
347 | 105 |
106 struct line_expr_s *exprs; // expressions used during parsing | |
349 | 107 char *lstr; // string passed forward |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
108 asmstate_t *as; // assembler state data ptr |
337 | 109 }; |
110 | |
342 | 111 enum |
112 { | |
113 symbol_flag_set = 1, // symbol was used with "set" | |
114 symbol_flag_none = 0 // no flags | |
115 }; | |
116 | |
117 struct symtabe | |
118 { | |
119 char *symbol; // the name of the symbol | |
120 int context; // symbol context (-1 for global) | |
121 int version; // version of the symbol (for "set") | |
122 int flags; // flags for the symbol | |
123 lw_expr_t value; // symbol value | |
124 struct symtabe *next; // next symbol in the table | |
125 }; | |
126 | |
127 typedef struct | |
128 { | |
129 struct symtabe *head; // start of symbol table | |
130 } symtab_t; | |
131 | |
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
132 typedef struct macrotab_s macrotab_t; |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
133 struct macrotab_s |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
134 { |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
135 char *name; // name of macro |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
136 char **lines; // macro lines |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
137 int numlines; // number lines in macro |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
138 macrotab_t *next; // next macro in list |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
139 }; |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
140 |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
141 struct asmstate_s |
323 | 142 { |
324 | 143 int output_format; // output format |
144 int target; // assembly target | |
145 int debug_level; // level of debugging requested | |
325 | 146 int flags; // assembly flags |
147 int pragmas; // pragmas currently in effect | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
148 int errorcount; // number of errors encountered |
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
149 int inmacro; // are we in a macro? |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
150 int skipcond; // skipping a condition? |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
151 int skipmacro; // are we skipping in a macro? |
347 | 152 int endseen; // have we seen an "end" pseudo? |
153 int execaddr; // address from "end" | |
325 | 154 |
337 | 155 line_t *line_head; // start of lines list |
156 line_t *line_tail; // tail of lines list | |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
157 |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
158 line_t *cl; // current line pointer |
342 | 159 |
160 int context; // the current "context" | |
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
161 int nextcontext; // the next available context |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
162 |
342 | 163 symtab_t symtab; // meta data for the symbol table |
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
164 macrotab_t *macros; // macro table |
337 | 165 |
325 | 166 char *list_file; // name of file to list to |
167 char *output_file; // output file name | |
324 | 168 lw_stringlist_t input_files; // files to assemble |
330 | 169 void *input_data; // opaque data used by the input system |
325 | 170 lw_stringlist_t include_list; // include paths |
329 | 171 lw_stack_t file_dir; // stack of the "current file" dir |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
172 }; |
323 | 173 |
342 | 174 #ifndef ___symbol_c_seen___ |
175 | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
176 extern struct symtabe *register_symbol(asmstate_t *as, line_t *cl, char *sym, lw_expr_t value, int flags); |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
177 extern struct symtabe *lookup_symbol(asmstate_t *as, line_t *cl, char *sym, int context, int version); |
342 | 178 |
179 #endif | |
180 | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
181 #ifndef ___lwasm_c_seen___ |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
182 |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
183 extern void lwasm_register_error(asmstate_t *as, line_t *cl, const char *msg, ...); |
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
184 extern int lwasm_next_context(asmstate_t *as); |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
185 extern void lwasm_emit(line_t *cl, int byte); |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
186 extern void lwasm_emitop(line_t *cl, int opc); |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
187 |
347 | 188 extern void lwasm_save_expr(line_t *cl, int id, lw_expr_t expr); |
189 extern lw_expr_t lwasm_fetch_expr(line_t *cl, int id); | |
190 extern lw_expr_t lwasm_parse_expr(asmstate_t *as, char **p); | |
191 extern int lwasm_emitexpr(line_t *cl, lw_expr_t expr, int s); | |
192 | |
193 extern void skip_operand(char **p); | |
194 | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
195 #endif |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
196 |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
197 #define OPLEN(op) (((op)>0xFF)?2:1) |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
198 |
324 | 199 #endif /* ___lwasm_h_seen___ */ |