Don Libes wrote:

I made a pure-Tcl SHA1. It's not ready for tcllib yet - I might work on its efficiency and documentation a bit more. (The documentation is especially rough as I basically took the md5 documentation and did global search and replace :-)

Anyway, it appears to work. You can try it out at:

http://expect.nist.gov/sha1pure

Let me know if you encounter any problems. I'd also be interested if anyone comes up with any good ways to speed it up. sha1 is more complex than md5 and at the moment, the implementation is about 1/3 the speed of md5pure.