![](/media/cache/img/default_profile.jpg.50x50_q85.jpg)
LoRa Gateway, interface to Raspberry - Working ok
Dependencies: BufferedSerial SX1276GenericLib mbed
Fork of DISCO-L072CZ-LRWAN1_LoRa_server by
Diff: SX1276GenericPingPong/GenericPingPong.cpp
- Revision:
- 12:fdf2b9912649
- Parent:
- 11:9d7409ebfa57
- Child:
- 14:fe73b77cf1c0
--- a/SX1276GenericPingPong/GenericPingPong.cpp Fri Aug 18 07:45:44 2017 +0000 +++ b/SX1276GenericPingPong/GenericPingPong.cpp Wed Aug 08 22:29:41 2018 +0000 @@ -4,12 +4,13 @@ * (c) 2017 Helmut Tschemernjak * 30826 Garbsen (Hannover) Germany */ - + #include "mbed.h" #include "PinMap.h" #include "GenericPingPong.h" #include "sx1276-mbed-hal.h" #include "main.h" +#include <string> #ifdef FEATURE_LORA @@ -19,8 +20,8 @@ /* Set this flag to '1' to use the LoRa modulation or to '0' to use FSK modulation */ #define USE_MODEM_LORA 1 #define USE_MODEM_FSK !USE_MODEM_LORA -#define RF_FREQUENCY RF_FREQUENCY_868_1 // Hz -#define TX_OUTPUT_POWER 14 // 14 dBm +#define RF_FREQUENCY RF_FREQUENCY_915_0 // Hz +#define TX_OUTPUT_POWER 20 // 20 dBm #if USE_MODEM_LORA == 1 @@ -31,11 +32,11 @@ #define LORA_PREAMBLE_LENGTH 8 // Same for Tx and Rx #define LORA_SYMBOL_TIMEOUT 5 // Symbols #define LORA_FIX_LENGTH_PAYLOAD_ON false -#define LORA_FHSS_ENABLED false -#define LORA_NB_SYMB_HOP 4 +#define LORA_FHSS_ENABLED true +#define LORA_NB_SYMB_HOP 4 #define LORA_IQ_INVERSION_ON false #define LORA_CRC_ENABLED true - + #elif USE_MODEM_FSK == 1 #define FSK_FDEV 25000 // Hz @@ -45,10 +46,10 @@ #define FSK_PREAMBLE_LENGTH 5 // Same for Tx and Rx #define FSK_FIX_LENGTH_PAYLOAD_ON false #define FSK_CRC_ENABLED true - + #else - #error "Please define a modem in the compiler options." -#endif +#error "Please define a modem in the compiler options." +#endif #define RX_TIMEOUT_VALUE 3500 // in ms @@ -59,18 +60,17 @@ /* * Global variables declarations */ -typedef enum -{ +typedef enum { LOWPOWER = 0, IDLE, - + RX, RX_TIMEOUT, RX_ERROR, - + TX, TX_TIMEOUT, - + CAD, CAD_DONE } AppStates_t; @@ -88,16 +88,33 @@ SX1276Generic *Radio; -const uint8_t PingMsg[] = { 0xff, 0xff, 0x00, 0x00, 'P', 'I', 'N', 'G'};// "PING"; -const uint8_t PongMsg[] = { 0xff, 0xff, 0x00, 0x00, 'P', 'O', 'N', 'G'};// "PONG"; +//const uint8_t PingMsg[] = { 0xff, 0xff, 0x00, 0x00, 'P', 'I', 'N', 'G'};// "PING"; +//const uint8_t PongMsg[] = { 0xff, 0xff, 0x00, 0x00, 'P', 'O', 'N', 'G'};// "PONG"; +//const uint8_t PingMsg[] = { 'M', 'S', 'J', ' ','G','I','L'};// "PING"; +//const uint8_t PongMsg[] = { 'R', 'P', 'T', 'A',' ','G','I','L'};// "PONG"; +//construccion de la trama +const char EUI[] = "0A01";// 4 bytes que definen el identificador del dispositivo (copiar los bytes en string) +const char AppEUI[] = "AAAA";// 4 bytes que definen el identificador de la aplicacion (copiar los bytes en string) +const char AppKey[] = "1A1B";// 4 bytes que definen la clave de la aplicacion (copiar los bytes en string) - El protocolo LoRaWAN establece la clave de 16 bytes pero para efectos de prueba se hara de 4 +char MsgTX[64] = "";// Mensaje de transmision, se pueden usar los 52 bytes faltantes para completar el payload de 64 bytes. Se puede poner directamente en string. +char MsgRX[64] = "";// Mensaje de recepcion, carga el payload entrante a esta cadena. +char MsgRet[] = "RECIBIDO"; +char DestEUI[4] = ""; +char euiAux[4]=""; uint16_t BufferSize = BUFFER_SIZE; uint8_t *Buffer; +string msjDeco=""; +char *retParse; +char *srcEUI; +char *msjDestEUI; +char *msjContent; +Serial serRPi(PA_9, PA_10); DigitalOut *led3; -int SX1276PingPong() +int SX1276PingPong() { #if( defined ( TARGET_KL25Z ) || defined ( TARGET_LPC11U6X ) ) DigitalOut *led = new DigitalOut(LED2); @@ -108,27 +125,29 @@ DigitalOut *led = new DigitalOut(LED1); led3 = led; #endif - + Buffer = new uint8_t[BUFFER_SIZE]; *led3 = 1; #ifdef B_L072Z_LRWAN1_LORA Radio = new SX1276Generic(NULL, MURATA_SX1276, - LORA_SPI_MOSI, LORA_SPI_MISO, LORA_SPI_SCLK, LORA_CS, LORA_RESET, - LORA_DIO0, LORA_DIO1, LORA_DIO2, LORA_DIO3, LORA_DIO4, LORA_DIO5, - LORA_ANT_RX, LORA_ANT_TX, LORA_ANT_BOOST, LORA_TCXO); + LORA_SPI_MOSI, LORA_SPI_MISO, LORA_SPI_SCLK, LORA_CS, LORA_RESET, + LORA_DIO0, LORA_DIO1, LORA_DIO2, LORA_DIO3, LORA_DIO4, LORA_DIO5, + LORA_ANT_RX, LORA_ANT_TX, LORA_ANT_BOOST, LORA_TCXO); #else // RFM95 Radio = new SX1276Generic(NULL, RFM95_SX1276, - LORA_SPI_MOSI, LORA_SPI_MISO, LORA_SPI_SCLK, LORA_CS, LORA_RESET, - LORA_DIO0, LORA_DIO1, LORA_DIO2, LORA_DIO3, LORA_DIO4, LORA_DIO5); + LORA_SPI_MOSI, LORA_SPI_MISO, LORA_SPI_SCLK, LORA_CS, LORA_RESET, + LORA_DIO0, LORA_DIO1, LORA_DIO2, LORA_DIO3, LORA_DIO4, LORA_DIO5); #endif - + //serRPi = new BufferedSerial(PA_9, PA_10); + serRPi.baud(115200); + serRPi.format(8); uint8_t i; - bool isMaster = true; - - dprintf("SX1276 Ping Pong Demo Application" ); - dprintf("Freqency: %.1f", (double)RF_FREQUENCY/1000000.0); + bool isServer = true; + + dprintf("Aplicacion de comunicacion LoRa punto a punto" ); + dprintf("Frecuencia: %.1f", (double)RF_FREQUENCY/1000000.0); dprintf("TXPower: %d dBm", TX_OUTPUT_POWER); #if USE_MODEM_LORA == 1 dprintf("Bandwidth: %d Hz", LORA_BANDWIDTH); @@ -142,15 +161,15 @@ RadioEvents.RxDone = OnRxDone; RadioEvents.RxError = OnRxError; RadioEvents.TxTimeout = OnTxTimeout; - RadioEvents.RxTimeout = OnRxTimeout; + RadioEvents.RxTimeout = OnRxTimeout; if (Radio->Init( &RadioEvents ) == false) { while(1) { - dprintf("Radio could not be detected!"); - wait( 1 ); + dprintf("Radio could not be detected!"); + wait( 1 ); } } - + switch(Radio->DetectBoardType()) { case SX1276MB1LAS: if (DEBUG_MESSAGE) @@ -161,7 +180,7 @@ dprintf(" > Board Type: SX1276MB1LAS <"); case MURATA_SX1276: if (DEBUG_MESSAGE) - dprintf(" > Board Type: MURATA_SX1276_STM32L0 <"); + dprintf(" > Board Type: MURATA_SX1276_STM32L0 <"); break; case RFM95_SX1276: if (DEBUG_MESSAGE) @@ -171,200 +190,192 @@ dprintf(" > Board Type: unknown <"); } - Radio->SetChannel(RF_FREQUENCY ); + Radio->SetChannel(RF_FREQUENCY ); #if USE_MODEM_LORA == 1 - + if (LORA_FHSS_ENABLED) dprintf(" > LORA FHSS Mode <"); if (!LORA_FHSS_ENABLED) dprintf(" > LORA Mode <"); Radio->SetTxConfig( MODEM_LORA, TX_OUTPUT_POWER, 0, LORA_BANDWIDTH, - LORA_SPREADING_FACTOR, LORA_CODINGRATE, - LORA_PREAMBLE_LENGTH, LORA_FIX_LENGTH_PAYLOAD_ON, - LORA_CRC_ENABLED, LORA_FHSS_ENABLED, LORA_NB_SYMB_HOP, - LORA_IQ_INVERSION_ON, 2000 ); - + LORA_SPREADING_FACTOR, LORA_CODINGRATE, + LORA_PREAMBLE_LENGTH, LORA_FIX_LENGTH_PAYLOAD_ON, + LORA_CRC_ENABLED, LORA_FHSS_ENABLED, LORA_NB_SYMB_HOP, + LORA_IQ_INVERSION_ON, 2000 ); + Radio->SetRxConfig( MODEM_LORA, LORA_BANDWIDTH, LORA_SPREADING_FACTOR, - LORA_CODINGRATE, 0, LORA_PREAMBLE_LENGTH, - LORA_SYMBOL_TIMEOUT, LORA_FIX_LENGTH_PAYLOAD_ON, 0, - LORA_CRC_ENABLED, LORA_FHSS_ENABLED, LORA_NB_SYMB_HOP, - LORA_IQ_INVERSION_ON, true ); - + LORA_CODINGRATE, 0, LORA_PREAMBLE_LENGTH, + LORA_SYMBOL_TIMEOUT, LORA_FIX_LENGTH_PAYLOAD_ON, 0, + LORA_CRC_ENABLED, LORA_FHSS_ENABLED, LORA_NB_SYMB_HOP, + LORA_IQ_INVERSION_ON, true ); + #elif USE_MODEM_FSK == 1 dprintf(" > FSK Mode <"); Radio->SetTxConfig( MODEM_FSK, TX_OUTPUT_POWER, FSK_FDEV, 0, - FSK_DATARATE, 0, - FSK_PREAMBLE_LENGTH, FSK_FIX_LENGTH_PAYLOAD_ON, - FSK_CRC_ENABLED, 0, 0, 0, 2000 ); - + FSK_DATARATE, 0, + FSK_PREAMBLE_LENGTH, FSK_FIX_LENGTH_PAYLOAD_ON, + FSK_CRC_ENABLED, 0, 0, 0, 2000 ); + Radio->SetRxConfig( MODEM_FSK, FSK_BANDWIDTH, FSK_DATARATE, - 0, FSK_AFC_BANDWIDTH, FSK_PREAMBLE_LENGTH, - 0, FSK_FIX_LENGTH_PAYLOAD_ON, 0, FSK_CRC_ENABLED, - 0, 0, false, true ); - + 0, FSK_AFC_BANDWIDTH, FSK_PREAMBLE_LENGTH, + 0, FSK_FIX_LENGTH_PAYLOAD_ON, 0, FSK_CRC_ENABLED, + 0, 0, false, true ); + #else #error "Please define a modem in the compiler options." #endif - - if (DEBUG_MESSAGE) - dprintf("Starting Ping-Pong loop"); - + if (DEBUG_MESSAGE) + dprintf("Inicializando el servidor"); + dprintf("EUI (ID): %s",EUI); + Radio->Rx( RX_TIMEOUT_VALUE ); - - while( 1 ) - { + + while( 1 ) { #ifdef TARGET_STM32L4 WatchDogUpdate(); #endif - - switch( State ) - { - case RX: - *led3 = 0; - if( isMaster == true ) - { - if( BufferSize > 0 ) - { - if( memcmp(Buffer, PongMsg, sizeof(PongMsg)) == 0 ) - { - *led = !*led; - dprintf( "...Pong" ); - // Send the next PING frame - memcpy(Buffer, PingMsg, sizeof(PingMsg)); - // We fill the buffer with numbers for the payload - for( i = sizeof(PingMsg); i < BufferSize; i++ ) - { - Buffer[i] = i - sizeof(PingMsg); - } - wait_ms( 10 ); - Radio->Send( Buffer, BufferSize ); - } - else if( memcmp(Buffer, PingMsg, sizeof(PingMsg)) == 0 ) - { // A master already exists then become a slave - dprintf( "...Ping" ); - *led = !*led; - isMaster = false; - // Send the next PONG frame - memcpy(Buffer, PongMsg, sizeof(PongMsg)); - // We fill the buffer with numbers for the payload - for( i = sizeof(PongMsg); i < BufferSize; i++ ) - { - Buffer[i] = i - sizeof(PongMsg); - } - wait_ms( 10 ); - Radio->Send( Buffer, BufferSize ); - } - else // valid reception but neither a PING or a PONG message - { // Set device as master ans start again - isMaster = true; - Radio->Rx( RX_TIMEOUT_VALUE ); - } + + switch( State ) { + case RX: + //dprintf( "Recibiendo informacion" ); + *led = !*led; + //dprintf("Mensaje para depurar: %s",MsgRX); + //strcpy(DestEUI,"A010"); + msjDeco=MsgRX; + //vector<string> x = split(msjDeco, '|'); + splitOnPosition(MsgRX, 0); + //msjDestEUI=splitOnPosition(MsgRX, 3); + //msjContent=splitOnPosition(MsgRX, 4); + + dprintf("Source EUI: %s, Destination EUI: %s, Content: %s",srcEUI,msjDestEUI,msjContent); + if(strcmp(EUI,msjDestEUI) == 0) { + dprintf("Mismo EUI, Soy el destinatario"); + + } else { + dprintf("Diferente EUI, ignorar mensaje"); + Radio->Rx( RX_TIMEOUT_VALUE ); + wait_ms( 500 ); + *led = !*led; + State = LOWPOWER; + break; } - } - else - { - if( BufferSize > 0 ) - { - if( memcmp(Buffer, PingMsg, sizeof(PingMsg)) == 0 ) - { - *led = !*led; - dprintf( "...Ping" ); - // Send the reply to the PING string - memcpy(Buffer, PongMsg, sizeof(PongMsg)); - // We fill the buffer with numbers for the payload - for( i = sizeof(PongMsg); i < BufferSize; i++ ) - { - Buffer[i] = i - sizeof(PongMsg); - } - wait_ms( 10 ); - Radio->Send( Buffer, BufferSize ); - } - else // valid reception but not a PING as expected - { // Set device as master and start again - isMaster = true; - Radio->Rx( RX_TIMEOUT_VALUE ); - } + strcpy(MsgRet,"RECIBIDO"); + strcpy(MsgTX, EUI); + strcat(MsgTX, "|"); + strcat(MsgTX, AppEUI); + strcat(MsgTX, "|"); + strcat(MsgTX, AppKey); + strcat(MsgTX, "|"); + strcat(MsgTX, srcEUI); + strcat(MsgTX, "|"); + strcat(MsgTX, MsgRet); + //strcat(MsgTX, ";"); + //MsgRX = "RECIBIDO"; + memcpy(Buffer, MsgTX, sizeof(MsgTX)); + // Se llena el buffer con la informacion a enviar + for( i = sizeof(MsgTX); i < BufferSize; i++ ) { + Buffer[i] = i - sizeof(MsgTX); + } + //dprintf("enviando mensaje a raspberry"); + serRPi.printf("contenido: %s \r\n",msjContent); + Radio->Send( Buffer, BufferSize ); + Radio->Rx( RX_TIMEOUT_VALUE ); + wait_ms( 500 ); + + /*Enviar contenido a la raspberry por puerto serial*/ + + + /***************************************************/ + + *led = !*led; + State = LOWPOWER; + break; + case TX: + *led3 = !*led3; + if( isServer == true ) { + //dprintf("Enviando respuesta al nodo" ); + //dprintf("Mensaje a enviar: %s",MsgTX); } - } - State = LOWPOWER; - break; - case TX: - *led3 = 1; - if( isMaster == true ) - { - dprintf("Ping..." ); - } - else - { - dprintf("Pong..." ); - } - Radio->Rx( RX_TIMEOUT_VALUE ); - State = LOWPOWER; - break; - case RX_TIMEOUT: - if( isMaster == true ) - { - // Send the next PING frame - memcpy(Buffer, PingMsg, sizeof(PingMsg)); - for( i = sizeof(PingMsg); i < BufferSize; i++ ) - { - Buffer[i] = i - sizeof(PingMsg); + wait_ms( 500 ); + *led3 = !*led3; + Radio->Rx( RX_TIMEOUT_VALUE ); + State = LOWPOWER; + break; + case RX_TIMEOUT: + + Radio->Rx( RX_TIMEOUT_VALUE ); + State = LOWPOWER; + break; + case RX_ERROR: + // We have received a Packet with a CRC error, send reply as if packet was correct + strcpy(MsgRet,"ERROR"); + strcpy(MsgTX, EUI); + strcat(MsgTX, "|"); + strcat(MsgTX, AppEUI); + strcat(MsgTX, "|"); + strcat(MsgTX, AppKey); + strcat(MsgTX, "|"); + strcat(MsgTX, "A010"); + strcat(MsgTX, "|"); + strcat(MsgTX, MsgRet); + //MsgRX = "ERROR"; + if( isServer == true ) { + // Se llena el buffer para el envio del error + memcpy(Buffer, MsgTX, sizeof(MsgTX)); + for( i = sizeof(MsgTX); i < BufferSize; i++ ) { + Buffer[i] = i - sizeof(MsgTX); + } + wait_ms( 1000 ); + Radio->Send( Buffer, BufferSize ); } - wait_ms( 10 ); - Radio->Send( Buffer, BufferSize ); - } - else - { - Radio->Rx( RX_TIMEOUT_VALUE ); - } - State = LOWPOWER; - break; - case RX_ERROR: - // We have received a Packet with a CRC error, send reply as if packet was correct - if( isMaster == true ) - { - // Send the next PING frame - memcpy(Buffer, PingMsg, sizeof(PingMsg)); - for( i = 4; i < BufferSize; i++ ) - { - Buffer[i] = i - 4; - } - wait_ms( 10 ); - Radio->Send( Buffer, BufferSize ); - } - else - { - // Send the next PONG frame - memcpy(Buffer, PongMsg, sizeof(PongMsg)); - for( i = sizeof(PongMsg); i < BufferSize; i++ ) - { - Buffer[i] = i - sizeof(PongMsg); - } - wait_ms( 10 ); - Radio->Send( Buffer, BufferSize ); - } - State = LOWPOWER; - break; - case TX_TIMEOUT: - Radio->Rx( RX_TIMEOUT_VALUE ); - State = LOWPOWER; - break; - case LOWPOWER: - sleep(); - break; - default: - State = LOWPOWER; - break; - } + State = LOWPOWER; + break; + case TX_TIMEOUT: + Radio->Rx( RX_TIMEOUT_VALUE ); + State = LOWPOWER; + break; + case LOWPOWER: + sleep(); + break; + default: + State = LOWPOWER; + break; + } } } +char *splitOnPosition(char *msj, int pos) +{ + + int i=0; + char *substring = strtok (msj,"|"); + char *strOutput=""; + while (substring != NULL) { + //dprintf ("substring: %s, index: %d",substring,i); + + if(i == 0) { + srcEUI = substring; + } else if(i == 3) { + msjDestEUI = substring; + } else if(i == 4) { + msjContent = substring; + } else if(i > 4) { + strcat(msjContent," "); + strcat(msjContent,substring); + //dprintf ("contenido: %s, substring: %s, i: %d",msjContent, substring, i); + } + substring = strtok (NULL, "|"); + i++; + } + return strOutput; +} + void OnTxDone(void *radio, void *userThisPtr, void *userData) { Radio->Sleep( ); @@ -381,7 +392,9 @@ State = RX; if (DEBUG_MESSAGE) dprintf("> OnRxDone: RssiValue=%d dBm, SnrValue=%d", rssi, snr); - dump("Data:", payload, size); + //dump("Data:", payload, size); + strcpy(MsgRX,(char*)payload); + //dprintf("Msj: %s", MsgRX); } void OnTxTimeout(void *radio, void *userThisPtr, void *userData)