1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
|
#if !defined(lint) && !defined(SABER)
static char rcsid_md5crypto_c[] = "$Id$";
#endif
#include <krb5/krb5.h>
#include <krb5/ext-proto.h>
#include <krb5/rsa-md5.h>
#include "../des/des_int.h" /* we cheat a bit and call it directly... */
static krb5_error_code
md5_crypto_sum_func(in, in_length, seed, seed_length, outcksum)
krb5_pointer in;
size_t in_length;
krb5_pointer seed;
size_t seed_length;
krb5_checksum *outcksum;
{
krb5_octet outtmp[RSA_MD5_DES_CKSUM_LENGTH];
krb5_octet *input = (krb5_octet *)in;
krb5_encrypt_block eblock;
krb5_keyblock keyblock;
krb5_error_code retval;
MD5_CTX working;
MD5Init(&working);
MD5Update(&working, input, in_length);
MD5Final(&working);
outcksum->checksum_type = CKSUMTYPE_RSA_MD5_DES;
outcksum->length = RSA_MD5_DES_CKSUM_LENGTH;
memcpy((char *)outtmp, (char *)&working.digest[0], 16);
memset((char *)&working, 0, sizeof(working));
keyblock.length = seed_length;
keyblock.contents = (krb5_octet *)seed;
keyblock.keytype = KEYTYPE_DES;
if (retval = mit_des_process_key(&eblock, &keyblock))
return retval;
/* now encrypt it */
retval = mit_des_cbc_encrypt(&outtmp[0],
outcksum->contents,
RSA_MD5_DES_CKSUM_LENGTH,
(struct mit_des_ks_struct *)eblock.priv,
keyblock.contents,
MIT_DES_ENCRYPT);
if (retval) {
(void) mit_des_finish_key(&eblock);
return retval;
}
return mit_des_finish_key(&eblock);
}
krb5_checksum_entry rsa_md5_des_cksumtable_entry = {
md5_crypto_sum_func,
RSA_MD5_DES_CKSUM_LENGTH,
1, /* is collision proof */
1, /* uses key */
};
|