source: trunk/IPs/systemC/processor/Morpheo/Behavioural/Core/Core_Glue/src/Core_Glue_genMealy_issue.cpp @ 115

Last change on this file since 115 was 115, checked in by rosiere, 15 years ago

1) Write queue with mealy
2) Network : fix bug
3) leak memory
  • Property svn:keywords set to Id
File size: 8.2 KB
Line 
1#ifdef SYSTEMC
2/*
3 * $Id: Core_Glue_genMealy_issue.cpp 115 2009-04-20 21:29:17Z rosiere $
4 *
5 * [ Description ]
6 *
7 */
8
9#include "Behavioural/Core/Core_Glue/include/Core_Glue.h"
10#include "Common/include/Max.h"
11
12namespace morpheo                    {
13namespace behavioural {
14namespace core {
15namespace core_glue {
16
17
18#undef  FUNCTION
19#define FUNCTION "Core_Glue::genMealy_issue"
20  void Core_Glue::genMealy_issue (void)
21  {
22    log_begin(Core_Glue,FUNCTION);
23    log_function(Core_Glue,FUNCTION,_name.c_str());
24
25    Tcontrol_t ISSUE_OOO_ENGINE_ACK   [_param->_nb_ooo_engine  ][_param->_max_nb_inst_issue];
26    Tcontrol_t ISSUE_EXECUTE_LOOP_VAL [_param->_nb_execute_loop][_param->_max_nb_read_unit ];
27    bool       READ_UNIT_ENABLE       [_param->_nb_execute_loop][_param->_max_nb_read_unit ];
28
29    // Init -> all at 0
30    for (uint32_t i=0; i<_param->_nb_ooo_engine; ++i)
31      for (uint32_t j=0; j<_param->_nb_inst_issue[i]; ++j)
32        ISSUE_OOO_ENGINE_ACK [i][j] = 0;
33    for (uint32_t i=0; i<_param->_nb_execute_loop; ++i)
34      for (uint32_t j=0; j<_param->_nb_read_unit[i]; ++j)
35        {
36          ISSUE_EXECUTE_LOOP_VAL [i][j] = 0;
37          // Read unit is enable is signal ack is set
38          READ_UNIT_ENABLE       [i][j] = (PORT_READ(in_ISSUE_EXECUTE_LOOP_ACK [i][j]) == 1);
39          log_printf(TRACE,Core_Glue,FUNCTION,"  * Read_unit [%d][%d] : %d",i,j,READ_UNIT_ENABLE[i][j]);
40        }
41
42    for (uint32_t i=0; i<_param->_nb_execute_loop; ++i)
43      {
44        log_printf(TRACE,Core_Glue,FUNCTION,"  * execute_loop [%d]",i);
45
46        // for each issue of each ooo_engine ...
47        std::list<generic::priority::select_t> * select_ooo_engine = _priority_ooo_engine[i]->select();
48        for (std::list<generic::priority::select_t>::iterator it_ooo_engine=select_ooo_engine->begin();
49             it_ooo_engine!=select_ooo_engine->end();
50             ++it_ooo_engine)
51          {
52            // get id
53            const uint32_t ooo_engine_id  = it_ooo_engine->grp;
54            const uint32_t num_ooo_engine = _param->_translate_execute_loop_num_ooo_engine [i][ooo_engine_id];
55            const uint32_t num_inst_issue = it_ooo_engine->elt;
56
57            log_printf(TRACE,Core_Glue,FUNCTION,"    * num_ooo_engine [%d] (id -> %d)",num_ooo_engine, ooo_engine_id);
58            log_printf(TRACE,Core_Glue,FUNCTION,"    * num_inst_issue          : %d",num_inst_issue);
59
60            Tcontrol_t ooo_engine_val = PORT_READ(in_ISSUE_OOO_ENGINE_VAL [num_ooo_engine][num_inst_issue]);
61
62            log_printf(TRACE,Core_Glue,FUNCTION,"    * ISSUE_OOO_ENGINE_VAL    : %d",ooo_engine_val);
63
64            // test if have a request ?
65//          if (ooo_engine_val)
66              {
67//              // If ooo_engine can issue instruction on multiple execute_loop
68//              if (not ISSUE_OOO_ENGINE_ACK [num_ooo_engine][num_inst_issue])
69
70                // Scan all read_unit
71                std::list<generic::priority::select_t> * select_read_unit = _priority_read_unit[i]->select();
72                for (std::list<generic::priority::select_t>::iterator it_read_unit=select_read_unit->begin();
73                     it_read_unit!=select_read_unit->end();
74                     ++it_read_unit)
75                  {
76                    uint32_t num_read_unit = it_read_unit->grp;
77                   
78                    // Test if have an link and read unit is enable
79                    log_printf(TRACE,Core_Glue,FUNCTION,"      * read_unit             : %d",num_read_unit);
80                    log_printf(TRACE,Core_Glue,FUNCTION,"        * READ_UNIT_ENABLE    : %d",READ_UNIT_ENABLE [i][num_read_unit]);
81                    log_printf(TRACE,Core_Glue,FUNCTION,"        * table_dispatch      : %d",_param->_table_dispatch [num_ooo_engine][num_inst_issue][i][num_read_unit]);
82                   
83                    Tcontrol_t read_unit_enable = READ_UNIT_ENABLE [i][num_read_unit];
84
85                    // Test if the read_unit is not busy and if an link is between the issue slot and read_unit
86                    if (read_unit_enable and
87                        _param->_table_dispatch [num_ooo_engine][num_inst_issue][i][num_read_unit])
88                      {
89                        log_printf(TRACE,Core_Glue,FUNCTION,"        * find !!!");
90                       
91                        // Transaction
92                        READ_UNIT_ENABLE       [i][num_read_unit] = false; // now, this read_unit is busy
93                        ISSUE_EXECUTE_LOOP_VAL [i][num_read_unit] = ooo_engine_val; // = 1
94                        ISSUE_OOO_ENGINE_ACK   [num_ooo_engine][num_inst_issue] = read_unit_enable; // = 1
95                       
96                        if (_param->_have_port_context_id)
97                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_CONTEXT_ID            [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_CONTEXT_ID            [num_ooo_engine][num_inst_issue]));
98                        if (_param->_have_port_front_end_id)
99                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_FRONT_END_ID          [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_FRONT_END_ID          [num_ooo_engine][num_inst_issue]));
100                        if (_param->_have_port_ooo_engine_id)
101                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_OOO_ENGINE_ID         [i][num_read_unit],ooo_engine_id);
102                        if (_param->_have_port_rob_ptr)
103                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_PACKET_ID             [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_PACKET_ID             [num_ooo_engine][num_inst_issue]));
104                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_OPERATION             [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_OPERATION             [num_ooo_engine][num_inst_issue]));
105                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_TYPE                  [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_TYPE                  [num_ooo_engine][num_inst_issue]));
106                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_STORE_QUEUE_PTR_WRITE [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_STORE_QUEUE_PTR_WRITE [num_ooo_engine][num_inst_issue]));
107                        if (_param->_have_port_load_queue_ptr)
108                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_LOAD_QUEUE_PTR_WRITE  [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_LOAD_QUEUE_PTR_WRITE  [num_ooo_engine][num_inst_issue]));
109                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_HAS_IMMEDIAT          [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_HAS_IMMEDIAT          [num_ooo_engine][num_inst_issue]));
110                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_IMMEDIAT              [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_IMMEDIAT              [num_ooo_engine][num_inst_issue]));
111                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_READ_RA               [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_READ_RA               [num_ooo_engine][num_inst_issue]));
112                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_NUM_REG_RA            [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_NUM_REG_RA            [num_ooo_engine][num_inst_issue]));
113                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_READ_RB               [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_READ_RB               [num_ooo_engine][num_inst_issue]));
114                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_NUM_REG_RB            [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_NUM_REG_RB            [num_ooo_engine][num_inst_issue]));
115                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_READ_RC               [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_READ_RC               [num_ooo_engine][num_inst_issue]));
116                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_NUM_REG_RC            [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_NUM_REG_RC            [num_ooo_engine][num_inst_issue]));
117                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_WRITE_RD              [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_WRITE_RD              [num_ooo_engine][num_inst_issue]));
118                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_NUM_REG_RD            [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_NUM_REG_RD            [num_ooo_engine][num_inst_issue]));
119                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_WRITE_RE              [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_WRITE_RE              [num_ooo_engine][num_inst_issue]));
120                        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_NUM_REG_RE            [i][num_read_unit],PORT_READ(in_ISSUE_OOO_ENGINE_NUM_REG_RE            [num_ooo_engine][num_inst_issue]));
121
122                        break; // find : stop scan read_unit
123                      }
124                  }
125              }
126          }
127      }
128
129    // Write output
130    for (uint32_t i=0; i<_param->_nb_ooo_engine; ++i)
131      for (uint32_t j=0; j<_param->_nb_inst_issue[i]; ++j)
132        PORT_WRITE(out_ISSUE_OOO_ENGINE_ACK [i][j], ISSUE_OOO_ENGINE_ACK [i][j]);
133    for (uint32_t i=0; i<_param->_nb_execute_loop; ++i)
134      for (uint32_t j=0; j<_param->_nb_read_unit[i]; ++j)
135        PORT_WRITE(out_ISSUE_EXECUTE_LOOP_VAL [i][j], ISSUE_EXECUTE_LOOP_VAL [i][j]);
136
137    log_end(Core_Glue,FUNCTION);
138  };
139
140}; // end namespace core_glue
141}; // end namespace core
142
143}; // end namespace behavioural
144}; // end namespace morpheo             
145#endif
Note: See TracBrowser for help on using the repository browser.