Ищу FOSS SHA1 - PullRequest
       6

Ищу FOSS SHA1

8 голосов
/ 24 мая 2011

Я ищу реализацию FOSS SHA1 для использования с Delphi (7).

Желательно что-то маленькое, может быть, даже отдельное SHA1, а не прошлое огромной библиотеки.Простота установки и использования приятна, но, конечно, надежность - приоритет номер 1.


Обновление: спасибо, Роб, этот код работает как сон

Ответы [ 4 ]

6 голосов
/ 24 мая 2011

Используйте Cryptography API , встроенный в ОС. Вы можете использовать модуль Hashes.pas от Domingo Seoane, чтобы использовать его в Delphi, или вы можете написать свою собственную подпрограмму, используя CryptAcquireContext, CryptCreateHash, повторные вызовы CryptHashData и, наконец, CryptGetHashParam для получить результат.

Я понимаю, что он не является ни бесплатным (как в речи), ни открытым исходным кодом, но также нет никаких требований к распространению, поскольку он уже включен во все системы ваших клиентов.

5 голосов
/ 24 мая 2011

У вас есть реализация Open Source MD5, SHA-1, SHA-256 и Adler32 в модуле SynCrypto.pas .Также включено шифрование AES-256.

Это устройство было очень оптимизировано для скорости (SHA-256 и AES-256 даже профилированы на уровне asm), и также может использовать очень быстрые инструкции реального времени процессора VIA C3 / C7 / Nanoесли доступно.

Работает с Delphi 6 до XE.

5 голосов
/ 24 мая 2011

TurboPower LockBox является бесплатным и открытым исходным кодом и реализует SHA1, а также многие другие:

Особенности

  • AES
  • SHA2 (включая новый SHA-512/224 и SHA-512/256)
  • DES / 3DES
  • Рыба-Окунь
  • Twofish
  • SHA1
  • MD5
  • RSA Sign & Подтвердить
  • Режимы цепочки: ECB, CBC, CFB8, CFB, CTR, ECB, OFB, PCBC

Версия 3 официально поддерживает Delphi 2007 и Delphi 2010 (но может работать с Delphi 7), но Версия 2 поддерживает более старые версии Delphi.

3 голосов
/ 25 мая 2011

Скорее всего, вы уже предустановили реализацию SHA-1 в блоке IdHashSHA1 (часть Indy 10).

...