should split and reframe packets properly

1 files changed, 36 insertions, 10 deletions

diff --git a/usrp2/gpif/gpif_tb.v b/usrp2/gpif/gpif_tb.v
index 1cb84e9fb..a71796d86 100644
--- a/usrp2/gpif/gpif_tb.v
+++ b/usrp2/gpif/gpif_tb.v
@@ -12,12 +12,11 @@ module gpif_tb();
    wire       CF, DF;
    
    wire       gpif_full_d, gpif_full_c;
-   wire [18:0] data_o, ctrl_o;
-   wire        src_rdy, dst_rdy;
+   wire [18:0] data_o, ctrl_o, data_splt;
+   wire        src_rdy, dst_rdy, src_rdy_splt, dst_rdy_splt;
    wire        ctrl_src_rdy, ctrl_dst_rdy;
 
    assign ctrl_dst_rdy = 1;
-   assign dst_rdy = 1;
    
    initial $dumpfile("gpif_tb.vcd");
    initial $dumpvars(0,gpif_tb);
@@ -29,6 +28,8 @@ module gpif_tb();
 
    wire [18:0] data_int;
    wire        src_rdy_int, dst_rdy_int;
+
+   assign dst_rdy_splt = 1;
    
    gpif_wr gpif_write
      (.gpif_clk(gpif_clk), .gpif_rst(gpif_rst), 
@@ -47,19 +48,19 @@ module gpif_tb();
    packet_splitter #(.FRAME_LEN(256)) rx_packet_splitter
      (.clk(sys_clk), .reset(sys_rst), .clear(0),
       .data_i(data_o), .src_rdy_i(src_rdy), .dst_rdy_o(dst_rdy),
-      .data_o(data_o), .src_rdy_o(src_rdy), .dst_rdy_i(dst_rdy));
+      .data_o(data_splt), .src_rdy_o(src_rdy_splt), .dst_rdy_i(dst_rdy_splt));
 
    always @(posedge sys_clk)
      if(ctrl_src_rdy & ctrl_dst_rdy)
        $display("CTRL: %x",ctrl_o);
 
    always @(posedge sys_clk)
-     if(src_rdy & dst_rdy)
+     if(src_rdy_splt & dst_rdy_splt)
        begin
-	  if(data_o[16])
+	  if(data_splt[16])
 	    $display("<-------- DATA SOF--------->");
-	  $display("DATA: %x",data_o);
-	  if(data_o[17])
+	  $display("DATA: %x",data_splt);
+	  if(data_splt[17])
 	    $display("<-------- DATA EOF--------->");
        end
    
@@ -68,8 +69,10 @@ module gpif_tb();
 	#10000;
 	repeat (1)
 	  begin
+	     @(posedge gpif_clk);
+	     
 	     WR <= 1;
-	     gpif_data <= 10;  // Length
+	     gpif_data <= 256;  // Length
 	     @(posedge gpif_clk);
 	     gpif_data <= 16'h00;
 	     @(posedge gpif_clk);
@@ -79,20 +82,43 @@ module gpif_tb();
 		  @(posedge gpif_clk);
 	       end
 	     WR <= 0;
+
+	     while(DF)
+	       @(posedge gpif_clk);
+	     repeat (16)
+	       @(posedge gpif_clk);
+	     
+	     WR <= 1;
+	     repeat(256)
+	       begin
+		  gpif_data <= gpif_data - 1;
+		  @(posedge gpif_clk);
+	       end
+	     WR <= 0;
+
+
+/*
+	     while(DF)
+	       @(posedge gpif_clk);
+	     	     
 	     repeat (20)
 	       @(posedge gpif_clk);
 	     WR <= 1;
 	     gpif_data <= 16'h5;
 	     @(posedge gpif_clk);
+	     gpif_data <= 16'h00;
+	     @(posedge gpif_clk);
 	     repeat(254)
 	       begin
 		  gpif_data <= gpif_data - 1;
 		  @(posedge gpif_clk);
 	       end
+	     WR <= 0;
+ */
 	  end
      end // initial begin
    
-   initial #100000 $finish;
+   initial #200000 $finish;
    
      
 endmodule // gpif_tb