-------------------------------------------------------------------------------
|
-------------------------------------------------------------------------------
|
--
|
--
|
-- T410 system toplevel.
|
-- T410 system toplevel.
|
--
|
--
|
-- $Id: t410.vhd,v 1.2 2008-08-23 11:19:20 arniml Exp $
|
-- $Id: t410.vhd 179 2009-04-01 19:48:38Z arniml $
|
-- $Name: not supported by cvs2svn $
|
|
--
|
--
|
-- Copyright (c) 2006 Arnim Laeuger (arniml@opencores.org)
|
-- Copyright (c) 2006 Arnim Laeuger (arniml@opencores.org)
|
--
|
--
|
-- All rights reserved
|
-- All rights reserved
|
--
|
--
|
-- Redistribution and use in source and synthezised forms, with or without
|
-- Redistribution and use in source and synthezised forms, with or without
|
-- modification, are permitted provided that the following conditions are met:
|
-- modification, are permitted provided that the following conditions are met:
|
--
|
--
|
-- Redistributions of source code must retain the above copyright notice,
|
-- Redistributions of source code must retain the above copyright notice,
|
-- this list of conditions and the following disclaimer.
|
-- this list of conditions and the following disclaimer.
|
--
|
--
|
-- Redistributions in synthesized form must reproduce the above copyright
|
-- Redistributions in synthesized form must reproduce the above copyright
|
-- notice, this list of conditions and the following disclaimer in the
|
-- notice, this list of conditions and the following disclaimer in the
|
-- documentation and/or other materials provided with the distribution.
|
-- documentation and/or other materials provided with the distribution.
|
--
|
--
|
-- Neither the name of the author nor the names of other contributors may
|
-- Neither the name of the author nor the names of other contributors may
|
-- be used to endorse or promote products derived from this software without
|
-- be used to endorse or promote products derived from this software without
|
-- specific prior written permission.
|
-- specific prior written permission.
|
--
|
--
|
-- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
-- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
|
-- AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
|
-- AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
|
-- THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
-- THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
-- PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE
|
-- PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE
|
-- LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
-- LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
-- CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
-- CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
-- SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
-- SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
-- INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
-- INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
-- CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
-- CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
-- ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
-- ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
-- POSSIBILITY OF SUCH DAMAGE.
|
-- POSSIBILITY OF SUCH DAMAGE.
|
--
|
--
|
-- Please report bugs to the author, but before you do so, please
|
-- Please report bugs to the author, but before you do so, please
|
-- make sure that this is not a derivative work and that
|
-- make sure that this is not a derivative work and that
|
-- you have the latest version of this file.
|
-- you have the latest version of this file.
|
--
|
--
|
-- The latest version of this file can be found at:
|
-- The latest version of this file can be found at:
|
-- http://www.opencores.org/cvsweb.shtml/t400/
|
-- http://www.opencores.org/cvsweb.shtml/t400/
|
--
|
--
|
-------------------------------------------------------------------------------
|
-------------------------------------------------------------------------------
|
|
|
library ieee;
|
library ieee;
|
use ieee.std_logic_1164.all;
|
use ieee.std_logic_1164.all;
|
|
|
use work.t400_opt_pack.all;
|
use work.t400_opt_pack.all;
|
|
|
entity t410 is
|
entity t410 is
|
|
|
generic (
|
generic (
|
opt_ck_div_g : integer := t400_opt_ck_div_16_c;
|
opt_ck_div_g : integer := t400_opt_ck_div_16_c;
|
opt_l_out_type_7_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_7_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_6_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_6_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_5_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_5_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_4_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_4_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_3_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_3_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_2_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_2_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_1_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_1_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_0_g : integer := t400_opt_out_type_std_c;
|
opt_l_out_type_0_g : integer := t400_opt_out_type_std_c;
|
opt_d_out_type_3_g : integer := t400_opt_out_type_std_c;
|
opt_d_out_type_3_g : integer := t400_opt_out_type_std_c;
|
opt_d_out_type_2_g : integer := t400_opt_out_type_std_c;
|
opt_d_out_type_2_g : integer := t400_opt_out_type_std_c;
|
opt_d_out_type_1_g : integer := t400_opt_out_type_std_c;
|
opt_d_out_type_1_g : integer := t400_opt_out_type_std_c;
|
opt_d_out_type_0_g : integer := t400_opt_out_type_std_c;
|
opt_d_out_type_0_g : integer := t400_opt_out_type_std_c;
|
opt_g_out_type_3_g : integer := t400_opt_out_type_std_c;
|
opt_g_out_type_3_g : integer := t400_opt_out_type_std_c;
|
opt_g_out_type_2_g : integer := t400_opt_out_type_std_c;
|
opt_g_out_type_2_g : integer := t400_opt_out_type_std_c;
|
opt_g_out_type_1_g : integer := t400_opt_out_type_std_c;
|
opt_g_out_type_1_g : integer := t400_opt_out_type_std_c;
|
opt_g_out_type_0_g : integer := t400_opt_out_type_std_c;
|
opt_g_out_type_0_g : integer := t400_opt_out_type_std_c;
|
opt_so_output_type_g : integer := t400_opt_out_type_std_c;
|
opt_so_output_type_g : integer := t400_opt_out_type_std_c;
|
opt_sk_output_type_g : integer := t400_opt_out_type_std_c
|
opt_sk_output_type_g : integer := t400_opt_out_type_std_c
|
);
|
);
|
port (
|
port (
|
ck_i : in std_logic;
|
ck_i : in std_logic;
|
ck_en_i : in std_logic;
|
ck_en_i : in std_logic;
|
reset_n_i : in std_logic;
|
reset_n_i : in std_logic;
|
io_l_b : inout std_logic_vector(7 downto 0);
|
io_l_b : inout std_logic_vector(7 downto 0);
|
io_d_o : out std_logic_vector(3 downto 0);
|
io_d_o : out std_logic_vector(3 downto 0);
|
io_g_b : inout std_logic_vector(3 downto 0);
|
io_g_b : inout std_logic_vector(3 downto 0);
|
si_i : in std_logic;
|
si_i : in std_logic;
|
so_o : out std_logic;
|
so_o : out std_logic;
|
sk_o : out std_logic
|
sk_o : out std_logic
|
);
|
);
|
|
|
end t410;
|
end t410;
|
|
|
|
|
use work.t400_system_comp_pack.t410_notri;
|
use work.t400_system_comp_pack.t410_notri;
|
|
|
architecture struct of t410 is
|
architecture struct of t410 is
|
|
|
signal io_l_from_t410_s,
|
signal io_l_from_t410_s,
|
io_l_en_s : std_logic_vector(7 downto 0);
|
io_l_en_s : std_logic_vector(7 downto 0);
|
signal io_d_from_t410_s,
|
signal io_d_from_t410_s,
|
io_d_en_s : std_logic_vector(3 downto 0);
|
io_d_en_s : std_logic_vector(3 downto 0);
|
signal io_g_to_t410_s,
|
signal io_g_to_t410_s,
|
io_g_from_t410_s,
|
io_g_from_t410_s,
|
io_g_en_s : std_logic_vector(3 downto 0);
|
io_g_en_s : std_logic_vector(3 downto 0);
|
|
|
signal so_s,
|
signal so_s,
|
so_en_s : std_logic;
|
so_en_s : std_logic;
|
signal sk_s,
|
signal sk_s,
|
sk_en_s : std_logic;
|
sk_en_s : std_logic;
|
|
|
signal gnd_s : std_logic;
|
signal gnd_s : std_logic;
|
|
|
begin
|
begin
|
|
|
gnd_s <= '0';
|
gnd_s <= '0';
|
|
|
-----------------------------------------------------------------------------
|
-----------------------------------------------------------------------------
|
-- T410 without tri-states
|
-- T410 without tri-states
|
-----------------------------------------------------------------------------
|
-----------------------------------------------------------------------------
|
t410_notri_b : t410_notri
|
t410_notri_b : t410_notri
|
generic map (
|
generic map (
|
opt_ck_div_g => opt_ck_div_g,
|
opt_ck_div_g => opt_ck_div_g,
|
opt_cko_g => t400_opt_cko_crystal_c,
|
opt_cko_g => t400_opt_cko_crystal_c,
|
opt_l_out_type_7_g => opt_l_out_type_7_g,
|
opt_l_out_type_7_g => opt_l_out_type_7_g,
|
opt_l_out_type_6_g => opt_l_out_type_6_g,
|
opt_l_out_type_6_g => opt_l_out_type_6_g,
|
opt_l_out_type_5_g => opt_l_out_type_5_g,
|
opt_l_out_type_5_g => opt_l_out_type_5_g,
|
opt_l_out_type_4_g => opt_l_out_type_4_g,
|
opt_l_out_type_4_g => opt_l_out_type_4_g,
|
opt_l_out_type_3_g => opt_l_out_type_3_g,
|
opt_l_out_type_3_g => opt_l_out_type_3_g,
|
opt_l_out_type_2_g => opt_l_out_type_2_g,
|
opt_l_out_type_2_g => opt_l_out_type_2_g,
|
opt_l_out_type_1_g => opt_l_out_type_1_g,
|
opt_l_out_type_1_g => opt_l_out_type_1_g,
|
opt_l_out_type_0_g => opt_l_out_type_0_g,
|
opt_l_out_type_0_g => opt_l_out_type_0_g,
|
opt_d_out_type_3_g => opt_d_out_type_3_g,
|
opt_d_out_type_3_g => opt_d_out_type_3_g,
|
opt_d_out_type_2_g => opt_d_out_type_2_g,
|
opt_d_out_type_2_g => opt_d_out_type_2_g,
|
opt_d_out_type_1_g => opt_d_out_type_1_g,
|
opt_d_out_type_1_g => opt_d_out_type_1_g,
|
opt_d_out_type_0_g => opt_d_out_type_0_g,
|
opt_d_out_type_0_g => opt_d_out_type_0_g,
|
opt_g_out_type_3_g => opt_g_out_type_3_g,
|
opt_g_out_type_3_g => opt_g_out_type_3_g,
|
opt_g_out_type_2_g => opt_g_out_type_2_g,
|
opt_g_out_type_2_g => opt_g_out_type_2_g,
|
opt_g_out_type_1_g => opt_g_out_type_1_g,
|
opt_g_out_type_1_g => opt_g_out_type_1_g,
|
opt_g_out_type_0_g => opt_g_out_type_0_g,
|
opt_g_out_type_0_g => opt_g_out_type_0_g,
|
opt_so_output_type_g => opt_so_output_type_g,
|
opt_so_output_type_g => opt_so_output_type_g,
|
opt_sk_output_type_g => opt_sk_output_type_g
|
opt_sk_output_type_g => opt_sk_output_type_g
|
)
|
)
|
port map (
|
port map (
|
ck_i => ck_i,
|
ck_i => ck_i,
|
ck_en_i => ck_en_i,
|
ck_en_i => ck_en_i,
|
reset_n_i => reset_n_i,
|
reset_n_i => reset_n_i,
|
cko_i => gnd_s,
|
cko_i => gnd_s,
|
io_l_i => io_l_b,
|
io_l_i => io_l_b,
|
io_l_o => io_l_from_t410_s,
|
io_l_o => io_l_from_t410_s,
|
io_l_en_o => io_l_en_s,
|
io_l_en_o => io_l_en_s,
|
io_d_o => io_d_from_t410_s,
|
io_d_o => io_d_from_t410_s,
|
io_d_en_o => io_d_en_s,
|
io_d_en_o => io_d_en_s,
|
io_g_i => io_g_b,
|
io_g_i => io_g_b,
|
io_g_o => io_g_from_t410_s,
|
io_g_o => io_g_from_t410_s,
|
io_g_en_o => io_g_en_s,
|
io_g_en_o => io_g_en_s,
|
si_i => si_i,
|
si_i => si_i,
|
so_o => so_s,
|
so_o => so_s,
|
so_en_o => so_en_s,
|
so_en_o => so_en_s,
|
sk_o => sk_s,
|
sk_o => sk_s,
|
sk_en_o => sk_en_s
|
sk_en_o => sk_en_s
|
);
|
);
|
|
|
|
|
-----------------------------------------------------------------------------
|
-----------------------------------------------------------------------------
|
-- Tri-states for output drivers
|
-- Tri-states for output drivers
|
-----------------------------------------------------------------------------
|
-----------------------------------------------------------------------------
|
io_l_tri: for idx in 7 downto 0 generate
|
io_l_tri: for idx in 7 downto 0 generate
|
io_l_b(idx) <= io_l_from_t410_s(idx)
|
io_l_b(idx) <= io_l_from_t410_s(idx)
|
when io_l_en_s(idx) = '1' else
|
when io_l_en_s(idx) = '1' else
|
'Z';
|
'Z';
|
end generate;
|
end generate;
|
--
|
--
|
io_d_tri: for idx in 3 downto 0 generate
|
io_d_tri: for idx in 3 downto 0 generate
|
io_d_o(idx) <= io_d_from_t410_s(idx)
|
io_d_o(idx) <= io_d_from_t410_s(idx)
|
when io_d_en_s(idx) = '1' else
|
when io_d_en_s(idx) = '1' else
|
'Z';
|
'Z';
|
end generate;
|
end generate;
|
--
|
--
|
io_g_tri: for idx in 3 downto 0 generate
|
io_g_tri: for idx in 3 downto 0 generate
|
io_g_b(idx) <= io_g_from_t410_s(idx)
|
io_g_b(idx) <= io_g_from_t410_s(idx)
|
when io_g_en_s(idx) = '1' else
|
when io_g_en_s(idx) = '1' else
|
'Z';
|
'Z';
|
end generate;
|
end generate;
|
--
|
--
|
so_o <= so_s
|
so_o <= so_s
|
when so_en_s = '1' else
|
when so_en_s = '1' else
|
'Z';
|
'Z';
|
--
|
--
|
sk_o <= sk_s
|
sk_o <= sk_s
|
when sk_en_s = '1' else
|
when sk_en_s = '1' else
|
'Z';
|
'Z';
|
|
|
end struct;
|
end struct;
|
|
|
|
|
-------------------------------------------------------------------------------
|
|
-- File History:
|
|
--
|
|
-- $Log: not supported by cvs2svn $
|
|
-- Revision 1.1 2006/06/11 22:18:28 arniml
|
|
-- initial check-in
|
|
--
|
|
-------------------------------------------------------------------------------
|
|
|
|
No newline at end of file
|
No newline at end of file
|