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

Subversion Repositories wbddr3

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

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 4 dgisselq
 
87 6 dgisselq
                if (writeout) {
88
                        int cmd;
89
                        cmd = (m_core->o_ddr_reset_n?0:32)
90
                                |(m_core->o_ddr_cke?0:16)
91
                                |(m_core->o_ddr_cs_n?8:0)
92
                                |(m_core->o_ddr_ras_n?4:0)
93
                                |(m_core->o_ddr_cas_n?2:0)
94
                                |(m_core->o_ddr_we_n?1:0);
95
                        printf("%08lx-WB: %s/%s %s%s%s %s@0x%08x[%08x/%08x] -- ",
96
                                m_tickcount,
97
                                (m_core->i_wb_cyc)?"CYC":"   ",
98
                                (m_core->i_wb_stb)?"STB":"   ",
99
                                (m_core->o_wb_stall)?"STALL":"     ",
100
                                (m_core->o_wb_ack)?"ACK":"   ",
101
                                (m_core->o_cmd_accepted)?"BUS":"   ",
102
                                (m_core->i_wb_we)?"W":"R",
103
                                (m_core->i_wb_addr),
104
                                (m_core->i_wb_data),
105
                                (m_core->o_wb_data));
106 4 dgisselq
 
107 6 dgisselq
                        printf("%s%s %d%d%d%d %s%s%s%s B[%d]@%04x %08x %08x",
108
                                (m_core->o_ddr_reset_n)?" ":"R",
109
                                (m_core->o_ddr_cke)?"CK":"  ",
110
                                (m_core->o_ddr_cs_n),
111
                                (m_core->o_ddr_ras_n),
112
                                (m_core->o_ddr_cas_n),
113
                                (m_core->o_ddr_we_n),
114
                                //
115
                                (m_core->o_ddr_dqs)?"D":" ",
116
                                (m_core->o_ddr_dm)?"M":" ",
117
                                (m_core->o_ddr_odt)?"O":" ",
118
                                (m_core->o_ddr_bus_oe)?"E":" ",
119
                                //
120
                                (m_core->o_ddr_ba),
121
                                (m_core->o_ddr_addr),
122
                                (m_core->i_ddr_data),
123
                                (m_core->o_ddr_data));
124 4 dgisselq
 
125 6 dgisselq
                        /*
126
                        // Reset logic
127
                        printf(" RST(%06x%s[%d] - %08x->%08x)",
128
                                m_core->v__DOT__reset_timer,
129
                                (m_core->v__DOT__reset_ztimer)?"Z":" ",
130
                                (m_core->v__DOT__reset_address),
131
                                (m_core->v__DOT__reset_instruction),
132
                                (m_core->v__DOT__reset_cmd));
133
                        */
134 4 dgisselq
 
135 6 dgisselq
                        printf(" %s%03x[%d]%04x:%d",
136
                                (m_core->v__DOT__r_pending)?"R":" ",
137
                                (m_core->v__DOT__r_row),
138
                                (m_core->v__DOT__r_bank),
139
                                (m_core->v__DOT__r_col),0);
140
                                // (m_core->v__DOT__r_sub));
141
                        printf(" %s%s%s",
142
                                (m_core->v__DOT__all_banks_closed)?"b":"B",
143
                                (m_core->v__DOT__need_close_bank)?"C":"N",
144
                                //:(m_core->v__DOT__maybe_close_next_bank)?"c":"N",
145
                                (m_core->v__DOT__need_open_bank)?"O":"K");
146
                                // :(m_core->v__DOT__maybe_open_next_bank)?"o":"K");
147
                        for(int i=0; i<8; i++) {
148
                                printf("%s%x@%05x%s",
149
                                        (m_core->v__DOT__r_bank==i)?"R":"[",
150
                                        m_core->v__DOT__bank_status[i],
151
                                        m_core->v__DOT__bank_address[i],
152
                                        (m_core->v__DOT__r_nxt_bank==i)?"N":"]");
153
                        }
154
 
155 4 dgisselq
 
156 6 dgisselq
                        extern int gbl_state, gbl_counts;
157
                        printf(" %2d:%08x ", gbl_state, gbl_counts);
158
 
159
                        printf(" %s%s%s%s%s:%08x:%08x",
160
                                (m_core->v__DOT__reset_override)?"R":" ",
161
                                (m_core->v__DOT__need_refresh)?"N":" ",
162
                                (m_core->v__DOT__need_close_bank)?"C":" ",
163
                                (m_core->v__DOT__need_open_bank)?"O":" ",
164
                                (m_core->v__DOT__valid_bank)?"V":" ",
165
                                m_core->v__DOT__activate_bank_cmd,
166
                                m_core->v__DOT__cmd);
167
 
168
                        printf(" F%05x:%d%d%d:%d:%08x",
169
                                m_core->v__DOT__refresh_clk,
170
                                m_core->v__DOT__need_refresh,
171
                                m_core->v__DOT__midrefresh,
172
                                m_core->v__DOT__endrefresh,
173
                                m_core->v__DOT__midrefresh_hctr,
174
                                m_core->v__DOT__midrefresh_lctr);
175
 
176
                        if (m_core->v__DOT__reset_override)
177
                                printf(" OVERRIDE");
178
                        //if(m_core->v__DOT__last_open_bank)printf(" LST-OPEN");
179
                        switch(cmd) {
180
                        case DDR_MRSET:     printf(" MRSET"); break;
181
                        case DDR_REFRESH:   printf(" REFRESH"); break;
182
                        case DDR_PRECHARGE: printf(" PRECHARGE%s", (m_core->o_ddr_addr&0x400)?"-ALL":""); break;
183
                        case DDR_ACTIVATE:  printf(" ACTIVATE"); break;
184
                        case DDR_WRITE:     printf(" WRITE"); break;
185
                        case DDR_READ:      printf(" READ"); break;
186
                        case DDR_ZQS:       printf(" ZQS"); break;
187
                        case DDR_NOOP:      printf(" NOOP"); break;
188
                        default: printf(" Unknown-CMD(%02x)", cmd); break;
189
                        }
190
 
191
                        // Decode the command
192
 
193
                        printf("\n");
194
                }
