oysteikt/heimdal
0
0
Fork 0
Code Issues 5 Pull Requests Releases Activity

Implement des-cbc-crc, and des-cbc-md5 in separate function.

Browse Source 
git-svn-id: svn://svn.h5l.se/heimdal/trunk/heimdal@1994 ec53bebd-3082-4978-b11e-865c3cabbd6b
This commit is contained in:
Johan Danielsson
1997-07-07 01:13:56 +00:00
parent 395f1a1ad0
commit 77a6593e3c
1 changed files with 75 additions and 31 deletions
Download Patch File Download Diff File Expand all files Collapse all files

58
lib/krb5/encrypt.c
View File

@@ -4,41 +4,85 @@
RCSID("$Id$");
krb5_error_code
krb5_encrypt (krb5_context context,
krb5_des_cbc_encrypt (krb5_context context,
void *ptr,
size_t len,
int etype,
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);
switch(etype){
case ETYPE_DES_CBC_MD5:
sz = 16;
break;
case ETYPE_DES_CBC_CRC:
sz = 4;
break;
default:
return KRB5_PROG_ETYPE_NOSUPP;
}
sz += len + 8;
sz = (sz + 7) & ~7; /* pad to 8 bytes */
p = calloc (1, sz);
if (p == NULL)
return ENOMEM;
memset (p, 0, sz);
des_new_random_key((des_cblock*)p);
#if 0
des_rand_data ((des_cblock*)p, 8);
#endif
memcpy (p + 12, ptr, len);
switch(etype){
case ETYPE_DES_CBC_MD5:
{
struct md5 m;
md5init(&m);
md5_update(&m, p, sz);
md5_finito(&m, p + 8);
break;
}
case ETYPE_DES_CBC_CRC:
{
u_int32_t crc;
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;
break;
}
}
memcpy (&key, keyblock->keyvalue.data, sizeof(key));
des_set_key (&key, schedule);
des_cbc_encrypt ((des_cblock *)p, (des_cblock *)p, sz, schedule, &key, DES_ENCRYPT);
des_cbc_encrypt ((des_cblock *)p, (des_cblock *)p, sz,
schedule, &key, DES_ENCRYPT);
result->data = p;
result->length = sz;
return 0;
}
krb5_error_code
krb5_encrypt (krb5_context context,
void *ptr,
size_t len,
int etype,
krb5_keyblock *keyblock,
krb5_data *result)
{
switch(etype){
case ETYPE_DES_CBC_MD5:
case ETYPE_DES_CBC_CRC:
return krb5_des_cbc_encrypt(context, ptr, len, etype,
keyblock, result);
}
return KRB5_PROG_ETYPE_NOSUPP;
}