generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

MMT for CFB1

Browse Source
This commit is contained in:
Ben Laurie 2003-07-29 14:34:48 +00:00
parent 0b8c5413a4
commit e1c0a9c416
1 changed files with 43 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

60
fips/aes/fips_aesavs.c
View File

@ -30,7 +30,7 @@ int AESTest(EVP_CIPHER_CTX *ctx,
char *amode, int akeysz, unsigned char *aKey, char *amode, int akeysz, unsigned char *aKey,
unsigned char *iVec, unsigned char *iVec,
int dir, /* 0 = decrypt, 1 = encrypt */ int dir, /* 0 = decrypt, 1 = encrypt */
char *plaintext, unsigned char *ciphertext, int len) unsigned char *plaintext, unsigned char *ciphertext, int len)
{ {
const EVP_CIPHER *cipher = NULL; const EVP_CIPHER *cipher = NULL;
int ret = 1; int ret = 1;
@ -52,7 +52,7 @@ int AESTest(EVP_CIPHER_CTX *ctx,
else else
{ {
printf("Unknown mode: %s\n", amode); printf("Unknown mode: %s\n", amode);
ret = 0; exit(1);
} }
if (ret) if (ret)
{ {
@ -201,6 +201,27 @@ int bin2hex(unsigned char *in, int len, char *out)
return n2; return n2;
} }
/* NB: this return the number of _bits_ read */
int bint2bin(const char *in, int len, unsigned char *out)
{
int n;
memset(out,0,len);
for(n=0 ; n < len ; ++n)
if(in[n] == '1')
out[n/8]|=(0x80 >> (n%8));
return len;
}
int bin2bint(const unsigned char *in,int len,char *out)
{
int n;
for(n=0 ; n < len ; ++n)
out[n]=(in[n/8]&(0x80 >> (n%8))) ? '1' : '0';
return n;
}
/*-----------------------------------------------*/ /*-----------------------------------------------*/
void PrintValue(char *tag, unsigned char *val, int len) void PrintValue(char *tag, unsigned char *val, int len)
@ -219,12 +240,11 @@ void OutputValue(char *tag, unsigned char *val, int len, FILE *rfp,int bitmode)
int olen; int olen;
if(bitmode) if(bitmode)
fprintf(rfp,"%s = %d\n",tag,val[0] ? 1 : 0); olen=bin2bint(val,len,obuf);
else else
{ olen=bin2hex(val,len,obuf);
olen = bin2hex(val, len, obuf);
fprintf(rfp, "%s = %.*s\n", tag, olen, obuf); fprintf(rfp, "%s = %.*s\n", tag, olen, obuf);
}
#if VERBOSE #if VERBOSE
printf("%s = %.*s\n", tag, olen, obuf); printf("%s = %.*s\n", tag, olen, obuf);
#endif #endif
@ -304,7 +324,7 @@ int do_mct(char *amode,
{ /* set up encryption */ { /* set up encryption */
ret = AESTest(&ctx, amode, akeysz, key[i], NULL, ret = AESTest(&ctx, amode, akeysz, key[i], NULL,
dir, /* 0 = decrypt, 1 = encrypt */ dir, /* 0 = decrypt, 1 = encrypt */
(char*)ptext[j], ctext[j], len); ptext[j], ctext[j], len);
if (dir == XENCRYPT) if (dir == XENCRYPT)
memcpy(ptext[j+1], ctext[j], len); memcpy(ptext[j+1], ctext[j], len);
else else
@ -332,7 +352,7 @@ int do_mct(char *amode,
{ {
ret = AESTest(&ctx, amode, akeysz, key[i], iv[i], ret = AESTest(&ctx, amode, akeysz, key[i], iv[i],
dir, /* 0 = decrypt, 1 = encrypt */ dir, /* 0 = decrypt, 1 = encrypt */
(char*)ptext[j], ctext[j], len); ptext[j], ctext[j], len);
if (dir == XENCRYPT) if (dir == XENCRYPT)
memcpy(ptext[j+1], iv[i], len); memcpy(ptext[j+1], iv[i], len);
else else
@ -358,7 +378,7 @@ int do_mct(char *amode,
{ {
ret = AESTest(&ctx, amode, akeysz, key[i], iv[i], ret = AESTest(&ctx, amode, akeysz, key[i], iv[i],
dir, /* 0 = decrypt, 1 = encrypt */ dir, /* 0 = decrypt, 1 = encrypt */
(char*)ptext[j], ctext[j], len); ptext[j], ctext[j], len);
} }
else else
{ {
@ -390,7 +410,7 @@ int do_mct(char *amode,
if(i == 0) if(i == 0)
ptext[0][0]<<=7; ptext[0][0]<<=7;
ret=AESTest(&ctx,amode,akeysz,key[i],iv[i],dir, ret=AESTest(&ctx,amode,akeysz,key[i],iv[i],dir,
(char*)ptext[j], ctext[j], len); ptext[j], ctext[j], len);
} }
else else
{ {
@ -562,7 +582,7 @@ int proc_file(char *rqfile)
int akeysz = 0; int akeysz = 0;
unsigned char iVec[20], aKey[40]; unsigned char iVec[20], aKey[40];
int dir = -1, err = 0, step = 0; int dir = -1, err = 0, step = 0;
char plaintext[2048]; unsigned char plaintext[2048];
unsigned char ciphertext[2048]; unsigned char ciphertext[2048];
char *rp; char *rp;
EVP_CIPHER_CTX ctx; EVP_CIPHER_CTX ctx;
@ -748,8 +768,10 @@ int proc_file(char *rqfile)
else else
{ {
int nn = strlen(ibuf+12); int nn = strlen(ibuf+12);
len = hex2bin((char*)ibuf+12, nn-1, if(!strcmp(amode,"CFB1"))
(unsigned char*)plaintext); len=bint2bin(ibuf+12,nn-1,plaintext);
else
len=hex2bin(ibuf+12, nn-1,plaintext);
if (len < 0) if (len < 0)
{ {
printf("Invalid PLAINTEXT: %s", ibuf+12); printf("Invalid PLAINTEXT: %s", ibuf+12);
@ -773,7 +795,8 @@ int proc_file(char *rqfile)
ret = AESTest(&ctx, amode, akeysz, aKey, iVec, ret = AESTest(&ctx, amode, akeysz, aKey, iVec,
dir, /* 0 = decrypt, 1 = encrypt */ dir, /* 0 = decrypt, 1 = encrypt */
plaintext, ciphertext, len); plaintext, ciphertext, len);
OutputValue("CIPHERTEXT",ciphertext,len,rfp,0); OutputValue("CIPHERTEXT",ciphertext,len,rfp,
!strcmp(amode,"CFB1"));
} }
step = 6; step = 6;
} }
@ -788,7 +811,10 @@ int proc_file(char *rqfile)
} }
else else
{ {
len = hex2bin((char*)ibuf+13, strlen(ibuf+13)-1, ciphertext); if(!strcmp(amode,"CFB1"))
len=bint2bin(ibuf+13,strlen(ibuf+13)-1,ciphertext);
else
len = hex2bin(ibuf+13,strlen(ibuf+13)-1,ciphertext);
if (len < 0) if (len < 0)
{ {
printf("Invalid CIPHERTEXT\n"); printf("Invalid CIPHERTEXT\n");
@ -808,7 +834,7 @@ int proc_file(char *rqfile)
dir, /* 0 = decrypt, 1 = encrypt */ dir, /* 0 = decrypt, 1 = encrypt */
plaintext, ciphertext, len); plaintext, ciphertext, len);
OutputValue("PLAINTEXT",(unsigned char *)plaintext,len,rfp, OutputValue("PLAINTEXT",(unsigned char *)plaintext,len,rfp,
0); !strcmp(amode,"CFB1"));
} }
step = 6; step = 6;
} }