SHA1 now available in Tcl code