195
 
196 4 dgisselq
                m_core->eval();
197
                m_core->i_clk = 0;
198
                m_core->eval();
199
 
200
                m_tickcount++;
201
 
202
                /*
203
                if ((m_core->o_wb_ack)&&(!m_core->i_wb_cyc)) {
204
                        printf("SETTING ERR TO TRUE!!!!!  ACK w/ no CYC\n");
205
                        // m_bomb = true;
206
                }
207
                */
208
        }
209
 
210
        void reset(void) {
211
                m_core->i_reset  = 1;
212
                m_core->i_wb_cyc = 0;
213
                m_core->i_wb_stb = 0;
214
                tick();
215
                m_core->i_reset  = 0;
216
        }
217
 
218
        void wb_tick(void) {
219
                m_core->i_wb_cyc   = 0;
220
                m_core->i_wb_stb = 0;
221
                tick();
222
        }
223
 
224
        unsigned wb_read(unsigned a) {
225
                int             errcount = 0;
226
                unsigned        result;
227
 
228
                printf("WB-READ(%08x)\n", a);
229
 
230
                m_core->i_wb_cyc = 1;
231
                m_core->i_wb_stb = 1;
232
                m_core->i_wb_we  = 0;
233
                m_core->i_wb_addr= a & SDRAMMASK;
234
 
235
                if (m_core->o_wb_stall) {
236
                        while((errcount++ < BOMBCOUNT)&&(m_core->o_wb_stall))
237
                                tick();
238
                } else
239
                        tick();
240
 
241
                m_core->i_wb_stb = 0;
242
 
243
                while((errcount++ <  BOMBCOUNT)&&(!m_core->o_wb_ack))
244
                        tick();
245
 
246
 
247
                result = m_core->o_wb_data;
248
 
249
                // Release the bus?
250
                m_core->i_wb_cyc = 0;
251
                m_core->i_wb_stb = 0;
252
 
253
                if(errcount >= BOMBCOUNT) {
254
                        printf("SETTING ERR TO TRUE!!!!!\n");
255
                        m_bomb = true;
256
                } else if (!m_core->o_wb_ack) {
257
                        printf("SETTING ERR TO TRUE--NO ACK, NO TIMEOUT\n");
258
                        m_bomb = true;
259
                }
260
                tick();
261
 
262
                return result;
263
        }
264
 
