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

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

IIR Filter Ready for tests, New version of APB_FIFO under developpement.
IIR Filter Ready for tests, New version of APB_FIFO under developpement.
martin - - Load All Authors

File last commit:

r91:0d940e249f25 martin
r92:74ac16764d41 alexis
Show More
lpp_matrix.vhd
246 lines | 8.2 KiB | text/x-vhdl | VhdlLexer
/ lib / lpp / lpp_matrix / lpp_matrix.vhd
History | Source | Raw |Copy content |Copy permalink
martin
APB_MATRIX added, first version
 r70 ------------------------------------------------------------------------------
-- 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 : Martin Morlot
-- Mail : martin.morlot@lpp.polytechnique.fr
------------------------------------------------------------------------------
library ieee;
use ieee.std_logic_1164.all;
library grlib;
use grlib.amba.all;
use std.textio.all;
library lpp;
use lpp.lpp_amba.all;
--! Package contenant tous les programmes qui forment le composant int�gr� dans le l�on
package lpp_matrix is
component APB_Matrix is
generic (
pindex : integer := 0;
paddr : integer := 0;
pmask : integer := 16#fff#;
pirq : integer := 0;
martin
Light Leon version "TEST-LEON-M7-LPP"...
 r79 abits : integer := 8;
Input_SZ : integer := 16;
Result_SZ : integer := 32);
martin
APB_MATRIX added, first version
 r70 port (
clk : in std_logic; --! Horloge du composant
rst : in std_logic; --! Reset general du composant
martin
Light Leon version "TEST-LEON-M7-LPP"...
 r79 FIFO1 : in std_logic_vector(Input_SZ-1 downto 0);
FIFO2 : in std_logic_vector(Input_SZ-1 downto 0);
Full : in std_logic_vector(1 downto 0);
Empty : in std_logic_vector(1 downto 0);
ReadFIFO : out std_logic_vector(1 downto 0);
WriteFIFO : out std_logic;
Result : out std_logic_vector(Result_SZ-1 downto 0);
Start : out std_logic;
Read : out std_logic;
Take : out std_logic;
Valid : out std_logic;
Received : out std_logic;
Conjugate : out std_logic;
OP1 : out std_logic_vector(3 downto 0);
OP2 : out std_logic_vector(3 downto 0);
martin
APB_MATRIX added, first version
 r70 apbi : in apb_slv_in_type; --! Registre de gestion des entr�es du bus
apbo : out apb_slv_out_type --! Registre de gestion des sorties du bus
);
end component;
martin
APB_MATRIX, second version /!\ not stable /!\
 r75 component SpectralMatrix is
generic(
Input_SZ : integer := 16;
Result_SZ : integer := 32);
port(
clk : in std_logic;
reset : in std_logic;
martin
Light Leon version "TEST-LEON-M7-LPP"...
 r79 FIFO1 : in std_logic_vector(Input_SZ-1 downto 0);
FIFO2 : in std_logic_vector(Input_SZ-1 downto 0);
Full : in std_logic_vector(1 downto 0);
Empty : in std_logic_vector(1 downto 0);
Statu : in std_logic_vector(3 downto 0);
ReadFIFO : out std_logic_vector(1 downto 0);
WriteFIFO : out std_logic;
Start : out std_logic;
Read : out std_logic;
Take : out std_logic;
Valid : out std_logic;
Received : out std_logic;
Conjugate : out std_logic;
OP1 : out std_logic_vector(3 downto 0);
OP2 : out std_logic_vector(3 downto 0);
Result : out std_logic_vector(Result_SZ-1 downto 0)
martin
APB_MATRIX, second version /!\ not stable /!\
 r75 );
end component;
martin
APB_MATRIX added, first version
 r70 component Matrix is
generic(
Input_SZ : integer := 16);
port(
martin
APB_MATRIX, second version /!\ not stable /!\
 r75 clk : in std_logic;
raz : in std_logic;
IN1 : in std_logic_vector(Input_SZ-1 downto 0);
IN2 : in std_logic_vector(Input_SZ-1 downto 0);
Take : in std_logic;
Received : in std_logic;
Conjugate : in std_logic;
Valid : out std_logic;
Read : out std_logic;
martin
Light Leon version "TEST-LEON-M7-LPP"...
 r79 OPin1 : out std_logic_vector(3 downto 0);
OPin2 : out std_logic_vector(3 downto 0);
martin
APB_MATRIX, second version /!\ not stable /!\
 r75 Result : out std_logic_vector(2*Input_SZ-1 downto 0)
martin
APB_MATRIX added, first version
 r70 );
