Subversion Repositories nysa_sata

module test_out (
  input               clk,
  input               rst,
 
  input               enable,
  output  reg         busy,
  output  reg         error,
 
  input               ready,
  output  reg         activate,
  input       [23:0]  size,
  input       [31:0]  data,
  output  reg         strobe,
  output  reg [23:0]  total_count
 
);
 
reg           [31:0]  test_value;
reg           [23:0]  count;
 
always @ (posedge clk) begin
  if (rst) begin
    activate          <=  0;
    count             <=  0;
    test_value        <=  32'h0;
    error             <=  0;
    busy              <=  0;
    total_count       <=  0;
    strobe            <=  0;
  end
  else begin
    busy              <=  0;
    strobe            <=  0;
    //The user is not asking to check anything
    if (!enable) begin
      //activate        <=  0;
      //count           <=  0;
      test_value      <=  32'h0;
      error           <=  0;
      total_count     <=  0;
    end
 
    //Looking for total count
    //busy            <=  1;
    if (ready && !activate) begin
      count         <=  0;
      activate      <=  1;
    end
    else if (activate) begin
      busy            <= 1;
      if (count < size) begin
        strobe      <=  1;
        total_count <=  total_count + 1;
        count       <=  count + 1;
        if ((data != test_value) && enable) begin
          error     <=  1;
        end
      end
      else begin
        activate  <=  0;
      end
    end
    if (strobe) begin
      test_value  <= test_value + 1;
    end
  end
end
 
endmodule