crypto/bf/bftest.c

   1 /* crypto/bf/bftest.c */
   2 /* Copyright (C) 1995-1998 Eric Young (eay@cryptsoft.com)
   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>
  65 #include <openssl/opensslconf.h> /* To see if OPENSSL_NO_BF is defined */
  66
  67 #include "../e_os.h"
  68
  69 #ifdef OPENSSL_NO_BF
  70 int main(int argc, char *argv[])
  71 {
  72     printf("No BF support\n");
  73     return(0);
  74 }
  75 #else
  76 #include <openssl/blowfish.h>
  77
  78 #ifdef CHARSET_EBCDIC
  79 #include <openssl/ebcdic.h>
  80 #endif
  81
  82 static char *bf_key[2]={
  83         "abcdefghijklmnopqrstuvwxyz",
  84         "Who is John Galt?"
  85         };
  86
  87 /* big endian */
  88 static BF_LONG bf_plain[2][2]={
  89         {0x424c4f57L,0x46495348L},
  90         {0xfedcba98L,0x76543210L}
  91         };
  92
  93 static BF_LONG bf_cipher[2][2]={
  94         {0x324ed0feL,0xf413a203L},
  95         {0xcc91732bL,0x8022f684L}
  96         };
  97 /************/
  98
  99 /* Lets use the DES test vectors :-) */
 100 #define NUM_TESTS 34
 101 static unsigned char ecb_data[NUM_TESTS][8]={
 102         {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
 103         {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
 104         {0x30,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
 105         {0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
 106         {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
 107         {0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
 108         {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
 109         {0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10},
 110         {0x7C,0xA1,0x10,0x45,0x4A,0x1A,0x6E,0x57},
 111         {0x01,0x31,0xD9,0x61,0x9D,0xC1,0x37,0x6E},
 112         {0x07,0xA1,0x13,0x3E,0x4A,0x0B,0x26,0x86},
 113         {0x38,0x49,0x67,0x4C,0x26,0x02,0x31,0x9E},
 114         {0x04,0xB9,0x15,0xBA,0x43,0xFE,0xB5,0xB6},
 115         {0x01,0x13,0xB9,0x70,0xFD,0x34,0xF2,0xCE},
 116         {0x01,0x70,0xF1,0x75,0x46,0x8F,0xB5,0xE6},
 117         {0x43,0x29,0x7F,0xAD,0x38,0xE3,0x73,0xFE},
 118         {0x07,0xA7,0x13,0x70,0x45,0xDA,0x2A,0x16},
 119         {0x04,0x68,0x91,0x04,0xC2,0xFD,0x3B,0x2F},
 120         {0x37,0xD0,0x6B,0xB5,0x16,0xCB,0x75,0x46},
 121         {0x1F,0x08,0x26,0x0D,0x1A,0xC2,0x46,0x5E},
 122         {0x58,0x40,0x23,0x64,0x1A,0xBA,0x61,0x76},
 123         {0x02,0x58,0x16,0x16,0x46,0x29,0xB0,0x07},
 124         {0x49,0x79,0x3E,0xBC,0x79,0xB3,0x25,0x8F},
 125         {0x4F,0xB0,0x5E,0x15,0x15,0xAB,0x73,0xA7},
 126         {0x49,0xE9,0x5D,0x6D,0x4C,0xA2,0x29,0xBF},
 127         {0x01,0x83,0x10,0xDC,0x40,0x9B,0x26,0xD6},
 128         {0x1C,0x58,0x7F,0x1C,0x13,0x92,0x4F,0xEF},
 129         {0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01},
 130         {0x1F,0x1F,0x1F,0x1F,0x0E,0x0E,0x0E,0x0E},
 131         {0xE0,0xFE,0xE0,0xFE,0xF1,0xFE,0xF1,0xFE},
 132         {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
 133         {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
 134         {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
 135         {0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10}};
 136
 137 static unsigned char plain_data[NUM_TESTS][8]={
 138         {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
 139         {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
 140         {0x10,0x00,0x00,0x00,0x00,0x00,0x00,0x01},
 141         {0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
 142         {0x11,0x11,0x11,0x11,0x11,0x11,0x11,0x11},
 143         {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
 144         {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
 145         {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
 146         {0x01,0xA1,0xD6,0xD0,0x39,0x77,0x67,0x42},
 147         {0x5C,0xD5,0x4C,0xA8,0x3D,0xEF,0x57,0xDA},
 148         {0x02,0x48,0xD4,0x38,0x06,0xF6,0x71,0x72},
 149         {0x51,0x45,0x4B,0x58,0x2D,0xDF,0x44,0x0A},
 150         {0x42,0xFD,0x44,0x30,0x59,0x57,0x7F,0xA2},
 151         {0x05,0x9B,0x5E,0x08,0x51,0xCF,0x14,0x3A},
 152         {0x07,0x56,0xD8,0xE0,0x77,0x47,0x61,0xD2},
 153         {0x76,0x25,0x14,0xB8,0x29,0xBF,0x48,0x6A},
 154         {0x3B,0xDD,0x11,0x90,0x49,0x37,0x28,0x02},
 155         {0x26,0x95,0x5F,0x68,0x35,0xAF,0x60,0x9A},
 156         {0x16,0x4D,0x5E,0x40,0x4F,0x27,0x52,0x32},
 157         {0x6B,0x05,0x6E,0x18,0x75,0x9F,0x5C,0xCA},
 158         {0x00,0x4B,0xD6,0xEF,0x09,0x17,0x60,0x62},
 159         {0x48,0x0D,0x39,0x00,0x6E,0xE7,0x62,0xF2},
 160         {0x43,0x75,0x40,0xC8,0x69,0x8F,0x3C,0xFA},
 161         {0x07,0x2D,0x43,0xA0,0x77,0x07,0x52,0x92},
 162         {0x02,0xFE,0x55,0x77,0x81,0x17,0xF1,0x2A},
 163         {0x1D,0x9D,0x5C,0x50,0x18,0xF7,0x28,0xC2},
 164         {0x30,0x55,0x32,0x28,0x6D,0x6F,0x29,0x5A},
 165         {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
 166         {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
 167         {0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF},
 168         {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF},
 169         {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
 170         {0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00},
 171         {0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF,0xFF}};
 172
 173 static unsigned char cipher_data[NUM_TESTS][8]={
 174         {0x4E,0xF9,0x97,0x45,0x61,0x98,0xDD,0x78},
 175         {0x51,0x86,0x6F,0xD5,0xB8,0x5E,0xCB,0x8A},
 176         {0x7D,0x85,0x6F,0x9A,0x61,0x30,0x63,0xF2},
 177         {0x24,0x66,0xDD,0x87,0x8B,0x96,0x3C,0x9D},
 178         {0x61,0xF9,0xC3,0x80,0x22,0x81,0xB0,0x96},
 179         {0x7D,0x0C,0xC6,0x30,0xAF,0xDA,0x1E,0xC7},
 180         {0x4E,0xF9,0x97,0x45,0x61,0x98,0xDD,0x78},
 181         {0x0A,0xCE,0xAB,0x0F,0xC6,0xA0,0xA2,0x8D},
 182         {0x59,0xC6,0x82,0x45,0xEB,0x05,0x28,0x2B},
 183         {0xB1,0xB8,0xCC,0x0B,0x25,0x0F,0x09,0xA0},
 184         {0x17,0x30,0xE5,0x77,0x8B,0xEA,0x1D,0xA4},
 185         {0xA2,0x5E,0x78,0x56,0xCF,0x26,0x51,0xEB},
 186         {0x35,0x38,0x82,0xB1,0x09,0xCE,0x8F,0x1A},
 187         {0x48,0xF4,0xD0,0x88,0x4C,0x37,0x99,0x18},
 188         {0x43,0x21,0x93,0xB7,0x89,0x51,0xFC,0x98},
 189         {0x13,0xF0,0x41,0x54,0xD6,0x9D,0x1A,0xE5},
 190         {0x2E,0xED,0xDA,0x93,0xFF,0xD3,0x9C,0x79},
 191         {0xD8,0x87,0xE0,0x39,0x3C,0x2D,0xA6,0xE3},
 192         {0x5F,0x99,0xD0,0x4F,0x5B,0x16,0x39,0x69},
 193         {0x4A,0x05,0x7A,0x3B,0x24,0xD3,0x97,0x7B},
 194         {0x45,0x20,0x31,0xC1,0xE4,0xFA,0xDA,0x8E},
 195         {0x75,0x55,0xAE,0x39,0xF5,0x9B,0x87,0xBD},
 196         {0x53,0xC5,0x5F,0x9C,0xB4,0x9F,0xC0,0x19},
 197         {0x7A,0x8E,0x7B,0xFA,0x93,0x7E,0x89,0xA3},
 198         {0xCF,0x9C,0x5D,0x7A,0x49,0x86,0xAD,0xB5},
 199         {0xD1,0xAB,0xB2,0x90,0x65,0x8B,0xC7,0x78},
 200         {0x55,0xCB,0x37,0x74,0xD1,0x3E,0xF2,0x01},
 201         {0xFA,0x34,0xEC,0x48,0x47,0xB2,0x68,0xB2},
 202         {0xA7,0x90,0x79,0x51,0x08,0xEA,0x3C,0xAE},
 203         {0xC3,0x9E,0x07,0x2D,0x9F,0xAC,0x63,0x1D},
 204         {0x01,0x49,0x33,0xE0,0xCD,0xAF,0xF6,0xE4},
 205         {0xF2,0x1E,0x9A,0x77,0xB7,0x1C,0x49,0xBC},
 206         {0x24,0x59,0x46,0x88,0x57,0x54,0x36,0x9A},
 207         {0x6B,0x5C,0x5A,0x9C,0x5D,0x9E,0x0A,0x5A},
 208         };
 209
 210 static unsigned char cbc_key [16]={
 211         0x01,0x23,0x45,0x67,0x89,0xab,0xcd,0xef,
 212         0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87};
 213 static unsigned char cbc_iv [8]={0xfe,0xdc,0xba,0x98,0x76,0x54,0x32,0x10};
 214 static char cbc_data[40]="7654321 Now is the time for ";
 215 static unsigned char cbc_ok[32]={
 216         0x6B,0x77,0xB4,0xD6,0x30,0x06,0xDE,0xE6,
 217         0x05,0xB1,0x56,0xE2,0x74,0x03,0x97,0x93,
 218         0x58,0xDE,0xB9,0xE7,0x15,0x46,0x16,0xD9,
 219         0x59,0xF1,0x65,0x2B,0xD5,0xFF,0x92,0xCC};
 220
 221 static unsigned char cfb64_ok[]={
 222         0xE7,0x32,0x14,0xA2,0x82,0x21,0x39,0xCA,
 223         0xF2,0x6E,0xCF,0x6D,0x2E,0xB9,0xE7,0x6E,
 224         0x3D,0xA3,0xDE,0x04,0xD1,0x51,0x72,0x00,
 225         0x51,0x9D,0x57,0xA6,0xC3};
 226
 227 static unsigned char ofb64_ok[]={
 228         0xE7,0x32,0x14,0xA2,0x82,0x21,0x39,0xCA,
 229         0x62,0xB3,0x43,0xCC,0x5B,0x65,0x58,0x73,
 230         0x10,0xDD,0x90,0x8D,0x0C,0x24,0x1B,0x22,
 231         0x63,0xC2,0xCF,0x80,0xDA};
 232
 233 #define KEY_TEST_NUM    25
 234 static unsigned char key_test[KEY_TEST_NUM]={
 235         0xf0,0xe1,0xd2,0xc3,0xb4,0xa5,0x96,0x87,
 236         0x78,0x69,0x5a,0x4b,0x3c,0x2d,0x1e,0x0f,
 237         0x00,0x11,0x22,0x33,0x44,0x55,0x66,0x77,
 238         0x88};
 239
 240 static unsigned char key_data[8]=
 241         {0xFE,0xDC,0xBA,0x98,0x76,0x54,0x32,0x10};
 242
 243 static unsigned char key_out[KEY_TEST_NUM][8]={
 244         {0xF9,0xAD,0x59,0x7C,0x49,0xDB,0x00,0x5E},
 245         {0xE9,0x1D,0x21,0xC1,0xD9,0x61,0xA6,0xD6},
 246         {0xE9,0xC2,0xB7,0x0A,0x1B,0xC6,0x5C,0xF3},
 247         {0xBE,0x1E,0x63,0x94,0x08,0x64,0x0F,0x05},
 248         {0xB3,0x9E,0x44,0x48,0x1B,0xDB,0x1E,0x6E},
 249         {0x94,0x57,0xAA,0x83,0xB1,0x92,0x8C,0x0D},
 250         {0x8B,0xB7,0x70,0x32,0xF9,0x60,0x62,0x9D},
 251         {0xE8,0x7A,0x24,0x4E,0x2C,0xC8,0x5E,0x82},
 252         {0x15,0x75,0x0E,0x7A,0x4F,0x4E,0xC5,0x77},
 253         {0x12,0x2B,0xA7,0x0B,0x3A,0xB6,0x4A,0xE0},
 254         {0x3A,0x83,0x3C,0x9A,0xFF,0xC5,0x37,0xF6},
 255         {0x94,0x09,0xDA,0x87,0xA9,0x0F,0x6B,0xF2},
 256         {0x88,0x4F,0x80,0x62,0x50,0x60,0xB8,0xB4},
 257         {0x1F,0x85,0x03,0x1C,0x19,0xE1,0x19,0x68},
 258         {0x79,0xD9,0x37,0x3A,0x71,0x4C,0xA3,0x4F},
 259         {0x93,0x14,0x28,0x87,0xEE,0x3B,0xE1,0x5C},
 260         {0x03,0x42,0x9E,0x83,0x8C,0xE2,0xD1,0x4B},
 261         {0xA4,0x29,0x9E,0x27,0x46,0x9F,0xF6,0x7B},
 262         {0xAF,0xD5,0xAE,0xD1,0xC1,0xBC,0x96,0xA8},
 263         {0x10,0x85,0x1C,0x0E,0x38,0x58,0xDA,0x9F},
 264         {0xE6,0xF5,0x1E,0xD7,0x9B,0x9D,0xB2,0x1F},
 265         {0x64,0xA6,0xE1,0x4A,0xFD,0x36,0xB4,0x6F},
 266         {0x80,0xC7,0xD7,0xD4,0x5A,0x54,0x79,0xAD},
 267         {0x05,0x04,0x4B,0x62,0xFA,0x52,0xD0,0x80},
 268         };
 269
 270 static int test(void );
 271 static int print_test_data(void );
 272 int main(int argc, char *argv[])
 273         {
 274         int ret;
 275
 276         if (argc > 1)
 277                 ret=print_test_data();
 278         else
 279                 ret=test();
 280
 281 #ifdef OPENSSL_SYS_NETWARE
 282     if (ret) printf("ERROR: %d\n", ret);
 283 #endif
 284         EXIT(ret);
 285         return(0);
 286         }
 287
 288 static int print_test_data(void)
 289         {
 290         unsigned int i,j;
 291
 292         printf("ecb test data\n");
 293         printf("key bytes\t\tclear bytes\t\tcipher bytes\n");
 294         for (i=0; i<NUM_TESTS; i++)
 295                 {
 296                 for (j=0; j<8; j++)
 297                         printf("%02X",ecb_data[i][j]);
 298                 printf("\t");
 299                 for (j=0; j<8; j++)
 300                         printf("%02X",plain_data[i][j]);
 301                 printf("\t");
 302                 for (j=0; j<8; j++)
 303                         printf("%02X",cipher_data[i][j]);
 304                 printf("\n");
 305                 }
 306
 307         printf("set_key test data\n");
 308         printf("data[8]= ");
 309         for (j=0; j<8; j++)
 310                 printf("%02X",key_data[j]);
 311         printf("\n");
 312         for (i=0; i<KEY_TEST_NUM-1; i++)
 313                 {
 314                 printf("c=");
 315                 for (j=0; j<8; j++)
 316                         printf("%02X",key_out[i][j]);
 317                 printf(" k[%2u]=",i+1);
 318                 for (j=0; j<i+1; j++)
 319                         printf("%02X",key_test[j]);
 320                 printf("\n");
 321                 }
 322
 323         printf("\nchaining mode test data\n");
 324         printf("key[16]   = ");
 325         for (j=0; j<16; j++)
 326                 printf("%02X",cbc_key[j]);
 327         printf("\niv[8]     = ");
 328         for (j=0; j<8; j++)
 329                 printf("%02X",cbc_iv[j]);
 330         printf("\ndata[%d]  = '%s'",(int)strlen(cbc_data)+1,cbc_data);
 331         printf("\ndata[%d]  = ",(int)strlen(cbc_data)+1);
 332         for (j=0; j<strlen(cbc_data)+1; j++)
 333                 printf("%02X",cbc_data[j]);
 334         printf("\n");
 335         printf("cbc cipher text\n");
 336         printf("cipher[%d]= ",32);
 337         for (j=0; j<32; j++)
 338                 printf("%02X",cbc_ok[j]);
 339         printf("\n");
 340
 341         printf("cfb64 cipher text\n");
 342         printf("cipher[%d]= ",(int)strlen(cbc_data)+1);
 343         for (j=0; j<strlen(cbc_data)+1; j++)
 344                 printf("%02X",cfb64_ok[j]);
 345         printf("\n");
 346
 347         printf("ofb64 cipher text\n");
 348         printf("cipher[%d]= ",(int)strlen(cbc_data)+1);
 349         for (j=0; j<strlen(cbc_data)+1; j++)
 350                 printf("%02X",ofb64_ok[j]);
 351         printf("\n");
 352         return(0);
 353         }
 354
 355 static int test(void)
 356         {
 357         unsigned char cbc_in[40],cbc_out[40],iv[8];
 358         int i,n,err=0;
 359         BF_KEY key;
 360         BF_LONG data[2];
 361         unsigned char out[8];
 362         BF_LONG len;
 363
 364 #ifdef CHARSET_EBCDIC
 365         ebcdic2ascii(cbc_data, cbc_data, strlen(cbc_data));
 366 #endif
 367
 368         printf("testing blowfish in raw ecb mode\n");
 369         for (n=0; n<2; n++)
 370                 {
 371 #ifdef CHARSET_EBCDIC
 372                 ebcdic2ascii(bf_key[n], bf_key[n], strlen(bf_key[n]));
 373 #endif
 374                 BF_set_key(&key,strlen(bf_key[n]),(unsigned char *)bf_key[n]);
 375
 376                 data[0]=bf_plain[n][0];
 377                 data[1]=bf_plain[n][1];
 378                 BF_encrypt(data,&key);
 379                 if (memcmp(&(bf_cipher[n][0]),&(data[0]),8) != 0)
 380                         {
 381                         printf("BF_encrypt error encrypting\n");
 382                         printf("got     :");
 383                         for (i=0; i<2; i++)
 384                                 printf("%08lX ",(unsigned long)data[i]);
 385                         printf("\n");
 386                         printf("expected:");
 387                         for (i=0; i<2; i++)
 388                                 printf("%08lX ",(unsigned long)bf_cipher[n][i]);
 389                         err=1;
 390                         printf("\n");
 391                         }
 392
 393                 BF_decrypt(&(data[0]),&key);
 394                 if (memcmp(&(bf_plain[n][0]),&(data[0]),8) != 0)
 395                         {
 396                         printf("BF_encrypt error decrypting\n");
 397                         printf("got     :");
 398                         for (i=0; i<2; i++)
 399                                 printf("%08lX ",(unsigned long)data[i]);
 400                         printf("\n");
 401                         printf("expected:");
 402                         for (i=0; i<2; i++)
 403                                 printf("%08lX ",(unsigned long)bf_plain[n][i]);
 404                         printf("\n");
 405                         err=1;
 406                         }
 407                 }
 408
 409         printf("testing blowfish in ecb mode\n");
 410
 411         for (n=0; n<NUM_TESTS; n++)
 412                 {
 413                 BF_set_key(&key,8,ecb_data[n]);
 414
 415                 BF_ecb_encrypt(&(plain_data[n][0]),out,&key,BF_ENCRYPT);
 416                 if (memcmp(&(cipher_data[n][0]),out,8) != 0)
 417                         {
 418                         printf("BF_ecb_encrypt blowfish error encrypting\n");
 419                         printf("got     :");
 420                         for (i=0; i<8; i++)
 421                                 printf("%02X ",out[i]);
 422                         printf("\n");
 423                         printf("expected:");
 424                         for (i=0; i<8; i++)
 425                                 printf("%02X ",cipher_data[n][i]);
 426                         err=1;
 427                         printf("\n");
 428                         }
 429
 430                 BF_ecb_encrypt(out,out,&key,BF_DECRYPT);
 431                 if (memcmp(&(plain_data[n][0]),out,8) != 0)
 432                         {
 433                         printf("BF_ecb_encrypt error decrypting\n");
 434                         printf("got     :");
 435                         for (i=0; i<8; i++)
 436                                 printf("%02X ",out[i]);
 437                         printf("\n");
 438                         printf("expected:");
 439                         for (i=0; i<8; i++)
 440                                 printf("%02X ",plain_data[n][i]);
 441                         printf("\n");
 442                         err=1;
 443                         }
 444                 }
 445
 446         printf("testing blowfish set_key\n");
 447         for (n=1; n<KEY_TEST_NUM; n++)
 448                 {
 449                 BF_set_key(&key,n,key_test);
 450                 BF_ecb_encrypt(key_data,out,&key,BF_ENCRYPT);
 451                 /* mips-sgi-irix6.5-gcc  vv  -mabi=64 bug workaround */
 452                 if (memcmp(out,&(key_out[i=n-1][0]),8) != 0)
 453                         {
 454                         printf("blowfish setkey error\n");
 455                         err=1;
 456                         }
 457                 }
 458
 459         printf("testing blowfish in cbc mode\n");
 460         len=strlen(cbc_data)+1;
 461
 462         BF_set_key(&key,16,cbc_key);
 463         memset(cbc_in,0,sizeof cbc_in);
 464         memset(cbc_out,0,sizeof cbc_out);
 465         memcpy(iv,cbc_iv,sizeof iv);
 466         BF_cbc_encrypt((unsigned char *)cbc_data,cbc_out,len,
 467                 &key,iv,BF_ENCRYPT);
 468         if (memcmp(cbc_out,cbc_ok,32) != 0)
 469                 {
 470                 err=1;
 471                 printf("BF_cbc_encrypt encrypt error\n");
 472                 for (i=0; i<32; i++) printf("0x%02X,",cbc_out[i]);
 473                 }
 474         memcpy(iv,cbc_iv,8);
 475         BF_cbc_encrypt(cbc_out,cbc_in,len,
 476                 &key,iv,BF_DECRYPT);
 477         if (memcmp(cbc_in,cbc_data,strlen(cbc_data)+1) != 0)
 478                 {
 479                 printf("BF_cbc_encrypt decrypt error\n");
 480                 err=1;
 481                 }
 482
 483         printf("testing blowfish in cfb64 mode\n");
 484
 485         BF_set_key(&key,16,cbc_key);
 486         memset(cbc_in,0,40);
 487         memset(cbc_out,0,40);
 488         memcpy(iv,cbc_iv,8);
 489         n=0;
 490         BF_cfb64_encrypt((unsigned char *)cbc_data,cbc_out,(long)13,
 491                 &key,iv,&n,BF_ENCRYPT);
 492         BF_cfb64_encrypt((unsigned char *)&(cbc_data[13]),&(cbc_out[13]),len-13,
 493                 &key,iv,&n,BF_ENCRYPT);
 494         if (memcmp(cbc_out,cfb64_ok,(int)len) != 0)
 495                 {
 496                 err=1;
 497                 printf("BF_cfb64_encrypt encrypt error\n");
 498                 for (i=0; i<(int)len; i++) printf("0x%02X,",cbc_out[i]);
 499                 }
 500         n=0;
 501         memcpy(iv,cbc_iv,8);
 502         BF_cfb64_encrypt(cbc_out,cbc_in,17,
 503                 &key,iv,&n,BF_DECRYPT);
 504         BF_cfb64_encrypt(&(cbc_out[17]),&(cbc_in[17]),len-17,
 505                 &key,iv,&n,BF_DECRYPT);
 506         if (memcmp(cbc_in,cbc_data,(int)len) != 0)
 507                 {
 508                 printf("BF_cfb64_encrypt decrypt error\n");
 509                 err=1;
 510                 }
 511
 512         printf("testing blowfish in ofb64\n");
 513
 514         BF_set_key(&key,16,cbc_key);
 515         memset(cbc_in,0,40);
 516         memset(cbc_out,0,40);
 517         memcpy(iv,cbc_iv,8);
 518         n=0;
 519         BF_ofb64_encrypt((unsigned char *)cbc_data,cbc_out,(long)13,&key,iv,&n);
 520         BF_ofb64_encrypt((unsigned char *)&(cbc_data[13]),
 521                 &(cbc_out[13]),len-13,&key,iv,&n);
 522         if (memcmp(cbc_out,ofb64_ok,(int)len) != 0)
 523                 {
 524                 err=1;
 525                 printf("BF_ofb64_encrypt encrypt error\n");
 526                 for (i=0; i<(int)len; i++) printf("0x%02X,",cbc_out[i]);
 527                 }
 528         n=0;
 529         memcpy(iv,cbc_iv,8);
 530         BF_ofb64_encrypt(cbc_out,cbc_in,17,&key,iv,&n);
 531         BF_ofb64_encrypt(&(cbc_out[17]),&(cbc_in[17]),len-17,&key,iv,&n);
 532         if (memcmp(cbc_in,cbc_data,(int)len) != 0)
 533                 {
 534                 printf("BF_ofb64_encrypt decrypt error\n");
 535                 err=1;
 536                 }
 537
 538         return(err);
 539         }
 540 #endif