Subversion Repositories core1990_interlaken

library ieee;
use ieee.std_logic_1164.all;
 
entity testbench_descrambler is
end entity testbench_descrambler;
 
architecture tb_descrambler of testbench_descrambler is
 
    signal Clk          : std_logic;                     -- Clock input
	signal Reset		: std_logic;					 -- Reset decoder
	signal Data_In      : std_logic_vector(63 downto 0); -- Data input
	signal Data_Out     : std_logic_vector(63 downto 0); -- Decoded 64-bit output
	signal Data_Control_In : std_logic;                    --	Indicates whether the word is data or control
	signal Data_Control_Out : std_logic;                    --	Indicates whether the word is data or control
	signal Lane_Number     : std_logic_vector (3 downto 0); 
	signal Error_BadSync  		: std_logic;
	signal Error_StateMismatch	: std_logic;
	signal Error_NoSync			: std_logic;
	signal Data_Valid_Out  : std_logic;
 
 
 constant CLK_PERIOD : time := 10 ns;
 
begin
  uut : entity work.Descrambler 
  port map (
    clk => clk,
    reset => reset,
 
    Data_in => Data_in,
    Data_out => Data_out,
    Data_control_In => Data_control_In,
    Data_control_Out => Data_control_Out,
    Data_valid_out => Data_valid_out,
 
    Lane_Number => Lane_Number,
 
    Error_BadSync => Error_BadSync,
    Error_StateMismatch => Error_StateMismatch,
	Error_NoSync => Error_NoSync
  );
 
	Clk_process :process
	begin
		clk <= '1';
		wait for CLK_PERIOD/2;  --for half of clock period clk stays at '0'.
		clk <= '0';
		wait for CLK_PERIOD/2;  --for next half of clock period clk stays at '1'.
	end process;
 
    simulation : process
    begin
        wait for 1 ps;
        Data_Control_In <= '0';
        reset <= '1';
        Lane_Number <= "0001";
        data_in <= (others=>'0');
 
        wait for CLK_PERIOD;
 
        wait for CLK_PERIOD;
 
        reset <= '0';
        Data_in <= X"1f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
        Data_Control_In <= '1';
        Data_in <= X"78f6_78f6_78f6_78f6"; --1
        wait for CLK_PERIOD;
 
        Data_Control_In <= '0';
        data_in <= X"3f5e5d5c5b5a5958";
        wait for CLK_PERIOD*23;
 
        Data_Control_In <= '1';
        Data_in <= X"78f6_78f6_78f6_78f6";--2
        wait for CLK_PERIOD;
 
        Data_Control_In <= '0';
        data_in <= X"5f5e5a5c5b60f2a0";      
        wait for CLK_PERIOD*23;
 
        Data_Control_In <= '1';
        data_in  <= X"78f6_78f6_78f6_78f6";--3
        wait for CLK_PERIOD;
 
        Data_Control_In <= '0';
        data_in  <= X"70000FFF000000F0";
        wait for CLK_PERIOD*23;
 
        Data_Control_In <= '1';
        data_in  <= X"78f6_78f6_78f6_78f6";--4 -> lock
        wait for CLK_PERIOD;
 
        data_in  <= X"5f5e5a5c5b60f2a0";
        wait for CLK_PERIOD;
 
        data_in  <= X"2f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
        Data_Control_In <= '0';
        data_in  <= X"70000FFF000000F0";
        wait for CLK_PERIOD*21;
 
        Data_Control_In <= '1';
        data_in  <= X"78f6_78f6_78f6_78f6"; --Sync & 
        wait for CLK_PERIOD;
 
        Data_In  <= X"2Bfe_d100_19e0_1dbd";
        wait for CLK_PERIOD;
 
        Data_Control_In <= '0';
        data_in  <= X"70000FFF000000F0";
        wait for CLK_PERIOD*2;
 
        Data_Control_In <= '1';
        Data_in <= X"2f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
        Data_Control_In <= '0';
        data_in  <= X"9486576758050505";
        wait for CLK_PERIOD*19; 
 
        wait for CLK_PERIOD;
 
 
        data_in  <= X"8050505050050505";
        wait for CLK_PERIOD*3;                          
 
        data_in  <= X"9486576758050505";
        wait for CLK_PERIOD; 
 
 
        data_in <= X"60b35d5dc4a582a7";
        wait for CLK_PERIOD;
 
 
        data_in <= X"2f5e5d5c5b5a5958";
        wait for CLK_PERIOD*12;
 
        data_in <= X"2f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
        Data_in <= X"1f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
 
        Data_in <= X"2f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
 
        data_in <= X"3f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
 
        Data_in <= X"4f21a2a3a4a5a6a7";
        wait for CLK_PERIOD;
 
 
        data_in <= X"5f5e5a5c5b60f2a0";      
        wait for CLK_PERIOD;
 
        data_in <= X"635e22a3a4a5a7a7";
        wait for CLK_PERIOD;
 
        data_in <= X"5f5e5a5c5b60f2a0";      
        wait for CLK_PERIOD;
 
        data_in <= X"635e22a3a4a5a7a7";
        wait for CLK_PERIOD;
 
        data_in <= X"70000FFF000000F0";
        wait for CLK_PERIOD*2;
 
 
        Data_in <= X"2f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
        data_in  <= X"8050505050050505";
        wait for CLK_PERIOD*3;                          
 
        data_in  <= X"9486576758050505";
        wait for CLK_PERIOD; 
 
        data_in <= X"60b35d5dc4a582a7";
        wait for CLK_PERIOD*60;
 
        data_in  <= X"8050505050050505";
        wait for CLK_PERIOD*3;                          
 
        data_in  <= X"9486576758050505";
        wait for CLK_PERIOD; 
 
 
        data_in <= X"60b35d5dc4a582a7";
        wait for CLK_PERIOD;
 
 
        data_in <= X"2f5e5d5c5b5a5958";
        wait for CLK_PERIOD*12;
 
        data_in <= X"2c8e5d5c5b5a5958";
        wait for CLK_PERIOD;
 
        Data_in <= X"1f5e5d5c5b5a5958";
        wait for CLK_PERIOD*26;
 
        data_in <= X"2c8e5d5c5b5a5958";
        wait for CLK_PERIOD*18;
 
        data_in <= X"1f5e5d5c5b5a5958";
        wait for CLK_PERIOD;
        wait;
    end process;
 
end architecture tb_descrambler;