180718 HJM : 8 Count sensing data RF send, certTest, temp(cold)Test
Fork of EV-COG-AD3029LZ by
source/SimpleSpirit1.cpp@69:22e9b407effa, 2017-07-10 (annotated)
- Committer:
- Wolfgang Betz
- Date:
- Mon Jul 10 13:54:43 2017 +0200
- Revision:
- 69:22e9b407effa
- Parent:
- 68:247fd6e0ab66
- Child:
- 70:19b5f9b9ba80
Better handling of race condition around `_spirit_tx_started`
Who changed what in which revision?
User | Revision | Line number | New contents of line |
---|---|---|---|
Wolfgang Betz |
34:edda6a7238ec | 1 | /*** Mbed Includes ***/ |
Wolfgang Betz |
34:edda6a7238ec | 2 | #include "SimpleSpirit1.h" |
Wolfgang Betz |
34:edda6a7238ec | 3 | #include "radio_spi.h" |
Wolfgang Betz |
34:edda6a7238ec | 4 | |
Wolfgang Betz |
34:edda6a7238ec | 5 | #define SPIRIT_GPIO_IRQ (SPIRIT_GPIO_3) |
Wolfgang Betz |
34:edda6a7238ec | 6 | |
Wolfgang Betz |
34:edda6a7238ec | 7 | static uint16_t last_state; |
Wolfgang Betz |
34:edda6a7238ec | 8 | #define SPIRIT1_STATUS() ((last_state = (uint16_t)refresh_state()) & SPIRIT1_STATE_STATEBITS) |
Wolfgang Betz |
34:edda6a7238ec | 9 | |
Wolfgang Betz |
34:edda6a7238ec | 10 | #define XO_ON (0x1) |
Wolfgang Betz |
34:edda6a7238ec | 11 | |
Wolfgang Betz |
34:edda6a7238ec | 12 | #define BUSYWAIT_UNTIL(cond, millisecs) \ |
Wolfgang Betz |
69:22e9b407effa | 13 | do { \ |
Wolfgang Betz |
69:22e9b407effa | 14 | uint32_t start = us_ticker_read(); \ |
Wolfgang Betz |
69:22e9b407effa | 15 | while (!(cond) && ((us_ticker_read() - start) < ((uint32_t)millisecs)*1000U)); \ |
Wolfgang Betz |
69:22e9b407effa | 16 | } while(0) |
Wolfgang Betz |
34:edda6a7238ec | 17 | |
Wolfgang Betz |
34:edda6a7238ec | 18 | #define st_lib_spirit_irqs SpiritIrqs |
Wolfgang Betz |
34:edda6a7238ec | 19 | |
Wolfgang Betz |
37:bc043030b55a | 20 | #define STATE_TIMEOUT (100) |
Wolfgang Betz |
34:edda6a7238ec | 21 | |
Wolfgang Betz |
34:edda6a7238ec | 22 | // betzw: switching force & back from standby is on some devices quite unstable |
Wolfgang Betz |
34:edda6a7238ec | 23 | #define USE_STANDBY_STATE |
Wolfgang Betz |
34:edda6a7238ec | 24 | |
Wolfgang Betz |
34:edda6a7238ec | 25 | /*** Class Implementation ***/ |
Wolfgang Betz |
34:edda6a7238ec | 26 | /** Static Class Variables **/ |
Wolfgang Betz |
34:edda6a7238ec | 27 | SimpleSpirit1 *SimpleSpirit1::_singleton = NULL; |
Wolfgang Betz |
34:edda6a7238ec | 28 | |
Wolfgang Betz |
34:edda6a7238ec | 29 | /** Constructor **/ |
Wolfgang Betz |
34:edda6a7238ec | 30 | SimpleSpirit1::SimpleSpirit1(PinName mosi, PinName miso, PinName sclk, |
Wolfgang Betz |
69:22e9b407effa | 31 | PinName irq, PinName cs, PinName sdn, |
Wolfgang Betz |
69:22e9b407effa | 32 | PinName led) : |
Wolfgang Betz |
69:22e9b407effa | 33 | _spi(mosi, miso, sclk), |
Wolfgang Betz |
69:22e9b407effa | 34 | _irq(irq), |
Wolfgang Betz |
69:22e9b407effa | 35 | _chip_select(cs), |
Wolfgang Betz |
69:22e9b407effa | 36 | _shut_down(sdn), |
Wolfgang Betz |
69:22e9b407effa | 37 | _led(led), |
Wolfgang Betz |
69:22e9b407effa | 38 | _current_irq_callback(), |
Wolfgang Betz |
69:22e9b407effa | 39 | _rx_receiving_timeout() |
Wolfgang Betz |
34:edda6a7238ec | 40 | { |
Wolfgang Betz |
34:edda6a7238ec | 41 | } |
Wolfgang Betz |
34:edda6a7238ec | 42 | |
Wolfgang Betz |
34:edda6a7238ec | 43 | /** Init Function **/ |
Wolfgang Betz |
34:edda6a7238ec | 44 | void SimpleSpirit1::init() { |
Wolfgang Betz |
69:22e9b407effa | 45 | /* reset irq disable counter and irq callback & disable irq */ |
Wolfgang Betz |
69:22e9b407effa | 46 | _nr_of_irq_disables = 0; |
Wolfgang Betz |
69:22e9b407effa | 47 | disable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 48 | |
Wolfgang Betz |
69:22e9b407effa | 49 | /* unselect chip */ |
Wolfgang Betz |
69:22e9b407effa | 50 | chip_unselect(); |
Wolfgang Betz |
34:edda6a7238ec | 51 | |
Wolfgang Betz |
69:22e9b407effa | 52 | /* configure spi */ |
Wolfgang Betz |
69:22e9b407effa | 53 | _spi.format(8, 0); /* 8-bit, mode = 0, [order = SPI_MSB] only available in mbed3 */ |
Wolfgang Betz |
69:22e9b407effa | 54 | _spi.frequency(10000000); // 10MHz (i.e. max speed allowed for Spirit1) |
Wolfgang Betz |
34:edda6a7238ec | 55 | |
Wolfgang Betz |
69:22e9b407effa | 56 | /* install irq handler */ |
Wolfgang Betz |
69:22e9b407effa | 57 | _irq.mode(PullUp); |
Wolfgang Betz |
69:22e9b407effa | 58 | _irq.fall(Callback<void()>(this, &SimpleSpirit1::IrqHandler)); |
Wolfgang Betz |
34:edda6a7238ec | 59 | |
Wolfgang Betz |
69:22e9b407effa | 60 | /* init cube vars */ |
Wolfgang Betz |
69:22e9b407effa | 61 | spirit_on = OFF; |
Wolfgang Betz |
69:22e9b407effa | 62 | last_rssi = 0 ; //MGR |
Wolfgang Betz |
69:22e9b407effa | 63 | last_sqi = 0 ; //MGR |
Wolfgang Betz |
34:edda6a7238ec | 64 | |
Wolfgang Betz |
69:22e9b407effa | 65 | /* set frequencies */ |
Wolfgang Betz |
69:22e9b407effa | 66 | radio_set_xtal_freq(XTAL_FREQUENCY); |
Wolfgang Betz |
69:22e9b407effa | 67 | mgmt_set_freq_base((uint32_t)BASE_FREQUENCY); |
Wolfgang Betz |
34:edda6a7238ec | 68 | |
Wolfgang Betz |
69:22e9b407effa | 69 | /* restart board */ |
Wolfgang Betz |
69:22e9b407effa | 70 | enter_shutdown(); |
Wolfgang Betz |
69:22e9b407effa | 71 | exit_shutdown(); |
Wolfgang Betz |
34:edda6a7238ec | 72 | |
Wolfgang Betz |
69:22e9b407effa | 73 | /* soft core reset */ |
Wolfgang Betz |
69:22e9b407effa | 74 | cmd_strobe(SPIRIT1_STROBE_SRES); |
Wolfgang Betz |
34:edda6a7238ec | 75 | |
Wolfgang Betz |
69:22e9b407effa | 76 | /* Configures the SPIRIT1 radio part */ |
Wolfgang Betz |
69:22e9b407effa | 77 | SRadioInit x_radio_init = { |
Wolfgang Betz |
69:22e9b407effa | 78 | XTAL_OFFSET_PPM, |
Wolfgang Betz |
69:22e9b407effa | 79 | (uint32_t)BASE_FREQUENCY, |
Wolfgang Betz |
69:22e9b407effa | 80 | (uint32_t)CHANNEL_SPACE, |
Wolfgang Betz |
69:22e9b407effa | 81 | CHANNEL_NUMBER, |
Wolfgang Betz |
69:22e9b407effa | 82 | MODULATION_SELECT, |
Wolfgang Betz |
69:22e9b407effa | 83 | DATARATE, |
Wolfgang Betz |
69:22e9b407effa | 84 | (uint32_t)FREQ_DEVIATION, |
Wolfgang Betz |
69:22e9b407effa | 85 | (uint32_t)BANDWIDTH |
Wolfgang Betz |
69:22e9b407effa | 86 | }; |
Wolfgang Betz |
69:22e9b407effa | 87 | radio_init(&x_radio_init); |
Wolfgang Betz |
69:22e9b407effa | 88 | radio_set_pa_level_dbm(0,POWER_DBM); |
Wolfgang Betz |
69:22e9b407effa | 89 | radio_set_pa_level_max_index(0); |
Wolfgang Betz |
34:edda6a7238ec | 90 | |
Wolfgang Betz |
69:22e9b407effa | 91 | /* Configures the SPIRIT1 packet handler part*/ |
Wolfgang Betz |
69:22e9b407effa | 92 | PktBasicInit x_basic_init = { |
Wolfgang Betz |
69:22e9b407effa | 93 | PREAMBLE_LENGTH, |
Wolfgang Betz |
69:22e9b407effa | 94 | SYNC_LENGTH, |
Wolfgang Betz |
69:22e9b407effa | 95 | SYNC_WORD, |
Wolfgang Betz |
69:22e9b407effa | 96 | LENGTH_TYPE, |
Wolfgang Betz |
69:22e9b407effa | 97 | LENGTH_WIDTH, |
Wolfgang Betz |
69:22e9b407effa | 98 | CRC_MODE, |
Wolfgang Betz |
69:22e9b407effa | 99 | CONTROL_LENGTH, |
Wolfgang Betz |
69:22e9b407effa | 100 | EN_ADDRESS, |
Wolfgang Betz |
69:22e9b407effa | 101 | EN_FEC, |
Wolfgang Betz |
69:22e9b407effa | 102 | EN_WHITENING |
Wolfgang Betz |
69:22e9b407effa | 103 | }; |
Wolfgang Betz |
69:22e9b407effa | 104 | pkt_basic_init(&x_basic_init); |
Wolfgang Betz |
34:edda6a7238ec | 105 | |
Wolfgang Betz |
69:22e9b407effa | 106 | /* Enable the following interrupt sources, routed to GPIO */ |
Wolfgang Betz |
69:22e9b407effa | 107 | irq_de_init(NULL); |
Wolfgang Betz |
69:22e9b407effa | 108 | irq_clear_status(); |
Wolfgang Betz |
69:22e9b407effa | 109 | irq_set_status(TX_DATA_SENT, S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 110 | irq_set_status(RX_DATA_READY,S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 111 | irq_set_status(RX_DATA_DISC, S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 112 | irq_set_status(VALID_SYNC, S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 113 | irq_set_status(TX_FIFO_ERROR, S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 114 | irq_set_status(RX_FIFO_ERROR, S_ENABLE); |
Wolfgang Betz |
47:3a30b960a8c2 | 115 | #ifndef RX_FIFO_THR_WA |
Wolfgang Betz |
69:22e9b407effa | 116 | irq_set_status(TX_FIFO_ALMOST_EMPTY, S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 117 | irq_set_status(RX_FIFO_ALMOST_FULL, S_ENABLE); |
Wolfgang Betz |
47:3a30b960a8c2 | 118 | #endif // !RX_FIFO_THR_WA |
Wolfgang Betz |
34:edda6a7238ec | 119 | |
Wolfgang Betz |
69:22e9b407effa | 120 | /* Configure Spirit1 */ |
Wolfgang Betz |
69:22e9b407effa | 121 | radio_persistent_rx(S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 122 | qi_set_sqi_threshold(SQI_TH_0); |
Wolfgang Betz |
69:22e9b407effa | 123 | qi_sqi_check(S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 124 | qi_set_rssi_threshold_dbm(CCA_THRESHOLD); |
Wolfgang Betz |
69:22e9b407effa | 125 | timer_set_rx_timeout_stop_condition(SQI_ABOVE_THRESHOLD); |
Wolfgang Betz |
69:22e9b407effa | 126 | timer_set_infinite_rx_timeout(); |
Wolfgang Betz |
69:22e9b407effa | 127 | radio_afc_freeze_on_sync(S_ENABLE); |
Wolfgang Betz |
69:22e9b407effa | 128 | calibration_rco(S_ENABLE); |
Wolfgang Betz |
34:edda6a7238ec | 129 | |
Wolfgang Betz |
69:22e9b407effa | 130 | spirit_on = OFF; |
Wolfgang Betz |
69:22e9b407effa | 131 | CLEAR_TXBUF(); |
Wolfgang Betz |
69:22e9b407effa | 132 | CLEAR_RXBUF(); |
Wolfgang Betz |
69:22e9b407effa | 133 | _spirit_tx_started = false; |
Wolfgang Betz |
69:22e9b407effa | 134 | _is_receiving = false; |
Wolfgang Betz |
34:edda6a7238ec | 135 | |
Wolfgang Betz |
69:22e9b407effa | 136 | /* Configure the radio to route the IRQ signal to its GPIO 3 */ |
Wolfgang Betz |
69:22e9b407effa | 137 | SGpioInit x_gpio_init = { |
Wolfgang Betz |
69:22e9b407effa | 138 | SPIRIT_GPIO_IRQ, |
Wolfgang Betz |
69:22e9b407effa | 139 | SPIRIT_GPIO_MODE_DIGITAL_OUTPUT_LP, |
Wolfgang Betz |
69:22e9b407effa | 140 | SPIRIT_GPIO_DIG_OUT_IRQ |
Wolfgang Betz |
69:22e9b407effa | 141 | }; |
Wolfgang Betz |
69:22e9b407effa | 142 | spirit_gpio_init(&x_gpio_init); |
Wolfgang Betz |
34:edda6a7238ec | 143 | |
Wolfgang Betz |
69:22e9b407effa | 144 | /* Setup CSMA/CA */ |
Wolfgang Betz |
69:22e9b407effa | 145 | CsmaInit x_csma_init = { |
Wolfgang Betz |
69:22e9b407effa | 146 | S_ENABLE, // enable persistent mode |
Wolfgang Betz |
69:22e9b407effa | 147 | TBIT_TIME_64, // Tcca time |
Wolfgang Betz |
69:22e9b407effa | 148 | TCCA_TIME_3, // Lcca length |
Wolfgang Betz |
69:22e9b407effa | 149 | 5, // max nr of backoffs (<8) |
Wolfgang Betz |
69:22e9b407effa | 150 | 1, // BU counter seed |
Wolfgang Betz |
69:22e9b407effa | 151 | 8 // BU prescaler |
Wolfgang Betz |
69:22e9b407effa | 152 | }; |
Wolfgang Betz |
69:22e9b407effa | 153 | csma_ca_init(&x_csma_init); |
Wolfgang Betz |
34:edda6a7238ec | 154 | |
Wolfgang Betz |
34:edda6a7238ec | 155 | #ifdef USE_STANDBY_STATE |
Wolfgang Betz |
69:22e9b407effa | 156 | /* Puts the SPIRIT1 in STANDBY mode (125us -> rx/tx) */ |
Wolfgang Betz |
69:22e9b407effa | 157 | cmd_strobe(SPIRIT1_STROBE_STANDBY); |
Wolfgang Betz |
34:edda6a7238ec | 158 | #endif // USE_STANDBY_STATE |
Wolfgang Betz |
34:edda6a7238ec | 159 | } |
Wolfgang Betz |
34:edda6a7238ec | 160 | |
Wolfgang Betz |
69:22e9b407effa | 161 | static volatile int tx_fifo_remaining = 0; // to be used in irq handler |
Wolfgang Betz |
69:22e9b407effa | 162 | static volatile int tx_buffer_pos = 0; // to be used in irq handler |
Wolfgang Betz |
69:22e9b407effa | 163 | static const volatile uint8_t *tx_fifo_buffer = NULL; // to be used in irq handler |
Wolfgang Betz |
64:28ef790e4ef7 | 164 | int SimpleSpirit1::send(const void *payload, unsigned int payload_len, bool use_csma_ca) { |
Wolfgang Betz |
69:22e9b407effa | 165 | /* Checks if the payload length is supported */ |
Wolfgang Betz |
69:22e9b407effa | 166 | if(payload_len > MAX_PACKET_LEN) { |
Wolfgang Betz |
69:22e9b407effa | 167 | return RADIO_TX_ERR; |
Wolfgang Betz |
69:22e9b407effa | 168 | } |
Wolfgang Betz |
34:edda6a7238ec | 169 | |
Wolfgang Betz |
69:22e9b407effa | 170 | disable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 171 | |
Wolfgang Betz |
69:22e9b407effa | 172 | BUSYWAIT_UNTIL(SPIRIT1_STATUS() == SPIRIT1_STATE_RX, STATE_TIMEOUT); |
Wolfgang Betz |
34:edda6a7238ec | 173 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 174 | if((last_state & SPIRIT1_STATE_STATEBITS) != SPIRIT1_STATE_RX) { |
Wolfgang Betz |
69:22e9b407effa | 175 | debug("\r\nAssert failed in: %s (%d): state=%x\r\n", __func__, __LINE__, last_state>>1); |
Wolfgang Betz |
69:22e9b407effa | 176 | } |
Wolfgang Betz |
34:edda6a7238ec | 177 | #endif |
Wolfgang Betz |
34:edda6a7238ec | 178 | |
Wolfgang Betz |
69:22e9b407effa | 179 | /* Reset State to Ready */ |
Wolfgang Betz |
69:22e9b407effa | 180 | set_ready_state(); |
Wolfgang Betz |
34:edda6a7238ec | 181 | |
Wolfgang Betz |
69:22e9b407effa | 182 | cmd_strobe(SPIRIT1_STROBE_FTX); // flush TX FIFO buffer |
Wolfgang Betz |
34:edda6a7238ec | 183 | |
Wolfgang Betz |
34:edda6a7238ec | 184 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 185 | debug_if(!(linear_fifo_read_num_elements_tx_fifo() == 0), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
34:edda6a7238ec | 186 | #endif |
Wolfgang Betz |
34:edda6a7238ec | 187 | |
Wolfgang Betz |
69:22e9b407effa | 188 | pkt_basic_set_payload_length(payload_len); // set desired payload len |
Wolfgang Betz |
34:edda6a7238ec | 189 | |
Wolfgang Betz |
69:22e9b407effa | 190 | if(use_csma_ca) { |
Wolfgang Betz |
69:22e9b407effa | 191 | csma_ca_state(S_ENABLE); // enable CSMA/CA |
Wolfgang Betz |
69:22e9b407effa | 192 | } |
Wolfgang Betz |
34:edda6a7238ec | 193 | |
Wolfgang Betz |
69:22e9b407effa | 194 | /* Init buffer & number of bytes to be send */ |
Wolfgang Betz |
69:22e9b407effa | 195 | tx_fifo_remaining = payload_len; |
Wolfgang Betz |
69:22e9b407effa | 196 | tx_fifo_buffer = (const uint8_t*)payload; |
Wolfgang Betz |
45:2d01cc9bc761 | 197 | |
Wolfgang Betz |
69:22e9b407effa | 198 | int8_t fifo_available = SPIRIT_MAX_FIFO_LEN; // fill-up whole fifo |
Wolfgang Betz |
69:22e9b407effa | 199 | int8_t to_send = (tx_fifo_remaining > fifo_available) ? fifo_available : tx_fifo_remaining; |
Wolfgang Betz |
34:edda6a7238ec | 200 | |
Wolfgang Betz |
69:22e9b407effa | 201 | tx_fifo_remaining -= to_send; |
Wolfgang Betz |
34:edda6a7238ec | 202 | |
Wolfgang Betz |
69:22e9b407effa | 203 | /* Fill FIFO Buffer */ |
Wolfgang Betz |
69:22e9b407effa | 204 | if(to_send > 0) { |
Wolfgang Betz |
69:22e9b407effa | 205 | spi_write_linear_fifo(to_send, (uint8_t*)&tx_fifo_buffer[0]); |
Wolfgang Betz |
69:22e9b407effa | 206 | } |
Wolfgang Betz |
34:edda6a7238ec | 207 | |
Wolfgang Betz |
69:22e9b407effa | 208 | tx_buffer_pos = to_send; |
Wolfgang Betz |
69:22e9b407effa | 209 | _spirit_tx_started = true; |
Wolfgang Betz |
34:edda6a7238ec | 210 | |
Wolfgang Betz |
69:22e9b407effa | 211 | enable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 212 | |
Wolfgang Betz |
69:22e9b407effa | 213 | /* Start transmitting */ |
Wolfgang Betz |
69:22e9b407effa | 214 | cmd_strobe(SPIRIT1_STROBE_TX); |
Wolfgang Betz |
45:2d01cc9bc761 | 215 | |
Wolfgang Betz |
69:22e9b407effa | 216 | while(tx_fifo_remaining != 0); // wait until not everything is yet send (evtl. by irq handler) |
Wolfgang Betz |
45:2d01cc9bc761 | 217 | |
Wolfgang Betz |
69:22e9b407effa | 218 | BUSYWAIT_UNTIL(!_spirit_tx_started, STATE_TIMEOUT); |
Wolfgang Betz |
34:edda6a7238ec | 219 | #ifdef HEAVY_DEBUG |
Wolfgang Betz |
69:22e9b407effa | 220 | debug("\r\n%s (%d): state=%x, _spirit_tx_started=%d\r\n", __func__, __LINE__, SPIRIT1_STATUS()>>1, _spirit_tx_started); |
Wolfgang Betz |
34:edda6a7238ec | 221 | #endif |
Wolfgang Betz |
34:edda6a7238ec | 222 | |
Wolfgang Betz |
64:28ef790e4ef7 | 223 | if(use_csma_ca) { |
Wolfgang Betz |
64:28ef790e4ef7 | 224 | csma_ca_state(S_DISABLE); // disable CSMA/CA |
Wolfgang Betz |
64:28ef790e4ef7 | 225 | } |
Wolfgang Betz |
43:a512f909514a | 226 | |
Wolfgang Betz |
69:22e9b407effa | 227 | cmd_strobe(SPIRIT1_STROBE_RX); // Return to RX state |
Wolfgang Betz |
34:edda6a7238ec | 228 | |
Wolfgang Betz |
69:22e9b407effa | 229 | disable_spirit_irq(); |
Wolfgang Betz |
69:22e9b407effa | 230 | if(_spirit_tx_started) { // in case of state timeout |
Wolfgang Betz |
69:22e9b407effa | 231 | _spirit_tx_started = false; |
Wolfgang Betz |
69:22e9b407effa | 232 | enable_spirit_irq(); |
Wolfgang Betz |
69:22e9b407effa | 233 | return RADIO_TX_ERR; |
Wolfgang Betz |
69:22e9b407effa | 234 | } else { |
Wolfgang Betz |
69:22e9b407effa | 235 | enable_spirit_irq(); |
Wolfgang Betz |
69:22e9b407effa | 236 | return RADIO_TX_OK; |
Wolfgang Betz |
69:22e9b407effa | 237 | } |
Wolfgang Betz |
34:edda6a7238ec | 238 | } |
Wolfgang Betz |
34:edda6a7238ec | 239 | |
Wolfgang Betz |
34:edda6a7238ec | 240 | /** Set Ready State **/ |
Wolfgang Betz |
34:edda6a7238ec | 241 | void SimpleSpirit1::set_ready_state(void) { |
Wolfgang Betz |
69:22e9b407effa | 242 | uint16_t state; |
Wolfgang Betz |
34:edda6a7238ec | 243 | |
Wolfgang Betz |
69:22e9b407effa | 244 | disable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 245 | |
Wolfgang Betz |
69:22e9b407effa | 246 | _spirit_tx_started = false; |
Wolfgang Betz |
69:22e9b407effa | 247 | _is_receiving = false; |
Wolfgang Betz |
69:22e9b407effa | 248 | stop_rx_timeout(); |
Wolfgang Betz |
34:edda6a7238ec | 249 | |
Wolfgang Betz |
69:22e9b407effa | 250 | cmd_strobe(SPIRIT1_STROBE_FRX); |
Wolfgang Betz |
69:22e9b407effa | 251 | CLEAR_RXBUF(); |
Wolfgang Betz |
69:22e9b407effa | 252 | CLEAR_TXBUF(); |
Wolfgang Betz |
34:edda6a7238ec | 253 | |
Wolfgang Betz |
69:22e9b407effa | 254 | state = SPIRIT1_STATUS(); |
Wolfgang Betz |
69:22e9b407effa | 255 | if(state == SPIRIT1_STATE_STANDBY) { |
Wolfgang Betz |
69:22e9b407effa | 256 | cmd_strobe(SPIRIT1_STROBE_READY); |
Wolfgang Betz |
69:22e9b407effa | 257 | } else if(state == SPIRIT1_STATE_RX) { |
Wolfgang Betz |
69:22e9b407effa | 258 | cmd_strobe(SPIRIT1_STROBE_SABORT); |
Wolfgang Betz |
69:22e9b407effa | 259 | } else if(state != SPIRIT1_STATE_READY) { |
Wolfgang Betz |
34:edda6a7238ec | 260 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 261 | debug("\r\nAssert failed in: %s (%d): state=%x\r\n", __func__, __LINE__, state>>1); |
Wolfgang Betz |
34:edda6a7238ec | 262 | #endif |
Wolfgang Betz |
69:22e9b407effa | 263 | } |
Wolfgang Betz |
34:edda6a7238ec | 264 | |
Wolfgang Betz |
69:22e9b407effa | 265 | BUSYWAIT_UNTIL((SPIRIT1_STATUS() == SPIRIT1_STATE_READY) && ((last_state & XO_ON) == XO_ON), STATE_TIMEOUT); |
Wolfgang Betz |
69:22e9b407effa | 266 | if(last_state != (SPIRIT1_STATE_READY | XO_ON)) { |
Wolfgang Betz |
69:22e9b407effa | 267 | error("\r\nSpirit1: failed to become ready (%x) => pls. reset!\r\n", last_state); |
Wolfgang Betz |
69:22e9b407effa | 268 | enable_spirit_irq(); |
Wolfgang Betz |
69:22e9b407effa | 269 | return; |
Wolfgang Betz |
69:22e9b407effa | 270 | } |
Wolfgang Betz |
34:edda6a7238ec | 271 | |
Wolfgang Betz |
69:22e9b407effa | 272 | irq_clear_status(); |
Wolfgang Betz |
34:edda6a7238ec | 273 | |
Wolfgang Betz |
69:22e9b407effa | 274 | enable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 275 | } |
Wolfgang Betz |
34:edda6a7238ec | 276 | |
Wolfgang Betz |
34:edda6a7238ec | 277 | int SimpleSpirit1::off(void) { |
Wolfgang Betz |
69:22e9b407effa | 278 | if(spirit_on == ON) { |
Wolfgang Betz |
69:22e9b407effa | 279 | /* Disables the mcu to get IRQ from the SPIRIT1 */ |
Wolfgang Betz |
69:22e9b407effa | 280 | disable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 281 | |
Wolfgang Betz |
69:22e9b407effa | 282 | /* first stop rx/tx */ |
Wolfgang Betz |
69:22e9b407effa | 283 | set_ready_state(); |
Wolfgang Betz |
34:edda6a7238ec | 284 | |
Wolfgang Betz |
34:edda6a7238ec | 285 | #ifdef USE_STANDBY_STATE |
Wolfgang Betz |
69:22e9b407effa | 286 | /* Puts the SPIRIT1 in STANDBY */ |
Wolfgang Betz |
69:22e9b407effa | 287 | cmd_strobe(SPIRIT1_STROBE_STANDBY); |
Wolfgang Betz |
69:22e9b407effa | 288 | BUSYWAIT_UNTIL(SPIRIT1_STATUS() == SPIRIT1_STATE_STANDBY, STATE_TIMEOUT); |
Wolfgang Betz |
69:22e9b407effa | 289 | if((last_state & SPIRIT1_STATE_STATEBITS) != SPIRIT1_STATE_STANDBY) { |
Wolfgang Betz |
69:22e9b407effa | 290 | error("\r\nSpirit1: failed to enter standby (%x)\r\n", last_state>>1); |
Wolfgang Betz |
69:22e9b407effa | 291 | return 1; |
Wolfgang Betz |
69:22e9b407effa | 292 | } |
Wolfgang Betz |
34:edda6a7238ec | 293 | #endif // USE_STANDBY_STATE |
Wolfgang Betz |
34:edda6a7238ec | 294 | |
Wolfgang Betz |
69:22e9b407effa | 295 | spirit_on = OFF; |
Wolfgang Betz |
69:22e9b407effa | 296 | _nr_of_irq_disables = 1; |
Wolfgang Betz |
69:22e9b407effa | 297 | } |
Wolfgang Betz |
69:22e9b407effa | 298 | return 0; |
Wolfgang Betz |
34:edda6a7238ec | 299 | } |
Wolfgang Betz |
34:edda6a7238ec | 300 | |
Wolfgang Betz |
34:edda6a7238ec | 301 | int SimpleSpirit1::on(void) { |
Wolfgang Betz |
69:22e9b407effa | 302 | if(spirit_on == OFF) { |
Wolfgang Betz |
69:22e9b407effa | 303 | set_ready_state(); |
Wolfgang Betz |
34:edda6a7238ec | 304 | |
Wolfgang Betz |
69:22e9b407effa | 305 | /* now we go to Rx */ |
Wolfgang Betz |
69:22e9b407effa | 306 | cmd_strobe(SPIRIT1_STROBE_RX); |
Wolfgang Betz |
34:edda6a7238ec | 307 | |
Wolfgang Betz |
69:22e9b407effa | 308 | BUSYWAIT_UNTIL(SPIRIT1_STATUS() == SPIRIT1_STATE_RX, STATE_TIMEOUT); |
Wolfgang Betz |
69:22e9b407effa | 309 | if((last_state & SPIRIT1_STATE_STATEBITS) != SPIRIT1_STATE_RX) { |
Wolfgang Betz |
69:22e9b407effa | 310 | error("\r\nSpirit1: failed to enter rx (%x) => retry\r\n", last_state>>1); |
Wolfgang Betz |
69:22e9b407effa | 311 | } |
Wolfgang Betz |
34:edda6a7238ec | 312 | |
Wolfgang Betz |
69:22e9b407effa | 313 | /* Enables the mcu to get IRQ from the SPIRIT1 */ |
Wolfgang Betz |
69:22e9b407effa | 314 | spirit_on = ON; |
Wolfgang Betz |
34:edda6a7238ec | 315 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 316 | debug_if(!(_nr_of_irq_disables == 1), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
34:edda6a7238ec | 317 | #endif |
Wolfgang Betz |
69:22e9b407effa | 318 | enable_spirit_irq(); |
Wolfgang Betz |
69:22e9b407effa | 319 | } |
Wolfgang Betz |
34:edda6a7238ec | 320 | |
Wolfgang Betz |
34:edda6a7238ec | 321 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 322 | if(SPIRIT1_STATUS() != SPIRIT1_STATE_RX) { |
Wolfgang Betz |
69:22e9b407effa | 323 | debug("\r\nAssert failed in: %s (%d): state=%x\r\n", __func__, __LINE__, last_state>>1); |
Wolfgang Betz |
69:22e9b407effa | 324 | } |
Wolfgang Betz |
34:edda6a7238ec | 325 | #endif |
Wolfgang Betz |
34:edda6a7238ec | 326 | |
Wolfgang Betz |
69:22e9b407effa | 327 | return 0; |
Wolfgang Betz |
34:edda6a7238ec | 328 | } |
Wolfgang Betz |
34:edda6a7238ec | 329 | |
Wolfgang Betz |
34:edda6a7238ec | 330 | uint8_t SimpleSpirit1::refresh_state(void) { |
Wolfgang Betz |
69:22e9b407effa | 331 | uint8_t mcstate; |
Wolfgang Betz |
34:edda6a7238ec | 332 | |
Wolfgang Betz |
69:22e9b407effa | 333 | SpiritSpiReadRegisters(MC_STATE0_BASE, 1, &mcstate); |
Wolfgang Betz |
34:edda6a7238ec | 334 | |
Wolfgang Betz |
69:22e9b407effa | 335 | return mcstate; |
Wolfgang Betz |
34:edda6a7238ec | 336 | } |
Wolfgang Betz |
34:edda6a7238ec | 337 | |
Wolfgang Betz |
34:edda6a7238ec | 338 | int SimpleSpirit1::read(void *buf, unsigned int bufsize) |
Wolfgang Betz |
34:edda6a7238ec | 339 | { |
Wolfgang Betz |
69:22e9b407effa | 340 | disable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 341 | |
Wolfgang Betz |
69:22e9b407effa | 342 | /* Checks if the RX buffer is empty */ |
Wolfgang Betz |
69:22e9b407effa | 343 | if(IS_RXBUF_EMPTY()) { |
Wolfgang Betz |
43:a512f909514a | 344 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 345 | debug("\r\nBuffer is empty\r\n"); |
Wolfgang Betz |
43:a512f909514a | 346 | #endif |
Wolfgang Betz |
69:22e9b407effa | 347 | set_ready_state(); |
Wolfgang Betz |
34:edda6a7238ec | 348 | |
Wolfgang Betz |
69:22e9b407effa | 349 | cmd_strobe(SPIRIT1_STROBE_RX); |
Wolfgang Betz |
69:22e9b407effa | 350 | BUSYWAIT_UNTIL(SPIRIT1_STATUS() == SPIRIT1_STATE_RX, STATE_TIMEOUT); |
Wolfgang Betz |
69:22e9b407effa | 351 | enable_spirit_irq(); |
Wolfgang Betz |
69:22e9b407effa | 352 | return 0; |
Wolfgang Betz |
69:22e9b407effa | 353 | } |
Wolfgang Betz |
34:edda6a7238ec | 354 | |
Wolfgang Betz |
69:22e9b407effa | 355 | if(bufsize < spirit_rx_len) { |
Wolfgang Betz |
69:22e9b407effa | 356 | enable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 357 | |
Wolfgang Betz |
69:22e9b407effa | 358 | /* If buf has the correct size */ |
Wolfgang Betz |
34:edda6a7238ec | 359 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 360 | debug("\r\nTOO SMALL BUF\r\n"); |
Wolfgang Betz |
34:edda6a7238ec | 361 | #endif |
Wolfgang Betz |
69:22e9b407effa | 362 | return 0; |
Wolfgang Betz |
69:22e9b407effa | 363 | } else { |
Wolfgang Betz |
69:22e9b407effa | 364 | /* Copies the packet received */ |
Wolfgang Betz |
69:22e9b407effa | 365 | memcpy(buf, spirit_rx_buf, spirit_rx_len); |
Wolfgang Betz |
34:edda6a7238ec | 366 | |
Wolfgang Betz |
69:22e9b407effa | 367 | bufsize = spirit_rx_len; |
Wolfgang Betz |
69:22e9b407effa | 368 | CLEAR_RXBUF(); |
Wolfgang Betz |
34:edda6a7238ec | 369 | |
Wolfgang Betz |
69:22e9b407effa | 370 | enable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 371 | |
Wolfgang Betz |
69:22e9b407effa | 372 | return bufsize; |
Wolfgang Betz |
69:22e9b407effa | 373 | } |
Wolfgang Betz |
34:edda6a7238ec | 374 | |
Wolfgang Betz |
34:edda6a7238ec | 375 | } |
Wolfgang Betz |
34:edda6a7238ec | 376 | |
Wolfgang Betz |
34:edda6a7238ec | 377 | int SimpleSpirit1::channel_clear(void) |
Wolfgang Betz |
34:edda6a7238ec | 378 | { |
Wolfgang Betz |
69:22e9b407effa | 379 | float rssi_value; |
Wolfgang Betz |
69:22e9b407effa | 380 | /* Local variable used to memorize the SPIRIT1 state */ |
Wolfgang Betz |
69:22e9b407effa | 381 | uint8_t spirit_state = ON; |
Wolfgang Betz |
34:edda6a7238ec | 382 | |
Wolfgang Betz |
69:22e9b407effa | 383 | if(spirit_on == OFF) { |
Wolfgang Betz |
69:22e9b407effa | 384 | /* Wakes up the SPIRIT1 */ |
Wolfgang Betz |
69:22e9b407effa | 385 | on(); |
Wolfgang Betz |
69:22e9b407effa | 386 | spirit_state = OFF; |
Wolfgang Betz |
69:22e9b407effa | 387 | } |
Wolfgang Betz |
34:edda6a7238ec | 388 | |
Wolfgang Betz |
34:edda6a7238ec | 389 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 390 | if(SPIRIT1_STATUS() != SPIRIT1_STATE_RX) { |
Wolfgang Betz |
69:22e9b407effa | 391 | debug("\r\nAssert failed in: %s (%d): state=%x\r\n", __func__, __LINE__, last_state>>1); |
Wolfgang Betz |
69:22e9b407effa | 392 | } |
Wolfgang Betz |
34:edda6a7238ec | 393 | #endif |
Wolfgang Betz |
34:edda6a7238ec | 394 | |
Wolfgang Betz |
69:22e9b407effa | 395 | disable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 396 | |
Wolfgang Betz |
69:22e9b407effa | 397 | /* Reset State to Ready */ |
Wolfgang Betz |
69:22e9b407effa | 398 | set_ready_state(); |
Wolfgang Betz |
34:edda6a7238ec | 399 | |
Wolfgang Betz |
69:22e9b407effa | 400 | /* Stores the RSSI value */ |
Wolfgang Betz |
69:22e9b407effa | 401 | rssi_value = qi_get_rssi_dbm(); |
Wolfgang Betz |
34:edda6a7238ec | 402 | |
Wolfgang Betz |
69:22e9b407effa | 403 | enable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 404 | |
Wolfgang Betz |
69:22e9b407effa | 405 | /* Puts the SPIRIT1 in its previous state */ |
Wolfgang Betz |
69:22e9b407effa | 406 | if(spirit_state==OFF) { |
Wolfgang Betz |
69:22e9b407effa | 407 | off(); |
Wolfgang Betz |
34:edda6a7238ec | 408 | #ifndef NDEBUG |
Wolfgang Betz |
34:edda6a7238ec | 409 | #ifdef USE_STANDBY_STATE |
Wolfgang Betz |
69:22e9b407effa | 410 | if(SPIRIT1_STATUS() != SPIRIT1_STATE_STANDBY) { |
Wolfgang Betz |
34:edda6a7238ec | 411 | #else |
Wolfgang Betz |
69:22e9b407effa | 412 | if(SPIRIT1_STATUS() != SPIRIT1_STATE_READY) { |
Wolfgang Betz |
34:edda6a7238ec | 413 | #endif |
Wolfgang Betz |
69:22e9b407effa | 414 | debug("\r\nAssert failed in: %s (%d): state=%x\r\n", __func__, __LINE__, last_state>>1); |
Wolfgang Betz |
69:22e9b407effa | 415 | } |
Wolfgang Betz |
34:edda6a7238ec | 416 | #endif |
Wolfgang Betz |
69:22e9b407effa | 417 | } else { |
Wolfgang Betz |
69:22e9b407effa | 418 | disable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 419 | |
Wolfgang Betz |
69:22e9b407effa | 420 | set_ready_state(); |
Wolfgang Betz |
34:edda6a7238ec | 421 | |
Wolfgang Betz |
69:22e9b407effa | 422 | cmd_strobe(SPIRIT1_STROBE_RX); |
Wolfgang Betz |
69:22e9b407effa | 423 | BUSYWAIT_UNTIL(SPIRIT1_STATUS() == SPIRIT1_STATE_RX, STATE_TIMEOUT); |
Wolfgang Betz |
69:22e9b407effa | 424 | if((last_state & SPIRIT1_STATE_STATEBITS) != SPIRIT1_STATE_RX) { |
Wolfgang Betz |
69:22e9b407effa | 425 | error("\r\nSpirit1: (#2) failed to enter rx (%x) => retry\r\n", last_state>>1); |
Wolfgang Betz |
69:22e9b407effa | 426 | } |
Wolfgang Betz |
34:edda6a7238ec | 427 | |
Wolfgang Betz |
69:22e9b407effa | 428 | enable_spirit_irq(); |
Wolfgang Betz |
34:edda6a7238ec | 429 | |
Wolfgang Betz |
34:edda6a7238ec | 430 | #ifndef NDEBUG |
Wolfgang Betz |
69:22e9b407effa | 431 | if(SPIRIT1_STATUS() != SPIRIT1_STATE_RX) { |
Wolfgang Betz |
69:22e9b407effa | 432 | debug("\r\nAssert failed in: %s (%d): state=%x\r\n", __func__, __LINE__, last_state>>1); |
Wolfgang Betz |
69:22e9b407effa | 433 | } |
Wolfgang Betz |
34:edda6a7238ec | 434 | #endif |
Wolfgang Betz |
69:22e9b407effa | 435 | } |
Wolfgang Betz |
34:edda6a7238ec | 436 | |
Wolfgang Betz |
69:22e9b407effa | 437 | /* Checks the RSSI value with the threshold */ |
Wolfgang Betz |
69:22e9b407effa | 438 | if(rssi_value<CCA_THRESHOLD) { |
Wolfgang Betz |
69:22e9b407effa | 439 | return 0; |
Wolfgang Betz |
69:22e9b407effa | 440 | } else { |
Wolfgang Betz |
69:22e9b407effa | 441 | return 1; |
Wolfgang Betz |
69:22e9b407effa | 442 | } |
Wolfgang Betz |
69:22e9b407effa | 443 | } |
Wolfgang Betz |
34:edda6a7238ec | 444 | |
Wolfgang Betz |
69:22e9b407effa | 445 | int SimpleSpirit1::get_pending_packet(void) |
Wolfgang Betz |
69:22e9b407effa | 446 | { |
Wolfgang Betz |
69:22e9b407effa | 447 | return !IS_RXBUF_EMPTY(); |
Wolfgang Betz |
69:22e9b407effa | 448 | } |
Wolfgang Betz |
34:edda6a7238ec | 449 | |
Wolfgang Betz |
69:22e9b407effa | 450 | /** Spirit Irq Callback **/ |
Wolfgang Betz |
69:22e9b407effa | 451 | /* betzw - TODO: use threaded interrupt handling when `MBED_CONF_RTOS_PRESENT` is defined (see `atmel-rf-driver`) */ |
Wolfgang Betz |
69:22e9b407effa | 452 | void SimpleSpirit1::IrqHandler() { |
Wolfgang Betz |
69:22e9b407effa | 453 | st_lib_spirit_irqs x_irq_status; |
Wolfgang Betz |
34:edda6a7238ec | 454 | |
Wolfgang Betz |
69:22e9b407effa | 455 | /* get interrupt source from radio */ |
Wolfgang Betz |
69:22e9b407effa | 456 | irq_get_status(&x_irq_status); |
Wolfgang Betz |
34:edda6a7238ec | 457 | |
Wolfgang Betz |
69:22e9b407effa | 458 | /* The IRQ_TX_DATA_SENT notifies the packet has been sent. Puts the SPIRIT1 in RX */ |
Wolfgang Betz |
69:22e9b407effa | 459 | if(x_irq_status.IRQ_TX_DATA_SENT) { /* betzw - NOTE: MUST be handled before `IRQ_RX_DATA_READY` for Nanostack integration! |
Wolfgang Betz |
65:a16f0064110a | 460 | Logically, Nanostack only expects the "DONE" after "SUCCESS" (if it gets |
Wolfgang Betz |
65:a16f0064110a | 461 | DONE before SUCCESS, it assumes you're not going to bother to send SUCCESS). |
Wolfgang Betz |
69:22e9b407effa | 462 | */ |
Wolfgang Betz |
34:edda6a7238ec | 463 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 464 | uint32_t *tmp = (uint32_t*)&x_irq_status; |
Wolfgang Betz |
69:22e9b407effa | 465 | debug_if(!((*tmp) & IRQ_TX_DATA_SENT_MASK), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
69:22e9b407effa | 466 | debug_if(tx_fifo_remaining != 0, "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
34:edda6a7238ec | 467 | #endif |
Wolfgang Betz |
45:2d01cc9bc761 | 468 | |
Wolfgang Betz |
69:22e9b407effa | 469 | if(_spirit_tx_started) { |
Wolfgang Betz |
69:22e9b407effa | 470 | _spirit_tx_started = false; |
Wolfgang Betz |
45:2d01cc9bc761 | 471 | |
Wolfgang Betz |
69:22e9b407effa | 472 | /* call user callback */ |
Wolfgang Betz |
69:22e9b407effa | 473 | if(_current_irq_callback) { |
Wolfgang Betz |
69:22e9b407effa | 474 | _current_irq_callback(TX_DONE); |
Wolfgang Betz |
69:22e9b407effa | 475 | } |
Wolfgang Betz |
69:22e9b407effa | 476 | } |
Wolfgang Betz |
40:343254875d89 | 477 | |
Wolfgang Betz |
69:22e9b407effa | 478 | /* Disable handling of other TX flags */ |
Wolfgang Betz |
69:22e9b407effa | 479 | x_irq_status.IRQ_TX_FIFO_ALMOST_EMPTY = S_RESET; |
Wolfgang Betz |
69:22e9b407effa | 480 | tx_fifo_buffer = NULL; |
Wolfgang Betz |
69:22e9b407effa | 481 | } |
Wolfgang Betz |
45:2d01cc9bc761 | 482 | |
Wolfgang Betz |
47:3a30b960a8c2 | 483 | #ifndef RX_FIFO_THR_WA |
Wolfgang Betz |
69:22e9b407effa | 484 | /* The IRQ_TX_FIFO_ALMOST_EMPTY notifies an nearly empty TX fifo */ |
Wolfgang Betz |
69:22e9b407effa | 485 | if(x_irq_status.IRQ_TX_FIFO_ALMOST_EMPTY) { |
Wolfgang Betz |
45:2d01cc9bc761 | 486 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 487 | uint32_t *tmp = (uint32_t*)&x_irq_status; |
Wolfgang Betz |
69:22e9b407effa | 488 | debug_if(!((*tmp) & IRQ_TX_FIFO_ALMOST_EMPTY_MASK), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
69:22e9b407effa | 489 | debug_if(!_spirit_tx_started, "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
69:22e9b407effa | 490 | debug_if(tx_fifo_buffer == NULL, "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
45:2d01cc9bc761 | 491 | #endif |
Wolfgang Betz |
45:2d01cc9bc761 | 492 | |
Wolfgang Betz |
69:22e9b407effa | 493 | int8_t fifo_available = SPIRIT_MAX_FIFO_LEN/2; // fill-up half fifo |
Wolfgang Betz |
69:22e9b407effa | 494 | int8_t to_send = (tx_fifo_remaining > fifo_available) ? fifo_available : tx_fifo_remaining; |
Wolfgang Betz |
45:2d01cc9bc761 | 495 | |
Wolfgang Betz |
69:22e9b407effa | 496 | tx_fifo_remaining -= to_send; |
Wolfgang Betz |
45:2d01cc9bc761 | 497 | |
Wolfgang Betz |
69:22e9b407effa | 498 | /* Fill FIFO Buffer */ |
Wolfgang Betz |
69:22e9b407effa | 499 | if(to_send > 0) { |
Wolfgang Betz |
69:22e9b407effa | 500 | spi_write_linear_fifo(to_send, (uint8_t*)&tx_fifo_buffer[tx_buffer_pos]); |
Wolfgang Betz |
69:22e9b407effa | 501 | } |
Wolfgang Betz |
69:22e9b407effa | 502 | tx_buffer_pos += to_send; |
Wolfgang Betz |
69:22e9b407effa | 503 | } |
Wolfgang Betz |
47:3a30b960a8c2 | 504 | #endif // !RX_FIFO_THR_WA |
Wolfgang Betz |
34:edda6a7238ec | 505 | |
Wolfgang Betz |
69:22e9b407effa | 506 | /* TX FIFO underflow/overflow error */ |
Wolfgang Betz |
69:22e9b407effa | 507 | if(x_irq_status.IRQ_TX_FIFO_ERROR) { |
Wolfgang Betz |
34:edda6a7238ec | 508 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 509 | uint32_t *tmp = (uint32_t*)&x_irq_status; |
Wolfgang Betz |
69:22e9b407effa | 510 | debug("\r\n%s (%d): irq=%x\r\n", __func__, __LINE__, *tmp); |
Wolfgang Betz |
69:22e9b407effa | 511 | debug_if(!((*tmp) & IRQ_TX_FIFO_ERROR_MASK), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
34:edda6a7238ec | 512 | #endif |
Wolfgang Betz |
69:22e9b407effa | 513 | if(_spirit_tx_started) { |
Wolfgang Betz |
69:22e9b407effa | 514 | _spirit_tx_started = false; |
Wolfgang Betz |
69:22e9b407effa | 515 | /* call user callback */ |
Wolfgang Betz |
69:22e9b407effa | 516 | if(_current_irq_callback) { |
Wolfgang Betz |
69:22e9b407effa | 517 | _current_irq_callback(TX_ERR); |
Wolfgang Betz |
69:22e9b407effa | 518 | } |
Wolfgang Betz |
69:22e9b407effa | 519 | } |
Wolfgang Betz |
40:343254875d89 | 520 | |
Wolfgang Betz |
69:22e9b407effa | 521 | /* reset data still to be sent */ |
Wolfgang Betz |
69:22e9b407effa | 522 | tx_fifo_remaining = 0; |
Wolfgang Betz |
69:22e9b407effa | 523 | } |
Wolfgang Betz |
34:edda6a7238ec | 524 | |
Wolfgang Betz |
69:22e9b407effa | 525 | /* The IRQ_RX_DATA_READY notifies a new packet arrived */ |
Wolfgang Betz |
69:22e9b407effa | 526 | if(x_irq_status.IRQ_RX_DATA_READY) { |
Wolfgang Betz |
42:92a60a905ee7 | 527 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 528 | uint32_t *tmp = (uint32_t*)&x_irq_status; |
Wolfgang Betz |
69:22e9b407effa | 529 | debug_if(!((*tmp) & IRQ_RX_DATA_READY_MASK), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
42:92a60a905ee7 | 530 | #endif |
Wolfgang Betz |
34:edda6a7238ec | 531 | |
Wolfgang Betz |
69:22e9b407effa | 532 | if(!_is_receiving) { // spurious irq?!? (betzw: see comments on macro 'RX_FIFO_THR_WA'!) |
Wolfgang Betz |
44:aedd63cb0ce3 | 533 | #ifdef HEAVY_DEBUG |
Wolfgang Betz |
69:22e9b407effa | 534 | debug("\r\n%s (%d): irq=%x\r\n", __func__, __LINE__, *tmp); |
Wolfgang Betz |
43:a512f909514a | 535 | #endif |
Wolfgang Betz |
69:22e9b407effa | 536 | } else { |
Wolfgang Betz |
69:22e9b407effa | 537 | _is_receiving = false; // Finished receiving |
Wolfgang Betz |
69:22e9b407effa | 538 | stop_rx_timeout(); |
Wolfgang Betz |
43:a512f909514a | 539 | |
Wolfgang Betz |
69:22e9b407effa | 540 | spirit_rx_len = pkt_basic_get_received_pkt_length(); |
Wolfgang Betz |
34:edda6a7238ec | 541 | |
Wolfgang Betz |
34:edda6a7238ec | 542 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 543 | debug_if(!(spirit_rx_len <= MAX_PACKET_LEN), "\r\n%s (%d): irq=%x\r\n", __func__, __LINE__, *tmp); |
Wolfgang Betz |
34:edda6a7238ec | 544 | #endif |
Wolfgang Betz |
34:edda6a7238ec | 545 | |
Wolfgang Betz |
69:22e9b407effa | 546 | if(spirit_rx_len <= MAX_PACKET_LEN) { |
Wolfgang Betz |
69:22e9b407effa | 547 | uint8_t to_receive = spirit_rx_len - _spirit_rx_pos; |
Wolfgang Betz |
69:22e9b407effa | 548 | if(to_receive > 0) { |
Wolfgang Betz |
69:22e9b407effa | 549 | spi_read_linear_fifo(to_receive, &spirit_rx_buf[_spirit_rx_pos]); |
Wolfgang Betz |
69:22e9b407effa | 550 | _spirit_rx_pos += to_receive; |
Wolfgang Betz |
69:22e9b407effa | 551 | } |
Wolfgang Betz |
69:22e9b407effa | 552 | } |
Wolfgang Betz |
43:a512f909514a | 553 | |
Wolfgang Betz |
69:22e9b407effa | 554 | cmd_strobe(SPIRIT1_STROBE_FRX); |
Wolfgang Betz |
43:a512f909514a | 555 | |
Wolfgang Betz |
69:22e9b407effa | 556 | last_rssi = qi_get_rssi(); //MGR |
Wolfgang Betz |
69:22e9b407effa | 557 | last_sqi = qi_get_sqi(); //MGR |
Wolfgang Betz |
43:a512f909514a | 558 | |
Wolfgang Betz |
69:22e9b407effa | 559 | /* call user callback */ |
Wolfgang Betz |
69:22e9b407effa | 560 | if((_spirit_rx_pos == spirit_rx_len) && _current_irq_callback) { |
Wolfgang Betz |
69:22e9b407effa | 561 | _current_irq_callback(RX_DONE); |
Wolfgang Betz |
69:22e9b407effa | 562 | } |
Wolfgang Betz |
43:a512f909514a | 563 | |
Wolfgang Betz |
69:22e9b407effa | 564 | /* Disable handling of other RX flags */ |
Wolfgang Betz |
69:22e9b407effa | 565 | x_irq_status.IRQ_RX_FIFO_ALMOST_FULL = S_RESET; |
Wolfgang Betz |
69:22e9b407effa | 566 | } |
Wolfgang Betz |
69:22e9b407effa | 567 | } |
Wolfgang Betz |
34:edda6a7238ec | 568 | |
Wolfgang Betz |
47:3a30b960a8c2 | 569 | #ifndef RX_FIFO_THR_WA |
Wolfgang Betz |
69:22e9b407effa | 570 | /* RX FIFO almost full */ |
Wolfgang Betz |
69:22e9b407effa | 571 | if(x_irq_status.IRQ_RX_FIFO_ALMOST_FULL) { |
Wolfgang Betz |
43:a512f909514a | 572 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 573 | uint32_t *tmp = (uint32_t*)&x_irq_status; |
Wolfgang Betz |
69:22e9b407effa | 574 | debug_if(!((*tmp) & IRQ_RX_FIFO_ALMOST_FULL_MASK), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
43:a512f909514a | 575 | #endif |
Wolfgang Betz |
69:22e9b407effa | 576 | if(!_is_receiving) { // spurious irq?!? |
Wolfgang Betz |
43:a512f909514a | 577 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 578 | debug("\r\n%s (%d): irq=%x\r\n", __func__, __LINE__, *tmp); |
Wolfgang Betz |
43:a512f909514a | 579 | #endif |
Wolfgang Betz |
69:22e9b407effa | 580 | } else { |
Wolfgang Betz |
69:22e9b407effa | 581 | uint8_t fifo_available = linear_fifo_read_num_elements_rx_fifo(); |
Wolfgang Betz |
69:22e9b407effa | 582 | if((fifo_available + _spirit_rx_pos) <= MAX_PACKET_LEN) { |
Wolfgang Betz |
69:22e9b407effa | 583 | spi_read_linear_fifo(fifo_available, &spirit_rx_buf[_spirit_rx_pos]); |
Wolfgang Betz |
69:22e9b407effa | 584 | _spirit_rx_pos += fifo_available; |
Wolfgang Betz |
69:22e9b407effa | 585 | } else { |
Wolfgang Betz |
48:373e1b7e424f | 586 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 587 | debug("\r\n%s (%d): irq=%x\r\n", __func__, __LINE__, *tmp); |
Wolfgang Betz |
48:373e1b7e424f | 588 | #endif |
Wolfgang Betz |
69:22e9b407effa | 589 | } |
Wolfgang Betz |
69:22e9b407effa | 590 | } |
Wolfgang Betz |
69:22e9b407effa | 591 | } |
Wolfgang Betz |
47:3a30b960a8c2 | 592 | #endif // !RX_FIFO_THR_WA |
Wolfgang Betz |
43:a512f909514a | 593 | |
Wolfgang Betz |
69:22e9b407effa | 594 | /* Reception errors */ |
Wolfgang Betz |
69:22e9b407effa | 595 | if((x_irq_status.IRQ_RX_FIFO_ERROR) || (x_irq_status.IRQ_RX_DATA_DISC)) { |
Wolfgang Betz |
45:2d01cc9bc761 | 596 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 597 | uint32_t *tmp = (uint32_t*)&x_irq_status; |
Wolfgang Betz |
69:22e9b407effa | 598 | debug("\r\n%s (%d): irq=%x\r\n", __func__, __LINE__, *tmp); |
Wolfgang Betz |
69:22e9b407effa | 599 | debug_if(!((*tmp) & (IRQ_RX_FIFO_ERROR_MASK | IRQ_RX_DATA_DISC_MASK)), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
45:2d01cc9bc761 | 600 | #endif |
Wolfgang Betz |
69:22e9b407effa | 601 | rx_timeout_handler(); |
Wolfgang Betz |
69:22e9b407effa | 602 | if(_spirit_tx_started) { |
Wolfgang Betz |
69:22e9b407effa | 603 | _spirit_tx_started = false; |
Wolfgang Betz |
69:22e9b407effa | 604 | /* call user callback */ |
Wolfgang Betz |
69:22e9b407effa | 605 | if(_current_irq_callback) { |
Wolfgang Betz |
69:22e9b407effa | 606 | _current_irq_callback(TX_ERR); |
Wolfgang Betz |
69:22e9b407effa | 607 | } |
Wolfgang Betz |
69:22e9b407effa | 608 | } |
Wolfgang Betz |
69:22e9b407effa | 609 | } |
Wolfgang Betz |
34:edda6a7238ec | 610 | |
Wolfgang Betz |
69:22e9b407effa | 611 | /* The IRQ_VALID_SYNC is used to notify a new packet is coming */ |
Wolfgang Betz |
69:22e9b407effa | 612 | if(x_irq_status.IRQ_VALID_SYNC) { |
Wolfgang Betz |
42:92a60a905ee7 | 613 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 614 | uint32_t *tmp = (uint32_t*)&x_irq_status; |
Wolfgang Betz |
69:22e9b407effa | 615 | debug_if(!((*tmp) & IRQ_VALID_SYNC_MASK), "\r\nAssert failed in: %s (%d)\r\n", __func__, __LINE__); |
Wolfgang Betz |
42:92a60a905ee7 | 616 | #endif |
Wolfgang Betz |
69:22e9b407effa | 617 | /* betzw - NOTE: there is a race condition between Spirit1 receiving packets and |
Wolfgang Betz |
69:22e9b407effa | 618 | * the MCU trying to send a packet, which gets resolved in favor of |
Wolfgang Betz |
69:22e9b407effa | 619 | * sending. |
Wolfgang Betz |
69:22e9b407effa | 620 | */ |
Wolfgang Betz |
69:22e9b407effa | 621 | if(_spirit_tx_started) { |
Wolfgang Betz |
34:edda6a7238ec | 622 | #ifdef DEBUG_IRQ |
Wolfgang Betz |
69:22e9b407effa | 623 | debug("\r\n%s (%d): irq=%x\r\n", __func__, __LINE__, *tmp); |
Wolfgang Betz |
34:edda6a7238ec | 624 | #endif |
Wolfgang Betz |
69:22e9b407effa | 625 | } else { |
Wolfgang Betz |
69:22e9b407effa | 626 | _is_receiving = true; |
Wolfgang Betz |
69:22e9b407effa | 627 | start_rx_timeout(); |
Wolfgang Betz |
69:22e9b407effa | 628 | } |
Wolfgang Betz |
69:22e9b407effa | 629 | } |
Wolfgang Betz |
69:22e9b407effa | 630 | } |