TLHTTPSocket

type TLHTTPSocket = class(TLSocket)

protected

  FBuffer: pchar;

  FBufferPos: pchar;

  FBufferEnd: pchar;

  FBufferSize: Integer;

  FRequestBuffer: pchar;

  FRequestPos: pchar;

  FRequestInputDone: Boolean;

  FRequestHeaderDone: Boolean;

  FOutputDone: Boolean;

  FInputRemaining: Integer;

  FChunkState: TChunkState;

  FCurrentInput: TOutputItem;

  FCurrentOutput: TOutputItem;

  FLastOutput: TOutputItem;

  FKeepAlive: Boolean;

  FParseBuffer: TParseBufferMethod;

  FParameters: TLHTTPParameterArray;

  FDelayFreeItems: TOutputItem;

  procedure AddContentLength(); virtual; abstract;

  function CalcAvailableBufferSpace;

  procedure DelayFree();

  procedure Disconnect; override;

  procedure DoneBuffer(); virtual;

  procedure FreeDelayFreeItems;

  procedure LogAccess(); virtual;

  procedure LogMessage; virtual;

  procedure FlushRequest; virtual;

  procedure PackRequestBuffer;

  procedure PackInputBuffer;

  function ParseRequest;

  function ParseEntityPlain;

  function ParseEntityChunked;

  procedure ParseLine(); virtual;

  procedure ParseParameterLine();

  function ProcessEncoding;

  procedure ProcessHeaders; virtual; abstract;

  procedure RelocateVariable();

  procedure RelocateVariables; virtual;

  procedure ResetDefaults; virtual;

  function SetupEncoding();

  procedure WriteError(); virtual;

public

  constructor Create; override;

  destructor Destroy; override;

  procedure AddToOutput();

  procedure PrependOutput();

  procedure RemoveOutput();

  procedure HandleReceive;

  function ParseBuffer;

  procedure WriteBlock;

  property Parameters: TLHTTPParameterArray; [r]

end;

TLHTTPSocket

TLSocket

TObject