Indy 9
|
TIdStackLinux = class(TIdStack)
function TInAddrToString(var AInAddr): string; override;
procedure TranslateStringToTInAddr(AIP: string; var AInAddr); override;
function WSAccept(ASocket: TIdStackSocketHandle; var VIP: string; var VPort: Integer): TIdStackSocketHandle; override;
function WSBind(ASocket: TIdStackSocketHandle; const AFamily: Integer; const AIP: string; const APort: Integer): Integer; override;
function WSCloseSocket(ASocket: TIdStackSocketHandle): Integer; override;
function WSConnect(const ASocket: TIdStackSocketHandle; const AFamily: Integer; const AIP: string; const APort: Integer): Integer; override;
function WSGetHostByAddr(const AAddress: string): string; override;
function WSGetHostByName(const AHostName: string): string; override;
function WSGetHostName: string; override;
function WSGetLastError: Integer; override;
procedure WSGetPeerName(ASocket: TIdStackSocketHandle; var VFamily: Integer; var VIP: string; var VPort: Integer); override;
function WSGetServByName(const AServiceName: string): Integer; override;
function WSGetServByPort(const APortNumber: Integer): TStrings; override;
procedure WSGetSockName(ASocket: TIdStackSocketHandle; var VFamily: Integer; var VIP: string; var VPort: Integer); override;
function WSGetSockOpt(ASocket: TIdStackSocketHandle; Alevel: Integer; AOptname: Integer; AOptval: PChar; var AOptlen: Integer): Integer; override;
function WSHToNL(AHostLong: LongWord): LongWord; override;
function WSHToNs(AHostShort: Word): Word; override;
function WSListen(ASocket: TIdStackSocketHandle; ABackLog: Integer): Integer; override;
function WSNToHL(ANetLong: LongWord): LongWord; override;
function WSNToHs(ANetShort: Word): Word; override;
function WSRecv(ASocket: TIdStackSocketHandle; var ABuffer; const ABufferLength: Integer; const AFlags: Integer): integer; override;
function WSRecvFrom(const ASocket: TIdStackSocketHandle; var ABuffer; const ALength: Integer; const AFlags: Integer; var VIP: string; var VPort: Integer): Integer; override;
function WSSelect(ARead: TList; AWrite: TList; AErrors: TList; ATimeout: Integer): Integer; override;
function WSSend(ASocket: TIdStackSocketHandle; var ABuffer; const ABufferLength: Integer; const AFlags: Integer): Integer; override;
function WSSendTo(ASocket: TIdStackSocketHandle; var ABuffer; const ABufferLength: Integer; const AFlags: Integer; const AIP: string; const APort: integer): Integer; override;
function WSSetSockOpt(ASocket: TIdStackSocketHandle; ALevel: Integer; AOptName: Integer; AOptVal: PChar; AOptLen: Integer): Integer; override;
function WSShutdown(ASocket: TIdStackSocketHandle; AHow: Integer): Integer; override;
function WSSocket(AFamily: Integer; AStruct: Integer; AProtocol: Integer): TIdStackSocketHandle; override;
function WSTranslateSocketErrorMsg(const AErr: integer): string; override;