Santiago Gil
LoRa Gateway, interface to Raspberry - Working ok
Dependencies: BufferedSerial SX1276GenericLib mbed
Fork of
DISCO-L072CZ-LRWAN1_LoRa_server
by 
Santiago Gil
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)