idt70t3589.vhd

vhdl cod for ram.For sp3e

        DataInL(15)     => IO15L_ipd   ,
        DataInL(16)     => IO16L_ipd   ,
        DataInL(17)     => IO17L_ipd   ,
        DataInL(18)     => IO18L_ipd   ,
        DataInL(19)     => IO19L_ipd   ,
        DataInL(20)     => IO20L_ipd   ,
        DataInL(21)     => IO21L_ipd   ,
        DataInL(22)     => IO22L_ipd   ,
        DataInL(23)     => IO23L_ipd   ,
        DataInL(24)     => IO24L_ipd   ,
        DataInL(25)     => IO25L_ipd   ,
        DataInL(26)     => IO26L_ipd   ,
        DataInL(27)     => IO27L_ipd   ,
        DataInL(28)     => IO28L_ipd   ,
        DataInL(29)     => IO29L_ipd   ,
        DataInL(30)     => IO30L_ipd   ,
        DataInL(31)     => IO31L_ipd   ,
        DataInL(32)     => IO32L_ipd   ,
        DataInL(33)     => IO33L_ipd   ,
        DataInL(34)     => IO34L_ipd   ,
        DataInL(35)     => IO35L_ipd   ,

        DataOutL(0 )    => IO0L    ,
        DataOutL(1 )    => IO1L    ,
        DataOutL(2 )    => IO2L    ,
        DataOutL(3 )    => IO3L    ,
        DataOutL(4 )    => IO4L    ,
        DataOutL(5 )    => IO5L    ,
        DataOutL(6 )    => IO6L    ,
        DataOutL(7 )    => IO7L    ,
        DataOutL(8 )    => IO8L    ,
        DataOutL(9 )    => IO9L    ,
        DataOutL(10)    => IO10L   ,
        DataOutL(11)    => IO11L   ,
        DataOutL(12)    => IO12L   ,
        DataOutL(13)    => IO13L   ,
        DataOutL(14)    => IO14L   ,
        DataOutL(15)    => IO15L   ,
        DataOutL(16)    => IO16L   ,
        DataOutL(17)    => IO17L   ,
        DataOutL(18)    => IO18L   ,
        DataOutL(19)    => IO19L   ,
        DataOutL(20)    => IO20L   ,
        DataOutL(21)    => IO21L   ,
        DataOutL(22)    => IO22L   ,
        DataOutL(23)    => IO23L   ,
        DataOutL(24)    => IO24L   ,
        DataOutL(25)    => IO25L   ,
        DataOutL(26)    => IO26L   ,
        DataOutL(27)    => IO27L   ,
        DataOutL(28)    => IO28L   ,
        DataOutL(29)    => IO29L   ,
        DataOutL(30)    => IO30L   ,
        DataOutL(31)    => IO31L   ,
        DataOutL(32)    => IO32L   ,
        DataOutL(33)    => IO33L   ,
        DataOutL(34)    => IO34L   ,
        DataOutL(35)    => IO35L   ,

        RWL             => RWL_ipd       ,
        CEL(0)          => CE0NegL_ipd   ,
        CEL(1)          => CE1L_ipd      ,
        OEL             => OENegL_ipd   ,
        ClockL          => CLKL_ipd      ,
        CNTENNegL       => CNTENNegL_ipd ,
        PLNegL          => PLNegL_ipd    ,
        ADSNegL         => ADSNegL_ipd   ,
        REPEATNegL      => REPEATNegL_ipd,
        BENegL(0)       => BE0NegL_ipd   ,
        BENegL(1)       => BE1NegL_ipd   ,
        BENegL(2)       => BE2NegL_ipd   ,
        BENegL(3)       => BE3NegL_ipd   ,
        ZZL             => ZZL_ipd       ,
        INTNegL         => INTNegL       ,
        COLNegL         => COLNegL       ,

        AddressR(0 )    => A0R_ipd   ,
        AddressR(1 )    => A1R_ipd   ,
        AddressR(2 )    => A2R_ipd   ,
        AddressR(3 )    => A3R_ipd   ,
        AddressR(4 )    => A4R_ipd   ,
        AddressR(5 )    => A5R_ipd   ,
        AddressR(6 )    => A6R_ipd   ,
        AddressR(7 )    => A7R_ipd   ,
        AddressR(8 )    => A8R_ipd   ,
        AddressR(9 )    => A9R_ipd   ,
        AddressR(10)    => A10R_ipd ,
        AddressR(11)    => A11R_ipd ,
        AddressR(12)    => A12R_ipd ,
        AddressR(13)    => A13R_ipd ,
        AddressR(14)    => A14R_ipd ,
        AddressR(15)    => A15R_ipd ,

        DataInR(0 )     => IO0R_ipd    ,
        DataInR(1 )     => IO1R_ipd    ,
        DataInR(2 )     => IO2R_ipd    ,
        DataInR(3 )     => IO3R_ipd    ,
        DataInR(4 )     => IO4R_ipd    ,
        DataInR(5 )     => IO5R_ipd    ,
        DataInR(6 )     => IO6R_ipd    ,
        DataInR(7 )     => IO7R_ipd    ,
        DataInR(8 )     => IO8R_ipd    ,
        DataInR(9 )     => IO9R_ipd    ,
        DataInR(10)     => IO10R_ipd   ,
        DataInR(11)     => IO11R_ipd   ,
        DataInR(12)     => IO12R_ipd   ,
        DataInR(13)     => IO13R_ipd   ,
        DataInR(14)     => IO14R_ipd   ,
        DataInR(15)     => IO15R_ipd   ,
        DataInR(16)     => IO16R_ipd   ,
        DataInR(17)     => IO17R_ipd   ,
        DataInR(18)     => IO18R_ipd   ,
        DataInR(19)     => IO19R_ipd   ,
        DataInR(20)     => IO20R_ipd   ,
        DataInR(21)     => IO21R_ipd   ,
        DataInR(22)     => IO22R_ipd   ,
        DataInR(23)     => IO23R_ipd   ,
        DataInR(24)     => IO24R_ipd   ,
        DataInR(25)     => IO25R_ipd   ,
        DataInR(26)     => IO26R_ipd   ,
        DataInR(27)     => IO27R_ipd   ,
        DataInR(28)     => IO28R_ipd   ,
        DataInR(29)     => IO29R_ipd   ,
        DataInR(30)     => IO30R_ipd   ,
        DataInR(31)     => IO31R_ipd   ,
        DataInR(32)     => IO32R_ipd   ,
        DataInR(33)     => IO33R_ipd   ,
        DataInR(34)     => IO34R_ipd   ,
        DataInR(35)     => IO35R_ipd   ,

        DataOutR(0 )    => IO0R    ,
        DataOutR(1 )    => IO1R    ,
        DataOutR(2 )    => IO2R    ,
        DataOutR(3 )    => IO3R    ,
        DataOutR(4 )    => IO4R    ,
        DataOutR(5 )    => IO5R    ,
        DataOutR(6 )    => IO6R    ,
        DataOutR(7 )    => IO7R    ,
        DataOutR(8 )    => IO8R    ,
        DataOutR(9 )    => IO9R    ,
        DataOutR(10)    => IO10R   ,
        DataOutR(11)    => IO11R   ,
        DataOutR(12)    => IO12R   ,
        DataOutR(13)    => IO13R   ,
        DataOutR(14)    => IO14R   ,
        DataOutR(15)    => IO15R   ,
        DataOutR(16)    => IO16R   ,
        DataOutR(17)    => IO17R   ,
        DataOutR(18)    => IO18R   ,
        DataOutR(19)    => IO19R   ,
        DataOutR(20)    => IO20R   ,
        DataOutR(21)    => IO21R   ,
        DataOutR(22)    => IO22R   ,
        DataOutR(23)    => IO23R   ,
        DataOutR(24)    => IO24R   ,
        DataOutR(25)    => IO25R   ,
        DataOutR(26)    => IO26R   ,
        DataOutR(27)    => IO27R   ,
        DataOutR(28)    => IO28R   ,
        DataOutR(29)    => IO29R   ,
        DataOutR(30)    => IO30R   ,
        DataOutR(31)    => IO31R   ,
        DataOutR(32)    => IO32R   ,
        DataOutR(33)    => IO33R   ,
        DataOutR(34)    => IO34R   ,
        DataOutR(35)    => IO35R   ,

        RWR             => RWR_ipd       ,
        CER(0)          => CE0NegR_ipd   ,
        CER(1)          => CE1R_ipd      ,
        OER             => OENegR_ipd   ,
        ClockR          => CLKR_ipd      ,
        CNTENNegR       => CNTENNegR_ipd ,
        PLNegR          => PLNegR_ipd    ,
        ADSNegR         => ADSNegR_ipd   ,
        REPEATNegR      => REPEATNegR_ipd,
        BENegR(0)       => BE0NegR_ipd   ,
        BENegR(1)       => BE1NegR_ipd   ,
        BENegR(2)       => BE2NegR_ipd   ,
        BENegR(3)       => BE3NegR_ipd   ,
        ZZR             => ZZR_ipd       ,
        INTNegR         => INTNegR       ,
        COLNegR         => COLNegR       ,

        TDI             => TDI_ipd     ,
        TCK             => TCK_ipd     ,
        TMS             => TMS_ipd     ,
        TRSTNeg         => TRSTNeg_ipd ,
        TDO             => TDO
    );

    SIGNAL DOL_zd  : std_logic_vector(35 downto 0);
    SIGNAL DOR_zd  : std_logic_vector(35 downto 0);
    SIGNAL Viol         : X01 := '0';

    TYPE Instruction IS (idcode,
                         extest,
                         bypass,
                         highz,
                         sample_preload,
                         clamp,
                         reserved
                        );

    SIGNAL Instruct  : Instruction;
    SIGNAL BSReg     : std_logic_vector(149 downto 0) := (OTHERS => '1');

