Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Internet (https://www.clubdelphi.com/foros/forumdisplay.php?f=3)
-   -   Indy 10 y sslvTLSv1_2 (https://www.clubdelphi.com/foros/showthread.php?t=96482)

jars 09-11-2023 14:14:44

Indy 10 y sslvTLSv1_2
 
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 09-11-2023 15:05:50

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

jars 09-11-2023 17:57:39

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 09-11-2023 18:15:34

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 09-11-2023 20:47:07

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 09-11-2023 21:40:33

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

Casimiro Notevi 10-11-2023 10:08:16

Cita:

Empezado por juanelo (Mensaje 553231)
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 10-11-2023 10:09:21

Cita:

Empezado por jars (Mensaje 553232)
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 10-11-2023 12:58:04

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

Casimiro Notevi 10-11-2023 13:24:33

1 Archivos Adjunto(s)
Creo que es esto, aquí va:

jars 10-11-2023 15:39:41

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 10-11-2023 19:45:09

¿Las has puesto en el mismo directorio del programa?

jars 10-11-2023 20:17:19

si, estan en la misma carpeta del ejecutable

cervexa 29-02-2024 12:06:31

Cita:

Empezado por jars (Mensaje 553250)
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 29-02-2024 14:52:16

Cita:

Empezado por cervexa (Mensaje 554650)
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 01-03-2024 07:30:27

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?
Código:

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 01-03-2024 09:09:49

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

Casimiro Notevi 01-03-2024 09:59:20

Cita:

Empezado por cervexa (Mensaje 554672)
...

¿Qué versión de indy tienes?

cervexa 02-03-2024 09:50:34

Cita:

Empezado por Casimiro Notevi (Mensaje 554679)
¿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:
Código:

  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 02-03-2024 09:52:36

Cita:

Empezado por pablog2k (Mensaje 554674)
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


La franja horaria es GMT +2. Ahora son las 20:26:53.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi