Timothy Mulrooney / Mbed 2 deprecated LoRaWAN-lmic-app_tjm

first draft

Dependencies:   LMiC SX1272Libx mbed

Fork of LoRaWAN-lmic-app by Semtech

main.cpp@6:fc465060b63e, 2016-02-23 (annotated)

Committer:
tmulrooney
Date:
Tue Feb 23 15:42:41 2016 +0000
Revision:
6:fc465060b63e
Parent:
5:1b2fcc2582e8
Child:
8:0137acc9a6cd
first draft

Who changed what in which revision?

UserRevisionLine numberNew contents of line
sam_grove 3:ce28e3313a88 1 /*
mluis 0:a2929fa6e4f0 2 / _____) _ | |
mluis 0:a2929fa6e4f0 3 ( (____ _____ ____ _| |_ _____ ____| |__
mluis 0:a2929fa6e4f0 4 \____ \| ___ | (_ _) ___ |/ ___) _ \
mluis 0:a2929fa6e4f0 5 _____) ) ____| | | || |_| ____( (___| | | |
mluis 0:a2929fa6e4f0 6 (______/|_____)_|_|_| \__)_____)\____)_| |_|
mluis 1:60184eda0066 7 (C)2015 Semtech
mluis 0:a2929fa6e4f0 8
mluis 1:60184eda0066 9 Description: MBED LoRaWAN example application
mluis 0:a2929fa6e4f0 10
mluis 0:a2929fa6e4f0 11 License: Revised BSD License, see LICENSE.TXT file include in the project
mluis 0:a2929fa6e4f0 12
mluis 0:a2929fa6e4f0 13 Maintainer: Miguel Luis and Gregory Cristian
mluis 0:a2929fa6e4f0 14 */
mluis 1:60184eda0066 15 #include "mbed.h"
mluis 1:60184eda0066 16
mluis 0:a2929fa6e4f0 17 #include "lmic.h"
mluis 1:60184eda0066 18 #include "debug.h"
mluis 0:a2929fa6e4f0 19
mluis 0:a2929fa6e4f0 20 /*!
mluis 0:a2929fa6e4f0 21 * When set to 1 the application uses the Over-the-Air activation procedure
mluis 0:a2929fa6e4f0 22 * When set to 0 the application uses the Personalization activation procedure
mluis 0:a2929fa6e4f0 23 */
tmulrooney 6:fc465060b63e 24 #define OVER_THE_AIR_ACTIVATION 1
mluis 0:a2929fa6e4f0 25
mluis 1:60184eda0066 26 #if( OVER_THE_AIR_ACTIVATION == 0 )
mluis 1:60184eda0066 27
mluis 1:60184eda0066 28 /*!
mluis 1:60184eda0066 29 * Defines the network ID when using personalization activation procedure
mluis 1:60184eda0066 30 */
mluis 1:60184eda0066 31 #define LORAWAN_NET_ID ( uint32_t )0x00000000
mluis 1:60184eda0066 32
mluis 1:60184eda0066 33 /*!
mluis 1:60184eda0066 34 * Defines the device address when using personalization activation procedure
mluis 1:60184eda0066 35 */
mluis 1:60184eda0066 36 #define LORAWAN_DEV_ADDR ( uint32_t )0x12345678
mluis 1:60184eda0066 37
mluis 1:60184eda0066 38 #endif
mluis 1:60184eda0066 39
mluis 1:60184eda0066 40 /*!
mluis 1:60184eda0066 41 * Defines the application data transmission duty cycle
mluis 1:60184eda0066 42 */
mluis 1:60184eda0066 43 #define APP_TX_DUTYCYCLE 5000 // 5 [s] value in ms
mluis 1:60184eda0066 44 #define APP_TX_DUTYCYCLE_RND 1000 // 1 [s] value in ms
mluis 1:60184eda0066 45
mluis 1:60184eda0066 46 /*!
mluis 1:60184eda0066 47 * LoRaWAN Adaptative Data Rate
mluis 1:60184eda0066 48 */
mluis 1:60184eda0066 49 #define LORAWAN_ADR_ON 1
mluis 1:60184eda0066 50
mluis 1:60184eda0066 51 /*!
mluis 1:60184eda0066 52 * LoRaWAN confirmed messages
mluis 1:60184eda0066 53 */
mluis 1:60184eda0066 54 #define LORAWAN_CONFIRMED_MSG_ON 1
mluis 1:60184eda0066 55
mluis 1:60184eda0066 56 /*!
mluis 1:60184eda0066 57 * LoRaWAN application port
mluis 1:60184eda0066 58 */
mluis 1:60184eda0066 59 #define LORAWAN_APP_PORT 15
mluis 1:60184eda0066 60
mluis 1:60184eda0066 61 /*!
mluis 1:60184eda0066 62 * User application data buffer size
mluis 1:60184eda0066 63 */
mluis 1:60184eda0066 64 #if ( LORAWAN_CONFIRMED_MSG_ON == 1 )
mluis 1:60184eda0066 65 #define LORAWAN_APP_DATA_SIZE 6
mluis 1:60184eda0066 66
mluis 1:60184eda0066 67 #else
mluis 1:60184eda0066 68 #define LORAWAN_APP_DATA_SIZE 1
mluis 1:60184eda0066 69
mluis 1:60184eda0066 70 #endif
tmulrooney 6:fc465060b63e 71 Serial pc(PTE0, PTE1);
mluis 0:a2929fa6e4f0 72
mluis 0:a2929fa6e4f0 73 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 74 // CONFIGURATION (FOR APPLICATION CALLBACKS BELOW)
mluis 0:a2929fa6e4f0 75 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 76 // application router ID (LSBF)
tmulrooney 6:fc465060b63e 77 static const u1_t AppEui[8] = { 0x00, 0x11, 0x22, 0x33, 0x44, 0x55, 0x66, 0x77 };
mluis 0:a2929fa6e4f0 78
mluis 0:a2929fa6e4f0 79 // unique device ID (LSBF)
tmulrooney 6:fc465060b63e 80 static const u1_t DevEui[8] = { 0x02, 0x00, 0x00, 0x00, 0x00, 0xee, 0xff, 0xc0 };
mluis 0:a2929fa6e4f0 81
mluis 0:a2929fa6e4f0 82 // device-specific AES key (derived from device EUI)
tmulrooney 6:fc465060b63e 83 static const u1_t DevKey[16] = { 0x00, 0x11, 0x22, 0x33, 0x44, 0x55, 0x66, 0x77, 0x88, 0x99, 0xAA, 0xBB, 0xCC, 0xDD, 0xEE, 0xFF, };
tmulrooney 6:fc465060b63e 84 // E4 -72 -71 -C5 -F5 -30 -A9 -9F -CF -C4 -0E -AB -EA -D7 -19 -42
mluis 1:60184eda0066 85 #if( OVER_THE_AIR_ACTIVATION == 0 )
mluis 1:60184eda0066 86 // network session key
mluis 0:a2929fa6e4f0 87 static uint8_t NwkSKey[] =
mluis 0:a2929fa6e4f0 88 {
mluis 0:a2929fa6e4f0 89 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6,
mluis 0:a2929fa6e4f0 90 0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C
mluis 0:a2929fa6e4f0 91 };
mluis 0:a2929fa6e4f0 92
mluis 1:60184eda0066 93 // application session key
mluis 0:a2929fa6e4f0 94 static uint8_t ArtSKey[] =
mluis 0:a2929fa6e4f0 95 {
mluis 0:a2929fa6e4f0 96 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6,
mluis 0:a2929fa6e4f0 97 0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C
mluis 0:a2929fa6e4f0 98 };
mluis 0:a2929fa6e4f0 99
mluis 1:60184eda0066 100 #endif
mluis 1:60184eda0066 101
mluis 0:a2929fa6e4f0 102 // LEDs and Frame jobs
mluis 0:a2929fa6e4f0 103 osjob_t rxLedJob;
mluis 0:a2929fa6e4f0 104 osjob_t txLedJob;
mluis 0:a2929fa6e4f0 105 osjob_t sendFrameJob;
mluis 0:a2929fa6e4f0 106
mluis 1:60184eda0066 107 // LED state
mluis 0:a2929fa6e4f0 108 static bool AppLedStateOn = false;
mluis 0:a2929fa6e4f0 109
mluis 0:a2929fa6e4f0 110 //////////////////////////////////////////////////
mluis 1:60184eda0066 111 // Utility functions
mluis 1:60184eda0066 112 //////////////////////////////////////////////////
mluis 1:60184eda0066 113 /*!
mluis 1:60184eda0066 114 * \brief Computes a random number between min and max
mluis 1:60184eda0066 115 *
mluis 1:60184eda0066 116 * \param [IN] min range minimum value
mluis 1:60184eda0066 117 * \param [IN] max range maximum value
mluis 1:60184eda0066 118 * \retval random random value in range min..max
mluis 1:60184eda0066 119 */
mluis 1:60184eda0066 120 int32_t randr( int32_t min, int32_t max )
mluis 1:60184eda0066 121 {
mluis 1:60184eda0066 122 return ( int32_t )rand( ) % ( max - min + 1 ) + min;
mluis 1:60184eda0066 123 }
mluis 1:60184eda0066 124
mluis 1:60184eda0066 125 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 126 // APPLICATION CALLBACKS
mluis 0:a2929fa6e4f0 127 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 128
mluis 0:a2929fa6e4f0 129 // provide application router ID (8 bytes, LSBF)
mluis 1:60184eda0066 130 void os_getArtEui( uint8_t *buf )
mluis 0:a2929fa6e4f0 131 {
mluis 0:a2929fa6e4f0 132 memcpy( buf, AppEui, 8 );
tmulrooney 6:fc465060b63e 133 debug("os_getArtEui enter");
tmulrooney 6:fc465060b63e 134 for(int i=0;i<8;i++)
tmulrooney 6:fc465060b63e 135 debug(" %02X",buf[i]);
tmulrooney 6:fc465060b63e 136 debug("\r\n");
mluis 0:a2929fa6e4f0 137 }
mluis 0:a2929fa6e4f0 138
mluis 0:a2929fa6e4f0 139 // provide device ID (8 bytes, LSBF)
mluis 1:60184eda0066 140 void os_getDevEui( uint8_t *buf )
mluis 0:a2929fa6e4f0 141 {
mluis 0:a2929fa6e4f0 142 memcpy( buf, DevEui, 8 );
tmulrooney 6:fc465060b63e 143 debug("os_getDevEui enter");
tmulrooney 6:fc465060b63e 144 for(int i=0;i<8;i++)
tmulrooney 6:fc465060b63e 145 debug(" %02X",buf[i]);
tmulrooney 6:fc465060b63e 146 debug("\r\n");
mluis 0:a2929fa6e4f0 147 }
mluis 0:a2929fa6e4f0 148
mluis 0:a2929fa6e4f0 149 // provide device key (16 bytes)
mluis 1:60184eda0066 150 void os_getDevKey( uint8_t *buf )
mluis 0:a2929fa6e4f0 151 {
mluis 0:a2929fa6e4f0 152 memcpy( buf, DevKey, 16 );
tmulrooney 6:fc465060b63e 153 debug("os_getDevKey enter");
tmulrooney 6:fc465060b63e 154 for(int i=0;i<16;i++)
tmulrooney 6:fc465060b63e 155 debug(" %02X",buf[i]);
tmulrooney 6:fc465060b63e 156 debug("\r\n");
mluis 0:a2929fa6e4f0 157 }
mluis 0:a2929fa6e4f0 158
mluis 0:a2929fa6e4f0 159 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 160 // MAIN - INITIALIZATION AND STARTUP
mluis 0:a2929fa6e4f0 161 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 162
mluis 0:a2929fa6e4f0 163 static void onRxLed( osjob_t* j )
mluis 0:a2929fa6e4f0 164 {
mluis 1:60184eda0066 165 debug_val("LED2 = ", 0 );
mluis 0:a2929fa6e4f0 166 }
mluis 0:a2929fa6e4f0 167
mluis 0:a2929fa6e4f0 168 static void onTxLed( osjob_t* j )
mluis 0:a2929fa6e4f0 169 {
mluis 1:60184eda0066 170 debug_val("LED1 = ", 0 );
mluis 0:a2929fa6e4f0 171 }
mluis 0:a2929fa6e4f0 172
mluis 0:a2929fa6e4f0 173 static void prepareTxFrame( void )
mluis 0:a2929fa6e4f0 174 {
mluis 0:a2929fa6e4f0 175 LMIC.frame[0] = AppLedStateOn;
mluis 1:60184eda0066 176 #if ( LORAWAN_CONFIRMED_MSG_ON == 1 )
mluis 1:60184eda0066 177 LMIC.frame[1] = LMIC.seqnoDn >> 8;
mluis 1:60184eda0066 178 LMIC.frame[2] = LMIC.seqnoDn;
mluis 1:60184eda0066 179 LMIC.frame[3] = LMIC.rssi >> 8;
mluis 1:60184eda0066 180 LMIC.frame[4] = LMIC.rssi;
mluis 1:60184eda0066 181 LMIC.frame[5] = LMIC.snr;
mluis 1:60184eda0066 182 #endif
mluis 0:a2929fa6e4f0 183 }
mluis 0:a2929fa6e4f0 184
mluis 0:a2929fa6e4f0 185 void processRxFrame( void )
mluis 0:a2929fa6e4f0 186 {
tmulrooney 6:fc465060b63e 187 debug("processRxFrame enter\r\n");
tmulrooney 6:fc465060b63e 188 switch( LMIC.frame[LMIC.dataBeg - 1] ) // Check Rx port number
mluis 0:a2929fa6e4f0 189 {
mluis 0:a2929fa6e4f0 190 case 1: // The application LED can be controlled on port 1 or 2
mluis 0:a2929fa6e4f0 191 case 2:
mluis 0:a2929fa6e4f0 192 if( LMIC.dataLen == 1 )
mluis 0:a2929fa6e4f0 193 {
mluis 0:a2929fa6e4f0 194 AppLedStateOn = LMIC.frame[LMIC.dataBeg] & 0x01;
mluis 1:60184eda0066 195 debug_val( "LED3 = ", AppLedStateOn );
mluis 0:a2929fa6e4f0 196 }
mluis 0:a2929fa6e4f0 197 break;
mluis 0:a2929fa6e4f0 198 default:
mluis 0:a2929fa6e4f0 199 break;
mluis 0:a2929fa6e4f0 200 }
mluis 0:a2929fa6e4f0 201 }
mluis 0:a2929fa6e4f0 202
mluis 0:a2929fa6e4f0 203 static void onSendFrame( osjob_t* j )
mluis 0:a2929fa6e4f0 204 {
tmulrooney 6:fc465060b63e 205 debug("onSendFrame enter\r\n");
mluis 0:a2929fa6e4f0 206 prepareTxFrame( );
mluis 1:60184eda0066 207 LMIC_setTxData2( LORAWAN_APP_PORT, LMIC.frame, LORAWAN_APP_DATA_SIZE, LORAWAN_CONFIRMED_MSG_ON );
mluis 1:60184eda0066 208
mluis 1:60184eda0066 209 // Blink Tx LED
mluis 1:60184eda0066 210 debug_val( "LED1 = ", 1 );
mluis 1:60184eda0066 211 os_setTimedCallback( &txLedJob, os_getTime( ) + ms2osticks( 25 ), onTxLed );
mluis 0:a2929fa6e4f0 212 }
mluis 0:a2929fa6e4f0 213
mluis 1:60184eda0066 214 // Initialization job
mluis 1:60184eda0066 215 static void onInit( osjob_t* j )
mluis 1:60184eda0066 216 {
tmulrooney 6:fc465060b63e 217 debug("onInit enter\r\n");
mluis 1:60184eda0066 218 // reset MAC state
mluis 1:60184eda0066 219 LMIC_reset( );
mluis 1:60184eda0066 220 LMIC_setAdrMode( LORAWAN_ADR_ON );
mluis 5:1b2fcc2582e8 221 #if defined(CFG_eu868)
mluis 1:60184eda0066 222 LMIC_setDrTxpow( DR_SF12, 14 );
mluis 5:1b2fcc2582e8 223 #elif defined(CFG_us915)
mluis 5:1b2fcc2582e8 224 LMIC_setDrTxpow( DR_SF10, 14 );
mluis 5:1b2fcc2582e8 225 #endif
mluis 1:60184eda0066 226
mluis 1:60184eda0066 227 // start joining
mluis 1:60184eda0066 228 #if( OVER_THE_AIR_ACTIVATION != 0 )
mluis 1:60184eda0066 229 LMIC_startJoining( );
mluis 1:60184eda0066 230 #else
mluis 1:60184eda0066 231 LMIC_setSession( LORAWAN_NET_ID, LORAWAN_DEV_ADDR, NwkSKey, ArtSKey );
mluis 1:60184eda0066 232 onSendFrame( NULL );
mluis 1:60184eda0066 233 #endif
mluis 1:60184eda0066 234 // init done - onEvent( ) callback will be invoked...
mluis 1:60184eda0066 235 }
mluis 1:60184eda0066 236
mluis 1:60184eda0066 237 int main( void )
mluis 0:a2929fa6e4f0 238 {
mluis 0:a2929fa6e4f0 239 osjob_t initjob;
tmulrooney 6:fc465060b63e 240
tmulrooney 6:fc465060b63e 241 pc.baud(115200);
tmulrooney 6:fc465060b63e 242 printf( "\r\nLoRaWan Demo Application TJM\r\n" );
mluis 0:a2929fa6e4f0 243 // initialize runtime env
mluis 0:a2929fa6e4f0 244 os_init( );
mluis 0:a2929fa6e4f0 245 // setup initial job
mluis 0:a2929fa6e4f0 246 os_setCallback( &initjob, onInit );
mluis 0:a2929fa6e4f0 247 // execute scheduled jobs and events
mluis 0:a2929fa6e4f0 248 os_runloop( );
mluis 0:a2929fa6e4f0 249 // (not reached)
mluis 0:a2929fa6e4f0 250 }
mluis 0:a2929fa6e4f0 251
mluis 0:a2929fa6e4f0 252 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 253 // LMIC EVENT CALLBACK
mluis 0:a2929fa6e4f0 254 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 255 void onEvent( ev_t ev )
mluis 0:a2929fa6e4f0 256 {
tmulrooney 6:fc465060b63e 257 debug("onEvent enter %d\r\n",ev);
mluis 0:a2929fa6e4f0 258 bool txOn = false;
mluis 1:60184eda0066 259 debug_event( ev );
mluis 0:a2929fa6e4f0 260
mluis 0:a2929fa6e4f0 261 switch( ev )
mluis 0:a2929fa6e4f0 262 {
mluis 0:a2929fa6e4f0 263 // network joined, session established
mluis 0:a2929fa6e4f0 264 case EV_JOINED:
mluis 1:60184eda0066 265 debug_val( "Net ID = ", LMIC.netid );
mluis 0:a2929fa6e4f0 266 txOn = true;
mluis 0:a2929fa6e4f0 267 break;
mluis 0:a2929fa6e4f0 268 // scheduled data sent (optionally data received)
mluis 0:a2929fa6e4f0 269 case EV_TXCOMPLETE:
mluis 1:60184eda0066 270 debug_val( "Datarate = ", LMIC.datarate );
mluis 0:a2929fa6e4f0 271 // Check if we have a downlink on either Rx1 or Rx2 windows
mluis 1:60184eda0066 272 if( ( LMIC.txrxFlags & ( TXRX_DNW1 | TXRX_DNW2 ) ) != 0 )
mluis 0:a2929fa6e4f0 273 {
mluis 1:60184eda0066 274 debug_val( "LED2 = ", 1 );
mluis 1:60184eda0066 275 os_setTimedCallback( &rxLedJob, os_getTime( ) + ms2osticks( 25 ), onRxLed );
mluis 0:a2929fa6e4f0 276
mluis 1:60184eda0066 277 if( LMIC.dataLen != 0 )
mluis 0:a2929fa6e4f0 278 { // data received in rx slot after tx
mluis 1:60184eda0066 279 debug_buf( LMIC.frame + LMIC.dataBeg, LMIC.dataLen );
mluis 0:a2929fa6e4f0 280 processRxFrame( );
mluis 0:a2929fa6e4f0 281 }
mluis 0:a2929fa6e4f0 282 }
mluis 0:a2929fa6e4f0 283 txOn = true;
mluis 0:a2929fa6e4f0 284 break;
mluis 0:a2929fa6e4f0 285 default:
mluis 0:a2929fa6e4f0 286 break;
mluis 0:a2929fa6e4f0 287 }
mluis 0:a2929fa6e4f0 288 if( txOn == true )
mluis 0:a2929fa6e4f0 289 {
mluis 1:60184eda0066 290 //Sends frame every APP_TX_DUTYCYCLE +/- APP_TX_DUTYCYCLE_RND random time (if not duty cycle limited)
mluis 1:60184eda0066 291 os_setTimedCallback( &sendFrameJob,
mluis 1:60184eda0066 292 os_getTime( ) + ms2osticks( APP_TX_DUTYCYCLE + randr( -APP_TX_DUTYCYCLE_RND, APP_TX_DUTYCYCLE_RND ) ),
mluis 1:60184eda0066 293 onSendFrame );
mluis 0:a2929fa6e4f0 294
mluis 1:60184eda0066 295 ////Sends frame as soon as possible (duty cylce limitations)
mluis 1:60184eda0066 296 //onSendFrame( NULL );
mluis 0:a2929fa6e4f0 297 }
mluis 0:a2929fa6e4f0 298 }