home *** CD-ROM | disk | FTP | other *** search
- {#Z+}
- (*(10U&l12D(s4099T&k2S*)
- {***************************************************************************}
- {** Program : NWCONN **}
- {***************************************************************************}
- {** Version : 1.4 ** Started : 11/11/91 ** Ended : / / **}
- {***************************************************************************}
- {******************************** Description ******************************}
- {***************************************************************************}
- {** OOP library for Netware API **}
- {** **}
- {** This unit forms the second level object : CONNECT **}
- {** This object is a descandent of : NETWARE **}
- {** **}
- {** **}
- {** **}
- {** **}
- {***************************************************************************}
- {******************************** Information ******************************}
- {***************************************************************************}
- {** Provides Netware Connection Services **}
- {** **}
- {** **}
- {** **}
- {** This code is (c) 1991 - 1994 Antonio Covelli. ALL RIGHTS RESERVED. **}
- {** Portions (c) Novell Inc, **}
- {** **}
- {** **}
- {***************************************************************************}
-
- {$I NETWARE.INC}
- {#Z-}
-
- UNIT NWCONN;
-
- INTERFACE
-
- USES
-
- nwvar,
- netware;
-
- TYPE
-
- pConnectionOBJ = ^ConnectionOBJ;
- ConnectionOBJ = OBJECT (NetwareOBJ)
-
- FUNCTION AttachToFileServer (ServerName : TObjectName; VAR ConnectionID : WORD) : WORD;
-
- FUNCTION AttachToFileServerWithAddress (ServerName : TObjectName; VAR ConnectionID : WORD;
- NetAddress : TServerAddress) : WORD;
-
- PROCEDURE DetachFromFileServer (ConnectionID : WORD);
-
- FUNCTION EnterLoginArea (LoginSubdirectoryName : TPathName; NumberOfLocalDrives : WORD) : WORD;
-
- FUNCTION GetConnectionInformation (ConnectionNumber : longint; VAR ObjectName : TObjectName;
- VAR ObjectType : OT_BinderyType; VAR ObjectID : OT_BinderyID;
- VAR LoginTime : TByte7Array) : WORD;
-
- FUNCTION GetConnectionNumber : longint;
- {The above function is in NETWARE.PAS}
-
- FUNCTION GetInternetAddress (ConnectionNumber : longint; VAR NetworkNumber : TByte4Array;
- VAR PhysicalNodeAddress : TByte6Array; VAR SocketNumber : WORD;
- var ConnectionType : byte) : WORD;
-
- FUNCTION GetObjectConnectionList (ObjectName : TObjectName; ObjectType : OT_BinderyType;
- VAR NumberOfConnections : byte;
- VAR ConnectionList : TConnectionList) : WORD;
-
- PROCEDURE GetStationAddress (VAR PhysicalNodeAddress : TByte6Array);
-
- function GetUserConnectionList (ObjectName : TObjectName; var NumberOfConnections : byte;
- var ConnectionList : TConnectionList) : word;
-
- FUNCTION LoginObject (ObjectName : TObjectName; ObjectType : OT_BinderyType;
- ObjectPassword : TPassword) : WORD;
-
- function KeyedLogin (ObjectName : TObjectName; ObjectType : OT_BinderyType;
- LoginKey : TEncryptKey) : WORD;
-
- PROCEDURE Logout;
-
- PROCEDURE LogoutFromFileServer (ConnectionID : WORD);
-
- function NegotiateBufferSize (ProposedBufferSize : word;
- var AcceptedBufferSize : word) : word;
-
- DESTRUCTOR Done; VIRTUAL;
-
- END;
-
-