-------------------------------------------------------------------------
-- Project: FIFO, generic FIFOs written in VHDL
-- Release 1
--
-- Copyright (C) 2007 J. Ahrensfeld
--
-- This library is free software; you can redistribute it and/or
-- modify it under the terms of the GNU Lesser General Public
-- License as published by the Free Software Foundation; either
-- version 2.1 of the License, or (at your option) any later version.
--
-- This library is distributed in the hope that it will be useful,
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
-- Lesser General Public License for more details.
--
-- You should have received a copy of the GNU Lesser General Public
-- License along with this library; if not, write to the Free Software
-- Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
--
-- For questions and ideas, please contact the author at jens@jayfield.org
--
-----------------------------------------------------------------------

LIBRARY IEEE;
USE IEEE.STD_LOGIC_1164.ALL;
USE IEEE.NUMERIC_STD.ALL;

use work.fifo_ctrl_pkg.all;

entity fifo_async is
	Generic
	(
		addr_width			: natural := 4;
		data_width			: natural := 8;
		almost_full_thresh	: integer := 12;
		almost_empty_thresh	: integer := 4
	);
	Port
	(
		rst			: in  STD_LOGIC;
		clk_w		: in  STD_LOGIC;
		clk_r		: in  STD_LOGIC;
		we			: in  STD_LOGIC;
		re			: in  STD_LOGIC;
		fifo_full	: out STD_LOGIC;
		fifo_empty	: out STD_LOGIC;
		fifo_afull	: out STD_LOGIC;
		fifo_aempty	: out STD_LOGIC;
		data_w		: in  unsigned (data_width-1 downto 0);
		data_r		: out unsigned (data_width-1 downto 0)
	);
end fifo_async;

architecture Behavioral of fifo_async is
	
	signal ptr_w		: unsigned (addr_width-1 downto 0);
	signal ptr_r		: unsigned (addr_width-1 downto 0);
	signal full			: std_logic;
	signal mem_we		: std_logic;
	
begin

	mem_we		<= we and not full;
	fifo_full <= full;
	
	-- Instantiate the Unit Under Test (UUT)
	inst_fifo_async_ctrl: entity work.fifo_async_ctrl
	GENERIC MAP
	(
		addr_width			=> addr_width,
		almost_full_thresh	=> almost_full_thresh,
		almost_empty_thresh	=> almost_empty_thresh
	)
	PORT MAP
	(
		rst			=>	rst,
		clk_w		=>	clk_w,
		clk_r		=>	clk_r,
		we			=>	we,
		re			=>	re,
		ptr_w		=>	ptr_w,
		ptr_r		=>	ptr_r,
		fifo_full	=>	full,
		fifo_empty	=>	fifo_empty,
		fifo_afull	=>	fifo_afull,
		fifo_aempty	=>	fifo_aempty

	);

inst_dpram_1w1r: entity work.dpram_1w1r
	GENERIC MAP
	(
		addr_width	=> addr_width,
		data_width	=> data_width
	)
	PORT MAP(
		clka		=> clk_w,
		clkb		=> clk_r,
		en_a		=> '1',
		en_b		=> '1',
		we_a		=> mem_we,
		addr_a		=> ptr_w,
		addr_b		=> ptr_r,
		din_a		=> data_w,
		dout_b		=> data_r
	);

end Behavioral;