[Delphi] Crypt DES ECB

Всем привет, интересует библиотека криптографии DES в режиме ECB желательно, что бы она умела (де)криптовать всё - строки \ файлы и т.д. Кто, что предложит? может быть у кого-то есть собственные наработки?

 

DES уже неактуален в плане безопасности, а так на CryptoAPI все можно сделать, кода будет немного =)

 

Делфи - лишь графическая оболочка.

готовое и проверенное с OpenSSL - http://www.openssl.org/docs/apps/enc.html

рутину MD5 .obj из проекта вставлял в прогу оценки скорости брут-форса хешей - на Си.
можно ли использовать рутину DES на Pascal/Delphi - не интересовало.

 

Мне нужно для расшифровки \ дешефровки в принципе... а актуален или нет) мне ваще всё равно)

 

Тогда если нужна компактность - юзай CryptoAPI, если простота - либу DCPCrypt2, в последней на сколько помню уже реализовано шифрование и строк и файлов

 

Вот в DCPCrypt2 че то я не смог догнать как воспользоваться DES ECB или там отсутствует данный режим? Оо

Code:

var
  Cipher : TDCP_des;
  Key : AnsiString;
begin
  Cipher := TDCP_des.Create(nil);
  Cipher.BlockSize := 64;
  Cipher.MaxKeySize := 64;
  Cipher.CipherMode := cmCBC; { ECB ОТСУТСТВУЕТ }
  try
    
  finally
    Cipher.Burn;
    FreeAndNil(Cipher);
  end;

Тут есть процедура:

Code:

Cipher.EncryptECB(InData, OutData);

Но в Доках че-то отсутствует инфа о ней( Кто-нибудь пытался ей пользоваться?