IIR_CEL_CTRLR_v2.vhd
265 lines
| 9.5 KiB
| text/x-vhdl
|
VhdlLexer
pellion
|
r113 | ------------------------------------------------------------------------------ | ||
-- This file is a part of the LPP VHDL IP LIBRARY | ||||
-- Copyright (C) 2009 - 2010, Laboratory of Plasmas Physic - CNRS | ||||
-- | ||||
-- This program is free software; you can redistribute it and/or modify | ||||
-- it under the terms of the GNU General Public License as published by | ||||
-- the Free Software Foundation; either version 3 of the License, or | ||||
-- (at your option) any later version. | ||||
-- | ||||
-- This program 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 General Public License for more details. | ||||
-- | ||||
-- You should have received a copy of the GNU General Public License | ||||
-- along with this program; if not, write to the Free Software | ||||
-- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | ||||
------------------------------------------------------------------------------- | ||||
-- Author : Jean-christophe PELLION | ||||
-- Mail : jean-christophe.pellion@lpp.polytechnique.fr | ||||
------------------------------------------------------------------------------- | ||||
LIBRARY IEEE; | ||||
USE IEEE.numeric_std.ALL; | ||||
USE IEEE.std_logic_1164.ALL; | ||||
LIBRARY techmap; | ||||
USE techmap.gencomp.ALL; | ||||
LIBRARY lpp; | ||||
USE lpp.iir_filter.ALL; | ||||
USE lpp.general_purpose.ALL; | ||||
ENTITY IIR_CEL_CTRLR_v2 IS | ||||
GENERIC ( | ||||
pellion
|
r516 | tech : INTEGER := 0; | ||
pellion
|
r113 | Mem_use : INTEGER := use_RAM; | ||
Sample_SZ : INTEGER := 18; | ||||
Coef_SZ : INTEGER := 9; | ||||
Coef_Nb : INTEGER := 25; | ||||
Coef_sel_SZ : INTEGER := 5; | ||||
Cels_count : INTEGER := 5; | ||||
ChanelsCount : INTEGER := 8); | ||||
PORT ( | ||||
rstn : IN STD_LOGIC; | ||||
clk : IN STD_LOGIC; | ||||
virg_pos : IN INTEGER; | ||||
coefs : IN STD_LOGIC_VECTOR((Coef_SZ*Coef_Nb)-1 DOWNTO 0); | ||||
sample_in_val : IN STD_LOGIC; | ||||
sample_in : IN samplT(ChanelsCount-1 DOWNTO 0, Sample_SZ-1 DOWNTO 0); | ||||
sample_out_val : OUT STD_LOGIC; | ||||
sample_out : OUT samplT(ChanelsCount-1 DOWNTO 0, Sample_SZ-1 DOWNTO 0)); | ||||
END IIR_CEL_CTRLR_v2; | ||||
ARCHITECTURE ar_IIR_CEL_CTRLR_v2 OF IIR_CEL_CTRLR_v2 IS | ||||
COMPONENT IIR_CEL_CTRLR_v2_DATAFLOW | ||||
GENERIC ( | ||||
tech : INTEGER; | ||||
Mem_use : INTEGER; | ||||
Sample_SZ : INTEGER; | ||||
Coef_SZ : INTEGER; | ||||
Coef_Nb : INTEGER; | ||||
Coef_sel_SZ : INTEGER); | ||||
PORT ( | ||||
rstn : IN STD_LOGIC; | ||||
clk : IN STD_LOGIC; | ||||
virg_pos : IN INTEGER; | ||||
coefs : IN STD_LOGIC_VECTOR((Coef_SZ*Coef_Nb)-1 DOWNTO 0); | ||||
in_sel_src : IN STD_LOGIC_VECTOR(1 DOWNTO 0); | ||||
pellion
|
r639 | init_mem_done : out STD_LOGIC; | ||
pellion
|
r113 | ram_sel_Wdata : IN STD_LOGIC_VECTOR(1 DOWNTO 0); | ||
ram_write : IN STD_LOGIC; | ||||
ram_read : IN STD_LOGIC; | ||||
raddr_rst : IN STD_LOGIC; | ||||
raddr_add1 : IN STD_LOGIC; | ||||
waddr_previous : IN STD_LOGIC_VECTOR(1 DOWNTO 0); | ||||
alu_sel_input : IN STD_LOGIC; | ||||
alu_sel_coeff : IN STD_LOGIC_VECTOR(Coef_sel_SZ-1 DOWNTO 0); | ||||
martin
|
r147 | alu_ctrl : IN STD_LOGIC_VECTOR(2 DOWNTO 0); | ||
alu_comp : IN STD_LOGIC_VECTOR(1 DOWNTO 0); | ||||
pellion
|
r113 | sample_in : IN STD_LOGIC_VECTOR(Sample_SZ-1 DOWNTO 0); | ||
sample_out : OUT STD_LOGIC_VECTOR(Sample_SZ-1 DOWNTO 0)); | ||||
END COMPONENT; | ||||
COMPONENT IIR_CEL_CTRLR_v2_CONTROL | ||||
GENERIC ( | ||||
Coef_sel_SZ : INTEGER; | ||||
Cels_count : INTEGER; | ||||
ChanelsCount : INTEGER); | ||||
PORT ( | ||||
rstn : IN STD_LOGIC; | ||||
clk : IN STD_LOGIC; | ||||
sample_in_val : IN STD_LOGIC; | ||||
sample_in_rot : OUT STD_LOGIC; | ||||
sample_out_val : OUT STD_LOGIC; | ||||
sample_out_rot : OUT STD_LOGIC; | ||||
pellion
|
r639 | init_mem_done : in STD_LOGIC; --TODO | ||
pellion
|
r113 | in_sel_src : OUT STD_LOGIC_VECTOR(1 DOWNTO 0); | ||
ram_sel_Wdata : OUT STD_LOGIC_VECTOR(1 DOWNTO 0); | ||||
ram_write : OUT STD_LOGIC; | ||||
ram_read : OUT STD_LOGIC; | ||||
raddr_rst : OUT STD_LOGIC; | ||||
raddr_add1 : OUT STD_LOGIC; | ||||
waddr_previous : OUT STD_LOGIC_VECTOR(1 DOWNTO 0); | ||||
alu_sel_input : OUT STD_LOGIC; | ||||
alu_sel_coeff : OUT STD_LOGIC_VECTOR(Coef_sel_SZ-1 DOWNTO 0); | ||||
martin
|
r147 | alu_ctrl : OUT STD_LOGIC_VECTOR(2 DOWNTO 0)); | ||
pellion
|
r113 | END COMPONENT; | ||
SIGNAL in_sel_src : STD_LOGIC_VECTOR(1 DOWNTO 0); | ||||
SIGNAL ram_sel_Wdata : STD_LOGIC_VECTOR(1 DOWNTO 0); | ||||
SIGNAL ram_write : STD_LOGIC; | ||||
SIGNAL ram_read : STD_LOGIC; | ||||
SIGNAL raddr_rst : STD_LOGIC; | ||||
SIGNAL raddr_add1 : STD_LOGIC; | ||||
SIGNAL waddr_previous : STD_LOGIC_VECTOR(1 DOWNTO 0); | ||||
SIGNAL alu_sel_input : STD_LOGIC; | ||||
SIGNAL alu_sel_coeff : STD_LOGIC_VECTOR(Coef_sel_SZ-1 DOWNTO 0); | ||||
martin
|
r147 | SIGNAL alu_ctrl : STD_LOGIC_VECTOR(2 DOWNTO 0); | ||
pellion
|
r113 | |||
SIGNAL sample_in_buf : samplT(ChanelsCount-1 DOWNTO 0, Sample_SZ-1 DOWNTO 0); | ||||
SIGNAL sample_in_rotate : STD_LOGIC; | ||||
SIGNAL sample_in_s : STD_LOGIC_VECTOR(Sample_SZ-1 DOWNTO 0); | ||||
SIGNAL sample_out_val_s : STD_LOGIC; | ||||
SIGNAL sample_out_val_s2 : STD_LOGIC; | ||||
SIGNAL sample_out_rot_s : STD_LOGIC; | ||||
SIGNAL sample_out_s : STD_LOGIC_VECTOR(Sample_SZ-1 DOWNTO 0); | ||||
SIGNAL sample_out_s2 : samplT(ChanelsCount-1 DOWNTO 0, Sample_SZ-1 DOWNTO 0); | ||||
pellion
|
r639 | signal init_mem_done : std_logic; | ||
pellion
|
r113 | BEGIN | ||
IIR_CEL_CTRLR_v2_DATAFLOW_1 : IIR_CEL_CTRLR_v2_DATAFLOW | ||||
GENERIC MAP ( | ||||
tech => tech, | ||||
Mem_use => Mem_use, | ||||
Sample_SZ => Sample_SZ, | ||||
Coef_SZ => Coef_SZ, | ||||
Coef_Nb => Coef_Nb, | ||||
Coef_sel_SZ => Coef_sel_SZ) | ||||
PORT MAP ( | ||||
rstn => rstn, | ||||
clk => clk, | ||||
virg_pos => virg_pos, | ||||
coefs => coefs, | ||||
--CTRL | ||||
in_sel_src => in_sel_src, | ||||
pellion
|
r639 | init_mem_done => init_mem_done, --TODO | ||
pellion
|
r113 | ram_sel_Wdata => ram_sel_Wdata, | ||
ram_write => ram_write, | ||||
ram_read => ram_read, | ||||
raddr_rst => raddr_rst, | ||||
raddr_add1 => raddr_add1, | ||||
waddr_previous => waddr_previous, | ||||
alu_sel_input => alu_sel_input, | ||||
alu_sel_coeff => alu_sel_coeff, | ||||
alu_ctrl => alu_ctrl, | ||||
martin
|
r147 | alu_comp => "00", | ||
pellion
|
r113 | --DATA | ||
sample_in => sample_in_s, | ||||
sample_out => sample_out_s); | ||||
IIR_CEL_CTRLR_v2_CONTROL_1 : IIR_CEL_CTRLR_v2_CONTROL | ||||
GENERIC MAP ( | ||||
Coef_sel_SZ => Coef_sel_SZ, | ||||
Cels_count => Cels_count, | ||||
ChanelsCount => ChanelsCount) | ||||
PORT MAP ( | ||||
rstn => rstn, | ||||
clk => clk, | ||||
sample_in_val => sample_in_val, | ||||
sample_in_rot => sample_in_rotate, | ||||
sample_out_val => sample_out_val_s, | ||||
sample_out_rot => sample_out_rot_s, | ||||
pellion
|
r639 | |||
init_mem_done => init_mem_done, --TODO | ||||
pellion
|
r113 | |||
in_sel_src => in_sel_src, | ||||
ram_sel_Wdata => ram_sel_Wdata, | ||||
ram_write => ram_write, | ||||
ram_read => ram_read, | ||||
raddr_rst => raddr_rst, | ||||
raddr_add1 => raddr_add1, | ||||
waddr_previous => waddr_previous, | ||||
alu_sel_input => alu_sel_input, | ||||
alu_sel_coeff => alu_sel_coeff, | ||||
alu_ctrl => alu_ctrl); | ||||
----------------------------------------------------------------------------- | ||||
-- SAMPLE IN | ||||
----------------------------------------------------------------------------- | ||||
loop_all_sample : FOR J IN Sample_SZ-1 DOWNTO 0 GENERATE | ||||
loop_all_chanel : FOR I IN ChanelsCount-1 DOWNTO 0 GENERATE | ||||
PROCESS (clk, rstn) | ||||
BEGIN -- PROCESS | ||||
IF rstn = '0' THEN -- asynchronous reset (active low) | ||||
sample_in_buf(I, J) <= '0'; | ||||
ELSIF clk'EVENT AND clk = '1' THEN -- rising clock edge | ||||
IF sample_in_val = '1' THEN | ||||
sample_in_buf(I, J) <= sample_in(I, J); | ||||
ELSIF sample_in_rotate = '1' THEN | ||||
sample_in_buf(I, J) <= sample_in_buf((I+1) MOD ChanelsCount, J); | ||||
END IF; | ||||
END IF; | ||||
END PROCESS; | ||||
END GENERATE loop_all_chanel; | ||||
sample_in_s(J) <= sample_in(0, J) WHEN sample_in_val = '1' ELSE sample_in_buf(0, J); | ||||
END GENERATE loop_all_sample; | ||||
----------------------------------------------------------------------------- | ||||
-- SAMPLE OUT | ||||
----------------------------------------------------------------------------- | ||||
PROCESS (clk, rstn) | ||||
BEGIN -- PROCESS | ||||
IF rstn = '0' THEN -- asynchronous reset (active low) | ||||
sample_out_val <= '0'; | ||||
sample_out_val_s2 <= '0'; | ||||
ELSIF clk'EVENT AND clk = '1' THEN -- rising clock edge | ||||
sample_out_val <= sample_out_val_s2; | ||||
sample_out_val_s2 <= sample_out_val_s; | ||||
END IF; | ||||
END PROCESS; | ||||
chanel_HIGH : FOR I IN Sample_SZ-1 DOWNTO 0 GENERATE | ||||
PROCESS (clk, rstn) | ||||
BEGIN -- PROCESS | ||||
IF rstn = '0' THEN -- asynchronous reset (active low) | ||||
sample_out_s2(ChanelsCount-1, I) <= '0'; | ||||
ELSIF clk'EVENT AND clk = '1' THEN -- rising clock edge | ||||
IF sample_out_rot_s = '1' THEN | ||||
sample_out_s2(ChanelsCount-1, I) <= sample_out_s(I); | ||||
END IF; | ||||
END IF; | ||||
END PROCESS; | ||||
END GENERATE chanel_HIGH; | ||||
chanel_more : IF ChanelsCount > 1 GENERATE | ||||
all_chanel : FOR J IN ChanelsCount-1 DOWNTO 1 GENERATE | ||||
all_bit : FOR I IN Sample_SZ-1 DOWNTO 0 GENERATE | ||||
PROCESS (clk, rstn) | ||||
BEGIN -- PROCESS | ||||
IF rstn = '0' THEN -- asynchronous reset (active low) | ||||
sample_out_s2(J-1, I) <= '0'; | ||||
ELSIF clk'EVENT AND clk = '1' THEN -- rising clock edge | ||||
IF sample_out_rot_s = '1' THEN | ||||
sample_out_s2(J-1, I) <= sample_out_s2(J, I); | ||||
END IF; | ||||
END IF; | ||||
END PROCESS; | ||||
END GENERATE all_bit; | ||||
END GENERATE all_chanel; | ||||
END GENERATE chanel_more; | ||||
sample_out <= sample_out_s2; | ||||
END ar_IIR_CEL_CTRLR_v2; | ||||