annotate lwasm/lwasm.h @ 431:d7d7e4dca3e7

Eliminated infinite loop on recursive symbol resolution with a Q&D hack: limit the depth that lw_expr_simplify can be called to globally. Not thread friendly.
author lost@l-w.ca
date Sun, 24 Oct 2010 20:05:15 -0600
parents 4b137a8cf32a
children a9521955554f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
323
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
1 /*
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
2 lwasm.h
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
3
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
4 Copyright © 2010 William Astle
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
5
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
6 This file is part of LWTOOLS.
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
7
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
8 LWTOOLS is free software: you can redistribute it and/or modify it under the
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
9 terms of the GNU General Public License as published by the Free Software
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
10 Foundation, either version 3 of the License, or (at your option) any later
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
11 version.
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
12
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
13 This program is distributed in the hope that it will be useful, but WITHOUT
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
14 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
15 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
16 more details.
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
17
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
18 You should have received a copy of the GNU General Public License along with
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
19 this program. If not, see <http://www.gnu.org/licenses/>.
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
20 */
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
21
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
22 #ifndef ___lwasm_h_seen___
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
23 #define ___lwasm_h_seen___
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
24
337
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
25 #include <lw_expr.h>
324
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
26 #include <lw_stringlist.h>
329
c15cca3ae6a2 Created first pass of input layer
lost
parents: 325
diff changeset
27 #include <lw_stack.h>
324
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
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
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
37 enum
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
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
34dfc9747f23 Reduction passes complete
lost@starbug
parents: 363
diff changeset
44 lwasm_expr_import = 6, // symbol import entry
34dfc9747f23 Reduction passes complete
lost@starbug
parents: 363
diff changeset
45 lwasm_expr_secbase = 7 // section base address
337
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
46 };
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
47
323
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
48 enum lwasm_output_e
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
49 {
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
50 OUTPUT_DECB = 0, // DECB multirecord format
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
51 OUTPUT_RAW, // raw sequence of bytes
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
52 OUTPUT_OBJ, // proprietary object file format
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
53 OUTPUT_RAWREL, // raw bytes where ORG causes a SEEK in the file
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
54 OUTPUT_OS9 // os9 module target
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
55 };
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
56
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
57 enum lwasm_target_e
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
58 {
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
59 TARGET_6309 = 0, // target 6309 CPU
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
60 TARGET_6809 // target 6809 CPU (no 6309 ops)
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
61 };
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
62
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
63 enum lwasm_flags_e
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
64 {
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
65 FLAG_LIST = 0x0001,
390
027d7fbcdcfc Basic symbol table output; needs work for non-constant symbols
lost@l-w.ca
parents: 389
diff changeset
66 FLAG_DEPEND = 0x0002,
027d7fbcdcfc Basic symbol table output; needs work for non-constant symbols
lost@l-w.ca
parents: 389
diff changeset
67 FLAG_SYMBOLS = 0x004,
027d7fbcdcfc Basic symbol table output; needs work for non-constant symbols
lost@l-w.ca
parents: 389
diff changeset
68 FLAG_NONE = 0
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
69 };
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
70
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
71 enum lwasm_pragmas_e
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
72 {
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
73 PRAGMA_NONE = 0, // no pragmas in effect
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
74 PRAGMA_DOLLARNOTLOCAL = 0x0001, // dollar sign does not make a symbol local
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
75 PRAGMA_NOINDEX0TONONE = 0x0002, // do not change implicit 0,R to ,R
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
76 PRAGMA_UNDEFEXTERN = 0x0004, // undefined symbols are considered to be external
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
77 PRAGMA_CESCAPES = 0x0008, // allow C style escapes in fcc, fcs, fcn, etc.
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
78 PRAGMA_IMPORTUNDEFEXPORT = 0x0010 // imports symbol if undefined upon export
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
79 };
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
80
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
81
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
82 enum
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
83 {
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
84 section_flag_bss = 1, // BSS section
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
85 section_flag_none = 0 // no flags
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
86 };
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
87
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
88 typedef struct reloctab_s reloctab_t;
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
89 struct reloctab_s
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
90 {
376
91c0fe026940 Output incomplete references in object target
lost@starbug
parents: 375
diff changeset
91 lw_expr_t offset; // offset of relocation
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
92 int size; // size of relocation
376
91c0fe026940 Output incomplete references in object target
lost@starbug
parents: 375
diff changeset
93 lw_expr_t expr; // relocation expression
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
94 reloctab_t *next;
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
95 };
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
96
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
97 typedef struct sectiontab_s sectiontab_t;
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
98 struct sectiontab_s
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
99 {
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
100 char *name; // section name
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
101 int flags; // section flags;
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
102 lw_expr_t offset; // offset for next instance
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
103 int oblen; // size of section output
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
104 int obsize; // size of output buffer
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
105 unsigned char *obytes; // output buffer
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
106 reloctab_t *reloctab; // table of relocations
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
107 sectiontab_t *next;
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
108 };
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
109
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
110 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
111 struct lwasm_error_s
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
112 {
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
113 char *mess; // actual error message
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
114 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
115 };
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
116
347
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
117 struct line_expr_s
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
118 {
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
119 lw_expr_t expr;
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
120 int id;
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
121 struct line_expr_s *next;
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
122 };
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
123
363
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
124 typedef struct line_s line_t;
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
125
356
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
126 typedef struct exportlist_s exportlist_t;
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
127 struct exportlist_s
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
128 {
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
129 char *symbol; // symbol to export
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
130 struct symtabe *se; // symbol table entry
363
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
131 line_t *line; // line the export is on
356
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
132 exportlist_t *next; // next in the export list
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
133 };
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
134
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
135 typedef struct importlist_s importlist_t;
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
136 struct importlist_s
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
137 {
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
138 char *symbol; // symbol to import
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
139 importlist_t *next; // next in the import list
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
140 };
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
141
337
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
142 struct line_s
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
143 {
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
144 lw_expr_t addr; // assembly address of the line
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
145 int len; // the "size" this line occupies (address space wise) (-1 if unknown)
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
146 int insn; // number of insn in insn table
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
147 int symset; // set if the line symbol was consumed by the instruction
340
1a6fc6ebb31c Checkpoint
lost
parents: 337
diff changeset
148 char *sym; // symbol, if any, on the line
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
149 unsigned char *output; // output bytes
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
150 int outputl; // size of output
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
151 int outputbl; // size of output buffer
351
4dba8c7e242c conditional pseudo ops added
lost@starbug
parents: 349
diff changeset
152 int dpval; // direct page value
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
153 lwasm_error_t *err; // list of errors
351
4dba8c7e242c conditional pseudo ops added
lost@starbug
parents: 349
diff changeset
154 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
155 line_t *prev; // previous line
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
156 line_t *next; // next line
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
157 int inmod; // inside a module?
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
158 sectiontab_t *csect; // which section are we in?
347
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
159 struct line_expr_s *exprs; // expressions used during parsing
349
dcd2978a7d18 More pseudo ops
lost@starbug
parents: 347
diff changeset
160 char *lstr; // string passed forward
357
0cf4948d53b4 Checkpoint - adding actual cpu instructions
lost@starbug
parents: 356
diff changeset
161 int pb; // pass forward post byte
0cf4948d53b4 Checkpoint - adding actual cpu instructions
lost@starbug
parents: 356
diff changeset
162 int lint; // pass forward integer
361
105393e31f20 Generic memory mode insns
lost@starbug
parents: 360
diff changeset
163 int lint2; // another pass forward integer
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
164 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
165 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
166 int context; // the symbol context number
382
eacdae8a1575 Various bugfixes
lost@starbug
parents: 376
diff changeset
167 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
168 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
169 int lineno; // line number
389
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
170 int soff; // struct offset (for listings)
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
171 int dshow; // data value to show (for listings)
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
172 int dsize; // set to 1 for 8 bit dshow value
418
4b137a8cf32a Implemented "branch points"
lost@l-w.ca
parents: 390
diff changeset
173 int isbrpt; // set to 1 if this line is a branch point
389
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
174 struct symtabe *dptr; // symbol value to display
337
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
175 };
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
176
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
177 enum
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
178 {
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
179 symbol_flag_set = 1, // symbol was used with "set"
389
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
180 symbol_flag_nocheck = 2, // do not check symbol characters
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
181 symbol_flag_none = 0 // no flags
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
182 };
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
183
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
184 struct symtabe
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
185 {
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
186 char *symbol; // the name of the symbol
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
187 int context; // symbol context (-1 for global)
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
188 int version; // version of the symbol (for "set")
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
189 int flags; // flags for the symbol
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
190 sectiontab_t *section; // section the symbol is defined in
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
191 lw_expr_t value; // symbol value
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
192 struct symtabe *next; // next symbol in the table
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
193 };
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
194
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
195 typedef struct
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
196 {
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
197 struct symtabe *head; // start of symbol table
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
198 } symtab_t;
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
199
345
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
200 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
201 struct macrotab_s
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
202 {
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
203 char *name; // name of macro
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
204 char **lines; // macro lines
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
205 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
206 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
207 };
389
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
208
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
209 typedef struct structtab_s structtab_t;
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
210 typedef struct structtab_field_s structtab_field_t;
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
211
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
212 struct structtab_field_s
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
213 {
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
214 char *name; // structure field name - NULL for anonymous
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
215 int size; // structure field size
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
216 structtab_t *substruct; // sub structure if there is one
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
217 structtab_field_t *next; // next field entry
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
218 };
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
219
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
220 struct structtab_s
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
221 {
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
222 char *name; // name of structure
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
223 int size; // number of bytes taken by struct
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
224 structtab_field_t *fields; // fields in the structure
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
225 structtab_t *next; // next structure
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
226 };
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
227
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
228 struct asmstate_s
323
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
229 {
324
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
230 int output_format; // output format
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
231 int target; // assembly target
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
232 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
233 FILE *debug_file; // FILE * to output debug messages to
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
234 int flags; // assembly flags
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
235 int pragmas; // pragmas currently in effect
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
236 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
237 int inmacro; // are we in a macro?
389
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
238 int instruct; // are w in a structure?
345
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
239 int skipcond; // skipping a condition?
351
4dba8c7e242c conditional pseudo ops added
lost@starbug
parents: 349
diff changeset
240 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
241 int skipmacro; // are we skipping in a macro?
347
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
242 int endseen; // have we seen an "end" pseudo?
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
243 int execaddr; // address from "end"
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
244 int inmod; // inside an os9 module?
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
245 unsigned char crc[3]; // crc accumulator
363
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
246 int badsymerr; // throw error on undef sym if set
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
247
337
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
248 line_t *line_head; // start of lines list
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
249 line_t *line_tail; // tail of lines list
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
250
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
251 line_t *cl; // current line pointer
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
252
353
faa97115952e Added SECTION/ENDSECTION
lost@starbug
parents: 351
diff changeset
253 sectiontab_t *csect; // current section
faa97115952e Added SECTION/ENDSECTION
lost@starbug
parents: 351
diff changeset
254
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
255 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
256 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
257
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
258 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
259 macrotab_t *macros; // macro table
353
faa97115952e Added SECTION/ENDSECTION
lost@starbug
parents: 351
diff changeset
260 sectiontab_t *sections; // section table
356
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
261 exportlist_t *exportlist; // list of exported symbols
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
262 importlist_t *importlist; // list of imported symbols
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
263 char *list_file; // name of file to list to
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
264 char *output_file; // output file name
324
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
265 lw_stringlist_t input_files; // files to assemble
330
81c005b82775 More tinkering with input subsystem
lost
parents: 329
diff changeset
266 void *input_data; // opaque data used by the input system
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
267 lw_stringlist_t include_list; // include paths
329
c15cca3ae6a2 Created first pass of input layer
lost
parents: 325
diff changeset
268 lw_stack_t file_dir; // stack of the "current file" dir
384
38b50ce6967a Made --list and --depend work
lost@starbug
parents: 383
diff changeset
269 lw_stack_t includelist;
389
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
270
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
271 structtab_t *structs; // defined structures
fbb7bfed8076 Added in structure support and fixed up some warts in the listing code (by adding more warts)
lost@l-w.ca
parents: 387
diff changeset
272 structtab_t *cstruct; // current structure
375
3498b2d88376 Added export list to object output
lost@starbug
parents: 374
diff changeset
273
3498b2d88376 Added export list to object output
lost@starbug
parents: 374
diff changeset
274 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
275 };
323
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
276
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
277 #ifndef ___symbol_c_seen___
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
278
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
279 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
280 extern struct symtabe *lookup_symbol(asmstate_t *as, line_t *cl, char *sym);
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
281
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
282 #endif
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
283
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
284 #ifndef ___lwasm_c_seen___
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
285
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
286 extern void lwasm_register_error(asmstate_t *as, line_t *cl, const char *msg, ...);
351
4dba8c7e242c conditional pseudo ops added
lost@starbug
parents: 349
diff changeset
287 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
288 extern int lwasm_next_context(asmstate_t *as);
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
289 extern void lwasm_emit(line_t *cl, int byte);
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
290 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
291
347
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
292 extern void lwasm_save_expr(line_t *cl, int id, lw_expr_t expr);
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
293 extern lw_expr_t lwasm_fetch_expr(line_t *cl, int id);
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
294 extern lw_expr_t lwasm_parse_expr(asmstate_t *as, char **p);
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
295 extern int lwasm_emitexpr(line_t *cl, lw_expr_t expr, int s);
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
296
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
297 extern void skip_operand(char **p);
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
298
357
0cf4948d53b4 Checkpoint - adding actual cpu instructions
lost@starbug
parents: 356
diff changeset
299 extern int lwasm_lookupreg2(const char *rlist, char **p);
359
f50a54d0293a Indexed part 1
lost@starbug
parents: 357
diff changeset
300 extern int lwasm_lookupreg3(const char *rlist, char **p);
357
0cf4948d53b4 Checkpoint - adding actual cpu instructions
lost@starbug
parents: 356
diff changeset
301
363
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
302 extern void lwasm_show_errors(asmstate_t *as);
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
303
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
304 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
305
372
90de73ba0cac Created a useful debug framework and adjusted lw_expr_print() to return a "static" dynamic string
lost@starbug
parents: 367
diff changeset
306 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
307 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
308
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
309 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
310
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
311 #endif
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
312
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
313 #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
314 #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
315
324
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
316 #endif /* ___lwasm_h_seen___ */