AEK_8220_Libraries/firmware_vhdl_psi_multi_stream_daq
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

DEVEL: Testcase for memory command full

Browse Source
This commit is contained in:
Oliver Bruendler
2018-08-31 07:36:13 +02:00
parent 8eede7e216
commit 0813b9c0da
1 changed files with 30 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

34
tb/psi_ms_daq_daq_dma/psi_ms_daq_daq_dma_tb_case_cmd_full.vhd
View File

@ -72,7 +72,18 @@ package body psi_ms_daq_daq_dma_tb_case_cmd_full is
signal DaqSm_Resp_Rdy : inout std_logic;
constant Generics_c : Generics_t) is
begin
assert false report "Case CMD_FULL Procedure CONTROL: No Content added yet!" severity warning;
InitCase(Clk, Rst);
print(">> -- Memory CMD full --");
-- Command not ready
wait for 1 us;
print(">> Command not ready");
InitCase(Clk, Rst);
InitSubCase(0);
ApplyCmd(2, 16#01230000#, 30, DaqSm_Cmd, DaqSm_Cmd_Vld, Clk);
CheckResp(2, 30, NoEnd_s, DaqSm_Resp, DaqSm_Resp_Vld, DaqSm_Resp_Rdy, Clk);
ApplyCmd(2, 16#01231000#, 30, DaqSm_Cmd, DaqSm_Cmd_Vld, Clk);
CheckResp(2, 30, NoEnd_s, DaqSm_Resp, DaqSm_Resp_Vld, DaqSm_Resp_Rdy, Clk);
end procedure;
procedure input (
@ -82,7 +93,11 @@ package body psi_ms_daq_daq_dma_tb_case_cmd_full is
signal Inp_Data : inout Input2Daq_Data_a;
constant Generics_c : Generics_t) is
begin
assert false report "Case CMD_FULL Procedure INPUT: No Content added yet!" severity warning;
-- Command not ready
WaitForCase(0, Clk);
ApplyData(2, 30, NoEnd_s, Inp_Vld, Inp_Rdy, Inp_Data, Clk);
ApplyData(2, 30, NoEnd_s, Inp_Vld, Inp_Rdy, Inp_Data, Clk, 30);
ProcDone_V(0) := '1';
end procedure;
procedure mem_cmd (
@ -93,7 +108,14 @@ package body psi_ms_daq_daq_dma_tb_case_cmd_full is
signal Mem_CmdRdy : inout std_logic;
constant Generics_c : Generics_t) is
begin
assert false report "Case CMD_FULL Procedure MEM_CMD: No Content added yet!" severity warning;
-- Command not ready
WaitForCase(0, Clk);
Mem_CmdRdy <= '0';
wait until rising_edge(Clk) and Mem_CmdVld = '1';
CheckNoActivity(Mem_CmdVld, 2 us, 1, "Mem_CmdVld went high");
CheckMemCmd( 16#01230000#, 30, 0, Mem_CmdAddr, Mem_CmdSize, Mem_CmdVld, Mem_CmdRdy, Clk);
CheckMemCmd( 16#01231000#, 30, 0, Mem_CmdAddr, Mem_CmdSize, Mem_CmdVld, Mem_CmdRdy, Clk);
ProcDone_V(1) := '1';
end procedure;
procedure mem_dat (
@ -103,7 +125,11 @@ package body psi_ms_daq_daq_dma_tb_case_cmd_full is
signal Mem_DatRdy : inout std_logic;
constant Generics_c : Generics_t) is
begin
assert false report "Case CMD_FULL Procedure MEM_DAT: No Content added yet!" severity warning;
-- Command not ready
WaitForCase(0, Clk);
CheckMemData(30, 0, Mem_DatData, Mem_DatVld, Mem_DatRdy, Clk, 0, "1.0");
CheckMemData(30, 0, Mem_DatData, Mem_DatVld, Mem_DatRdy, Clk, 30, "1.1");
ProcDone_V(2) := '1';
end procedure;
end;