Mercurial > hg-old > index.cgi
annotate lwasm/lwasm.h @ 354:60568b123281
Added os9 opcodes and ERROR
| author | lost@starbug |
|---|---|
| date | Tue, 30 Mar 2010 23:10:01 -0600 |
| parents | faa97115952e |
| children | 7166254491ed |
| 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 | |
| 337 | 107 typedef struct line_s line_t; |
| 108 struct line_s | |
| 109 { | |
| 110 lw_expr_t addr; // assembly address of the line | |
| 111 int len; // the "size" this line occupies (address space wise) (-1 if unknown) | |
| 112 int insn; // number of insn in insn table | |
| 342 | 113 int symset; // set if the line symbol was consumed by the instruction |
| 340 | 114 char *sym; // symbol, if any, on the line |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
115 unsigned char *output; // output bytes |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
116 int outputl; // size of output |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
117 int outputbl; // size of output buffer |
| 351 | 118 int dpval; // direct page value |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
119 lwasm_error_t *err; // list of errors |
| 351 | 120 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
|
121 line_t *prev; // previous line |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
122 line_t *next; // next line |
| 354 | 123 int inmod; // inside a module? |
| 124 sectiontab_t *csect; // which section are we in? | |
| 347 | 125 struct line_expr_s *exprs; // expressions used during parsing |
| 349 | 126 char *lstr; // string passed forward |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
127 asmstate_t *as; // assembler state data ptr |
| 337 | 128 }; |
| 129 | |
| 342 | 130 enum |
| 131 { | |
| 132 symbol_flag_set = 1, // symbol was used with "set" | |
| 133 symbol_flag_none = 0 // no flags | |
| 134 }; | |
| 135 | |
| 136 struct symtabe | |
| 137 { | |
| 138 char *symbol; // the name of the symbol | |
| 139 int context; // symbol context (-1 for global) | |
| 140 int version; // version of the symbol (for "set") | |
| 141 int flags; // flags for the symbol | |
| 142 lw_expr_t value; // symbol value | |
| 143 struct symtabe *next; // next symbol in the table | |
| 144 }; | |
| 145 | |
| 146 typedef struct | |
| 147 { | |
| 148 struct symtabe *head; // start of symbol table | |
| 149 } symtab_t; | |
| 150 | |
|
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
151 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
|
152 struct macrotab_s |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
153 { |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
154 char *name; // name of macro |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
155 char **lines; // macro lines |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
156 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
|
157 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
|
158 }; |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
159 struct asmstate_s |
| 323 | 160 { |
| 324 | 161 int output_format; // output format |
| 162 int target; // assembly target | |
| 163 int debug_level; // level of debugging requested | |
| 325 | 164 int flags; // assembly flags |
| 165 int pragmas; // pragmas currently in effect | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
166 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
|
167 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
|
168 int skipcond; // skipping a condition? |
| 351 | 169 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
|
170 int skipmacro; // are we skipping in a macro? |
| 347 | 171 int endseen; // have we seen an "end" pseudo? |
| 172 int execaddr; // address from "end" | |
| 354 | 173 int inmod; // inside an os9 module? |
| 174 unsigned char crc[3]; // crc accumulator | |
| 325 | 175 |
| 337 | 176 line_t *line_head; // start of lines list |
| 177 line_t *line_tail; // tail of lines list | |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
178 |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
179 line_t *cl; // current line pointer |
| 342 | 180 |
| 353 | 181 sectiontab_t *csect; // current section |
| 182 | |
| 342 | 183 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
|
184 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
|
185 |
| 342 | 186 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
|
187 macrotab_t *macros; // macro table |
| 353 | 188 sectiontab_t *sections; // section table |
| 337 | 189 |
| 325 | 190 char *list_file; // name of file to list to |
| 191 char *output_file; // output file name | |
| 324 | 192 lw_stringlist_t input_files; // files to assemble |
| 330 | 193 void *input_data; // opaque data used by the input system |
| 325 | 194 lw_stringlist_t include_list; // include paths |
| 329 | 195 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
|
196 }; |
| 323 | 197 |
| 342 | 198 #ifndef ___symbol_c_seen___ |
| 199 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
200 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
|
201 extern struct symtabe *lookup_symbol(asmstate_t *as, line_t *cl, char *sym, int context, int version); |
| 342 | 202 |
| 203 #endif | |
| 204 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
205 #ifndef ___lwasm_c_seen___ |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
206 |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
207 extern void lwasm_register_error(asmstate_t *as, line_t *cl, const char *msg, ...); |
| 351 | 208 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
|
209 extern int lwasm_next_context(asmstate_t *as); |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
210 extern void lwasm_emit(line_t *cl, int byte); |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
211 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
|
212 |
| 347 | 213 extern void lwasm_save_expr(line_t *cl, int id, lw_expr_t expr); |
| 214 extern lw_expr_t lwasm_fetch_expr(line_t *cl, int id); | |
| 215 extern lw_expr_t lwasm_parse_expr(asmstate_t *as, char **p); | |
| 216 extern int lwasm_emitexpr(line_t *cl, lw_expr_t expr, int s); | |
| 217 | |
| 218 extern void skip_operand(char **p); | |
| 219 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
220 #endif |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
221 |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
222 #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
|
223 |
| 324 | 224 #endif /* ___lwasm_h_seen___ */ |