1 files changed, 70 insertions, 0 deletions
diff --git a/lib/libcrypt/test/speedcrypt.c b/lib/libcrypt/test/speedcrypt.c
new file mode 100644
index 0000000..13c8f82
--- /dev/null
+++ b/lib/libcrypt/test/speedcrypt.c
@@ -0,0 +1,70 @@
+#include <sys/types.h>
+#include <sys/time.h>
+#include <sys/resource.h>
+#include <signal.h>
+#include <stdio.h>
+
+int		keep_going, count, seconds;
+struct rusage	prior, now;
+
+void
+finish()
+{
+	keep_going = 0;
+}
+
+
+main(int argc, char *argv[])
+{
+	struct itimerval itv;
+	u_long		msecs, key1[8], key2[8];
+	char		*k1, *k2;
+        char            *token, deftok[] = "eek";
+
+	if (argc < 2 || sscanf(argv[1], "%d", &seconds) != 1)
+		seconds = 20;
+
+	if (argc < 3) {
+             token = &deftok[0];
+        } else {
+             token = argv[2];
+        }
+
+	printf ("Running crypt for %d seconds of vtime\n", seconds);
+
+	bzero(&itv, sizeof (itv));
+	signal (SIGVTALRM, finish);
+	itv.it_value.tv_sec = seconds;
+	itv.it_value.tv_usec = 0;
+	setitimer(ITIMER_VIRTUAL, &itv, NULL);
+
+	keep_going = 1;
+
+	k1 = (char *) key1;
+	k2 = (char *) key2;
+	strcpy(k1, "fredfredfredfredfred");
+	strcpy(k2, "joejoejoejoejoejoejo");
+
+        printf("Dry run (to verify seed token):\n\tcrypt(\"test\", \"%s\")\n",
+               token);
+        printf("\t=> \"%s\"\nTesting...", crypt("test", token));
+        fflush(stdout);
+
+	if (getrusage(0, &prior) < 0) {
+		perror("getrusage");
+		exit(1);
+	}
+
+	for (count = 0; keep_going; count++) {
+		crypt((count & 1) ? k1 : k2, token);
+	}
+
+	if (getrusage(0, &now) < 0) {
+		perror("getrusage");
+		exit(1);
+	}
+	msecs = (now.ru_utime.tv_sec - prior.ru_utime.tv_sec) * 1000
+	      + (now.ru_utime.tv_usec - prior.ru_utime.tv_usec) / 1000;
+	printf ("\tDid %d crypt()s per second.\n", 1000 * count / msecs);
+	exit(0);
+}