265
        void    wb_read(unsigned a, int len, unsigned *buf) {
266
                int             errcount = 0;
267
                int             THISBOMBCOUNT = BOMBCOUNT * len;
268
                int             cnt, rdidx, inc;
269
 
270
                printf("WB-READ(%08x, %d)\n", a, len);
271
 
272
                while((errcount++ < BOMBCOUNT)&&(m_core->o_wb_stall))
273
                        wb_tick();
274
 
275
                if (errcount >= BOMBCOUNT) {
276
                        m_bomb = true;
277
                        return;
278
                }
279
 
280
                errcount = 0;
281
 
282
                m_core->i_wb_cyc = 1;
283
                m_core->i_wb_stb = 1;
284
                m_core->i_wb_we  = 0;
285
                m_core->i_wb_addr= a & SDRAMMASK;
286
 
287
                rdidx =0; cnt = 0;
288
                inc = 1;
289
 
290
                do {
291
                        int     s;
292
                        s = (m_core->o_wb_stall==0)?0:1;
293
                        tick();
294
                        if (!s)
295
                                m_core->i_wb_addr += inc;
296
                        cnt += (s==0)?1:0;
297
                        if (m_core->o_wb_ack)
298
                                buf[rdidx++] = m_core->o_wb_data;
299
                } while((cnt < len)&&(errcount++ < THISBOMBCOUNT));
300
 
301
                m_core->i_wb_stb = 0;
302
 
303
                while((rdidx < len)&&(errcount++ < THISBOMBCOUNT)) {
304
                        tick();
305
                        if (m_core->o_wb_ack)
306
                                buf[rdidx++] = m_core->o_wb_data;
307
                }
308
 
309
                // Release the bus?
310
                m_core->i_wb_cyc = 0;
311
 
312
                if(errcount >= THISBOMBCOUNT) {
313
                        printf("SETTING ERR TO TRUE!!!!! (errcount=%08x, THISBOMBCOUNT=%08x)\n", errcount, THISBOMBCOUNT);
314
                        m_bomb = true;
315
                } else if (!m_core->o_wb_ack) {
316
                        printf("SETTING ERR TO TRUE--NO ACK, NO TIMEOUT\n");
317
                        m_bomb = true;
318
                }
319
                tick();
320
        }
321
 
322
        void    wb_write(unsigned a, unsigned int v) {
323
                int errcount = 0;
324
 
325
                printf("WB-WRITE(%08x) = %08x\n", a, v);
326
                m_core->i_wb_cyc = 1;
327
                m_core->i_wb_stb = 1;
328
                m_core->i_wb_we  = 1;
329
                m_core->i_wb_addr= a & SDRAMMASK;
330
                m_core->i_wb_data= v;
331
 
332
                if (m_core->o_wb_stall)
333
                        while((errcount++ < BOMBCOUNT)&&(m_core->o_wb_stall))
334
                                tick();
335
                tick();
336
 
337
                m_core->i_wb_stb = 0;
338
 
339
                while((errcount++ <  BOMBCOUNT)&&(!m_core->o_wb_ack))
340
                        tick();
341
 
342
                // Release the bus?
343
                m_core->i_wb_cyc = 0;
344
                m_core->i_wb_stb = 0;
345
 
346
                if(errcount >= BOMBCOUNT) {
347
                        printf("SETTING ERR TO TRUE!!!!!\n");
348
                        m_bomb = true;
349
                } tick();
350
        }
351
 
352
        void    wb_write(unsigned a, unsigned int ln, unsigned int *buf) {
353
                unsigned errcount = 0, nacks = 0;
354
 
355
                m_core->i_wb_cyc = 1;
356
                m_core->i_wb_stb = 1;
357
                for(unsigned stbcnt=0; stbcnt<ln; stbcnt++) {
358
                        m_core->i_wb_we  = 1;
359
                        m_core->i_wb_addr= (a+stbcnt) & SDRAMMASK;
360
                        m_core->i_wb_data= buf[stbcnt];
361
                        errcount = 0;
362
 
363
                        while((errcount++ < BOMBCOUNT)&&(m_core->o_wb_stall)) {
364
                                tick(); if (m_core->o_wb_ack) nacks++;
365
                        }
366
                        // Tick, now that we're not stalled.  This is the tick
367
                        // that gets accepted.
368
                        tick(); if (m_core->o_wb_ack) nacks++;
369
                }
370
 
371
                m_core->i_wb_stb = 0;
372
 
373
                errcount = 0;
374
                while((nacks < ln)&&(errcount++ < BOMBCOUNT)) {
375
                        tick();
376
                        if (m_core->o_wb_ack) {
377
                                nacks++;
378
                                errcount = 0;
379
                        }
380
                }
381
 
382
                // Release the bus
383
                m_core->i_wb_cyc = 0;
384
                m_core->i_wb_stb = 0;
385
 
386
                if(errcount >= BOMBCOUNT) {
387
                        printf("SETTING ERR TO TRUE!!!!!\n");
388
                        m_bomb = true;
389
                } tick();
390
        }
391
 
392
        bool    bombed(void) const { return m_bomb; }
393
 
394
};
395
 
396
void    uload(unsigned len, unsigned *buf) {
397
        FILE    *fp = fopen("/dev/urandom", "r");
398
 
399
        if ((NULL == fp)||(len != fread(buf, sizeof(unsigned), len, fp))) {
400
                for(int i=0; i<(int)len; i++)
401
                        buf[i] = rand();
402
        } if (NULL == fp)
403
                fclose(fp);
404
}
405
 
