cy7c1334.vhd

vhdl cod for ram.For sp3e

    ----------------------------------------------------------------------------
    WireDelay : BLOCK
    BEGIN

        w_1 : VitalWireDelay (A0_ipd, A0, tipd_A0);
        w_2 : VitalWireDelay (A1_ipd, A1, tipd_A1);
        w_3 : VitalWireDelay (A2_ipd, A2, tipd_A2);
        w_4 : VitalWireDelay (A3_ipd, A3, tipd_A3);
        w_5 : VitalWireDelay (A4_ipd, A4, tipd_A4);
        w_6 : VitalWireDelay (A5_ipd, A5, tipd_A5);
        w_7 : VitalWireDelay (A6_ipd, A6, tipd_A6);
        w_8 : VitalWireDelay (A7_ipd, A7, tipd_A7);
        w_9 : VitalWireDelay (A8_ipd, A8, tipd_A8);
        w_10 : VitalWireDelay (A9_ipd, A9, tipd_A9);
        w_11 : VitalWireDelay (A10_ipd, A10, tipd_A10);
        w_12 : VitalWireDelay (A11_ipd, A11, tipd_A11);
        w_13 : VitalWireDelay (A12_ipd, A12, tipd_A12);
        w_14 : VitalWireDelay (A13_ipd, A13, tipd_A13);
        w_15 : VitalWireDelay (A14_ipd, A14, tipd_A14);
        w_16 : VitalWireDelay (A15_ipd, A15, tipd_A15);
        w_21 : VitalWireDelay (DQA0_ipd, DQA0, tipd_DQA0);
        w_22 : VitalWireDelay (DQA1_ipd, DQA1, tipd_DQA1);
        w_23 : VitalWireDelay (DQA2_ipd, DQA2, tipd_DQA2);
        w_24 : VitalWireDelay (DQA3_ipd, DQA3, tipd_DQA3);
        w_25 : VitalWireDelay (DQA4_ipd, DQA4, tipd_DQA4);
        w_26 : VitalWireDelay (DQA5_ipd, DQA5, tipd_DQA5);
        w_27 : VitalWireDelay (DQA6_ipd, DQA6, tipd_DQA6);
        w_28 : VitalWireDelay (DQA7_ipd, DQA7, tipd_DQA7);
        w_31 : VitalWireDelay (DQB0_ipd, DQB0, tipd_DQB0);
        w_32 : VitalWireDelay (DQB1_ipd, DQB1, tipd_DQB1);
        w_33 : VitalWireDelay (DQB2_ipd, DQB2, tipd_DQB2);
        w_34 : VitalWireDelay (DQB3_ipd, DQB3, tipd_DQB3);
        w_35 : VitalWireDelay (DQB4_ipd, DQB4, tipd_DQB4);
        w_36 : VitalWireDelay (DQB5_ipd, DQB5, tipd_DQB5);
        w_37 : VitalWireDelay (DQB6_ipd, DQB6, tipd_DQB6);
        w_38 : VitalWireDelay (DQB7_ipd, DQB7, tipd_DQB7);
        w_41 : VitalWireDelay (DQC0_ipd, DQC0, tipd_DQC0);
        w_42 : VitalWireDelay (DQC1_ipd, DQC1, tipd_DQC1);
        w_43 : VitalWireDelay (DQC2_ipd, DQC2, tipd_DQC2);
        w_44 : VitalWireDelay (DQC3_ipd, DQC3, tipd_DQC3);
        w_45 : VitalWireDelay (DQC4_ipd, DQC4, tipd_DQC4);
        w_46 : VitalWireDelay (DQC5_ipd, DQC5, tipd_DQC5);
        w_47 : VitalWireDelay (DQC6_ipd, DQC6, tipd_DQC6);
        w_48 : VitalWireDelay (DQC7_ipd, DQC7, tipd_DQC7);
        w_51 : VitalWireDelay (DQD0_ipd, DQD0, tipd_DQD0);
        w_52 : VitalWireDelay (DQD1_ipd, DQD1, tipd_DQD1);
        w_53 : VitalWireDelay (DQD2_ipd, DQD2, tipd_DQD2);
        w_54 : VitalWireDelay (DQD3_ipd, DQD3, tipd_DQD3);
        w_55 : VitalWireDelay (DQD4_ipd, DQD4, tipd_DQD4);
        w_56 : VitalWireDelay (DQD5_ipd, DQD5, tipd_DQD5);
        w_57 : VitalWireDelay (DQD6_ipd, DQD6, tipd_DQD6);
        w_58 : VitalWireDelay (DQD7_ipd, DQD7, tipd_DQD7);
        w_61 : VitalWireDelay (ADV_ipd, ADV, tipd_ADV);
        w_62 : VitalWireDelay (R_ipd, R, tipd_R);
        w_63 : VitalWireDelay (CLKENNeg_ipd, CLKENNeg, tipd_CLKENNeg);
        w_64 : VitalWireDelay (BWDNeg_ipd, BWDNeg, tipd_BWDNeg);
        w_65 : VitalWireDelay (BWCNeg_ipd, BWCNeg, tipd_BWCNeg);
        w_66 : VitalWireDelay (BWBNeg_ipd, BWBNeg, tipd_BWBNeg);
        w_67 : VitalWireDelay (BWANeg_ipd, BWANeg, tipd_BWANeg);
        w_68 : VitalWireDelay (CE1Neg_ipd, CE1Neg, tipd_CE1Neg);
        w_69 : VitalWireDelay (CE2Neg_ipd, CE2Neg, tipd_CE2Neg);
        w_70 : VitalWireDelay (CE2_ipd, CE2, tipd_CE2);
        w_71 : VitalWireDelay (CLK_ipd, CLK, tipd_CLK);
        w_72 : VitalWireDelay (LBONeg_ipd, LBONeg, tipd_LBONeg);
        w_73 : VitalWireDelay (OENeg_ipd, OENeg, tipd_OENeg);

    END BLOCK;

    A0_nwv <= To_UX01(A0_ipd);
    A1_nwv <= To_UX01(A1_ipd);
    A2_nwv <= To_UX01(A2_ipd);
    A3_nwv <= To_UX01(A3_ipd);
    A4_nwv <= To_UX01(A4_ipd);
    A5_nwv <= To_UX01(A5_ipd);
    A6_nwv <= To_UX01(A6_ipd);
    A7_nwv <= To_UX01(A7_ipd);
    A8_nwv <= To_UX01(A8_ipd);
    A9_nwv <= To_UX01(A9_ipd);
    A10_nwv <= To_UX01(A10_ipd);
    A11_nwv <= To_UX01(A11_ipd);
    A12_nwv <= To_UX01(A12_ipd);
    A13_nwv <= To_UX01(A13_ipd);
    A14_nwv <= To_UX01(A14_ipd);
    A15_nwv <= To_UX01(A15_ipd);
    DQA0_nwv <= To_UX01(DQA0_ipd);
    DQA1_nwv <= To_UX01(DQA1_ipd);
    DQA2_nwv <= To_UX01(DQA2_ipd);
    DQA3_nwv <= To_UX01(DQA3_ipd);
    DQA4_nwv <= To_UX01(DQA4_ipd);
    DQA5_nwv <= To_UX01(DQA5_ipd);
    DQA6_nwv <= To_UX01(DQA6_ipd);
    DQA7_nwv <= To_UX01(DQA7_ipd);
    DQB0_nwv <= To_UX01(DQB0_ipd);
    DQB1_nwv <= To_UX01(DQB1_ipd);
    DQB2_nwv <= To_UX01(DQB2_ipd);
    DQB3_nwv <= To_UX01(DQB3_ipd);
    DQB4_nwv <= To_UX01(DQB4_ipd);
    DQB5_nwv <= To_UX01(DQB5_ipd);
    DQB6_nwv <= To_UX01(DQB6_ipd);
    DQB7_nwv <= To_UX01(DQB7_ipd);
    DQC0_nwv <= To_UX01(DQC0_ipd);
    DQC1_nwv <= To_UX01(DQC1_ipd);
    DQC2_nwv <= To_UX01(DQC2_ipd);
    DQC3_nwv <= To_UX01(DQC3_ipd);
    DQC4_nwv <= To_UX01(DQC4_ipd);
    DQC5_nwv <= To_UX01(DQC5_ipd);
    DQC6_nwv <= To_UX01(DQC6_ipd);
    DQC7_nwv <= To_UX01(DQC7_ipd);
    DQD0_nwv <= To_UX01(DQD0_ipd);
    DQD1_nwv <= To_UX01(DQD1_ipd);
    DQD2_nwv <= To_UX01(DQD2_ipd);
    DQD3_nwv <= To_UX01(DQD3_ipd);
    DQD4_nwv <= To_UX01(DQD4_ipd);
    DQD5_nwv <= To_UX01(DQD5_ipd);
    DQD6_nwv <= To_UX01(DQD6_ipd);
    DQD7_nwv <= To_UX01(DQD7_ipd);
    ADV_nwv <= To_UX01(ADV_ipd);
    R_nwv <= To_UX01(R_ipd);
    CLKENNeg_nwv <= To_UX01(CLKENNeg_ipd);
    BWDNeg_nwv <= To_UX01(BWDNeg_ipd);
    BWCNeg_nwv <= To_UX01(BWCNeg_ipd);
    BWBNeg_nwv <= To_UX01(BWBNeg_ipd);
    BWANeg_nwv <= To_UX01(BWANeg_ipd);
    CE1Neg_nwv <= To_UX01(CE1Neg_ipd);
    CE2Neg_nwv <= To_UX01(CE2Neg_ipd);
    CE2_nwv <= To_UX01(CE2_ipd);
    CLK_nwv <= To_UX01(CLK_ipd);
    LBONeg_nwv <= To_UX01(LBONeg_ipd);
    OENeg_nwv <= To_UX01(OENeg_ipd);

    ----------------------------------------------------------------------------
    -- Main Behavior Block
    ----------------------------------------------------------------------------
    Behavior: BLOCK

        PORT (
            BWDNIn          : IN    std_ulogic := 'U';
            BWCNIn          : IN    std_ulogic := 'U';
            BWBNIn          : IN    std_ulogic := 'U';
            BWANIn          : IN    std_ulogic := 'U';
            DatDIn          : IN    std_logic_vector(7 downto 0);
            DatCIn          : IN    std_logic_vector(7 downto 0);
            DatBIn          : IN    std_logic_vector(7 downto 0);
            DatAIn          : IN    std_logic_vector(7 downto 0);
            DataOut         : OUT   std_logic_vector(31 downto 0)
                                                     := (others => 'Z');
            CLKIn           : IN    std_ulogic := 'U';
            CKENIn          : IN    std_ulogic := 'U';
            AddressIn       : IN    std_logic_vector(15 downto 0);
            OENegIn         : IN    std_ulogic := 'U';
            RIn             : IN    std_ulogic := 'U';
            ADVIn           : IN    std_ulogic := 'U';
            CE2In           : IN    std_ulogic := 'U';
            LBONegIn        : IN    std_ulogic := '1';
            CE1NegIn        : IN    std_ulogic := 'U';
            CE2NegIn        : IN    std_ulogic := 'U'
        );
        PORT MAP (
            BWDNIn => BWDNeg_nwv,
            BWCNIn => BWCNeg_nwv,
            BWBNIn => BWBNeg_nwv,
            BWANIn => BWANeg_nwv,
            CLKIn => CLK_nwv,
            CKENIn => CLKENNeg_nwv,
            OENegIn => OENeg_nwv,
            RIn => R_nwv,
            ADVIn => ADV_nwv,
            CE2In => CE2_nwv,
            LBONegIn => LBONeg_nwv,
            CE1NegIn => CE1Neg_nwv,
            CE2NegIn => CE2Neg_nwv,
            DataOut(0) =>  DQA0,
            DataOut(1) =>  DQA1,
            DataOut(2) =>  DQA2,
            DataOut(3) =>  DQA3,
            DataOut(4) =>  DQA4,
            DataOut(5) =>  DQA5,
            DataOut(6) =>  DQA6,
            DataOut(7) =>  DQA7,
            DataOut(8) =>  DQB0,
            DataOut(9) =>  DQB1,
            DataOut(10) =>  DQB2,
            DataOut(11) =>  DQB3,
            DataOut(12) =>  DQB4,
            DataOut(13) =>  DQB5,
            DataOut(14) =>  DQB6,
            DataOut(15) =>  DQB7,
            DataOut(16) =>  DQC0,
            DataOut(17) =>  DQC1,
            DataOut(18) =>  DQC2,
            DataOut(19) =>  DQC3,
            DataOut(20) =>  DQC4,
            DataOut(21) =>  DQC5,
            DataOut(22) =>  DQC6,
            DataOut(23) =>  DQC7,
            DataOut(24) =>  DQD0,
            DataOut(25) =>  DQD1,
            DataOut(26) =>  DQD2,
            DataOut(27) =>  DQD3,
            DataOut(28) =>  DQD4,
            DataOut(29) =>  DQD5,
            DataOut(30) =>  DQD6,
            DataOut(31) =>  DQD7,
            DatAIn(0) =>  DQA0_nwv,
            DatAIn(1) =>  DQA1_nwv,
            DatAIn(2) =>  DQA2_nwv,
            DatAIn(3) =>  DQA3_nwv,
            DatAIn(4) =>  DQA4_nwv,
            DatAIn(5) =>  DQA5_nwv,
            DatAIn(6) =>  DQA6_nwv,
            DatAIn(7) =>  DQA7_nwv,
            DatBIn(0) =>  DQB0_nwv,
            DatBIn(1) =>  DQB1_nwv,
            DatBIn(2) =>  DQB2_nwv,
            DatBIn(3) =>  DQB3_nwv,
            DatBIn(4) =>  DQB4_nwv,
            DatBIn(5) =>  DQB5_nwv,
            DatBIn(6) =>  DQB6_nwv,
            DatBIn(7) =>  DQB7_nwv,
            DatCIn(0) =>  DQC0_nwv,
            DatCIn(1) =>  DQC1_nwv,
            DatCIn(2) =>  DQC2_nwv,
            DatCIn(3) =>  DQC3_nwv,
            DatCIn(4) =>  DQC4_nwv,
            DatCIn(5) =>  DQC5_nwv,
            DatCIn(6) =>  DQC6_nwv,
            DatCIn(7) =>  DQC7_nwv,
            DatDIn(0) =>  DQD0_nwv,
            DatDIn(1) =>  DQD1_nwv,
            DatDIn(2) =>  DQD2_nwv,
            DatDIn(3) =>  DQD3_nwv,
            DatDIn(4) =>  DQD4_nwv,
            DatDIn(5) =>  DQD5_nwv,
            DatDIn(6) =>  DQD6_nwv,
            DatDIn(7) =>  DQD7_nwv,
            AddressIn(0) => A0_nwv,
            AddressIn(1) => A1_nwv,
            AddressIn(2) => A2_nwv,
            AddressIn(3) => A3_nwv,
            AddressIn(4) => A4_nwv,
            AddressIn(5) => A5_nwv,
            AddressIn(6) => A6_nwv,
            AddressIn(7) => A7_nwv,
            AddressIn(8) => A8_nwv,
            AddressIn(9) => A9_nwv,
            AddressIn(10) => A10_nwv,
            AddressIn(11) => A11_nwv,
            AddressIn(12) => A12_nwv,
            AddressIn(13) => A13_nwv,
            AddressIn(14) => A14_nwv,
            AddressIn(15) => A15_nwv
        );

        -- Type definition for state machine
        TYPE mem_state IS (desel,
                           begin_rd,
                           begin_wr,
                           burst_rd,
                           burst_wr
                          );

        SIGNAL state     : mem_state;

        TYPE sequence IS ARRAY (0 to 3) OF INTEGER RANGE -3 to 3;
        TYPE seqtab IS ARRAY (0 to 3) OF sequence;

        CONSTANT il0 : sequence := (0, 1, 2, 3);
        CONSTANT il1 : sequence := (0, -1, 2, -1);
        CONSTANT il2 : sequence := (0, 1, -2, -1);
        CONSTANT il3 : sequence := (0, -1, -2, -3);
        CONSTANT il  : seqtab := (il0, il1, il2, il3);

        CONSTANT ln0 : sequence := (0, 1, 2, 3);
        CONSTANT ln1 : sequence := (0, 1, 2, -1);
        CONSTANT ln2 : sequence := (0, 1, -2, -1);
        CONSTANT ln3 : sequence := (0, -3, -2, -1);
        CONSTANT ln  : seqtab := (ln0, ln1, ln2, ln3);

        SIGNAL Burst_Seq : seqtab;

        SIGNAL D_zd      : std_logic_vector(31 DOWNTO 0);

    BEGIN

        Burst_Setup : PROCESS

        BEGIN

           IF (LBONegIn = '1') THEN
               Burst_Seq <= il;
           ELSE
               Burst_Seq <= ln;
           END IF;
           WAIT;    -- Mode can be set only during power up

        END PROCESS Burst_Setup;

    ----------------------------------------------------------------------------
    -- Main Behavior Process
    ----------------------------------------------------------------------------
        Behavior : PROCESS (BWDNIn, BWCNIn, BWBNIn, BWANIn, DatDIn, DatCIn,
                            DatBIn, DatAIn, CLKIn, CKENIn, AddressIn, RIn,
                            OENegIn, ADVIn, CE2In, CE1NegIn, CE2NegIn)

            -- Type definition for commands
            TYPE command_type is (ds,
                                  burst,
                                  read,
                                  write
                                 );

            -- Timing Check Variables
            VARIABLE Tviol_BWDN_CLK     : X01 := '0';
            VARIABLE TD_BWDN_CLK        : VitalTimingDataType;

            VARIABLE Tviol_BWCN_CLK     : X01 := '0';
            VARIABLE TD_BWCN_CLK        : VitalTimingDataType;

            VARIABLE Tviol_BWBN_CLK     : X01 := '0';
            VARIABLE TD_BWBN_CLK        : VitalTimingDataType;

            VARIABLE Tviol_BWAN_CLK     : X01 := '0';
            VARIABLE TD_BWAN_CLK        : VitalTimingDataType;

            VARIABLE Tviol_CKENIn_CLK   : X01 := '0';
            VARIABLE TD_CKENIn_CLK      : VitalTimingDataType;

            VARIABLE Tviol_ADVIn_CLK    : X01 := '0';
            VARIABLE TD_ADVIn_CLK       : VitalTimingDataType;

            VARIABLE Tviol_CE1NegIn_CLK : X01 := '0';
            VARIABLE TD_CE1NegIn_CLK    : VitalTimingDataType;

            VARIABLE Tviol_CE2NegIn_CLK : X01 := '0';
            VARIABLE TD_CE2NegIn_CLK    : VitalTimingDataType;