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

Subversion Repositories apbtoaes128

[/] [apbtoaes128/] [trunk/] [pli/] [bfm_cbc/] [aes_bfm_key_generation_dma_cbc.h] - Blame information for rev 13

Go to most recent revision | 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_key_generation_dma_cbc_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 == CBC_KEY_GEN_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:
                                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);
 
 
 
                                        if(counter_write < 9)
                                        {
 
                                                v_ecb.value.integer = vector_address[counter_write];
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                                t_ecb.type = vpiScaledRealTime;
                                                t_ecb.real = 0;
                                                v_ecb.format=vpiIntVal;
 
                                                if(FIPS_ENABLE == FIPS)
                                                {
 
                                                        if(vector_address[counter_write] == ADDR_AES_KEYR3)
                                                        {
                                                                a = a | KEY_FIPS_CBC_NOT_DERIVATED[0];
                                                                a = a << 8;
                                                                a = a | KEY_FIPS_CBC_NOT_DERIVATED[1];
                                                                a = a << 8;
                                                                a = a | KEY_FIPS_CBC_NOT_DERIVATED[2];
                                                                a = a << 8;
                                                                a = a | KEY_FIPS_CBC_NOT_DERIVATED[3];
                                                                v_ecb.value.integer = a;
                                                        }
 
 
                                                        if(vector_address[counter_write] == ADDR_AES_KEYR2)
                                                        {
                                                                b = b | KEY_FIPS_CBC_NOT_DERIVATED[4];
                                                                b = b << 8;
                                                                b = b | KEY_FIPS_CBC_NOT_DERIVATED[5];
                                                                b = b << 8;
                                                                b = b | KEY_FIPS_CBC_NOT_DERIVATED[6];
                                                                b = b << 8;
                                                                b = b | KEY_FIPS_CBC_NOT_DERIVATED[7];
                                                                v_ecb.value.integer = b;
                                                        }
 
                                                        if(vector_address[counter_write] == ADDR_AES_KEYR1)
                                                        {
 
                                                                c = c | KEY_FIPS_CBC_NOT_DERIVATED[8];
                                                                c = c << 8;
                                                                c = c | KEY_FIPS_CBC_NOT_DERIVATED[9];
                                                                c = c << 8;
                                                                c = c | KEY_FIPS_CBC_NOT_DERIVATED[10];
                                                                c = c << 8;
                                                                c = c | KEY_FIPS_CBC_NOT_DERIVATED[11];
                                                                v_ecb.value.integer = c;
 
                                                        }
 
                                                        if(vector_address[counter_write] == ADDR_AES_KEYR0)
                                                        {
                                                                d = d | KEY_FIPS_CBC_NOT_DERIVATED[12];
                                                                d = d << 8;
                                                                d = d | KEY_FIPS_CBC_NOT_DERIVATED[13];
                                                                d = d << 8;
                                                                d = d | KEY_FIPS_CBC_NOT_DERIVATED[14];
                                                                d = d << 8;
                                                                d = d | KEY_FIPS_CBC_NOT_DERIVATED[15];
                                                                v_ecb.value.integer = d;
                                                        }
 
 
                                                        if(vector_address[counter_write] == ADDR_AES_IVR3)
                                                        {
                                                                a = a | IV_FIPS_CBC_NOT_DERIVATED[0];
                                                                a = a << 8;
                                                                a = a | IV_FIPS_CBC_NOT_DERIVATED[1];
                                                                a = a << 8;
                                                                a = a | IV_FIPS_CBC_NOT_DERIVATED[2];
                                                                a = a << 8;
                                                                a = a | IV_FIPS_CBC_NOT_DERIVATED[3];
                                                                v_ecb.value.integer = a;
                                                        }
 
 
                                                        if(vector_address[counter_write] == ADDR_AES_IVR2)
                                                        {
                                                                b = b | IV_FIPS_CBC_NOT_DERIVATED[4];
                                                                b = b << 8;
                                                                b = b | IV_FIPS_CBC_NOT_DERIVATED[5];
                                                                b = b << 8;
                                                                b = b | IV_FIPS_CBC_NOT_DERIVATED[6];
                                                                b = b << 8;
                                                                b = b | IV_FIPS_CBC_NOT_DERIVATED[7];
                                                                v_ecb.value.integer = b;
                                                        }
 
                                                        if(vector_address[counter_write] == ADDR_AES_IVR1)
                                                        {
 
                                                                c = c | IV_FIPS_CBC_NOT_DERIVATED[8];
                                                                c = c << 8;
                                                                c = c | IV_FIPS_CBC_NOT_DERIVATED[9];
                                                                c = c << 8;
                                                                c = c | IV_FIPS_CBC_NOT_DERIVATED[10];
                                                                c = c << 8;
                                                                c = c | IV_FIPS_CBC_NOT_DERIVATED[11];
                                                                v_ecb.value.integer = c;
 
                                                        }
 
                                                        if(vector_address[counter_write] == ADDR_AES_IVR0)
                                                        {
                                                                d = d | IV_FIPS_CBC_NOT_DERIVATED[12];
                                                                d = d << 8;
                                                                d = d | IV_FIPS_CBC_NOT_DERIVATED[13];
                                                                d = d << 8;
                                                                d = d | IV_FIPS_CBC_NOT_DERIVATED[14];
                                                                d = d << 8;
                                                                d = d | IV_FIPS_CBC_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;
                                        }
 
 
                                        if(counter_write == 9)
                                        {
 
                                                v_ecb.value.integer = vector_address[counter_write];
                                                vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);
 
                                                t_ecb.type = vpiScaledRealTime;
                                                t_ecb.real = 0;
                                                v_ecb.format=vpiIntVal;
                                                v_ecb.value.integer = 6185;
                                                vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);
 
                                        }
 
 
                                        v_ecb.value.integer = 1;
                                        vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);
 
                                        counter=0;
                                }
 
                                if(counter_write == 10)
                                {
                                        counter_write = 0;
                                        counter_read  = 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);
 
                                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_KEY_GEN;
 
                                                //t_ecb.type = vpiScaledRealTime;
                                                //t_ecb.real = 10;
                                                //v_ecb.format=vpiIntVal;
                                                //v_ecb.value.integer = ADDR_AES_KEYR3;
                                                //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_KEY_GEN:
 
 
 
                                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_write = 0;
                                        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_cbc/] [aes_bfm_key_generation_dma_cbc.h] - Blame information for rev 13

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_key_generation_dma_cbc_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 == CBC_KEY_GEN_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			`if(counter == 0)`
144			`{`
145
146
147			`counter_write++;`
148			`counter++;`
149
150			`v_ecb.value.integer = 1;`
151			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
152
153
154			`}else if(counter == 1)`
155			`{`
156
157			`v_ecb.value.integer = 0;`
158			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
159
160
161
162			`if(counter_write < 9)`
163			`{`
164
165			`v_ecb.value.integer = vector_address[counter_write];`
166			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
167
168			`t_ecb.type = vpiScaledRealTime;`
169			`t_ecb.real = 0;`
170			`v_ecb.format=vpiIntVal;`
171
172			`if(FIPS_ENABLE == FIPS)`
173			`{`
174
175			`if(vector_address[counter_write] == ADDR_AES_KEYR3)`
176			`{`
177			`a = a \| KEY_FIPS_CBC_NOT_DERIVATED[0];`
178			`a = a << 8;`
179			`a = a \| KEY_FIPS_CBC_NOT_DERIVATED[1];`
180			`a = a << 8;`
181			`a = a \| KEY_FIPS_CBC_NOT_DERIVATED[2];`
182			`a = a << 8;`
183			`a = a \| KEY_FIPS_CBC_NOT_DERIVATED[3];`
184			`v_ecb.value.integer = a;`
185			`}`
186
187
188			`if(vector_address[counter_write] == ADDR_AES_KEYR2)`
189			`{`
190			`b = b \| KEY_FIPS_CBC_NOT_DERIVATED[4];`
191			`b = b << 8;`
192			`b = b \| KEY_FIPS_CBC_NOT_DERIVATED[5];`
193			`b = b << 8;`
194			`b = b \| KEY_FIPS_CBC_NOT_DERIVATED[6];`
195			`b = b << 8;`
196			`b = b \| KEY_FIPS_CBC_NOT_DERIVATED[7];`
197			`v_ecb.value.integer = b;`
198			`}`
199
200			`if(vector_address[counter_write] == ADDR_AES_KEYR1)`
201			`{`
202
203			`c = c \| KEY_FIPS_CBC_NOT_DERIVATED[8];`
204			`c = c << 8;`
205			`c = c \| KEY_FIPS_CBC_NOT_DERIVATED[9];`
206			`c = c << 8;`
207			`c = c \| KEY_FIPS_CBC_NOT_DERIVATED[10];`
208			`c = c << 8;`
209			`c = c \| KEY_FIPS_CBC_NOT_DERIVATED[11];`
210			`v_ecb.value.integer = c;`
211
212			`}`
213
214			`if(vector_address[counter_write] == ADDR_AES_KEYR0)`
215			`{`
216			`d = d \| KEY_FIPS_CBC_NOT_DERIVATED[12];`
217			`d = d << 8;`
218			`d = d \| KEY_FIPS_CBC_NOT_DERIVATED[13];`
219			`d = d << 8;`
220			`d = d \| KEY_FIPS_CBC_NOT_DERIVATED[14];`
221			`d = d << 8;`
222			`d = d \| KEY_FIPS_CBC_NOT_DERIVATED[15];`
223			`v_ecb.value.integer = d;`
224			`}`
225
226
227			`if(vector_address[counter_write] == ADDR_AES_IVR3)`
228			`{`
229			`a = a \| IV_FIPS_CBC_NOT_DERIVATED[0];`
230			`a = a << 8;`
231			`a = a \| IV_FIPS_CBC_NOT_DERIVATED[1];`
232			`a = a << 8;`
233			`a = a \| IV_FIPS_CBC_NOT_DERIVATED[2];`
234			`a = a << 8;`
235			`a = a \| IV_FIPS_CBC_NOT_DERIVATED[3];`
236			`v_ecb.value.integer = a;`
237			`}`
238
239
240			`if(vector_address[counter_write] == ADDR_AES_IVR2)`
241			`{`
242			`b = b \| IV_FIPS_CBC_NOT_DERIVATED[4];`
243			`b = b << 8;`
244			`b = b \| IV_FIPS_CBC_NOT_DERIVATED[5];`
245			`b = b << 8;`
246			`b = b \| IV_FIPS_CBC_NOT_DERIVATED[6];`
247			`b = b << 8;`
248			`b = b \| IV_FIPS_CBC_NOT_DERIVATED[7];`
249			`v_ecb.value.integer = b;`
250			`}`
251
252			`if(vector_address[counter_write] == ADDR_AES_IVR1)`
253			`{`
254
255			`c = c \| IV_FIPS_CBC_NOT_DERIVATED[8];`
256			`c = c << 8;`
257			`c = c \| IV_FIPS_CBC_NOT_DERIVATED[9];`
258			`c = c << 8;`
259			`c = c \| IV_FIPS_CBC_NOT_DERIVATED[10];`
260			`c = c << 8;`
261			`c = c \| IV_FIPS_CBC_NOT_DERIVATED[11];`
262			`v_ecb.value.integer = c;`
263
264			`}`
265
266			`if(vector_address[counter_write] == ADDR_AES_IVR0)`
267			`{`
268			`d = d \| IV_FIPS_CBC_NOT_DERIVATED[12];`
269			`d = d << 8;`
270			`d = d \| IV_FIPS_CBC_NOT_DERIVATED[13];`
271			`d = d << 8;`
272			`d = d \| IV_FIPS_CBC_NOT_DERIVATED[14];`
273			`d = d << 8;`
274			`d = d \| IV_FIPS_CBC_NOT_DERIVATED[15];`
275			`v_ecb.value.integer = d;`
276			`}`
277
278
279
280			`}else if(FIPS_ENABLE == RANDOM_DATA)`
281			`{`
282			`v_ecb.value.integer = data_in(rd);`
283			`}`
284
285			`//vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);`
286			`vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);`
287
288
289			`a = 0;`
290			`b = 0;`
291			`c = 0;`
292			`d = 0;`
293			`}`
294
295
296			`if(counter_write == 9)`
297			`{`
298
299			`v_ecb.value.integer = vector_address[counter_write];`
300			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
301
302			`t_ecb.type = vpiScaledRealTime;`
303			`t_ecb.real = 0;`
304			`v_ecb.format=vpiIntVal;`
305			`v_ecb.value.integer = 6185;`
306			`vpi_put_value(PWDATA, &v_ecb, &t_ecb, vpiTransportDelay);`
307
308			`}`
309
310
311			`v_ecb.value.integer = 1;`
312			`vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);`
313
314			`counter=0;`
315			`}`
316
317			`if(counter_write == 10)`
318			`{`
319			`counter_write = 0;`
320			`counter_read = 0;`
321
322			`STATE =WAIT_SR;`
323
324
325			`}`
326
327			`break;`
328
329			`case WAIT_SR:`
330
331			`v_ecb.value.integer = ADDR_AES_SR;`
332			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
333
334			`v_ecb.value.integer = 0;`
335			`vpi_put_value(PWRITE, &v_ecb, NULL, vpiNoDelay);`
336
337			`if(counter == 0)`
338			`{`
339
340			`counter++;`
341
342			`v_ecb.value.integer = 1;`
343			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
344
345
346	9	redbear	`v_ecb.value.integer = 0;`
347			`vpi_get_value(PRDATA,&v_ecb);`
348
349			`if(v_ecb.value.integer == 1)`
350			`{`
351			`STATE = READ_KEY_GEN;`
352
353			`//t_ecb.type = vpiScaledRealTime;`
354			`//t_ecb.real = 10;`
355			`//v_ecb.format=vpiIntVal;`
356			`//v_ecb.value.integer = ADDR_AES_KEYR3;`
357			`//vpi_put_value(PADDR, &v_ecb, &t_ecb, vpiTransportDelay);`
358			`}`
359
360
361	5	redbear	`}else if(counter == 1)`
362			`{`
363			`v_ecb.value.integer = 0;`
364			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
365
366			`counter=0;`
367			`}`
368
369
370
371			`break;`
372
373
374			`case READ_KEY_GEN:`
375
376
377
378			`if(counter == 0)`
379			`{`
380
381			`v_ecb.value.integer = 1;`
382			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
383
384			`counter_read++;`
385			`counter++;`
386
387
388
389			`}else if(counter == 1)`
390			`{`
391
392	9	redbear	`v_ecb.value.integer = 0;`
393			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
394
395			`if(counter_read < 4)`
396	5	redbear	`{`
397	9	redbear	`v_ecb.value.integer = ADDR_AES_DOUTR;`
398			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
399			`}`
400
401			`if(counter_read == 4)`
402			`{`
403	5	redbear	`v_ecb.value.integer = ADDR_AES_KEYR3;`
404	9	redbear	`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
405	5	redbear	`}`
406
407	9	redbear	`if(counter_read == 5)`
408	5	redbear	`{`
409			`v_ecb.value.integer = ADDR_AES_KEYR2;`
410	9	redbear	`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
411	5	redbear	`}`
412
413
414	9	redbear	`if(counter_read == 6)`
415	5	redbear	`{`
416			`v_ecb.value.integer = ADDR_AES_KEYR1;`
417	9	redbear	`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
418	5	redbear	`}`
419
420	9	redbear	`if(counter_read == 7)`
421	5	redbear	`{`
422			`v_ecb.value.integer = ADDR_AES_KEYR0;`
423	9	redbear	`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
424	5	redbear	`}`
425	9	redbear
426			`if(counter_read == 8)`
427	5	redbear	`{`
428			`v_ecb.value.integer = ADDR_AES_IVR3;`
429	9	redbear	`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
430	5	redbear	`}`
431
432	9	redbear	`if(counter_read == 9)`
433	5	redbear	`{`
434			`v_ecb.value.integer = ADDR_AES_IVR2;`
435	9	redbear	`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
436	5	redbear	`}`
437
438	9	redbear	`if(counter_read == 10)`
439	5	redbear	`{`
440			`v_ecb.value.integer = ADDR_AES_IVR1;`
441	9	redbear	`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
442	5	redbear	`}`
443
444	9	redbear	`if(counter_read == 11)`
445	5	redbear	`{`
446			`v_ecb.value.integer = ADDR_AES_IVR0;`
447	9	redbear	`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
448	5	redbear	`}`
449
450			`counter = 0;`
451			`}`
452
453	9	redbear	`if(counter_read == 12)`
454	5	redbear	`{`
455			`STATE = RESET_SR;`
456			`counter_write = 0;`
457			`counter_read = 0;`
458			`}`
459
460			`break;`
461
462			`case RESET_SR:`
463
464			`v_ecb.value.integer = 1;`
465			`vpi_put_value(PWRITE, &v_ecb, NULL, vpiNoDelay);`
466
467			`v_ecb.value.integer = 1;`
468			`vpi_put_value(PSEL, &v_ecb, NULL, vpiNoDelay);`
469
470			`v_ecb.value.integer = 0;`
471			`vpi_put_value(PADDR, &v_ecb, NULL, vpiNoDelay);`
472
473			`v_ecb.value.integer = 128;`
474			`vpi_put_value(PWDATA, &v_ecb, NULL, vpiNoDelay);`
475
476
477			`if(counter == 0)`
478			`{`
479
480			`counter_write++;`
481			`counter++;`
482
483			`v_ecb.value.integer = 1;`
484			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
485
486			`}else if(counter == 1)`
487			`{`
488
489			`v_ecb.value.integer = 0;`
490			`vpi_put_value(PENABLE, &v_ecb, NULL, vpiNoDelay);`
491			`counter=0;`
492
493			`}`
494
495			`if(counter_write == 1)`
496			`{`
497			`STATE =IDLE;`
498			`counter_write = 0;`
499			`counter=0;`
500			`PACKETS_GENERATED = PACKETS_GENERATED + 1;`
501			`}`
502
503
504
505			`break;`
506
507			`}`
508
509			`}`
510
511			`return 0;`
512			`}`