[thirdparty/openssl.git] / crypto / bf / bftest.c

/* crypto/bf/bftest.c */
/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
 * All rights reserved.
 *
 * This package is an SSL implementation written
 * by Eric Young (eay@cryptsoft.com).
 * The implementation was written so as to conform with Netscapes SSL.
 * 
 * This library is free for commercial and non-commercial use as long as
 * the following conditions are aheared to.  The following conditions
 * apply to all code found in this distribution, be it the RC4, RSA,
 * lhash, DES, etc., code; not just the SSL code.  The SSL documentation
 * included with this distribution is covered by the same copyright terms
 * except that the holder is Tim Hudson (tjh@cryptsoft.com).
 * 
 * Copyright remains Eric Young's, and as such any Copyright notices in
 * the code are not to be removed.
 * If this package is used in a product, Eric Young should be given attribution
 * as the author of the parts of the library used.
 * This can be in the form of a textual message at program startup or
 * in documentation (online or textual) provided with the package.
 * 
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *    "This product includes cryptographic software written by
 *     Eric Young (eay@cryptsoft.com)"
 *    The word 'cryptographic' can be left out if the rouines from the library
 *    being used are not cryptographic related :-).
 * 4. If you include any Windows specific code (or a derivative thereof) from 
 *    the apps directory (application code) you must include an acknowledgement:
 *    "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
 * 
 * THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 * 
 * The licence and distribution terms for any publically available version or
 * derivative of this code cannot be changed.  i.e. this code cannot simply be
 * copied and put under another distribution licence
 * [including the GNU Public Licence.]
 */

/* This has been a quickly hacked 'ideatest.c'.  When I add tests for other
 * RC2 modes, more of the code will be uncommented. */

#include <stdio.h>
#include <string.h>
#include <stdlib.h>

#ifdef NO_BF
int main(int argc, char *argv[])
{
    printf("No BF support\n");
    return(0);
}
#else
#include <openssl/blowfish.h>

#ifdef CHARSET_EBCDIC
#include <openssl/ebcdic.h>
#endif

static char *bf_key[2]={
	"abcdefghijklmnopqrstuvwxyz",
	"Who is John Galt?"
	};

/* big endian */
static BF_LONG bf_plain[2][2]={
	{0x424c4f57L,0x46495348L},
	{0xfedcba98L,0x76543210L}
	};

static BF_LONG bf_cipher[2][2]={
	{0x324ed0feL,0xf413a203L},
	{0xcc91732bL,0x8022f684L}
	};
/************/

