|
|
| Line 560: |
Line 560: |
| | |- | | |- |
| | |colspan="2"| | | |colspan="2"| |
| | + | |- |
| | + | | <code>function GetTransportByName(const AName:String; ALock:Boolean; AState:LongWord):TNetworkTransport;</code> |
| | + | | |
| | |- | | |- |
| | | <code>function GetTransportByType(AFamily,APacketType:Word; ALock:Boolean; AState:LongWord):TNetworkTransport;</code> | | | <code>function GetTransportByType(AFamily,APacketType:Word; ALock:Boolean; AState:LongWord):TNetworkTransport;</code> |
| Line 1,073: |
Line 1,076: |
| | |- | | |- |
| | | <code>FLock:TSynchronizerHandle;</code> | | | <code>FLock:TSynchronizerHandle;</code> |
| | + | | |
| | + | |- |
| | + | | <code>FLocalLock:TMutexHandle;</code> |
| | | | | | |
| | |- | | |- |
| Line 1,113: |
Line 1,119: |
| | |colspan="2"| | | |colspan="2"| |
| | |- | | |- |
| − | | <code>function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportAdapter;</code> | + | | <code>function GetName:String;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TTransportAdapter;</code> | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function AcquireLock:Boolean;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetAdapterByNext(APrevious:TTransportAdapter; ALock,AUnlock:Boolean; AState:LongWord):TTransportAdapter;</code> | + | | <code>function ReleaseLock:Boolean;</code> |
| | | | | | |
| | |- | | |- |
| | |colspan="2"| | | |colspan="2"| |
| | |- | | |- |
| − | | <code>function GetProtocolByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportProtocol;</code> | + | | <code>function SendPacket(ASocket:TTransportSocket; ASource,ADest:Pointer; APacket:PPacketFragment; ASize,AFlags:Integer):Integer; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetProtocolByType(AProtocol:Word; ALock:Boolean; AState:LongWord):TTransportProtocol;</code> | + | | <code>function SendControl(ASource,ADest:Pointer; AProtocol,ACommand,ACode:Word; AAddress,AData:Pointer; ASize:Integer):Boolean; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetProtocolByProtocol(AProtocol:TTransportProtocol; ALock:Boolean; AState:LongWord):TTransportProtocol;</code> | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function FilterPacket(ASource,ADest,APacket:Pointer;ASize:Integer;ABroadcast:Boolean):Boolean; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetProtocolByNext(APrevious:TTransportProtocol; ALock,AUnlock:Boolean; AState:LongWord):TTransportProtocol;</code> | + | | <code>function ForwardPacket(AAdapter:TTransportAdapter; ASource,ADest,APacket:Pointer; ASize:Integer; ABroadcast:Boolean):Boolean; virtual;</code> |
| | + | | |
| | + | |- |
| | + | |colspan="2"|<div style="font-family: monospace,courier;">'''public'''</div> |
| | + | |- |
| | + | | <code>property Manager:TTransportManager read FManager;</code> |
| | + | | |
| | + | |- |
| | + | | <code>property Name:String read GetName;</code> |
| | | | | | |
| | |- | | |- |
| | |colspan="2"| | | |colspan="2"| |
| | |- | | |- |
| − | | <code>function GetFilterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportFilter;</code> | + | | <code>property Family:Word read FFamily;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetFilterByProtocol(AProtocol:Word; ALock:Boolean; AState:LongWord):TTransportFilter;</code> | + | | <code>property PacketType:Word read FPacketType;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetFilterByFilter(AFilter:TTransportFilter; ALock:Boolean; AState:LongWord):TTransportFilter;</code> | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function GetSockOpt(ASocket:TTransportSocket; ALevel,AOptName:Integer; AOptValue:PChar; var AOptLength:Integer):Integer; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetFilterByNext(APrevious:TTransportFilter; ALock,AUnlock:Boolean; AState:LongWord):TTransportFilter;</code> | + | | <code>function SetSockOpt(ASocket:TTransportSocket; ALevel,AOptName:Integer; AOptValue:PChar; AOptLength:Integer):Integer; virtual;</code> |
| | | | | | |
| | |- | | |- |
| | |colspan="2"| | | |colspan="2"| |
| | |- | | |- |
| − | | <code>function GetConfigByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportConfig;</code> | + | | <code>function ReaderLock:Boolean;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetConfigByType(AConfigType:Word; ALock:Boolean; AState:LongWord):TTransportConfig;</code> | + | | <code>function ReaderUnlock:Boolean;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetConfigByConfig(AConfig:TTransportConfig; ALock:Boolean; AState:LongWord):TTransportConfig;</code> | + | | <code>function WriterLock:Boolean;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetConfigByNext(APrevious:TTransportConfig; ALock,AUnlock:Boolean; AState:LongWord):TTransportConfig;</code> | + | | <code>function WriterUnlock:Boolean;</code> |
| | | | | | |
| | |- | | |- |
| | |colspan="2"| | | |colspan="2"| |
| | |- | | |- |
| − | | <code>function AddAdapter(AAdapter:TNetworkAdapter; AConfigType:Word; AAddress,ANetmask,AGateway,AServer:Pointer):Boolean; virtual;</code> | + | | <code>function GetStatistics:TTransportStatistics; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;</code> | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportAdapter;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"|
| + | | <code>function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TTransportAdapter;</code> |
| − | |-
| + | |
| − | | <code>function AddProtocol(AProtocol:Word; APacketHandler:TTransportPacketHandler; AControlHandler:TTransportControlHandler):THandle; virtual;</code> | + | |
| | | | | | |
| | |- | | |- |
| − | | <code>function RemoveProtocol(AHandle:THandle; AProtocol:Word):Boolean; virtual;</code> | + | | <code>function GetAdapterByNext(APrevious:TTransportAdapter; ALock,AUnlock:Boolean; AState:LongWord):TTransportAdapter;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"| | + | |colspan="2"| |
| | |- | | |- |
| − | | <code>function AddFilter(AProtocol:Word; AFilterHandler:TTransportFilterHandler):THandle; virtual;</code> | + | | <code>function GetProtocolByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportProtocol;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function RemoveFilter(AHandle:THandle; AProtocol:Word):Boolean; virtual;</code> | + | | <code>function GetProtocolByType(AProtocol:Word; ALock:Boolean; AState:LongWord):TTransportProtocol;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"|
| + | | <code>function GetProtocolByProtocol(AProtocol:TTransportProtocol; ALock:Boolean; AState:LongWord):TTransportProtocol;</code> |
| − | |-
| + | |
| − | | <code>function AddConfig(AConfigType:Word; AConfigAuto:Boolean; AConfigHandler:TTransportConfigHandler):THandle; virtual;</code> | + | |
| | | | | | |
| | |- | | |- |
| − | | <code>function RemoveConfig(AHandle:THandle; AConfigType:Word):Boolean; virtual;</code> | + | | <code>function GetProtocolByNext(APrevious:TTransportProtocol; ALock,AUnlock:Boolean; AState:LongWord):TTransportProtocol;</code> |
| | | | | | |
| | |- | | |- |
| | |colspan="2"| | | |colspan="2"| |
| | |- | | |- |
| − | | <code>function SendPacket(ASocket:TTransportSocket; ASource,ADest:Pointer; APacket:PPacketFragment; ASize,AFlags:Integer):Integer; virtual;</code> | + | | <code>function GetFilterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportFilter;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function SendControl(ASource,ADest:Pointer; AProtocol,ACommand,ACode:Word; AAddress,AData:Pointer; ASize:Integer):Boolean; virtual;</code> | + | | <code>function GetFilterByProtocol(AProtocol:Word; ALock:Boolean; AState:LongWord):TTransportFilter;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"|
| + | | <code>function GetFilterByFilter(AFilter:TTransportFilter; ALock:Boolean; AState:LongWord):TTransportFilter;</code> |
| − | |-
| + | |
| − | | <code>function FilterPacket(ASource,ADest,APacket:Pointer; ASize:Integer; ABroadcast:Boolean):Boolean; virtual;</code> | + | |
| | | | | | |
| | |- | | |- |
| − | | <code>function ForwardPacket(AAdapter:TTransportAdapter; ASource,ADest,APacket:Pointer; ASize:Integer; ABroadcast:Boolean):Boolean; virtual;</code> | + | | <code>function GetFilterByNext(APrevious:TTransportFilter; ALock,AUnlock:Boolean; AState:LongWord):TTransportFilter;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"|<div style="font-family: monospace,courier;">'''public'''</div> | + | |colspan="2"| |
| | |- | | |- |
| − | | <code>property Manager:TTransportManager read FManager;</code> | + | | <code>function GetConfigByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportConfig;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>property Name:String read FName;</code> | + | | <code>function GetConfigByType(AConfigType:Word; ALock:Boolean; AState:LongWord):TTransportConfig;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"|
| + | | <code>function GetConfigByConfig(AConfig:TTransportConfig; ALock:Boolean; AState:LongWord):TTransportConfig;</code> |
| − | |-
| + | |
| − | | <code>property Family:Word read FFamily;</code> | + | |
| | | | | | |
| | |- | | |- |
| − | | <code>property PacketType:Word read FPacketType;</code> | + | | <code>function GetConfigByNext(APrevious:TTransportConfig; ALock,AUnlock:Boolean; AState:LongWord):TTransportConfig;</code> |
| | | | | | |
| | |- | | |- |
| | |colspan="2"| | | |colspan="2"| |
| | |- | | |- |
| − | | <code>function GetSockOpt(ASocket:TTransportSocket; ALevel,AOptName:Integer; AOptValue:PChar; var AOptLength:Integer):Integer; virtual;</code> | + | | <code>function AddAdapter(AAdapter:TNetworkAdapter; AConfigType:Word; AAddress,ANetmask,AGateway,AServer:Pointer):Boolean; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function SetSockOpt(ASocket:TTransportSocket; ALevel,AOptName:Integer; AOptValue:PChar; AOptLength:Integer):Integer; virtual;</code> | + | | <code>function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"| | + | |colspan="2"| |
| | |- | | |- |
| − | | <code>function GetStatistics:TTransportStatistics; virtual;</code> | + | | <code>function AddProtocol(AProtocol:Word; APacketHandler:TTransportPacketHandler; AControlHandler:TTransportControlHandler):THandle; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"| | + | | <code>function RemoveProtocol(AHandle:THandle; AProtocol:Word):Boolean; virtual;</code> |
| | + | | |
| | |- | | |- |
| − | | <code>function ReaderLock:Boolean;</code> | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function AddFilter(AProtocol:Word; AFilterHandler:TTransportFilterHandler):THandle; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function ReaderUnlock:Boolean;</code> | + | | <code>function RemoveFilter(AHandle:THandle; AProtocol:Word):Boolean; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function WriterLock:Boolean;</code> | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function AddConfig(AConfigType:Word; AConfigAuto:Boolean; AConfigHandler:TTransportConfigHandler):THandle; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function WriterUnlock:Boolean;</code> | + | | <code>function RemoveConfig(AHandle:THandle; AConfigType:Word):Boolean; virtual;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"| | + | |colspan="2"| |
| | |- | | |- |
| | | <code>function StartTransport:Boolean; virtual;</code> | | | <code>function StartTransport:Boolean; virtual;</code> |
| Line 1,263: |
Line 1,282: |
| | | | | | |
| | |- | | |- |
| − | | <code>function ProcessTransport:Boolean; virtual;</code> | + | | <code>function ProcessTransport:Boolean; virtual; </code> |
| | | | | | |
| | |- | | |- |
| Line 1,358: |
Line 1,377: |
| | | List of TMonitorAdapter objects | | | List of TMonitorAdapter objects |
| | |- | | |- |
| − | |colspan="2"| | + | |colspan="2"|<div style="font-family: monospace,courier;">'''public'''</div> |
| | |- | | |- |
| − | | <code>function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TMonitorAdapter;</code> | + | | <code>property Manager:TTransportManager read FManager;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TMonitorAdapter;</code> | + | |colspan="2"| |
| − | | | + | |
| | |- | | |- |
| − | | <code>function GetAdapterByNext(APrevious:TMonitorAdapter; ALock,AUnlock:Boolean; AState:LongWord):TMonitorAdapter;</code> | + | | <code>function ReaderLock:Boolean;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"|
| + | | <code>function ReaderUnlock:Boolean;</code> |
| − | |-
| + | |
| − | | <code>function AddAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;</code> | + | |
| | | | | | |
| | |- | | |- |
| − | | <code>function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;</code> | + | | <code>function WriterLock:Boolean;</code> |
| | | | | | |
| | |- | | |- |
| − | |colspan="2"|<div style="font-family: monospace,courier;">'''public'''</div>
| + | | <code>function WriterUnlock:Boolean;</code> |
| − | |-
| + | |
| − | | <code>property Manager:TTransportManager read FManager;</code> | + | |
| | | | | | |
| | |- | | |- |
| | |colspan="2"| | | |colspan="2"| |
| | |- | | |- |
| − | | <code>function ReaderLock:Boolean;</code> | + | | <code>function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TMonitorAdapter;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function ReaderUnlock:Boolean;</code> | + | | <code>function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TMonitorAdapter;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function WriterLock:Boolean;</code> | + | | <code>function GetAdapterByNext(APrevious:TMonitorAdapter; ALock,AUnlock:Boolean; AState:LongWord):TMonitorAdapter;</code> |
| | | | | | |
| | |- | | |- |
| − | | <code>function WriterUnlock:Boolean;</code> | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function AddAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;</code> |
| | + | | |
| | + | |- |
| | + | | <code>function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;</code> |
| | | | | | |
| | |- | | |- |
| Line 1,510: |
Line 1,529: |
| | | <code>FAdapters:TNetworkList;</code> | | | <code>FAdapters:TNetworkList;</code> |
| | | List of TAuthenticatorAdapter objects | | | List of TAuthenticatorAdapter objects |
| − | |-
| |
| − | |colspan="2"|
| |
| − | |-
| |
| − | | <code>function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TAuthenticatorAdapter;</code>
| |
| − | |
| |
| − | |-
| |
| − | | <code>function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TAuthenticatorAdapter;</code>
| |
| − | |
| |
| − | |-
| |
| − | | <code>function GetAdapterByNext(APrevious:TAuthenticatorAdapter; ALock,AUnlock:Boolean; AState:LongWord):TAuthenticatorAdapter;</code>
| |
| − | |
| |
| − | |-
| |
| − | |colspan="2"|
| |
| − | |-
| |
| − | | <code>function AddAdapter(AAdapter:TNetworkAdapter; AAuthType:Word; ACipher,AKey,AEntity,AToken:Pointer):Boolean; virtual;</code>
| |
| − | |
| |
| − | |-
| |
| − | | <code>function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;</code>
| |
| − | |
| |
| | |- | | |- |
| | |colspan="2"|<div style="font-family: monospace,courier;">'''public'''</div> | | |colspan="2"|<div style="font-family: monospace,courier;">'''public'''</div> |
| Line 1,559: |
Line 1,559: |
| | |- | | |- |
| | | <code>function WriterUnlock:Boolean;</code> | | | <code>function WriterUnlock:Boolean;</code> |
| | + | | |
| | + | |- |
| | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TAuthenticatorAdapter;</code> |
| | + | | |
| | + | |- |
| | + | | <code>function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TAuthenticatorAdapter;</code> |
| | + | | |
| | + | |- |
| | + | | <code>function GetAdapterByNext(APrevious:TAuthenticatorAdapter; ALock,AUnlock:Boolean; AState:LongWord):TAuthenticatorAdapter;</code> |
| | + | | |
| | + | |- |
| | + | |colspan="2"| |
| | + | |- |
| | + | | <code>function AddAdapter(AAdapter:TNetworkAdapter; AAuthType:Word; ACipher,AKey,AEntity,AToken:Pointer):Boolean; virtual;</code> |
| | + | | |
| | + | |- |
| | + | | <code>function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;</code> |
| | | | | | |
| | |- | | |- |
Revision as of 05:14, 6 August 2017
Return to Unit Reference
Description
Ultibo Network Transport interface unit
Notes:
Includes all global transport definitions plus base class for Network transports.
Currently supported transports are IP, ARP, RARP, IPX and IP6.
All HostToNetwork swaps occur at the level where they are appropriate (ie the level of their header).
Bindings is provided to support Transports (such as IP) which can provide multiple addresses on a single adapter. It is not used by the Protocol or Winsock layer and is only used by the transport where appropriate. In such cases the ConfigType in the Adapter object is not used and the Binding is used instead.
Constants
[Expand]
Transport specific constants *_TYPE_*
HOST_TYPE_DYNAMIC = 0;
|
|
HOST_TYPE_STATIC = 1;
|
|
HOST_TYPE_LOOPBACK = 2;
|
|
|
|
ROUTE_TYPE_DYNAMIC = 0;
|
|
ROUTE_TYPE_STATIC = 1;
|
|
ROUTE_TYPE_LOOPBACK = 2;
|
Loopback Route
|
ROUTE_TYPE_GATEWAY = 3;
|
Default Route
|
ROUTE_TYPE_MULTICAST = 4;
|
Multicast Route
|
ROUTE_TYPE_BROADCAST = 5;
|
Broadcast Route
|
|
|
ADDRESS_TYPE_DYNAMIC = 0;
|
Remote Dynamic Address
|
ADDRESS_TYPE_STATIC = 1;
|
Remote Static Address
|
ADDRESS_TYPE_LOCAL = 2;
|
Local Address (ARP/RARP Only)
|
ADDRESS_TYPE_LOOPBACK = 3;
|
Local Loopback
|
ADDRESS_TYPE_MULTICAST = 4;
|
Local Multicast
|
ADDRESS_TYPE_BROADCAST = 5;
|
Local Broadcast
|
|
|
ADDRESS_TYPE_PRIMARY = 6;
|
Same as Local but used by IP/IP6
|
ADDRESS_TYPE_SECONDARY = 7;
|
Same as Local but used by IP/IP6
|
[Expand]
Host constants *_HOST_*
MAX_HOST_LIFE = 600000;
|
10 Minute Host lifespan
|
[Expand]
Route constants *_ROUTE_*
MAX_ROUTE_LIFE = 600000;
|
10 min Route lifespan
|
[Expand]
Address constants *_ADDRESS_*
MAX_ADDRESS_LIFE = 300000;
|
5 min Address (ARP) lifespan
|
IP_ADDRESS_SIZE = 4;
|
SizeOf(TInAddr)
|
IP6_ADDRESS_SIZE = 16;
|
SizeOf(TIn6Addr)
|
IPX_ADDRESS_SIZE = 12;
|
SizeOf(TIpxAddr)
|
[Expand]
Transport socket TTL_*
TTL_DEFAULT = 128;
|
Default to 128 Seconds/Hops (Defined as 64)
|
TOS_DEFAULT = 0;
|
|
HOPLIMIT_DEFAULT = 255;
|
Default to 255 Hops (Defined as 64)
|
ID_INCREMENT = 1;
|
Default Increment for ID Numbers
|
TTL_DECREMENT = 1;
|
Default Decrement for TTL when Forwarding
|
SEND_TIMEOUT = 0;
|
Default to wait forever on Send
|
RECV_TIMEOUT = 0;
|
Default to wait forever on Recv
|
CLOSE_TIMEOUT = 3000;
|
Time that Socket is kept before destruction
|
LINGER_TIMEOUT = 60000;
|
Time that Socket goes into Linger state for
|
CONNECT_TIMEOUT = 5000;
|
Time that Socket waits for connect completion
|
TIMEWAIT_TIMEOUT = 240000;
|
Time that Socket goes into TimeWait state for (2 x MSL)
|
[Expand]
Shutdown constants SHUTDOWN_*
SHUTDOWN_RECV = 0;
|
|
SHUTDOWN_SEND = 1;
|
|
SHUTDOWN_BOTH = 2;
|
|
[Expand]
Select constants SELECT_*
SELECT_READ = 0;
|
|
SELECT_WRITE = 1;
|
|
SELECT_ERROR = 2;
|
|
|
|
SELECT_UNKNOWN = -1;
|
|
[Expand]
Socket state SS_*
SS_NOFDREF = $0001;
|
no file table ref any more
|
SS_UNCONNECTED = SS_NOFDREF;
|
or just created socket
|
SS_ISCONNECTED = $0002;
|
socket connected to a peer
|
SS_ISCONNECTING = $0004;
|
in process of connecting
|
SS_ISDISCONNECTING = $0008;
|
in process of disconnecting
|
SS_CANTSENDMORE = $0010;
|
can't send more data
|
SS_CANTRCVMORE = $0020;
|
can't receive more data
|
SS_RCVATMARK = $0040;
|
at mark on input
|
|
|
SS_PRIV = $0080;
|
privileged for broadcast
|
SS_NBIO = $0100;
|
non-blocking ops
|
SS_ASYNC = $0200;
|
async i/o notify
|
SS_ISCONFIRMING = $0400;
|
accepting connection req
|
SS_ISLISTENING = SS_ISCONFIRMING;
|
non standard
|
|
|
SS_LOCAL_ADDR = $0800;
|
has local address/port (not used)
|
SS_REMOTE_ADDR = $1000;
|
has remote address/port (not used)
|
SS_CONN_REFUSED = $2000;
|
connection refused (ICMP_UNREACH)
|
SS_CLOSED = $4000;
|
socket has been closed
|
[Expand]
IPv4 transport IP_*
IP_LOOPBACK_ADDRESS:TInAddr = (S_addr: $7F000001);
|
127.0.0.1
|
IP_LOOPBACK_NETWORK:TInAddr = (S_addr: $7F000000);
|
127.0.0.0
|
IP_LOOPBACK_NETMASK:TInAddr = (S_addr: $FF000000);
|
255.0.0.0
|
IP_BROADCAST_ADDRESS:TInAddr = (S_addr: $FFFFFFFF);
|
255.255.255.255
|
IP_BROADCAST_NETWORK:TInAddr = (S_addr: $FFFFFFFF);
|
255.255.255.255
|
IP_BROADCAST_NETMASK:TInAddr = (S_addr: $FFFFFFFF);
|
255.255.255.255
|
IP_DEFAULT_ADDRESS:TInAddr = (S_addr: $00000000);
|
0.0.0.0
|
IP_DEFAULT_NETWORK:TInAddr = (S_addr: $00000000);
|
0.0.0.0
|
IP_DEFAULT_NETMASK:TInAddr = (S_addr: $00000000);
|
0.0.0.0
|
IP_MULTICAST_HOSTS:TInAddr = (S_addr: $E0000001);
|
224.0.0.1 (All Hosts)
|
IP_MULTICAST_ROUTERS:TInAddr = (S_addr: $E0000002);
|
224.0.0.2 (All Routers)
|
IP_MULTICAST_NETWORK:TInAddr = (S_addr: $E0000000);
|
224.0.0.0
|
IP_MULTICAST_NETMASK:TInAddr = (S_addr: $F0000000);
|
240.0.0.0
|
| Note: The recommended range for general use is 234.0.0.0 to 238.255.255.255
|
|
|
IP_CLASSA_NETMASK:TInAddr = (S_addr: $FF000000);
|
255.0.0.0
|
IP_CLASSB_NETMASK:TInAddr = (S_addr: $FFFF0000);
|
255.255.0.0
|
IP_CLASSC_NETMASK:TInAddr = (S_addr: $FFFFFF00);
|
255.255.255.0
|
IP_CLASSD_NETMASK:TInAddr = (S_addr: $F0000000);
|
240.0.0.0
|
IP_CLASSE_NETMASK:TInAddr = (S_addr: $F0000000);
|
240.0.0.0
|
[Expand]
IPv6 transport IP6_*
IP6_LOOPBACK_ADDRESS:TIn6Addr = (S6_addr: ($00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$01));
|
|
IP6_DEFAULT_ADDRESS:TIn6Addr = (S6_addr: ($00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00,$00));
|
|
Type definitions
Transport statistics
[Expand]
PTransportStatistics = ^TTransportStatistics;
TTransportStatistics = record
| Note: Generic Transport
|
PacketsIn:Int64;
|
|
PacketsOut:Int64;
|
|
BytesIn:Int64;
|
|
BytesOut:Int64;
|
|
ErrorsIn:Int64;
|
|
ErrorsOut:Int64;
|
|
PacketsLost:Int64;
|
|
IPv4 nameservers
[Expand]
PIPNameservers = ^TIPNameservers;
TIPNameservers = array[0..MAX_NAME_SERVERS - 1] of TInAddr;
IPv6 nameservers
[Expand]
PIP6Nameservers = ^TIP6Nameservers;
TIP6Nameservers = array[0..MAX_NAME_SERVERS - 1] of TIn6Addr;
Transport callback
TTransportCallback = function(ATransport:TNetworkTransport):Boolean of object;
|
|
Monitor callback
TMonitorCallback = function(AMonitor:TNetworkMonitor):Boolean of object;
|
|
Authenticator callback
TAuthenticatorCallback = function(AAuthenticator:TNetworkAuthenticator):Boolean of object;
|
|
Transport packet handler
TTransportPacketHandler = function(AHandle:THandle; ASource,ADest,APacket:Pointer; ASize:Integer; ABroadcast:Boolean):Boolean of object;
|
|
Transport control handler
TTransportControlHandler = function(AHandle:THandle; ASource,ADest:Pointer; AProtocol,ACommand,ACode:Word; AAddress,AData:Pointer; ASize:Integer):Boolean of object;
|
|
Transport filter handler
TTransportFilterHandler = function(AHandle:THandle; ASource,ADest,APacket:Pointer; ASize:Integer; ABroadcast:Boolean):Boolean of object;
|
|
Transport configuration handler
TTransportConfigHandler = function(AHandle:THandle; AAdapter:TTransportAdapter; ACommand:Word):Boolean of object;
|
|
Class definitions
Transport manager
[Expand]
TTransportManager = class(TObject)
constructor Create(ASettings:TNetworkSettings; AAdapters:TAdapterManager);
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
FSettings:TNetworkSettings;
|
|
FAdapters:TAdapterManager;
|
|
|
|
FTransports:TNetworkList;
|
List of TNetworkTransport objects
|
FMonitors:TNetworkList;
|
List of TNetworkMonitor objects
|
FAuthenticators:TNetworkList;
|
List of TNetworkAuthenticator objects
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
public
|
property Settings:TNetworkSettings read FSettings;
|
|
property Adapters:TAdapterManager read FAdapters;
|
|
|
|
function AddTransport(ATransport:TNetworkTransport):Boolean;
|
|
function RemoveTransport(ATransport:TNetworkTransport):Boolean;
|
|
|
|
function GetTransportByName(const AName:String; ALock:Boolean; AState:LongWord):TNetworkTransport;
|
|
function GetTransportByType(AFamily,APacketType:Word; ALock:Boolean; AState:LongWord):TNetworkTransport;
|
|
function GetTransportByTransport(ATransport:TNetworkTransport; ALock:Boolean; AState:LongWord):TNetworkTransport;
|
|
function GetTransportByNext(APrevious:TNetworkTransport; ALock,AUnlock:Boolean; AState:LongWord):TNetworkTransport;
|
|
|
|
function AddMonitor(AMonitor:TNetworkMonitor):Boolean;
|
|
function RemoveMonitor(AMonitor:TNetworkMonitor):Boolean;
|
|
|
|
function GetMonitorByMonitor(AMonitor:TNetworkMonitor; ALock:Boolean; AState:LongWord):TNetworkMonitor;
|
|
function GetMonitorByNext(APrevious:TNetworkMonitor; ALock,AUnlock: Boolean; AState:LongWord):TNetworkMonitor;
|
|
|
|
function AddAuthenticator(AAuthenticator:TNetworkAuthenticator):Boolean;
|
|
function RemoveAuthenticator(AAuthenticator:TNetworkAuthenticator):Boolean;
|
|
|
|
function GetAuthenticatorByType(AAuthType:Word; ALock:Boolean; AState:LongWord):TNetworkAuthenticator;
|
|
function GetAuthenticatorByAuthenticator(AAuthenticator:TNetworkAuthenticator; ALock:Boolean; AState:LongWord):TNetworkAuthenticator;
|
|
function GetAuthenticatorByNext(APrevious:TNetworkAuthenticator; ALock,AUnlock:Boolean; AState:LongWord):TNetworkAuthenticator;
|
|
|
|
function StartTransports:Boolean;
|
|
function StopTransports:Boolean;
|
|
function ProcessTransports:Boolean;
|
|
|
|
function EnumerateTransports(ACallback:TTransportCallback):Boolean;
|
|
|
|
function BindTransports(AAdapter:TNetworkAdapter):Boolean;
|
|
function UnbindTransports(AAdapter:TNetworkAdapter):Boolean;
|
|
|
|
function StartMonitors:Boolean;
|
|
function StopMonitors:Boolean;
|
|
function ProcessMonitors:Boolean;
|
|
|
|
function EnumerateMonitors(ACallback:TMonitorCallback):Boolean;
|
|
|
|
function BindMonitors(AAdapter:TNetworkAdapter):Boolean;
|
|
function UnbindMonitors(AAdapter:TNetworkAdapter):Boolean;
|
|
|
|
function StartAuthenticators:Boolean;
|
|
function StopAuthenticators:Boolean;
|
|
function ProcessAuthenticators:Boolean;
|
|
|
|
function EnumerateAuthenticators(ACallback:TAuthenticatorCallback):Boolean;
|
|
|
|
function BindAuthenticators(AAdapter:TNetworkAdapter):Boolean;
|
|
function UnbindAuthenticators(AAdapter:TNetworkAdapter):Boolean;
|
|
Transport buffer
[Expand]
TTransportBuffer = class(TObject)
constructor Create(ATransport:TNetworkTransport);
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
protected
|
FTransport:TNetworkTransport;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
Transport buffer extended
[Expand]
TTransportBufferEx = class(TObject)
constructor Create(ATransport:TNetworkTransport);
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
protected
|
FTransport:TNetworkTransport;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function ReaderConvert:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
function WriterConvert:Boolean;
|
|
function WriterOwner:Boolean;
|
|
Transport adapter
[Expand]
TTransportAdapter = class(TListObject)
| Note: Downstream
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
public
|
Name:String;
|
|
Index:LongWord;
|
|
Handle:THandle;
|
|
PacketType:Word;
|
|
Adapter:TNetworkAdapter;
|
|
Hardware:THardwareAddress;
|
|
Broadcast:THardwareAddress;
|
|
|
|
MTU:Word;
|
|
|
|
ConfigType:Word;
|
BOOTP/DHCP/RARP/STATIC/PSEUDO/LOOPBACK
|
Configured:Boolean;
|
Adapter has been configured
|
Configuring:Boolean;
|
Adapter is being configured
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
Transport binding
[Expand]
TTransportBinding = class(TListObject)
| Note: Midstream
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
public
|
Name:String;
|
|
Index:LongWord;
|
|
Adapter:TTransportAdapter;
|
|
|
|
ConfigType:Word;
|
BOOTP/DHCP/RARP/STATIC/PSEUDO/LOOPBACK
|
Configured:Boolean;
|
Adapter has been configured
|
Configuring:Boolean;
|
Adapter is being configured
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
Transport protocol
[Expand]
TTransportProtocol = class(TListObject)
| Note: Upstream
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
public
|
Protocol:Word;
|
|
PacketHandler:TTransportPacketHandler;
|
|
ControlHandler:TTransportControlHandler;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
Transport filter
[Expand]
TTransportFilter = class(TListObject)
| Note: Upstream
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
public
|
Protocol:Word;
|
|
FilterHandler:TTransportFilterHandler;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
Transport configuration
[Expand]
TTransportConfig = class(TListObject)
| Note: Upstream
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
public
|
ConfigType:Word;
|
BOOTP/DHCP/RARP/STATIC/PSEUDO/LOOPBACK
|
ConfigAuto:Boolean;
|
Supports Auto Configuration
|
ConfigHandler:TTransportConfigHandler;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
Network transport
[Expand]
TNetworkTransport = class(TListObject)
constructor Create(AManager:TTransportManager; const AName:String);
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
FLocalLock:TMutexHandle;
|
|
protected
|
FManager:TTransportManager;
|
|
FName:String;
|
|
|
|
FFamily:Word;
|
|
FPacketType:Word;
|
|
FAdapters:TNetworkList;
|
List of TTransportAdapter objects
|
FBindings:TNetworkList;
|
List of TTransportBinding objects
|
FProtocols:TNetworkList;
|
List of TTransportProtocol objects
|
FFilters:TNetworkList;
|
List of TTransportFilter objects
|
FConfigs:TNetworkList;
|
List of TTransportConfig objects
|
|
|
FStatistics:TTransportStatistics;
|
|
|
|
function GetName:String;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
function SendPacket(ASocket:TTransportSocket; ASource,ADest:Pointer; APacket:PPacketFragment; ASize,AFlags:Integer):Integer; virtual;
|
|
function SendControl(ASource,ADest:Pointer; AProtocol,ACommand,ACode:Word; AAddress,AData:Pointer; ASize:Integer):Boolean; virtual;
|
|
|
|
function FilterPacket(ASource,ADest,APacket:Pointer;ASize:Integer;ABroadcast:Boolean):Boolean; virtual;
|
|
function ForwardPacket(AAdapter:TTransportAdapter; ASource,ADest,APacket:Pointer; ASize:Integer; ABroadcast:Boolean):Boolean; virtual;
|
|
public
|
property Manager:TTransportManager read FManager;
|
|
property Name:String read GetName;
|
|
|
|
property Family:Word read FFamily;
|
|
property PacketType:Word read FPacketType;
|
|
|
|
function GetSockOpt(ASocket:TTransportSocket; ALevel,AOptName:Integer; AOptValue:PChar; var AOptLength:Integer):Integer; virtual;
|
|
function SetSockOpt(ASocket:TTransportSocket; ALevel,AOptName:Integer; AOptValue:PChar; AOptLength:Integer):Integer; virtual;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
|
|
function GetStatistics:TTransportStatistics; virtual;
|
|
|
|
function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportAdapter;
|
|
function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TTransportAdapter;
|
|
function GetAdapterByNext(APrevious:TTransportAdapter; ALock,AUnlock:Boolean; AState:LongWord):TTransportAdapter;
|
|
|
|
function GetProtocolByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportProtocol;
|
|
function GetProtocolByType(AProtocol:Word; ALock:Boolean; AState:LongWord):TTransportProtocol;
|
|
function GetProtocolByProtocol(AProtocol:TTransportProtocol; ALock:Boolean; AState:LongWord):TTransportProtocol;
|
|
function GetProtocolByNext(APrevious:TTransportProtocol; ALock,AUnlock:Boolean; AState:LongWord):TTransportProtocol;
|
|
|
|
function GetFilterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportFilter;
|
|
function GetFilterByProtocol(AProtocol:Word; ALock:Boolean; AState:LongWord):TTransportFilter;
|
|
function GetFilterByFilter(AFilter:TTransportFilter; ALock:Boolean; AState:LongWord):TTransportFilter;
|
|
function GetFilterByNext(APrevious:TTransportFilter; ALock,AUnlock:Boolean; AState:LongWord):TTransportFilter;
|
|
|
|
function GetConfigByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TTransportConfig;
|
|
function GetConfigByType(AConfigType:Word; ALock:Boolean; AState:LongWord):TTransportConfig;
|
|
function GetConfigByConfig(AConfig:TTransportConfig; ALock:Boolean; AState:LongWord):TTransportConfig;
|
|
function GetConfigByNext(APrevious:TTransportConfig; ALock,AUnlock:Boolean; AState:LongWord):TTransportConfig;
|
|
|
|
function AddAdapter(AAdapter:TNetworkAdapter; AConfigType:Word; AAddress,ANetmask,AGateway,AServer:Pointer):Boolean; virtual;
|
|
function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
|
|
function AddProtocol(AProtocol:Word; APacketHandler:TTransportPacketHandler; AControlHandler:TTransportControlHandler):THandle; virtual;
|
|
function RemoveProtocol(AHandle:THandle; AProtocol:Word):Boolean; virtual;
|
|
|
|
function AddFilter(AProtocol:Word; AFilterHandler:TTransportFilterHandler):THandle; virtual;
|
|
function RemoveFilter(AHandle:THandle; AProtocol:Word):Boolean; virtual;
|
|
|
|
function AddConfig(AConfigType:Word; AConfigAuto:Boolean; AConfigHandler:TTransportConfigHandler):THandle; virtual;
|
|
function RemoveConfig(AHandle:THandle; AConfigType:Word):Boolean; virtual;
|
|
|
|
function StartTransport:Boolean; virtual;
|
|
function StopTransport:Boolean; virtual;
|
|
function ProcessTransport:Boolean; virtual;
|
|
|
|
function BindTransport(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
function UnbindTransport(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
Monitor adapter
[Expand]
TMonitorAdapter = class(TListObject)
| Note: Downstream
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
public
|
Handle:THandle;
|
|
Adapter:TNetworkAdapter;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
Network monitor
[Expand]
TNetworkMonitor = class(TListObject)
| Note: eg Packet Capture
|
|
|
constructor Create(AManager:TTransportManager);
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
protected
|
FManager:TTransportManager;
|
|
|
|
FAdapters:TNetworkList;
|
List of TMonitorAdapter objects
|
public
|
property Manager:TTransportManager read FManager;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
|
|
function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TMonitorAdapter;
|
|
function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TMonitorAdapter;
|
|
function GetAdapterByNext(APrevious:TMonitorAdapter; ALock,AUnlock:Boolean; AState:LongWord):TMonitorAdapter;
|
|
|
|
function AddAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
|
|
function StartMonitor:Boolean; virtual;
|
|
function StopMonitor:Boolean; virtual;
|
|
function ProcessMonitor:Boolean; virtual;
|
|
|
|
function BindMonitor(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
function UnbindMonitor(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
Authenticator adapter
[Expand]
TAuthenticatorAdapter = class(TListObject)
| Note: Downstream
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
public
|
Handle:THandle;
|
|
Adapter:TNetworkAdapter;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
Network authenticator
[Expand]
TNetworkAuthenticator = class(TListObject)
| Note: eg EAP/RSN
|
|
|
constructor Create(AManager:TTransportManager);
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
protected
|
FManager:TTransportManager;
|
|
|
|
FAuthType:Word;
|
|
FInitDelay:LongWord;
|
|
FRetryCount:LongWord;
|
|
FRetryTimeout:LongWord;
|
|
FAdapters:TNetworkList;
|
List of TAuthenticatorAdapter objects
|
public
|
property Manager:TTransportManager read FManager;
|
|
property AuthType:Word read FAuthType;
|
|
property InitDelay:LongWord read FInitDelay;
|
|
property RetryCount:LongWord read FRetryCount;
|
|
property RetryTimeout:LongWord read FRetryTimeout;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
|
|
function GetAdapterByHandle(AHandle:THandle; ALock:Boolean; AState:LongWord):TAuthenticatorAdapter;
|
|
function GetAdapterByAdapter(AAdapter:TNetworkAdapter; ALock:Boolean; AState:LongWord):TAuthenticatorAdapter;
|
|
function GetAdapterByNext(APrevious:TAuthenticatorAdapter; ALock,AUnlock:Boolean; AState:LongWord):TAuthenticatorAdapter;
|
|
|
|
function AddAdapter(AAdapter:TNetworkAdapter; AAuthType:Word; ACipher,AKey,AEntity,AToken:Pointer):Boolean; virtual;
|
|
function RemoveAdapter(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
|
|
function StartAuthenticator:Boolean; virtual;
|
|
function StopAuthenticator:Boolean; virtual;
|
|
function ProcessAuthenticator:Boolean; virtual;
|
|
|
|
function BindAuthenticator(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
function UnbindAuthenticator(AAdapter:TNetworkAdapter):Boolean; virtual;
|
|
Transport socket
[Expand]
TTransportSocket = class(TListObject)
constructor Create(ATransport:TNetworkTransport);
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
FLocalLock:TMutexHandle;
|
|
|
|
procedure SetFamily(AFamily:Word);
|
|
procedure SetStruct(AStruct:Word);
|
|
procedure SetProto(AProto:Word);
|
|
procedure SetOwner(AOwner:TSocketList);
|
|
|
|
procedure SetSocketError(ASocketError:Integer);
|
|
procedure SetOpenTime(const AOpenTime:Int64);
|
|
procedure SetCloseTime(const ACloseTime:Int64);
|
|
procedure SetLingerTime(const ALingerTime:Int64);
|
|
procedure SetTimewaitTime(const ATimewaitTime:Int64);
|
|
procedure SetKeepAliveTime(const AKeepAliveTime:Int64);
|
|
protected
|
FTransport:TNetworkTransport;
|
|
|
|
FFamily:Word;
|
AF_INET, AF_INET6, AF_IPX etc
|
FStruct:Word;
|
SOCK_STREAM, SOCK_DGRAM etc
|
FProto:Word;
|
IPPROTO_UDP, IPPROTO_TCP etc
|
FOwner:TSocketList;
|
List that this Socket belongs to (eg AcceptQueue)
|
|
|
FSocketError:Integer;
|
CONN_REFUSED etc
|
FSocketState:TSocketState;
|
SS_UNCONNECTED, SS_ISCONNECTED etc
|
FSocketOptions:TSocketOptions;
|
SO_ACCEPTCONN, SO_BROADCAST etc
|
FOpenTime:Int64;
|
Socket was Opened ar [msec] (TCP_STATE_ESTAB)
|
FCloseTime:Int64;
|
Socket was Closed at [msec] (TCP_STATE_CLOSED)
|
FLingerTime:Int64;
|
Went into Linger at [msec]
|
FTimewaitTime:Int64;
|
Went into Timewait at [msec] (TCP_STATE_TIMEWAIT)
|
FKeepAliveTime:Int64;
|
Last KeepAlive Packet at [msec]
|
|
|
FTransportState:TTransportState;
|
|
FTransportOptions:TTransportOptions;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
public
|
property Family:Word read FFamily write SetFamily;
|
|
property Struct:Word read FStruct write SetStruct;
|
|
property Proto:Word read FProto write SetProto;
|
|
property Owner:TSocketList read FOwner write SetOwner;
|
|
|
|
property SocketError:Integer read FSocketError write SetSocketError;
|
|
property SocketState:TSocketState read FSocketState;
|
|
property SocketOptions:TSocketOptions read FSocketOptions;
|
|
property OpenTime:Int64 read FOpenTime write SetOpenTime;
|
|
property CloseTime:Int64 read FCloseTime write SetCloseTime;
|
|
property LingerTime:Int64 read FLingerTime write SetLingerTime;
|
|
property TimewaitTime:Int64 read FTimewaitTime write SetTimewaitTime;
|
|
property KeepAliveTime:Int64 read FKeepAliveTime write SetKeepAliveTime;
|
|
|
|
property TransportState:TTransportState read FTransportState;
|
|
property TransportOptions:TTransportOptions read FTransportOptions;
|
|
|
|
property Transport:TNetworkTransport read FTransport;
|
|
|
|
function GetOption(ALevel,AOptName:Integer; AOptValue:PChar; var AOptLength:Integer):Integer; virtual;
|
|
function SetOption(ALevel,AOptName:Integer; AOptValue:PChar; AOptLength:Integer):Integer; virtual;
|
|
function IoCtl(ACommand:DWORD; var AArgument:u_long):Integer; virtual;
|
|
|
|
function IsConnected(ALocalAddress,ARemoteAddress:Pointer; ALocalPort,ARemotePort:Word; ABroadcast:Boolean):Boolean; virtual;
|
|
function IsListening(ALocalAddress,ARemoteAddress:Pointer; ALocalPort,ARemotePort:Word; ABroadcast:Boolean):Boolean; virtual;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function ReaderConvert:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
function WriterConvert:Boolean;
|
|
Socket list
[Expand]
TSocketList = class(TObject)
| Note: For tracking Sockets belonging to a List (eg AcceptQueue)
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
protected
|
FList:TList;
|
|
|
|
procedure RemoveListItems;
|
|
function GetCount:Integer;
|
|
function GetItem(AIndex:Integer):TTransportSocket;
|
|
procedure SetItem(AIndex:Integer; AItem:TTransportSocket);
|
|
public
|
property Count:Integer read GetCount;
|
|
property Items[Index:Integer]:TTransportSocket read GetItem write SetItem;
|
|
|
|
function Add(ASocket:TTransportSocket):Integer;
|
|
function Remove(ASocket:TTransportSocket):Integer;
|
|
function First:TTransportSocket;
|
|
function Last:TTransportSocket;
|
|
procedure ClearList;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
Socket state
[Expand]
TSocketState = class(TObject)
| Note: For Socket State tracking SS_UNCONNECTED, SS_PRIV etc
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
protected
|
FState:LongWord;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
function GetUnconnected:Boolean;
|
|
procedure SetUnconnected(AUnconnected:Boolean);
|
|
function GetConnected:Boolean;
|
|
procedure SetConnected(AConnected:Boolean);
|
|
function GetConnecting:Boolean;
|
|
procedure SetConnecting(AConnecting:Boolean);
|
|
function GetDisconnecting:Boolean;
|
|
procedure SetDisconnecting(ADisconnecting:Boolean);
|
|
function GetCantSendMore:Boolean;
|
|
procedure SetCantSendMore(ACantSendMore:Boolean);
|
|
function GetCantRecvMore:Boolean;
|
|
procedure SetCantRecvMore(ACantRecvMore:Boolean);
|
|
function GetRecvAtMark:Boolean;
|
|
procedure SetRecvAtMark(ARecvAtMark:Boolean);
|
|
|
|
function GetPrivileged:Boolean;
|
|
procedure SetPrivileged(APrivileged:Boolean);
|
|
function GetNonBlocking:Boolean;
|
|
procedure SetNonBlocking(ANonBlocking:Boolean);
|
|
function GetAsync:Boolean;
|
|
procedure SetAsync(AAsync:Boolean);
|
|
function GetListening:Boolean;
|
|
procedure SetListening(AListening:Boolean);
|
|
|
|
function GetLocalAddress:Boolean;
|
|
procedure SetLocalAddress(ALocalAddress:Boolean);
|
|
function GetRemoteAddress:Boolean;
|
|
procedure SetRemoteAddress(ARemoteAddress:Boolean);
|
|
function GetConnRefused:Boolean;
|
|
procedure SetConnRefused(AConnRefused:Boolean);
|
|
function GetClosed:Boolean;
|
|
procedure SetClosed(AClosed:Boolean);
|
|
public
|
property Unconnected:Boolean read GetUnconnected write SetUnconnected;
|
|
property Connected:Boolean read GetConnected write SetConnected;
|
|
property Connecting:Boolean read GetConnecting write SetConnecting;
|
|
property Disconnecting:Boolean read GetDisconnecting write SetDisconnecting;
|
|
property CantSendMore:Boolean read GetCantSendMore write SetCantSendMore;
|
|
property CantRecvMore:Boolean read GetCantRecvMore write SetCantRecvMore;
|
|
property RecvAtMark:Boolean read GetRecvAtMark write SetRecvAtMark;
|
|
|
|
property Privileged:Boolean read GetPrivileged write SetPrivileged;
|
|
property NonBlocking:Boolean read GetNonBlocking write SetNonBlocking;
|
|
property Async:Boolean read GetAsync write SetAsync;
|
|
property Listening:Boolean read GetListening write SetListening;
|
|
|
|
property LocalAddress:Boolean read GetLocalAddress write SetLocalAddress;
|
|
property RemoteAddress:Boolean read GetRemoteAddress write SetRemoteAddress;
|
|
property ConnRefused:Boolean read GetConnRefused write SetConnRefused;
|
|
property Closed:Boolean read GetClosed write SetClosed;
|
|
Socket buffer
[Expand]
TSocketBuffer = class(TObject)
| Note: Base Socket Buffer Class
|
|
|
constructor Create(ASocket:TTransportSocket);
|
|
destructor Destroy; override;
|
|
private
|
FLock:TMutexHandle;
|
|
protected
|
FSocket:TTransportSocket;
|
Socket owning this buffer
|
FBuffer:TMemoryStream;
|
Memory Buffer for Data
|
|
|
FSize:LongWord;
|
Physical Size of Data Buffer
|
FStart:Pointer;
|
First Byte of Data Buffer
|
FEnd:Pointer;
|
Last Byte of Data Buffer
|
|
|
FUsed:LongWord;
|
Amount of Buffer Used
|
FFree:LongWord;
|
Amount of Buffer Free
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
procedure SetSize(ASize:LongWord); virtual;
|
|
public
|
property Size:LongWord read FSize write SetSize;
|
|
|
|
function GetUsed:LongWord;
|
|
function GetFree:LongWord;
|
|
Socket options
[Expand]
TSocketOptions = class(TObject)
| Note: For Get/Set Options Level = SOL_SOCKET Option = SO_KEEPALIVE, SO_ACCEPTCONN, SO_BROADCAST etc
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
protected
|
FOptions:LongWord;
|
|
|
|
FLinger:TLinger;
|
|
FSendBuffer:Integer;
|
|
FRecvBuffer:Integer;
|
|
FSendLowMark:Integer;
|
|
FRecvLowMark:Integer;
|
|
FSendTimeout:LongWord;
|
|
FRecvTimeout:LongWord;
|
|
FConnTimeout:LongWord;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
procedure SetLinger(const ALinger:TLinger);
|
|
procedure SetSendBuffer(ASendBuffer:Integer);
|
|
procedure SetRecvBuffer(ARecvBuffer:Integer);
|
|
procedure SetSendLowMark(ASendLowMark:Integer);
|
|
procedure SetRecvLowMark(ARecvLowMark:Integer);
|
|
procedure SetSendTimeout(ASendTimeout:LongWord);
|
|
procedure SetRecvTimeout(ARecvTimeout:LongWord);
|
|
procedure SetConnTimeout(AConnTimeout:LongWord);
|
|
|
|
function GetDebug:Boolean;
|
|
procedure SetDebug(ADebug:Boolean);
|
|
function GetAccept:Boolean;
|
|
procedure SetAccept(AAccept:Boolean);
|
|
function GetReuseAddress:Boolean;
|
|
procedure SetReuseAddress(AReuseAddress:Boolean);
|
|
function GetKeepAlive:Boolean;
|
|
procedure SetKeepAlive(AKeepAlive:Boolean);
|
|
function GetDontRoute:Boolean;
|
|
procedure SetDontRoute(ADontRoute:Boolean);
|
|
function GetBroadcast:Boolean;
|
|
procedure SetBroadcast(ABroadcast:Boolean);
|
|
function GetUseLoopback:Boolean;
|
|
procedure SetUseLoopback(AUseLoopback:Boolean);
|
|
function GetUrgentInline:Boolean;
|
|
procedure SetUrgentInline(AUrgentInline:Boolean);
|
|
public
|
property Linger:TLinger read FLinger write SetLinger;
|
|
property SendBuffer:Integer read FSendBuffer write SetSendBuffer;
|
|
property RecvBuffer:Integer read FRecvBuffer write SetRecvBuffer;
|
|
property SendLowMark:Integer read FSendLowMark write SetSendLowMark;
|
|
property RecvLowMark:Integer read FRecvLowMark write SetRecvLowMark;
|
|
property SendTimeout:LongWord read FSendTimeout write SetSendTimeout;
|
|
property RecvTimeout:LongWord read FRecvTimeout write SetRecvTimeout;
|
|
property ConnTimeout:LongWord read FConnTimeout write SetConnTimeout;
|
|
|
|
property Debug:Boolean read GetDebug write SetDebug;
|
|
property Accept:Boolean read GetAccept write SetAccept;
|
|
property ReuseAddress:Boolean read GetReuseAddress write SetReuseAddress;
|
|
property KeepAlive:Boolean read GetKeepAlive write SetKeepAlive;
|
|
property DontRoute:Boolean read GetDontRoute write SetDontRoute;
|
|
property Broadcast:Boolean read GetBroadcast write SetBroadcast;
|
|
property UseLoopback:Boolean read GetUseLoopback write SetUseLoopback;
|
|
property UrgentInline:Boolean read GetUrgentInline write SetUrgentInline;
|
|
Transport state
[Expand]
TTransportState = class(TObject)
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
protected
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
Transport options
[Expand]
TTransportOptions = class(TObject)
| Note: For Get/Set Options at the Transport Level (eg IPPROTO_IP)
|
|
|
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
protected
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
Host entry
[Expand]
THostEntry = class(TListObject)
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
|
|
FAliases:TStringList;
|
|
|
|
function GetName:String;
|
|
procedure SetName(const AName:String);
|
|
procedure SetFamily(AFamily:Integer);
|
|
procedure SetLength(ALength:Integer);
|
|
procedure SetHostType(AHostType:Word);
|
|
procedure SetHostTime(const AHostTime:Int64);
|
|
protected
|
FName:String;
|
|
FFamily:Integer;
|
Always 2 for AF_INET
|
FLength:Integer;
|
Always 4 for AF_INET
|
FHostType:Word;
|
|
FHostTime:Int64;
|
|
public
|
property Name:String read GetName write SetName;
|
|
property Family:Integer read FFamily write SetFamily;
|
|
property Length:Integer read FLength write SetLength;
|
|
property HostType:Word read FHostType write SetHostType;
|
|
property HostTime:Int64 read FHostTime write SetHostTime;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
function FindAlias(const Alias:String):Boolean;
|
|
|
|
function AddAlias(const Alias:String):Boolean;
|
|
function RemoveAlias(const Alias:String):Boolean;
|
|
Route entry
[Expand]
TRouteEntry = class(TListObject)
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
FLocalLock:TMutexHandle;
|
|
|
|
procedure SetFamily(AFamily:Integer);
|
|
procedure SetLength(ALength:Integer);
|
|
procedure SetMetric(AMetric:Integer);
|
|
procedure SetRouteType(ARouteType:Word);
|
|
procedure SetRouteTime(const ARouteTime:Int64);
|
|
protected
|
FFamily:Integer;
|
Always 2 for AF_INET
|
FLength:Integer;
|
Always 4 for AF_INET
|
FMetric:Integer;
|
|
FRouteType:Word;
|
|
FRouteTime:Int64;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
public
|
property Family:Integer read FFamily write SetFamily;
|
|
property Length:Integer read FLength write SetLength;
|
|
property Metric:Integer read FMetric write SetMetric;
|
|
property RouteType:Word read FRouteType write SetRouteType;
|
|
property RouteTime:Int64 read FRouteTime write SetRouteTime;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function ReaderConvert:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
function WriterConvert:Boolean;
|
|
Address entry
[Expand]
TAddressEntry = class(TListObject)
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TSynchronizerHandle;
|
|
FLocalLock:TMutexHandle;
|
|
|
|
procedure SetFamily(AFamily:Integer);
|
|
procedure SetLength(ALength:Integer);
|
|
procedure SetAddressType(AAddressType:Word);
|
|
procedure SetAddressTime(const AAddressTime:Int64);
|
|
procedure SetAdapter(AAdapter:TNetworkAdapter);
|
|
protected
|
FFamily:Integer;
|
Always 2 for AF_INET
|
FLength:Integer;
|
Always 4 for AF_INET
|
FAddressType:Word;
|
Dynamic/Static/Multicast/Broadcast/Primary/Secondary
|
FAddressTime:Int64;
|
Flush time for Dynamic entries
|
FAdapter:TNetworkAdapter;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
public
|
property Family:Integer read FFamily write SetFamily;
|
|
property Length:Integer read FLength write SetLength;
|
|
property AddressType:Word read FAddressType write SetAddressType;
|
|
property AddressTime:Int64 read FAddressTime write SetAddressTime;
|
|
property Adapter:TNetworkAdapter read FAdapter write SetAdapter;
|
|
|
|
function ReaderLock:Boolean;
|
|
function ReaderUnlock:Boolean;
|
|
function ReaderConvert:Boolean;
|
|
function WriterLock:Boolean;
|
|
function WriterUnlock:Boolean;
|
|
function WriterConvert:Boolean;
|
|
Network entry
[Expand]
TNetworkEntry = class(TListObject)
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
|
|
FAliases:TStringList;
|
|
|
|
function GetName:String;
|
|
procedure SetName(const AName:String);
|
|
procedure SetFamily(AFamily:Integer);
|
|
procedure SetLength(ALength:Integer);
|
|
protected
|
FName:String;
|
|
FFamily:Integer;
|
Always 2 for AF_INET
|
FLength:Integer;
|
Always 4 for AF_INET
|
public
|
property Name:String read GetName write SetName;
|
|
property Family:Integer read FFamily write SetFamily;
|
|
property Length:Integer read FLength write SetLength;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
function FindAlias(const Alias:String):Boolean;
|
|
|
|
function AddAlias(const Alias:String):Boolean;
|
|
function RemoveAlias(const Alias:String):Boolean;
|
|
Service entry
[Expand]
TServEntry = class(TListObject)
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
|
|
FAliases:TStringList;
|
|
|
|
function GetName:String;
|
|
procedure SetName(const AName:String);
|
|
procedure SetPort(APort:Word);
|
|
function GetProtocol:String;
|
|
procedure SetProtocol(const AProtocol:String);
|
|
protected
|
FName:String;
|
|
FPort:Word;
|
|
FProtocol:String;
|
|
public
|
property Name:String read GetName write SetName;
|
|
property Port:Word read FPort write SetPort;
|
|
property Protocol:String read GetProtocol write SetProtocol;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
function FindAlias(const Alias:String):Boolean;
|
|
|
|
function AddAlias(const Alias:String):Boolean;
|
|
function RemoveAlias(const Alias:String):Boolean;
|
|
Protocol entry
[Expand]
TProtoEntry = class(TListObject)
constructor Create;
|
|
destructor Destroy; override;
|
|
private
|
FLock:TCriticalSectionHandle;
|
|
|
|
FAliases:TStringList;
|
|
|
|
function GetName:String;
|
|
procedure SetName(const AName:String);
|
|
procedure SetNumber(ANumber:Word);
|
|
protected
|
FName:String;
|
|
FNumber:Word;
|
|
public
|
property Name:String read GetName write SetName;
|
|
property Number:Word read FNumber write SetNumber;
|
|
|
|
function AcquireLock:Boolean;
|
|
function ReleaseLock:Boolean;
|
|
|
|
function FindAlias(const Alias:String):Boolean;
|
|
|
|
function AddAlias(const Alias:String):Boolean;
|
|
function RemoveAlias(const Alias:String):Boolean;
|
|
Public variables
Transport specific variables
TransportManager:TTransportManager;
|
|
Function declarations
Initialization functions
[Expand]
procedure TransportInit;
Description: To be documented
[Expand]
function TransportStart:LongWord;
Description: To be documented
[Expand]
function TransportStop:LongWord;
Description: To be documented
[Expand]
function TransportBind:LongWord;
Description: To be documented
[Expand]
function TransportUnbind:LongWord;
Description: To be documented
Transport functions
[Expand]
function InAddrToHost(const AAddress:TInAddr):TInAddr; inline;
Description: Convert an InAddr in Network order to Host order
[Expand]
function InAddrToNetwork(const AAddress:TInAddr):TInAddr; inline;
Description: Convert an InAddr in Host order to Network order
[Expand]
function InAddrToString(const AAddress:TInAddr):String;
Description: Convert an InAddr to a String
| Note
|
Expects Address to be in Network order
|
[Expand]
function StringToInAddr(const AAddress:String):TInAddr;
Description: Convert a String to an InAddr
| Note
|
Returns Address in Network order
|
[Expand]
function InAddrIsEqual(const AAddress1,AAddress2:TInAddr):Boolean;
Description: Check the supplied addresses to see if they are the same
| Note
|
Expects Address to be in Host order
|
[Expand]
function InAddrIsDefault(const AAddress:TInAddr):Boolean;
Description: Check the supplied address to see if it is the default address
| Note
|
Expects Address to be in Host order
|
[Expand]
function InAddrIsLoopback(const AAddress:TInAddr):Boolean;
Description: Check the supplied address to see if it is a loopback address
| Note
|
Expects Address to be in Host order
|
[Expand]
function InAddrIsBroadcast(const AAddress:TInAddr):Boolean;
Description: Check the supplied address to see if it is the broadcast address
| Note
|
Expects Address to be in Host order
|
[Expand]
function InAddrIsMulticast(const AAddress:TInAddr):Boolean;
Description: Check the supplied address to see if it is a multicast address
| Note
|
Expects Address to be in Host order
|
[Expand]
function In6AddrToString(const AAddress:TIn6Addr):String;
Description: To be documented
[Expand]
function StringToIn6Addr(const AAddress:String):TIn6Addr;
Description: To be documented
[Expand]
function In6AddrIsEqual(const AAddress1,AAddress2:TIn6Addr):Boolean;
Description: Check the supplied addresses to see if they are the same
[Expand]
function In6AddrIsDefault(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is the default address
[Expand]
function In6AddrIsLoopback(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a loopback address
[Expand]
function In6AddrIsLinkLocal(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a link local address
[Expand]
function In6AddrIsSiteLocal(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a site local address
[Expand]
function In6AddrIsV4Mapped(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a V4 mapped address
[Expand]
function In6AddrIsV4Compatible(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a V4 compatible address
[Expand]
function In6AddrIsMulticast(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a multicast address
[Expand]
function In6AddrIsMulticastNodeLocal(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a multicast node local address
[Expand]
function In6AddrIsMulticastLinkLocal(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a multicast link local address
[Expand]
function In6AddrIsMulticastSiteLocal(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a multicast site local address
[Expand]
function In6AddrIsMulticastOrgLocal(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a multicast org local address
[Expand]
function In6AddrIsMulticastGlobal(const AAddress:TIn6Addr):Boolean;
Description: Check the supplied address to see if it is a multicast global address
[Expand]
function IpxAddrToString(const AAddress:TIpxAddr):String;
Description: To be documented
[Expand]
function StringToIpxAddr(const AAddress:String):TIpxAddr;
Description: To be documented
[Expand]
function GetChecksum(ABuffer:Pointer; AOffset,ALength:Word):Word;
Description: Calculate the 1s Compliment Checksum of the Supplied Buffer
[Expand]
function GetChecksum2(APseudo,ABuffer:Pointer; APseudoLength,ABufferOffset,ABufferLength:Word):Word;
Description: Calculate the 1s Compliment Checksum of the Supplied Pseudo and Buffer
| Note
|
Pseudo is expected to start from Offset 0
|
[Expand]
function GetChecksum3(APseudo,AHeader,AData:Pointer; APseudoLength,AHeaderLength,ADataOffset,ADataLength:Word):Word;
Description: Calculate the 1s Compliment Checksum of the Supplied Pseudo, Header and Data
| Note
|
Pseudo and Header are expected to start from Offset 0
|
[Expand]
function GetChecksum4(APseudo,AHeader,AOptions,AData:Pointer; APseudoLength,AHeaderLength,AOptionsLength,ADataOffset,ADataLength:Word):Word;
Description: Calculate the 1s Compliment Checksum of the Supplied Pseudo, Header, Options and Data
| Note
|
Pseudo, Header and Options are expected to start from Offset 0
|
Transport helper functions
[Expand]
function HostTypeToString(AType:Word):String;
Description: To be documented
[Expand]
function RouteTypeToString(AType:Word):String;
Description: To be documented
[Expand]
function AddressTypeToString(AType:Word):String;
Description: To be documented
[Expand]
function ProtocolToString(AProtocol:Word):String;
Description: To be documented
[Expand]
function SocketTypeToString(ASocketType:Word):String;
Description: To be documented
[Expand]
function AddressFamilyToString(AFamily:Word):String;
Description: To be documented
Return to Unit Reference
