1 files changed, 68 insertions, 0 deletions
diff --git a/lib/libmd/tests/skeindriver.c b/lib/libmd/tests/skeindriver.c
new file mode 100644
index 000000000000..a28ac8fc2c2a
--- /dev/null
+++ b/lib/libmd/tests/skeindriver.c
@@ -0,0 +1,68 @@
+/* SKEINDRIVER.C - test driver for SKEIN */
+
+/*-
+ * SPDX-License-Identifier: RSA-MD
+ *
+ * Copyright (C) 1990-2, RSA Data Security, Inc. Created 1990. All rights
+ * reserved.
+ * 
+ * RSA Data Security, Inc. makes no representations concerning either the
+ * merchantability of this software or the suitability of this software for
+ * any particular purpose. It is provided "as is" without express or implied
+ * warranty of any kind.
+ * 
+ * These notices must be retained in any copies of any part of this
+ * documentation and/or software. */
+
+#include <sys/types.h>
+
+#include <stdio.h>
+#include <time.h>
+#include <string.h>
+
+#include "skein.h"
+
+/* The following makes SKEIN default to SKEIN512 if it has not already been
+ * defined with C compiler flags. */
+#ifndef SKEIN
+#define SKEIN 512
+#endif
+
+#if SKEIN == 256
+#undef SKEIN_Data
+#define SKEIN_Data SKEIN256_Data
+#elif SKEIN == 512
+#undef SKEIN_Data
+#define SKEIN_Data SKEIN512_Data
+#elif SKEIN == 1024
+#undef SKEIN_Data
+#define SKEIN_Data SKEIN1024_Data
+#endif
+
+/* Digests a string and prints the result. */
+static void
+SKEINString(const char *string)
+{
+	char buf[2*128 + 1];
+
+	printf("SKEIN%d (\"%s\") = %s\n",
+	       SKEIN, string, SKEIN_Data(string, strlen(string), buf));
+}
+
+/* Digests a reference suite of strings and prints the results. */
+int
+main(void)
+{
+	printf("SKEIN%d test suite:\n", SKEIN);
+
+	SKEINString("");
+	SKEINString("abc");
+	SKEINString("message digest");
+	SKEINString("abcdefghijklmnopqrstuvwxyz");
+	SKEINString("ABCDEFGHIJKLMNOPQRSTUVWXYZ"
+		  "abcdefghijklmnopqrstuvwxyz0123456789");
+	SKEINString("1234567890123456789012345678901234567890"
+		  "1234567890123456789012345678901234567890");
+
+	return 0;
+}