TSSLOpenSSL

type TSSLOpenSSL = class(TCustomSSL)

protected

  FSsl: PSSL;

  Fctx: PSSL_CTX;

  function NeedSigningCertificate; virtual;

  function SSLCheck;

  function SetSslKeys; virtual;

  function Init;

  function DeInit;

  function Prepare;

  function LoadPFX();

  function CreateSelfSignedCert(); override;

  property Server: Boolean; [r]

public

  constructor Create(); override;

  destructor Destroy; override;

  function LibVersion; override;

  function LibName; override;

  function Connect; override;

  function Accept; override;

  function Shutdown; override;

  function BiShutdown; override;

  function SendBuffer(); override;

  function RecvBuffer(); override;

  function WaitingData; override;

  function GetSSLVersion; override;

  function GetPeerSubject; override;

  function GetPeerSerialNo; override;

  function GetPeerIssuer; override;

  function GetPeerName; override;

  function GetPeerNameHash; override;

  function GetPeerFingerprint; override;

  function GetCertInfo; override;

  function GetCipherName; override;

  function GetCipherBits; override;

  function GetCipherAlgBits; override;

  function GetVerifyCert; override;

end;

TSSLOpenSSL

TCustomSSL

TObject