more testbench code

This commit is contained in:
Markus Fröschle
2014-06-15 06:05:23 +00:00
parent 55889b9e7b
commit 90bc4c409e
2 changed files with 90 additions and 89 deletions

View File

@@ -47,47 +47,47 @@ use ieee.std_logic_1164.all;
use ieee.numeric_std.all; use ieee.numeric_std.all;
entity DDR_CTRL_V1 is entity DDR_CTRL_V1 is
port( port(
CLK_MAIN : in std_logic; CLK_MAIN : in std_logic;
DDR_SYNC_66M : in std_logic; DDR_SYNC_66M : in std_logic;
FB_ADR : in std_logic_vector(31 downto 0); FB_ADR : in std_logic_vector(31 downto 0);
FB_CS1n : in std_logic; FB_CS1n : in std_logic;
FB_OEn : in std_logic; FB_OEn : in std_logic;
FB_SIZE0 : in std_logic; FB_SIZE0 : in std_logic;
FB_SIZE1 : in std_logic; FB_SIZE1 : in std_logic;
FB_ALE : in std_logic; FB_ALE : in std_logic;
FB_WRn : in std_logic; FB_WRn : in std_logic;
FIFO_CLR : in std_logic; FIFO_CLR : in std_logic;
VIDEO_RAM_CTR : in std_logic_vector(15 downto 0); VIDEO_RAM_CTR : in std_logic_vector(15 downto 0);
BLITTER_ADR : in std_logic_vector(31 downto 0); BLITTER_ADR : in std_logic_vector(31 downto 0);
BLITTER_SIG : in std_logic; BLITTER_SIG : in std_logic;
BLITTER_WR : in std_logic; BLITTER_WR : in std_logic;
DDRCLK0 : in std_logic; DDRCLK0 : in std_logic;
CLK_33M : in std_logic; CLK_33M : in std_logic;
FIFO_MW : in std_logic_vector(8 downto 0); FIFO_MW : in std_logic_vector(8 downto 0);
VA : out std_logic_vector(12 downto 0); VA : out std_logic_vector(12 downto 0);
VWEn : out std_logic; VWEn : out std_logic;
VRASn : out std_logic; VRASn : out std_logic;
VCSn : out std_logic; VCSn : out std_logic;
VCKE : out std_logic; VCKE : out std_logic;
VCASn : out std_logic; VCASn : out std_logic;
FB_LE : out std_logic_vector(3 downto 0); FB_LE : out std_logic_vector(3 downto 0);
FB_VDOE : out std_logic_vector(3 downto 0); FB_VDOE : out std_logic_vector(3 downto 0);
SR_FIFO_WRE : out std_logic; SR_FIFO_WRE : out std_logic;
SR_DDR_FB : out std_logic; SR_DDR_FB : out std_logic;
SR_DDR_WR : out std_logic; SR_DDR_WR : out std_logic;
SR_DDRWR_D_SEL : out std_logic; SR_DDRWR_D_SEL : out std_logic;
SR_VDMP : out std_logic_vector(7 downto 0); SR_VDMP : out std_logic_vector(7 downto 0);
VIDEO_DDR_TA : out std_logic; VIDEO_DDR_TA : out std_logic;
SR_BLITTER_DACK : out std_logic; SR_BLITTER_DACK : out std_logic;
BA : out std_logic_vector(1 downto 0); BA : out std_logic_vector(1 downto 0);
DDRWR_D_SEL1 : out std_logic; DDRWR_D_SEL1 : out std_logic;
VDM_SEL : out std_logic_vector(3 downto 0); VDM_SEL : out std_logic_vector(3 downto 0);
DATA_IN : in std_logic_vector(31 downto 0); DATA_IN : in std_logic_vector(31 downto 0);
DATA_OUT : out std_logic_vector(31 downto 16); DATA_OUT : out std_logic_vector(31 downto 16);
DATA_EN_H : out std_logic; DATA_EN_H : out std_logic;
DATA_EN_L : out std_logic DATA_EN_L : out std_logic
); );
end entity DDR_CTRL_V1; end entity DDR_CTRL_V1;
architecture BEHAVIOUR of DDR_CTRL_V1 is architecture BEHAVIOUR of DDR_CTRL_V1 is
@@ -96,16 +96,16 @@ architecture BEHAVIOUR of DDR_CTRL_V1 is
constant FIFO_MWM : std_logic_vector(8 downto 0) := "011001000"; -- 200. constant FIFO_MWM : std_logic_vector(8 downto 0) := "011001000"; -- 200.
constant FIFO_HWM : std_logic_vector(8 downto 0) := "111110100"; -- 500. constant FIFO_HWM : std_logic_vector(8 downto 0) := "111110100"; -- 500.
type ACCESS_WIDTH_TYPE is(LONG, WORD, BYTE); type ACCESS_WIDTH_TYPE is (LONG, WORD, BYTE);
type DDR_ACCESS_TYPE is(CPU, FIFO, BLITTER, NONE); type DDR_ACCESS_TYPE is (CPU, FIFO, BLITTER, NONE);
type FB_REGDDR_TYPE is(FR_WAIT,FR_S0,FR_S1,FR_S2,FR_S3); type FB_REGDDR_TYPE is (FR_WAIT, FR_S0, FR_S1, FR_S2, FR_S3);
type DDR_SM_TYPE is(DS_T1, DS_T2A, DS_T2B, DS_T3, DS_N5, DS_N6, DS_N7, DS_N8, -- Start (normal 8 cycles total = 60ns). type DDR_SM_TYPE is (DS_T1, DS_T2A, DS_T2B, DS_T3, DS_N5, DS_N6, DS_N7, DS_N8, -- Start (normal 8 cycles total = 60ns).
DS_C2, DS_C3, DS_C4, DS_C5, DS_C6, DS_C7, -- Configuration. DS_C2, DS_C3, DS_C4, DS_C5, DS_C6, DS_C7, -- Configuration.
DS_T4R, DS_T5R, -- Read CPU or BLITTER. DS_T4R, DS_T5R, -- Read CPU or BLITTER.
DS_T4W, DS_T5W, DS_T6W, DS_T7W, DS_T8W, DS_T9W, -- Write CPU or BLITTER. DS_T4W, DS_T5W, DS_T6W, DS_T7W, DS_T8W, DS_T9W, -- Write CPU or BLITTER.
DS_T4F, DS_T5F, DS_T6F, DS_T7F, DS_T8F, DS_T9F, DS_T10F, -- Read FIFO. DS_T4F, DS_T5F, DS_T6F, DS_T7F, DS_T8F, DS_T9F, DS_T10F, -- Read FIFO.
DS_CB6, DS_CB8, -- Close FIFO bank. DS_CB6, DS_CB8, -- Close FIFO bank.
DS_R2, DS_R3, DS_R4, DS_R5, DS_R6); -- Refresh: 10 x 7.5ns = 75ns. DS_R2, DS_R3, DS_R4, DS_R5, DS_R6); -- Refresh: 10 x 7.5ns = 75ns.
signal ACCESS_WIDTH : ACCESS_WIDTH_TYPE; signal ACCESS_WIDTH : ACCESS_WIDTH_TYPE;
signal FB_REGDDR : FB_REGDDR_TYPE; signal FB_REGDDR : FB_REGDDR_TYPE;
@@ -178,33 +178,33 @@ begin
WORD when "00", WORD when "00",
BYTE when others; BYTE when others;
-- Byte selectors: -- Byte selectors:
BYTE_SEL(0) <= '1' when ACCESS_WIDTH = LONG or ACCESS_WIDTH = WORD else BYTE_SEL(0) <= '1' when ACCESS_WIDTH = LONG or ACCESS_WIDTH = WORD else
'1' when FB_ADR(1 downto 0) = "00" else '0'; -- Byte 0. '1' when FB_ADR(1 downto 0) = "00" else '0'; -- Byte 0.
BYTE_SEL(1) <= '1' when ACCESS_WIDTH = LONG or ACCESS_WIDTH = WORD else BYTE_SEL(1) <= '1' when ACCESS_WIDTH = LONG or ACCESS_WIDTH = WORD else
'1' when ACCESS_WIDTH = BYTE and FB_ADR(1) = '0' else -- High word. '1' when ACCESS_WIDTH = BYTE and FB_ADR(1) = '0' else -- High word.
'1' when FB_ADR(1 downto 0) = "01" else '0'; -- Byte 1. '1' when FB_ADR(1 downto 0) = "01" else '0'; -- Byte 1.
BYTE_SEL(2) <= '1' when ACCESS_WIDTH = LONG or ACCESS_WIDTH = WORD else BYTE_SEL(2) <= '1' when ACCESS_WIDTH = LONG or ACCESS_WIDTH = WORD else
'1' when FB_ADR(1 downto 0) = "10" else '0'; -- Byte 2. '1' when FB_ADR(1 downto 0) = "10" else '0'; -- Byte 2.
BYTE_SEL(3) <= '1' when ACCESS_WIDTH = LONG or ACCESS_WIDTH = WORD else BYTE_SEL(3) <= '1' when ACCESS_WIDTH = LONG or ACCESS_WIDTH = WORD else
'1' when ACCESS_WIDTH = BYTE and FB_ADR(1) = '1' else -- Low word. '1' when ACCESS_WIDTH = BYTE and FB_ADR(1) = '1' else -- Low word.
'1' when FB_ADR(1 downto 0) = "11" else '0'; -- Byte 3. '1' when FB_ADR(1 downto 0) = "11" else '0'; -- Byte 3.
--------------------------------------------------------------------------------------------------------------------------------------------------------------- ---------------------------------------------------------------------------------------------------------------------------------------------------------------
------------------------------------ CPU READ (REG DDR => CPU) AND WRITE (CPU => REG DDR) --------------------------------------------------------------------- ------------------------------------ CPU READ (REG DDR => CPU) AND WRITE (CPU => REG DDR) ---------------------------------------------------------------------
FBCTRL_REG: process FBCTRL_REG: process
begin begin
wait until CLK_MAIN = '1' and CLK_MAIN' event; wait until CLK_MAIN = '1' and CLK_MAIN' event;
FB_REGDDR <= FB_REGDDR_NEXT; FB_REGDDR <= FB_REGDDR_NEXT;
end process FBCTRL_REG; end process FBCTRL_REG;
FBCTRL_DEC: process(FB_REGDDR, BUS_CYC, DDR_SEL, ACCESS_WIDTH, FB_WRn, DDR_CS) FBCTRL_DEC: process(FB_REGDDR, BUS_CYC, DDR_SEL, ACCESS_WIDTH, FB_WRn, DDR_CS)
begin begin
case FB_REGDDR is case FB_REGDDR is
when FR_WAIT => when FR_WAIT =>
if BUS_CYC = '1' then if BUS_CYC = '1' then
FB_REGDDR_NEXT <= FR_S0; FB_REGDDR_NEXT <= FR_S0;
elsif DDR_SEL = '1' and ACCESS_WIDTH = LONG and FB_WRn = '0' then elsif DDR_SEL = '1' and ACCESS_WIDTH = LONG and FB_WRn = '0' then

