-----------------------------------------------------------------------------------------------------------------------
|
-----------------------------------------------------------------------------------------------------------------------
|
-- Author: Jonny Doin, jdoin@opencores.org
|
-- Author: Jonny Doin, jdoin@opencores.org
|
--
|
--
|
-- Create Date: 09:56:30 07/06/2011
|
-- Create Date: 09:56:30 07/06/2011
|
-- Module Name: grp_debouncer - RTL
|
-- Module Name: grp_debouncer - RTL
|
-- Project Name: generic functions
|
-- Project Name: basic functions
|
-- Target Devices: Spartan-6
|
-- Target Devices: Spartan-6
|
-- Tool versions: ISE 13.1
|
-- Tool versions: ISE 13.1
|
-- Description:
|
-- Description:
|
--
|
--
|
-- This block is a generic multiple input debouncing circuit.
|
-- This block is a generic multiple input debouncing circuit.
|
-- It handles multiple inputs, like mechanical switch inputs, and outputs a debounced, stable registered version of the inputs.
|
-- It handles multiple inputs, like mechanical switch inputs, and outputs a debounced, stable registered version of the inputs.
|
-- A 'new_data' one-cycle strobe is also available, to sync downstream logic.
|
-- A 'new_data' one-cycle strobe is also available, to sync downstream logic.
|
--
|
--
|
-- CONCEPTUAL CIRCUIT
|
-- CONCEPTUAL CIRCUIT
|
-- ==================
|
-- ==================
|
--
|
--
|
-- W
|
-- W
|
-- /----------------/----------------\
|
-- /----------------/----------------\
|
-- | |
|
-- | |
|
-- | |
|
-- | |
|
-- | ______ ______ | _____
|
-- | ______ ______ | _____
|
-- | W | | W |fdr | W | W |cmp \
|
-- | W | | W |fdr | W | W |cmp \
|
-- \----/---| +1 |---/----| |--/--+----/----| \
|
-- \----/---| +1 |---/----| |--/--+----/----| \
|
-- | | | | | \
|
-- | | | | | \
|
-- ------ | | \ |
|
-- ------ | | \ |
|
-- | | | = |-----\
|
-- | | | = |-----\
|
-- |> R | / | |
|
-- |> R | / | |
|
-- ---+-- | / |
|
-- ---+-- | / |
|
-- | CNT_VAL---| / |
|
-- | CNT_VAL---| / |
|
-- | |____/ |
|
-- | |____/ |
|
-- | |
|
-- | |
|
-- \------------\ |
|
-- \------------\ |
|
-- | |
|
-- | |
|
-- N ____ | |
|
-- N ____ | |
|
-- /-------/---)) \ ____ | |
|
-- /-------/---)) \ ____ | |
|
-- | ))XOR |-----) \ | |
|
-- | ))XOR |-----) \ | |
|
-- | /------))___/ )OR |-----/ |
|
-- | /------))___/ )OR |-----/ |
|
-- | | /---)___/ |
|
-- | | /---)___/ |
|
-- | | | |
|
-- | | | |
|
-- | | \----------\ |
|
-- | | \----------\ |
|
-- | | N | |
|
-- | | N | |
|
-- | \--------/-----------\ +----------------------+-----------\
|
-- | \--------/-----------\ +----------------------+-----------\
|
-- | | | |
|
-- | | | |
|
-- \---\ | | |
|
-- \---\ | | |
|
-- ______ | ______ | | ______ |
|
-- ______ | ______ | | ______ |
|
-- | fd | | | fd | | | |fde | |
|
-- | fd | | | fd | | | |fde | |
|
-- [data_i]----/-----| |---/---+---/----| |---/---+----)---| |---/---+---/-------------)----------------------[data_o]
|
-- [data_i]----/-----| |---/---+---/----| |---/---+----)---| |---/---+---/-------------)----------------------[data_o]
|
-- N | | N N | | N | | | | N | N |
|
-- N | | N N | | N | | | | N | N |
|
-- | | | | | \---|CE | | |
|
-- | | | | | \---|CE | | |
|
-- | | | | | | | | |
|
-- | | | | | | | | |
|
-- [clk_i]----> |> | |> | | |> | | | ____
|
-- [clk_i]----> |> | |> | | |> | | | ____
|
-- ------ ------ | ------ | N ____ \-----| \
|
-- ------ ------ | ------ | N ____ \-----| \
|
-- | \----/----)) \ |AND |-----------[strb_o]
|
-- | \----/----)) \ |AND |-----------[strb_o]
|
-- | ))XOR |-------|___/
|
-- | ))XOR |-------|___/
|
-- \--------------------------/----))___/
|
-- \--------------------------/----))___/
|
-- N
|
-- N
|
--
|
--
|
--
|
--
|
-- PIPELINE LOGIC
|
-- PIPELINE LOGIC
|
-- ==============
|
-- ==============
|
--
|
--
|
-- This debouncer circuit detects edges in an input signal, and waits the signal to stabilize for the designated time
|
-- This debouncer circuit detects edges in an input signal, and waits the signal to stabilize for the designated time
|
-- before transferring the stable signal to the registered output.
|
-- before transferring the stable signal to the registered output.
|
-- A one-clock-cyle strobe is pulsed at the output to signalize a new data available.
|
-- A one-clock-cyle strobe is pulsed at the output to signalize a new data available.
|
-- The core clock should be the system clock, to optimize use of global clock resources.
|
-- The core clock should be the system clock, to optimize use of global clock resources.
|
--
|
--
|
-- GROUP DEBOUNCING
|
-- GROUP DEBOUNCING
|
-- ================
|
-- ================
|
--
|
--
|
-- A change in state in any bit in the input word causes reload of the delay counter, and the output word is updated only
|
-- A change in state in any bit in the input word causes reload of the delay counter, and the output word is updated only
|
-- when all bits are stable for the specified period. Therefore, the grouping of signals and delay selection should match
|
-- when all bits are stable for the specified period. Therefore, the grouping of signals and delay selection should match
|
-- behaviour of the selected signals.
|
-- behaviour of the selected signals.
|
--
|
--
|
-- RESOURCES USED
|
-- RESOURCES USED
|
-- ==============
|
-- ==============
|
--
|
--
|
-- The number of registers inferred is: 3*N + (LOG(CNT_VAL)/LOG(2)) registers.
|
-- The number of registers inferred is: 3*N + (LOG(CNT_VAL)/LOG(2)) registers.
|
-- The number of LUTs inferred is roughly: ((4*N+2)/6)+2.
|
-- The number of LUTs inferred is roughly: ((4*N+2)/6)+2.
|
-- The slice distribution will vary, and depends on the control set restrictions and LUT-FF pairs resulting from map+p&r.
|
-- The slice distribution will vary, and depends on the control set restrictions and LUT-FF pairs resulting from map+p&r.
|
--
|
--
|
-- This design was originally targeted to a Spartan-6 platform, synthesized with XST and normal constraints.
|
-- This design was originally targeted to a Spartan-6 platform, synthesized with XST and normal constraints.
|
-- The VHDL dialect used is VHDL'93, accepted largely by all synthesis tools.
|
-- The VHDL dialect used is VHDL'93, accepted largely by all synthesis tools.
|
--
|
--
|
------------------------------ COPYRIGHT NOTICE -----------------------------------------------------------------------
|
------------------------------ COPYRIGHT NOTICE -----------------------------------------------------------------------
|
--
|
--
|
--
|
--
|
-- Author(s): Jonny Doin, jdoin@opencores.org
|
-- Author(s): Jonny Doin, jdoin@opencores.org
|
--
|
--
|
-- Copyright (C) 2011 Authors
|
-- Copyright (C) 2011 Authors
|
-- --------------------------
|
-- --------------------------
|
--
|
--
|
-- This source file may be used and distributed without restriction provided that this copyright statement is not
|
-- This source file may be used and distributed without restriction provided that this copyright statement is not
|
-- removed from the file and that any derivative work contains the original copyright notice and the associated
|
-- removed from the file and that any derivative work contains the original copyright notice and the associated
|
-- disclaimer.
|
-- disclaimer.
|
--
|
--
|
-- This source file is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser
|
-- This source file 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
|
-- General Public License as published by the Free Software Foundation; either version 2.1 of the License, or
|
-- (at your option) any later version.
|
-- (at your option) any later version.
|
--
|
--
|
-- This source is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied
|
-- This source 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
|
-- warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more
|
-- details.
|
-- details.
|
--
|
--
|
-- You should have received a copy of the GNU Lesser General Public License along with this source; if not, download
|
-- You should have received a copy of the GNU Lesser General Public License along with this source; if not, download
|
-- it from http://www.opencores.org/lgpl.shtml
|
-- it from http://www.opencores.org/lgpl.shtml
|
--
|
--
|
------------------------------ REVISION HISTORY -----------------------------------------------------------------------
|
------------------------------ REVISION HISTORY -----------------------------------------------------------------------
|
--
|
--
|
-- 2011/07/06 v0.01.0010 [JD] started development. verification of synthesis circuit inference.
|
-- 2011/07/06 v0.01.0010 [JD] started development. verification of synthesis circuit inference.
|
-- 2011/07/07 v1.00.0020 [JD] verification in silicon. operation at 100MHz, tested on the Atlys board (Spartan-6 LX45).
|
-- 2011/07/07 v1.00.0020 [JD] verification in silicon. operation at 100MHz, tested on the Atlys board (Spartan-6 LX45).
|
--
|
--
|
-----------------------------------------------------------------------------------------------------------------------
|
-----------------------------------------------------------------------------------------------------------------------
|
-- TODO
|
-- TODO
|
-- ====
|
-- ====
|
--
|
--
|
--
|
--
|
-----------------------------------------------------------------------------------------------------------------------
|
-----------------------------------------------------------------------------------------------------------------------
|
library ieee;
|
library ieee;
|
use ieee.std_logic_1164.all;
|
use ieee.std_logic_1164.all;
|
|
|
entity grp_debouncer is
|
entity grp_debouncer is
|
Generic (
|
Generic (
|
N : positive := 8; -- input bus width
|
N : positive := 8; -- input bus width
|
CNT_VAL : positive := 10000); -- clock counts for debounce period
|
CNT_VAL : positive := 10000); -- clock counts for debounce period
|
Port (
|
Port (
|
clk_i : in std_logic := 'X'; -- system clock
|
clk_i : in std_logic := 'X'; -- system clock
|
data_i : in std_logic_vector (N-1 downto 0) := (others => 'X'); -- noisy input data
|
data_i : in std_logic_vector (N-1 downto 0) := (others => 'X'); -- noisy input data
|
data_o : out std_logic_vector (N-1 downto 0); -- registered stable output data
|
data_o : out std_logic_vector (N-1 downto 0); -- registered stable output data
|
strb_o : out std_logic -- strobe for new data available
|
strb_o : out std_logic -- strobe for new data available
|
);
|
);
|
end grp_debouncer;
|
end grp_debouncer;
|
|
|
architecture rtl of grp_debouncer is
|
architecture rtl of grp_debouncer is
|
-- datapath pipeline
|
-- datapath pipeline
|
signal reg_A, reg_B : std_logic_vector (N-1 downto 0) := (others => '0'); -- debounce edge detectors
|
signal reg_A, reg_B : std_logic_vector (N-1 downto 0) := (others => '0'); -- debounce edge detectors
|
signal reg_out : std_logic_vector (N-1 downto 0) := (others => '0'); -- registered output
|
signal reg_out : std_logic_vector (N-1 downto 0) := (others => '0'); -- registered output
|
signal dat_strb : std_logic := '0'; -- data transfer strobe
|
signal dat_strb : std_logic := '0'; -- data transfer strobe
|
signal dat_diff : std_logic := '0'; -- edge detector
|
signal dat_diff : std_logic := '0'; -- edge detector
|
-- debounce counter
|
-- debounce counter
|
signal cnt_reg : integer range CNT_VAL downto 0 := 0; -- debounce period counter
|
signal cnt_reg : integer range CNT_VAL downto 0 := 0; -- debounce period counter
|
signal cnt_next : integer range CNT_VAL downto 0 := 0; -- combinatorial signal
|
signal cnt_next : integer range CNT_VAL downto 0 := 0; -- combinatorial signal
|
begin
|
begin
|
|
|
--=============================================================================================
|
--=============================================================================================
|
-- DEBOUNCE COUNTER LOGIC
|
-- DEBOUNCE COUNTER LOGIC
|
--=============================================================================================
|
--=============================================================================================
|
-- This counter is implemented as a up-counter with reset and final count detection via compare,
|
-- This counter is implemented as a up-counter with reset and final count detection via compare,
|
-- instead of a down-counter with preset and final count detection via nonzero detection.
|
-- instead of a down-counter with preset and final count detection via nonzero detection.
|
-- This is better for Spartan-6 and Virtex-6 CLB architecture, because it uses less control sets.
|
-- This is better for Spartan-6 and Virtex-6 CLB architecture, because it uses less control sets.
|
--
|
--
|
-- cnt_reg register transfer logic
|
-- cnt_reg register transfer logic
|
cnt_reg_proc: process (clk_i) is
|
cnt_reg_proc: process (clk_i) is
|
begin
|
begin
|
if clk_i'event and clk_i = '1' then
|
if clk_i'event and clk_i = '1' then
|
cnt_reg <= cnt_next;
|
cnt_reg <= cnt_next;
|
end if;
|
end if;
|
end process cnt_reg_proc;
|
end process cnt_reg_proc;
|
-- cnt_next combinatorial logic
|
-- cnt_next combinatorial logic
|
cnt_next_proc: cnt_next <= 0 when dat_diff = '1' or dat_strb = '1' else cnt_reg + 1;
|
cnt_next_proc: cnt_next <= 0 when dat_diff = '1' or dat_strb = '1' else cnt_reg + 1;
|
-- final count combinatorial logic
|
-- final count combinatorial logic
|
final_cnt_proc: dat_strb <= '1' when cnt_reg = CNT_VAL else '0';
|
final_cnt_proc: dat_strb <= '1' when cnt_reg = CNT_VAL else '0';
|
|
|
--=============================================================================================
|
--=============================================================================================
|
-- DATAPATH SIGNAL PIPELINE
|
-- DATAPATH SIGNAL PIPELINE
|
--=============================================================================================
|
--=============================================================================================
|
-- input pipeline logic
|
-- input pipeline logic
|
pipeline_proc: process (clk_i) is
|
pipeline_proc: process (clk_i) is
|
begin
|
begin
|
-- edge detection pipeline
|
-- edge detection pipeline
|
if clk_i'event and clk_i = '1' then
|
if clk_i'event and clk_i = '1' then
|
reg_A <= data_i;
|
reg_A <= data_i;
|
reg_B <= reg_A;
|
reg_B <= reg_A;
|
end if;
|
end if;
|
if clk_i'event and clk_i = '1' then
|
if clk_i'event and clk_i = '1' then
|
if dat_strb = '1' then
|
if dat_strb = '1' then
|
reg_out <= reg_B;
|
reg_out <= reg_B;
|
end if;
|
end if;
|
end if;
|
end if;
|
end process pipeline_proc;
|
end process pipeline_proc;
|
-- edge detector
|
-- edge detector
|
edge_detector_proc: dat_diff <= '1' when reg_A /= reg_B else '0';
|
edge_detector_proc: dat_diff <= '1' when reg_A /= reg_B else '0';
|
|
|
--=============================================================================================
|
--=============================================================================================
|
-- OUTPUT LOGIC
|
-- OUTPUT LOGIC
|
--=============================================================================================
|
--=============================================================================================
|
-- new data strobe detection
|
-- new data strobe detection
|
strb_o_proc: strb_o <= '1' when ((reg_out /= reg_B) and dat_strb = '1') else '0';
|
strb_o_proc: strb_o <= '1' when ((reg_out /= reg_B) and dat_strb = '1') else '0';
|
-- connect output ports
|
-- connect output ports
|
data_o_proc: data_o <= reg_out;
|
data_o_proc: data_o <= reg_out;
|
|
|
end rtl;
|
end rtl;
|
|
|
|
|