lpgbtfpga_txgearbox.vhd

Go to the documentation of this file.

-------------------------------------------------------
-------------------------------------------------------

LIBRARY ieee;
USE ieee.std_logic_1164.all;
USE ieee.numeric_std.all;

ENTITY lpgbtfpga_txGearbox IS
    GENERIC (
        c_clockRatio                  : integer;
        c_inputWidth                  : integer;
        c_outputWidth                 : integer
    );
    PORT (
        -- Clock and reset
        clk_inClk_i                   : in  std_logic;
        clk_clkEn_i                   : in  std_logic;
        clk_outClk_i                  : in  std_logic;

        rst_gearbox_i                 : in  std_logic;

        -- Data
        dat_inFrame_i                 : in  std_logic_vector((c_inputWidth-1) downto 0);
        dat_outFrame_o                : out std_logic_vector((c_outputWidth-1) downto 0);

        -- Status
        sta_gbRdy_o                   : out std_logic
    );
END lpgbtfpga_txGearbox;

ARCHITECTURE behavioral OF lpgbtfpga_txGearbox is

    --================================ Signal Declarations ================================--
    CONSTANT c_oversampling                      : integer := c_clockRatio/(c_inputWidth/c_outputWidth);

    SIGNAL gearboxSyncReset                      : std_logic;
    SIGNAL rst_gearbox_s                         : std_logic;

    SIGNAL txFrame_from_frameInverter_pipe_s     : std_logic_vector (c_inputWidth-1 downto 0);
    SIGNAL in_txFrame_from_frameInverter_s       : std_logic_vector (c_inputWidth-1 downto 0);
    SIGNAL txFrame_from_frameInverter_reg_s      : std_logic_vector (c_inputWidth-1 downto 0);
    SIGNAL txWord_beforeOversampling_s           : std_logic_vector((c_inputWidth/c_clockRatio)-1 downto 0);

    SIGNAL dat_outFrame_s                        : std_logic_vector((c_outputWidth-1) downto 0);

   --=====================================================================================--

--=================================================================================================--
BEGIN                 --========####   Architecture Body   ####========--
--=================================================================================================--

   --==================================== User Logic =====================================--

    -- Comment: Bits are inverted to transmit the MSB first on the MGT.
    frameInverter: FOR i IN (c_inputWidth-1) downto 0 GENERATE
        in_txFrame_from_frameInverter_s(i)             <= dat_inFrame_i((c_inputWidth-1)-i);
    END GENERATE;

    -- Comment: Note!! The reset of the gearbox is synchronous to TX_FRAMECLK in order to align the address 0
    --                 of the gearbox with the rising edge of TX_FRAMECLK after reset.
    sta_gbRdy_o    <= not(gearboxSyncReset);

    -- Sync reset
    rst_pipeline_proc: PROCESS(rst_gearbox_i, clk_inClk_i)
    BEGIN
        IF rst_gearbox_i = '1' THEN
            rst_gearbox_s <= '1';

        ELSIF rising_edge(clk_inClk_i) THEN
            IF clk_clkEn_i = '1' THEN
                rst_gearbox_s <= '0';
            END IF;
        END IF;
    END PROCESS;

    gbRstSynch_proc: PROCESS(rst_gearbox_s, clk_outClk_i)
    BEGIN
        IF rst_gearbox_s = '1' THEN
            gearboxSyncReset  <= '1';

        ELSIF rising_edge(clk_outClk_i) THEN
            gearboxSyncReset <= '0';
        END IF;
    END PROCESS;

    pipeline_proc: PROCESS(clk_outClk_i)
    BEGIN
        IF rising_edge(clk_outClk_i) THEN
            txFrame_from_frameInverter_pipe_s  <= in_txFrame_from_frameInverter_s;
        END IF;
    END PROCESS;

    gb_proc: PROCESS(gearboxSyncReset, clk_outClk_i)
        VARIABLE address                       : integer RANGE 0 TO (c_clockRatio-1);
    BEGIN

        IF gearboxSyncReset = '1' THEN
            txWord_beforeOversampling_s         <= (OTHERS => '0');
            address                             := 0;

        ELSIF rising_edge(clk_outClk_i) THEN
            IF address = 0 THEN
                txWord_beforeOversampling_s         <= txFrame_from_frameInverter_pipe_s((c_inputWidth/c_clockRatio)-1 downto 0);
                txFrame_from_frameInverter_reg_s    <= txFrame_from_frameInverter_pipe_s;
            ELSE
                txWord_beforeOversampling_s         <= txFrame_from_frameInverter_reg_s(((c_inputWidth/c_clockRatio)*(address+1))-1 downto ((c_inputWidth/c_clockRatio)*(address)));
            END IF;

            IF address = (c_clockRatio-1) THEN
                address := 0;
            ELSE
                address  := address + 1;
            END IF;

        END IF;
    END PROCESS;

    -- Comment: Oversampling generator loop.
    oversamplerMultPh: FOR i IN 0 TO (c_inputWidth/c_clockRatio)-1 GENERATE
        oversamplerPhN: FOR j IN 0 TO (c_oversampling-1) GENERATE
            dat_outFrame_s((i*c_oversampling)+j)   <= txWord_beforeOversampling_s(i);
        END GENERATE;
    END GENERATE;

    PROCESS(clk_outClk_i)
    BEGIN
        IF rising_edge(clk_outClk_i) THEN
            dat_outFrame_o <= dat_outFrame_s;
        END IF;
    END PROCESS;
    --=====================================================================================--
END behavioral;
--=================================================================================================--
--#################################################################################################--
--=================================================================================================--