Subversion Repositories idea

-- File Name    : ecb.fsm
-- Version      : v1.2
-- Description  : finite state mechine description of ecb mode
-- Purpose      : to generate behaviral description of ecb mode
-- Author       : Sigit Dewantoro
-- Address      : IS Laboratory, Labtek VIII, ITB, Jl. Ganesha 10, Bandung, Indonesia
-- Email        : sigit@students.ee.itb.ac.id, sigit@ic.vlsi.itb.ac.id
-- Date         : August 23th, 2001

entity ecb is
PORT (
        active          : in BIT;
        clk             : in BIT;
        cke             : in BIT;
        key_ready       : in BIT;
        finish          : in BIT;
        req_cp          : in BIT;
        E               : in BIT;
        E_mesin         : out BIT;
        s_mesin         : out BIT;
        s_gen_key       : out BIT;
        emp_buf         : out BIT;
        cp_ready        : out BIT;
        cke_b_mode      : out BIT;
        en_in           : out BIT;
        en_iv           : out BIT;
        en_rcbc         : out BIT;
        en_out          : out BIT;
        sel1            : out BIT_VECTOR (1 downto 0);
        sel2            : out BIT_VECTOR (1 downto 0);
        sel3            : out BIT_VECTOR (1 downto 0);
        vdd             : in BIT;
        vss             : in BIT
     );
end ecb;

