window_function.vhd
152 lines
| 5.8 KiB
| text/x-vhdl
|
VhdlLexer
pellion
|
r602 | ------------------------------------------------------------------------------ | |
-- 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 | |||
-- jean-christophe.pellion@easii-ic.com | |||
---------------------------------------------------------------------------- | |||
LIBRARY ieee; | |||
USE ieee.std_logic_1164.ALL; | |||
USE ieee.numeric_std.ALL; | |||
LIBRARY lpp; | |||
USE lpp.general_purpose.ALL; | |||
USE lpp.window_function_pkg.ALL; | |||
ENTITY window_function IS | |||
GENERIC ( | |||
DATA_SIZE : INTEGER := 16; | |||
PARAM_SIZE : INTEGER := 10 | |||
); | |||
PORT ( | |||
clk : IN STD_LOGIC; | |||
rstn : IN STD_LOGIC; | |||
restart_window : IN STD_LOGIC; | |||
data_in : IN STD_LOGIC_VECTOR(DATA_SIZE-1 DOWNTO 0); | |||
data_in_valid : IN STD_LOGIC; | |||
data_out : OUT STD_LOGIC_VECTOR(DATA_SIZE-1 DOWNTO 0); | |||
data_out_valid : OUT STD_LOGIC | |||
); | |||
END window_function; | |||
ARCHITECTURE beh OF window_function IS | |||
SUBTYPE RANGE_NB_BIT_BY_WINDOW_PARAM IS INTEGER RANGE 1 TO DATA_SIZE; | |||
CONSTANT NB_BIT_BY_WINDOW_PARAM : RANGE_NB_BIT_BY_WINDOW_PARAM := 16; | |||
CONSTANT NB_POINT_BY_WINDOW : INTEGER := 256; | |||
TYPE WINDOWS_PARAM_TYPE IS ARRAY (INTEGER RANGE <>) OF STD_LOGIC_VECTOR(15 DOWNTO 0); | |||
CONSTANT windows_param_lfr_sigmoide : WINDOWS_PARAM_TYPE(0 TO 32) := | |||
( X"0000",X"0012",X"002E",X"005B", X"00A2",X"0113",X"01C7",X"02E0", --0 - 7 | |||
X"0498",X"073A",X"0B37",X"110D", X"193C",X"240F",X"3147",X"3FF7", --8 - 15 | |||
X"4EA7",X"5BDF",X"66B2",X"6EE1", X"74B7",X"78B4",X"7B56",X"7D0E", --16 - 23 | |||
X"7E27",X"7EDB",X"7F4C",X"7F93", X"7FC0",X"7FDC",X"7FEE",X"7FF9", --24 - 31 | |||
X"7FFF" ); --32 | |||
CONSTANT windows_param_lfr_rampe : WINDOWS_PARAM_TYPE(0 TO 32) := | |||
( X"0000",X"03E1",X"07C2",X"0BA3", X"0F84",X"1365",X"1746",X"1B27", | |||
X"1F08",X"22E8",X"26C9",X"2AAA", X"2E8B",X"326C",X"364D",X"3A2E", | |||
X"3E0F",X"41F0",X"45D1",X"49B2", X"4D93",X"5174",X"5555",X"5936", | |||
X"5D17",X"60F7",X"64D8",X"68B9", X"6C9A",X"707B",X"745C",X"783D", | |||
X"7FFF" ); | |||
CONSTANT windows_param_lfr_echelon : WINDOWS_PARAM_TYPE(0 TO 32) := | |||
( X"0000",X"0000",X"0000",X"0000", X"0000",X"0000",X"0000",X"0000", | |||
X"0000",X"0000",X"0000",X"0000", X"0000",X"0000",X"0000",X"0000", | |||
X"FFFF",X"FFFF",X"FFFF",X"FFFF", X"FFFF",X"FFFF",X"FFFF",X"FFFF", | |||
X"FFFF",X"FFFF",X"FFFF",X"FFFF", X"FFFF",X"FFFF",X"FFFF",X"FFFF", | |||
X"FFFF"); | |||
CONSTANT windows_param_lfr : WINDOWS_PARAM_TYPE(0 TO 32) := windows_param_lfr_sigmoide; | |||
SIGNAL windows_param : WINDOWS_PARAM_TYPE(0 TO NB_POINT_BY_WINDOW-1); | |||
SIGNAL param_counter : INTEGER RANGE 0 TO NB_POINT_BY_WINDOW-1; | |||
SIGNAL data_x_param : STD_LOGIC_VECTOR(DATA_SIZE + PARAM_SIZE - 1 DOWNTO 0); | |||
SIGNAL windows_param_selected_s : STD_LOGIC_VECTOR(15 DOWNTO 0); | |||
SIGNAL windows_param_selected : STD_LOGIC_VECTOR(PARAM_SIZE-1 DOWNTO 0); | |||
SIGNAL data_in_valid_s : STD_LOGIC; | |||
SIGNAL data_in_s : STD_LOGIC_VECTOR(DATA_SIZE-1 DOWNTO 0); | |||
BEGIN | |||
all_windows_param_0: FOR I IN 0 TO 31 GENERATE | |||
windows_param(I) <= windows_param_lfr(I); | |||
END GENERATE all_windows_param_0; | |||
all_windows_param_1: FOR I IN 32 TO 223 GENERATE | |||
windows_param(I) <= windows_param_lfr(32); | |||
END GENERATE all_windows_param_1; | |||
all_windows_param_2: FOR I IN 224 TO 255 GENERATE | |||
windows_param(I) <= windows_param_lfr(255-I); | |||
END GENERATE all_windows_param_2; | |||
PROCESS (clk, rstn) | |||
BEGIN -- PROCESS | |||
IF rstn = '0' THEN -- asynchronous reset (active low) | |||
param_counter <= 0; | |||
ELSIF clk'EVENT AND clk = '1' THEN -- rising clock edge | |||
IF restart_window = '1' THEN | |||
param_counter <= 0; | |||
ELSE | |||
IF data_in_valid = '1' THEN | |||
IF param_counter < 255 THEN | |||
param_counter <= param_counter + 1; | |||
ELSE | |||
param_counter <= 0; | |||
END IF; | |||
END IF; | |||
END IF; | |||
END IF; | |||
END PROCESS; | |||
data_in_valid_s <= data_in_valid; | |||
data_in_s <= data_in; | |||
windows_param_selected_s <= windows_param(param_counter); | |||
windows_param_selected <= windows_param_selected_s(15 DOWNTO 16 - PARAM_SIZE); | |||
WINDOWS_Multiplier : Multiplier | |||
GENERIC MAP ( | |||
Input_SZ_A => DATA_SIZE, | |||
Input_SZ_B => PARAM_SIZE) | |||
PORT MAP ( | |||
clk => clk, | |||
reset => rstn, | |||
mult => data_in_valid_s, | |||
OP1 => data_in_s, | |||
OP2 => windows_param_selected, | |||
RES => data_x_param); | |||
data_out <= data_x_param(DATA_SIZE + PARAM_SIZE-1 DOWNTO PARAM_SIZE); | |||
PROCESS (clk, rstn) | |||
BEGIN -- PROCESS | |||
IF rstn = '0' THEN -- asynchronous reset (active low) | |||
data_out_valid <= '0'; | |||
ELSIF clk'EVENT AND clk = '1' THEN -- rising clock edge | |||
data_out_valid <= data_in_valid_s; | |||
END IF; | |||
END PROCESS; | |||
END beh; |