Mercurial > hg-old > index.cgi
annotate lwasm/lwasm.h @ 351:4dba8c7e242c
conditional pseudo ops added
author | lost@starbug |
---|---|
date | Sat, 27 Mar 2010 23:37:30 -0600 |
parents | dcd2978a7d18 |
children | faa97115952e |
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 |
351 | 102 int dpval; // direct page value |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
103 lwasm_error_t *err; // list of errors |
351 | 104 lwasm_error_t *warn; // list of errors |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
105 line_t *prev; // previous line |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
106 line_t *next; // next line |
347 | 107 |
108 struct line_expr_s *exprs; // expressions used during parsing | |
349 | 109 char *lstr; // string passed forward |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
110 asmstate_t *as; // assembler state data ptr |
337 | 111 }; |
112 | |
342 | 113 enum |
114 { | |
115 symbol_flag_set = 1, // symbol was used with "set" | |
116 symbol_flag_none = 0 // no flags | |
117 }; | |
118 | |
119 struct symtabe | |
120 { | |
121 char *symbol; // the name of the symbol | |
122 int context; // symbol context (-1 for global) | |
123 int version; // version of the symbol (for "set") | |
124 int flags; // flags for the symbol | |
125 lw_expr_t value; // symbol value | |
126 struct symtabe *next; // next symbol in the table | |
127 }; | |
128 | |
129 typedef struct | |
130 { | |
131 struct symtabe *head; // start of symbol table | |
132 } symtab_t; | |
133 | |
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
134 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
|
135 struct macrotab_s |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
136 { |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
137 char *name; // name of macro |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
138 char **lines; // macro lines |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
139 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
|
140 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
|
141 }; |
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
142 |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
143 struct asmstate_s |
323 | 144 { |
324 | 145 int output_format; // output format |
146 int target; // assembly target | |
147 int debug_level; // level of debugging requested | |
325 | 148 int flags; // assembly flags |
149 int pragmas; // pragmas currently in effect | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
150 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
|
151 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
|
152 int skipcond; // skipping a condition? |
351 | 153 int skipcount; // depth of "skipping" |
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
154 int skipmacro; // are we skipping in a macro? |
347 | 155 int endseen; // have we seen an "end" pseudo? |
156 int execaddr; // address from "end" | |
325 | 157 |
337 | 158 line_t *line_head; // start of lines list |
159 line_t *line_tail; // tail of lines list | |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
160 |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
161 line_t *cl; // current line pointer |
342 | 162 |
163 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
|
164 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
|
165 |
342 | 166 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
|
167 macrotab_t *macros; // macro table |
337 | 168 |
325 | 169 char *list_file; // name of file to list to |
170 char *output_file; // output file name | |
324 | 171 lw_stringlist_t input_files; // files to assemble |
330 | 172 void *input_data; // opaque data used by the input system |
325 | 173 lw_stringlist_t include_list; // include paths |
329 | 174 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
|
175 }; |
323 | 176 |
342 | 177 #ifndef ___symbol_c_seen___ |
178 | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
179 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
|
180 extern struct symtabe *lookup_symbol(asmstate_t *as, line_t *cl, char *sym, int context, int version); |
342 | 181 |
182 #endif | |
183 | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
184 #ifndef ___lwasm_c_seen___ |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
185 |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
186 extern void lwasm_register_error(asmstate_t *as, line_t *cl, const char *msg, ...); |
351 | 187 extern void lwasm_register_warning(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
|
188 extern int lwasm_next_context(asmstate_t *as); |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
189 extern void lwasm_emit(line_t *cl, int byte); |
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
190 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
|
191 |
347 | 192 extern void lwasm_save_expr(line_t *cl, int id, lw_expr_t expr); |
193 extern lw_expr_t lwasm_fetch_expr(line_t *cl, int id); | |
194 extern lw_expr_t lwasm_parse_expr(asmstate_t *as, char **p); | |
195 extern int lwasm_emitexpr(line_t *cl, lw_expr_t expr, int s); | |
196 | |
197 extern void skip_operand(char **p); | |
198 | |
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
199 #endif |
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
200 |
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
201 #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
|
202 |
324 | 203 #endif /* ___lwasm_h_seen___ */ |