A Portable SHA1 implementation in Forth
To add to your gforth project
s" sha1.fs" included
s" abc" sha1 digest
Which will print out the sha1 digest. The values of the 160 bit digest are in the sha-digest buffer.
This implementation is based on
http://www.itl.nist.gov/fipspubs/fip180-1.htm
and is a straight forward implementation based on the mainline algo.
Little effort has been put into optimizing the forth, and even less for speed.
Please send any complaints or patches to:
David Goehrig <dave@dloh.org>