1/* crypto/cast/casttest.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#include <stdio.h> 60#include <string.h> 61#include <stdlib.h> 62 63#include "../e_os.h" 64 65#ifdef OPENSSL_NO_CAST 66int main(int argc, char *argv[]) 67{ 68 printf("No CAST support\n"); 69 return(0); 70} 71#else 72#include <openssl/cast.h> 73 74#define FULL_TEST 75 76static unsigned char k[16]={ 77 0x01,0x23,0x45,0x67,0x12,0x34,0x56,0x78, 78 0x23,0x45,0x67,0x89,0x34,0x56,0x78,0x9A 79 }; 80 81static unsigned char in[8]={ 0x01,0x23,0x45,0x67,0x89,0xAB,0xCD,0xEF}; 82 83static int k_len[3]={16,10,5}; 84static unsigned char c[3][8]={ 85 {0x23,0x8B,0x4F,0xE5,0x84,0x7E,0x44,0xB2}, 86 {0xEB,0x6A,0x71,0x1A,0x2C,0x02,0x27,0x1B}, 87 {0x7A,0xC8,0x16,0xD1,0x6E,0x9B,0x30,0x2E}, 88 }; 89static unsigned char out[80]; 90 91static unsigned char in_a[16]={ 92 0x01,0x23,0x45,0x67,0x12,0x34,0x56,0x78, 93 0x23,0x45,0x67,0x89,0x34,0x56,0x78,0x9A}; 94static unsigned char in_b[16]={ 95 0x01,0x23,0x45,0x67,0x12,0x34,0x56,0x78, 96 0x23,0x45,0x67,0x89,0x34,0x56,0x78,0x9A}; 97 98static unsigned char c_a[16]={ 99 0xEE,0xA9,0xD0,0xA2,0x49,0xFD,0x3B,0xA6, 100 0xB3,0x43,0x6F,0xB8,0x9D,0x6D,0xCA,0x92}; 101static unsigned char c_b[16]={ 102 0xB2,0xC9,0x5E,0xB0,0x0C,0x31,0xAD,0x71, 103 0x80,0xAC,0x05,0xB8,0xE8,0x3D,0x69,0x6E}; 104 105#if 0 106char *text="Hello to all people out there"; 107 108static unsigned char cfb_key[16]={ 109 0xe1,0xf0,0xc3,0xd2,0xa5,0xb4,0x87,0x96, 110 0x69,0x78,0x4b,0x5a,0x2d,0x3c,0x0f,0x1e, 111 }; 112static unsigned char cfb_iv[80]={0x34,0x12,0x78,0x56,0xab,0x90,0xef,0xcd}; 113static unsigned char cfb_buf1[40],cfb_buf2[40],cfb_tmp[8]; 114#define CFB_TEST_SIZE 24 115static unsigned char plain[CFB_TEST_SIZE]= 116 { 117 0x4e,0x6f,0x77,0x20,0x69,0x73, 118 0x20,0x74,0x68,0x65,0x20,0x74, 119 0x69,0x6d,0x65,0x20,0x66,0x6f, 120 0x72,0x20,0x61,0x6c,0x6c,0x20 121 }; 122static unsigned char cfb_cipher64[CFB_TEST_SIZE]={ 123 0x59,0xD8,0xE2,0x65,0x00,0x58,0x6C,0x3F, 124 0x2C,0x17,0x25,0xD0,0x1A,0x38,0xB7,0x2A, 125 0x39,0x61,0x37,0xDC,0x79,0xFB,0x9F,0x45 126 127/* 0xF9,0x78,0x32,0xB5,0x42,0x1A,0x6B,0x38, 128 0x9A,0x44,0xD6,0x04,0x19,0x43,0xC4,0xD9, 129 0x3D,0x1E,0xAE,0x47,0xFC,0xCF,0x29,0x0B,*/ 130 }; 131#endif 132 133int main(int argc, char *argv[]) 134 { 135#ifdef FULL_TEST 136 long l; 137 CAST_KEY key_b; 138#endif 139 int i,z,err=0; 140 CAST_KEY key; 141 142 for (z=0; z<3; z++) 143 { 144 CAST_set_key(&key,k_len[z],k); 145 146 CAST_ecb_encrypt(in,out,&key,CAST_ENCRYPT); 147 if (memcmp(out,&(c[z][0]),8) != 0) 148 { 149 printf("ecb cast error encrypting for keysize %d\n",k_len[z]*8); 150 printf("got :"); 151 for (i=0; i<8; i++) 152 printf("%02X ",out[i]); 153 printf("\n"); 154 printf("expected:"); 155 for (i=0; i<8; i++) 156 printf("%02X ",c[z][i]); 157 err=20; 158 printf("\n"); 159 } 160 161 CAST_ecb_encrypt(out,out,&key,CAST_DECRYPT); 162 if (memcmp(out,in,8) != 0) 163 { 164 printf("ecb cast error decrypting for keysize %d\n",k_len[z]*8); 165 printf("got :"); 166 for (i=0; i<8; i++) 167 printf("%02X ",out[i]); 168 printf("\n"); 169 printf("expected:"); 170 for (i=0; i<8; i++) 171 printf("%02X ",in[i]); 172 printf("\n"); 173 err=3; 174 } 175 } 176 if (err == 0) 177 printf("ecb cast5 ok\n"); 178 179#ifdef FULL_TEST 180 { 181 unsigned char out_a[16],out_b[16]; 182 static char *hex="0123456789ABCDEF"; 183 184 printf("This test will take some time...."); 185 fflush(stdout); 186 memcpy(out_a,in_a,sizeof(in_a)); 187 memcpy(out_b,in_b,sizeof(in_b)); 188 i=1; 189 190 for (l=0; l<1000000L; l++) 191 { 192 CAST_set_key(&key_b,16,out_b); 193 CAST_ecb_encrypt(&(out_a[0]),&(out_a[0]),&key_b,CAST_ENCRYPT); 194 CAST_ecb_encrypt(&(out_a[8]),&(out_a[8]),&key_b,CAST_ENCRYPT); 195 CAST_set_key(&key,16,out_a); 196 CAST_ecb_encrypt(&(out_b[0]),&(out_b[0]),&key,CAST_ENCRYPT); 197 CAST_ecb_encrypt(&(out_b[8]),&(out_b[8]),&key,CAST_ENCRYPT); 198 if ((l & 0xffff) == 0xffff) 199 { 200 printf("%c",hex[i&0x0f]); 201 fflush(stdout); 202 i++; 203 } 204 } 205 206 if ( (memcmp(out_a,c_a,sizeof(c_a)) != 0) || 207 (memcmp(out_b,c_b,sizeof(c_b)) != 0)) 208 { 209 printf("\n"); 210 printf("Error\n"); 211 212 printf("A out ="); 213 for (i=0; i<16; i++) printf("%02X ",out_a[i]); 214 printf("\nactual="); 215 for (i=0; i<16; i++) printf("%02X ",c_a[i]); 216 printf("\n"); 217 218 printf("B out ="); 219 for (i=0; i<16; i++) printf("%02X ",out_b[i]); 220 printf("\nactual="); 221 for (i=0; i<16; i++) printf("%02X ",c_b[i]); 222 printf("\n"); 223 } 224 else 225 printf(" ok\n"); 226 } 227#endif 228 229 EXIT(err); 230 return(err); 231 } 232#endif 233