forked from amberisvibin/chibi-pc09
145 lines
4.5 KiB
C
145 lines
4.5 KiB
C
/*
|
|
* Z80 - Assembler
|
|
* Copyright (C) 1987-2006 by Udo Munk
|
|
*
|
|
* History:
|
|
* 17-SEP-1987 Development under Digital Research CP/M 2.2
|
|
* 28-JUN-1988 Switched to Unix System V.3
|
|
* 21-OCT-2006 changed to ANSI C for modern POSIX OS's
|
|
*/
|
|
|
|
/*
|
|
* OS dependant definitions
|
|
*/
|
|
#define LENFN 2048 /* max. filename length */
|
|
#define READA "r" /* file open mode read ascii */
|
|
#define WRITEA "w" /* file open mode write ascii */
|
|
#define WRITEB "w" /* file open mode write binary */
|
|
|
|
/*
|
|
* various constants
|
|
*/
|
|
#define REL "1.3"
|
|
#define COPYR "Copyright (C) 1987-2006 by Udo Munk"
|
|
#define SRCEXT ".asm" /* filenamen extension source */
|
|
#define OBJEXT ".bin" /* filenamen extension object */
|
|
#define LSTEXT ".lis" /* filenamen extension listing */
|
|
#define OUTBIN 1 /* format of object: binary */
|
|
#define OUTMOS 2 /* Mostek binaer */
|
|
#define OUTHEX 3 /* Intel hex */
|
|
#define OUTDEF OUTMOS /* default object format */
|
|
#define COMMENT ';' /* inline comment character */
|
|
#define LINCOM '*' /* comment line if in columne 1 */
|
|
#define LABSEP ':' /* label separator */
|
|
#define STRSEP '\'' /* string separator */
|
|
#define ENDFILE "END" /* end of source */
|
|
#define MAXFN 512 /* max. no. source files */
|
|
#define MAXLINE 128 /* max. line length source */
|
|
#define PLENGTH 65 /* default lines/page in listing */
|
|
#define SYMSIZE 8 /* max. symbol length */
|
|
#define INCNEST 5 /* max. INCLUDE nesting depth */
|
|
#define IFNEST 5 /* max IF.. nesting depth */
|
|
#define HASHSIZE 500 /* max. entries in symbol hash array */
|
|
#define OPCARRAY 256 /* size of object buffer */
|
|
#define SYMINC 100 /* start size of sorted symbol array */
|
|
|
|
/*
|
|
* structure opcode table
|
|
*/
|
|
struct opc {
|
|
char *op_name; /* opcode name */
|
|
int (*op_fun) (); /* function pointer code generation */
|
|
int op_c1; /* first base opcode*/
|
|
int op_c2; /* second base opcode */
|
|
};
|
|
|
|
/*
|
|
* structure operand table
|
|
*/
|
|
struct ope {
|
|
char *ope_name; /* operand name */
|
|
int ope_sym; /* symbol value operand */
|
|
};
|
|
|
|
/*
|
|
* structure symbol table entries
|
|
*/
|
|
struct sym {
|
|
char *sym_name; /* symbol name */
|
|
int sym_wert; /* symbol value */
|
|
struct sym *sym_next; /* next entry */
|
|
};
|
|
|
|
/*
|
|
* structure nested INCLUDE's
|
|
*/
|
|
struct inc {
|
|
unsigned inc_line; /* line counter for listing */
|
|
char *inc_fn; /* filename */
|
|
FILE *inc_fp; /* file pointer */
|
|
};
|
|
|
|
/*
|
|
* definition of operand symbols
|
|
* definitions for registers A, B, C, D, H, L and (HL)
|
|
* are defined as the bits used in operands and may not
|
|
* be changed!
|
|
*/
|
|
#define REGB 0 /* register B */
|
|
#define REGC 1 /* register C */
|
|
#define REGD 2 /* register D */
|
|
#define REGE 3 /* register E */
|
|
#define REGH 4 /* register H */
|
|
#define REGL 5 /* register L */
|
|
#define REGIHL 6 /* register indirect HL */
|
|
#define REGA 7 /* register A */
|
|
#define REGI 8 /* register I */
|
|
#define REGR 9 /* register R */
|
|
#define REGAF 10 /* register pair AF */
|
|
#define REGBC 11 /* register pair BC */
|
|
#define REGDE 12 /* register pair DE */
|
|
#define REGHL 13 /* register pair HL */
|
|
#define REGIX 14 /* register IX */
|
|
#define REGIY 15 /* register IY */
|
|
#define REGSP 16 /* register SP */
|
|
#define REGIBC 17 /* register indirect BC */
|
|
#define REGIDE 18 /* register indirect DE */
|
|
#define REGIIX 19 /* register indirect IX */
|
|
#define REGIIY 20 /* register indirect IY */
|
|
#define REGISP 21 /* register indirect SP */
|
|
#define FLGNC 30 /* flag no carry */
|
|
#define FLGNZ 31 /* flag not zerro */
|
|
#define FLGZ 32 /* flag zerro */
|
|
#define FLGM 33 /* flag minus */
|
|
#define FLGP 34 /* flag plus */
|
|
#define FLGPE 35 /* flag parrity even */
|
|
#define FLGPO 36 /* flag parrity odd */
|
|
#define NOOPERA 98 /* no operand */
|
|
#define NOREG 99 /* operand isn't register */
|
|
|
|
/*
|
|
* definitions of error numbers for error messages in listfile
|
|
*/
|
|
#define E_ILLOPC 0 /* illegal opcode */
|
|
#define E_ILLOPE 1 /* illegal operand */
|
|
#define E_MISOPE 2 /* missing operand */
|
|
#define E_MULSYM 3 /* multiple defined symbol */
|
|
#define E_UNDSYM 4 /* undefined symbol */
|
|
#define E_VALOUT 5 /* value out of bounds */
|
|
#define E_MISPAR 6 /* missing parren */
|
|
#define E_MISHYP 7 /* missing string separator */
|
|
#define E_MEMOVR 8 /* memory override (ORG) */
|
|
#define E_MISIFF 9 /* missing IF at ELSE or ENDIF */
|
|
#define E_IFNEST 10 /* to many IF's nested */
|
|
#define E_MISEIF 11 /* missing ENDIF */
|
|
#define E_INCNEST 12 /* to many INCLUDE's nested */
|
|
|
|
/*
|
|
* definition fatal errors
|
|
*/
|
|
#define F_OUTMEM 0 /* out of memory */
|
|
#define F_USAGE 1 /* usage: .... */
|
|
#define F_HALT 2 /* assembly halted */
|
|
#define F_FOPEN 3 /* can't open file */
|
|
#define F_INTERN 4 /* internal error */
|