annotate lwasm/lwasm.h @ 448:5cccf90bf838 3.0 tip

Fixed bug with complex external references generating invalid relocations in the object file
author lost@l-w.ca
date Fri, 05 Nov 2010 22:27:00 -0600
parents a9521955554f
children
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.
442
a9521955554f Added pragma pcaspcr to treat PC as PCR; additional fixes for PCR addressing modes
lost@l-w.ca
parents: 418
diff changeset
78 PRAGMA_IMPORTUNDEFEXPORT = 0x0010, // imports symbol if undefined upon export
a9521955554f Added pragma pcaspcr to treat PC as PCR; additional fixes for PCR addressing modes
lost@l-w.ca
parents: 418
diff changeset
79 PRAGMA_PCASPCR = 0x0020 // treats ,PC as ,PCR instead of constant offset
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
80 };
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
81
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
82
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
83 enum
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
84 {
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
85 section_flag_bss = 1, // BSS section
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
86 section_flag_none = 0 // no flags
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
87 };
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
88
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
89 typedef struct reloctab_s reloctab_t;
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
90 struct reloctab_s
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
91 {
376
91c0fe026940 Output incomplete references in object target
lost@starbug
parents: 375
diff changeset
92 lw_expr_t offset; // offset of relocation
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
93 int size; // size of relocation
376
91c0fe026940 Output incomplete references in object target
lost@starbug
parents: 375
diff changeset
94 lw_expr_t expr; // relocation expression
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
95 reloctab_t *next;
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
96 };
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
97
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
98 typedef struct sectiontab_s sectiontab_t;
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
99 struct sectiontab_s
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
100 {
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
101 char *name; // section name
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
102 int flags; // section flags;
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
103 lw_expr_t offset; // offset for next instance
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
104 int oblen; // size of section output
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
105 int obsize; // size of output buffer
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
106 unsigned char *obytes; // output buffer
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
107 reloctab_t *reloctab; // table of relocations
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
108 sectiontab_t *next;
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
109 };
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
110
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
111 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
112 struct lwasm_error_s
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
113 {
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
114 char *mess; // actual error message
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
115 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
116 };
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
117
347
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
118 struct line_expr_s
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
119 {
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
120 lw_expr_t expr;
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
121 int id;
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
122 struct line_expr_s *next;
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
123 };
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
124
363
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
125 typedef struct line_s line_t;
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
126
356
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
127 typedef struct exportlist_s exportlist_t;
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
128 struct exportlist_s
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
129 {
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
130 char *symbol; // symbol to export
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
131 struct symtabe *se; // symbol table entry
363
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
132 line_t *line; // line the export is on
356
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
133 exportlist_t *next; // next in the export list
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
134 };
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
135
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
136 typedef struct importlist_s importlist_t;
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
137 struct importlist_s
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
138 {
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
139 char *symbol; // symbol to import
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
140 importlist_t *next; // next in the import list
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
141 };
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
142
337
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
143 struct line_s
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
144 {
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
145 lw_expr_t addr; // assembly address of the line
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
146 int len; // the "size" this line occupies (address space wise) (-1 if unknown)
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
147 int insn; // number of insn in insn table
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
148 int symset; // set if the line symbol was consumed by the instruction
340
1a6fc6ebb31c Checkpoint
lost
parents: 337
diff changeset
149 char *sym; // symbol, if any, on the line
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
150 unsigned char *output; // output bytes
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
151 int outputl; // size of output
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
152 int outputbl; // size of output buffer
351
4dba8c7e242c conditional pseudo ops added
lost@starbug
parents: 349
diff changeset
153 int dpval; // direct page value
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
154 lwasm_error_t *err; // list of errors
351
4dba8c7e242c conditional pseudo ops added
lost@starbug
parents: 349
diff changeset
155 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
156 line_t *prev; // previous line
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
157 line_t *next; // next line
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
158 int inmod; // inside a module?
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
159 sectiontab_t *csect; // which section are we in?
347
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
160 struct line_expr_s *exprs; // expressions used during parsing
349
dcd2978a7d18 More pseudo ops
lost@starbug
parents: 347
diff changeset
161 char *lstr; // string passed forward
357
0cf4948d53b4 Checkpoint - adding actual cpu instructions
lost@starbug
parents: 356
diff changeset
162 int pb; // pass forward post byte
0cf4948d53b4 Checkpoint - adding actual cpu instructions
lost@starbug
parents: 356
diff changeset
163 int lint; // pass forward integer
361
105393e31f20 Generic memory mode insns
lost@starbug
parents: 360
diff changeset
164 int lint2; // another pass forward integer
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
165 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
166 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
167 int context; // the symbol context number
382
eacdae8a1575 Various bugfixes
lost@starbug
parents: 376
diff changeset
168 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
169 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
170 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
171 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
172 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
173 int dsize; // set to 1 for 8 bit dshow value
418
4b137a8cf32a Implemented "branch points"
lost@l-w.ca
parents: 390
diff changeset
174 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
175 struct symtabe *dptr; // symbol value to display
337
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
176 };
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
177
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
178 enum
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
179 {
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
180 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
181 symbol_flag_nocheck = 2, // do not check symbol characters
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
182 symbol_flag_none = 0 // no flags
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
183 };
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
184
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
185 struct symtabe
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
186 {
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
187 char *symbol; // the name of the symbol
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
188 int context; // symbol context (-1 for global)
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
189 int version; // version of the symbol (for "set")
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
190 int flags; // flags for the symbol
374
d99322ef6f21 Stage 1: actually do output
lost@starbug
parents: 372
diff changeset
191 sectiontab_t *section; // section the symbol is defined in
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
192 lw_expr_t value; // symbol value
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
193 struct symtabe *next; // next symbol in the table
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
194 };
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
195
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
196 typedef struct
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
197 {
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
198 struct symtabe *head; // start of symbol table
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
199 } symtab_t;
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
200
345
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
201 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
202 struct macrotab_s
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
203 {
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
204 char *name; // name of macro
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
205 char **lines; // macro lines
7416c3f9c321 Basic macro processor ported forward; added context break handling for local symbols
lost@starbug
parents: 344
diff changeset
206 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
207 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
208 };
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
209
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_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
211 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
212
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 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
214 {
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 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
216 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
217 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
218 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
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
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 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
222 {
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 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
224 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
225 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
226 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
227 };
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
228
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
229 struct asmstate_s
323
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
230 {
324
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
231 int output_format; // output format
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
232 int target; // assembly target
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
233 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
234 FILE *debug_file; // FILE * to output debug messages to
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
235 int flags; // assembly flags
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
236 int pragmas; // pragmas currently in effect
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
237 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
238 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
239 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
240 int skipcond; // skipping a condition?
351
4dba8c7e242c conditional pseudo ops added
lost@starbug
parents: 349
diff changeset
241 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
242 int skipmacro; // are we skipping in a macro?
347
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
243 int endseen; // have we seen an "end" pseudo?
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
244 int execaddr; // address from "end"
354
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
245 int inmod; // inside an os9 module?
60568b123281 Added os9 opcodes and ERROR
lost@starbug
parents: 353
diff changeset
246 unsigned char crc[3]; // crc accumulator
363
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
247 int badsymerr; // throw error on undef sym if set
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
248
337
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
249 line_t *line_head; // start of lines list
04c80c51b16a Checkpoint development
lost
parents: 330
diff changeset
250 line_t *line_tail; // tail of lines list
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
251
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
252 line_t *cl; // current line pointer
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
253
353
faa97115952e Added SECTION/ENDSECTION
lost@starbug
parents: 351
diff changeset
254 sectiontab_t *csect; // current section
faa97115952e Added SECTION/ENDSECTION
lost@starbug
parents: 351
diff changeset
255
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
256 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
257 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
258
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
259 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
260 macrotab_t *macros; // macro table
353
faa97115952e Added SECTION/ENDSECTION
lost@starbug
parents: 351
diff changeset
261 sectiontab_t *sections; // section table
356
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
262 exportlist_t *exportlist; // list of exported symbols
7166254491ed Finished pseudo ops
lost@starbug
parents: 354
diff changeset
263 importlist_t *importlist; // list of imported symbols
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
264 char *list_file; // name of file to list to
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
265 char *output_file; // output file name
324
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
266 lw_stringlist_t input_files; // files to assemble
330
81c005b82775 More tinkering with input subsystem
lost
parents: 329
diff changeset
267 void *input_data; // opaque data used by the input system
325
619fd6ad4ab9 Completed command line parsing
lost
parents: 324
diff changeset
268 lw_stringlist_t include_list; // include paths
329
c15cca3ae6a2 Created first pass of input layer
lost
parents: 325
diff changeset
269 lw_stack_t file_dir; // stack of the "current file" dir
384
38b50ce6967a Made --list and --depend work
lost@starbug
parents: 383
diff changeset
270 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
271
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 *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
273 structtab_t *cstruct; // current structure
375
3498b2d88376 Added export list to object output
lost@starbug
parents: 374
diff changeset
274
3498b2d88376 Added export list to object output
lost@starbug
parents: 374
diff changeset
275 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
276 };
323
473ed9b353eb Started framework for lwasm binary
lost
parents:
diff changeset
277
342
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
278 #ifndef ___symbol_c_seen___
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
279
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
280 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
281 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
282
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
283 #endif
7b4123dce741 Added basic symbol registration
lost@starbug
parents: 340
diff changeset
284
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
285 #ifndef ___lwasm_c_seen___
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
286
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
287 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
288 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
289 extern int lwasm_next_context(asmstate_t *as);
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
290 extern void lwasm_emit(line_t *cl, int byte);
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
291 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
292
347
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
293 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
294 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
295 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
296 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
297
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
298 extern void skip_operand(char **p);
1649bc7bda5a Some data oriented pseudo ops added
lost@starbug
parents: 346
diff changeset
299
357
0cf4948d53b4 Checkpoint - adding actual cpu instructions
lost@starbug
parents: 356
diff changeset
300 extern int lwasm_lookupreg2(const char *rlist, char **p);
359
f50a54d0293a Indexed part 1
lost@starbug
parents: 357
diff changeset
301 extern int lwasm_lookupreg3(const char *rlist, char **p);
357
0cf4948d53b4 Checkpoint - adding actual cpu instructions
lost@starbug
parents: 356
diff changeset
302
363
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
303 extern void lwasm_show_errors(asmstate_t *as);
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
304
d96c30e60ddf Added pass2 and various supporting logic including symbol lookups
lost@starbug
parents: 361
diff changeset
305 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
306
372
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 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
308 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
309
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
310 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
311
344
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
312 #endif
0215a0fbf61b Added assembly error system and additional checks for symbol syntax
lost@starbug
parents: 342
diff changeset
313
346
a82c55070624 Added expression parsing infrastructure and misc fixes
lost@starbug
parents: 345
diff changeset
314 #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
315 #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
316
324
be63116281b0 Created lwlib folder and added first bits to it
lost
parents: 323
diff changeset
317 #endif /* ___lwasm_h_seen___ */