HG_REPOSITORIES/LPP/INSTRUMENTATION/USERS/PELLION/VHD_Lib Commit - r262:b51052768d7e

DAC CAL input data via fifo

martin -

r262:b51052768d7e martin

parent child

Context file:

r262:b51052768d7e

Collapse all files

lib/lpp/lpp_cna/ReadFifo_GEN.vhd created 644 +67 0

@@ -0,0 +1,67
	1	------------------------------------------------------------------------------
	2	-- This file is a part of the LPP VHDL IP LIBRARY
	3	-- Copyright (C) 2009 - 2010, Laboratory of Plasmas Physic - CNRS
	4	--
	5	-- This program is free software; you can redistribute it and/or modify
	6	-- it under the terms of the GNU General Public License as published by
	7	-- the Free Software Foundation; either version 3 of the License, or
	8	-- (at your option) any later version.
	9	--
	10	-- This program is distributed in the hope that it will be useful,
	11	-- but WITHOUT ANY WARRANTY; without even the implied warranty of
	12	-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	13	-- GNU General Public License for more details.
	14	--
	15	-- You should have received a copy of the GNU General Public License
	16	-- along with this program; if not, write to the Free Software
	17	-- Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
	18	------------------------------------------------------------------------------
	19	-- Author : Martin Morlot
	20	-- Mail : martin.morlot@lpp.polytechnique.fr
	21	------------------------------------------------------------------------------
	22	library IEEE;
	23	use IEEE.numeric_std.all;
	24	use IEEE.std_logic_1164.all;
	25
	26	entity ReadFifo_GEN is
	27	port(
	28	clk,raz : in std_logic; --! Horloge et Reset du composant
	29	SYNC : in std_logic;
	30	Readn : out std_logic
	31	);
	32	end entity;
	33
	34
	35	architecture ar_ReadFifo_GEN of ReadFifo_GEN is
	36
	37	type etat is (eX,e0);
	38	signal ect : etat;
	39
	40	signal SYNC_reg : std_logic;
	41
	42	begin
	43	process(clk,raz)
	44	begin
	45	if(raz='0')then
	46	ect <= eX;
	47	Readn <= '1';
	48
	49	elsif(clk'event and clk='1')then
	50	SYNC_reg <= SYNC;
	51
	52	case ect is
	53	when eX =>
	54	if (SYNC_reg='0' and SYNC='1') then
	55	Readn <= '0';
	56	ect <= e0;
	57	end if;
	58
	59	when e0 =>
	60	Readn <= '1';
	61	ect <= eX;
	62
	63	end case;
	64	end if;
	65	end process;
	66
	67	end architecture; No newline at end of file

lib/lpp/lpp_cna/APB_DAC.vhd +11 -8

             ------------------------------------------------------------------------------
             --  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 grlib.stdlib.all;
             use grlib.devices.all;
             library lpp;
             use lpp.lpp_amba.all;
             use lpp.apb_devices_list.all;
             use lpp.lpp_cna.all;
             --! Driver APB, va faire le lien entre l'IP VHDL du convertisseur et le bus Amba
             entity APB_DAC is
               generic (
                 pindex   : integer := 0;
                 paddr    : integer := 0;
                 pmask    : integer := 16#fff#;
                 pirq     : integer := 0;
                 abits    : integer := 8;
                 cpt_serial : integer := 6);
               port (
                 clk     : in  std_logic;           --! Horloge du composant
                 rst     : in  std_logic;           --! Reset general du composant
                 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
+                DataIN : in std_logic_vector(15 downto 0);
                 Cal_EN  : out std_logic;           --! Signal Enable du multiplex pour la CAL
+                Readn   : out std_logic;
                 SYNC    : out std_logic;           --! Signal de synchronisation du convertisseur
                 SCLK    : out std_logic;           --! Horloge systeme du convertisseur
                 DATA    : out std_logic            --! Donn�e num�rique s�rialis�
                 );
             end entity;
             --! @details Les deux registres (apbi,apbo) permettent de g�rer la communication sur le bus
             --! et les sorties seront cabl�es vers le convertisseur.
             architecture ar_APB_DAC of APB_DAC is
             constant REVISION : integer := 1;
             constant pconfig : apb_config_type := (
 => ahb_device_reg (VENDOR_LPP, LPP_CNA, 0, REVISION, 0),
 => apb_iobar(paddr, pmask));
             signal enable   : std_logic;
             signal Ready : std_logic;
             type DAC_ctrlr_Reg is record
                  DAC_Cfg  : std_logic_vector(1 downto 0);
-                 DAC_Data : std_logic_vector(15 downto 0);
+            --     DAC_Data : std_logic_vector(15 downto 0);
             end record;
             signal Rec : DAC_ctrlr_Reg;
             signal Rdata     : std_logic_vector(31 downto 0);
             begin
             enable <= Rec.DAC_Cfg(0);
             Rec.DAC_Cfg(1) <= Ready;
                 CONV0 : DacDriver
                     generic map (cpt_serial)
-                    port map(clk,rst,enable,Rec.DAC_Data,SYNC,SCLK,Ready,Data);
+                    port map(clk,rst,enable,DataIN,SYNC,SCLK,Readn,Ready,Data);
+            --        port map(clk,rst,enable,Rec.DAC_Data,SYNC,SCLK,Ready,Data);
                 process(rst,clk)
                 begin
                     if(rst='0')then
-                        Rec.DAC_Data <=  (others => '0');
+            --            Rec.DAC_Data <=  (others => '0');
                     elsif(clk'event and clk='1')then
                 --APB Write OP
                         if (apbi.psel(pindex) and apbi.penable and apbi.pwrite) = '1' then
                             case apbi.paddr(abits-1 downto 2) is
                                 when "000000" =>
                                     Rec.DAC_Cfg(0) <= apbi.pwdata(0);
-                                when "000001" =>
+            --                    when "000001" =>
-                                    Rec.DAC_Data <= apbi.pwdata(15 downto 0);
+            --                        Rec.DAC_Data <= apbi.pwdata(15 downto 0);
                                 when others =>
                                     null;
                             end case;
                         end if;
                 --APB Read OP
                         if (apbi.psel(pindex) and (not apbi.pwrite)) = '1' then
                             case apbi.paddr(abits-1 downto 2) is
                                 when "000000" =>
                                     Rdata(31 downto 2) <= X"ABCDEF5" & "00";
                                     Rdata(1 downto 0) <= Rec.DAC_Cfg;
-                                when "000001" =>
+            --                    when "000001" =>
-                                    Rdata(31 downto 16) <= X"FD18";
+            --                        Rdata(31 downto 16) <= X"FD18";
-                                    Rdata(15 downto 0) <= Rec.DAC_Data;
+            --                        Rdata(15 downto 0) <= Rec.DAC_Data;
                                 when others =>
                                     Rdata <= (others => '0');
                             end case;
                         end if;
                     end if;
                     apbo.pconfig <= pconfig;
                 end process;
             apbo.prdata     <=   Rdata when apbi.penable = '1';
             Cal_EN <= enable;
             end architecture;

lib/lpp/lpp_cna/DacDriver.vhd +7 -4

             ------------------------------------------------------------------------------
             --  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;
             use IEEE.numeric_std.all;
             use lpp.lpp_cna.all;
             --! Programme du Convertisseur Num�rique/Analogique
             entity DacDriver is
             generic(cpt_serial : integer := 6);  --! G�n�rique contenant le r�sultat de la division clk/sclk  !!! clk=25Mhz
               port(
                 clk         : in std_logic;                        --! Horloge du composant
                 rst         : in std_logic;                        --! Reset general du composant
                 enable      : in std_logic;                        --! Autorise ou non l'utilisation du composant
-                Data_C      : in std_logic_vector(15 downto 0);    --! Donn�e Num�rique d'entr�e sur 16 bits
+                Data_IN      : in std_logic_vector(15 downto 0);    --! Donn�e Num�rique d'entr�e sur 16 bits
                 SYNC        : out std_logic;                       --! Signal de synchronisation du convertisseur
                 SCLK        : out std_logic;                       --! Horloge systeme du convertisseur
+                Readn       : out std_logic;
                 Ready     : out std_logic;                       --! Flag, signale la fin de la s�rialisation d'une donn�e
                 Data        : out std_logic                        --! Donn�e num�rique s�rialis�
                 );
             end entity;
             --! @details Un driver C va permettre de g�nerer un tableau de donn�es sur 16 bits,
             --! qui seront s�rialis� pour �tre ensuite dirig�es vers le convertisseur.
             architecture ar_DacDriver of DacDriver is
             signal s_SCLK      : std_logic;
-            signal Sended    : std_logic;
+            signal Send    : std_logic;
             begin
             SystemCLK : Systeme_Clock
                 generic map (cpt_serial)
                 port map (clk,rst,s_SCLK);
             Signal_sync : Gene_SYNC
-                port map (s_SCLK,rst,enable,Sended,SYNC);
+                port map (s_SCLK,rst,enable,Send,SYNC);
             Serial : serialize
-                port map (clk,rst,s_SCLK,Data_C,Sended,Ready,Data);
+                port map (clk,rst,s_SCLK,Data_IN,Send,Ready,Data);
+            RenGEN : ReadFifo_GEN
+                port map (clk,rst,Send,Readn);
             SCLK        <= s_SCLK;
             end architecture;

lib/lpp/lpp_cna/Gene_SYNC.vhd +4 -4

             ------------------------------------------------------------------------------
             --  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;
             use IEEE.numeric_std.all;
             --! Programme qui va permettre de g�n�rer le signal SYNC
             entity Gene_SYNC is
               port(
                 SCLK,raz : in std_logic;     --! Horloge systeme et Reset du composant
                 enable : in std_logic;       --! Autorise ou non l'utilisation du composant
-                Sended : out std_logic;   --! Flag, Autorise l'envoi (s�rialisation) d'une nouvelle donn�e
+                Send : out std_logic;   --! Flag, Autorise l'envoi (s�rialisation) d'une nouvelle donn�e
                 SYNC : out std_logic         --! Signal de synchronisation du convertisseur g�n�r�
                 );
             end Gene_SYNC;
             --! @details NB: Ce programme est uniquement synchronis� sur l'horloge Systeme (sclk)
             architecture ar_Gene_SYNC of Gene_SYNC is
             signal count : integer;
             begin
                 process (SCLK,raz)
                 begin
                     if(raz='0')then
                         SYNC <= '0';
                         count <= 14;
-                        Sended <= '0';
+                        Send <= '0';
                     elsif(SCLK' event and SCLK='1')then
                         if(enable='1')then
                             if(count=15)then
                                 SYNC <= '1';
                                 count <= count+1;
                             elsif(count=16)then
                                 count <= 0;
                                 SYNC <= '0';
-                                Sended <= '1';
+                                Send <= '1';
                             else
                                 count <= count+1;
-                                Sended <= '0';
+                                Send <= '0';
                             end if;
                         end if;
                   	end if;
                 end process;
             end ar_Gene_SYNC;

lib/lpp/lpp_cna/lpp_cna.vhd +20 -8

             ------------------------------------------------------------------------------
             --  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_cna is
             component APB_DAC is
               generic (
                 pindex   : integer := 0;
                 paddr    : integer := 0;
                 pmask    : integer := 16#fff#;
                 pirq     : integer := 0;
-                abits    : integer := 8);
+                abits    : integer := 8;
+                cpt_serial : integer := 6);
               port (
                 clk     : in  std_logic;
                 rst     : in  std_logic;
                 apbi    : in  apb_slv_in_type;
                 apbo    : out apb_slv_out_type;
-                Cal_EN  : out std_logic;
+                DataIN : in std_logic_vector(15 downto 0);
-                SYNC    : out std_logic;
+                Cal_EN  : out std_logic;           --! Signal Enable du multiplex pour la CAL
-                SCLK    : out std_logic;
+                Readn   : out std_logic;
+                SYNC    : out std_logic;           --! Signal de synchronisation du convertisseur
+                SCLK    : out std_logic;           --! Horloge systeme du convertisseur
                 DATA    : out std_logic
                 );
             end component;
             component DacDriver is
             generic(cpt_serial : integer := 6);  --! G�n�rique contenant le r�sultat de la division clk/sclk  !!! clk=25Mhz
                 port(
                     clk       : in std_logic;
                     rst         : in std_logic;
                     enable      : in std_logic;
-                    Data_C      : in std_logic_vector(15 downto 0);
+                    Data_IN      : in std_logic_vector(15 downto 0);    --! Donn�e Num�rique d'entr�e sur 16 bits
-                    SYNC        : out std_logic;
+                    SYNC        : out std_logic;                       --! Signal de synchronisation du convertisseur
-                    SCLK        : out std_logic;
+                    SCLK        : out std_logic;                       --! Horloge systeme du convertisseur
+                    Readn       : out std_logic;
                     Ready     : out std_logic;
                     Data        : out std_logic
                     );
             end component;
             component Systeme_Clock is
                 generic(N :integer := 695);
                 port(
                     clk, raz   : in std_logic ;
                     sclk      : out std_logic);
             end component;
             component Gene_SYNC is
                 port(
                 SCLK,raz : in std_logic;     --! Horloge systeme et Reset du composant
                 enable : in std_logic;       --! Autorise ou non l'utilisation du composant
-                Sended : out std_logic;   --! Flag, Autorise l'envoi (s�rialisation) d'une nouvelle donn�e
+                Send : out std_logic;   --! Flag, Autorise l'envoi (s�rialisation) d'une nouvelle donn�e
                 SYNC : out std_logic);         --! Signal de synchronisation du convertisseur g�n�r�
             end component;
             component Serialize is
             port(
                 clk,raz : in std_logic;
                 sclk    : in std_logic;
                 vectin  : in std_logic_vector(15 downto 0);
                 send    : in std_logic;
                 sended  : out std_logic;
                 Data    : out std_logic);
             end component;
+            component ReadFifo_GEN is
+              port(
+                clk,raz : in std_logic;                      --! Horloge et Reset du composant
+                SYNC : in std_logic;
+                Readn : out std_logic
+                );
+            end component;
             end;

General Comments 0

Write
Preview

You need to be logged in to leave comments. Login now

No TODOs yet

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages