Skip to content

G
Gennum GN4124 core
Commit d34e800c authored by Tristan Gingold's avatar Tristan Gingold
Browse files
Options

gn412x_bfm: work arounds for issues in questa sim. 

Also fix some typos.
parent c5520d7a
Show whitespace changes
Inline Side-by-side
Showing with 206 additions and 200 deletions
hdl/sim/gn4124_bfm/gn412x_bfm.vhd
View file @ d34e800c
...@@ -2756,7 +2756,11 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA ...@@ -2756,7 +2756,11 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA
variable vTYPE : std_ulogic_vector(3 downto 0); variable vTYPE : std_ulogic_vector(3 downto 0);
variable START : time; variable START : time;
begin begin
wait until(L2P_CLKi_90'event and (L2P_CLKi_90 = '1') and (L2P_VALIDi = '1') and MODE_PRIMARY); if not MODE_PRIMARY then
wait;
end if;
wait until rising_edge(L2P_CLKi_90);
if L2P_VALIDi = '1' then
START := NOW; START := NOW;
if(L2P_DFRAMEi = '1') then if(L2P_DFRAMEi = '1') then
vHEADER(15 downto 0) := L2P_DATAi; vHEADER(15 downto 0) := L2P_DATAi;
...@@ -2780,8 +2784,8 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA ...@@ -2780,8 +2784,8 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA
vADDRESS(31 downto 16) := L2P_DATAi; vADDRESS(31 downto 16) := L2P_DATAi;
end if; end if;
-- write(OUTPUT_LINE, ("-->> L2P Packet: " & to_string(START))); -- write(OUTPUT_LINE, ("-->> L2P Packet: " & to_string(START)));
-- writeline(OUT_FILE, OUTPUT_LINE); -- writeline(OUT_FILE, OUTPUT_LINE);
write(OUTPUT_LINE, string'("-->>>> L2P Header: ")); write(OUTPUT_LINE, string'("-->>>> L2P Header: "));
case vTYPE is case vTYPE is
...@@ -2796,7 +2800,7 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA ...@@ -2796,7 +2800,7 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA
write_hex_vector(OUTPUT_LINE, vHEADER(11 downto 10)); write_hex_vector(OUTPUT_LINE, vHEADER(11 downto 10));
write(OUTPUT_LINE, string'(", LENGTH=0x")); write(OUTPUT_LINE, string'(", LENGTH=0x"));
write_hex_vector(OUTPUT_LINE, vHEADER(9 downto 0)); write_hex_vector(OUTPUT_LINE, vHEADER(9 downto 0));
-- writeline(OUT_FILE, OUTPUT_LINE); -- writeline(OUT_FILE, OUTPUT_LINE);
write(OUTPUT_LINE, string'("-->>>> Address: 0x")); write(OUTPUT_LINE, string'("-->>>> Address: 0x"));
write_hex_vector(OUTPUT_LINE, vADDRESS); write_hex_vector(OUTPUT_LINE, vADDRESS);
write(OUTPUT_LINE, string'(" @ ")); write(OUTPUT_LINE, string'(" @ "));
...@@ -2812,7 +2816,7 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA ...@@ -2812,7 +2816,7 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA
write(OUTPUT_LINE, string'(", V=" & to_str(vHEADER(12)))); write(OUTPUT_LINE, string'(", V=" & to_str(vHEADER(12))));
write(OUTPUT_LINE, string'(", LENGTH=0x")); write(OUTPUT_LINE, string'(", LENGTH=0x"));
write_hex_vector(OUTPUT_LINE, vHEADER(9 downto 0)); write_hex_vector(OUTPUT_LINE, vHEADER(9 downto 0));
-- writeline(OUT_FILE, OUTPUT_LINE); -- writeline(OUT_FILE, OUTPUT_LINE);
write(OUTPUT_LINE, string'("-->>>> Address: 0x")); write(OUTPUT_LINE, string'("-->>>> Address: 0x"));
write_hex_vector(OUTPUT_LINE, vADDRESS); write_hex_vector(OUTPUT_LINE, vADDRESS);
write(OUTPUT_LINE, string'(" @ ")); write(OUTPUT_LINE, string'(" @ "));
...@@ -2863,10 +2867,11 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA ...@@ -2863,10 +2867,11 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA
end if; end if;
else else
write(OUTPUT_LINE, string'("-- ERROR: L2P Bus: P2L_VALID asserted without P2L_DFRAME @")); write(OUTPUT_LINE, string'("-- ERROR: L2P Bus: L2P_VALID asserted without P2L_DFRAME @"));
write(OUTPUT_LINE, START); write(OUTPUT_LINE, START);
writeline(OUT_FILE, OUTPUT_LINE); writeline(OUT_FILE, OUTPUT_LINE);
end if; end if;
end if;
end process; end process;
--#########################################################################-- --#########################################################################--
...@@ -2882,7 +2887,11 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA ...@@ -2882,7 +2887,11 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA
variable vTYPE : std_ulogic_vector(3 downto 0); variable vTYPE : std_ulogic_vector(3 downto 0);
variable START : time; variable START : time;
begin begin
wait until(P2L_CLKpi'event and (P2L_CLKpi = '1') and (P2L_VALIDi = '1') and MODE_PRIMARY); if not MODE_PRIMARY then
wait;
end if;
wait until rising_edge(P2L_CLKpi);
if P2L_VALIDi = '1' then
START := NOW; START := NOW;
if(P2L_DFRAMEi = '1') then if(P2L_DFRAMEi = '1') then
vHEADER(15 downto 0) := P2L_DATAi; vHEADER(15 downto 0) := P2L_DATAi;
...@@ -2988,9 +2997,6 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA ...@@ -2988,9 +2997,6 @@ CMD_RD_DATA <= CMD_RD_DATA_OUT when CMD_RD_DATA_OUT_VALID = '1' else CMD_RD_DATA
write(OUTPUT_LINE, START); write(OUTPUT_LINE, START);
writeline(OUT_FILE, OUTPUT_LINE); writeline(OUT_FILE, OUTPUT_LINE);
end if; end if;
end if;
end process; end process;
end MODEL; end MODEL;
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment