1 | #ifdef SYSTEMC |
---|
2 | /* |
---|
3 | * $Id: Issue_queue_genMealy.cpp 88 2008-12-10 18:31:39Z rosiere $ |
---|
4 | * |
---|
5 | * [ Description ] |
---|
6 | * |
---|
7 | */ |
---|
8 | |
---|
9 | #include "Behavioural/Core/Multi_OOO_Engine/OOO_Engine/Issue_queue/include/Issue_queue.h" |
---|
10 | |
---|
11 | namespace morpheo { |
---|
12 | namespace behavioural { |
---|
13 | namespace core { |
---|
14 | namespace multi_ooo_engine { |
---|
15 | namespace ooo_engine { |
---|
16 | namespace issue_queue { |
---|
17 | |
---|
18 | |
---|
19 | #undef FUNCTION |
---|
20 | #define FUNCTION "Issue_queue::genMealy" |
---|
21 | void Issue_queue::genMealy (void) |
---|
22 | { |
---|
23 | log_begin(Issue_queue,FUNCTION); |
---|
24 | log_function(Issue_queue,FUNCTION,_name.c_str()); |
---|
25 | |
---|
26 | Tcontrol_t bank_full [_param->_nb_bank]; |
---|
27 | Tcontrol_t issue_ack [_param->_nb_rename_unit][_param->_max_nb_inst_rename]; |
---|
28 | Tcontrol_t reexecute_ack [_param->_nb_inst_reexecute]; |
---|
29 | bool can_rename_select [_param->_nb_rename_unit]; |
---|
30 | |
---|
31 | // Initialisation |
---|
32 | for (uint32_t i=0; i<_param->_nb_bank; i++) |
---|
33 | { |
---|
34 | internal_BANK_IN_ACK [i] = false; |
---|
35 | bank_full [i] = not (_issue_queue[i].size() < _param->_size_bank); |
---|
36 | } |
---|
37 | for (uint32_t i=0; i<_param->_nb_rename_unit; i++) |
---|
38 | { |
---|
39 | can_rename_select [i] = true; |
---|
40 | for (uint32_t j=0; j<_param->_nb_inst_rename[i]; j++) |
---|
41 | issue_ack [i][j] = false; |
---|
42 | } |
---|
43 | for (uint32_t i=0; i<_param->_nb_inst_reexecute; i++) |
---|
44 | reexecute_ack [i] = false; |
---|
45 | |
---|
46 | std::list<generic::priority::select_t> * select_reg = _priority_reg->select(); // same select for all issue |
---|
47 | |
---|
48 | // Priority at the Reexecute instruction ! |
---|
49 | for (uint32_t i=0; i<_param->_nb_inst_reexecute; i++) |
---|
50 | // Test if have instruction |
---|
51 | if (PORT_READ(in_REEXECUTE_VAL [i])) |
---|
52 | { |
---|
53 | Ttype_t type = PORT_READ(in_REEXECUTE_TYPE [i]); |
---|
54 | |
---|
55 | // scan all bank |
---|
56 | for (std::list<generic::priority::select_t>::iterator it=select_reg->begin(); |
---|
57 | it!=select_reg->end(); |
---|
58 | it++) |
---|
59 | { |
---|
60 | uint32_t num_bank = it->grp; |
---|
61 | uint32_t num_issue = num_bank/_param->_nb_bank_select_out; |
---|
62 | // test if bank is not busy (full or previous access) and if type match |
---|
63 | if (not internal_BANK_IN_ACK [num_bank] and not bank_full [num_bank] and _param->_table_issue_type[num_issue][type]) |
---|
64 | { |
---|
65 | // find |
---|
66 | reexecute_ack [i] = true; |
---|
67 | internal_BANK_IN_ACK [num_bank] = true; |
---|
68 | internal_BANK_IN_IS_REEXECUTE [num_bank] = 1; |
---|
69 | internal_BANK_IN_NUM_INST [num_bank] = i; |
---|
70 | break; |
---|
71 | } |
---|
72 | } |
---|
73 | } |
---|
74 | |
---|
75 | // issue_in interface |
---|
76 | std::list<generic::priority::select_t> * select_in = _priority_in ->select(); // same select for all issue |
---|
77 | for (std::list<generic::priority::select_t>::iterator it=select_in ->begin(); |
---|
78 | it!=select_in ->end(); |
---|
79 | it++) |
---|
80 | { |
---|
81 | uint32_t num_rename_unit = it->grp; |
---|
82 | uint32_t num_inst_rename = it->elt; |
---|
83 | |
---|
84 | // Test if have instruction |
---|
85 | if (can_rename_select [num_rename_unit]// and |
---|
86 | // PORT_READ(in_ISSUE_IN_VAL [num_rename_unit][num_inst_rename]) |
---|
87 | ) |
---|
88 | { |
---|
89 | Ttype_t type = PORT_READ(in_ISSUE_IN_TYPE [num_rename_unit][num_inst_rename]); |
---|
90 | |
---|
91 | // scan all bank |
---|
92 | for (std::list<generic::priority::select_t>::iterator it=select_reg->begin(); |
---|
93 | it!=select_reg->end(); |
---|
94 | it++) |
---|
95 | { |
---|
96 | uint32_t num_bank = it->grp; |
---|
97 | uint32_t num_issue = num_bank/_param->_nb_bank_select_out; |
---|
98 | // test if bank is not busy (full or previous access) and if type match |
---|
99 | if (not internal_BANK_IN_ACK [num_bank] and not bank_full [num_bank] and _param->_table_issue_type[num_issue][type]) |
---|
100 | { |
---|
101 | // find |
---|
102 | issue_ack [num_rename_unit][num_inst_rename] = true; |
---|
103 | internal_BANK_IN_ACK [num_bank] = true; |
---|
104 | internal_BANK_IN_IS_REEXECUTE [num_bank] = 0; |
---|
105 | internal_BANK_IN_NUM_RENAME_UNIT [num_bank] = num_rename_unit; |
---|
106 | internal_BANK_IN_NUM_INST [num_bank] = num_inst_rename; |
---|
107 | break; |
---|
108 | } |
---|
109 | } |
---|
110 | |
---|
111 | // is a valid instruction, but it's not send at a bank |
---|
112 | // ... invalid this rename_unit (because, rename in_order) |
---|
113 | can_rename_select [num_rename_unit] |= issue_ack [num_rename_unit][num_inst_rename]; |
---|
114 | } |
---|
115 | } |
---|
116 | |
---|
117 | for (uint32_t i=0; i<_param->_nb_rename_unit; i++) |
---|
118 | for (uint32_t j=0; j<_param->_nb_inst_rename[i]; j++) |
---|
119 | PORT_WRITE(out_ISSUE_IN_ACK [i][j],issue_ack [i][j]); |
---|
120 | for (uint32_t i=0; i<_param->_nb_inst_reexecute; i++) |
---|
121 | PORT_WRITE(out_REEXECUTE_ACK [i],reexecute_ack [i]); |
---|
122 | |
---|
123 | log_end(Issue_queue,FUNCTION); |
---|
124 | }; |
---|
125 | |
---|
126 | }; // end namespace issue_queue |
---|
127 | }; // end namespace ooo_engine |
---|
128 | }; // end namespace multi_ooo_engine |
---|
129 | }; // end namespace core |
---|
130 | |
---|
131 | }; // end namespace behavioural |
---|
132 | }; // end namespace morpheo |
---|
133 | #endif |
---|