Mercurial > hg-old > index.cgi
annotate lwasm/lwasm.h @ 359:f50a54d0293a
Indexed part 1
| author | lost@starbug |
|---|---|
| date | Wed, 31 Mar 2010 21:57:45 -0600 |
| parents | 0cf4948d53b4 |
| children | 7d91ab7ac7d6 |
| 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 | |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
143 asmstate_t *as; // assembler state data ptr |
| 337 | 144 }; |
| 145 | |
| 342 | 146 enum |
| 147 { | |
| 148 symbol_flag_set = 1, // symbol was used with "set" | |
| 149 symbol_flag_none = 0 // no flags | |
| 150 }; | |
| 151 | |
| 152 struct symtabe | |
| 153 { | |
| 154 char *symbol; // the name of the symbol | |
| 155 int context; // symbol context (-1 for global) | |
| 156 int version; // version of the symbol (for "set") | |
| 157 int flags; // flags for the symbol | |
| 158 lw_expr_t value; // symbol value | |
| 159 struct symtabe *next; // next symbol in the table | |
| 160 }; | |
| 161 | |
| 162 typedef struct | |
| 163 { | |
| 164 struct symtabe *head; // start of symbol table | |
| 165 } symtab_t; | |
| 166 | |
|
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
167 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
|
168 struct macrotab_s |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
169 { |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
170 char *name; // name of macro |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
171 char **lines; // macro lines |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
172 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
|
173 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
|
174 }; |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
175 struct asmstate_s |
| 323 | 176 { |
| 324 | 177 int output_format; // output format |
| 178 int target; // assembly target | |
| 179 int debug_level; // level of debugging requested | |
| 325 | 180 int flags; // assembly flags |
| 181 int pragmas; // pragmas currently in effect | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
182 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
|
183 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
|
184 int skipcond; // skipping a condition? |
| 351 | 185 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
|
186 int skipmacro; // are we skipping in a macro? |
| 347 | 187 int endseen; // have we seen an "end" pseudo? |
| 188 int execaddr; // address from "end" | |
| 354 | 189 int inmod; // inside an os9 module? |
| 190 unsigned char crc[3]; // crc accumulator | |
| 325 | 191 |
| 337 | 192 line_t *line_head; // start of lines list |
| 193 line_t *line_tail; // tail of lines list | |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
194 |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
195 line_t *cl; // current line pointer |
| 342 | 196 |
| 353 | 197 sectiontab_t *csect; // current section |
| 198 | |
| 342 | 199 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
|
200 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
|
201 |
| 342 | 202 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
|
203 macrotab_t *macros; // macro table |
| 353 | 204 sectiontab_t *sections; // section table |
| 356 | 205 exportlist_t *exportlist; // list of exported symbols |
| 206 importlist_t *importlist; // list of imported symbols | |
| 325 | 207 char *list_file; // name of file to list to |
| 208 char *output_file; // output file name | |
| 324 | 209 lw_stringlist_t input_files; // files to assemble |
| 330 | 210 void *input_data; // opaque data used by the input system |
| 325 | 211 lw_stringlist_t include_list; // include paths |
| 329 | 212 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
|
213 }; |
| 323 | 214 |
| 342 | 215 #ifndef ___symbol_c_seen___ |
| 216 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
217 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
|
218 extern struct symtabe *lookup_symbol(asmstate_t *as, line_t *cl, char *sym, int context, int version); |
| 342 | 219 |
| 220 #endif | |
| 221 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
222 #ifndef ___lwasm_c_seen___ |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
223 |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
224 extern void lwasm_register_error(asmstate_t *as, line_t *cl, const char *msg, ...); |
| 351 | 225 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
|
226 extern int lwasm_next_context(asmstate_t *as); |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
227 extern void lwasm_emit(line_t *cl, int byte); |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
228 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
|
229 |
| 347 | 230 extern void lwasm_save_expr(line_t *cl, int id, lw_expr_t expr); |
| 231 extern lw_expr_t lwasm_fetch_expr(line_t *cl, int id); | |
| 232 extern lw_expr_t lwasm_parse_expr(asmstate_t *as, char **p); | |
| 233 extern int lwasm_emitexpr(line_t *cl, lw_expr_t expr, int s); | |
| 234 | |
| 235 extern void skip_operand(char **p); | |
| 236 | |
| 357 | 237 extern int lwasm_lookupreg2(const char *rlist, char **p); |
| 359 | 238 extern int lwasm_lookupreg3(const char *rlist, char **p); |
| 357 | 239 |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
240 #endif |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
241 |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
242 #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
|
243 |
| 324 | 244 #endif /* ___lwasm_h_seen___ */ |