/* Lets use the DES test vectors :-) */
#define NUM_TESTS 34
static unsigned char ecb_data[NUM_TESTS][8]={
	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
	{0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	{0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	{0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	{0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10},
	{0x7C,0xA1,0x10,0x45,0x4A,0x1A,0x6E,0x57},
	{0x01,0x31,0xD9,0x61,0x9D,0xC1,0x37,0x6E},
	{0x07,0xA1,0x13,0x3E,0x4A,0x0B,0x26,0x86},
	{0x38,0x49,0x67,0x4C,0x26,0x02,0x31,0x9E},
	{0x04,0xB9,0x15,0xBA,0x43,0xFE,0xB5,0xB6},
	{0x01,0x13,0xB9,0x70,0xFD,0x34,0xF2,0xCE},
	{0x01,0x70,0xF1,0x75,0x46,0x8F,0xB5,0xE6},
	{0x43,0x29,0x7F,0xAD,0x38,0xE3,0x73,0xFE},
	{0x07,0xA7,0x13,0x70,0x45,0xDA,0x2A,0x16},
	{0x04,0x68,0x91,0x04,0xC2,0xFD,0x3B,0x2F},
	{0x37,0xD0,0x6B,0xB5,0x16,0xCB,0x75,0x46},
	{0x1F,0x08,0x26,0x0D,0x1A,0xC2,0x46,0x5E},
	{0x58,0x40,0x23,0x64,0x1A,0xBA,0x61,0x76},
	{0x02,0x58,0x16,0x16,0x46,0x29,0xB0,0x07},
	{0x49,0x79,0x3E,0xBC,0x79,0xB3,0x25,0x8F},
	{0x4F,0xB0,0x5E,0x15,0x15,0xAB,0x73,0xA7},
	{0x49,0xE9,0x5D,0x6D,0x4C,0xA2,0x29,0xBF},
	{0x01,0x83,0x10,0xDC,0x40,0x9B,0x26,0xD6},
	{0x1C,0x58,0x7F,0x1C,0x13,0x92,0x4F,0xEF},
	{0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01},
	{0x1F,0x1F,0x1F,0x1F,0x0E,0x0E,0x0E,0x0E},
	{0xE0,0xFE,0xE0,0xFE,0xF1,0xFE,0xF1,0xFE},
	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	{0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10}};

static unsigned char plain_data[NUM_TESTS][8]={
	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
	{0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x01},
	{0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
	{0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	{0x01,0xA1,0xD6,0xD0,0x39,0x77,0x67,0x42},
	{0x5C,0xD5,0x4C,0xA8,0x3D,0xEF,0x57,0xDA},
	{0x02,0x48,0xD4,0x38,0x06,0xF6,0x71,0x72},
	{0x51,0x45,0x4B,0x58,0x2D,0xDF,0x44,0x0A},
	{0x42,0xFD,0x44,0x30,0x59,0x57,0x7F,0xA2},
	{0x05,0x9B,0x5E,0x08,0x51,0xCF,0x14,0x3A},
	{0x07,0x56,0xD8,0xE0,0x77,0x47,0x61,0xD2},
	{0x76,0x25,0x14,0xB8,0x29,0xBF,0x48,0x6A},
	{0x3B,0xDD,0x11,0x90,0x49,0x37,0x28,0x02},
	{0x26,0x95,0x5F,0x68,0x35,0xAF,0x60,0x9A},
	{0x16,0x4D,0x5E,0x40,0x4F,0x27,0x52,0x32},
	{0x6B,0x05,0x6E,0x18,0x75,0x9F,0x5C,0xCA},
	{0x00,0x4B,0xD6,0xEF,0x09,0x17,0x60,0x62},
	{0x48,0x0D,0x39,0x00,0x6E,0xE7,0x62,0xF2},
	{0x43,0x75,0x40,0xC8,0x69,0x8F,0x3C,0xFA},
	{0x07,0x2D,0x43,0xA0,0x77,0x07,0x52,0x92},
	{0x02,0xFE,0x55,0x77,0x81,0x17,0xF1,0x2A},
	{0x1D,0x9D,0x5C,0x50,0x18,0xF7,0x28,0xC2},
	{0x30,0x55,0x32,0x28,0x6D,0x6F,0x29,0x5A},
	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}};

static unsigned char cipher_data[NUM_TESTS][8]={
	{0x4E,0xF9,0x97,0x45,0x61,0x98,0xDD,0x78},
	{0x51,0x86,0x6F,0xD5,0xB8,0x5E,0xCB,0x8A},
	{0x7D,0x85,0x6F,0x9A,0x61,0x30,0x63,0xF2},
	{0x24,0x66,0xDD,0x87,0x8B,0x96,0x3C,0x9D},
	{0x61,0xF9,0xC3,0x80,0x22,0x81,0xB0,0x96},
	{0x7D,0x0C,0xC6,0x30,0xAF,0xDA,0x1E,0xC7},
	{0x4E,0xF9,0x97,0x45,0x61,0x98,0xDD,0x78},
	{0x0A,0xCE,0xAB,0x0F,0xC6,0xA0,0xA2,0x8D},
	{0x59,0xC6,0x82,0x45,0xEB,0x05,0x28,0x2B},
	{0xB1,0xB8,0xCC,0x0B,0x25,0x0F,0x09,0xA0},
	{0x17,0x30,0xE5,0x77,0x8B,0xEA,0x1D,0xA4},
	{0xA2,0x5E,0x78,0x56,0xCF,0x26,0x51,0xEB},
	{0x35,0x38,0x82,0xB1,0x09,0xCE,0x8F,0x1A},
	{0x48,0xF4,0xD0,0x88,0x4C,0x37,0x99,0x18},
	{0x43,0x21,0x93,0xB7,0x89,0x51,0xFC,0x98},
	{0x13,0xF0,0x41,0x54,0xD6,0x9D,0x1A,0xE5},
	{0x2E,0xED,0xDA,0x93,0xFF,0xD3,0x9C,0x79},
	{0xD8,0x87,0xE0,0x39,0x3C,0x2D,0xA6,0xE3},
	{0x5F,0x99,0xD0,0x4F,0x5B,0x16,0x39,0x69},
	{0x4A,0x05,0x7A,0x3B,0x24,0xD3,0x97,0x7B},
	{0x45,0x20,0x31,0xC1,0xE4,0xFA,0xDA,0x8E},
	{0x75,0x55,0xAE,0x39,0xF5,0x9B,0x87,0xBD},
	{0x53,0xC5,0x5F,0x9C,0xB4,0x9F,0xC0,0x19},
	{0x7A,0x8E,0x7B,0xFA,0x93,0x7E,0x89,0xA3},
	{0xCF,0x9C,0x5D,0x7A,0x49,0x86,0xAD,0xB5},
	{0xD1,0xAB,0xB2,0x90,0x65,0x8B,0xC7,0x78},
	{0x55,0xCB,0x37,0x74,0xD1,0x3E,0xF2,0x01},
	{0xFA,0x34,0xEC,0x48,0x47,0xB2,0x68,0xB2},
	{0xA7,0x90,0x79,0x51,0x08,0xEA,0x3C,0xAE},
	{0xC3,0x9E,0x07,0x2D,0x9F,0xAC,0x63,0x1D},
	{0x01,0x49,0x33,0xE0,0xCD,0xAF,0xF6,0xE4},
	{0xF2,0x1E,0x9A,0x77,0xB7,0x1C,0x49,0xBC},
	{0x24,0x59,0x46,0x88,0x57,0x54,0x36,0x9A},
	{0x6B,0x5C,0x5A,0x9C,0x5D,0x9E,0x0A,0x5A},
	};

static unsigned char cbc_key [16]={
	0x01,0x23,0x45,0x67,0x89,0xab,0xcd,0xef,
	0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87};
static unsigned char cbc_iv [8]={0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10};
static char cbc_data[40]="7654321 Now is the time for ";
static unsigned char cbc_ok[32]={
	0x6B,0x77,0xB4,0xD6,0x30,0x06,0xDE,0xE6,
	0x05,0xB1,0x56,0xE2,0x74,0x03,0x97,0x93,
	0x58,0xDE,0xB9,0xE7,0x15,0x46,0x16,0xD9,
	0x59,0xF1,0x65,0x2B,0xD5,0xFF,0x92,0xCC};

static unsigned char cfb64_ok[]={
	0xE7,0x32,0x14,0xA2,0x82,0x21,0x39,0xCA,
	0xF2,0x6E,0xCF,0x6D,0x2E,0xB9,0xE7,0x6E,
	0x3D,0xA3,0xDE,0x04,0xD1,0x51,0x72,0x00,
	0x51,0x9D,0x57,0xA6,0xC3};

static unsigned char ofb64_ok[]={
	0xE7,0x32,0x14,0xA2,0x82,0x21,0x39,0xCA,
	0x62,0xB3,0x43,0xCC,0x5B,0x65,0x58,0x73,
	0x10,0xDD,0x90,0x8D,0x0C,0x24,0x1B,0x22,
	0x63,0xC2,0xCF,0x80,0xDA};

#define KEY_TEST_NUM	25
static unsigned char key_test[KEY_TEST_NUM]={
	0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87,
	0x78,0x69,0x5a,0x4b,0x3c,0x2d,0x1e,0x0f,
	0x00,0x11,0x22,0x33,0x44,0x55,0x66,0x77,
	0x88};

static unsigned char key_data[8]=
	{0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10};

static unsigned char key_out[KEY_TEST_NUM][8]={
	{0xF9,0xAD,0x59,0x7C,0x49,0xDB,0x00,0x5E},
	{0xE9,0x1D,0x21,0xC1,0xD9,0x61,0xA6,0xD6},
	{0xE9,0xC2,0xB7,0x0A,0x1B,0xC6,0x5C,0xF3},
	{0xBE,0x1E,0x63,0x94,0x08,0x64,0x0F,0x05},
	{0xB3,0x9E,0x44,0x48,0x1B,0xDB,0x1E,0x6E},
	{0x94,0x57,0xAA,0x83,0xB1,0x92,0x8C,0x0D},
	{0x8B,0xB7,0x70,0x32,0xF9,0x60,0x62,0x9D},
	{0xE8,0x7A,0x24,0x4E,0x2C,0xC8,0x5E,0x82},
	{0x15,0x75,0x0E,0x7A,0x4F,0x4E,0xC5,0x77},
	{0x12,0x2B,0xA7,0x0B,0x3A,0xB6,0x4A,0xE0},
	{0x3A,0x83,0x3C,0x9A,0xFF,0xC5,0x37,0xF6},
	{0x94,0x09,0xDA,0x87,0xA9,0x0F,0x6B,0xF2},
	{0x88,0x4F,0x80,0x62,0x50,0x60,0xB8,0xB4},
	{0x1F,0x85,0x03,0x1C,0x19,0xE1,0x19,0x68},
	{0x79,0xD9,0x37,0x3A,0x71,0x4C,0xA3,0x4F},
	{0x93,0x14,0x28,0x87,0xEE,0x3B,0xE1,0x5C},
	{0x03,0x42,0x9E,0x83,0x8C,0xE2,0xD1,0x4B},
	{0xA4,0x29,0x9E,0x27,0x46,0x9F,0xF6,0x7B},
	{0xAF,0xD5,0xAE,0xD1,0xC1,0xBC,0x96,0xA8},
	{0x10,0x85,0x1C,0x0E,0x38,0x58,0xDA,0x9F},
	{0xE6,0xF5,0x1E,0xD7,0x9B,0x9D,0xB2,0x1F},
	{0x64,0xA6,0xE1,0x4A,0xFD,0x36,0xB4,0x6F},
	{0x80,0xC7,0xD7,0xD4,0x5A,0x54,0x79,0xAD},
	{0x05,0x04,0x4B,0x62,0xFA,0x52,0xD0,0x80},
	};

static int test(void );
static int print_test_data(void );
int main(int argc, char *argv[])
	{
	int ret;

	if (argc > 1)
		ret=print_test_data();
	else
		ret=test();

	exit(ret);
	return(0);
	}

static int print_test_data(void)
	{
	unsigned int i,j;

	printf("ecb test data\n");
	printf("key bytes\t\tclear bytes\t\tcipher bytes\n");
	for (i=0; i<NUM_TESTS; i++)
		{
		for (j=0; j<8; j++)
			printf("%02X",ecb_data[i][j]);
		printf("\t");
		for (j=0; j<8; j++)
			printf("%02X",plain_data[i][j]);
		printf("\t");
		for (j=0; j<8; j++)
			printf("%02X",cipher_data[i][j]);
		printf("\n");
		}

	printf("set_key test data\n");
	printf("data[8]= ");
	for (j=0; j<8; j++)
		printf("%02X",key_data[j]);
	printf("\n");
	for (i=0; i<KEY_TEST_NUM-1; i++)
		{
		printf("c=");
		for (j=0; j<8; j++)
			printf("%02X",key_out[i][j]);
		printf(" k[%2u]=",i+1);
		for (j=0; j<i+1; j++)
			printf("%02X",key_test[j]);
		printf("\n");
		}

	printf("\nchaining mode test data\n");
	printf("key[16]   = ");
	for (j=0; j<16; j++)
		printf("%02X",cbc_key[j]);
	printf("\niv[8]     = ");
	for (j=0; j<8; j++)
		printf("%02X",cbc_iv[j]);
	printf("\ndata[%d]  = '%s'",(int)strlen(cbc_data)+1,cbc_data);
	printf("\ndata[%d]  = ",(int)strlen(cbc_data)+1);
	for (j=0; j<strlen(cbc_data)+1; j++)
		printf("%02X",cbc_data[j]);
	printf("\n");
	printf("cbc cipher text\n");
	printf("cipher[%d]= ",32);
	for (j=0; j<32; j++)
		printf("%02X",cbc_ok[j]);
	printf("\n");

	printf("cfb64 cipher text\n");
	printf("cipher[%d]= ",(int)strlen(cbc_data)+1);
	for (j=0; j<strlen(cbc_data)+1; j++)
		printf("%02X",cfb64_ok[j]);
	printf("\n");

	printf("ofb64 cipher text\n");
	printf("cipher[%d]= ",(int)strlen(cbc_data)+1);
	for (j=0; j<strlen(cbc_data)+1; j++)
		printf("%02X",ofb64_ok[j]);
	printf("\n");
	return(0);
	}

static int test(void)
	{
	unsigned char cbc_in[40],cbc_out[40],iv[8];
	int i,n,err=0;
	BF_KEY key;
	BF_LONG data[2]; 
	unsigned char out[8]; 
	BF_LONG len;

#ifdef CHARSET_EBCDIC
	ebcdic2ascii(cbc_data, cbc_data, strlen(cbc_data));
#endif

	printf("testing blowfish in raw ecb mode\n");
	for (n=0; n<2; n++)
		{
#ifdef CHARSET_EBCDIC
		ebcdic2ascii(bf_key[n], bf_key[n], strlen(bf_key[n]));
#endif
		BF_set_key(&key,strlen(bf_key[n]),(unsigned char *)bf_key[n]);

		data[0]=bf_plain[n][0];
		data[1]=bf_plain[n][1];
		BF_encrypt(data,&key);
		if (memcmp(&(bf_cipher[n][0]),&(data[0]),8) != 0)
			{
			printf("BF_encrypt error encrypting\n");
			printf("got     :");
			for (i=0; i<2; i++)
				printf("%08lX ",(unsigned long)data[i]);
			printf("\n");
			printf("expected:");
			for (i=0; i<2; i++)
				printf("%08lX ",(unsigned long)bf_cipher[n][i]);
			err=1;
			printf("\n");
			}

		BF_decrypt(&(data[0]),&key);
		if (memcmp(&(bf_plain[n][0]),&(data[0]),8) != 0)
			{
			printf("BF_encrypt error decrypting\n");
			printf("got     :");
			for (i=0; i<2; i++)
				printf("%08lX ",(unsigned long)data[i]);
			printf("\n");
			printf("expected:");
			for (i=0; i<2; i++)
				printf("%08lX ",(unsigned long)bf_plain[n][i]);
			printf("\n");
			err=1;
			}
		}

	printf("testing blowfish in ecb mode\n");

	for (n=0; n<NUM_TESTS; n++)
		{
		BF_set_key(&key,8,ecb_data[n]);

		BF_ecb_encrypt(&(plain_data[n][0]),out,&key,BF_ENCRYPT);
		if (memcmp(&(cipher_data[n][0]),out,8) != 0)
			{
			printf("BF_ecb_encrypt blowfish error encrypting\n");
			printf("got     :");
			for (i=0; i<8; i++)
				printf("%02X ",out[i]);
			printf("\n");
			printf("expected:");
			for (i=0; i<8; i++)
				printf("%02X ",cipher_data[n][i]);
			err=1;
			printf("\n");
			}

		BF_ecb_encrypt(out,out,&key,BF_DECRYPT);
		if (memcmp(&(plain_data[n][0]),out,8) != 0)
			{
			printf("BF_ecb_encrypt error decrypting\n");
			printf("got     :");
			for (i=0; i<8; i++)
				printf("%02X ",out[i]);
			printf("\n");
			printf("expected:");
			for (i=0; i<8; i++)
				printf("%02X ",plain_data[n][i]);
			printf("\n");
			err=1;
			}
		}

	printf("testing blowfish set_key\n");
	for (n=1; n<KEY_TEST_NUM; n++)
		{
		BF_set_key(&key,n,key_test);
		BF_ecb_encrypt(key_data,out,&key,BF_ENCRYPT);
		/* mips-sgi-irix6.5-gcc  vv  -mabi=64 bug workaround */
		if (memcmp(out,&(key_out[i=n-1][0]),8) != 0)
			{
			printf("blowfish setkey error\n");
			err=1;
			}
		}

	printf("testing blowfish in cbc mode\n");
	len=strlen(cbc_data)+1;

	BF_set_key(&key,16,cbc_key);
	memset(cbc_in,0,40);
	memset(cbc_out,0,40);
	memcpy(iv,cbc_iv,8);
	BF_cbc_encrypt((unsigned char *)cbc_data,cbc_out,len,
		&key,iv,BF_ENCRYPT);
	if (memcmp(cbc_out,cbc_ok,32) != 0)
		{
		err=1;
		printf("BF_cbc_encrypt encrypt error\n");
		for (i=0; i<32; i++) printf("0x%02X,",cbc_out[i]);
		}
	memcpy(iv,cbc_iv,8);
	BF_cbc_encrypt(cbc_out,cbc_in,len,
		&key,iv,BF_DECRYPT);
	if (memcmp(cbc_in,cbc_data,strlen(cbc_data)+1) != 0)
		{
		printf("BF_cbc_encrypt decrypt error\n");
		err=1;
		}

	printf("testing blowfish in cfb64 mode\n");

	BF_set_key(&key,16,cbc_key);
	memset(cbc_in,0,40);
	memset(cbc_out,0,40);
	memcpy(iv,cbc_iv,8);
	n=0;
	BF_cfb64_encrypt((unsigned char *)cbc_data,cbc_out,(long)13,
		&key,iv,&n,BF_ENCRYPT);
	BF_cfb64_encrypt((unsigned char *)&(cbc_data[13]),&(cbc_out[13]),len-13,
		&key,iv,&n,BF_ENCRYPT);
	if (memcmp(cbc_out,cfb64_ok,(int)len) != 0)
		{
		err=1;
		printf("BF_cfb64_encrypt encrypt error\n");
		for (i=0; i<(int)len; i++) printf("0x%02X,",cbc_out[i]);
		}
	n=0;
	memcpy(iv,cbc_iv,8);
	BF_cfb64_encrypt(cbc_out,cbc_in,17,
		&key,iv,&n,BF_DECRYPT);
	BF_cfb64_encrypt(&(cbc_out[17]),&(cbc_in[17]),len-17,
		&key,iv,&n,BF_DECRYPT);
	if (memcmp(cbc_in,cbc_data,(int)len) != 0)
		{
		printf("BF_cfb64_encrypt decrypt error\n");
		err=1;
		}

	printf("testing blowfish in ofb64\n");

	BF_set_key(&key,16,cbc_key);
	memset(cbc_in,0,40);
	memset(cbc_out,0,40);
	memcpy(iv,cbc_iv,8);
	n=0;
	BF_ofb64_encrypt((unsigned char *)cbc_data,cbc_out,(long)13,&key,iv,&n);
	BF_ofb64_encrypt((unsigned char *)&(cbc_data[13]),
		&(cbc_out[13]),len-13,&key,iv,&n);
	if (memcmp(cbc_out,ofb64_ok,(int)len) != 0)
		{
		err=1;
		printf("BF_ofb64_encrypt encrypt error\n");
		for (i=0; i<(int)len; i++) printf("0x%02X,",cbc_out[i]);
		}
	n=0;
	memcpy(iv,cbc_iv,8);
	BF_ofb64_encrypt(cbc_out,cbc_in,17,&key,iv,&n);
	BF_ofb64_encrypt(&(cbc_out[17]),&(cbc_in[17]),len-17,&key,iv,&n);
	if (memcmp(cbc_in,cbc_data,(int)len) != 0)
		{
		printf("BF_ofb64_encrypt decrypt error\n");
		err=1;
		}

	return(err);
	}
#endif
Commit	Line	Data
d02b48c6	1	/* crypto/bf/bftest.c */
58964a49	2	/* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
d02b48c6 RE	3	* All rights reserved.
	4	*
	5	* This package is an SSL implementation written
	6	* by Eric Young (eay@cryptsoft.com).
	7	* The implementation was written so as to conform with Netscapes SSL.
	8	*
	9	* This library is free for commercial and non-commercial use as long as
	10	* the following conditions are aheared to. The following conditions
	11	* apply to all code found in this distribution, be it the RC4, RSA,
	12	* lhash, DES, etc., code; not just the SSL code. The SSL documentation
	13	* included with this distribution is covered by the same copyright terms
	14	* except that the holder is Tim Hudson (tjh@cryptsoft.com).
	15	*
	16	* Copyright remains Eric Young's, and as such any Copyright notices in
	17	* the code are not to be removed.
	18	* If this package is used in a product, Eric Young should be given attribution
	19	* as the author of the parts of the library used.
	20	* This can be in the form of a textual message at program startup or
	21	* in documentation (online or textual) provided with the package.
	22	*
	23	* Redistribution and use in source and binary forms, with or without
	24	* modification, are permitted provided that the following conditions
	25	* are met:
	26	* 1. Redistributions of source code must retain the copyright
	27	* notice, this list of conditions and the following disclaimer.
	28	* 2. Redistributions in binary form must reproduce the above copyright
	29	* notice, this list of conditions and the following disclaimer in the
	30	* documentation and/or other materials provided with the distribution.
	31	* 3. All advertising materials mentioning features or use of this software
	32	* must display the following acknowledgement:
	33	* "This product includes cryptographic software written by
	34	* Eric Young (eay@cryptsoft.com)"
	35	* The word 'cryptographic' can be left out if the rouines from the library
	36	* being used are not cryptographic related :-).
	37	* 4. If you include any Windows specific code (or a derivative thereof) from
	38	* the apps directory (application code) you must include an acknowledgement:
	39	* "This product includes software written by Tim Hudson (tjh@cryptsoft.com)"
	40	*
	41	* THIS SOFTWARE IS PROVIDED BY ERIC YOUNG ``AS IS'' AND
	42	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
	43	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
	44	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
	45	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	46	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	47	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	48	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	49	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	50	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	51	* SUCH DAMAGE.
	52	*
	53	* The licence and distribution terms for any publically available version or
	54	* derivative of this code cannot be changed. i.e. this code cannot simply be
	55	* copied and put under another distribution licence
	56	* [including the GNU Public Licence.]
	57	*/
	58
	59	/* This has been a quickly hacked 'ideatest.c'. When I add tests for other
	60	* RC2 modes, more of the code will be uncommented. */
	61
	62	#include <stdio.h>
	63	#include <string.h>
	64	#include <stdlib.h>
f5d7a031 UM	65
	66	#ifdef NO_BF
	67	int main(int argc, char *argv[])
	68	{
	69	printf("No BF support\n");
	70	return(0);
	71	}
	72	#else
ec577822	73	#include <openssl/blowfish.h>
d02b48c6	74
a53955d8 UM	75	#ifdef CHARSET_EBCDIC
	76	#include <openssl/ebcdic.h>
	77	#endif
	78
79875776	79	static char *bf_key[2]={
d02b48c6 RE	80	"abcdefghijklmnopqrstuvwxyz",
	81	"Who is John Galt?"
	82	};
	83
	84	/* big endian */
79875776	85	static BF_LONG bf_plain[2][2]={
58964a49 RE	86	{0x424c4f57L,0x46495348L},
58964a49 RE	87	{0xfedcba98L,0x76543210L}
d02b48c6 RE	88	};
d02b48c6 RE	89
79875776	90	static BF_LONG bf_cipher[2][2]={
58964a49 RE	91	{0x324ed0feL,0xf413a203L},
58964a49 RE	92	{0xcc91732bL,0x8022f684L}
d02b48c6 RE	93	};
	94	/************/
	95
	96	/* Lets use the DES test vectors :-) */
	97	#define NUM_TESTS 34
	98	static unsigned char ecb_data[NUM_TESTS][8]={
	99	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	100	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
	101	{0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	102	{0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
	103	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	104	{0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
	105	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	106	{0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10},
	107	{0x7C,0xA1,0x10,0x45,0x4A,0x1A,0x6E,0x57},
	108	{0x01,0x31,0xD9,0x61,0x9D,0xC1,0x37,0x6E},
	109	{0x07,0xA1,0x13,0x3E,0x4A,0x0B,0x26,0x86},
	110	{0x38,0x49,0x67,0x4C,0x26,0x02,0x31,0x9E},
	111	{0x04,0xB9,0x15,0xBA,0x43,0xFE,0xB5,0xB6},
	112	{0x01,0x13,0xB9,0x70,0xFD,0x34,0xF2,0xCE},
	113	{0x01,0x70,0xF1,0x75,0x46,0x8F,0xB5,0xE6},
	114	{0x43,0x29,0x7F,0xAD,0x38,0xE3,0x73,0xFE},
	115	{0x07,0xA7,0x13,0x70,0x45,0xDA,0x2A,0x16},
	116	{0x04,0x68,0x91,0x04,0xC2,0xFD,0x3B,0x2F},
	117	{0x37,0xD0,0x6B,0xB5,0x16,0xCB,0x75,0x46},
	118	{0x1F,0x08,0x26,0x0D,0x1A,0xC2,0x46,0x5E},
	119	{0x58,0x40,0x23,0x64,0x1A,0xBA,0x61,0x76},
	120	{0x02,0x58,0x16,0x16,0x46,0x29,0xB0,0x07},
	121	{0x49,0x79,0x3E,0xBC,0x79,0xB3,0x25,0x8F},
	122	{0x4F,0xB0,0x5E,0x15,0x15,0xAB,0x73,0xA7},
	123	{0x49,0xE9,0x5D,0x6D,0x4C,0xA2,0x29,0xBF},
	124	{0x01,0x83,0x10,0xDC,0x40,0x9B,0x26,0xD6},
	125	{0x1C,0x58,0x7F,0x1C,0x13,0x92,0x4F,0xEF},
	126	{0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01},
	127	{0x1F,0x1F,0x1F,0x1F,0x0E,0x0E,0x0E,0x0E},
	128	{0xE0,0xFE,0xE0,0xFE,0xF1,0xFE,0xF1,0xFE},
	129	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	130	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
	131	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	132	{0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10}};
	133
	134	static unsigned char plain_data[NUM_TESTS][8]={
	135	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	136	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
	137	{0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x01},
	138	{0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
	139	{0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
	140	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	141	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
	142	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
	143	{0x01,0xA1,0xD6,0xD0,0x39,0x77,0x67,0x42},
	144	{0x5C,0xD5,0x4C,0xA8,0x3D,0xEF,0x57,0xDA},
	145	{0x02,0x48,0xD4,0x38,0x06,0xF6,0x71,0x72},
	146	{0x51,0x45,0x4B,0x58,0x2D,0xDF,0x44,0x0A},
	147	{0x42,0xFD,0x44,0x30,0x59,0x57,0x7F,0xA2},
	148	{0x05,0x9B,0x5E,0x08,0x51,0xCF,0x14,0x3A},
	149	{0x07,0x56,0xD8,0xE0,0x77,0x47,0x61,0xD2},
	150	{0x76,0x25,0x14,0xB8,0x29,0xBF,0x48,0x6A},
	151	{0x3B,0xDD,0x11,0x90,0x49,0x37,0x28,0x02},
	152	{0x26,0x95,0x5F,0x68,0x35,0xAF,0x60,0x9A},
	153	{0x16,0x4D,0x5E,0x40,0x4F,0x27,0x52,0x32},
	154	{0x6B,0x05,0x6E,0x18,0x75,0x9F,0x5C,0xCA},
	155	{0x00,0x4B,0xD6,0xEF,0x09,0x17,0x60,0x62},
	156	{0x48,0x0D,0x39,0x00,0x6E,0xE7,0x62,0xF2},
157	{0x43,0x75,0x40,0xC8,0x69,0x8F,0x3C,0xFA},
158	{0x07,0x2D,0x43,0xA0,0x77,0x07,0x52,0x92},
159	{0x02,0xFE,0x55,0x77,0x81,0x17,0xF1,0x2A},
160	{0x1D,0x9D,0x5C,0x50,0x18,0xF7,0x28,0xC2},
161	{0x30,0x55,0x32,0x28,0x6D,0x6F,0x29,0x5A},
162	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
163	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
164	{0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
165	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
166	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
167	{0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
168	{0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}};
169
170	static unsigned char cipher_data[NUM_TESTS][8]={
171	{0x4E,0xF9,0x97,0x45,0x61,0x98,0xDD,0x78},
172	{0x51,0x86,0x6F,0xD5,0xB8,0x5E,0xCB,0x8A},
173	{0x7D,0x85,0x6F,0x9A,0x61,0x30,0x63,0xF2},
174	{0x24,0x66,0xDD,0x87,0x8B,0x96,0x3C,0x9D},
175	{0x61,0xF9,0xC3,0x80,0x22,0x81,0xB0,0x96},
176	{0x7D,0x0C,0xC6,0x30,0xAF,0xDA,0x1E,0xC7},
177	{0x4E,0xF9,0x97,0x45,0x61,0x98,0xDD,0x78},
178	{0x0A,0xCE,0xAB,0x0F,0xC6,0xA0,0xA2,0x8D},
179	{0x59,0xC6,0x82,0x45,0xEB,0x05,0x28,0x2B},
180	{0xB1,0xB8,0xCC,0x0B,0x25,0x0F,0x09,0xA0},
181	{0x17,0x30,0xE5,0x77,0x8B,0xEA,0x1D,0xA4},
182	{0xA2,0x5E,0x78,0x56,0xCF,0x26,0x51,0xEB},
183	{0x35,0x38,0x82,0xB1,0x09,0xCE,0x8F,0x1A},
184	{0x48,0xF4,0xD0,0x88,0x4C,0x37,0x99,0x18},
185	{0x43,0x21,0x93,0xB7,0x89,0x51,0xFC,0x98},
186	{0x13,0xF0,0x41,0x54,0xD6,0x9D,0x1A,0xE5},
187	{0x2E,0xED,0xDA,0x93,0xFF,0xD3,0x9C,0x79},
188	{0xD8,0x87,0xE0,0x39,0x3C,0x2D,0xA6,0xE3},
189	{0x5F,0x99,0xD0,0x4F,0x5B,0x16,0x39,0x69},
190	{0x4A,0x05,0x7A,0x3B,0x24,0xD3,0x97,0x7B},
191	{0x45,0x20,0x31,0xC1,0xE4,0xFA,0xDA,0x8E},
192	{0x75,0x55,0xAE,0x39,0xF5,0x9B,0x87,0xBD},
193	{0x53,0xC5,0x5F,0x9C,0xB4,0x9F,0xC0,0x19},
194	{0x7A,0x8E,0x7B,0xFA,0x93,0x7E,0x89,0xA3},
195	{0xCF,0x9C,0x5D,0x7A,0x49,0x86,0xAD,0xB5},
196	{0xD1,0xAB,0xB2,0x90,0x65,0x8B,0xC7,0x78},
197	{0x55,0xCB,0x37,0x74,0xD1,0x3E,0xF2,0x01},
198	{0xFA,0x34,0xEC,0x48,0x47,0xB2,0x68,0xB2},
199	{0xA7,0x90,0x79,0x51,0x08,0xEA,0x3C,0xAE},
200	{0xC3,0x9E,0x07,0x2D,0x9F,0xAC,0x63,0x1D},
201	{0x01,0x49,0x33,0xE0,0xCD,0xAF,0xF6,0xE4},
202	{0xF2,0x1E,0x9A,0x77,0xB7,0x1C,0x49,0xBC},
203	{0x24,0x59,0x46,0x88,0x57,0x54,0x36,0x9A},
204	{0x6B,0x5C,0x5A,0x9C,0x5D,0x9E,0x0A,0x5A},
205	};
206
207	static unsigned char cbc_key [16]={
208	0x01,0x23,0x45,0x67,0x89,0xab,0xcd,0xef,
209	0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87};
210	static unsigned char cbc_iv [8]={0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10};
211	static char cbc_data[40]="7654321 Now is the time for ";
212	static unsigned char cbc_ok[32]={
213	0x6B,0x77,0xB4,0xD6,0x30,0x06,0xDE,0xE6,
214	0x05,0xB1,0x56,0xE2,0x74,0x03,0x97,0x93,
215	0x58,0xDE,0xB9,0xE7,0x15,0x46,0x16,0xD9,
216	0x59,0xF1,0x65,0x2B,0xD5,0xFF,0x92,0xCC};
217
218	static unsigned char cfb64_ok[]={
219	0xE7,0x32,0x14,0xA2,0x82,0x21,0x39,0xCA,
220	0xF2,0x6E,0xCF,0x6D,0x2E,0xB9,0xE7,0x6E,
221	0x3D,0xA3,0xDE,0x04,0xD1,0x51,0x72,0x00,
222	0x51,0x9D,0x57,0xA6,0xC3};
223
224	static unsigned char ofb64_ok[]={
225	0xE7,0x32,0x14,0xA2,0x82,0x21,0x39,0xCA,
226	0x62,0xB3,0x43,0xCC,0x5B,0x65,0x58,0x73,
227	0x10,0xDD,0x90,0x8D,0x0C,0x24,0x1B,0x22,
228	0x63,0xC2,0xCF,0x80,0xDA};
229
230	#define KEY_TEST_NUM 25
79875776	231	static unsigned char key_test[KEY_TEST_NUM]={
d02b48c6 RE	232	0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87,
	233	0x78,0x69,0x5a,0x4b,0x3c,0x2d,0x1e,0x0f,
	234	0x00,0x11,0x22,0x33,0x44,0x55,0x66,0x77,
	235	0x88};
	236
79875776	237	static unsigned char key_data[8]=
d02b48c6 RE	238	{0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10};
d02b48c6 RE	239
79875776	240	static unsigned char key_out[KEY_TEST_NUM][8]={
d02b48c6 RE	241	{0xF9,0xAD,0x59,0x7C,0x49,0xDB,0x00,0x5E},
	242	{0xE9,0x1D,0x21,0xC1,0xD9,0x61,0xA6,0xD6},
	243	{0xE9,0xC2,0xB7,0x0A,0x1B,0xC6,0x5C,0xF3},
	244	{0xBE,0x1E,0x63,0x94,0x08,0x64,0x0F,0x05},
	245	{0xB3,0x9E,0x44,0x48,0x1B,0xDB,0x1E,0x6E},
	246	{0x94,0x57,0xAA,0x83,0xB1,0x92,0x8C,0x0D},
	247	{0x8B,0xB7,0x70,0x32,0xF9,0x60,0x62,0x9D},
	248	{0xE8,0x7A,0x24,0x4E,0x2C,0xC8,0x5E,0x82},
	249	{0x15,0x75,0x0E,0x7A,0x4F,0x4E,0xC5,0x77},
	250	{0x12,0x2B,0xA7,0x0B,0x3A,0xB6,0x4A,0xE0},
	251	{0x3A,0x83,0x3C,0x9A,0xFF,0xC5,0x37,0xF6},
	252	{0x94,0x09,0xDA,0x87,0xA9,0x0F,0x6B,0xF2},
	253	{0x88,0x4F,0x80,0x62,0x50,0x60,0xB8,0xB4},
	254	{0x1F,0x85,0x03,0x1C,0x19,0xE1,0x19,0x68},
	255	{0x79,0xD9,0x37,0x3A,0x71,0x4C,0xA3,0x4F},
	256	{0x93,0x14,0x28,0x87,0xEE,0x3B,0xE1,0x5C},
	257	{0x03,0x42,0x9E,0x83,0x8C,0xE2,0xD1,0x4B},
	258	{0xA4,0x29,0x9E,0x27,0x46,0x9F,0xF6,0x7B},
	259	{0xAF,0xD5,0xAE,0xD1,0xC1,0xBC,0x96,0xA8},
	260	{0x10,0x85,0x1C,0x0E,0x38,0x58,0xDA,0x9F},
	261	{0xE6,0xF5,0x1E,0xD7,0x9B,0x9D,0xB2,0x1F},
	262	{0x64,0xA6,0xE1,0x4A,0xFD,0x36,0xB4,0x6F},
	263	{0x80,0xC7,0xD7,0xD4,0x5A,0x54,0x79,0xAD},
	264	{0x05,0x04,0x4B,0x62,0xFA,0x52,0xD0,0x80},
	265	};
	266
d02b48c6 RE	267	static int test(void );
d02b48c6 RE	268	static int print_test_data(void );
6b691a5c	269	int main(int argc, char *argv[])
d02b48c6 RE	270	{
	271	int ret;
	272
	273	if (argc > 1)
	274	ret=print_test_data();
	275	else
	276	ret=test();
	277
	278	exit(ret);
	279	return(0);
	280	}
	281
6b691a5c	282	static int print_test_data(void)
d02b48c6 RE	283	{
	284	unsigned int i,j;
	285
	286	printf("ecb test data\n");
	287	printf("key bytes\t\tclear bytes\t\tcipher bytes\n");
	288	for (i=0; i<NUM_TESTS; i++)
	289	{
	290	for (j=0; j<8; j++)
	291	printf("%02X",ecb_data[i][j]);
	292	printf("\t");
	293	for (j=0; j<8; j++)
	294	printf("%02X",plain_data[i][j]);
	295	printf("\t");
	296	for (j=0; j<8; j++)
	297	printf("%02X",cipher_data[i][j]);
	298	printf("\n");
	299	}
	300
	301	printf("set_key test data\n");
	302	printf("data[8]= ");
	303	for (j=0; j<8; j++)
	304	printf("%02X",key_data[j]);
	305	printf("\n");
	306	for (i=0; i<KEY_TEST_NUM-1; i++)
	307	{
	308	printf("c=");
	309	for (j=0; j<8; j++)
	310	printf("%02X",key_out[i][j]);
d58d092b	311	printf(" k[%2u]=",i+1);
d02b48c6 RE	312	for (j=0; j<i+1; j++)
	313	printf("%02X",key_test[j]);
	314	printf("\n");
	315	}
	316
	317	printf("\nchaining mode test data\n");
	318	printf("key[16] = ");
	319	for (j=0; j<16; j++)
	320	printf("%02X",cbc_key[j]);
	321	printf("\niv[8] = ");
	322	for (j=0; j<8; j++)
	323	printf("%02X",cbc_iv[j]);
58964a49 RE	324	printf("\ndata[%d] = '%s'",(int)strlen(cbc_data)+1,cbc_data);
58964a49 RE	325	printf("\ndata[%d] = ",(int)strlen(cbc_data)+1);
d02b48c6 RE	326	for (j=0; j<strlen(cbc_data)+1; j++)
	327	printf("%02X",cbc_data[j]);
	328	printf("\n");
	329	printf("cbc cipher text\n");
	330	printf("cipher[%d]= ",32);
	331	for (j=0; j<32; j++)
	332	printf("%02X",cbc_ok[j]);
	333	printf("\n");
	334
	335	printf("cfb64 cipher text\n");
58964a49	336	printf("cipher[%d]= ",(int)strlen(cbc_data)+1);
d02b48c6 RE	337	for (j=0; j<strlen(cbc_data)+1; j++)
	338	printf("%02X",cfb64_ok[j]);
	339	printf("\n");
	340
	341	printf("ofb64 cipher text\n");
58964a49	342	printf("cipher[%d]= ",(int)strlen(cbc_data)+1);
d02b48c6 RE	343	for (j=0; j<strlen(cbc_data)+1; j++)
	344	printf("%02X",ofb64_ok[j]);
	345	printf("\n");
	346	return(0);
	347	}
	348
6b691a5c	349	static int test(void)
d02b48c6 RE	350	{
	351	unsigned char cbc_in[40],cbc_out[40],iv[8];
	352	int i,n,err=0;
	353	BF_KEY key;
	354	BF_LONG data[2];
	355	unsigned char out[8];
	356	BF_LONG len;
	357
a53955d8 UM	358	#ifdef CHARSET_EBCDIC
	359	ebcdic2ascii(cbc_data, cbc_data, strlen(cbc_data));
	360	#endif
	361
d02b48c6 RE	362	printf("testing blowfish in raw ecb mode\n");
	363	for (n=0; n<2; n++)
	364	{
a53955d8 UM	365	#ifdef CHARSET_EBCDIC
	366	ebcdic2ascii(bf_key[n], bf_key[n], strlen(bf_key[n]));
	367	#endif
d02b48c6 RE	368	BF_set_key(&key,strlen(bf_key[n]),(unsigned char *)bf_key[n]);
	369
	370	data[0]=bf_plain[n][0];
	371	data[1]=bf_plain[n][1];
58964a49	372	BF_encrypt(data,&key);
d02b48c6 RE	373	if (memcmp(&(bf_cipher[n][0]),&(data[0]),8) != 0)
	374	{
	375	printf("BF_encrypt error encrypting\n");
	376	printf("got :");
	377	for (i=0; i<2; i++)
f36cd05b	378	printf("%08lX ",(unsigned long)data[i]);
d02b48c6 RE	379	printf("\n");
	380	printf("expected:");
	381	for (i=0; i<2; i++)
f36cd05b	382	printf("%08lX ",(unsigned long)bf_cipher[n][i]);
d02b48c6 RE	383	err=1;
	384	printf("\n");
	385	}
	386
58964a49	387	BF_decrypt(&(data[0]),&key);
d02b48c6 RE	388	if (memcmp(&(bf_plain[n][0]),&(data[0]),8) != 0)
	389	{
	390	printf("BF_encrypt error decrypting\n");
	391	printf("got :");
	392	for (i=0; i<2; i++)
f36cd05b	393	printf("%08lX ",(unsigned long)data[i]);
d02b48c6 RE	394	printf("\n");
	395	printf("expected:");
	396	for (i=0; i<2; i++)
f36cd05b	397	printf("%08lX ",(unsigned long)bf_plain[n][i]);
d02b48c6 RE	398	printf("\n");
	399	err=1;
	400	}
	401	}
	402
	403	printf("testing blowfish in ecb mode\n");
	404
	405	for (n=0; n<NUM_TESTS; n++)
	406	{
	407	BF_set_key(&key,8,ecb_data[n]);
	408
	409	BF_ecb_encrypt(&(plain_data[n][0]),out,&key,BF_ENCRYPT);
	410	if (memcmp(&(cipher_data[n][0]),out,8) != 0)
	411	{
	412	printf("BF_ecb_encrypt blowfish error encrypting\n");
	413	printf("got :");
	414	for (i=0; i<8; i++)
	415	printf("%02X ",out[i]);
	416	printf("\n");
	417	printf("expected:");
	418	for (i=0; i<8; i++)
	419	printf("%02X ",cipher_data[n][i]);
	420	err=1;
	421	printf("\n");
	422	}
	423
	424	BF_ecb_encrypt(out,out,&key,BF_DECRYPT);
	425	if (memcmp(&(plain_data[n][0]),out,8) != 0)
	426	{
	427	printf("BF_ecb_encrypt error decrypting\n");
	428	printf("got :");
	429	for (i=0; i<8; i++)
	430	printf("%02X ",out[i]);
	431	printf("\n");
	432	printf("expected:");
	433	for (i=0; i<8; i++)
	434	printf("%02X ",plain_data[n][i]);
	435	printf("\n");
	436	err=1;
	437	}
	438	}
	439
	440	printf("testing blowfish set_key\n");
	441	for (n=1; n<KEY_TEST_NUM; n++)
	442	{
	443	BF_set_key(&key,n,key_test);
	444	BF_ecb_encrypt(key_data,out,&key,BF_ENCRYPT);
e6441154 AP	445	/* mips-sgi-irix6.5-gcc vv -mabi=64 bug workaround */
e6441154 AP	446	if (memcmp(out,&(key_out[i=n-1][0]),8) != 0)
d02b48c6 RE	447	{
	448	printf("blowfish setkey error\n");
	449	err=1;
	450	}
	451	}
	452
	453	printf("testing blowfish in cbc mode\n");
	454	len=strlen(cbc_data)+1;
	455
	456	BF_set_key(&key,16,cbc_key);
	457	memset(cbc_in,0,40);
	458	memset(cbc_out,0,40);
	459	memcpy(iv,cbc_iv,8);
	460	BF_cbc_encrypt((unsigned char *)cbc_data,cbc_out,len,
	461	&key,iv,BF_ENCRYPT);
	462	if (memcmp(cbc_out,cbc_ok,32) != 0)
	463	{
	464	err=1;
	465	printf("BF_cbc_encrypt encrypt error\n");
	466	for (i=0; i<32; i++) printf("0x%02X,",cbc_out[i]);
	467	}
	468	memcpy(iv,cbc_iv,8);
	469	BF_cbc_encrypt(cbc_out,cbc_in,len,
	470	&key,iv,BF_DECRYPT);
	471	if (memcmp(cbc_in,cbc_data,strlen(cbc_data)+1) != 0)
	472	{
	473	printf("BF_cbc_encrypt decrypt error\n");
	474	err=1;
	475	}
	476
	477	printf("testing blowfish in cfb64 mode\n");
	478
	479	BF_set_key(&key,16,cbc_key);
	480	memset(cbc_in,0,40);
	481	memset(cbc_out,0,40);
	482	memcpy(iv,cbc_iv,8);
	483	n=0;
	484	BF_cfb64_encrypt((unsigned char *)cbc_data,cbc_out,(long)13,
	485	&key,iv,&n,BF_ENCRYPT);
	486	BF_cfb64_encrypt((unsigned char *)&(cbc_data[13]),&(cbc_out[13]),len-13,
	487	&key,iv,&n,BF_ENCRYPT);
	488	if (memcmp(cbc_out,cfb64_ok,(int)len) != 0)
	489	{
	490	err=1;
	491	printf("BF_cfb64_encrypt encrypt error\n");
	492	for (i=0; i<(int)len; i++) printf("0x%02X,",cbc_out[i]);
	493	}
	494	n=0;
	495	memcpy(iv,cbc_iv,8);
	496	BF_cfb64_encrypt(cbc_out,cbc_in,17,
	497	&key,iv,&n,BF_DECRYPT);
	498	BF_cfb64_encrypt(&(cbc_out[17]),&(cbc_in[17]),len-17,
	499	&key,iv,&n,BF_DECRYPT);
	500	if (memcmp(cbc_in,cbc_data,(int)len) != 0)
	501	{
	502	printf("BF_cfb64_encrypt decrypt error\n");
	503	err=1;
	504	}
	505
	506	printf("testing blowfish in ofb64\n");
	507
	508	BF_set_key(&key,16,cbc_key);
	509	memset(cbc_in,0,40);
	510	memset(cbc_out,0,40);
511	memcpy(iv,cbc_iv,8);
512	n=0;
513	BF_ofb64_encrypt((unsigned char *)cbc_data,cbc_out,(long)13,&key,iv,&n);
514	BF_ofb64_encrypt((unsigned char *)&(cbc_data[13]),
515	&(cbc_out[13]),len-13,&key,iv,&n);
516	if (memcmp(cbc_out,ofb64_ok,(int)len) != 0)
517	{
518	err=1;
519	printf("BF_ofb64_encrypt encrypt error\n");
520	for (i=0; i<(int)len; i++) printf("0x%02X,",cbc_out[i]);
521	}
522	n=0;
523	memcpy(iv,cbc_iv,8);
524	BF_ofb64_encrypt(cbc_out,cbc_in,17,&key,iv,&n);
525	BF_ofb64_encrypt(&(cbc_out[17]),&(cbc_in[17]),len-17,&key,iv,&n);
526	if (memcmp(cbc_in,cbc_data,(int)len) != 0)
527	{
528	printf("BF_ofb64_encrypt decrypt error\n");
529	err=1;
530	}
531
532	return(err);
533	}
f5d7a031	534	#endif