Subversion Repositories idea

/* File Name   : idea_encryptor_pat_enc.c            		        */
/* Description : The encryption test patterns of IDEA encryption block  */ 
/* Purpose     : To be used by GENLIB					*/ 
/* Date	       : Aug 23, 2001          					*/ 
/* Version     : 1.1                   					*/ 
/* Author      : Martadinata A.        					*/ 
/* Address     : VLSI RG, Dept. of Electrical Engineering ITB,  	*/
/*	         Bandung, Indonesia					*/
/* E-mail      : marta@ic.vlsi.itb.ac.id                        	*/
 
#include <stdio.h>
#include "genpat.h"
#define interval 30
 
char *inttostr(entier)
int entier;
{
  char *str;
  str = (char *) mbkalloc (32 * sizeof (char));
  sprintf (str, "%d",entier);
  return(str);
}
 
main ()
{
  int round,i; 
  int time, max;
 
  DEF_GENPAT("idea_encryptor_encrypt");
  SETTUNIT ("ns");
  /* Inputs */
  /* for power supply */ 
  DECLAR ("vdd", ":2", "B", IN, "", "");
  DECLAR ("vss", ":2", "B", IN, "", "");
  /* for 64-bit input data */
  DECLAR ("x1", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("x2", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("x3", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("x4", ":2", "X", IN, "15 downto 0", "");
  /* for the 6 16-bit subkeys of each round */
  DECLAR ("z1", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("z2", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("z3", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("z4", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("z5", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("z6", ":2", "X", IN, "15 downto 0", "");
  /* for the 4 16-bit subkeys of output transformation state */
  DECLAR ("z19", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("z29", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("z39", ":2", "X", IN, "15 downto 0", "");
  DECLAR ("z49", ":2", "X", IN, "15 downto 0", "");
 
 /* for control signals */
  DECLAR ("clk", ":2", "B", IN, "", "");
  DECLAR ("rst", ":2", "B", IN, "", "");
  DECLAR ("start", ":2", "B", IN, "", "");
  DECLAR ("key_ready", ":2", "B", IN, "", "");
 
  DECLAR ("round", ":2", "B", OUT, "2 downto 0","");
  DECLAR ("en_key_out", ":2", "B", OUT, "","");
  DECLAR ("finish", ":2", "B", OUT, "",""); 
 
  /* Outputs */ 
  /* for 4 16-bit outpus */ 
  DECLAR ("y1", ":2", "X", OUT, "15 downto 0", "");
  DECLAR ("y2", ":2", "X", OUT, "15 downto 0", "");
  DECLAR ("y3", ":2", "X", OUT, "15 downto 0", "");
  DECLAR ("y4", ":2", "X", OUT, "15 downto 0", "");
  max =21;
  for (round=0; round<8; round++)
  {  
     for (i=0;i<max;i++)
     {  
        if(round == 0)    
            time = ((round*max) + i) * interval ; 
        else if(round ==1 ) {
            max = 16; 
            time = ((round*max) + i + 5) * interval; } 
        else {
            max = 16;
	    time = ((round*max) + i + 5) * interval; }
 
        AFFECT (inttostr(time), "vdd", "0b1");
	AFFECT (inttostr(time), "vss", "0b0");
 
 
	if(((time/interval)+2)% 2 == 0)
             AFFECT (inttostr(time), "clk", "0b0");
        else
             AFFECT (inttostr(time), "clk", "0b1");
 
        if((time/interval) < 2) 
             AFFECT (inttostr(time), "rst", "0b1");
        else
	     AFFECT (inttostr(time), "rst", "0b0");
 
        if((time/interval) < 5)
	{    AFFECT (inttostr(time), "start", "0b0");
             AFFECT (inttostr(time), "key_ready", "0b0");
        }
        else
 	{    AFFECT (inttostr(time), "start", "0b1");
             AFFECT (inttostr(time), "key_ready", "0b1");
	}	     	
 
        AFFECT (inttostr(time), "x1", "11");
        AFFECT (inttostr(time), "x2", "12");
	AFFECT (inttostr(time), "x3", "13");
        AFFECT (inttostr(time), "x4", "14");
 
        if(round == 0)
        {    LABEL ("round_1");
             AFFECT (inttostr(time), "z1", "3");
             AFFECT (inttostr(time), "z2", "5");
	     AFFECT (inttostr(time), "z3", "7");
             AFFECT (inttostr(time), "z4", "9");
	     AFFECT (inttostr(time), "z5", "11");
             AFFECT (inttostr(time), "z6", "13");
        }
        else if(round == 1)
        {    LABEL ("round_2");
             AFFECT (inttostr(time), "z1", "15");
             AFFECT (inttostr(time), "z2", "17");
	     AFFECT (inttostr(time), "z3", "2560");
             AFFECT (inttostr(time), "z4", "3584");
	     AFFECT (inttostr(time), "z5", "4608");
             AFFECT (inttostr(time), "z6", "5632");
        }
        else if(round == 2)
        {    LABEL ("round_3");
	     AFFECT (inttostr(time), "z1", "6656");
             AFFECT (inttostr(time), "z2", "7680");
	     AFFECT (inttostr(time), "z3", "8704");
             AFFECT (inttostr(time), "z4", "1536");
	     AFFECT (inttostr(time), "z5", "36");
             AFFECT (inttostr(time), "z6", "44");
        }
	else if(round == 3)
        {    LABEL ("round_4");
	     AFFECT (inttostr(time), "z1", "52");
             AFFECT (inttostr(time), "z2", "60");
	     AFFECT (inttostr(time), "z3", "68");
             AFFECT (inttostr(time), "z4", "12");
	     AFFECT (inttostr(time), "z5", "20");
             AFFECT (inttostr(time), "z6", "28");	
 	}
        else if(round == 4)
	{    LABEL ("round_5");
	     AFFECT (inttostr(time), "z1", "22528");
             AFFECT (inttostr(time), "z2", "26624");
	     AFFECT (inttostr(time), "z3", "30720");
             AFFECT (inttostr(time), "z4", "34816");
	     AFFECT (inttostr(time), "z5", "6144");
             AFFECT (inttostr(time), "z6", "10240");
        }
	else if(round == 5)
	{    LABEL ("round_6");
	     AFFECT (inttostr(time), "z1", "14336");
             AFFECT (inttostr(time), "z2", "18432");
	     AFFECT (inttostr(time), "z3", "240");
             AFFECT (inttostr(time), "z4", "272");
	     AFFECT (inttostr(time), "z5", "48");
             AFFECT (inttostr(time), "z6", "80");
	}
        else if(round == 6)
	{    LABEL ("round_7");
	     AFFECT (inttostr(time), "z1", "112");
             AFFECT (inttostr(time), "z2", "144");
	     AFFECT (inttostr(time), "z3", "176");
             AFFECT (inttostr(time), "z4", "208");
	     AFFECT (inttostr(time), "z5", "8192");
             AFFECT (inttostr(time), "z6", "24576");     		 
	}
	else 
	{    max=22;
             LABEL ("round_8");
	     AFFECT (inttostr(time), "z1", "40960");
             AFFECT (inttostr(time), "z2", "57345");
	     AFFECT (inttostr(time), "z3", "8193");
             AFFECT (inttostr(time), "z4", "24577");
	     AFFECT (inttostr(time), "z5", "40961");
             AFFECT (inttostr(time), "z6", "57346");
	}
 
	AFFECT (inttostr(time), "z19", "320");
        AFFECT (inttostr(time), "z29", "448");
	AFFECT (inttostr(time), "z39", "576");
        AFFECT (inttostr(time), "z49", "704");    
 
      } 
    }
  SAV_GENPAT ();
}