/* FIR Filter.
|
/* FIR Filter.
|
|
|
Copyright© 2012 Tauhop Solutions. All rights reserved.
|
Copyright© 2012 Tauhop Solutions. All rights reserved.
|
This core is free hardware design; you can redistribute it and/or
|
This core is free hardware design; you can redistribute it and/or
|
modify it under the terms of the GNU Library General Public
|
modify it under the terms of the GNU Library General Public
|
License as published by the Free Software Foundation; either
|
License as published by the Free Software Foundation; either
|
version 2 of the License, or (at your option) any later version.
|
version 2 of the License, or (at your option) any later version.
|
|
|
This library is distributed in the hope that it will be useful,
|
This library is distributed in the hope that it will be useful,
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
Library General Public License for more details.
|
Library General Public License for more details.
|
|
|
You should have received a copy of the GNU Library General Public
|
You should have received a copy of the GNU Library General Public
|
License along with this library; if not, write to the
|
License along with this library; if not, write to the
|
Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
Boston, MA 02111-1307, USA.
|
Boston, MA 02111-1307, USA.
|
|
|
License: LGPL.
|
License: LGPL.
|
|
|
@dependencies:
|
@dependencies:
|
@designer(s):
|
@designer(s):
|
Daniel C.K. Kho [daniel.kho@gmail.com] | [daniel.kho@tauhop.com];
|
Daniel C.K. Kho [daniel.kho@gmail.com] | [daniel.kho@tauhop.com];
|
Tan Hooi Jing [hooijingtan@gmail.com]
|
Tan Hooi Jing [hooijingtan@gmail.com]
|
@info:
|
@info:
|
Revision History: @see Mercurial log for full list of changes.
|
Revision History: @see Mercurial log for full list of changes.
|
|
|
This notice and disclaimer must be retained as part of this text at all times.
|
This notice and disclaimer must be retained as part of this text at all times.
|
*/
|
*/
|
library ieee;
|
library ieee;
|
use ieee.std_logic_1164.all;
|
use ieee.std_logic_1164.all;
|
use ieee.numeric_std.all;
|
use ieee.numeric_std.all;
|
|
|
/* Filter order = number of unit delays. */
|
/* Filter order = number of unit delays. */
|
entity fir is generic(order:positive:=30; width:positive:=16);
|
entity fir is generic(order:positive:=30; width:positive:=16);
|
port(
|
port(
|
reset:in std_ulogic; -- asserting reset will start protocol sequence transmission. To restart the re-transmission of the sequence, re-assert this reset signal, and the whole SPI sequence will be re-transmitted again.
|
reset:in std_ulogic; -- asserting reset will start protocol sequence transmission. To restart the re-transmission of the sequence, re-assert this reset signal, and the whole SPI sequence will be re-transmitted again.
|
clk:in std_ulogic:='0';
|
clk:in std_ulogic:='0';
|
|
|
/* Filter ports. */
|
/* Filter ports. */
|
u:in signed(width-1 downto 0):=(others=>'0');
|
u:in signed(width-1 downto 0):=(others=>'0');
|
y:buffer signed(width-1 downto 0)
|
y:buffer signed(width-1 downto 0)
|
);
|
);
|
end entity fir;
|
end entity fir;
|
|
|
architecture rtl of fir is
|
architecture rtl of fir is
|
/* Memory I/Os: */
|
/* Memory I/Os: */
|
signal q:signed(width-1 downto 0):=(others=>'0');
|
signal q:signed(width-1 downto 0):=(others=>'0');
|
--signal rst: std_ulogic;
|
--signal rst: std_ulogic;
|
--signal pwrUpCnt: unsigned(8 downto 0):=(others=>'0');
|
--signal pwrUpCnt: unsigned(8 downto 0):=(others=>'0');
|
--signal trig:std_logic;
|
--signal trig:std_logic;
|
|
|
--signal c:unsigned(positive(ceil(log2(real(order))))-1 downto 0); --counter:5bits
|
--signal c:unsigned(positive(ceil(log2(real(order))))-1 downto 0); --counter:5bits
|
|
|
|
|
-- debugger
|
-- debugger
|
--signal dbgSignals:std_ulogic_vector(127 downto 0);
|
--signal dbgSignals:std_ulogic_vector(127 downto 0);
|
|
|
|
|
/* Memories: */
|
/* Memories: */
|
/* TODO: Change these arrays to internal process variables instead. */
|
/* TODO: Change these arrays to internal process variables instead. */
|
/* Read-only Memory (ROM). */
|
/* Read-only Memory (ROM). */
|
type signed_vector is array(natural range <>) of signed(width-1 downto 0); -- 32-by-N matrix array structure (as in RAM). Similar to integer_vector, difference being base vector is 32-bit unsigned.
|
type signed_vector is array(natural range <>) of signed(width-1 downto 0); -- 32-by-N matrix array structure (as in RAM). Similar to integer_vector, difference being base vector is 32-bit unsigned.
|
type signedx2_vector is array(natural range<>) of signed(width*2-1 downto 0);
|
type signedx2_vector is array(natural range<>) of signed(width*2-1 downto 0);
|
|
|
/* Filter length = number of taps = number of coefficients = order + 1 */
|
/* Filter length = number of taps = number of coefficients = order + 1 */
|
constant b:signed_vector(0 to order):=(
|
constant b:signed_vector(0 to order):=(
|
x"FFEF",
|
x"FFEF",
|
x"FFED",
|
x"FFED",
|
x"FFE8",
|
x"FFE8",
|
x"FFE6",
|
x"FFE6",
|
x"FFEB",
|
x"FFEB",
|
x"0000",
|
x"0000",
|
x"002C",
|
x"002C",
|
x"0075",
|
x"0075",
|
x"00DC",
|
x"00DC",
|
x"015F",
|
x"015F",
|
x"01F4",
|
x"01F4",
|
x"028E",
|
x"028E",
|
x"031F",
|
x"031F",
|
x"0394",
|
x"0394",
|
x"03E1",
|
x"03E1",
|
x"03FC",
|
x"03FC",
|
x"03E1",
|
x"03E1",
|
x"0394",
|
x"0394",
|
x"031F",
|
x"031F",
|
x"028E",
|
x"028E",
|
x"01F4",
|
x"01F4",
|
x"015F",
|
x"015F",
|
x"00DC",
|
x"00DC",
|
x"0075",
|
x"0075",
|
x"002C",
|
x"002C",
|
x"0000",
|
x"0000",
|
x"FFEB",
|
x"FFEB",
|
x"FFE6",
|
x"FFE6",
|
x"FFE8",
|
x"FFE8",
|
x"FFED",
|
x"FFED",
|
x"FFEF"
|
x"FFEF"
|
);
|
);
|
|
|
/*Memory Addressing*/
|
/*Memory Addressing*/
|
-- signal c:natural range b'range;
|
-- signal c:natural range b'range;
|
|
|
/* Pipes and delay chains. */
|
/* Pipes and delay chains. */
|
signal y0:signed(width*2-1 downto 0);
|
signal y0:signed(width*2-1 downto 0);
|
signal u_pipe:signed_vector(b'range):=(others=>(others=>'0'));
|
signal u_pipe:signed_vector(b'range):=(others=>(others=>'0'));
|
signal y_pipe:signedx2_vector(b'range):=(others=>(others=>'0'));
|
signal y_pipe:signedx2_vector(b'range):=(others=>(others=>'0'));
|
|
|
|
|
/* Counters. */
|
/* Counters. */
|
-- signal cnt:integer range 31 downto -1; -- symbol / bit counter. Counts the bits transmitted on the serial line.
|
-- signal cnt:integer range 31 downto -1; -- symbol / bit counter. Counts the bits transmitted on the serial line.
|
|
|
-- /* memory pointers (acts as the read/write address for the synchronous RAM). */
|
-- /* memory pointers (acts as the read/write address for the synchronous RAM). */
|
-- signal instrPtr:natural range rfbSequencesCache'range; --RFB sequence memory addressing. Acts as instruction pointer. Points to the current SPI instruction to be transmitted on MOSI. Size is one more than the instruction cache size, so it points past the last valid address (used for counting).
|
-- signal instrPtr:natural range rfbSequencesCache'range; --RFB sequence memory addressing. Acts as instruction pointer. Points to the current SPI instruction to be transmitted on MOSI. Size is one more than the instruction cache size, so it points past the last valid address (used for counting).
|
/* [end]: Memories. */
|
/* [end]: Memories. */
|
|
|
/* Signal preservations. */
|
/* Signal preservations. */
|
-- attribute keep:boolean;
|
-- attribute keep:boolean;
|
|
|
/* Explicitly define all multiplications with the "*" operator to use dedicated DSP hardware multipliers. */
|
/* Explicitly define all multiplications with the "*" operator to use dedicated DSP hardware multipliers. */
|
attribute multstyle:string; attribute multstyle of rtl:architecture is "dsp"; --altera
|
attribute multstyle:string; attribute multstyle of rtl:architecture is "dsp"; --altera
|
-- attribute mult_style:string; attribute mult_style of fir:entity is "block"; --xilinx
|
-- attribute mult_style:string; attribute mult_style of fir:entity is "block"; --xilinx
|
|
|
begin
|
begin
|
-- /* 1-Dimensional Synchronous ROM. */
|
-- /* 1-Dimensional Synchronous ROM. */
|
-- readCoeffs: process(clk) is begin
|
-- readCoeffs: process(clk) is begin
|
-- if rising_edge(clk) then
|
-- if rising_edge(clk) then
|
-- if reset='1' then q<=(others=>'0');
|
-- if reset='1' then q<=(others=>'0');
|
-- else q<=b(c);
|
-- else q<=b(c);
|
-- end if;
|
-- end if;
|
-- end if;
|
-- end if;
|
-- end process readCoeffs;
|
-- end process readCoeffs;
|
|
|
u_pipe(0)<=u;
|
u_pipe(0)<=u;
|
u_dlyChain: for i in 1 to u_pipe'high generate
|
u_dlyChain: for i in 1 to u_pipe'high generate
|
delayChain: process(clk) is begin
|
delayChain: process(clk) is begin
|
if rising_edge(clk) then u_pipe(i)<=u_pipe(i-1); end if;
|
if rising_edge(clk) then u_pipe(i)<=u_pipe(i-1); end if;
|
end process delayChain;
|
end process delayChain;
|
end generate u_dlyChain;
|
end generate u_dlyChain;
|
|
|
y_pipe(0)<=b(0)*u;
|
y_pipe(0)<=b(0)*u;
|
y_dlyChain: for i in 1 to y_pipe'high generate
|
y_dlyChain: for i in 1 to y_pipe'high generate
|
y_pipe(i)<=b(i)*u_pipe(i) + y_pipe(i-1);
|
y_pipe(i)<=b(i)*u_pipe(i) + y_pipe(i-1);
|
end generate y_dlyChain;
|
end generate y_dlyChain;
|
|
|
y0<=y_pipe(y_pipe'high) when reset='0' else (others=>'0');
|
y0<=y_pipe(y_pipe'high) when reset='0' else (others=>'0');
|
y<=y0(width-1 downto 0);
|
y<=y0(width-1 downto 0);
|
end architecture rtl;
|
end architecture rtl;
|
|
|