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

Subversion Repositories wbddr3

[/] [wbddr3/] [trunk/] [bench/] [cpp/] [ddrsdram_tb.cpp] - Blame information for rev 7

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 4 dgisselq
////////////////////////////////////////////////////////////////////////////////
2
//
3
// Filename:    ddrsdram_tb.cpp
4
//
5
// Project:     A wishbone controlled DDR3 SDRAM memory controller.
6
//
7
// Purpose:     To determine whether or not the wbddrsdram Verilog module works.
8
//              Run this program with no arguments.  If the last line output
9
//      is "SUCCESS", you will know it works.
10
//
11
// Creator:     Dan Gisselquist, Ph.D.
12
//              Gisselquist Technology, LLC
13
//
14
////////////////////////////////////////////////////////////////////////////////
15
//
16
// Copyright (C) 2015-2016, Gisselquist Technology, LLC
17
//
18
// This program is free software (firmware): you can redistribute it and/or
19
// modify it under the terms of  the GNU General Public License as published
20
// by the Free Software Foundation, either version 3 of the License, or (at
21
// your option) any later version.
22
//
23
// This program is distributed in the hope that it will be useful, but WITHOUT
24
// ANY WARRANTY; without even the implied warranty of MERCHANTIBILITY or
25
// FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
26
// for more details.
27
//
28
// You should have received a copy of the GNU General Public License along
29
// with this program.  (It's in the $(ROOT)/doc directory, run make with no
30
// target there if the PDF file isn't present.)  If not, see
31
// <http://www.gnu.org/licenses/> for a copy.
32
//
33
// License:     GPL, v3, as defined and found on www.gnu.org,
34
//              http://www.gnu.org/licenses/gpl.html
35
//
36
//
37
////////////////////////////////////////////////////////////////////////////////
38
//
39
//
40
#include <stdio.h>
41
 
42
#include "verilated.h"
43
#include "Vwbddrsdram.h"
44
#include "ddrsdramsim.h"
45
 
46
const int       BOMBCOUNT = 2048,
47
                SDRAMMASK = 0x3ffffff,
48
                LGMEMSIZE = 28;
49
 
