|
|
/* asm86.h -- include file for microsoft 80x86 assembler
**** microsoft (r) macro assembler** copyright (c) microsoft corp 1986. all rights reserved**** randy nevin*/
#include "asmconf.h"
#include "asmdebug.h"
#include <setjmp.h>
#ifdef MSDOS
# define PSEP '\\'
# define ALTPSEP '/'
# define BINOPEN (O_CREAT | O_TRUNC | O_WRONLY | O_BINARY)
# define BINSTDIO "b"
# define TEXTREAD (O_RDONLY | O_BINARY)
# define OBJ_EXT ".obj"
# define NLINE "\r\n"
#else
# define PSEP '/'
# define ALTPSEP '\\'
# define BINOPEN (O_CREAT | O_TRUNC | O_WRONLY)
# define BINSTDIO
# define TEXTREAD O_RDONLY
# define OBJ_EXT ".o"
# define NLINE "\n"
#endif /* MSDOS */
# ifdef MSDOS
# define DEF_OBJBUFSIZ 8
# define DEF_INCBUFSIZ 2
# define DEF_SRCBUFSIZ 8
# else
# define DEF_OBJBUFSIZ 1
# define DEF_INCBUFSIZ 1
# define DEF_SRCBUFSIZ 1
# endif /* MSDOS */
# define DEF_LISTWIDTH 79
#ifdef XENIX286
# define DEF_LISTCON TRUE
#else
# define DEF_LISTCON FALSE
#endif /* XENIX286 */
#define DEF_CREFING FALSE
#define DEF_DEBUG FALSE
#define DEF_DUMPSYM TRUE
#define DEF_LSTING FALSE
#define DEF_OBJING TRUE
#define DEF_ORIGCON FALSE
#define DEF_SEGA FALSE
#define DEF_VERBOSE FALSE
#define SYMMAX 63
#define ELSEMAX 20
#define INCLUDEMAX 10
#define PROCMAX 20
#define NUMLIN 58
#define EMITBUFSIZE 1023
#define EMITBUFMAX 1022
#define highWord(l) (*((USHORT *)&l+1))
#define LST_EXT ".lst"
#undef NULL
#define NULL 0
#define FALSE 0
#define TRUE 1
#define MAXCHR 27
#define LINEMAX 200
#define LBUFMAX 512
#define LISTMAX 32
#define TITLEWIDTH 61
#define LSTDATA 7
#define LSTMAX 25
#define ESSEG 0
#define CSSEG 1
#define SSSEG 2
#define DSSEG 3
#define FSSEG 4
#define GSSEG 5
#define NOSEG 6
#define FH_CLOSED -1 /* Used to mark a file temporarily closed */
/* scanatom positioning options */
#define SCEND 0 /* position at end of token */
#define SCSKIP 1 /* position at end of white space */
/* case sensitivity flags */
#define CASEU 0 /* force case to upper case */
#define CASEL 1 /* leave symbol case alone */
#define CASEX 2 /* force all symbols except EXTRN and PUBLIC to upper */
/* opcode types */
#define PGENARG 0 /* general two argument opcodes */
#define PCALL 1 /* call */
#define PJUMP 2 /* jump */
#define PSTACK 3 /* stack manipulation */
#define PRETURN 4 /* return */
#define PRELJMP 5 /* relative jumps */
#define PNOARGS 6 /* no argument opcodes */
#define PREPEAT 7 /* repeat */
#define PINCDEC 8 /* increment/decrement */
#define PINOUT 9 /* in/out */
#define PARITH 10 /* arithmetic opcodes */
#define PESC 11 /* escape */
#define PXCHG 12 /* exchange */
#define PLOAD 13 /* load */
#define PMOV 14 /* moves */
#define PSHIFT 15 /* shifts */
#define PXLAT 16 /* translate */
#define PSTR 17 /* string */
#define PINT 18 /* interrupt */
#define PENTER 19 /* enter */
#define PBOUND 20 /* bounds */
#define PCLTS 21 /* */
#define PDESCRTBL 22 /* */
#define PDTTRSW 23 /* */
#define PARSL 24 /* */
#define PARPL 25 /* */
#define PVER 26 /* */
#define PMOVX 27 /* movzx, movsx */
#define PSETCC 28 /* setle, setge, etc */
#define PBIT 29 /* bt, bts, etc */
#define PBITSCAN 30 /* bsf, bsr */
/* leave some room */#define OPCODPARSERS 37 /* number of non 8087/286 parsers */
/* fltparsers, 8087 opcode types */
#define FNOARGS 37
#define F2MEMSTK 38
#define FSTKS 39
#define FMEMSTK 40
#define FSTK 41
#define FMEM42 42
#define FMEM842 43
#define FMEM4810 44
#define FMEM2 45
#define FMEM14 46
#define FMEM94 47
#define FWAIT 48
#define FBCDMEM 49
/* masks for opcode types */
#define M_PGENARG (1L << PGENARG)
#define M_PCALL (1L << PCALL)
#define M_PJUMP (1L << PJUMP)
#define M_PSTACK (1L << PSTACK)
#define M_PRETURN (1L << PRETURN)
#define M_PRELJMP (1L << PRELJMP)
#define M_PNOARGS (1L << PNOARGS)
#define M_PREPEAT (1L << PREPEAT)
#define M_PINCDEC (1L << PINCDEC)
#define M_PINOUT (1L << PINOUT)
#define M_PARITH (1L << PARITH)
#define M_PESC (1L << PESC)
#define M_PXCHG (1L << PXCHG)
#define M_PLOAD (1L << PLOAD)
#define M_PMOV (1L << PMOV)
#define M_PSHIFT (1L << PSHIFT)
#define M_PXLAT (1L << PXLAT)
#define M_PSTR (1L << PSTR)
#define M_PINT (1L << PINT)
#define M_PENTER (1L << PENTER)
#define M_PBOUND (1L << PBOUND)
#define M_PCLTS (1L << PCLTS)
#define M_PDESCRTBL (1L << PDESCRTBL)
#define M_PDTTRSW (1L << PDTTRSW)
#define M_PARSL (1L << PARSL)
#define M_PARPL (1L << PARPL)
#define M_PVER (1L << PVER)
/* dkind */
/* low 4 bits reserved for dkinds 0-15 reseved for .model */
#define NL 0
#define IGNORECASE 0x10 /* ignorecase for if's */
#define BLKBEG 0x20 /* macro */
#define CONDBEG 0x40 /* condition */
#define CONDCONT 0x80 /* elseif */
/* assembler directive types */
#define TNAME 1
#define TPUBLIC 2
#define TEXTRN 3
#define TEND 4
#define TORG 5
#define TEVEN 6
#define TPURGE 7
#define TPAGE 8
#define TRADIX 9
#define TLIST 10
#define TXLIST 11
#define TLALL 12
#define TXALL 13
#define TSALL 14
#define TCREF 15
#define TXCREF 16
#define TTFCOND 17
#define TLFCOND 18
#define TSFCOND 19
#define TIF 20
#define TIFE 21
#define TIFDEF 22
#define TIFNDEF 23
#define TIFDIF 24
#define TIFIDN 25
#define TIF1 26
#define T8086 27
#define T8087 28
#define T287 29
#define T186 30
#define T286C 31
#define T286P 32
#define TLOCAL 33
#define TIF2 34
#define TIFNB 35
#define TIFB 36
#define TENDIF 37
#define TIRP 38
#define TIRPC 39
#define TREPT 40
#define TENDM 41
#define TERR 42
#define TERR1 43
#define TERR2 44
#define TERRB 45
#define TERRDEF 46
#define TERRDIF 47
#define TERRE 48
#define TERRNZ 49
#define TERRIDN 50
#define TERRNB 51
#define TERRNDEF 52
#define T386C 53
#define T386P 54
#define T387 55
#define TALIGN 56
#define TASSUME 57
#define TFPO 99
/* 1st only */
#define TEXITM 60
#define TINCLUDE 61
#define TSUBTTL 62
#define TELSE 63
#define TTITLE 64
#define TCOMMENT 65
#define TOUT 66
/* 1st or 2nd */
/* note that TDW has to be the last in the group */#define TDB 70
#define TDD 71
#define TDQ 72
#define TDT 73
#define TDF 74
#define TDW 75
/* 2nd only */ /* note--datadsize assumes TDx and TMACRO are adjacent */
#define TMACRO 76
#define TEQU 77
#define TSUBSTR 78
#define TCATSTR 79
#define TSIZESTR 80
#define TINSTR 81
#define TSEGMENT 82
#define TENDS 83
#define TPROC 84
#define TENDP 85
#define TGROUP 86
#define TLABEL 87
#define TSTRUC 88
#define TRECORD 89
/* other directives */
#define TSEQ 90
#define TALPHA 91
#define TMODEL 92
#define TMSEG 93
#define TMSTACK 94
#define TDOSSEG 95
#define TINCLIB 96
#define TCOMM 97
#define TMSFLOAT 98
#ifdef MSDOS
#define ERRFILE stdout
#else
#define ERRFILE stderr
#endif
/* operator list */
#define OPLENGTH 0
#define OPSIZE 1
#define OPWIDTH 2
#define OPMASK 3
#define OPOFFSET 4
#define OPSEG 5
#define OPTYPE 6
#define OPSTYPE 7
#define OPTHIS 8
#define OPHIGH 9
#define OPLOW 10
#define OPNOT 11
#define OPSHORT 12
#define OPAND 13
#define OPEQ 14
#define OPGE 15
#define OPGT 16
#define OPLE 17
#define OPLT 18
#define OPMOD 19
#define OPNE 20
#define OPOR 21
#define OPPTR 22
#define OPSHL 23
#define OPSHR 24
#define OPXOR 25
#define OPNOTHING 26
#define OPDUP 27
#define OPLPAR 28
#define OPRPAR 29
#define OPLANGBR 30
#define OPRANGBR 31
#define OPLBRK 32
#define OPRBRK 33
#define OPDOT 34
#define OPCOLON 35
#define OPMULT 36
#define OPDIV 37
#define OPPLUS 38
#define OPMINUS 39
#define OPUNMINUS 40
#define OPUNPLUS 41
/* processor types */
#define P86 0x01 /* all 8086/8088 instructions */
#define P186 0x02 /* + 186 */
#define P286 0x04 /* + 286 unprotected */
#define FORCEWAIT 0x10 /* keep FWAIT on these 287 instructions */
#define PROT 0x80 /* protected mode instructions */
/* See also F_W, S_W in asmtab.h */
/* For NT the .MSFLOAT keyword has been removed *//* Therefore PXNONE can't be set (Jeff Spencer 11/2/90) */#define PXNONE 0x00 /* MSFLOAT, no coprocessor */
#define PX87 0x01 /* 8087 */
#define PX287 0x04 /* 80287 */
#define PX387 0x08 /* 80387 */
#ifdef V386
#define P386 0x08 /* + 386 unprotected */
#endif
/* cross-reference information */
#define CREFEND 0 /* member of enumerated set */
#define REF 1 /* member of enumerated set */
#define DEF 2 /* member of enumerated set */
#define CREFINF 3 /* number of cross reference types */
/* cross-reference selection */
#define CREF_SINGLE 1 /* generate single file cross reference */
#define CREF_MULTI 2 /* generate multiple file cross reference */
/* Symbol reference type */
#define REF_NONE 0 /* symbol reference type is none */
#define REF_READ 1 /* symbol reference type is read */
#define REF_WRITE 2 /* symbol reference type is write */
#define REF_XFER 3 /* symbol reference type is jump */
#define REF_OTHER 4 /* symbol reference type is other */
/* number of arguments for opcodes */
#define NONE 0 /* no arguments */
#define MAYBE 1 /* may have arguments */
#define ONE 2 /* one argument */
#define TWO 3 /* two arguments */
#define VARIES 4 /* variable number */
/* opcode argument class */
#define FIRSTDS 0
#define SECONDDS 1
#define STRINGOPCODE 2
/* symbol attributes */
#define CDECL_ 0
#define XTERN 1
#define DEFINED 2
#define MULTDEFINED 3
#define NOCREF 4
#define BACKREF 5
#define PASSED 6
#define GLOBAL 7
/* masks for attributes */
#define M_GLOBAL (1 << GLOBAL)
#define M_XTERN (1 << XTERN)
#define M_DEFINED (1 << DEFINED)
#define M_MULTDEFINED (1 << MULTDEFINED)
#define M_NOCREF (1 << NOCREF)
#define M_BACKREF (1 << BACKREF)
#define M_PASSED (1 << PASSED)
#define M_CDECL (1 << CDECL_)
/* symbol kinds */
#define SEGMENT 0
#define GROUP 1
#define CLABEL 2
#define PROC 3
#define REC 4
#define STRUC 5
#define EQU 6
#define DVAR 7
#define CLASS 8
#define RECFIELD 9
#define STRUCFIELD 10
#define MACRO 11
#define REGISTER 12
/* masks for symbol kinds */
#define M_SEGMENT (1 << SEGMENT)
#define M_GROUP (1 << GROUP)
#define M_CLABEL (1 << CLABEL)
#define M_PROC (1 << PROC)
#define M_REC (1 << REC)
#define M_STRUC (1 << STRUC)
#define M_EQU (1 << EQU)
#define M_DVAR (1 << DVAR)
#define M_CLASS (1 << CLASS)
#define M_RECFIELD (1 << RECFIELD)
#define M_STRUCFIELD (1 << STRUCFIELD)
#define M_MACRO (1 << MACRO)
#define M_REGISTER (1 << REGISTER)
/* Special values for symtype - which normaly is the size of the type */
#define CSNEAR ((USHORT)(~0)) /* type for near proc/label */
#define CSNEAR_LONG ((long)(~0)) /* For use after CSNEAR has been sign extened */
#define CSFAR ((USHORT)(~1)) /* .. far .. */
#define CSFAR_LONG ((long)(~1)) /* .. far .. */
/* equ types */
#define ALIAS 0
#define TEXTMACRO 1
#define EXPR 2
/* register kinds */
#define BYTREG 0 /* byte register */
#define WRDREG 1 /* word register */
#define SEGREG 2 /* segment register */
#define INDREG 3 /* index register */
#define STKREG 4 /* stack register */
#ifdef V386
#define DWRDREG 5 /* double word register */
#define CREG 6 /* 386 control, debug, or test register */
#endif
/* masks for register kinds */
#define M_BYTREG (1 << BYTREG)
#define M_WRDREG (1 << WRDREG)
#define M_SEGREG (1 << SEGREG)
#define M_INDREG (1 << INDREG)
#define M_STKREG (1 << STKREG)
#ifdef V386
#define M_DWRDREG (1 << DWRDREG)
#define M_CREG (1 << CREG)
#endif
/* source type */
#define RREADSOURCE 0 /* read line from file */
#define RMACRO 1 /* macro expansion */
/* source line handlers */
#define HPARSE 0 /* parse line */
#define HMACRO 1 /* build macro */
#define HIRPX 2 /* build irp/irpx */
#define HCOMMENT 3 /* copy comment lines */
#define HSTRUC 4 /* build struc definition */
/* codeview debugging obj generation */
#define CVNONE 0
#define CVLINE 1
#define CVSYMBOLS 2
/* Predefined type index component parts for codeview*/
#define BT_UNSIGNED 1 /* Basic types */
#define BT_REAL 2
#define BT_ASCII 5
#define BT_DIRECT 0 /* Address type */
#define BT_NEARP 1
#define BT_FARP 2
#define BT_sz1 0 /* Size */
#define BT_sz2 1
#define BT_sz4 2
#define makeType(type, mode, size) (0x0080 | mode << 5 | type << 2 | size)
#define isCodeLabel(pSY) (pSY->symtype >= CSFAR)
/* tags for fProcArgs, controls frame building*/#define ARGS_NONE 0 /* no arguments */
#define ARGS_REG 1 /* register save list */
#define ARGS_PARMS 2 /* parms present */
#define ARGS_LOCALS 3 /* locals present */
#define CLANG 1 /* langType tag for C */
#define STRUC_INIT -1 /* special mark for clabel.proclen to indicate
* a structure initialization *//* listing type */
#define SUPPRESS 0
#define LISTGEN 1
#define LIST 2
/* parameter types */
#define CHRTXT 0
#define PLIST 1
#define MACROS 2
/* type of entry on parse stack */
#define OPERATOR 0
#define OPERAND 1
#define ENDEXPR 2
/* okind */
#define ICONST 0
#define ISYM 1
#define IUNKNOWN 2
#define ISIZE 3
#define IRESULT 4
/* ftype */
#define FORREF 1 /* symbol is forward reference */
#define UNDEFINED 2 /* symbol is undefined */
#define KNOWN 4 /* symbol is known */
#define XTERNAL 8 /* symbol is external */
#define INDETER 10 /* symbol value is indeterminate */
/* tset */
#define UNKNOWN 0
#define HIGH 1
#define LOW 2
#define DATA 3
#define CODE 4
#define RCONST 5
#define REGRESULT 6
#define SHRT 7 /* Was SHORT, but that conflicted with the type */
#define SEGRESULT 8
#define GROUPSEG 9
#define FORTYPE 10
#define PTRSIZE 11
#define EXPLOFFSET 12
#define FLTSTACK 13
#define EXPLCOLON 14
#define STRUCTEMPLATE 15
/* masks for above */
#define M_UNKNOWN (1 << UNKNOWN) // 0x0001
#define M_HIGH (1 << HIGH) // 0x0002
#define M_LOW (1 << LOW) // 0x0004
#define M_DATA (1 << DATA) // 0x0008
#define M_CODE (1 << CODE) // 0x0010
#define M_RCONST (1 << RCONST) // 0x0020
#define M_REGRESULT (1 << REGRESULT) // 0x0040
#define M_SHRT (1 << SHRT) // 0x0080
#define M_SEGRESULT (1 << SEGRESULT) // 0x0100
#define M_GROUPSEG (1 << GROUPSEG) // 0x0200
#define M_FORTYPE (1 << FORTYPE) // 0x0400
#define M_PTRSIZE (1 << PTRSIZE) // 0x0800
#define M_EXPLOFFSET (1 << EXPLOFFSET) // 0x1000
#define M_FLTSTACK (1 << FLTSTACK) // 0x2000
#define M_EXPLCOLON (1 << EXPLCOLON) // 0x4000
#define M_STRUCTEMPLATE ((USHORT)(1 << STRUCTEMPLATE)) // 0x8000
/* fixup types */
#define FPOINTER 0 /* four bytes offset and segment */
#define FOFFSET 1 /* two bytes relative to context */
#define FBASESEG 2 /* two bytes segment address */
#define FGROUPSEG 3 /* two bytes segment address of group */
#define FCONSTANT 4 /* one or two bytes of constant data */
#define FHIGH 5 /* one byte high part of offset */
#define FLOW 6 /* one byte low part of offset */
#define FNONE 7 /* no offset */
#ifndef V386
#define FIXLIST 8 /* number of fixup types */
#else
#define F32POINTER 8 /* 6 bytes offset and segment--for 386 */
#define F32OFFSET 9 /* 4 bytes offset--for 386 */
#define DIR32NB 10 /* DIR32NB fixup type for FPO */
#define FIXLIST 11 /* number of fixup types */
#endif
/* masks for fixup types */
#define M_F32POINTER (1 << F32POINTER)
#define M_F32OFFSET (1 << F32OFFSET)
#define M_FPOINTER (1 << FPOINTER)
#define M_FOFFSET (1 << FOFFSET)
#define M_FBASESEG (1 << FBASESEG)
#define M_FGROUPSEG (1 << FGROUPSEG)
#define M_FCONSTANT (1 << FCONSTANT)
#define M_FHIGH (1 << FHIGH)
#define M_FLOW (1 << FLOW)
#define M_FNONE (1 << FNONE)
/* record for DUP lists */
#define NEST 0 /* Dup item is nested */
#define ITEM 1 /* Dup item is regular size */
#define LONG 2 /* Dup item is long size */
/* assembler exit codes */
#define EX_NONE 0 /* no error */
#define EX_ARGE 1 /* argument error */
#define EX_UINP 2 /* unable to open input file */
#define EX_ULST 3 /* unable to open listing file */
#define EX_UOBJ 4 /* unable to open object file */
#define EX_UCRF 5 /* unable to open cross reference file */
#define EX_UINC 6 /* unable to open include file */
#define EX_ASME 7 /* assembly errors */
#define EX_MEME 8 /* memory allocation error */
#define EX_REAL 9 /* real number input not allowed */
#define EX_DSYM 10 /* error defining symbol from command line */
#define EX_INT 11 /* assembler interrupted */
#define TERMINATE(message, exitCode)\
terminate( (SHORT)((exitCode << 12) | message), NULL, NULL, NULL )
#define TERMINATE1(message, exitCode, a1)\
terminate( (SHORT)((exitCode << 12) | message), a1, NULL, NULL )
/* Bit flags or'ed into the error numbers */#define E_WARN1 ((USHORT)(1 << 12)) /* level 1 warning */
#define E_WARN2 ((USHORT)(2 << 12)) /* level 2 warning */
#define E_PASS1 ((USHORT)(8 << 12)) /* pass 1 error */
#define E_ERRMASK 0x0fff /* low 12 bits contain error code */
/* error code definitions */
#define E_BNE 1 /* block nesting error */
#define E_ECL (2|E_WARN1) /* extra characters on line */
#define E_RAD (3|E_PASS1) /* ?register already defined */
#define E_UST 4 /* unknown type specifier */
#define E_RSY (5|E_PASS1) /* redefinition of symbol */
#define E_SMD 6 /* symbol multiply defined */
#define E_PHE 7 /* phase error */
#define E_ELS 8 /* already had ELSE clause */
#define E_NCB 9 /* not in conditional block */
#define E_SND 10 /* symbol not defined */
#define E_SYN 11 /* syntax error */
#define E_TIL 12 /* type illegal in context */
#define E_NGR 13 /* need group name */
#define E_PS1 (14|E_PASS1) /* must be declared in pass 1 */
#define E_TUL 15 /* symbol type usage illegal */
#define E_SDK 16 /* symbol already different kind */
#define E_RES (17|E_WARN1) /* symbol is reserved word */
#define E_IFR (18|E_PASS1) /* forward reference is illegal */
#define E_MBR 19 /* must be register */
#define E_WRT 20 /* wrong register type */
#define E_MSG 21 /* must be segment or group */
/*#define E_SNS 22 obsolete: symbol has no segment */#define E_MSY 23 /* must be symbol type */
#define E_ALD 24 /* already locally defined */
#define E_SPC 25 /* segment parameters changed */
#define E_NPA 26 /* not proper align /combine type */
#define E_RMD 27 /* reference to multiply defined */
#define E_OPN 28 /* operand was expected */
#define E_OPR 29 /* operator was expected */
#define E_DVZ 30 /* division by 0 or overflow */
#define E_SCN 31 /* shift count negative */
#define E_OMM (32|E_WARN1) /* operand types must match */
#define E_IUE 33 /* illegal use of external */
/*#define E_RFM 34 obsolete: must be record field name */#define E_RRF 35 /* must be record or fieldname */
#define E_OHS 36 /* operand must have size */
#define E_NOP (37|E_WARN2) /* nops generated */
#define E_LOS 39 /* left operand must have segmnt */
#define E_OOC 40 /* one operand must be constant */
#define E_OSA 41 /* operands must be same or 1 abs*/
/*#define E_NOE 42 obsolete: normal type operand expected */#define E_CXP 43 /* constant was expected */
#define E_OSG 44 /* operand must have segment */
#define E_ASD 45 /* must be associated with data */
#define E_ASC 46 /* must be associated with code */
#define E_DBR 47 /* already have base register */
#define E_DIR 48 /* already have index register */
#define E_IBR 49 /* must be index or base register*/
#define E_IUR 50 /* illegal use of register */
#define E_VOR 51 /* value out of range */
#define E_NIP 52 /* operand not in IP segment */
#define E_IOT 53 /* improper operand type */
#define E_JOR 54 /* relative jump out of range */
/*#define E_IDC 55 obsolete: index displ must be constant */#define E_IRV 56 /* illegal register value */
#define E_NIM 57 /* no immediate mode */
#define E_IIS (58|E_WARN1) /* illegal size for item */
#define E_BRI 59 /* byte register is illegal */
#define E_CSI 60 /* CS register illegal usage */
#define E_AXL 61 /* must be AX or AL */
#define E_ISR 62 /* improper use of segment reg */
#define E_NCS 63 /* no or unreachable CS */
#define E_OCI 64 /* operand combination illegal */
#define E_JCD 65 /* near JMP /CALL to differend CS */
#define E_NSO 66 /* label can't have seg override */
#define E_OAP 67 /* must have opcode after prefix */
#define E_OES 68 /* can't override ES segment */
#define E_CRS 69 /* can't reach with segment reg */
#define E_MSB 70 /* must be in segment block */
#define E_NEB 71 /* can't use EVEN or BYTE seg */
#define E_FOF 72 /* forward needs override or far */
#define E_IDV 73 /* illegal value for DUP count */
#define E_SAE 74 /* symbol already external */
#define E_DTL 75 /* DUP too large for linker */
#define E_UID 76 /* usage of ?(indeterminate) bad */
#define E_MVD 77 /* more values than defined with */
#define E_OIL 78 /* only initialize list legal */
#define E_DIS 79 /* directive illegal in struc */
#define E_ODI 80 /* override with DUP is illegal */
#define E_FCO 81 /* fields cannot be overriden */
/*#define E_RFR 83 obsolete: register can't be forward ref */#define E_CEA 84 /* circular chain of EQU aliases */
#define E_7OE 85 /* 8087 opcode can't be emulated */
#define E_EOF (86|E_PASS1|E_WARN1) /* end of file, no END directive */
#define E_ENS 87 /* data emitted with no segment */
#define E_EP1 88 /* error if pass1 */
#define E_EP2 89 /* error if pass2 */
#define E_ERR 90 /* error */
#define E_ERE 91 /* error if expr = 0 */
#define E_ENZ 92 /* error if expr != 0 */
#define E_END 93 /* error if symbol not defined */
#define E_ESD 94 /* error if symbol defined */
#define E_EBL 95 /* error if string blank */
#define E_ENB 96 /* error if string not blank */
#define E_EID 97 /* error if strings identical */
#define E_EDF 98 /* error if strings different */
#define E_OWL 99 /* overide is too long */
#define E_LTL (100|E_PASS1)/* line too long */
#define E_IMP (101|E_WARN1)/* impure memory reference */
#define E_MDZ (102|E_WARN1)/* missing data; zero assumed */
#define E_286 (103|E_WARN1)/* segment near (or at) 64K limit*/
#define E_AP2 104 /* Align must be power of 2 */
#define E_JSH (105|E_WARN2)/* shortened jump (warning) */
#define E_EXP 106 /* expected "<what was expected>"*/
#define E_LNL 107 /* line too long */
#define E_NDN 108 /* non-digit in number */
#define E_EMS 109 /* empty string */
#define E_MOP 110 /* missing operand */
#define E_PAR 111 /* open parenthesis or bracket */
#define E_NMC 112 /* not in macro expansion */
#define E_UEL 113 /* unexpected end of line */
#define E_CPU 114 /* can't change cpu type after first segment */
#define E_ONW (115|E_WARN2)/* operand size does not match wordsize (warning) */
#define E_ANW (116|E_WARN2)/* address size does not match wordsize (warning) */
#define E_INC (117|E_PASS1)/* include file not found */
#define E_FPO1 (118|E_PASS1)
#define E_FPO2 (119|E_WARN1)
#define E_MAX 120 /* number of error messages */
/* symbol name entry */
struct idtext { SHORT hashval; /* value of hash function */ char id[1]; /* name */ };
/* parse stack entry */
struct dscrec { DSCREC *previtem; /* previous item on stack */ UCHAR prec; /* precedence */ char itype; /* type of entry */
union { /* OPERAND */ struct psop {
SYMBOL FARSYM *dsegment; /* segment of result */ SYMBOL FARSYM *dcontext; /* context(CS) of label
or current segment register*/ SYMBOL FARSYM *dextptr; /* pointer to external */ USHORT dlength; USHORT rm; /* register/index mode */ USHORT dtype; /* copy of dtype */ OFFSET doffset; /* offset */ USHORT dsize; /* size */ char mode; /* mode bits */ char w; /* word/byte mode */ char s; /* sign extend */ char sized; /* TRUE if has size */ char seg; /* segment register, etc */ char dflag; /* copy of dflag */ char fixtype; /* fixup type */ char dsign; } opnd;
/* OPERATOR */ struct { char oidx; } opr;
} dsckind; };
/* record for dup list */
struct duprec { struct duprec FARSYM *itemlst; /* list of items to dup */ OFFSET rptcnt; /* number of times to repeat */ USHORT itemcnt; /* number of duprecs in itemlist */ USHORT type; /* data type for codeview */ char decltype; /* STRUC data declaration type */ char dupkind; /* dup type */
union { /* NEXT */ struct { struct duprec FARSYM *dup; } dupnext;
/* ITEM */ struct { DSCREC *ddata; } dupitem;
/* LONG */ struct { char *ldata; UCHAR llen; } duplong; } duptype;};
/* symbol entry */
struct symb {
SYMBOL FARSYM *next; /* pointer to next symbol */ SYMBOL FARSYM *alpha; /* pointer to next symbol alpha ordered */ SYMBOL FARSYM *symsegptr; /* pointer to segment entry for symbol */ NAME FAR *nampnt; /* pointer to name structure */ NAME *lcnamp; /* pointer to lower case name structure */ OFFSET offset; USHORT length; USHORT symtype; /* DB .. DT plus NEAR/FAR */ UCHAR attr; /* GLOBAL .. LOCALSYM */ char symkind; /* SEGMENT .. REGISTER */
union { /* SEGMENT */ struct symbseg { USHORT segIndex; /* must be first */ SYMBOL FARSYM *segordered; SYMBOL FARSYM *lastseg; SYMBOL FARSYM *grouptr; SYMBOL FARSYM *nxtseg; SYMBOL FARSYM *classptr; OFFSET seglen; OFFSET locate; USHORT lnameIndex; /* for class aliaes */ char align; char combine; char use32; char hascode; } segmnt;
/* GROUP */ struct symbgrp { USHORT groupIndex; /* must be first */ SYMBOL FARSYM *segptr; } grupe;
/* CLABEL */ struct symbclabel { USHORT type; /* type index, for codeview */ SYMBOL FARSYM *csassume; USHORT iProc; /* procedure index belonging to */ } clabel;
/* PROC */ struct symbproc { USHORT type; /* type index, for codeview */ SYMBOL FARSYM *csassume; USHORT proclen; SYMBOL FARSYM *pArgs; /* arguments and locals */ } plabel;
/* extern (code & data), comm & class (known as DVAR) */ struct symbext { USHORT extIndex; /* must be first */ SYMBOL FARSYM *csassume; OFFSET length; /* so comms > 64K */ UCHAR commFlag; /* used for comm defs */ } ext;
/* EQU */ struct symbequ { char equtyp; USHORT iProc; /* procedure index belonging to */
union { /* ALIAS */ struct { SYMBOL FARSYM *equptr; } alias;
/* TEXTMACRO */ struct { char *equtext; USHORT type; /* CV type for parms/locals */ } txtmacro;
/* EXPR */ struct { SYMBOL FARSYM *eassume; char esign; } expr; } equrec; } equ;
/* RECFIELD */ struct symbrecf { SYMBOL FARSYM *recptr; SYMBOL FARSYM *recnxt; OFFSET recinit; /* Initial Value */ OFFSET recmsk; /* bit mask */ char recwid; /* with in bits */ } rec;
/* STRUCFIELD */ struct symbstrucf { SYMBOL FARSYM *strucnxt; USHORT type; } struk;
/* REC, STRUC, MACRO */ struct symbrsm { union { /* REC */ struct { SYMBOL FARSYM *reclist; char recfldnum; } rsmrec;
/* STRUC */ struct { SYMBOL FARSYM *struclist; struct duprec FARSYM *strucbody; USHORT strucfldnum; USHORT type; USHORT typePtrNear; USHORT typePtrFar; } rsmstruc;
/* MACRO */ struct { TEXTSTR FAR *macrotext; UCHAR active; UCHAR delete; UCHAR parmcnt; UCHAR lclcnt; } rsmmac; } rsmtype; } rsmsym;
/* REGISTER */ struct symbreg { char regtype; } regsym;
} symu;};
/* textstring descriptor */
struct textstr { TEXTSTR FAR *strnext; /* next string in list */ char size; /* allocated size */ char text[1]; /* text of string */ };
typedef union PV_u {
char *pActual; /* pointer to actual parm value */ char localName[4]; /* or local name cache */} PV;
typedef struct MC_s { /* Macro parameter build/call struct */
TEXTSTR FAR *pTSHead; /* Head of linked body lines */ TEXTSTR FAR *pTSCur; /* Current body line */
UCHAR flags; /* macro type */ UCHAR iLocal; /* index of first local */ USHORT cbParms; /* byte count of parms string */ USHORT localBase; /* first local # to use */ USHORT count; /* count of excution loops */
char *pParmNames; /* parameter names during build */ char *pParmAct; /* actual parm names during expansion*/
char svcondlevel; /* condlevel at macro call */ char svlastcondon; /* lastcondon at macro call */ char svelseflag; /* elseflag at macro call */
PV rgPV[1]; /* parm index to point to actual */} MC;
/* data descriptor entry */
struct dsr { DSCREC *valrec; struct duprec FARSYM *dupdsc; char longstr; char flag; char initlist; char floatflag; char *dirscan; OFFSET i;};
struct eqar { SYMBOL FARSYM *equsym; DSCREC *dsc; UCHAR *dirscan; UCHAR svcref;};
struct datarec { OFFSET datalen; USHORT type; SYMBOL FARSYM *labelptr; char buildfield;};
struct fileptr { FILE *fil; struct fileptr *prevfil; short line; char *name; };
struct objfile { int fh; char FARIO *pos; char FARIO *buf; SHORT cnt; SHORT siz; char *name; };
/* BUFFER CONTROL BLOCK - Information concerning a file buffer */
#ifdef BCBOPT
typedef struct BCB { struct BCB * pBCBNext; /* next BCB for file */ struct BCB * pBCBPrev; /* last BCB allocated */ char FARIO * pbuf; /* pointer to buffer */ long filepos; /* current position in file */ char fInUse; /* Set during pass 2 if buffer is active */} BCB;#endif
/* FCB - Information concerning a particular file */
typedef struct FCB { int fh; /* file handle */ long savefilepos; /* file position if file closed temporarily */ struct FCB * pFCBParent; /* parent file */ struct FCB * pFCBChild; /* child file (bi-directional linked list */#ifdef BCBOPT
struct FCB * pFCBNext; /* next file to be opened */ BCB * pBCBFirst; /* first BCB for file */ BCB * pBCBCur; /* current BCB for file */#endif
char FARIO * pbufCur; /* read/write loc in current buffer */ char FARIO * ptmpbuf; /* current position in temp read buffer */ char FARIO * buf; /* temporary read buffer */ USHORT ctmpbuf; /* count of bytes in temporary buffer */ USHORT cbbuf; /* size of buffer */ USHORT cbufCur; /* count of bytes in current buffer */ USHORT line; /* current line number */ char fname[1]; /* file name */} FCB;
typedef struct FASTNAME { UCHAR * pszName; /* text of the name, upper case if appropriate */ UCHAR * pszLowerCase; /* Mixed case version of pszName */ USHORT usHash; /* hash value of string in pszName */ UCHAR ucCount; /* length of the name */} FASTNAME;
// Used to store real number initializers
struct realrec { UCHAR num[10]; USHORT i;};
/* Used to parse and generate CODE for 8086 opcodes */struct parsrec { DSCREC *op1; DSCREC *op2; UCHAR bytval; USHORT wordval; DSCREC *dsc1; DSCREC *dsc2; UCHAR defseg; char *dirscan; char svxcref;};
struct evalrec { struct ar *p; char parenflag; char evalop; char curitem; char idx; DSCREC *curoper;};
struct exprec { struct evalrec *p; DSCREC *valright; DSCREC *valleft; UCHAR stkoper; USHORT t; OFFSET left; OFFSET right;};
struct fltrec { UCHAR fseg; char args; USHORT stknum; USHORT stk1st;};
/* reg initialization data */struct mreg { char nm[4]; UCHAR rt; UCHAR val; };
typedef struct _FPO_DATA { unsigned long ulOffStart; // offset 1st byte of function code
unsigned long cbProcSize; // # bytes in function
unsigned long cdwLocals; // # bytes in locals/4
unsigned short cdwParams; // # bytes in params/4
unsigned short cbProlog : 8; // # bytes in prolog
unsigned short cbRegs : 3; // # regs saved
unsigned short fHasSEH : 1; // TRUE if SEH in func
unsigned short fUseBP : 1; // TRUE if EBP has been allocated
unsigned short reserved : 1; // reserved for future use
unsigned short cbFrame : 2; // frame type
} FPO_DATA, *PFPO_DATA;
typedef struct _FPOSTRUCT { struct _FPOSTRUCT *next; FPO_DATA fpoData; SYMBOL *pSym; SYMBOL *pSymAlt; USHORT extidx;} FPOSTRUCT, *PFPOSTRUCT;
#ifndef ASMGLOBAL
# if defined M8086OPT
extern UCHAR *naim; extern UCHAR *svname;# else
extern FASTNAME naim; extern FASTNAME svname;# endif
extern UCHAR X87type; extern char ampersand; extern char addplusflagCur; extern char baseName[]; extern char caseflag; extern char checkpure; extern char condflag; extern OFFSET cbProcLocals; extern OFFSET cbProcParms; extern UCHAR cpu; extern UCHAR cputype; extern UCHAR crefinc; extern char crefing; extern char crefnum[]; extern char crefopt; extern UCHAR creftype; extern char wordszdefault; extern char emittext; /* emit linker test if true */ extern char debug; /* true if debug set */ extern USHORT dirsize[]; extern char displayflag; extern char dumpsymbols; /* do symbol table display if true */ extern char dupflag; extern char elseflag; extern char emulatethis; extern char endbody; extern char equdef; /* TRUE if equ already defined */ extern char equflag; extern char equsel; extern USHORT errorlineno; extern char exitbody; extern char expandflag; extern char fDosSeg; extern char fSimpleSeg; extern char fCheckRes; extern UCHAR fCrefline; extern char fNeedList; extern char fProcArgs; extern USHORT fPass1Err; extern char f386already; extern char fArth32; extern char fSkipList; extern char fSecondArg; extern char farData[]; extern char fltemulate; extern UCHAR fKillPass1; extern jmp_buf forceContext; extern char generate; extern UCHAR goodlbufp; extern char impure; extern USHORT iProcCur; extern USHORT iProc; extern char inclcnt; extern char inclFirst; extern SHORT iRegSave; extern char *inclpath[]; extern char initflag; extern char labelflag; extern SHORT handler; extern char lastreader; extern char linebuffer[]; extern char *linebp; extern char lbuf[]; extern char *lbufp; extern SHORT langType; extern char listbuffer[]; extern char listblank []; extern char listconsole; extern char listed; extern char listflag; extern char listindex; extern char listquiet; extern char localflag; extern char loption; extern char lsting; extern char moduleflag;
extern USHORT nestCur; extern USHORT nestMax; extern char noexp; extern char objectascii[]; extern char objing; extern char opctype; extern char opertype; extern char opkind; extern char optyp; extern char origcond; extern char *pText, *pTextEnd; extern SYMBOL FARSYM *pStrucCur; extern SYMBOL FARSYM *pStrucFirst; extern char pass2; /* true if in pass 2 */ extern char popcontext; extern char radix; /* assumed radix base */ extern char radixescape; extern char resvspace; extern char save[]; extern char segalpha; extern char segtyp;
extern char strucflag; extern char subttlbuf[]; extern char swaphandler; extern char titlebuf[]; extern char titleflag; extern char titlefn[]; extern USHORT tempLabel; extern char unaryset[]; extern char xcreflag; extern char xoptoargs[]; extern char *atime; extern long linestot; extern long linessrc; extern short pagemajor; extern short pageminor; extern short symbolcnt; extern DSCREC emptydsc; extern DSCREC *fltdsc; extern DSCREC *itemptr; extern DSCREC *resptr; extern DSCREC *startaddr; extern struct duprec FARSYM *strucprev; extern struct duprec FARSYM *strclastover; extern struct duprec FARSYM *strucoveride; extern struct fileptr crf; extern struct fileptr lst;
extern NAME FAR *modulename; extern TEXTSTR FAR *rmtline; extern SYMBOL FARSYM *curgroup; extern SYMBOL FARSYM *firstsegment; extern SYMBOL FARSYM *lastsegptr; extern SYMBOL FARSYM *macroptr; extern SYMBOL FARSYM *macroroot; extern SYMBOL FARSYM *procStack[PROCMAX]; extern SYMBOL FARSYM *pProcCur; extern SYMBOL FARSYM *pProcFirst; extern SYMBOL FARSYM *pFlatGroup; extern short iProcStack; extern SYMBOL FARSYM *pcproc; extern MC *pMCur; extern TEXTSTR FAR *pLib; extern SYMBOL FARSYM *pcsegment; extern SYMBOL FARSYM *recptr; extern char regSave[8][SYMMAX+1]; extern SYMBOL FARSYM *regsegment[6]; extern SYMBOL FARSYM *struclabel; extern SYMBOL FARSYM *strucroot; extern SYMBOL FARSYM *symptr; extern SYMBOL FARSYM *symroot[]; extern UCHAR delim; extern SHORT errorcode; extern UCHAR fixvalues[]; extern UCHAR modrm; extern UCHAR nilseg; extern char opcref; extern UCHAR opcbase; extern long oEndPass1; extern UCHAR xltftypetolen[]; extern UCHAR xoptoseg[]; extern char *begatom; extern USHORT blocklevel; extern OFFSET clausesize; extern USHORT condlevel; /* conditional level */ extern USHORT count; extern USHORT codeview; extern USHORT crefcount; extern USHORT datadsize[]; extern USHORT duplevel; /* indent for dup listing */ extern char *endatom; extern USHORT errornum; /* error count */ extern USHORT externnum; extern UCHAR fPutFirstOp; extern USHORT fltfixmisc[9][2]; extern USHORT fltselect[4][2]; extern USHORT groupnum; extern USHORT lastcondon; extern UCHAR linelength; /* length of line */ extern USHORT lnameIndex; extern USHORT localbase; extern USHORT macrolevel; extern USHORT operprec; extern USHORT pagelength; extern USHORT pageline; extern USHORT pagewidth; extern OFFSET pcmax; extern OFFSET pcoffset; extern USHORT segidx; extern USHORT segmentnum; extern USHORT typeIndex; extern USHORT temp; extern OFFSET val; extern USHORT varsize; extern USHORT warnnum; /* warning count */ extern USHORT warnlevel; /* warning level */ extern USHORT warnCode; extern USHORT xltsymtoresult[]; extern OFFSET CondJmpDist; /* conditional jump distance (for error) */
extern char segName[]; extern char procName[];
# ifdef M8086
extern char qname[]; /* native coded in asmhelp.asm */ extern char qlcname[]; /* "" */ extern char qsvname[]; /* "" */ extern char qsvlcname[]; /* "" */
extern SHORT objerr; extern char srceof; extern char fNotStored;
extern USHORT obufsiz;
# endif /* M8086 */
extern struct objfile obj;extern FCB * pFCBCur; /* Current file being read */
#ifdef BCBOPT
extern BCB * pBCBAvail; /* List of deallocatable file buffers */extern FCB * pFCBInc; /* Next include file */extern UCHAR fBuffering; /* TRUE if storing lines for pass 2 */#endif
extern FCB * pFCBMain; /* main file */
# ifndef XENIX286
extern char terse;# endif
#ifndef V386
#define wordsize 2 /* becomes a constant for 16 bit only segments */
#else
extern SHORT wordsize;
#endif
#endif /* ASMGLOBAL */
|
