Example implementation of LoraWan specification based on IBM LoraWan in C (ver. 1.5) for Elmo board. Tested only with OTA activation (requires setting AppEui/ DevKey in main.cpp).
main.cpp
- Committer:
- WGorniak
- Date:
- 2015-10-02
- Revision:
- 0:bb3b0e756578
- Child:
- 2:7dc3d0e3de3a
File content as of revision 0:bb3b0e756578:
/* / _____) _ | | ( (____ _____ ____ _| |_ _____ ____| |__ \____ \| ___ | (_ _) ___ |/ ___) _ \ _____) ) ____| | | || |_| ____( (___| | | | (______/|_____)_|_|_| \__)_____)\____)_| |_| (C)2015 Semtech Description: MBED LoRaWAN example application License: Revised BSD License, see LICENSE.TXT file include in the project Maintainer: Miguel Luis and Gregory Cristian */ #include "mbed.h" #include "lmic.h" #include "debug.h" /*! * When set to 1 the application uses the Over-the-Air activation procedure * When set to 0 the application uses the Personalization activation procedure */ #define OVER_THE_AIR_ACTIVATION 1 //default 0 #if( OVER_THE_AIR_ACTIVATION == 0 ) /*! * Defines the network ID when using personalization activation procedure */ #define LORAWAN_NET_ID ( uint32_t )0x00000000 /*! * Defines the device address when using personalization activation procedure */ #define LORAWAN_DEV_ADDR ( uint32_t )0x12341111 #endif /*! * Defines the application data transmission duty cycle */ #define APP_TX_DUTYCYCLE 5000 // 5 [s] value in ms #define APP_TX_DUTYCYCLE_RND 1000 // 1 [s] value in ms /*! * LoRaWAN Adaptative Data Rate */ #define LORAWAN_ADR_ON 1 /*! * LoRaWAN confirmed messages */ #define LORAWAN_CONFIRMED_MSG_ON 0 /*! * LoRaWAN application port */ #define LORAWAN_APP_PORT 1784 /*! * User application data buffer size */ #if ( LORAWAN_CONFIRMED_MSG_ON == 1 ) #define LORAWAN_APP_DATA_SIZE 6 #else #define LORAWAN_APP_DATA_SIZE 1 #endif // // For sending data via button // InterruptIn button(USER_BUTTON); DigitalOut led(LED1); ////////////////////////////////////////////////// // CONFIGURATION (FOR APPLICATION CALLBACKS BELOW) ////////////////////////////////////////////////// // application router ID (LSBF) static const uint8_t AppEui[8] = { 0x01, 0x02, 0x03, 0x00, 0x00, 0x00, 0x00, 0x00 }; // unique device ID (LSBF) static const u1_t DevEui[8] = { 0x00, 0x80, 0x00, 0x00, 0x00, 0x00, 0x099, 0xF7 }; // device-specific AES key (derived from device EUI) static const uint8_t DevKey[16] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x01 }; #if( OVER_THE_AIR_ACTIVATION == 0 ) // network session key static uint8_t NwkSKey[] = { 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6, 0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C }; // application session key static uint8_t ArtSKey[] = { 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6, 0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C }; #endif // LEDs and Frame jobs osjob_t rxLedJob; osjob_t txLedJob; osjob_t sendFrameJob; // LED state static bool AppLedStateOn = false; ////////////////////////////////////////////////// // Utility functions ////////////////////////////////////////////////// /*! * \brief Computes a random number between min and max * * \param [IN] min range minimum value * \param [IN] max range maximum value * \retval random random value in range min..max */ int32_t randr( int32_t min, int32_t max ) { return ( int32_t )rand( ) % ( max - min + 1 ) + min; } ////////////////////////////////////////////////// // APPLICATION CALLBACKS ////////////////////////////////////////////////// // provide application router ID (8 bytes, LSBF) void os_getArtEui( uint8_t *buf ) { memcpy( buf, AppEui, 8 ); } // provide device ID (8 bytes, LSBF) void os_getDevEui( uint8_t *buf ) { memcpy( buf, DevEui, 8 ); } // provide device key (16 bytes) void os_getDevKey( uint8_t *buf ) { memcpy( buf, DevKey, 16 ); } ////////////////////////////////////////////////// // MAIN - INITIALIZATION AND STARTUP ////////////////////////////////////////////////// static void onRxLed( osjob_t* j ) { debug_val((const unsigned char*)"LED2 = ", 0 ); } static void onTxLed( osjob_t* j ) { debug_val((const unsigned char*)"LED1 = ", 0 ); } static void prepareTxFrame( void ) { LMIC.frame[0] = AppLedStateOn; #if ( LORAWAN_CONFIRMED_MSG_ON == 1 ) LMIC.frame[1] = LMIC.seqnoDn >> 8; LMIC.frame[2] = LMIC.seqnoDn; LMIC.frame[3] = LMIC.rssi >> 8; LMIC.frame[4] = LMIC.rssi; LMIC.frame[5] = LMIC.snr; #endif } void processRxFrame( void ) { printf("processRxFrame\r\n"); switch( LMIC.frame[LMIC.dataBeg - 1] ) // Check Rx port number { case 1: // The application LED can be controlled on port 1 or 2 case 2: if( LMIC.dataLen == 1 ) { AppLedStateOn = LMIC.frame[LMIC.dataBeg] & 0x01; debug_val( (const unsigned char*)"LED3 = ", AppLedStateOn ); } break; default: break; } } void onSendFrame( osjob_t* j ) { prepareTxFrame( ); LMIC_setTxData2( LORAWAN_APP_PORT, LMIC.frame, LORAWAN_APP_DATA_SIZE, LORAWAN_CONFIRMED_MSG_ON ); } // Initialization job static void onInit( osjob_t* j ) { // reset MAC state LMIC_reset( ); LMIC_setAdrMode( LORAWAN_ADR_ON ); LMIC_setDrTxpow( DR_SF12, 14 ); // start joining #if( OVER_THE_AIR_ACTIVATION != 0 ) LMIC_startJoining( ); #else LMIC_setSession( LORAWAN_NET_ID, LORAWAN_DEV_ADDR, NwkSKey, ArtSKey ); onSendFrame( NULL ); #endif // init done - onEvent( ) callback will be invoked... } int main( void ) { osjob_t initjob; // initialize runtime env os_init( ); // setup initial job os_setCallback( &initjob, onInit ); // execute scheduled jobs and events os_runloop( ); // (not reached) } ////////////////////////////////////////////////// // LMIC EVENT CALLBACK ////////////////////////////////////////////////// void onEvent( ev_t ev ) { bool txOn = false; debug_event( ev ); switch( ev ) { // network joined, session established case EV_JOINED: debug_val( (const unsigned char*)"Net ID = ", LMIC.netid ); txOn = true; break; // scheduled data sent (optionally data received) case EV_TXCOMPLETE: debug_val( (const unsigned char*)"Datarate = ", LMIC.datarate ); // Check if we have a downlink on either Rx1 or Rx2 windows if( ( LMIC.txrxFlags & ( TXRX_DNW1 | TXRX_DNW2 ) ) != 0 ) { debug_val( (const unsigned char*)"LED2 = ", 1 ); os_setTimedCallback( &rxLedJob, os_getTime( ) + ms2osticks( 25 ), onRxLed ); if( LMIC.dataLen != 0 ) { // data received in rx slot after tx printf("data received in rx slot after tx: \r\n"); debug_buf( LMIC.frame + LMIC.dataBeg, LMIC.dataLen ); processRxFrame( ); } } txOn = true; break; default: break; } if( txOn == true ) { //Sends frame every APP_TX_DUTYCYCLE +/- APP_TX_DUTYCYCLE_RND random time (if not duty cycle limited) os_setTimedCallback( &sendFrameJob, os_getTime( ) + ms2osticks( APP_TX_DUTYCYCLE + randr( -APP_TX_DUTYCYCLE_RND, APP_TX_DUTYCYCLE_RND ) ), onSendFrame ); // //Sends frame as soon as possible (duty cylce limitations) // onSendFrame( NULL ); } }