www.pudn.com > serpent.rar > cbc_e_m.c

/* Copyright (C) 1998 Ross Anderson, Eli Biham, Lars Knudsen 
 * All rights reserved. 
 * 
 * This code is freely distributed for AES selection process. 
 * No other use is allowed. 
 *  
 * Copyright remains of the copyright holders, and as such any Copyright 
 * notices in the code are not to be removed. 
 *  
 * Redistribution and use in source and binary forms, with or without 
 * modification, are permitted only for the AES selection process, 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. 
 *  
 * THIS SOFTWARE IS PROVIDED ``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 AUTHORS 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 without the authors permission. 
 *  i.e. this code cannot simply be copied and put under another distribution 
 * licence [including the GNU Public Licence.] 
 */ 
 
#include "serpent.h" 
 
char *serpent_convert_to_string(); 
 
main(int argc, char **argv) 
{ 
  unsigned long text[4]; 
  unsigned long textp[4]; 
  unsigned long cv[4]; 
  int i, j; 
  char tmpstr[100]; 
  int keylen; 
 
  printf("=========================\n"); 
  printf("\n"); 
  printf("FILENAME:  \"cbc_e_m.txt\"\n"); 
  printf("\n"); 
  printf("Cipher Block Chaining (CBC) Mode - ENCRYPTION\n"); 
  printf("Monte Carlo Test\n"); 
  printf("\n"); 
  printf("Algorithm Name: Serpent\n"); 
  printf("Principal Submitter: Ross Anderson, Eli Biham, Lars Knudsen\n"); 
  printf("\n"); 
  printf("==========\n"); 
  printf("\n"); 
 
  for(keylen=128; keylen<=256; keylen+=64) 
    { 
      int i; 
      int keyw=keylen/32; 
 
      int rc; 
 
      keyInstance keyI; 
      cipherInstance cipherI; 
 
      rc=cipherInit(&cipherI, MODE_ECB, ""); 
      if(rc<=0) exit(2); 
 
      rc=makeKey(&keyI, DIR_ENCRYPT, keylen, 
            "0000000000000000000000000000000000000000000000000000000000000000"); 
      if(rc<=0) exit(2); 
 
      serpent_convert_from_string(128, "00000000000000000000000000000000", 
				  text); 
      serpent_convert_from_string(128, "00000000000000000000000000000000", 
				  cv); 
 
      printf("KEYSIZE=%d\n", keylen); 
      printf("\n"); 
 
      for(i=0; i<400; i++) 
	{ 
	  int j; 
 
	  printf("I=%d\n", i); 
	  printf("KEY=%s\n", serpent_convert_to_string(keylen, keyI.key, tmpstr)); 
	  printf("IV=%s\n", serpent_convert_to_string(128, cv, tmpstr)); 
	  printf("PT=%s\n", serpent_convert_to_string(128, text, tmpstr)); 
	  memcpy(textp, cv, 16); 
	  for(j=0; j<10000; j++) 
	    { 
	      int l; 
	      for(l=0; l<4; l++) 
		text[l] ^= cv[l]; 
	      rc=blockEncrypt(&cipherI, &keyI, (BYTE*)text, 128, (BYTE*)text); 
	      if(rc<=0) exit(2); 
              if(j==0) 
		{memcpy(textp, text, 16); 
		 memcpy(text, cv, 16); 
		 memcpy(cv, textp, 16); 
		} 
	      else 
	        {memcpy(cv, text, 16); 
	         memcpy(text, textp, 16); 
	         memcpy(textp, cv, 16); 
		}; 
	    } 
 /*  printf("CT=%s\n", serpent_convert_to_string(128, text, tmpstr));*/ 
	  printf("CT=%s\n", serpent_convert_to_string(128, textp, tmpstr)); 
	  printf("\n"); 
 
	  for(j=0; j=keyw-4) 
	      keyI.key[j] ^= textp[j-(keyw-4)]; 
	    else 
	      keyI.key[j] ^= text[j-(keyw-8)]; 
	  rc=makeKey(&keyI, DIR_ENCRYPT, keylen, 
		     serpent_convert_to_string(keylen, keyI.key, tmpstr)); 
	  if(rc<=0) exit(2); 
	} 
      printf("==========\n"); 
      printf("\n"); 
    } 
  exit(0); 
}