end component;
component ALU_Driver is
generic(
Input_SZ_1 : integer := 16;
Input_SZ_2 : integer := 16);
port(
martin
APB_MATRIX, second version /!\ not stable /!\
 r75 clk : in std_logic;
reset : in std_logic;
IN1 : in std_logic_vector(Input_SZ_1-1 downto 0);
IN2 : in std_logic_vector(Input_SZ_2-1 downto 0);
Take : in std_logic;
Received : in std_logic;
Conjugate : in std_logic;
Valid : out std_logic;
Read : out std_logic;
CTRL : out std_logic_vector(4 downto 0);
OP1 : out std_logic_vector(Input_SZ_1-1 downto 0);
OP2 : out std_logic_vector(Input_SZ_2-1 downto 0)
martin
APB_MATRIX added, first version
 r70 );
end component;
component ALU_v2 is
generic(
Arith_en : integer := 1;
Logic_en : integer := 1;
Input_SZ_1 : integer := 16;
Input_SZ_2 : integer := 9);
port(
clk : in std_logic;
reset : in std_logic;
ctrl : in std_logic_vector(4 downto 0);
OP1 : in std_logic_vector(Input_SZ_1-1 downto 0);
OP2 : in std_logic_vector(Input_SZ_2-1 downto 0);
RES : out std_logic_vector(Input_SZ_1+Input_SZ_2-1 downto 0)
);
end component;
component MAC_v2 is
generic(
Input_SZ_A : integer := 8;
Input_SZ_B : integer := 8);
port(
clk : in std_logic;
reset : in std_logic;
clr_MAC : in std_logic;
MAC_MUL_ADD_2C : in std_logic_vector(3 downto 0);
OP1 : in std_logic_vector(Input_SZ_A-1 downto 0);
OP2 : in std_logic_vector(Input_SZ_B-1 downto 0);
RES : out std_logic_vector(Input_SZ_A+Input_SZ_B-1 downto 0)
);
end component;
component TwoComplementer is
generic(
Input_SZ : integer := 16);
port(
clk : in std_logic;
reset : in std_logic;
clr : in std_logic;
TwoComp : in std_logic;
OP : in std_logic_vector(Input_SZ-1 downto 0);
RES : out std_logic_vector(Input_SZ-1 downto 0)
);
end component;
martin
APB_MATRIX, second version /!\ not stable /!\
 r75
component GetResult is
generic(
Result_SZ : integer := 32);
port(
clk : in std_logic;
raz : in std_logic;
Valid : in std_logic;
Conjugate : in std_logic;
Res : in std_logic_vector(Result_SZ-1 downto 0);
martin
Light Leon version "TEST-LEON-M7-LPP"...
 r79 WriteFIFO : out std_logic;
martin
APB_MATRIX, second version /!\ not stable /!\
 r75 Received : out std_logic;
Result : out std_logic_vector(Result_SZ-1 downto 0)
);
end component;
component SelectInputs is
generic(
Input_SZ : integer := 16);
port(
clk : in std_logic;
raz : in std_logic;
Read : in std_logic;
B1 : in std_logic_vector(Input_SZ-1 downto 0);
B2 : in std_logic_vector(Input_SZ-1 downto 0);
B3 : in std_logic_vector(Input_SZ-1 downto 0);
E1 : in std_logic_vector(Input_SZ-1 downto 0);
E2 : in std_logic_vector(Input_SZ-1 downto 0);
Conjugate : out std_logic;
Take : out std_logic;
ReadFIFO : out std_logic_vector(4 downto 0); --B1,B2,B3,E1,E2
martin
Spectral Matrix Okai, with 5 input fifo
 r77 Statu : out std_logic_vector(3 downto 0);
martin
APB_MATRIX, second version /!\ not stable /!\
 r75 OP1 : out std_logic_vector(Input_SZ-1 downto 0);
OP2 : out std_logic_vector(Input_SZ-1 downto 0)
);
end component;
martin
Light Leon version "TEST-LEON-M7-LPP"...
 r79 ---------------------------------------------------------------------------
component DriveInputs is
port(
clk : in std_logic;
raz : in std_logic;
Read : in std_logic;
-- FIFO1 : in std_logic_vector(Input_SZ-1 downto 0);
-- FIFO2 : in std_logic_vector(Input_SZ-1 downto 0);
-- Statu : in std_logic_vector(3 downto 0);
Conjugate : in std_logic;
Take : out std_logic;
ReadFIFO : out std_logic_vector(1 downto 0)
-- OP1 : out std_logic_vector(Input_SZ-1 downto 0);
-- OP2 : out std_logic_vector(Input_SZ-1 downto 0)
);
end component;
martin
Spectral Matrix Okai, with 5 input fifo
 r77
component Starter is
port(
clk : in std_logic;
raz : in std_logic;
martin
Light Leon version "TEST-LEON-M7-LPP"...
 r79 Full : in std_logic_vector(1 downto 0);
Empty : in std_logic_vector(1 downto 0);
martin
Spectral Matrix Okai, with 5 input fifo
 r77 Conjugate : in std_logic;
martin
Light Leon version "TEST-LEON-M7-LPP"...
 r79 received : in std_logic;
martin
Spectral Matrix Okai, with 5 input fifo
 r77 Start : out std_logic
);
end component;
martin
APB_MATRIX added, first version
 r70 end;