View File

@@ -11,25 +11,24 @@ entity ddr_ctlr_tb is
end ddr_ctlr_tb; end ddr_ctlr_tb;
architecture beh of ddr_ctlr_tb is architecture beh of ddr_ctlr_tb is
signal clock : std_logic := '0'; -- main clock signal clock : std_logic := '0'; -- main clock
signal clock_33 : std_logic := '0'; -- 33 MHz clock
signal ddr_clk : std_logic := '0'; -- ddr clock signal ddr_clk : std_logic := '0'; -- ddr clock
signal FB_ADR : std_logic_vector(31 downto 0); signal FB_ADR : std_logic_vector(31 downto 0);
signal DDR_SYNC_66M : std_logic := '0'; signal DDR_SYNC_66M : std_logic := '0';
signal FB_CS1n : std_logic; signal FB_CS1n : std_logic;
signal FB_OEn : std_logic; signal FB_OEn : std_logic := '1'; -- only write cycles for now
signal FB_SIZE0 : std_logic := '1'; signal FB_SIZE0 : std_logic := '1';
signal FB_SIZE1 : std_logic := '1'; -- long word access signal FB_SIZE1 : std_logic := '1'; -- long word access
signal FB_ALE : std_logic := 'Z'; -- defined reset state signal FB_ALE : std_logic := 'Z'; -- defined reset state
signal FB_WRn : std_logic; signal FB_WRn : std_logic;
signal FIFO_CLR : std_logic; signal FIFO_CLR : std_logic;
signal VIDEO_RAM_CTR : std_logic_vector(15 downto 0); signal VIDEO_RAM_CTR : std_logic_vector(15 downto 0);
signal BLITTER_ADR : std_logic_vector(31 downto 0); signal BLITTER_ADR : std_logic_vector(31 downto 0);
signal BLITTER_SIG : std_logic; signal BLITTER_SIG : std_logic;
signal BLITTER_WR : std_logic; signal BLITTER_WR : std_logic;
signal DDRCLK0 : std_logic; signal DDRCLK0 : std_logic;
signal CLK_33M : std_logic; signal CLK_33M : std_logic := '0';
signal FIFO_MW : std_logic_vector(8 downto 0); signal FIFO_MW : std_logic_vector(8 downto 0);
signal VA : std_logic_vector(12 downto 0); signal VA : std_logic_vector(12 downto 0);
signal VWEn : std_logic; signal VWEn : std_logic;
@@ -154,29 +153,28 @@ begin
stimulate_33mHz_clock : process stimulate_33mHz_clock : process
begin begin
wait for 30.3 ns; wait for 30.3 ns;
clock_33 <= not clock_33; CLK_33M <= not CLK_33M;
end process; end process;
stimulate_66MHz_clock : process stimulate_66MHz_clock : process
begin begin
wait for 66.6 ns; wait for 66.6 ns;
DDR_SYNC_66M <= not DDR_SYNC_66M; DDR_SYNC_66M <= not DDR_SYNC_66M;
DDRCLK0 <= DDR_SYNC_66M;
end process; end process;
stimulate : process stimulate : process
variable adr : std_logic_vector(31 downto 0) := x"00000000"; variable adr : std_logic_vector(31 downto 0) := x"00000000";
begin begin
wait until rising_edge(clock) and clock = '1'; wait until rising_edge(clock) and clock = '1';
case bus_state is case bus_state is
when S0 => when S0 =>
-- address phase -- address phase
report("State S0");
FB_ADR <= adr; FB_ADR <= adr;
FB_ALE <= '1'; FB_ALE <= '1';
FB_WRn <= '0'; FB_WRn <= '0';
bus_state <= S1; bus_state <= S1;
when S1 => when S1 =>
report("State S1");
-- data phase -- data phase
FB_ALE <= '0'; FB_ALE <= '0';
FB_CS1n <= '0'; FB_CS1n <= '0';
@@ -185,9 +183,12 @@ begin
bus_state <= S2; bus_state <= S2;
end if; end if;
when S2 => when S2 =>
report("State S2"); FB_CS1n <= '0';
bus_state <= S3;
when S3 => when S3 =>
report("State S3"); FB_ADR <= std_logic_vector(unsigned(FB_ADR) + 4);
bus_state <= S0;
FB_WRn <= 'Z';
when others => when others =>
report("bus_state: "); report("bus_state: ");
end case; end case;