Indy 10 y sslvTLSv1_2

[jars]

Hola gente.
Alguien me puede decir que version de Indy 10 tiene ssLVersion sslvTLSv1_2 para Delphi 7
Me sale este error :

Error connecting with SSL.
error:1409442E:SSL routines:ssl3_read_bytes:tlsv1 alert protocol version

Gracias.

[Casimiro Notevi]

Sí, la tiene. Ese error es otra cosa. Más bien parece que espera ssl3 ¿no?

[jars]

Gracias Casimiro.
En donde debería esperar ssl3

Este es el codigo que estoy usando luego de actualizar Indy 10 version 10.6.2.0

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  IdHTTP: TIdHTTP;
  IdIOHandler: TIdSSLIOHandlerSocketOpenSSL;
  SoapRequest, SoapResponse: TStringStream;
  x, ServiceURL, SoapAction: string;
begin
  ServiceURL := 'https://mail2.tecnovoz.com.ar:3002/iows';
  SoapAction := 'textgpt';

  SoapRequest := TStringStream.Create(LoadSoapEnvelopeFromFile('D:\newsoap\SoapEnvelope.xml'));
  SoapResponse := TStringStream.Create('');

  IdHTTP := TIdHTTP.Create(nil);
  try
    IdIOHandler := TIdSSLIOHandlerSocketOpenSSL.Create(IdHTTP);
    try
      IdIOHandler.SSLOptions.SSLVersions := [sslvTLSv1_2];
      IdHTTP.Request.ContentType := 'text/xml; charset=utf-8';
      IdHTTP.Request.Accept := 'text/xml';

      try
        IdHTTP.Post(ServiceURL, SoapRequest, SoapResponse);
        Memo1.Lines.Add('Resultado del servicio: ' + SoapResponse.DataString);
      except
        on E: Exception do
         Memo1.Lines.Add(E.Message);
      end;
    finally
      IdIOHandler.Free;
    end;
  finally
    IdHTTP.Free;
    SoapRequest.Free;
    SoapResponse.Free;
  end;
end;

[Casimiro Notevi]

Quiero decir que el mensaje de error es ssl3_read_bytes:tlsv1 alert protocol version, y que a lo mejor, no lo sé, pero puede ser que ese servidor esté funcionando con ssl3, y de ahí el error.

[juanelo]

Adicional a lo dicho, asegurate de tener las DLL's de openSSL actualizadas:
24-Oct-2023OpenSSL 3.1.4 is now available, including bug and security fixes (tomado de sitio oficial)

[jars]

Gracias Juanelo.
Vos tenes las dll´s porque con Delphi 7 no puedo hacer mucho.

[Casimiro Notevi]

Empezado por juanelo

Adicional a lo dicho, asegurate de tener las DLL's de openSSL actualizadas:
24-Oct-2023OpenSSL 3.1.4 is now available, including bug and security fixes (tomado de sitio oficial)

Eso es cierto, hace falta también tenerlas actualizadas.