Mercurial > hg-old > index.cgi
annotate lwasm/lwasm.h @ 361:105393e31f20
Generic memory mode insns
| author | lost@starbug |
|---|---|
| date | Thu, 01 Apr 2010 20:44:57 -0600 |
| parents | 7d91ab7ac7d6 |
| children | d96c30e60ddf |
| 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 | |
| 354 | 77 |
| 78 enum | |
| 79 { | |
| 80 section_flag_bss = 1, // BSS section | |
| 81 section_flag_none = 0 // no flags | |
| 82 }; | |
| 83 | |
| 84 typedef struct sectiontab_s sectiontab_t; | |
| 85 struct sectiontab_s | |
| 86 { | |
| 87 char *name; // section name | |
| 88 int flags; // section flags; | |
| 89 lw_expr_t offset; // offset for next instance | |
| 90 sectiontab_t *next; | |
| 91 }; | |
| 92 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
93 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
|
94 struct lwasm_error_s |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
95 { |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
96 char *mess; // actual error message |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
97 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
|
98 }; |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
99 |
| 347 | 100 struct line_expr_s |
| 101 { | |
| 102 lw_expr_t expr; | |
| 103 int id; | |
| 104 struct line_expr_s *next; | |
| 105 }; | |
| 106 | |
| 356 | 107 typedef struct exportlist_s exportlist_t; |
| 108 struct exportlist_s | |
| 109 { | |
| 110 char *symbol; // symbol to export | |
| 111 exportlist_t *next; // next in the export list | |
| 112 }; | |
| 113 | |
| 114 typedef struct importlist_s importlist_t; | |
| 115 struct importlist_s | |
| 116 { | |
| 117 char *symbol; // symbol to import | |
| 118 importlist_t *next; // next in the import list | |
| 119 }; | |
| 120 | |
| 337 | 121 typedef struct line_s line_t; |
| 122 struct line_s | |
| 123 { | |
| 124 lw_expr_t addr; // assembly address of the line | |
| 125 int len; // the "size" this line occupies (address space wise) (-1 if unknown) | |
| 126 int insn; // number of insn in insn table | |
| 342 | 127 int symset; // set if the line symbol was consumed by the instruction |
| 340 | 128 char *sym; // symbol, if any, on the line |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
129 unsigned char *output; // output bytes |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
130 int outputl; // size of output |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
131 int outputbl; // size of output buffer |
| 351 | 132 int dpval; // direct page value |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
133 lwasm_error_t *err; // list of errors |
| 351 | 134 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
|
135 line_t *prev; // previous line |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
136 line_t *next; // next line |
| 354 | 137 int inmod; // inside a module? |
| 138 sectiontab_t *csect; // which section are we in? | |
| 347 | 139 struct line_expr_s *exprs; // expressions used during parsing |
| 349 | 140 char *lstr; // string passed forward |
| 357 | 141 int pb; // pass forward post byte |
| 142 int lint; // pass forward integer | |
| 361 | 143 int lint2; // another pass forward integer |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
144 asmstate_t *as; // assembler state data ptr |
|
360
7d91ab7ac7d6
Indexed stage 2; set line structure to track pragmas in effect for that line
lost@starbug
parents:
359
diff
changeset
|
145 int pragmas; // pragmas in effect for the line |
| 337 | 146 }; |
| 147 | |
| 342 | 148 enum |
| 149 { | |
| 150 symbol_flag_set = 1, // symbol was used with "set" | |
| 151 symbol_flag_none = 0 // no flags | |
| 152 }; | |
| 153 | |
| 154 struct symtabe | |
| 155 { | |
| 156 char *symbol; // the name of the symbol | |
| 157 int context; // symbol context (-1 for global) | |
| 158 int version; // version of the symbol (for "set") | |
| 159 int flags; // flags for the symbol | |
| 160 lw_expr_t value; // symbol value | |
| 161 struct symtabe *next; // next symbol in the table | |
| 162 }; | |
| 163 | |
| 164 typedef struct | |
| 165 { | |
| 166 struct symtabe *head; // start of symbol table | |
| 167 } symtab_t; | |
| 168 | |
|
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
169 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
|
170 struct macrotab_s |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
171 { |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
172 char *name; // name of macro |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
173 char **lines; // macro lines |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
174 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
|
175 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
|
176 }; |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
177 struct asmstate_s |
| 323 | 178 { |
| 324 | 179 int output_format; // output format |
| 180 int target; // assembly target | |
| 181 int debug_level; // level of debugging requested | |
| 325 | 182 int flags; // assembly flags |
| 183 int pragmas; // pragmas currently in effect | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
184 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
|
185 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
|
186 int skipcond; // skipping a condition? |
| 351 | 187 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
|
188 int skipmacro; // are we skipping in a macro? |
| 347 | 189 int endseen; // have we seen an "end" pseudo? |
| 190 int execaddr; // address from "end" | |
| 354 | 191 int inmod; // inside an os9 module? |
| 192 unsigned char crc[3]; // crc accumulator | |
| 325 | 193 |
| 337 | 194 line_t *line_head; // start of lines list |
| 195 line_t *line_tail; // tail of lines list | |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
196 |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
197 line_t *cl; // current line pointer |
| 342 | 198 |
| 353 | 199 sectiontab_t *csect; // current section |
| 200 | |
| 342 | 201 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
|
202 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
|
203 |
| 342 | 204 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
|
205 macrotab_t *macros; // macro table |
| 353 | 206 sectiontab_t *sections; // section table |
| 356 | 207 exportlist_t *exportlist; // list of exported symbols |
| 208 importlist_t *importlist; // list of imported symbols | |
| 325 | 209 char *list_file; // name of file to list to |
| 210 char *output_file; // output file name | |
| 324 | 211 lw_stringlist_t input_files; // files to assemble |
| 330 | 212 void *input_data; // opaque data used by the input system |
| 325 | 213 lw_stringlist_t include_list; // include paths |
| 329 | 214 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
|
215 }; |
| 323 | 216 |
| 342 | 217 #ifndef ___symbol_c_seen___ |
| 218 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
219 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
|
220 extern struct symtabe *lookup_symbol(asmstate_t *as, line_t *cl, char *sym, int context, int version); |
| 342 | 221 |
| 222 #endif | |
| 223 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
224 #ifndef ___lwasm_c_seen___ |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
225 |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
226 extern void lwasm_register_error(asmstate_t *as, line_t *cl, const char *msg, ...); |
| 351 | 227 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
|
228 extern int lwasm_next_context(asmstate_t *as); |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
229 extern void lwasm_emit(line_t *cl, int byte); |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
230 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
|
231 |
| 347 | 232 extern void lwasm_save_expr(line_t *cl, int id, lw_expr_t expr); |
| 233 extern lw_expr_t lwasm_fetch_expr(line_t *cl, int id); | |
| 234 extern lw_expr_t lwasm_parse_expr(asmstate_t *as, char **p); | |
| 235 extern int lwasm_emitexpr(line_t *cl, lw_expr_t expr, int s); | |
| 236 | |
| 237 extern void skip_operand(char **p); | |
| 238 | |
| 357 | 239 extern int lwasm_lookupreg2(const char *rlist, char **p); |
| 359 | 240 extern int lwasm_lookupreg3(const char *rlist, char **p); |
| 357 | 241 |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
242 #endif |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
243 |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
244 #define OPLEN(op) (((op)>0xFF)?2:1) |
|
360
7d91ab7ac7d6
Indexed stage 2; set line structure to track pragmas in effect for that line
lost@starbug
parents:
359
diff
changeset
|
245 #define CURPRAGMA(l,p) (((l)->pragmas & (p)) ? 1 : 0) |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
246 |
| 324 | 247 #endif /* ___lwasm_h_seen___ */ |