Mercurial > hg-old > index.cgi
annotate lwasm/lwasm.h @ 388:8991eb507d2d
Added missing arg-nonnull.h ??? file to repo
| author | lost@l-w.ca |
|---|---|
| date | Wed, 14 Jul 2010 20:17:57 -0600 |
| parents | a741d2e4869f |
| children | fbb7bfed8076 |
| 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 |
|
363
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
42 lwasm_expr_prevbp = 4, // previous branch point |
|
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
43 lwasm_expr_syment = 5, // symbol table entry |
| 367 | 44 lwasm_expr_import = 6, // symbol import entry |
| 45 lwasm_expr_secbase = 7 // section base address | |
| 337 | 46 }; |
| 47 | |
| 323 | 48 enum lwasm_output_e |
| 49 { | |
| 50 OUTPUT_DECB = 0, // DECB multirecord format | |
| 51 OUTPUT_RAW, // raw sequence of bytes | |
| 52 OUTPUT_OBJ, // proprietary object file format | |
| 53 OUTPUT_RAWREL, // raw bytes where ORG causes a SEEK in the file | |
| 54 OUTPUT_OS9 // os9 module target | |
| 55 }; | |
| 56 | |
| 57 enum lwasm_target_e | |
| 58 { | |
| 59 TARGET_6309 = 0, // target 6309 CPU | |
| 60 TARGET_6809 // target 6809 CPU (no 6309 ops) | |
| 61 }; | |
| 62 | |
| 325 | 63 enum lwasm_flags_e |
| 64 { | |
| 65 FLAG_NONE = 0, | |
| 66 FLAG_LIST = 0x0001, | |
| 67 FLAG_DEPEND = 0x0002 | |
| 68 }; | |
| 69 | |
| 70 enum lwasm_pragmas_e | |
| 71 { | |
| 72 PRAGMA_NONE = 0, // no pragmas in effect | |
| 73 PRAGMA_DOLLARNOTLOCAL = 0x0001, // dollar sign does not make a symbol local | |
| 74 PRAGMA_NOINDEX0TONONE = 0x0002, // do not change implicit 0,R to ,R | |
| 75 PRAGMA_UNDEFEXTERN = 0x0004, // undefined symbols are considered to be external | |
| 76 PRAGMA_CESCAPES = 0x0008, // allow C style escapes in fcc, fcs, fcn, etc. | |
| 77 PRAGMA_IMPORTUNDEFEXPORT = 0x0010 // imports symbol if undefined upon export | |
| 78 }; | |
| 79 | |
| 354 | 80 |
| 81 enum | |
| 82 { | |
| 83 section_flag_bss = 1, // BSS section | |
| 84 section_flag_none = 0 // no flags | |
| 85 }; | |
| 86 | |
| 374 | 87 typedef struct reloctab_s reloctab_t; |
| 88 struct reloctab_s | |
| 89 { | |
| 376 | 90 lw_expr_t offset; // offset of relocation |
| 374 | 91 int size; // size of relocation |
| 376 | 92 lw_expr_t expr; // relocation expression |
| 374 | 93 reloctab_t *next; |
| 94 }; | |
| 95 | |
| 354 | 96 typedef struct sectiontab_s sectiontab_t; |
| 97 struct sectiontab_s | |
| 98 { | |
| 99 char *name; // section name | |
| 100 int flags; // section flags; | |
| 101 lw_expr_t offset; // offset for next instance | |
| 374 | 102 int oblen; // size of section output |
| 103 int obsize; // size of output buffer | |
| 104 unsigned char *obytes; // output buffer | |
| 105 reloctab_t *reloctab; // table of relocations | |
| 354 | 106 sectiontab_t *next; |
| 107 }; | |
| 108 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
109 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
|
110 struct lwasm_error_s |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
111 { |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
112 char *mess; // actual error message |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
113 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
|
114 }; |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
115 |
| 347 | 116 struct line_expr_s |
| 117 { | |
| 118 lw_expr_t expr; | |
| 119 int id; | |
| 120 struct line_expr_s *next; | |
| 121 }; | |
| 122 | |
|
363
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
123 typedef struct line_s line_t; |
|
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
124 |
| 356 | 125 typedef struct exportlist_s exportlist_t; |
| 126 struct exportlist_s | |
| 127 { | |
| 128 char *symbol; // symbol to export | |
| 374 | 129 struct symtabe *se; // symbol table entry |
|
363
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
130 line_t *line; // line the export is on |
| 356 | 131 exportlist_t *next; // next in the export list |
| 132 }; | |
| 133 | |
| 134 typedef struct importlist_s importlist_t; | |
| 135 struct importlist_s | |
| 136 { | |
| 137 char *symbol; // symbol to import | |
| 138 importlist_t *next; // next in the import list | |
| 139 }; | |
| 140 | |
| 337 | 141 struct line_s |
| 142 { | |
| 143 lw_expr_t addr; // assembly address of the line | |
| 144 int len; // the "size" this line occupies (address space wise) (-1 if unknown) | |
| 145 int insn; // number of insn in insn table | |
| 342 | 146 int symset; // set if the line symbol was consumed by the instruction |
| 340 | 147 char *sym; // symbol, if any, on the line |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
148 unsigned char *output; // output bytes |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
149 int outputl; // size of output |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
150 int outputbl; // size of output buffer |
| 351 | 151 int dpval; // direct page value |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
152 lwasm_error_t *err; // list of errors |
| 351 | 153 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
|
154 line_t *prev; // previous line |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
155 line_t *next; // next line |
| 354 | 156 int inmod; // inside a module? |
| 157 sectiontab_t *csect; // which section are we in? | |
| 347 | 158 struct line_expr_s *exprs; // expressions used during parsing |
| 349 | 159 char *lstr; // string passed forward |
| 357 | 160 int pb; // pass forward post byte |
| 161 int lint; // pass forward integer | |
| 361 | 162 int lint2; // another pass forward integer |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
163 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
|
164 int pragmas; // pragmas in effect for the line |
|
363
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
165 int context; // the symbol context number |
| 382 | 166 char *ltext; // line number |
|
383
848d3cca8078
Fixed imm8 to actually use expression and also fixed gen mode to respect > and <
lost@starbug
parents:
382
diff
changeset
|
167 char *linespec; // line spec |
|
848d3cca8078
Fixed imm8 to actually use expression and also fixed gen mode to respect > and <
lost@starbug
parents:
382
diff
changeset
|
168 int lineno; // line number |
| 337 | 169 }; |
| 170 | |
| 342 | 171 enum |
| 172 { | |
| 173 symbol_flag_set = 1, // symbol was used with "set" | |
| 174 symbol_flag_none = 0 // no flags | |
| 175 }; | |
| 176 | |
| 177 struct symtabe | |
| 178 { | |
| 179 char *symbol; // the name of the symbol | |
| 180 int context; // symbol context (-1 for global) | |
| 181 int version; // version of the symbol (for "set") | |
| 182 int flags; // flags for the symbol | |
| 374 | 183 sectiontab_t *section; // section the symbol is defined in |
| 342 | 184 lw_expr_t value; // symbol value |
| 185 struct symtabe *next; // next symbol in the table | |
| 186 }; | |
| 187 | |
| 188 typedef struct | |
| 189 { | |
| 190 struct symtabe *head; // start of symbol table | |
| 191 } symtab_t; | |
| 192 | |
|
345
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
193 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
|
194 struct macrotab_s |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
195 { |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
196 char *name; // name of macro |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
197 char **lines; // macro lines |
|
7416c3f9c321
Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents:
344
diff
changeset
|
198 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
|
199 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
|
200 }; |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
201 struct asmstate_s |
| 323 | 202 { |
| 324 | 203 int output_format; // output format |
| 204 int target; // assembly target | |
| 205 int debug_level; // level of debugging requested | |
|
372
90de73ba0cac
Created a useful debug framework and adjusted lw_expr_print() to return a "static" dynamic string
lost@starbug
parents:
367
diff
changeset
|
206 FILE *debug_file; // FILE * to output debug messages to |
| 325 | 207 int flags; // assembly flags |
| 208 int pragmas; // pragmas currently in effect | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
209 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
|
210 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
|
211 int skipcond; // skipping a condition? |
| 351 | 212 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
|
213 int skipmacro; // are we skipping in a macro? |
| 347 | 214 int endseen; // have we seen an "end" pseudo? |
| 215 int execaddr; // address from "end" | |
| 354 | 216 int inmod; // inside an os9 module? |
| 217 unsigned char crc[3]; // crc accumulator | |
|
363
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
218 int badsymerr; // throw error on undef sym if set |
| 325 | 219 |
| 337 | 220 line_t *line_head; // start of lines list |
| 221 line_t *line_tail; // tail of lines list | |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
222 |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
223 line_t *cl; // current line pointer |
| 342 | 224 |
| 353 | 225 sectiontab_t *csect; // current section |
| 226 | |
| 342 | 227 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
|
228 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
|
229 |
| 342 | 230 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
|
231 macrotab_t *macros; // macro table |
| 353 | 232 sectiontab_t *sections; // section table |
| 356 | 233 exportlist_t *exportlist; // list of exported symbols |
| 234 importlist_t *importlist; // list of imported symbols | |
| 325 | 235 char *list_file; // name of file to list to |
| 236 char *output_file; // output file name | |
| 324 | 237 lw_stringlist_t input_files; // files to assemble |
| 330 | 238 void *input_data; // opaque data used by the input system |
| 325 | 239 lw_stringlist_t include_list; // include paths |
| 329 | 240 lw_stack_t file_dir; // stack of the "current file" dir |
| 384 | 241 lw_stack_t includelist; |
| 375 | 242 |
| 243 int exportcheck; // set if we need to collapse out the section base to 0 | |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
244 }; |
| 323 | 245 |
| 342 | 246 #ifndef ___symbol_c_seen___ |
| 247 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
248 extern struct symtabe *register_symbol(asmstate_t *as, line_t *cl, char *sym, lw_expr_t value, int flags); |
|
363
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
249 extern struct symtabe *lookup_symbol(asmstate_t *as, line_t *cl, char *sym); |
| 342 | 250 |
| 251 #endif | |
| 252 | |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
253 #ifndef ___lwasm_c_seen___ |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
254 |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
255 extern void lwasm_register_error(asmstate_t *as, line_t *cl, const char *msg, ...); |
| 351 | 256 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
|
257 extern int lwasm_next_context(asmstate_t *as); |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
258 extern void lwasm_emit(line_t *cl, int byte); |
|
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
259 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
|
260 |
| 347 | 261 extern void lwasm_save_expr(line_t *cl, int id, lw_expr_t expr); |
| 262 extern lw_expr_t lwasm_fetch_expr(line_t *cl, int id); | |
| 263 extern lw_expr_t lwasm_parse_expr(asmstate_t *as, char **p); | |
| 264 extern int lwasm_emitexpr(line_t *cl, lw_expr_t expr, int s); | |
| 265 | |
| 266 extern void skip_operand(char **p); | |
| 267 | |
| 357 | 268 extern int lwasm_lookupreg2(const char *rlist, char **p); |
| 359 | 269 extern int lwasm_lookupreg3(const char *rlist, char **p); |
| 357 | 270 |
|
363
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
271 extern void lwasm_show_errors(asmstate_t *as); |
|
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
272 |
|
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
273 extern int lwasm_reduce_expr(asmstate_t *as, lw_expr_t expr); |
|
d96c30e60ddf
Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents:
361
diff
changeset
|
274 |
|
372
90de73ba0cac
Created a useful debug framework and adjusted lw_expr_print() to return a "static" dynamic string
lost@starbug
parents:
367
diff
changeset
|
275 extern void debug_message(asmstate_t *as, int level, const char *fmt, ...); |
|
90de73ba0cac
Created a useful debug framework and adjusted lw_expr_print() to return a "static" dynamic string
lost@starbug
parents:
367
diff
changeset
|
276 extern void dump_state(asmstate_t *as); |
|
90de73ba0cac
Created a useful debug framework and adjusted lw_expr_print() to return a "static" dynamic string
lost@starbug
parents:
367
diff
changeset
|
277 |
|
387
a741d2e4869f
Various bugfixes; fixed lwobjdump to display symbols with unprintable characters more sensibly; start of a (nonfunctional for now) testing framework
lost@l-w.ca
parents:
384
diff
changeset
|
278 extern lw_expr_t lwasm_parse_cond(asmstate_t *as, char **p); |
|
372
90de73ba0cac
Created a useful debug framework and adjusted lw_expr_print() to return a "static" dynamic string
lost@starbug
parents:
367
diff
changeset
|
279 |
|
344
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
280 #endif |
|
0215a0fbf61b
Added assembly error system and additional checks for symbol syntax
lost@starbug
parents:
342
diff
changeset
|
281 |
|
346
a82c55070624
Added expression parsing infrastructure and misc fixes
lost@starbug
parents:
345
diff
changeset
|
282 #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
|
283 #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
|
284 |
| 324 | 285 #endif /* ___lwasm_h_seen___ */ |