libventi: add functions vtsha1 and vtsha1check

These functions are equivalent to vtSha1 and vtSha1Check
from the old libventi and are particularly used by Fossil.

R=rsc
http://codereview.appspot.com/5555064

2 files changed, 29 insertions, 0 deletions

diff --git a/src/libventi/mkfile b/src/libventi/mkfile
index 289262ac..37881855 100644
--- a/src/libventi/mkfile
+++ b/src/libventi/mkfile
@@ -24,6 +24,7 @@ OFILES=\
 	scorefmt.$O\
 	send.$O\
 	server.$O\
+	sha1.$O\
 	srvhello.$O\
 	strdup.$O\
 	string.$O\
diff --git a/src/libventi/sha1.c b/src/libventi/sha1.c
new file mode 100644
index 00000000..358f923d
--- /dev/null
+++ b/src/libventi/sha1.c
@@ -0,0 +1,28 @@
+#include <u.h>
+#include <libc.h>
+#include <venti.h>
+#include <libsec.h>
+
+void
+vtsha1(uchar score[VtScoreSize], uchar *p, int n)
+{
+	DigestState ds;
+
+	memset(&ds, 0, sizeof ds);
+	sha1(p, n, score, &ds);
+}
+
+int
+vtsha1check(uchar score[VtScoreSize], uchar *p, int n)
+{
+	DigestState ds;
+	uchar score2[VtScoreSize];
+
+	memset(&ds, 0, sizeof ds);
+	sha1(p, n, score2, &ds);
+	if(memcmp(score, score2, VtScoreSize) != 0) {
+		werrstr("vtsha1check failed");
+		return -1;
+	}
+	return 0;
+}