diff options
author | Martin Braun <martin.braun@ettus.com> | 2014-10-07 11:25:20 +0200 |
---|---|---|
committer | Martin Braun <martin.braun@ettus.com> | 2014-10-07 11:25:20 +0200 |
commit | fd3e84941de463fa1a7ebab0a69515b4bf2614cd (patch) | |
tree | 3fa721a13d41d2c0451d663a59a220a38fd5e614 /fpga/usrp2/vrt/vita_rx_tb.v | |
parent | 3b66804e41891e358c790b453a7a59ec7462dba4 (diff) | |
download | uhd-fd3e84941de463fa1a7ebab0a69515b4bf2614cd.tar.gz uhd-fd3e84941de463fa1a7ebab0a69515b4bf2614cd.tar.bz2 uhd-fd3e84941de463fa1a7ebab0a69515b4bf2614cd.zip |
Removed copy of FPGA source files.
Diffstat (limited to 'fpga/usrp2/vrt/vita_rx_tb.v')
-rw-r--r-- | fpga/usrp2/vrt/vita_rx_tb.v | 246 |
1 files changed, 0 insertions, 246 deletions
diff --git a/fpga/usrp2/vrt/vita_rx_tb.v b/fpga/usrp2/vrt/vita_rx_tb.v deleted file mode 100644 index 8cd08a972..000000000 --- a/fpga/usrp2/vrt/vita_rx_tb.v +++ /dev/null @@ -1,246 +0,0 @@ -// -// Copyright 2011 Ettus Research LLC -// -// This program is free software: you can redistribute it and/or modify -// it under the terms of the GNU General Public License as published by -// the Free Software Foundation, either version 3 of the License, or -// (at your option) any later version. -// -// This program 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 General Public License for more details. -// -// You should have received a copy of the GNU General Public License -// along with this program. If not, see <http://www.gnu.org/licenses/>. -// - - - -module vita_rx_tb; - - localparam DECIM = 8'd4; - localparam MAXCHAN=1; - localparam NUMCHAN=1; - - reg clk = 0; - reg reset = 1; - - initial #1000 reset = 0; - always #50 clk = ~clk; - - initial $dumpfile("vita_rx_tb.vcd"); - initial $dumpvars(0,vita_rx_tb); - - wire [(MAXCHAN*32)-1:0] sample; - wire strobe, run; - wire [35:0] data_o; - wire src_rdy; - reg dst_rdy = 1; - wire [63:0] vita_time; - - reg set_stb = 0; - reg [7:0] set_addr; - reg [31:0] set_data; - wire set_stb_dsp; - wire [7:0] set_addr_dsp; - wire [31:0] set_data_dsp; - - /* - settings_bus_crossclock settings_bus_xclk_dsp - (.clk_i(clk), .rst_i(reset), .set_stb_i(set_stb), .set_addr_i(set_addr), .set_data_i(set_data), - .clk_o(clk), .rst_o(reset), .set_stb_o(set_stb_dsp), .set_addr_o(set_addr_dsp), .set_data_o(set_data_dsp)); - */ - - wire sample_dst_rdy, sample_src_rdy; - //wire [99:0] sample_data_o; - wire [64+5+(MAXCHAN*32)-1:0] sample_data_o; - - vita_rx_control #(.BASE(0), .WIDTH(32*MAXCHAN)) vita_rx_control - (.clk(clk), .reset(reset), .clear(0), - .set_stb(set_stb), .set_addr(set_addr), .set_data(set_data), - .vita_time(vita_time), .overrun(overrun), - .sample_fifo_o(sample_data_o), .sample_fifo_dst_rdy_i(sample_dst_rdy), .sample_fifo_src_rdy_o(sample_src_rdy), - .sample(sample), .run(run), .strobe(strobe)); - - vita_rx_framer #(.BASE(0), .MAXCHAN(MAXCHAN)) vita_rx_framer - (.clk(clk), .reset(reset), .clear(0), - .set_stb(set_stb), .set_addr(set_addr), .set_data(set_data), - .data_o(data_o), .dst_rdy_i(dst_rdy), .src_rdy_o(src_rdy), - .sample_fifo_i(sample_data_o), .sample_fifo_dst_rdy_o(sample_dst_rdy), .sample_fifo_src_rdy_i(sample_src_rdy), - .fifo_occupied(), .fifo_full(), .fifo_empty() ); - - rx_dsp_model rx_dsp_model - (.clk(clk), .reset(reset), .run(run), .decim(DECIM), .strobe(strobe), .sample(sample[31:0])); - - generate - if(MAXCHAN>1) - assign sample[(MAXCHAN*32)-1:32] = 0; - endgenerate - - time_64bit #(.TICKS_PER_SEC(120000000), .BASE(0)) time_64bit - (.clk(clk), .rst(reset), - .set_stb(set_stb), .set_addr(set_addr), .set_data(set_data), - .pps(0), .vita_time(vita_time)); - - always @(posedge clk) - if(src_rdy & dst_rdy) - begin - if(data_o[32] & ~data_o[33]) - begin - $display("RX-PKT-START %d",$time); - $display(" RX-PKT-DAT %x",data_o[31:0]); - end - else if(data_o[32] & data_o[33]) - begin - $display(" RX-PKT-DAT %x -- With ERR",data_o[31:0]); - $display("RX-PKT-ERR %d",$time); - end - else if(~data_o[32] & data_o[33]) - begin - $display(" RX-PKT-DAT %x",data_o[31:0]); - $display("RX-PKT-END %d",$time); - end - else - $display(" RX-PKT DAT %x",data_o[31:0]); - end - - initial - begin - @(negedge reset); - @(posedge clk); - write_setting(4,32'h15F00000); // VITA header - write_setting(5,32'hF00D1234); // VITA streamid - write_setting(6,32'hE0000000); // VITA trailer - write_setting(7,8); // Samples per VITA packet - write_setting(8,NUMCHAN); // Vector length - - queue_rx_cmd(1,1,0,10,32'h0,32'h0); // send imm, single packet - #10000; - - queue_rx_cmd(1,0,0,0,32'h0,32'h0); // send imm, single packet - //queue_rx_cmd(1,1,0,0,32'h0,32'h0); // send imm, single packet - - //queue_rx_cmd(1,0,0,0,32'h0,32'h0); // send imm, single packet - - /* - queue_rx_cmd(1,0,0,8,32'h0,32'h0); // send imm, single packet - queue_rx_cmd(1,0,0,16,32'h0,32'h0); // send imm, 2 packets worth - queue_rx_cmd(1,0,0,7,32'h0,32'h0); // send imm, 1 short packet worth - queue_rx_cmd(1,0,0,9,32'h0,32'h0); // send imm, just longer than 1 packet - - queue_rx_cmd(1,1,0,16,32'h0,32'h0); // chained - queue_rx_cmd(0,0,0,8,32'h0,32'h0); // 2nd in chain - - queue_rx_cmd(1,1,0,17,32'h0,32'h0); // chained, odd length - queue_rx_cmd(0,0,0,9,32'h0,32'h0); // 2nd in chain, also odd length - - queue_rx_cmd(0,0,0,8,32'h0,32'h340); // send at, on time - queue_rx_cmd(0,0,0,8,32'h0,32'h100); // send at, but late - - #100000; - $display("\nChained, break chain\n"); - queue_rx_cmd(1,1,0,8,32'h0,32'h0); // chained, but break chain - #100000; - $display("\nSingle packet\n"); - queue_rx_cmd(1,0,0,8,32'h0,32'h0); // send imm, single packet - #100000; - $display("\nEnd chain with zero samples, shouldn't error\n"); - queue_rx_cmd(1,1,0,8,32'h0,32'h0); // chained - queue_rx_cmd(0,0,0,0,32'h0,32'h0); // end chain with zero samples, should keep us out of error - #100000; - - $display("\nEnd chain with zero samples on odd-length, shouldn't error\n"); - queue_rx_cmd(1,1,0,14,32'h0,32'h0); // chained - queue_rx_cmd(0,0,0,0,32'h0,32'h0); // end chain with zero samples, should keep us out of error - #100000; - $display("Should have gotten 14 samples and EOF by now\n"); - - queue_rx_cmd(1,1,0,9,32'h0,32'h0); // chained, but break chain, odd length - #100000; - dst_rdy <= 0; // stop pulling out of fifo so we can get an overrun - queue_rx_cmd(1,0,0,100,32'h0,32'h0); // long enough to fill the fifos - queue_rx_cmd(1,0,0,5,32'h0,32'h0); // this command waits until the previous error packet is sent - #100000; - dst_rdy <= 1; // restart the reads so we can see what we got - #100000; - dst_rdy <= 0; // stop pulling out of fifo so we can get an overrun - queue_rx_cmd(1,1,0,100,32'h0,32'h0); // long enough to fill the fifos - //queue_rx_cmd(1,0,0,5,32'h0,32'h0); // this command waits until the previous error packet is sent - #100000; - @(posedge clk); - dst_rdy <= 1; - */ - #100000 $finish; - end - - task write_setting; - input [7:0] addr; - input [31:0] data; - begin - set_stb <= 0; - @(posedge clk); - set_addr <= addr; - set_data <= data; - set_stb <= 1; - @(posedge clk); - set_stb <= 0; - end - endtask // write_setting - - task queue_rx_cmd; - input send_imm; - input chain; - input reload; - input [28:0] lines; - input [31:0] secs; - input [31:0] tics; - begin - write_setting(0,{send_imm,chain,reload,lines}); - write_setting(1,secs); - write_setting(2,tics); - end - endtask // queue_rx_cmd - -endmodule // rx_control_tb - -module rx_dsp_model - (input clk, input reset, - input run, - input [7:0] decim, - output strobe, - output [31:0] sample); - - reg [15:0] pktnum = 0; - reg [15:0] counter = 0; - - reg run_d1; - always @(posedge clk) run_d1 <= run; - - always @(posedge clk) - if(run & ~run_d1) - begin - counter <= 0; - pktnum <= pktnum + 1; - end - else if(run & strobe) - counter <= counter + 1; - - assign sample = {pktnum,counter}; - - reg [7:0] stb_ctr = 0; - - always @(posedge clk) - if(reset) - stb_ctr <= 0; - else if(run & ~run_d1) - stb_ctr <= 1; - else if(run) - if(stb_ctr == decim-1) - stb_ctr <= 0; - else - stb_ctr <= stb_ctr + 1; - - assign strobe = stb_ctr == decim-1; - -endmodule // rx_dsp_model |