URL https://opencores.org/ocsvn/apbtoaes128/apbtoaes128/trunk

Subversion Repositories apbtoaes128

[/] [apbtoaes128/] [trunk/] [pli/] [bfm_ctr/] [aes_bfm_encryption_dma_ctr.h] - Blame information for rev 12

Details | Compare with Previous | View Log


//////////////////////////////////////////////////////////////////
////
////
////    AES CORE BLOCK
////
////
////
//// This file is part of the APB to AES128 project
////
//// http://www.opencores.org/cores/apbtoaes128/
////
////
////
//// Description
////
//// Implementation of APB IP core according to
////
//// aes128_spec IP core specification document.
////
////
////
//// To Do: Things are right here but always all block can suffer changes
////
////
////
////
////
//// Author(s): - Felipe Fernandes Da Costa, fefe2560@gmail.com
////
///////////////////////////////////////////////////////////////// 
////
////
//// Copyright (C) 2009 Authors and OPENCORES.ORG
////
////
////
//// This source file may be used and distributed without
////
//// restriction provided that this copyright statement is not
////
//// removed from the file and that any derivative work contains
//// the original copyright notice and the associated disclaimer.
////
////
//// This source file is free software; you can redistribute it
////
//// and/or modify it under the terms of the GNU Lesser General
////
//// Public License as published by the Free Software Foundation;
//// either version 2.1 of the License, or (at your option) any
////
//// later version.
////
////
////
//// This source is distributed in the hope that it will be
////
//// useful, but WITHOUT ANY WARRANTY; without even the implied
////
//// warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
////
//// PURPOSE. See the GNU Lesser General Public License for more
//// details.
////
////
////
//// You should have received a copy of the GNU Lesser General
////
//// Public License along with this source; if not, download it
////
//// from http://www.opencores.org/lgpl.shtml
////
////
///////////////////////////////////////////////////////////////////
static int aes_bfm_encryption_ctr_dma_calltf(char*user_data)
{
 
        vpiHandle PRESETn = vpi_handle_by_name("AES_GLADIC_tb.PRESETn", NULL);
        vpiHandle PWDATA = vpi_handle_by_name("AES_GLADIC_tb.PWDATA", NULL);
        vpiHandle PENABLE = vpi_handle_by_name("AES_GLADIC_tb.PENABLE", NULL);
        vpiHandle PSEL = vpi_handle_by_name("AES_GLADIC_tb.PSEL", NULL);
        vpiHandle PWRITE = vpi_handle_by_name("AES_GLADIC_tb.PWRITE", NULL);
        vpiHandle PADDR = vpi_handle_by_name("AES_GLADIC_tb.PADDR", NULL);
        vpiHandle PRDATA = vpi_handle_by_name("AES_GLADIC_tb.PRDATA", NULL);
        vpiHandle PREADY = vpi_handle_by_name("AES_GLADIC_tb.PREADY", NULL);
        vpiHandle PSLVERR = vpi_handle_by_name("AES_GLADIC_tb.PSLVERR", NULL);
        vpiHandle int_ccf = vpi_handle_by_name("AES_GLADIC_tb.int_ccf", NULL);
        vpiHandle int_err = vpi_handle_by_name("AES_GLADIC_tb.int_err", NULL);
        vpiHandle dma_req_wr = vpi_handle_by_name("AES_GLADIC_tb.dma_req_wr", NULL);
        vpiHandle dma_req_rd = vpi_handle_by_name("AES_GLADIC_tb.dma_req_rd", NULL);
 
        std::random_device rd;
        std::uniform_int_distribution<long int> data_in(0,4294967295);
 
        v_ecb.format=vpiIntVal;
 
        vpi_get_value(PRESETn, &v_ecb);
 
 
        //printf("%i\n",STATE);
 
 
        if(type_bfm == CTR_ENCRYPTION_DMA && v_ecb.value.integer == 1)
        {
 
                switch(STATE)
                {
 
                  case IDLE:
 
                                if(PACKETS_GENERATED >= MAX_ITERATIONS)
                                {
 
                                        STATE = IDLE;
                                        type_bfm = 0;
 
                                }else
                                {
                                        STATE = WRITE;
 
                                        counter = 0;
 
 
                                        v_ecb.value.integer = 0;
                                        vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
 
                                        v_ecb.value.integer = vector_address[0];
                                        vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        v_ecb.value.integer = 0;
                                        vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);
 
                                        v_ecb.value.integer = 1;
                                        vpi_put_value(PWRITE, &v_ecb, NULL, vpiNoDelay);
 
                                        v_ecb.value.integer = 1;
                                        vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);
                                }
 
                  break;
 
                  case WRITE:
 
 
 
                        v_ecb.value.integer = 1;
                        vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);
 
                        if(counter == 0)
                        {
                                counter_write++;
                                counter++;
 
                                v_ecb.value.integer = 1;
                                vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
 
 
                        }else if(counter == 1)
                        {
 
 
 
                                t_ecb.type = vpiScaledRealTime;
                                t_ecb.real = 0;
                                v_ecb.format=vpiIntVal;
 
                                v_ecb.value.integer = 0;
                                vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
 
 
                                if(counter_write < 9)
                                {
 
                                        v_ecb.value.integer = vector_address[counter_write];
 
                                        vpi_put_value(PADDR, &v_ecb, &t_ecb, vpiTransportDelay);
                                        //vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        if(FIPS_ENABLE == FIPS)
                                        {
 
                                                if(vector_address[counter_write] == ADDR_AES_KEYR3)
                                                {
                                                        a = a | KEY_FIPS_CTR_NOT_DERIVATED[0];
                                                        a = a << 8;
                                                        a = a | KEY_FIPS_CTR_NOT_DERIVATED[1];
                                                        a = a << 8;
                                                        a = a | KEY_FIPS_CTR_NOT_DERIVATED[2];
                                                        a = a << 8;
                                                        a = a | KEY_FIPS_CTR_NOT_DERIVATED[3];
                                                        v_ecb.value.integer = a;
                                                }
 
 
                                                if(vector_address[counter_write] == ADDR_AES_KEYR2)
                                                {
                                                        b = b | KEY_FIPS_CTR_NOT_DERIVATED[4];
                                                        b = b << 8;
                                                        b = b | KEY_FIPS_CTR_NOT_DERIVATED[5];
                                                        b = b << 8;
                                                        b = b | KEY_FIPS_CTR_NOT_DERIVATED[6];
                                                        b = b << 8;
                                                        b = b | KEY_FIPS_CTR_NOT_DERIVATED[7];
                                                        v_ecb.value.integer = b;
                                                }
 
                                                if(vector_address[counter_write] == ADDR_AES_KEYR1)
                                                {
 
                                                        c = c | KEY_FIPS_CTR_NOT_DERIVATED[8];
                                                        c = c << 8;
                                                        c = c | KEY_FIPS_CTR_NOT_DERIVATED[9];
                                                        c = c << 8;
                                                        c = c | KEY_FIPS_CTR_NOT_DERIVATED[10];
                                                        c = c << 8;
                                                        c = c | KEY_FIPS_CTR_NOT_DERIVATED[11];
                                                        v_ecb.value.integer = c;
 
                                                }
 
                                                if(vector_address[counter_write] == ADDR_AES_KEYR0)
                                                {
                                                        d = d | KEY_FIPS_CTR_NOT_DERIVATED[12];
                                                        d = d << 8;
                                                        d = d | KEY_FIPS_CTR_NOT_DERIVATED[13];
                                                        d = d << 8;
                                                        d = d | KEY_FIPS_CTR_NOT_DERIVATED[14];
                                                        d = d << 8;
                                                        d = d | KEY_FIPS_CTR_NOT_DERIVATED[15];
                                                        v_ecb.value.integer = d;
                                                }
 
 
                                                if(vector_address[counter_write] == ADDR_AES_IVR3)
                                                {
                                                        a = a | IV_FIPS_CTR_NOT_DERIVATED[0];
                                                        a = a << 8;
                                                        a = a | IV_FIPS_CTR_NOT_DERIVATED[1];
                                                        a = a << 8;
                                                        a = a | IV_FIPS_CTR_NOT_DERIVATED[2];
                                                        a = a << 8;
                                                        a = a | IV_FIPS_CTR_NOT_DERIVATED[3];
                                                        v_ecb.value.integer = a;
                                                }
 
 
                                                if(vector_address[counter_write] == ADDR_AES_IVR2)
                                                {
                                                        b = b | IV_FIPS_CTR_NOT_DERIVATED[4];
                                                        b = b << 8;
                                                        b = b | IV_FIPS_CTR_NOT_DERIVATED[5];
                                                        b = b << 8;
                                                        b = b | IV_FIPS_CTR_NOT_DERIVATED[6];
                                                        b = b << 8;
                                                        b = b | IV_FIPS_CTR_NOT_DERIVATED[7];
                                                        v_ecb.value.integer = b;
                                                }
 
                                                if(vector_address[counter_write] == ADDR_AES_IVR1)
                                                {
 
                                                        c = c | IV_FIPS_CTR_NOT_DERIVATED[8];
                                                        c = c << 8;
                                                        c = c | IV_FIPS_CTR_NOT_DERIVATED[9];
                                                        c = c << 8;
                                                        c = c | IV_FIPS_CTR_NOT_DERIVATED[10];
                                                        c = c << 8;
                                                        c = c | IV_FIPS_CTR_NOT_DERIVATED[11];
                                                        v_ecb.value.integer = c;
 
                                                }
 
                                                if(vector_address[counter_write] == ADDR_AES_IVR0)
                                                {
                                                        d = d | IV_FIPS_CTR_NOT_DERIVATED[12];
                                                        d = d << 8;
                                                        d = d | IV_FIPS_CTR_NOT_DERIVATED[13];
                                                        d = d << 8;
                                                        d = d | IV_FIPS_CTR_NOT_DERIVATED[14];
                                                        d = d << 8;
                                                        d = d | IV_FIPS_CTR_NOT_DERIVATED[15];
                                                        v_ecb.value.integer = d;
                                                }
 
 
                                        }else if(FIPS_ENABLE == RANDOM_DATA)
                                        {
                                                v_ecb.value.integer = data_in(rd);
                                        }
 
                                        //vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);                                              
                                        vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);
 
 
                                        a = 0;
                                        b = 0;
                                        c = 0;
                                        d = 0;
 
 
 
                                }else if(counter_write == 9)//ENABLE CR
                                {
 
                                        if(DATATYPE == TYPE_00)// NO DINR DOUTR SWAP DATA
                                        {
                                                v_ecb.value.integer = ADDR_AES_CR;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                                v_ecb.value.integer = 6209;
                                                vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);
 
                                        }else if(DATATYPE == TYPE_01)// 16 BIT DINR DOUTR SWAP DATA
                                        {
                                                v_ecb.value.integer = ADDR_AES_CR;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                                v_ecb.value.integer = 6211;
                                                vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);
 
                                        }else if(DATATYPE == TYPE_02)// 8 BIT DINR DOUTR SWAP DATA
                                        {
                                                v_ecb.value.integer = ADDR_AES_CR;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                                v_ecb.value.integer = 6213;
                                                vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);
 
                                        }else if(DATATYPE == TYPE_03)// BIT DINR DOUTR SWAP DATA
                                        {
                                                v_ecb.value.integer = ADDR_AES_CR;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                                v_ecb.value.integer = 6215;
                                                vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);
                                        }
 
                                }else if(counter_write > 9  &&  counter_write < 14) //WRITE DINR
                                {
 
                                        v_ecb.value.integer = ADDR_AES_DINR;
                                        vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
 
                                        if(FIPS_ENABLE == FIPS)
                                        {
 
                                                if(DATATYPE == TYPE_00)
                                                {
 
                                                        if(counter_write == 10)
                                                        {
                                                                a = a | TEXT_FIPS_CTR_NOT_DERIVATED[0];
                                                                a = a << 8;
                                                                a = a | TEXT_FIPS_CTR_NOT_DERIVATED[1];
                                                                a = a << 8;
                                                                a = a | TEXT_FIPS_CTR_NOT_DERIVATED[2];
                                                                a = a << 8;
                                                                a = a | TEXT_FIPS_CTR_NOT_DERIVATED[3];
                                                                v_ecb.value.integer = a;
 
                                                        }else if(counter_write == 11)
                                                        {
                                                                b = b | TEXT_FIPS_CTR_NOT_DERIVATED[4];
                                                                b = b << 8;
                                                                b = b | TEXT_FIPS_CTR_NOT_DERIVATED[5];
                                                                b = b << 8;
                                                                b = b | TEXT_FIPS_CTR_NOT_DERIVATED[6];
                                                                b = b << 8;
                                                                b = b | TEXT_FIPS_CTR_NOT_DERIVATED[7];
                                                                v_ecb.value.integer = b;
 
                                                        }else if(counter_write == 12 )
                                                        {
 
                                                                c = c | TEXT_FIPS_CTR_NOT_DERIVATED[8];
                                                                c = c << 8;
                                                                c = c | TEXT_FIPS_CTR_NOT_DERIVATED[9];
                                                                c = c << 8;
                                                                c = c | TEXT_FIPS_CTR_NOT_DERIVATED[10];
                                                                c = c << 8;
                                                                c = c | TEXT_FIPS_CTR_NOT_DERIVATED[11];
                                                                v_ecb.value.integer = c;
 
                                                        }else if(counter_write == 13 )
                                                        {
                                                                d = d | TEXT_FIPS_CTR_NOT_DERIVATED[12];
                                                                d = d << 8;
                                                                d = d | TEXT_FIPS_CTR_NOT_DERIVATED[13];
                                                                d = d << 8;
                                                                d = d | TEXT_FIPS_CTR_NOT_DERIVATED[14];
                                                                d = d << 8;
                                                                d = d | TEXT_FIPS_CTR_NOT_DERIVATED[15];
                                                                v_ecb.value.integer = d;
 
                                                        }
 
                                                }else if(DATATYPE > TYPE_00)
                                                {
 
 
                                                        if(counter_write == 10)
                                                        {
                                                                a = a | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[0];
                                                                a = a << 8;
                                                                a = a | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[1];
                                                                a = a << 8;
                                                                a = a | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[2];
                                                                a = a << 8;
                                                                a = a | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[3];
                                                                v_ecb.value.integer = a;
 
                                                        }else if(counter_write == 11)
                                                        {
                                                                b = b | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[4];
                                                                b = b << 8;
                                                                b = b | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[5];
                                                                b = b << 8;
                                                                b = b | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[6];
                                                                b = b << 8;
                                                                b = b | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[7];
                                                                v_ecb.value.integer = b;
 
                                                        }else if(counter_write == 12 )
                                                        {
 
                                                                c = c | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[8];
                                                                c = c << 8;
                                                                c = c | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[9];
                                                                c = c << 8;
                                                                c = c | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[10];
                                                                c = c << 8;
                                                                c = c | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[11];
                                                                v_ecb.value.integer = c;
 
                                                        }else if(counter_write == 13 )
                                                        {
                                                                d = d | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[12];
                                                                d = d << 8;
                                                                d = d | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[13];
                                                                d = d << 8;
                                                                d = d | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[14];
                                                                d = d << 8;
                                                                d = d | TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[15];
                                                                v_ecb.value.integer = d;
 
                                                        }
 
                                                }
 
                                        }else if(FIPS_ENABLE == RANDOM_DATA)
                                        {
                                                v_ecb.value.integer = data_in(rd);
                                        }
 
                                        //vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);
                                        vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);
 
                                        a = 0;
                                        b = 0;
                                        c = 0;
                                        d = 0;
 
 
                                }
                                        counter=0;
 
                        }
 
 
 
                                if(counter_write == 14)
                                {
                                        counter_write = 0;
                                        STATE = WAIT_SR;
                                }
 
                  break;
 
                  case WAIT_SR:
 
                                v_ecb.value.integer = ADDR_AES_SR;
                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                v_ecb.value.integer = 0;
                                vpi_put_value(PWRITE, &v_ecb, NULL, vpiNoDelay);
                                //vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);
 
 
                                if(counter == 0)
                                {
 
                                        counter++;
 
                                        v_ecb.value.integer = 1;
                                        vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
 
                                        v_ecb.value.integer = 0;
                                        vpi_get_value(PRDATA,&v_ecb);
 
                                        if(v_ecb.value.integer == 1)
                                        {
                                                STATE = READ_DOUTR;
 
                                                //t_ecb.type = vpiScaledRealTime;
                                                //t_ecb.real = 10;
                                                //v_ecb.format=vpiIntVal;
                                                //v_ecb.value.integer = ADDR_AES_DOUTR;
                                                //vpi_put_value(PADDR, &v_ecb, &t_ecb, vpiTransportDelay);
                                        }
 
 
                                }else if(counter == 1)
                                {
                                        v_ecb.value.integer = 0;
                                        vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
 
                                        counter=0;
                                }
 
 
                  break;
 
 
                 case READ_DOUTR:
 
 
 
                                if(counter == 0)
                                {
 
                                        v_ecb.value.integer = 1;
                                        vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
 
                                        counter_read++;
                                        counter++;
 
 
 
                                }else if(counter == 1)
                                {
                                        v_ecb.value.integer = 0;
                                        vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
 
 
                                        if(counter_read < 4)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_DOUTR;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
                                        if(counter_read == 4)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_KEYR3;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
                                        if(counter_read == 5)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_KEYR2;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
 
                                        if(counter_read == 6)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_KEYR1;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
                                        if(counter_read == 7)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_KEYR0;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
                                        if(counter_read == 8)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_IVR3;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
                                        if(counter_read == 9)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_IVR2;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
 
                                        if(counter_read == 10)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_IVR1;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
                                        if(counter_read == 11)
                                        {
 
                                                v_ecb.value.integer = ADDR_AES_IVR0;
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                        }
 
 
                                        counter = 0;
                                }
 
                                if(counter_read == 12)
                                {
                                        STATE = RESET_SR;
                                        counter_read = 0;
                                }
                 break;
 
                case RESET_SR:
 
                                v_ecb.value.integer = 1;
                                vpi_put_value(PWRITE, &v_ecb, NULL, vpiNoDelay);
 
                                v_ecb.value.integer = 1;
                                vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);
 
                                v_ecb.value.integer = 0;
                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                v_ecb.value.integer = 128;
                                vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);
 
 
                                if(counter == 0)
                                {
 
                                        counter_write++;
                                        counter++;
 
                                        v_ecb.value.integer = 1;
                                        vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
 
                                }else if(counter == 1)
                                {
 
                                        v_ecb.value.integer = 0;
                                        vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);
                                        counter=0;
 
                                }
 
                                if(counter_write == 1)
                                {
                                        STATE =IDLE;
                                        counter_write = 0;
                                        counter=0;
 
                                        PACKETS_GENERATED = PACKETS_GENERATED + 1;
                                }
 
 
 
                break;
 
                }
 
        }
 
        return 0;
}

