HG_REPOSITORIES/LPP/INSTRUMENTATION/USERS/PELLION/VHD_Lib Commit - r525:45bbe4445c14

temp (LFR-EM) WFP_MS_1-1-57...

pellion -

r525:45bbe4445c14 JC

parent child

Context file:

r525:45bbe4445c14

Collapse all files

designs/LFR-em-WFP_MS/LFR-em.vhd +2 -1

                   dbguart         => 0,
                   pclow           => 2,
                   clk_freq        => 25000,
+                  IS_RADHARD      => 0,
                   NB_CPU          => 1,
                   ENABLE_FPU      => 1,
                   FPU_NETLIST     => 0,
                   pirq_ms                => 6,
                   pirq_wfp               => 14,
                   hindex                 => 2,
-                  top_lfr_version        => X"010138")  -- aa.bb.cc version
+                  top_lfr_version        => X"010139")  -- aa.bb.cc version
                                                         -- AA : BOARD NUMBER
                                                         --      0 => MINI_LFR
                                                         --      1 => EM

lib/lpp/lfr_management/apb_lfr_management.vhd +17 -8

               SIGNAL HK_temp_2_s          : STD_LOGIC_VECTOR(15 DOWNTO 0);
               SIGNAL HK_sel_s             : STD_LOGIC_VECTOR(1 DOWNTO 0);
+              SIGNAL previous_fine_time_bit : STD_LOGIC;
               SIGNAL rstn_LFR_TM : STD_LOGIC;
             BEGIN
               -----------------------------------------------------------------------------
               PROCESS (clk25MHz, resetn)
+                CONSTANT BIT_FREQUENCY_UPDATE : INTEGER := 11;  -- freq = 2^(16-BIT)
+                                                                -- for 11, the update frequency is 32Hz
+                                                                -- for each HK, the update frequency is freq/3
               BEGIN  -- PROCESS
                 IF resetn = '0' THEN                -- asynchronous reset (active low)
                   r.HK_temp_2 <= (OTHERS => '0');
                   HK_sel_s <= "00";
+                  previous_fine_time_bit <= '0';
                 ELSIF clk25MHz'EVENT AND clk25MHz = '1' THEN  -- rising clock edge
                   IF HK_val = '1' THEN
-                    CASE HK_sel_s IS
+                    IF previous_fine_time_bit = NOT(fine_time_s(BIT_FREQUENCY_UPDATE)) THEN
-                      WHEN "00"   => r.HK_temp_0 <= HK_sample; HK_sel_s <= "01";
+                      previous_fine_time_bit <= fine_time_s(BIT_FREQUENCY_UPDATE);
-                      WHEN "01"   => r.HK_temp_1 <= HK_sample; HK_sel_s <= "10";
+                      CASE HK_sel_s IS
-                      WHEN "10"   => r.HK_temp_2 <= HK_sample; HK_sel_s <= "00";
+                        WHEN "00"   => r.HK_temp_0 <= HK_sample; HK_sel_s <= "01";
-                      WHEN OTHERS => NULL;
+                        WHEN "01"   => r.HK_temp_1 <= HK_sample; HK_sel_s <= "10";
-                    END CASE;
+                        WHEN "10"   => r.HK_temp_2 <= HK_sample; HK_sel_s <= "00";
+                        WHEN OTHERS => NULL;
+                      END CASE;
+                    END IF;
                   END IF;
                 END IF;
               HK_sel <= HK_sel_s;
-            END Behavioral;
+            END Behavioral;
  No newline at end of file

lib/lpp/lpp_leon3_soc/leon3_soc.vhd +3 -2

                       PORT MAP (clkm, rstn, ahbmi, ahbmo(i), ahbsi, ahbso,
                                 irqi(i), irqo(i), dbgi(i), dbgo(i));
                   END GENERATE leon3_non_radhard;
                   leon3_radhard_i : IF IS_RADHARD = 1 GENERATE
-                    cpu : ENTITY gaisler.leon3ft
+                    cpu : leon3ft
                       GENERIC MAP (
                         HINDEX     => i,  --: integer;             --CPU_HINDEX,
                         FABTECH    => fabtech,        --CFG_TECH,
-            END Behavioral;
+            END Behavioral;
  No newline at end of file

General Comments 0

Write
Preview

You need to be logged in to leave comments. Login now

No TODOs yet

	Site-wide shortcuts
/	Use quick search box
g h	Goto home page
g g	Goto my private gists page
g G	Goto my public gists page
g 0-9	Goto bookmarked items from 0-9
n r	New repository page
n g	New gist page

	Repositories
g s	Goto summary page
g c	Goto changelog page
g f	Goto files page
g F	Goto files page with file search activated
g p	Goto pull requests page
g o	Goto repository settings
g O	Goto repository access permissions settings
t s	Toggle sidebar on some pages