Files
heimdal/lib/krb5/encrypt.c
Assar Westerlund 4c837b62d3 moved krb5_decrypt
git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@1326 ec53bebd-3082-4978-b11e-865c3cabbd6b
1997-03-09 20:02:54 +00:00

42 lines
861 B
C

#include <krb5_locl.h>
#include "crc.h"
RCSID("$Id$");
krb5_error_code
krb5_encrypt (krb5_context context,
void *ptr,
size_t len,
krb5_keyblock *keyblock,
krb5_data *result)
{
u_char *p;
u_long crc;
size_t sz;
des_cblock key;
des_key_schedule schedule;
sz = len + 12;
sz = (sz + 7) & ~7;
p = malloc (sz);
if (p == NULL)
return ENOMEM;
memset (p, 0, sz);
des_rand_data (p, 8);
memcpy (p + 12, ptr, len);
crc_init_table ();
crc = crc_update (p, sz, 0);
p[8] = crc & 0xff;
p[9] = (crc >> 8) & 0xff;
p[10] = (crc >> 16) & 0xff;
p[11] = (crc >> 24) & 0xff;
memcpy (&key, keyblock->contents.data, sizeof(key));
des_set_key (&key, schedule);
des_cbc_encrypt ((des_cblock *)p, (des_cblock *)p, sz, schedule, &key, DES_ENCRYPT);
result->data = p;
result->length = sz;
return 0;
}