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 ();

}