| 1 | #ifdef VHDL |
|---|
| 2 | /* |
|---|
| 3 | * $Id: RegisterFile_Internal_Banked_vhdl_body.cpp 145 2010-10-13 18:15:51Z rosiere $ |
|---|
| 4 | * |
|---|
| 5 | * [ Description ] |
|---|
| 6 | * |
|---|
| 7 | */ |
|---|
| 8 | |
|---|
| 9 | #include "Behavioural/Generic/RegisterFile/RegisterFile_Internal_Banked/include/RegisterFile_Internal_Banked.h" |
|---|
| 10 | |
|---|
| 11 | namespace morpheo { |
|---|
| 12 | namespace behavioural { |
|---|
| 13 | namespace generic { |
|---|
| 14 | namespace registerfile { |
|---|
| 15 | namespace registerfile_internal_banked { |
|---|
| 16 | |
|---|
| 17 | void RegisterFile_Internal_Banked::vhdl_body (Vhdl * & vhdl) |
|---|
| 18 | { |
|---|
| 19 | vhdl->set_body (0,""); |
|---|
| 20 | vhdl->set_comment(0,"---------------------------------------------------------------------------"); |
|---|
| 21 | vhdl->set_comment(0," Ackitement"); |
|---|
| 22 | vhdl->set_comment(0,"---------------------------------------------------------------------------"); |
|---|
| 23 | vhdl->set_body (0,""); |
|---|
| 24 | |
|---|
| 25 | for (uint32_t num_read=0; num_read<_param->_nb_port_read; ++num_read) |
|---|
| 26 | vhdl->set_body (0,"out_READ_"+toString(num_read)+"_ACK <= '1';"); |
|---|
| 27 | for (uint32_t num_write=0; num_write<_param->_nb_port_write; ++num_write) |
|---|
| 28 | vhdl->set_body (0,"out_WRITE_"+toString(num_write)+"_ACK <= '1';"); |
|---|
| 29 | |
|---|
| 30 | vhdl->set_body (0,""); |
|---|
| 31 | vhdl->set_comment(0,"---------------------------------------------------------------------------"); |
|---|
| 32 | vhdl->set_comment(0," Read RegisterFile"); |
|---|
| 33 | vhdl->set_comment(0,"---------------------------------------------------------------------------"); |
|---|
| 34 | vhdl->set_body (0,""); |
|---|
| 35 | |
|---|
| 36 | if (_param->_size_ptr_write>0) |
|---|
| 37 | for (uint32_t num_read=0; num_read<_param->_nb_port_read; ++num_read) |
|---|
| 38 | { |
|---|
| 39 | #ifdef PTR_IS_REGFILE |
|---|
| 40 | std::string str_address; |
|---|
| 41 | if (_param->_have_port_address) |
|---|
| 42 | str_address = "conv_integer(in_READ_"+toString(num_read)+"_ADDRESS)"; |
|---|
| 43 | else |
|---|
| 44 | str_address = "0"; |
|---|
| 45 | |
|---|
| 46 | vhdl->set_body (0,"READ_NUM_BANK_"+toString(num_read)+" <= reg_PTR_WRITE("+str_address+");"); |
|---|
| 47 | #else |
|---|
| 48 | |
|---|
| 49 | vhdl->set_body (0,"with in_READ_"+toString(num_read)+"_ADDRESS select"); |
|---|
| 50 | vhdl->set_body (1,"READ_NUM_BANK_"+toString(num_read)+" <="); |
|---|
| 51 | for (uint32_t num_word=0; num_word<_param->_nb_word-1; ++num_word) |
|---|
| 52 | vhdl->set_body (1,"reg_PTR_WRITE_"+toString(num_word)+" when "+std_logic_cst(_param->_size_address,num_word)+","); |
|---|
| 53 | vhdl->set_body (1,"reg_PTR_WRITE_"+toString(_param->_nb_word-1)+" when others;"); |
|---|
| 54 | #endif |
|---|
| 55 | } |
|---|
| 56 | vhdl->set_body (0,""); |
|---|
| 57 | |
|---|
| 58 | for (uint32_t num_read=0; num_read<_param->_nb_port_read; ++num_read) |
|---|
| 59 | { |
|---|
| 60 | std::string str_address; |
|---|
| 61 | if (_param->_have_port_address) |
|---|
| 62 | str_address = "conv_integer(in_READ_"+toString(num_read)+"_ADDRESS)"; |
|---|
| 63 | else |
|---|
| 64 | str_address = "0"; |
|---|
| 65 | |
|---|
| 66 | vhdl->set_body (0,"out_READ_"+toString(num_read)+"_DATA <="); |
|---|
| 67 | for (uint32_t num_write=0; num_write<_param->_nb_port_write; ++num_write) |
|---|
| 68 | { |
|---|
| 69 | std::string str_ptr_write=""; |
|---|
| 70 | if (_param->_size_ptr_write>0) |
|---|
| 71 | str_ptr_write = " and READ_NUM_BANK_"+toString(num_read)+" = "+std_logic_cst(_param->_size_ptr_write,num_write); |
|---|
| 72 | |
|---|
| 73 | vhdl->set_body (1,"reg_DATA_"+toString(num_write)+"_"+toString(num_read)+"("+str_address+") when in_READ_"+toString(num_read)+"_VAL = '1'"+str_ptr_write+" else"); |
|---|
| 74 | } |
|---|
| 75 | vhdl->set_body (1,std_logic_others(_param->_size_word,0)+";"); |
|---|
| 76 | } |
|---|
| 77 | |
|---|
| 78 | vhdl->set_body (0,""); |
|---|
| 79 | vhdl->set_comment(0,"---------------------------------------------------------------------------"); |
|---|
| 80 | vhdl->set_comment(0," Write RegisterFile"); |
|---|
| 81 | vhdl->set_comment(0,"---------------------------------------------------------------------------"); |
|---|
| 82 | vhdl->set_body (0,""); |
|---|
| 83 | |
|---|
| 84 | vhdl->set_body (0,"RegisterFile_write: process (in_CLOCK)"); |
|---|
| 85 | vhdl->set_body (0,"begin -- process RegisterFile_write"); |
|---|
| 86 | vhdl->set_body (1,"if in_CLOCK'event and in_CLOCK = '1' then"); |
|---|
| 87 | |
|---|
| 88 | if (_param->_have_init_value) |
|---|
| 89 | { |
|---|
| 90 | vhdl->set_body (2,"if in_NRESET = '0' then"); |
|---|
| 91 | |
|---|
| 92 | std::string init_value = ((_param->_size_word>1)?"\"":"'")+_param->_init_value+((_param->_size_word>1)?"\"":"'"); |
|---|
| 93 | |
|---|
| 94 | for (uint32_t num_word=0; num_word<_param->_nb_word; ++num_word) |
|---|
| 95 | { |
|---|
| 96 | for (uint32_t num_read=0; num_read<_param->_nb_port_read; ++num_read) |
|---|
| 97 | vhdl->set_body (3,"reg_DATA_0_"+toString(num_read)+"("+toString(num_word)+") <= "+init_value+";"); |
|---|
| 98 | |
|---|
| 99 | if (_param->_size_ptr_write>0) |
|---|
| 100 | { |
|---|
| 101 | #ifdef PTR_IS_REGFILE |
|---|
| 102 | vhdl->set_body (3,"reg_PTR_WRITE("+toString(num_word)+") <= "+std_logic_cst(_param->_size_ptr_write,0)+";"); |
|---|
| 103 | #else |
|---|
| 104 | vhdl->set_body (3,"reg_PTR_WRITE_"+toString(num_word)+" <= "+std_logic_cst(_param->_size_ptr_write,0)+";"); |
|---|
| 105 | #endif |
|---|
| 106 | } |
|---|
| 107 | } |
|---|
| 108 | vhdl->set_body (2,"else"); |
|---|
| 109 | } |
|---|
| 110 | // else |
|---|
| 111 | // { |
|---|
| 112 | // vhdl->set_body (2,"if in_NRESET = '0' then"); |
|---|
| 113 | |
|---|
| 114 | // for (uint32_t num_word=0; num_word<_param->_nb_word; ++num_word) |
|---|
| 115 | // if (_param->_size_ptr_write>0) |
|---|
| 116 | // vhdl->set_body (3,"reg_PTR_WRITE("+toString(num_word)+") <= "+std_logic_cst(_param->_size_ptr_write,0)+";"); |
|---|
| 117 | // vhdl->set_body (2,"else"); |
|---|
| 118 | // } |
|---|
| 119 | |
|---|
| 120 | |
|---|
| 121 | for (uint32_t num_write=0; num_write<_param->_nb_port_write; ++num_write) |
|---|
| 122 | { |
|---|
| 123 | std::string str_address; |
|---|
| 124 | if (_param->_have_port_address) |
|---|
| 125 | str_address = "conv_integer(in_WRITE_"+toString(num_write)+"_ADDRESS)"; |
|---|
| 126 | else |
|---|
| 127 | str_address = "0"; |
|---|
| 128 | |
|---|
| 129 | vhdl->set_body (2,"if (in_WRITE_"+toString(num_write)+"_VAL = '1') then"); |
|---|
| 130 | for (uint32_t num_read=0; num_read<_param->_nb_port_read; ++num_read) |
|---|
| 131 | vhdl->set_body (3,"reg_DATA_"+toString(num_write)+"_"+toString(num_read)+"("+str_address+") <= in_WRITE_"+toString(num_write)+"_DATA;"); |
|---|
| 132 | |
|---|
| 133 | if (_param->_size_ptr_write>0) |
|---|
| 134 | { |
|---|
| 135 | #ifdef PTR_IS_REGFILE |
|---|
| 136 | vhdl->set_body (3,"reg_PTR_WRITE("+str_address+") <= "+std_logic_cst(_param->_size_ptr_write,num_write)+";"); |
|---|
| 137 | #else |
|---|
| 138 | for (uint32_t num_word=0; num_word<_param->_nb_word; ++num_word) |
|---|
| 139 | { |
|---|
| 140 | vhdl->set_body (3,"if (in_WRITE_"+toString(num_write)+"_ADDRESS = "+std_logic_cst(_param->_size_address,num_word)+") then"); |
|---|
| 141 | vhdl->set_body (4,"reg_PTR_WRITE_"+toString(num_word)+" <= "+std_logic_cst(_param->_size_ptr_write,num_write)+";"); |
|---|
| 142 | vhdl->set_body (3,"end if;"); |
|---|
| 143 | } |
|---|
| 144 | #endif |
|---|
| 145 | } |
|---|
| 146 | vhdl->set_body (2,"end if;"); |
|---|
| 147 | } |
|---|
| 148 | |
|---|
| 149 | vhdl->set_body (1,"end if;"); |
|---|
| 150 | |
|---|
| 151 | if (_param->_have_init_value) |
|---|
| 152 | vhdl->set_body (1,"end if;"); |
|---|
| 153 | |
|---|
| 154 | vhdl->set_body (0,"end process RegisterFile_write;"); |
|---|
| 155 | }; |
|---|
| 156 | |
|---|
| 157 | }; // end namespace registerfile_internal_banked |
|---|
| 158 | }; // end namespace registerfile |
|---|
| 159 | }; // end namespace generic |
|---|
| 160 | }; // end namespace behavioural |
|---|
| 161 | }; // end namespace morpheo |
|---|
| 162 | #endif |
|---|