architecture STATE_MACHINE of ecb is
        type STATE_TYPE is (S0, S1, S2, S3, S4, S5, S6);

        -- pragma CLOCK clk
        -- pragma CURRENT_STATE CURRENT_STATE
        -- pragma NEXT_STATE NEXT_STATE

        signal CURRENT_STATE, NEXT_STATE : STATE_TYPE;

        begin
        process (CURRENT_STATE, active, cke, key_ready, finish, req_cp)
                begin
                if active then
                        NEXT_STATE <= S0;
                        E_mesin <= E;
                        s_mesin <= '0';
                        s_gen_key <= '0';
                        emp_buf <= '0';
                        cp_ready <= '0';
                        cke_b_mode <= '0';
                        en_in <= '0';
                        en_iv <= '0';
                        en_rcbc <= '0';
                        en_out <= '0';
                        sel1 <= "10";
                        sel2 <= "10";
                        sel3 <= "10";
                else
                        case CURRENT_STATE is

                -- ***********************************************************************

                        when S0 =>
                        if cke then
                                NEXT_STATE <= S1;
                                E_mesin <= E;
                                s_mesin <= '0';
                                s_gen_key <= '1';
                                emp_buf <= '0';
                                cp_ready <= '0';
                                cke_b_mode <= '1';
                                en_in <= '0';
                                en_iv <= '0';
                                en_rcbc <= '0';
                                en_out <= '0';
                                sel1 <= "10";
                                sel2 <= "10";
                                sel3 <= "10";
                        else
                                NEXT_STATE <= S0;
                                E_mesin <= E;
                                s_mesin <= '0';
                                s_gen_key <= '0';
                                emp_buf <= '0';
                                cp_ready <= '0';
                                cke_b_mode <= '0';
                                en_in <= '0';
                                en_iv <= '0';
                                en_rcbc <= '0';
                                en_out <= '0';
                                sel1 <= "10";
                                sel2 <= "10";
                                sel3 <= "10";
                        end if;

                -- ***********************************************************************

                        when S1 =>
                        if key_ready then
                                NEXT_STATE <= S2;
                                E_mesin <= E;
                                s_mesin <= '0';
                                s_gen_key <= '1';
                                emp_buf <= '0';
                                cp_ready <= '0';
                                cke_b_mode <= '1';
                                en_in <= '1';
                                en_iv <= '0';
                                en_rcbc <= '0';
                                en_out <= '0';
                                sel1 <= "10";
                                sel2 <= "10";
                                sel3 <= "10";
                        else
                                NEXT_STATE <= S1;
                                E_mesin <= E;
                                s_mesin <= '0';
                                s_gen_key <= '1';
                                emp_buf <= '0';
                                cp_ready <= '0';
                                cke_b_mode <= '1';
                                en_in <= '0';
                                en_iv <= '0';
                                en_rcbc <= '0';
                                en_out <= '0';
                                sel1 <= "10";
                                sel2 <= "10";
                                sel3 <= "10";
                        end if;

                -- ***********************************************************************

                        when S2 =>
                        NEXT_STATE <= S3;
                        E_mesin <= E;
                        s_mesin <= '1';
                        s_gen_key <= '1';
                        emp_buf <= '1';
                        cp_ready <= '0';
                        cke_b_mode <= '1';
                        en_in <= '0';
                        en_iv <= '0';
                        en_rcbc <= '0';
                        en_out <= '0';
                        sel1 <= "01";
                        sel2 <= "10";
                        sel3 <= "10";

                -- ***********************************************************************

                        when S3 =>
                        if finish then
                                NEXT_STATE <= S4;
                                E_mesin <= E;
                                s_mesin <= '0';
                                s_gen_key <= '1';
                                emp_buf <= '0';
                                cp_ready <= '0';
                                cke_b_mode <= '1';
                                en_in <= '0';
                                en_iv <= '0';
                                en_rcbc <= '0';
                                en_out <= '1';
                                sel1 <= "01";
                                sel2 <= "10";
                                sel3 <= "10";
                        else
                                NEXT_STATE <= S3;
                                E_mesin <= E;
                                s_mesin <= '1';
                                s_gen_key <= '1';
                                emp_buf <= '1';
                                cp_ready <= '0';
                                cke_b_mode <= '1';
                                en_in <= '0';
                                en_iv <= '0';
                                en_rcbc <= '0';
                                en_out <= '0';
                                sel1 <= "01";
                                sel2 <= "10";
                                sel3 <= "10";
                        end if;

                -- ***********************************************************************

                        when S4 =>
                        NEXT_STATE <= S5;
                        E_mesin <= E;
                        s_mesin <= '0';
                        s_gen_key <= '1';
                        emp_buf <= '0';
                        cp_ready <= '1';
                        cke_b_mode <= '1';
                        en_in <= '0';
                        en_iv <= '0';
                        en_rcbc <= '0';
                        en_out <= '0';
                        sel1 <= "01";
                        sel2 <= "10";
                        sel3 <= "10";

                -- ***********************************************************************

                        when S5 =>
                        if req_cp then
                                NEXT_STATE <= S6;
                                E_mesin <= E;
                                s_mesin <= '0';
                                s_gen_key <= '1';
                                emp_buf <= '0';
                                cp_ready <= '0';
                                cke_b_mode <= '1';
                                en_in <= '0';
                                en_iv <= '0';
                                en_rcbc <= '0';
                                en_out <= '0';
                                sel1 <= "01";
                                sel2 <= "10";
                                sel3 <= "10";
                        else
                                NEXT_STATE <= S5;
                                E_mesin <= E;
                                s_mesin <= '0';
                                s_gen_key <= '1';
                                emp_buf <= '0';
                                cp_ready <= '1';
                                cke_b_mode <= '1';
                                en_in <= '0';
                                en_iv <= '0';
                                en_rcbc <= '0';
                                en_out <= '0';
                                sel1 <= "01";
                                sel2 <= "10";
                                sel3 <= "10";
                        end if;

                -- ***********************************************************************

                        when S6 =>
                        NEXT_STATE <= S6;
                        E_mesin <= E;
                        s_mesin <= '0';
                        s_gen_key <= '1';
                        emp_buf <= '0';
                        cp_ready <= '0';
                        cke_b_mode <= '1';
                        en_in <= '0';
                        en_iv <= '0';
                        en_rcbc <= '0';
                        en_out <= '0';
                        sel1 <= "01";
                        sel2 <= "10";
                        sel3 <= "10";

                -- ***********************************************************************

                        end case;
                end if;
        end process;

        process(clk)
                begin
                if(clk = '0' and clk'event) then
                        CURRENT_STATE <= NEXT_STATE;
                end if;
       end process;

end STATE_MACHINE;