first draft

Dependencies:   LMiC SX1272Libx mbed

Fork of LoRaWAN-lmic-app by Semtech

Committer:
mluis
Date:
Tue Mar 31 13:38:08 2015 +0000
Revision:
1:60184eda0066
Parent:
0:a2929fa6e4f0
Child:
3:ce28e3313a88
Updated main application.; Moved debug and hal files from LMiC to main application.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
mluis 0:a2929fa6e4f0 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 */
mluis 0:a2929fa6e4f0 24 #define OVER_THE_AIR_ACTIVATION 0
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
mluis 0:a2929fa6e4f0 71
mluis 0:a2929fa6e4f0 72 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 73 // CONFIGURATION (FOR APPLICATION CALLBACKS BELOW)
mluis 0:a2929fa6e4f0 74 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 75
mluis 0:a2929fa6e4f0 76 // application router ID (LSBF)
mluis 1:60184eda0066 77 static const uint8_t AppEui[8] =
mluis 0:a2929fa6e4f0 78 {
mluis 1:60184eda0066 79 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
mluis 0:a2929fa6e4f0 80 };
mluis 0:a2929fa6e4f0 81
mluis 0:a2929fa6e4f0 82 // unique device ID (LSBF)
mluis 0:a2929fa6e4f0 83 static const u1_t DevEui[8] =
mluis 0:a2929fa6e4f0 84 {
mluis 0:a2929fa6e4f0 85 0x01, 0x23, 0x45, 0x67, 0x89, 0xAB, 0xCD, 0xEF
mluis 0:a2929fa6e4f0 86 };
mluis 0:a2929fa6e4f0 87
mluis 0:a2929fa6e4f0 88 // device-specific AES key (derived from device EUI)
mluis 1:60184eda0066 89 static const uint8_t DevKey[16] =
mluis 0:a2929fa6e4f0 90 {
mluis 1:60184eda0066 91 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6,
mluis 1:60184eda0066 92 0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C
mluis 0:a2929fa6e4f0 93 };
mluis 0:a2929fa6e4f0 94
mluis 1:60184eda0066 95 #if( OVER_THE_AIR_ACTIVATION == 0 )
mluis 1:60184eda0066 96 // network session key
mluis 0:a2929fa6e4f0 97 static uint8_t NwkSKey[] =
mluis 0:a2929fa6e4f0 98 {
mluis 0:a2929fa6e4f0 99 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6,
mluis 0:a2929fa6e4f0 100 0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C
mluis 0:a2929fa6e4f0 101 };
mluis 0:a2929fa6e4f0 102
mluis 1:60184eda0066 103 // application session key
mluis 0:a2929fa6e4f0 104 static uint8_t ArtSKey[] =
mluis 0:a2929fa6e4f0 105 {
mluis 0:a2929fa6e4f0 106 0x2B, 0x7E, 0x15, 0x16, 0x28, 0xAE, 0xD2, 0xA6,
mluis 0:a2929fa6e4f0 107 0xAB, 0xF7, 0x15, 0x88, 0x09, 0xCF, 0x4F, 0x3C
mluis 0:a2929fa6e4f0 108 };
mluis 0:a2929fa6e4f0 109
mluis 1:60184eda0066 110 #endif
mluis 1:60184eda0066 111
mluis 0:a2929fa6e4f0 112 // LEDs and Frame jobs
mluis 0:a2929fa6e4f0 113 osjob_t rxLedJob;
mluis 0:a2929fa6e4f0 114 osjob_t txLedJob;
mluis 0:a2929fa6e4f0 115 osjob_t sendFrameJob;
mluis 0:a2929fa6e4f0 116
mluis 1:60184eda0066 117 // LED state
mluis 0:a2929fa6e4f0 118 static bool AppLedStateOn = false;
mluis 0:a2929fa6e4f0 119
mluis 0:a2929fa6e4f0 120 //////////////////////////////////////////////////
mluis 1:60184eda0066 121 // Utility functions
mluis 1:60184eda0066 122 //////////////////////////////////////////////////
mluis 1:60184eda0066 123 /*!
mluis 1:60184eda0066 124 * \brief Computes a random number between min and max
mluis 1:60184eda0066 125 *
mluis 1:60184eda0066 126 * \param [IN] min range minimum value
mluis 1:60184eda0066 127 * \param [IN] max range maximum value
mluis 1:60184eda0066 128 * \retval random random value in range min..max
mluis 1:60184eda0066 129 */
mluis 1:60184eda0066 130 int32_t randr( int32_t min, int32_t max )
mluis 1:60184eda0066 131 {
mluis 1:60184eda0066 132 return ( int32_t )rand( ) % ( max - min + 1 ) + min;
mluis 1:60184eda0066 133 }
mluis 1:60184eda0066 134
mluis 1:60184eda0066 135 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 136 // APPLICATION CALLBACKS
mluis 0:a2929fa6e4f0 137 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 138
mluis 0:a2929fa6e4f0 139 // provide application router ID (8 bytes, LSBF)
mluis 1:60184eda0066 140 void os_getArtEui( uint8_t *buf )
mluis 0:a2929fa6e4f0 141 {
mluis 0:a2929fa6e4f0 142 memcpy( buf, AppEui, 8 );
mluis 0:a2929fa6e4f0 143 }
mluis 0:a2929fa6e4f0 144
mluis 0:a2929fa6e4f0 145 // provide device ID (8 bytes, LSBF)
mluis 1:60184eda0066 146 void os_getDevEui( uint8_t *buf )
mluis 0:a2929fa6e4f0 147 {
mluis 0:a2929fa6e4f0 148 memcpy( buf, DevEui, 8 );
mluis 0:a2929fa6e4f0 149 }
mluis 0:a2929fa6e4f0 150
mluis 0:a2929fa6e4f0 151 // provide device key (16 bytes)
mluis 1:60184eda0066 152 void os_getDevKey( uint8_t *buf )
mluis 0:a2929fa6e4f0 153 {
mluis 0:a2929fa6e4f0 154 memcpy( buf, DevKey, 16 );
mluis 0:a2929fa6e4f0 155 }
mluis 0:a2929fa6e4f0 156
mluis 0:a2929fa6e4f0 157 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 158 // MAIN - INITIALIZATION AND STARTUP
mluis 0:a2929fa6e4f0 159 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 160
mluis 0:a2929fa6e4f0 161 static void onRxLed( osjob_t* j )
mluis 0:a2929fa6e4f0 162 {
mluis 1:60184eda0066 163 debug_val("LED2 = ", 0 );
mluis 0:a2929fa6e4f0 164 }
mluis 0:a2929fa6e4f0 165
mluis 0:a2929fa6e4f0 166 static void onTxLed( osjob_t* j )
mluis 0:a2929fa6e4f0 167 {
mluis 1:60184eda0066 168 debug_val("LED1 = ", 0 );
mluis 0:a2929fa6e4f0 169 }
mluis 0:a2929fa6e4f0 170
mluis 0:a2929fa6e4f0 171 static void prepareTxFrame( void )
mluis 0:a2929fa6e4f0 172 {
mluis 0:a2929fa6e4f0 173 LMIC.frame[0] = AppLedStateOn;
mluis 1:60184eda0066 174 #if ( LORAWAN_CONFIRMED_MSG_ON == 1 )
mluis 1:60184eda0066 175 LMIC.frame[1] = LMIC.seqnoDn >> 8;
mluis 1:60184eda0066 176 LMIC.frame[2] = LMIC.seqnoDn;
mluis 1:60184eda0066 177 LMIC.frame[3] = LMIC.rssi >> 8;
mluis 1:60184eda0066 178 LMIC.frame[4] = LMIC.rssi;
mluis 1:60184eda0066 179 LMIC.frame[5] = LMIC.snr;
mluis 1:60184eda0066 180 #endif
mluis 0:a2929fa6e4f0 181 }
mluis 0:a2929fa6e4f0 182
mluis 0:a2929fa6e4f0 183 void processRxFrame( void )
mluis 0:a2929fa6e4f0 184 {
mluis 0:a2929fa6e4f0 185 switch( LMIC.frame[LMIC.dataBeg - 1] ) // Check Rx port number
mluis 0:a2929fa6e4f0 186 {
mluis 0:a2929fa6e4f0 187 case 1: // The application LED can be controlled on port 1 or 2
mluis 0:a2929fa6e4f0 188 case 2:
mluis 0:a2929fa6e4f0 189 if( LMIC.dataLen == 1 )
mluis 0:a2929fa6e4f0 190 {
mluis 0:a2929fa6e4f0 191 AppLedStateOn = LMIC.frame[LMIC.dataBeg] & 0x01;
mluis 1:60184eda0066 192 debug_val( "LED3 = ", AppLedStateOn );
mluis 0:a2929fa6e4f0 193 }
mluis 0:a2929fa6e4f0 194 break;
mluis 0:a2929fa6e4f0 195 default:
mluis 0:a2929fa6e4f0 196 break;
mluis 0:a2929fa6e4f0 197 }
mluis 0:a2929fa6e4f0 198 }
mluis 0:a2929fa6e4f0 199
mluis 0:a2929fa6e4f0 200 static void onSendFrame( osjob_t* j )
mluis 0:a2929fa6e4f0 201 {
mluis 0:a2929fa6e4f0 202 prepareTxFrame( );
mluis 1:60184eda0066 203 LMIC_setTxData2( LORAWAN_APP_PORT, LMIC.frame, LORAWAN_APP_DATA_SIZE, LORAWAN_CONFIRMED_MSG_ON );
mluis 1:60184eda0066 204
mluis 1:60184eda0066 205 // Blink Tx LED
mluis 1:60184eda0066 206 debug_val( "LED1 = ", 1 );
mluis 1:60184eda0066 207 os_setTimedCallback( &txLedJob, os_getTime( ) + ms2osticks( 25 ), onTxLed );
mluis 0:a2929fa6e4f0 208 }
mluis 0:a2929fa6e4f0 209
mluis 1:60184eda0066 210 // Initialization job
mluis 1:60184eda0066 211 static void onInit( osjob_t* j )
mluis 1:60184eda0066 212 {
mluis 1:60184eda0066 213 // reset MAC state
mluis 1:60184eda0066 214 LMIC_reset( );
mluis 1:60184eda0066 215 LMIC_setAdrMode( LORAWAN_ADR_ON );
mluis 1:60184eda0066 216 LMIC_setDrTxpow( DR_SF12, 14 );
mluis 1:60184eda0066 217
mluis 1:60184eda0066 218 // start joining
mluis 1:60184eda0066 219 #if( OVER_THE_AIR_ACTIVATION != 0 )
mluis 1:60184eda0066 220 LMIC_startJoining( );
mluis 1:60184eda0066 221 #else
mluis 1:60184eda0066 222 LMIC_setSession( LORAWAN_NET_ID, LORAWAN_DEV_ADDR, NwkSKey, ArtSKey );
mluis 1:60184eda0066 223 onSendFrame( NULL );
mluis 1:60184eda0066 224 #endif
mluis 1:60184eda0066 225 // init done - onEvent( ) callback will be invoked...
mluis 1:60184eda0066 226 }
mluis 1:60184eda0066 227
mluis 1:60184eda0066 228 int main( void )
mluis 0:a2929fa6e4f0 229 {
mluis 0:a2929fa6e4f0 230 osjob_t initjob;
mluis 0:a2929fa6e4f0 231
mluis 0:a2929fa6e4f0 232 // initialize runtime env
mluis 0:a2929fa6e4f0 233 os_init( );
mluis 0:a2929fa6e4f0 234 // setup initial job
mluis 0:a2929fa6e4f0 235 os_setCallback( &initjob, onInit );
mluis 0:a2929fa6e4f0 236 // execute scheduled jobs and events
mluis 0:a2929fa6e4f0 237 os_runloop( );
mluis 0:a2929fa6e4f0 238 // (not reached)
mluis 0:a2929fa6e4f0 239 }
mluis 0:a2929fa6e4f0 240
mluis 0:a2929fa6e4f0 241 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 242 // LMIC EVENT CALLBACK
mluis 0:a2929fa6e4f0 243 //////////////////////////////////////////////////
mluis 0:a2929fa6e4f0 244 void onEvent( ev_t ev )
mluis 0:a2929fa6e4f0 245 {
mluis 0:a2929fa6e4f0 246 bool txOn = false;
mluis 1:60184eda0066 247 debug_event( ev );
mluis 0:a2929fa6e4f0 248
mluis 0:a2929fa6e4f0 249 switch( ev )
mluis 0:a2929fa6e4f0 250 {
mluis 0:a2929fa6e4f0 251 // network joined, session established
mluis 0:a2929fa6e4f0 252 case EV_JOINED:
mluis 1:60184eda0066 253 debug_val( "Net ID = ", LMIC.netid );
mluis 0:a2929fa6e4f0 254 txOn = true;
mluis 0:a2929fa6e4f0 255 break;
mluis 0:a2929fa6e4f0 256 // scheduled data sent (optionally data received)
mluis 0:a2929fa6e4f0 257 case EV_TXCOMPLETE:
mluis 1:60184eda0066 258 debug_val( "Datarate = ", LMIC.datarate );
mluis 0:a2929fa6e4f0 259 // Check if we have a downlink on either Rx1 or Rx2 windows
mluis 1:60184eda0066 260 if( ( LMIC.txrxFlags & ( TXRX_DNW1 | TXRX_DNW2 ) ) != 0 )
mluis 0:a2929fa6e4f0 261 {
mluis 1:60184eda0066 262 debug_val( "LED2 = ", 1 );
mluis 1:60184eda0066 263 os_setTimedCallback( &rxLedJob, os_getTime( ) + ms2osticks( 25 ), onRxLed );
mluis 0:a2929fa6e4f0 264
mluis 1:60184eda0066 265 if( LMIC.dataLen != 0 )
mluis 0:a2929fa6e4f0 266 { // data received in rx slot after tx
mluis 1:60184eda0066 267 debug_buf( LMIC.frame + LMIC.dataBeg, LMIC.dataLen );
mluis 0:a2929fa6e4f0 268 processRxFrame( );
mluis 0:a2929fa6e4f0 269 }
mluis 0:a2929fa6e4f0 270 }
mluis 0:a2929fa6e4f0 271 txOn = true;
mluis 0:a2929fa6e4f0 272 break;
mluis 0:a2929fa6e4f0 273 default:
mluis 0:a2929fa6e4f0 274 break;
mluis 0:a2929fa6e4f0 275 }
mluis 0:a2929fa6e4f0 276 if( txOn == true )
mluis 0:a2929fa6e4f0 277 {
mluis 1:60184eda0066 278 //Sends frame every APP_TX_DUTYCYCLE +/- APP_TX_DUTYCYCLE_RND random time (if not duty cycle limited)
mluis 1:60184eda0066 279 os_setTimedCallback( &sendFrameJob,
mluis 1:60184eda0066 280 os_getTime( ) + ms2osticks( APP_TX_DUTYCYCLE + randr( -APP_TX_DUTYCYCLE_RND, APP_TX_DUTYCYCLE_RND ) ),
mluis 1:60184eda0066 281 onSendFrame );
mluis 0:a2929fa6e4f0 282
mluis 1:60184eda0066 283 ////Sends frame as soon as possible (duty cylce limitations)
mluis 1:60184eda0066 284 //onSendFrame( NULL );
mluis 0:a2929fa6e4f0 285 }
mluis 0:a2929fa6e4f0 286 }