-separate write FIFO

Committed on the Free edition of March Hare Software CVSNT Server.
Upgrade to CVS Suite for more features and support:
http://march-hare.com/cvsnt/


git-svn-id: http://moon:8086/svn/vhdl/trunk@970 cc03376c-175c-47c8-b038-4cd826a8556b
This commit is contained in:
2013-05-27 11:16:30 +00:00
parent 9f939c1e85
commit daf5a55788
4 changed files with 180 additions and 146 deletions
+52 -45
View File
@@ -1,11 +1,12 @@
-----------------------------------------------------------------------
-- $Header: /tmp/cvsroot/VHDL/lib/JBUS/src/tb_busmaster_sync.vhd,v 1.1 2013-05-25 16:55:29 jens Exp $
-- $Header: /tmp/cvsroot/VHDL/lib/JBUS/src/tb_busmaster_sync.vhd,v 1.2 2013-05-27 11:16:22 jens Exp $
-----------------------------------------------------------------------
LIBRARY ieee;
use IEEE.STD_LOGIC_1164.ALL;
USE ieee.numeric_std.ALL;
use work.busmaster_types.all;
ENTITY tb_busmaster_sync IS
END tb_busmaster_sync;
@@ -27,23 +28,26 @@ ARCHITECTURE behavior OF tb_busmaster_sync IS
signal MRDY_O : std_logic := '1';
signal SRDY_I : std_logic := '0';
signal ADDR_O : unsigned(31 downto 0) := (others => '-');
signal MDAT_I_32 : unsigned(31 downto 0) := (others => '-');
signal MDAT_O_32 : unsigned(31 downto 0) := (others => '-');
signal MDAT_I : unsigned(63 downto 0) := (others => '-');
signal MDAT_O : unsigned(63 downto 0) := (others => '-');
signal MDAT_I_64 : unsigned(63 downto 0) := (others => '-');
signal MDAT_O_64 : unsigned(63 downto 0) := (others => '-');
signal MDAT_I : unsigned(31 downto 0) := (others => '-');
signal MDAT_O : unsigned(31 downto 0) := (others => '-');
signal cmd_cycle_finished : std_logic;
signal cmd_cycle_en : std_logic := '0';
signal cmd_rdy : std_logic;
signal cmd_we : std_logic := '0';
signal cmd_din : unsigned(DATA_WIDTH-1 downto 0) := (others => '-');
signal cmd_addr : unsigned(31 downto 0) := (others => '-');
signal cmd_sel : unsigned(DATA_WIDTH/8-1 downto 0) := (others => '-');
signal cmd_rw : std_logic := '0';
signal cmd_in : bm_cmd_t;
signal cmd_dout : unsigned(DATA_WIDTH-1 downto 0);
signal cmd_dout_vld : std_logic;
signal cmd_dout_re : std_logic := '0';
signal din : unsigned(31 downto 0) := (others => '-');
signal din_rdy : std_logic;
signal din_we : std_logic := '0';
signal dout : unsigned(31 downto 0);
signal dout_vld : std_logic;
signal dout_re : std_logic := '0';
signal rdy : std_logic := '0';
signal read_reg : unsigned(31 downto 0) := (others => '-');
@@ -196,14 +200,14 @@ ARCHITECTURE behavior OF tb_busmaster_sync IS
BEGIN
MDAT_I_32 <= MDAT_I(31 downto 0);
MDAT_O <= MDAT_O_32 & MDAT_O_32;
inst_busmaster_sync : entity work.busmaster_sync
MDAT_I <= MDAT_I_64(31 downto 0);
MDAT_O_64 <= MDAT_O & MDAT_O;
inst_uut : entity work.busmaster_sync
GENERIC MAP
(
FIFO_DEPTH => 4,
DATA_WIDTH => DATA_WIDTH
DATA_WIDTH => 32,
FIFO_DEPTH => 4
)
PORT MAP
(
@@ -215,14 +219,15 @@ inst_busmaster_sync : entity work.busmaster_sync
cmd_cycle_en => cmd_cycle_en,
cmd_rdy => cmd_rdy,
cmd_we => cmd_we,
cmd_din => cmd_din,
cmd_addr => cmd_addr,
cmd_sel => cmd_sel,
cmd_rw => cmd_rw,
cmd_in => cmd_in,
cmd_dout => cmd_dout,
cmd_dout_vld => cmd_dout_vld,
cmd_dout_re => cmd_dout_re,
din => din,
din_rdy => din_rdy,
din_we => din_we,
dout => dout,
dout_vld => dout_vld,
dout_re => dout_re,
-- JBUS Master signals
CYC_O => CYC_O,
@@ -233,8 +238,8 @@ inst_busmaster_sync : entity work.busmaster_sync
SRDY_I => SRDY_I,
MRDY_O => MRDY_O,
ADDR_O => ADDR_O,
MDAT_I => MDAT_I_32,
MDAT_O => MDAT_O_32
MDAT_I => MDAT_I,
MDAT_O => MDAT_O
);
rdy_GEN: process
@@ -275,24 +280,24 @@ CLK_GEN: process
ram_data := (others => '-');
if ADDR_O(2) = '0' then
if SEL_O = "11111111" then
ram64(to_integer(ADDR_O(31 downto 3))) <= MDAT_O;
ram64(to_integer(ADDR_O(31 downto 3))) <= MDAT_O_64;
elsif SEL_O = "00001111" then
ram64(to_integer(ADDR_O(31 downto 3))) <= ram_data(63 downto 32) & MDAT_O(31 downto 0);
ram64(to_integer(ADDR_O(31 downto 3))) <= ram_data(63 downto 32) & MDAT_O_64(31 downto 0);
elsif SEL_O = "11110000" then
ram64(to_integer(ADDR_O(31 downto 3))) <= MDAT_O(63 downto 32) & ram_data(31 downto 0);
ram64(to_integer(ADDR_O(31 downto 3))) <= MDAT_O_64(63 downto 32) & ram_data(31 downto 0);
end if;
else
if SEL_O = "11111111" then
ram64(to_integer(ADDR_O(31 downto 3))) <= MDAT_O(31 downto 0) & MDAT_O(63 downto 32);
ram64(to_integer(ADDR_O(31 downto 3))) <= MDAT_O_64(31 downto 0) & MDAT_O_64(63 downto 32);
elsif SEL_O = "00001111" then
ram64(to_integer(ADDR_O(31 downto 3))) <= MDAT_O(31 downto 0) & ram_data(31 downto 0);
ram64(to_integer(ADDR_O(31 downto 3))) <= MDAT_O_64(31 downto 0) & ram_data(31 downto 0);
elsif SEL_O = "11110000" then
ram64(to_integer(ADDR_O(31 downto 3))) <= ram_data(63 downto 32) & MDAT_O(63 downto 32);
ram64(to_integer(ADDR_O(31 downto 3))) <= ram_data(63 downto 32) & MDAT_O_64(63 downto 32);
end if;
end if;
end if;
end if;
MDAT_I <= res;
MDAT_I_64 <= res;
end if;
end if;
end process;
@@ -302,12 +307,12 @@ CLK_GEN: process
if rising_edge(CLK_O) then
if RST_O = '1' then
read_reg <= X"00000000";
elsif cmd_dout_vld = '1' then
read_reg <= cmd_dout;
elsif dout_vld = '1' then
read_reg <= dout;
end if;
end if;
end process;
cmd_dout_re <= cmd_dout_vld;
dout_re <= dout_vld;
-- Master
STIMULUS: process
@@ -317,23 +322,25 @@ STIMULUS: process
procedure cmd_write_single(addr, sel, data : unsigned) is
begin
cmd_rw <= '1';
cmd_sel <= sel;
cmd_addr <= addr;
cmd_din <= data;
din <= data;
din_we <= '1';
cmd_in.rw <= '1';
cmd_in.sel <= sel;
cmd_in.addr <= addr;
cmd_we <= '1';
wait until rising_edge(CLK_O) and cmd_rdy = '1';
cmd_we <= '0';
din_we <= '0';
end procedure cmd_write_single;
procedure cmd_read_single(addr : unsigned) is
begin
cmd_rw <= '0';
cmd_sel <= (others => '0');
cmd_addr <= addr;
cmd_din <= (others => '0');
cmd_in.rw <= '0';
cmd_in.sel <= (others => '0');
cmd_in.addr <= addr;
cmd_we <= '1';
wait until rising_edge(CLK_O) and cmd_rdy = '1';
cmd_we <= '0';