Index: branches/v5/communication/dspin_dhccp_param/caba/metadata/dspin_dhccp_param.sd
===================================================================
--- branches/v5/communication/dspin_dhccp_param/caba/metadata/dspin_dhccp_param.sd	(revision 307)
+++ branches/v5/communication/dspin_dhccp_param/caba/metadata/dspin_dhccp_param.sd	(revision 307)
@@ -0,0 +1,8 @@
+Module('caba:dspin_dhccp_param',
+	   classname = 'soclib::caba::DspinDhccpParam',
+	   tmpl_parameters = [
+		parameter.Int('from_mc_flit_width_t'),
+		parameter.Int('from_l1_flit_width_t'),
+		],
+	   header_files = ['../source/include/dspin_dhccp_param.h',]
+)
Index: branches/v5/communication/dspin_dhccp_param/caba/source/include/dspin_dhccp_param.h
===================================================================
--- branches/v5/communication/dspin_dhccp_param/caba/source/include/dspin_dhccp_param.h	(revision 307)
+++ branches/v5/communication/dspin_dhccp_param/caba/source/include/dspin_dhccp_param.h	(revision 307)
@@ -0,0 +1,351 @@
+#ifndef DSPIN_DHCCP_PARAMS_H
+#define DSPIN_DHCCP_PARAMS_H
+
+#include <inttypes.h>
+#include <assert.h>
+
+namespace soclib { namespace caba {
+
+/*
+ * L1 cache to Memory Cache command packets
+ *
+ * CLEANUP
+ *
+ * flit 1
+ * ----------------------------------------------------------------------------------------------
+ * EOP:0 | DEST(10 bits) | SRCID(14 bits) | NLINE MSB(2 bits) | WAY_INDEX(4 bits)  |    TYPE:0b1X
+ * ----------------------------------------------------------------------------------------------
+ *                                                                                 | X: 0 DATA  |
+ *                                                                                 |    1 INST  |
+ * flit 2
+ * ----------------------------------------------------------------------------------------------
+ * EOP:1 |                                                                         NLINE(32 bits)
+ * ----------------------------------------------------------------------------------------------
+ *
+ * MULTICAST ACKNOWLEDGEMENT
+ *
+ * flit 1
+ * ----------------------------------------------------------------------------------------------
+ * EOP:1 | DEST(10 bits) |                         X(16 bits) | UPDT_INDEX(4 bits) |    TYPE:0b00
+ * ----------------------------------------------------------------------------------------------
+ */
+
+/*
+ * Memory Cache to L1 cache command packets
+ *
+ * CLEANUP ACKNOWLEDGEMENT
+ *
+ * flit 1
+ * ----------------------------------------------------------------------------------------------
+ * EOP:1 | DEST(14 bits) | X | SET_INDEX(16 bits) | WAY_INDEX(4 bits) | TYPE:0b100(3 bits) | BC:0
+ * ----------------------------------------------------------------------------------------------
+ *
+ * MULTICAST UPDATE
+ *
+ * flit 1
+ * ----------------------------------------------------------------------------------------------
+ * EOP:0 | DEST(14 bits) | X(3 bits) | MEMC_ID(14 bits) | UPDT_INDEX(4 bits) | TYPE:0b01X  | BC:0
+ * ----------------------------------------------------------------------------------------------
+ *                                                                           | X: 0 DATA  |
+ *                                                                           |    1 INST  |
+ * flit 2
+ * ----------------------------------------------------------------------------------------------
+ * EOP:0 | X | WORD_INDEX(4 bits)  |                                             NLINE (34 bits)
+ * ----------------------------------------------------------------------------------------------
+ *
+ * flit 3
+ * ----------------------------------------------------------------------------------------------
+ * EOP:0 | X(3 bits)  | BE(4 bits) |                                              WDATA(32 bits)
+ * ----------------------------------------------------------------------------------------------
+ *
+ * flit N
+ * ----------------------------------------------------------------------------------------------
+ * EOP:1 | X(3 bits)  | BE(4 bits) |                                              WDATA(32 bits)
+ * ----------------------------------------------------------------------------------------------
+ *
+ * MULTICAST INVALIDATE
+ *
+ * flit 1
+ * ----------------------------------------------------------------------------------------------
+ * EOP:0 | DEST(14 bits) | X(3 bits) | MEMC_ID(14 bits) | UPDT_INDEX(4 bits) | TYPE:0b00X | BC:0
+ * ----------------------------------------------------------------------------------------------
+ *                                                                           | X: 0 DATA  |
+ *                                                                           |    1 INST  |
+ * flit 2
+ * ----------------------------------------------------------------------------------------------
+ * EOP:1 | X(5 bits) |                                                           NLINE (34 bits)
+ * ----------------------------------------------------------------------------------------------
+ *
+ * BROADCAST INVALIDATE
+ *
+ * flit 1
+ *       | BOUNDING BOX(20 bits)            |
+ * ----------------------------------------------------------------------------------------------
+ * EOP:0 | XMIN   | XMAX   | YMIN   | YMAX  | MEMC_ID(14 bits) | NETWORK_RESERVED(4 bits) | BC:1
+ * ----------------------------------------------------------------------------------------------
+ *
+ * flit 2
+ * ----------------------------------------------------------------------------------------------
+ * EOP:1 | X | UPDT_INDEX(4 bits) |                                              NLINE (34 bits)
+ * ----------------------------------------------------------------------------------------------
+ */
+
+/*
+ * Utility MACROS
+ */
+#define GET_FIELD(x,y)\
+    case y: return ((x >> y##_SHIFT) & y##_MASK)
+
+#define SET_FIELD(x,y,z)\
+    case z: x |= ((y & z##_MASK) << z##_SHIFT);break
+
+template<int from_memc_flit_width_t, int from_l1_flit_width_t>
+class DspinDhccpParam
+{
+  public:
+
+    static const uint8_t  from_memc_flit_width         = 40;
+    static const uint8_t  from_l1_flit_width           = 33;
+
+    static const uint8_t  UPDT_INDEX_WIDTH             = 4;
+    static const uint8_t  NLINE_WIDTH                  = 34;
+    static const uint8_t  SRCID_WIDTH                  = 14;
+    static const uint8_t  GLOBALID_WIDTH               = 10;
+    static const uint8_t  MEMC_TYPE_WIDTH              = 3;
+    static const uint8_t  WORD_INDEX_WIDTH             = 4;
+    static const uint8_t  BE_WIDTH                     = 4;
+    static const uint8_t  DATA_WIDTH                   = 32;
+    static const uint8_t  SET_INDEX_WIDTH              = 16;
+    static const uint8_t  WAY_INDEX_WIDTH              = 4;
+    static const uint8_t  BROADCAST_BOX_WIDTH          = 20;
+    static const uint8_t  L1_TYPE_WIDTH                = 2;
+
+    static const uint8_t  FROM_L1_TYPE_SHIFT           = 0;
+    static const uint64_t FROM_L1_TYPE_MASK            = ((1ULL<<L1_TYPE_WIDTH)-1);
+    static const uint8_t  FROM_L1_EOP_SHIFT            = 32;
+    static const uint64_t FROM_L1_EOP_MASK             = 1;
+
+    static const uint8_t  CLEANUP_DEST_SHIFT           = 22;
+    static const uint64_t CLEANUP_DEST_MASK            = ((1ULL<<GLOBALID_WIDTH)-1);
+    static const uint8_t  CLEANUP_SRCID_SHIFT          = 8;
+    static const uint64_t CLEANUP_SRCID_MASK           = ((1ULL<<SRCID_WIDTH)-1);
+    static const uint8_t  CLEANUP_NLINE_MSB_SHIFT      = 6;
+    static const uint64_t CLEANUP_NLINE_MSB_MASK       = ((1ULL<< 2)-1);
+    static const uint8_t  CLEANUP_WAY_INDEX_SHIFT      = 2;
+    static const uint64_t CLEANUP_WAY_INDEX_MASK       = ((1ULL<<WAY_INDEX_WIDTH)-1);
+    static const uint8_t  CLEANUP_NLINE_LSB_SHIFT      = 0;
+    static const uint64_t CLEANUP_NLINE_LSB_MASK       = ((1ULL<<32)-1);
+
+    static const uint8_t  MULTI_ACK_EOP_SHIFT          = FROM_L1_EOP_SHIFT;
+    static const uint64_t MULTI_ACK_EOP_MASK           = FROM_L1_EOP_MASK;
+    static const uint8_t  MULTI_ACK_DEST_SHIFT         = CLEANUP_DEST_SHIFT;
+    static const uint64_t MULTI_ACK_DEST_MASK          = CLEANUP_DEST_MASK;
+    static const uint8_t  MULTI_ACK_UPDT_INDEX_SHIFT   = 2;
+    static const uint64_t MULTI_ACK_UPDT_INDEX_MASK    = ((1ULL<<UPDT_INDEX_WIDTH)-1);
+
+    static const uint8_t  FROM_MC_TYPE_SHIFT           = 1;
+    static const uint64_t FROM_MC_TYPE_MASK            = ((1ULL<<MEMC_TYPE_WIDTH)-1);
+    static const uint8_t  FROM_MC_EOP_SHIFT            = 39;
+    static const uint64_t FROM_MC_EOP_MASK             = 1;
+
+    static const uint8_t  MULTI_INVAL_DEST_SHIFT       = 26;
+    static const uint64_t MULTI_INVAL_DEST_MASK        = ((1ULL<<SRCID_WIDTH)-1);
+    static const uint8_t  MULTI_INVAL_SRCID_SHIFT      = 8;
+    static const uint64_t MULTI_INVAL_SRCID_MASK       = ((1ULL<<SRCID_WIDTH)-1);
+    static const uint8_t  MULTI_INVAL_UPDT_INDEX_SHIFT = 4;
+    static const uint64_t MULTI_INVAL_UPDT_INDEX_MASK  = ((1ULL<<UPDT_INDEX_WIDTH)-1);
+    static const uint8_t  MULTI_INVAL_NLINE_SHIFT      = 0;
+    static const uint64_t MULTI_INVAL_NLINE_MASK       = ((1ULL<<NLINE_WIDTH)-1);
+
+    static const uint8_t  MULTI_UPDT_DEST_SHIFT        = MULTI_INVAL_DEST_SHIFT;
+    static const uint64_t MULTI_UPDT_DEST_MASK         = MULTI_INVAL_DEST_MASK;
+    static const uint8_t  MULTI_UPDT_SRCID_SHIFT       = MULTI_INVAL_SRCID_SHIFT;
+    static const uint64_t MULTI_UPDT_SRCID_MASK        = MULTI_INVAL_SRCID_MASK;
+    static const uint8_t  MULTI_UPDT_UPDT_INDEX_SHIFT  = MULTI_INVAL_UPDT_INDEX_SHIFT;
+    static const uint64_t MULTI_UPDT_UPDT_INDEX_MASK   = MULTI_INVAL_UPDT_INDEX_MASK;
+    static const uint8_t  MULTI_UPDT_WORD_INDEX_SHIFT  = 34;
+    static const uint64_t MULTI_UPDT_WORD_INDEX_MASK   = ((1ULL<<WORD_INDEX_WIDTH)-1);
+    static const uint8_t  MULTI_UPDT_NLINE_SHIFT       = MULTI_INVAL_NLINE_SHIFT;
+    static const uint64_t MULTI_UPDT_NLINE_MASK        = MULTI_INVAL_NLINE_MASK;
+    static const uint8_t  MULTI_UPDT_BE_SHIFT          = 32;
+    static const uint64_t MULTI_UPDT_BE_MASK           = ((1ULL<<BE_WIDTH)-1);
+    static const uint8_t  MULTI_UPDT_DATA_SHIFT        = 0;
+    static const uint64_t MULTI_UPDT_DATA_MASK         = ((1ULL<<DATA_WIDTH)-1);
+
+    static const uint8_t  CLEANUP_ACK_DEST_SHIFT       = MULTI_INVAL_DEST_SHIFT;
+    static const uint64_t CLEANUP_ACK_DEST_MASK        = MULTI_INVAL_DEST_MASK;
+    static const uint8_t  CLEANUP_ACK_SET_SHIFT        = 8;
+    static const uint64_t CLEANUP_ACK_SET_MASK         = ((1ULL<<SET_INDEX_WIDTH)-1);
+    static const uint8_t  CLEANUP_ACK_WAY_SHIFT        = 4;
+    static const uint64_t CLEANUP_ACK_WAY_MASK         = ((1ULL<<WAY_INDEX_WIDTH)-1);
+
+    static const uint8_t  BROADCAST_BOX_SHIFT          = 29;
+    static const uint64_t BROADCAST_BOX_MASK           = ((1ULL<<BROADCAST_BOX_WIDTH)-1);
+    static const uint8_t  BROADCAST_SRCID_SHIFT        = 5;
+    static const uint64_t BROADCAST_SRCID_MASK         = MULTI_INVAL_SRCID_MASK;
+    static const uint8_t  BROADCAST_BC_SHIFT           = 0;
+    static const uint64_t BROADCAST_BC_MASK            = 1;
+    static const uint8_t  BROADCAST_UPDT_INDEX_SHIFT   = 34;
+    static const uint64_t BROADCAST_UPDT_INDEX_MASK    = MULTI_INVAL_UPDT_INDEX_MASK;
+    static const uint8_t  BROADCAST_NLINE_SHIFT        = 0;
+    static const uint64_t BROADCAST_NLINE_MASK         = MULTI_INVAL_NLINE_MASK;
+
+    /*
+     * L1 cache to Memory Cache command types
+     */
+    enum
+    {
+      TYPE_MULTI_ACK    = 0,
+      TYPE_CLEANUP      = 2,
+      TYPE_CLEANUP_DATA = TYPE_CLEANUP,
+      TYPE_CLEANUP_INST = 3
+    };
+
+    /*
+     * Memory Cache to L1 cache command types
+     */
+    enum
+    {
+      TYPE_MULTI_UPDT       = 0,
+      TYPE_MULTI_UPDT_DATA  = TYPE_MULTI_UPDT,
+      TYPE_MULTI_UPDT_INST  = 1,
+      TYPE_MULTI_INVAL      = 2,
+      TYPE_MULTI_INVAL_DATA = TYPE_MULTI_INVAL,
+      TYPE_MULTI_INVAL_INST = 3,
+      TYPE_CLEANUP_ACK      = 4
+    };
+
+    enum flit_field_e
+    {
+      FROM_L1_TYPE,
+      FROM_L1_EOP,
+
+      CLEANUP_DEST,
+      CLEANUP_SRCID,
+      CLEANUP_NLINE_MSB,
+      CLEANUP_WAY_INDEX,
+      CLEANUP_NLINE_LSB,
+
+      MULTI_ACK_DEST,
+      MULTI_ACK_UPDT_INDEX,
+
+      FROM_MC_TYPE,
+      FROM_MC_EOP,
+
+      MULTI_INVAL_DEST,
+      MULTI_INVAL_SRCID,
+      MULTI_INVAL_UPDT_INDEX,
+      MULTI_INVAL_NLINE,
+
+      MULTI_UPDT_DEST,
+      MULTI_UPDT_SRCID,
+      MULTI_UPDT_UPDT_INDEX,
+      MULTI_UPDT_WORD_INDEX,
+      MULTI_UPDT_NLINE,
+      MULTI_UPDT_BE,
+      MULTI_UPDT_DATA,
+
+      CLEANUP_ACK_DEST,
+      CLEANUP_ACK_SET,
+      CLEANUP_ACK_WAY,
+
+      BROADCAST_BOX,
+      BROADCAST_SRCID,
+      BROADCAST_BC,
+      BROADCAST_UPDT_INDEX,
+      BROADCAST_NLINE
+    };
+
+    static uint64_t dspin_get(uint64_t flit, flit_field_e field)
+    {
+      switch(field)
+      {
+        GET_FIELD(flit,FROM_L1_TYPE);
+        GET_FIELD(flit,FROM_L1_EOP);
+        GET_FIELD(flit,CLEANUP_DEST);
+        GET_FIELD(flit,CLEANUP_SRCID);
+        GET_FIELD(flit,CLEANUP_NLINE_MSB);
+        GET_FIELD(flit,CLEANUP_WAY_INDEX);
+        GET_FIELD(flit,CLEANUP_NLINE_LSB);
+        GET_FIELD(flit,MULTI_ACK_DEST);
+        GET_FIELD(flit,MULTI_ACK_UPDT_INDEX);
+        GET_FIELD(flit,FROM_MC_TYPE);
+        GET_FIELD(flit,FROM_MC_EOP);
+        GET_FIELD(flit,MULTI_INVAL_DEST);
+        GET_FIELD(flit,MULTI_INVAL_SRCID);
+        GET_FIELD(flit,MULTI_INVAL_UPDT_INDEX);
+        GET_FIELD(flit,MULTI_INVAL_NLINE);
+        GET_FIELD(flit,MULTI_UPDT_DEST);
+        GET_FIELD(flit,MULTI_UPDT_SRCID);
+        GET_FIELD(flit,MULTI_UPDT_UPDT_INDEX);
+        GET_FIELD(flit,MULTI_UPDT_WORD_INDEX);
+        GET_FIELD(flit,MULTI_UPDT_NLINE);
+        GET_FIELD(flit,MULTI_UPDT_BE);
+        GET_FIELD(flit,MULTI_UPDT_DATA);
+        GET_FIELD(flit,CLEANUP_ACK_DEST);
+        GET_FIELD(flit,CLEANUP_ACK_SET);
+        GET_FIELD(flit,CLEANUP_ACK_WAY);
+        GET_FIELD(flit,BROADCAST_BOX);
+        GET_FIELD(flit,BROADCAST_SRCID);
+        GET_FIELD(flit,BROADCAST_BC);
+        GET_FIELD(flit,BROADCAST_UPDT_INDEX);
+        GET_FIELD(flit,BROADCAST_NLINE);
+
+        default: assert(false && "Incorrect DHCCP DSPIN field");
+      }
+    }
+
+    static void dspin_set(uint64_t &flit, uint64_t value, flit_field_e field)
+    {
+      switch(field)
+      {
+        SET_FIELD(flit,value,FROM_L1_TYPE);
+        SET_FIELD(flit,value,FROM_L1_EOP);
+        SET_FIELD(flit,value,CLEANUP_DEST);
+        SET_FIELD(flit,value,CLEANUP_SRCID);
+        SET_FIELD(flit,value,CLEANUP_NLINE_MSB);
+        SET_FIELD(flit,value,CLEANUP_WAY_INDEX);
+        SET_FIELD(flit,value,CLEANUP_NLINE_LSB);
+        SET_FIELD(flit,value,MULTI_ACK_DEST);
+        SET_FIELD(flit,value,MULTI_ACK_UPDT_INDEX);
+        SET_FIELD(flit,value,FROM_MC_TYPE);
+        SET_FIELD(flit,value,FROM_MC_EOP);
+        SET_FIELD(flit,value,MULTI_INVAL_DEST);
+        SET_FIELD(flit,value,MULTI_INVAL_SRCID);
+        SET_FIELD(flit,value,MULTI_INVAL_UPDT_INDEX);
+        SET_FIELD(flit,value,MULTI_INVAL_NLINE);
+        SET_FIELD(flit,value,MULTI_UPDT_DEST);
+        SET_FIELD(flit,value,MULTI_UPDT_SRCID);
+        SET_FIELD(flit,value,MULTI_UPDT_UPDT_INDEX);
+        SET_FIELD(flit,value,MULTI_UPDT_WORD_INDEX);
+        SET_FIELD(flit,value,MULTI_UPDT_NLINE);
+        SET_FIELD(flit,value,MULTI_UPDT_BE);
+        SET_FIELD(flit,value,MULTI_UPDT_DATA);
+        SET_FIELD(flit,value,CLEANUP_ACK_DEST);
+        SET_FIELD(flit,value,CLEANUP_ACK_SET);
+        SET_FIELD(flit,value,CLEANUP_ACK_WAY);
+        SET_FIELD(flit,value,BROADCAST_BOX);
+        SET_FIELD(flit,value,BROADCAST_SRCID);
+        SET_FIELD(flit,value,BROADCAST_BC);
+        SET_FIELD(flit,value,BROADCAST_UPDT_INDEX);
+        SET_FIELD(flit,value,BROADCAST_NLINE);
+
+        default: assert(false && "Incorrect DHCCP DSPIN field");
+      }
+    }
+};
+
+#undef GET_FIELD
+#undef SET_FIELD
+
+}} // end namespace soclib::caba
+
+#endif
+// Local Variables:
+// tab-width: 2
+// c-basic-offset: 2
+// c-file-offsets:((innamespace . 0)(inline-open . 0))
+// indent-tabs-mode: nil
+// End:
+
+// vim: filetype=cpp:expandtab:shiftwidth=2:tabstop=2:softtabstop=2
Index: branches/v5/modules/vci_mem_cache_dspin_coherence/caba/metadata/vci_mem_cache.sd
===================================================================
--- branches/v5/modules/vci_mem_cache_dspin_coherence/caba/metadata/vci_mem_cache.sd	(revision 307)
+++ branches/v5/modules/vci_mem_cache_dspin_coherence/caba/metadata/vci_mem_cache.sd	(revision 307)
@@ -0,0 +1,77 @@
+
+# -*- python -*-
+
+__id__ = "$Id: vci_mem_cache.sd 295 2013-02-14 15:05:05Z cfuguet $"
+__version__ = "$Revision: 295 $"
+
+Module('caba:vci_mem_cache_dspin_coherence',
+        classname = 'soclib::caba::VciMemCache',
+
+        tmpl_parameters = [
+			parameter.Module('vci_param'  , default = 'caba:vci_param'),
+			parameter.Int('from_mc_flit_width', default = 40),
+			parameter.Int('from_l1_flit_width', default = 33)
+		],
+
+        header_files = [
+            '../source/include/vci_mem_cache.h',
+            '../source/include/xram_transaction.h',
+            '../source/include/mem_cache_directory.h',
+            '../source/include/update_tab.h'
+        ],
+
+        implementation_files = [ '../source/src/vci_mem_cache.cpp' ],
+
+        uses = [
+            Uses('caba:base_module'),
+            Uses('common:loader'),
+            Uses('common:mapping_table'),
+            Uses('caba:generic_fifo'),
+            Uses('caba:generic_llsc_global_table'),
+			Uses(
+			  'caba:dspin_dhcpp_param',
+			  from_mc_flit_width_t = parameter.Reference('cmd_width'),
+			  from_l1_flit_width_t = parameter.Reference('rsp_width'),
+			  ),
+        ],
+
+        ports = [
+            Port( 'caba:vci_target'   , 'p_vci_tgt' ),
+            Port(
+				'caba:dspin_input',
+				'p_dspin_in',
+				dspin_data_size = parameter.Reference('from_l1_flit_width'),
+			),
+			Port(
+				'caba:dspin_output',
+				'p_dspin_out',
+				dspin_data_size = parameter.Reference('from_mc_flit_width'),
+			),
+            Port( 'caba:vci_initiator', 'p_vci_ixr' ),
+            Port( 'caba:bit_in'       , 'p_resetn'  , auto = 'resetn' ),
+            Port( 'caba:clock_in'     , 'p_clk'     , auto = 'clock'  ),
+        ],
+
+        instance_parameters = [
+            parameter.Module( 'mtp', 'common:mapping_table' ),
+            parameter.Module( 'mtc', 'common:mapping_table' ),
+            parameter.Module( 'mtx', 'common:mapping_table' ),
+            parameter.IntTab( 'vci_ixr_index' ),
+            parameter.IntTab( 'vci_ini_index' ),
+            parameter.IntTab( 'vci_tgt_index' ),
+            parameter.IntTab( 'vci_tgt_index_cleanup '),
+            parameter.Int   ( 'nways' ),
+            parameter.Int   ( 'nsets' ),
+            parameter.Int   ( 'nwords' ),
+            parameter.Int   ( 'heap_size' ),
+        ],
+
+        extensions = [
+            'dsx:get_ident='
+            'vci_ini_index:p_vci_ini:mtc,'
+            'vci_tgt_index_cleanup:p_vci_tgt_cleanup:mtc,'
+            'vci_tgt_index:p_vci_tgt:mtp,'
+            'vci_ixr_index:p_vci_ixr:mtx',
+            'dsx:addressable=vci_tgt_index,vci_tgt_index_cleanup',
+        ],
+)
Index: branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/mem_cache_directory.h
===================================================================
--- branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/mem_cache_directory.h	(revision 307)
+++ branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/mem_cache_directory.h	(revision 307)
@@ -0,0 +1,727 @@
+#ifndef SOCLIB_CABA_MEM_CACHE_DIRECTORY_H
+#define SOCLIB_CABA_MEM_CACHE_DIRECTORY_H 
+
+#include <inttypes.h>
+#include <systemc>
+#include <cassert>
+#include "arithmetics.h"
+
+// !!!
+// The L1_MULTI_CACHE mechanism does no longer work with the new pktid encoding
+// of TSAR. Turning the define below to a non null value will cause the memcache
+// to behave in an unpredicted way.
+// TODO Either remove the mechanism from the mem cache or update its behaviour.
+#define L1_MULTI_CACHE 0
+
+//#define RANDOM_EVICTION
+
+namespace soclib { namespace caba {
+
+  using namespace sc_core;
+
+  ////////////////////////////////////////////////////////////////////////
+  //                    A LRU entry 
+  ////////////////////////////////////////////////////////////////////////
+  class LruEntry {
+
+    public:
+
+      bool recent;            
+
+      void init()
+      {
+        recent=false;
+      }
+
+  }; // end class LruEntry
+
+  ////////////////////////////////////////////////////////////////////////
+  //                    An Owner
+  ////////////////////////////////////////////////////////////////////////
+  class Owner{
+    typedef uint32_t size_t;
+    
+    public:
+    // Fields
+      bool      inst;       // Is the owner an ICache ?
+      size_t    srcid;      // The SRCID of the owner
+#if L1_MULTI_CACHE
+      size_t    cache_id;   // In multi_cache configuration
+#endif
+
+    ////////////////////////
+    // Constructors
+    ////////////////////////
+      Owner(bool   i_inst
+            ,size_t i_srcid
+#if L1_MULTI_CACHE
+            ,size_t i_cache_id
+#endif
+            ){
+        inst    = i_inst;
+        srcid   = i_srcid;
+#if L1_MULTI_CACHE
+        cache_id= i_cache_id;
+#endif
+      }
+
+      Owner(const Owner &a){
+        inst    = a.inst;
+        srcid   = a.srcid;
+#if L1_MULTI_CACHE
+        cache_id= a.cache_id;
+#endif
+      }
+
+      Owner(){
+        inst    = false;
+        srcid   = 0;
+#if L1_MULTI_CACHE
+        cache_id= 0;
+#endif
+      }
+      // end constructors
+
+  }; // end class Owner
+
+
+  ////////////////////////////////////////////////////////////////////////
+  //                    A directory entry                               
+  ////////////////////////////////////////////////////////////////////////
+  class DirectoryEntry {
+
+    typedef uint32_t tag_t;
+    typedef uint32_t size_t;
+
+    public:
+
+    bool    valid;                  // entry valid
+    bool    is_cnt;                 // directory entry is in counter mode
+    bool    dirty;                  // entry dirty
+    bool    lock;                   // entry locked
+    tag_t   tag;                    // tag of the entry
+    size_t  count;                  // number of copies
+    Owner   owner;                  // an owner of the line 
+    size_t  ptr;                    // pointer to the next owner
+
+    DirectoryEntry()
+    {
+      valid         = false;
+      is_cnt        = false;
+      dirty         = false;
+      lock          = false;
+      tag           = 0;
+      count         = 0;
+      owner.inst    = 0;
+      owner.srcid   = 0;
+#if L1_MULTI_CACHE
+      owner.cache_id= 0;
+#endif
+      ptr           = 0;
+    }
+
+    DirectoryEntry(const DirectoryEntry &source)
+    {
+      valid         = source.valid;
+      is_cnt        = source.is_cnt;
+      dirty         = source.dirty;
+      lock          = source.lock;
+      tag           = source.tag;
+      count         = source.count;
+      owner         = source.owner;
+      ptr           = source.ptr;
+    }          
+
+    /////////////////////////////////////////////////////////////////////
+    // The init() function initializes the entry 
+    /////////////////////////////////////////////////////////////////////
+    void init()
+    {
+      valid     = false;
+      is_cnt    = false;
+      dirty     = false;
+      lock      = false;
+      count     = 0;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The copy() function copies an existing source entry to a target 
+    /////////////////////////////////////////////////////////////////////
+    void copy(const DirectoryEntry &source)
+    {
+      valid	    = source.valid;
+      is_cnt    = source.is_cnt;
+      dirty	    = source.dirty;
+      lock	    = source.lock;
+      tag	    = source.tag;
+      count     = source.count;
+      owner     = source.owner;
+      ptr       = source.ptr;
+    }
+
+    ////////////////////////////////////////////////////////////////////
+    // The print() function prints the entry 
+    ////////////////////////////////////////////////////////////////////
+    void print()
+    {
+      std::cout << "Valid = " << valid << " ; IS COUNT = " << is_cnt << " ; Dirty = " << dirty << " ; Lock = " 
+                << lock 
+                << " ; Tag = " << std::hex << tag << std::dec 
+                << " ; Count = " << count 
+                << " ; Owner = " << owner.srcid 
+#if L1_MULTI_CACHE
+                << "." << owner.cache_id 
+#endif
+                << " " << owner.inst 
+                << " ; Pointer = " << ptr << std::endl;
+    }
+
+  }; // end class DirectoryEntry
+
+  ////////////////////////////////////////////////////////////////////////
+  //                       The directory  
+  ////////////////////////////////////////////////////////////////////////
+  class CacheDirectory {
+
+    typedef sc_dt::sc_uint<40> addr_t;
+    typedef uint32_t data_t;
+    typedef uint32_t tag_t;
+    typedef uint32_t size_t;
+
+    private:
+
+    // Directory constants
+    size_t					m_ways;
+    size_t					m_sets;
+    size_t					m_words;
+    size_t					m_width;
+    uint32_t                lfsr;
+
+    // the directory & lru tables
+    DirectoryEntry 				**m_dir_tab;
+    LruEntry	 				**m_lru_tab;
+
+    public:
+
+    ////////////////////////
+    // Constructor
+    ////////////////////////
+    CacheDirectory( size_t ways, size_t sets, size_t words, size_t address_width)	 
+    {
+      m_ways  = ways; 
+      m_sets  = sets;
+      m_words = words;
+      m_width = address_width;
+      lfsr = -1;
+
+      m_dir_tab = new DirectoryEntry*[sets];
+      for ( size_t i=0; i<sets; i++ ) {
+        m_dir_tab[i] = new DirectoryEntry[ways];
+        for ( size_t j=0 ; j<ways ; j++) m_dir_tab[i][j].init();
+      }
+      m_lru_tab = new LruEntry*[sets];
+      for ( size_t i=0; i<sets; i++ ) {
+        m_lru_tab[i] = new LruEntry[ways];
+        for ( size_t j=0 ; j<ways ; j++) m_lru_tab[i][j].init();
+      }
+    } // end constructor
+
+    /////////////////
+    // Destructor
+    /////////////////
+    ~CacheDirectory()
+    {
+      for(size_t i=0 ; i<m_sets ; i++){
+        delete [] m_dir_tab[i];
+        delete [] m_lru_tab[i];
+      }
+      delete [] m_dir_tab;
+      delete [] m_lru_tab;
+    } // end destructor
+
+    /////////////////////////////////////////////////////////////////////
+    // The read() function reads a directory entry. In case of hit, the
+    // LRU is updated.
+    // Arguments :
+    // - address : the address of the entry 
+    // - way : (return argument) the way of the entry in case of hit
+    // The function returns a copy of a (valid or invalid) entry  
+    /////////////////////////////////////////////////////////////////////
+    DirectoryEntry read(const addr_t &address,size_t &way)
+    {
+
+#define L2 soclib::common::uint32_log2
+      const size_t set = (size_t)(address >> (L2(m_words) + 2)) & (m_sets - 1);
+      const tag_t  tag = (tag_t)(address >> (L2(m_sets) + L2(m_words) + 2));
+#undef L2
+
+      bool hit       = false;
+      for ( size_t i=0 ; i<m_ways ; i++ ) {
+        bool equal = ( m_dir_tab[set][i].tag == tag );
+        bool valid = m_dir_tab[set][i].valid;
+        hit = equal && valid;
+        if ( hit ) {			
+          way = i;
+          break;
+        } 
+      }
+      if ( hit ) {
+        m_lru_tab[set][way].recent = true;
+        return DirectoryEntry(m_dir_tab[set][way]);
+      } else {
+        return DirectoryEntry();
+      }
+    } // end read()
+
+    /////////////////////////////////////////////////////////////////////
+    // The read_neutral() function reads a directory entry, without
+    // changing the LRU
+    // Arguments :
+    // - address : the address of the entry 
+    // The function returns a copy of a (valid or invalid) entry  
+    /////////////////////////////////////////////////////////////////////
+    DirectoryEntry read_neutral(const addr_t &address)
+    {
+
+#define L2 soclib::common::uint32_log2
+      const size_t set = (size_t)(address >> (L2(m_words) + 2)) & (m_sets - 1);
+      const tag_t  tag = (tag_t)(address >> (L2(m_sets) + L2(m_words) + 2));
+#undef L2
+
+      bool hit       = false;
+      for ( size_t i=0 ; i<m_ways ; i++ ) {
+        bool equal = ( m_dir_tab[set][i].tag == tag );
+        bool valid = m_dir_tab[set][i].valid;
+        hit = equal && valid;
+        if ( hit ) {			
+          return DirectoryEntry(m_dir_tab[set][i]);
+        } 
+      }
+      return DirectoryEntry();
+    } // end read_neutral()
+
+    /////////////////////////////////////////////////////////////////////
+    // The write function writes a new entry, 
+    // and updates the LRU bits if necessary.
+    // Arguments :
+    // - set : the set of the entry
+    // - way : the way of the entry
+    // - entry : the entry value
+    /////////////////////////////////////////////////////////////////////
+    void write(const size_t &set, const size_t &way, const DirectoryEntry &entry)
+    {
+      assert( (set<m_sets) 
+          && "Cache Directory write : The set index is invalid");
+      assert( (way<m_ways) 
+          && "Cache Directory write : The way index is invalid");
+
+      // update Directory
+      m_dir_tab[set][way].copy(entry);
+
+      // update LRU bits
+      bool all_recent = true;
+      for ( size_t i=0 ; i<m_ways ; i++ ) {
+        if ( i != way ) all_recent = m_lru_tab[set][i].recent && all_recent;
+      }
+      if ( all_recent ) {
+        for( size_t i=0 ; i<m_ways ; i++ ) m_lru_tab[set][i].recent = false;
+      } else {
+        m_lru_tab[set][way].recent = true;
+      }
+    } // end write()
+
+    /////////////////////////////////////////////////////////////////////
+    // The print() function prints a selected directory entry
+    // Arguments :
+    // - set : the set of the entry to print
+    // - way : the way of the entry to print
+    /////////////////////////////////////////////////////////////////////
+    void print(const size_t &set, const size_t &way)
+    {
+      std::cout << std::dec << " set : " << set << " ; way : " << way << " ; " ;
+      m_dir_tab[set][way].print();
+    } // end print()
+
+    /////////////////////////////////////////////////////////////////////
+    // The select() function selects a directory entry to evince.
+    // Arguments :
+    // - set   : (input argument) the set to modify
+    // - way   : (return argument) the way to evince
+    /////////////////////////////////////////////////////////////////////
+    DirectoryEntry select(const size_t &set, size_t &way)
+    {
+      assert( (set < m_sets) 
+          && "Cache Directory : (select) The set index is invalid");
+
+      for(size_t i=0; i<m_ways; i++){
+        if(!m_dir_tab[set][i].valid){
+          way=i;
+          return DirectoryEntry(m_dir_tab[set][way]);
+        }
+      }
+
+#ifdef RANDOM_EVICTION
+      lfsr = (lfsr >> 1) ^ ((-(lfsr & 1)) & 0xd0000001);
+      way = lfsr % m_ways;
+      return DirectoryEntry(m_dir_tab[set][way]);
+#endif
+
+      for(size_t i=0; i<m_ways; i++){
+        if(!(m_lru_tab[set][i].recent) && !(m_dir_tab[set][i].lock)){
+          way=i;
+          return DirectoryEntry(m_dir_tab[set][way]);
+        }
+      }
+      for(size_t i=0; i<m_ways; i++){
+        if( !(m_lru_tab[set][i].recent) && (m_dir_tab[set][i].lock)){
+          way=i;
+          return DirectoryEntry(m_dir_tab[set][way]);
+        }
+      }
+      for(size_t i=0; i<m_ways; i++){
+        if( (m_lru_tab[set][i].recent) && !(m_dir_tab[set][i].lock)){
+          way=i;
+          return DirectoryEntry(m_dir_tab[set][way]);
+        }
+      }
+      way = 0;
+      return DirectoryEntry(m_dir_tab[set][0]);
+    } // end select()
+
+    /////////////////////////////////////////////////////////////////////
+    // 		Global initialisation function
+    /////////////////////////////////////////////////////////////////////
+    void init()
+    {
+      for ( size_t set=0 ; set<m_sets ; set++ ) {
+        for ( size_t way=0 ; way<m_ways ; way++ ) {
+          m_dir_tab[set][way].init();
+          m_lru_tab[set][way].init();
+        }
+      }
+    } // end init()
+
+  }; // end class CacheDirectory
+
+  ///////////////////////////////////////////////////////////////////////
+  //                    A Heap Entry
+  ///////////////////////////////////////////////////////////////////////
+  class HeapEntry{
+    typedef uint32_t size_t;
+
+    public:
+    // Fields of the entry
+      Owner     owner;
+      size_t    next;
+
+    ////////////////////////
+    // Constructor
+    ////////////////////////
+      HeapEntry()
+      :owner(false,0
+#if L1_MULTI_CACHE
+             ,0
+#endif
+             )
+      {
+        next = 0;
+      } // end constructor
+
+    ////////////////////////
+    // Constructor
+    ////////////////////////
+      HeapEntry(const HeapEntry &entry){
+        owner.inst  = entry.owner.inst;
+        owner.srcid = entry.owner.srcid;
+#if L1_MULTI_CACHE
+        owner.cache_id = entry.owner.cache_id;
+#endif        
+        next           = entry.next;
+      } // end constructor
+
+    /////////////////////////////////////////////////////////////////////
+    // The copy() function copies an existing source entry to a target 
+    /////////////////////////////////////////////////////////////////////
+      void copy(const HeapEntry &entry){
+        owner.inst     = entry.owner.inst;
+        owner.srcid    = entry.owner.srcid;
+#if L1_MULTI_CACHE
+        owner.cache_id = entry.owner.cache_id;
+#endif
+        next           = entry.next;
+      } // end copy()
+
+    ////////////////////////////////////////////////////////////////////
+    // The print() function prints the entry 
+    ////////////////////////////////////////////////////////////////////
+      void print(){
+        std::cout 
+        << " -- owner.inst     : " << std::dec << owner.inst << std::endl
+        << " -- owner.srcid    : " << std::dec << owner.srcid << std::endl
+#if L1_MULTI_CACHE
+        << " -- owner.cache_id : " << std::dec << owner.cache_id << std::endl
+#endif
+        << " -- next           : " << std::dec << next << std::endl;
+
+      } // end print()
+
+  }; // end class HeapEntry
+
+  ////////////////////////////////////////////////////////////////////////
+  //                        The Heap 
+  ////////////////////////////////////////////////////////////////////////
+  class HeapDirectory{
+    typedef uint32_t size_t;
+    
+    private:
+    // Registers and the heap
+      size_t    ptr_free;
+      bool      full;
+      HeapEntry *m_heap_tab;
+
+    // Constants for debugging purpose
+      size_t    tab_size;
+
+    public:
+    ////////////////////////
+    // Constructor
+    ////////////////////////
+      HeapDirectory(uint32_t size){
+        assert(size>0 && "Memory Cache, HeapDirectory constructor : invalid size");
+        ptr_free    = 0;
+        full        = false;
+        m_heap_tab  = new HeapEntry[size];
+        tab_size    = size;
+      } // end constructor
+
+    /////////////////
+    // Destructor
+    /////////////////
+      ~HeapDirectory(){
+        delete [] m_heap_tab;
+      } // end destructor
+
+    /////////////////////////////////////////////////////////////////////
+    // 		Global initialisation function
+    /////////////////////////////////////////////////////////////////////
+      void init(){
+        ptr_free=0;
+        full=false;
+        for(size_t i=0; i< tab_size-1;i++){
+          m_heap_tab[i].next = i+1;
+        }
+        m_heap_tab[tab_size-1].next = tab_size-1;
+        return;
+      }
+
+    /////////////////////////////////////////////////////////////////////
+    // The print() function prints a selected directory entry
+    // Arguments :
+    // - ptr : the pointer to the entry to print
+    /////////////////////////////////////////////////////////////////////
+      void print(const size_t &ptr){
+        std::cout << "Heap, printing the entry : " << std::dec << ptr << std::endl;
+        m_heap_tab[ptr].print();
+      } // end print()
+
+    /////////////////////////////////////////////////////////////////////
+    // The print_list() function prints a list from selected directory entry
+    // Arguments :
+    // - ptr : the pointer to the first entry to print
+    /////////////////////////////////////////////////////////////////////
+      void print_list(const size_t &ptr){
+        bool end = false;
+        size_t ptr_temp = ptr;
+        std::cout << "Heap, printing the list from : " << std::dec << ptr << std::endl;
+        while(!end){
+            m_heap_tab[ptr_temp].print();
+            if(ptr_temp == m_heap_tab[ptr_temp].next) end = true;
+            ptr_temp = m_heap_tab[ptr_temp].next;
+        } 
+      } // end print_list()
+
+    /////////////////////////////////////////////////////////////////////
+    // The is_full() function return true if the heap is full.
+    /////////////////////////////////////////////////////////////////////
+      bool is_full(){
+        return full;
+      } // end is_full()
+
+    /////////////////////////////////////////////////////////////////////
+    // The next_free_ptr() function returns the pointer 
+    // to the next free entry.
+    /////////////////////////////////////////////////////////////////////
+      size_t next_free_ptr(){
+        return ptr_free;
+      } // end next_free_ptr()
+
+    /////////////////////////////////////////////////////////////////////
+    // The next_free_entry() function returns 
+    // a copy of the next free entry.
+    /////////////////////////////////////////////////////////////////////
+      HeapEntry next_free_entry(){
+        return HeapEntry(m_heap_tab[ptr_free]);
+      } // end next_free_entry()
+   
+    /////////////////////////////////////////////////////////////////////
+    // The write_free_entry() function modify the next free entry.
+    // Arguments :
+    // - entry : the entry to write
+    /////////////////////////////////////////////////////////////////////
+      void write_free_entry(const HeapEntry &entry){
+        m_heap_tab[ptr_free].copy(entry);
+      } // end write_free_entry()
+
+    /////////////////////////////////////////////////////////////////////
+    // The write_free_ptr() function writes the pointer
+    // to the next free entry
+    /////////////////////////////////////////////////////////////////////
+      void write_free_ptr(const size_t &ptr){
+        assert( (ptr<tab_size) && "HeapDirectory error : try to write a wrong free pointer");
+        ptr_free = ptr;
+      } // end write_free_ptr()
+
+    /////////////////////////////////////////////////////////////////////
+    // The set_full() function sets the full bit (to true).
+    /////////////////////////////////////////////////////////////////////
+      void set_full(){
+        full = true;
+      } // end set_full()
+
+    /////////////////////////////////////////////////////////////////////
+    // The unset_full() function unsets the full bit (to false).
+    /////////////////////////////////////////////////////////////////////
+      void unset_full(){
+        full = false;
+      } // end unset_full()
+
+    /////////////////////////////////////////////////////////////////////
+    // The read() function returns a copy of
+    // the entry pointed by the argument
+    // Arguments :
+    //  - ptr : the pointer to the entry to read
+    /////////////////////////////////////////////////////////////////////
+      HeapEntry read(const size_t &ptr){
+        assert( (ptr<tab_size) && "HeapDirectory error : try to write a wrong free pointer");
+        return HeapEntry(m_heap_tab[ptr]);
+      } // end read()
+
+    /////////////////////////////////////////////////////////////////////
+    // The write() function writes an entry in the heap
+    // Arguments :
+    //  - ptr : the pointer to the entry to replace
+    //  - entry : the entry to write
+    /////////////////////////////////////////////////////////////////////
+      void write(const size_t &ptr, const HeapEntry &entry){
+        assert( (ptr<tab_size) && "HeapDirectory error : try to write a wrong free pointer");
+        m_heap_tab[ptr].copy(entry);
+      } // end write()
+
+  }; // end class HeapDirectory
+
+  ////////////////////////////////////////////////////////////////////////
+  //                        Cache Data 
+  ////////////////////////////////////////////////////////////////////////
+  class CacheData {
+    private:
+      const uint32_t m_sets;
+      const uint32_t m_ways;
+      const uint32_t m_words;
+
+      uint32_t *** m_cache_data;
+
+    public:
+
+      CacheData(uint32_t ways, uint32_t sets, uint32_t words)
+        : m_sets(sets), m_ways(ways), m_words(words) {
+
+          m_cache_data = new uint32_t ** [ways];
+          for ( size_t i=0 ; i < ways ; i++ ) {
+            m_cache_data[i] = new uint32_t * [sets];
+          }
+          for ( size_t i=0; i<ways; i++ ) {
+            for ( size_t j=0; j<sets; j++ ) {
+              m_cache_data[i][j] = new uint32_t [words];
+            }
+          }
+        }
+
+      ~CacheData() {
+          for(size_t i=0; i<m_ways ; i++){
+              for(size_t j=0; j<m_sets ; j++){
+                  delete [] m_cache_data[i][j];
+              }
+          }
+          for(size_t i=0; i<m_ways ; i++){
+              delete [] m_cache_data[i];
+          }
+          delete [] m_cache_data;
+      }
+
+      uint32_t read (
+          const uint32_t &way,
+          const uint32_t &set,
+          const uint32_t &word) const {
+
+        assert((set  < m_sets ) && "Cache data error: Trying to read a wrong set" );
+        assert((way  < m_ways ) && "Cache data error: Trying to read a wrong way" );
+        assert((word < m_words) && "Cache data error: Trying to read a wrong word");
+
+        return m_cache_data[way][set][word];
+      }
+
+      void read_line(
+          const uint32_t &way,
+          const uint32_t &set,
+          sc_core::sc_signal<uint32_t> * cache_line)
+      {
+        assert((set < m_sets ) && "Cache data error: Trying to read a wrong set" );
+        assert((way < m_ways ) && "Cache data error: Trying to read a wrong way" );
+      
+        for (uint32_t word=0; word<m_words; word++)
+          cache_line[word].write(m_cache_data[way][set][word]);
+      }
+
+      void write (
+          const uint32_t &way,
+          const uint32_t &set,
+          const uint32_t &word,
+          const uint32_t &data,
+          const uint32_t &be = 0xF) {
+
+        assert((set  < m_sets ) && "Cache data error: Trying to write a wrong set" );
+        assert((way  < m_ways ) && "Cache data error: Trying to write a wrong way" );
+        assert((word < m_words) && "Cache data error: Trying to write a wrong word");
+        assert((be  <= 0xF    ) && "Cache data error: Trying to write a wrong word cell");
+
+        if (be == 0x0) return;
+
+        if (be == 0xF) {
+            m_cache_data[way][set][word] = data; 
+            return;
+        }
+
+        uint32_t mask = 0;
+        if  (be & 0x1) mask = mask | 0x000000FF;
+        if  (be & 0x2) mask = mask | 0x0000FF00;
+        if  (be & 0x4) mask = mask | 0x00FF0000;
+        if  (be & 0x8) mask = mask | 0xFF000000;
+
+        m_cache_data[way][set][word] = 
+          (data & mask) | (m_cache_data[way][set][word] & ~mask);
+      }
+  }; // end class CacheData
+
+}} // end namespaces
+
+#endif
+
+// Local Variables:
+// tab-width: 4
+// c-basic-offset: 4
+// c-file-offsets:((innamespace . 0)(inline-open . 0))
+// indent-tabs-mode: nil
+// End:
+
+// vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=4:softtabstop=4
+
Index: branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/update_tab.h
===================================================================
--- branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/update_tab.h	(revision 307)
+++ branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/update_tab.h	(revision 307)
@@ -0,0 +1,415 @@
+#ifndef UPDATE_TAB_H_
+#define UPDATE_TAB_H_
+
+#include <inttypes.h>
+#include <systemc>
+#include <cassert>
+#include "arithmetics.h"
+
+////////////////////////////////////////////////////////////////////////
+//                  An update tab entry    
+////////////////////////////////////////////////////////////////////////
+class UpdateTabEntry {
+  typedef uint32_t size_t;
+  typedef sc_dt::sc_uint<40> addr_t;
+
+  public:
+  bool 	    valid;      // It is a valid pending transaction
+  bool	    update;     // It is an update transaction
+  bool      brdcast;    // It is a broadcast invalidate
+  bool      rsp;        // It needs a response to the initiator
+  size_t 	srcid;      // The srcid of the initiator which wrote the data
+  size_t 	trdid;      // The trdid of the initiator which wrote the data
+  size_t 	pktid;      // The pktid of the initiator which wrote the data
+  addr_t	nline;	    // The identifier of the cache line
+  size_t 	count;      // The number of acknowledge responses to receive
+
+  UpdateTabEntry(){
+    valid	= false;
+    update  = false;
+    brdcast = false;
+    rsp     = false;
+    srcid	= 0;
+    trdid	= 0;
+    pktid	= 0;
+    nline	= 0;
+    count	= 0;
+  }
+
+  UpdateTabEntry(bool   i_valid, 
+      bool   i_update,
+      bool   i_brdcast,
+      bool   i_rsp,
+      size_t i_srcid, 
+      size_t i_trdid, 
+      size_t i_pktid, 
+      addr_t i_nline,
+      size_t i_count) 
+  {
+    valid	= i_valid;
+    update	= i_update;
+    brdcast = i_brdcast;
+    rsp     = i_rsp;
+    srcid	= i_srcid;
+    trdid	= i_trdid;
+    pktid	= i_pktid;
+    nline	= i_nline;
+    count	= i_count;
+  }
+
+  UpdateTabEntry(const UpdateTabEntry &source)
+  {
+    valid   = source.valid;
+    update  = source.update;
+    brdcast = source.brdcast;
+    rsp     = source.rsp;
+    srcid   = source.srcid;
+    trdid   = source.trdid;
+    pktid   = source.pktid;
+    nline   = source.nline;
+    count   = source.count;
+  }
+
+  ////////////////////////////////////////////////////
+  // The init() function initializes the entry 
+  ///////////////////////////////////////////////////
+  void init()
+  {
+    valid  = false;
+    update = false;
+    brdcast= false;
+    rsp    = false;
+    srcid  = 0;
+    trdid  = 0;
+    pktid  = 0;
+    nline  = 0;
+    count  = 0;
+  }
+
+  ////////////////////////////////////////////////////////////////////
+  // The copy() function copies an existing entry
+  // Its arguments are :
+  // - source : the update tab entry to copy
+  ////////////////////////////////////////////////////////////////////
+  void copy(const UpdateTabEntry &source)
+  {
+    valid  = source.valid;
+    update = source.update;
+    brdcast= source.brdcast;
+    rsp    = source.rsp;
+    srcid  = source.srcid;
+    trdid  = source.trdid;
+    pktid  = source.pktid;
+    nline  = source.nline;
+    count  = source.count;
+  }
+
+  ////////////////////////////////////////////////////////////////////
+  // The print() function prints the entry  
+  ////////////////////////////////////////////////////////////////////
+  void print(){
+    std::cout << std::dec << "valid  = " << valid  << std::endl;
+    std::cout << "update = " << update << std::endl;
+    std::cout << "brdcast= " << brdcast<< std::endl;
+    std::cout << "rsp    = " << rsp    << std::endl;
+    std::cout << "srcid  = " << srcid  << std::endl; 
+    std::cout << "trdid  = " << trdid  << std::endl; 
+    std::cout << "pktid  = " << pktid  << std::endl; 
+    std::cout << std::hex << "nline  = " << nline  << std::endl;
+    std::cout << std::dec << "count  = " << count  << std::endl;
+  }
+};
+
+////////////////////////////////////////////////////////////////////////
+//                        The update tab             
+////////////////////////////////////////////////////////////////////////
+class UpdateTab{
+
+  typedef uint32_t size_t;
+  typedef sc_dt::sc_uint<40> addr_t;
+
+  private:
+  size_t size_tab;
+  std::vector<UpdateTabEntry> tab;
+
+  public:
+
+  UpdateTab()
+    : tab(0)
+  {
+    size_tab=0;
+  }
+
+  UpdateTab(size_t size_tab_i)
+    : tab(size_tab_i)
+  {
+    size_tab=size_tab_i;
+  }
+
+  ////////////////////////////////////////////////////////////////////
+  // The size() function returns the size of the tab  
+  ////////////////////////////////////////////////////////////////////
+  const size_t size(){
+    return size_tab;
+  }
+
+
+  ////////////////////////////////////////////////////////////////////
+  // The print() function diplays the tab content 
+  ////////////////////////////////////////////////////////////////////
+  void print(){
+    for(size_t i=0; i<size_tab; i++) {
+      std::cout << "UPDATE TAB ENTRY " << std::dec << i << "--------" << std::endl;
+      tab[i].print();
+    }
+    return;
+  }
+
+
+  /////////////////////////////////////////////////////////////////////
+  // The init() function initializes the tab 
+  /////////////////////////////////////////////////////////////////////
+  void init(){
+    for ( size_t i=0; i<size_tab; i++) {
+      tab[i].init();
+    }
+  }
+
+
+  /////////////////////////////////////////////////////////////////////
+  // The reads() function reads an entry 
+  // Arguments :
+  // - entry : the entry to read
+  // This function returns a copy of the entry.
+  /////////////////////////////////////////////////////////////////////
+  UpdateTabEntry read (size_t entry)
+  {
+    assert(entry<size_tab && "Bad Update Tab Entry");
+    return UpdateTabEntry(tab[entry]);
+  }
+
+  ///////////////////////////////////////////////////////////////////////////
+  // The set() function writes an entry in the Update Table
+  // Arguments :
+  // - update : transaction type (bool)
+  // - srcid : srcid of the initiator
+  // - trdid : trdid of the initiator
+  // - pktid : pktid of the initiator
+  // - count : number of expected responses
+  // - index : (return argument) index of the selected entry
+  // This function returns true if the write successed (an entry was empty).
+  ///////////////////////////////////////////////////////////////////////////
+  bool set(const bool	update,
+      const bool   brdcast,
+      const bool   rsp,
+      const size_t srcid,
+      const size_t trdid,
+      const size_t pktid,
+      const addr_t nline,
+      const size_t count,
+      size_t &index)
+  {
+    for ( size_t i=0 ; i<size_tab ; i++ ) {
+      if( !tab[i].valid ) {
+        tab[i].valid		= true;
+        tab[i].update		= update;
+        tab[i].brdcast      = brdcast;
+        tab[i].rsp          = rsp;
+        tab[i].srcid		= (size_t) srcid;
+        tab[i].trdid		= (size_t) trdid;
+        tab[i].pktid		= (size_t) pktid;
+        tab[i].nline		= (addr_t) nline;
+        tab[i].count		= (size_t) count;
+        index			    = i;
+        return true;
+      }
+    }
+    return false;
+  } // end set()
+
+  /////////////////////////////////////////////////////////////////////
+  // The decrement() function decrements the counter for a given entry.
+  // Arguments :
+  // - index   : the index of the entry
+  // - counter : (return argument) value of the counter after decrement
+  // This function returns true if the entry is valid.
+  /////////////////////////////////////////////////////////////////////
+  bool decrement( const size_t index,
+      size_t &counter ) 
+  {
+    assert((index<size_tab) && "Bad Update Tab Entry");
+    if ( tab[index].valid ) {
+      tab[index].count--;
+      counter = tab[index].count;
+      return true;
+    } else {
+      return false;
+    }
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The is_full() function returns true if the table is full
+  /////////////////////////////////////////////////////////////////////
+  bool is_full()
+  {
+    for(size_t i = 0 ; i < size_tab ; i++){
+      if(!tab[i].valid){
+        return false;
+      }
+    }
+    return true;
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The is_not_empty() function returns true if the table is not empty
+  /////////////////////////////////////////////////////////////////////
+  bool is_not_empty()
+  {
+    for(size_t i = 0 ; i < size_tab ; i++){
+      if(tab[i].valid){
+        return true;
+      }
+    }
+    return false;
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The need_rsp() function returns the need of a response
+  // Arguments :
+  // - index : the index of the entry
+  /////////////////////////////////////////////////////////////////////
+  bool need_rsp(const size_t index)
+  {
+    assert(index<size_tab && "Bad Update Tab Entry");
+    return tab[index].rsp;	
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The is_update() function returns the transaction type
+  // Arguments :
+  // - index : the index of the entry
+  /////////////////////////////////////////////////////////////////////
+  bool is_brdcast(const size_t index)
+  {
+    assert(index<size_tab && "Bad Update Tab Entry");
+    return tab[index].brdcast;	
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The is_update() function returns the transaction type
+  // Arguments :
+  // - index : the index of the entry
+  /////////////////////////////////////////////////////////////////////
+  bool is_update(const size_t index)
+  {
+    assert(index<size_tab && "Bad Update Tab Entry");
+    return tab[index].update;	
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The srcid() function returns the srcid value
+  // Arguments :
+  // - index : the index of the entry
+  /////////////////////////////////////////////////////////////////////
+  size_t srcid(const size_t index)
+  {
+    assert(index<size_tab && "Bad Update Tab Entry");
+    return tab[index].srcid;	
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The trdid() function returns the trdid value
+  // Arguments :
+  // - index : the index of the entry
+  /////////////////////////////////////////////////////////////////////
+  size_t trdid(const size_t index)
+  {
+    assert(index<size_tab && "Bad Update Tab Entry");
+    return tab[index].trdid;	
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The pktid() function returns the pktid value
+  // Arguments :
+  // - index : the index of the entry
+  /////////////////////////////////////////////////////////////////////
+  size_t pktid(const size_t index)
+  {
+    assert(index<size_tab && "Bad Update Tab Entry");
+    return tab[index].pktid;	
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The nline() function returns the nline value
+  // Arguments :
+  // - index : the index of the entry
+  /////////////////////////////////////////////////////////////////////
+  addr_t nline(const size_t index)
+  {
+    assert(index<size_tab && "Bad Update Tab Entry");
+    return tab[index].nline;
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The search_inval() function returns the index of the entry in UPT
+  // Arguments :
+  // - nline : the line number of the entry in the directory
+  /////////////////////////////////////////////////////////////////////
+  bool search_inval(const addr_t nline,size_t &index)
+  {
+    size_t i ;
+
+    for (i = 0 ; i < size_tab ; i++){
+      if((tab[i].nline == nline) && tab[i].valid){
+        if(!tab[i].update){
+          index = i ;
+          return true;
+        }
+      }
+    }
+    return false;
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The read_nline() function returns the index of the entry in UPT
+  // Arguments :
+  // - nline : the line number of the entry in the directory
+  /////////////////////////////////////////////////////////////////////
+  bool read_nline(const addr_t nline,size_t &index) 
+  {
+    size_t i ;
+
+    for (i = 0 ; i < size_tab ; i++){
+      if((tab[i].nline == nline) && tab[i].valid){
+        index = i ;
+        return true;
+      }
+    }
+    return false;
+  }
+
+  /////////////////////////////////////////////////////////////////////
+  // The clear() function erases an entry of the tab
+  // Arguments :
+  // - index : the index of the entry
+  /////////////////////////////////////////////////////////////////////       
+  void clear(const size_t index)
+  {
+    assert(index<size_tab && "Bad Update Tab Entry");
+    tab[index].valid=false;
+    return;	
+  }
+
+};
+
+#endif
+
+// Local Variables:
+// tab-width: 4
+// c-basic-offset: 4
+// c-file-offsets:((innamespace . 0)(inline-open . 0))
+// indent-tabs-mode: nil
+// End:
+
+// vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=4:softtabstop=4
+
Index: branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/vci_mem_cache.h
===================================================================
--- branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/vci_mem_cache.h	(revision 307)
+++ branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/vci_mem_cache.h	(revision 307)
@@ -0,0 +1,852 @@
+/* -*- c++ -*-
+ * File         : vci_mem_cache.h
+ * Date         : 26/10/2008
+ * Copyright    : UPMC / LIP6
+ * Authors      : Alain Greiner / Eric Guthmuller
+ *
+ * SOCLIB_LGPL_HEADER_BEGIN
+ *
+ * This file is part of SoCLib, GNU LGPLv2.1.
+ *
+ * SoCLib is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU Lesser General Public License as published
+ * by the Free Software Foundation; version 2.1 of the License.
+ *
+ * SoCLib is distributed in the hope that it will be useful, but
+ * WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with SoCLib; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+ * 02110-1301 USA
+ *
+ * SOCLIB_LGPL_HEADER_END
+ *
+ * Maintainers: alain eric.guthmuller@polytechnique.edu
+ *              cesar.fuguet-tortolero@lip6.fr
+ *              alexandre.joannou@lip6.fr
+ */
+
+#ifndef SOCLIB_CABA_MEM_CACHE_H
+#define SOCLIB_CABA_MEM_CACHE_H
+
+#include <inttypes.h>
+#include <systemc>
+#include <list>
+#include <cassert>
+#include "arithmetics.h"
+#include "alloc_elems.h"
+#include "caba_base_module.h"
+#include "vci_target.h"
+#include "vci_initiator.h"
+#include "generic_fifo.h"
+#include "mapping_table.h"
+#include "int_tab.h"
+#include "generic_llsc_global_table.h"
+#include "mem_cache_directory.h"
+#include "xram_transaction.h"
+#include "update_tab.h"
+#include "dspin_interface.h"
+#include "dspin_dhccp_param.h"
+
+#define TRANSACTION_TAB_LINES 4 // Number of lines in the transaction tab
+#define UPDATE_TAB_LINES      4 // Number of lines in the update tab
+
+namespace soclib {  namespace caba {
+  using namespace sc_core;
+
+  template<typename vci_param, int from_mc_flit_width, int from_l1_flit_width>
+    class VciMemCache
+    : public soclib::caba::BaseModule
+    {
+      typedef sc_dt::sc_uint<40> addr_t;
+      typedef typename vci_param::fast_addr_t vci_addr_t;
+      typedef uint32_t data_t;
+      typedef uint32_t tag_t;
+      typedef uint32_t size_t;
+      typedef uint32_t be_t;
+      typedef uint32_t copy_t;
+
+      typedef soclib::caba::DspinDhccpParam
+        <from_mc_flit_width
+        ,from_l1_flit_width> dspin_param;
+
+      /* States of the TGT_CMD fsm */
+      enum tgt_cmd_fsm_state_e{
+        TGT_CMD_IDLE,
+        TGT_CMD_READ,
+        TGT_CMD_WRITE,
+        TGT_CMD_CAS
+      };
+
+      /* States of the TGT_RSP fsm */
+      enum tgt_rsp_fsm_state_e{
+        TGT_RSP_READ_IDLE,
+        TGT_RSP_WRITE_IDLE,
+        TGT_RSP_CAS_IDLE,
+        TGT_RSP_XRAM_IDLE,
+        TGT_RSP_INIT_IDLE,
+        TGT_RSP_CLEANUP_IDLE,
+        TGT_RSP_READ,
+        TGT_RSP_WRITE,
+        TGT_RSP_CAS,
+        TGT_RSP_XRAM,
+        TGT_RSP_INIT,
+        TGT_RSP_CLEANUP
+      };
+
+      /* States of the DSPIN_TGT fsm */
+      enum cc_receive_fsm_state_e{
+        CC_RECEIVE_IDLE,
+        CC_RECEIVE_CLEANUP,
+        CC_RECEIVE_MULTI_ACK
+      };
+
+      /* States of the CC_SEND fsm */
+      enum cc_send_fsm_state_e{
+        CC_SEND_XRAM_RSP_IDLE,
+        CC_SEND_WRITE_IDLE,
+        CC_SEND_CAS_IDLE,
+        CC_SEND_CLEANUP_IDLE,
+        CC_SEND_CLEANUP_ACK,
+        CC_SEND_XRAM_RSP_BRDCAST_HEADER,
+        CC_SEND_XRAM_RSP_BRDCAST_NLINE,
+        CC_SEND_XRAM_RSP_INVAL_HEADER,
+        CC_SEND_XRAM_RSP_INVAL_NLINE,
+        CC_SEND_WRITE_BRDCAST_HEADER,
+        CC_SEND_WRITE_BRDCAST_NLINE,
+        CC_SEND_WRITE_UPDT_HEADER,
+        CC_SEND_WRITE_UPDT_NLINE,
+        CC_SEND_WRITE_UPDT_DATA,
+        CC_SEND_CAS_BRDCAST_HEADER,
+        CC_SEND_CAS_BRDCAST_NLINE,
+        CC_SEND_CAS_UPDT_HEADER,
+        CC_SEND_CAS_UPDT_NLINE,
+        CC_SEND_CAS_UPDT_DATA,
+        CC_SEND_CAS_UPDT_DATA_HIGH
+      };
+
+      /* States of the MULTI_ACK fsm */
+      enum multi_ack_fsm_state_e{
+        MULTI_ACK_IDLE,
+        MULTI_ACK_UPT_LOCK,
+        MULTI_ACK_UPT_CLEAR,
+        MULTI_ACK_WRITE_RSP
+      };
+
+      /* States of the READ fsm */
+      enum read_fsm_state_e{
+        READ_IDLE,
+        READ_DIR_REQ,
+        READ_DIR_LOCK,
+        READ_DIR_HIT,
+        READ_HEAP_REQ,
+        READ_HEAP_LOCK,
+        READ_HEAP_WRITE,
+        READ_HEAP_ERASE,
+        READ_HEAP_LAST,
+        READ_RSP,
+        READ_TRT_LOCK,
+        READ_TRT_SET,
+        READ_TRT_REQ
+      };
+
+      /* States of the WRITE fsm */
+      enum write_fsm_state_e{
+        WRITE_IDLE,
+        WRITE_NEXT,
+        WRITE_DIR_REQ,
+        WRITE_DIR_LOCK,
+        WRITE_DIR_READ,
+        WRITE_DIR_HIT,
+        WRITE_UPT_LOCK,
+        WRITE_UPT_HEAP_LOCK,
+        WRITE_UPT_REQ,
+        WRITE_UPT_NEXT,
+        WRITE_UPT_DEC,
+        WRITE_RSP,
+        WRITE_MISS_TRT_LOCK,
+        WRITE_MISS_TRT_DATA,
+        WRITE_MISS_TRT_SET,
+        WRITE_MISS_XRAM_REQ,
+        WRITE_BC_TRT_LOCK,
+        WRITE_BC_UPT_LOCK,
+        WRITE_BC_DIR_INVAL,
+        WRITE_BC_CC_SEND,
+        WRITE_BC_XRAM_REQ,
+        WRITE_WAIT
+      };
+
+      /* States of the IXR_RSP fsm */
+      enum ixr_rsp_fsm_state_e{
+        IXR_RSP_IDLE,
+        IXR_RSP_ACK,
+        IXR_RSP_TRT_ERASE,
+        IXR_RSP_TRT_READ
+      };
+
+      /* States of the XRAM_RSP fsm */
+      enum xram_rsp_fsm_state_e{
+        XRAM_RSP_IDLE,
+        XRAM_RSP_TRT_COPY,
+        XRAM_RSP_TRT_DIRTY,
+        XRAM_RSP_DIR_LOCK,
+        XRAM_RSP_DIR_UPDT,
+        XRAM_RSP_DIR_RSP,
+        XRAM_RSP_INVAL_LOCK,
+        XRAM_RSP_INVAL_WAIT,
+        XRAM_RSP_INVAL,
+        XRAM_RSP_WRITE_DIRTY,
+        XRAM_RSP_HEAP_REQ,
+        XRAM_RSP_HEAP_ERASE,
+        XRAM_RSP_HEAP_LAST,
+        XRAM_RSP_ERROR_ERASE,
+        XRAM_RSP_ERROR_RSP
+      };
+
+      /* States of the IXR_CMD fsm */
+      enum ixr_cmd_fsm_state_e{
+        IXR_CMD_READ_IDLE,
+        IXR_CMD_WRITE_IDLE,
+        IXR_CMD_CAS_IDLE,
+        IXR_CMD_XRAM_IDLE,
+        IXR_CMD_READ_NLINE,
+        IXR_CMD_WRITE_NLINE,
+        IXR_CMD_CAS_NLINE,
+        IXR_CMD_XRAM_DATA
+      };
+
+      /* States of the CAS fsm */
+      enum cas_fsm_state_e{
+        CAS_IDLE,
+        CAS_DIR_REQ,
+        CAS_DIR_LOCK,
+        CAS_DIR_HIT_READ,
+        CAS_DIR_HIT_WRITE,
+        CAS_UPT_LOCK,
+        CAS_UPT_HEAP_LOCK,
+        CAS_UPT_REQ,
+        CAS_UPT_NEXT,
+        CAS_BC_TRT_LOCK,
+        CAS_BC_UPT_LOCK,
+        CAS_BC_DIR_INVAL,
+        CAS_BC_CC_SEND,
+        CAS_BC_XRAM_REQ,
+        CAS_RSP_FAIL,
+        CAS_RSP_SUCCESS,
+        CAS_MISS_TRT_LOCK,
+        CAS_MISS_TRT_SET,
+        CAS_MISS_XRAM_REQ,
+        CAS_WAIT
+      };
+
+      /* States of the CLEANUP fsm */
+      enum cleanup_fsm_state_e{
+        CLEANUP_IDLE,
+        CLEANUP_GET_NLINE,
+        CLEANUP_DIR_REQ,
+        CLEANUP_DIR_LOCK,
+        CLEANUP_DIR_WRITE,
+        CLEANUP_HEAP_REQ,
+        CLEANUP_HEAP_LOCK,
+        CLEANUP_HEAP_SEARCH,
+        CLEANUP_HEAP_CLEAN,
+        CLEANUP_HEAP_FREE,
+        CLEANUP_UPT_LOCK,
+        CLEANUP_UPT_DECREMENT,
+        CLEANUP_UPT_CLEAR,
+        CLEANUP_WRITE_RSP,
+        CLEANUP_SEND_ACK
+      };
+
+      /* States of the ALLOC_DIR fsm */
+      enum alloc_dir_fsm_state_e{
+        ALLOC_DIR_RESET,
+        ALLOC_DIR_READ,
+        ALLOC_DIR_WRITE,
+        ALLOC_DIR_CAS,
+        ALLOC_DIR_CLEANUP,
+        ALLOC_DIR_XRAM_RSP
+      };
+
+      /* States of the ALLOC_TRT fsm */
+      enum alloc_trt_fsm_state_e{
+        ALLOC_TRT_READ,
+        ALLOC_TRT_WRITE,
+        ALLOC_TRT_CAS,
+        ALLOC_TRT_XRAM_RSP,
+        ALLOC_TRT_IXR_RSP
+      };
+
+      /* States of the ALLOC_UPT fsm */
+      enum alloc_upt_fsm_state_e{
+        ALLOC_UPT_WRITE,
+        ALLOC_UPT_XRAM_RSP,
+        ALLOC_UPT_MULTI_ACK,
+        ALLOC_UPT_CLEANUP,
+        ALLOC_UPT_CAS
+      };
+
+      /* States of the ALLOC_HEAP fsm */
+      enum alloc_heap_fsm_state_e{
+        ALLOC_HEAP_RESET,
+        ALLOC_HEAP_READ,
+        ALLOC_HEAP_WRITE,
+        ALLOC_HEAP_CAS,
+        ALLOC_HEAP_CLEANUP,
+        ALLOC_HEAP_XRAM_RSP
+      };
+
+      /* transaction type, pktid field */
+      enum transaction_type_e
+      {
+          // b3 unused
+          // b2 READ / NOT READ
+          // Si READ
+          //  b1 DATA / INS
+          //  b0 UNC / MISS
+          // Si NOT READ
+          //  b1 accÃšs table llsc type SW / other
+          //  b2 WRITE/CAS/LL/SC
+          TYPE_READ_DATA_UNC          = 0x0,
+          TYPE_READ_DATA_MISS         = 0x1,
+          TYPE_READ_INS_UNC           = 0x2,
+          TYPE_READ_INS_MISS          = 0x3,
+          TYPE_WRITE                  = 0x4,
+          TYPE_CAS                    = 0x5,
+          TYPE_LL                     = 0x6,
+          TYPE_SC                     = 0x7
+      };
+
+      /* SC return values */
+      enum sc_status_type_e
+      {
+          SC_SUCCESS  =   0x00000000,
+          SC_FAIL     =   0x00000001
+      };
+
+      // debug variables (for each FSM)
+      size_t       m_debug_start_cycle;
+      bool         m_debug_ok;
+      bool         m_debug_global;
+      bool         m_debug_tgt_cmd_fsm;
+      bool         m_debug_tgt_rsp_fsm;
+      bool         m_debug_cc_send_fsm;
+      bool         m_debug_cc_receive_fsm;
+      bool         m_debug_multi_ack_fsm;
+      bool         m_debug_read_fsm;
+      bool         m_debug_write_fsm;
+      bool         m_debug_cas_fsm;
+      bool         m_debug_cleanup_fsm;
+      bool         m_debug_ixr_cmd_fsm;
+      bool         m_debug_ixr_rsp_fsm;
+      bool         m_debug_xram_rsp_fsm;
+      bool         m_debug_previous_hit;
+      size_t       m_debug_previous_count;
+
+      bool         m_monitor_ok;
+      vci_addr_t   m_monitor_base;
+      vci_addr_t   m_monitor_length;
+
+      // instrumentation counters
+      uint32_t     m_cpt_cycles;        // Counter of cycles
+      uint32_t     m_cpt_read;          // Number of READ transactions
+      uint32_t     m_cpt_read_miss;     // Number of MISS READ
+      uint32_t     m_cpt_write;         // Number of WRITE transactions
+      uint32_t     m_cpt_write_miss;    // Number of MISS WRITE
+      uint32_t     m_cpt_write_cells;   // Cumulated length for WRITE transactions
+      uint32_t     m_cpt_write_dirty;   // Cumulated length for WRITE transactions
+      uint32_t     m_cpt_update;        // Number of UPDATE transactions
+      uint32_t     m_cpt_trt_rb;        // Read blocked by a hit in trt
+      uint32_t     m_cpt_trt_full;      // Transaction blocked due to a full trt
+      uint32_t     m_cpt_update_mult;   // Number of targets for UPDATE
+      uint32_t     m_cpt_inval;         // Number of INVAL  transactions
+      uint32_t     m_cpt_inval_mult;    // Number of targets for INVAL
+      uint32_t     m_cpt_inval_brdcast; // Number of BROADCAST INVAL
+      uint32_t     m_cpt_cleanup;       // Number of CLEANUP transactions
+      uint32_t     m_cpt_ll;            // Number of LL transactions
+      uint32_t     m_cpt_sc;            // Number of SC transactions
+      uint32_t     m_cpt_cas;           // Number of CAS transactions
+
+      size_t       m_prev_count;
+
+      protected:
+
+      SC_HAS_PROCESS(VciMemCache);
+
+      public:
+      sc_in<bool>                           p_clk;
+      sc_in<bool>                           p_resetn;
+      soclib::caba::VciTarget<vci_param>    p_vci_tgt;
+      soclib::caba::VciInitiator<vci_param> p_vci_ixr;
+
+      soclib::caba::DspinInput <from_l1_flit_width> p_dspin_in;
+      soclib::caba::DspinOutput<from_mc_flit_width> p_dspin_out;
+
+      VciMemCache(
+          sc_module_name name,                                // Instance Name
+          const soclib::common::MappingTable &mtp,            // Mapping table for primary requets
+          const soclib::common::MappingTable &mtc,            // Mapping table for coherence requets
+          const soclib::common::MappingTable &mtx,            // Mapping table for XRAM
+          const soclib::common::IntTab &vci_ixr_index,        // VCI port to XRAM (initiator)
+          const soclib::common::IntTab &vci_ini_index,        // VCI port to PROC (initiator)
+          const soclib::common::IntTab &vci_tgt_index,        // VCI port to PROC (target)
+          const soclib::common::IntTab &vci_tgt_index_cleanup,// VCI port to PROC (target) for cleanup
+          size_t nways,                                       // Number of ways per set
+          size_t nsets,                                       // Number of sets
+          size_t nwords,                                      // Number of words per line
+          size_t heap_size=1024,                              // Size of the heap
+          size_t transaction_tab_lines=TRANSACTION_TAB_LINES, // Size of the TRT
+          size_t update_tab_lines=UPDATE_TAB_LINES,           // Size of the UPT
+          size_t debug_start_cycle=0,
+          bool   debug_ok=false);
+
+      ~VciMemCache();
+
+      void print_stats();
+      void print_trace();
+      void copies_monitor(vci_addr_t addr);
+      void start_monitor(vci_addr_t addr, vci_addr_t length);
+      void stop_monitor();
+
+      private:
+
+      void transition();
+      void genMoore();
+      void check_monitor( const char *buf, vci_addr_t addr, data_t data);
+
+      // Component attributes
+      std::list<soclib::common::Segment> m_seglist;  // memory cached into the cache
+      std::list<soclib::common::Segment> m_cseglist; // coherence segment for the cache
+
+      const size_t    m_initiators; // Number of initiators
+      const size_t    m_heap_size;  // Size of the heap
+      const size_t    m_ways;       // Number of ways in a set
+      const size_t    m_sets;       // Number of cache sets
+      const size_t    m_words;      // Number of words in a line
+      const size_t    m_srcid_ixr;  // Srcid for requests to XRAM
+      const size_t    m_srcid_ini;  // Srcid for requests to processors
+
+      uint32_t        m_transaction_tab_lines;
+      TransactionTab  m_transaction_tab;  // xram transaction table
+      uint32_t        m_update_tab_lines;
+      UpdateTab       m_update_tab;       // pending update & invalidate
+      CacheDirectory  m_cache_directory;  // data cache directory
+      CacheData       m_cache_data;       // data array[set][way][word]
+      HeapDirectory   m_heap;             // heap for copies
+      GenericLLSCGlobalTable
+      <
+        32  ,   // desired number of slots
+        4096,   // number of processors in the system
+        8000,   // registratioÃ§n life span (in # of LL operations)
+        typename vci_param::fast_addr_t // address type
+      >
+      m_llsc_table;       // ll/sc global registration table
+
+      // adress masks
+      const soclib::common::AddressMaskingTable<vci_addr_t> m_x;
+      const soclib::common::AddressMaskingTable<vci_addr_t> m_y;
+      const soclib::common::AddressMaskingTable<vci_addr_t> m_z;
+      const soclib::common::AddressMaskingTable<vci_addr_t> m_nline;
+
+      // broadcast address
+      uint32_t m_broadcast_address;
+
+      //////////////////////////////////////////////////
+      // Others registers
+      //////////////////////////////////////////////////
+      sc_signal<size_t> r_copies_limit; // Limit of the number of copies for one line
+      sc_signal<size_t> xxx_count;
+
+      //////////////////////////////////////////////////
+      // Registers controlled by the TGT_CMD fsm
+      //////////////////////////////////////////////////
+
+      // Fifo between TGT_CMD fsm and READ fsm
+      GenericFifo<uint64_t>  m_cmd_read_addr_fifo;
+      GenericFifo<size_t>    m_cmd_read_length_fifo;
+      GenericFifo<size_t>    m_cmd_read_srcid_fifo;
+      GenericFifo<size_t>    m_cmd_read_trdid_fifo;
+      GenericFifo<size_t>    m_cmd_read_pktid_fifo;
+
+      // Fifo between TGT_CMD fsm and WRITE fsm
+      GenericFifo<uint64_t>  m_cmd_write_addr_fifo;
+      GenericFifo<bool>      m_cmd_write_eop_fifo;
+      GenericFifo<size_t>    m_cmd_write_srcid_fifo;
+      GenericFifo<size_t>    m_cmd_write_trdid_fifo;
+      GenericFifo<size_t>    m_cmd_write_pktid_fifo;
+      GenericFifo<data_t>    m_cmd_write_data_fifo;
+      GenericFifo<be_t>      m_cmd_write_be_fifo;
+
+      // Fifo between TGT_CMD fsm and CAS fsm
+      GenericFifo<uint64_t>  m_cmd_cas_addr_fifo;
+      GenericFifo<bool>      m_cmd_cas_eop_fifo;
+      GenericFifo<size_t>    m_cmd_cas_srcid_fifo;
+      GenericFifo<size_t>    m_cmd_cas_trdid_fifo;
+      GenericFifo<size_t>    m_cmd_cas_pktid_fifo;
+      GenericFifo<data_t>    m_cmd_cas_wdata_fifo;
+
+      // Fifo between INIT_RSP fsm and CLEANUP fsm
+      GenericFifo<uint64_t>  m_cc_receive_to_cleanup_fifo;
+      
+      // Fifo between INIT_RSP fsm and MULTI_ACK fsm
+      GenericFifo<uint64_t>  m_cc_receive_to_multi_ack_fifo;
+
+      sc_signal<int>         r_tgt_cmd_fsm;
+
+      size_t                   m_nseg;
+      size_t                   m_ncseg;
+      soclib::common::Segment  **m_seg;
+      soclib::common::Segment  **m_cseg;
+      ///////////////////////////////////////////////////////
+      // Registers controlled by the READ fsm
+      ///////////////////////////////////////////////////////
+
+      sc_signal<int>      r_read_fsm;        // FSM state
+      sc_signal<size_t>   r_read_copy;       // Srcid of the first copy
+      sc_signal<size_t>   r_read_copy_cache; // Srcid of the first copy
+      sc_signal<bool>     r_read_copy_inst;  // Type of the first copy
+      sc_signal<tag_t>    r_read_tag;        // cache line tag (in directory)
+      sc_signal<bool>     r_read_is_cnt;     // is_cnt bit (in directory)
+      sc_signal<bool>     r_read_lock;       // lock bit (in directory)
+      sc_signal<bool>     r_read_dirty;      // dirty bit (in directory)
+      sc_signal<size_t>   r_read_count;      // number of copies
+      sc_signal<size_t>   r_read_ptr;        // pointer to the heap
+      sc_signal<data_t> * r_read_data;       // data (one cache line)
+      sc_signal<size_t>   r_read_way;        // associative way (in cache)
+      sc_signal<size_t>   r_read_trt_index;  // Transaction Table index
+      sc_signal<size_t>   r_read_next_ptr;   // Next entry to point to
+      sc_signal<bool>     r_read_last_free;  // Last free entry
+      sc_signal<typename vci_param::fast_addr_t>
+                          r_read_ll_key;     // LL key returned by the llsc_global_table
+
+      // Buffer between READ fsm and IXR_CMD fsm (ask a missing cache line to XRAM)
+      sc_signal<bool>     r_read_to_ixr_cmd_req;    // valid request
+      sc_signal<addr_t>   r_read_to_ixr_cmd_nline;  // cache line index
+      sc_signal<size_t>   r_read_to_ixr_cmd_trdid;  // index in Transaction Table
+
+      // Buffer between READ fsm and TGT_RSP fsm (send a hit read response to L1 cache)
+      sc_signal<bool>     r_read_to_tgt_rsp_req;    // valid request
+      sc_signal<size_t>   r_read_to_tgt_rsp_srcid;  // Transaction srcid
+      sc_signal<size_t>   r_read_to_tgt_rsp_trdid;  // Transaction trdid
+      sc_signal<size_t>   r_read_to_tgt_rsp_pktid;  // Transaction pktid
+      sc_signal<data_t> * r_read_to_tgt_rsp_data;   // data (one cache line)
+      sc_signal<size_t>   r_read_to_tgt_rsp_word;   // first word of the response
+      sc_signal<size_t>   r_read_to_tgt_rsp_length; // length of the response
+      sc_signal<typename vci_param::fast_addr_t>
+                          r_read_to_tgt_rsp_ll_key; // LL key returned by the llsc_global_table
+
+      ///////////////////////////////////////////////////////////////
+      // Registers controlled by the WRITE fsm
+      ///////////////////////////////////////////////////////////////
+
+      sc_signal<int>      r_write_fsm;        // FSM state
+      sc_signal<addr_t>   r_write_address;    // first word address
+      sc_signal<size_t>   r_write_word_index; // first word index in line
+      sc_signal<size_t>   r_write_word_count; // number of words in line
+      sc_signal<size_t>   r_write_srcid;      // transaction srcid
+      sc_signal<size_t>   r_write_trdid;      // transaction trdid
+      sc_signal<size_t>   r_write_pktid;      // transaction pktid
+      sc_signal<data_t> * r_write_data;       // data (one cache line)
+      sc_signal<be_t>   * r_write_be;         // one byte enable per word
+      sc_signal<bool>     r_write_byte;       // (BE != 0X0) and (BE != 0xF)
+      sc_signal<bool>     r_write_is_cnt;     // is_cnt bit (in directory)
+      sc_signal<bool>     r_write_lock;       // lock bit (in directory)
+      sc_signal<tag_t>    r_write_tag;        // cache line tag (in directory)
+      sc_signal<size_t>   r_write_copy;       // first owner of the line
+      sc_signal<size_t>   r_write_copy_cache; // first owner of the line
+      sc_signal<bool>     r_write_copy_inst;  // is this owner a ICache ?
+      sc_signal<size_t>   r_write_count;      // number of copies
+      sc_signal<size_t>   r_write_ptr;        // pointer to the heap
+      sc_signal<size_t>   r_write_next_ptr;   // next pointer to the heap
+      sc_signal<bool>     r_write_to_dec;     // need to decrement update counter
+      sc_signal<size_t>   r_write_way;        // way of the line
+      sc_signal<size_t>   r_write_trt_index;  // index in Transaction Table
+      sc_signal<size_t>   r_write_upt_index;  // index in Update Table
+      sc_signal<bool>     r_write_sc_fail;    // sc command failed
+      sc_signal<bool>     r_write_pending_sc; // sc command pending in WRITE fsm
+
+      // Buffer between WRITE fsm and TGT_RSP fsm (acknowledge a write command from L1)
+      sc_signal<bool>     r_write_to_tgt_rsp_req;     // valid request
+      sc_signal<size_t>   r_write_to_tgt_rsp_srcid;   // transaction srcid
+      sc_signal<size_t>   r_write_to_tgt_rsp_trdid;   // transaction trdid
+      sc_signal<size_t>   r_write_to_tgt_rsp_pktid;   // transaction pktid
+      sc_signal<bool>     r_write_to_tgt_rsp_sc_fail; // sc command failed
+
+      // Buffer between WRITE fsm and IXR_CMD fsm (ask a missing cache line to XRAM)
+      sc_signal<bool>     r_write_to_ixr_cmd_req;   // valid request
+      sc_signal<bool>     r_write_to_ixr_cmd_write; // write request
+      sc_signal<addr_t>   r_write_to_ixr_cmd_nline; // cache line index
+      sc_signal<data_t> * r_write_to_ixr_cmd_data;  // cache line data
+      sc_signal<size_t>   r_write_to_ixr_cmd_trdid; // index in Transaction Table
+
+      // Buffer between WRITE fsm and CC_SEND fsm (Update/Invalidate L1 caches)
+      sc_signal<bool>     r_write_to_cc_send_multi_req;     // valid multicast request
+      sc_signal<bool>     r_write_to_cc_send_brdcast_req;   // valid brdcast request
+      sc_signal<addr_t>   r_write_to_cc_send_nline;         // cache line index
+      sc_signal<size_t>   r_write_to_cc_send_trdid;         // index in Update Table
+      sc_signal<data_t> * r_write_to_cc_send_data;          // data (one cache line)
+      sc_signal<be_t>   * r_write_to_cc_send_be;            // word enable
+      sc_signal<size_t>   r_write_to_cc_send_count;         // number of words in line
+      sc_signal<size_t>   r_write_to_cc_send_index;         // index of first word in line
+      GenericFifo<bool>   m_write_to_cc_send_inst_fifo;     // fifo for the L1 type
+      GenericFifo<size_t> m_write_to_cc_send_srcid_fifo;    // fifo for srcids
+#if L1_MULTI_CACHE
+      GenericFifo<size_t> m_write_to_cc_send_cache_id_fifo; // fifo for srcids
+#endif
+
+      // Buffer between WRITE fsm and MULTI_ACK fsm (Decrement UPT entry)
+      sc_signal<bool>     r_write_to_multi_ack_req;       // valid request
+      sc_signal<size_t>   r_write_to_multi_ack_upt_index; // index in update table
+
+      /////////////////////////////////////////////////////////
+      // Registers controlled by MULTI_ACK fsm
+      //////////////////////////////////////////////////////////
+
+      sc_signal<int>      r_multi_ack_fsm;       // FSM state
+      sc_signal<size_t>   r_multi_ack_upt_index; // index in the Update Table
+      sc_signal<size_t>   r_multi_ack_srcid;     // pending write srcid
+      sc_signal<size_t>   r_multi_ack_trdid;     // pending write trdid
+      sc_signal<size_t>   r_multi_ack_pktid;     // pending write pktid
+      sc_signal<addr_t>   r_multi_ack_nline;     // pending write nline
+
+      // Buffer between MULTI_ACK fsm and TGT_RSP fsm (complete write/update transaction)
+      sc_signal<bool>     r_multi_ack_to_tgt_rsp_req;   // valid request
+      sc_signal<size_t>   r_multi_ack_to_tgt_rsp_srcid; // Transaction srcid
+      sc_signal<size_t>   r_multi_ack_to_tgt_rsp_trdid; // Transaction trdid
+      sc_signal<size_t>   r_multi_ack_to_tgt_rsp_pktid; // Transaction pktid
+
+      ///////////////////////////////////////////////////////
+      // Registers controlled by CLEANUP fsm
+      ///////////////////////////////////////////////////////
+
+      sc_signal<int>      r_cleanup_fsm;           // FSM state
+      sc_signal<size_t>   r_cleanup_srcid;         // transaction srcid
+      sc_signal<bool>     r_cleanup_inst;          // Instruction or Data ?
+      sc_signal<size_t>   r_cleanup_way_index;     // L1 Cache Way index
+      sc_signal<addr_t>   r_cleanup_nline;         // cache line index
+
+#if L1_MULTI_CACHE
+      sc_signal<size_t>   r_cleanup_pktid;         // transaction pktid
+#endif
+
+      sc_signal<copy_t>   r_cleanup_copy;          // first copy
+      sc_signal<copy_t>   r_cleanup_copy_cache;    // first copy
+      sc_signal<size_t>   r_cleanup_copy_inst;     // type of the first copy
+      sc_signal<copy_t>   r_cleanup_count;         // number of copies
+      sc_signal<size_t>   r_cleanup_ptr;           // pointer to the heap
+      sc_signal<size_t>   r_cleanup_prev_ptr;      // previous pointer to the heap
+      sc_signal<size_t>   r_cleanup_prev_srcid;    // srcid of previous heap entry
+      sc_signal<size_t>   r_cleanup_prev_cache_id; // srcid of previous heap entry
+      sc_signal<bool>     r_cleanup_prev_inst;     // inst bit of previous heap entry
+      sc_signal<size_t>   r_cleanup_next_ptr;      // next pointer to the heap
+      sc_signal<tag_t>    r_cleanup_tag;           // cache line tag (in directory)
+      sc_signal<bool>     r_cleanup_is_cnt;        // inst bit (in directory)
+      sc_signal<bool>     r_cleanup_lock;          // lock bit (in directory)
+      sc_signal<bool>     r_cleanup_dirty;         // dirty bit (in directory)
+      sc_signal<size_t>   r_cleanup_way;           // associative way (in cache)
+
+      sc_signal<size_t>   r_cleanup_write_srcid;   // srcid of write response
+      sc_signal<size_t>   r_cleanup_write_trdid;   // trdid of write rsp
+      sc_signal<size_t>   r_cleanup_write_pktid;   // pktid of write rsp
+      sc_signal<bool>     r_cleanup_write_need_rsp;// needs a write rsp
+
+      sc_signal<size_t>   r_cleanup_index;         // index of the INVAL line (in the UPT)
+
+      // Buffer between CLEANUP fsm and TGT_RSP fsm (acknowledge a write command from L1)
+      sc_signal<bool>     r_cleanup_to_tgt_rsp_req;   // valid request
+      sc_signal<size_t>   r_cleanup_to_tgt_rsp_srcid; // transaction srcid
+      sc_signal<size_t>   r_cleanup_to_tgt_rsp_trdid; // transaction trdid
+      sc_signal<size_t>   r_cleanup_to_tgt_rsp_pktid; // transaction pktid
+
+      // Buffer between CLEANUP fsm and CC_SEND fsm (acknowledge a cleanup command from L1)
+      sc_signal<bool>     r_cleanup_to_cc_send_req;       // valid request
+      sc_signal<size_t>   r_cleanup_to_cc_send_srcid;     // L1 srcid
+      sc_signal<size_t>   r_cleanup_to_cc_send_set_index; // L1 set index
+      sc_signal<size_t>   r_cleanup_to_cc_send_way_index; // L1 way index
+
+      ///////////////////////////////////////////////////////
+      // Registers controlled by CAS fsm
+      ///////////////////////////////////////////////////////
+
+      sc_signal<int>      r_cas_fsm;        // FSM state
+      sc_signal<data_t>   r_cas_wdata;      // write data word
+      sc_signal<data_t> * r_cas_rdata;      // read data word
+      sc_signal<uint32_t> r_cas_lfsr;       // lfsr for random introducing
+      sc_signal<size_t>   r_cas_cpt;        // size of command
+      sc_signal<copy_t>   r_cas_copy;       // Srcid of the first copy
+      sc_signal<copy_t>   r_cas_copy_cache; // Srcid of the first copy
+      sc_signal<bool>     r_cas_copy_inst;  // Type of the first copy
+      sc_signal<size_t>   r_cas_count;      // number of copies
+      sc_signal<size_t>   r_cas_ptr;        // pointer to the heap
+      sc_signal<size_t>   r_cas_next_ptr;   // next pointer to the heap
+      sc_signal<bool>     r_cas_is_cnt;     // is_cnt bit (in directory)
+      sc_signal<bool>     r_cas_dirty;      // dirty bit (in directory)
+      sc_signal<size_t>   r_cas_way;        // way in directory
+      sc_signal<size_t>   r_cas_set;        // set in directory
+      sc_signal<data_t>   r_cas_tag;        // cache line tag (in directory)
+      sc_signal<size_t>   r_cas_trt_index;  // Transaction Table index
+      sc_signal<size_t>   r_cas_upt_index;  // Update Table index
+
+      // Buffer between CAS fsm and IXR_CMD fsm (XRAM write)
+      sc_signal<bool>     r_cas_to_ixr_cmd_req;   // valid request
+      sc_signal<addr_t>   r_cas_to_ixr_cmd_nline; // cache line index
+      sc_signal<size_t>   r_cas_to_ixr_cmd_trdid; // index in Transaction Table
+      sc_signal<bool>     r_cas_to_ixr_cmd_write; // write request
+      sc_signal<data_t> * r_cas_to_ixr_cmd_data;  // cache line data
+
+
+      // Buffer between CAS fsm and TGT_RSP fsm
+      sc_signal<bool>     r_cas_to_tgt_rsp_req;   // valid request
+      sc_signal<data_t>   r_cas_to_tgt_rsp_data;  // read data word
+      sc_signal<size_t>   r_cas_to_tgt_rsp_srcid; // Transaction srcid
+      sc_signal<size_t>   r_cas_to_tgt_rsp_trdid; // Transaction trdid
+      sc_signal<size_t>   r_cas_to_tgt_rsp_pktid; // Transaction pktid
+
+      // Buffer between CAS fsm and CC_SEND fsm (Update/Invalidate L1 caches)
+      sc_signal<bool>     r_cas_to_cc_send_multi_req;     // valid request
+      sc_signal<bool>     r_cas_to_cc_send_brdcast_req;   // brdcast request
+      sc_signal<addr_t>   r_cas_to_cc_send_nline;         // cache line index
+      sc_signal<size_t>   r_cas_to_cc_send_trdid;         // index in Update Table
+      sc_signal<data_t>   r_cas_to_cc_send_wdata;         // data (one word)
+      sc_signal<bool>     r_cas_to_cc_send_is_long;       // it is a 64 bits CAS
+      sc_signal<data_t>   r_cas_to_cc_send_wdata_high;    // data high (one word)
+      sc_signal<size_t>   r_cas_to_cc_send_index;         // index of the word in line
+      GenericFifo<bool>   m_cas_to_cc_send_inst_fifo;     // fifo for the L1 type
+      GenericFifo<size_t> m_cas_to_cc_send_srcid_fifo;    // fifo for srcids
+#if L1_MULTI_CACHE
+      GenericFifo<size_t> m_cas_to_cc_send_cache_id_fifo; // fifo for srcids
+#endif
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by the IXR_RSP fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_ixr_rsp_fsm;       // FSM state
+      sc_signal<size_t>   r_ixr_rsp_trt_index; // TRT entry index
+      sc_signal<size_t>   r_ixr_rsp_cpt;       // word counter
+
+      // Buffer between IXR_RSP fsm and XRAM_RSP fsm  (response from the XRAM)
+      sc_signal<bool>   * r_ixr_rsp_to_xram_rsp_rok; // A xram response is ready
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by the XRAM_RSP fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_xram_rsp_fsm;               // FSM state
+      sc_signal<size_t>   r_xram_rsp_trt_index;         // TRT entry index
+      TransactionTabEntry r_xram_rsp_trt_buf;           // TRT entry local buffer
+      sc_signal<bool>     r_xram_rsp_victim_inval;      // victim line invalidate
+      sc_signal<bool>     r_xram_rsp_victim_is_cnt;     // victim line inst bit
+      sc_signal<bool>     r_xram_rsp_victim_dirty;      // victim line dirty bit
+      sc_signal<size_t>   r_xram_rsp_victim_way;        // victim line way
+      sc_signal<size_t>   r_xram_rsp_victim_set;        // victim line set
+      sc_signal<addr_t>   r_xram_rsp_victim_nline;      // victim line index
+      sc_signal<copy_t>   r_xram_rsp_victim_copy;       // victim line first copy
+      sc_signal<copy_t>   r_xram_rsp_victim_copy_cache; // victim line first copy
+      sc_signal<bool>     r_xram_rsp_victim_copy_inst;  // victim line type of first copy
+      sc_signal<size_t>   r_xram_rsp_victim_count;      // victim line number of copies
+      sc_signal<size_t>   r_xram_rsp_victim_ptr;        // victim line pointer to the heap
+      sc_signal<data_t> * r_xram_rsp_victim_data;       // victim line data
+      sc_signal<size_t>   r_xram_rsp_upt_index;         // UPT entry index
+      sc_signal<size_t>   r_xram_rsp_next_ptr;          // Next pointer to the heap
+
+      // Buffer between XRAM_RSP fsm and TGT_RSP fsm  (response to L1 cache)
+      sc_signal<bool>     r_xram_rsp_to_tgt_rsp_req;    // Valid request
+      sc_signal<size_t>   r_xram_rsp_to_tgt_rsp_srcid;  // Transaction srcid
+      sc_signal<size_t>   r_xram_rsp_to_tgt_rsp_trdid;  // Transaction trdid
+      sc_signal<size_t>   r_xram_rsp_to_tgt_rsp_pktid;  // Transaction pktid
+      sc_signal<data_t> * r_xram_rsp_to_tgt_rsp_data;   // data (one cache line)
+      sc_signal<size_t>   r_xram_rsp_to_tgt_rsp_word;   // first word index
+      sc_signal<size_t>   r_xram_rsp_to_tgt_rsp_length; // length of the response
+      sc_signal<bool>     r_xram_rsp_to_tgt_rsp_rerror; // send error to requester
+      sc_signal<typename vci_param::fast_addr_t>
+                          r_xram_rsp_to_tgt_rsp_ll_key; // LL key returned by the llsc_global_table
+
+      // Buffer between XRAM_RSP fsm and CC_SEND fsm (Inval L1 Caches)
+      sc_signal<bool>     r_xram_rsp_to_cc_send_multi_req;     // Valid request
+      sc_signal<bool>     r_xram_rsp_to_cc_send_brdcast_req;   // Broadcast request
+      sc_signal<addr_t>   r_xram_rsp_to_cc_send_nline;         // cache line index;
+      sc_signal<size_t>   r_xram_rsp_to_cc_send_trdid;         // index of UPT entry
+      GenericFifo<bool>   m_xram_rsp_to_cc_send_inst_fifo;     // fifo for the L1 type
+      GenericFifo<size_t> m_xram_rsp_to_cc_send_srcid_fifo;    // fifo for srcids
+#if L1_MULTI_CACHE
+      GenericFifo<size_t> m_xram_rsp_to_cc_send_cache_id_fifo; // fifo for srcids
+#endif
+
+      // Buffer between XRAM_RSP fsm and IXR_CMD fsm (XRAM write)
+      sc_signal<bool>     r_xram_rsp_to_ixr_cmd_req;   // Valid request
+      sc_signal<addr_t>   r_xram_rsp_to_ixr_cmd_nline; // cache line index
+      sc_signal<data_t> * r_xram_rsp_to_ixr_cmd_data;  // cache line data
+      sc_signal<size_t>   r_xram_rsp_to_ixr_cmd_trdid; // index in transaction table
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by the IXR_CMD fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_ixr_cmd_fsm;
+      sc_signal<size_t>   r_ixr_cmd_cpt;
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by TGT_RSP fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_tgt_rsp_fsm;
+      sc_signal<size_t>   r_tgt_rsp_cpt;
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by CC_SEND fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_cc_send_fsm;
+      sc_signal<size_t>   r_cc_send_cpt;
+      sc_signal<bool>     r_cc_send_inst;
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by CC_RECEIVE fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_cc_receive_fsm;
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by ALLOC_DIR fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_alloc_dir_fsm;
+      sc_signal<unsigned> r_alloc_dir_reset_cpt;
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by ALLOC_TRT fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_alloc_trt_fsm;
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by ALLOC_UPT fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_alloc_upt_fsm;
+
+      ////////////////////////////////////////////////////
+      // Registers controlled by ALLOC_HEAP fsm
+      ////////////////////////////////////////////////////
+
+      sc_signal<int>      r_alloc_heap_fsm;
+      sc_signal<unsigned> r_alloc_heap_reset_cpt;
+    }; // end class VciMemCache
+
+}}
+
+#endif
+
+// Local Variables:
+// tab-width: 2
+// c-basic-offset: 2
+// c-file-offsets:((innamespace . 0)(inline-open . 0))
+// indent-tabs-mode: nil
+// End:
+
+// vim: filetype=cpp:expandtab:shiftwidth=2:tabstop=2:softtabstop=2
+
Index: branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/xram_transaction.h
===================================================================
--- branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/xram_transaction.h	(revision 307)
+++ branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/include/xram_transaction.h	(revision 307)
@@ -0,0 +1,421 @@
+#ifndef XRAM_TRANSACTION_H_
+#define XRAM_TRANSACTION_H_
+
+#include <inttypes.h>
+#include <systemc>
+#include <cassert>
+#include "arithmetics.h"
+
+#define DEBUG_XRAM_TRANSACTION 0
+
+////////////////////////////////////////////////////////////////////////
+//                  A transaction tab entry         
+////////////////////////////////////////////////////////////////////////
+
+class TransactionTabEntry {
+    typedef uint32_t              size_t;
+    typedef uint32_t              data_t;
+    typedef sc_dt::sc_uint<40>    addr_t;
+    typedef uint32_t              be_t;
+
+    public:
+    bool 		        valid;     	    // entry valid 
+    bool 		        xram_read; 	    // read request to XRAM
+    addr_t   	        nline;    	    // index (zy) of the requested line
+    size_t 	            srcid;     	    // processor requesting the transaction
+    size_t 	            trdid;     	    // processor requesting the transaction
+    size_t 	            pktid;     	    // processor requesting the transaction
+    bool 		        proc_read;	    // read request from processor
+    size_t 	            read_length;    // length of the read (for the response)
+    size_t 	            word_index;    	// index of the first read word (for the response)
+    std::vector<data_t> wdata;          // write buffer (one cache line)
+    std::vector<be_t>   wdata_be;    	// be for each data in the write buffer
+    bool                rerror;         // error returned by xram
+    data_t              ll_key;         // LL key returned by the llsc_global_table
+
+    /////////////////////////////////////////////////////////////////////
+    // The init() function initializes the entry 
+    /////////////////////////////////////////////////////////////////////
+    void init()
+    {
+        valid		= false;
+        rerror      = false;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The alloc() function initializes the vectors of an entry
+    // Its arguments are :
+    // - n_words : number of words per line in the cache
+    /////////////////////////////////////////////////////////////////////
+    void alloc(size_t n_words)
+    {
+        wdata_be.reserve( (int)n_words );
+        wdata.reserve( (int)n_words );
+        for(size_t i=0; i<n_words; i++)
+        {
+            wdata_be.push_back(0);
+            wdata.push_back(0);
+        }
+    }
+
+    ////////////////////////////////////////////////////////////////////
+    // The copy() function copies an existing entry
+    // Its arguments are :
+    // - source : the transaction tab entry to copy
+    ////////////////////////////////////////////////////////////////////
+    void copy(const TransactionTabEntry &source)
+    {
+        valid	    = source.valid;
+        xram_read 	= source.xram_read;
+        nline	    = source.nline;
+        srcid	    = source.srcid;
+        trdid	    = source.trdid;
+        pktid	    = source.pktid;
+        proc_read 	= source.proc_read;
+        read_length = source.read_length;
+        word_index	= source.word_index;
+        wdata_be.assign(source.wdata_be.begin(),source.wdata_be.end());
+        wdata.assign(source.wdata.begin(),source.wdata.end());
+        rerror      = source.rerror;
+    }
+
+    ////////////////////////////////////////////////////////////////////
+    // The print() function prints the entry 
+    ////////////////////////////////////////////////////////////////////
+    void print(){
+        std::cout << "valid       = " << valid        << std::endl;
+        std::cout << "xram_read   = " << xram_read    << std::endl;
+        std::cout << "nline       = " << std::hex << nline << std::endl;
+        std::cout << "srcid       = " << srcid        << std::endl;
+        std::cout << "trdid       = " << trdid        << std::endl;
+        std::cout << "pktid       = " << pktid        << std::endl;
+        std::cout << "proc_read   = " << proc_read    << std::endl;
+        std::cout << "read_length = " << read_length  << std::endl;
+        std::cout << "word_index  = " << word_index   << std::endl; 
+        for(size_t i=0; i<wdata_be.size() ; i++){
+            std::cout << "wdata_be [" << i <<"] = " << wdata_be[i] << std::endl;
+        }
+        for(size_t i=0; i<wdata.size() ; i++){
+            std::cout << "wdata [" << i <<"] = " << wdata[i] << std::endl;
+        }
+        std::cout << std::endl;
+        std::cout << "rerror      = " << rerror       << std::endl;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // 		Constructors
+    /////////////////////////////////////////////////////////////////////
+
+    TransactionTabEntry()
+    {
+        wdata_be.clear();
+        wdata.clear();
+        valid=false;
+        rerror=false;
+    }
+
+    TransactionTabEntry(const TransactionTabEntry &source){
+        valid	    = source.valid;
+        xram_read	= source.xram_read;
+        nline	    = source.nline;
+        srcid	    = source.srcid;
+        trdid	    = source.trdid;
+        pktid	    = source.pktid;
+        proc_read	= source.proc_read;
+        read_length = source.read_length;
+        word_index	= source.word_index;
+        wdata_be.assign(source.wdata_be.begin(),source.wdata_be.end());
+        wdata.assign(source.wdata.begin(),source.wdata.end());	
+        rerror      = source.rerror;
+        ll_key      = source.ll_key;
+    }
+
+}; // end class TransactionTabEntry
+
+////////////////////////////////////////////////////////////////////////
+//                  The transaction tab                              
+////////////////////////////////////////////////////////////////////////
+class TransactionTab{
+    typedef uint32_t size_t;
+    typedef uint32_t data_t;
+    typedef sc_dt::sc_uint<40> addr_t;
+    typedef uint32_t be_t;
+
+    private:
+    size_t size_tab;                // The size of the tab
+
+    data_t be_to_mask(be_t be)
+    {
+        data_t ret = 0;
+        if ( be&0x1 ) {
+            ret = ret | 0x000000FF;
+        }
+        if ( be&0x2 ) {
+            ret = ret | 0x0000FF00;
+        }
+        if ( be&0x4 ) {
+            ret = ret | 0x00FF0000;
+        }
+        if ( be&0x8 ) {
+            ret = ret | 0xFF000000;
+        }
+        return ret;
+    }
+
+    public:
+    TransactionTabEntry *tab;       // The transaction tab
+
+    ////////////////////////////////////////////////////////////////////
+    //		Constructors
+    ////////////////////////////////////////////////////////////////////
+    TransactionTab()
+    {
+        size_tab=0;
+        tab=NULL;
+    }
+
+    TransactionTab(size_t n_entries, size_t n_words)
+    {
+        size_tab = n_entries;
+        tab = new TransactionTabEntry[size_tab];
+        for ( size_t i=0; i<size_tab; i++) {
+            tab[i].alloc(n_words);
+        }
+    }
+
+    ~TransactionTab()
+    {
+        delete [] tab;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The size() function returns the size of the tab
+    /////////////////////////////////////////////////////////////////////
+    size_t size()
+    {
+        return size_tab;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The init() function initializes the transaction tab entries
+    /////////////////////////////////////////////////////////////////////
+    void init()
+    {
+        for ( size_t i=0; i<size_tab; i++) {
+            tab[i].init();
+        }
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The print() function prints a transaction tab entry
+    // Arguments :
+    // - index : the index of the entry to print
+    /////////////////////////////////////////////////////////////////////
+    void print(const size_t index)
+    {
+        assert( (index < size_tab) 
+                && "Invalid Transaction Tab Entry");
+        tab[index].print();
+        return;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The read() function returns a transaction tab entry.
+    // Arguments :
+    // - index : the index of the entry to read
+    /////////////////////////////////////////////////////////////////////
+    TransactionTabEntry read(const size_t index)
+    {
+        assert( (index < size_tab) 
+                && "Invalid Transaction Tab Entry");
+        return tab[index];
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The full() function returns the state of the transaction tab
+    // Arguments :
+    // - index : (return argument) the index of an empty entry 
+    // The function returns true if the transaction tab is full
+    /////////////////////////////////////////////////////////////////////
+    bool full(size_t &index)
+    {
+        for(size_t i=0; i<size_tab; i++){
+            if(!tab[i].valid){
+                index=i;
+                return false;	
+            }
+        }
+        return true;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The hit_read() function checks if an XRAM read transaction exists 
+    // for a given cache line.
+    // Arguments :
+    // - index : (return argument) the index of the hit entry, if there is 
+    // - nline : the index (zy) of the requested line
+    // The function returns true if a read request has already been sent
+    //////////////////////////////////////////////////////////////////////
+    bool hit_read(const addr_t nline,size_t &index)
+    {
+        for(size_t i=0; i<size_tab; i++){
+            if((tab[i].valid && (nline==tab[i].nline)) && (tab[i].xram_read)) {
+                index=i;
+                return true;	
+            }
+        }
+        return false;
+    }
+
+    ///////////////////////////////////////////////////////////////////////
+    // The hit_write() function looks if an XRAM write transaction exists 
+    // for a given line.
+    // Arguments :
+    // - nline : the index (zy) of the requested line
+    // The function returns true if a write request has already been sent
+    ///////////////////////////////////////////////////////////////////////
+    bool hit_write(const addr_t nline)
+    {
+        for(size_t i=0; i<size_tab; i++){
+            if(tab[i].valid && (nline==tab[i].nline) && !(tab[i].xram_read)) {
+                return true;	
+            }
+        }
+        return false;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The write_data_mask() function writes a vector of data (a line).
+    // The data is written only if the corresponding bits are set
+    // in the be vector. 
+    // Arguments :
+    // - index : the index of the request in the transaction tab
+    // - be   : vector of be 
+    // - data : vector of data
+    /////////////////////////////////////////////////////////////////////
+    void write_data_mask(const size_t index, 
+            const std::vector<be_t> &be, 
+            const std::vector<data_t> &data) 
+    {
+        assert( (index < size_tab) 
+                && "Invalid Transaction Tab Entry");
+        assert(be.size()==tab[index].wdata_be.size() 
+                && "Bad data mask in write_data_mask in TransactionTab");
+        assert(data.size()==tab[index].wdata.size() 
+                && "Bad data in write_data_mask in TransactionTab");
+
+        for(size_t i=0; i<tab[index].wdata_be.size() ; i++) {
+            tab[index].wdata_be[i] = tab[index].wdata_be[i] | be[i];
+            data_t mask = be_to_mask(be[i]);
+            tab[index].wdata[i] = (tab[index].wdata[i] & ~mask) | (data[i] & mask);
+        }
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The set() function registers a transaction (read or write)
+    // to the XRAM in the transaction tab.
+    // Arguments :
+    // - index : index in the transaction tab
+    // - xram_read : transaction type (read or write a cache line)
+    // - nline : the index (zy) of the cache line
+    // - srcid : srcid of the initiator that caused the transaction
+    // - trdid : trdid of the initiator that caused the transaction
+    // - pktid : pktid of the initiator that caused the transaction
+    // - proc_read : does the initiator want a copy
+    // - read_length : length of read (in case of processor read)
+    // - word_index : index in the line (in case of single word read)
+    // - data : the data to write (in case of write)
+    // - data_be : the mask of the data to write (in case of write)
+    // - ll_key  : the ll key (if any) returned by the llsc_global_table
+    /////////////////////////////////////////////////////////////////////
+    void set(const size_t index,
+            const bool xram_read,
+            const addr_t nline,
+            const size_t srcid,
+            const size_t trdid,
+            const size_t pktid,
+            const bool proc_read,
+            const size_t read_length,
+            const size_t word_index,
+            const std::vector<be_t> &data_be,
+            const std::vector<data_t> &data, 
+            const data_t ll_key = 0) 
+    {
+        assert( (index < size_tab) 
+                && "The selected entry is out of range in set() Transaction Tab");
+        assert(data_be.size()==tab[index].wdata_be.size() 
+                && "Bad data_be argument in set() TransactionTab");
+        assert(data.size()==tab[index].wdata.size() 
+                && "Bad data argument in set() TransactionTab");
+
+        tab[index].valid	        = true;
+        tab[index].xram_read        = xram_read;
+        tab[index].nline	        = nline;
+        tab[index].srcid	        = srcid;
+        tab[index].trdid	        = trdid;
+        tab[index].pktid	        = pktid;
+        tab[index].proc_read	    = proc_read;
+        tab[index].read_length	    = read_length;
+        tab[index].word_index	    = word_index;
+        tab[index].ll_key   	    = ll_key;
+        for(size_t i=0; i<tab[index].wdata.size(); i++) 
+        {
+            tab[index].wdata_be[i]    = data_be[i];
+            tab[index].wdata[i]       = data[i];
+        }
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The write_rsp() function writes a word of the response to an 
+    // XRAM read transaction.
+    // The BE field in TRT is taken into account.
+    // Arguments :
+    // - index : the index of the transaction in the transaction tab
+    // - word_index : the index of the data in the line
+    // - data : the data to write
+    // - error : invalid data
+    /////////////////////////////////////////////////////////////////////
+    void write_rsp(const size_t index,
+            const size_t word,
+            const data_t data,
+            const bool   rerror)
+    {
+        assert( (index < size_tab) 
+                && "Selected entry  out of range in write_rsp() Transaction Tab");
+        assert( (word <= tab[index].wdata_be.size()) 
+                && "Bad word_index in write_rsp() in TransactionTab");
+        assert( tab[index].valid 
+                && "Transaction Tab Entry invalid in write_rsp()");
+        assert( tab[index].xram_read 
+                && "Selected entry is not an XRAM read transaction in write_rsp()");
+
+        data_t mask = be_to_mask(tab[index].wdata_be[word]);
+        tab[index].wdata[word] = (tab[index].wdata[word] & mask) | (data & ~mask);
+        tab[index].rerror |= rerror;
+    }
+
+    /////////////////////////////////////////////////////////////////////
+    // The erase() function erases an entry in the transaction tab.
+    // Arguments :
+    // - index : the index of the request in the transaction tab
+    /////////////////////////////////////////////////////////////////////
+    void erase(const size_t index)
+    {
+        assert( (index < size_tab) 
+                && "The selected entry is out of range in erase() Transaction Tab");
+        tab[index].valid	= false;
+        tab[index].rerror   = false;
+    }
+}; // end class TransactionTab
+
+#endif
+
+// Local Variables:
+// tab-width: 4
+// c-basic-offset: 4
+// c-file-offsets:((innamespace . 0)(inline-open . 0))
+// indent-tabs-mode: nil
+// End:
+
+// vim: filetype=cpp:expandtab:shiftwidth=4:tabstop=4:softtabstop=4
+
Index: branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/src/vci_mem_cache.cpp
===================================================================
--- branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/src/vci_mem_cache.cpp	(revision 307)
+++ branches/v5/modules/vci_mem_cache_dspin_coherence/caba/source/src/vci_mem_cache.cpp	(revision 307)
@@ -0,0 +1,7750 @@
+/* -*- c++ -*-
+* File       : vci_mem_cache.cpp
+* Date       : 30/10/2008
+* Copyright  : UPMC / LIP6
+* Authors    : Alain Greiner / Eric Guthmuller
+*
+* SOCLIB_LGPL_HEADER_BEGIN
+*
+* This file is part of SoCLib, GNU LGPLv2.1.
+*
+* SoCLib is free software; you can redistribute it and/or modify it
+* under the terms of the GNU Lesser General Public License as published
+* by the Free Software Foundation; version 2.1 of the License.
+*
+* SoCLib is distributed in the hope that it will be useful, but
+* WITHOUT ANY WARRANTY; without even the implied warranty of
+* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+* Lesser General Public License for more details.
+*
+* You should have received a copy of the GNU Lesser General Public
+* License along with SoCLib; if not, write to the Free Software
+* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
+* 02110-1301 USA
+*
+* SOCLIB_LGPL_HEADER_END
+*
+* Maintainers: alain eric.guthmuller@polytechnique.edu
+*              cesar.fuguet-tortolero@lip6.fr
+*              alexandre.joannou@lip6.fr
+*/
+
+#include "../include/vci_mem_cache.h"
+
+//////   debug services   ///////////////////////////////////////////////////////
+// All debug messages are conditionned by two variables:
+// - compile time   : DEBUG_MEMC_*** : defined below
+// - execution time : m_debug_***    : defined by constructor arguments
+//    m_debug_* = (m_debug_ok) and (m_cpt_cycle > m_debug_start_cycle)
+/////////////////////////////////////////////////////////////////////////////////
+
+#define DEBUG_MEMC_GLOBAL   0 // synthetic trace of all FSMs
+#define DEBUG_MEMC_READ     1 // detailed trace of READ FSM
+#define DEBUG_MEMC_WRITE    1 // detailed trace of WRITE FSM
+#define DEBUG_MEMC_CAS      1 // detailed trace of CAS FSM
+#define DEBUG_MEMC_IXR_CMD  1 // detailed trace of IXR_RSP FSM
+#define DEBUG_MEMC_IXR_RSP  1 // detailed trace of IXR_RSP FSM
+#define DEBUG_MEMC_XRAM_RSP 1 // detailed trace of XRAM_RSP FSM
+#define DEBUG_MEMC_CC_SEND 1 // detailed trace of CC_SEND FSM
+#define DEBUG_MEMC_MULTI_ACK 1 // detailed trace of MULTI_ACK FSM
+#define DEBUG_MEMC_TGT_CMD  1 // detailed trace of TGT_CMD FSM
+#define DEBUG_MEMC_TGT_RSP  1 // detailed trace of TGT_RSP FSM
+#define DEBUG_MEMC_CLEANUP  1 // detailed trace of CLEANUP FSM
+
+#define RANDOMIZE_CAS       1
+
+namespace soclib
+{
+namespace caba
+{
+
+const char *tgt_cmd_fsm_str[] =
+{
+  "TGT_CMD_IDLE",
+  "TGT_CMD_READ",
+  "TGT_CMD_WRITE",
+  "TGT_CMD_CAS"
+};
+const char *tgt_rsp_fsm_str[] =
+{
+  "TGT_RSP_READ_IDLE",
+  "TGT_RSP_WRITE_IDLE",
+  "TGT_RSP_CAS_IDLE",
+  "TGT_RSP_XRAM_IDLE",
+  "TGT_RSP_INIT_IDLE",
+  "TGT_RSP_CLEANUP_IDLE",
+  "TGT_RSP_READ",
+  "TGT_RSP_WRITE",
+  "TGT_RSP_CAS",
+  "TGT_RSP_XRAM",
+  "TGT_RSP_INIT",
+  "TGT_RSP_CLEANUP"
+};
+const char *cc_receive_fsm_str[] =
+{
+  "CC_RECEIVE_IDLE,"
+  "CC_RECEIVE_CLEANUP",
+  "CC_RECEIVE_MULTI_ACK"
+};
+const char *cc_send_fsm_str[] =
+{
+  "CC_SEND_XRAM_RSP_IDLE",
+  "CC_SEND_WRITE_IDLE",
+  "CC_SEND_CAS_IDLE",
+  "CC_SEND_CLEANUP_IDLE",
+  "CC_SEND_CLEANUP_ACK",
+  "CC_SEND_XRAM_RSP_BRDCAST",
+  "CC_SEND_XRAM_RSP_INVAL_NLINE",
+  "CC_SEND_WRITE_BRDCAST",
+  "CC_SEND_WRITE_UPDT_NLINE",
+  "CC_SEND_WRITE_UPDT_INDEX",
+  "CC_SEND_WRITE_UPDT_DATA",
+  "CC_SEND_CAS_BRDCAST",
+  "CC_SEND_CAS_UPDT_NLINE",
+  "CC_SEND_CAS_UPDT_INDEX",
+  "CC_SEND_CAS_UPDT_DATA",
+  "CC_SEND_CAS_UPDT_DATA_HIGH"
+};
+const char *multi_ack_fsm_str[] =
+{
+  "MULTI_ACK_IDLE",
+  "MULTI_ACK_UPT_LOCK",
+  "MULTI_ACK_UPT_CLEAR",
+  "MULTI_ACK_WRITE_RSP"
+};
+const char *read_fsm_str[] =
+{
+  "READ_IDLE",
+  "READ_DIR_REQ",
+  "READ_DIR_LOCK",
+  "READ_DIR_HIT",
+  "READ_HEAP_REQ",
+  "READ_HEAP_LOCK",
+  "READ_HEAP_WRITE",
+  "READ_HEAP_ERASE",
+  "READ_HEAP_LAST",
+  "READ_RSP",
+  "READ_TRT_LOCK",
+  "READ_TRT_SET",
+  "READ_TRT_REQ"
+};
+const char *write_fsm_str[] =
+{
+  "WRITE_IDLE",
+  "WRITE_NEXT",
+  "WRITE_DIR_REQ",
+  "WRITE_DIR_LOCK",
+  "WRITE_DIR_READ",
+  "WRITE_DIR_HIT",
+  "WRITE_UPT_LOCK",
+  "WRITE_UPT_HEAP_LOCK",
+  "WRITE_UPT_REQ",
+  "WRITE_UPT_NEXT",
+  "WRITE_UPT_DEC",
+  "WRITE_RSP",
+  "WRITE_MISS_TRT_LOCK",
+  "WRITE_MISS_TRT_DATA",
+  "WRITE_MISS_TRT_SET",
+  "WRITE_MISS_XRAM_REQ",
+  "WRITE_BC_TRT_LOCK",
+  "WRITE_BC_UPT_LOCK",
+  "WRITE_BC_DIR_INVAL",
+  "WRITE_BC_CC_SEND",
+  "WRITE_BC_XRAM_REQ",
+  "WRITE_WAIT"
+};
+const char *ixr_rsp_fsm_str[] =
+{
+  "IXR_RSP_IDLE",
+  "IXR_RSP_ACK",
+  "IXR_RSP_TRT_ERASE",
+  "IXR_RSP_TRT_READ"
+};
+const char *xram_rsp_fsm_str[] =
+{
+  "XRAM_RSP_IDLE",
+  "XRAM_RSP_TRT_COPY",
+  "XRAM_RSP_TRT_DIRTY",
+  "XRAM_RSP_DIR_LOCK",
+  "XRAM_RSP_DIR_UPDT",
+  "XRAM_RSP_DIR_RSP",
+  "XRAM_RSP_INVAL_LOCK",
+  "XRAM_RSP_INVAL_WAIT",
+  "XRAM_RSP_INVAL",
+  "XRAM_RSP_WRITE_DIRTY",
+  "XRAM_RSP_HEAP_REQ",
+  "XRAM_RSP_HEAP_ERASE",
+  "XRAM_RSP_HEAP_LAST",
+  "XRAM_RSP_ERROR_ERASE",
+  "XRAM_RSP_ERROR_RSP"
+};
+const char *ixr_cmd_fsm_str[] =
+{
+  "IXR_CMD_READ_IDLE",
+  "IXR_CMD_WRITE_IDLE",
+  "IXR_CMD_CAS_IDLE",
+  "IXR_CMD_XRAM_IDLE",
+  "IXR_CMD_READ_NLINE",
+  "IXR_CMD_WRITE_NLINE",
+  "IXR_CMD_CAS_NLINE",
+  "IXR_CMD_XRAM_DATA"
+};
+const char *cas_fsm_str[] =
+{
+  "CAS_IDLE",
+  "CAS_DIR_REQ",
+  "CAS_DIR_LOCK",
+  "CAS_DIR_HIT_READ",
+  "CAS_DIR_HIT_WRITE",
+  "CAS_UPT_LOCK",
+  "CAS_UPT_HEAP_LOCK",
+  "CAS_UPT_REQ",
+  "CAS_UPT_NEXT",
+  "CAS_BC_TRT_LOCK",
+  "CAS_BC_UPT_LOCK",
+  "CAS_BC_DIR_INVAL",
+  "CAS_BC_CC_SEND",
+  "CAS_BC_XRAM_REQ",
+  "CAS_RSP_FAIL",
+  "CAS_RSP_SUCCESS",
+  "CAS_MISS_TRT_LOCK",
+  "CAS_MISS_TRT_SET",
+  "CAS_MISS_XRAM_REQ",
+  "CAS_WAIT"
+};
+const char *cleanup_fsm_str[] =
+{
+  "CLEANUP_IDLE",
+  "CLEANUP_GET_NLINE",
+  "CLEANUP_DIR_REQ",
+  "CLEANUP_DIR_LOCK",
+  "CLEANUP_DIR_WRITE",
+  "CLEANUP_HEAP_REQ",
+  "CLEANUP_HEAP_LOCK",
+  "CLEANUP_HEAP_SEARCH",
+  "CLEANUP_HEAP_CLEAN",
+  "CLEANUP_HEAP_FREE",
+  "CLEANUP_UPT_LOCK",
+  "CLEANUP_UPT_DECREMENT",
+  "CLEANUP_UPT_CLEAR",
+  "CLEANUP_WRITE_RSP",
+  "CLEANUP_SEND_ACK"
+};
+const char *alloc_dir_fsm_str[] =
+{
+  "ALLOC_DIR_RESET",
+  "ALLOC_DIR_READ",
+  "ALLOC_DIR_WRITE",
+  "ALLOC_DIR_CAS",
+  "ALLOC_DIR_CLEANUP",
+  "ALLOC_DIR_XRAM_RSP"
+};
+const char *alloc_trt_fsm_str[] =
+{
+  "ALLOC_TRT_READ",
+  "ALLOC_TRT_WRITE",
+  "ALLOC_TRT_CAS",
+  "ALLOC_TRT_XRAM_RSP",
+  "ALLOC_TRT_IXR_RSP"
+};
+const char *alloc_upt_fsm_str[] =
+{
+  "ALLOC_UPT_WRITE",
+  "ALLOC_UPT_XRAM_RSP",
+  "ALLOC_UPT_MULTI_ACK",
+  "ALLOC_UPT_CLEANUP",
+  "ALLOC_UPT_CAS"
+};
+const char *alloc_heap_fsm_str[] =
+{
+  "ALLOC_HEAP_RESET",
+  "ALLOC_HEAP_READ",
+  "ALLOC_HEAP_WRITE",
+  "ALLOC_HEAP_CAS",
+  "ALLOC_HEAP_CLEANUP",
+  "ALLOC_HEAP_XRAM_RSP"
+};
+
+#define tmpl(x) \
+  template<typename vci_param, int from_mc_flit_width, int from_l1_flit_width> x \
+  VciMemCache<vci_param, from_mc_flit_width, from_l1_flit_width>
+
+using soclib::common::uint32_log2;
+
+////////////////////////////////
+//  Constructor
+////////////////////////////////
+
+tmpl(/**/) ::VciMemCache(
+  sc_module_name name,
+  const soclib::common::MappingTable &mtp,
+  const soclib::common::MappingTable &mtc,
+  const soclib::common::MappingTable &mtx,
+  const soclib::common::IntTab &vci_ixr_index,
+  const soclib::common::IntTab &vci_ini_index,
+  const soclib::common::IntTab &vci_tgt_index,
+  const soclib::common::IntTab &vci_tgt_index_cleanup,
+  size_t nways,                 // number of ways per set
+  size_t nsets,                 // number of cache sets
+  size_t nwords,                // number of words in cache line
+  size_t heap_size,             // number of heap entries
+  size_t transaction_tab_lines, // number of TRT entries
+  size_t update_tab_lines,      // number of UPT entries
+  size_t debug_start_cycle,
+  bool   debug_ok)
+
+  : soclib::caba::BaseModule(name),
+
+    m_debug_start_cycle(debug_start_cycle),
+    m_debug_ok(debug_ok),
+
+    p_clk("clk"),
+    p_resetn("resetn"),
+    p_vci_tgt("vci_tgt"),
+    p_vci_ixr("vci_ixr"),
+    p_dspin_in("dspin_tgt"),
+    p_dspin_out("cc_send"),
+
+    m_seglist(mtp.getSegmentList(vci_tgt_index)),
+    m_cseglist(mtc.getSegmentList(vci_tgt_index_cleanup)),
+
+    m_initiators(1 << vci_param::S),
+    m_heap_size(heap_size),
+    m_ways(nways),
+    m_sets(nsets),
+    m_words(nwords),
+    m_srcid_ixr(mtx.indexForId(vci_ixr_index)),
+    m_srcid_ini(mtc.indexForId(vci_ini_index)),
+    m_transaction_tab_lines(transaction_tab_lines),
+    m_transaction_tab(transaction_tab_lines, nwords),
+    m_update_tab_lines(update_tab_lines),
+    m_update_tab(update_tab_lines),
+    m_cache_directory(nways, nsets, nwords, vci_param::N),
+    m_cache_data(nways, nsets, nwords),
+    m_heap(m_heap_size),
+    m_llsc_table(),
+
+#define L2 soclib::common::uint32_log2
+    m_x(L2(m_words), 2),
+    m_y(L2(m_sets), L2(m_words) + 2),
+    m_z(vci_param::N - L2(m_sets) - L2(m_words) - 2, L2(m_sets) + L2(m_words) + 2),
+    m_nline(vci_param::N - L2(m_words) - 2, L2(m_words) + 2),
+#undef L2
+
+    // XMIN(5 bits) / XMAX(5 bits) / YMIN(5 bits) / YMAX(5 bits)
+    //   0b00000    /   0b11111    /   0b00000    /   0b11111
+    m_broadcast_address(0x7C1F),
+
+    //  FIFOs
+    m_cmd_read_addr_fifo("m_cmd_read_addr_fifo", 4),
+    m_cmd_read_length_fifo("m_cmd_read_length_fifo", 4),
+    m_cmd_read_srcid_fifo("m_cmd_read_srcid_fifo", 4),
+    m_cmd_read_trdid_fifo("m_cmd_read_trdid_fifo", 4),
+    m_cmd_read_pktid_fifo("m_cmd_read_pktid_fifo", 4),
+
+    m_cmd_write_addr_fifo("m_cmd_write_addr_fifo",8),
+    m_cmd_write_eop_fifo("m_cmd_write_eop_fifo",8),
+    m_cmd_write_srcid_fifo("m_cmd_write_srcid_fifo",8),
+    m_cmd_write_trdid_fifo("m_cmd_write_trdid_fifo",8),
+    m_cmd_write_pktid_fifo("m_cmd_write_pktid_fifo",8),
+    m_cmd_write_data_fifo("m_cmd_write_data_fifo",8),
+    m_cmd_write_be_fifo("m_cmd_write_be_fifo",8),
+
+    m_cmd_cas_addr_fifo("m_cmd_cas_addr_fifo",4),
+    m_cmd_cas_eop_fifo("m_cmd_cas_eop_fifo",4),
+    m_cmd_cas_srcid_fifo("m_cmd_cas_srcid_fifo",4),
+    m_cmd_cas_trdid_fifo("m_cmd_cas_trdid_fifo",4),
+    m_cmd_cas_pktid_fifo("m_cmd_cas_pktid_fifo",4),
+    m_cmd_cas_wdata_fifo("m_cmd_cas_wdata_fifo",4),
+
+    m_cc_receive_to_cleanup_fifo("m_cc_receive_to_cleanup_fifo", 4),
+    m_cc_receive_to_multi_ack_fifo("m_cc_receive_to_multi_ack_fifo", 4),
+
+    r_tgt_cmd_fsm("r_tgt_cmd_fsm"),
+
+    m_nseg(0),
+    m_ncseg(0),
+
+    r_read_fsm("r_read_fsm"),
+
+    r_write_fsm("r_write_fsm"),
+
+    m_write_to_cc_send_inst_fifo("m_write_to_cc_send_inst_fifo",8),
+    m_write_to_cc_send_srcid_fifo("m_write_to_cc_send_srcid_fifo",8),
+#if L1_MULTI_CACHE
+    m_write_to_cc_send_cache_id_fifo("m_write_to_cc_send_cache_id_fifo",8),
+#endif
+
+    r_multi_ack_fsm("r_multi_ack_fsm"),
+
+    r_cleanup_fsm("r_cleanup_fsm"),
+
+    r_cas_fsm("r_cas_fsm"),
+
+    m_cas_to_cc_send_inst_fifo("m_cas_to_cc_send_inst_fifo",8),
+    m_cas_to_cc_send_srcid_fifo("m_cas_to_cc_send_srcid_fifo",8),
+#if L1_MULTI_CACHE
+    m_cas_to_cc_send_cache_id_fifo("m_cas_to_cc_send_cache_id_fifo",8),
+#endif
+
+    r_ixr_rsp_fsm("r_ixr_rsp_fsm"),
+    r_xram_rsp_fsm("r_xram_rsp_fsm"),
+
+    m_xram_rsp_to_cc_send_inst_fifo("m_xram_rsp_to_cc_send_inst_fifo",8),
+    m_xram_rsp_to_cc_send_srcid_fifo("m_xram_rsp_to_cc_send_srcid_fifo",8),
+#if L1_MULTI_CACHE
+    m_xram_rsp_to_cc_send_cache_id_fifo("m_xram_rsp_to_cc_send_cache_id_fifo",8),
+#endif
+
+    r_ixr_cmd_fsm("r_ixr_cmd_fsm"),
+
+    r_tgt_rsp_fsm("r_tgt_rsp_fsm"),
+
+    r_cc_send_fsm("r_cc_send_fsm"),
+    r_cc_receive_fsm("r_cc_receive_fsm"),
+
+    r_alloc_dir_fsm("r_alloc_dir_fsm"),
+    r_alloc_dir_reset_cpt("r_alloc_dir_reset_cpt"),
+    r_alloc_trt_fsm("r_alloc_trt_fsm"),
+    r_alloc_upt_fsm("r_alloc_upt_fsm"),
+    r_alloc_heap_fsm("r_alloc_heap_fsm"),
+    r_alloc_heap_reset_cpt("r_alloc_heap_reset_cpt")
+{
+  assert(IS_POW_OF_2(nsets));
+  assert(IS_POW_OF_2(nwords));
+  assert(IS_POW_OF_2(nways));
+  assert(nsets);
+  assert(nwords);
+  assert(nways);
+
+  // check Transaction table size
+  assert((uint32_log2(transaction_tab_lines) <= vci_param::T) and
+         "Need more bits for VCI TRDID field");
+
+  // Get the segments associated to the MemCache
+  std::list<soclib::common::Segment>::iterator seg;
+  size_t i;
+
+  for(seg = m_seglist.begin(); seg != m_seglist.end() ; seg++)
+  {
+    m_nseg++;
+  }
+  for(seg = m_cseglist.begin(); seg != m_cseglist.end() ; seg++)
+  {
+    m_ncseg++;
+  }
+
+  m_seg = new soclib::common::Segment*[m_nseg];
+
+  i = 0;
+  for(seg = m_seglist.begin() ; seg != m_seglist.end() ; seg++)
+  {
+    m_seg[i] = & (*seg);
+    i++;
+  }
+
+  m_cseg = new soclib::common::Segment*[m_ncseg];
+
+  i = 0;
+  for(seg = m_cseglist.begin() ; seg != m_cseglist.end() ; seg++)
+  {
+    m_cseg[i] = & (*seg);
+    i++;
+  }
+
+  // Allocation for IXR_RSP FSM
+  r_ixr_rsp_to_xram_rsp_rok  = new sc_signal<bool>[m_transaction_tab_lines];
+
+  // Allocation for XRAM_RSP FSM
+  r_xram_rsp_victim_data     = new sc_signal<data_t>[nwords];
+  r_xram_rsp_to_tgt_rsp_data = new sc_signal<data_t>[nwords];
+  r_xram_rsp_to_ixr_cmd_data = new sc_signal<data_t>[nwords];
+
+  // Allocation for READ FSM
+  r_read_data                = new sc_signal<data_t>[nwords];
+  r_read_to_tgt_rsp_data     = new sc_signal<data_t>[nwords];
+
+  // Allocation for WRITE FSM
+  r_write_data               = new sc_signal<data_t>[nwords];
+  r_write_be                 = new sc_signal<be_t>[nwords];
+  r_write_to_cc_send_data  = new sc_signal<data_t>[nwords];
+  r_write_to_cc_send_be    = new sc_signal<be_t>[nwords];
+  r_write_to_ixr_cmd_data    = new sc_signal<data_t>[nwords];
+
+  // Allocation for CAS FSM
+  r_cas_to_ixr_cmd_data      = new sc_signal<data_t>[nwords];
+  r_cas_rdata                = new sc_signal<data_t>[2];
+
+
+  // Simulation
+
+  SC_METHOD(transition);
+  dont_initialize();
+  sensitive << p_clk.pos();
+
+  SC_METHOD(genMoore);
+  dont_initialize();
+  sensitive << p_clk.neg();
+} // end constructor
+
+///////////////////////////////////////////////////////////////////////
+tmpl(void) ::start_monitor(vci_addr_t addr, vci_addr_t length)
+///////////////////////////////////////////////////////////////////////
+{
+  m_monitor_ok        = true;
+  m_monitor_base      = addr;
+  m_monitor_length    = length;
+}
+
+///////////////////////////////////////////////////////////////////////
+tmpl(void) ::stop_monitor()
+///////////////////////////////////////////////////////////////////////
+{
+  m_monitor_ok        = false;
+}
+
+///////////////////////////////////////////////////////////////////////
+tmpl(void) ::check_monitor(const char *buf, vci_addr_t addr, data_t data)
+///////////////////////////////////////////////////////////////////////
+{
+  if((addr >= m_monitor_base) and
+      (addr < m_monitor_base + m_monitor_length))
+  {
+    std::cout << " MEMC Write Monitor : " << buf << " Address = " << std::hex << addr
+              << " / Data = " << data << std::endl;
+  }
+}
+
+/////////////////////////////////////////////////////
+tmpl(void) ::copies_monitor(vci_addr_t addr)
+/////////////////////////////////////////////////////
+{
+  DirectoryEntry entry = m_cache_directory.read_neutral(addr);
+  if((entry.count != m_debug_previous_count) or
+      (entry.valid != m_debug_previous_hit))
+  {
+    std::cout << " MEMC " << name()
+              << " cache change at cycle " << std::dec << m_cpt_cycles
+              << " for address " << std::hex << addr
+              << " / HIT = " << entry.valid
+              << " / COUNT = " << std::dec << entry.count << std::endl;
+  }
+  m_debug_previous_count = entry.count;
+  m_debug_previous_hit = entry.valid;
+}
+
+//////////////////////////////////////////////////
+tmpl(void) ::print_trace()
+//////////////////////////////////////////////////
+{
+  std::cout << "MEMC " << name() << std::endl;
+  std::cout << "  "  << tgt_cmd_fsm_str[r_tgt_cmd_fsm]
+            << " | " << tgt_rsp_fsm_str[r_tgt_rsp_fsm]
+            << " | " << read_fsm_str[r_read_fsm]
+            << " | " << write_fsm_str[r_write_fsm]
+            << " | " << cas_fsm_str[r_cas_fsm]
+            << " | " << cleanup_fsm_str[r_cleanup_fsm] << std::endl;
+  std::cout << "  "  << cc_send_fsm_str[r_cc_send_fsm]
+            << " | " << multi_ack_fsm_str[r_multi_ack_fsm]
+            << " | " << ixr_cmd_fsm_str[r_ixr_cmd_fsm]
+            << " | " << ixr_rsp_fsm_str[r_ixr_rsp_fsm]
+            << " | " << xram_rsp_fsm_str[r_xram_rsp_fsm] << std::endl;
+
+  //m_llsc_table.print_trace();
+
+}
+
+/////////////////////////////////////////
+tmpl(void) ::print_stats()
+/////////////////////////////////////////
+{
+  std::cout << "----------------------------------" << std::dec << std::endl;
+  std::cout
+      << "MEM_CACHE " << m_srcid_ini << " / Time = " << m_cpt_cycles << std::endl
+      << "- READ RATE            = " << (double) m_cpt_read/m_cpt_cycles << std::endl
+      << "- READ TOTAL           = " << m_cpt_read << std::endl
+      << "- READ MISS RATE       = " << (double) m_cpt_read_miss/m_cpt_read << std::endl
+      << "- WRITE RATE           = " << (double) m_cpt_write/m_cpt_cycles << std::endl
+      << "- WRITE TOTAL          = " << m_cpt_write << std::endl
+      << "- WRITE MISS RATE      = " << (double) m_cpt_write_miss/m_cpt_write << std::endl
+      << "- WRITE BURST LENGTH   = " << (double) m_cpt_write_cells/m_cpt_write << std::endl
+      << "- WRITE BURST TOTAL    = " << m_cpt_write_cells << std::endl
+      << "- REQUESTS TRT FULL    = " << m_cpt_trt_full << std::endl
+      << "- READ TRT BLOKED HIT  = " << m_cpt_trt_rb << std::endl
+      << "- UPDATE RATE          = " << (double) m_cpt_update/m_cpt_cycles << std::endl
+      << "- UPDATE ARITY         = " << (double) m_cpt_update_mult/m_cpt_update << std::endl
+      << "- INVAL MULTICAST RATE = " << (double)(m_cpt_inval-m_cpt_inval_brdcast) /m_cpt_cycles << std::endl
+      << "- INVAL MULTICAST ARITY= " << (double) m_cpt_inval_mult/ (m_cpt_inval-m_cpt_inval_brdcast) << std::endl
+      << "- INVAL BROADCAST RATE = " << (double) m_cpt_inval_brdcast/m_cpt_cycles << std::endl
+      << "- SAVE DIRTY RATE      = " << (double) m_cpt_write_dirty/m_cpt_cycles << std::endl
+      << "- CLEANUP RATE         = " << (double) m_cpt_cleanup/m_cpt_cycles << std::endl
+      << "- LL RATE              = " << (double) m_cpt_ll/m_cpt_cycles << std::endl
+      << "- SC RATE              = " << (double) m_cpt_sc/m_cpt_cycles << std::endl
+      << "- CAS RATE             = " << (double) m_cpt_cas/m_cpt_cycles << std::endl;
+}
+
+/////////////////////////////////
+tmpl(/**/) ::~VciMemCache()
+/////////////////////////////////
+{
+  delete [] r_ixr_rsp_to_xram_rsp_rok;
+
+  delete [] r_xram_rsp_victim_data;
+  delete [] r_xram_rsp_to_tgt_rsp_data;
+  delete [] r_xram_rsp_to_ixr_cmd_data;
+
+  delete [] r_read_data;
+  delete [] r_read_to_tgt_rsp_data;
+
+  delete [] r_write_data;
+  delete [] r_write_be;
+  delete [] r_write_to_cc_send_data;
+}
+
+//////////////////////////////////
+tmpl(void) ::transition()
+//////////////////////////////////
+{
+  using soclib::common::uint32_log2;
+
+  // RESET
+  if(! p_resetn.read())
+  {
+
+    // Initializing FSMs
+    r_tgt_cmd_fsm    = TGT_CMD_IDLE;
+    r_tgt_rsp_fsm    = TGT_RSP_READ_IDLE;
+    r_cc_send_fsm  = CC_SEND_XRAM_RSP_IDLE;
+    r_cc_receive_fsm  = CC_RECEIVE_IDLE;
+    r_multi_ack_fsm  = MULTI_ACK_IDLE;
+    r_read_fsm       = READ_IDLE;
+    r_write_fsm      = WRITE_IDLE;
+    r_cas_fsm        = CAS_IDLE;
+    r_cleanup_fsm    = CLEANUP_IDLE;
+    r_alloc_dir_fsm  = ALLOC_DIR_RESET;
+    r_alloc_heap_fsm = ALLOC_HEAP_RESET;
+    r_alloc_trt_fsm  = ALLOC_TRT_READ;
+    r_alloc_upt_fsm  = ALLOC_UPT_WRITE;
+    r_ixr_rsp_fsm    = IXR_RSP_IDLE;
+    r_xram_rsp_fsm   = XRAM_RSP_IDLE;
+    r_ixr_cmd_fsm    = IXR_CMD_READ_IDLE;
+
+    m_debug_global         = false;
+    m_debug_tgt_cmd_fsm    = false;
+    m_debug_tgt_rsp_fsm    = false;
+    m_debug_cc_send_fsm  = false;
+    m_debug_cc_receive_fsm  = false;
+    m_debug_multi_ack_fsm  = false;
+    m_debug_read_fsm       = false;
+    m_debug_write_fsm      = false;
+    m_debug_cas_fsm        = false;
+    m_debug_cleanup_fsm    = false;
+    m_debug_ixr_cmd_fsm    = false;
+    m_debug_ixr_rsp_fsm    = false;
+    m_debug_xram_rsp_fsm   = false;
+    m_debug_previous_hit   = false;
+    m_debug_previous_count = 0;
+
+    //  Initializing Tables
+    m_transaction_tab.init();
+    m_update_tab.init();
+
+    // initializing FIFOs and communication Buffers
+
+    m_cmd_read_addr_fifo.init();
+    m_cmd_read_length_fifo.init();
+    m_cmd_read_srcid_fifo.init();
+    m_cmd_read_trdid_fifo.init();
+    m_cmd_read_pktid_fifo.init();
+
+    m_cmd_write_addr_fifo.init();
+    m_cmd_write_eop_fifo.init();
+    m_cmd_write_srcid_fifo.init();
+    m_cmd_write_trdid_fifo.init();
+    m_cmd_write_pktid_fifo.init();
+    m_cmd_write_data_fifo.init();
+
+    m_cmd_cas_addr_fifo.init()  ;
+    m_cmd_cas_srcid_fifo.init() ;
+    m_cmd_cas_trdid_fifo.init() ;
+    m_cmd_cas_pktid_fifo.init() ;
+    m_cmd_cas_wdata_fifo.init() ;
+    m_cmd_cas_eop_fifo.init()   ;
+
+    r_read_to_tgt_rsp_req = false;
+    r_read_to_ixr_cmd_req = false;
+
+    r_write_to_tgt_rsp_req          = false;
+    r_write_to_ixr_cmd_req          = false;
+    r_write_to_cc_send_multi_req   = false;
+    r_write_to_cc_send_brdcast_req = false;
+    r_write_to_multi_ack_req        = false;
+
+    m_write_to_cc_send_inst_fifo.init();
+    m_write_to_cc_send_srcid_fifo.init();
+#if L1_MULTI_CACHE
+    m_write_to_cc_send_cache_id_fifo.init();
+#endif
+
+    r_cleanup_to_tgt_rsp_req      = false;
+
+    m_cc_receive_to_cleanup_fifo.init();
+
+    r_multi_ack_to_tgt_rsp_req     = false;
+
+    m_cc_receive_to_multi_ack_fifo.init();
+
+    r_cas_to_tgt_rsp_req          = false;
+    r_cas_cpt                     = 0    ;
+    r_cas_lfsr                    = -1   ;
+    r_cas_to_ixr_cmd_req          = false;
+    r_cas_to_cc_send_multi_req   = false;
+    r_cas_to_cc_send_brdcast_req = false;
+
+    m_cas_to_cc_send_inst_fifo.init();
+    m_cas_to_cc_send_srcid_fifo.init();
+#if L1_MULTI_CACHE
+    m_cas_to_cc_send_cache_id_fifo.init();
+#endif
+
+    for(size_t i=0; i<m_transaction_tab_lines ; i++)
+    {
+      r_ixr_rsp_to_xram_rsp_rok[i] = false;
+    }
+
+    r_xram_rsp_to_tgt_rsp_req          = false;
+    r_xram_rsp_to_cc_send_multi_req   = false;
+    r_xram_rsp_to_cc_send_brdcast_req = false;
+    r_xram_rsp_to_ixr_cmd_req          = false;
+    r_xram_rsp_trt_index               = 0;
+
+    m_xram_rsp_to_cc_send_inst_fifo.init();
+    m_xram_rsp_to_cc_send_srcid_fifo.init();
+#if L1_MULTI_CACHE
+    m_xram_rsp_to_cc_send_cache_id_fifo.init();
+#endif
+
+    r_ixr_cmd_cpt          = 0;
+    r_alloc_dir_reset_cpt  = 0;
+    r_alloc_heap_reset_cpt = 0;
+
+    r_copies_limit         = 3;
+
+    // Activity counters
+    m_cpt_cycles        = 0;
+    m_cpt_read          = 0;
+    m_cpt_read_miss     = 0;
+    m_cpt_write         = 0;
+    m_cpt_write_miss    = 0;
+    m_cpt_write_cells   = 0;
+    m_cpt_write_dirty   = 0;
+    m_cpt_update        = 0;
+    m_cpt_update_mult   = 0;
+    m_cpt_inval_brdcast = 0;
+    m_cpt_inval         = 0;
+    m_cpt_inval_mult    = 0;
+    m_cpt_cleanup       = 0;
+    m_cpt_ll            = 0;
+    m_cpt_sc            = 0;
+    m_cpt_cas           = 0;
+    m_cpt_trt_full      = 0;
+    m_cpt_trt_rb        = 0;
+
+    return;
+  }
+
+  bool    cmd_read_fifo_put = false;
+  bool    cmd_read_fifo_get = false;
+
+  bool    cmd_write_fifo_put = false;
+  bool    cmd_write_fifo_get = false;
+
+  bool    cmd_cas_fifo_put = false;
+  bool    cmd_cas_fifo_get = false;
+
+  bool    cc_receive_to_cleanup_fifo_get = false;
+  bool    cc_receive_to_cleanup_fifo_put = false;
+   
+  bool    cc_receive_to_multi_ack_fifo_get = false;
+  bool    cc_receive_to_multi_ack_fifo_put = false;
+
+  bool    write_to_cc_send_fifo_put   = false;
+  bool    write_to_cc_send_fifo_get   = false;
+  bool    write_to_cc_send_fifo_inst  = false;
+  size_t  write_to_cc_send_fifo_srcid = 0;
+
+#if L1_MULTI_CACHE
+  size_t  write_to_cc_send_fifo_cache_id = 0;
+#endif
+
+  bool    xram_rsp_to_cc_send_fifo_put   = false;
+  bool    xram_rsp_to_cc_send_fifo_get   = false;
+  bool    xram_rsp_to_cc_send_fifo_inst  = false;
+  size_t  xram_rsp_to_cc_send_fifo_srcid = 0;
+
+#if L1_MULTI_CACHE
+  size_t  xram_rsp_to_cc_send_fifo_cache_id = 0;
+#endif
+
+  bool    cas_to_cc_send_fifo_put   = false;
+  bool    cas_to_cc_send_fifo_get   = false;
+  bool    cas_to_cc_send_fifo_inst  = false;
+  size_t  cas_to_cc_send_fifo_srcid = 0;
+
+#if L1_MULTI_CACHE
+  size_t  cas_to_cc_send_fifo_cache_id = 0;
+#endif
+
+  m_debug_global        = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_tgt_cmd_fsm   = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_tgt_rsp_fsm   = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_cc_send_fsm = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_cc_receive_fsm = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_multi_ack_fsm = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_read_fsm      = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_write_fsm     = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_cas_fsm       = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_cleanup_fsm   = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_ixr_cmd_fsm   = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_ixr_rsp_fsm   = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+  m_debug_xram_rsp_fsm  = (m_cpt_cycles > m_debug_start_cycle) and m_debug_ok;
+
+#if DEBUG_MEMC_GLOBAL
+  if(m_debug_global)
+  {
+    std::cout
+        << "---------------------------------------------"           << std::dec << std::endl
+        << "MEM_CACHE "           << m_srcid_ini 
+        << " ; Time = "           << m_cpt_cycles                                << std::endl
+        << " - TGT_CMD FSM    = " << tgt_cmd_fsm_str[r_tgt_cmd_fsm.read()]       << std::endl
+        << " - TGT_RSP FSM    = " << tgt_rsp_fsm_str[r_tgt_rsp_fsm.read()]       << std::endl
+        << " - CC_SEND FSM  = " << cc_send_fsm_str[r_cc_send_fsm.read()]   << std::endl
+        << " - CC_RECEIVE FSM  = " << cc_receive_fsm_str[r_cc_receive_fsm.read()]   << std::endl
+        << " - MULTI_ACK FSM  = " << multi_ack_fsm_str[r_multi_ack_fsm.read()]   << std::endl
+        << " - READ FSM       = " << read_fsm_str[r_read_fsm.read()]             << std::endl
+        << " - WRITE FSM      = " << write_fsm_str[r_write_fsm.read()]           << std::endl
+        << " - CAS FSM        = " << cas_fsm_str[r_cas_fsm.read()]               << std::endl
+        << " - CLEANUP FSM    = " << cleanup_fsm_str[r_cleanup_fsm.read()]       << std::endl
+        << " - IXR_CMD FSM    = " << ixr_cmd_fsm_str[r_ixr_cmd_fsm.read()]       << std::endl
+        << " - IXR_RSP FSM    = " << ixr_rsp_fsm_str[r_ixr_rsp_fsm.read()]       << std::endl
+        << " - XRAM_RSP FSM   = " << xram_rsp_fsm_str[r_xram_rsp_fsm.read()]     << std::endl
+        << " - ALLOC_DIR FSM  = " << alloc_dir_fsm_str[r_alloc_dir_fsm.read()]   << std::endl
+        << " - ALLOC_TRT FSM  = " << alloc_trt_fsm_str[r_alloc_trt_fsm.read()]   << std::endl
+        << " - ALLOC_UPT FSM  = " << alloc_upt_fsm_str[r_alloc_upt_fsm.read()]   << std::endl
+        << " - ALLOC_HEAP FSM = " << alloc_heap_fsm_str[r_alloc_heap_fsm.read()] << std::endl;
+  }
+#endif
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    TGT_CMD FSM
+  ////////////////////////////////////////////////////////////////////////////////////
+  // The TGT_CMD_FSM controls the incoming VCI command pakets from the processors
+  //
+  // There are 5 types of accepted commands :
+  // - READ   : A READ request has a length of 1 VCI cell. It can be a single word
+  //            or an entire cache line, depending on the PLEN value.
+  // - WRITE  : A WRITE request has a maximum length of 16 cells, and can only
+  //            concern words in a same line.
+  // - CAS    : A CAS request has a length of 2 cells or 4 cells.
+  // - LL     : An LL request has a length of 1 cell.
+  // - SC     : An SC request has a length of 2 cells. First cell contains the
+  //            acces key, second cell the data to write in case of success.
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_tgt_cmd_fsm.read())
+  {
+      //////////////////
+    case TGT_CMD_IDLE:
+      if(p_vci_tgt.cmdval)
+      {
+
+#if DEBUG_MEMC_TGT_CMD
+        if(m_debug_tgt_cmd_fsm)
+        {
+          std::cout
+              << "  <MEMC " << name()
+              << ".TGT_CMD_IDLE> Receive command from srcid "
+              << std::dec << p_vci_tgt.srcid.read()
+              << " / for address "
+              << std::hex << p_vci_tgt.address.read()
+              << std::endl;
+        }
+#endif
+        // checking segmentation violation
+        vci_addr_t  address = p_vci_tgt.address.read();
+        uint32_t    plen    = p_vci_tgt.plen.read();
+        bool found = false;
+        for(size_t seg_id = 0 ; seg_id < m_nseg ; seg_id++)
+        {
+          if(m_seg[seg_id]->contains(address) &&
+              m_seg[seg_id]->contains(address + plen - vci_param::B))
+          {
+            found = true;
+          }
+        }
+        if(not found)
+        {
+          std::cout << "VCI_MEM_CACHE ERROR " << name() << std::endl;
+          std::cout
+              << "Out of segment VCI address in TGT_CMD_IDLE state (address = "
+              << std::hex << address << ", srcid = " << p_vci_tgt.srcid.read()
+              << std::dec << ", cycle = " << m_cpt_cycles << ")" << std::endl;
+          exit(0);
+        }
+
+        if(p_vci_tgt.cmd.read() == vci_param::CMD_READ)
+        {
+          // check that the pktid is either :
+          // TYPE_READ_DATA_UNC
+          // TYPE_READ_DATA_MISS
+          // TYPE_READ_INS_UNC
+          // TYPE_READ_INS_MISS
+          // ==> bit2 must be zero with the TSAR encoding
+          // ==> mask = 0b0100 = 0x4
+          assert(((p_vci_tgt.pktid.read() & 0x4) == 0x0) &&
+                 "The type specified in the pktid field is incompatible with the READ CMD");
+          r_tgt_cmd_fsm = TGT_CMD_READ;
+        }
+        else if(p_vci_tgt.cmd.read() == vci_param::CMD_WRITE)
+        {
+          // check that the pktid is TYPE_WRITE
+          // ==> TYPE_WRITE = X100 with the TSAR encoding
+          // ==> mask = 0b0111 = 0x7
+          assert(((p_vci_tgt.pktid.read() & 0x7) == 0x4) &&
+                 "The type specified in the pktid field is incompatible with the WRITE CMD");
+          r_tgt_cmd_fsm = TGT_CMD_WRITE;
+        }
+        else if(p_vci_tgt.cmd.read() == vci_param::CMD_LOCKED_READ)
+        {
+          // check that the pktid is TYPE_LL
+          // ==> TYPE_LL = X110 with the TSAR encoding
+          // ==> mask = 0b0111 = 0x7
+          assert(((p_vci_tgt.pktid.read() & 0x7) == 0x6) &&
+                 "The type specified in the pktid field is incompatible with the LL CMD");
+          r_tgt_cmd_fsm = TGT_CMD_READ;
+        }
+        else if(p_vci_tgt.cmd.read() == vci_param::CMD_NOP)
+        {
+          // check that the pktid is either :
+          // TYPE_CAS
+          // TYPE_SC
+          // ==> TYPE_CAS = X101 with the TSAR encoding
+          // ==> TYPE_SC  = X111 with the TSAR encoding
+          // ==> mask = 0b0101 = 0x5
+          assert(((p_vci_tgt.pktid.read() & 0x5) == 0x5) &&
+                 "The type specified in the pktid field is incompatible with the NOP CMD");
+
+          if((p_vci_tgt.pktid.read() & 0x7) == TYPE_CAS)
+            r_tgt_cmd_fsm = TGT_CMD_CAS;
+          else // TYPE_SC
+            r_tgt_cmd_fsm = TGT_CMD_WRITE;
+        }
+        else
+        {
+          std::cout << "VCI_MEM_CACHE ERROR " << name()
+                    << " TGT_CMD_IDLE state" << std::endl;
+          std::cout << " illegal VCI command type" << std::endl;
+          exit(0);
+        }
+      }
+      break;
+
+      //////////////////
+    case TGT_CMD_READ:
+      // This test checks that the read does not cross a cache line limit.
+      // It must not be taken into account when dealing with an LL CMD.
+      if(((m_x[(vci_addr_t) p_vci_tgt.address.read()]+ (p_vci_tgt.plen.read() >>2)) > 16) && (p_vci_tgt.cmd.read() != vci_param::CMD_LOCKED_READ))
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name() << " TGT_CMD_READ state"
+            << std::endl;
+        std::cout
+            << " illegal address/plen combination for VCI read command" << std::endl;
+        exit(0);
+      }
+      if(!p_vci_tgt.eop.read())
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name() << " TGT_CMD_READ state"
+            << std::endl;
+        std::cout
+            << " read or ll command packets must contain one single flit"
+            << std::endl;
+        exit(0);
+      }
+
+      if(p_vci_tgt.cmdval && m_cmd_read_addr_fifo.wok())
+      {
+
+#if DEBUG_MEMC_TGT_CMD
+        if(m_debug_tgt_cmd_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_CMD_READ> Push into read_fifo:"
+                    << " address = " << std::hex << p_vci_tgt.address.read()
+                    << " srcid = " << std::dec << p_vci_tgt.srcid.read()
+                    << " trdid = " << p_vci_tgt.trdid.read()
+                    << " pktid = " << p_vci_tgt.pktid.read()
+                    << " plen = " << std::dec << p_vci_tgt.plen.read() << std::endl;
+        }
+#endif
+        cmd_read_fifo_put = true;
+        if(p_vci_tgt.cmd.read() == vci_param::CMD_LOCKED_READ)
+          m_cpt_ll++;
+        else
+          m_cpt_read++;
+        r_tgt_cmd_fsm = TGT_CMD_IDLE;
+      }
+      break;
+
+      ///////////////////
+    case TGT_CMD_WRITE:
+      if(p_vci_tgt.cmdval && m_cmd_write_addr_fifo.wok())
+      {
+
+#if DEBUG_MEMC_TGT_CMD
+        if(m_debug_tgt_cmd_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_CMD_WRITE> Push into write_fifo:"
+                    << " address = " << std::hex << p_vci_tgt.address.read()
+                    << " srcid = " << std::dec << p_vci_tgt.srcid.read()
+                    << " trdid = " << p_vci_tgt.trdid.read()
+                    << " pktid = " << p_vci_tgt.pktid.read()
+                    << " wdata = " << std::hex << p_vci_tgt.wdata.read()
+                    << " be = " << p_vci_tgt.be.read()
+                    << " plen = " << std::dec << p_vci_tgt.plen.read() << std::endl;
+        }
+#endif
+        cmd_write_fifo_put = true;
+        if(p_vci_tgt.eop)  r_tgt_cmd_fsm = TGT_CMD_IDLE;
+      }
+      break;
+
+      ////////////////////
+    case TGT_CMD_CAS:
+      if((p_vci_tgt.plen.read() != 8) && (p_vci_tgt.plen.read() != 16))
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name() << " TGT_CMD_CAS state"
+            << std::endl
+            << "illegal format for CAS command " << std::endl;
+
+        exit(0);
+      }
+
+      if(p_vci_tgt.cmdval && m_cmd_cas_addr_fifo.wok())
+      {
+
+#if DEBUG_MEMC_TGT_CMD
+        if(m_debug_tgt_cmd_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_CMD_CAS> Pushing command into cmd_cas_fifo:"
+                    << " address = " << std::hex << p_vci_tgt.address.read()
+                    << " srcid = " << std::dec << p_vci_tgt.srcid.read()
+                    << " trdid = " << p_vci_tgt.trdid.read()
+                    << " pktid = " << p_vci_tgt.pktid.read()
+                    << " wdata = " << std::hex << p_vci_tgt.wdata.read()
+                    << " be = " << p_vci_tgt.be.read()
+                    << " plen = " << std::dec << p_vci_tgt.plen.read() << std::endl;
+        }
+#endif
+        cmd_cas_fifo_put = true;
+        if(p_vci_tgt.eop) r_tgt_cmd_fsm = TGT_CMD_IDLE;
+      }
+      break;
+  } // end switch tgt_cmd_fsm
+
+  /////////////////////////////////////////////////////////////////////////
+  //    MULTI_ACK FSM
+  /////////////////////////////////////////////////////////////////////////
+  // This FSM controls the response to the multicast update or multicast
+  // inval coherence requests sent by the memory cache to the L1 caches and
+  // update the UPT.
+  //
+  // It can be update or inval requests initiated by the WRITE or CAS FSM,
+  // or inval requests initiated by the XRAM_RSP FSM.
+  // It can also be a direct request from the WRITE FSM.
+  //
+  // The FSM decrements the proper entry in UPT.
+  // It sends a request to the TGT_RSP FSM to complete the pending
+  // write transaction (acknowledge response to the writer processor),
+  // and clear the UPT entry when all responses have been received.
+  //
+  // All those response packets are one flit packet.
+  // The index in the Table is defined in the UPDT_TABLE INDEX field, and
+  // the transaction type is defined in the UPT entry.
+  ////////////////////////////////////////////////////////////////////////
+
+  switch(r_multi_ack_fsm.read())
+  {
+    case MULTI_ACK_IDLE:
+      {
+        bool multi_ack_fifo_rok = m_cc_receive_to_multi_ack_fifo.rok();
+
+        // None Multicast Acknowledgement received and
+        // none WRITE FSM UPT decrement request
+        if( not multi_ack_fifo_rok and
+            not r_write_to_multi_ack_req.read())
+        {
+          break;
+        }
+
+        // WRITE FSM request to decrement update table response counter
+        // Priority to Multicast Acknowledgement priority
+        if(not multi_ack_fifo_rok)
+        {
+          r_write_to_multi_ack_req = false;
+          r_multi_ack_upt_index    = r_write_to_multi_ack_upt_index.read();
+          r_multi_ack_fsm          = MULTI_ACK_UPT_LOCK;
+
+          break;
+        }
+
+        // Multicast Acknowledgement received 
+        uint64_t flit = m_cc_receive_to_multi_ack_fifo.read();
+
+        uint8_t updt_index = 
+          dspin_param::dspin_get(flit, dspin_param::MULTI_ACK_UPDT_INDEX);
+
+        bool eop =
+          (dspin_param::dspin_get(flit, dspin_param::FROM_L1_EOP) == 0x1);
+
+        if(updt_index >= m_update_tab.size())
+        {
+          std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " MULTI_ACK_IDLE state" << std::endl
+            << "index too large for UPT: "
+            << std::dec
+            << " / UPT index = " << updt_index
+            << " / UPT size = "  << m_update_tab.size()
+            << std::endl;
+
+          exit(0);
+        }
+
+        if(not eop)
+        {
+          std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " MULTI_ACK_IDLE state" << std::endl
+            << "A Multicast Acknowledgement must be an one flit packet"
+            << std::endl;
+
+          exit(0);
+        }
+
+        cc_receive_to_multi_ack_fifo_get = true;
+        r_multi_ack_upt_index           = updt_index;
+        r_multi_ack_fsm                 = MULTI_ACK_UPT_LOCK;
+
+#if DEBUG_MEMC_MULTI_ACK
+        if(m_debug_multi_ack_fsm)
+        {
+          std::cout
+            <<  "  <MEMC " << name()
+            << ".MULTI_ACK_IDLE> Response for UPT entry "
+            << updt_index
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case MULTI_ACK_UPT_LOCK:
+      {
+        // get lock to the UPDATE table
+        if(r_alloc_upt_fsm.read() != ALLOC_UPT_MULTI_ACK) break;
+
+        // decrement the number of expected responses
+        size_t count = 0;
+        bool valid   = m_update_tab.decrement(r_multi_ack_upt_index.read(), count);
+
+        if(not valid)
+        {
+          std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " MULTI_ACK_UPT_LOCK state" << std::endl
+            << "unsuccessful access to decrement the UPT"
+            << std::endl;
+
+          exit(0);
+        }
+
+        if(count == 0)
+        {
+          r_multi_ack_fsm = MULTI_ACK_UPT_CLEAR;
+        }
+        else
+        {
+          r_multi_ack_fsm = MULTI_ACK_IDLE;
+        }
+
+#if DEBUG_MEMC_MULTI_ACK
+        if(m_debug_multi_ack_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".MULTI_ACK_UPT_LOCK> Decrement the responses counter for UPT:"
+            << " entry = "       << r_multi_ack_upt_index.read()
+            << " / rsp_count = " << std::dec << count
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case MULTI_ACK_UPT_CLEAR:
+      {
+        if(r_alloc_upt_fsm.read() != ALLOC_UPT_MULTI_ACK)
+        {
+          std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " MULTI_ACK_UPT_LOCK state"
+            << " bad UPT allocation"
+            << std::endl;
+
+          exit(0);
+        }
+
+        r_multi_ack_srcid = m_update_tab.srcid(r_multi_ack_upt_index.read());
+        r_multi_ack_trdid = m_update_tab.trdid(r_multi_ack_upt_index.read());
+        r_multi_ack_pktid = m_update_tab.pktid(r_multi_ack_upt_index.read());
+        r_multi_ack_nline = m_update_tab.nline(r_multi_ack_upt_index.read());
+        bool need_rsp     = m_update_tab.need_rsp(r_multi_ack_upt_index.read());
+
+        // clear the UPT entry
+        m_update_tab.clear(r_multi_ack_upt_index.read());
+
+        if(need_rsp)
+        {
+          r_multi_ack_fsm = MULTI_ACK_WRITE_RSP;
+        }
+        else
+        {
+          r_multi_ack_fsm = MULTI_ACK_IDLE;
+        }
+
+#if DEBUG_MEMC_MULTI_ACK
+        if(m_debug_multi_ack_fsm)
+        {
+          std::cout
+            <<  "  <MEMC " << name()
+            << ".MULTI_ACK_UPT_CLEAR> Clear UPT entry "
+            << r_multi_ack_upt_index.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case MULTI_ACK_WRITE_RSP:
+      {
+        // Post a request to TGT_RSP FSM
+        // Wait if pending request to the TGT_RSP FSM
+        if(r_multi_ack_to_tgt_rsp_req.read()) break;
+
+        r_multi_ack_to_tgt_rsp_req   = true;
+        r_multi_ack_to_tgt_rsp_srcid = r_multi_ack_srcid.read();
+        r_multi_ack_to_tgt_rsp_trdid = r_multi_ack_trdid.read();
+        r_multi_ack_to_tgt_rsp_pktid = r_multi_ack_pktid.read();
+        r_multi_ack_fsm              = MULTI_ACK_IDLE;
+
+#if DEBUG_MEMC_MULTI_ACK
+        if(m_debug_multi_ack_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".MULTI_ACK_WRITE_RSP> Request TGT_RSP FSM to send a response to srcid "
+            << r_multi_ack_srcid.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+  } // end switch r_multi_ack_fsm
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    READ FSM
+  ////////////////////////////////////////////////////////////////////////////////////
+  // The READ FSM controls the VCI read  and ll requests.
+  // It takes the lock protecting the cache directory to check the cache line status:
+  // - In case of HIT
+  //   The fsm copies the data (one line, or one single word)
+  //   in the r_read_to_tgt_rsp buffer. It waits if this buffer is not empty.
+  //   The requesting initiator is registered in the cache directory.
+  //   If the number of copy is larger than 1, the new copy is registered
+  //   in the HEAP.
+  //   If the number of copy is larger than the threshold, the HEAP is cleared,
+  //   and the corresponding line switches to the counter mode.
+  // - In case of MISS
+  //   The READ fsm takes the lock protecting the transaction tab.
+  //   If a read transaction to the XRAM for this line already exists,
+  //   or if the transaction tab is full, the fsm is stalled.
+  //   If a TRT entry is free, the READ request is registered in TRT,
+  //   it is consumed in the request FIFO, and transmited to the IXR_CMD FSM.
+  //   The READ FSM returns in the IDLE state as the read transaction will be
+  //   completed when the missing line will be received.
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_read_fsm.read())
+  {
+      ///////////////
+    case READ_IDLE:
+      // waiting a read request
+    {
+      if(m_cmd_read_addr_fifo.rok())
+      {
+
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".READ_IDLE> Read request:"
+                    << " srcid = " << std::dec << m_cmd_read_srcid_fifo.read()
+                    << " / address = " << std::hex << m_cmd_read_addr_fifo.read()
+                    << " / pktid = " << std::hex << m_cmd_read_pktid_fifo.read()
+                    << " / nwords = " << std::dec << m_cmd_read_length_fifo.read() << std::endl;
+        }
+#endif
+        r_read_fsm = READ_DIR_REQ;
+      }
+      break;
+    }
+
+    ///////////////////
+    case READ_DIR_REQ:
+      // Get the lock to the directory
+    {
+      if(r_alloc_dir_fsm.read() == ALLOC_DIR_READ)
+      {
+        r_read_fsm = READ_DIR_LOCK;
+      }
+
+#if DEBUG_MEMC_READ
+      if(m_debug_read_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name() << ".READ_DIR_REQ> Requesting DIR lock "
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    ///////////////////
+    case READ_DIR_LOCK:
+      // check directory for hit / miss
+    {
+      if(r_alloc_dir_fsm.read() == ALLOC_DIR_READ)
+      {
+        size_t way = 0;
+        DirectoryEntry entry =
+          m_cache_directory.read(m_cmd_read_addr_fifo.read(), way);
+        if((m_cmd_read_pktid_fifo.read() & 0x7) == TYPE_LL)   // access the global table ONLY when we have an LL cmd
+        {
+          r_read_ll_key   = m_llsc_table.ll(m_cmd_read_addr_fifo.read());
+        }
+        r_read_is_cnt     = entry.is_cnt;
+        r_read_dirty      = entry.dirty;
+        r_read_lock       = entry.lock;
+        r_read_tag        = entry.tag;
+        r_read_way        = way;
+        r_read_count      = entry.count;
+        r_read_copy       = entry.owner.srcid;
+
+#if L1_MULTI_CACHE
+        r_read_copy_cache = entry.owner.cache_id;
+#endif
+        r_read_copy_inst  = entry.owner.inst;
+        r_read_ptr        = entry.ptr; // pointer to the heap
+
+        // check if this is a cached read, this means pktid is either
+        // TYPE_READ_DATA_MISS 0bX001 with TSAR encoding
+        // TYPE_READ_INS_MISS  0bX011 with TSAR encoding
+        bool cached_read = (m_cmd_read_pktid_fifo.read() & 0x1);
+        if(entry.valid)    // hit
+        {
+          // test if we need to register a new copy in the heap
+          if(entry.is_cnt || (entry.count == 0) || !cached_read)
+          {
+            r_read_fsm = READ_DIR_HIT;
+          }
+          else
+          {
+            r_read_fsm = READ_HEAP_REQ;
+          }
+        }
+        else      // miss
+        {
+          r_read_fsm = READ_TRT_LOCK;
+        }
+
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout
+              << "  <MEMC " << name() << ".READ_DIR_LOCK> Accessing directory: "
+              << " address = " << std::hex << m_cmd_read_addr_fifo.read()
+              << " / hit = " << std::dec << entry.valid
+              << " / count = " <<std::dec << entry.count
+              << " / is_cnt = " << entry.is_cnt << std::endl;
+          if((m_cmd_read_pktid_fifo.read() & 0x7) == TYPE_LL)
+          {
+            std::cout
+                << "  <MEMC " << name() << ".READ_DIR_LOCK> global_llsc_table LL access" << std::endl;
+          }
+        }
+#endif
+      }
+      else
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " READ_DIR_LOCK state" << std::endl
+            << "Bad DIR allocation"   << std::endl;
+
+        exit(0);
+      }
+      break;
+    }
+
+    //////////////////
+    case READ_DIR_HIT:
+    {
+      //  read data in cache & update the directory
+      //  we enter this state in 3 cases:
+      //  - the read request is uncachable
+      //  - the cache line is in counter mode
+      //  - the cache line is valid but not replcated
+
+      if(r_alloc_dir_fsm.read() == ALLOC_DIR_READ)
+      {
+        // signals generation
+        // check if this is an instruction read, this means pktid is either
+        // TYPE_READ_INS_UNC   0bX010 with TSAR encoding
+        // TYPE_READ_INS_MISS  0bX011 with TSAR encoding
+        bool inst_read    = (m_cmd_read_pktid_fifo.read() & 0x2);
+        // check if this is a cached read, this means pktid is either
+        // TYPE_READ_DATA_MISS 0bX001 with TSAR encoding
+        // TYPE_READ_INS_MISS  0bX011 with TSAR encoding
+        bool cached_read  = (m_cmd_read_pktid_fifo.read() & 0x1);
+        bool is_cnt       = r_read_is_cnt.read();
+
+        // read data in the cache
+        size_t set        = m_y[(vci_addr_t)(m_cmd_read_addr_fifo.read())];
+        size_t way        = r_read_way.read();
+
+        m_cache_data.read_line(way, set, r_read_data);
+
+        // update the cache directory
+        DirectoryEntry entry;
+        entry.valid   = true;
+        entry.is_cnt  = is_cnt;
+        entry.dirty   = r_read_dirty.read();
+        entry.tag   = r_read_tag.read();
+        entry.lock    = r_read_lock.read();
+        entry.ptr     = r_read_ptr.read();
+        if(cached_read)   // Cached read => we must update the copies
+        {
+          if(!is_cnt)  // Not counter mode
+          {
+            entry.owner.srcid    = m_cmd_read_srcid_fifo.read();
+#if L1_MULTI_CACHE
+            entry.owner.cache_id = m_cmd_read_pktid_fifo.read();
+#endif
+            entry.owner.inst     = inst_read;
+            entry.count          = r_read_count.read() + 1;
+          }
+          else  // Counter mode
+          {
+            entry.owner.srcid    = 0;
+#if L1_MULTI_CACHE
+            entry.owner.cache_id = 0;
+#endif
+            entry.owner.inst     = false;
+            entry.count          = r_read_count.read() + 1;
+          }
+        }
+        else  // Uncached read
+        {
+          entry.owner.srcid     = r_read_copy.read();
+#if L1_MULTI_CACHE
+          entry.owner.cache_id  = r_read_copy_cache.read();
+#endif
+          entry.owner.inst      = r_read_copy_inst.read();
+          entry.count           = r_read_count.read();
+        }
+
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout
+              << "  <MEMC " << name() << ".READ_DIR_HIT> Update directory entry:"
+              << " set = " << std::dec << set
+              << " / way = " << way
+              << " / owner_id = " << entry.owner.srcid
+              << " / owner_ins = " << entry.owner.inst
+              << " / count = " << entry.count
+              << " / is_cnt = " << entry.is_cnt << std::endl;
+        }
+#endif
+
+        m_cache_directory.write(set, way, entry);
+        r_read_fsm    = READ_RSP;
+      }
+      break;
+    }
+
+    ////////////////////
+    case READ_HEAP_REQ:
+      // Get the lock to the HEAP directory
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_READ)
+      {
+        r_read_fsm = READ_HEAP_LOCK;
+      }
+
+#if DEBUG_MEMC_READ
+      if(m_debug_read_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name() << ".READ_HEAP_REQ> Requesting HEAP lock "
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    ////////////////////
+    case READ_HEAP_LOCK:
+      // read data in cache, update the directory
+      // and prepare the HEAP update
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_READ)
+      {
+        // enter counter mode when we reach the limit of copies or the heap is full
+        bool go_cnt = (r_read_count.read() >= r_copies_limit.read()) || m_heap.is_full();
+
+        // read data in the cache
+        size_t set = m_y[(vci_addr_t)(m_cmd_read_addr_fifo.read())];
+        size_t way = r_read_way.read();
+
+        m_cache_data.read_line(way, set, r_read_data);
+
+        // update the cache directory
+        DirectoryEntry entry;
+        entry.valid  = true;
+        entry.is_cnt = go_cnt;
+        entry.dirty  = r_read_dirty.read();
+        entry.tag    = r_read_tag.read();
+        entry.lock   = r_read_lock.read();
+        entry.count  = r_read_count.read() + 1;
+
+        if(not go_cnt)         // Not entering counter mode
+        {
+          entry.owner.srcid    = r_read_copy.read();
+#if L1_MULTI_CACHE
+          entry.owner.cache_id = r_read_copy_cache.read();
+#endif
+          entry.owner.inst     = r_read_copy_inst.read();
+          entry.ptr            = m_heap.next_free_ptr();   // set pointer on the heap
+        }
+        else                // Entering Counter mode
+        {
+          entry.owner.srcid    = 0;
+#if L1_MULTI_CACHE
+          entry.owner.cache_id = 0;
+#endif
+          entry.owner.inst     = false;
+          entry.ptr            = 0;
+        }
+
+        m_cache_directory.write(set, way, entry);
+
+        // prepare the heap update (add an entry, or clear the linked list)
+        if(not go_cnt)      // not switching to counter mode
+        {
+          // We test if the next free entry in the heap is the last
+          HeapEntry heap_entry = m_heap.next_free_entry();
+          r_read_next_ptr      = heap_entry.next;
+          r_read_last_free     = (heap_entry.next == m_heap.next_free_ptr());
+
+          r_read_fsm           = READ_HEAP_WRITE; // add an entry in the HEAP
+        }
+        else            // switching to counter mode
+        {
+          if(r_read_count.read() >1)              // heap must be cleared
+          {
+            HeapEntry next_entry = m_heap.read(r_read_ptr.read());
+            r_read_next_ptr      = m_heap.next_free_ptr();
+            m_heap.write_free_ptr(r_read_ptr.read());
+
+            if(next_entry.next == r_read_ptr.read())    // last entry
+            {
+              r_read_fsm = READ_HEAP_LAST;    // erase the entry
+            }
+            else                                        // not the last entry
+            {
+              r_read_ptr = next_entry.next;
+              r_read_fsm = READ_HEAP_ERASE;   // erase the list
+            }
+          }
+          else  // the heap is not used / nothing to do
+          {
+            r_read_fsm = READ_RSP;
+          }
+        }
+
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".READ_HEAP_LOCK> Update directory:"
+                    << " tag = " << std::hex << entry.tag
+                    << " set = " << std::dec << set
+                    << " way = " << way
+                    << " count = " << entry.count
+                    << " is_cnt = " << entry.is_cnt << std::endl;
+        }
+#endif
+      }
+      else
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " READ_HEAP_LOCK state" << std::endl
+            << "Bad HEAP allocation"   << std::endl;
+
+        exit(0);
+      }
+
+      break;
+    }
+
+    /////////////////////
+    case READ_HEAP_WRITE:       // add a entry in the heap
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_READ)
+      {
+        HeapEntry heap_entry;
+        heap_entry.owner.srcid    = m_cmd_read_srcid_fifo.read();
+#if L1_MULTI_CACHE
+        heap_entry.owner.cache_id = m_cmd_read_pktid_fifo.read();
+#endif
+        heap_entry.owner.inst     = (m_cmd_read_pktid_fifo.read() & 0x2);
+
+        if(r_read_count.read() == 1)  // creation of a new linked list
+        {
+          heap_entry.next         = m_heap.next_free_ptr();
+        }
+        else                         // head insertion in existing list
+        {
+          heap_entry.next         = r_read_ptr.read();
+        }
+        m_heap.write_free_entry(heap_entry);
+        m_heap.write_free_ptr(r_read_next_ptr.read());
+        if(r_read_last_free.read())  m_heap.set_full();
+
+        r_read_fsm = READ_RSP;
+
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout
+              << "  <MEMC " << name() << ".READ_HEAP_WRITE> Add an entry in the heap:"
+              << " owner_id = " << heap_entry.owner.srcid
+              << " owner_ins = " << heap_entry.owner.inst << std::endl;
+        }
+#endif
+      }
+      else
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " READ_HEAP_WRITE state" << std::endl
+            << "Bad HEAP allocation" << std::endl;
+
+        exit(0);
+      }
+      break;
+    }
+
+    /////////////////////
+    case READ_HEAP_ERASE:
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_READ)
+      {
+        HeapEntry next_entry = m_heap.read(r_read_ptr.read());
+        if(next_entry.next == r_read_ptr.read())
+        {
+          r_read_fsm = READ_HEAP_LAST;
+        }
+        else
+        {
+          r_read_ptr = next_entry.next;
+          r_read_fsm = READ_HEAP_ERASE;
+        }
+      }
+      else
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " READ_HEAP_ERASE state" << std::endl
+            << "Bad HEAP allocation" << std::endl;
+
+        exit(0);
+      }
+      break;
+    }
+
+    ////////////////////
+    case READ_HEAP_LAST:
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_READ)
+      {
+        HeapEntry last_entry;
+        last_entry.owner.srcid    = 0;
+#if L1_MULTI_CACHE
+        last_entry.owner.cache_id = 0;
+#endif
+        last_entry.owner.inst     = false;
+
+        if(m_heap.is_full())
+        {
+          last_entry.next       = r_read_ptr.read();
+          m_heap.unset_full();
+        }
+        else
+        {
+          last_entry.next       = r_read_next_ptr.read();
+        }
+        m_heap.write(r_read_ptr.read(),last_entry);
+        r_read_fsm = READ_RSP;
+      }
+      else
+      {
+        std::cout << "VCI_MEM_CACHE ERROR " << name()
+                  << " READ_HEAP_LAST state" << std::endl;
+        std::cout << "Bad HEAP allocation" << std::endl;
+        exit(0);
+      }
+      break;
+    }
+
+    //////////////
+    case READ_RSP:    //  request the TGT_RSP FSM to return data
+    {
+      if(!r_read_to_tgt_rsp_req)
+      {
+        for(size_t i=0 ; i<m_words ; i++)  r_read_to_tgt_rsp_data[i] = r_read_data[i];
+        r_read_to_tgt_rsp_word   = m_x[(vci_addr_t) m_cmd_read_addr_fifo.read()];
+        r_read_to_tgt_rsp_length = m_cmd_read_length_fifo.read();
+        r_read_to_tgt_rsp_srcid  = m_cmd_read_srcid_fifo.read();
+        r_read_to_tgt_rsp_trdid  = m_cmd_read_trdid_fifo.read();
+        r_read_to_tgt_rsp_pktid  = m_cmd_read_pktid_fifo.read();
+        r_read_to_tgt_rsp_ll_key = r_read_ll_key.read();
+        cmd_read_fifo_get        = true;
+        r_read_to_tgt_rsp_req    = true;
+        r_read_fsm               = READ_IDLE;
+
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".READ_RSP> Request the TGT_RSP FSM to return data:"
+                    << " rsrcid = " << std::dec << m_cmd_read_srcid_fifo.read()
+                    << " / address = " << std::hex << m_cmd_read_addr_fifo.read()
+                    << " / nwords = " << std::dec << m_cmd_read_length_fifo.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    ///////////////////
+    case READ_TRT_LOCK: // read miss : check the Transaction Table
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_READ)
+      {
+        size_t      index     = 0;
+        vci_addr_t  addr      = (vci_addr_t) m_cmd_read_addr_fifo.read();
+        bool        hit_read  = m_transaction_tab.hit_read(m_nline[addr], index);
+        bool        hit_write = m_transaction_tab.hit_write(m_nline[addr]);
+        bool        wok       = !m_transaction_tab.full(index);
+
+        if(hit_read || !wok || hit_write)    // missing line already requested or no space
+        {
+          if(!wok)      m_cpt_trt_full++;
+          if(hit_read || hit_write)   m_cpt_trt_rb++;
+          r_read_fsm = READ_IDLE;
+        }
+        else                  // missing line is requested to the XRAM
+        {
+          m_cpt_read_miss++;
+          r_read_trt_index = index;
+          r_read_fsm       = READ_TRT_SET;
+        }
+
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".READ_TRT_LOCK> Check TRT:"
+                    << " hit_read = " << hit_read
+                    << " / hit_write = " << hit_write
+                    << " / full = " << !wok << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    //////////////////
+    case READ_TRT_SET:      // register get transaction in TRT
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_READ)
+      {
+        m_transaction_tab.set(r_read_trt_index.read(),
+                              true,
+                              m_nline[(vci_addr_t)(m_cmd_read_addr_fifo.read())],
+                              m_cmd_read_srcid_fifo.read(),
+                              m_cmd_read_trdid_fifo.read(),
+                              m_cmd_read_pktid_fifo.read(),
+                              true,
+                              m_cmd_read_length_fifo.read(),
+                              m_x[(vci_addr_t)(m_cmd_read_addr_fifo.read())],
+                              std::vector<be_t> (m_words,0),
+                              std::vector<data_t> (m_words,0),
+                              r_read_ll_key.read());
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".READ_TRT_SET> Write in Transaction Table: " << std::hex
+                    << " address = " << std::hex << m_cmd_read_addr_fifo.read()
+                    << " / srcid = " << std::dec << m_cmd_read_srcid_fifo.read()
+                    << std::endl;
+        }
+#endif
+        r_read_fsm = READ_TRT_REQ;
+      }
+      break;
+    }
+
+    //////////////////
+    case READ_TRT_REQ:
+    {
+      // consume the read request in the FIFO,
+      // and send it to the ixr_cmd_fsm
+
+      if(not r_read_to_ixr_cmd_req)
+      {
+        cmd_read_fifo_get       = true;
+        r_read_to_ixr_cmd_req   = true;
+        r_read_to_ixr_cmd_nline = m_nline[(vci_addr_t)(m_cmd_read_addr_fifo.read())];
+        r_read_to_ixr_cmd_trdid = r_read_trt_index.read();
+        r_read_fsm              = READ_IDLE;
+
+#if DEBUG_MEMC_READ
+        if(m_debug_read_fsm)
+        {
+          std::cout
+              << "  <MEMC " << name() << ".READ_TRT_REQ> Request GET transaction for address "
+              << std::hex << m_cmd_read_addr_fifo.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+  } // end switch read_fsm
+
+  ///////////////////////////////////////////////////////////////////////////////////
+  //    WRITE FSM
+  ///////////////////////////////////////////////////////////////////////////////////
+  // The WRITE FSM handles the write bursts and sc requests sent by the processors.
+  // All addresses in a burst must be in the same cache line.
+  // A complete write burst is consumed in the FIFO & copied to a local buffer.
+  // Then the FSM takes the lock protecting the cache directory, to check
+  // if the line is in the cache.
+  //
+  // - In case of HIT, the cache is updated.
+  //   If there is no other copy, an acknowledge response is immediately
+  //   returned to the writing processor.
+  //   If the data is cached by other processors, a coherence transaction must
+  //   be launched (sc requests always require a coherence transaction):
+  //   It is a multicast update if the line is not in counter mode, and the processor
+  //   takes the lock protecting the Update Table (UPT) to register this transaction.
+  //   It is a broadcast invalidate if the line is in counter mode.
+  //   If the UPT is full, it releases the lock(s) and retry. Then, it sends
+  //   a multi-update request to all owners of the line (but the writer),
+  //   through the CC_SEND FSM. In case of coherence transaction, the WRITE FSM
+  //   does not respond to the writing processor, as this response will be sent by
+  //   the MULTI_ACK FSM when all update responses have been received.
+  //
+  // - In case of MISS, the WRITE FSM takes the lock protecting the transaction
+  //   table (TRT). If a read transaction to the XRAM for this line already exists,
+  //   it writes in the TRT (write buffer). Otherwise, if a TRT entry is free,
+  //   the WRITE FSM register a new transaction in TRT, and sends a read line request
+  //   to the XRAM. If the TRT is full, it releases the lock, and waits.
+  //   Finally, the WRITE FSM returns an aknowledge response to the writing processor.
+  /////////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_write_fsm.read())
+  {
+      ////////////////
+    case WRITE_IDLE:  // copy first word of a write burst in local buffer
+    {
+      if(m_cmd_write_addr_fifo.rok())
+      {
+        if((m_cmd_write_pktid_fifo.read() & 0x7) == TYPE_SC)
+          m_cpt_sc++;
+        else
+        {
+          m_cpt_write++;
+          m_cpt_write_cells++;
+        }
+
+        // consume a word in the FIFO & write it in the local buffer
+        cmd_write_fifo_get  = true;
+        r_write_pending_sc  = false;
+        size_t index        = m_x[(vci_addr_t)(m_cmd_write_addr_fifo.read())];
+
+        r_write_address     = (addr_t)(m_cmd_write_addr_fifo.read());
+        r_write_word_index  = index;
+        r_write_word_count  = 1;
+        r_write_data[index] = m_cmd_write_data_fifo.read();
+        r_write_srcid       = m_cmd_write_srcid_fifo.read();
+        r_write_trdid       = m_cmd_write_trdid_fifo.read();
+        r_write_pktid       = m_cmd_write_pktid_fifo.read();
+
+        // initialize the be field for all words
+        for(size_t word=0 ; word<m_words ; word++)
+        {
+          if(word == index) r_write_be[word] = m_cmd_write_be_fifo.read();
+          else                 r_write_be[word] = 0x0;
+        }
+
+        if(m_cmd_write_eop_fifo.read() || ((m_cmd_write_pktid_fifo.read() & 0x7)  == TYPE_SC))
+        {
+          r_write_fsm = WRITE_DIR_REQ;
+        }
+        else
+        {
+          r_write_fsm = WRITE_NEXT;
+        }
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_IDLE> Write request "
+                    << " srcid = " << std::dec << m_cmd_write_srcid_fifo.read()
+                    << " / address = " << std::hex << m_cmd_write_addr_fifo.read()
+                    << " / data = " << m_cmd_write_data_fifo.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    ////////////////
+    case WRITE_NEXT:  // copy next word of a write burst in local buffer
+    {
+      if(m_cmd_write_addr_fifo.rok())
+      {
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_NEXT> Write another word in local buffer"
+                    << std::endl;
+        }
+#endif
+        m_cpt_write_cells++;
+
+        // check that the next word is in the same cache line
+        if((m_nline[(vci_addr_t)(r_write_address.read())]       !=
+            m_nline[(vci_addr_t)(m_cmd_write_addr_fifo.read())]))
+        {
+          std::cout << "VCI_MEM_CACHE ERROR " << name() << " WRITE_NEXT state" << std::endl
+                    << "all words in a write burst must be in same cache line" << std::endl;
+
+          exit(0);
+        }
+
+        // consume a word in the FIFO & write it in the local buffer
+        cmd_write_fifo_get  = true;
+        r_write_pending_sc  = false;
+        size_t index        = r_write_word_index.read() + r_write_word_count.read();
+
+        r_write_be[index]   = m_cmd_write_be_fifo.read();
+        r_write_data[index] = m_cmd_write_data_fifo.read();
+        r_write_word_count  = r_write_word_count.read() + 1;
+
+        if(m_cmd_write_eop_fifo.read())
+        {
+          r_write_fsm = WRITE_DIR_REQ;
+        }
+      }
+      break;
+    }
+
+    ////////////////////
+    case WRITE_DIR_REQ:
+      // Get the lock to the directory
+    {
+      if(r_alloc_dir_fsm.read() == ALLOC_DIR_WRITE)
+      {
+        if(((r_write_pktid.read() & 0x7) == TYPE_SC) && not r_write_pending_sc.read())    // check for an SC command (and check that its second flit is not already consumed)
+        {
+          if(m_cmd_write_addr_fifo.rok())
+          {
+            size_t index    = m_x[(vci_addr_t)(r_write_address.read())];
+            bool sc_success = m_llsc_table.sc(r_write_address.read(),r_write_data[index].read());
+            r_write_sc_fail = !sc_success;
+
+            assert(m_cmd_write_eop_fifo.read() && "Error in VCI_MEM_CACHE : invalid packet format for SC command");
+            // consume a word in the FIFO & write it in the local buffer
+            cmd_write_fifo_get  = true;
+            r_write_pending_sc  = true;
+            index               = m_x[(vci_addr_t)(m_cmd_write_addr_fifo.read())];
+
+            r_write_address     = (addr_t)(m_cmd_write_addr_fifo.read());
+            r_write_word_index  = index;
+            r_write_word_count  = 1;
+            r_write_data[index] = m_cmd_write_data_fifo.read();
+            if(!sc_success)
+            {
+              r_write_fsm = WRITE_RSP;
+              break;
+            }
+          }
+          else break;
+        }
+        //else it is a TYPE_WRITE, need a simple sw access to the
+        // llsc_global_table
+        else
+        {
+          m_llsc_table.sw(r_write_address.read());
+        }
+        r_write_fsm = WRITE_DIR_LOCK;
+      }
+
+#if DEBUG_MEMC_WRITE
+      if(m_debug_write_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name() << ".WRITE_DIR_REQ> Requesting DIR lock "
+            << std::endl;
+      }
+#endif
+
+      break;
+    }
+
+    ////////////////////
+    case WRITE_DIR_LOCK:
+      // access directory to check hit/miss
+    {
+      if(r_alloc_dir_fsm.read() == ALLOC_DIR_WRITE)
+      {
+        size_t  way = 0;
+        DirectoryEntry entry(m_cache_directory.read(r_write_address.read(), way));
+
+        if(entry.valid)    // hit
+        {
+          // copy directory entry in local buffer in case of hit
+          r_write_is_cnt     = entry.is_cnt;
+          r_write_lock       = entry.lock;
+          r_write_tag        = entry.tag;
+          r_write_copy       = entry.owner.srcid;
+#if L1_MULTI_CACHE
+          r_write_copy_cache = entry.owner.cache_id;
+#endif
+          r_write_copy_inst  = entry.owner.inst;
+          r_write_count      = entry.count;
+          r_write_ptr        = entry.ptr;
+          r_write_way        = way;
+
+          if(entry.is_cnt && entry.count)
+          {
+            r_write_fsm = WRITE_DIR_READ;
+          }
+          else
+          {
+            r_write_fsm = WRITE_DIR_HIT;
+          }
+        }
+        else  // miss
+        {
+          r_write_fsm = WRITE_MISS_TRT_LOCK;
+        }
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_DIR_LOCK> Check the directory: "
+                    << " address = " << std::hex << r_write_address.read()
+                    << " hit = " << std::dec << entry.valid
+                    << " count = " << entry.count
+                    << " is_cnt = " << entry.is_cnt << std::endl;
+          if((r_write_pktid.read() & 0x7) == TYPE_SC)
+            std::cout << "  <MEMC " << name() << ".WRITE_DIR_LOCK> global_llsc_table SC access" << std::endl;
+          else
+            std::cout << "  <MEMC " << name() << ".WRITE_DIR_LOCK> global_llsc_table SW access" << std::endl;
+        }
+#endif
+      }
+      else
+      {
+        std::cout << "VCI_MEM_CACHE ERROR " << name()
+                  << " WRITE_DIR_LOCK state"        << std::endl
+                  << "bad DIR allocation"           << std::endl;
+
+        exit(0);
+      }
+
+      break;
+    }
+
+    ////////////////////
+    case WRITE_DIR_READ:  // read the cache and complete the buffer when be!=0xF
+    {
+      // update local buffer
+      size_t set  = m_y[(vci_addr_t)(r_write_address.read())];
+      size_t way  = r_write_way.read();
+      for(size_t word=0 ; word<m_words ; word++)
+      {
+        data_t mask = 0;
+        if(r_write_be[word].read() & 0x1) mask = mask | 0x000000FF;
+        if(r_write_be[word].read() & 0x2) mask = mask | 0x0000FF00;
+        if(r_write_be[word].read() & 0x4) mask = mask | 0x00FF0000;
+        if(r_write_be[word].read() & 0x8) mask = mask | 0xFF000000;
+
+        // complete only if mask is not null (for energy consumption)
+        r_write_data[word]  = (r_write_data[word].read() & mask) |
+                              (m_cache_data.read(way, set, word) & ~mask);
+
+      } // end for
+
+      // test if a coherence broadcast is required
+      r_write_fsm = WRITE_BC_TRT_LOCK;
+
+#if DEBUG_MEMC_WRITE
+      if(m_debug_write_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".WRITE_DIR_READ> Read the cache to complete local buffer" << std::endl;
+      }
+#endif
+      break;
+    }
+
+    ///////////////////
+    case WRITE_DIR_HIT:
+    {
+      // update the cache directory
+      // update directory with Dirty bit
+      DirectoryEntry entry;
+      entry.valid          = true;
+      entry.dirty          = true;
+      entry.tag          = r_write_tag.read();
+      entry.is_cnt         = r_write_is_cnt.read();
+      entry.lock           = r_write_lock.read();
+      entry.owner.srcid    = r_write_copy.read();
+#if L1_MULTI_CACHE
+      entry.owner.cache_id = r_write_copy_cache.read();
+#endif
+      entry.owner.inst     = r_write_copy_inst.read();
+      entry.count          = r_write_count.read();
+      entry.ptr            = r_write_ptr.read();
+
+      size_t set           = m_y[(vci_addr_t)(r_write_address.read())];
+      size_t way           = r_write_way.read();
+
+      // update directory
+      m_cache_directory.write(set, way, entry);
+
+      // owner is true when the  the first registered copy is the writer itself
+      bool owner = (((r_write_copy.read() == r_write_srcid.read())
+#if L1_MULTI_CACHE
+                     and(r_write_copy_cache.read() ==r_write_pktid.read())
+#endif
+                    ) and not r_write_copy_inst.read());
+
+      // no_update is true when there is no need for coherence transaction
+      // (tests for sc requests)
+      bool no_update = ((r_write_count.read() ==0) || (owner && (r_write_count.read() ==1) && (r_write_pktid.read() != TYPE_SC)));
+
+      // write data in the cache if no coherence transaction
+      if(no_update)
+      {
+        for(size_t word=0 ; word<m_words ; word++)
+        {
+          m_cache_data.write(way, set, word, r_write_data[word].read(), r_write_be[word].read());
+
+          if(m_monitor_ok)
+          {
+            vci_addr_t address = (r_write_address.read() & ~(vci_addr_t) 0x3F) | word<<2;
+            char buf[80];
+            snprintf(buf, 80, "WRITE_DIR_HIT srcid %d", r_write_srcid.read());
+            check_monitor(buf, address, r_write_data[word].read());
+          }
+        }
+      }
+
+      if(owner and not no_update and(r_write_pktid.read() != TYPE_SC))
+      {
+        r_write_count = r_write_count.read() - 1;
+      }
+
+      if(no_update)
+        // Write transaction completed
+      {
+        r_write_fsm = WRITE_RSP;
+      }
+      else
+        // coherence update required
+      {
+        if(!r_write_to_cc_send_multi_req.read()   &&
+            !r_write_to_cc_send_brdcast_req.read())
+        {
+          r_write_fsm = WRITE_UPT_LOCK;
+        }
+        else
+        {
+          r_write_fsm = WRITE_WAIT;
+        }
+      }
+
+#if DEBUG_MEMC_WRITE
+      if(m_debug_write_fsm)
+      {
+        if(no_update)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_DIR_HIT> Write into cache / No coherence transaction"
+                    << std::endl;
+        }
+        else
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_DIR_HIT> Coherence update required:"
+                    << " is_cnt = " << r_write_is_cnt.read()
+                    << " nb_copies = " << std::dec << r_write_count.read() << std::endl;
+          if(owner)
+            std::cout << "       ... but the first copy is the writer" << std::endl;
+        }
+      }
+#endif
+      break;
+    }
+
+    ////////////////////
+    case WRITE_UPT_LOCK:  // Try to register the update request in UPT
+    {
+      if(r_alloc_upt_fsm.read() == ALLOC_UPT_WRITE)
+      {
+        bool        wok        = false;
+        size_t      index      = 0;
+        size_t      srcid      = r_write_srcid.read();
+        size_t      trdid      = r_write_trdid.read();
+        size_t      pktid      = r_write_pktid.read();
+        addr_t      nline      = m_nline[(vci_addr_t)(r_write_address.read())];
+        size_t      nb_copies  = r_write_count.read();
+        size_t      set        = m_y[(vci_addr_t)(r_write_address.read())];
+        size_t      way        = r_write_way.read();
+
+        wok = m_update_tab.set(true,  // it's an update transaction
+                               false,    // it's not a broadcast
+                               true,     // it needs a response
+                               srcid,
+                               trdid,
+                               pktid,
+                               nline,
+                               nb_copies,
+                               index);
+        if(wok)       // write data in cache
+        {
+          for(size_t word=0 ; word<m_words ; word++)
+          {
+            m_cache_data.write(way, set, word, r_write_data[word].read(), r_write_be[word].read());
+
+            if(m_monitor_ok)
+            {
+              vci_addr_t address = (r_write_address.read() & ~(vci_addr_t) 0x3F) | word<<2;
+              char buf[80];
+              snprintf(buf, 80, "WRITE_UPT_LOCK srcid %d", srcid);
+              check_monitor(buf, address, r_write_data[word].read());
+            }
+          }
+        }
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          if(wok)
+          {
+            std::cout << "  <MEMC " << name() << ".WRITE_UPT_LOCK> Register the multicast update in UPT / "
+                      << " nb_copies = " << r_write_count.read() << std::endl;
+          }
+        }
+#endif
+        r_write_upt_index = index;
+        //  releases the lock protecting UPT and the DIR if no entry...
+        if(wok) r_write_fsm = WRITE_UPT_HEAP_LOCK;
+        else       r_write_fsm = WRITE_WAIT;
+      }
+      break;
+    }
+
+    /////////////////////////
+    case WRITE_UPT_HEAP_LOCK:   // get access to heap
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_WRITE)
+      {
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_UPT_HEAP_LOCK> Get acces to the HEAP" << std::endl;
+        }
+#endif
+        r_write_fsm = WRITE_UPT_REQ;
+      }
+      break;
+    }
+
+    //////////////////
+    case WRITE_UPT_REQ:
+    {
+      // prepare the coherence transaction for the CC_SEND FSM
+      // and write the first copy in the FIFO
+      // send the request if only one copy
+
+      if(!r_write_to_cc_send_multi_req.read() &&
+          !r_write_to_cc_send_brdcast_req.read())    // no pending coherence request
+      {
+        r_write_to_cc_send_brdcast_req  = false;
+        r_write_to_cc_send_trdid        = r_write_upt_index.read();
+        r_write_to_cc_send_nline        = m_nline[(vci_addr_t)(r_write_address.read())];
+        r_write_to_cc_send_index        = r_write_word_index.read();
+        r_write_to_cc_send_count        = r_write_word_count.read();
+
+        for(size_t i=0; i<m_words ; i++) r_write_to_cc_send_be[i]=r_write_be[i].read();
+
+        size_t min = r_write_word_index.read();
+        size_t max = r_write_word_index.read() + r_write_word_count.read();
+        for(size_t i=min ; i<max ; i++) r_write_to_cc_send_data[i] = r_write_data[i];
+
+        if((r_write_copy.read() != r_write_srcid.read()) or(r_write_pktid.read() == TYPE_SC) or
+#if L1_MULTI_CACHE
+            (r_write_copy_cache.read() != r_write_pktid.read()) or
+#endif
+            r_write_copy_inst.read())
+        {
+          // put the first srcid in the fifo
+          write_to_cc_send_fifo_put     = true;
+          write_to_cc_send_fifo_inst    = r_write_copy_inst.read();
+          write_to_cc_send_fifo_srcid   = r_write_copy.read();
+#if L1_MULTI_CACHE
+          write_to_cc_send_fifo_cache_id= r_write_copy_cache.read();
+#endif
+          if(r_write_count.read() == 1 || ((r_write_count.read() == 0) && (r_write_pktid.read() == TYPE_SC)))
+          {
+            r_write_fsm = WRITE_IDLE;
+            r_write_to_cc_send_multi_req = true;
+          }
+          else
+          {
+            r_write_fsm = WRITE_UPT_NEXT;
+            r_write_to_dec = false;
+
+          }
+        }
+        else
+        {
+          r_write_fsm = WRITE_UPT_NEXT;
+          r_write_to_dec = false;
+        }
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_UPT_REQ> Post first request to CC_SEND FSM"
+                    << " / srcid = " << std::dec << r_write_copy.read()
+                    << " / inst = "  << std::dec << r_write_copy_inst.read() << std::endl;
+          if(r_write_count.read() == 1)
+            std::cout << "         ... and this is the last" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    ///////////////////
+    case WRITE_UPT_NEXT:
+    {
+      // continue the multi-update request to CC_SEND fsm
+      // when there is copies in the heap.
+      // if one copy in the heap is the writer itself
+      // the corresponding SRCID should not be written in the fifo,
+      // but the UPT counter must be decremented.
+      // As this decrement is done in the WRITE_UPT_DEC state,
+      // after the last copy has been found, the decrement request
+      // must be  registered in the r_write_to_dec flip-flop.
+
+      HeapEntry entry = m_heap.read(r_write_ptr.read());
+
+      bool dec_upt_counter;
+
+      if(((entry.owner.srcid != r_write_srcid.read()) || (r_write_pktid.read() == TYPE_SC)) or
+#if L1_MULTI_CACHE
+          (entry.owner.cache_id != r_write_pktid.read()) or
+#endif
+          entry.owner.inst)             // put the next srcid in the fifo
+      {
+        dec_upt_counter                 = false;
+        write_to_cc_send_fifo_put      = true;
+        write_to_cc_send_fifo_inst     = entry.owner.inst;
+        write_to_cc_send_fifo_srcid    = entry.owner.srcid;
+#if L1_MULTI_CACHE
+        write_to_cc_send_fifo_cache_id = entry.owner.cache_id;
+#endif
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_UPT_NEXT> Post another request to CC_SEND FSM"
+                    << " / heap_index = " << std::dec << r_write_ptr.read()
+                    << " / srcid = " << std::dec << r_write_copy.read()
+                    << " / inst = "  << std::dec << r_write_copy_inst.read() << std::endl;
+          if(entry.next == r_write_ptr.read())
+            std::cout << "        ... and this is the last" << std::endl;
+        }
+#endif
+      }
+      else                                // the UPT counter must be decremented
+      {
+        dec_upt_counter = true;
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_UPT_NEXT> Skip one entry in heap matching the writer"
+                    << " / heap_index = " << std::dec << r_write_ptr.read()
+                    << " / srcid = " << std::dec << r_write_copy.read()
+                    << " / inst = "  << std::dec << r_write_copy_inst.read() << std::endl;
+          if(entry.next == r_write_ptr.read())
+            std::cout << "        ... and this is the last" << std::endl;
+        }
+#endif
+      }
+
+      // register the possible UPT decrement request
+      r_write_to_dec = dec_upt_counter or r_write_to_dec.read();
+
+      if(not m_write_to_cc_send_inst_fifo.wok())
+      {
+        std::cout << "VCI_MEM_CACHE ERROR " << name() << " WRITE_UPT_NEXT state" << std::endl
+                  << "The write_to_cc_send_fifo should not be full" << std::endl
+                  << "as the depth should be larger than the max number of copies" << std::endl;
+        exit(0);
+      }
+
+      r_write_ptr = entry.next;
+
+      if(entry.next == r_write_ptr.read())    // last copy
+      {
+        r_write_to_cc_send_multi_req = true;
+        if(r_write_to_dec.read() or dec_upt_counter)   r_write_fsm = WRITE_UPT_DEC;
+        else                                          r_write_fsm = WRITE_IDLE;
+      }
+      break;
+    }
+
+    //////////////////
+    case WRITE_UPT_DEC:
+    {
+      // If the initial writer has a copy, it should not
+      // receive an update request, but the counter in the
+      // update table must be decremented by the MULTI_ACK FSM.
+
+      if(!r_write_to_multi_ack_req.read())
+      {
+        r_write_to_multi_ack_req = true;
+        r_write_to_multi_ack_upt_index = r_write_upt_index.read();
+        r_write_fsm = WRITE_IDLE;
+      }
+      break;
+    }
+
+    ///////////////
+    case WRITE_RSP:
+    {
+      // Post a request to TGT_RSP FSM to acknowledge the write
+      // In order to increase the Write requests throughput,
+      // we don't wait to return in the IDLE state to consume
+      // a new request in the write FIFO
+
+      if(!r_write_to_tgt_rsp_req.read())
+      {
+        // post the request to TGT_RSP_FSM
+        r_write_to_tgt_rsp_req     = true;
+        r_write_to_tgt_rsp_srcid   = r_write_srcid.read();
+        r_write_to_tgt_rsp_trdid   = r_write_trdid.read();
+        r_write_to_tgt_rsp_pktid   = r_write_pktid.read();
+        r_write_to_tgt_rsp_sc_fail = r_write_sc_fail.read();
+
+        // try to get a new write request from the FIFO
+        if(m_cmd_write_addr_fifo.rok())
+        {
+          if((m_cmd_write_pktid_fifo.read() & 0x7) == TYPE_SC)
+            m_cpt_sc++;
+          else
+          {
+            m_cpt_write++;
+            m_cpt_write_cells++;
+          }
+
+          // consume a word in the FIFO & write it in the local buffer
+          cmd_write_fifo_get  = true;
+          r_write_pending_sc  = false;
+          size_t index        = m_x[(vci_addr_t)(m_cmd_write_addr_fifo.read())];
+
+          r_write_address     = (addr_t)(m_cmd_write_addr_fifo.read());
+          r_write_word_index  = index;
+          r_write_word_count  = 1;
+          r_write_data[index] = m_cmd_write_data_fifo.read();
+          r_write_srcid       = m_cmd_write_srcid_fifo.read();
+          r_write_trdid       = m_cmd_write_trdid_fifo.read();
+          r_write_pktid       = m_cmd_write_pktid_fifo.read();
+
+          // initialize the be field for all words
+          for(size_t word=0 ; word<m_words ; word++)
+          {
+            if(word == index) r_write_be[word] = m_cmd_write_be_fifo.read();
+            else                 r_write_be[word] = 0x0;
+          }
+
+          if(m_cmd_write_eop_fifo.read() || ((m_cmd_write_pktid_fifo.read() & 0x7)  == TYPE_SC))
+          {
+            r_write_fsm = WRITE_DIR_REQ;
+          }
+          else
+          {
+            r_write_fsm = WRITE_NEXT;
+          }
+        }
+        else
+        {
+          r_write_fsm = WRITE_IDLE;
+        }
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_RSP> Post a request to TGT_RSP FSM: rsrcid = "
+                    << std::dec << r_write_srcid.read() << std::endl;
+          if(m_cmd_write_addr_fifo.rok())
+          {
+            std::cout << "                    New Write request: "
+                      << " srcid = " << std::dec << m_cmd_write_srcid_fifo.read()
+                      << " / address = " << std::hex << m_cmd_write_addr_fifo.read()
+                      << " / data = " << m_cmd_write_data_fifo.read() << std::endl;
+          }
+        }
+#endif
+      }
+      break;
+    }
+
+    /////////////////////////
+    case WRITE_MISS_TRT_LOCK: // Miss : check Transaction Table
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_WRITE)
+      {
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_MISS_TRT_LOCK> Check the TRT" << std::endl;
+        }
+#endif
+        size_t  hit_index = 0;
+        size_t  wok_index = 0;
+        vci_addr_t  addr  = (vci_addr_t) r_write_address.read();
+        bool    hit_read  = m_transaction_tab.hit_read(m_nline[addr], hit_index);
+        bool    hit_write = m_transaction_tab.hit_write(m_nline[addr]);
+        bool    wok       = !m_transaction_tab.full(wok_index);
+
+        if(hit_read)      // register the modified data in TRT
+        {
+          r_write_trt_index = hit_index;
+          r_write_fsm       = WRITE_MISS_TRT_DATA;
+          m_cpt_write_miss++;
+        }
+        else if(wok && !hit_write)      // set a new entry in TRT
+        {
+          r_write_trt_index = wok_index;
+          r_write_fsm       = WRITE_MISS_TRT_SET;
+          m_cpt_write_miss++;
+        }
+        else    // wait an empty entry in TRT
+        {
+          r_write_fsm       = WRITE_WAIT;
+          m_cpt_trt_full++;
+        }
+      }
+      break;
+    }
+
+    ////////////////
+    case WRITE_WAIT:  // release the locks protecting the shared ressources
+    {
+#if DEBUG_MEMC_WRITE
+      if(m_debug_write_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".WRITE_WAIT> Releases the locks before retry" << std::endl;
+      }
+#endif
+      r_write_fsm = WRITE_DIR_REQ;
+      break;
+    }
+
+    ////////////////////////
+    case WRITE_MISS_TRT_SET:  // register a new transaction in TRT (Write Buffer)
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_WRITE)
+      {
+        std::vector<be_t>   be_vector;
+        std::vector<data_t> data_vector;
+        be_vector.clear();
+        data_vector.clear();
+        for(size_t i=0; i<m_words; i++)
+        {
+          be_vector.push_back(r_write_be[i]);
+          data_vector.push_back(r_write_data[i]);
+        }
+        m_transaction_tab.set(r_write_trt_index.read(),
+                              true,     // read request to XRAM
+                              m_nline[(vci_addr_t)(r_write_address.read())],
+                              r_write_srcid.read(),
+                              r_write_trdid.read(),
+                              r_write_pktid.read(),
+                              false,      // not a processor read
+                              0,        // not a single word
+                              0,            // word index
+                              be_vector,
+                              data_vector);
+        r_write_fsm = WRITE_MISS_XRAM_REQ;
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_MISS_TRT_SET> Set a new entry in TRT" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    /////////////////////////
+    case WRITE_MISS_TRT_DATA: // update an entry in TRT (used as a Write Buffer)
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_WRITE)
+      {
+        std::vector<be_t> be_vector;
+        std::vector<data_t> data_vector;
+        be_vector.clear();
+        data_vector.clear();
+        for(size_t i=0; i<m_words; i++)
+        {
+          be_vector.push_back(r_write_be[i]);
+          data_vector.push_back(r_write_data[i]);
+        }
+        m_transaction_tab.write_data_mask(r_write_trt_index.read(),
+                                          be_vector,
+                                          data_vector);
+        r_write_fsm = WRITE_RSP;
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_MISS_TRT_DATA> Modify an existing entry in TRT" << std::endl;
+          m_transaction_tab.print(r_write_trt_index.read());
+        }
+#endif
+      }
+      break;
+    }
+
+    /////////////////////////
+    case WRITE_MISS_XRAM_REQ: // send a GET request to IXR_CMD FSM
+    {
+      if(!r_write_to_ixr_cmd_req)
+      {
+        r_write_to_ixr_cmd_req   = true;
+        r_write_to_ixr_cmd_write = false;
+        r_write_to_ixr_cmd_nline = m_nline[(vci_addr_t)(r_write_address.read())];
+        r_write_to_ixr_cmd_trdid = r_write_trt_index.read();
+        r_write_fsm              = WRITE_RSP;
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_MISS_XRAM_REQ> Post a GET request to the IXR_CMD FSM" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    ///////////////////////
+    case WRITE_BC_TRT_LOCK:     // Check TRT not full
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_WRITE)
+      {
+        size_t wok_index = 0;
+        bool wok = !m_transaction_tab.full(wok_index);
+        if(wok)       // set a new entry in TRT
+        {
+          r_write_trt_index = wok_index;
+          r_write_fsm       = WRITE_BC_UPT_LOCK;
+        }
+        else  // wait an empty entry in TRT
+        {
+          r_write_fsm       = WRITE_WAIT;
+        }
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_BC_TRT_LOCK> Check TRT : wok = "
+                    << wok << " / index = " << wok_index << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    //////////////////////
+    case WRITE_BC_UPT_LOCK:      // register BC transaction in UPT
+    {
+      if(r_alloc_upt_fsm.read() == ALLOC_UPT_WRITE)
+      {
+        bool        wok       = false;
+        size_t      index     = 0;
+        size_t      srcid     = r_write_srcid.read();
+        size_t      trdid     = r_write_trdid.read();
+        size_t      pktid     = r_write_pktid.read();
+        addr_t      nline     = m_nline[(vci_addr_t)(r_write_address.read())];
+        size_t      nb_copies = r_write_count.read();
+
+        wok =m_update_tab.set(false,  // it's an inval transaction
+                              true,     // it's a broadcast
+                              true,     // it needs a response
+                              srcid,
+                              trdid,
+                              pktid,
+                              nline,
+                              nb_copies,
+                              index);
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          if(wok)
+          {
+            std::cout << "  <MEMC " << name() << ".WRITE_BC_UPT_LOCK> Register the broadcast inval in UPT / "
+                      << " nb_copies = " << r_write_count.read() << std::endl;
+          }
+        }
+#endif
+        r_write_upt_index = index;
+
+        if(wok) r_write_fsm = WRITE_BC_DIR_INVAL;
+        else       r_write_fsm = WRITE_WAIT;
+      }
+      break;
+    }
+
+    ////////////////////////
+    case WRITE_BC_DIR_INVAL:
+    {
+      // Register a put transaction to XRAM in TRT
+      // and invalidate the line in directory
+      if((r_alloc_trt_fsm.read() != ALLOC_TRT_WRITE) ||
+          (r_alloc_upt_fsm.read() != ALLOC_UPT_WRITE) ||
+          (r_alloc_dir_fsm.read() != ALLOC_DIR_WRITE))
+      {
+        std::cout << "VCI_MEM_CACHE ERROR " << name() << " WRITE_BC_DIR_INVAL state" << std::endl;
+        std::cout << "bad TRT, DIR, or UPT allocation" << std::endl;
+        exit(0);
+      }
+
+      // register a write request to XRAM in TRT
+      m_transaction_tab.set(r_write_trt_index.read(),
+                            false,    // write request to XRAM
+                            m_nline[(vci_addr_t)(r_write_address.read())],
+                            0,
+                            0,
+                            0,
+                            false,    // not a processor read
+                            0,        // not a single word
+                            0,            // word index
+                            std::vector<be_t> (m_words,0),
+                            std::vector<data_t> (m_words,0));
+
+      // invalidate directory entry
+      DirectoryEntry entry;
+      entry.valid         = false;
+      entry.dirty         = false;
+      entry.tag         = 0;
+      entry.is_cnt        = false;
+      entry.lock          = false;
+      entry.owner.srcid   = 0;
+#if L1_MULTI_CACHE
+      entry.owner.cache_id= 0;
+#endif
+      entry.owner.inst    = false;
+      entry.ptr           = 0;
+      entry.count         = 0;
+      size_t set          = m_y[(vci_addr_t)(r_write_address.read())];
+      size_t way          = r_write_way.read();
+
+      m_cache_directory.write(set, way, entry);
+
+#if DEBUG_MEMC_WRITE
+      if(m_debug_write_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".WRITE_BC_DIR_INVAL> Invalidate the directory entry: @ = "
+                  << r_write_address.read() << " / register the put transaction in TRT:" << std::endl;
+      }
+#endif
+      r_write_fsm = WRITE_BC_CC_SEND;
+      break;
+    }
+
+    //////////////////////
+    case WRITE_BC_CC_SEND:    // Post a coherence broadcast request to CC_SEND FSM
+    {
+      if(!r_write_to_cc_send_multi_req.read() && !r_write_to_cc_send_brdcast_req.read())
+      {
+        r_write_to_cc_send_multi_req   = false;
+        r_write_to_cc_send_brdcast_req = true;
+        r_write_to_cc_send_trdid       = r_write_upt_index.read();
+        r_write_to_cc_send_nline       = m_nline[(vci_addr_t)(r_write_address.read())];
+        r_write_to_cc_send_index       = 0;
+        r_write_to_cc_send_count       = 0;
+
+        for(size_t i=0; i<m_words ; i++)
+        {
+          r_write_to_cc_send_be[i]=0;
+          r_write_to_cc_send_data[i] = 0;
+        }
+        r_write_fsm = WRITE_BC_XRAM_REQ;
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_BC_CC_SEND> Post a broadcast request to CC_SEND FSM" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    ///////////////////////
+    case WRITE_BC_XRAM_REQ:   // Post a put request to IXR_CMD FSM
+    {
+      if(!r_write_to_ixr_cmd_req)
+      {
+        r_write_to_ixr_cmd_req     = true;
+        r_write_to_ixr_cmd_write   = true;
+        r_write_to_ixr_cmd_nline   = m_nline[(vci_addr_t)(r_write_address.read())];
+        r_write_to_ixr_cmd_trdid   = r_write_trt_index.read();
+
+        for(size_t i=0; i<m_words; i++) r_write_to_ixr_cmd_data[i] = r_write_data[i];
+
+        r_write_fsm = WRITE_IDLE;
+
+#if DEBUG_MEMC_WRITE
+        if(m_debug_write_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".WRITE_BC_XRAM_REQ> Post a put request to IXR_CMD FSM" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+  } // end switch r_write_fsm
+
+  ///////////////////////////////////////////////////////////////////////
+  //    IXR_CMD FSM
+  ///////////////////////////////////////////////////////////////////////
+  // The IXR_CMD fsm controls the command packets to the XRAM :
+  // - It sends a single cell VCI read request to the XRAM in case of MISS
+  // posted by the READ, WRITE or CAS FSMs : the TRDID field contains
+  // the Transaction Tab index.
+  // The VCI response is a multi-cell packet : the N cells contain
+  // the N data words.
+  // - It sends a multi-cell VCI write when the XRAM_RSP FSM, WRITE FSM
+  // or CAS FSM request to save a dirty line to the XRAM.
+  // The VCI response is a single cell packet.
+  // This FSM handles requests from the READ, WRITE, CAS & XRAM_RSP FSMs
+  // with a round-robin priority.
+  ////////////////////////////////////////////////////////////////////////
+
+  switch(r_ixr_cmd_fsm.read())
+  {
+      ////////////////////////
+    case IXR_CMD_READ_IDLE:
+      if(r_write_to_ixr_cmd_req)     r_ixr_cmd_fsm = IXR_CMD_WRITE_NLINE;
+      else if(r_cas_to_ixr_cmd_req)      r_ixr_cmd_fsm = IXR_CMD_CAS_NLINE;
+      else if(r_xram_rsp_to_ixr_cmd_req) r_ixr_cmd_fsm = IXR_CMD_XRAM_DATA;
+      else if(r_read_to_ixr_cmd_req)     r_ixr_cmd_fsm = IXR_CMD_READ_NLINE;
+      break;
+      ////////////////////////
+    case IXR_CMD_WRITE_IDLE:
+      if(r_cas_to_ixr_cmd_req)      r_ixr_cmd_fsm = IXR_CMD_CAS_NLINE;
+      else if(r_xram_rsp_to_ixr_cmd_req) r_ixr_cmd_fsm = IXR_CMD_XRAM_DATA;
+      else if(r_read_to_ixr_cmd_req)     r_ixr_cmd_fsm = IXR_CMD_READ_NLINE;
+      else if(r_write_to_ixr_cmd_req)     r_ixr_cmd_fsm = IXR_CMD_WRITE_NLINE;
+      break;
+      ////////////////////////
+    case IXR_CMD_CAS_IDLE:
+      if(r_xram_rsp_to_ixr_cmd_req) r_ixr_cmd_fsm = IXR_CMD_XRAM_DATA;
+      else if(r_read_to_ixr_cmd_req)     r_ixr_cmd_fsm = IXR_CMD_READ_NLINE;
+      else if(r_write_to_ixr_cmd_req)     r_ixr_cmd_fsm = IXR_CMD_WRITE_NLINE;
+      else if(r_cas_to_ixr_cmd_req)      r_ixr_cmd_fsm = IXR_CMD_CAS_NLINE;
+      break;
+      ////////////////////////
+    case IXR_CMD_XRAM_IDLE:
+      if(r_read_to_ixr_cmd_req)     r_ixr_cmd_fsm = IXR_CMD_READ_NLINE;
+      else if(r_write_to_ixr_cmd_req)     r_ixr_cmd_fsm = IXR_CMD_WRITE_NLINE;
+      else if(r_cas_to_ixr_cmd_req)      r_ixr_cmd_fsm = IXR_CMD_CAS_NLINE;
+      else if(r_xram_rsp_to_ixr_cmd_req) r_ixr_cmd_fsm = IXR_CMD_XRAM_DATA;
+      break;
+      /////////////////////////       // send a get request to XRAM
+    case IXR_CMD_READ_NLINE:
+      if(p_vci_ixr.cmdack)
+      {
+        r_ixr_cmd_fsm = IXR_CMD_READ_IDLE;
+        r_read_to_ixr_cmd_req = false;
+
+#if DEBUG_MEMC_IXR_CMD
+        if(m_debug_ixr_cmd_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".IXR_CMD_READ_NLINE> Send a get request to xram" << std::endl;
+        }
+#endif
+      }
+      break;
+      //////////////////////////
+    case IXR_CMD_WRITE_NLINE:     // send a put or get command to XRAM
+      if(p_vci_ixr.cmdack)
+      {
+        if(r_write_to_ixr_cmd_write.read())
+        {
+          if(r_ixr_cmd_cpt.read() == (m_words - 1))
+          {
+            r_ixr_cmd_cpt = 0;
+            r_ixr_cmd_fsm = IXR_CMD_WRITE_IDLE;
+            r_write_to_ixr_cmd_req = false;
+          }
+          else
+          {
+            r_ixr_cmd_cpt = r_ixr_cmd_cpt + 1;
+          }
+
+#if DEBUG_MEMC_IXR_CMD
+          if(m_debug_ixr_cmd_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".IXR_CMD_WRITE_NLINE> Send a put request to xram" << std::endl;
+          }
+#endif
+        }
+        else
+        {
+          r_ixr_cmd_fsm = IXR_CMD_WRITE_IDLE;
+          r_write_to_ixr_cmd_req = false;
+
+#if DEBUG_MEMC_IXR_CMD
+          if(m_debug_ixr_cmd_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".IXR_CMD_WRITE_NLINE> Send a get request to xram" << std::endl;
+          }
+#endif
+        }
+      }
+      break;
+      //////////////////////
+    case IXR_CMD_CAS_NLINE:      // send a put or get command to XRAM
+      if(p_vci_ixr.cmdack)
+      {
+        if(r_cas_to_ixr_cmd_write.read())
+        {
+          if(r_ixr_cmd_cpt.read() == (m_words - 1))
+          {
+            r_ixr_cmd_cpt = 0;
+            r_ixr_cmd_fsm = IXR_CMD_CAS_IDLE;
+            r_cas_to_ixr_cmd_req = false;
+          }
+          else
+          {
+            r_ixr_cmd_cpt = r_ixr_cmd_cpt + 1;
+          }
+
+#if DEBUG_MEMC_IXR_CMD
+          if(m_debug_ixr_cmd_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".IXR_CMD_CAS_NLINE> Send a put request to xram" << std::endl;
+          }
+#endif
+        }
+        else
+        {
+          r_ixr_cmd_fsm = IXR_CMD_CAS_IDLE;
+          r_cas_to_ixr_cmd_req = false;
+
+#if DEBUG_MEMC_IXR_CMD
+          if(m_debug_ixr_cmd_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".IXR_CMD_CAS_NLINE> Send a get request to xram" << std::endl;
+          }
+#endif
+        }
+      }
+      break;
+      ////////////////////////
+    case IXR_CMD_XRAM_DATA:     // send a put command to XRAM
+      if(p_vci_ixr.cmdack)
+      {
+        if(r_ixr_cmd_cpt.read() == (m_words - 1))
+        {
+          r_ixr_cmd_cpt = 0;
+          r_ixr_cmd_fsm = IXR_CMD_XRAM_IDLE;
+          r_xram_rsp_to_ixr_cmd_req = false;
+        }
+        else
+        {
+          r_ixr_cmd_cpt = r_ixr_cmd_cpt + 1;
+        }
+
+#if DEBUG_MEMC_IXR_CMD
+        if(m_debug_ixr_cmd_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".IXR_CMD_XRAM_DATA> Send a put request to xram" << std::endl;
+        }
+#endif
+      }
+      break;
+
+  } // end switch r_ixr_cmd_fsm
+
+  ////////////////////////////////////////////////////////////////////////////
+  //                IXR_RSP FSM
+  ////////////////////////////////////////////////////////////////////////////
+  // The IXR_RSP FSM receives the response packets from the XRAM,
+  // for both put transaction, and get transaction.
+  //
+  // - A response to a put request is a single-cell VCI packet.
+  // The Transaction Tab index is contained in the RTRDID field.
+  // The FSM takes the lock protecting the TRT, and the corresponding
+  // entry is erased.
+  //
+  // - A response to a get request is a multi-cell VCI packet.
+  // The Transaction Tab index is contained in the RTRDID field.
+  // The N cells contain the N words of the cache line in the RDATA field.
+  // The FSM takes the lock protecting the TRT to store the line in the TRT
+  // (taking into account the write requests already stored in the TRT).
+  // When the line is completely written, the corresponding rok signal is set.
+  ///////////////////////////////////////////////////////////////////////////////
+
+  switch(r_ixr_rsp_fsm.read())
+  {
+      //////////////////
+    case IXR_RSP_IDLE:  // test if it's a get or a put transaction
+    {
+      if(p_vci_ixr.rspval.read())
+      {
+        r_ixr_rsp_cpt   = 0;
+        r_ixr_rsp_trt_index = p_vci_ixr.rtrdid.read();
+        if(p_vci_ixr.reop.read() && !(p_vci_ixr.rerror.read() &0x1))   // put transaction
+        {
+          r_ixr_rsp_fsm = IXR_RSP_ACK;
+
+#if DEBUG_MEMC_IXR_RSP
+          if(m_debug_ixr_rsp_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".IXR_RSP_IDLE> Response from XRAM to a put transaction" << std::endl;
+          }
+#endif
+        }
+        else                     // get transaction
+        {
+          r_ixr_rsp_fsm = IXR_RSP_TRT_READ;
+
+#if DEBUG_MEMC_IXR_RSP
+          if(m_debug_ixr_rsp_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".IXR_RSP_IDLE> Response from XRAM to a get transaction" << std::endl;
+          }
+#endif
+        }
+      }
+      break;
+    }
+    ////////////////////////
+    case IXR_RSP_ACK:        // Aknowledge the VCI response
+    {
+      if(p_vci_ixr.rspval.read()) r_ixr_rsp_fsm = IXR_RSP_TRT_ERASE;
+
+#if DEBUG_MEMC_IXR_RSP
+      if(m_debug_ixr_rsp_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".IXR_RSP_ACK>" << std::endl;
+      }
+#endif
+      break;
+    }
+    ////////////////////////
+    case IXR_RSP_TRT_ERASE:   // erase the entry in the TRT
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_IXR_RSP)
+      {
+        m_transaction_tab.erase(r_ixr_rsp_trt_index.read());
+        r_ixr_rsp_fsm = IXR_RSP_IDLE;
+
+#if DEBUG_MEMC_IXR_RSP
+        if(m_debug_ixr_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".IXR_RSP_TRT_ERASE> Erase TRT entry "
+                    << r_ixr_rsp_trt_index.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    ///////////////////////
+    case IXR_RSP_TRT_READ:    // write data in the TRT
+    {
+      if((r_alloc_trt_fsm.read() == ALLOC_TRT_IXR_RSP) &&  p_vci_ixr.rspval)
+      {
+        size_t index    = r_ixr_rsp_trt_index.read();
+        bool   eop    = p_vci_ixr.reop.read();
+        data_t data   = p_vci_ixr.rdata.read();
+        bool   error    = ((p_vci_ixr.rerror.read() & 0x1) == 1);
+        assert(((eop == (r_ixr_rsp_cpt.read() == (m_words-1))) || p_vci_ixr.rerror.read())
+               and "Error in VCI_MEM_CACHE : invalid length for a response from XRAM");
+        m_transaction_tab.write_rsp(index,
+                                    r_ixr_rsp_cpt.read(),
+                                    data,
+                                    error);
+        r_ixr_rsp_cpt = r_ixr_rsp_cpt.read() + 1;
+        if(eop)
+        {
+          r_ixr_rsp_to_xram_rsp_rok[r_ixr_rsp_trt_index.read()]=true;
+          r_ixr_rsp_fsm = IXR_RSP_IDLE;
+        }
+
+#if DEBUG_MEMC_IXR_RSP
+        if(m_debug_ixr_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".IXR_RSP_TRT_READ> Writing a word in TRT : "
+                    << " index = " << std::dec << index
+                    << " / word = " << r_ixr_rsp_cpt.read()
+                    << " / data = " << std::hex << data << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+  } // end swich r_ixr_rsp_fsm
+
+  ////////////////////////////////////////////////////////////////////////////
+  //                XRAM_RSP FSM
+  ////////////////////////////////////////////////////////////////////////////
+  // The XRAM_RSP FSM handles the incoming cache lines from the XRAM.
+  // The cache line has been written in the TRT by the IXR_CMD_FSM.
+  // As the IXR_RSP FSM and the XRAM_RSP FSM are running in parallel,
+  // there is as many flip-flops r_ixr_rsp_to_xram_rsp_rok[i]
+  // as the number of entries in the TRT, that are handled with
+  // a round-robin priority...
+  //
+  // When a response is available, the corresponding TRT entry
+  // must be copied in a local buffer to be written in the cache.
+  // The FSM takes the lock protecting the TRT, and the lock protecting the DIR.
+  // It selects a cache slot and writes the line in the cache.
+  // If it was a read MISS, the XRAM_RSP FSM send a request to the TGT_RSP
+  // FSM to return the cache line to the registered processor.
+  // If there is no empty slot, a victim line is evicted, and
+  // invalidate requests are sent to the L1 caches containing copies.
+  // If this line is dirty, the XRAM_RSP FSM send a request to the IXR_CMD
+  // FSM to save the victim line to the XRAM, and register the write transaction
+  // in the TRT (using the entry previously used by the read transaction).
+  ///////////////////////////////////////////////////////////////////////////////
+
+  switch(r_xram_rsp_fsm.read())
+  {
+      ///////////////////
+    case XRAM_RSP_IDLE: // scan the XRAM responses to get the TRT index (round robin)
+    {
+      size_t ptr   = r_xram_rsp_trt_index.read();
+      size_t lines = m_transaction_tab_lines;
+      for(size_t i=0 ; i<lines ; i++)
+      {
+        size_t index= (i+ptr+1) %lines;
+        if(r_ixr_rsp_to_xram_rsp_rok[index])
+        {
+          r_xram_rsp_trt_index             = index;
+          r_ixr_rsp_to_xram_rsp_rok[index] = false;
+          r_xram_rsp_fsm                   = XRAM_RSP_DIR_LOCK;
+
+#if DEBUG_MEMC_XRAM_RSP
+          if(m_debug_xram_rsp_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".XRAM_RSP_IDLE> Available cache line in TRT:"
+                      << " index = " << std::dec << index << std::endl;
+          }
+#endif
+          break;
+        }
+      }
+      break;
+    }
+    ///////////////////////
+    case XRAM_RSP_DIR_LOCK:
+      // Takes the lock on the directory
+      // Takes the lock on TRT
+      // Copy the TRT entry in a local buffer
+    {
+      if((r_alloc_dir_fsm.read() == ALLOC_DIR_XRAM_RSP) &&
+          (r_alloc_trt_fsm.read() == ALLOC_TRT_XRAM_RSP))
+      {
+        // copy the TRT entry in the r_xram_rsp_trt_buf local buffer
+        size_t  index = r_xram_rsp_trt_index.read();
+
+        TransactionTabEntry trt_entry(m_transaction_tab.read(index));
+        r_xram_rsp_trt_buf.copy(trt_entry);  // TRT entry local buffer
+
+        r_xram_rsp_fsm = XRAM_RSP_TRT_COPY;
+
+#if DEBUG_MEMC_XRAM_RSP
+        if(m_debug_xram_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".XRAM_RSP_DIR_LOCK> Get access to directory" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    ///////////////////////
+    case XRAM_RSP_TRT_COPY:
+      // Select a victim cache line
+    {
+      if((r_alloc_trt_fsm.read() == ALLOC_TRT_XRAM_RSP))
+      {
+        // selects & extracts a victim line from cache
+        size_t way = 0;
+        size_t set = m_y[(vci_addr_t)(r_xram_rsp_trt_buf.nline * m_words * 4)];
+
+        DirectoryEntry victim(m_cache_directory.select(set, way));
+
+        bool inval = (victim.count && victim.valid) ;
+
+        // copy the victim line in a local buffer
+        m_cache_data.read_line(way, set, r_xram_rsp_victim_data);
+
+        r_xram_rsp_victim_copy      = victim.owner.srcid;
+#if L1_MULTI_CACHE
+        r_xram_rsp_victim_copy_cache= victim.owner.cache_id;
+#endif
+        r_xram_rsp_victim_copy_inst = victim.owner.inst;
+        r_xram_rsp_victim_count     = victim.count;
+        r_xram_rsp_victim_ptr       = victim.ptr;
+        r_xram_rsp_victim_way       = way;
+        r_xram_rsp_victim_set       = set;
+        r_xram_rsp_victim_nline     = victim.tag*m_sets + set;
+        r_xram_rsp_victim_is_cnt    = victim.is_cnt;
+        r_xram_rsp_victim_inval     = inval ;
+        r_xram_rsp_victim_dirty     = victim.dirty;
+
+        if(!r_xram_rsp_trt_buf.rerror)
+        {
+          r_xram_rsp_fsm = XRAM_RSP_INVAL_LOCK;
+        }
+        else
+        {
+          r_xram_rsp_fsm = XRAM_RSP_ERROR_ERASE;
+        }
+
+#if DEBUG_MEMC_XRAM_RSP
+        if(m_debug_xram_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".XRAM_RSP_TRT_COPY> Select a slot: "
+                    << " way = " << std::dec << way
+                    << " / set = " << set
+                    << " / inval_required = " << inval << std::endl;
+        }
+#endif
+      }
+      else
+      {
+        std::cout << "VCI_MEM_CACHE ERROR "     << name()
+                  << " XRAM_RSP_TRT_COPY state" << std::endl
+                  << "bad TRT allocation"       << std::endl;
+
+        exit(0);
+      }
+      break;
+    }
+    /////////////////////////
+    case XRAM_RSP_INVAL_LOCK: // check a possible pending inval
+    {
+      if(r_alloc_upt_fsm == ALLOC_UPT_XRAM_RSP)
+      {
+        size_t index;
+        if(m_update_tab.search_inval(r_xram_rsp_trt_buf.nline, index))
+        {
+          r_xram_rsp_fsm = XRAM_RSP_INVAL_WAIT;
+
+#if DEBUG_MEMC_XRAM_RSP
+          if(m_debug_xram_rsp_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".XRAM_RSP_INVAL_LOCK> Get acces to UPT,"
+                      << " but an invalidation is already registered at this address" << std::endl;
+            m_update_tab.print();
+          }
+#endif
+
+        }
+        else if(m_update_tab.is_full() && r_xram_rsp_victim_inval.read())
+        {
+          r_xram_rsp_fsm = XRAM_RSP_INVAL_WAIT;
+
+#if DEBUG_MEMC_XRAM_RSP
+          if(m_debug_xram_rsp_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".XRAM_RSP_INVAL_LOCK> Get acces to UPT,"
+                      << " but the table is full" << std::endl;
+            m_update_tab.print();
+          }
+#endif
+        }
+        else
+        {
+          r_xram_rsp_fsm = XRAM_RSP_DIR_UPDT;
+
+#if DEBUG_MEMC_XRAM_RSP
+          if(m_debug_xram_rsp_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".XRAM_RSP_INVAL_LOCK> Get acces to UPT" << std::endl;
+          }
+#endif
+        }
+      }
+      break;
+    }
+    /////////////////////////
+    case XRAM_RSP_INVAL_WAIT: // returns to DIR_LOCK to retry
+    {
+      r_xram_rsp_fsm = XRAM_RSP_DIR_LOCK;
+      break;
+    }
+    ///////////////////////
+    case XRAM_RSP_DIR_UPDT:   // updates the cache (both data & directory)
+      // and possibly set an inval request in UPT
+    {
+      // signals generation
+      // check if this is an instruction read, this means pktid is either
+      // TYPE_READ_INS_UNC   0bX010 with TSAR encoding
+      // TYPE_READ_INS_MISS  0bX011 with TSAR encoding
+      bool inst_read = (r_xram_rsp_trt_buf.pktid & 0x2) && r_xram_rsp_trt_buf.proc_read;
+      // check if this is a cached read, this means pktid is either
+      // TYPE_READ_DATA_MISS 0bX001 with TSAR encoding
+      // TYPE_READ_INS_MISS  0bX011 with TSAR encoding
+      bool cached_read = (r_xram_rsp_trt_buf.pktid & 0x1) && r_xram_rsp_trt_buf.proc_read;
+
+      // update data
+      size_t set   = r_xram_rsp_victim_set.read();
+      size_t way   = r_xram_rsp_victim_way.read();
+      for(size_t word=0; word<m_words ; word++)
+      {
+        m_cache_data.write(way, set, word, r_xram_rsp_trt_buf.wdata[word]);
+
+        if(m_monitor_ok)
+        {
+          vci_addr_t address = r_xram_rsp_trt_buf.nline<<6 | word<<2;
+          check_monitor("XRAM_RSP_DIR_UPDT", address, r_xram_rsp_trt_buf.wdata[word]);
+        }
+      }
+      // compute dirty
+      bool dirty = false;
+      for(size_t i=0; i<m_words; i++) dirty = dirty || (r_xram_rsp_trt_buf.wdata_be[i] != 0);
+      // update directory
+      DirectoryEntry entry;
+      entry.valid   = true;
+      entry.is_cnt  = false;
+      entry.lock    = false;
+      entry.dirty   = dirty;
+      entry.tag     = r_xram_rsp_trt_buf.nline / m_sets;
+      entry.ptr     = 0;
+      if(cached_read)
+      {
+        entry.owner.srcid   = r_xram_rsp_trt_buf.srcid;
+#if L1_MULTI_CACHE
+        entry.owner.cache_id= r_xram_rsp_trt_buf.pktid;
+#endif
+        entry.owner.inst    = inst_read;
+        entry.count         = 1;
+      }
+      else
+      {
+        entry.owner.srcid    = 0;
+#if L1_MULTI_CACHE
+        entry.owner.cache_id = 0;
+#endif
+        entry.owner.inst     = 0;
+        entry.count          = 0;
+      }
+      m_cache_directory.write(set, way, entry);
+
+      if(r_xram_rsp_victim_inval.read())
+      {
+        bool   brdcast    = r_xram_rsp_victim_is_cnt.read();
+        size_t index    = 0;
+        size_t count_copies   = r_xram_rsp_victim_count.read();
+
+        bool   wok = m_update_tab.set(false,      // it's an inval transaction
+                                      brdcast,  // set brdcast bit
+                                      false,    // it does not need a response
+                                      0,    // srcid
+                                      0,    // trdid
+                                      0,    // pktid
+                                      r_xram_rsp_victim_nline.read(),
+                                      count_copies,
+                                      index);
+        r_xram_rsp_upt_index = index;
+
+        if(!wok)
+        {
+          std::cout << "VCI_MEM_CACHE ERROR " << name() << " XRAM_RSP_HEAP_LAST state" << std::endl;
+          std::cout << "an update_tab entry was free but write is unsuccessful" << std::endl;
+          exit(0);
+        }
+      }
+
+#if DEBUG_MEMC_XRAM_RSP
+      if(m_debug_xram_rsp_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".XRAM_RSP_DIR_UPDT> Directory update: "
+                  << " way = " << std::dec << way
+                  << " / set = " << set
+                  << " / count = " << entry.count
+                  << " / is_cnt = " << entry.is_cnt << std::endl;
+        if(r_xram_rsp_victim_inval.read())
+          std::cout << "                           Invalidation request for victim line "
+                    << std::hex << r_xram_rsp_victim_nline.read()
+                    << " / broadcast = " << r_xram_rsp_victim_is_cnt.read() << std::endl;
+      }
+#endif
+
+      // If the victim is not dirty, we don't need another XRAM  put transaction,
+      // and we canwe erase the TRT entry
+      if(!r_xram_rsp_victim_dirty.read())  m_transaction_tab.erase(r_xram_rsp_trt_index.read());
+
+      // Next state
+      if(r_xram_rsp_victim_dirty.read())       r_xram_rsp_fsm = XRAM_RSP_TRT_DIRTY;
+      else if(r_xram_rsp_trt_buf.proc_read)       r_xram_rsp_fsm = XRAM_RSP_DIR_RSP;
+      else if(r_xram_rsp_victim_inval.read())       r_xram_rsp_fsm = XRAM_RSP_INVAL;
+      else                                            r_xram_rsp_fsm = XRAM_RSP_IDLE;
+      break;
+    }
+    ////////////////////////
+    case XRAM_RSP_TRT_DIRTY:  // set the TRT entry (write to XRAM) if the victim is dirty
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_XRAM_RSP)
+      {
+        m_transaction_tab.set(r_xram_rsp_trt_index.read(),
+                              false,       // write to XRAM
+                              r_xram_rsp_victim_nline.read(),  // line index
+                              0,
+                              0,
+                              0,
+                              false,
+                              0,
+                              0,
+                              std::vector<be_t> (m_words,0),
+                              std::vector<data_t> (m_words,0));
+
+#if DEBUG_MEMC_XRAM_RSP
+        if(m_debug_xram_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".XRAM_RSP_TRT_DIRTY> Set TRT entry for the put transaction:"
+                    << " dirty victim line = " << r_xram_rsp_victim_nline.read() << std::endl;
+        }
+#endif
+        if(r_xram_rsp_trt_buf.proc_read)       r_xram_rsp_fsm = XRAM_RSP_DIR_RSP;
+        else if(r_xram_rsp_victim_inval.read())       r_xram_rsp_fsm = XRAM_RSP_INVAL;
+        else                                            r_xram_rsp_fsm = XRAM_RSP_WRITE_DIRTY;
+      }
+      break;
+    }
+    //////////////////////
+    case XRAM_RSP_DIR_RSP:     // Request a response to TGT_RSP FSM
+    {
+      if(!r_xram_rsp_to_tgt_rsp_req.read())
+      {
+        r_xram_rsp_to_tgt_rsp_srcid = r_xram_rsp_trt_buf.srcid;
+        r_xram_rsp_to_tgt_rsp_trdid = r_xram_rsp_trt_buf.trdid;
+        r_xram_rsp_to_tgt_rsp_pktid = r_xram_rsp_trt_buf.pktid;
+        for(size_t i=0; i < m_words; i++) r_xram_rsp_to_tgt_rsp_data[i] = r_xram_rsp_trt_buf.wdata[i];
+        r_xram_rsp_to_tgt_rsp_word   = r_xram_rsp_trt_buf.word_index;
+        r_xram_rsp_to_tgt_rsp_length = r_xram_rsp_trt_buf.read_length;
+        r_xram_rsp_to_tgt_rsp_ll_key = r_xram_rsp_trt_buf.ll_key;
+        r_xram_rsp_to_tgt_rsp_rerror = false;
+        r_xram_rsp_to_tgt_rsp_req    = true;
+
+        if(r_xram_rsp_victim_inval) r_xram_rsp_fsm = XRAM_RSP_INVAL;
+        else if(r_xram_rsp_victim_dirty) r_xram_rsp_fsm = XRAM_RSP_WRITE_DIRTY;
+        else                                r_xram_rsp_fsm = XRAM_RSP_IDLE;
+
+
+#if DEBUG_MEMC_XRAM_RSP
+        if(m_debug_xram_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".XRAM_RSP_DIR_RSP> Request the TGT_RSP FSM to return data:"
+                    << " rsrcid = " << std::dec << r_xram_rsp_trt_buf.srcid
+                    << " / address = " << std::hex << r_xram_rsp_trt_buf.nline*m_words*4
+                    << " / nwords = " << std::dec << r_xram_rsp_trt_buf.read_length << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    ////////////////////
+    case XRAM_RSP_INVAL:  // send invalidate request to CC_SEND FSM
+    {
+      if(!r_xram_rsp_to_cc_send_multi_req.read() &&
+          !r_xram_rsp_to_cc_send_brdcast_req.read())
+      {
+        bool multi_req = !r_xram_rsp_victim_is_cnt.read();
+        bool last_multi_req  = multi_req && (r_xram_rsp_victim_count.read() == 1);
+        bool not_last_multi_req = multi_req && (r_xram_rsp_victim_count.read() != 1);
+
+        r_xram_rsp_to_cc_send_multi_req    = last_multi_req;
+        r_xram_rsp_to_cc_send_brdcast_req  = r_xram_rsp_victim_is_cnt.read();
+        r_xram_rsp_to_cc_send_nline        = r_xram_rsp_victim_nline.read();
+        r_xram_rsp_to_cc_send_trdid        = r_xram_rsp_upt_index;
+        xram_rsp_to_cc_send_fifo_srcid     = r_xram_rsp_victim_copy.read();
+        xram_rsp_to_cc_send_fifo_inst      = r_xram_rsp_victim_copy_inst.read();
+#if L1_MULTI_CACHE
+        xram_rsp_to_cc_send_fifo_cache_id  = r_xram_rsp_victim_copy_cache.read();
+#endif
+        xram_rsp_to_cc_send_fifo_put       = multi_req;
+        r_xram_rsp_next_ptr                 = r_xram_rsp_victim_ptr.read();
+
+        if(r_xram_rsp_victim_dirty)  r_xram_rsp_fsm = XRAM_RSP_WRITE_DIRTY;
+        else if(not_last_multi_req)    r_xram_rsp_fsm = XRAM_RSP_HEAP_REQ;
+        else                            r_xram_rsp_fsm = XRAM_RSP_IDLE;
+
+#if DEBUG_MEMC_XRAM_RSP
+        if(m_debug_xram_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".XRAM_RSP_INVAL> Send an inval request to CC_SEND FSM:"
+                    << " victim line = " << r_xram_rsp_victim_nline.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    //////////////////////////
+    case XRAM_RSP_WRITE_DIRTY:  // send a write request to IXR_CMD FSM
+    {
+      if(!r_xram_rsp_to_ixr_cmd_req.read())
+      {
+        r_xram_rsp_to_ixr_cmd_req = true;
+        r_xram_rsp_to_ixr_cmd_nline = r_xram_rsp_victim_nline.read();
+        r_xram_rsp_to_ixr_cmd_trdid = r_xram_rsp_trt_index.read();
+        for(size_t i=0; i<m_words ; i++) r_xram_rsp_to_ixr_cmd_data[i] = r_xram_rsp_victim_data[i];
+        m_cpt_write_dirty++;
+
+        bool multi_req = !r_xram_rsp_victim_is_cnt.read() && r_xram_rsp_victim_inval.read();
+        bool not_last_multi_req = multi_req && (r_xram_rsp_victim_count.read() != 1);
+        if(not_last_multi_req)   r_xram_rsp_fsm = XRAM_RSP_HEAP_REQ;
+        else                        r_xram_rsp_fsm = XRAM_RSP_IDLE;
+
+#if DEBUG_MEMC_XRAM_RSP
+        if(m_debug_xram_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".XRAM_RSP_WRITE_DIRTY> Send the put request to IXR_CMD FSM:"
+                    << " victim line = " << r_xram_rsp_victim_nline.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+
+    /////////////////////////
+    case XRAM_RSP_HEAP_REQ:
+      // Get the lock to the HEAP directory
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_XRAM_RSP)
+      {
+        r_xram_rsp_fsm = XRAM_RSP_HEAP_ERASE;
+      }
+
+#if DEBUG_MEMC_XRAM_RSP
+      if(m_debug_xram_rsp_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name() << ".XRAM_RSP_HEAP_REQ> Requesting HEAP lock "
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    /////////////////////////
+    case XRAM_RSP_HEAP_ERASE: // erase the list of copies and sent invalidations
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_XRAM_RSP)
+      {
+        HeapEntry entry = m_heap.read(r_xram_rsp_next_ptr.read());
+
+        xram_rsp_to_cc_send_fifo_srcid    = entry.owner.srcid;
+#if L1_MULTI_CACHE
+        xram_rsp_to_cc_send_fifo_cache_id = entry.owner.cache_id;
+#endif
+        xram_rsp_to_cc_send_fifo_inst  = entry.owner.inst;
+        xram_rsp_to_cc_send_fifo_put   = true;
+        if(m_xram_rsp_to_cc_send_inst_fifo.wok())
+        {
+          r_xram_rsp_next_ptr = entry.next;
+          if(entry.next == r_xram_rsp_next_ptr.read())   // last copy
+          {
+            r_xram_rsp_to_cc_send_multi_req = true;
+            r_xram_rsp_fsm = XRAM_RSP_HEAP_LAST;
+          }
+          else
+          {
+            r_xram_rsp_fsm = XRAM_RSP_HEAP_ERASE;
+          }
+        }
+        else
+        {
+          r_xram_rsp_fsm = XRAM_RSP_HEAP_ERASE;
+        }
+
+#if DEBUG_MEMC_XRAM_RSP
+        if(m_debug_xram_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".XRAM_RSP_HEAP_ERASE> Erase the list of copies:"
+                    << " srcid = " << std::dec << entry.owner.srcid
+                    << " / inst = " << std::dec << entry.owner.inst << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    /////////////////////////
+    case XRAM_RSP_HEAP_LAST:  // last member of the list
+    {
+      if(r_alloc_heap_fsm.read() != ALLOC_HEAP_XRAM_RSP)
+      {
+        std::cout << "VCI_MEM_CACHE ERROR " << name() << " XRAM_RSP_HEAP_LAST state" << std::endl;
+        std::cout << "bad HEAP allocation" << std::endl;
+        exit(0);
+      }
+      size_t free_pointer = m_heap.next_free_ptr();
+
+      HeapEntry last_entry;
+      last_entry.owner.srcid    = 0;
+#if L1_MULTI_CACHE
+      last_entry.owner.cache_id = 0;
+#endif
+      last_entry.owner.inst     = false;
+      if(m_heap.is_full())
+      {
+        last_entry.next     = r_xram_rsp_next_ptr.read();
+        m_heap.unset_full();
+      }
+      else
+      {
+        last_entry.next     = free_pointer;
+      }
+
+      m_heap.write_free_ptr(r_xram_rsp_victim_ptr.read());
+      m_heap.write(r_xram_rsp_next_ptr.read(),last_entry);
+
+      r_xram_rsp_fsm = XRAM_RSP_IDLE;
+
+#if DEBUG_MEMC_XRAM_RSP
+      if(m_debug_xram_rsp_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".XRAM_RSP_HEAP_LAST> Heap housekeeping" << std::endl;
+      }
+#endif
+      break;
+    }
+    // ///////////////////////
+    case XRAM_RSP_ERROR_ERASE:  // erase TRT entry in case of error
+    {
+      m_transaction_tab.erase(r_xram_rsp_trt_index.read());
+
+      // Next state
+      if(r_xram_rsp_trt_buf.proc_read) r_xram_rsp_fsm = XRAM_RSP_ERROR_RSP;
+      else                                 r_xram_rsp_fsm = XRAM_RSP_IDLE;
+
+#if DEBUG_MEMC_XRAM_RSP
+      if(m_debug_xram_rsp_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".XRAM_RSP_ERROR_ERASE> Error reported by XRAM / erase the TRT entry" << std::endl;
+      }
+#endif
+      break;
+    }
+    ////////////////////////
+    case XRAM_RSP_ERROR_RSP:     // Request an error response to TGT_RSP FSM
+    {
+      if(!r_xram_rsp_to_tgt_rsp_req.read())
+      {
+        r_xram_rsp_to_tgt_rsp_srcid  = r_xram_rsp_trt_buf.srcid;
+        r_xram_rsp_to_tgt_rsp_trdid  = r_xram_rsp_trt_buf.trdid;
+        r_xram_rsp_to_tgt_rsp_pktid  = r_xram_rsp_trt_buf.pktid;
+        for(size_t i=0; i < m_words; i++) r_xram_rsp_to_tgt_rsp_data[i] = r_xram_rsp_trt_buf.wdata[i];
+        r_xram_rsp_to_tgt_rsp_word   = r_xram_rsp_trt_buf.word_index;
+        r_xram_rsp_to_tgt_rsp_length = r_xram_rsp_trt_buf.read_length;
+        r_xram_rsp_to_tgt_rsp_rerror = true;
+        r_xram_rsp_to_tgt_rsp_req    = true;
+
+        r_xram_rsp_fsm = XRAM_RSP_IDLE;
+
+#if DEBUG_MEMC_XRAM_RSP
+        if(m_debug_xram_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".XRAM_RSP_ERROR_RSP> Request a response error to TGT_RSP FSM:"
+                    << " srcid = " << std::dec << r_xram_rsp_trt_buf.srcid << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+  } // end swich r_xram_rsp_fsm
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    CLEANUP FSM
+  ////////////////////////////////////////////////////////////////////////////////////
+  // The CLEANUP FSM handles the cleanup request from L1 caches.
+  // It accesses the cache directory and the heap to update the list of copies.
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_cleanup_fsm.read())
+  {
+    case CLEANUP_IDLE:
+    {
+      // Get first DSPIN flit of the CLEANUP command
+      if(not m_cc_receive_to_cleanup_fifo.rok()) break;
+
+      uint64_t flit = m_cc_receive_to_cleanup_fifo.read();
+
+      uint32_t srcid =
+        dspin_param::dspin_get(
+            flit,
+            dspin_param::CLEANUP_SRCID);
+
+      uint8_t type =
+        dspin_param::dspin_get(
+            flit,
+            dspin_param::FROM_L1_TYPE);
+
+      r_cleanup_way_index =
+        dspin_param::dspin_get(
+            flit,
+            dspin_param::CLEANUP_WAY_INDEX);
+
+      r_cleanup_nline =
+        dspin_param::dspin_get(
+            flit,
+            dspin_param::CLEANUP_NLINE_MSB) 
+        << 32;
+
+      r_cleanup_inst  = (type == dspin_param::TYPE_CLEANUP_INST);
+      r_cleanup_srcid = srcid;
+
+      if(srcid >= m_initiators)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_IDLE state"  << std::endl
+            << "illegal srcid for cleanup request" << std::endl;
+
+        exit(0);
+      }
+
+      m_cpt_cleanup++;
+      cc_receive_to_cleanup_fifo_get = true;
+      r_cleanup_fsm                 = CLEANUP_GET_NLINE;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC "         << name()
+            << ".CLEANUP_IDLE> Cleanup request:" << std::hex
+            << " / owner_id = "   << srcid
+            << " / owner_ins = "  << (type == dspin_param::TYPE_CLEANUP_INST)
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_GET_NLINE:
+    {
+      // Get second flit of cleanup command
+      if(not m_cc_receive_to_cleanup_fifo.rok()) break;
+
+      uint64_t flit = m_cc_receive_to_cleanup_fifo.read();
+
+      addr_t nline =
+        r_cleanup_nline.read() |
+        dspin_param::dspin_get(flit, dspin_param::CLEANUP_NLINE_LSB);
+
+      bool eop =
+        dspin_param::dspin_get(flit, dspin_param::FROM_L1_EOP) == 0x1;
+
+      assert(
+          eop &&
+          "VCI_MEM_CACHE ERROR: "
+          "CLEANUP command must have exactly two flits");
+
+      cc_receive_to_cleanup_fifo_get = true;
+      r_cleanup_nline               = nline;
+      r_cleanup_fsm                 = CLEANUP_DIR_REQ;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC "         << name()
+            << ".CLEANUP_GET_NLINE> Cleanup request:"
+            << std::hex
+            << " / address = "    << nline * m_words * 4
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_DIR_REQ:
+    {
+      // Get the lock to the directory
+      if(r_alloc_dir_fsm.read() != ALLOC_DIR_CLEANUP) break;
+
+      r_cleanup_fsm = CLEANUP_DIR_LOCK;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name() << ".CLEANUP_DIR_REQ> Requesting DIR lock "
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_DIR_LOCK:
+    {
+      // test directory status
+      if(r_alloc_dir_fsm.read() != ALLOC_DIR_CLEANUP)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_DIR_LOCK state"
+            << " bad DIR allocation" << std::endl;
+
+        exit(0);
+      }
+
+      // Read the directory
+      size_t way = 0;
+      addr_t cleanup_address = r_cleanup_nline.read() * m_words * 4;
+
+      DirectoryEntry entry   = m_cache_directory.read(cleanup_address , way);
+      r_cleanup_is_cnt       = entry.is_cnt;
+      r_cleanup_dirty        = entry.dirty;
+      r_cleanup_tag          = entry.tag;
+      r_cleanup_lock         = entry.lock;
+      r_cleanup_way          = way;
+      r_cleanup_count        = entry.count;
+      r_cleanup_ptr          = entry.ptr;
+      r_cleanup_copy         = entry.owner.srcid;
+      r_cleanup_copy_inst    = entry.owner.inst;
+#if L1_MULTI_CACHE
+      r_cleanup_copy_cache   = entry.owner.cache_id;
+#endif
+
+      // hit :
+      // the copy must be cleared
+      if(entry.valid)
+      {
+        assert(
+            (entry.count > 0) &&
+            "VCI MEM CACHE ERROR: "
+            "In CLEANUP_DIR_LOCK, CLEANUP command on a valid entry "
+            "with no copies");
+
+        // no access to the heap
+        if((entry.count == 1) || (entry.is_cnt))
+        {
+          r_cleanup_fsm = CLEANUP_DIR_WRITE;
+        }
+        // access to the heap
+        else
+        {
+          r_cleanup_fsm = CLEANUP_HEAP_REQ;
+        }
+      }
+      // miss :
+      // we must check the update table for a pending
+      // invalidation transaction
+      else
+      {
+        r_cleanup_fsm = CLEANUP_UPT_LOCK;
+      }
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_DIR_LOCK> Test directory status: "
+            << std::hex
+            << " line = "         << cleanup_address
+            << " / hit = "        << entry.valid
+            << " / dir_id = "     << entry.owner.srcid
+            << " / dir_ins = "    << entry.owner.inst
+            << " / search_id = "  << r_cleanup_srcid.read()
+            << " / search_ins = " << r_cleanup_inst.read()
+            << " / count = "      << entry.count
+            << " / is_cnt = "     << entry.is_cnt
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_DIR_WRITE:
+    {
+      // Update the directory entry without heap access
+      if(r_alloc_dir_fsm.read() != ALLOC_DIR_CLEANUP)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_DIR_WRITE state"
+            << " bad DIR allocation" << std::endl;
+
+        exit(0);
+      }
+
+      size_t way         = r_cleanup_way.read();
+      size_t set         = m_y[(vci_addr_t)(r_cleanup_nline.read()*m_words*4)];
+      bool   match_srcid = (r_cleanup_copy.read() == r_cleanup_srcid.read());
+
+#if L1_MULTI_CACHE
+      match_srcid       &= (r_cleanup_copy_cache.read() == r_cleanup_pktid.read());
+#endif
+
+      bool   match_inst  = (r_cleanup_copy_inst.read() == r_cleanup_inst.read());
+      bool   match       = match_srcid && match_inst;
+
+      if(not r_cleanup_is_cnt.read() and not match)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR : Cleanup request on a valid"
+            << "entry using linked list mode with no corresponding"
+            << "directory or heap entry"
+            << std::endl;
+
+        exit(1);
+      }
+
+      // update the cache directory (for the copies)
+      DirectoryEntry entry;
+      entry.valid       = true;
+      entry.is_cnt      = r_cleanup_is_cnt.read();
+      entry.dirty       = r_cleanup_dirty.read();
+      entry.tag         = r_cleanup_tag.read();
+      entry.lock        = r_cleanup_lock.read();
+      entry.ptr         = r_cleanup_ptr.read();
+      entry.count       = r_cleanup_count.read() - 1;
+      entry.owner.srcid = 0;
+      entry.owner.inst  = 0;
+
+#if L1_MULTI_CACHE
+      entry.owner.cache_id = 0;
+#endif
+
+      m_cache_directory.write(set, way, entry);
+
+      r_cleanup_fsm = CLEANUP_SEND_ACK;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_DIR_WRITE> Update directory:"
+            << std::hex
+            << " address = "   << r_cleanup_nline.read() * m_words * 4
+            << " / dir_id = "  << entry.owner.srcid
+            << " / dir_ins = " << entry.owner.inst
+            << " / count = "   << entry.count
+            << " / is_cnt = "  << entry.is_cnt
+            << std::endl;
+      }
+#endif
+
+      break;
+    }
+
+    case CLEANUP_HEAP_REQ:
+    {
+      // get the lock to the HEAP directory
+      if(r_alloc_heap_fsm.read() != ALLOC_HEAP_CLEANUP) break;
+
+      r_cleanup_fsm = CLEANUP_HEAP_LOCK;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_HEAP_REQ> HEAP lock acquired "
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_HEAP_LOCK:
+    {
+      // two cases are handled in this state :
+      // 1. the matching copy is directly in the directory
+      // 2. the matching copy is the first copy in the heap
+      if(r_alloc_heap_fsm.read() != ALLOC_HEAP_CLEANUP)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_HEAP_LOCK state"
+            << " bad HEAP allocation" << std::endl;
+
+        exit(0);
+      }
+
+      size_t way            = r_cleanup_way.read();
+      size_t set            = m_y[(vci_addr_t)(r_cleanup_nline.read() *m_words*4)];
+
+      HeapEntry heap_entry  = m_heap.read(r_cleanup_ptr.read());
+      bool last             = (heap_entry.next == r_cleanup_ptr.read());
+
+      // match_dir computation
+      bool match_dir_srcid  = (r_cleanup_copy.read()      == r_cleanup_srcid.read());
+      bool match_dir_inst   = (r_cleanup_copy_inst.read() == r_cleanup_inst.read());
+      bool match_dir        = match_dir_srcid  and match_dir_inst;
+
+      // match_heap computation
+      bool match_heap_srcid = (heap_entry.owner.srcid == r_cleanup_srcid.read());
+      bool match_heap_inst  = (heap_entry.owner.inst  == r_cleanup_inst.read());
+      bool match_heap       = match_heap_srcid and match_heap_inst;
+
+      r_cleanup_prev_ptr    = r_cleanup_ptr.read();
+      r_cleanup_prev_srcid  = heap_entry.owner.srcid;
+      r_cleanup_prev_inst   = heap_entry.owner.inst;
+
+#if L1_MULTI_CACHE
+      match_dir  = match_dir  and(r_cleanup_copy_cache.read() == r_cleanup_pktid.read());
+      match_heap = match_heap and(heap_entry.owner.cache_id   == r_cleanup_pktid.read());
+      r_cleanup_prev_cache_id = heap_entry.owner.cache_id;
+#endif
+
+      if(not match_dir and not match_heap and last)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_HEAP_LOCK state"
+            << " hit but copy not found"
+            << std::endl;
+
+        exit(0);
+      }
+
+      if(match_dir and match_heap)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_HEAP_LOCK state"
+            << " two copies matching the cleanup owner id"
+            << std::endl;
+
+        exit(0);
+      }
+
+      DirectoryEntry dir_entry;
+      dir_entry.valid          = true;
+      dir_entry.is_cnt         = r_cleanup_is_cnt.read();
+      dir_entry.dirty          = r_cleanup_dirty.read();
+      dir_entry.tag            = r_cleanup_tag.read();
+      dir_entry.lock           = r_cleanup_lock.read();
+      dir_entry.count          = r_cleanup_count.read()-1;
+
+      // the matching copy is registered in the directory and
+      // it must be replaced by the first copy registered in
+      // the heap. The corresponding entry must be freed
+      if(match_dir)
+      {
+        dir_entry.ptr            = heap_entry.next;
+        dir_entry.owner.srcid    = heap_entry.owner.srcid;
+        dir_entry.owner.inst     = heap_entry.owner.inst;
+
+#if L1_MULTI_CACHE
+        dir_entry.owner.cache_id = heap_entry.owner.cache_id;
+#endif
+
+        r_cleanup_next_ptr       = r_cleanup_ptr.read();
+        r_cleanup_fsm            = CLEANUP_HEAP_FREE;
+      }
+
+      // the matching copy is the first copy in the heap
+      // It must be freed and the copy registered in directory
+      // must point to the next copy in heap
+      if(match_heap)
+      {
+        dir_entry.ptr            = heap_entry.next;
+        dir_entry.owner.srcid    = r_cleanup_copy.read();
+        dir_entry.owner.inst     = r_cleanup_copy_inst.read();
+
+#if L1_MULTI_CACHE
+        dir_entry.owner.cache_id = r_cleanup_copy_cache.read();
+#endif
+
+        r_cleanup_next_ptr       = r_cleanup_ptr.read();
+        r_cleanup_fsm            = CLEANUP_HEAP_FREE;
+      }
+      // The matching copy is in the heap, but is not the first copy
+      // The directory entry must be modified to decrement count
+      else
+      {
+        dir_entry.ptr            = r_cleanup_ptr.read();
+        dir_entry.owner.srcid    = r_cleanup_copy.read();
+        dir_entry.owner.inst     = r_cleanup_copy_inst.read();
+
+#if L1_MULTI_CACHE
+        dir_entry.owner.cache_id = r_cleanup_copy_cache.read();
+#endif
+
+        r_cleanup_next_ptr       = heap_entry.next;
+        r_cleanup_fsm            = CLEANUP_HEAP_SEARCH;
+      }
+
+      m_cache_directory.write(set,way,dir_entry);
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_HEAP_LOCK> Checks matching:"
+            << " address = "      << r_cleanup_nline.read() * m_words * 4
+            << " / dir_id = "     << r_cleanup_copy.read()
+            << " / dir_ins = "    << r_cleanup_copy_inst.read()
+            << " / heap_id = "    << heap_entry.owner.srcid
+            << " / heap_ins = "   << heap_entry.owner.inst
+            << " / search_id = "  << r_cleanup_srcid.read()
+            << " / search_ins = " << r_cleanup_inst.read()
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_HEAP_SEARCH:
+    {
+      // This state is handling the case where the copy
+      // is in the heap, but is not the first in the linked list
+      if(r_alloc_heap_fsm.read() != ALLOC_HEAP_CLEANUP)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_HEAP_SEARCH state"
+            << " bad HEAP allocation" << std::endl;
+
+        exit(0);
+      }
+
+      HeapEntry heap_entry  = m_heap.read(r_cleanup_next_ptr.read());
+
+      bool last             = (heap_entry.next        == r_cleanup_next_ptr.read());
+      bool match_heap_srcid = (heap_entry.owner.srcid == r_cleanup_srcid.read());
+      bool match_heap_inst  = (heap_entry.owner.inst  == r_cleanup_inst.read());
+      bool match_heap       = match_heap_srcid && match_heap_inst;
+
+#if L1_MULTI_CACHE
+      match_heap = match_heap and(heap_entry.owner.cache_id == r_cleanup_pktid.read());
+#endif
+
+      if(not match_heap and last)
+      {
+        std::cout
+            << "VCI_MEM_CACHE_ERROR " << name()
+            << " CLEANUP_HEAP_SEARCH state"
+            << " cleanup on valid line but copy not found"
+            << std::endl;
+
+        exit(0);
+      }
+
+      // the matching copy must be removed
+      if(match_heap)
+      {
+        // re-use ressources
+        r_cleanup_ptr = heap_entry.next;
+        r_cleanup_fsm = CLEANUP_HEAP_CLEAN;
+      }
+      // test the next in the linked list
+      else
+      {
+        r_cleanup_prev_ptr      = r_cleanup_next_ptr.read();
+        r_cleanup_prev_srcid    = heap_entry.owner.srcid;
+        r_cleanup_prev_inst     = heap_entry.owner.inst;
+        r_cleanup_next_ptr      = heap_entry.next;
+
+        r_cleanup_fsm           = CLEANUP_HEAP_SEARCH;
+
+#if L1_MULTI_CACHE
+        r_cleanup_prev_cache_id = heap_entry.owner.cache_id;
+#endif
+      }
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        if(not match_heap)
+        {
+          std::cout
+              << "  <MEMC " << name()
+              << ".CLEANUP_HEAP_SEARCH> Matching copy not found, search next:"
+              << std::endl;
+        }
+        else
+        {
+          std::cout
+              << "  <MEMC " << name()
+              << ".CLEANUP_HEAP_SEARCH> Matching copy found:"
+              << std::endl;
+        }
+
+        std::cout
+            << " address = "      << r_cleanup_nline.read() * m_words * 4
+            << " / heap_id = "    << heap_entry.owner.srcid
+            << " / heap_ins = "   << heap_entry.owner.inst
+            << " / search_id = "  << r_cleanup_srcid.read()
+            << " / search_ins = " << r_cleanup_inst.read()
+            << " / last = "       << last
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_HEAP_CLEAN:
+    {
+      // remove a copy in the linked list
+      if(r_alloc_heap_fsm.read() != ALLOC_HEAP_CLEANUP)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_HEAP_CLEAN state"
+            << "Bad HEAP allocation"  << std::endl;
+
+        exit(0);
+      }
+
+      HeapEntry heap_entry;
+      heap_entry.owner.srcid    = r_cleanup_prev_srcid.read();
+      heap_entry.owner.inst     = r_cleanup_prev_inst.read();
+
+#if L1_MULTI_CACHE
+      heap_entry.owner.cache_id = r_cleanup_prev_cache_id.read();
+#endif
+
+      bool last = (r_cleanup_next_ptr.read() == r_cleanup_ptr.read());
+
+      // this is the last entry of the list of copies
+      if(last)
+      {
+        heap_entry.next = r_cleanup_prev_ptr.read();
+      }
+      // this is not the last entry
+      else
+      {
+        heap_entry.next = r_cleanup_ptr.read();
+      }
+
+      m_heap.write(r_cleanup_prev_ptr.read(), heap_entry);
+
+      r_cleanup_fsm = CLEANUP_HEAP_FREE;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_HEAP_SEARCH> Remove the copy in the linked list"
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_HEAP_FREE:
+    {
+      // The heap entry pointed by r_cleanup_next_ptr is freed
+      // and becomes the head of the list of free entries
+      if(r_alloc_heap_fsm.read() != ALLOC_HEAP_CLEANUP)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CLEANUP_HEAP_CLEAN state" << std::endl
+            << "Bad HEAP allocation" << std::endl;
+
+        exit(0);
+      }
+
+      HeapEntry heap_entry;
+      heap_entry.owner.srcid    = 0;
+      heap_entry.owner.inst     = false;
+
+#if L1_MULTI_CACHE
+      heap_entry.owner.cache_id = 0;
+#endif
+
+      if(m_heap.is_full())
+      {
+        heap_entry.next = r_cleanup_next_ptr.read();
+      }
+      else
+      {
+        heap_entry.next = m_heap.next_free_ptr();
+      }
+
+      m_heap.write(r_cleanup_next_ptr.read(),heap_entry);
+      m_heap.write_free_ptr(r_cleanup_next_ptr.read());
+      m_heap.unset_full();
+
+      r_cleanup_fsm = CLEANUP_SEND_ACK;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_HEAP_SEARCH> Update the list of free entries"
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_UPT_LOCK:
+    {
+      // search pending invalidate transaction matching the Cleanup NLINE in the UPDATE TABLE
+      // get the lock in the UPDATE_TABLE
+      if(r_alloc_upt_fsm.read() != ALLOC_UPT_CLEANUP) break;
+
+      size_t index = 0;
+      bool   match_inval;
+
+      match_inval = m_update_tab.search_inval(r_cleanup_nline.read(), index);
+
+      // no pending inval
+      if(not match_inval)
+      {
+        r_cleanup_fsm = CLEANUP_SEND_ACK;
+
+#if DEBUG_MEMC_CLEANUP
+        if(m_debug_cleanup_fsm)
+        {
+          std::cout
+              << "  <MEMC " << name()
+              << ".CLEANUP_UPT_LOCK> Unexpected cleanup"
+              << " with no corresponding UPT entry:"
+              << " address = " << std::hex
+              << (r_cleanup_nline.read() *4*m_words)
+              << std::endl;
+        }
+#endif
+        break;
+      }
+
+      // pending inval
+      r_cleanup_write_srcid    = m_update_tab.srcid(index);
+      r_cleanup_write_trdid    = m_update_tab.trdid(index);
+      r_cleanup_write_pktid    = m_update_tab.pktid(index);
+      r_cleanup_write_need_rsp = m_update_tab.need_rsp(index);
+      r_cleanup_index          = index;
+
+      r_cleanup_fsm         = CLEANUP_UPT_DECREMENT;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_UPT_LOCK> Cleanup matching pending"
+            << " invalidate transaction on UPT:"
+            << std::hex
+            << " address = "   << r_cleanup_nline.read() * m_words * 4
+            << " upt_entry = " << index
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_UPT_DECREMENT:
+    {
+      // decrement response counter in UPT matching entry
+      if(r_alloc_upt_fsm.read() != ALLOC_UPT_CLEANUP)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR "         << name()
+            << " CLEANUP_UPT_DECREMENT state" << std::endl
+            << "Bad UPT allocation"
+            << std::endl;
+
+        exit(0);
+      }
+
+      size_t count = 0;
+      m_update_tab.decrement(r_cleanup_index.read(), count);
+
+      // invalidation transaction finished
+      // (all acknowledgements received)
+      if(count == 0)
+      {
+        r_cleanup_fsm = CLEANUP_UPT_CLEAR;
+      }
+      // invalidation transaction not finished
+      else
+      {
+        r_cleanup_fsm = CLEANUP_SEND_ACK ;
+      }
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC "      << name()
+            << ".CLEANUP_UPT_DECREMENT> Decrement response counter in UPT:"
+            << " UPT_index = " << r_cleanup_index.read()
+            << " rsp_count = " << count
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_UPT_CLEAR:
+    {
+      // Clear UPT entry of finished invalidation transaction
+      if(r_alloc_upt_fsm.read() != ALLOC_UPT_CLEANUP)
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR "     << name()
+            << " CLEANUP_UPT_CLEAR state" << std::endl
+            << "Bad UPT allocation"
+            << std::endl;
+
+        exit(0);
+      }
+
+      m_update_tab.clear(r_cleanup_index.read());
+
+      if(r_cleanup_write_need_rsp.read())
+      {
+        r_cleanup_fsm = CLEANUP_WRITE_RSP;
+      }
+      else
+      {
+        r_cleanup_fsm = CLEANUP_SEND_ACK;
+      }
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC "      << name()
+            << ".CLEANUP_UPT_CLEAR> Clear entry in UPT:"
+            << " UPT_index = " << r_cleanup_index.read()
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_WRITE_RSP:
+    {
+      // response to a previous write on the direct network
+      // wait if pending request to the TGT_RSP FSM
+      if(r_cleanup_to_tgt_rsp_req.read()) break;
+
+      // no pending request
+      r_cleanup_to_tgt_rsp_req     = true;
+      r_cleanup_to_tgt_rsp_srcid   = r_cleanup_write_srcid.read();
+      r_cleanup_to_tgt_rsp_trdid   = r_cleanup_write_trdid.read();
+      r_cleanup_to_tgt_rsp_pktid   = r_cleanup_write_pktid.read();
+
+      r_cleanup_fsm                = CLEANUP_SEND_ACK;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_WRITE_RSP> Send a response to a previous"
+            << " write request waiting for coherence transaction completion: "
+            << " rsrcid = "   << std::dec << r_cleanup_write_srcid.read()
+            << " / rtrdid = " << std::dec << r_cleanup_write_trdid.read()
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    case CLEANUP_SEND_ACK:
+    {
+      // acknowledgement to a cleanup command
+      // on the coherence network (request to the CC_SEND FSM).
+      // wait if pending request to the CC_SEND FSM
+      if(r_cleanup_to_cc_send_req.read()) break;
+
+      r_cleanup_to_cc_send_req       = true;
+      r_cleanup_to_cc_send_set_index = r_cleanup_nline.read() & 0xFFFF;
+      r_cleanup_to_cc_send_way_index = r_cleanup_way_index.read();
+      r_cleanup_to_cc_send_srcid     = r_cleanup_srcid.read();
+
+      r_cleanup_fsm = CLEANUP_IDLE;
+
+#if DEBUG_MEMC_CLEANUP
+      if(m_debug_cleanup_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name()
+            << ".CLEANUP_SEND_ACK> Send the response to a cleanup request:"
+            << " srcid = " << std::dec << r_cleanup_srcid.read()
+            << std::endl;
+      }
+#endif
+      break;
+    }
+  } // end switch cleanup fsm
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    CAS FSM
+  ////////////////////////////////////////////////////////////////////////////////////
+  // The CAS FSM handles the CAS (Store Conditionnal) atomic commands,
+  // that are handled as "compare-and-swap instructions.
+  //
+  // This command contains two or four flits:
+  // - In case of 32 bits atomic access, the first flit contains the value read
+  // by a previous LL instruction, the second flit contains the value to be writen.
+  // - In case of 64 bits atomic access, the 2 first flits contains the value read
+  // by a previous LL instruction, the 2 next flits contains the value to be writen.
+  //
+  // The target address is cachable. If it is replicated in other L1 caches
+  // than the writer, a coherence operation is done.
+  //
+  // It access the directory to check hit / miss.
+  // - In case of miss, the CAS FSM must register a GET transaction in TRT.
+  // If a read transaction to the XRAM for this line already exists,
+  // or if the transaction table is full, it goes to the WAIT state
+  // to release the locks and try again. When the GET transaction has been
+  // launched, it goes to the WAIT state and try again.
+  // The CAS request is not consumed in the FIFO until a HIT is obtained.
+  // - In case of hit...
+  ///////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_cas_fsm.read())
+  {
+      /////////////
+    case CAS_IDLE:     // fill the local rdata buffers
+    {
+      if(m_cmd_cas_addr_fifo.rok())
+      {
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_IDLE> CAS command: " << std::hex
+                    << " srcid = " <<  std::dec << m_cmd_cas_srcid_fifo.read()
+                    << " addr = " << std::hex << m_cmd_cas_addr_fifo.read()
+                    << " wdata = " << m_cmd_cas_wdata_fifo.read()
+                    << " eop = " << std::dec << m_cmd_cas_eop_fifo.read()
+                    << " cpt  = " << std::dec << r_cas_cpt.read() << std::endl;
+        }
+#endif
+        if(m_cmd_cas_eop_fifo.read())
+        {
+          m_cpt_cas++;
+          r_cas_fsm = CAS_DIR_REQ;
+        }
+        else  // we keep the last word in the FIFO
+        {
+          cmd_cas_fifo_get = true;
+        }
+        // We fill the two buffers
+        if(r_cas_cpt.read() < 2)    // 32 bits access
+          r_cas_rdata[r_cas_cpt.read()] = m_cmd_cas_wdata_fifo.read();
+
+        if((r_cas_cpt.read() == 1) && m_cmd_cas_eop_fifo.read())
+          r_cas_wdata = m_cmd_cas_wdata_fifo.read();
+
+        if(r_cas_cpt.read() >3)  // more than 4 flits...
+        {
+          std::cout << "VCI_MEM_CACHE ERROR in CAS_IDLE state : illegal CAS command"
+                    << std::endl;
+          exit(0);
+        }
+
+        if(r_cas_cpt.read() ==2)
+          r_cas_wdata = m_cmd_cas_wdata_fifo.read();
+
+        r_cas_cpt = r_cas_cpt.read() +1;
+      }
+      break;
+    }
+
+    /////////////////
+    case CAS_DIR_REQ:
+    {
+      if(r_alloc_dir_fsm.read() == ALLOC_DIR_CAS)
+      {
+        r_cas_fsm = CAS_DIR_LOCK;
+      }
+
+#if DEBUG_MEMC_CAS
+      if(m_debug_cas_fsm)
+      {
+        std::cout
+            << "  <MEMC " << name() << ".CAS_DIR_REQ> Requesting DIR lock "
+            << std::endl;
+      }
+#endif
+      break;
+    }
+
+    /////////////////
+    case CAS_DIR_LOCK:  // Read the directory
+    {
+      if(r_alloc_dir_fsm.read() == ALLOC_DIR_CAS)
+      {
+        size_t way = 0;
+        DirectoryEntry entry(m_cache_directory.read(m_cmd_cas_addr_fifo.read(), way));
+
+        r_cas_is_cnt     = entry.is_cnt;
+        r_cas_dirty      = entry.dirty;
+        r_cas_tag        = entry.tag;
+        r_cas_way        = way;
+        r_cas_copy       = entry.owner.srcid;
+#if L1_MULTI_CACHE
+        r_cas_copy_cache = entry.owner.cache_id;
+#endif
+        r_cas_copy_inst  = entry.owner.inst;
+        r_cas_ptr        = entry.ptr;
+        r_cas_count      = entry.count;
+
+        if(entry.valid)  r_cas_fsm = CAS_DIR_HIT_READ;
+        else          r_cas_fsm = CAS_MISS_TRT_LOCK;
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_DIR_LOCK> Directory acces"
+                    << " / address = " << std::hex << m_cmd_cas_addr_fifo.read()
+                    << " / hit = " << std::dec << entry.valid
+                    << " / count = " << entry.count
+                    << " / is_cnt = " << entry.is_cnt << std::endl;
+        }
+#endif
+      }
+      else
+      {
+        std::cout
+            << "VCI_MEM_CACHE ERROR " << name()
+            << " CAS_DIR_LOCK state" << std::endl
+            << "Bad DIR allocation"   << std::endl;
+
+        exit(0);
+      }
+
+      break;
+    }
+    /////////////////////
+    case CAS_DIR_HIT_READ:  // update directory for lock and dirty bit
+      // and check data change in cache
+    {
+      size_t way  = r_cas_way.read();
+      size_t set  = m_y[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+      size_t word = m_x[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+
+      // update directory (lock & dirty bits)
+      DirectoryEntry entry;
+      entry.valid          = true;
+      entry.is_cnt         = r_cas_is_cnt.read();
+      entry.dirty          = true;
+      entry.lock           = true;
+      entry.tag          = r_cas_tag.read();
+      entry.owner.srcid    = r_cas_copy.read();
+#if L1_MULTI_CACHE
+      entry.owner.cache_id = r_cas_copy_cache.read();
+#endif
+      entry.owner.inst     = r_cas_copy_inst.read();
+      entry.count          = r_cas_count.read();
+      entry.ptr            = r_cas_ptr.read();
+
+      m_cache_directory.write(set, way, entry);
+
+      // read data in cache & check data change
+      bool ok = (r_cas_rdata[0].read() == m_cache_data.read(way, set, word));
+      if(r_cas_cpt.read() ==4)    // 64 bits CAS
+        ok &= (r_cas_rdata[1] == m_cache_data.read(way, set, word+1));
+
+      // to avoid livelock, force the atomic access to fail pseudo-randomly
+      bool forced_fail = ((r_cas_lfsr % (64) == 0) && RANDOMIZE_CAS);
+      r_cas_lfsr = (r_cas_lfsr >> 1) ^((- (r_cas_lfsr & 1)) & 0xd0000001);
+
+      if(ok and not forced_fail)    // no data change
+      {
+        r_cas_fsm = CAS_DIR_HIT_WRITE;
+      }
+      else                            // return failure
+      {
+        r_cas_fsm = CAS_RSP_FAIL;
+      }
+
+#if DEBUG_MEMC_CAS
+      if(m_debug_cas_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".CAS_DIR_HIT_READ> Test if CAS success:"
+                  << " / expected value = " << r_cas_rdata[0].read()
+                  << " / actual value = " << m_cache_data.read(way, set, word)
+                  << " / forced_fail = " << forced_fail << std::endl;
+      }
+#endif
+      break;
+    }
+    //////////////////////
+    case CAS_DIR_HIT_WRITE:    // test if a CC transaction is required
+      // write data in cache if no CC request
+    {
+      // The CAS is a success => sw access to the llsc_global_table
+      m_llsc_table.sw(m_cmd_cas_addr_fifo.read());
+
+      // test coherence request
+      if(r_cas_count.read())   // replicated line
+      {
+        if(r_cas_is_cnt.read())
+        {
+          r_cas_fsm = CAS_BC_TRT_LOCK;    // broadcast invalidate required
+        }
+        else if(!r_cas_to_cc_send_multi_req.read() &&
+                !r_cas_to_cc_send_brdcast_req.read())
+        {
+          r_cas_fsm = CAS_UPT_LOCK;     // multi update required
+        }
+        else
+        {
+          r_cas_fsm = CAS_WAIT;
+        }
+      }
+      else                    // no copies
+      {
+        size_t way  = r_cas_way.read();
+        size_t set  = m_y[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+        size_t word = m_x[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+
+        // cache update
+        m_cache_data.write(way, set, word, r_cas_wdata.read());
+        if(r_cas_cpt.read() ==4)
+          m_cache_data.write(way, set, word+1, m_cmd_cas_wdata_fifo.read());
+
+        // monitor
+        if(m_monitor_ok)
+        {
+          vci_addr_t address = m_cmd_cas_addr_fifo.read();
+          char buf[80];
+          snprintf(buf, 80, "CAS_DIR_HIT_WRITE srcid %d", m_cmd_cas_srcid_fifo.read());
+          check_monitor(buf, address, r_cas_wdata.read());
+          if(r_cas_cpt.read() ==4)
+            check_monitor(buf, address+4, m_cmd_cas_wdata_fifo.read());
+        }
+        r_cas_fsm = CAS_RSP_SUCCESS;
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_DIR_HIT_WRITE> Update cache:"
+                    << " way = " << std::dec << way
+                    << " / set = " << set
+                    << " / word = " << word
+                    << " / value = " << r_cas_wdata.read()
+                    << " / count = " << r_cas_count.read() << std::endl;
+          std::cout << "  <MEMC "
+                    << name() << ".CAS_DIR_HIT_WRITE> global_llsc_table SW access" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    /////////////////
+    case CAS_UPT_LOCK:  // try to register the transaction in UPT
+      // and write data in cache if successful registration
+      // releases locks to retry later if UPT full
+    {
+      if(r_alloc_upt_fsm.read() == ALLOC_UPT_CAS)
+      {
+        bool        wok        = false;
+        size_t      index      = 0;
+        size_t      srcid      = m_cmd_cas_srcid_fifo.read();
+        size_t      trdid      = m_cmd_cas_trdid_fifo.read();
+        size_t      pktid      = m_cmd_cas_pktid_fifo.read();
+        addr_t      nline      = m_nline[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+        size_t      nb_copies  = r_cas_count.read();
+
+        wok = m_update_tab.set(true,  // it's an update transaction
+                               false,   // it's not a broadcast
+                               true,    // it needs a response
+                               srcid,
+                               trdid,
+                               pktid,
+                               nline,
+                               nb_copies,
+                               index);
+        if(wok)   // coherence transaction registered in UPT
+        {
+          // cache update
+          size_t way  = r_cas_way.read();
+          size_t set  = m_y[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+          size_t word = m_x[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+
+          m_cache_data.write(way, set, word, r_cas_wdata.read());
+          if(r_cas_cpt.read() ==4)
+            m_cache_data.write(way, set, word+1, m_cmd_cas_wdata_fifo.read());
+
+          // monitor
+          if(m_monitor_ok)
+          {
+            vci_addr_t address = m_cmd_cas_addr_fifo.read();
+            char buf[80];
+            snprintf(buf, 80, "CAS_DIR_HIT_WRITE srcid %d", m_cmd_cas_srcid_fifo.read());
+            check_monitor(buf, address, r_cas_wdata.read());
+            if(r_cas_cpt.read() ==4)
+              check_monitor(buf, address+4, m_cmd_cas_wdata_fifo.read());
+          }
+
+          r_cas_upt_index = index;
+          r_cas_fsm = CAS_UPT_HEAP_LOCK;
+        }
+        else       //  releases the locks protecting UPT and DIR UPT full
+        {
+          r_cas_fsm = CAS_WAIT;
+        }
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name()
+                    << ".CAS_UPT_LOCK> Register multi-update transaction in UPT"
+                    << " / wok = " << wok
+                    << " / nline  = " << std::hex << nline
+                    << " / count = " << nb_copies << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    /////////////
+    case CAS_WAIT:   // release all locks and retry from beginning
+    {
+
+#if DEBUG_MEMC_CAS
+      if(m_debug_cas_fsm)
+      {
+        std::cout << "  <MEMC " << name()
+                  << ".CAS_WAIT> Release all locks" << std::endl;
+      }
+#endif
+      r_cas_fsm = CAS_DIR_REQ;
+      break;
+    }
+    //////////////////
+    case CAS_UPT_HEAP_LOCK:  // lock the heap
+    {
+      if(r_alloc_heap_fsm.read() == ALLOC_HEAP_CAS)
+      {
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name()
+                    << ".CAS_UPT_HEAP_LOCK> Get access to the heap" << std::endl;
+        }
+#endif
+        r_cas_fsm = CAS_UPT_REQ;
+      }
+      break;
+    }
+    ////////////////
+    case CAS_UPT_REQ:  // send a first update request to CC_SEND FSM
+    {
+      assert((r_alloc_heap_fsm.read() == ALLOC_HEAP_CAS) and
+             "VCI_MEM_CACHE ERROR : bad HEAP allocation");
+
+      if(!r_cas_to_cc_send_multi_req.read() && !r_cas_to_cc_send_brdcast_req.read())
+      {
+        r_cas_to_cc_send_brdcast_req  = false;
+        r_cas_to_cc_send_trdid        = r_cas_upt_index.read();
+        r_cas_to_cc_send_nline        = m_nline[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+        r_cas_to_cc_send_index        = m_x[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+        r_cas_to_cc_send_wdata        = r_cas_wdata.read();
+
+        if(r_cas_cpt.read() == 4)
+        {
+          r_cas_to_cc_send_is_long    = true;
+          r_cas_to_cc_send_wdata_high = m_cmd_cas_wdata_fifo.read();
+        }
+        else
+        {
+          r_cas_to_cc_send_is_long    = false;
+          r_cas_to_cc_send_wdata_high = 0;
+        }
+
+        // We put the first copy in the fifo
+        cas_to_cc_send_fifo_put     = true;
+        cas_to_cc_send_fifo_inst    = r_cas_copy_inst.read();
+        cas_to_cc_send_fifo_srcid   = r_cas_copy.read();
+#if L1_MULTI_CACHE
+        cas_to_cc_send_fifo_cache_id= r_cas_copy_cache.read();
+#endif
+        if(r_cas_count.read() == 1)  // one single copy
+        {
+          r_cas_fsm = CAS_IDLE;   // Response will be sent after receiving
+          // update responses
+          cmd_cas_fifo_get            = true;
+          r_cas_to_cc_send_multi_req = true;
+          r_cas_cpt = 0;
+        }
+        else      // several copies
+        {
+          r_cas_fsm = CAS_UPT_NEXT;
+        }
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_UPT_REQ> Send the first update request to CC_SEND FSM "
+                    << " / address = " << std::hex << m_cmd_cas_addr_fifo.read()
+                    << " / wdata = " << std::hex << r_cas_wdata.read()
+                    << " / srcid = " << std::dec << r_cas_copy.read()
+                    << " / inst = " << std::dec << r_cas_copy_inst.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    /////////////////
+    case CAS_UPT_NEXT:     // send a multi-update request to CC_SEND FSM
+    {
+      assert((r_alloc_heap_fsm.read() == ALLOC_HEAP_CAS)
+             and "VCI_MEM_CACHE ERROR : bad HEAP allocation");
+
+      HeapEntry entry = m_heap.read(r_cas_ptr.read());
+      cas_to_cc_send_fifo_srcid    = entry.owner.srcid;
+#if L1_MULTI_CACHE
+      cas_to_cc_send_fifo_cache_id = entry.owner.cache_id;
+#endif
+      cas_to_cc_send_fifo_inst     = entry.owner.inst;
+      cas_to_cc_send_fifo_put = true;
+
+      if(m_cas_to_cc_send_inst_fifo.wok())   // request accepted by CC_SEND FSM
+      {
+        r_cas_ptr = entry.next;
+        if(entry.next == r_cas_ptr.read())    // last copy
+        {
+          r_cas_to_cc_send_multi_req = true;
+          r_cas_fsm = CAS_IDLE;   // Response will be sent after receiving
+          // all update responses
+          cmd_cas_fifo_get = true;
+          r_cas_cpt        = 0;
+        }
+      }
+
+#if DEBUG_MEMC_CAS
+      if(m_debug_cas_fsm)
+      {
+        std::cout << "  <MEMC " << name() << ".CAS_UPT_NEXT> Send the next update request to CC_SEND FSM "
+                  << " / address = " << std::hex << m_cmd_cas_addr_fifo.read()
+                  << " / wdata = " << std::hex << r_cas_wdata.read()
+                  << " / srcid = " << std::dec << entry.owner.srcid
+                  << " / inst = " << std::dec << entry.owner.inst << std::endl;
+      }
+#endif
+      break;
+    }
+    /////////////////////
+    case CAS_BC_TRT_LOCK:      // check the TRT to register a PUT transaction
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_CAS)
+      {
+        if(!r_cas_to_ixr_cmd_req)    // we can transfer the request to IXR_CMD FSM
+        {
+          // fill the data buffer
+          size_t way  = r_cas_way.read();
+          size_t set  = m_y[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+          size_t word = m_x[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+          for(size_t i = 0; i<m_words; i++)
+          {
+            if(i == word)
+            {
+              r_cas_to_ixr_cmd_data[i] = r_cas_wdata.read();
+            }
+            else if((i == word+1) && (r_cas_cpt.read() ==4))   // 64 bit CAS
+            {
+              r_cas_to_ixr_cmd_data[i] = m_cmd_cas_wdata_fifo.read();
+            }
+            else
+            {
+              r_cas_to_ixr_cmd_data[i] = m_cache_data.read(way, set, i);
+            }
+          }
+          size_t wok_index = 0;
+          bool   wok       = !m_transaction_tab.full(wok_index);
+          if(wok)
+          {
+            r_cas_trt_index = wok_index;
+            r_cas_fsm       = CAS_BC_UPT_LOCK;
+          }
+          else
+          {
+            r_cas_fsm       = CAS_WAIT;
+          }
+        }
+        else
+        {
+          r_cas_fsm = CAS_WAIT;
+        }
+      }
+      break;
+    }
+    ///////////////////
+    case CAS_BC_UPT_LOCK:  // register a broadcast inval transaction in UPT
+      // write data in cache in case of successful registration
+    {
+      if(r_alloc_upt_fsm.read() == ALLOC_UPT_CAS)
+      {
+        bool        wok       = false;
+        size_t      index     = 0;
+        size_t      srcid     = m_cmd_cas_srcid_fifo.read();
+        size_t      trdid     = m_cmd_cas_trdid_fifo.read();
+        size_t      pktid     = m_cmd_cas_pktid_fifo.read();
+        addr_t      nline     = m_nline[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+        size_t      nb_copies = r_cas_count.read();
+
+        // register a broadcast inval transaction in UPT
+        wok = m_update_tab.set(false,  // it's an inval transaction
+                               true,    // it's a broadcast
+                               true,    // it needs a response
+                               srcid,
+                               trdid,
+                               pktid,
+                               nline,
+                               nb_copies,
+                               index);
+
+        if(wok)     // UPT not full
+        {
+          // cache update
+          size_t way  = r_cas_way.read();
+          size_t set  = m_y[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+          size_t word = m_x[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+
+          m_cache_data.write(way, set, word, r_cas_wdata.read());
+          if(r_cas_cpt.read() ==4)
+            m_cache_data.write(way, set, word+1, m_cmd_cas_wdata_fifo.read());
+
+          // monitor
+          if(m_monitor_ok)
+          {
+            vci_addr_t address = m_cmd_cas_addr_fifo.read();
+            char buf[80];
+            snprintf(buf, 80, "CAS_DIR_HIT_WRITE srcid %d", m_cmd_cas_srcid_fifo.read());
+            check_monitor(buf, address, r_cas_wdata.read());
+            if(r_cas_cpt.read() ==4)
+              check_monitor(buf, address+4, m_cmd_cas_wdata_fifo.read());
+          }
+          r_cas_upt_index = index;
+          r_cas_fsm = CAS_BC_DIR_INVAL;
+#if DEBUG_MEMC_CAS
+          if(m_debug_cas_fsm)
+          {
+            std::cout << "  <MEMC " << name() << ".CAS_BC_UPT_LOCK> Register a broadcast inval transaction in UPT"
+                      << " / nline = " << nline
+                      << " / count = " << nb_copies
+                      << " / upt_index = " << index << std::endl;
+          }
+#endif
+        }
+        else      //  releases the lock protecting UPT
+        {
+          r_cas_fsm = CAS_WAIT;
+        }
+      }
+      break;
+    }
+    //////////////////
+    case CAS_BC_DIR_INVAL:  // Register the PUT transaction in TRT, and inval the DIR entry
+    {
+      if((r_alloc_trt_fsm.read() == ALLOC_TRT_CAS) &&
+          (r_alloc_upt_fsm.read() == ALLOC_UPT_CAS) &&
+          (r_alloc_dir_fsm.read() == ALLOC_DIR_CAS))
+      {
+        // set TRT
+        m_transaction_tab.set(r_cas_trt_index.read(),
+                              false,    // PUT request to XRAM
+                              m_nline[(vci_addr_t)(m_cmd_cas_addr_fifo.read())],
+                              0,
+                              0,
+                              0,
+                              false,    // not a processor read
+                              0,
+                              0,
+                              std::vector<be_t> (m_words,0),
+                              std::vector<data_t> (m_words,0));
+
+        // invalidate directory entry
+        DirectoryEntry entry;
+        entry.valid         = false;
+        entry.dirty         = false;
+        entry.tag         = 0;
+        entry.is_cnt        = false;
+        entry.lock          = false;
+        entry.count         = 0;
+        entry.owner.srcid   = 0;
+#if L1_MULTI_CACHE
+        entry.owner.cache_id= 0;
+#endif
+        entry.owner.inst    = false;
+        entry.ptr           = 0;
+        size_t set          = m_y[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+        size_t way          = r_cas_way.read();
+        m_cache_directory.write(set, way, entry);
+
+        r_cas_fsm = CAS_BC_CC_SEND;
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_BC_DIR_INVAL> Register the PUT in TRT and invalidate DIR entry"
+                    << " / nline = " << std::hex << m_nline[(vci_addr_t)(m_cmd_cas_addr_fifo.read())]
+                    << " / set = " << std::dec << set << " / way = " << way << std::endl;
+        }
+#endif
+      }
+      else
+      {
+        assert(false and "LOCK ERROR in CAS_FSM, STATE = CAS_BC_DIR_INVAL");
+      }
+      break;
+    }
+    ///////////////////
+    case CAS_BC_CC_SEND:  // Request the broadcast inval to CC_SEND FSM
+    {
+      if(!r_cas_to_cc_send_multi_req.read() &&
+          !r_cas_to_cc_send_brdcast_req.read())
+      {
+        r_cas_to_cc_send_multi_req    = false;
+        r_cas_to_cc_send_brdcast_req  = true;
+        r_cas_to_cc_send_trdid        = r_cas_upt_index.read();
+        r_cas_to_cc_send_nline        = m_nline[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+        r_cas_to_cc_send_index        = 0;
+        r_cas_to_cc_send_wdata        = 0;
+
+        r_cas_fsm = CAS_BC_XRAM_REQ;
+      }
+      break;
+    }
+    ////////////////////
+    case CAS_BC_XRAM_REQ: // request the IXR FSM to start a put transaction
+    {
+      if(!r_cas_to_ixr_cmd_req)
+      {
+        r_cas_to_ixr_cmd_req     = true;
+        r_cas_to_ixr_cmd_write   = true;
+        r_cas_to_ixr_cmd_nline   = m_nline[(vci_addr_t)(m_cmd_cas_addr_fifo.read())];
+        r_cas_to_ixr_cmd_trdid   = r_cas_trt_index.read();
+        r_cas_fsm                = CAS_IDLE;
+        cmd_cas_fifo_get         = true;
+        r_cas_cpt                = 0;
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_BC_XRAM_REQ> Request a PUT transaction to IXR_CMD FSM" << std::hex
+                    << " / nline = " << m_nline[(vci_addr_t) m_cmd_cas_addr_fifo.read()]
+                    << " / trt_index = " << r_cas_trt_index.read() << std::endl;
+        }
+#endif
+      }
+      else
+      {
+        std::cout << "MEM_CACHE, CAS_BC_XRAM_REQ state : request should not have been previously set"
+                  << std::endl;
+      }
+      break;
+    }
+    /////////////////
+    case CAS_RSP_FAIL:  // request TGT_RSP FSM to send a failure response
+    {
+      if(!r_cas_to_tgt_rsp_req)
+      {
+        cmd_cas_fifo_get     = true;
+        r_cas_cpt              = 0;
+        r_cas_to_tgt_rsp_req = true;
+        r_cas_to_tgt_rsp_data  = 1;
+        r_cas_to_tgt_rsp_srcid = m_cmd_cas_srcid_fifo.read();
+        r_cas_to_tgt_rsp_trdid = m_cmd_cas_trdid_fifo.read();
+        r_cas_to_tgt_rsp_pktid = m_cmd_cas_pktid_fifo.read();
+        r_cas_fsm              = CAS_IDLE;
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_RSP_FAIL> Request TGT_RSP to send a failure response" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    ////////////////////
+    case CAS_RSP_SUCCESS:  // request TGT_RSP FSM to send a success response
+    {
+      if(!r_cas_to_tgt_rsp_req)
+      {
+        cmd_cas_fifo_get       = true;
+        r_cas_cpt              = 0;
+        r_cas_to_tgt_rsp_req = true;
+        r_cas_to_tgt_rsp_data  = 0;
+        r_cas_to_tgt_rsp_srcid = m_cmd_cas_srcid_fifo.read();
+        r_cas_to_tgt_rsp_trdid = m_cmd_cas_trdid_fifo.read();
+        r_cas_to_tgt_rsp_pktid = m_cmd_cas_pktid_fifo.read();
+        r_cas_fsm              = CAS_IDLE;
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_RSP_SUCCESS> Request TGT_RSP to send a success response" << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    /////////////////////
+    case CAS_MISS_TRT_LOCK:         // cache miss : request access to transaction Table
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_CAS)
+      {
+        size_t   index = 0;
+        bool hit_read = m_transaction_tab.hit_read(
+                          m_nline[(vci_addr_t) m_cmd_cas_addr_fifo.read()],index);
+        bool hit_write = m_transaction_tab.hit_write(
+                           m_nline[(vci_addr_t) m_cmd_cas_addr_fifo.read()]);
+        bool wok = !m_transaction_tab.full(index);
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_MISS_TRT_LOCK> Check TRT state"
+                    << " / hit_read = "  << hit_read
+                    << " / hit_write = " << hit_write
+                    << " / wok = " << wok
+                    << " / index = " << index << std::endl;
+        }
+#endif
+
+        if(hit_read || !wok || hit_write)    // missing line already requested or no space in TRT
+        {
+          r_cas_fsm = CAS_WAIT;
+        }
+        else
+        {
+          r_cas_trt_index = index;
+          r_cas_fsm       = CAS_MISS_TRT_SET;
+        }
+      }
+      break;
+    }
+    ////////////////////
+    case CAS_MISS_TRT_SET: // register the GET transaction in TRT
+    {
+      if(r_alloc_trt_fsm.read() == ALLOC_TRT_CAS)
+      {
+        std::vector<be_t> be_vector;
+        std::vector<data_t> data_vector;
+        be_vector.clear();
+        data_vector.clear();
+        for(size_t i=0; i<m_words; i++)
+        {
+          be_vector.push_back(0);
+          data_vector.push_back(0);
+        }
+
+        m_transaction_tab.set(r_cas_trt_index.read(),
+                              true,   // read request
+                              m_nline[(vci_addr_t) m_cmd_cas_addr_fifo.read()],
+                              m_cmd_cas_srcid_fifo.read(),
+                              m_cmd_cas_trdid_fifo.read(),
+                              m_cmd_cas_pktid_fifo.read(),
+                              false,    // write request from processor
+                              0,
+                              0,
+                              be_vector,
+                              data_vector);
+        r_cas_fsm = CAS_MISS_XRAM_REQ;
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_MISS_TRT_SET> Register a GET transaction in TRT" << std::hex
+                    << " / nline = " << m_nline[(vci_addr_t) m_cmd_cas_addr_fifo.read()]
+                    << " / trt_index = " << r_cas_trt_index.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+    //////////////////////
+    case CAS_MISS_XRAM_REQ:  // request the IXR_CMD FSM to fetch the missing line
+    {
+      if(!r_cas_to_ixr_cmd_req)
+      {
+        r_cas_to_ixr_cmd_req        = true;
+        r_cas_to_ixr_cmd_write      = false;
+        r_cas_to_ixr_cmd_trdid      = r_cas_trt_index.read();
+        r_cas_to_ixr_cmd_nline      = m_nline[(vci_addr_t) m_cmd_cas_addr_fifo.read()];
+        r_cas_fsm                   = CAS_WAIT;
+
+#if DEBUG_MEMC_CAS
+        if(m_debug_cas_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".CAS_MISS_XRAM_REQ> Request a GET transaction to IXR_CMD FSM" << std::hex
+                    << " / nline = " << m_nline[(vci_addr_t) m_cmd_cas_addr_fifo.read()]
+                    << " / trt_index = " << r_cas_trt_index.read() << std::endl;
+        }
+#endif
+      }
+      break;
+    }
+  } // end switch r_cas_fsm
+
+
+  //////////////////////////////////////////////////////////////////////////////
+  //    CC_SEND FSM
+  //////////////////////////////////////////////////////////////////////////////
+  // The CC_SEND fsm controls the DSPIN initiator port on the coherence
+  // network, used to update or invalidate cache lines in L1 caches.
+  //
+  // This fsm is used also to acknowledge CLEANUP a command after request from
+  // the CLEANUP fsm.
+  //
+  // It implements a round-robin priority between the four possible client FSMs
+  // XRAM_RSP, WRITE, CAS and CLEANUP. Each FSM can request the next services:
+  // - r_xram_rsp_to_cc_send_multi_req : multi-inval
+  //   r_xram_rsp_to_cc_send_brdcast_req : broadcast-inval
+  // - r_write_to_cc_send_multi_req : multi-update
+  //   r_write_to_cc_send_brdcast_req : broadcast-inval
+  // - r_cas_to_cc_send_multi_req : multi-update
+  //   r_cas_to_cc_send_brdcast_req : broadcast-inval
+  // - r_cleanup_to_cc_send_req : cleanup acknowledgement
+  //
+  // An inval request is a double DSPIN flit command containing:
+  // 1. the index of the line to be invalidated.
+  //
+  // An update request is a multi-flit DSPIN command containing:
+  // 1. the index of the cache line to be updated.
+  // 2. the index of the first modified word in the line.
+  // 3. the data to update
+  ///////////////////////////////////////////////////////////////////////////////
+
+  switch(r_cc_send_fsm.read())
+  {
+    case CC_SEND_WRITE_IDLE:
+      {
+        // XRAM_RSP FSM has highest priority
+        if(m_xram_rsp_to_cc_send_inst_fifo.rok() ||
+            r_xram_rsp_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_INVAL_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(r_xram_rsp_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(m_cas_to_cc_send_inst_fifo.rok() ||
+            r_cas_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_UPDT_HEADER;
+          m_cpt_update++;
+          break;
+        }
+
+        if(r_cas_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if (r_cleanup_to_cc_send_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CLEANUP_ACK;
+          break;
+        }
+
+        if(m_write_to_cc_send_inst_fifo.rok() ||
+            r_write_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_WRITE_UPDT_HEADER;
+          m_cpt_update++;
+          break;
+        }
+
+        if(r_write_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_WRITE_BRDCAST_HEADER;
+          m_cpt_inval++;
+        }
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_IDLE:
+      {
+        // CAS FSM has highest priority
+        if(m_cas_to_cc_send_inst_fifo.rok() ||
+            r_cas_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_UPDT_HEADER;
+          m_cpt_update++;
+          break;
+        }
+
+        if(r_cas_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(r_cleanup_to_cc_send_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CLEANUP_ACK;
+          break;
+        }
+
+        if(m_write_to_cc_send_inst_fifo.rok() ||
+            r_write_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_WRITE_UPDT_HEADER;
+          m_cpt_update++;
+          break;
+        }
+
+        if(r_write_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_WRITE_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(m_xram_rsp_to_cc_send_inst_fifo.rok() ||
+            r_xram_rsp_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_INVAL_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(r_xram_rsp_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_BRDCAST_HEADER;
+          m_cpt_inval++;
+        }
+
+        break;
+      }
+
+    case CC_SEND_CAS_IDLE:
+      {
+        // CLEANUP FSM has highest priority
+        if(r_cleanup_to_cc_send_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CLEANUP_ACK;
+          break;
+        }
+
+        if(m_write_to_cc_send_inst_fifo.rok() ||
+            r_write_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_WRITE_UPDT_HEADER;
+          m_cpt_update++;
+          break;
+        }
+
+        if(r_write_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_WRITE_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(m_xram_rsp_to_cc_send_inst_fifo.rok() ||
+            r_xram_rsp_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_INVAL_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(r_xram_rsp_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(m_cas_to_cc_send_inst_fifo.rok() ||
+            r_cas_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_UPDT_HEADER;
+          m_cpt_update++;
+          break;
+        }
+
+        if(r_cas_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_BRDCAST_HEADER;
+          m_cpt_inval++;
+        }
+        break;
+      }
+
+    case CC_SEND_CLEANUP_IDLE:
+      {
+        // WRITE FSM has highest priority
+        if(m_write_to_cc_send_inst_fifo.rok() ||
+            r_write_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_WRITE_UPDT_HEADER;
+          m_cpt_update++;
+          break;
+        }
+
+        if(r_write_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_WRITE_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(m_xram_rsp_to_cc_send_inst_fifo.rok() ||
+            r_xram_rsp_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_INVAL_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(r_xram_rsp_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(m_cas_to_cc_send_inst_fifo.rok() ||
+            r_cas_to_cc_send_multi_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_UPDT_HEADER;
+          m_cpt_update++;
+          break;
+        }
+
+        if(r_cas_to_cc_send_brdcast_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_BRDCAST_HEADER;
+          m_cpt_inval++;
+          break;
+        }
+
+        if(r_cleanup_to_cc_send_req.read())
+        {
+          r_cc_send_fsm = CC_SEND_CLEANUP_ACK;
+        }
+
+        break;
+      }
+
+    case CC_SEND_CLEANUP_ACK:
+      {
+        // send only flit for a cleanup acknowledgement (from CLEANUP FSM)
+        if(not p_dspin_out.read) break;
+
+        r_cleanup_to_cc_send_req = false;
+        r_cc_send_fsm = CC_SEND_CLEANUP_IDLE;
+
+#if DEBUG_MEMC_CC_SEND
+        if(m_debug_cc_send_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".CC_SEND_CLEANUP_ACK> Cleanup Acknowledgement for srcid "
+            << r_cleanup_to_cc_send_srcid.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_INVAL_HEADER:
+      {
+        // send first flit multi-inval (from XRAM_RSP FSM)
+        if(m_xram_rsp_to_cc_send_inst_fifo.rok())
+        {
+          if(not p_dspin_out.read) break;
+
+          r_cc_send_fsm = CC_SEND_XRAM_RSP_INVAL_NLINE;
+          break;
+        }
+
+        if(r_xram_rsp_to_cc_send_multi_req.read())
+        {
+          r_xram_rsp_to_cc_send_multi_req = false;
+        }
+
+        r_cc_send_fsm = CC_SEND_XRAM_RSP_IDLE;
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_INVAL_NLINE:
+      {
+        // send second flit multi-inval (from XRAM_RSP FSM)
+        if(not p_dspin_out.read) break;
+
+        m_cpt_inval_mult++;
+
+        r_cc_send_fsm = CC_SEND_XRAM_RSP_INVAL_HEADER;
+
+#if DEBUG_MEMC_CC_SEND
+        if(m_debug_cc_send_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".CC_SEND_XRAM_RSP_INVAL_NLINE> Broadcast-Inval for line "
+            << r_xram_rsp_to_cc_send_nline.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_BRDCAST_HEADER:
+      {
+        // send first flit broadcast-inval (from XRAM_RSP FSM)
+        if(not p_dspin_out.read) break;
+
+        r_cc_send_fsm = CC_SEND_XRAM_RSP_BRDCAST_NLINE;
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_BRDCAST_NLINE:
+      {
+        // send second flit broadcast-inval (from XRAM_RSP FSM)
+        if(not p_dspin_out.read) break;
+
+        m_cpt_inval_brdcast++;
+
+        r_xram_rsp_to_cc_send_brdcast_req = false;
+        r_cc_send_fsm = CC_SEND_XRAM_RSP_IDLE;
+
+#if DEBUG_MEMC_CC_SEND
+        if(m_debug_cc_send_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".CC_SEND_XRAM_RSP_BRDCAST_NLINE> Broadcast-Inval for line "
+            << r_xram_rsp_to_cc_send_nline.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case CC_SEND_WRITE_BRDCAST_HEADER:
+      {
+        // send first flit broadcast-inval (from WRITE FSM)
+        if(not p_dspin_out.read) break;
+
+        r_cc_send_fsm = CC_SEND_WRITE_BRDCAST_NLINE;
+        break;
+      }
+
+    case CC_SEND_WRITE_BRDCAST_NLINE:
+      {
+        // send second flit broadcast-inval (from WRITE FSM)
+        if(not p_dspin_out.read) break;
+
+        m_cpt_inval_brdcast++;
+
+        r_write_to_cc_send_brdcast_req = false;
+        r_cc_send_fsm = CC_SEND_WRITE_IDLE;
+
+#if DEBUG_MEMC_CC_SEND
+        if(m_debug_cc_send_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".CC_SEND_WRITE_BRDCAST_NLINE> Broadcast-Inval for line "
+            << r_write_to_cc_send_nline.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case CC_SEND_WRITE_UPDT_HEADER:
+      {
+        // send first flit for a multi-update (from WRITE FSM)
+        if(m_write_to_cc_send_inst_fifo.rok())
+        {
+          if(not p_dspin_out.read) break;
+
+          r_cc_send_fsm = CC_SEND_WRITE_UPDT_NLINE;
+          break;
+        }
+
+        if(r_write_to_cc_send_multi_req.read())
+        {
+          r_write_to_cc_send_multi_req = false;
+        }
+
+        r_cc_send_fsm = CC_SEND_WRITE_IDLE;
+        break;
+      }
+
+    case CC_SEND_WRITE_UPDT_NLINE:
+      {
+        // send second flit for a multi-update (from WRITE FSM)
+        if(not p_dspin_out.read) break;
+
+        m_cpt_update_mult++;
+
+        r_cc_send_cpt = 0;
+        r_cc_send_fsm = CC_SEND_WRITE_UPDT_DATA;
+
+#if DEBUG_MEMC_CC_SEND
+        if(m_debug_cc_send_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".CC_SEND_WRITE_UPDT_NLINE> Multicast-Update for line "
+            << r_write_to_cc_send_nline.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case CC_SEND_WRITE_UPDT_DATA:
+      {
+        // send N data flits for a multi-update (from WRITE FSM)
+        if(not p_dspin_out.read) break;
+
+        if(r_cc_send_cpt.read() == (r_write_to_cc_send_count.read()-1))
+        {
+          write_to_cc_send_fifo_get = true;
+          r_cc_send_fsm = CC_SEND_WRITE_UPDT_HEADER;
+          break;
+        }
+
+        r_cc_send_cpt = r_cc_send_cpt.read() + 1;
+        break;
+      }
+
+    case CC_SEND_CAS_BRDCAST_HEADER:
+      {
+        // send first flit for a broadcast-inval (from CAS FSM)
+        if(not p_dspin_out.read) break;
+
+        r_cc_send_fsm = CC_SEND_CAS_BRDCAST_NLINE;
+        break;
+      }
+
+    case CC_SEND_CAS_BRDCAST_NLINE:
+      {
+        // send second flit broadcast-inval (from CAS FSM)
+        if(not p_dspin_out.read) break;
+
+        m_cpt_inval_brdcast++;
+
+        r_cas_to_cc_send_brdcast_req = false;
+        r_cc_send_fsm = CC_SEND_CAS_IDLE;
+
+#if DEBUG_MEMC_CC_SEND
+        if(m_debug_cc_send_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".CC_SEND_CAS_BRDCAST_NLINE> Broadcast-Inval for line "
+            << r_cas_to_cc_send_nline.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case CC_SEND_CAS_UPDT_HEADER:
+      {
+        // send first flit for a multi-update (from CAS FSM)
+        if(m_cas_to_cc_send_inst_fifo.rok())
+        {
+          if(not p_dspin_out.read) break;
+
+          r_cc_send_fsm = CC_SEND_CAS_UPDT_NLINE;
+          break;
+        }
+
+        // no more packets to send for the multi-update
+        if(r_cas_to_cc_send_multi_req.read())
+        {
+          r_cas_to_cc_send_multi_req = false;
+        }
+
+        r_cc_send_fsm = CC_SEND_CAS_IDLE;
+        break;
+      }
+
+    case CC_SEND_CAS_UPDT_NLINE:
+      {
+        // send second flit for a multi-update (from CAS FSM)
+        if(not p_dspin_out.read) break;
+
+        m_cpt_update_mult++;
+
+        r_cc_send_cpt = 0;
+        r_cc_send_fsm = CC_SEND_CAS_UPDT_DATA;
+
+#if DEBUG_MEMC_CC_SEND
+        if(m_debug_cc_send_fsm)
+        {
+          std::cout
+            << "  <MEMC " << name()
+            << ".CC_SEND_CAS_UPDT_NLINE> Multicast-Update for line "
+            << r_cas_to_cc_send_nline.read()
+            << std::endl;
+        }
+#endif
+        break;
+      }
+
+    case CC_SEND_CAS_UPDT_DATA:
+      {
+        // send first data for a multi-update (from CAS FSM)
+        if(not p_dspin_out.read) break;
+
+        if(r_cas_to_cc_send_is_long.read())
+        {
+          r_cc_send_fsm = CC_SEND_CAS_UPDT_DATA_HIGH;
+          break;
+        }
+
+        cas_to_cc_send_fifo_get = true;
+        r_cc_send_fsm = CC_SEND_CAS_UPDT_HEADER;
+        break;
+      }
+
+    case CC_SEND_CAS_UPDT_DATA_HIGH:
+      {
+        // send second data for a multi-update (from CAS FSM)
+        if(not p_dspin_out.read) break;
+
+        cas_to_cc_send_fifo_get = true;
+        r_cc_send_fsm = CC_SEND_CAS_UPDT_HEADER;
+        break;
+      }
+  }
+  // end switch r_cc_send_fsm
+
+  //////////////////////////////////////////////////////////////////////////////
+  //    CC_RECEIVE FSM
+  //////////////////////////////////////////////////////////////////////////////
+  // The CC_RECEIVE fsm controls the DSPIN target port on the coherence
+  // network.
+  ///////////////////////////////////////////////////////////////////////////////
+
+  switch(r_cc_receive_fsm.read())
+  {
+    case CC_RECEIVE_IDLE:
+      {
+        if(not p_dspin_in.write) break;
+
+        uint8_t type =
+          dspin_param::dspin_get(
+              p_dspin_in.data.read(),
+              dspin_param::FROM_L1_TYPE);
+
+        if(type == dspin_param::TYPE_CLEANUP)
+        { 
+          r_cc_receive_fsm = CC_RECEIVE_CLEANUP;
+          break;
+        }
+        
+        if(type == dspin_param::TYPE_MULTI_ACK)
+        {
+          r_cc_receive_fsm = CC_RECEIVE_MULTI_ACK;
+          break;
+        }
+
+        assert(
+            false && 
+            "VCI_MEM_CACHE ERROR: Incorrect type in coherence request from "
+            "L1 Cache");
+        
+        break;
+      }
+    case CC_RECEIVE_CLEANUP:
+      {
+        // wait for a valid cleanup flit
+        // wait for a WOK in the CC_RECEIVE to CLEANUP fifo
+        if(not p_dspin_in.write or not m_cc_receive_to_cleanup_fifo.wok()) break;
+
+        bool eop = (
+            dspin_param::dspin_get(
+              p_dspin_in.data.read(),
+              dspin_param::FROM_L1_EOP)
+            == 0x1);
+
+        cc_receive_to_cleanup_fifo_put = true;
+        if(eop)
+        {
+          r_cc_receive_fsm = CC_RECEIVE_IDLE;
+        }
+
+        break;
+      }
+    case CC_RECEIVE_MULTI_ACK:
+      {
+        // wait for a valid multicast acknowledgement flit
+        // wait for a WOK in the CC_RECEIVE to MULTI_ACK fifo
+        if(not p_dspin_in.write or not m_cc_receive_to_multi_ack_fifo.wok()) break;
+
+        bool eop = (
+            dspin_param::dspin_get(
+              p_dspin_in.data.read(),
+              dspin_param::FROM_L1_EOP) 
+            == 0x1);
+
+        cc_receive_to_multi_ack_fifo_put  = true;
+        if(eop)
+        {
+          r_cc_receive_fsm = CC_RECEIVE_IDLE;
+        }
+
+        break;
+      }
+    default:
+      {
+        assert(
+            false &&
+            "VCI_MEM_CACHE ERROR: Invalid state in CC_RECEIVE FSM");
+      }
+  }
+  /////////////////////////////////////////////////////////////////////
+  //    TGT_RSP FSM
+  /////////////////////////////////////////////////////////////////////
+  // The TGT_RSP fsm sends the responses on the VCI target port
+  // with a round robin priority between six requests :
+  // - r_read_to_tgt_rsp_req
+  // - r_write_to_tgt_rsp_req
+  // - r_cas_to_tgt_rsp_req
+  // - r_cleanup_to_tgt_rsp_req
+  // - r_xram_rsp_to_tgt_rsp_req
+  // - r_multi_ack_to_tgt_rsp_req
+  // The  ordering is :  read > write > cas > xram > init > cleanup
+  /////////////////////////////////////////////////////////////////////
+
+  switch(r_tgt_rsp_fsm.read())
+  {
+    case TGT_RSP_READ_IDLE:
+    { 
+      // write requests have the highest priority
+      if(r_write_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_WRITE;
+      else if(r_cas_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CAS  ;
+      else if(r_xram_rsp_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_XRAM;
+        r_tgt_rsp_cpt = r_xram_rsp_to_tgt_rsp_word.read();
+      }
+      else if(r_multi_ack_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_INIT   ;
+      else if(r_cleanup_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CLEANUP;
+      else if(r_read_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_READ;
+        r_tgt_rsp_cpt = r_read_to_tgt_rsp_word.read();
+      }
+      break;
+    }
+    ////////////////////////
+    case TGT_RSP_WRITE_IDLE:  // cas requests have the highest priority
+    {
+      if(r_cas_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CAS;
+      else if(r_xram_rsp_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_XRAM;
+        r_tgt_rsp_cpt = r_xram_rsp_to_tgt_rsp_word.read();
+      }
+      else if(r_multi_ack_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_INIT   ;
+      else if(r_cleanup_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CLEANUP;
+      else if(r_read_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_READ;
+        r_tgt_rsp_cpt = r_read_to_tgt_rsp_word.read();
+      }
+
+      else if(r_write_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_WRITE;
+      break;
+    }
+    ///////////////////////
+    case TGT_RSP_CAS_IDLE:   // xram_rsp requests have the highest priority
+    {
+      if(r_xram_rsp_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_XRAM;
+        r_tgt_rsp_cpt = r_xram_rsp_to_tgt_rsp_word.read();
+      }
+      else if(r_multi_ack_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_INIT   ;
+      else if(r_cleanup_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CLEANUP;
+      else if(r_read_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_READ;
+        r_tgt_rsp_cpt = r_read_to_tgt_rsp_word.read();
+      }
+      else if(r_write_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_WRITE;
+      else if(r_cas_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CAS  ;
+      break;
+    }
+    ///////////////////////
+    case TGT_RSP_XRAM_IDLE:   // init requests have the highest priority
+    {
+
+      if(r_multi_ack_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_INIT   ;
+      else if(r_cleanup_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CLEANUP;
+      else if(r_read_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_READ;
+        r_tgt_rsp_cpt = r_read_to_tgt_rsp_word.read();
+      }
+      else if(r_write_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_WRITE;
+      else if(r_cas_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CAS  ;
+      else if(r_xram_rsp_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_XRAM;
+        r_tgt_rsp_cpt = r_xram_rsp_to_tgt_rsp_word.read();
+      }
+      break;
+    }
+    ///////////////////////
+    case TGT_RSP_INIT_IDLE:   // cleanup requests have the highest priority
+    {
+      if(r_cleanup_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CLEANUP;
+      else if(r_read_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_READ;
+        r_tgt_rsp_cpt = r_read_to_tgt_rsp_word.read();
+      }
+      else if(r_write_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_WRITE;
+      else if(r_cas_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CAS  ;
+      else if(r_xram_rsp_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_XRAM;
+        r_tgt_rsp_cpt = r_xram_rsp_to_tgt_rsp_word.read();
+      }
+      else if(r_multi_ack_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_INIT;
+      break;
+    }
+    ///////////////////////
+    case TGT_RSP_CLEANUP_IDLE:    // read requests have the highest priority
+    {
+      if(r_read_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_READ;
+        r_tgt_rsp_cpt = r_read_to_tgt_rsp_word.read();
+      }
+      else if(r_write_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_WRITE;
+      else if(r_cas_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CAS  ;
+      else if(r_xram_rsp_to_tgt_rsp_req)
+      {
+        r_tgt_rsp_fsm = TGT_RSP_XRAM;
+        r_tgt_rsp_cpt = r_xram_rsp_to_tgt_rsp_word.read();
+      }
+      else if(r_multi_ack_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_INIT   ;
+      else if(r_cleanup_to_tgt_rsp_req) r_tgt_rsp_fsm = TGT_RSP_CLEANUP;
+      break;
+    }
+    //////////////////
+    case TGT_RSP_READ:    // send the response to a read
+    {
+      if(p_vci_tgt.rspack)
+      {
+
+#if DEBUG_MEMC_TGT_RSP
+        if(m_debug_tgt_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_RSP_READ> Read response"
+                    << " / rsrcid = " << std::dec << r_read_to_tgt_rsp_srcid.read()
+                    << " / rtrdid = " << r_read_to_tgt_rsp_trdid.read()
+                    << " / rpktid = " << r_read_to_tgt_rsp_pktid.read()
+                    << " / rdata = " << std::hex << r_read_to_tgt_rsp_data[r_tgt_rsp_cpt.read()].read()
+                    << " / cpt = " << std::dec << r_tgt_rsp_cpt.read() << std::endl;
+        }
+#endif
+        if(r_tgt_rsp_cpt.read() == (r_read_to_tgt_rsp_word.read() +r_read_to_tgt_rsp_length-1))
+        {
+          r_tgt_rsp_fsm = TGT_RSP_READ_IDLE;
+          r_read_to_tgt_rsp_req = false;
+        }
+        else
+        {
+          r_tgt_rsp_cpt = r_tgt_rsp_cpt.read() + 1;
+        }
+      }
+      break;
+    }
+    ///////////////////
+    case TGT_RSP_WRITE:   // send the write acknowledge
+    {
+      if(p_vci_tgt.rspack)
+      {
+
+#if DEBUG_MEMC_TGT_RSP
+        if(m_debug_tgt_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_RSP_WRITE> Write response"
+                    << " / rsrcid = " << std::dec << r_write_to_tgt_rsp_srcid.read()
+                    << " / rtrdid = " << r_write_to_tgt_rsp_trdid.read()
+                    << " / rpktid = " << r_write_to_tgt_rsp_pktid.read() << std::endl;
+        }
+#endif
+        r_tgt_rsp_fsm = TGT_RSP_WRITE_IDLE;
+        r_write_to_tgt_rsp_req = false;
+      }
+      break;
+    }
+    ///////////////////
+    case TGT_RSP_CLEANUP:   // pas clair pour moi (AG)
+    {
+      if(p_vci_tgt.rspack)
+      {
+
+#if DEBUG_MEMC_TGT_RSP
+        if(m_debug_tgt_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_RSP_CLEANUP> Cleanup response"
+                    << " / rsrcid = " << std::dec << r_cleanup_to_tgt_rsp_srcid.read()
+                    << " / rtrdid = " << r_cleanup_to_tgt_rsp_trdid.read()
+                    << " / rpktid = " << r_cleanup_to_tgt_rsp_pktid.read() << std::endl;
+        }
+#endif
+        r_tgt_rsp_fsm = TGT_RSP_CLEANUP_IDLE;
+        r_cleanup_to_tgt_rsp_req = false;
+      }
+      break;
+    }
+    //////////////////
+    case TGT_RSP_CAS:    // send one atomic word response
+    {
+      if(p_vci_tgt.rspack)
+      {
+
+#if DEBUG_MEMC_TGT_RSP
+        if(m_debug_tgt_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_RSP_CAS> CAS response"
+                    << " / rsrcid = " << std::dec << r_cas_to_tgt_rsp_srcid.read()
+                    << " / rtrdid = " << r_cas_to_tgt_rsp_trdid.read()
+                    << " / rpktid = " << r_cas_to_tgt_rsp_pktid.read() << std::endl;
+        }
+#endif
+        r_tgt_rsp_fsm = TGT_RSP_CAS_IDLE;
+        r_cas_to_tgt_rsp_req = false;
+      }
+      break;
+    }
+
+    ///////////////////////
+    case TGT_RSP_XRAM:    // send the response after XRAM access
+    {
+      if(p_vci_tgt.rspack)
+      {
+
+#if DEBUG_MEMC_TGT_RSP
+        if(m_debug_tgt_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_RSP_XRAM> Response following XRAM access"
+                    << " / rsrcid = " << std::dec << r_xram_rsp_to_tgt_rsp_srcid.read()
+                    << " / rtrdid = " << r_xram_rsp_to_tgt_rsp_trdid.read()
+                    << " / rpktid = " << r_xram_rsp_to_tgt_rsp_pktid.read()
+                    << " / rdata = " << std::hex << r_xram_rsp_to_tgt_rsp_data[r_tgt_rsp_cpt.read()].read()
+                    << " / cpt = " << std::dec << r_tgt_rsp_cpt.read() << std::endl;
+        }
+#endif
+        if((r_tgt_rsp_cpt.read() ==
+            (r_xram_rsp_to_tgt_rsp_word.read() +r_xram_rsp_to_tgt_rsp_length.read()-1))
+            || r_xram_rsp_to_tgt_rsp_rerror.read())
+        {
+          r_tgt_rsp_fsm = TGT_RSP_XRAM_IDLE;
+          r_xram_rsp_to_tgt_rsp_req = false;
+        }
+        else
+        {
+          r_tgt_rsp_cpt = r_tgt_rsp_cpt.read() + 1;
+        }
+      }
+      break;
+    }
+    //////////////////
+    case TGT_RSP_INIT:    // send the write response after coherence transaction
+    {
+      if(p_vci_tgt.rspack)
+      {
+
+#if DEBUG_MEMC_TGT_RSP
+        if(m_debug_tgt_rsp_fsm)
+        {
+          std::cout << "  <MEMC " << name() << ".TGT_RSP_INIT> Write response after coherence transaction"
+                    << " / rsrcid = " << std::dec << r_multi_ack_to_tgt_rsp_srcid.read()
+                    << " / rtrdid = " << r_multi_ack_to_tgt_rsp_trdid.read()
+                    << " / rpktid = " << r_multi_ack_to_tgt_rsp_pktid.read() << std::endl;
+        }
+#endif
+        r_tgt_rsp_fsm = TGT_RSP_INIT_IDLE;
+        r_multi_ack_to_tgt_rsp_req = false;
+      }
+      break;
+    }
+  } // end switch tgt_rsp_fsm
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    ALLOC_UPT FSM
+  ////////////////////////////////////////////////////////////////////////////////////
+  // The ALLOC_UPT FSM allocates the access to the Update/Inval Table (UPT).
+  // with a round robin priority between three FSMs : MULTI_ACK > WRITE > XRAM_RSP > CLEANUP
+  // - The WRITE FSM initiates update transactions and sets  new entry in UPT.
+  // - The XRAM_RSP FSM initiates inval transactions and sets  new entry in UPT.
+  // - The MULTI_ACK FSM complete those trasactions and erase the UPT entry.
+  // - The CLEANUP  FSM decrement an entry in UPT.
+  // The resource is always allocated.
+  /////////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_alloc_upt_fsm.read())
+  {
+
+      ////////////////////////
+    case ALLOC_UPT_MULTI_ACK:
+      if((r_multi_ack_fsm.read() != MULTI_ACK_UPT_LOCK) &&
+          (r_multi_ack_fsm.read() != MULTI_ACK_UPT_CLEAR))
+      {
+        if((r_write_fsm.read() == WRITE_UPT_LOCK) ||
+            (r_write_fsm.read() == WRITE_BC_UPT_LOCK))
+          r_alloc_upt_fsm = ALLOC_UPT_WRITE;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_INVAL_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_XRAM_RSP;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_UPT_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_CLEANUP;
+
+        else if((r_cas_fsm.read() == CAS_UPT_LOCK) ||
+                (r_cas_fsm.read() == CAS_BC_UPT_LOCK))
+          r_alloc_upt_fsm = ALLOC_UPT_CAS;
+      }
+      break;
+
+      /////////////////////
+    case ALLOC_UPT_WRITE:
+      if((r_write_fsm.read() != WRITE_UPT_LOCK) &&
+          (r_write_fsm.read() != WRITE_BC_UPT_LOCK))
+      {
+        if(r_xram_rsp_fsm.read() == XRAM_RSP_INVAL_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_XRAM_RSP;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_UPT_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_CLEANUP;
+
+        else if((r_cas_fsm.read() == CAS_UPT_LOCK) ||
+                (r_cas_fsm.read() == CAS_BC_UPT_LOCK))
+          r_alloc_upt_fsm = ALLOC_UPT_CAS;
+
+        else if(r_multi_ack_fsm.read() == MULTI_ACK_UPT_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_MULTI_ACK;
+      }
+      break;
+
+      ////////////////////////
+    case ALLOC_UPT_XRAM_RSP:
+      if(r_xram_rsp_fsm.read() != XRAM_RSP_INVAL_LOCK)
+      {
+        if(r_cleanup_fsm.read() == CLEANUP_UPT_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_CLEANUP;
+
+        else if((r_cas_fsm.read() == CAS_UPT_LOCK) ||
+                (r_cas_fsm.read() == CAS_BC_UPT_LOCK))
+          r_alloc_upt_fsm = ALLOC_UPT_CAS;
+
+        else if(r_multi_ack_fsm.read() == MULTI_ACK_UPT_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_MULTI_ACK;
+
+        else if((r_write_fsm.read() == WRITE_UPT_LOCK)   ||
+                (r_write_fsm.read() == WRITE_BC_UPT_LOCK))
+          r_alloc_upt_fsm = ALLOC_UPT_WRITE;
+      }
+      break;
+
+      //////////////////////////
+    case ALLOC_UPT_CLEANUP:
+      if(r_cleanup_fsm.read() != CLEANUP_UPT_LOCK)
+      {
+        if((r_cas_fsm.read() == CAS_UPT_LOCK) ||
+            (r_cas_fsm.read() == CAS_BC_UPT_LOCK))
+          r_alloc_upt_fsm = ALLOC_UPT_CAS;
+
+        else if(r_multi_ack_fsm.read() == MULTI_ACK_UPT_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_MULTI_ACK;
+
+        else if((r_write_fsm.read() == WRITE_UPT_LOCK) ||
+                (r_write_fsm.read() == WRITE_BC_UPT_LOCK))
+          r_alloc_upt_fsm = ALLOC_UPT_WRITE;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_INVAL_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_XRAM_RSP;
+      }
+      break;
+
+      //////////////////////////
+    case ALLOC_UPT_CAS:
+      if((r_cas_fsm.read() != CAS_UPT_LOCK) &&
+          (r_cas_fsm.read() != CAS_BC_UPT_LOCK))
+      {
+        if(r_multi_ack_fsm.read() == MULTI_ACK_UPT_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_MULTI_ACK;
+
+        else if((r_write_fsm.read() == WRITE_UPT_LOCK) ||
+                (r_write_fsm.read() == WRITE_BC_UPT_LOCK))
+          r_alloc_upt_fsm = ALLOC_UPT_WRITE;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_INVAL_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_XRAM_RSP;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_UPT_LOCK)
+          r_alloc_upt_fsm = ALLOC_UPT_CLEANUP;
+      }
+      break;
+
+  } // end switch r_alloc_upt_fsm
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    ALLOC_DIR FSM
+  ////////////////////////////////////////////////////////////////////////////////////
+  // The ALLOC_DIR FSM allocates the access to the directory and
+  // the data cache with a round robin priority between 5 user FSMs :
+  // The cyclic ordering is READ > WRITE > CAS > CLEANUP > XRAM_RSP
+  // The ressource is always allocated.
+  /////////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_alloc_dir_fsm.read())
+  {
+    case ALLOC_DIR_RESET:
+      // Initializes the directory one SET each cycle. All the WAYS of a SET are
+      // initialize in parallel
+
+      r_alloc_dir_reset_cpt.write(r_alloc_dir_reset_cpt.read() + 1);
+
+      if(r_alloc_dir_reset_cpt.read() == (m_sets - 1))
+      {
+        m_cache_directory.init();
+
+        r_alloc_dir_fsm = ALLOC_DIR_READ;
+      }
+      break;
+
+      ////////////////////
+    case ALLOC_DIR_READ:
+      if(((r_read_fsm.read()       != READ_DIR_REQ)   &&
+          (r_read_fsm.read()       != READ_DIR_LOCK)   &&
+          (r_read_fsm.read()       != READ_TRT_LOCK)   &&
+          (r_read_fsm.read()       != READ_HEAP_REQ))
+          ||
+          ((r_read_fsm.read()       == READ_TRT_LOCK)   &&
+           (r_alloc_trt_fsm.read()  == ALLOC_TRT_READ)))
+      {
+        if(r_write_fsm.read() == WRITE_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_WRITE;
+
+        else if(r_cas_fsm.read() == CAS_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_CAS;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_CLEANUP;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_DIR_LOCK)
+          r_alloc_dir_fsm = ALLOC_DIR_XRAM_RSP;
+      }
+      break;
+
+      /////////////////////
+    case ALLOC_DIR_WRITE:
+      if(((r_write_fsm.read()      != WRITE_DIR_REQ)  &&
+          (r_write_fsm.read()      != WRITE_DIR_LOCK)  &&
+          (r_write_fsm.read()      != WRITE_DIR_READ)  &&
+          (r_write_fsm.read()      != WRITE_DIR_HIT)  &&
+          (r_write_fsm.read()      != WRITE_BC_TRT_LOCK)  &&
+          (r_write_fsm.read()      != WRITE_BC_UPT_LOCK)  &&
+          (r_write_fsm.read()      != WRITE_MISS_TRT_LOCK)  &&
+          (r_write_fsm.read()      != WRITE_UPT_LOCK)  &&
+          (r_write_fsm.read()      != WRITE_UPT_HEAP_LOCK))
+          ||
+          ((r_write_fsm.read()      == WRITE_UPT_HEAP_LOCK)  &&
+           (r_alloc_heap_fsm.read() == ALLOC_HEAP_WRITE))
+          ||
+          ((r_write_fsm.read()      == WRITE_MISS_TRT_LOCK)  &&
+           (r_alloc_trt_fsm.read()  == ALLOC_TRT_WRITE)))
+      {
+        if(r_cas_fsm.read() == CAS_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_CAS;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_CLEANUP;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_DIR_LOCK)
+          r_alloc_dir_fsm = ALLOC_DIR_XRAM_RSP;
+
+        else if(r_read_fsm.read() == READ_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_READ;
+      }
+      break;
+
+      ////////////////////
+    case ALLOC_DIR_CAS:
+      if(((r_cas_fsm.read()        != CAS_DIR_REQ)  &&
+          (r_cas_fsm.read()        != CAS_DIR_LOCK)  &&
+          (r_cas_fsm.read()        != CAS_DIR_HIT_READ)  &&
+          (r_cas_fsm.read()        != CAS_DIR_HIT_WRITE)  &&
+          (r_cas_fsm.read()        != CAS_BC_TRT_LOCK)  &&
+          (r_cas_fsm.read()        != CAS_BC_UPT_LOCK)  &&
+          (r_cas_fsm.read()        != CAS_MISS_TRT_LOCK)  &&
+          (r_cas_fsm.read()        != CAS_UPT_LOCK)  &&
+          (r_cas_fsm.read()        != CAS_UPT_HEAP_LOCK))
+          ||
+          ((r_cas_fsm.read()        == CAS_UPT_HEAP_LOCK)  &&
+           (r_alloc_heap_fsm.read() == ALLOC_HEAP_CAS))
+          ||
+          ((r_cas_fsm.read()        == CAS_MISS_TRT_LOCK)  &&
+           (r_alloc_trt_fsm.read()  == ALLOC_TRT_CAS)))
+      {
+        if(r_cleanup_fsm.read() == CLEANUP_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_CLEANUP;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_DIR_LOCK)
+          r_alloc_dir_fsm = ALLOC_DIR_XRAM_RSP;
+
+        else if(r_read_fsm.read() == READ_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_READ;
+
+        else if(r_write_fsm.read() == WRITE_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_WRITE;
+      }
+      break;
+
+      ///////////////////////
+    case ALLOC_DIR_CLEANUP:
+      if((r_cleanup_fsm.read() != CLEANUP_DIR_REQ) &&
+          (r_cleanup_fsm.read() != CLEANUP_DIR_LOCK) &&
+          (r_cleanup_fsm.read() != CLEANUP_HEAP_REQ) &&
+          (r_cleanup_fsm.read() != CLEANUP_HEAP_LOCK))
+      {
+        if(r_xram_rsp_fsm.read() == XRAM_RSP_DIR_LOCK)
+          r_alloc_dir_fsm = ALLOC_DIR_XRAM_RSP;
+
+        else if(r_read_fsm.read() == READ_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_READ;
+
+        else if(r_write_fsm.read() == WRITE_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_WRITE;
+
+        else if(r_cas_fsm.read() == CAS_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_CAS;
+      }
+      break;
+
+      ////////////////////////
+    case ALLOC_DIR_XRAM_RSP:
+      if((r_xram_rsp_fsm.read() != XRAM_RSP_DIR_LOCK) &&
+          (r_xram_rsp_fsm.read() != XRAM_RSP_TRT_COPY) &&
+          (r_xram_rsp_fsm.read() != XRAM_RSP_INVAL_LOCK))
+      {
+        if(r_read_fsm.read() == READ_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_READ;
+
+        else if(r_write_fsm.read() == WRITE_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_WRITE;
+
+        else if(r_cas_fsm.read() == CAS_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_CAS;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_DIR_REQ)
+          r_alloc_dir_fsm = ALLOC_DIR_CLEANUP;
+      }
+      break;
+
+  } // end switch alloc_dir_fsm
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    ALLOC_TRT FSM
+  ////////////////////////////////////////////////////////////////////////////////////
+  // The ALLOC_TRT fsm allocates the access to the Transaction Table (write buffer)
+  // with a round robin priority between 4 user FSMs :
+  // The cyclic priority is READ > WRITE > CAS > XRAM_RSP
+  // The ressource is always allocated.
+  ///////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_alloc_trt_fsm.read())
+  {
+      ////////////////////
+    case ALLOC_TRT_READ:
+      if(r_read_fsm.read() != READ_TRT_LOCK)
+      {
+        if((r_write_fsm.read() == WRITE_MISS_TRT_LOCK) ||
+            (r_write_fsm.read() == WRITE_BC_TRT_LOCK))
+          r_alloc_trt_fsm = ALLOC_TRT_WRITE;
+
+        else if((r_cas_fsm.read() == CAS_MISS_TRT_LOCK) ||
+                (r_cas_fsm.read() == CAS_BC_TRT_LOCK))
+          r_alloc_trt_fsm = ALLOC_TRT_CAS;
+
+        else if((r_xram_rsp_fsm.read()  == XRAM_RSP_DIR_LOCK) &&
+                (r_alloc_dir_fsm.read() == ALLOC_DIR_XRAM_RSP))
+          r_alloc_trt_fsm = ALLOC_TRT_XRAM_RSP;
+
+        else if((r_ixr_rsp_fsm.read() == IXR_RSP_TRT_ERASE) ||
+                (r_ixr_rsp_fsm.read() == IXR_RSP_TRT_READ))
+          r_alloc_trt_fsm = ALLOC_TRT_IXR_RSP;
+      }
+      break;
+
+      /////////////////////
+    case ALLOC_TRT_WRITE:
+      if((r_write_fsm.read() != WRITE_MISS_TRT_LOCK) &&
+          (r_write_fsm.read() != WRITE_BC_TRT_LOCK) &&
+          (r_write_fsm.read() != WRITE_BC_UPT_LOCK))
+      {
+        if((r_cas_fsm.read() == CAS_MISS_TRT_LOCK) ||
+            (r_cas_fsm.read() == CAS_BC_TRT_LOCK))
+          r_alloc_trt_fsm = ALLOC_TRT_CAS;
+
+        else if((r_xram_rsp_fsm.read()  == XRAM_RSP_DIR_LOCK) &&
+                (r_alloc_dir_fsm.read() == ALLOC_DIR_XRAM_RSP))
+          r_alloc_trt_fsm = ALLOC_TRT_XRAM_RSP;
+
+        else if((r_ixr_rsp_fsm.read() == IXR_RSP_TRT_ERASE) ||
+                (r_ixr_rsp_fsm.read() == IXR_RSP_TRT_READ))
+          r_alloc_trt_fsm = ALLOC_TRT_IXR_RSP;
+
+        else if(r_read_fsm.read() == READ_TRT_LOCK)
+          r_alloc_trt_fsm = ALLOC_TRT_READ;
+      }
+      break;
+
+      ////////////////////
+    case ALLOC_TRT_CAS:
+      if((r_cas_fsm.read() != CAS_MISS_TRT_LOCK) &&
+          (r_cas_fsm.read() != CAS_BC_TRT_LOCK) &&
+          (r_cas_fsm.read() != CAS_BC_UPT_LOCK))
+      {
+        if((r_xram_rsp_fsm.read()  == XRAM_RSP_DIR_LOCK) &&
+            (r_alloc_dir_fsm.read() == ALLOC_DIR_XRAM_RSP))
+          r_alloc_trt_fsm = ALLOC_TRT_XRAM_RSP;
+
+        else if((r_ixr_rsp_fsm.read() == IXR_RSP_TRT_ERASE) ||
+                (r_ixr_rsp_fsm.read() == IXR_RSP_TRT_READ))
+          r_alloc_trt_fsm = ALLOC_TRT_IXR_RSP;
+
+        else if(r_read_fsm.read() == READ_TRT_LOCK)
+          r_alloc_trt_fsm = ALLOC_TRT_READ;
+
+        else if((r_write_fsm.read() == WRITE_MISS_TRT_LOCK) ||
+                (r_write_fsm.read() == WRITE_BC_TRT_LOCK))
+          r_alloc_trt_fsm = ALLOC_TRT_WRITE;
+      }
+      break;
+
+      ////////////////////////
+    case ALLOC_TRT_XRAM_RSP:
+      if(((r_xram_rsp_fsm.read()  != XRAM_RSP_DIR_LOCK)  ||
+          (r_alloc_dir_fsm.read() != ALLOC_DIR_XRAM_RSP)) &&
+          (r_xram_rsp_fsm.read()  != XRAM_RSP_TRT_COPY)  &&
+          (r_xram_rsp_fsm.read()  != XRAM_RSP_DIR_UPDT)  &&
+          (r_xram_rsp_fsm.read()  != XRAM_RSP_INVAL_LOCK))
+      {
+        if((r_ixr_rsp_fsm.read() == IXR_RSP_TRT_ERASE) ||
+            (r_ixr_rsp_fsm.read() == IXR_RSP_TRT_READ))
+          r_alloc_trt_fsm = ALLOC_TRT_IXR_RSP;
+
+        else if(r_read_fsm.read() == READ_TRT_LOCK)
+          r_alloc_trt_fsm = ALLOC_TRT_READ;
+
+        else if((r_write_fsm.read() == WRITE_MISS_TRT_LOCK) ||
+                (r_write_fsm.read() == WRITE_BC_TRT_LOCK))
+          r_alloc_trt_fsm = ALLOC_TRT_WRITE;
+
+        else if((r_cas_fsm.read() == CAS_MISS_TRT_LOCK) ||
+                (r_cas_fsm.read() == CAS_BC_TRT_LOCK))
+          r_alloc_trt_fsm = ALLOC_TRT_CAS;
+      }
+      break;
+
+      ////////////////////////
+    case ALLOC_TRT_IXR_RSP:
+      if((r_ixr_rsp_fsm.read() != IXR_RSP_TRT_ERASE) &&
+          (r_ixr_rsp_fsm.read() != IXR_RSP_TRT_READ))
+      {
+        if(r_read_fsm.read() == READ_TRT_LOCK)
+          r_alloc_trt_fsm = ALLOC_TRT_READ;
+
+        else if((r_write_fsm.read() == WRITE_MISS_TRT_LOCK) ||
+                (r_write_fsm.read() == WRITE_BC_TRT_LOCK))
+          r_alloc_trt_fsm = ALLOC_TRT_WRITE;
+
+        else if((r_cas_fsm.read() == CAS_MISS_TRT_LOCK) ||
+                (r_cas_fsm.read() == CAS_BC_TRT_LOCK))
+          r_alloc_trt_fsm = ALLOC_TRT_CAS;
+
+        else if((r_xram_rsp_fsm.read()  == XRAM_RSP_DIR_LOCK) &&
+                (r_alloc_dir_fsm.read() == ALLOC_DIR_XRAM_RSP))
+          r_alloc_trt_fsm = ALLOC_TRT_XRAM_RSP;
+      }
+      break;
+
+  } // end switch alloc_trt_fsm
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    ALLOC_HEAP FSM
+  ////////////////////////////////////////////////////////////////////////////////////
+  // The ALLOC_HEAP FSM allocates the access to the heap
+  // with a round robin priority between 5 user FSMs :
+  // The cyclic ordering is READ > WRITE > CAS > CLEANUP > XRAM_RSP
+  // The ressource is always allocated.
+  /////////////////////////////////////////////////////////////////////////////////////
+
+  switch(r_alloc_heap_fsm.read())
+  {
+      ////////////////////
+    case ALLOC_HEAP_RESET:
+      // Initializes the heap one ENTRY each cycle.
+
+      r_alloc_heap_reset_cpt.write(r_alloc_heap_reset_cpt.read() + 1);
+
+      if(r_alloc_heap_reset_cpt.read() == (m_heap_size-1))
+      {
+        m_heap.init();
+
+        r_alloc_heap_fsm = ALLOC_HEAP_READ;
+      }
+      break;
+
+      ////////////////////
+    case ALLOC_HEAP_READ:
+      if((r_read_fsm.read() != READ_HEAP_REQ) &&
+          (r_read_fsm.read() != READ_HEAP_LOCK) &&
+          (r_read_fsm.read() != READ_HEAP_ERASE))
+      {
+        if(r_write_fsm.read() == WRITE_UPT_HEAP_LOCK)
+          r_alloc_heap_fsm = ALLOC_HEAP_WRITE;
+
+        else if(r_cas_fsm.read() == CAS_UPT_HEAP_LOCK)
+          r_alloc_heap_fsm = ALLOC_HEAP_CAS;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_CLEANUP;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_XRAM_RSP;
+      }
+      break;
+
+      /////////////////////
+    case ALLOC_HEAP_WRITE:
+      if((r_write_fsm.read() != WRITE_UPT_HEAP_LOCK) &&
+          (r_write_fsm.read() != WRITE_UPT_REQ) &&
+          (r_write_fsm.read() != WRITE_UPT_NEXT))
+      {
+        if(r_cas_fsm.read() == CAS_UPT_HEAP_LOCK)
+          r_alloc_heap_fsm = ALLOC_HEAP_CAS;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_CLEANUP;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_XRAM_RSP;
+
+        else if(r_read_fsm.read() == READ_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_READ;
+      }
+      break;
+
+      ////////////////////
+    case ALLOC_HEAP_CAS:
+      if((r_cas_fsm.read() != CAS_UPT_HEAP_LOCK) &&
+          (r_cas_fsm.read() != CAS_UPT_REQ) &&
+          (r_cas_fsm.read() != CAS_UPT_NEXT))
+      {
+        if(r_cleanup_fsm.read() == CLEANUP_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_CLEANUP;
+
+        else if(r_xram_rsp_fsm.read() == XRAM_RSP_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_XRAM_RSP;
+
+        else if(r_read_fsm.read() == READ_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_READ;
+
+        else if(r_write_fsm.read() == WRITE_UPT_HEAP_LOCK)
+          r_alloc_heap_fsm = ALLOC_HEAP_WRITE;
+      }
+      break;
+
+      ///////////////////////
+    case ALLOC_HEAP_CLEANUP:
+      if((r_cleanup_fsm.read() != CLEANUP_HEAP_REQ) &&
+          (r_cleanup_fsm.read() != CLEANUP_HEAP_LOCK) &&
+          (r_cleanup_fsm.read() != CLEANUP_HEAP_SEARCH) &&
+          (r_cleanup_fsm.read() != CLEANUP_HEAP_CLEAN))
+      {
+        if(r_xram_rsp_fsm.read() == XRAM_RSP_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_XRAM_RSP;
+
+        else if(r_read_fsm.read() == READ_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_READ;
+
+        else if(r_write_fsm.read() == WRITE_UPT_HEAP_LOCK)
+          r_alloc_heap_fsm = ALLOC_HEAP_WRITE;
+
+        else if(r_cas_fsm.read() == CAS_UPT_HEAP_LOCK)
+          r_alloc_heap_fsm = ALLOC_HEAP_CAS;
+      }
+      break;
+
+      ////////////////////////
+    case ALLOC_HEAP_XRAM_RSP:
+      if((r_xram_rsp_fsm.read() != XRAM_RSP_HEAP_REQ) &&
+          (r_xram_rsp_fsm.read() != XRAM_RSP_HEAP_ERASE))
+      {
+        if(r_read_fsm.read() == READ_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_READ;
+
+        else if(r_write_fsm.read() == WRITE_UPT_HEAP_LOCK)
+          r_alloc_heap_fsm = ALLOC_HEAP_WRITE;
+
+        else if(r_cas_fsm.read() == CAS_UPT_HEAP_LOCK)
+          r_alloc_heap_fsm = ALLOC_HEAP_CAS;
+
+        else if(r_cleanup_fsm.read() == CLEANUP_HEAP_REQ)
+          r_alloc_heap_fsm = ALLOC_HEAP_CLEANUP;
+
+      }
+      break;
+
+  } // end switch alloc_heap_fsm
+
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    TGT_CMD to READ FIFO
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  if(cmd_read_fifo_put)
+  {
+    if(cmd_read_fifo_get)
+    {
+      m_cmd_read_addr_fifo.put_and_get((addr_t)(p_vci_tgt.address.read()));
+      m_cmd_read_length_fifo.put_and_get(p_vci_tgt.plen.read() >>2);
+      m_cmd_read_srcid_fifo.put_and_get(p_vci_tgt.srcid.read());
+      m_cmd_read_trdid_fifo.put_and_get(p_vci_tgt.trdid.read());
+      m_cmd_read_pktid_fifo.put_and_get(p_vci_tgt.pktid.read());
+    }
+    else
+    {
+      m_cmd_read_addr_fifo.simple_put((addr_t)(p_vci_tgt.address.read()));
+      m_cmd_read_length_fifo.simple_put(p_vci_tgt.plen.read() >>2);
+      m_cmd_read_srcid_fifo.simple_put(p_vci_tgt.srcid.read());
+      m_cmd_read_trdid_fifo.simple_put(p_vci_tgt.trdid.read());
+      m_cmd_read_pktid_fifo.simple_put(p_vci_tgt.pktid.read());
+    }
+  }
+  else
+  {
+    if(cmd_read_fifo_get)
+    {
+      m_cmd_read_addr_fifo.simple_get();
+      m_cmd_read_length_fifo.simple_get();
+      m_cmd_read_srcid_fifo.simple_get();
+      m_cmd_read_trdid_fifo.simple_get();
+      m_cmd_read_pktid_fifo.simple_get();
+    }
+  }
+  /////////////////////////////////////////////////////////////////////
+  //    TGT_CMD to WRITE FIFO
+  /////////////////////////////////////////////////////////////////////
+
+  if(cmd_write_fifo_put)
+  {
+    if(cmd_write_fifo_get)
+    {
+      m_cmd_write_addr_fifo.put_and_get((addr_t)(p_vci_tgt.address.read()));
+      m_cmd_write_eop_fifo.put_and_get(p_vci_tgt.eop.read());
+      m_cmd_write_srcid_fifo.put_and_get(p_vci_tgt.srcid.read());
+      m_cmd_write_trdid_fifo.put_and_get(p_vci_tgt.trdid.read());
+      m_cmd_write_pktid_fifo.put_and_get(p_vci_tgt.pktid.read());
+      m_cmd_write_data_fifo.put_and_get(p_vci_tgt.wdata.read());
+      m_cmd_write_be_fifo.put_and_get(p_vci_tgt.be.read());
+    }
+    else
+    {
+      m_cmd_write_addr_fifo.simple_put((addr_t)(p_vci_tgt.address.read()));
+      m_cmd_write_eop_fifo.simple_put(p_vci_tgt.eop.read());
+      m_cmd_write_srcid_fifo.simple_put(p_vci_tgt.srcid.read());
+      m_cmd_write_trdid_fifo.simple_put(p_vci_tgt.trdid.read());
+      m_cmd_write_pktid_fifo.simple_put(p_vci_tgt.pktid.read());
+      m_cmd_write_data_fifo.simple_put(p_vci_tgt.wdata.read());
+      m_cmd_write_be_fifo.simple_put(p_vci_tgt.be.read());
+    }
+  }
+  else
+  {
+    if(cmd_write_fifo_get)
+    {
+      m_cmd_write_addr_fifo.simple_get();
+      m_cmd_write_eop_fifo.simple_get();
+      m_cmd_write_srcid_fifo.simple_get();
+      m_cmd_write_trdid_fifo.simple_get();
+      m_cmd_write_pktid_fifo.simple_get();
+      m_cmd_write_data_fifo.simple_get();
+      m_cmd_write_be_fifo.simple_get();
+    }
+  }
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    TGT_CMD to CAS FIFO
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  if(cmd_cas_fifo_put)
+  {
+    if(cmd_cas_fifo_get)
+    {
+      m_cmd_cas_addr_fifo.put_and_get((addr_t)(p_vci_tgt.address.read()));
+      m_cmd_cas_eop_fifo.put_and_get(p_vci_tgt.eop.read());
+      m_cmd_cas_srcid_fifo.put_and_get(p_vci_tgt.srcid.read());
+      m_cmd_cas_trdid_fifo.put_and_get(p_vci_tgt.trdid.read());
+      m_cmd_cas_pktid_fifo.put_and_get(p_vci_tgt.pktid.read());
+      m_cmd_cas_wdata_fifo.put_and_get(p_vci_tgt.wdata.read());
+    }
+    else
+    {
+      m_cmd_cas_addr_fifo.simple_put((addr_t)(p_vci_tgt.address.read()));
+      m_cmd_cas_eop_fifo.simple_put(p_vci_tgt.eop.read());
+      m_cmd_cas_srcid_fifo.simple_put(p_vci_tgt.srcid.read());
+      m_cmd_cas_trdid_fifo.simple_put(p_vci_tgt.trdid.read());
+      m_cmd_cas_pktid_fifo.simple_put(p_vci_tgt.pktid.read());
+      m_cmd_cas_wdata_fifo.simple_put(p_vci_tgt.wdata.read());
+    }
+  }
+  else
+  {
+    if(cmd_cas_fifo_get)
+    {
+      m_cmd_cas_addr_fifo.simple_get();
+      m_cmd_cas_eop_fifo.simple_get();
+      m_cmd_cas_srcid_fifo.simple_get();
+      m_cmd_cas_trdid_fifo.simple_get();
+      m_cmd_cas_pktid_fifo.simple_get();
+      m_cmd_cas_wdata_fifo.simple_get();
+    }
+  }
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    CC_RECEIVE to CLEANUP FIFO
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  if(cc_receive_to_cleanup_fifo_put)
+  {
+    if(cc_receive_to_cleanup_fifo_get)
+    {
+      m_cc_receive_to_cleanup_fifo.put_and_get(p_dspin_in.data.read());
+    }
+    else
+    {
+      m_cc_receive_to_cleanup_fifo.simple_put(p_dspin_in.data.read());
+    }
+  }
+  else
+  {
+    if(cc_receive_to_cleanup_fifo_get)
+    {
+      m_cc_receive_to_cleanup_fifo.simple_get();
+    }
+  }
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    CC_RECEIVE to MULTI_ACK FIFO
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  if(cc_receive_to_multi_ack_fifo_put)
+  {
+    if(cc_receive_to_multi_ack_fifo_get)
+    {
+      m_cc_receive_to_multi_ack_fifo.put_and_get(p_dspin_in.data.read());
+    }
+    else
+    {
+      m_cc_receive_to_multi_ack_fifo.simple_put(p_dspin_in.data.read());
+    }
+  }
+  else
+  {
+    if(cc_receive_to_multi_ack_fifo_get)
+    {
+      m_cc_receive_to_multi_ack_fifo.simple_get();
+    }
+  }
+
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    WRITE to CC_SEND FIFO
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  if(write_to_cc_send_fifo_put)
+  {
+    if(write_to_cc_send_fifo_get)
+    {
+      m_write_to_cc_send_inst_fifo.put_and_get(write_to_cc_send_fifo_inst);
+      m_write_to_cc_send_srcid_fifo.put_and_get(write_to_cc_send_fifo_srcid);
+#if L1_MULTI_CACHE
+      m_write_to_cc_send_cache_id_fifo.put_and_get(write_to_cc_send_fifo_cache_id);
+#endif
+    }
+    else
+    {
+      m_write_to_cc_send_inst_fifo.simple_put(write_to_cc_send_fifo_inst);
+      m_write_to_cc_send_srcid_fifo.simple_put(write_to_cc_send_fifo_srcid);
+#if L1_MULTI_CACHE
+      m_write_to_cc_send_cache_id_fifo.simple_put(write_to_cc_send_fifo_cache_id);
+#endif
+    }
+  }
+  else
+  {
+    if(write_to_cc_send_fifo_get)
+    {
+      m_write_to_cc_send_inst_fifo.simple_get();
+      m_write_to_cc_send_srcid_fifo.simple_get();
+#if L1_MULTI_CACHE
+      m_write_to_cc_send_cache_id_fifo.simple_get();
+#endif
+    }
+  }
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    XRAM_RSP to CC_SEND FIFO
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  if(xram_rsp_to_cc_send_fifo_put)
+  {
+    if(xram_rsp_to_cc_send_fifo_get)
+    {
+      m_xram_rsp_to_cc_send_inst_fifo.put_and_get(xram_rsp_to_cc_send_fifo_inst);
+      m_xram_rsp_to_cc_send_srcid_fifo.put_and_get(xram_rsp_to_cc_send_fifo_srcid);
+#if L1_MULTI_CACHE
+      m_xram_rsp_to_cc_send_cache_id_fifo.put_and_get(xram_rsp_to_cc_send_fifo_cache_id);
+#endif
+    }
+    else
+    {
+      m_xram_rsp_to_cc_send_inst_fifo.simple_put(xram_rsp_to_cc_send_fifo_inst);
+      m_xram_rsp_to_cc_send_srcid_fifo.simple_put(xram_rsp_to_cc_send_fifo_srcid);
+#if L1_MULTI_CACHE
+      m_xram_rsp_to_cc_send_cache_id_fifo.simple_put(xram_rsp_to_cc_send_fifo_cache_id);
+#endif
+    }
+  }
+  else
+  {
+    if(xram_rsp_to_cc_send_fifo_get)
+    {
+      m_xram_rsp_to_cc_send_inst_fifo.simple_get();
+      m_xram_rsp_to_cc_send_srcid_fifo.simple_get();
+#if L1_MULTI_CACHE
+      m_xram_rsp_to_cc_send_cache_id_fifo.simple_get();
+#endif
+    }
+  }
+  ////////////////////////////////////////////////////////////////////////////////////
+  //    CAS to CC_SEND FIFO
+  ////////////////////////////////////////////////////////////////////////////////////
+
+  if(cas_to_cc_send_fifo_put)
+  {
+    if(cas_to_cc_send_fifo_get)
+    {
+      m_cas_to_cc_send_inst_fifo.put_and_get(cas_to_cc_send_fifo_inst);
+      m_cas_to_cc_send_srcid_fifo.put_and_get(cas_to_cc_send_fifo_srcid);
+#if L1_MULTI_CACHE
+      m_cas_to_cc_send_cache_id_fifo.put_and_get(cas_to_cc_send_fifo_cache_id);
+#endif
+    }
+    else
+    {
+      m_cas_to_cc_send_inst_fifo.simple_put(cas_to_cc_send_fifo_inst);
+      m_cas_to_cc_send_srcid_fifo.simple_put(cas_to_cc_send_fifo_srcid);
+#if L1_MULTI_CACHE
+      m_cas_to_cc_send_cache_id_fifo.simple_put(cas_to_cc_send_fifo_cache_id);
+#endif
+    }
+  }
+  else
+  {
+    if(cas_to_cc_send_fifo_get)
+    {
+      m_cas_to_cc_send_inst_fifo.simple_get();
+      m_cas_to_cc_send_srcid_fifo.simple_get();
+#if L1_MULTI_CACHE
+      m_cas_to_cc_send_cache_id_fifo.simple_get();
+#endif
+    }
+  }
+
+  m_cpt_cycles++;
+
+} // end transition()
+
+/////////////////////////////
+tmpl(void)::genMoore()
+/////////////////////////////
+{
+  ////////////////////////////////////////////////////////////
+  // Command signals on the p_vci_ixr port
+  ////////////////////////////////////////////////////////////
+
+  p_vci_ixr.be      = 0xF;
+  p_vci_ixr.pktid   = 0;
+  p_vci_ixr.srcid   = m_srcid_ixr;
+  p_vci_ixr.cons    = false;
+  p_vci_ixr.wrap    = false;
+  p_vci_ixr.contig  = true;
+  p_vci_ixr.clen    = 0;
+  p_vci_ixr.cfixed  = false;
+
+  if(r_ixr_cmd_fsm.read() == IXR_CMD_READ_NLINE)
+  {
+    p_vci_ixr.cmd     = vci_param::CMD_READ;
+    p_vci_ixr.cmdval  = true;
+    p_vci_ixr.address = (addr_t)(r_read_to_ixr_cmd_nline.read() *m_words*4);
+    p_vci_ixr.plen    = m_words*4;
+    p_vci_ixr.wdata   = 0x00000000;
+    p_vci_ixr.trdid   = r_read_to_ixr_cmd_trdid.read();
+    p_vci_ixr.eop     = true;
+  }
+  else if(r_ixr_cmd_fsm.read() == IXR_CMD_CAS_NLINE)
+  {
+    if(r_cas_to_ixr_cmd_write.read())
+    {
+      p_vci_ixr.cmd     = vci_param::CMD_WRITE;
+      p_vci_ixr.cmdval  = true;
+      p_vci_ixr.address = (addr_t)((r_cas_to_ixr_cmd_nline.read() *m_words+r_ixr_cmd_cpt.read()) *4);
+      p_vci_ixr.plen    = m_words*4;
+      p_vci_ixr.wdata   = r_cas_to_ixr_cmd_data[r_ixr_cmd_cpt.read()].read();
+      p_vci_ixr.trdid   = r_cas_to_ixr_cmd_trdid.read();
+      p_vci_ixr.eop     = (r_ixr_cmd_cpt == (m_words-1));
+    }
+    else
+    {
+      p_vci_ixr.cmd     = vci_param::CMD_READ;
+      p_vci_ixr.cmdval  = true;
+      p_vci_ixr.address = (addr_t)(r_cas_to_ixr_cmd_nline.read() *m_words*4);
+      p_vci_ixr.plen    = m_words*4;
+      p_vci_ixr.wdata   = 0x00000000;
+      p_vci_ixr.trdid   = r_cas_to_ixr_cmd_trdid.read();
+      p_vci_ixr.eop     = true;
+    }
+  }
+  else if(r_ixr_cmd_fsm.read() == IXR_CMD_WRITE_NLINE)
+  {
+    if(r_write_to_ixr_cmd_write.read())
+    {
+      p_vci_ixr.cmd     = vci_param::CMD_WRITE;
+      p_vci_ixr.cmdval  = true;
+      p_vci_ixr.address = (addr_t)((r_write_to_ixr_cmd_nline.read() *m_words+r_ixr_cmd_cpt.read()) *4);
+      p_vci_ixr.plen    = m_words*4;
+      p_vci_ixr.wdata   = r_write_to_ixr_cmd_data[r_ixr_cmd_cpt.read()].read();
+      p_vci_ixr.trdid   = r_write_to_ixr_cmd_trdid.read();
+      p_vci_ixr.eop     = (r_ixr_cmd_cpt == (m_words-1));
+    }
+    else
+    {
+      p_vci_ixr.cmd     = vci_param::CMD_READ;
+      p_vci_ixr.cmdval  = true;
+      p_vci_ixr.address = (addr_t)(r_write_to_ixr_cmd_nline.read() *m_words*4);
+      p_vci_ixr.plen    = m_words*4;
+      p_vci_ixr.wdata   = 0x00000000;
+      p_vci_ixr.trdid   = r_write_to_ixr_cmd_trdid.read();
+      p_vci_ixr.eop     = true;
+    }
+  }
+  else if(r_ixr_cmd_fsm.read() == IXR_CMD_XRAM_DATA)
+  {
+    p_vci_ixr.cmd     = vci_param::CMD_WRITE;
+    p_vci_ixr.cmdval  = true;
+    p_vci_ixr.address = (addr_t)((r_xram_rsp_to_ixr_cmd_nline.read() *m_words+r_ixr_cmd_cpt.read()) *4);
+    p_vci_ixr.plen    = m_words*4;
+    p_vci_ixr.wdata   = r_xram_rsp_to_ixr_cmd_data[r_ixr_cmd_cpt.read()].read();
+    p_vci_ixr.trdid   = r_xram_rsp_to_ixr_cmd_trdid.read();
+    p_vci_ixr.eop     = (r_ixr_cmd_cpt == (m_words-1));
+  }
+  else
+  {
+    p_vci_ixr.cmdval  = false;
+    p_vci_ixr.address = 0;
+    p_vci_ixr.plen    = 0;
+    p_vci_ixr.wdata   = 0;
+    p_vci_ixr.trdid   = 0;
+    p_vci_ixr.eop = false;
+  }
+
+  ////////////////////////////////////////////////////
+  // Response signals on the p_vci_ixr port
+  ////////////////////////////////////////////////////
+
+  if(((r_alloc_trt_fsm.read() == ALLOC_TRT_IXR_RSP) &&
+      (r_ixr_rsp_fsm.read()   == IXR_RSP_TRT_READ)) ||
+      (r_ixr_rsp_fsm.read()   == IXR_RSP_ACK))
+    
+    p_vci_ixr.rspack = true;
+
+  else
+    p_vci_ixr.rspack = false;
+
+  ////////////////////////////////////////////////////
+  // Command signals on the p_vci_tgt port
+  ////////////////////////////////////////////////////
+
+  switch((tgt_cmd_fsm_state_e) r_tgt_cmd_fsm.read())
+  {
+    case TGT_CMD_IDLE:
+      p_vci_tgt.cmdack  = false;
+      break;
+
+    case TGT_CMD_READ:
+      p_vci_tgt.cmdack  = m_cmd_read_addr_fifo.wok();
+      break;
+
+    case TGT_CMD_WRITE:
+      p_vci_tgt.cmdack  = m_cmd_write_addr_fifo.wok();
+      break;
+
+    case TGT_CMD_CAS:
+      p_vci_tgt.cmdack  = m_cmd_cas_addr_fifo.wok();
+      break;
+
+    default:
+      p_vci_tgt.cmdack  = false;
+      break;
+  }
+
+  ////////////////////////////////////////////////////
+  // Response signals on the p_vci_tgt port
+  ////////////////////////////////////////////////////
+  switch(r_tgt_rsp_fsm.read())
+  {
+    case TGT_RSP_READ_IDLE:
+    case TGT_RSP_WRITE_IDLE:
+    case TGT_RSP_CAS_IDLE:
+    case TGT_RSP_XRAM_IDLE:
+    case TGT_RSP_INIT_IDLE:
+    case TGT_RSP_CLEANUP_IDLE:
+      p_vci_tgt.rspval  = false;
+      p_vci_tgt.rsrcid  = 0;
+      p_vci_tgt.rdata   = 0;
+      p_vci_tgt.rpktid  = 0;
+      p_vci_tgt.rtrdid  = 0;
+      p_vci_tgt.rerror  = 0;
+      p_vci_tgt.reop    = false;
+      break;
+
+    case TGT_RSP_READ:
+      p_vci_tgt.rspval   = true;
+      if(((r_read_to_tgt_rsp_pktid.read() & 0x7) == TYPE_LL)
+          && (r_tgt_rsp_cpt.read() == (r_read_to_tgt_rsp_word.read() +r_read_to_tgt_rsp_length-1)))
+        p_vci_tgt.rdata  = r_read_to_tgt_rsp_data[r_tgt_rsp_cpt.read()-1].read();
+      else if((r_read_to_tgt_rsp_pktid.read() & 0x7) == TYPE_LL)
+        p_vci_tgt.rdata  = r_read_to_tgt_rsp_ll_key.read();
+      else
+        p_vci_tgt.rdata  = r_read_to_tgt_rsp_data[r_tgt_rsp_cpt.read()].read();
+      p_vci_tgt.rsrcid   = r_read_to_tgt_rsp_srcid.read();
+      p_vci_tgt.rtrdid   = r_read_to_tgt_rsp_trdid.read();
+      p_vci_tgt.rpktid   = r_read_to_tgt_rsp_pktid.read();
+      p_vci_tgt.rerror   = 0;
+      p_vci_tgt.reop     = (r_tgt_rsp_cpt.read() == (r_read_to_tgt_rsp_word.read() +r_read_to_tgt_rsp_length-1));
+      break;
+
+    case TGT_RSP_WRITE:
+      p_vci_tgt.rspval   = true;
+      if(((r_write_to_tgt_rsp_pktid.read() & 0x7) == TYPE_SC) && r_write_to_tgt_rsp_sc_fail.read())
+        p_vci_tgt.rdata  = 1;
+      else
+        p_vci_tgt.rdata  = 0;
+      p_vci_tgt.rsrcid   = r_write_to_tgt_rsp_srcid.read();
+      p_vci_tgt.rtrdid   = r_write_to_tgt_rsp_trdid.read();
+      p_vci_tgt.rpktid   = r_write_to_tgt_rsp_pktid.read();
+      p_vci_tgt.rerror   = 0;
+      p_vci_tgt.reop     = true;
+      break;
+
+    case TGT_RSP_CLEANUP:
+      p_vci_tgt.rspval   = true;
+      p_vci_tgt.rdata    = 0;
+      p_vci_tgt.rsrcid   = r_cleanup_to_tgt_rsp_srcid.read();
+      p_vci_tgt.rtrdid   = r_cleanup_to_tgt_rsp_trdid.read();
+      p_vci_tgt.rpktid   = r_cleanup_to_tgt_rsp_pktid.read();
+      p_vci_tgt.rerror   = 0; // Can be a CAS rsp
+      p_vci_tgt.reop     = true;
+      break;
+
+    case TGT_RSP_CAS:
+      p_vci_tgt.rspval   = true;
+      p_vci_tgt.rdata    = r_cas_to_tgt_rsp_data.read();
+      p_vci_tgt.rsrcid   = r_cas_to_tgt_rsp_srcid.read();
+      p_vci_tgt.rtrdid   = r_cas_to_tgt_rsp_trdid.read();
+      p_vci_tgt.rpktid   = r_cas_to_tgt_rsp_pktid.read();
+      p_vci_tgt.rerror   = 0;
+      p_vci_tgt.reop     = true;
+      break;
+
+    case TGT_RSP_XRAM:
+      p_vci_tgt.rspval   = true;
+      if(((r_xram_rsp_to_tgt_rsp_pktid.read() & 0x7) == TYPE_LL)
+          && (r_tgt_rsp_cpt.read() == (r_xram_rsp_to_tgt_rsp_word.read() +r_xram_rsp_to_tgt_rsp_length-1)))
+        p_vci_tgt.rdata  = r_xram_rsp_to_tgt_rsp_ll_key.read();
+      else
+        p_vci_tgt.rdata  = r_xram_rsp_to_tgt_rsp_data[r_tgt_rsp_cpt.read()].read();
+      p_vci_tgt.rsrcid   = r_xram_rsp_to_tgt_rsp_srcid.read();
+      p_vci_tgt.rtrdid   = r_xram_rsp_to_tgt_rsp_trdid.read();
+      p_vci_tgt.rpktid   = r_xram_rsp_to_tgt_rsp_pktid.read();
+      p_vci_tgt.rerror   = r_xram_rsp_to_tgt_rsp_rerror.read();
+      p_vci_tgt.reop     = ((r_tgt_rsp_cpt.read()
+                             == (r_xram_rsp_to_tgt_rsp_word.read() +r_xram_rsp_to_tgt_rsp_length.read()-1))
+                            || r_xram_rsp_to_tgt_rsp_rerror.read());
+      break;
+
+    case TGT_RSP_INIT:
+      p_vci_tgt.rspval   = true;
+      p_vci_tgt.rdata    = 0; // Can be a CAS or SC rsp
+      p_vci_tgt.rsrcid   = r_multi_ack_to_tgt_rsp_srcid.read();
+      p_vci_tgt.rtrdid   = r_multi_ack_to_tgt_rsp_trdid.read();
+      p_vci_tgt.rpktid   = r_multi_ack_to_tgt_rsp_pktid.read();
+      p_vci_tgt.rerror   = 0;
+      p_vci_tgt.reop     = true;
+      break;
+  } // end switch r_tgt_rsp_fsm
+
+  ////////////////////////////////////////////////////////////////////
+  // Initiator command signals on the p_dspin_out port (CC_SEND FSM)
+  ////////////////////////////////////////////////////////////////////
+  p_dspin_out.write = false;
+  p_dspin_out.data  = 0;
+
+  switch(r_cc_send_fsm.read())
+  {
+    case CC_SEND_XRAM_RSP_IDLE:
+    case CC_SEND_WRITE_IDLE:
+    case CC_SEND_CAS_IDLE:
+    case CC_SEND_CLEANUP_IDLE:
+        break;
+
+    case CC_SEND_CLEANUP_ACK:
+      {
+        uint64_t flit = 0;
+  
+        dspin_param::dspin_set(
+            flit,
+            1ULL,
+            dspin_param::FROM_MC_EOP);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cleanup_to_cc_send_srcid.read(),
+            dspin_param::CLEANUP_ACK_DEST);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cleanup_to_cc_send_set_index.read(),
+            dspin_param::CLEANUP_ACK_SET);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cleanup_to_cc_send_way_index.read(),
+            dspin_param::CLEANUP_ACK_WAY);
+
+        dspin_param::dspin_set(
+            flit,
+            dspin_param::TYPE_CLEANUP_ACK,
+            dspin_param::FROM_MC_TYPE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_INVAL_HEADER:
+      {
+        uint8_t multi_inval_type;
+        if(m_xram_rsp_to_cc_send_inst_fifo.read())
+        {
+          multi_inval_type = dspin_param::TYPE_MULTI_INVAL_INST;
+        }
+        else 
+        {
+          multi_inval_type = dspin_param::TYPE_MULTI_INVAL_DATA;
+        }
+
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            m_xram_rsp_to_cc_send_srcid_fifo.read(),
+            dspin_param::MULTI_INVAL_DEST);
+
+        dspin_param::dspin_set(
+            flit,
+            m_srcid_ini,
+            dspin_param::MULTI_INVAL_SRCID);
+
+        dspin_param::dspin_set(
+            flit,
+            r_xram_rsp_to_cc_send_trdid.read(),
+            dspin_param::MULTI_INVAL_UPDT_INDEX);
+
+        dspin_param::dspin_set(
+            flit,
+            multi_inval_type,
+            dspin_param::FROM_MC_TYPE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit; 
+
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_INVAL_NLINE:
+      {
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            1ULL,
+            dspin_param::FROM_MC_EOP);
+
+        dspin_param::dspin_set(
+            flit,
+            r_xram_rsp_to_cc_send_nline.read(),
+            dspin_param::MULTI_INVAL_NLINE);
+        
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_BRDCAST_HEADER:
+    case CC_SEND_WRITE_BRDCAST_HEADER:
+    case CC_SEND_CAS_BRDCAST_HEADER:
+      {
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            m_broadcast_address,
+            dspin_param::BROADCAST_BOX);
+
+        dspin_param::dspin_set(
+            flit,
+            m_srcid_ini,
+            dspin_param::BROADCAST_SRCID);
+
+        dspin_param::dspin_set(
+            flit,
+            1ULL,
+            dspin_param::BROADCAST_BC);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_XRAM_RSP_BRDCAST_NLINE:
+      {
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            1ULL,
+            dspin_param::FROM_MC_EOP);
+
+        dspin_param::dspin_set(
+            flit,
+            r_xram_rsp_to_cc_send_trdid.read(),
+            dspin_param::BROADCAST_UPDT_INDEX);
+
+        dspin_param::dspin_set(
+            flit,
+            r_xram_rsp_to_cc_send_nline.read(),
+            dspin_param::BROADCAST_NLINE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_WRITE_BRDCAST_NLINE:
+      {
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            1ULL,
+            dspin_param::FROM_MC_EOP);
+
+        dspin_param::dspin_set(
+            flit,
+            r_write_to_cc_send_trdid.read(),
+            dspin_param::BROADCAST_UPDT_INDEX);
+
+        dspin_param::dspin_set(
+            flit,
+            r_write_to_cc_send_nline.read(),
+            dspin_param::BROADCAST_NLINE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_CAS_BRDCAST_NLINE:
+      {
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            1ULL,
+            dspin_param::FROM_MC_EOP);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cas_to_cc_send_trdid.read(),
+            dspin_param::BROADCAST_UPDT_INDEX);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cas_to_cc_send_nline.read(),
+            dspin_param::BROADCAST_NLINE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_WRITE_UPDT_HEADER:
+      {
+        uint8_t multi_updt_type;
+        if(m_write_to_cc_send_inst_fifo.read())
+        {
+          multi_updt_type = dspin_param::TYPE_MULTI_UPDT_INST;
+        }
+        else 
+        {
+          multi_updt_type = dspin_param::TYPE_MULTI_UPDT_DATA;
+        }
+
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            m_write_to_cc_send_srcid_fifo.read(),
+            dspin_param::MULTI_UPDT_DEST);
+
+        dspin_param::dspin_set(
+            flit,
+            m_srcid_ini,
+            dspin_param::MULTI_UPDT_SRCID);
+
+        dspin_param::dspin_set(
+            flit,
+            r_write_to_cc_send_trdid.read(),
+            dspin_param::MULTI_UPDT_UPDT_INDEX);
+
+        dspin_param::dspin_set(
+            flit,
+            multi_updt_type,
+            dspin_param::FROM_MC_TYPE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_WRITE_UPDT_NLINE:
+      {
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            r_write_to_cc_send_index.read(),
+            dspin_param::MULTI_UPDT_WORD_INDEX);
+
+        dspin_param::dspin_set(
+            flit,
+            r_write_to_cc_send_nline.read(),
+            dspin_param::MULTI_UPDT_NLINE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_WRITE_UPDT_DATA:
+      {
+        uint8_t multi_updt_eop;
+        if(  r_cc_send_cpt.read() ==
+            (r_write_to_cc_send_count.read()-1))
+        {
+          multi_updt_eop = 1;
+        }
+        else
+        {
+          multi_updt_eop = 0;
+        }
+
+        uint8_t multi_updt_cpt  = 
+          r_cc_send_cpt.read() + r_write_to_cc_send_index.read();
+
+        uint8_t  multi_updt_be   = r_write_to_cc_send_be[multi_updt_cpt].read();
+        uint32_t multi_updt_data = r_write_to_cc_send_data[multi_updt_cpt].read();
+
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            (uint64_t)multi_updt_eop,
+            dspin_param::FROM_MC_EOP);
+
+        dspin_param::dspin_set(
+            flit,
+            multi_updt_be,
+            dspin_param::MULTI_UPDT_BE);
+
+        dspin_param::dspin_set(
+            flit,
+            multi_updt_data,
+            dspin_param::MULTI_UPDT_DATA);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_CAS_UPDT_HEADER:
+      {
+        uint8_t multi_updt_type;
+        if(m_cas_to_cc_send_inst_fifo.read())
+        {
+          multi_updt_type = dspin_param::TYPE_MULTI_UPDT_INST;
+        }
+        else 
+        {
+          multi_updt_type = dspin_param::TYPE_MULTI_UPDT_DATA;
+        }
+
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            m_cas_to_cc_send_srcid_fifo.read(),
+            dspin_param::MULTI_UPDT_DEST);
+
+        dspin_param::dspin_set(
+            flit,
+            m_srcid_ini,
+            dspin_param::MULTI_UPDT_SRCID);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cas_to_cc_send_trdid.read(),
+            dspin_param::MULTI_UPDT_UPDT_INDEX);
+
+        dspin_param::dspin_set(
+            flit,
+            multi_updt_type,
+            dspin_param::FROM_MC_TYPE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_CAS_UPDT_NLINE:
+      {
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            r_cas_to_cc_send_index.read(),
+            dspin_param::MULTI_UPDT_WORD_INDEX);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cas_to_cc_send_nline.read(),
+            dspin_param::MULTI_UPDT_NLINE);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_CAS_UPDT_DATA:
+      {
+        uint8_t multi_updt_eop;
+        if(not r_cas_to_cc_send_is_long.read())
+        {
+          multi_updt_eop = 1;
+        }
+        else
+        {
+          multi_updt_eop = 0;
+        }
+
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            (uint64_t)multi_updt_eop,
+            dspin_param::FROM_MC_EOP);
+
+        dspin_param::dspin_set(
+            flit,
+            0xF,
+            dspin_param::MULTI_UPDT_BE);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cas_to_cc_send_wdata.read(),
+            dspin_param::MULTI_UPDT_DATA);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+
+    case CC_SEND_CAS_UPDT_DATA_HIGH:
+      {
+        uint64_t flit = 0;
+
+        dspin_param::dspin_set(
+            flit,
+            1ULL,
+            dspin_param::FROM_MC_EOP);
+
+        dspin_param::dspin_set(
+            flit,
+            0xF,
+            dspin_param::MULTI_UPDT_BE);
+
+        dspin_param::dspin_set(
+            flit,
+            r_cas_to_cc_send_wdata_high.read(),
+            dspin_param::MULTI_UPDT_DATA);
+
+        p_dspin_out.write = true;
+        p_dspin_out.data  = flit;
+
+        break;
+      }
+  }
+
+  ///////////////////////////////////////////////////////////////////
+  // Target command signals from the p_dspin_in port (CC_RECEIVE FSM)
+  ///////////////////////////////////////////////////////////////////
+  p_dspin_in.read = false;
+  switch(r_cc_receive_fsm.read())
+  {
+    case CC_RECEIVE_IDLE:
+      {
+        break;
+      }
+    case CC_RECEIVE_CLEANUP:
+      {
+        p_dspin_in.read = m_cc_receive_to_cleanup_fifo.wok();
+        break;
+      }
+    case CC_RECEIVE_MULTI_ACK:
+      {
+        p_dspin_in.read = m_cc_receive_to_multi_ack_fifo.wok();
+        break;
+      }
+  }
+  // end switch r_cc_send_fsm
+} // end genMoore()
+
+}
+} // end name space
+
+// Local Variables:
+// tab-width: 2
+// c-basic-offset: 2
+// c-file-offsets:((innamespace . 0)(inline-open . 0))
+// indent-tabs-mode: nil
+// End:
+
+// vim: filetype=cpp:expandtab:shiftwidth=2:tabstop=2:softtabstop=2