406
int main(int  argc, char **argv) {
407
        Verilated::commandArgs(argc, argv);
408
        DDRSDRAM_TB     *tb = new DDRSDRAM_TB;
409
        unsigned        *rdbuf, *mbuf;
410
        int     nw = 3, nr = 13;
411
        unsigned        mlen = (1<<(LGMEMSIZE-2));
412
 
413
        printf("Giving the core 140k cycles to start up\n");
414
        // Before testing, let's give the unit time enough to warm up
415
        tb->reset();
416
        for(int i=0; i<140850; i++)
417
                tb->wb_tick();
418
 
419
        printf("Getting some memory ...\n");
420
        rdbuf = new unsigned[mlen];
421
        mbuf  = new unsigned[mlen]; // Match buffer
422
        printf("Charging my memory with random values\n");
423
        uload(mlen, rdbuf);
424
 
425
        // First test: singular reads through the memory, followed by
426
        // singular  writes
427
        printf("Starting the single-read test\n");
428
        for(int i=0; i<(int)mlen; i++) {
429
                tb->wb_write(i, rdbuf[i]);
430
                tb->wb_tick();
431
                if ((*tb)[i] != rdbuf[i]) {
432
                        printf("WRITE[%06x] = %08x (Expecting %08x) FAILED\n",
433
                                i, (*tb)[i], rdbuf[i]);
434
                        goto test_failure;
435
                } if (tb->bombed())
436
                        goto test_failure;
437
 
438
        } for(int i=0; i<(int)mlen; i++) {
439
                unsigned        v;
440
                if (rdbuf[i] != (v=tb->wb_read(i))) {
441
                        printf("READ[%06x] = %08x (Expecting %08x)\n",
442
                                i, v, rdbuf[i]);
443
                        goto test_failure;
444
                } if (tb->bombed())
445
                        goto test_failure;
446
                tb->wb_tick();
447
        }
448
 
449
        // Second test: Vector writes going through all memory, followed a
450
        // massive vector read
451
        uload(mlen, rdbuf); // Get some new values
452
        tb->wb_write(0, mlen, rdbuf);
453
        if (tb->bombed())
454
                goto test_failure;
455
        for(int i=0; i<(int)mlen; i++) {
456
                unsigned        v;
457
                if (rdbuf[i] != (v=(*tb)[i])) {
458
                        printf("V-WRITE[%06x] = %08x (Expecting %08x)\n",
459
                                i, v, rdbuf[i]);
460
                        goto test_failure;
461
                }
462
        }
463
 
464
        tb->wb_read( 0, mlen, mbuf);
465
        if (tb->bombed())
466
                goto test_failure;
467
        for(int i=0; i<(int)mlen; i++) {
468
                if (rdbuf[i] != mbuf[i]) {
469
                        printf("V-READ[%06x] = %08x (Expecting %08x)\n",
470
                                i, mbuf[i], rdbuf[i]);
471
                        goto test_failure;
472
                }
473
        }
474
 
475
        // Third test: Vector writes going through all memory, an prime number
476
        // of values at a time, followed by reads via a different prime number
477
        for(int i=0; i<(int)mlen; i+=nw) {
478
                int     ln = ((int)mlen-i>nw)?nw:mlen-i;
479
                tb->wb_write(i, nw, &rdbuf[i]);
480
                for(int j=0; j<ln; j++) {
481
                        if ((*tb)[i+j] != rdbuf[i+j]) {
482
                                printf("P-WRITE[%06x] = %08x (Expecting %08x) FAILED\n",
483
                                        i, (*tb)[i], rdbuf[i]);
484
                                goto test_failure;
485
                        }
486
                } if (tb->bombed())
487
                        goto test_failure;
488
        } for(int i=0; i<(int)mlen; i+=nr) {
489
                int     ln = ((int)mlen-i>nr)?nr:mlen-i;
490
                tb->wb_write(i, nr, &mbuf[i]);
491
                for(int j=0; j<ln; j++) {
492
                        if (mbuf[i+j] != rdbuf[i+j]) {
493
                                printf("P-READ[%06x] = %08x (Expecting %08x) FAILED\n",
494
                                        i, mbuf[i], rdbuf[i]);
495
                                goto test_failure;
496
                        }
497
                } if (tb->bombed())
498
                        goto test_failure;
499
        }
500
 
501
 
502
        printf("SUCCESS!!\n");
503
        exit(0);
504
test_failure:
505
        printf("FAIL-HERE\n");
506
        for(int i=0; i<64; i++)
507
                tb->tick();
508
        printf("TEST FAILED\n");
509
        exit(-1);
510
}

powered by: WebSVN 2.1.0

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