| 1 | --
|
|---|
| 2 | -- VHDL Architecture FACT_FAD_lib.spi_controller.beha
|
|---|
| 3 | --
|
|---|
| 4 | -- Created:
|
|---|
| 5 | -- by - Benjamin Krumm.UNKNOWN (EEPC8)
|
|---|
| 6 | -- at - 10:37:20 12.04.2010
|
|---|
| 7 | --
|
|---|
| 8 | -- using Mentor Graphics HDL Designer(TM) 2009.1 (Build 12)
|
|---|
| 9 | --
|
|---|
| 10 | -- modified by Q. Weitzel
|
|---|
| 11 | --
|
|---|
| 12 | -------------------------------------------------------------------------------
|
|---|
| 13 | --
|
|---|
| 14 | -- modified by Patrick Vogler
|
|---|
| 15 | -- February 17 2011
|
|---|
| 16 | -- September 17 2010
|
|---|
| 17 | --
|
|---|
| 18 | -- modified to be used as a Microwire interface to control the clock
|
|---|
| 19 | -- conditioner LMK03000 on the FTM board
|
|---|
| 20 | --
|
|---|
| 21 | -- modified July 19 2011 by Patrick Vogler
|
|---|
| 22 | --
|
|---|
| 23 | -------------------------------------------------------------------------------
|
|---|
| 24 |
|
|---|
| 25 | LIBRARY ieee;
|
|---|
| 26 | USE ieee.std_logic_1164.all;
|
|---|
| 27 | USE ieee.std_logic_arith.all;
|
|---|
| 28 | USE ieee.std_logic_unsigned.all;
|
|---|
| 29 |
|
|---|
| 30 |
|
|---|
| 31 | library ftm_definitions;
|
|---|
| 32 | USE ftm_definitions.ftm_array_types.all;
|
|---|
| 33 | USE ftm_definitions.ftm_constants.all;
|
|---|
| 34 |
|
|---|
| 35 |
|
|---|
| 36 |
|
|---|
| 37 | ENTITY microwire_controller IS
|
|---|
| 38 | PORT(
|
|---|
| 39 | clk_uwire : IN std_logic; -- sclk
|
|---|
| 40 | data_uwire : OUT std_logic := '0'; -- mosi
|
|---|
| 41 | le_uwire : OUT std_logic := '1'; -- Latch Enable = chip select
|
|---|
| 42 |
|
|---|
| 43 | clk_cond_array : IN clk_cond_array_type; -- data to be loaded
|
|---|
| 44 | -- into the clock conditioner
|
|---|
| 45 |
|
|---|
| 46 | config_start : IN std_logic;
|
|---|
| 47 | config_ready : OUT std_logic := '0';
|
|---|
| 48 | config_started : OUT std_logic := '0'
|
|---|
| 49 | );
|
|---|
| 50 | END microwire_controller ;
|
|---|
| 51 |
|
|---|
| 52 |
|
|---|
| 53 | ARCHITECTURE beha OF microwire_controller IS
|
|---|
| 54 |
|
|---|
| 55 | type TYPE_uWire_STATE is (IDLE, LOAD_SHIFT_REG, SHIFT);
|
|---|
| 56 | signal uwire_state : TYPE_uWire_STATE := IDLE;
|
|---|
| 57 | signal register_count : integer range 0 to LMK03000_REGISTER_COUNT := 0;
|
|---|
| 58 | signal bit_count : integer range 0 to LMK03000_REGISTER_WIDTH := 0;
|
|---|
| 59 | signal shift_reg : std_logic_vector (LMK03000_REGISTER_WIDTH - 1 downto 0) := (others => '0');
|
|---|
| 60 |
|
|---|
| 61 | signal clk_cond_array_update : clk_cond_array_type := (others => (others => '0'));
|
|---|
| 62 |
|
|---|
| 63 |
|
|---|
| 64 |
|
|---|
| 65 |
|
|---|
| 66 |
|
|---|
| 67 | BEGIN
|
|---|
| 68 |
|
|---|
| 69 | uwire_write_proc: process (clk_uwire)
|
|---|
| 70 | begin
|
|---|
| 71 |
|
|---|
| 72 | if falling_edge(clk_uwire) then
|
|---|
| 73 |
|
|---|
| 74 | case uwire_state is
|
|---|
| 75 |
|
|---|
| 76 | when IDLE =>
|
|---|
| 77 |
|
|---|
| 78 | le_uwire <= '1';
|
|---|
| 79 | config_ready <= '1';
|
|---|
| 80 | config_started <= '0';
|
|---|
| 81 | bit_count <= 0;
|
|---|
| 82 | register_count <= 0;
|
|---|
| 83 | data_uwire <= '0';
|
|---|
| 84 |
|
|---|
| 85 | if (config_start = '1') then
|
|---|
| 86 | config_ready <= '0';
|
|---|
| 87 | uwire_state <= LOAD_SHIFT_REG;
|
|---|
| 88 | end if;
|
|---|
| 89 |
|
|---|
| 90 |
|
|---|
| 91 | -------------------------------------------------------------------------------
|
|---|
| 92 | -- send new data only when settings changed
|
|---|
| 93 |
|
|---|
| 94 | when LOAD_SHIFT_REG =>
|
|---|
| 95 |
|
|---|
| 96 | if (clk_cond_array_update = clk_cond_array) then -- compare old and new settings
|
|---|
| 97 | config_started <= '1';
|
|---|
| 98 | uwire_state <= IDLE; -- do nothing if settings didn't change
|
|---|
| 99 |
|
|---|
| 100 | else -- program new (changed !!) settings to clock conditioner
|
|---|
| 101 | bit_count <= 0;
|
|---|
| 102 | config_started <= '1';
|
|---|
| 103 | shift_reg <= clk_cond_array(register_count) (LMK03000_REGISTER_WIDTH - 1 downto 0);
|
|---|
| 104 | register_count <= register_count + 1;
|
|---|
| 105 | uwire_state <= SHIFT;
|
|---|
| 106 |
|
|---|
| 107 | end if;
|
|---|
| 108 | -------------------------------------------------------------------------------
|
|---|
| 109 |
|
|---|
| 110 |
|
|---|
| 111 | when SHIFT =>
|
|---|
| 112 | data_uwire <= shift_reg(LMK03000_REGISTER_WIDTH - 1);
|
|---|
| 113 | le_uwire <= '0';
|
|---|
| 114 | shift_reg <= shift_reg(LMK03000_REGISTER_WIDTH - 2 downto 0) & shift_reg(LMK03000_REGISTER_WIDTH - 1);
|
|---|
| 115 | bit_count <= bit_count + 1;
|
|---|
| 116 | if ((bit_count = LMK03000_REGISTER_WIDTH)AND(register_count = LMK03000_REGISTER_COUNT)) then
|
|---|
| 117 | le_uwire <= '1';
|
|---|
| 118 | clk_cond_array_update <= clk_cond_array; -- get a copy of the date for comparison lateron
|
|---|
| 119 | uwire_state <= IDLE;
|
|---|
| 120 | elsif ((bit_count =LMK03000_REGISTER_WIDTH )AND(NOT(register_count = LMK03000_REGISTER_COUNT))) then
|
|---|
| 121 | le_uwire <= '1';
|
|---|
| 122 | uwire_state <= LOAD_SHIFT_REG;
|
|---|
| 123 | else
|
|---|
| 124 | uwire_state <= SHIFT;
|
|---|
| 125 | end if;
|
|---|
| 126 |
|
|---|
| 127 | end case;
|
|---|
| 128 | end if;
|
|---|
| 129 |
|
|---|
| 130 | end process uwire_write_proc;
|
|---|
| 131 |
|
|---|
| 132 | END ARCHITECTURE beha;
|
|---|