source: trunk/IPs/systemC/processor/Morpheo/Behavioural/Core/Multi_Execute_loop/Execute_loop/Multi_Write_unit/Write_unit/Write_queue/src/Write_queue_transition.cpp

#ifdef SYSTEMC
//#if defined(STATISTICS) or defined(VHDL_TESTBENCH)
/*
 * $Id: Write_queue_transition.cpp 136 2009-10-20 18:52:15Z rosiere $
 *
 * [ Description ]
 * 
 */

#include "Behavioural/Core/Multi_Execute_loop/Execute_loop/Multi_Write_unit/Write_unit/Write_queue/include/Write_queue.h"

namespace morpheo                    {
namespace behavioural {
namespace core {
namespace multi_execute_loop {
namespace execute_loop {
namespace multi_write_unit {
namespace write_unit {
namespace write_queue {

#undef  FUNCTION
#define FUNCTION "Write_queue::transition"
  void Write_queue::transition (void)
  {
    log_begin(Write_queue,FUNCTION);
    log_function(Write_queue,FUNCTION,_name.c_str());

    if (PORT_READ(in_NRESET) == 0)
      {
        // Flush queue
        // FIXME "queue reset"
        // > 1) flush one slot by cycle
        // > 2) flush all slot in one cycle

        while (_queue->empty() == false)
          _queue->pop_front();
      }
    else
      {
        // Test access at gpr and spr
        if (internal_GPR_WRITE_VAL and PORT_READ(in_GPR_WRITE_ACK[0]))
          _queue->front()->_write_rd = 0;
        if (internal_SPR_WRITE_VAL and PORT_READ(in_SPR_WRITE_ACK[0]))
          _queue->front()->_write_re = 0;

        // Test if push
        if (PORT_READ(in_WRITE_QUEUE_IN_VAL) and internal_WRITE_QUEUE_IN_ACK)
          {
            write_queue_entry_t * entry = new write_queue_entry_t
              ((_param->_have_port_context_id   )?PORT_READ(in_WRITE_QUEUE_IN_CONTEXT_ID   ):0,
               (_param->_have_port_front_end_id )?PORT_READ(in_WRITE_QUEUE_IN_FRONT_END_ID ):0,
               (_param->_have_port_ooo_engine_id)?PORT_READ(in_WRITE_QUEUE_IN_OOO_ENGINE_ID):0,
               (_param->_have_port_rob_ptr      )?PORT_READ(in_WRITE_QUEUE_IN_PACKET_ID    ):0,
             //PORT_READ(in_WRITE_QUEUE_IN_OPERATION    ),
             //PORT_READ(in_WRITE_QUEUE_IN_TYPE         ),
               PORT_READ(in_WRITE_QUEUE_IN_CANCEL       ),
               PORT_READ(in_WRITE_QUEUE_IN_WRITE_RD     ),
               PORT_READ(in_WRITE_QUEUE_IN_NUM_REG_RD   ),
               PORT_READ(in_WRITE_QUEUE_IN_DATA_RD      ),
               PORT_READ(in_WRITE_QUEUE_IN_WRITE_RE     ),
               PORT_READ(in_WRITE_QUEUE_IN_NUM_REG_RE   ),
               PORT_READ(in_WRITE_QUEUE_IN_DATA_RE      ),
               PORT_READ(in_WRITE_QUEUE_IN_EXCEPTION    ),
               PORT_READ(in_WRITE_QUEUE_IN_NO_SEQUENCE  ),
               PORT_READ(in_WRITE_QUEUE_IN_ADDRESS      ));
            
            _queue->push_back(entry);
          }

        // Test if pop :
        //  * transaction on write_queue_out interface
        //  * have a speculative load and all register is write in registerfile
        if ( (internal_WRITE_QUEUE_OUT_VAL and PORT_READ(in_WRITE_QUEUE_OUT_ACK)) or
             ((_queue->empty() == false)                                         and
//            (_queue->front()->_type      == TYPE_MEMORY)                       and
              (_queue->front()->_exception == EXCEPTION_MEMORY_LOAD_SPECULATIVE) and // this exception code must be uniq
              (_queue->front()->_write_rd  == 0)                                 and
              (_queue->front()->_write_re  == 0)))
          {
            delete _queue->front();
            _queue->pop_front();
          }
      }

#ifdef STATISTICS
    if (usage_is_set(_usage,USE_STATISTICS))
      *(_stat_use_queue) += _queue->size();
#endif

#if DEBUG_Write_queue and (DEBUG >= DEBUG_TRACE)
    log_printf(TRACE,Write_queue,FUNCTION,"  * Dump Write_queue");
    {
      uint32_t i=0;
      
      for (std::list<write_queue_entry_t *>::iterator it=_queue->begin();
           it!=_queue->end();
           ++it)
        {
          log_printf(TRACE,Write_queue,FUNCTION,"  [%d] %.2d %.2d %.2d, %.4d, %.1d, %.1d %.4d %.8x, %.1d %.4d %.1d, %.2d %.1d, %.8x",
                     i,
                     (*it)->_context_id   ,
                     (*it)->_front_end_id ,
                     (*it)->_ooo_engine_id,
                     (*it)->_packet_id    ,
                   //(*it)->_operation    ,
                   //(*it)->_type         ,
                     (*it)->_cancel       ,
                     (*it)->_write_rd     ,
                     (*it)->_num_reg_rd   ,
                     (*it)->_data_rd      ,
                     (*it)->_write_re     ,
                     (*it)->_num_reg_re   ,
                     (*it)->_data_re      ,
                     (*it)->_exception    ,
                     (*it)->_no_sequence  ,
                     (*it)->_address      );

//           log_printf(TRACE,Write_queue,FUNCTION,"    * context_id   : %d",  (*it)->_context_id   );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * front_end_id : %d",  (*it)->_front_end_id );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * ooo_engine_id: %d",  (*it)->_ooo_engine_id);
//           log_printf(TRACE,Write_queue,FUNCTION,"    * packet_id    : %d",  (*it)->_packet_id    );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * write_rd     : %d",  (*it)->_write_rd     );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * num_reg_rd   : %d",  (*it)->_num_reg_rd   );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * data_rd      : %d",  (*it)->_data_rd      );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * write_re     : %d",  (*it)->_write_re     );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * num_reg_re   : %d",  (*it)->_num_reg_re   );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * data_re      : %d",  (*it)->_data_re      );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * exception    : %d",  (*it)->_exception    );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * no_sequence  : %d",  (*it)->_no_sequence  );
//           log_printf(TRACE,Write_queue,FUNCTION,"    * address      : %d",  (*it)->_address      );

          i++;
        }
    }
#endif

#if defined(STATISTICS) or defined(VHDL_TESTBENCH)
    end_cycle ();
#endif

    log_end(Write_queue,FUNCTION);
  };

}; // end namespace write_queue
}; // end namespace write_unit
}; // end namespace multi_write_unit
}; // end namespace execute_loop
}; // end namespace multi_execute_loop
}; // end namespace core

}; // end namespace behavioural
}; // end namespace morpheo              
#endif
//#endif