59 lines
1.4 KiB
C
59 lines
1.4 KiB
C
|
/* 3cbc_enc.c */
|
||
|
|
/* Copyright (C) 1993 Eric Young - see README for more details */
|
||
|
|
|
||
|
|
/*-
|
||
|
|
* $Id: 3cbc_enc.c,v 1.2 1994/07/19 19:21:37 g89r4222 Exp $
|
||
|
|
*/
|
||
|
|
|
||
|
|
#include "des_locl.h"
|
||
|
|
|
||
|
|
int des_3cbc_encrypt(input,output,length,ks1,ks2,iv1,iv2,encrypt)
|
||
|
|
des_cblock *input;
|
||
|
|
des_cblock *output;
|
||
|
|
long length;
|
||
|
|
des_key_schedule ks1,ks2;
|
||
|
|
des_cblock *iv1,*iv2;
|
||
|
|
int encrypt;
|
||
|
|
{
|
||
|
|
int off=length/8-1;
|
||
|
|
des_cblock niv1,niv2;
|
||
|
|
|
||
|
|
printf("3cbc\n");
|
||
|
|
xp(iv1);
|
||
|
|
xp(iv1);
|
||
|
|
xp(iv2);
|
||
|
|
xp(input);
|
||
|
|
if (encrypt == DES_ENCRYPT)
|
||
|
|
{
|
||
|
|
des_cbc_encrypt(input,output,length,ks1,iv1,encrypt);
|
||
|
|
if (length >= sizeof(des_cblock))
|
||
|
|
bcopy(output[off],niv1,sizeof(des_cblock));
|
||
|
|
des_cbc_encrypt(output,output,length,ks2,iv1,!encrypt);
|
||
|
|
des_cbc_encrypt(output,output,length,ks1,iv2, encrypt);
|
||
|
|
if (length >= sizeof(des_cblock))
|
||
|
|
bcopy(output[off],niv2,sizeof(des_cblock));
|
||
|
|
bcopy(niv1,*iv1,sizeof(des_cblock));
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if (length >= sizeof(des_cblock))
|
||
|
|
bcopy(input[off],niv1,sizeof(des_cblock));
|
||
|
|
des_cbc_encrypt(input,output,length,ks1,iv1,encrypt);
|
||
|
|
des_cbc_encrypt(output,output,length,ks2,iv2,!encrypt);
|
||
|
|
if (length >= sizeof(des_cblock))
|
||
|
|
bcopy(output[off],niv2,sizeof(des_cblock));
|
||
|
|
des_cbc_encrypt(output,output,length,ks1,iv2, encrypt);
|
||
|
|
}
|
||
|
|
bcopy(niv1,iv1,sizeof(des_cblock));
|
||
|
|
bcopy(niv2,iv2,sizeof(des_cblock));
|
||
|
|
xp(iv1);
|
||
|
|
xp(iv1);
|
||
|
|
xp(iv2);
|
||
|
|
xp(output);
|
||
|
|
return(0);
|
||
|
|
}
|
||
|
|
|
||
|
|
xp(a)
|
||
|
|
unsigned char *a;
|
||
|
|
{ int i; for(i=0; i<8; i++) printf("%02X",a[i]);printf("\n");}
|