Add test source for sha1.

    Oops. Forgot.

1 files changed, 22 insertions, 0 deletions

diff --git a/libcryptohash/test/sha1-test.myr b/libcryptohash/test/sha1-test.myr
new file mode 100644
index 0000000..f4ac0f1
--- /dev/null
+++ b/libcryptohash/test/sha1-test.myr
@@ -0,0 +1,22 @@
+use std
+use cryptohash
+
+const main = {
+	print(cryptohash.sha1(""))
+	print(cryptohash.sha1("h"))
+	/* 64 byte block */
+	print(cryptohash.sha1("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa"))
+	/* tail spanning */
+	print(cryptohash.sha1("aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaabbbbb"))
+}
+
+const print = {b
+	for x in b
+		if (x <= 0xf)
+			std.put("0%xb", x)
+		else
+			std.put("%xb", x)
+		;;
+	;;
+        std.put("\n")
+}