[67] | 1 | #ifdef VHDL |
---|
| 2 | /* |
---|
| 3 | * $Id: Queue_vhdl_body.cpp 81 2008-04-15 18:40:01Z rosiere $ |
---|
| 4 | * |
---|
| 5 | * [ Description ] |
---|
| 6 | * |
---|
| 7 | */ |
---|
| 8 | |
---|
| 9 | #include "Behavioural/Generic/Queue/include/Queue.h" |
---|
| 10 | |
---|
| 11 | namespace morpheo { |
---|
| 12 | namespace behavioural { |
---|
| 13 | namespace generic { |
---|
| 14 | namespace queue { |
---|
| 15 | |
---|
| 16 | |
---|
| 17 | #undef FUNCTION |
---|
| 18 | #define FUNCTION "Queue::vhdl_body" |
---|
| 19 | void Queue::vhdl_body (Vhdl * & vhdl) |
---|
| 20 | { |
---|
| 21 | log_printf(FUNC,Queue,FUNCTION,"Begin"); |
---|
| 22 | vhdl->set_body ("-----------------------------------------------------------------------------"); |
---|
| 23 | vhdl->set_body ("-- Output"); |
---|
| 24 | vhdl->set_body ("-----------------------------------------------------------------------------"); |
---|
| 25 | vhdl->set_body ("out_INSERT_ACK <= not reg_FULL;"); |
---|
| 26 | vhdl->set_body ("out_RETIRE_VAL <= not reg_EMPTY;"); |
---|
| 27 | |
---|
| 28 | if (_param->_size_queue > 1) |
---|
| 29 | vhdl->set_body ("out_RETIRE_DATA <= reg_DATA(conv_integer(reg_PTR_READ));"); |
---|
| 30 | else |
---|
| 31 | vhdl->set_body ("out_RETIRE_DATA <= reg_DATA(0);"); |
---|
| 32 | |
---|
| 33 | vhdl->set_body (""); |
---|
| 34 | vhdl->set_body ("-----------------------------------------------------------------------------"); |
---|
| 35 | vhdl->set_body ("-- Signal"); |
---|
| 36 | vhdl->set_body ("-----------------------------------------------------------------------------"); |
---|
| 37 | vhdl->set_body (""); |
---|
| 38 | vhdl->set_body ("signal_PTR_EQUAL <="); |
---|
| 39 | if (_param->_size_queue > 1) |
---|
| 40 | { |
---|
| 41 | vhdl->set_body ("\t'1' when signal_NEXT_PTR_READ = signal_NEXT_PTR_WRITE else"); |
---|
| 42 | vhdl->set_body ("\t'0';"); |
---|
| 43 | } |
---|
| 44 | else |
---|
| 45 | vhdl->set_body ("\t'1';"); |
---|
| 46 | vhdl->set_body ("signal_NEXT_FULL <="); |
---|
| 47 | vhdl->set_body ("\t'1' when signal_WRITE='1' and signal_PTR_EQUAL='1' else"); |
---|
| 48 | vhdl->set_body ("\t'0' when signal_READ ='1' else"); |
---|
| 49 | vhdl->set_body ("\treg_FULL ;"); |
---|
| 50 | vhdl->set_body ("signal_NEXT_EMPTY <="); |
---|
| 51 | vhdl->set_body ("\t'1' when signal_READ ='1' and signal_PTR_EQUAL='1' else"); |
---|
| 52 | vhdl->set_body ("\t'0' when signal_WRITE='1' else"); |
---|
| 53 | vhdl->set_body ("\treg_EMPTY;"); |
---|
| 54 | vhdl->set_body (""); |
---|
| 55 | vhdl->set_body ("-- read"); |
---|
| 56 | vhdl->set_body ("signal_READ <= (not reg_EMPTY) and in_RETIRE_ACK;"); |
---|
| 57 | |
---|
| 58 | if (_param->_size_queue > 1) |
---|
| 59 | { |
---|
| 60 | vhdl->set_body ("signal_NEXT_PTR_READ <= "); |
---|
| 61 | vhdl->set_body ("\treg_PTR_READ when signal_READ='0' else"); |
---|
| 62 | if (is_log2(_param->_size_queue) == false) |
---|
| 63 | vhdl->set_body ("\tconst_PTR_INIT when reg_PTR_READ = const_PTR_MAX else"); |
---|
[68] | 64 | |
---|
| 65 | if (_param->_size_queue > 2) |
---|
| 66 | vhdl->set_body ("\treg_PTR_READ +'1';"); |
---|
| 67 | else |
---|
| 68 | vhdl->set_body ("\tnot reg_PTR_READ;"); |
---|
[67] | 69 | } |
---|
| 70 | vhdl->set_body (""); |
---|
| 71 | vhdl->set_body ("-- write"); |
---|
| 72 | vhdl->set_body ("signal_WRITE <= (not reg_FULL ) and in_INSERT_VAL;"); |
---|
| 73 | if (_param->_size_queue > 1) |
---|
| 74 | { |
---|
| 75 | vhdl->set_body ("signal_NEXT_PTR_WRITE <= "); |
---|
| 76 | vhdl->set_body ("\treg_PTR_WRITE when signal_WRITE='0' else"); |
---|
| 77 | if (is_log2(_param->_size_queue) == false) |
---|
| 78 | vhdl->set_body ("\tconst_PTR_INIT when reg_PTR_WRITE = const_PTR_MAX else"); |
---|
[68] | 79 | if (_param->_size_queue > 2) |
---|
| 80 | vhdl->set_body ("\treg_PTR_WRITE+'1';"); |
---|
| 81 | else |
---|
| 82 | vhdl->set_body ("\tnot reg_PTR_WRITE;"); |
---|
[67] | 83 | } |
---|
| 84 | vhdl->set_body (""); |
---|
| 85 | vhdl->set_body ("-----------------------------------------------------------------------------"); |
---|
| 86 | vhdl->set_body ("-- Registers"); |
---|
| 87 | vhdl->set_body ("-----------------------------------------------------------------------------"); |
---|
| 88 | vhdl->set_body (""); |
---|
| 89 | vhdl->set_body ("queue_write: process (in_CLOCK)"); |
---|
| 90 | vhdl->set_body ("begin -- process queue_write"); |
---|
| 91 | vhdl->set_body ("\tif in_CLOCK'event and in_CLOCK = '1' then"); |
---|
| 92 | vhdl->set_body (""); |
---|
| 93 | vhdl->set_body ("\t\tif (in_NRESET = '0') then"); |
---|
| 94 | if (_param->_size_queue > 1) |
---|
| 95 | { |
---|
| 96 | vhdl->set_body ("\t\t\treg_PTR_READ <= const_PTR_INIT;"); |
---|
| 97 | vhdl->set_body ("\t\t\treg_PTR_WRITE <= const_PTR_INIT;"); |
---|
| 98 | } |
---|
| 99 | vhdl->set_body ("\t\t\treg_FULL <= '0';"); |
---|
| 100 | vhdl->set_body ("\t\t\treg_EMPTY <= '1';"); |
---|
| 101 | vhdl->set_body ("\t\telse"); |
---|
| 102 | if (_param->_size_queue > 1) |
---|
| 103 | { |
---|
| 104 | vhdl->set_body ("\t\t\treg_PTR_READ <= signal_NEXT_PTR_READ ;"); |
---|
| 105 | vhdl->set_body ("\t\t\treg_PTR_WRITE <= signal_NEXT_PTR_WRITE;"); |
---|
| 106 | } |
---|
| 107 | vhdl->set_body ("\t\t\treg_FULL <= signal_NEXT_FULL ;"); |
---|
| 108 | vhdl->set_body ("\t\t\treg_EMPTY <= signal_NEXT_EMPTY;"); |
---|
| 109 | vhdl->set_body (""); |
---|
| 110 | vhdl->set_body ("\t\t\tif (signal_WRITE = '1') then"); |
---|
| 111 | if (_param->_size_queue > 1) |
---|
| 112 | vhdl->set_body ("\t\t\t\treg_DATA(conv_integer(reg_PTR_WRITE)) <= in_INSERT_DATA;"); |
---|
| 113 | else |
---|
| 114 | vhdl->set_body ("\t\t\t\treg_DATA(0) <= in_INSERT_DATA;"); |
---|
| 115 | vhdl->set_body ("\t\t\tend if;"); |
---|
| 116 | vhdl->set_body ("\t\tend if;"); |
---|
| 117 | vhdl->set_body (""); |
---|
| 118 | vhdl->set_body ("\tend if;"); |
---|
| 119 | vhdl->set_body ("end process queue_write;"); |
---|
| 120 | |
---|
| 121 | log_printf(FUNC,Queue,FUNCTION,"End"); |
---|
| 122 | }; |
---|
| 123 | |
---|
| 124 | }; // end namespace queue |
---|
| 125 | }; // end namespace generic |
---|
| 126 | |
---|
| 127 | }; // end namespace behavioural |
---|
| 128 | }; // end namespace morpheo |
---|
| 129 | #endif |
---|