Browse

Tools

Subversion Repositories apbtoaes128

[/] [apbtoaes128/] [trunk/] [pli/] [bfm_ctr/] [aes_bfm_encryption_dma_ctr.h] - Blame information for rev 12

Line No.	Rev	Author	Line
1	5	redbear	`//////////////////////////////////////////////////////////////////`
2			`////`
3			`////`
4			`//// AES CORE BLOCK`
5			`////`
6			`////`
7			`////`
8			`//// This file is part of the APB to AES128 project`
9			`////`
10			`//// http://www.opencores.org/cores/apbtoaes128/`
11			`////`
12			`////`
13			`////`
14			`//// Description`
15			`////`
16			`//// Implementation of APB IP core according to`
17			`////`
18			`//// aes128_spec IP core specification document.`
19			`////`
20			`////`
21			`////`
22			`//// To Do: Things are right here but always all block can suffer changes`
23			`////`
24			`////`
25			`////`
26			`////`
27			`////`
28			`//// Author(s): - Felipe Fernandes Da Costa, fefe2560@gmail.com`
29			`////`
30			`/////////////////////////////////////////////////////////////////`
31			`////`
32			`////`
33			`//// Copyright (C) 2009 Authors and OPENCORES.ORG`
34			`////`
35			`////`
36			`////`
37			`//// This source file may be used and distributed without`
38			`////`
39			`//// restriction provided that this copyright statement is not`
40			`////`
41			`//// removed from the file and that any derivative work contains`
42			`//// the original copyright notice and the associated disclaimer.`
43			`////`
44			`////`
45			`//// This source file is free software; you can redistribute it`
46			`////`
47			`//// and/or modify it under the terms of the GNU Lesser General`
48			`////`
49			`//// Public License as published by the Free Software Foundation;`
50			`//// either version 2.1 of the License, or (at your option) any`
51			`////`
52			`//// later version.`
53			`////`
54			`////`
55			`////`
56			`//// This source is distributed in the hope that it will be`
57			`////`
58			`//// useful, but WITHOUT ANY WARRANTY; without even the implied`
59			`////`
60			`//// warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR`
61			`////`
62			`//// PURPOSE. See the GNU Lesser General Public License for more`
63			`//// details.`
64			`////`
65			`////`
66			`////`
67			`//// You should have received a copy of the GNU Lesser General`
68			`////`
69			`//// Public License along with this source; if not, download it`
70			`////`
71			`//// from http://www.opencores.org/lgpl.shtml`
72			`////`
73			`////`
74			`///////////////////////////////////////////////////////////////////`
75			`static int aes_bfm_encryption_ctr_dma_calltf(char*user_data)`
76			`{`
77
78			`vpiHandle PRESETn = vpi_handle_by_name("AES_GLADIC_tb.PRESETn", NULL);`
79			`vpiHandle PWDATA = vpi_handle_by_name("AES_GLADIC_tb.PWDATA", NULL);`
80			`vpiHandle PENABLE = vpi_handle_by_name("AES_GLADIC_tb.PENABLE", NULL);`
81			`vpiHandle PSEL = vpi_handle_by_name("AES_GLADIC_tb.PSEL", NULL);`
82			`vpiHandle PWRITE = vpi_handle_by_name("AES_GLADIC_tb.PWRITE", NULL);`
83			`vpiHandle PADDR = vpi_handle_by_name("AES_GLADIC_tb.PADDR", NULL);`
84			`vpiHandle PRDATA = vpi_handle_by_name("AES_GLADIC_tb.PRDATA", NULL);`
85			`vpiHandle PREADY = vpi_handle_by_name("AES_GLADIC_tb.PREADY", NULL);`
86			`vpiHandle PSLVERR = vpi_handle_by_name("AES_GLADIC_tb.PSLVERR", NULL);`
87			`vpiHandle int_ccf = vpi_handle_by_name("AES_GLADIC_tb.int_ccf", NULL);`
88			`vpiHandle int_err = vpi_handle_by_name("AES_GLADIC_tb.int_err", NULL);`
89			`vpiHandle dma_req_wr = vpi_handle_by_name("AES_GLADIC_tb.dma_req_wr", NULL);`
90			`vpiHandle dma_req_rd = vpi_handle_by_name("AES_GLADIC_tb.dma_req_rd", NULL);`
91
92			`std::random_device rd;`
93			`std::uniform_int_distribution<long int> data_in(0,4294967295);`
94
95			`v_ecb.format=vpiIntVal;`
96
97			`vpi_get_value(PRESETn, &v_ecb);`
98
99
100			`//printf("%i\n",STATE);`
101
102
103			`if(type_bfm == CTR_ENCRYPTION_DMA && v_ecb.value.integer == 1)`
104			`{`
105
106			`switch(STATE)`
107			`{`
108
109			`case IDLE:`
110
111			`if(PACKETS_GENERATED >= MAX_ITERATIONS)`
112			`{`
113
114			`STATE = IDLE;`
115			`type_bfm = 0;`
116
117			`}else`
118			`{`
119			`STATE = WRITE;`
120
121			`counter = 0;`
122
123
124			`v_ecb.value.integer = 0;`
125			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
126
127			`v_ecb.value.integer = vector_address[0];`
128			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
129
130			`v_ecb.value.integer = 0;`
131			`vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);`
132
133			`v_ecb.value.integer = 1;`
134			`vpi_put_value(PWRITE, &v_ecb, NULL, vpiNoDelay);`
135
136			`v_ecb.value.integer = 1;`
137			`vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);`
138			`}`
139
140			`break;`
141
142			`case WRITE:`
143
144
145
146			`v_ecb.value.integer = 1;`
147			`vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);`
148
149			`if(counter == 0)`
150			`{`
151			`counter_write++;`
152			`counter++;`
153
154			`v_ecb.value.integer = 1;`
155			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
156
157
158			`}else if(counter == 1)`
159			`{`
160
161
162
163			`t_ecb.type = vpiScaledRealTime;`
164			`t_ecb.real = 0;`
165			`v_ecb.format=vpiIntVal;`
166
167			`v_ecb.value.integer = 0;`
168			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
169
170
171			`if(counter_write < 9)`
172			`{`
173
174			`v_ecb.value.integer = vector_address[counter_write];`
175
176			`vpi_put_value(PADDR, &v_ecb, &t_ecb, vpiTransportDelay);`
177			`//vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
178
179			`if(FIPS_ENABLE == FIPS)`
180			`{`
181
182			`if(vector_address[counter_write] == ADDR_AES_KEYR3)`
183			`{`
184			`a = a \| KEY_FIPS_CTR_NOT_DERIVATED[0];`
185			`a = a << 8;`
186			`a = a \| KEY_FIPS_CTR_NOT_DERIVATED[1];`
187			`a = a << 8;`
188			`a = a \| KEY_FIPS_CTR_NOT_DERIVATED[2];`
189			`a = a << 8;`
190			`a = a \| KEY_FIPS_CTR_NOT_DERIVATED[3];`
191			`v_ecb.value.integer = a;`
192			`}`
193
194
195			`if(vector_address[counter_write] == ADDR_AES_KEYR2)`
196			`{`
197			`b = b \| KEY_FIPS_CTR_NOT_DERIVATED[4];`
198			`b = b << 8;`
199			`b = b \| KEY_FIPS_CTR_NOT_DERIVATED[5];`
200			`b = b << 8;`
201			`b = b \| KEY_FIPS_CTR_NOT_DERIVATED[6];`
202			`b = b << 8;`
203			`b = b \| KEY_FIPS_CTR_NOT_DERIVATED[7];`
204			`v_ecb.value.integer = b;`
205			`}`
206
207			`if(vector_address[counter_write] == ADDR_AES_KEYR1)`
208			`{`
209
210			`c = c \| KEY_FIPS_CTR_NOT_DERIVATED[8];`
211			`c = c << 8;`
212			`c = c \| KEY_FIPS_CTR_NOT_DERIVATED[9];`
213			`c = c << 8;`
214			`c = c \| KEY_FIPS_CTR_NOT_DERIVATED[10];`
215			`c = c << 8;`
216			`c = c \| KEY_FIPS_CTR_NOT_DERIVATED[11];`
217			`v_ecb.value.integer = c;`
218
219			`}`
220
221			`if(vector_address[counter_write] == ADDR_AES_KEYR0)`
222			`{`
223			`d = d \| KEY_FIPS_CTR_NOT_DERIVATED[12];`
224			`d = d << 8;`
225			`d = d \| KEY_FIPS_CTR_NOT_DERIVATED[13];`
226			`d = d << 8;`
227			`d = d \| KEY_FIPS_CTR_NOT_DERIVATED[14];`
228			`d = d << 8;`
229			`d = d \| KEY_FIPS_CTR_NOT_DERIVATED[15];`
230			`v_ecb.value.integer = d;`
231			`}`
232
233
234			`if(vector_address[counter_write] == ADDR_AES_IVR3)`
235			`{`
236			`a = a \| IV_FIPS_CTR_NOT_DERIVATED[0];`
237			`a = a << 8;`
238			`a = a \| IV_FIPS_CTR_NOT_DERIVATED[1];`
239			`a = a << 8;`
240			`a = a \| IV_FIPS_CTR_NOT_DERIVATED[2];`
241			`a = a << 8;`
242			`a = a \| IV_FIPS_CTR_NOT_DERIVATED[3];`
243			`v_ecb.value.integer = a;`
244			`}`
245
246
247			`if(vector_address[counter_write] == ADDR_AES_IVR2)`
248			`{`
249			`b = b \| IV_FIPS_CTR_NOT_DERIVATED[4];`
250			`b = b << 8;`
251			`b = b \| IV_FIPS_CTR_NOT_DERIVATED[5];`
252			`b = b << 8;`
253			`b = b \| IV_FIPS_CTR_NOT_DERIVATED[6];`
254			`b = b << 8;`
255			`b = b \| IV_FIPS_CTR_NOT_DERIVATED[7];`
256			`v_ecb.value.integer = b;`
257			`}`
258
259			`if(vector_address[counter_write] == ADDR_AES_IVR1)`
260			`{`
261
262			`c = c \| IV_FIPS_CTR_NOT_DERIVATED[8];`
263			`c = c << 8;`
264			`c = c \| IV_FIPS_CTR_NOT_DERIVATED[9];`
265			`c = c << 8;`
266			`c = c \| IV_FIPS_CTR_NOT_DERIVATED[10];`
267			`c = c << 8;`
268			`c = c \| IV_FIPS_CTR_NOT_DERIVATED[11];`
269			`v_ecb.value.integer = c;`
270
271			`}`
272
273			`if(vector_address[counter_write] == ADDR_AES_IVR0)`
274			`{`
275			`d = d \| IV_FIPS_CTR_NOT_DERIVATED[12];`
276			`d = d << 8;`
277			`d = d \| IV_FIPS_CTR_NOT_DERIVATED[13];`
278			`d = d << 8;`
279			`d = d \| IV_FIPS_CTR_NOT_DERIVATED[14];`
280			`d = d << 8;`
281			`d = d \| IV_FIPS_CTR_NOT_DERIVATED[15];`
282			`v_ecb.value.integer = d;`
283			`}`
284
285
286			`}else if(FIPS_ENABLE == RANDOM_DATA)`
287			`{`
288			`v_ecb.value.integer = data_in(rd);`
289			`}`
290
291			`//vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);`
292			`vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);`
293
294
295			`a = 0;`
296			`b = 0;`
297			`c = 0;`
298			`d = 0;`
299
300
301
302			`}else if(counter_write == 9)//ENABLE CR`
303			`{`
304
305	12	redbear	`if(DATATYPE == TYPE_00)// NO DINR DOUTR SWAP DATA`
306			`{`
307			`v_ecb.value.integer = ADDR_AES_CR;`
308			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
309	5	redbear
310	12	redbear	`v_ecb.value.integer = 6209;`
311			`vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);`
312	5	redbear
313	12	redbear	`}else if(DATATYPE == TYPE_01)// 16 BIT DINR DOUTR SWAP DATA`
314			`{`
315			`v_ecb.value.integer = ADDR_AES_CR;`
316			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
317
318			`v_ecb.value.integer = 6211;`
319			`vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);`
320
321			`}else if(DATATYPE == TYPE_02)// 8 BIT DINR DOUTR SWAP DATA`
322			`{`
323			`v_ecb.value.integer = ADDR_AES_CR;`
324			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
325
326			`v_ecb.value.integer = 6213;`
327			`vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);`
328
329			`}else if(DATATYPE == TYPE_03)// BIT DINR DOUTR SWAP DATA`
330			`{`
331			`v_ecb.value.integer = ADDR_AES_CR;`
332			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
333
334			`v_ecb.value.integer = 6215;`
335			`vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);`
336			`}`
337	5	redbear
338			`}else if(counter_write > 9 && counter_write < 14) //WRITE DINR`
339			`{`
340
341			`v_ecb.value.integer = ADDR_AES_DINR;`
342			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
343
344
345			`if(FIPS_ENABLE == FIPS)`
346			`{`
347
348	12	redbear	`if(DATATYPE == TYPE_00)`
349	5	redbear	`{`
350
351	12	redbear	`if(counter_write == 10)`
352			`{`
353			`a = a \| TEXT_FIPS_CTR_NOT_DERIVATED[0];`
354			`a = a << 8;`
355			`a = a \| TEXT_FIPS_CTR_NOT_DERIVATED[1];`
356			`a = a << 8;`
357			`a = a \| TEXT_FIPS_CTR_NOT_DERIVATED[2];`
358			`a = a << 8;`
359			`a = a \| TEXT_FIPS_CTR_NOT_DERIVATED[3];`
360			`v_ecb.value.integer = a;`
361	5	redbear
362	12	redbear	`}else if(counter_write == 11)`
363			`{`
364			`b = b \| TEXT_FIPS_CTR_NOT_DERIVATED[4];`
365			`b = b << 8;`
366			`b = b \| TEXT_FIPS_CTR_NOT_DERIVATED[5];`
367			`b = b << 8;`
368			`b = b \| TEXT_FIPS_CTR_NOT_DERIVATED[6];`
369			`b = b << 8;`
370			`b = b \| TEXT_FIPS_CTR_NOT_DERIVATED[7];`
371			`v_ecb.value.integer = b;`
372	5	redbear
373	12	redbear	`}else if(counter_write == 12 )`
374			`{`
375	5	redbear
376	12	redbear	`c = c \| TEXT_FIPS_CTR_NOT_DERIVATED[8];`
377			`c = c << 8;`
378			`c = c \| TEXT_FIPS_CTR_NOT_DERIVATED[9];`
379			`c = c << 8;`
380			`c = c \| TEXT_FIPS_CTR_NOT_DERIVATED[10];`
381			`c = c << 8;`
382			`c = c \| TEXT_FIPS_CTR_NOT_DERIVATED[11];`
383			`v_ecb.value.integer = c;`
384
385			`}else if(counter_write == 13 )`
386			`{`
387			`d = d \| TEXT_FIPS_CTR_NOT_DERIVATED[12];`
388			`d = d << 8;`
389			`d = d \| TEXT_FIPS_CTR_NOT_DERIVATED[13];`
390			`d = d << 8;`
391			`d = d \| TEXT_FIPS_CTR_NOT_DERIVATED[14];`
392			`d = d << 8;`
393			`d = d \| TEXT_FIPS_CTR_NOT_DERIVATED[15];`
394			`v_ecb.value.integer = d;`
395
396			`}`
397
398			`}else if(DATATYPE > TYPE_00)`
399	5	redbear	`{`
400
401	12	redbear
402			`if(counter_write == 10)`
403			`{`
404			`a = a \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[0];`
405			`a = a << 8;`
406			`a = a \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[1];`
407			`a = a << 8;`
408			`a = a \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[2];`
409			`a = a << 8;`
410			`a = a \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[3];`
411			`v_ecb.value.integer = a;`
412
413			`}else if(counter_write == 11)`
414			`{`
415			`b = b \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[4];`
416			`b = b << 8;`
417			`b = b \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[5];`
418			`b = b << 8;`
419			`b = b \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[6];`
420			`b = b << 8;`
421			`b = b \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[7];`
422			`v_ecb.value.integer = b;`
423
424			`}else if(counter_write == 12 )`
425			`{`
426
427			`c = c \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[8];`
428			`c = c << 8;`
429			`c = c \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[9];`
430			`c = c << 8;`
431			`c = c \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[10];`
432			`c = c << 8;`
433			`c = c \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[11];`
434			`v_ecb.value.integer = c;`
435
436			`}else if(counter_write == 13 )`
437			`{`
438			`d = d \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[12];`
439			`d = d << 8;`
440			`d = d \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[13];`
441			`d = d << 8;`
442			`d = d \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[14];`
443			`d = d << 8;`
444			`d = d \| TEXT_FIPS_CTR_NOT_DATATYPE_DERIVATED[15];`
445			`v_ecb.value.integer = d;`
446
447			`}`
448
449	5	redbear	`}`
450
451			`}else if(FIPS_ENABLE == RANDOM_DATA)`
452			`{`
453			`v_ecb.value.integer = data_in(rd);`
454			`}`
455
456			`//vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);`
457			`vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);`
458
459			`a = 0;`
460			`b = 0;`
461			`c = 0;`
462			`d = 0;`
463
464
465			`}`
466			`counter=0;`
467
468			`}`
469
470
471
472			`if(counter_write == 14)`
473			`{`
474			`counter_write = 0;`
475			`STATE = WAIT_SR;`
476			`}`
477
478			`break;`
479
480			`case WAIT_SR:`
481
482			`v_ecb.value.integer = ADDR_AES_SR;`
483			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
484
485			`v_ecb.value.integer = 0;`
486			`vpi_put_value(PWRITE, &v_ecb, NULL, vpiNoDelay);`
487			`//vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);`
488
489
490			`if(counter == 0)`
491			`{`
492
493			`counter++;`
494
495			`v_ecb.value.integer = 1;`
496			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
497
498	9	redbear	`v_ecb.value.integer = 0;`
499			`vpi_get_value(PRDATA,&v_ecb);`
500	5	redbear
501	9	redbear	`if(v_ecb.value.integer == 1)`
502			`{`
503			`STATE = READ_DOUTR;`
504
505			`//t_ecb.type = vpiScaledRealTime;`
506			`//t_ecb.real = 10;`
507			`//v_ecb.format=vpiIntVal;`
508			`//v_ecb.value.integer = ADDR_AES_DOUTR;`
509			`//vpi_put_value(PADDR, &v_ecb, &t_ecb, vpiTransportDelay);`
510			`}`
511
512
513	5	redbear	`}else if(counter == 1)`
514			`{`
515			`v_ecb.value.integer = 0;`
516			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
517
518			`counter=0;`
519			`}`
520
521
522			`break;`
523
524
525			`case READ_DOUTR:`
526
527
528
529			`if(counter == 0)`
530			`{`
531
532			`v_ecb.value.integer = 1;`
533			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
534
535			`counter_read++;`
536			`counter++;`
537
538
539
540			`}else if(counter == 1)`
541			`{`
542			`v_ecb.value.integer = 0;`
543			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
544
545
546			`if(counter_read < 4)`
547			`{`
548
549			`v_ecb.value.integer = ADDR_AES_DOUTR;`
550			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
551
552			`}`
553
554
555			`if(counter_read == 4)`
556			`{`
557
558			`v_ecb.value.integer = ADDR_AES_KEYR3;`
559			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
560
561			`}`
562
563
564			`if(counter_read == 5)`
565			`{`
566
567			`v_ecb.value.integer = ADDR_AES_KEYR2;`
568			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
569
570			`}`
571
572
573
574			`if(counter_read == 6)`
575			`{`
576
577			`v_ecb.value.integer = ADDR_AES_KEYR1;`
578			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
579
580			`}`
581
582
583			`if(counter_read == 7)`
584			`{`
585
586			`v_ecb.value.integer = ADDR_AES_KEYR0;`
587			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
588
589			`}`
590
591
592			`if(counter_read == 8)`
593			`{`
594
595			`v_ecb.value.integer = ADDR_AES_IVR3;`
596			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
597
598			`}`
599
600
601			`if(counter_read == 9)`
602			`{`
603
604			`v_ecb.value.integer = ADDR_AES_IVR2;`
605			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
606
607			`}`
608
609
610
611			`if(counter_read == 10)`
612			`{`
613
614			`v_ecb.value.integer = ADDR_AES_IVR1;`
615			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
616
617			`}`
618
619
620			`if(counter_read == 11)`
621			`{`
622
623			`v_ecb.value.integer = ADDR_AES_IVR0;`
624			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
625
626			`}`
627
628
629			`counter = 0;`
630			`}`
631
632			`if(counter_read == 12)`
633			`{`
634			`STATE = RESET_SR;`
635			`counter_read = 0;`
636			`}`
637			`break;`
638
639			`case RESET_SR:`
640
641			`v_ecb.value.integer = 1;`
642			`vpi_put_value(PWRITE, &v_ecb, NULL, vpiNoDelay);`
643
644			`v_ecb.value.integer = 1;`
645			`vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);`
646
647			`v_ecb.value.integer = 0;`
648			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
649
650			`v_ecb.value.integer = 128;`
651			`vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);`
652
653
654			`if(counter == 0)`
655			`{`
656
657			`counter_write++;`
658			`counter++;`
659
660			`v_ecb.value.integer = 1;`
661			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
662
663			`}else if(counter == 1)`
664			`{`
665
666			`v_ecb.value.integer = 0;`
667			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
668			`counter=0;`
669
670			`}`
671
672			`if(counter_write == 1)`
673			`{`
674			`STATE =IDLE;`
675			`counter_write = 0;`
676			`counter=0;`
677
678			`PACKETS_GENERATED = PACKETS_GENERATED + 1;`
679			`}`
680
681
682
683			`break;`
684
685			`}`
686
687			`}`
688
689			`return 0;`
690			`}`