OpenSSL und d2i_OCSP_RESPONSE_bio

[Peter666]

Nicht wirklich,

mein Code schaut derzeit wie folgt aus:

Delphi-Quellcode:

type
  ASN1_d2i_bio_xnew = function(): Pointer; cdecl;
  Pd2i_of_void = function(p1: PPointer; p2: PPByte; p3: Integer): Pointer; cdecl;
    TASN1_d2i_bio = function(xnew: ASN1_d2i_bio_xnew; d2i: Pd2i_of_void; _in: PBIO; var x: Pointer): pointer; cdecl; 

var  _ASN1_d2i_bio: TASN1_d2i_bio = nil;

... 
 _ASN1_d2i_bio:= GetProcAddr(SSLUtilHandle, 'ASN1_d2i_bio');
   _i2d_OCSP_RESPONSE := GetProcAddr(SSLUtilHandle, 'i2d_OCSP_RESPONSE');     
...

function ASN1_d2i_bio(xnew: ASN1_d2i_bio_xnew; d2i: Pd2i_of_void; _in: PBIO; x: Pointer): pointer;
begin
  if InitSSLInterface and Assigned(_ASN1_d2i_bio) then
    Result := _ASN1_d2i_bio(xnew, d2i, _in, x)
  else
    Result := nil;
end;       

function i2d_OCSP_RESPONSE_bio(b: PBIO; x: Pointer): Pointer;
begin
 result := ASN1_d2i_bio(OCSP_RESPONSE, _i2d_OCSP_RESPONSE, b, x);
end;

Wobei ich nicht verstehe wo das OCSP_RESPONSE deklariert ist.