177 lines
8.7 KiB
NASM
177 lines
8.7 KiB
NASM
; Kernel OLD routines, NOPs, but exist in KERNEL.DEF, so I can't kill them
|
|
|
|
|
|
.xlist
|
|
include kernel.inc
|
|
include tdb.inc
|
|
;include eems.inc
|
|
include newexe.inc
|
|
.list
|
|
|
|
if 0
|
|
sBegin CODE
|
|
assumes cs,CODE
|
|
assumes ds,NOTHING
|
|
assumes es,NOTHING
|
|
|
|
;-----------------------------------------------------------------------;
|
|
; EMSCopy ;
|
|
; ;
|
|
; This routine is the continuation of ems_glock. It is intended ;
|
|
; to be called from the clipboard (in C) or from ems_glock ;
|
|
; ;
|
|
; Arguments: ;
|
|
; SourcePID = The EMS PID of the source banks. ;
|
|
; RegSet = EMS register set of source object ;
|
|
; handle = handle to global object ;
|
|
; segaddr = address of object ;
|
|
; EmsSavAddr = address of ems save area (TDB_EEMSSave) ;
|
|
; ;
|
|
; Returns: ;
|
|
; ;
|
|
; Error Returns: ;
|
|
; ;
|
|
; Registers Preserved: ;
|
|
; ;
|
|
; Registers Destroyed: ;
|
|
; ;
|
|
; Calls: ;
|
|
; ;
|
|
; History: ;
|
|
; ;
|
|
; Mon July 20, 1987 15:10:23 -by- Rick N. Zucker [rickz] ;
|
|
; Wrote it. ;
|
|
;-----------------------------------------------------------------------;
|
|
|
|
assumes ds, nothing
|
|
assumes es, nothing
|
|
|
|
cProc EMSCopy,<PUBLIC,FAR>,<di,si>
|
|
parmW SourcePID
|
|
parmW RegSet
|
|
parmW handle
|
|
parmD segaddr
|
|
parmD EmsSavAddr
|
|
cBegin
|
|
|
|
cEnd
|
|
|
|
sEnd CODE
|
|
endif
|
|
|
|
sBegin CODE
|
|
assumes cs,CODE
|
|
|
|
;-----------------------------------------------------------------------;
|
|
; LimitEmsPages ;
|
|
; ;
|
|
; Limits the total number of EMS pages a task may have. ;
|
|
; ;
|
|
; Arguments: ;
|
|
; Maximum amount of memory in Kbytes that this task wants. ;
|
|
; ;
|
|
; Returns: ;
|
|
; ;
|
|
; Error Returns: ;
|
|
; ;
|
|
; Registers Preserved: ;
|
|
; ;
|
|
; Registers Destroyed: ;
|
|
; ;
|
|
; Calls: ;
|
|
; ;
|
|
; History: ;
|
|
; ;
|
|
; Fri Jun 26, 1987 01:53:15a -by- David N. Weise [davidw] ;
|
|
; Wrote it. ;
|
|
;-----------------------------------------------------------------------;
|
|
|
|
cProc LimitEmsPages,<PUBLIC,FAR>
|
|
; parmD amount
|
|
cBegin nogen
|
|
xor ax,ax
|
|
|
|
cwd
|
|
ret 4
|
|
cEnd nogen
|
|
|
|
|
|
;-----------------------------------------------------------------------;
|
|
; KbdReset ;
|
|
; ;
|
|
; Keyboard driver calls here when Ctl+Alt+Del is happening. ;
|
|
; ;
|
|
; Arguments: ;
|
|
; ;
|
|
; Returns: ;
|
|
; ;
|
|
; Error Returns: ;
|
|
; ;
|
|
; Registers Preserved: ;
|
|
; ;
|
|
; Registers Destroyed: ;
|
|
; ;
|
|
; Calls: ;
|
|
; ;
|
|
; History: ;
|
|
; ;
|
|
;-----------------------------------------------------------------------;
|
|
|
|
cProc KbdRst,<PUBLIC,FAR>
|
|
cBegin nogen
|
|
|
|
ret
|
|
cEnd nogen
|
|
|
|
|
|
;-----------------------------------------------------------------------;
|
|
; GetCurPID ;
|
|
; A utility routine for EMS functions needed from user routines ;
|
|
; ;
|
|
; function = ;
|
|
; 0 - return the current PID in ax ;
|
|
; 1 - copy the TDB_EEMSSave area into a new block and return ;
|
|
; the new block's handle in ax ;
|
|
; 2 - do not free the banks of the current app ;
|
|
; 3 - free the given PID's banks ;
|
|
; 4 - do an HFree on the given handle ;
|
|
; 5 - get expanded memory sizes ;
|
|
; 6 - ;
|
|
; 7 - do an EMS_save ;
|
|
; 8 - do an EMS_restore ;
|
|
; ;
|
|
; ;
|
|
; Arguments: ;
|
|
; None ;
|
|
; ;
|
|
; Returns: ;
|
|
; see above ;
|
|
; ;
|
|
; Error Returns: ;
|
|
; ;
|
|
; Registers Preserved: ;
|
|
; ;
|
|
; Registers Destroyed: ;
|
|
; ax,bx,cx,di,si,ds,es ;
|
|
; ;
|
|
; Calls: ;
|
|
; ;
|
|
; History: ;
|
|
; ;
|
|
; Fri Jul 17, 1987 11:02:23a -by- Rick N. Zucker [rickz] ;
|
|
; Wrote it. ;
|
|
;-----------------------------------------------------------------------;
|
|
|
|
cProc GetCurPID,<PUBLIC,FAR>,<di,si>
|
|
parmW function
|
|
parmW gcpArg
|
|
cBegin
|
|
xor ax,ax
|
|
xor dx,dx
|
|
|
|
cEnd
|
|
|
|
sEnd CODE
|
|
|
|
end
|