##// END OF EJS Templates
HG_REPOSITORIES » LPP » INSTRUMENTATION » USERS » PELLION » VHD_Lib
RSS

Clone from http://pc-instru.lpp.polytechnique.fr:5000/VHD_Lib

FFT sur 5 Voies Okai...
FFT sur 5 Voies Okai (cf driver C BenchFFT)
martin - - Load All Authors

File last commit:

r106:4dc8bc245631 martin
r108:ec95871b78ac martin
Show More
FFTaval.vhd
90 lines | 2.2 KiB | text/x-vhdl | VhdlLexer
/ lib / lpp / dsp / lpp_fft / FFTaval.vhd
History | Annotation | Raw |Copy content |Copy permalink
-- FFTaval.vhd
library IEEE;
use IEEE.std_logic_1164.all;
use IEEE.numeric_std.all;
entity FFTaval is
generic(
Data_sz : integer range 1 to 32 := 8;
NbData : integer range 1 to 512 := 256
);
port(
clk : in std_logic;
rstn : in std_logic;
Ready : in std_logic;
Valid : in std_logic;
Full : in std_logic;
Data_re : in std_logic_vector(Data_sz-1 downto 0);
Data_im : in std_logic_vector(Data_sz-1 downto 0);
Read : out std_logic;
Write : out std_logic;
ReUse : out std_logic;
DATA : out std_logic_vector(Data_sz-1 downto 0)
);
end entity;
architecture ar_FFTaval of FFTaval is
type etat is (eX,e0,e1,e2,e3);
signal ect : etat;
signal DataTmp : std_logic_vector(Data_sz-1 downto 0);
signal sRead : std_logic;
signal DataCount : integer;
begin
process(clk,rstn)
begin
if(rstn='0')then
ect <= e0;
sRead <= '0';
Write <= '1';
Reuse <= '0';
DataCount <= 0;
elsif(clk'event and clk='1')then
if(Ready='1')then
sRead <= not sRead;
else
sRead <= '0';
end if;
if(DataCount=NbData or Ready='0')then
DataCount <= 0;
elsif(Valid='1')then
DataCount <= DataCount+1;
end if;
case ect is
when e0 =>
Write <= '1';
if(Valid='1' and full='0')then
DataTmp <= Data_im;
DATA <= Data_re;
Write <= '0';
ect <= e1;
elsif(full='1')then
ReUse <= '1';
end if;
when e1 =>
DATA <= DataTmp;
ect <= e0;
when others =>
null;
end case;
end if;
end process;
Read <= sRead;
end architecture;