<> <> <> <> <> <> <<>> DIRECTORY Basics USING [LongNumber], BasicTime USING [GMT], GVBasics USING [Password], IO USING [STREAM], Rope USING [ROPE]; STPServerPrivate: CEDAR DEFINITIONS ~ BEGIN GMT: TYPE ~ BasicTime.GMT; LongNumber: TYPE ~ Basics.LongNumber; LORA: TYPE = LIST OF REF ANY; ROPE: TYPE ~ Rope.ROPE; LOR: TYPE ~ LIST OF ROPE; STREAM: TYPE ~ IO.STREAM; UserNameAndPassword: TYPE ~ RECORD [ userName: ROPE, userPassword: GVBasics.Password ]; FileName: TYPE ~ RECORD [local, remote: ROPE]; nilFileName: FileName ~ [NIL, NIL]; NameMapping: TYPE ~ RECORD [local, remote: ROPE]; NameMapList: TYPE ~ LIST OF NameMapping; NameMapDirection: TYPE ~ {localToRemote, remoteToLocal}; BothFromOne: PROC [oneName: ROPE, direction: NameMapDirection] RETURNS [both: FileName]; StartSingle: PROC; StopSingle: PROC; CurrentVersion: PROC [name: ROPE] RETURNS [version: INT _ 0]; END.