Line 29... |
Line 29... |
|
|
use std.textio.all;
|
use std.textio.all;
|
use std.textio;
|
use std.textio;
|
|
|
entity stend_ac701_core is
|
entity stend_ac701_core is
|
|
generic(
|
|
test_id : in integer:=3; -- идентификатор теста
|
|
test_log : in string:="src\testbench\log\file_id_" -- имя файла отчёта
|
|
);
|
end stend_ac701_core;
|
end stend_ac701_core;
|
|
|
|
|
architecture stend_ac701_core of stend_ac701_core is
|
architecture stend_ac701_core of stend_ac701_core is
|
|
|
|
constant fname_test_log : string:= test_log & integer'image(test_id) & ".log";
|
|
|
|
|
signal clk250 : std_logic:='0';
|
signal clk250 : std_logic:='0';
|
signal clk250p : std_logic;
|
signal clk250p : std_logic;
|
signal clk250n : std_logic;
|
signal clk250n : std_logic;
|
|
|
Line 150... |
Line 156... |
|
|
variable data : std_logic_vector( 31 downto 0 );
|
variable data : std_logic_vector( 31 downto 0 );
|
variable str : LINE; -- pointer to string
|
variable str : LINE; -- pointer to string
|
begin
|
begin
|
|
|
test_init( "src\testbench\log\test.log" );
|
|
-- test_init( "test.log" );
|
test_init( fname_test_log );
|
|
|
wait for 250 us;
|
wait for 250 us;
|
|
|
|
|
--test_dsc_incorrect( cmd, ret );
|
--test_dsc_incorrect( cmd, ret );
|
|
|
--test_read_4kb( cmd, ret );
|
--test_read_4kb( cmd, ret );
|
--test_adm_read_8kb( cmd, ret );
|
--test_adm_read_8kb( cmd, ret );
|
--test_adm_read_16kb( cmd, ret );
|
--test_adm_read_16kb( cmd, ret );
|
--test_adm_write_16kb( cmd, ret );
|
--test_adm_write_16kb( cmd, ret );
|
test_block_main( cmd, ret );
|
--test_block_main( cmd, ret );
|
|
|
|
case( test_id ) is
|
|
when 0 => test_dsc_incorrect( cmd, ret );
|
|
when 1 => test_read_4kb( cmd, ret ); -- was original
|
|
when 2 => test_adm_read_8kb( cmd, ret );
|
|
when 3 => test_adm_read_16kb( cmd, ret );
|
|
when 4 => test_adm_write_16kb( cmd, ret );
|
|
when 5 => test_block_main( cmd, ret );
|
|
|
|
when others => null;
|
|
|
|
end case;
|
|
|
test_close;
|
test_close;
|
--
|
--
|
-- Print Final Banner
|
-- Print Final Banner
|
report "Init END OF TEST" severity WARNING;
|
report "Init END OF TEST" severity WARNING;
|