Subversion Repositories rs_encoder_decoder

`timescale 1ns / 10 ps

module RS8Encoder_testbench;

  reg clk_i,rst_i;

  reg valid_i;

  reg  [7:0]  enc_data_i;

  wire [7:0] enc_data_o;

  wire parity_o;

  wire busy_o;

  reg [126*7:0]  path,input_file,output_file;

  integer   fd_in, fd_out;

  reg [8:0] wait_cntr;

RS8Encoder8t DUT(.clk_i(clk_i), .rst_i(rst_i),

  .encoder_i(enc_data_i),  // Input to the encoder

  .valid_i(valid_i),       // set this when input is set

  .encoder_o(enc_data_o),  // output of the encoder

  .parity_o(parity_o),     // Valid signal is set when the output is available on the output line

  .busy_o(busy_o)            // Busy Signal When busy signal is high during the encoding process Please dont 

  );                       // give input to the incoder

  // This is an input counter the purpose of this is to set the input to zero in the start 

  // of the encoding process

  always @(posedge clk_i) begin

    if(rst_i)

      wait_cntr <= 0;

    else

      wait_cntr <= wait_cntr + 1;

  end

always

#5 clk_i = !clk_i;

  initial begin

    path = "./";

    // These are the input files that can be used in the encoder

    // you can select any information bit generation 

    input_file = "input_file_RSEncodeData.dat";

    output_file = "output_file_RSVerilogEncodedData.dat";

    fd_in = $fopen(input_file,"r");

    fd_out = $fopen(output_file,"w");

    clk_i = 0;

    rst_i = 1;

    #10 rst_i = 0;

    enc_data_i = 0;

   while(1)

     begin

       @(posedge clk_i);

           if(wait_cntr < 4) begin

             valid_i = 0;

             enc_data_i = 0;

           end

           else if((wait_cntr >=4)&&(wait_cntr<=243)) begin // give the input to the encoder when the encoder is not busy

             valid_i = 1;

             $fscanf(fd_in,"%d\n",enc_data_i); // The input to the encoder should be given at continous clocks and atease 239 packets at a time

           end

           else if ((wait_cntr>243)&&(wait_cntr <= 259)) begin

             valid_i =1;

             enc_data_i =0;

           end

           else if (wait_cntr > 259)  begin

             valid_i =0;

             enc_data_i =0;

           end

           if(parity_o)

             $fwrite(fd_out,"%d \n",enc_data_o); // Write the output of the encoded data

     end

  end // initial begin

endmodule