summaryrefslogtreecommitdiff
path: root/testprof/dh_tests.c
diff options
context:
space:
mode:
Diffstat (limited to 'testprof/dh_tests.c')
-rw-r--r--testprof/dh_tests.c103
1 files changed, 0 insertions, 103 deletions
diff --git a/testprof/dh_tests.c b/testprof/dh_tests.c
deleted file mode 100644
index 3852e47..0000000
--- a/testprof/dh_tests.c
+++ /dev/null
@@ -1,103 +0,0 @@
-#include <tomcrypt_test.h>
-
-#ifdef MDH
-
-int dh_tests (void)
-{
- unsigned char buf[3][4096];
- unsigned long x, y, z;
- int stat, stat2;
- dh_key usera, userb;
-
- DO(dh_test());
-
- /* make up two keys */
- DO(dh_make_key (&yarrow_prng, find_prng ("yarrow"), 512, &usera));
- DO(dh_make_key (&yarrow_prng, find_prng ("yarrow"), 512, &userb));
-
- /* make the shared secret */
- x = 4096;
- DO(dh_shared_secret (&usera, &userb, buf[0], &x));
-
- y = 4096;
- DO(dh_shared_secret (&userb, &usera, buf[1], &y));
- if (y != x) {
- fprintf(stderr, "DH Shared keys are not same size.\n");
- return 1;
- }
- if (memcmp (buf[0], buf[1], x)) {
- fprintf(stderr, "DH Shared keys not same contents.\n");
- return 1;
- }
-
- /* now export userb */
- y = 4096;
- DO(dh_export (buf[1], &y, PK_PUBLIC, &userb));
- dh_free (&userb);
-
- /* import and make the shared secret again */
- DO(dh_import (buf[1], y, &userb));
- z = 4096;
- DO(dh_shared_secret (&usera, &userb, buf[2], &z));
-
- if (z != x) {
- fprintf(stderr, "failed. Size don't match?\n");
- return 1;
- }
- if (memcmp (buf[0], buf[2], x)) {
- fprintf(stderr, "Failed. Content didn't match.\n");
- return 1;
- }
- dh_free (&usera);
- dh_free (&userb);
-
-/* test encrypt_key */
- dh_make_key (&yarrow_prng, find_prng ("yarrow"), 512, &usera);
- for (x = 0; x < 16; x++) {
- buf[0][x] = x;
- }
- y = sizeof (buf[1]);
- DO(dh_encrypt_key (buf[0], 16, buf[1], &y, &yarrow_prng, find_prng ("yarrow"), find_hash ("md5"), &usera));
- zeromem (buf[0], sizeof (buf[0]));
- x = sizeof (buf[0]);
- DO(dh_decrypt_key (buf[1], y, buf[0], &x, &usera));
- if (x != 16) {
- fprintf(stderr, "Failed (length)\n");
- return 1;
- }
- for (x = 0; x < 16; x++)
- if (buf[0][x] != x) {
- fprintf(stderr, "Failed (contents)\n");
- return 1;
- }
-
-/* test sign_hash */
- for (x = 0; x < 16; x++) {
- buf[0][x] = x;
- }
- x = sizeof (buf[1]);
- DO(dh_sign_hash (buf[0], 16, buf[1], &x, &yarrow_prng , find_prng ("yarrow"), &usera));
- DO(dh_verify_hash (buf[1], x, buf[0], 16, &stat, &usera));
- buf[0][0] ^= 1;
- DO(dh_verify_hash (buf[1], x, buf[0], 16, &stat2, &usera));
- if (!(stat == 1 && stat2 == 0)) {
- fprintf(stderr, "dh_sign/verify_hash %d %d", stat, stat2);
- return 1;
- }
- dh_free (&usera);
- return 0;
-}
-
-#else
-
-int dh_tests(void)
-{
- fprintf(stderr, "NOP");
- return 0;
-}
-
-#endif
-
-/* $Source: /cvs/libtom/libtomcrypt/testprof/dh_tests.c,v $ */
-/* $Revision: 1.5 $ */
-/* $Date: 2005/05/21 12:51:25 $ */