164 lines
4.4 KiB
NASM
164 lines
4.4 KiB
NASM
TITLE COMMAND Transient Uninitialized DATA
|
||
|
||
INCLUDE COMSW.ASM
|
||
.xlist
|
||
.xcref
|
||
INCLUDE DOSSYM.ASM
|
||
INCLUDE COMEQU.ASM
|
||
INCLUDE COMSEG.ASM
|
||
.list
|
||
.cref
|
||
|
||
; Uninitialized transient data
|
||
TRANSPACE SEGMENT PUBLIC BYTE
|
||
|
||
PUBLIC UCOMBUF,COMBUF,USERDIR1,EXECPATH,HEADCALL,RESSEG,TPA,SWITCHAR
|
||
PUBLIC DIRCHAR,EXEC_ADDR,RCH_ADDR,CHKDRV,RDEOF,IFNOTFLAG,FILTYP
|
||
PUBLIC CURDRV,CONCAT,PARM1,ARGC,PARM2,COMSW,ARG1S,DESTSWITCH
|
||
PUBLIC ARG2S,ALLSWITCH,ARGTS,CFLAG,DESTCLOSED,SPECDRV,BYTCNT
|
||
PUBLIC NXTADD,FRSTSRCH,LINCNT,LINLEN,FILECNT,CHARBUF,DESTFCB2,IDLEN
|
||
PUBLIC ID,COM,DEST,DESTNAME,DESTFCB,DESTDIR,GOTOLEN,PWDBUF,EXEFCB
|
||
PUBLIC DIRBUF,SDIRBUF,BITS,PATHCNT,PATHPOS,PATHSW,FULLSCR
|
||
PUBLIC DESTVARS,DESTISDIR,DESTSIZ,DESTTAIL,DESTINFO,DESTBUF
|
||
PUBLIC DESTHAND,DESTISDEV,FIRSTDEST,MELCOPY,MELSTART,SRCVARS
|
||
PUBLIC SRCISDIR,SRCSIZ,SRCTAIL,SRCINFO,SRCBUF,SRCHAND,SRCISDEV
|
||
PUBLIC SCANBUF,SRCPT,INEXACT,APPEND,NOWRITE,BINARY,WRITTEN,TERMREAD
|
||
PUBLIC ASCII,PLUS,CPDATE,CPTIME,BATHAND,STARTEL,ELCNT,ELPOS,SKPDEL
|
||
PUBLIC SOURCE,STACK
|
||
PUBLIC TRANSPACEEND
|
||
PUBLIC INTERNATVARS
|
||
|
||
IF IBM
|
||
PUBLIC ROM_CALL,ROM_IP,ROM_CS
|
||
ENDIF
|
||
|
||
IF KANJI
|
||
PUBLIC KPARSE
|
||
ENDIF
|
||
|
||
ORG 0
|
||
ZERO = $
|
||
UCOMBUF DB COMBUFLEN+3 DUP(?) ; Raw console buffer
|
||
COMBUF DB COMBUFLEN+3 DUP(?) ; Cooked console buffer
|
||
USERDIR1 DB DIRSTRLEN+3 DUP(?) ; Storage for users current directory
|
||
EXECPATH DB DIRSTRLEN+15 DUP(?) ; Path for external command
|
||
|
||
; Variables passed up from resident
|
||
HEADCALL LABEL DWORD
|
||
DW ?
|
||
RESSEG DW ?
|
||
TPA DW ?
|
||
SWITCHAR DB ?
|
||
DIRCHAR DB ?
|
||
EXEC_ADDR DD ?
|
||
RCH_ADDR DD ?
|
||
|
||
CHKDRV DB ?
|
||
RDEOF LABEL BYTE ; Misc flags
|
||
IFNOTFLAG LABEL BYTE
|
||
FILTYP DB ?
|
||
CURDRV DB ?
|
||
CONCAT LABEL BYTE
|
||
PARM1 DB ?
|
||
ARGC LABEL BYTE
|
||
PARM2 DB ?
|
||
COMSW DW ? ; Switches between command and 1st arg
|
||
ARG1S DW ? ; Switches between 1st and 2nd arg
|
||
DESTSWITCH LABEL WORD
|
||
ARG2S DW ? ; Switches after 2nd arg
|
||
ALLSWITCH LABEL WORD
|
||
ARGTS DW ? ; ALL switches except for COMSW
|
||
CFLAG DB ?
|
||
DESTCLOSED LABEL BYTE
|
||
SPECDRV DB ?
|
||
BYTCNT DW ? ; Size of buffer between RES and TRANS
|
||
NXTADD DW ?
|
||
FRSTSRCH DB ?
|
||
LINCNT DB ?
|
||
LINLEN DB ?
|
||
FILECNT DW ?
|
||
CHARBUF DB 80 DUP (?) ;line byte character buffer for xenix write
|
||
DESTFCB2 LABEL BYTE
|
||
IDLEN DB ?
|
||
ID DB 8 DUP(?)
|
||
COM DB 3 DUP(?)
|
||
DEST DB 37 DUP(?)
|
||
DESTNAME DB 11 DUP(?)
|
||
DESTFCB LABEL BYTE
|
||
DESTDIR DB DIRSTRLEN DUP(?) ; Directory for PATH searches
|
||
GOTOLEN LABEL WORD
|
||
PWDBUF LABEL BYTE
|
||
EXEFCB LABEL WORD
|
||
DIRBUF DB DIRSTRLEN+3 DUP(?)
|
||
SDIRBUF DB 12 DUP(?)
|
||
BITS DW ?
|
||
PATHCNT DW ?
|
||
PATHPOS DW ?
|
||
PATHSW DW ?
|
||
FULLSCR DW ?
|
||
|
||
IF IBM
|
||
ROM_CALL DB ? ; flag for rom function
|
||
ROM_IP DW ?
|
||
ROM_CS DW ?
|
||
ENDIF
|
||
|
||
DESTVARS LABEL BYTE
|
||
DESTISDIR DB ?
|
||
DESTSIZ DB ?
|
||
DESTTAIL DW ?
|
||
DESTINFO DB ?
|
||
DESTBUF DB DIRSTRLEN + 20 DUP (?)
|
||
|
||
DESTHAND DW ?
|
||
DESTISDEV DB ?
|
||
FIRSTDEST DB ?
|
||
MELCOPY DB ?
|
||
MELSTART DW ?
|
||
|
||
SRCVARS LABEL BYTE
|
||
SRCISDIR DB ?
|
||
SRCSIZ DB ?
|
||
SRCTAIL DW ?
|
||
SRCINFO DB ?
|
||
SRCBUF DB DIRSTRLEN + 20 DUP (?)
|
||
|
||
SRCHAND DW ?
|
||
SRCISDEV DB ?
|
||
|
||
SCANBUF DB DIRSTRLEN + 20 DUP (?)
|
||
|
||
SRCPT DW ?
|
||
INEXACT DB ?
|
||
APPEND DB ?
|
||
NOWRITE DB ?
|
||
BINARY DB ?
|
||
WRITTEN DB ?
|
||
TERMREAD DB ?
|
||
ASCII DB ?
|
||
PLUS DB ?
|
||
CPDATE DW ?
|
||
CPTIME DW ?
|
||
BATHAND DW ? ; Batch handle
|
||
STARTEL DW ?
|
||
ELCNT DB ?
|
||
ELPOS DB ?
|
||
SKPDEL DB ?
|
||
SOURCE DB 11 DUP(?)
|
||
|
||
IF KANJI
|
||
KPARSE DB ?
|
||
ENDIF
|
||
|
||
INTERNATVARS internat_block <>
|
||
DB (internat_block_max - ($ - INTERNATVARS)) DUP (?)
|
||
|
||
|
||
DB 80H DUP(0) ; Init to 0 to make sure the linker is not fooled
|
||
STACK LABEL WORD
|
||
|
||
TRANSPACEEND LABEL BYTE
|
||
|
||
TRANSPACE ENDS
|
||
END
|
||
|