#include "k5-int.h"
#include "etypes.h"
#include <stdio.h>
krb5_enctype interesting_enctypes[] = {
ENCTYPE_DES_CBC_CRC,
ENCTYPE_DES_CBC_MD4,
ENCTYPE_DES_CBC_MD5,
ENCTYPE_DES3_CBC_SHA1,
ENCTYPE_ARCFOUR_HMAC,
ENCTYPE_ARCFOUR_HMAC_EXP,
0
};
#define test(msg, exp) \
printf ("%s: . . . ", msg); \
retval = (exp);\
if( retval) { \
printf( "Failed: %s\n", error_message(retval)); \
abort(); \
} else printf ("OK\n");
int
main ()
{
krb5_context context = 0;
krb5_data in, out, check, state;
int i;
size_t len;
krb5_enc_data enc_out;
krb5_error_code retval;
krb5_keyblock *key;
in.data = "This is a test.\n";
in.length = strlen (in.data);
test ("Seeding random number generator",
krb5_c_random_seed (context, &in));
out.data = malloc(2048);
check.data = malloc(2048);
out.length = 2048;
check.length = 2048;
for (i = 0; interesting_enctypes[i]; i++) {
krb5_enctype enctype = interesting_enctypes [i];
printf ("Testing enctype %d\n", enctype);
test ("Initializing a keyblock",
krb5_init_keyblock (context, enctype, 0, &key));
test ("Generating random key",
krb5_c_make_random_key (context, enctype, key));
enc_out.ciphertext.data = out.data;
enc_out.ciphertext.length = out.length;
krb5_c_encrypt_length (context, key->enctype, in.length, &len);
enc_out.ciphertext.length = len;
test ("Encrypting",
krb5_c_encrypt (context, key, 7, 0, &in, &enc_out));
test ("Decrypting",
krb5_c_decrypt (context, key, 7, 0, &enc_out, &check));
test ("init_state",
krb5_c_init_state (context, key, 7, &state));
test ("Encrypting with state",
krb5_c_encrypt (context, key, 7, &state, &in, &enc_out));
test ("Decrypting",
krb5_c_decrypt (context, key, 7, 0, &enc_out, &check));
test ("free_state",
krb5_c_free_state (context, key, &state));
krb5_free_keyblock (context, key);
}
free(out.data);
free(check.data);
return 0;
}