gram/simulation/simsoctb.v

   1 // This file is Copyright (c) 2020 LambdaConcept <contact@lambdaconcept.com>
   2
   3 `timescale 1 ns / 1 ns
   4
   5 module simsoctb;
   6   //parameter simticks = 70000;
   7   parameter simticks = 60000000;
   8
   9   // GSR & PUR init requires for Lattice models
  10   GSR GSR_INST (
  11     .GSR(1'b1)
  12   );
  13   PUR PUR_INST (
  14     .PUR (1'b1)
  15   );
  16
  17   reg clkin;
  18   wire sync;
  19   wire sync2x;
  20   wire dramsync;
  21   wire init;
  22
  23   // Generate 100 Mhz clock
  24   always
  25   begin
  26     clkin = 1'b1;
  27     #5;
  28     clkin = 1'b0;
  29     #5;
  30   end
  31
  32   // UART
  33   reg uart_rx;
  34   wire uart_tx;
  35
  36   // DDR3 init
  37   wire dram_ck;
  38   wire dram_cke;
  39   wire dram_we_n;
  40   wire dram_ras_n;
  41   wire dram_cas_n;
  42   wire [15:0] dram_dq;
  43   wire [1:0] dram_dqs;
  44   wire [1:0] dram_dqs_n;
  45   wire [13:0] dram_a;
  46   wire [2:0] dram_ba;
  47   wire [1:0] dram_dm;
  48   wire dram_odt;
  49   wire [1:0] dram_tdqs_n;
  50
  51   ddr3 ram_chip (
  52     .rst_n(1'b1),
  53     .ck(dram_ck),
  54     .ck_n(1'b0),
  55     .cke(dram_cke),
  56     .cs_n(1'b0),
  57     .ras_n(dram_ras_n),
  58     .cas_n(dram_cas_n),
  59     .we_n(dram_we_n),
  60     .dm_tdqs(dram_dm),
  61     .ba(dram_ba),
  62     .addr(dram_a),
  63     .dq(dram_dq),
  64     .dqs(dram_dqs),
  65     .dqs_n(dram_dqs_n),
  66     .tdqs_n(dram_tdqs_n),
  67     .odt(dram_odt)
  68   );
  69
  70   top simsoctop (
  71     .ddr3_0__dq__io(dram_dq),
  72     .ddr3_0__dqs__io(dram_dqs),
  73     .ddr3_0__clk__io(dram_ck),
  74     .ddr3_0__cke__io(dram_cke),
  75     .ddr3_0__we_n__io(dram_we_n),
  76     .ddr3_0__ras_n__io(dram_ras_n),
  77     .ddr3_0__cas_n__io(dram_cas_n),
  78     .ddr3_0__a__io(dram_a),
  79     .ddr3_0__ba__io(dram_ba),
  80     .ddr3_0__dm__io(dram_dm),
  81     .ddr3_0__odt__io(dram_odt),
  82     .clk100_0__io(clkin),
  83     .rst_0__io(1'b0),
  84     .uart_0__rx__io(uart_rx),
  85     .uart_0__tx__io(uart_tx)
  86   );
  87
  88   initial
  89     begin
  90       $dumpfile("simsoc.fst");
  91       $dumpvars(0, clkin);
  92       $dumpvars(0, dram_dq);
  93       $dumpvars(0, dram_dqs);
  94       $dumpvars(0, dram_ck);
  95       $dumpvars(0, dram_cke);
  96       $dumpvars(0, dram_we_n);
  97       $dumpvars(0, dram_ras_n);
  98       $dumpvars(0, dram_cas_n);
  99       $dumpvars(0, dram_a);
 100       $dumpvars(0, dram_ba);
 101       $dumpvars(0, dram_dm);
 102       $dumpvars(0, dram_odt);
 103       $dumpvars(0, uart_rx);
 104       $dumpvars(0, uart_tx);
 105       $dumpvars(0, simsoctop);
 106
 107       #simticks $finish;
 108     end
 109
 110   // UART
 111   reg [31:0] tmp;
 112   initial
 113     begin
 114       uart_rx <= 1'b1;
 115       #700000; // POR is ~700us
 116
 117       // Software control
 118       wishbone_write(32'h00009000 >> 2, 8'h0E); // DFII_CONTROL_ODT|DFII_CONTROL_RESET_N|DFI_CONTROL_CKE
 119
 120       wishbone_write(32'h0000900c >> 2, 32'h0); // p0 address
 121       wishbone_write(32'h00009010 >> 2, 32'h0); // p0 baddress
 122       wishbone_write(32'h00009000 >> 2, 8'h0C); // DFII_CONTROL_ODT|DFII_CONTROL_RESET_N
 123       #500000;
 124       wishbone_write(32'h00009000 >> 2, 8'h0E); // DFII_CONTROL_ODT|DFII_CONTROL_RESET_N|DFI_CONTROL_CKE
 125       #500000;
 126
 127       // Set MR2
 128       wishbone_write(32'h0000900c >> 2, 32'h200); // p0 address
 129       wishbone_write(32'h00009010 >> 2, 32'h2); // p0 baddress
 130       wishbone_write(32'h00009004 >> 2, 8'h0F); // RAS|CAS|WE|CS
 131       wishbone_write(32'h00009008 >> 2, 8'h01); // Command issue strobe
 132
 133       // Set MR3
 134       wishbone_write(32'h0000900c >> 2, 32'h0); // p0 address
 135       wishbone_write(32'h00009010 >> 2, 32'h3); // p0 baddress
 136       wishbone_write(32'h00009004 >> 2, 8'h0F); // RAS|CAS|WE|CS
 137       wishbone_write(32'h00009008 >> 2, 8'h01); // Command issue strobe
 138
 139       // Set MR1
 140       wishbone_write(32'h0000900c >> 2, 32'h6); // p0 address
 141       wishbone_write(32'h00009010 >> 2, 32'h1); // p0 baddress
 142       wishbone_write(32'h00009004 >> 2, 8'h0F); // RAS|CAS|WE|CS
 143       wishbone_write(32'h00009008 >> 2, 8'h01); // Command issue strobe
 144
 145       // Set MR0
 146       wishbone_write(32'h0000900c >> 2, 32'h320); // p0 address
 147       wishbone_write(32'h00009010 >> 2, 32'h0); // p0 baddress
 148       wishbone_write(32'h00009004 >> 2, 8'h0F); // RAS|CAS|WE|CS
 149       wishbone_write(32'h00009008 >> 2, 8'h01); // Command issue strobe
 150       #2000;
 151
 152       // ZQ calibration
 153       wishbone_write(32'h0000900c >> 2, 32'h400); // p0 address
 154       wishbone_write(32'h00009010 >> 2, 32'h0); // p0 baddress
 155       wishbone_write(32'h00009004 >> 2, 8'h03); // WE|CS
 156       #2000;
 157
 158       // Hardware control
 159       wishbone_write(32'h00009000 >> 2, 8'h01); // DFII_CONTROL_SEL
 160       #2000;
 161
 162       wishbone_read(32'h10000000 >> 2, tmp);
 163     end
 164
 165   task wishbone_write;
 166     input [31:0] address;
 167     input [31:0] value;
 168
 169     begin
 170       uart_send(8'h01); // Write command
 171       uart_send(8'h01); // Length
 172       uart_send(address[31:24]); // Address
 173       uart_send(address[23:16]);
 174       uart_send(address[15:8]);
 175       uart_send(address[7:0]);
 176       uart_send(value[31:24]);
 177       uart_send(value[23:16]);
 178       uart_send(value[15:8]);
 179       uart_send(value[7:0]);
 180     end
 181   endtask
 182
 183   task wishbone_read;
 184     input [31:0] address;
 185     output [31:0] value;
 186
 187     begin
 188       uart_send(8'h02); // Read command
 189       uart_send(8'h01); // Length
 190       uart_send(address[31:24]); // Address
 191       uart_send(address[23:16]);
 192       uart_send(address[15:8]);
 193       uart_send(address[7:0]);
 194       uart_read(value[31:24]);
 195       uart_read(value[23:16]);
 196       uart_read(value[15:8]);
 197       uart_read(value[7:0]);
 198     end
 199   endtask
 200
 201   task uart_send;
 202     input [7:0] data;
 203     integer i;
 204
 205     begin
 206       uart_rx <= 1'b0;
 207       #8680;
 208       for (i = 0; i < 8; i = i + 1)
 209         begin
 210           uart_rx <= data[i];
 211           #8680;
 212         end
 213       uart_rx <= 1'b1;
 214       #8680;
 215     end
 216   endtask
 217
 218   task uart_read;
 219     output [7:0] data;
 220     integer i;
 221
 222     begin
 223       while (uart_tx)
 224         begin
 225           #1;
 226         end
 227
 228       for (i = 0; i < 8; i = i+1)
 229         begin
 230           #8680 data[i] <= uart_tx;
 231         end
 232
 233       #8680;
 234     end
 235   endtask
 236 endmodule