mirror of
http://galexander.org/git/simplesshd.git
synced 2024-11-13 18:58:57 +00:00
83 lines
2.1 KiB
C
83 lines
2.1 KiB
C
|
#include <tomcrypt_test.h>
|
||
|
|
|
||
|
|
#ifdef MDSA
|
||
|
|
|
||
|
|
int dsa_test(void)
|
||
|
|
{
|
||
|
|
unsigned char msg[16], out[1024], out2[1024];
|
||
|
|
unsigned long x, y;
|
||
|
|
int stat1, stat2;
|
||
|
|
dsa_key key, key2;
|
||
|
|
|
||
|
|
/* make a random key */
|
||
|
|
DO(dsa_make_key(&yarrow_prng, find_prng("yarrow"), 20, 128, &key));
|
||
|
|
|
||
|
|
/* verify it */
|
||
|
|
DO(dsa_verify_key(&key, &stat1));
|
||
|
|
if (stat1 == 0) { fprintf(stderr, "dsa_verify_key "); return 1; }
|
||
|
|
|
||
|
|
/* encrypt a message */
|
||
|
|
for (x = 0; x < 16; x++) { msg[x] = x; }
|
||
|
|
x = sizeof(out);
|
||
|
|
DO(dsa_encrypt_key(msg, 16, out, &x, &yarrow_prng, find_prng("yarrow"), find_hash("sha1"), &key));
|
||
|
|
|
||
|
|
/* decrypt */
|
||
|
|
y = sizeof(out2);
|
||
|
|
DO(dsa_decrypt_key(out, x, out2, &y, &key));
|
||
|
|
|
||
|
|
if (y != 16 || memcmp(out2, msg, 16)) {
|
||
|
|
fprintf(stderr, "dsa_decrypt failed, y == %lu\n", y);
|
||
|
|
return 1;
|
||
|
|
}
|
||
|
|
|
||
|
|
/* sign the message */
|
||
|
|
x = sizeof(out);
|
||
|
|
DO(dsa_sign_hash(msg, sizeof(msg), out, &x, &yarrow_prng, find_prng("yarrow"), &key));
|
||
|
|
|
||
|
|
/* verify it once */
|
||
|
|
DO(dsa_verify_hash(out, x, msg, sizeof(msg), &stat1, &key));
|
||
|
|
|
||
|
|
/* Modify and verify again */
|
||
|
|
msg[0] ^= 1;
|
||
|
|
DO(dsa_verify_hash(out, x, msg, sizeof(msg), &stat2, &key));
|
||
|
|
msg[0] ^= 1;
|
||
|
|
if (!(stat1 == 1 && stat2 == 0)) { fprintf(stderr, "dsa_verify %d %d", stat1, stat2); return 1; }
|
||
|
|
|
||
|
|
/* test exporting it */
|
||
|
|
x = sizeof(out2);
|
||
|
|
DO(dsa_export(out2, &x, PK_PRIVATE, &key));
|
||
|
|
DO(dsa_import(out2, x, &key2));
|
||
|
|
|
||
|
|
/* verify a signature with it */
|
||
|
|
DO(dsa_verify_hash(out, x, msg, sizeof(msg), &stat1, &key2));
|
||
|
|
if (stat1 == 0) { fprintf(stderr, "dsa_verify (import private) %d ", stat1); return 1; }
|
||
|
|
dsa_free(&key2);
|
||
|
|
|
||
|
|
/* export as public now */
|
||
|
|
x = sizeof(out2);
|
||
|
|
DO(dsa_export(out2, &x, PK_PUBLIC, &key));
|
||
|
|
|
||
|
|
DO(dsa_import(out2, x, &key2));
|
||
|
|
/* verify a signature with it */
|
||
|
|
DO(dsa_verify_hash(out, x, msg, sizeof(msg), &stat1, &key2));
|
||
|
|
if (stat1 == 0) { fprintf(stderr, "dsa_verify (import public) %d ", stat1); return 1; }
|
||
|
|
dsa_free(&key2);
|
||
|
|
dsa_free(&key);
|
||
|
|
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
#else
|
||
|
|
|
||
|
|
int dsa_test(void)
|
||
|
|
{
|
||
|
|
fprintf(stderr, "NOP");
|
||
|
|
return 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
#endif
|
||
|
|
|
||
|
|
/* $Source: /cvs/libtom/libtomcrypt/testprof/dsa_test.c,v $ */
|
||
|
|
/* $Revision: 1.9 $ */
|
||
|
|
/* $Date: 2005/10/30 18:49:14 $ */
|