AD7688_drvr.vhd
101 lines
| 2.7 KiB
| text/x-vhdl
|
VhdlLexer
|
r19 | ------------------------------------------------------------------------------ | ||
-- 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 | ||||
------------------------------------------------------------------------------- | ||||
|
r38 | -- Author : Alexis Jeandet | ||
-- Mail : alexis.jeandet@lpp.polytechnique.fr | ||||
---------------------------------------------------------------------------- | ||||
|
r19 | library IEEE; | ||
use IEEE.STD_LOGIC_1164.ALL; | ||||
|
r20 | library lpp; | ||
use lpp.lpp_ad_conv.all; | ||||
use lpp.general_purpose.Clk_divider; | ||||
|
r19 | |||
entity AD7688_drvr is | ||||
generic(ChanelCount : integer; | ||||
clkkHz : integer); | ||||
Port ( clk : in STD_LOGIC; | ||||
reset : in STD_LOGIC; | ||||
smplClk: in STD_LOGIC; | ||||
|
r20 | DataReady : out std_logic; | ||
|
r19 | smpout : out Samples_out(ChanelCount-1 downto 0); | ||
AD_in : in AD7688_in(ChanelCount-1 downto 0); | ||||
AD_out : out AD7688_out); | ||||
end AD7688_drvr; | ||||
architecture ar_AD7688_drvr of AD7688_drvr is | ||||
|
r20 | constant convTrigger : integer:= clkkHz*16/10000; --tconv = 1.6µs | ||
|
r19 | |||
|
r20 | signal i : integer range 0 to convTrigger :=0; | ||
signal clk_int : std_logic; | ||||
signal smplClk_reg : std_logic; | ||||
signal cnv_int : std_logic; | ||||
|
r19 | |||
begin | ||||
|
r20 | clkdiv: if clkkHz>=66000 generate | ||
clkdivider: Clk_divider | ||||
generic map(clkkHz*1000,60000000) | ||||
Port map( clk ,reset,clk_int); | ||||
end generate; | ||||
clknodiv: if clkkHz<66000 generate | ||||
nodiv: clk_int <= clk; | ||||
end generate; | ||||
AD_out.CNV <= cnv_int; | ||||
AD_out.SCK <= clk_int; | ||||
|
r19 | sckgen: process(clk,reset) | ||
begin | ||||
if reset = '0' then | ||||
i <= 0; | ||||
|
r20 | cnv_int <= '0'; | ||
smplClk_reg <= '0'; | ||||
|
r19 | elsif clk'event and clk = '1' then | ||
|
r20 | if smplClk = '1' and smplClk_reg = '0' then | ||
if i = convTrigger then | ||||
smplClk_reg <= '1'; | ||||
i <= 0; | ||||
cnv_int <= '0'; | ||||
else | ||||
i <= i+1; | ||||
cnv_int <= '1'; | ||||
end if; | ||||
elsif smplClk = '0' and smplClk_reg = '1' then | ||||
smplClk_reg <= '0'; | ||||
end if; | ||||
|
r19 | end if; | ||
end process; | ||||
|
r20 | |||
spidrvr: AD7688_spi_if | ||||
generic map(ChanelCount) | ||||
Port map(clk_int,reset,cnv_int,DataReady,AD_in,smpout); | ||||
|
r19 | end ar_AD7688_drvr; | ||
|
r20 | |||