50
class   DDRSDRAM_TB {
51
        long            m_tickcount;
52
        Vwbddrsdram     *m_core;
53
        DDRSDRAMSIM     *m_sdram;
54
        bool            m_bomb;
55
public:
56
 
57
        DDRSDRAM_TB(void) {
58
                m_core = new Vwbddrsdram;
59
                m_sdram= new DDRSDRAMSIM(LGMEMSIZE);
60
        }
61
 
62
        unsigned &operator[](const int index) { return (*m_sdram)[index]; }
63
        void    set(unsigned addr, unsigned v) {
64
                (*m_sdram)[addr] = v;
65
        }
66
 
67
        void    tick(void) {
68
                m_core->i_clk = 1;
69
 
70
                m_core->i_ddr_data = (*m_sdram)(
71
                        m_core->o_ddr_reset_n,
72
                        m_core->o_ddr_cke,
73
                        m_core->o_ddr_cs_n,
74
                        m_core->o_ddr_ras_n,
75
                        m_core->o_ddr_cas_n,
76
                        m_core->o_ddr_we_n,
77
                        m_core->o_ddr_dqs,
78
                        m_core->o_ddr_dm,
79
                        m_core->o_ddr_odt,
80
                        m_core->o_ddr_bus_oe,
81
                        m_core->o_ddr_addr,
82
                        m_core->o_ddr_ba,
83
                        m_core->o_ddr_data);
84
 
85 6 dgisselq
                bool    writeout = (!m_core->v__DOT__reset_override);
86 7 dgisselq
                writeout = true;
87 4 dgisselq
 
88 6 dgisselq
                if (writeout) {
89
                        int cmd;
90
                        cmd = (m_core->o_ddr_reset_n?0:32)
91
                                |(m_core->o_ddr_cke?0:16)
92
                                |(m_core->o_ddr_cs_n?8:0)
93
                                |(m_core->o_ddr_ras_n?4:0)
94
                                |(m_core->o_ddr_cas_n?2:0)
95
                                |(m_core->o_ddr_we_n?1:0);
96
                        printf("%08lx-WB: %s/%s %s%s%s %s@0x%08x[%08x/%08x] -- ",
97
                                m_tickcount,
98
                                (m_core->i_wb_cyc)?"CYC":"   ",
99
                                (m_core->i_wb_stb)?"STB":"   ",
100
                                (m_core->o_wb_stall)?"STALL":"     ",
101
                                (m_core->o_wb_ack)?"ACK":"   ",
102
                                (m_core->o_cmd_accepted)?"BUS":"   ",
103
                                (m_core->i_wb_we)?"W":"R",
104
                                (m_core->i_wb_addr),
105
                                (m_core->i_wb_data),
106
                                (m_core->o_wb_data));
107 4 dgisselq
 
108 6 dgisselq
                        printf("%s%s %d%d%d%d %s%s%s%s B[%d]@%04x %08x %08x",
109
                                (m_core->o_ddr_reset_n)?" ":"R",
110
                                (m_core->o_ddr_cke)?"CK":"  ",
111
                                (m_core->o_ddr_cs_n),
112
                                (m_core->o_ddr_ras_n),
113
                                (m_core->o_ddr_cas_n),
114
                                (m_core->o_ddr_we_n),
115
                                //
116
                                (m_core->o_ddr_dqs)?"D":" ",
117
                                (m_core->o_ddr_dm)?"M":" ",
118
                                (m_core->o_ddr_odt)?"O":" ",
119
                                (m_core->o_ddr_bus_oe)?"E":" ",
120
                                //
121
                                (m_core->o_ddr_ba),
122
                                (m_core->o_ddr_addr),
123
                                (m_core->i_ddr_data),
124
                                (m_core->o_ddr_data));
125 4 dgisselq
 
126 7 dgisselq
                        printf(" FIFO[%x,%x](%d,%d,%08x-%08x-%08x)",
127
                                m_core->v__DOT__bus_fifo_head,
128
                                m_core->v__DOT__bus_fifo_tail,
129
                                m_core->v__DOT__bus_fifo_new[m_core->v__DOT__bus_fifo_tail],
130
                                m_core->v__DOT__bus_fifo_sub[m_core->v__DOT__bus_fifo_tail],
131
                                m_core->v__DOT__r_data,
132
                                m_core->v__DOT__bus_fifo_data[(m_core->v__DOT__bus_fifo_head-1)&15],
133
                                m_core->v__DOT__bus_fifo_data[m_core->v__DOT__bus_fifo_tail]);
134
 
135
                        printf(" BUS[%03x/%03x/%03x/%d]",
136
                                (m_core->v__DOT__bus_active),
137
                                (m_core->v__DOT__bus_read),
138
                                (m_core->v__DOT__bus_new),
139
                                (m_core->v__DOT__bus_subaddr[8]));
140
 
141 6 dgisselq
                        // Reset logic
142
                        printf(" RST(%06x%s[%d] - %08x->%08x)",
143
                                m_core->v__DOT__reset_timer,
144
                                (m_core->v__DOT__reset_ztimer)?"Z":" ",
145
                                (m_core->v__DOT__reset_address),
146
                                (m_core->v__DOT__reset_instruction),
147
                                (m_core->v__DOT__reset_cmd));
148 4 dgisselq
 
149 6 dgisselq
                        printf(" %s%03x[%d]%04x:%d",
150
                                (m_core->v__DOT__r_pending)?"R":" ",
151
                                (m_core->v__DOT__r_row),
152
                                (m_core->v__DOT__r_bank),
153
                                (m_core->v__DOT__r_col),0);
154
                                // (m_core->v__DOT__r_sub));
155
                        printf(" %s%s%s",
156 7 dgisselq
                                "B",
157
                                // (m_core->v__DOT__all_banks_closed)?"b":"B",
158 6 dgisselq
                                (m_core->v__DOT__need_close_bank)?"C":"N",
159
                                //:(m_core->v__DOT__maybe_close_next_bank)?"c":"N",
160
                                (m_core->v__DOT__need_open_bank)?"O":"K");
161
                                // :(m_core->v__DOT__maybe_open_next_bank)?"o":"K");
162
                        for(int i=0; i<8; i++) {
163 7 dgisselq
                                printf("%s%x@%x%s",
164 6 dgisselq
                                        (m_core->v__DOT__r_bank==i)?"R":"[",
165
                                        m_core->v__DOT__bank_status[i],
166
                                        m_core->v__DOT__bank_address[i],
167
                                        (m_core->v__DOT__r_nxt_bank==i)?"N":"]");
168
                        }
169
 
170 4 dgisselq
 
171 6 dgisselq
                        extern int gbl_state, gbl_counts;
172
                        printf(" %2d:%08x ", gbl_state, gbl_counts);
173
 
174 7 dgisselq
                        printf(" %s%s%s%s%s%s%s:%08x:%08x",
175 6 dgisselq
                                (m_core->v__DOT__reset_override)?"R":" ",
176
                                (m_core->v__DOT__need_refresh)?"N":" ",
177
                                (m_core->v__DOT__need_close_bank)?"C":" ",
178
                                (m_core->v__DOT__need_open_bank)?"O":" ",
179
                                (m_core->v__DOT__valid_bank)?"V":" ",
180 7 dgisselq
                                (m_core->v__DOT__r_move)?"R":" ",
181
                                (m_core->v__DOT__m_move)?"M":" ",
182 6 dgisselq
                                m_core->v__DOT__activate_bank_cmd,
183
                                m_core->v__DOT__cmd);
184
 
185 7 dgisselq
                        printf(" F%s%05x:%x/%s",
186
                                (m_core->v__DOT__refresh_ztimer)?"Z":" ",
187
                                m_core->v__DOT__refresh_counter,
188
                                m_core->v__DOT__refresh_addr,
189
                                (m_core->v__DOT__need_refresh)?"N":" ");
190 6 dgisselq
 
191
                        if (m_core->v__DOT__reset_override)
192
                                printf(" OVERRIDE");
193
                        //if(m_core->v__DOT__last_open_bank)printf(" LST-OPEN");
194
                        switch(cmd) {
195
                        case DDR_MRSET:     printf(" MRSET"); break;
196
                        case DDR_REFRESH:   printf(" REFRESH"); break;
197
                        case DDR_PRECHARGE: printf(" PRECHARGE%s", (m_core->o_ddr_addr&0x400)?"-ALL":""); break;
198
                        case DDR_ACTIVATE:  printf(" ACTIVATE"); break;
199
                        case DDR_WRITE:     printf(" WRITE"); break;
200
                        case DDR_READ:      printf(" READ"); break;
201
                        case DDR_ZQS:       printf(" ZQS"); break;
202
                        case DDR_NOOP:      printf(" NOOP"); break;
203
                        default: printf(" Unknown-CMD(%02x)", cmd); break;
204
                        }
205
 
206
                        // Decode the command
207
 
208
                        printf("\n");
209
                }
210
 
211 4 dgisselq
                m_core->eval();
212
                m_core->i_clk = 0;
213
                m_core->eval();
214
 
215
                m_tickcount++;
216
 
217
                /*
218
                if ((m_core->o_wb_ack)&&(!m_core->i_wb_cyc)) {
219
                        printf("SETTING ERR TO TRUE!!!!!  ACK w/ no CYC\n");
220
                        // m_bomb = true;
221
                }
222
                */
223
        }
224
 
225
        void reset(void) {
226
                m_core->i_reset  = 1;
227
                m_core->i_wb_cyc = 0;
228
                m_core->i_wb_stb = 0;
229
                tick();
230
                m_core->i_reset  = 0;
231
        }
232
 
233
        void wb_tick(void) {
234
                m_core->i_wb_cyc   = 0;
235
                m_core->i_wb_stb = 0;
236
                tick();
237
        }
238
 
239
        unsigned wb_read(unsigned a) {
240
                int             errcount = 0;
241
                unsigned        result;
242
 
243
                printf("WB-READ(%08x)\n", a);
244
 
245
                m_core->i_wb_cyc = 1;
246
                m_core->i_wb_stb = 1;
247
                m_core->i_wb_we  = 0;
248
                m_core->i_wb_addr= a & SDRAMMASK;
249
 
250
                if (m_core->o_wb_stall) {
251
                        while((errcount++ < BOMBCOUNT)&&(m_core->o_wb_stall))
252
                                tick();
253
                } else
254
                        tick();
255
 
256
                m_core->i_wb_stb = 0;
257
 
258
                while((errcount++ <  BOMBCOUNT)&&(!m_core->o_wb_ack))
259
                        tick();
260
 
261
 
262
                result = m_core->o_wb_data;
263
 
264
                // Release the bus?
265
                m_core->i_wb_cyc = 0;
266
                m_core->i_wb_stb = 0;
267
 
268
                if(errcount >= BOMBCOUNT) {
269
                        printf("SETTING ERR TO TRUE!!!!!\n");
270
                        m_bomb = true;
271
                } else if (!m_core->o_wb_ack) {
272
                        printf("SETTING ERR TO TRUE--NO ACK, NO TIMEOUT\n");
273
                        m_bomb = true;
274
                }
275
                tick();
276
 
277
                return result;
278
        }
279
 
280
        void    wb_read(unsigned a, int len, unsigned *buf) {
281
                int             errcount = 0;
282
                int             THISBOMBCOUNT = BOMBCOUNT * len;
283
                int             cnt, rdidx, inc;
284
 
285
                printf("WB-READ(%08x, %d)\n", a, len);
286
 
287
                while((errcount++ < BOMBCOUNT)&&(m_core->o_wb_stall))
288
                        wb_tick();
289
 
290
                if (errcount >= BOMBCOUNT) {
291
                        m_bomb = true;
292
                        return;
293
                }
294
 
295
                errcount = 0;
296
 
297
                m_core->i_wb_cyc = 1;
298
                m_core->i_wb_stb = 1;
299
                m_core->i_wb_we  = 0;
300
                m_core->i_wb_addr= a & SDRAMMASK;
301
 
302
                rdidx =0; cnt = 0;
303
                inc = 1;
304
 
305
                do {
306
                        int     s;
307
                        s = (m_core->o_wb_stall==0)?0:1;
308
                        tick();
309
                        if (!s)
310
                                m_core->i_wb_addr += inc;
311
                        cnt += (s==0)?1:0;
312
                        if (m_core->o_wb_ack)
313
                                buf[rdidx++] = m_core->o_wb_data;
314
                } while((cnt < len)&&(errcount++ < THISBOMBCOUNT));
315
 
316
                m_core->i_wb_stb = 0;
317
 
318
                while((rdidx < len)&&(errcount++ < THISBOMBCOUNT)) {
319
                        tick();
320
                        if (m_core->o_wb_ack)
321
                                buf[rdidx++] = m_core->o_wb_data;
322
                }
323
 
324
                // Release the bus?
325
                m_core->i_wb_cyc = 0;
326
 
327
                if(errcount >= THISBOMBCOUNT) {
328
                        printf("SETTING ERR TO TRUE!!!!! (errcount=%08x, THISBOMBCOUNT=%08x)\n", errcount, THISBOMBCOUNT);
329
                        m_bomb = true;
330
                } else if (!m_core->o_wb_ack) {
331
                        printf("SETTING ERR TO TRUE--NO ACK, NO TIMEOUT\n");
332
                        m_bomb = true;
333
                }
334
                tick();
335
        }
336
 
337
        void    wb_write(unsigned a, unsigned int v) {
338
                int errcount = 0;
339
 
340
                printf("WB-WRITE(%08x) = %08x\n", a, v);
341
                m_core->i_wb_cyc = 1;
342
                m_core->i_wb_stb = 1;
343
                m_core->i_wb_we  = 1;
344
                m_core->i_wb_addr= a & SDRAMMASK;
345
                m_core->i_wb_data= v;
346
 
347
                if (m_core->o_wb_stall)
348
                        while((errcount++ < BOMBCOUNT)&&(m_core->o_wb_stall))
349
                                tick();
350
                tick();
351
 
352
                m_core->i_wb_stb = 0;
353
 
354
                while((errcount++ <  BOMBCOUNT)&&(!m_core->o_wb_ack))
355
                        tick();
356
 
357
                // Release the bus?
358
                m_core->i_wb_cyc = 0;
359
                m_core->i_wb_stb = 0;
360
 
361
                if(errcount >= BOMBCOUNT) {
362
                        printf("SETTING ERR TO TRUE!!!!!\n");
363
                        m_bomb = true;
364
                } tick();
365
        }
366
 
367
        void    wb_write(unsigned a, unsigned int ln, unsigned int *buf) {
368
                unsigned errcount = 0, nacks = 0;
369
 
370
                m_core->i_wb_cyc = 1;
371
                m_core->i_wb_stb = 1;
372
                for(unsigned stbcnt=0; stbcnt<ln; stbcnt++) {
373
                        m_core->i_wb_we  = 1;
374
                        m_core->i_wb_addr= (a+stbcnt) & SDRAMMASK;
375
                        m_core->i_wb_data= buf[stbcnt];
376
                        errcount = 0;
377
 
378
                        while((errcount++ < BOMBCOUNT)&&(m_core->o_wb_stall)) {
379
                                tick(); if (m_core->o_wb_ack) nacks++;
380
                        }
381
                        // Tick, now that we're not stalled.  This is the tick
382
                        // that gets accepted.
383
                        tick(); if (m_core->o_wb_ack) nacks++;
384
                }
385
 
386
                m_core->i_wb_stb = 0;
387
 
388
                errcount = 0;
389
                while((nacks < ln)&&(errcount++ < BOMBCOUNT)) {
390
                        tick();
391
                        if (m_core->o_wb_ack) {
392
                                nacks++;
393
                                errcount = 0;
394
                        }
395
                }
396
 
397
                // Release the bus
398
                m_core->i_wb_cyc = 0;
399
                m_core->i_wb_stb = 0;
400
 
401
                if(errcount >= BOMBCOUNT) {
402
                        printf("SETTING ERR TO TRUE!!!!!\n");
403
                        m_bomb = true;
404
                } tick();
405
        }
406
 
407
        bool    bombed(void) const { return m_bomb; }
408
 
409
};
410
 
411
void    uload(unsigned len, unsigned *buf) {
412
        FILE    *fp = fopen("/dev/urandom", "r");
413
 
414
        if ((NULL == fp)||(len != fread(buf, sizeof(unsigned), len, fp))) {
415
                for(int i=0; i<(int)len; i++)
416
                        buf[i] = rand();
417
        } if (NULL == fp)
418
                fclose(fp);
419
}
420
 
421
int main(int  argc, char **argv) {
422
        Verilated::commandArgs(argc, argv);
423
        DDRSDRAM_TB     *tb = new DDRSDRAM_TB;
424
        unsigned        *rdbuf, *mbuf;
425
        int     nw = 3, nr = 13;
426
        unsigned        mlen = (1<<(LGMEMSIZE-2));
427
 
428
        printf("Giving the core 140k cycles to start up\n");
429
        // Before testing, let's give the unit time enough to warm up
430
        tb->reset();
431 7 dgisselq
        for(int i=0; i<141195; i++)
432 4 dgisselq
                tb->wb_tick();
433
 
434
        printf("Getting some memory ...\n");
435
        rdbuf = new unsigned[mlen];
436
        mbuf  = new unsigned[mlen]; // Match buffer
437
        printf("Charging my memory with random values\n");
438
        uload(mlen, rdbuf);
439
 
440
        // First test: singular reads through the memory, followed by
441
        // singular  writes
442
        printf("Starting the single-read test\n");
443
        for(int i=0; i<(int)mlen; i++) {
444
                tb->wb_write(i, rdbuf[i]);
445
                tb->wb_tick();
446
                if ((*tb)[i] != rdbuf[i]) {
447
                        printf("WRITE[%06x] = %08x (Expecting %08x) FAILED\n",
448
                                i, (*tb)[i], rdbuf[i]);
449
                        goto test_failure;
450
                } if (tb->bombed())
451
                        goto test_failure;
452
 
453
        } for(int i=0; i<(int)mlen; i++) {
454
                unsigned        v;
455
                if (rdbuf[i] != (v=tb->wb_read(i))) {
456
                        printf("READ[%06x] = %08x (Expecting %08x)\n",
457
                                i, v, rdbuf[i]);
458
                        goto test_failure;
459
                } if (tb->bombed())
460
                        goto test_failure;
461
                tb->wb_tick();
462
        }
463
 
464
        // Second test: Vector writes going through all memory, followed a
465
        // massive vector read
466
        uload(mlen, rdbuf); // Get some new values
467
        tb->wb_write(0, mlen, rdbuf);
468
        if (tb->bombed())
469
                goto test_failure;
470
        for(int i=0; i<(int)mlen; i++) {
471
                unsigned        v;
472
                if (rdbuf[i] != (v=(*tb)[i])) {
473
                        printf("V-WRITE[%06x] = %08x (Expecting %08x)\n",
474
                                i, v, rdbuf[i]);
475
                        goto test_failure;
476
                }
477
        }
478
 
479
        tb->wb_read( 0, mlen, mbuf);
480
        if (tb->bombed())
481
                goto test_failure;
482
        for(int i=0; i<(int)mlen; i++) {
483
                if (rdbuf[i] != mbuf[i]) {
484
                        printf("V-READ[%06x] = %08x (Expecting %08x)\n",
485
                                i, mbuf[i], rdbuf[i]);
486
                        goto test_failure;
487
                }
488
        }
489
 
490
        // Third test: Vector writes going through all memory, an prime number
491
        // of values at a time, followed by reads via a different prime number
492
        for(int i=0; i<(int)mlen; i+=nw) {
493
                int     ln = ((int)mlen-i>nw)?nw:mlen-i;
494
                tb->wb_write(i, nw, &rdbuf[i]);
495
                for(int j=0; j<ln; j++) {
496
                        if ((*tb)[i+j] != rdbuf[i+j]) {
497
                                printf("P-WRITE[%06x] = %08x (Expecting %08x) FAILED\n",
498
                                        i, (*tb)[i], rdbuf[i]);
499
                                goto test_failure;
500
                        }
501
                } if (tb->bombed())
502
                        goto test_failure;
503
        } for(int i=0; i<(int)mlen; i+=nr) {
504
                int     ln = ((int)mlen-i>nr)?nr:mlen-i;
505
                tb->wb_write(i, nr, &mbuf[i]);
506
                for(int j=0; j<ln; j++) {
507
                        if (mbuf[i+j] != rdbuf[i+j]) {
508
                                printf("P-READ[%06x] = %08x (Expecting %08x) FAILED\n",
509
                                        i, mbuf[i], rdbuf[i]);
510
                                goto test_failure;
511
                        }
512
                } if (tb->bombed())
513
                        goto test_failure;
514
        }
515
 
516
 
517
        printf("SUCCESS!!\n");
518
        exit(0);
519
test_failure:
520
        printf("FAIL-HERE\n");
521
        for(int i=0; i<64; i++)
522
                tb->tick();
523
        printf("TEST FAILED\n");
524
        exit(-1);
525
}

powered by: WebSVN 2.1.0

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