src/lib/crypto/md5/md5crypto.c

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