Geek Answers Handbook

Search for FOSS SHA1

I am looking for an implementation of FOSS SHA1 for use with Delphi (7).

Preferably something small, maybe even a standalone SHA1, rather than the past from an extensive library. Ease of installation and use is good, but of course reliability is number 1 priority.

Update: Thanks Rob, this code works like a dream

+8
delphi sha1
source share
6 answers

Use the cryptography API built into the OS. You can use the Hashes.pas Domingo Seoane block to use it in Delphi, or you can write your own procedure using CryptAcquireContext, CryptCreateHash, callbacks in CryptHashData and finally CryptGetHashParam to get the result.

I do not understand it either for free (as in a speech) or open source, but there are also no distribution requirements, since it is already included in all the systems of your clients.

+6
source share

TurboPower LockBox is free and open source and implements SHA1, as well as many others:

Functions

  • AES
  • SHA2 (including the new SHA-512/224 and SHA-512/256)
  • DES / 3DES
  • Blowfish
  • Twofish
  • SHA1
  • MD5
  • RSA Sign & Confirm
  • Chains: ECB, CBC, CFB8, CFB, CTR, ECB, OFB, PCBC

Version 3 officially supports Delphi 2007 and Delphi 2010 (but can work with Delphi 7), but version 2 supports older versions of Delphi.

+5
source share

You have an implementation of Open Source MD5, SHA-1, SHA-256, and Adler32 in SynCrypto.pas . There is also AES-256 encryption.

This unit has been very optimized for speed (SHA-256 AES-256 was even profiled at asm level), and can also use very fast real-time VIA C3 / C7 / Nano CPU commands, if available.

Works with Delphi 6 to XE.

+5
source share

There seems to be one in http://delphi.icm.edu.pl/ftp/d20free/cipher.zip (link found at http://www.efg2.com/Lab/Library/Delphi/Algorithms/index. html )

+3
source share

You probably already have the SHA-1 implementation pre-installed in the IdHashSHA1 module (part of Indy 10).

+3
source share

I was looking for the same thing and I didn’t like what I found, so write this: http://yoy.be/sha1

+1
source share

More articles:


All Articles