|
|
------------------------------------------------------------------------------
|
|
|
-- 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 grlib;
|
|
|
USE grlib.amba.ALL;
|
|
|
USE grlib.stdlib.ALL;
|
|
|
LIBRARY techmap;
|
|
|
USE techmap.gencomp.ALL;
|
|
|
LIBRARY gaisler;
|
|
|
USE gaisler.memctrl.ALL;
|
|
|
USE gaisler.leon3.ALL;
|
|
|
USE gaisler.uart.ALL;
|
|
|
USE gaisler.misc.ALL;
|
|
|
USE gaisler.spacewire.ALL;
|
|
|
LIBRARY esa;
|
|
|
USE esa.memoryctrl.ALL;
|
|
|
LIBRARY lpp;
|
|
|
USE lpp.lpp_memory.ALL;
|
|
|
USE lpp.lpp_ad_conv.ALL;
|
|
|
USE lpp.lpp_lfr_pkg.ALL; -- contains lpp_lfr, not in the 206 rev of the VHD_Lib
|
|
|
USE lpp.lpp_top_lfr_pkg.ALL; -- contains top_wf_picker
|
|
|
USE lpp.iir_filter.ALL;
|
|
|
USE lpp.general_purpose.ALL;
|
|
|
USE lpp.lpp_lfr_time_management.ALL;
|
|
|
USE lpp.lpp_leon3_soc_pkg.ALL;
|
|
|
|
|
|
ENTITY LFR_em IS
|
|
|
|
|
|
PORT (
|
|
|
clk100MHz : IN STD_ULOGIC;
|
|
|
clk49_152MHz : IN STD_ULOGIC;
|
|
|
reset : IN STD_ULOGIC;
|
|
|
|
|
|
errorn : OUT STD_ULOGIC;
|
|
|
-- UART AHB ---------------------------------------------------------------
|
|
|
ahbrxd : IN STD_ULOGIC; -- DSU rx data
|
|
|
ahbtxd : OUT STD_ULOGIC; -- DSU tx data
|
|
|
-- UART APB ---------------------------------------------------------------
|
|
|
urxd1 : IN STD_ULOGIC; -- UART1 rx data
|
|
|
utxd1 : OUT STD_ULOGIC; -- UART1 tx data
|
|
|
-- RAM --------------------------------------------------------------------
|
|
|
address : OUT STD_LOGIC_VECTOR(19 DOWNTO 0);
|
|
|
data : INOUT STD_LOGIC_VECTOR(31 DOWNTO 0);
|
|
|
nSRAM_BE0 : OUT STD_LOGIC;
|
|
|
nSRAM_BE1 : OUT STD_LOGIC;
|
|
|
nSRAM_BE2 : OUT STD_LOGIC;
|
|
|
nSRAM_BE3 : OUT STD_LOGIC;
|
|
|
nSRAM_WE : OUT STD_LOGIC;
|
|
|
nSRAM_CE : OUT STD_LOGIC;
|
|
|
nSRAM_OE : OUT STD_LOGIC;
|
|
|
-- SPW --------------------------------------------------------------------
|
|
|
spw1_din : IN STD_LOGIC;
|
|
|
spw1_sin : IN STD_LOGIC;
|
|
|
spw1_dout : OUT STD_LOGIC;
|
|
|
spw1_sout : OUT STD_LOGIC;
|
|
|
spw2_din : IN STD_LOGIC;
|
|
|
spw2_sin : IN STD_LOGIC;
|
|
|
spw2_dout : OUT STD_LOGIC;
|
|
|
spw2_sout : OUT STD_LOGIC;
|
|
|
-- ADC --------------------------------------------------------------------
|
|
|
bias_fail_sw : OUT STD_LOGIC;
|
|
|
ADC_OEB_bar_CH : OUT STD_LOGIC_VECTOR(7 DOWNTO 0);
|
|
|
ADC_smpclk : OUT STD_LOGIC;
|
|
|
ADC_data : IN STD_LOGIC_VECTOR(13 DOWNTO 0);
|
|
|
---------------------------------------------------------------------------
|
|
|
led : OUT STD_LOGIC_VECTOR(2 DOWNTO 0)
|
|
|
);
|
|
|
|
|
|
END LFR_em;
|
|
|
|
|
|
|
|
|
ARCHITECTURE beh OF LFR_em IS
|
|
|
SIGNAL clk_50_s : STD_LOGIC := '0';
|
|
|
SIGNAL clk_25 : STD_LOGIC := '0';
|
|
|
SIGNAL clk_24 : STD_LOGIC := '0';
|
|
|
-----------------------------------------------------------------------------
|
|
|
SIGNAL coarse_time : STD_LOGIC_VECTOR(31 DOWNTO 0);
|
|
|
SIGNAL fine_time : STD_LOGIC_VECTOR(15 DOWNTO 0);
|
|
|
--
|
|
|
-- UART AHB ---------------------------------------------------------------
|
|
|
--SIGNAL ahbrxd : STD_ULOGIC; -- DSU rx data
|
|
|
--SIGNAL ahbtxd : STD_ULOGIC; -- DSU tx data
|
|
|
|
|
|
-- UART APB ---------------------------------------------------------------
|
|
|
--SIGNAL urxd1 : STD_ULOGIC; -- UART1 rx data
|
|
|
--SIGNAL utxd1 : STD_ULOGIC; -- UART1 tx data
|
|
|
--
|
|
|
-- CONSTANTS
|
|
|
CONSTANT CFG_PADTECH : INTEGER := inferred;
|
|
|
--
|
|
|
CONSTANT NB_APB_SLAVE : INTEGER := 11; -- 3 = grspw + waveform picker + time manager, 11 allows pindex = f
|
|
|
CONSTANT NB_AHB_SLAVE : INTEGER := 1;
|
|
|
CONSTANT NB_AHB_MASTER : INTEGER := 2; -- 2 = grspw + waveform picker
|
|
|
|
|
|
SIGNAL apbi_ext : apb_slv_in_type;
|
|
|
SIGNAL apbo_ext : soc_apb_slv_out_vector(NB_APB_SLAVE-1+5 DOWNTO 5) := (OTHERS => apb_none);
|
|
|
SIGNAL ahbi_s_ext : ahb_slv_in_type;
|
|
|
SIGNAL ahbo_s_ext : soc_ahb_slv_out_vector(NB_AHB_SLAVE-1+3 DOWNTO 3) := (OTHERS => ahbs_none);
|
|
|
SIGNAL ahbi_m_ext : AHB_Mst_In_Type;
|
|
|
SIGNAL ahbo_m_ext : soc_ahb_mst_out_vector(NB_AHB_MASTER-1+1 DOWNTO 1) := (OTHERS => ahbm_none);
|
|
|
|
|
|
-- Spacewire signals
|
|
|
SIGNAL dtmp : STD_LOGIC_VECTOR(1 DOWNTO 0);
|
|
|
SIGNAL stmp : STD_LOGIC_VECTOR(1 DOWNTO 0);
|
|
|
SIGNAL spw_rxclk : STD_LOGIC_VECTOR(1 DOWNTO 0);
|
|
|
SIGNAL spw_rxtxclk : STD_ULOGIC;
|
|
|
SIGNAL spw_rxclkn : STD_ULOGIC;
|
|
|
SIGNAL spw_clk : STD_LOGIC;
|
|
|
SIGNAL swni : grspw_in_type;
|
|
|
SIGNAL swno : grspw_out_type;
|
|
|
-- SIGNAL clkmn : STD_ULOGIC;
|
|
|
-- SIGNAL txclk : STD_ULOGIC;
|
|
|
|
|
|
--GPIO
|
|
|
SIGNAL gpioi : gpio_in_type;
|
|
|
SIGNAL gpioo : gpio_out_type;
|
|
|
|
|
|
-- AD Converter ADS7886
|
|
|
SIGNAL sample : Samples14v(7 DOWNTO 0);
|
|
|
SIGNAL sample_val : STD_LOGIC;
|
|
|
SIGNAL ADC_nCS_sig : STD_LOGIC;
|
|
|
SIGNAL ADC_CLK_sig : STD_LOGIC;
|
|
|
SIGNAL ADC_SDO_sig : STD_LOGIC_VECTOR(7 DOWNTO 0);
|
|
|
|
|
|
--SIGNAL bias_fail_sw_sig : STD_LOGIC;
|
|
|
|
|
|
-----------------------------------------------------------------------------
|
|
|
SIGNAL observation_reg : STD_LOGIC_VECTOR(31 DOWNTO 0);
|
|
|
|
|
|
-----------------------------------------------------------------------------
|
|
|
SIGNAL rstn : STD_LOGIC;
|
|
|
BEGIN -- beh
|
|
|
|
|
|
-----------------------------------------------------------------------------
|
|
|
-- CLK
|
|
|
-----------------------------------------------------------------------------
|
|
|
rst0 : rstgen PORT MAP (reset, clk_25, '1', rstn, OPEN);
|
|
|
|
|
|
PROCESS(clk100MHz)
|
|
|
BEGIN
|
|
|
IF clk100MHz'EVENT AND clk100MHz = '1' THEN
|
|
|
clk_50_s <= NOT clk_50_s;
|
|
|
END IF;
|
|
|
END PROCESS;
|
|
|
|
|
|
PROCESS(clk_50_s)
|
|
|
BEGIN
|
|
|
IF clk_50_s'EVENT AND clk_50_s = '1' THEN
|
|
|
clk_25 <= NOT clk_25;
|
|
|
END IF;
|
|
|
END PROCESS;
|
|
|
|
|
|
PROCESS(clk49_152MHz)
|
|
|
BEGIN
|
|
|
IF clk49_152MHz'EVENT AND clk49_152MHz = '1' THEN
|
|
|
clk_24 <= NOT clk_24;
|
|
|
END IF;
|
|
|
END PROCESS;
|
|
|
|
|
|
-----------------------------------------------------------------------------
|
|
|
|
|
|
PROCESS (clk_25, rstn)
|
|
|
BEGIN -- PROCESS
|
|
|
IF rstn = '0' THEN -- asynchronous reset (active low)
|
|
|
led(0) <= '0';
|
|
|
led(1) <= '0';
|
|
|
led(2) <= '0';
|
|
|
ELSIF clk_25'EVENT AND clk_25 = '1' THEN -- rising clock edge
|
|
|
led(0) <= '0';
|
|
|
led(1) <= '1';
|
|
|
led(2) <= '1';
|
|
|
END IF;
|
|
|
END PROCESS;
|
|
|
|
|
|
--
|
|
|
leon3_soc_1 : leon3_soc
|
|
|
GENERIC MAP (
|
|
|
fabtech => apa3e,
|
|
|
memtech => apa3e,
|
|
|
padtech => inferred,
|
|
|
clktech => inferred,
|
|
|
disas => 0,
|
|
|
dbguart => 0,
|
|
|
pclow => 2,
|
|
|
clk_freq => 25000,
|
|
|
NB_CPU => 1,
|
|
|
ENABLE_FPU => 1,
|
|
|
FPU_NETLIST => 0,
|
|
|
ENABLE_DSU => 1,
|
|
|
ENABLE_AHB_UART => 1,
|
|
|
ENABLE_APB_UART => 1,
|
|
|
ENABLE_IRQMP => 1,
|
|
|
ENABLE_GPT => 1,
|
|
|
NB_AHB_MASTER => NB_AHB_MASTER,
|
|
|
NB_AHB_SLAVE => NB_AHB_SLAVE,
|
|
|
NB_APB_SLAVE => NB_APB_SLAVE)
|
|
|
PORT MAP (
|
|
|
clk => clk_25,
|
|
|
reset => rstn,
|
|
|
errorn => errorn,
|
|
|
ahbrxd => ahbrxd,
|
|
|
ahbtxd => ahbtxd,
|
|
|
urxd1 => urxd1,
|
|
|
utxd1 => utxd1,
|
|
|
address => address,
|
|
|
data => data,
|
|
|
nSRAM_BE0 => nSRAM_BE0,
|
|
|
nSRAM_BE1 => nSRAM_BE1,
|
|
|
nSRAM_BE2 => nSRAM_BE2,
|
|
|
nSRAM_BE3 => nSRAM_BE3,
|
|
|
nSRAM_WE => nSRAM_WE,
|
|
|
nSRAM_CE => nSRAM_CE,
|
|
|
nSRAM_OE => nSRAM_OE,
|
|
|
|
|
|
apbi_ext => apbi_ext,
|
|
|
apbo_ext => apbo_ext,
|
|
|
ahbi_s_ext => ahbi_s_ext,
|
|
|
ahbo_s_ext => ahbo_s_ext,
|
|
|
ahbi_m_ext => ahbi_m_ext,
|
|
|
ahbo_m_ext => ahbo_m_ext);
|
|
|
|
|
|
-------------------------------------------------------------------------------
|
|
|
-- APB_LFR_TIME_MANAGEMENT ----------------------------------------------------
|
|
|
-------------------------------------------------------------------------------
|
|
|
apb_lfr_time_management_1 : apb_lfr_time_management
|
|
|
GENERIC MAP (
|
|
|
pindex => 6,
|
|
|
paddr => 6,
|
|
|
pmask => 16#fff#,
|
|
|
pirq => 12,
|
|
|
nb_wait_pediod => 375) -- (49.152/2) /2^16 = 375
|
|
|
PORT MAP (
|
|
|
clk25MHz => clk_25,
|
|
|
clk49_152MHz => clk_24, -- 49.152MHz/2
|
|
|
resetn => rstn,
|
|
|
grspw_tick => swno.tickout,
|
|
|
apbi => apbi_ext,
|
|
|
apbo => apbo_ext(6),
|
|
|
coarse_time => coarse_time,
|
|
|
fine_time => fine_time);
|
|
|
|
|
|
-----------------------------------------------------------------------
|
|
|
--- SpaceWire --------------------------------------------------------
|
|
|
-----------------------------------------------------------------------
|
|
|
|
|
|
-- SPW_EN <= '1';
|
|
|
|
|
|
spw_clk <= clk_50_s;
|
|
|
spw_rxtxclk <= spw_clk;
|
|
|
spw_rxclkn <= NOT spw_rxtxclk;
|
|
|
|
|
|
-- PADS for SPW1
|
|
|
spw1_rxd_pad : inpad GENERIC MAP (tech => inferred)
|
|
|
PORT MAP (spw1_din, dtmp(0));
|
|
|
spw1_rxs_pad : inpad GENERIC MAP (tech => inferred)
|
|
|
PORT MAP (spw1_sin, stmp(0));
|
|
|
spw1_txd_pad : outpad GENERIC MAP (tech => inferred)
|
|
|
PORT MAP (spw1_dout, swno.d(0));
|
|
|
spw1_txs_pad : outpad GENERIC MAP (tech => inferred)
|
|
|
PORT MAP (spw1_sout, swno.s(0));
|
|
|
-- PADS FOR SPW2
|
|
|
spw2_rxd_pad : inpad GENERIC MAP (tech => inferred) -- bad naming of the MINI-LFR /!\
|
|
|
PORT MAP (spw2_sin, dtmp(1));
|
|
|
spw2_rxs_pad : inpad GENERIC MAP (tech => inferred) -- bad naming of the MINI-LFR /!\
|
|
|
PORT MAP (spw2_din, stmp(1));
|
|
|
spw2_txd_pad : outpad GENERIC MAP (tech => inferred)
|
|
|
PORT MAP (spw2_dout, swno.d(1));
|
|
|
spw2_txs_pad : outpad GENERIC MAP (tech => inferred)
|
|
|
PORT MAP (spw2_sout, swno.s(1));
|
|
|
|
|
|
-- GRSPW PHY
|
|
|
--spw1_input: if CFG_SPW_GRSPW = 1 generate
|
|
|
spw_inputloop : FOR j IN 0 TO 1 GENERATE
|
|
|
spw_phy0 : grspw_phy
|
|
|
GENERIC MAP(
|
|
|
tech => apa3e,
|
|
|
rxclkbuftype => 1,
|
|
|
scantest => 0)
|
|
|
PORT MAP(
|
|
|
rxrst => swno.rxrst,
|
|
|
di => dtmp(j),
|
|
|
si => stmp(j),
|
|
|
rxclko => spw_rxclk(j),
|
|
|
do => swni.d(j),
|
|
|
ndo => swni.nd(j*5+4 DOWNTO j*5),
|
|
|
dconnect => swni.dconnect(j*2+1 DOWNTO j*2));
|
|
|
END GENERATE spw_inputloop;
|
|
|
|
|
|
-- SPW core
|
|
|
sw0 : grspwm GENERIC MAP(
|
|
|
tech => apa3e,
|
|
|
hindex => 1,
|
|
|
pindex => 5,
|
|
|
paddr => 5,
|
|
|
pirq => 11,
|
|
|
sysfreq => 25000, -- CPU_FREQ
|
|
|
rmap => 1,
|
|
|
rmapcrc => 1,
|
|
|
fifosize1 => 16,
|
|
|
fifosize2 => 16,
|
|
|
rxclkbuftype => 1,
|
|
|
rxunaligned => 0,
|
|
|
rmapbufs => 4,
|
|
|
ft => 0,
|
|
|
netlist => 0,
|
|
|
ports => 2,
|
|
|
--dmachan => CFG_SPW_DMACHAN, -- not used byt the spw core 1
|
|
|
memtech => apa3e,
|
|
|
destkey => 2,
|
|
|
spwcore => 1
|
|
|
--input_type => CFG_SPW_INPUT, -- not used byt the spw core 1
|
|
|
--output_type => CFG_SPW_OUTPUT, -- not used byt the spw core 1
|
|
|
--rxtx_sameclk => CFG_SPW_RTSAME -- not used byt the spw core 1
|
|
|
)
|
|
|
PORT MAP(rstn, clk_25, spw_rxclk(0),
|
|
|
spw_rxclk(1), spw_rxtxclk, spw_rxtxclk,
|
|
|
ahbi_m_ext, ahbo_m_ext(1), apbi_ext, apbo_ext(5),
|
|
|
swni, swno);
|
|
|
|
|
|
swni.tickin <= '0';
|
|
|
swni.rmapen <= '1';
|
|
|
swni.clkdiv10 <= "00000100"; -- 10 MHz / (4 + 1) = 10 MHz
|
|
|
swni.tickinraw <= '0';
|
|
|
swni.timein <= (OTHERS => '0');
|
|
|
swni.dcrstval <= (OTHERS => '0');
|
|
|
swni.timerrstval <= (OTHERS => '0');
|
|
|
|
|
|
-------------------------------------------------------------------------------
|
|
|
-- LFR ------------------------------------------------------------------------
|
|
|
-------------------------------------------------------------------------------
|
|
|
lpp_lfr_1 : lpp_lfr_WFP_nMS
|
|
|
GENERIC MAP (
|
|
|
Mem_use => use_RAM,
|
|
|
nb_data_by_buffer_size => 32,
|
|
|
nb_word_by_buffer_size => 30,
|
|
|
nb_snapshot_param_size => 32,
|
|
|
delta_vector_size => 32,
|
|
|
delta_vector_size_f0_2 => 7, -- log2(96)
|
|
|
pindex => 15,
|
|
|
paddr => 15,
|
|
|
pmask => 16#fff#,
|
|
|
pirq_ms => 6,
|
|
|
pirq_wfp => 14,
|
|
|
hindex => 2,
|
|
|
top_lfr_version => X"010000") -- aa.bb.cc version
|
|
|
-- AA : BOARD NUMBER
|
|
|
-- 0 => MINI_LFR
|
|
|
-- 1 => EM
|
|
|
PORT MAP (
|
|
|
clk => clk_25,
|
|
|
rstn => rstn,
|
|
|
sample_B => sample(2 DOWNTO 0),
|
|
|
sample_E => sample(7 DOWNTO 3),
|
|
|
sample_val => sample_val,
|
|
|
apbi => apbi_ext,
|
|
|
apbo => apbo_ext(15),
|
|
|
ahbi => ahbi_m_ext,
|
|
|
ahbo => ahbo_m_ext(2),
|
|
|
coarse_time => coarse_time,
|
|
|
fine_time => fine_time,
|
|
|
data_shaping_BW => bias_fail_sw,
|
|
|
observation_reg => observation_reg);
|
|
|
|
|
|
-----------------------------------------------------------------------------
|
|
|
--
|
|
|
-----------------------------------------------------------------------------
|
|
|
top_ad_conv_RHF1401_1 : top_ad_conv_RHF1401
|
|
|
GENERIC MAP (
|
|
|
ChanelCount => 8,
|
|
|
ncycle_cnv_high => 40, -- TODO : 79
|
|
|
ncycle_cnv => 250) -- TODO : 500
|
|
|
PORT MAP (
|
|
|
cnv_clk => clk_24, -- TODO : 49.152
|
|
|
cnv_rstn => rstn, -- ok
|
|
|
cnv => ADC_smpclk, -- ok
|
|
|
clk => clk_25, -- ok
|
|
|
rstn => rstn, -- ok
|
|
|
ADC_data => ADC_data, -- ok
|
|
|
ADC_nOE => ADC_OEB_bar_CH, -- ok
|
|
|
sample => sample, -- ok
|
|
|
sample_val => sample_val); -- ok
|
|
|
|
|
|
END beh;
|
