Added test program for md5 hashes.

diff --git a/t/md5.c b/t/md5.c
new file mode 100644 (file)
index 0000000..570e613
--- /dev/null
+++ b/t/md5.c
@@ -0,0 +1,107 @@
+/*
+ * test program for uuid library
+ *
+ * written by nathan wagner and placed in the public domain
+ */
+#include <stdio.h>
+#include <string.h>
+#include <stdlib.h>
+#include <time.h>
+
+#include "hash.h"
+#include "pduuid.h"
+#include "ctap.h"
+
+static int strbytes(char *s, unsigned char *d) {
+        unsigned int byte;
+        int i = 0;
+
+       if (!s) return 0;
+        if (*s == 0) return 0;
+
+       while (*s) {
+                if (*s == '-' || *s == ':') s++;
+
+                if (sscanf(s, "%02x", &byte) != 1) {
+                        return 0;
+                }
+                s += 2;
+                d[i++] = byte & 0xff;
+        }
+        return i;
+}
+
+void ufmt(pd_uuid_t *uuid, char *s) {
+       int i;
+       for (i=0;i<4;i++) {
+               s += sprintf(s, "%02x", uuid->data[i]);
+       }
+       s += sprintf(s, "-");
+       for (;i<6;i++) {
+               s += sprintf(s, "%02x", uuid->data[i]);
+       }
+       s += sprintf(s, "-");
+       for (;i<8;i++) {
+               s += sprintf(s, "%02x", uuid->data[i]);
+       }
+       s += sprintf(s, "-");
+       for (;i<10;i++) {
+               s += sprintf(s, "%02x", uuid->data[i]);
+       }
+       s += sprintf(s, "-");
+       for (;i<16;i++) {
+               s += sprintf(s, "%02x", uuid->data[i]);
+       }
+}
+
+int str_ok(pd_uuid_t *uuid, char *s, char *name) {
+       char fmt[37];
+       ufmt(uuid, fmt);
+       is_string(s, fmt, name);
+       return 0;
+}
+
+int main(int ac, char *av[]) {
+       unsigned char tmp[16];
+       hash_state md;
+       int i;
+
+       static const struct {
+               char *msg;
+               unsigned char hash[16];
+  } tests[] = {
+    { "",
+      { 0xd4, 0x1d, 0x8c, 0xd9, 0x8f, 0x00, 0xb2, 0x04,
+        0xe9, 0x80, 0x09, 0x98, 0xec, 0xf8, 0x42, 0x7e } },
+    { "a",
+      {0x0c, 0xc1, 0x75, 0xb9, 0xc0, 0xf1, 0xb6, 0xa8,
+       0x31, 0xc3, 0x99, 0xe2, 0x69, 0x77, 0x26, 0x61 } },
+    { "abc",
+      { 0x90, 0x01, 0x50, 0x98, 0x3c, 0xd2, 0x4f, 0xb0,
+        0xd6, 0x96, 0x3f, 0x7d, 0x28, 0xe1, 0x7f, 0x72 } },
+    { "message digest",
+      { 0xf9, 0x6b, 0x69, 0x7d, 0x7c, 0xb7, 0x93, 0x8d,
+        0x52, 0x5a, 0x2f, 0x31, 0xaa, 0xf1, 0x61, 0xd0 } },
+    { "abcdefghijklmnopqrstuvwxyz",
+      { 0xc3, 0xfc, 0xd3, 0xd7, 0x61, 0x92, 0xe4, 0x00,
+        0x7d, 0xfb, 0x49, 0x6c, 0xca, 0x67, 0xe1, 0x3b } },
+    { "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789",
+      { 0xd1, 0x74, 0xab, 0x98, 0xd2, 0x77, 0xd9, 0xf5,
+        0xa5, 0x61, 0x1c, 0x2c, 0x9f, 0x41, 0x9d, 0x9f } },
+    { "12345678901234567890123456789012345678901234567890123456789012345678901234567890",
+      { 0x57, 0xed, 0xf4, 0xa2, 0x2b, 0xe3, 0xc9, 0x55,
+        0xac, 0x49, 0xda, 0x2e, 0x21, 0x07, 0xb6, 0x7a } },
+    { NULL, { 0 } }
+  };
+
+       plan(7);
+
+       for (i = 0; tests[i].msg != NULL; i++) {
+               md5_init(&md);
+               md5_process(&md, (unsigned char *)tests[i].msg, (unsigned long)strlen(tests[i].msg));
+               md5_done(&md, tmp);
+               ok(memcmp(tmp, tests[i].hash, 16) == 0, "md5 %s", tests[i].msg);
+       }
+
+       return 0;
+}