Fun��o em Delphi equivalente em Java

26/01/2022

Pessoal estou precisando de um luz, j� pesquisei de tudo e n�o consegui encontrar uma resposta clara para essa quest�o.
Preciso converter esse c�digo abaixo de Criptografia 3DES escrito em Delphi para JAVA, por�m como conhe�o muito pouco Delphi
estou com dificuldades nas fun��es GenerateLMDKey e TripleDESEncryptStringCBCEx.

Algu�m sabe como eu posso escrever essas duas linhas em java?

uses SysUtils, LbCipher, LbString;

CONST
  cEntidade = 'chave1';
  cEntidade2 = 'chave2';

var
  Key128: TKey128;

function Criptografa3DES(aTexto : String) : String;
begin
  try
    GenerateLMDKey(Key128, SizeOf(Key128), cEntidade+cEntidade2);
    result := TripleDESEncryptStringCBCEx(aTexto, Key128, True);
  except
    result := '';
  end;
end;

function Descriptografa3DES(aTexto : String) : String;
begin
  try
    GenerateLMDKey(Key128, SizeOf(Key128), cEntidade+cEntidade2);
    result := TripleDESEncryptStringCBCEx(aTexto, Key128, False);
  except
    result := '';
  end;
end;

Jords

Curtir t�pico + 0

Responder