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.

[Casimiro Notevi]

Empezado por jars

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

Te ha pasado el enlace a la dll, haz click encima de la fecha.

[jars]

Gracias por pasarme los fuentes pero te preguntaba si tenias las dll´s porque con Delphi7 no veo como generarlas.

[Casimiro Notevi]

Creo que es esto, aquí va:

[jars]

Gracias Casimiro.
Con las dll´s anteriores el error era:

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

Al poner las que me pasaste el error es:

could not load ssl library

Ya no se que hacer.

[Casimiro Notevi]

¿Las has puesto en el mismo directorio del programa?

[jars]

si, estan en la misma carpeta del ejecutable

[cervexa]

Empezado por jars

si, estan en la misma carpeta del ejecutable

Si has conseguido solucionarlo.
Estoy con tu mismo problema. Tengo Delphi XE.
Podrías facilitarme donde puedo encontrar las Indy 10.6 y las dll adecuadas para sslvTLSv1_2
O explicar como lo has solucionado. Gracias

[Casimiro Notevi]

Empezado por cervexa

Si has conseguido solucionarlo.
Estoy con tu mismo problema. Tengo Delphi XE.
Podrías facilitarme donde puedo encontrar las Indy 10.6 y las dll adecuadas para sslvTLSv1_2
O explicar como lo has solucionado. Gracias

¿No te sirven las que están enlazadas en unos mensajes más arriba?

[cervexa]

El problema es que las he copiado al directorio del exe, a windows, a windows/system32 y me dice que no consigue cargarlas.
No sé que hacer.
Por cierto, esas dll permiten trabajar con tls 1.2?

IdIOHandler.SSLOptions.SSLVersions := [sslvTLSv1_2];

Por otro lado la versión de las Indy que tengo (Delphi XE) en el objecto SSLOptions.SSLVersions no me ofrece ese valor. Por esto creo que tengo que actualizar las indy a la versión 10.6. Solo me ofrece el valor sslvTLSv1
Gracias por contestar

[pablog2k]

te va a tocar actualizar las librerías INDY , nosotros pasamos por una situación similar con Delphi XE

[Casimiro Notevi]

Empezado por cervexa

...

¿Qué versión de indy tienes?

[cervexa]

Empezado por Casimiro Notevi

¿Qué versión de indy tienes?

No tengo muy claro como mirarlo, pero en C:\Program Files (x86)\Embarcadero\RAD Studio\8.0\source\Indy10\System\IdVers.inc

tengo esto:

  gsIdVersion = '10.5.7'; {do not localize}
  gsIdProductName = 'Indy';  {do not localize}

Si pongo un IdSSLIOHandlerSocketOpenSSL en el formulario y voy a las opciones de SSL en el parametro de SSLVersions me ofrece solamente: sslvSSLv2, sslvSSLv23, sslvSSLv3, sslvTLSv1. Mi impresión es que debería ofrecerme tambien sslvTLSv11 y sslvTLSv12.

Teneis que perdonar mi ignorancia pero programé en Delphi hace más de 10 años y estoy muy fuera de onda. Tengo que hacer unos arreglos en el envio de correos con autentificacion TLS en un servidor smtp y voy muy perdido.
Gracias por la ayuda.

[cervexa]

Empezado por pablog2k

te va a tocar actualizar las librerías INDY , nosotros pasamos por una situación similar con Delphi XE

A que versión las actualizasteis y, sobre todo, donde las puedo descargar, así como las DLL de Openssh correspondientes?
Gracias