XNSFilingFileMgr.mesa
Copyright Ó 1990 by Xerox Corporation. All rights reserved.
Bill Jackson (bj), May 28, 1990 9:11 pm PDT
DIRECTORY
BasicTime USING [GMT],
FilingP10V5 USING [Handle],
PFSNames USING [PATH],
XNSFilingOps USING [ServerData];
XNSFilingFileMgr: CEDAR DEFINITIONS ~ {
OPEN XNSFilingOps;
File Operations
OpenFile: TYPE ~ REF OpenFileObject;
OpenFileObject: TYPE ~ RECORD [
fileH: FilingP10V5.Handle,
ref: BasicTime.GMT
];
OpenFileOp: PROC [mnt: ServerData, fullFName: PFSNames.PATH]
RETURNS [xnsFile: OpenFile ← NIL];
CloseFileOp: PROC [mnt: ServerData, xnsFile: OpenFile];
ReadFileOp: PROC [mnt: ServerData, xnsFile: OpenFile, filePosition, nBytes: CARD, to: LONG POINTER] RETURNS [bytesRead: INT ← 0];
WriteFileOp: PROC [mnt: ServerData, xnsFile: OpenFile, filePosition, nBytes: CARD, from: LONG POINTER] RETURNS [bytesWritten: INT ← 0];
}.