URL
https://opencores.org/ocsvn/ax8/ax8/trunk
Subversion Repositories ax8
[/] [ax8/] [trunk/] [rtl/] [vhdl/] [AX_Port.vhd] - Rev 31
Compare with Previous | Blame | View Log
-- -- AT90Sxxxx compatible microcontroller core -- -- Version : 0221 -- -- Copyright (c) 2001-2002 Daniel Wallner (jesus@opencores.org) -- -- All rights reserved -- -- Redistribution and use in source and synthezised forms, with or without -- modification, are permitted provided that the following conditions are met: -- -- Redistributions of source code must retain the above copyright notice, -- this list of conditions and the following disclaimer. -- -- Redistributions in synthesized form must reproduce the above copyright -- notice, this list of conditions and the following disclaimer in the -- documentation and/or other materials provided with the distribution. -- -- 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 -- specific prior written permission. -- -- THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" -- AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, -- THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR -- PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE -- LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR -- CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF -- SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS -- INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN -- 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 -- POSSIBILITY OF SUCH DAMAGE. -- -- Please report bugs to the author, but before you do so, please -- make sure that this is not a derivative work and that -- you have the latest version of this file. -- -- The latest version of this file can be found at: -- http://www.opencores.org/cvsweb.shtml/t51/ -- -- Limitations : -- No pull-up -- -- File history : -- -- 0146 : First release -- 0221 : Removed tristate library IEEE; use IEEE.std_logic_1164.all; entity AX_Port is port( Clk : in std_logic; Reset_n : in std_logic; PORT_Sel : in std_logic; DDR_Sel : in std_logic; PIN_Sel : in std_logic; Wr : in std_logic; Data_In : in std_logic_vector(7 downto 0); Dir : out std_logic_vector(7 downto 0); Port_Input : out std_logic_vector(7 downto 0); Port_Output : out std_logic_vector(7 downto 0); IOPort : inout std_logic_vector(7 downto 0) ); end AX_Port; architecture rtl of AX_Port is signal Dir_i : std_logic_vector(7 downto 0); signal Port_Output_i : std_logic_vector(7 downto 0); begin Dir <= Dir_i; Port_Output <= Port_Output_i; IOPort(0) <= Port_Output_i(0) when Dir_i(0) = '1' else 'Z'; IOPort(1) <= Port_Output_i(1) when Dir_i(1) = '1' else 'Z'; IOPort(2) <= Port_Output_i(2) when Dir_i(2) = '1' else 'Z'; IOPort(3) <= Port_Output_i(3) when Dir_i(3) = '1' else 'Z'; IOPort(4) <= Port_Output_i(4) when Dir_i(4) = '1' else 'Z'; IOPort(5) <= Port_Output_i(5) when Dir_i(5) = '1' else 'Z'; IOPort(6) <= Port_Output_i(6) when Dir_i(6) = '1' else 'Z'; IOPort(7) <= Port_Output_i(7) when Dir_i(7) = '1' else 'Z'; process (Clk) begin if Clk'event and Clk = '1' then Port_Input <= IOPort; end if; end process; process (Reset_n, Clk) begin if Reset_n = '0' then Dir_i <= "00000000"; Port_Output_i <= "00000000"; elsif Clk'event and Clk = '1' then if DDR_Sel = '1' and Wr = '1' then Dir_i <= Data_In; end if; if PORT_Sel = '1' and Wr = '1' then Port_Output_i <= Data_In; end if; end if; end process; end;