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