MS-DOS/v2.0/source/TSPC.ASM

164 lines
4.4 KiB
NASM
Raw Normal View History

1983-08-13 01:53:34 +01:00
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