TIdMappedFtpContext

type TIdMappedFtpContext = class(TIdMappedPortContext)

protected

  FFtpCommand: string;

  FFtpParams: string;

  FHost: string;

  FoutboundHost: string;

  FPort: TIdPort;

  FoutboundPort: TIdPort;

  FDataChannelThread: TIdMappedFtpDataThread;

  procedure HandleLocalClientData; override;

  function GetFtpCmdLine;

  procedure CreateDataChannelThread;

  function ProcessFtpCommand; virtual;

  procedure ProcessOutboundDc(); virtual;

  procedure ProcessDataCommand; virtual;

public

  constructor Create(); override;

  property FtpCommand: string; [rw]

  property FtpParams: string; [rw]

  property FtpCmdLine: string; [r]

  property Host: string; [rw]

  property OutboundHost: string; [rw]

  property Port: TIdPort; [rw]

  property OutboundPort: TIdPort; [rw]

  property DataChannelThread: TIdMappedFtpDataThread; [r]

end;

TIdMappedFtpContext

TIdMappedPortContext

TIdServerContext

TIdContext

TIdTask

TObject