BEGIN
-------------------------------------------------------------------------------
-- Timing Check and JTAG
-------------------------------------------------------------------------------
    TimingCheckP: PROCESS(AddressL, DataInL, RWL, CEL, OEL, ClockL, PLNegL,
                          ADSNegL, CNTENNegL, REPEATNegL, BENegL,
                          AddressR, DataInR, RWR, CER, OER, ClockR, PLNegR,
                          ADSNegR, CNTENNegR, REPEATNegR, BENegR,
                          TDI, TCK, TMS, TRSTNeg)--, left, right )
        -- VARIABLE

        TYPE tap_state_type IS (Test_Logic_Reset,
                                Run_Test_Idle,
                                Select_DR_Scan,
                                Capture_DR,
                                Shift_DR,
                                Exit1_DR,
                                Pause_DR,
                                Exit2_DR,
                                Update_DR,
                                Select_IR_Scan,
                                Capture_IR,
                                Shift_IR,
                                Exit1_IR,
                                Pause_IR,
                                Exit2_IR,
                                Update_IR
                                );

        VARIABLE TAP_state   : tap_state_type;

        VARIABLE BYReg       : std_logic := '0';
        VARIABLE MSReg       : std_logic_vector(1 downto 0) := "00";
        VARIABLE IReg        : std_logic_vector(3 downto 0);
        VARIABLE MRReg       : std_logic_vector(25 downto 0)
                                    := (others => '0');
        VARIABLE IDReg       : std_logic_vector(31 downto 0);
        VARIABLE BYTmp       : std_logic;
        VARIABLE MSTmp       : std_logic_vector(1 downto 0);
        VARIABLE ITmp        : std_logic_vector(3 downto 0);
        VARIABLE MRTmp       : std_logic_vector(25 downto 0);
        VARIABLE IDTmp       : std_logic_vector(31 downto 0);
        VARIABLE BSTmp       : std_logic_vector(149 downto 0)
                                    := (others => '1');
        VARIABLE TDOTmp      : std_logic;

        VARIABLE Shift       : BOOLEAN := false;
        VARIABLE UpdateIR    : BOOLEAN := false;
        VARIABLE UpdateDR    : BOOLEAN := false;

        -- Output Glitch Detection Variables
        VARIABLE TDO_GlitchData         : VitalGlitchDataType;

        VARIABLE TDO_zd                 : std_logic := 'Z';

        VARIABLE Tviol_A0_CENeg   : X01 := '0';
        VARIABLE TD_A0_CENeg      : VitalTimingDataType;