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

Subversion Repositories apbtoaes128

[/] [apbtoaes128/] [trunk/] [pli/] [bfm_cbc/] [aes_bfm_key_generation_cbc.h] - Blame information for rev 15

Details | Compare with Previous | View Log

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

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.