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