Ping Ping entre un Master et un slave LORA

Dependencies:   SX1272Lib mbed

Fork of SX1272PingPong by Semtech

Committer:
montagny
Date:
Tue Mar 06 20:12:31 2018 +0000
Revision:
16:ef85c3a61509
Parent:
15:063aa5212203
ok

Who changed what in which revision?

UserRevisionLine numberNew contents of line
GregCr 0:1ed39951ab7b 1 #include "mbed.h"
GregCr 4:5ece30264cd9 2 #include "main.h"
GregCr 13:edb9b443c1dd 3 #include "sx1272-hal.h"
GregCr 8:f956dee63a56 4 #include "debug.h"
GregCr 0:1ed39951ab7b 5
montagny 16:ef85c3a61509 6 #define DEBUG_MESSAGE 0
GregCr 0:1ed39951ab7b 7
GregCr 0:1ed39951ab7b 8 /* Set this flag to '1' to use the LoRa modulation or to '0' to use FSK modulation */
montagny 16:ef85c3a61509 9 #define USE_MODEM_LORA 1
montagny 16:ef85c3a61509 10 #define USE_MODEM_FSK !USE_MODEM_LORA
GregCr 0:1ed39951ab7b 11
montagny 16:ef85c3a61509 12 #define RF_FREQUENCY 868000000 // Hz
montagny 16:ef85c3a61509 13 #define TX_OUTPUT_POWER 14 // 14 dBm
montagny 15:063aa5212203 14 /**** LORA_BANDWIDTH 0:125khz / 1:250khz / 2:500khz ****/
montagny 16:ef85c3a61509 15 #define LORA_BANDWIDTH 2
montagny 16:ef85c3a61509 16 #define LORA_SPREADING_FACTOR 7 // [SF7..SF12]
montagny 15:063aa5212203 17 /**** LORA_CODINGRATE 1:4/5 / 2:4/6 / 3:4/7 / 4:4/8 ****/
montagny 16:ef85c3a61509 18 #define LORA_CODINGRATE 1 // [1: 4/5,
montagny 16:ef85c3a61509 19 #define LORA_PREAMBLE_LENGTH 8 // Same for Tx and Rx
montagny 16:ef85c3a61509 20 #define LORA_SYMBOL_TIMEOUT 5 // Symbols
montagny 16:ef85c3a61509 21 #define LORA_FIX_LENGTH_PAYLOAD_ON false
montagny 16:ef85c3a61509 22 #define LORA_FHSS_ENABLED false
montagny 16:ef85c3a61509 23 #define LORA_NB_SYMB_HOP 4
montagny 16:ef85c3a61509 24 #define LORA_IQ_INVERSION_ON false
montagny 16:ef85c3a61509 25 #define LORA_CRC_ENABLED true
mluis 14:ab6eecd44b7a 26
montagny 16:ef85c3a61509 27 #define RX_TIMEOUT_VALUE 3500 // in ms
montagny 16:ef85c3a61509 28 #define BUFFER_SIZE 32 // Define the payload size here
GregCr 0:1ed39951ab7b 29
mluis 14:ab6eecd44b7a 30 DigitalOut led( LED1 );
GregCr 3:8b9e2a4df4b5 31
GregCr 0:1ed39951ab7b 32 /*
GregCr 0:1ed39951ab7b 33 * Global variables declarations
GregCr 0:1ed39951ab7b 34 */
mluis 10:7af820d1e1df 35 typedef enum
mluis 10:7af820d1e1df 36 {
mluis 10:7af820d1e1df 37 LOWPOWER = 0,
mluis 10:7af820d1e1df 38 IDLE,
mluis 10:7af820d1e1df 39 RX,
mluis 10:7af820d1e1df 40 RX_TIMEOUT,
mluis 10:7af820d1e1df 41 RX_ERROR,
mluis 10:7af820d1e1df 42 TX,
mluis 10:7af820d1e1df 43 TX_TIMEOUT,
mluis 10:7af820d1e1df 44 CAD,
mluis 10:7af820d1e1df 45 CAD_DONE
mluis 10:7af820d1e1df 46 }AppStates_t;
GregCr 0:1ed39951ab7b 47
mluis 10:7af820d1e1df 48 volatile AppStates_t State = LOWPOWER;
mluis 10:7af820d1e1df 49
mluis 10:7af820d1e1df 50 /*!
mluis 10:7af820d1e1df 51 * Radio events function pointer
mluis 10:7af820d1e1df 52 */
mluis 10:7af820d1e1df 53 static RadioEvents_t RadioEvents;
mluis 10:7af820d1e1df 54
mluis 10:7af820d1e1df 55 /*
mluis 10:7af820d1e1df 56 * Global variables declarations
mluis 10:7af820d1e1df 57 */
GregCr 13:edb9b443c1dd 58 SX1272MB2xAS Radio( NULL );
GregCr 0:1ed39951ab7b 59
GregCr 0:1ed39951ab7b 60 const uint8_t PingMsg[] = "PING";
GregCr 0:1ed39951ab7b 61 const uint8_t PongMsg[] = "PONG";
GregCr 0:1ed39951ab7b 62
GregCr 0:1ed39951ab7b 63 uint16_t BufferSize = BUFFER_SIZE;
GregCr 0:1ed39951ab7b 64 uint8_t Buffer[BUFFER_SIZE];
GregCr 0:1ed39951ab7b 65
GregCr 5:f2431c4fe3bb 66 int16_t RssiValue = 0.0;
GregCr 5:f2431c4fe3bb 67 int8_t SnrValue = 0.0;
GregCr 0:1ed39951ab7b 68
mluis 14:ab6eecd44b7a 69 int main( void )
GregCr 0:1ed39951ab7b 70 {
GregCr 0:1ed39951ab7b 71 uint8_t i;
GregCr 0:1ed39951ab7b 72 bool isMaster = true;
mluis 14:ab6eecd44b7a 73
montagny 15:063aa5212203 74 debug( "\n\r > SX1272 Ping Pong Demo Application " );
mluis 10:7af820d1e1df 75
mluis 10:7af820d1e1df 76 // Initialize Radio driver
mluis 10:7af820d1e1df 77 RadioEvents.TxDone = OnTxDone;
mluis 10:7af820d1e1df 78 RadioEvents.RxDone = OnRxDone;
mluis 10:7af820d1e1df 79 RadioEvents.RxError = OnRxError;
mluis 10:7af820d1e1df 80 RadioEvents.TxTimeout = OnTxTimeout;
mluis 10:7af820d1e1df 81 RadioEvents.RxTimeout = OnRxTimeout;
mluis 10:7af820d1e1df 82 Radio.Init( &RadioEvents );
mluis 14:ab6eecd44b7a 83
GregCr 7:c1bbd6c56979 84 // verify the connection with the board
GregCr 7:c1bbd6c56979 85 while( Radio.Read( REG_VERSION ) == 0x00 )
GregCr 2:59e108728d71 86 {
GregCr 7:c1bbd6c56979 87 debug( "Radio could not be detected!\n\r", NULL );
GregCr 7:c1bbd6c56979 88 wait( 1 );
GregCr 2:59e108728d71 89 }
mluis 14:ab6eecd44b7a 90
GregCr 0:1ed39951ab7b 91 Radio.SetChannel( RF_FREQUENCY );
GregCr 0:1ed39951ab7b 92 Radio.SetTxConfig( MODEM_LORA, TX_OUTPUT_POWER, 0, LORA_BANDWIDTH,
GregCr 0:1ed39951ab7b 93 LORA_SPREADING_FACTOR, LORA_CODINGRATE,
GregCr 0:1ed39951ab7b 94 LORA_PREAMBLE_LENGTH, LORA_FIX_LENGTH_PAYLOAD_ON,
mluis 14:ab6eecd44b7a 95 LORA_CRC_ENABLED, LORA_FHSS_ENABLED, LORA_NB_SYMB_HOP,
mluis 14:ab6eecd44b7a 96 LORA_IQ_INVERSION_ON, 2000 );
GregCr 0:1ed39951ab7b 97 Radio.SetRxConfig( MODEM_LORA, LORA_BANDWIDTH, LORA_SPREADING_FACTOR,
GregCr 0:1ed39951ab7b 98 LORA_CODINGRATE, 0, LORA_PREAMBLE_LENGTH,
mluis 9:e764990e45df 99 LORA_SYMBOL_TIMEOUT, LORA_FIX_LENGTH_PAYLOAD_ON, 0,
mluis 14:ab6eecd44b7a 100 LORA_CRC_ENABLED, LORA_FHSS_ENABLED, LORA_NB_SYMB_HOP,
GregCr 3:8b9e2a4df4b5 101 LORA_IQ_INVERSION_ON, true );
mluis 14:ab6eecd44b7a 102
GregCr 0:1ed39951ab7b 103
montagny 15:063aa5212203 104 debug( "Starting Ping-Pong loop\r\n\n" );
montagny 15:063aa5212203 105 debug( "Start as Master : Envoi de Ping \r\n" );
GregCr 3:8b9e2a4df4b5 106 led = 0;
mluis 14:ab6eecd44b7a 107
GregCr 0:1ed39951ab7b 108 Radio.Rx( RX_TIMEOUT_VALUE );
mluis 14:ab6eecd44b7a 109
GregCr 0:1ed39951ab7b 110 while( 1 )
GregCr 0:1ed39951ab7b 111 {
GregCr 0:1ed39951ab7b 112 switch( State )
GregCr 0:1ed39951ab7b 113 {
GregCr 0:1ed39951ab7b 114 case RX:
montagny 15:063aa5212203 115 debug( "\r\n" );
GregCr 0:1ed39951ab7b 116 if( isMaster == true )
GregCr 0:1ed39951ab7b 117 {
GregCr 0:1ed39951ab7b 118 if( BufferSize > 0 )
GregCr 0:1ed39951ab7b 119 {
GregCr 0:1ed39951ab7b 120 if( strncmp( ( const char* )Buffer, ( const char* )PongMsg, 4 ) == 0 )
GregCr 0:1ed39951ab7b 121 {
GregCr 3:8b9e2a4df4b5 122 led = !led;
montagny 15:063aa5212203 123 debug( "Master : Pong recu !!!\r\n" );
mluis 14:ab6eecd44b7a 124 // Send the next PING frame
GregCr 7:c1bbd6c56979 125 strcpy( ( char* )Buffer, ( char* )PingMsg );
mluis 14:ab6eecd44b7a 126 // We fill the buffer with numbers for the payload
GregCr 0:1ed39951ab7b 127 for( i = 4; i < BufferSize; i++ )
GregCr 0:1ed39951ab7b 128 {
GregCr 0:1ed39951ab7b 129 Buffer[i] = i - 4;
GregCr 0:1ed39951ab7b 130 }
montagny 15:063aa5212203 131 wait_ms( 1000 );
montagny 15:063aa5212203 132 debug( "Master : Envoi de Ping\r\n" );
GregCr 0:1ed39951ab7b 133 Radio.Send( Buffer, BufferSize );
GregCr 0:1ed39951ab7b 134 }
GregCr 2:59e108728d71 135 else if( strncmp( ( const char* )Buffer, ( const char* )PingMsg, 4 ) == 0 )
GregCr 0:1ed39951ab7b 136 { // A master already exists then become a slave
montagny 15:063aa5212203 137 debug( "Master : Ping recu !!!\r\n" );
montagny 15:063aa5212203 138 debug( "A master already exists then become a slave\r\n" );
GregCr 3:8b9e2a4df4b5 139 led = !led;
GregCr 0:1ed39951ab7b 140 isMaster = false;
mluis 14:ab6eecd44b7a 141 // Send the next PONG frame
GregCr 7:c1bbd6c56979 142 strcpy( ( char* )Buffer, ( char* )PongMsg );
mluis 14:ab6eecd44b7a 143 // We fill the buffer with numbers for the payload
GregCr 2:59e108728d71 144 for( i = 4; i < BufferSize; i++ )
GregCr 2:59e108728d71 145 {
GregCr 2:59e108728d71 146 Buffer[i] = i - 4;
GregCr 2:59e108728d71 147 }
montagny 15:063aa5212203 148 wait_ms( 1000 );
montagny 15:063aa5212203 149 debug( "Master : Envoi de Pong\r\n" );
GregCr 2:59e108728d71 150 Radio.Send( Buffer, BufferSize );
GregCr 2:59e108728d71 151 }
GregCr 2:59e108728d71 152 else // valid reception but neither a PING or a PONG message
GregCr 2:59e108728d71 153 { // Set device as master ans start again
GregCr 2:59e108728d71 154 isMaster = true;
montagny 15:063aa5212203 155 debug( "Master : Reception valide, Ni Ping, Ni Pong\r\n" );
GregCr 0:1ed39951ab7b 156 Radio.Rx( RX_TIMEOUT_VALUE );
mluis 14:ab6eecd44b7a 157 }
GregCr 0:1ed39951ab7b 158 }
GregCr 0:1ed39951ab7b 159 }
GregCr 0:1ed39951ab7b 160 else
GregCr 0:1ed39951ab7b 161 {
GregCr 0:1ed39951ab7b 162 if( BufferSize > 0 )
GregCr 0:1ed39951ab7b 163 {
GregCr 0:1ed39951ab7b 164 if( strncmp( ( const char* )Buffer, ( const char* )PingMsg, 4 ) == 0 )
GregCr 0:1ed39951ab7b 165 {
GregCr 3:8b9e2a4df4b5 166 led = !led;
montagny 15:063aa5212203 167 debug( "Slave : Ping recu\r\n" );
GregCr 2:59e108728d71 168 // Send the reply to the PING string
GregCr 7:c1bbd6c56979 169 strcpy( ( char* )Buffer, ( char* )PongMsg );
mluis 14:ab6eecd44b7a 170 // We fill the buffer with numbers for the payload
GregCr 0:1ed39951ab7b 171 for( i = 4; i < BufferSize; i++ )
GregCr 0:1ed39951ab7b 172 {
GregCr 0:1ed39951ab7b 173 Buffer[i] = i - 4;
GregCr 0:1ed39951ab7b 174 }
montagny 15:063aa5212203 175 wait_ms( 1000 );
montagny 15:063aa5212203 176 debug( "Slave : Envoi de Pong\r\n" );
GregCr 0:1ed39951ab7b 177 Radio.Send( Buffer, BufferSize );
GregCr 0:1ed39951ab7b 178 }
GregCr 2:59e108728d71 179 else // valid reception but not a PING as expected
GregCr 2:59e108728d71 180 { // Set device as master and start again
GregCr 2:59e108728d71 181 isMaster = true;
montagny 15:063aa5212203 182 debug( "Slave : Reception valide, mais pas un Ping, on repasse Master\r\n" );
GregCr 2:59e108728d71 183 Radio.Rx( RX_TIMEOUT_VALUE );
mluis 14:ab6eecd44b7a 184 }
GregCr 0:1ed39951ab7b 185 }
GregCr 0:1ed39951ab7b 186 }
GregCr 0:1ed39951ab7b 187 State = LOWPOWER;
GregCr 0:1ed39951ab7b 188 break;
mluis 14:ab6eecd44b7a 189 case TX:
mluis 14:ab6eecd44b7a 190 led = !led;
GregCr 2:59e108728d71 191 if( isMaster == true )
GregCr 0:1ed39951ab7b 192 {
montagny 15:063aa5212203 193 //debug( "Ping...\r\n" );
GregCr 0:1ed39951ab7b 194 }
GregCr 0:1ed39951ab7b 195 else
GregCr 0:1ed39951ab7b 196 {
montagny 15:063aa5212203 197 //debug( "Pong...\r\n" );
GregCr 0:1ed39951ab7b 198 }
GregCr 0:1ed39951ab7b 199 Radio.Rx( RX_TIMEOUT_VALUE );
GregCr 0:1ed39951ab7b 200 State = LOWPOWER;
GregCr 0:1ed39951ab7b 201 break;
GregCr 0:1ed39951ab7b 202 case RX_TIMEOUT:
GregCr 0:1ed39951ab7b 203 if( isMaster == true )
GregCr 0:1ed39951ab7b 204 {
GregCr 0:1ed39951ab7b 205 // Send the next PING frame
GregCr 7:c1bbd6c56979 206 strcpy( ( char* )Buffer, ( char* )PingMsg );
GregCr 0:1ed39951ab7b 207 for( i = 4; i < BufferSize; i++ )
GregCr 0:1ed39951ab7b 208 {
GregCr 0:1ed39951ab7b 209 Buffer[i] = i - 4;
GregCr 0:1ed39951ab7b 210 }
montagny 15:063aa5212203 211 wait_ms( 1000 );
GregCr 0:1ed39951ab7b 212 Radio.Send( Buffer, BufferSize );
GregCr 0:1ed39951ab7b 213 }
GregCr 0:1ed39951ab7b 214 else
GregCr 0:1ed39951ab7b 215 {
mluis 14:ab6eecd44b7a 216 Radio.Rx( RX_TIMEOUT_VALUE );
mluis 14:ab6eecd44b7a 217 }
GregCr 0:1ed39951ab7b 218 State = LOWPOWER;
GregCr 0:1ed39951ab7b 219 break;
GregCr 0:1ed39951ab7b 220 case RX_ERROR:
GregCr 7:c1bbd6c56979 221 // We have received a Packet with a CRC error, send reply as if packet was correct
GregCr 0:1ed39951ab7b 222 if( isMaster == true )
GregCr 0:1ed39951ab7b 223 {
GregCr 0:1ed39951ab7b 224 // Send the next PING frame
GregCr 7:c1bbd6c56979 225 strcpy( ( char* )Buffer, ( char* )PingMsg );
GregCr 0:1ed39951ab7b 226 for( i = 4; i < BufferSize; i++ )
GregCr 0:1ed39951ab7b 227 {
GregCr 0:1ed39951ab7b 228 Buffer[i] = i - 4;
GregCr 0:1ed39951ab7b 229 }
montagny 15:063aa5212203 230 wait_ms( 1000 );
GregCr 0:1ed39951ab7b 231 Radio.Send( Buffer, BufferSize );
GregCr 0:1ed39951ab7b 232 }
GregCr 0:1ed39951ab7b 233 else
GregCr 0:1ed39951ab7b 234 {
GregCr 2:59e108728d71 235 // Send the next PONG frame
GregCr 7:c1bbd6c56979 236 strcpy( ( char* )Buffer, ( char* )PongMsg );
GregCr 2:59e108728d71 237 for( i = 4; i < BufferSize; i++ )
GregCr 2:59e108728d71 238 {
GregCr 2:59e108728d71 239 Buffer[i] = i - 4;
GregCr 2:59e108728d71 240 }
montagny 15:063aa5212203 241 wait_ms( 1000 );
GregCr 2:59e108728d71 242 Radio.Send( Buffer, BufferSize );
GregCr 0:1ed39951ab7b 243 }
GregCr 0:1ed39951ab7b 244 State = LOWPOWER;
GregCr 0:1ed39951ab7b 245 break;
GregCr 0:1ed39951ab7b 246 case TX_TIMEOUT:
GregCr 0:1ed39951ab7b 247 Radio.Rx( RX_TIMEOUT_VALUE );
GregCr 0:1ed39951ab7b 248 State = LOWPOWER;
GregCr 0:1ed39951ab7b 249 break;
GregCr 0:1ed39951ab7b 250 case LOWPOWER:
GregCr 0:1ed39951ab7b 251 break;
GregCr 0:1ed39951ab7b 252 default:
GregCr 0:1ed39951ab7b 253 State = LOWPOWER;
GregCr 0:1ed39951ab7b 254 break;
mluis 14:ab6eecd44b7a 255 }
GregCr 0:1ed39951ab7b 256 }
GregCr 0:1ed39951ab7b 257 }
GregCr 0:1ed39951ab7b 258
GregCr 0:1ed39951ab7b 259 void OnTxDone( void )
GregCr 0:1ed39951ab7b 260 {
GregCr 5:f2431c4fe3bb 261 Radio.Sleep( );
GregCr 0:1ed39951ab7b 262 State = TX;
GregCr 7:c1bbd6c56979 263 debug_if( DEBUG_MESSAGE, "> OnTxDone\n\r" );
GregCr 0:1ed39951ab7b 264 }
GregCr 0:1ed39951ab7b 265
mluis 14:ab6eecd44b7a 266 void OnRxDone( uint8_t *payload, uint16_t size, int16_t rssi, int8_t snr )
GregCr 0:1ed39951ab7b 267 {
GregCr 0:1ed39951ab7b 268 Radio.Sleep( );
GregCr 0:1ed39951ab7b 269 BufferSize = size;
GregCr 0:1ed39951ab7b 270 memcpy( Buffer, payload, BufferSize );
GregCr 0:1ed39951ab7b 271 RssiValue = rssi;
GregCr 0:1ed39951ab7b 272 SnrValue = snr;
GregCr 0:1ed39951ab7b 273 State = RX;
montagny 15:063aa5212203 274 debug_if( DEBUG_MESSAGE, "> OnRxDone : RSSI %d dBm : SNR %d dB \n\r",RssiValue, SnrValue );
GregCr 0:1ed39951ab7b 275 }
GregCr 0:1ed39951ab7b 276
GregCr 0:1ed39951ab7b 277 void OnTxTimeout( void )
GregCr 0:1ed39951ab7b 278 {
GregCr 0:1ed39951ab7b 279 Radio.Sleep( );
GregCr 0:1ed39951ab7b 280 State = TX_TIMEOUT;
GregCr 7:c1bbd6c56979 281 debug_if( DEBUG_MESSAGE, "> OnTxTimeout\n\r" );
GregCr 0:1ed39951ab7b 282 }
GregCr 0:1ed39951ab7b 283
GregCr 0:1ed39951ab7b 284 void OnRxTimeout( void )
GregCr 0:1ed39951ab7b 285 {
GregCr 0:1ed39951ab7b 286 Radio.Sleep( );
mluis 14:ab6eecd44b7a 287 Buffer[BufferSize] = 0;
GregCr 0:1ed39951ab7b 288 State = RX_TIMEOUT;
GregCr 7:c1bbd6c56979 289 debug_if( DEBUG_MESSAGE, "> OnRxTimeout\n\r" );
GregCr 0:1ed39951ab7b 290 }
GregCr 0:1ed39951ab7b 291
GregCr 0:1ed39951ab7b 292 void OnRxError( void )
GregCr 0:1ed39951ab7b 293 {
GregCr 0:1ed39951ab7b 294 Radio.Sleep( );
GregCr 0:1ed39951ab7b 295 State = RX_ERROR;
GregCr 7:c1bbd6c56979 296 debug_if( DEBUG_MESSAGE, "> OnRxError\n\r" );
GregCr 0:1ed39951ab7b 297 }