ST / stm-spirit1-rf-driver

Prototype RF driver for STM Sub-1 GHz RF expansion board based on the SPSGRF-868 module for STM32 Nucleo.

Prototype RF Driver for STM Sub-1 GHz RF Expansion Boards based on the SPSGRF-868 and SPSGRF-915 Modules for STM32 Nucleo

Currently supported boards:

Note, in order to use expansion board X-NUCLEO-IDS01A4 in mbed you need to perform the following HW modifications on the board:

  • Unmount resistor R4
  • Mount resistor R7

Furthermore, on some Nucleo development boards (e.g. the NUCLEO_F429ZI), in order to be able to use Ethernet together with these Sub-1 GHz RF expansion boards, you need to compile this driver with macro SPIRIT1_SPI_MOSI=PB_5 defined, while the development board typically requires some HW modification as e.g. described here!

This driver can be used together with the 6LoWPAN stack (a.k.a. Nanostack).

mbed_driver_api.cpp@33:c226804be492, 2016-11-21 (annotated)

Committer:
Wolfgang Betz
Date:
Mon Nov 21 13:26:17 2016 +0100
Revision:
33:c226804be492
Parent:
32:e5272bafeeea 
Slightly better send timeout handling

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Wolfgang Betz 10:dedd44d58c0f 1 #include "SimpleSpirit1.h"
Wolfgang Betz 10:dedd44d58c0f 2 #include "nanostack/platform/arm_hal_phy.h"
Wolfgang Betz 12:b8056eda4028 3 #include "platform/arm_hal_interrupt.h"
Wolfgang Betz 32:e5272bafeeea 4 #include "driverRFPhy.h"
Wolfgang Betz 12:b8056eda4028 5
Wolfgang Betz 12:b8056eda4028 6 #include "mbed_trace.h"
Wolfgang Betz 12:b8056eda4028 7 #define TRACE_GROUP "SPIRIT"
Wolfgang Betz 10:dedd44d58c0f 8
Wolfgang Betz 16:25dc4b811ad3 9 /* Define beyond macro if you want to perform heavy debug tracing also in IRQ context */
Wolfgang Betz 16:25dc4b811ad3 10 // #define HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 11
Wolfgang Betz 20:0b738b9ca855 12 /* Define beyond macro if you want to use acknowledgment frames with only 3 bytes */
Wolfgang Betz 20:0b738b9ca855 13 #define SHORT_ACK_FRAMES
Wolfgang Betz 20:0b738b9ca855 14
Wolfgang Betz 10:dedd44d58c0f 15 static uint8_t mac_address[8] = {
Wolfgang Betz 10:dedd44d58c0f 16 MBED_CONF_SPIRIT1_MAC_ADDRESS_0,
Wolfgang Betz 10:dedd44d58c0f 17 MBED_CONF_SPIRIT1_MAC_ADDRESS_1,
Wolfgang Betz 10:dedd44d58c0f 18 MBED_CONF_SPIRIT1_MAC_ADDRESS_2,
Wolfgang Betz 10:dedd44d58c0f 19 MBED_CONF_SPIRIT1_MAC_ADDRESS_3,
Wolfgang Betz 10:dedd44d58c0f 20 MBED_CONF_SPIRIT1_MAC_ADDRESS_4,
Wolfgang Betz 10:dedd44d58c0f 21 MBED_CONF_SPIRIT1_MAC_ADDRESS_5,
Wolfgang Betz 10:dedd44d58c0f 22 MBED_CONF_SPIRIT1_MAC_ADDRESS_6,
Wolfgang Betz 10:dedd44d58c0f 23 MBED_CONF_SPIRIT1_MAC_ADDRESS_7
Wolfgang Betz 10:dedd44d58c0f 24 };
Wolfgang Betz 10:dedd44d58c0f 25 static phy_device_driver_s device_driver;
Wolfgang Betz 10:dedd44d58c0f 26 static int8_t rf_radio_driver_id = -1;
Wolfgang Betz 10:dedd44d58c0f 27
Wolfgang Betz 10:dedd44d58c0f 28 const phy_rf_channel_configuration_s phy_subghz = {868000000, 1000000, 250000, 11, M_GFSK};
Wolfgang Betz 10:dedd44d58c0f 29
Wolfgang Betz 10:dedd44d58c0f 30 static phy_device_channel_page_s phy_channel_pages[] = {
Wolfgang Betz 10:dedd44d58c0f 31 {CHANNEL_PAGE_2, &phy_subghz},
Wolfgang Betz 10:dedd44d58c0f 32 {CHANNEL_PAGE_0, NULL}
Wolfgang Betz 10:dedd44d58c0f 33 };
Wolfgang Betz 10:dedd44d58c0f 34
Wolfgang Betz 10:dedd44d58c0f 35 static uint8_t tx_sequence = 0xff;
Wolfgang Betz 10:dedd44d58c0f 36 static uint8_t mac_tx_handle = 0;
Wolfgang Betz 10:dedd44d58c0f 37
Wolfgang Betz 10:dedd44d58c0f 38 static SimpleSpirit1 *rf_device = NULL;
Wolfgang Betz 10:dedd44d58c0f 39 static uint8_t rf_rx_buf[MAX_PACKET_LEN];
Wolfgang Betz 10:dedd44d58c0f 40
Wolfgang Betz 12:b8056eda4028 41 static uint8_t stored_mac_address[8];
Wolfgang Betz 13:739d89e71f31 42 static uint16_t stored_short_adr;
Wolfgang Betz 13:739d89e71f31 43 static uint16_t stored_pan_id;
Wolfgang Betz 12:b8056eda4028 44
Wolfgang Betz 12:b8056eda4028 45 #define RF_SIG_ACK_NEEDED (1<<0)
Wolfgang Betz 12:b8056eda4028 46 static Thread rf_ack_sender(osPriorityRealtime);
Wolfgang Betz 27:e68ffb6ac223 47 static volatile uint8_t rf_rx_sequence;
Wolfgang Betz 20:0b738b9ca855 48 #ifndef SHORT_ACK_FRAMES
Wolfgang Betz 27:e68ffb6ac223 49 static volatile uint8_t rf_src_adr[8];
Wolfgang Betz 27:e68ffb6ac223 50 static volatile uint8_t rf_src_adr_len = 0;
Wolfgang Betz 20:0b738b9ca855 51 #endif
Wolfgang Betz 27:e68ffb6ac223 52 static volatile bool rf_ack_sent = false;
Wolfgang Betz 12:b8056eda4028 53
Wolfgang Betz 12:b8056eda4028 54 /* MAC frame helper macros */
Wolfgang Betz 12:b8056eda4028 55 #define MAC_FCF_FRAME_TYPE_MASK 0x0007
Wolfgang Betz 12:b8056eda4028 56 #define MAC_FCF_FRAME_TYPE_SHIFT 0
Wolfgang Betz 12:b8056eda4028 57 #define MAC_FCF_SECURITY_BIT_MASK 0x0008
Wolfgang Betz 12:b8056eda4028 58 #define MAC_FCF_SECURITY_BIT_SHIFT 3
Wolfgang Betz 12:b8056eda4028 59 #define MAC_FCF_PENDING_BIT_MASK 0x0010
Wolfgang Betz 12:b8056eda4028 60 #define MAC_FCF_PENDING_BIT_SHIFT 4
Wolfgang Betz 12:b8056eda4028 61 #define MAC_FCF_ACK_REQ_BIT_MASK 0x0020
Wolfgang Betz 12:b8056eda4028 62 #define MAC_FCF_ACK_REQ_BIT_SHIFT 5
Wolfgang Betz 12:b8056eda4028 63 #define MAC_FCF_INTRA_PANID_MASK 0x0040
Wolfgang Betz 12:b8056eda4028 64 #define MAC_FCF_INTRA_PANID_SHIFT 6
Wolfgang Betz 12:b8056eda4028 65 #define MAC_FCF_DST_ADDR_MASK 0x0c00
Wolfgang Betz 12:b8056eda4028 66 #define MAC_FCF_DST_ADDR_SHIFT 10
Wolfgang Betz 12:b8056eda4028 67 #define MAC_FCF_VERSION_MASK 0x3000
Wolfgang Betz 12:b8056eda4028 68 #define MAC_FCF_VERSION_SHIFT 12
Wolfgang Betz 12:b8056eda4028 69 #define MAC_FCF_SRC_ADDR_MASK 0xc000
Wolfgang Betz 12:b8056eda4028 70 #define MAC_FCF_SRC_ADDR_SHIFT 14
Wolfgang Betz 12:b8056eda4028 71
Wolfgang Betz 12:b8056eda4028 72 /* MAC supported frame types */
Wolfgang Betz 12:b8056eda4028 73 #define FC_BEACON_FRAME 0x00
Wolfgang Betz 12:b8056eda4028 74 #define FC_DATA_FRAME 0x01
Wolfgang Betz 12:b8056eda4028 75 #define FC_ACK_FRAME 0x02
Wolfgang Betz 12:b8056eda4028 76 #define FC_CMD_FRAME 0x03
Wolfgang Betz 12:b8056eda4028 77
Wolfgang Betz 12:b8056eda4028 78 static void rf_if_lock(void)
Wolfgang Betz 12:b8056eda4028 79 {
Wolfgang Betz 12:b8056eda4028 80 platform_enter_critical();
Wolfgang Betz 12:b8056eda4028 81 }
Wolfgang Betz 12:b8056eda4028 82
Wolfgang Betz 12:b8056eda4028 83 static void rf_if_unlock(void)
Wolfgang Betz 12:b8056eda4028 84 {
Wolfgang Betz 12:b8056eda4028 85 platform_exit_critical();
Wolfgang Betz 12:b8056eda4028 86 }
Wolfgang Betz 12:b8056eda4028 87
Wolfgang Betz 13:739d89e71f31 88 static inline uint16_t rf_read_16_bit(uint8_t *data_ptr) { // little-endian
Wolfgang Betz 13:739d89e71f31 89 uint16_t ret;
Wolfgang Betz 13:739d89e71f31 90
Wolfgang Betz 13:739d89e71f31 91 ret = ((uint16_t)data_ptr[0]) + (((uint16_t)data_ptr[1]) << 8);
Wolfgang Betz 13:739d89e71f31 92 return ret;
Wolfgang Betz 13:739d89e71f31 93 }
Wolfgang Betz 13:739d89e71f31 94
Wolfgang Betz 14:898a9d48dd03 95 static int8_t rf_trigger_send(uint8_t *data_ptr, uint16_t data_length, uint8_t tx_handle, data_protocol_e data_protocol)
Wolfgang Betz 10:dedd44d58c0f 96 {
Wolfgang Betz 22:9165bd73c61e 97 #ifndef NDEBUG
Wolfgang Betz 22:9165bd73c61e 98 debug_if(!(data_length >= 3), "\n\rassert failed in: %s (%d)\n\r", __func__, __LINE__);
Wolfgang Betz 22:9165bd73c61e 99 #endif
Wolfgang Betz 22:9165bd73c61e 100
Wolfgang Betz 22:9165bd73c61e 101 /* Give 'rf_ack_sender' a better chance to run */
Wolfgang Betz 22:9165bd73c61e 102 Thread::yield();
Wolfgang Betz 12:b8056eda4028 103
Wolfgang Betz 16:25dc4b811ad3 104 /* Get Lock */
Wolfgang Betz 16:25dc4b811ad3 105 rf_if_lock();
Wolfgang Betz 16:25dc4b811ad3 106
Wolfgang Betz 10:dedd44d58c0f 107 /*Check if transmitter is busy*/
Wolfgang Betz 23:4192649f35da 108 if(rf_device->is_receiving()) { /* betzw - WAS: (rf_device->channel_clear() != 0)), do NOT use this but rather study and enable automatic CCA */
Wolfgang Betz 13:739d89e71f31 109 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 110
Wolfgang Betz 16:25dc4b811ad3 111 /* Release Lock */
Wolfgang Betz 16:25dc4b811ad3 112 rf_if_unlock();
Wolfgang Betz 16:25dc4b811ad3 113
Wolfgang Betz 12:b8056eda4028 114 /*Return busy*/
Wolfgang Betz 10:dedd44d58c0f 115 return -1;
Wolfgang Betz 10:dedd44d58c0f 116 } else {
Wolfgang Betz 28:6a71e15d5272 117 #ifdef HEAVY_TRACING
Wolfgang Betz 13:739d89e71f31 118 uint16_t fcf = rf_read_16_bit(data_ptr);
Wolfgang Betz 27:e68ffb6ac223 119 uint16_t need_ack;
Wolfgang Betz 27:e68ffb6ac223 120
Wolfgang Betz 12:b8056eda4028 121 /*Check if transmitted data needs to be acked*/
Wolfgang Betz 13:739d89e71f31 122 if((fcf & MAC_FCF_ACK_REQ_BIT_MASK) >> MAC_FCF_ACK_REQ_BIT_SHIFT)
Wolfgang Betz 12:b8056eda4028 123 need_ack = 1;
Wolfgang Betz 12:b8056eda4028 124 else
Wolfgang Betz 12:b8056eda4028 125 need_ack = 0;
Wolfgang Betz 27:e68ffb6ac223 126 #endif
Wolfgang Betz 12:b8056eda4028 127
Wolfgang Betz 12:b8056eda4028 128 /*Store the sequence number for ACK handling*/
Wolfgang Betz 12:b8056eda4028 129 tx_sequence = *(data_ptr + 2);
Wolfgang Betz 12:b8056eda4028 130
Wolfgang Betz 12:b8056eda4028 131 /*Store TX handle*/
Wolfgang Betz 12:b8056eda4028 132 mac_tx_handle = tx_handle;
Wolfgang Betz 10:dedd44d58c0f 133
Wolfgang Betz 27:e68ffb6ac223 134 #ifdef HEAVY_TRACING
Wolfgang Betz 25:2ec45788f28c 135 tr_info("%s (%d), len=%d, tx_handle=%x, tx_seq=%x, need_ack=%d (%x:%x, %x:%x, %x:%x, %x:%x)", __func__, __LINE__,
Wolfgang Betz 14:898a9d48dd03 136 data_length, tx_handle, tx_sequence, need_ack,
Wolfgang Betz 27:e68ffb6ac223 137 data_ptr[3], data_ptr[4], data_ptr[5], data_ptr[6],
Wolfgang Betz 14:898a9d48dd03 138 data_ptr[7], data_ptr[8], data_ptr[9], data_ptr[10]);
Wolfgang Betz 27:e68ffb6ac223 139 #endif
Wolfgang Betz 14:898a9d48dd03 140
Wolfgang Betz 33:c226804be492 141 /*Send the packet*/
Wolfgang Betz 10:dedd44d58c0f 142 rf_device->send(data_ptr, data_length);
Wolfgang Betz 12:b8056eda4028 143
Wolfgang Betz 12:b8056eda4028 144 /* Release Lock */
Wolfgang Betz 12:b8056eda4028 145 rf_if_unlock();
Wolfgang Betz 10:dedd44d58c0f 146 }
Wolfgang Betz 10:dedd44d58c0f 147
Wolfgang Betz 12:b8056eda4028 148 /*Return success*/
Wolfgang Betz 10:dedd44d58c0f 149 return 0;
Wolfgang Betz 10:dedd44d58c0f 150 }
Wolfgang Betz 10:dedd44d58c0f 151
Wolfgang Betz 10:dedd44d58c0f 152 static int8_t rf_interface_state_control(phy_interface_state_e new_state, uint8_t rf_channel)
Wolfgang Betz 10:dedd44d58c0f 153 {
Wolfgang Betz 10:dedd44d58c0f 154 int8_t ret_val = 0;
Wolfgang Betz 10:dedd44d58c0f 155 switch (new_state)
Wolfgang Betz 10:dedd44d58c0f 156 {
Wolfgang Betz 10:dedd44d58c0f 157 /*Reset PHY driver and set to idle*/
Wolfgang Betz 10:dedd44d58c0f 158 case PHY_INTERFACE_RESET:
Wolfgang Betz 12:b8056eda4028 159 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 10:dedd44d58c0f 160 rf_device->reset_board();
Wolfgang Betz 10:dedd44d58c0f 161 break;
Wolfgang Betz 10:dedd44d58c0f 162 /*Disable PHY Interface driver*/
Wolfgang Betz 10:dedd44d58c0f 163 case PHY_INTERFACE_DOWN:
Wolfgang Betz 12:b8056eda4028 164 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 10:dedd44d58c0f 165 ret_val = rf_device->off();
Wolfgang Betz 10:dedd44d58c0f 166 if(ret_val != 0) ret_val = -1;
Wolfgang Betz 10:dedd44d58c0f 167 break;
Wolfgang Betz 10:dedd44d58c0f 168 /*Enable PHY Interface driver*/
Wolfgang Betz 10:dedd44d58c0f 169 case PHY_INTERFACE_UP:
Wolfgang Betz 10:dedd44d58c0f 170 ret_val = rf_device->on();
Wolfgang Betz 10:dedd44d58c0f 171 if(ret_val != 0) {
Wolfgang Betz 12:b8056eda4028 172 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 10:dedd44d58c0f 173 ret_val = -1;
Wolfgang Betz 10:dedd44d58c0f 174 break;
Wolfgang Betz 10:dedd44d58c0f 175 }
Wolfgang Betz 12:b8056eda4028 176 tr_debug("%s (%d) - channel: %d", __func__, __LINE__, (int)rf_channel);
Wolfgang Betz 10:dedd44d58c0f 177 rf_device->set_channel(rf_channel);
Wolfgang Betz 10:dedd44d58c0f 178 break;
Wolfgang Betz 10:dedd44d58c0f 179 /*Enable wireless interface ED scan mode*/
Wolfgang Betz 10:dedd44d58c0f 180 case PHY_INTERFACE_RX_ENERGY_STATE:
Wolfgang Betz 12:b8056eda4028 181 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 10:dedd44d58c0f 182 break;
Wolfgang Betz 10:dedd44d58c0f 183 /*Enable Sniffer state*/
Wolfgang Betz 10:dedd44d58c0f 184 case PHY_INTERFACE_SNIFFER_STATE:
Wolfgang Betz 10:dedd44d58c0f 185 // TODO - if we really need this - WAS: rf_setup_sniffer(rf_channel);
Wolfgang Betz 12:b8056eda4028 186 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 10:dedd44d58c0f 187 ret_val = -1;
Wolfgang Betz 10:dedd44d58c0f 188 break;
Wolfgang Betz 12:b8056eda4028 189 default:
Wolfgang Betz 12:b8056eda4028 190 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 12:b8056eda4028 191 break;
Wolfgang Betz 10:dedd44d58c0f 192 }
Wolfgang Betz 10:dedd44d58c0f 193 return ret_val;
Wolfgang Betz 10:dedd44d58c0f 194 }
Wolfgang Betz 10:dedd44d58c0f 195
Wolfgang Betz 10:dedd44d58c0f 196 static int8_t rf_extension(phy_extension_type_e extension_type, uint8_t *data_ptr)
Wolfgang Betz 10:dedd44d58c0f 197 {
Wolfgang Betz 10:dedd44d58c0f 198 switch (extension_type)
Wolfgang Betz 10:dedd44d58c0f 199 {
Wolfgang Betz 10:dedd44d58c0f 200 /*Control MAC pending bit for Indirect data transmission*/
Wolfgang Betz 10:dedd44d58c0f 201 case PHY_EXTENSION_CTRL_PENDING_BIT:
Wolfgang Betz 12:b8056eda4028 202 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 11:b769d6caad82 203 break;
Wolfgang Betz 11:b769d6caad82 204
Wolfgang Betz 10:dedd44d58c0f 205 /*Return frame pending status*/
Wolfgang Betz 10:dedd44d58c0f 206 case PHY_EXTENSION_READ_LAST_ACK_PENDING_STATUS:
Wolfgang Betz 27:e68ffb6ac223 207 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 27:e68ffb6ac223 208 *data_ptr = 0;
Wolfgang Betz 10:dedd44d58c0f 209 break;
Wolfgang Betz 11:b769d6caad82 210
Wolfgang Betz 10:dedd44d58c0f 211 /*Set channel, used for setting channel for energy scan*/
Wolfgang Betz 10:dedd44d58c0f 212 case PHY_EXTENSION_SET_CHANNEL:
Wolfgang Betz 12:b8056eda4028 213 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 10:dedd44d58c0f 214 break;
Wolfgang Betz 11:b769d6caad82 215
Wolfgang Betz 10:dedd44d58c0f 216 /*Read energy on the channel*/
Wolfgang Betz 10:dedd44d58c0f 217 case PHY_EXTENSION_READ_CHANNEL_ENERGY:
Wolfgang Betz 10:dedd44d58c0f 218 // TODO: *data_ptr = rf_get_channel_energy();
Wolfgang Betz 12:b8056eda4028 219 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 30:9c6dcfc47619 220 *data_ptr = (int8_t)rf_device->get_last_rssi_dbm();
Wolfgang Betz 10:dedd44d58c0f 221 break;
Wolfgang Betz 11:b769d6caad82 222
Wolfgang Betz 10:dedd44d58c0f 223 /*Read status of the link*/
Wolfgang Betz 10:dedd44d58c0f 224 case PHY_EXTENSION_READ_LINK_STATUS:
Wolfgang Betz 10:dedd44d58c0f 225 // TODO: *data_ptr = rf_get_link_status();
Wolfgang Betz 12:b8056eda4028 226 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 30:9c6dcfc47619 227 *data_ptr = rf_device->get_last_sqi(); // use SQI as link quality
Wolfgang Betz 10:dedd44d58c0f 228 break;
Wolfgang Betz 11:b769d6caad82 229
Wolfgang Betz 10:dedd44d58c0f 230 default:
Wolfgang Betz 12:b8056eda4028 231 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 10:dedd44d58c0f 232 break;
Wolfgang Betz 10:dedd44d58c0f 233 }
Wolfgang Betz 10:dedd44d58c0f 234 return 0;
Wolfgang Betz 10:dedd44d58c0f 235 }
Wolfgang Betz 10:dedd44d58c0f 236
Wolfgang Betz 12:b8056eda4028 237 #if 0 // Not used in this example
Wolfgang Betz 12:b8056eda4028 238 static inline void rf_set_mac_48bit(uint8_t *ptr) {
Wolfgang Betz 12:b8056eda4028 239 tr_debug("%s (%d), adr0=%x, adr1=%x, adr2=%x, adr3=%x, adr4=%x, adr5=%x",
Wolfgang Betz 12:b8056eda4028 240 __func__, __LINE__,
Wolfgang Betz 12:b8056eda4028 241 ptr[0], ptr[1], ptr[2], ptr[3], ptr[4], ptr[5]);
Wolfgang Betz 12:b8056eda4028 242 }
Wolfgang Betz 12:b8056eda4028 243 #endif // 0
Wolfgang Betz 12:b8056eda4028 244
Wolfgang Betz 12:b8056eda4028 245 static inline void rf_set_mac_address(uint8_t *ptr) {
Wolfgang Betz 12:b8056eda4028 246 tr_debug("%s (%d), adr0=%x, adr1=%x, adr2=%x, adr3=%x, adr4=%x, adr5=%x, adr6=%x, adr7=%x",
Wolfgang Betz 12:b8056eda4028 247 __func__, __LINE__,
Wolfgang Betz 12:b8056eda4028 248 ptr[0], ptr[1], ptr[2], ptr[3], ptr[4], ptr[5], ptr[6], ptr[7]);
Wolfgang Betz 12:b8056eda4028 249 for(int i = 0; i < 8; i++) {
Wolfgang Betz 12:b8056eda4028 250 stored_mac_address[i] = ptr[i];
Wolfgang Betz 12:b8056eda4028 251 }
Wolfgang Betz 12:b8056eda4028 252 }
Wolfgang Betz 12:b8056eda4028 253
Wolfgang Betz 12:b8056eda4028 254 static inline void rf_set_short_adr(uint8_t *ptr) {
Wolfgang Betz 13:739d89e71f31 255 stored_short_adr = (ptr[0] << 8) + ptr[1]; // big-endian
Wolfgang Betz 13:739d89e71f31 256 tr_debug("%s (%d), adr0=%x, adr1=%x, val=%d",
Wolfgang Betz 12:b8056eda4028 257 __func__, __LINE__,
Wolfgang Betz 13:739d89e71f31 258 ptr[0], ptr[1], stored_short_adr);
Wolfgang Betz 12:b8056eda4028 259 }
Wolfgang Betz 12:b8056eda4028 260
Wolfgang Betz 12:b8056eda4028 261 static inline void rf_set_pan_id(uint8_t *ptr) {
Wolfgang Betz 13:739d89e71f31 262 stored_pan_id = (ptr[0] << 8) + ptr[1]; // big-endian
Wolfgang Betz 13:739d89e71f31 263 tr_debug("%s (%d), adr0=%x, adr1=%x, val=%d",
Wolfgang Betz 12:b8056eda4028 264 __func__, __LINE__,
Wolfgang Betz 13:739d89e71f31 265 ptr[0], ptr[1], stored_pan_id);
Wolfgang Betz 12:b8056eda4028 266 }
Wolfgang Betz 12:b8056eda4028 267
Wolfgang Betz 10:dedd44d58c0f 268 static int8_t rf_address_write(phy_address_type_e address_type, uint8_t *address_ptr)
Wolfgang Betz 10:dedd44d58c0f 269 {
Wolfgang Betz 10:dedd44d58c0f 270 switch (address_type)
Wolfgang Betz 10:dedd44d58c0f 271 {
Wolfgang Betz 10:dedd44d58c0f 272 /*Set 48-bit address*/
Wolfgang Betz 10:dedd44d58c0f 273 case PHY_MAC_48BIT:
Wolfgang Betz 10:dedd44d58c0f 274 /* Not used in this example */
Wolfgang Betz 12:b8056eda4028 275 // betzw - WAS: rf_set_mac_48bit(address_ptr);
Wolfgang Betz 10:dedd44d58c0f 276 break;
Wolfgang Betz 10:dedd44d58c0f 277 /*Set 64-bit address*/
Wolfgang Betz 10:dedd44d58c0f 278 case PHY_MAC_64BIT:
Wolfgang Betz 10:dedd44d58c0f 279 rf_set_mac_address(address_ptr);
Wolfgang Betz 10:dedd44d58c0f 280 break;
Wolfgang Betz 10:dedd44d58c0f 281 /*Set 16-bit address*/
Wolfgang Betz 10:dedd44d58c0f 282 case PHY_MAC_16BIT:
Wolfgang Betz 10:dedd44d58c0f 283 rf_set_short_adr(address_ptr);
Wolfgang Betz 10:dedd44d58c0f 284 break;
Wolfgang Betz 10:dedd44d58c0f 285 /*Set PAN Id*/
Wolfgang Betz 10:dedd44d58c0f 286 case PHY_MAC_PANID:
Wolfgang Betz 10:dedd44d58c0f 287 rf_set_pan_id(address_ptr);
Wolfgang Betz 10:dedd44d58c0f 288 break;
Wolfgang Betz 10:dedd44d58c0f 289 }
Wolfgang Betz 10:dedd44d58c0f 290
Wolfgang Betz 10:dedd44d58c0f 291 return 0;
Wolfgang Betz 10:dedd44d58c0f 292 }
Wolfgang Betz 10:dedd44d58c0f 293
Wolfgang Betz 10:dedd44d58c0f 294 /* Note: we are in IRQ context */
Wolfgang Betz 12:b8056eda4028 295 static void rf_handle_ack(uint8_t seq_number)
Wolfgang Betz 10:dedd44d58c0f 296 {
Wolfgang Betz 10:dedd44d58c0f 297 /*Received ACK sequence must be equal with transmitted packet sequence*/
Wolfgang Betz 10:dedd44d58c0f 298 if(tx_sequence == seq_number)
Wolfgang Betz 10:dedd44d58c0f 299 {
Wolfgang Betz 27:e68ffb6ac223 300 #ifdef HEAVY_TRACING
Wolfgang Betz 27:e68ffb6ac223 301 tr_info("%s (%d)", __func__, __LINE__);
Wolfgang Betz 27:e68ffb6ac223 302 #endif
Wolfgang Betz 10:dedd44d58c0f 303
Wolfgang Betz 27:e68ffb6ac223 304 /*Call PHY TX Done API*/
Wolfgang Betz 10:dedd44d58c0f 305 if(device_driver.phy_tx_done_cb){
Wolfgang Betz 13:739d89e71f31 306 device_driver.phy_tx_done_cb(rf_radio_driver_id, mac_tx_handle, PHY_LINK_TX_DONE, 0, 0);
Wolfgang Betz 10:dedd44d58c0f 307 }
Wolfgang Betz 13:739d89e71f31 308 } else {
Wolfgang Betz 16:25dc4b811ad3 309 #ifdef HEAVY_TRACING
Wolfgang Betz 27:e68ffb6ac223 310 tr_info("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 311 #endif
Wolfgang Betz 10:dedd44d58c0f 312 }
Wolfgang Betz 12:b8056eda4028 313 }
Wolfgang Betz 10:dedd44d58c0f 314
Wolfgang Betz 12:b8056eda4028 315 /* Note: we are in IRQ context */
Wolfgang Betz 12:b8056eda4028 316 static inline bool rf_check_mac_address(uint8_t *dest) {
Wolfgang Betz 12:b8056eda4028 317 for(int i = 0; i < 8; i++) {
Wolfgang Betz 13:739d89e71f31 318 if(dest[i] != stored_mac_address[7-i]) return false;
Wolfgang Betz 12:b8056eda4028 319 }
Wolfgang Betz 12:b8056eda4028 320 return true;
Wolfgang Betz 12:b8056eda4028 321 }
Wolfgang Betz 12:b8056eda4028 322
Wolfgang Betz 12:b8056eda4028 323 /* Note: we are in IRQ context */
Wolfgang Betz 12:b8056eda4028 324 /* Returns true if packet should be accepted */
Wolfgang Betz 12:b8056eda4028 325 static bool rf_check_destination(int len, uint8_t *ack_requested) {
Wolfgang Betz 14:898a9d48dd03 326 uint8_t frame_type;
Wolfgang Betz 13:739d89e71f31 327 uint16_t dst_pan_id;
Wolfgang Betz 13:739d89e71f31 328 uint16_t dst_short_adr;
Wolfgang Betz 12:b8056eda4028 329 uint8_t dst_addr_mode = 0x0; /*0x00 = no address 0x01 = reserved 0x02 = 16-bit short address 0x03 = 64-bit extended address */
Wolfgang Betz 12:b8056eda4028 330 uint8_t src_addr_mode = 0x0; /*0x00 = no address 0x01 = reserved 0x02 = 16-bit short address 0x03 = 64-bit extended address */
Wolfgang Betz 13:739d89e71f31 331 uint8_t min_size = 3; // FCF & SeqNr
Wolfgang Betz 20:0b738b9ca855 332 bool ret = false;
Wolfgang Betz 27:e68ffb6ac223 333 #if !defined(SHORT_ACK_FRAMES) || defined(HEAVY_TRACING)
Wolfgang Betz 14:898a9d48dd03 334 bool panid_compr = false;
Wolfgang Betz 27:e68ffb6ac223 335 #endif
Wolfgang Betz 12:b8056eda4028 336
Wolfgang Betz 14:898a9d48dd03 337 if(len < 3) {
Wolfgang Betz 14:898a9d48dd03 338 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 14:898a9d48dd03 339 return false;
Wolfgang Betz 14:898a9d48dd03 340 }
Wolfgang Betz 12:b8056eda4028 341
Wolfgang Betz 13:739d89e71f31 342 uint16_t fcf = rf_read_16_bit(rf_rx_buf);
Wolfgang Betz 14:898a9d48dd03 343 frame_type = ((fcf & MAC_FCF_FRAME_TYPE_MASK) >> MAC_FCF_FRAME_TYPE_SHIFT);
Wolfgang Betz 13:739d89e71f31 344 (*ack_requested) = ((fcf & MAC_FCF_ACK_REQ_BIT_MASK) >> MAC_FCF_ACK_REQ_BIT_SHIFT);
Wolfgang Betz 13:739d89e71f31 345 dst_addr_mode = ((fcf & MAC_FCF_DST_ADDR_MASK) >> MAC_FCF_DST_ADDR_SHIFT);
Wolfgang Betz 13:739d89e71f31 346 src_addr_mode = ((fcf & MAC_FCF_SRC_ADDR_MASK) >> MAC_FCF_SRC_ADDR_SHIFT);
Wolfgang Betz 21:d5c10e5742f6 347 #if !defined(SHORT_ACK_FRAMES) || defined(HEAVY_TRACING)
Wolfgang Betz 14:898a9d48dd03 348 panid_compr = ((fcf & MAC_FCF_INTRA_PANID_MASK) >> MAC_FCF_INTRA_PANID_SHIFT);
Wolfgang Betz 20:0b738b9ca855 349 #endif
Wolfgang Betz 12:b8056eda4028 350
Wolfgang Betz 27:e68ffb6ac223 351 #ifdef HEAVY_TRACING
Wolfgang Betz 25:2ec45788f28c 352 tr_info("%s (%d): len=%d, ftype=%x, snr=%x, ack=%d, dst=%x, src=%x, intra=%d", __func__, __LINE__, len, frame_type,
Wolfgang Betz 14:898a9d48dd03 353 rf_rx_buf[2], (*ack_requested), dst_addr_mode, src_addr_mode, panid_compr);
Wolfgang Betz 27:e68ffb6ac223 354 #endif
Wolfgang Betz 14:898a9d48dd03 355
Wolfgang Betz 20:0b738b9ca855 356 if(frame_type == FC_ACK_FRAME) { // betzw: we support up to two different forms of ACK frames!
Wolfgang Betz 20:0b738b9ca855 357 #ifdef SHORT_ACK_FRAMES
Wolfgang Betz 20:0b738b9ca855 358 if((len == 3) && (dst_addr_mode == 0x0) && (src_addr_mode == 0x0)) {
Wolfgang Betz 20:0b738b9ca855 359 ret = true;
Wolfgang Betz 20:0b738b9ca855 360 }
Wolfgang Betz 20:0b738b9ca855 361 #else // !SHORT_ACK_FRAMES
Wolfgang Betz 14:898a9d48dd03 362 if((dst_addr_mode == 0x3) && (src_addr_mode == 0x3)) {
Wolfgang Betz 14:898a9d48dd03 363 if(panid_compr) { // no PAN ID is in the frame
Wolfgang Betz 14:898a9d48dd03 364 ret = rf_check_mac_address(&rf_rx_buf[3]);
Wolfgang Betz 16:25dc4b811ad3 365 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 366 if(!ret) tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 367 #endif
Wolfgang Betz 14:898a9d48dd03 368 } else { // presence of dest pan id (even if indicating src pan id)
Wolfgang Betz 14:898a9d48dd03 369 ret = rf_check_mac_address(&rf_rx_buf[5]);
Wolfgang Betz 16:25dc4b811ad3 370 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 371 if(!ret) tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 372 #endif
Wolfgang Betz 14:898a9d48dd03 373 }
Wolfgang Betz 14:898a9d48dd03 374 } else if(dst_addr_mode == 0x2) {
Wolfgang Betz 14:898a9d48dd03 375 dst_short_adr = rf_read_16_bit(&rf_rx_buf[5]);
Wolfgang Betz 14:898a9d48dd03 376 if(dst_short_adr == stored_short_adr) {
Wolfgang Betz 21:d5c10e5742f6 377 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 14:898a9d48dd03 378 ret = true;
Wolfgang Betz 14:898a9d48dd03 379 } else {
Wolfgang Betz 16:25dc4b811ad3 380 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 381 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 382 #endif
Wolfgang Betz 14:898a9d48dd03 383 }
Wolfgang Betz 14:898a9d48dd03 384 }
Wolfgang Betz 20:0b738b9ca855 385 #endif // !SHORT_ACK_FRAMES
Wolfgang Betz 20:0b738b9ca855 386
Wolfgang Betz 16:25dc4b811ad3 387 #ifdef HEAVY_TRACING
Wolfgang Betz 27:e68ffb6ac223 388 tr_info("%s (%d): ret=%d", __func__, __LINE__, ret);
Wolfgang Betz 16:25dc4b811ad3 389 #endif
Wolfgang Betz 14:898a9d48dd03 390 (*ack_requested) = 0; // Never acknowledge ACK frames
Wolfgang Betz 14:898a9d48dd03 391 return ret;
Wolfgang Betz 14:898a9d48dd03 392 }
Wolfgang Betz 13:739d89e71f31 393
Wolfgang Betz 12:b8056eda4028 394 switch(dst_addr_mode) {
Wolfgang Betz 12:b8056eda4028 395 case 0x00:
Wolfgang Betz 13:739d89e71f31 396 ret = true; // no check possible;
Wolfgang Betz 12:b8056eda4028 397 break;
Wolfgang Betz 12:b8056eda4028 398 case 0x02:
Wolfgang Betz 14:898a9d48dd03 399 min_size += 4; // pan id + short dest adr
Wolfgang Betz 13:739d89e71f31 400
Wolfgang Betz 14:898a9d48dd03 401 if(len < 5) {
Wolfgang Betz 16:25dc4b811ad3 402 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 403 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 404 #endif
Wolfgang Betz 14:898a9d48dd03 405 return false;
Wolfgang Betz 13:739d89e71f31 406 }
Wolfgang Betz 13:739d89e71f31 407
Wolfgang Betz 14:898a9d48dd03 408 dst_pan_id = rf_read_16_bit(&rf_rx_buf[3]);
Wolfgang Betz 14:898a9d48dd03 409 if(dst_pan_id == 0xFFFF) {
Wolfgang Betz 16:25dc4b811ad3 410 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 411 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 412 #endif
Wolfgang Betz 14:898a9d48dd03 413 ret = true;
Wolfgang Betz 14:898a9d48dd03 414 break;
Wolfgang Betz 14:898a9d48dd03 415 }
Wolfgang Betz 13:739d89e71f31 416
Wolfgang Betz 14:898a9d48dd03 417 if(dst_pan_id == stored_pan_id) {
Wolfgang Betz 16:25dc4b811ad3 418 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 419 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 420 #endif
Wolfgang Betz 12:b8056eda4028 421 ret = true;
Wolfgang Betz 12:b8056eda4028 422 break;
Wolfgang Betz 13:739d89e71f31 423 } else {
Wolfgang Betz 16:25dc4b811ad3 424 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 425 tr_debug("%s (%d): %d!=%d", __func__, __LINE__, dst_pan_id, stored_pan_id);
Wolfgang Betz 16:25dc4b811ad3 426 #endif
Wolfgang Betz 14:898a9d48dd03 427 }
Wolfgang Betz 14:898a9d48dd03 428
Wolfgang Betz 14:898a9d48dd03 429 if(len < 7) {
Wolfgang Betz 16:25dc4b811ad3 430 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 431 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 432 #endif
Wolfgang Betz 14:898a9d48dd03 433 return false;
Wolfgang Betz 14:898a9d48dd03 434 }
Wolfgang Betz 14:898a9d48dd03 435
Wolfgang Betz 14:898a9d48dd03 436 dst_short_adr = rf_read_16_bit(&rf_rx_buf[5]);
Wolfgang Betz 14:898a9d48dd03 437 if(dst_short_adr == stored_short_adr) {
Wolfgang Betz 16:25dc4b811ad3 438 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 439 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 440 #endif
Wolfgang Betz 14:898a9d48dd03 441 ret = true;
Wolfgang Betz 14:898a9d48dd03 442 break;
Wolfgang Betz 14:898a9d48dd03 443 } else {
Wolfgang Betz 16:25dc4b811ad3 444 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 445 tr_debug("%s (%d): %d!=%d", __func__, __LINE__, dst_short_adr, stored_short_adr);
Wolfgang Betz 16:25dc4b811ad3 446 #endif
Wolfgang Betz 12:b8056eda4028 447 }
Wolfgang Betz 12:b8056eda4028 448 break;
Wolfgang Betz 12:b8056eda4028 449 case 0x03:
Wolfgang Betz 14:898a9d48dd03 450 min_size += 10; // pan id + dest mac addr
Wolfgang Betz 13:739d89e71f31 451
Wolfgang Betz 14:898a9d48dd03 452 if(len < 5) {
Wolfgang Betz 16:25dc4b811ad3 453 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 454 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 455 #endif
Wolfgang Betz 14:898a9d48dd03 456 return false;
Wolfgang Betz 12:b8056eda4028 457 }
Wolfgang Betz 12:b8056eda4028 458
Wolfgang Betz 14:898a9d48dd03 459 dst_pan_id = rf_read_16_bit(&rf_rx_buf[3]);
Wolfgang Betz 14:898a9d48dd03 460 if(dst_pan_id == 0xFFFF) {
Wolfgang Betz 16:25dc4b811ad3 461 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 462 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 463 #endif
Wolfgang Betz 14:898a9d48dd03 464 ret = true;
Wolfgang Betz 14:898a9d48dd03 465 break;
Wolfgang Betz 14:898a9d48dd03 466 }
Wolfgang Betz 13:739d89e71f31 467
Wolfgang Betz 14:898a9d48dd03 468 if(dst_pan_id == stored_pan_id) {
Wolfgang Betz 16:25dc4b811ad3 469 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 470 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 471 #endif
Wolfgang Betz 14:898a9d48dd03 472 ret = true;
Wolfgang Betz 14:898a9d48dd03 473 break;
Wolfgang Betz 14:898a9d48dd03 474 }
Wolfgang Betz 14:898a9d48dd03 475
Wolfgang Betz 14:898a9d48dd03 476 if(len < 13) {
Wolfgang Betz 16:25dc4b811ad3 477 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 478 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 479 #endif
Wolfgang Betz 14:898a9d48dd03 480 return false;
Wolfgang Betz 14:898a9d48dd03 481 }
Wolfgang Betz 14:898a9d48dd03 482
Wolfgang Betz 16:25dc4b811ad3 483 ret = rf_check_mac_address(&rf_rx_buf[5]);
Wolfgang Betz 12:b8056eda4028 484 break;
Wolfgang Betz 12:b8056eda4028 485 default:
Wolfgang Betz 12:b8056eda4028 486 /* not supported */
Wolfgang Betz 16:25dc4b811ad3 487 #ifdef HEAVY_TRACING
Wolfgang Betz 13:739d89e71f31 488 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 489 #endif
Wolfgang Betz 12:b8056eda4028 490 return false;
Wolfgang Betz 12:b8056eda4028 491 }
Wolfgang Betz 12:b8056eda4028 492
Wolfgang Betz 13:739d89e71f31 493 if(ret && (*ack_requested)) {
Wolfgang Betz 20:0b738b9ca855 494 rf_rx_sequence = rf_rx_buf[2];
Wolfgang Betz 20:0b738b9ca855 495
Wolfgang Betz 20:0b738b9ca855 496 #ifndef SHORT_ACK_FRAMES
Wolfgang Betz 14:898a9d48dd03 497 if(!panid_compr) { // Src PAN Id is present
Wolfgang Betz 14:898a9d48dd03 498 min_size += 2; // src pan id
Wolfgang Betz 14:898a9d48dd03 499 }
Wolfgang Betz 14:898a9d48dd03 500 switch(src_addr_mode) {
Wolfgang Betz 14:898a9d48dd03 501 case 0x00:
Wolfgang Betz 13:739d89e71f31 502 (*ack_requested) = 0; // cannot send acknowledgment
Wolfgang Betz 14:898a9d48dd03 503 break;
Wolfgang Betz 14:898a9d48dd03 504 case 0x02:
Wolfgang Betz 14:898a9d48dd03 505 min_size += 2; // short src adr
Wolfgang Betz 14:898a9d48dd03 506 if(len < min_size) {
Wolfgang Betz 14:898a9d48dd03 507 (*ack_requested) = 0; // cannot send acknowledgment
Wolfgang Betz 14:898a9d48dd03 508 } else {
Wolfgang Betz 14:898a9d48dd03 509 rf_src_adr_len = 2;
Wolfgang Betz 14:898a9d48dd03 510 rf_src_adr[0] = rf_rx_buf[min_size-2];
Wolfgang Betz 14:898a9d48dd03 511 rf_src_adr[1] = rf_rx_buf[min_size-1];
Wolfgang Betz 16:25dc4b811ad3 512 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 513 tr_debug("%s (%d): %x:%x", __func__, __LINE__, rf_src_adr[0], rf_src_adr[1]);
Wolfgang Betz 16:25dc4b811ad3 514 #endif
Wolfgang Betz 12:b8056eda4028 515 }
Wolfgang Betz 14:898a9d48dd03 516 break;
Wolfgang Betz 14:898a9d48dd03 517 case 0x03:
Wolfgang Betz 14:898a9d48dd03 518 min_size += 8; // src mac adr
Wolfgang Betz 14:898a9d48dd03 519 if(len < min_size) {
Wolfgang Betz 14:898a9d48dd03 520 (*ack_requested) = 0; // cannot send acknowledgment
Wolfgang Betz 14:898a9d48dd03 521 } else {
Wolfgang Betz 14:898a9d48dd03 522 rf_src_adr_len = 8;
Wolfgang Betz 14:898a9d48dd03 523 memcpy(&rf_src_adr[0], &rf_rx_buf[min_size-8], rf_src_adr_len);
Wolfgang Betz 16:25dc4b811ad3 524 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 525 tr_debug("%s (%d): %x:%x", __func__, __LINE__, rf_src_adr[0], rf_src_adr[1]);
Wolfgang Betz 16:25dc4b811ad3 526 #endif
Wolfgang Betz 14:898a9d48dd03 527 }
Wolfgang Betz 14:898a9d48dd03 528 break;
Wolfgang Betz 14:898a9d48dd03 529 default:
Wolfgang Betz 14:898a9d48dd03 530 /* not supported */
Wolfgang Betz 16:25dc4b811ad3 531 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 532 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 533 #endif
Wolfgang Betz 14:898a9d48dd03 534 return false;
Wolfgang Betz 12:b8056eda4028 535 }
Wolfgang Betz 20:0b738b9ca855 536 #endif // !SHORT_ACK_FRAMES
Wolfgang Betz 12:b8056eda4028 537 }
Wolfgang Betz 12:b8056eda4028 538
Wolfgang Betz 22:9165bd73c61e 539 #ifdef HEAVY_TRACING
Wolfgang Betz 25:2ec45788f28c 540 tr_info("%s (%d), ret=%d, ack=%d", __func__, __LINE__, ret, (*ack_requested));
Wolfgang Betz 16:25dc4b811ad3 541 #endif
Wolfgang Betz 12:b8056eda4028 542 return ret;
Wolfgang Betz 12:b8056eda4028 543 }
Wolfgang Betz 12:b8056eda4028 544
Wolfgang Betz 12:b8056eda4028 545 /* Note: we are in IRQ context */
Wolfgang Betz 12:b8056eda4028 546 static inline void rf_send_ack() {
Wolfgang Betz 12:b8056eda4028 547 rf_ack_sender.signal_set(RF_SIG_ACK_NEEDED);
Wolfgang Betz 10:dedd44d58c0f 548 }
Wolfgang Betz 10:dedd44d58c0f 549
Wolfgang Betz 10:dedd44d58c0f 550 /* Note: we are in IRQ context */
Wolfgang Betz 10:dedd44d58c0f 551 static inline void rf_handle_rx_end(void)
Wolfgang Betz 10:dedd44d58c0f 552 {
Wolfgang Betz 30:9c6dcfc47619 553 uint8_t rf_sqi;
Wolfgang Betz 10:dedd44d58c0f 554 int8_t rf_rssi;
Wolfgang Betz 10:dedd44d58c0f 555 uint16_t rf_buffer_len;
Wolfgang Betz 12:b8056eda4028 556 uint8_t ack_requested = 0;
Wolfgang Betz 10:dedd44d58c0f 557
Wolfgang Betz 10:dedd44d58c0f 558 /* Get received data */
Wolfgang Betz 10:dedd44d58c0f 559 rf_buffer_len = rf_device->read(rf_rx_buf, MAX_PACKET_LEN);
Wolfgang Betz 10:dedd44d58c0f 560 if(!rf_buffer_len)
Wolfgang Betz 10:dedd44d58c0f 561 return;
Wolfgang Betz 10:dedd44d58c0f 562
Wolfgang Betz 25:2ec45788f28c 563 #ifdef HEAVY_TRACING
Wolfgang Betz 25:2ec45788f28c 564 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 25:2ec45788f28c 565 #endif
Wolfgang Betz 25:2ec45788f28c 566
Wolfgang Betz 25:2ec45788f28c 567 /* Check if packet should be accepted */
Wolfgang Betz 12:b8056eda4028 568 if(!rf_check_destination(rf_buffer_len, &ack_requested)) {
Wolfgang Betz 16:25dc4b811ad3 569 #ifdef HEAVY_TRACING
Wolfgang Betz 13:739d89e71f31 570 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 571 #endif
Wolfgang Betz 12:b8056eda4028 572 return;
Wolfgang Betz 12:b8056eda4028 573 }
Wolfgang Betz 10:dedd44d58c0f 574
Wolfgang Betz 12:b8056eda4028 575 /* If waiting for ACK, check here if the packet is an ACK to a message previously sent */
Wolfgang Betz 13:739d89e71f31 576 uint16_t fcf = rf_read_16_bit(rf_rx_buf);
Wolfgang Betz 13:739d89e71f31 577 if(((fcf & MAC_FCF_FRAME_TYPE_MASK) >> MAC_FCF_FRAME_TYPE_SHIFT) == FC_ACK_FRAME) {
Wolfgang Betz 12:b8056eda4028 578 /*Send sequence number in ACK handler*/
Wolfgang Betz 16:25dc4b811ad3 579 #ifdef HEAVY_TRACING
Wolfgang Betz 12:b8056eda4028 580 tr_debug("%s (%d), len=%u", __func__, __LINE__, (unsigned int)rf_buffer_len);
Wolfgang Betz 16:25dc4b811ad3 581 #endif
Wolfgang Betz 12:b8056eda4028 582 rf_handle_ack(rf_rx_buf[2]);
Wolfgang Betz 12:b8056eda4028 583 return;
Wolfgang Betz 12:b8056eda4028 584 }
Wolfgang Betz 10:dedd44d58c0f 585
Wolfgang Betz 12:b8056eda4028 586 /* Kick off ACK sending */
Wolfgang Betz 12:b8056eda4028 587 if(ack_requested) {
Wolfgang Betz 16:25dc4b811ad3 588 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 589 tr_debug("%s (%d), len=%u", __func__, __LINE__, (unsigned int)rf_buffer_len);
Wolfgang Betz 16:25dc4b811ad3 590 #endif
Wolfgang Betz 12:b8056eda4028 591 rf_send_ack();
Wolfgang Betz 10:dedd44d58c0f 592 }
Wolfgang Betz 10:dedd44d58c0f 593
Wolfgang Betz 10:dedd44d58c0f 594 /* Get link information */
Wolfgang Betz 10:dedd44d58c0f 595 rf_rssi = (int8_t)rf_device->get_last_rssi_dbm();
Wolfgang Betz 30:9c6dcfc47619 596 rf_sqi = (uint8_t)rf_device->get_last_sqi(); // use SQI as link quality
Wolfgang Betz 10:dedd44d58c0f 597
Wolfgang Betz 10:dedd44d58c0f 598 /* Note: Checksum of the packet must be checked and removed before entering here */
Wolfgang Betz 12:b8056eda4028 599 /* TODO - betzw: what to do? */
Wolfgang Betz 10:dedd44d58c0f 600
Wolfgang Betz 24:03e351bfc9c9 601 #ifdef HEAVY_TRACING
Wolfgang Betz 24:03e351bfc9c9 602 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 24:03e351bfc9c9 603 #endif
Wolfgang Betz 24:03e351bfc9c9 604
Wolfgang Betz 24:03e351bfc9c9 605 /* Send received data and link information to the network stack */
Wolfgang Betz 10:dedd44d58c0f 606 if( device_driver.phy_rx_cb ){
Wolfgang Betz 30:9c6dcfc47619 607 device_driver.phy_rx_cb(rf_rx_buf, rf_buffer_len, rf_sqi, rf_rssi, rf_radio_driver_id);
Wolfgang Betz 10:dedd44d58c0f 608 }
Wolfgang Betz 10:dedd44d58c0f 609 }
Wolfgang Betz 10:dedd44d58c0f 610
Wolfgang Betz 10:dedd44d58c0f 611 /* Note: we are in IRQ context */
Wolfgang Betz 10:dedd44d58c0f 612 static inline void rf_handle_tx_end(void)
Wolfgang Betz 10:dedd44d58c0f 613 {
Wolfgang Betz 10:dedd44d58c0f 614 phy_link_tx_status_e phy_status = PHY_LINK_TX_SUCCESS;
Wolfgang Betz 10:dedd44d58c0f 615
Wolfgang Betz 12:b8056eda4028 616 /* Check if this is an ACK sending which is still pending */
Wolfgang Betz 12:b8056eda4028 617 if(rf_ack_sent) {
Wolfgang Betz 12:b8056eda4028 618 rf_ack_sent = false;
Wolfgang Betz 16:25dc4b811ad3 619 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 620 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 621 #endif
Wolfgang Betz 12:b8056eda4028 622 return; // no need to inform stack
Wolfgang Betz 12:b8056eda4028 623 }
Wolfgang Betz 12:b8056eda4028 624
Wolfgang Betz 10:dedd44d58c0f 625 /*Call PHY TX Done API*/
Wolfgang Betz 10:dedd44d58c0f 626 if(device_driver.phy_tx_done_cb){
Wolfgang Betz 13:739d89e71f31 627 device_driver.phy_tx_done_cb(rf_radio_driver_id, mac_tx_handle, phy_status, 0, 0);
Wolfgang Betz 10:dedd44d58c0f 628 }
Wolfgang Betz 10:dedd44d58c0f 629 }
Wolfgang Betz 10:dedd44d58c0f 630
Wolfgang Betz 10:dedd44d58c0f 631 /* Note: we are in IRQ context */
Wolfgang Betz 10:dedd44d58c0f 632 static inline void rf_handle_tx_err(void) {
Wolfgang Betz 10:dedd44d58c0f 633 phy_link_tx_status_e phy_status = PHY_LINK_TX_FAIL;
Wolfgang Betz 10:dedd44d58c0f 634
Wolfgang Betz 10:dedd44d58c0f 635 /*Call PHY TX Done API*/
Wolfgang Betz 10:dedd44d58c0f 636 if(device_driver.phy_tx_done_cb){
Wolfgang Betz 13:739d89e71f31 637 device_driver.phy_tx_done_cb(rf_radio_driver_id, mac_tx_handle, phy_status, 0, 0);
Wolfgang Betz 10:dedd44d58c0f 638 }
Wolfgang Betz 10:dedd44d58c0f 639 }
Wolfgang Betz 10:dedd44d58c0f 640
Wolfgang Betz 10:dedd44d58c0f 641 /* Note: we are in IRQ context */
Wolfgang Betz 10:dedd44d58c0f 642 static void rf_callback_func(int event) {
Wolfgang Betz 10:dedd44d58c0f 643 switch(event) {
Wolfgang Betz 10:dedd44d58c0f 644 case SimpleSpirit1::RX_DONE:
Wolfgang Betz 10:dedd44d58c0f 645 rf_handle_rx_end();
Wolfgang Betz 10:dedd44d58c0f 646 break;
Wolfgang Betz 10:dedd44d58c0f 647 case SimpleSpirit1::TX_DONE:
Wolfgang Betz 10:dedd44d58c0f 648 rf_handle_tx_end();
Wolfgang Betz 10:dedd44d58c0f 649 break;
Wolfgang Betz 10:dedd44d58c0f 650 case SimpleSpirit1::TX_ERR:
Wolfgang Betz 16:25dc4b811ad3 651 #ifdef HEAVY_TRACING
Wolfgang Betz 14:898a9d48dd03 652 tr_debug("%s (%d): TX_ERR!!!", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 653 #endif
Wolfgang Betz 10:dedd44d58c0f 654 rf_handle_tx_err();
Wolfgang Betz 10:dedd44d58c0f 655 break;
Wolfgang Betz 10:dedd44d58c0f 656 }
Wolfgang Betz 10:dedd44d58c0f 657 }
Wolfgang Betz 10:dedd44d58c0f 658
Wolfgang Betz 20:0b738b9ca855 659 #ifdef SHORT_ACK_FRAMES
Wolfgang Betz 20:0b738b9ca855 660 static void rf_ack_loop(void) {
Wolfgang Betz 20:0b738b9ca855 661 static uint16_t buffer[2] = {
Wolfgang Betz 20:0b738b9ca855 662 (FC_ACK_FRAME << MAC_FCF_FRAME_TYPE_SHIFT),
Wolfgang Betz 20:0b738b9ca855 663 0x0
Wolfgang Betz 20:0b738b9ca855 664 };
Wolfgang Betz 20:0b738b9ca855 665
Wolfgang Betz 20:0b738b9ca855 666 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 20:0b738b9ca855 667
Wolfgang Betz 20:0b738b9ca855 668 do {
Wolfgang Betz 20:0b738b9ca855 669 /* Wait for signal */
Wolfgang Betz 20:0b738b9ca855 670 rf_ack_sender.signal_wait(RF_SIG_ACK_NEEDED);
Wolfgang Betz 20:0b738b9ca855 671
Wolfgang Betz 20:0b738b9ca855 672 #ifdef HEAVY_TRACING
Wolfgang Betz 20:0b738b9ca855 673 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 20:0b738b9ca855 674 #endif
Wolfgang Betz 20:0b738b9ca855 675
Wolfgang Betz 20:0b738b9ca855 676 /* Get Lock */
Wolfgang Betz 20:0b738b9ca855 677 rf_if_lock();
Wolfgang Betz 20:0b738b9ca855 678
Wolfgang Betz 20:0b738b9ca855 679 #ifdef HEAVY_TRACING
Wolfgang Betz 20:0b738b9ca855 680 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 20:0b738b9ca855 681 #endif
Wolfgang Betz 20:0b738b9ca855 682
Wolfgang Betz 20:0b738b9ca855 683 /* Prepare payload */
Wolfgang Betz 20:0b738b9ca855 684 uint8_t *ptr = (uint8_t*)&buffer[1];
Wolfgang Betz 20:0b738b9ca855 685 ptr[0] = rf_rx_sequence; // Sequence number
Wolfgang Betz 20:0b738b9ca855 686
Wolfgang Betz 20:0b738b9ca855 687 /* Wait for device not receiving */
Wolfgang Betz 20:0b738b9ca855 688 while(rf_device->is_receiving()) {
Wolfgang Betz 20:0b738b9ca855 689 #ifdef HEAVY_TRACING
Wolfgang Betz 27:e68ffb6ac223 690 tr_info("%s (%d)", __func__, __LINE__);
Wolfgang Betz 20:0b738b9ca855 691 #endif
Wolfgang Betz 20:0b738b9ca855 692 wait_us(10);
Wolfgang Betz 20:0b738b9ca855 693 }
Wolfgang Betz 20:0b738b9ca855 694
Wolfgang Betz 20:0b738b9ca855 695 #ifdef HEAVY_TRACING
Wolfgang Betz 21:d5c10e5742f6 696 tr_debug("%s (%d), hdr=%x, nr=%x", __func__, __LINE__, buffer[0], ptr[0]);
Wolfgang Betz 20:0b738b9ca855 697 #endif
Wolfgang Betz 20:0b738b9ca855 698
Wolfgang Betz 20:0b738b9ca855 699 /* Set information that we have sent an ACK */
Wolfgang Betz 20:0b738b9ca855 700 rf_ack_sent = true;
Wolfgang Betz 20:0b738b9ca855 701
Wolfgang Betz 20:0b738b9ca855 702 /*Send the packet*/
Wolfgang Betz 20:0b738b9ca855 703 rf_device->send((uint8_t*)buffer, 3);
Wolfgang Betz 20:0b738b9ca855 704
Wolfgang Betz 22:9165bd73c61e 705 tr_debug("%s (%d), hdr=%x, nr=%x", __func__, __LINE__, buffer[0], ptr[0]);
Wolfgang Betz 22:9165bd73c61e 706
Wolfgang Betz 22:9165bd73c61e 707 /* Release Lock */
Wolfgang Betz 20:0b738b9ca855 708 rf_if_unlock();
Wolfgang Betz 20:0b738b9ca855 709
Wolfgang Betz 22:9165bd73c61e 710 #ifdef HEAVY_TRACING
Wolfgang Betz 20:0b738b9ca855 711 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 22:9165bd73c61e 712 #endif
Wolfgang Betz 20:0b738b9ca855 713 } while(true);
Wolfgang Betz 20:0b738b9ca855 714 }
Wolfgang Betz 20:0b738b9ca855 715 #else // !SHORT_ACK_FRAMES
Wolfgang Betz 12:b8056eda4028 716 static void rf_ack_loop(void) {
Wolfgang Betz 14:898a9d48dd03 717 static uint16_t buffer[6];
Wolfgang Betz 13:739d89e71f31 718 uint8_t *dest;
Wolfgang Betz 14:898a9d48dd03 719 uint8_t msg_len;
Wolfgang Betz 14:898a9d48dd03 720
Wolfgang Betz 14:898a9d48dd03 721 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 12:b8056eda4028 722
Wolfgang Betz 12:b8056eda4028 723 do {
Wolfgang Betz 12:b8056eda4028 724 /* Wait for signal */
Wolfgang Betz 12:b8056eda4028 725 rf_ack_sender.signal_wait(RF_SIG_ACK_NEEDED);
Wolfgang Betz 12:b8056eda4028 726
Wolfgang Betz 16:25dc4b811ad3 727 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 728 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 729 #endif
Wolfgang Betz 16:25dc4b811ad3 730
Wolfgang Betz 14:898a9d48dd03 731 /* Get Lock */
Wolfgang Betz 12:b8056eda4028 732 rf_if_lock();
Wolfgang Betz 12:b8056eda4028 733
Wolfgang Betz 16:25dc4b811ad3 734 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 735 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 736 #endif
Wolfgang Betz 16:25dc4b811ad3 737
Wolfgang Betz 14:898a9d48dd03 738 /* Prepare header */
Wolfgang Betz 13:739d89e71f31 739 uint8_t *ptr = (uint8_t*)&buffer[1];
Wolfgang Betz 13:739d89e71f31 740 if(rf_src_adr_len == 2) {
Wolfgang Betz 20:0b738b9ca855 741 buffer[0] = (FC_ACK_FRAME << MAC_FCF_FRAME_TYPE_SHIFT) | (0x02 << MAC_FCF_DST_ADDR_SHIFT); // dest PAN id present
Wolfgang Betz 14:898a9d48dd03 742 dest = &ptr[3];
Wolfgang Betz 14:898a9d48dd03 743 msg_len = 7;
Wolfgang Betz 13:739d89e71f31 744 } else {
Wolfgang Betz 20:0b738b9ca855 745 buffer[0] =
Wolfgang Betz 20:0b738b9ca855 746 (FC_ACK_FRAME << MAC_FCF_FRAME_TYPE_SHIFT) |
Wolfgang Betz 14:898a9d48dd03 747 (0x03 << MAC_FCF_DST_ADDR_SHIFT) |
Wolfgang Betz 14:898a9d48dd03 748 (0x03 << MAC_FCF_SRC_ADDR_SHIFT) |
Wolfgang Betz 14:898a9d48dd03 749 (0x01 << MAC_FCF_INTRA_PANID_SHIFT); // no PAN IDs
Wolfgang Betz 14:898a9d48dd03 750 dest = &ptr[1];
Wolfgang Betz 14:898a9d48dd03 751 msg_len = 11;
Wolfgang Betz 13:739d89e71f31 752 }
Wolfgang Betz 13:739d89e71f31 753
Wolfgang Betz 13:739d89e71f31 754 /* Prepare payload */
Wolfgang Betz 13:739d89e71f31 755 ptr[0] = rf_rx_sequence; // Sequence number
Wolfgang Betz 13:739d89e71f31 756 memcpy(dest, &rf_src_adr[0], rf_src_adr_len);
Wolfgang Betz 13:739d89e71f31 757
Wolfgang Betz 12:b8056eda4028 758 /* Wait for device not receiving */
Wolfgang Betz 12:b8056eda4028 759 while(rf_device->is_receiving()) {
Wolfgang Betz 16:25dc4b811ad3 760 #ifdef HEAVY_TRACING
Wolfgang Betz 16:25dc4b811ad3 761 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 16:25dc4b811ad3 762 #endif
Wolfgang Betz 12:b8056eda4028 763 wait_us(10);
Wolfgang Betz 12:b8056eda4028 764 }
Wolfgang Betz 12:b8056eda4028 765
Wolfgang Betz 16:25dc4b811ad3 766 #ifdef HEAVY_TRACING
Wolfgang Betz 13:739d89e71f31 767 tr_debug("%s (%d), hdr=%x, nr=%x, pan0=%x, pan1=%x, adr0=%x, adr1=%x", __func__, __LINE__,
Wolfgang Betz 13:739d89e71f31 768 buffer[0], ptr[0], ptr[1], ptr[2], ptr[3], ptr[4]);
Wolfgang Betz 16:25dc4b811ad3 769 #endif
Wolfgang Betz 13:739d89e71f31 770
Wolfgang Betz 13:739d89e71f31 771 /* Set information that we have sent an ACK */
Wolfgang Betz 12:b8056eda4028 772 rf_ack_sent = true;
Wolfgang Betz 12:b8056eda4028 773
Wolfgang Betz 12:b8056eda4028 774 /*Send the packet*/
Wolfgang Betz 14:898a9d48dd03 775 rf_device->send((uint8_t*)buffer, msg_len);
Wolfgang Betz 12:b8056eda4028 776
Wolfgang Betz 12:b8056eda4028 777 /* Release Lock */
Wolfgang Betz 12:b8056eda4028 778 rf_if_unlock();
Wolfgang Betz 16:25dc4b811ad3 779
Wolfgang Betz 16:25dc4b811ad3 780 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 12:b8056eda4028 781 } while(true);
Wolfgang Betz 12:b8056eda4028 782 }
Wolfgang Betz 20:0b738b9ca855 783 #endif // !SHORT_ACK_FRAMES
Wolfgang Betz 12:b8056eda4028 784
Wolfgang Betz 10:dedd44d58c0f 785 static void rf_init(void) {
Wolfgang Betz 27:e68ffb6ac223 786 #ifndef NDEBUG
Wolfgang Betz 27:e68ffb6ac223 787 osStatus ret;
Wolfgang Betz 27:e68ffb6ac223 788 #endif
Wolfgang Betz 27:e68ffb6ac223 789
Wolfgang Betz 10:dedd44d58c0f 790 rf_device = &SimpleSpirit1::CreateInstance(D11, D12, D13, D9, D10, D2);
Wolfgang Betz 10:dedd44d58c0f 791 rf_device->attach_irq_callback(rf_callback_func);
Wolfgang Betz 12:b8056eda4028 792
Wolfgang Betz 27:e68ffb6ac223 793 #ifndef NDEBUG
Wolfgang Betz 27:e68ffb6ac223 794 ret =
Wolfgang Betz 27:e68ffb6ac223 795 #endif
Wolfgang Betz 12:b8056eda4028 796 rf_ack_sender.start(rf_ack_loop);
Wolfgang Betz 27:e68ffb6ac223 797
Wolfgang Betz 27:e68ffb6ac223 798 #ifndef NDEBUG
Wolfgang Betz 27:e68ffb6ac223 799 debug_if(!(ret == osOK), "\n\rassert failed in: %s (%d)\n\r", __func__, __LINE__);
Wolfgang Betz 27:e68ffb6ac223 800 #endif
Wolfgang Betz 10:dedd44d58c0f 801 }
Wolfgang Betz 10:dedd44d58c0f 802
Wolfgang Betz 11:b769d6caad82 803 extern "C" int8_t rf_device_register(void)
Wolfgang Betz 10:dedd44d58c0f 804 {
Wolfgang Betz 10:dedd44d58c0f 805 /* Do some initialization */
Wolfgang Betz 10:dedd44d58c0f 806 rf_init();
Wolfgang Betz 10:dedd44d58c0f 807
Wolfgang Betz 10:dedd44d58c0f 808 /* Set pointer to MAC address */
Wolfgang Betz 10:dedd44d58c0f 809 device_driver.PHY_MAC = mac_address;
Wolfgang Betz 10:dedd44d58c0f 810
Wolfgang Betz 10:dedd44d58c0f 811 /* Set driver Name */
Wolfgang Betz 10:dedd44d58c0f 812 device_driver.driver_description = (char*)"Spirit1 Sub-GHz RF";
Wolfgang Betz 10:dedd44d58c0f 813
Wolfgang Betz 10:dedd44d58c0f 814 /*Type of RF PHY is SubGHz*/
Wolfgang Betz 10:dedd44d58c0f 815 device_driver.link_type = PHY_LINK_15_4_SUBGHZ_TYPE;
Wolfgang Betz 10:dedd44d58c0f 816
Wolfgang Betz 10:dedd44d58c0f 817 /*Maximum size of payload is 255*/
Wolfgang Betz 10:dedd44d58c0f 818 device_driver.phy_MTU = MAX_PACKET_LEN;
Wolfgang Betz 11:b769d6caad82 819
Wolfgang Betz 10:dedd44d58c0f 820 /*No header in PHY*/
Wolfgang Betz 10:dedd44d58c0f 821 device_driver.phy_header_length = 0;
Wolfgang Betz 11:b769d6caad82 822
Wolfgang Betz 10:dedd44d58c0f 823 /*No tail in PHY*/
Wolfgang Betz 10:dedd44d58c0f 824 device_driver.phy_tail_length = 0;
Wolfgang Betz 10:dedd44d58c0f 825
Wolfgang Betz 10:dedd44d58c0f 826 /*Set up driver functions*/
Wolfgang Betz 11:b769d6caad82 827 device_driver.address_write = &rf_address_write;
Wolfgang Betz 10:dedd44d58c0f 828 device_driver.extension = &rf_extension;
Wolfgang Betz 10:dedd44d58c0f 829 device_driver.state_control = &rf_interface_state_control;
Wolfgang Betz 14:898a9d48dd03 830 device_driver.tx = &rf_trigger_send;
Wolfgang Betz 10:dedd44d58c0f 831
Wolfgang Betz 10:dedd44d58c0f 832 /*Set supported channel pages*/
Wolfgang Betz 10:dedd44d58c0f 833 device_driver.phy_channel_pages = phy_channel_pages;
Wolfgang Betz 10:dedd44d58c0f 834
Wolfgang Betz 10:dedd44d58c0f 835 //Nullify rx/tx callbacks
Wolfgang Betz 10:dedd44d58c0f 836 device_driver.phy_rx_cb = NULL;
Wolfgang Betz 10:dedd44d58c0f 837 device_driver.phy_tx_done_cb = NULL;
Wolfgang Betz 10:dedd44d58c0f 838 device_driver.arm_net_virtual_rx_cb = NULL;
Wolfgang Betz 10:dedd44d58c0f 839 device_driver.arm_net_virtual_tx_cb = NULL;
Wolfgang Betz 10:dedd44d58c0f 840
Wolfgang Betz 10:dedd44d58c0f 841 /*Register device driver*/
Wolfgang Betz 10:dedd44d58c0f 842 rf_radio_driver_id = arm_net_phy_register(&device_driver);
Wolfgang Betz 10:dedd44d58c0f 843
Wolfgang Betz 12:b8056eda4028 844 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 10:dedd44d58c0f 845 return rf_radio_driver_id;
Wolfgang Betz 10:dedd44d58c0f 846 }
Wolfgang Betz 11:b769d6caad82 847
Wolfgang Betz 11:b769d6caad82 848 /*
Wolfgang Betz 11:b769d6caad82 849 * \brief Function reads the MAC address array.
Wolfgang Betz 11:b769d6caad82 850 *
Wolfgang Betz 11:b769d6caad82 851 * \param ptr Pointer to read array
Wolfgang Betz 11:b769d6caad82 852 *
Wolfgang Betz 11:b769d6caad82 853 * \return none
Wolfgang Betz 11:b769d6caad82 854 */
Wolfgang Betz 11:b769d6caad82 855 extern "C" void rf_read_mac_address(uint8_t *ptr)
Wolfgang Betz 11:b769d6caad82 856 {
Wolfgang Betz 12:b8056eda4028 857 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 11:b769d6caad82 858 memcpy(ptr, mac_address, 8);
Wolfgang Betz 11:b769d6caad82 859 }
Wolfgang Betz 11:b769d6caad82 860
Wolfgang Betz 11:b769d6caad82 861 /*
Wolfgang Betz 11:b769d6caad82 862 * \brief Function returns the generated 8-bit random value for seeding Pseudo-random generator. This value was generated by reading noise from RF channel in RF initialisation.
Wolfgang Betz 11:b769d6caad82 863 *
Wolfgang Betz 11:b769d6caad82 864 * \param none
Wolfgang Betz 11:b769d6caad82 865 *
Wolfgang Betz 11:b769d6caad82 866 * \return random RSSI value
Wolfgang Betz 11:b769d6caad82 867 */
Wolfgang Betz 11:b769d6caad82 868 extern "C" int8_t rf_read_random(void)
Wolfgang Betz 11:b769d6caad82 869 {
Wolfgang Betz 30:9c6dcfc47619 870 uint8_t ret;
Wolfgang Betz 24:03e351bfc9c9 871
Wolfgang Betz 24:03e351bfc9c9 872 rf_device->channel_clear();
Wolfgang Betz 30:9c6dcfc47619 873 ret = rf_device->get_last_rssi_raw();
Wolfgang Betz 24:03e351bfc9c9 874
Wolfgang Betz 30:9c6dcfc47619 875 tr_debug("%s (%d): ret=%d", __func__, __LINE__, ret);
Wolfgang Betz 30:9c6dcfc47619 876 return ret;
Wolfgang Betz 11:b769d6caad82 877 }
Wolfgang Betz 11:b769d6caad82 878
Wolfgang Betz 11:b769d6caad82 879 /*
Wolfgang Betz 11:b769d6caad82 880 * \brief Read connected radio part.
Wolfgang Betz 11:b769d6caad82 881 *
Wolfgang Betz 11:b769d6caad82 882 * This function only return valid information when rf_init() is called
Wolfgang Betz 11:b769d6caad82 883 *
Wolfgang Betz 11:b769d6caad82 884 * \return
Wolfgang Betz 11:b769d6caad82 885 */
Wolfgang Betz 11:b769d6caad82 886 extern "C" rf_trx_part_e rf_radio_type_read(void)
Wolfgang Betz 11:b769d6caad82 887 {
Wolfgang Betz 12:b8056eda4028 888 tr_debug("%s (%d)", __func__, __LINE__);
Wolfgang Betz 12:b8056eda4028 889 return ATMEL_UNKNOW_DEV;
Wolfgang Betz 11:b769d6caad82 890 }