|  |  | @ -32,7 +32,7 @@ architecture rtl of tb_cbctdes is | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  | type t_array is array (natural range <>) of std_logic_vector(0 to 63); | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  | constant c_table_test_plain : t_array(0 to 18) := | 
			
		
	
		
			
				
					|  |  |  | (x"01A1D6D039776742", x"5CD54CA83DEF57DA", x"0248D43806F67172", | 
			
		
	
		
			
				
					|  |  |  | x"51454B582DDF440A", x"42FD443059577FA2", x"059B5E0851CF143A", | 
			
		
	
	
		
			
				
					|  |  | @ -83,7 +83,7 @@ begin | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  | s_reset <= '1' after 100 ns; | 
			
		
	
		
			
				
					|  |  |  | s_clk   <= not(s_clk) after 10 ns; | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  | teststimuliP : process is | 
			
		
	
		
			
				
					|  |  |  | begin | 
			
		
	
	
		
			
				
					|  |  | @ -95,6 +95,7 @@ begin | 
			
		
	
		
			
				
					|  |  |  | s_key2    <= (others => '0'); | 
			
		
	
		
			
				
					|  |  |  | s_key3    <= (others => '0'); | 
			
		
	
		
			
				
					|  |  |  | s_datain  <= (others => '0'); | 
			
		
	
		
			
				
					|  |  |  | wait until s_reset = '1'; | 
			
		
	
		
			
				
					|  |  |  | -- ENCRYPTION TESTS | 
			
		
	
		
			
				
					|  |  |  | -- cbc known answers test | 
			
		
	
		
			
				
					|  |  |  | for index in c_table_test_plain'range loop | 
			
		
	
	
		
			
				
					|  |  | @ -148,8 +149,8 @@ begin | 
			
		
	
		
			
				
					|  |  |  | s_datain  <= (others => '0'); | 
			
		
	
		
			
				
					|  |  |  | wait; | 
			
		
	
		
			
				
					|  |  |  | end process teststimuliP; | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  | testcheckerP : process is | 
			
		
	
		
			
				
					|  |  |  | begin | 
			
		
	
		
			
				
					|  |  |  | report "# ENCRYPTION TESTS"; | 
			
		
	
	
		
			
				
					|  |  | @ -181,10 +182,10 @@ begin | 
			
		
	
		
			
				
					|  |  |  | key2_i   => s_key2, | 
			
		
	
		
			
				
					|  |  |  | key3_i   => s_key3, | 
			
		
	
		
			
				
					|  |  |  | data_i   => s_datain, | 
			
		
	
		
			
				
					|  |  |  | valid_i  => s_validin, | 
			
		
	
		
			
				
					|  |  |  | valid_i  => s_validin, | 
			
		
	
		
			
				
					|  |  |  | data_o   => s_dataout, | 
			
		
	
		
			
				
					|  |  |  | valid_o  => s_validout, | 
			
		
	
		
			
				
					|  |  |  | ready_o  => s_ready | 
			
		
	
		
			
				
					|  |  |  | ready_o  => s_ready | 
			
		
	
		
			
				
					|  |  |  | ); | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
		
			
				
					|  |  |  |  | 
			
		
	
	
		
			
				
					|  |  | 
 |