URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [orpsocv2/] [boards/] [xilinx/] [s3adsp1800/] [bench/] [verilog/] [orpsoc_testbench.v] - Rev 714
Go to most recent revision | Compare with Previous | Blame | View Log
////////////////////////////////////////////////////////////////////// /// //// /// ORPSoC Spartan 3A DSP 1800 board testbench //// /// //// /// Instantiate ORPSoC, monitors, provide stimulus //// /// //// /// Julius Baxter, julius@opencores.org //// /// //// ////////////////////////////////////////////////////////////////////// //// //// //// Copyright (C) 2009,2010,2011 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 //// //// //// ////////////////////////////////////////////////////////////////////// `include "orpsoc-defines.v" `include "orpsoc-testbench-defines.v" `include "test-defines.v" `include "timescale.v" // Xilinx simulation: `include "glbl.v" module orpsoc_testbench; // Clock and reset signal registers reg clk = 0; reg rst_n = 1; // Active LOW always #((`BOARD_CLOCK_PERIOD)/2) clk <= ~clk; // Reset, ACTIVE LOW initial begin #1; repeat (32) @(negedge clk) rst_n <= 1; repeat (32) @(negedge clk) rst_n <= 0; repeat (32) @(negedge clk) rst_n <= 1; end // Include design parameters file `include "orpsoc-params.v" // Pullup bus for I2C tri1 i2c_scl, i2c_sda; `ifdef JTAG_DEBUG wire tdo_pad_o; wire tck_pad_i; wire tms_pad_i; wire tdi_pad_i; `endif `ifdef UART0 wire uart0_stx_pad_o; wire uart0_srx_pad_i; `endif `ifdef GPIO0 wire [gpio0_io_width-1:0] gpio0_io; `endif `ifdef SPI0 wire spi0_mosi_o; wire spi0_miso_i; wire spi0_sck_o; wire spi0_hold_n_o; wire spi0_w_n_o; wire [spi0_ss_width-1:0] spi0_ss_o; `endif `ifdef ETH0 wire mtx_clk_o; wire [3:0] ethphy_mii_tx_d; wire ethphy_mii_tx_en; wire ethphy_mii_tx_err; wire mrx_clk_o; wire [3:0] mrxd_o; wire mrxdv_o; wire mrxerr_o; wire mcoll_o; wire mcrs_o; wire ethphy_rst_n; wire eth0_mdc_pad_o; wire eth0_md_pad_io; `endif `ifdef XILINX_DDR2 `include "s3adsp_ddr2_parameters_0.v" localparam DEVICE_WIDTH = 16; // Memory device data width localparam REG_ENABLE = `REGISTERED; // registered addr/ctrl localparam real CLK_PERIOD_NS = 7519.0 / 1000.0; // Delay for DQS signal during operation localparam real TPROP_DQS = 0.00; localparam real TPROP_DQS_RD = 0.05; localparam real TPROP_PCB_CTRL = 0.00; localparam real TPROP_PCB_DATA = 0.00; localparam real TPROP_PCB_DATA_RD = 0.00; wire [`DATA_WIDTH-1:0] ddr2_dq_sdram; wire [`DATA_STROBE_WIDTH-1:0] ddr2_dqs_sdram; // ddr2_dqs_n signal will be driven only in case of differential dqs is enabled. wire [`DATA_STROBE_WIDTH-1:0] ddr2_dqs_n_sdram; wire [`DATA_MASK_WIDTH-1:0] ddr2_dm_sdram; reg [`DATA_MASK_WIDTH-1:0] ddr2_dm_sdram_tmp; reg [`CLK_WIDTH-1:0] ddr2_clk_sdram; reg [`CLK_WIDTH-1:0] ddr2_clk_n_sdram; reg [`ROW_ADDRESS-1:0] ddr2_address_sdram; reg [`BANK_ADDRESS-1:0] ddr2_ba_sdram; reg ddr2_ras_n_sdram; reg ddr2_cas_n_sdram; reg ddr2_we_n_sdram; reg ddr2_cs_n_sdram; reg ddr2_cke_sdram; reg ddr2_odt_sdram; wire [`DATA_WIDTH-1:0] ddr2_dq_fpga; wire [`DATA_STROBE_WIDTH-1:0] ddr2_dqs_fpga; // ddr2_dqs_n signal will be driven only in case of differential dqs is enabled. wire [`DATA_STROBE_WIDTH-1:0] ddr2_dqs_n_fpga; wire [`DATA_MASK_WIDTH-1:0] ddr2_dm_fpga; wire [`CLK_WIDTH-1:0] ddr2_clk_fpga; wire [`CLK_WIDTH-1:0] ddr2_clk_n_fpga; wire [`ROW_ADDRESS-1:0] ddr2_address_fpga; wire [`BANK_ADDRESS-1:0] ddr2_ba_fpga; wire ddr2_ras_n_fpga; wire ddr2_cas_n_fpga; wire ddr2_we_n_fpga; wire ddr2_cs_n_fpga; wire ddr2_cke_fpga; wire ddr2_odt_fpga; wire ddr2_rst_dqs_div_loop; `endif orpsoc_top dut ( `ifdef JTAG_DEBUG .tms_pad_i (tms_pad_i), .tck_pad_i (tck_pad_i), .tdi_pad_i (tdi_pad_i), .tdo_pad_o (tdo_pad_o), `endif `ifdef XILINX_DDR2 .ddr2_ras_n (ddr2_ras_n_fpga), .ddr2_cas_n (ddr2_cas_n_fpga), .ddr2_we_n (ddr2_we_n_fpga), .ddr2_cs_n (ddr2_cs_n_fpga), .ddr2_cke (ddr2_cke_fpga), .ddr2_odt (ddr2_odt_fpga), .ddr2_dm (ddr2_dm_fpga), .ddr2_dq (ddr2_dq_fpga), .ddr2_dqs (ddr2_dqs_fpga), .ddr2_dqs_n (ddr2_dqs_n_fpga), .ddr2_ck (ddr2_clk_fpga), .ddr2_ck_n (ddr2_clk_n_fpga), .ddr2_ba (ddr2_ba_fpga), .ddr2_a (ddr2_address_fpga), .ddr2_rst_dqs_div_in (ddr2_rst_dqs_div_loop), .ddr2_rst_dqs_div_out (ddr2_rst_dqs_div_loop), `endif `ifdef UART0 .uart0_stx_pad_o (uart0_stx_pad_o), .uart0_srx_pad_i (uart0_srx_pad_i), .uart0_stx_expheader_pad_o (uart0_stx_pad_o), .uart0_srx_expheader_pad_i (uart0_srx_pad_i), `endif `ifdef SPI0 .spi0_sck_o (spi0_sck_o), .spi0_miso_i (spi0_miso_i), .spi0_mosi_o (spi0_mosi_o), .spi0_ss_o (spi0_ss_o), `endif `ifdef I2C0 .i2c0_sda_io (i2c_sda), .i2c0_scl_io (i2c_scl), `endif `ifdef GPIO0 .gpio0_io (gpio0_io), `endif `ifdef ETH0 .eth0_tx_clk (mtx_clk_o), .eth0_tx_data (ethphy_mii_tx_d), .eth0_tx_en (ethphy_mii_tx_en), .eth0_tx_er (ethphy_mii_tx_err), .eth0_rx_clk (mrx_clk_o), .eth0_rx_data (mrxd_o), .eth0_dv (mrxdv_o), .eth0_rx_er (mrxerr_o), .eth0_col (mcoll_o), .eth0_crs (mcrs_o), .eth0_rst_n_o (ethphy_rst_n), .eth0_mdc_pad_o (eth0_mdc_pad_o), .eth0_md_pad_io (eth0_md_pad_io), `endif // `ifdef ETH0 .sys_clk_i (clk), .rst_n_pad_i (rst_n) ); // // Instantiate OR1200 monitor // or1200_monitor monitor(); `ifndef SIM_QUIET `define CPU_ic_top or1200_ic_top `define CPU_dc_top or1200_dc_top wire ic_en = orpsoc_testbench.dut.or1200_top0.or1200_ic_top.ic_en; always @(posedge ic_en) $display("Or1200 IC enabled at %t", $time); wire dc_en = orpsoc_testbench.dut.or1200_top0.or1200_dc_top.dc_en; always @(posedge dc_en) $display("Or1200 DC enabled at %t", $time); `endif `ifdef JTAG_DEBUG `ifdef VPI_DEBUG // Debugging interface vpi_debug_module vpi_dbg ( .tms(tms_pad_i), .tck(tck_pad_i), .tdi(tdi_pad_i), .tdo(tdo_pad_o) ); `else // If no VPI debugging, tie off JTAG inputs assign tdi_pad_i = 1; assign tck_pad_i = 0; assign tms_pad_i = 1; `endif // !`ifdef VPI_DEBUG_ENABLE `endif // `ifdef JTAG_DEBUG `ifdef SPI0 // SPI flash memory - M25P16 compatible SPI protocol AT26DFxxx #(.MEMSIZE(2048*1024)) // 2MB flash on ML501 spi0_flash (// Outputs .SO (spi0_miso_i), // Inputs .CSB (spi0_ss_o), .SCK (spi0_sck_o), .SI (spi0_mosi_o), .WPB (1'b1) ); `endif // `ifdef SPI0 `ifdef ETH0 /* TX/RXes packets and checks them, enabled when ethernet MAC is */ // Disabled for now - Julius `include "eth_stim.v" eth_phy eth_phy0 ( // Outputs .mtx_clk_o (mtx_clk_o), .mrx_clk_o (mrx_clk_o), .mrxd_o (mrxd_o[3:0]), .mrxdv_o (mrxdv_o), .mrxerr_o (mrxerr_o), .mcoll_o (mcoll_o), .mcrs_o (mcrs_o), .link_o (), .speed_o (), .duplex_o (), .smii_clk_i (1'b0), .smii_sync_i (1'b0), .smii_rx_o (), // Inouts .md_io (eth0_md_pad_io), // Inputs `ifndef ETH0_PHY_RST // If no reset out from the design, hook up to the board's active low rst .m_rst_n_i (rst_n), `else .m_rst_n_i (ethphy_rst_n), `endif .mtxd_i (ethphy_mii_tx_d[3:0]), .mtxen_i (ethphy_mii_tx_en), .mtxerr_i (ethphy_mii_tx_err), .mdc_i (eth0_mdc_pad_o)); `endif // `ifdef ETH0 `ifdef XILINX_DDR2 always @( * ) begin ddr2_clk_sdram <= #(TPROP_PCB_CTRL) ddr2_clk_fpga; ddr2_clk_n_sdram <= #(TPROP_PCB_CTRL) ddr2_clk_n_fpga; ddr2_address_sdram <= #(TPROP_PCB_CTRL) ddr2_address_fpga; ddr2_ba_sdram <= #(TPROP_PCB_CTRL) ddr2_ba_fpga; ddr2_ras_n_sdram <= #(TPROP_PCB_CTRL) ddr2_ras_n_fpga; ddr2_cas_n_sdram <= #(TPROP_PCB_CTRL) ddr2_cas_n_fpga; ddr2_we_n_sdram <= #(TPROP_PCB_CTRL) ddr2_we_n_fpga; ddr2_cs_n_sdram <= #(TPROP_PCB_CTRL) ddr2_cs_n_fpga; ddr2_cke_sdram <= #(TPROP_PCB_CTRL) ddr2_cke_fpga; ddr2_odt_sdram <= #(TPROP_PCB_CTRL) ddr2_odt_fpga; ddr2_dm_sdram_tmp <= #(TPROP_PCB_DATA) ddr2_dm_fpga;//DM signal generation end // always @ ( * ) assign ddr2_dm_sdram = ddr2_dm_sdram_tmp; // Model delays on bi-directional BUS genvar dqwd; generate for (dqwd = 0;dqwd < `DATA_WIDTH;dqwd = dqwd+1) begin : dq_delay wiredelay # ( .Delay_g (TPROP_PCB_DATA), .Delay_rd (TPROP_PCB_DATA_RD) ) u_delay_dq ( .A (ddr2_dq_fpga[dqwd]), .B (ddr2_dq_sdram[dqwd]), .reset (rst_n) ); end endgenerate genvar dqswd; generate for (dqswd = 0;dqswd < `DATA_STROBE_WIDTH;dqswd = dqswd+1) begin : dqs_delay wiredelay # ( .Delay_g (TPROP_DQS), .Delay_rd (TPROP_DQS_RD) ) u_delay_dqs ( .A (ddr2_dqs_fpga[dqswd]), .B (ddr2_dqs_sdram[dqswd]), .reset (rst_n) ); wiredelay # ( .Delay_g (TPROP_DQS), .Delay_rd (TPROP_DQS_RD) ) u_delay_dqs_n ( .A (ddr2_dqs_n_fpga[dqswd]), .B (ddr2_dqs_n_sdram[dqswd]), .reset (rst_n) ); end endgenerate assign ddr2_dm_sdram = ddr2_dm_sdram_tmp; //parameter NUM_PROGRAM_WORDS=1048576; parameter NUM_PROGRAM_WORDS=262144; integer ram_ptr, program_word_ptr, k; reg [31:0] tmp_program_word; reg [31:0] program_array [0:NUM_PROGRAM_WORDS-1]; // 256k words = 1MB reg [8*16-1:0] ddr2_ram_mem_line; //8*16-bits= 8 shorts (half-words) genvar i,j; generate for(i = 0; i < `DATA_STROBE_WIDTH/2; i = i+1) begin : gen_bytes initial begin `ifdef PRELOAD_RAM `include "ddr2_model_preload.v" `endif end ddr2_model u_mem0 ( .ck (ddr2_clk_sdram[i]), .ck_n (ddr2_clk_n_sdram[i]), .cke (ddr2_cke_sdram), .cs_n (ddr2_cs_n_sdram), .ras_n (ddr2_ras_n_sdram), .cas_n (ddr2_cas_n_sdram), .we_n (ddr2_we_n_sdram), .dm_rdqs (ddr2_dm_sdram[(2*(i+1))-1 : i*2]), .ba (ddr2_ba_sdram), .addr (ddr2_address_sdram), .dq (ddr2_dq_sdram[(16*(i+1))-1 : i*16]), .dqs (ddr2_dqs_sdram[(2*(i+1))-1 : i*2]), .dqs_n (ddr2_dqs_n_sdram[(2*(i+1))-1 : i*2]), .rdqs_n (), .odt (ddr2_odt_sdram) ); end // block: gen_bytes endgenerate task ddr2_read32; input [31:0] addr; output [31:0] word; begin // TODO fill this in word = 0; end endtask // ddr2_read32 `endif // `ifdef XILINX_DDR2 `ifdef VCD reg vcd_go = 0; always @(vcd_go) begin `ifdef VCD_DELAY #(`VCD_DELAY); `endif // Delay by x insns `ifdef VCD_DELAY_INSNS #10; // Delay until after the value becomes valid while (monitor.insns < `VCD_DELAY_INSNS) @(posedge clk); `endif `ifdef SIMULATOR_MODELSIM // Modelsim can GZip VCDs on the fly if given in the suffix `define VCD_SUFFIX ".vcd.gz" `else `define VCD_SUFFIX ".vcd" `endif `ifndef SIM_QUIET $display("* VCD in %s\n", {"../out/",`TEST_NAME_STRING,`VCD_SUFFIX}); `endif $dumpfile({"../out/",`TEST_NAME_STRING,`VCD_SUFFIX}); `ifndef VCD_DEPTH `define VCD_DEPTH 0 `endif $dumpvars(`VCD_DEPTH); end `endif // `ifdef VCD initial begin `ifndef SIM_QUIET $display("\n* Starting simulation of design RTL.\n* Test: %s\n", `TEST_NAME_STRING ); `endif `ifdef VCD vcd_go = 1; `endif end // initial begin `ifdef END_TIME initial begin #(`END_TIME); `ifndef SIM_QUIET $display("* Finish simulation due to END_TIME being set at %t", $time); `endif $finish; end `endif `ifdef END_INSNS initial begin #10 while (monitor.insns < `END_INSNS) @(posedge clk); `ifndef SIM_QUIET $display("* Finish simulation due to END_INSNS count (%d) reached at %t", `END_INSNS, $time); `endif $finish; end `endif `ifdef UART0 // // UART0 decoder // uart_decoder #( .uart_baudrate_period_ns(8680) // 115200 baud = period 8.68uS ) uart0_decoder ( .clk(clk), .uart_tx(uart0_stx_pad_o) ); // Loopback UART lines assign uart0_srx_pad_i = uart0_stx_pad_o; `endif // `ifdef UART0 endmodule // orpsoc_testbench // Local Variables: // verilog-library-directories:("." "../../rtl/verilog/orpsoc_top") // verilog-library-files:() // verilog-library-extensions:(".v" ".h") // End:
Go to most recent revision | Compare with Previous | Blame | View Log