Fork from LoRa Alliance program. available here: https://developer.mbed.org/users/Alliance/code/LoRaWAN/

Dependencies:   LoRaMacLib SX1276Lib mbed Chainable_RGB_LED DigitDisplay

Fork of LoRaWAN by LoRa All

Committer:
Alliance
Date:
Wed Oct 21 06:35:37 2015 +0000
Revision:
6:ea71f564e0ce
Parent:
5:2499c195ccfe
Child:
7:063ff5895cfe
_

Who changed what in which revision?

UserRevisionLine numberNew contents of line
GregCr 0:fc538717c96e 1 /*
GregCr 0:fc538717c96e 2 / _____) _ | |
GregCr 0:fc538717c96e 3 ( (____ _____ ____ _| |_ _____ ____| |__
GregCr 0:fc538717c96e 4 \____ \| ___ | (_ _) ___ |/ ___) _ \
GregCr 0:fc538717c96e 5 _____) ) ____| | | || |_| ____( (___| | | |
GregCr 0:fc538717c96e 6 (______/|_____)_|_|_| \__)_____)\____)_| |_|
GregCr 0:fc538717c96e 7 (C)2015 Semtech
GregCr 0:fc538717c96e 8
GregCr 0:fc538717c96e 9 Description: LoRaMac classA device implementation
GregCr 0:fc538717c96e 10
GregCr 0:fc538717c96e 11 License: Revised BSD License, see LICENSE.TXT file include in the project
GregCr 0:fc538717c96e 12
GregCr 0:fc538717c96e 13 Maintainer: Miguel Luis and Gregory Cristian
GregCr 0:fc538717c96e 14 */
GregCr 0:fc538717c96e 15 #include "mbed.h"
GregCr 0:fc538717c96e 16 #include "board.h"
GregCr 0:fc538717c96e 17 #include "LoRaMac.h"
GregCr 0:fc538717c96e 18 #include "utilities.h"
GregCr 0:fc538717c96e 19 #include "DigitDisplay.h"
GregCr 0:fc538717c96e 20 #include "ChainableLED.h"
GregCr 0:fc538717c96e 21
GregCr 0:fc538717c96e 22 /*!
GregCr 0:fc538717c96e 23 * When set to 1 the application uses the Over-the-Air activation procedure
GregCr 0:fc538717c96e 24 * When set to 0 the application uses the Personalization activation procedure
GregCr 0:fc538717c96e 25 */
Alliance 3:db6ad4aa790d 26 #define OVER_THE_AIR_ACTIVATION 1
GregCr 0:fc538717c96e 27
GregCr 0:fc538717c96e 28 /*!
GregCr 0:fc538717c96e 29 * Mote device IEEE EUI
GregCr 0:fc538717c96e 30 */
GregCr 0:fc538717c96e 31 static uint8_t DevEui[] =
GregCr 0:fc538717c96e 32 {
Alliance 6:ea71f564e0ce 33 0x22, 0x22, 0x22, 0x22, 0x22, 0x22, 0x22, 0x22
GregCr 0:fc538717c96e 34 };
GregCr 0:fc538717c96e 35
GregCr 0:fc538717c96e 36 #if( OVER_THE_AIR_ACTIVATION != 0 )
GregCr 0:fc538717c96e 37
Alliance 6:ea71f564e0ce 38 #define OVER_THE_AIR_ACTIVATION_DUTYCYCLE 7000000 // 7 [s] value in us
GregCr 0:fc538717c96e 39
GregCr 0:fc538717c96e 40 /*!
GregCr 0:fc538717c96e 41 * Application IEEE EUI
GregCr 0:fc538717c96e 42 */
GregCr 0:fc538717c96e 43 static uint8_t AppEui[] =
GregCr 0:fc538717c96e 44 {
GregCr 0:fc538717c96e 45 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
GregCr 0:fc538717c96e 46 };
GregCr 0:fc538717c96e 47
GregCr 0:fc538717c96e 48 /*!
GregCr 0:fc538717c96e 49 * AES encryption/decryption cipher application key
GregCr 0:fc538717c96e 50 */
GregCr 0:fc538717c96e 51 static uint8_t AppKey[] =
GregCr 0:fc538717c96e 52 {
Alliance 6:ea71f564e0ce 53 0x22, 0x22, 0x22, 0x22, 0x22, 0x22, 0x22, 0x22,
Alliance 6:ea71f564e0ce 54 0x22, 0x22, 0x22, 0x22, 0x22, 0x22, 0x22, 0x22
GregCr 0:fc538717c96e 55 };
GregCr 0:fc538717c96e 56
GregCr 0:fc538717c96e 57 #else
GregCr 0:fc538717c96e 58
GregCr 0:fc538717c96e 59 /*!
GregCr 0:fc538717c96e 60 * AES encryption/decryption cipher network session key
GregCr 0:fc538717c96e 61 */
GregCr 0:fc538717c96e 62 static uint8_t NwkSKey[] =
GregCr 0:fc538717c96e 63 {
Alliance 3:db6ad4aa790d 64 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
Alliance 4:0c164d628006 65 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
GregCr 0:fc538717c96e 66 };
GregCr 0:fc538717c96e 67
GregCr 0:fc538717c96e 68 /*!
GregCr 0:fc538717c96e 69 * AES encryption/decryption cipher application session key
GregCr 0:fc538717c96e 70 */
GregCr 0:fc538717c96e 71 static uint8_t AppSKey[] =
GregCr 0:fc538717c96e 72 {
Alliance 3:db6ad4aa790d 73 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00,
Alliance 4:0c164d628006 74 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00
GregCr 0:fc538717c96e 75 };
GregCr 0:fc538717c96e 76
GregCr 0:fc538717c96e 77 /*!
GregCr 0:fc538717c96e 78 * Device address
GregCr 0:fc538717c96e 79 */
GregCr 0:fc538717c96e 80 static uint32_t DevAddr;
GregCr 0:fc538717c96e 81
GregCr 0:fc538717c96e 82 #endif
GregCr 0:fc538717c96e 83
GregCr 0:fc538717c96e 84 /*!
GregCr 0:fc538717c96e 85 * Indicates if the MAC layer has already joined a network.
GregCr 0:fc538717c96e 86 */
GregCr 0:fc538717c96e 87 static bool IsNetworkJoined = false;
GregCr 0:fc538717c96e 88
GregCr 0:fc538717c96e 89 /*!
GregCr 0:fc538717c96e 90 * Defines the application data transmission duty cycle
GregCr 0:fc538717c96e 91 */
Alliance 6:ea71f564e0ce 92 #define APP_TX_DUTYCYCLE 5000000 // 6 [s] value in us
Alliance 3:db6ad4aa790d 93 #define APP_TX_DUTYCYCLE_RND 2000000 // 2 [s] value in us
GregCr 0:fc538717c96e 94
GregCr 0:fc538717c96e 95 /*!
GregCr 0:fc538717c96e 96 * User application data buffer size
GregCr 0:fc538717c96e 97 */
GregCr 0:fc538717c96e 98 #define APP_DATA_SIZE 8
GregCr 0:fc538717c96e 99
GregCr 0:fc538717c96e 100 /*!
GregCr 0:fc538717c96e 101 * User application data
GregCr 0:fc538717c96e 102 */
GregCr 0:fc538717c96e 103 static uint8_t AppData[APP_DATA_SIZE];
GregCr 0:fc538717c96e 104
GregCr 0:fc538717c96e 105 /*!
GregCr 0:fc538717c96e 106 * Defines the application data transmission duty cycle
GregCr 0:fc538717c96e 107 */
GregCr 0:fc538717c96e 108 static uint32_t TxDutyCycleTime;
GregCr 0:fc538717c96e 109
GregCr 0:fc538717c96e 110 Ticker TxNextPacketTimer;
GregCr 0:fc538717c96e 111
GregCr 0:fc538717c96e 112 #if( OVER_THE_AIR_ACTIVATION != 0 )
GregCr 0:fc538717c96e 113
GregCr 0:fc538717c96e 114 /*!
GregCr 0:fc538717c96e 115 * Defines the join request timer
GregCr 0:fc538717c96e 116 */
GregCr 0:fc538717c96e 117 Ticker JoinReqTimer;
GregCr 0:fc538717c96e 118
GregCr 0:fc538717c96e 119 #endif
GregCr 0:fc538717c96e 120
GregCr 0:fc538717c96e 121 /*!
GregCr 0:fc538717c96e 122 * Indicates if a new packet can be sent
GregCr 0:fc538717c96e 123 */
GregCr 0:fc538717c96e 124 static bool TxNextPacket = true;
GregCr 0:fc538717c96e 125 static bool TxDone = false;
GregCr 0:fc538717c96e 126
Alliance 3:db6ad4aa790d 127 static uint8_t AppPort = 3;
GregCr 0:fc538717c96e 128 static uint8_t AppDataSize = APP_DATA_SIZE;
GregCr 0:fc538717c96e 129
GregCr 0:fc538717c96e 130 static LoRaMacEvent_t LoRaMacEvents;
GregCr 0:fc538717c96e 131
GregCr 0:fc538717c96e 132 Ticker Led1Timer;
GregCr 0:fc538717c96e 133 Ticker Led2Timer;
Alliance 1:1ef4f6cd800c 134 Ticker BuzTimer;
GregCr 0:fc538717c96e 135
GregCr 0:fc538717c96e 136 #define NUM_LED 3
GregCr 0:fc538717c96e 137
Alliance 3:db6ad4aa790d 138
GregCr 0:fc538717c96e 139 // ChainableLED(clk, data, number_of_leds)
Alliance 6:ea71f564e0ce 140 ChainableLED color_led(D6, D7, NUM_LED);
GregCr 0:fc538717c96e 141
Alliance 6:ea71f564e0ce 142 DigitDisplay display(D8, D9);
GregCr 0:fc538717c96e 143
GregCr 0:fc538717c96e 144 DigitalOut buzzer(A2);
GregCr 0:fc538717c96e 145
Alliance 3:db6ad4aa790d 146
Alliance 1:1ef4f6cd800c 147 static void OnBuzTimerEvent( void )
Alliance 1:1ef4f6cd800c 148 {
Alliance 1:1ef4f6cd800c 149 buzzer = 0;
Alliance 1:1ef4f6cd800c 150 BuzTimer.detach( );
Alliance 1:1ef4f6cd800c 151 }
GregCr 0:fc538717c96e 152
GregCr 0:fc538717c96e 153 /*!
GregCr 0:fc538717c96e 154 *
GregCr 0:fc538717c96e 155 */
GregCr 0:fc538717c96e 156 static void PrepareTxFrame( uint8_t port )
GregCr 0:fc538717c96e 157 {
Alliance 3:db6ad4aa790d 158 AppData[0] = 0x99;
Alliance 3:db6ad4aa790d 159 AppData[1] = 0x99;
Alliance 3:db6ad4aa790d 160 AppData[2] = 0x99;
Alliance 3:db6ad4aa790d 161 AppData[3] = 0x99;
Alliance 3:db6ad4aa790d 162 AppData[4] = 0x99;
Alliance 3:db6ad4aa790d 163 AppData[5] = 0x99;
Alliance 3:db6ad4aa790d 164 AppData[6] = 0x99;
Alliance 3:db6ad4aa790d 165 AppData[7] = 0x99;
GregCr 0:fc538717c96e 166 }
GregCr 0:fc538717c96e 167
GregCr 0:fc538717c96e 168 static void ProcessRxFrame( LoRaMacEventFlags_t *flags, LoRaMacEventInfo_t *info )
GregCr 0:fc538717c96e 169 {
Alliance 6:ea71f564e0ce 170 debug( "RxDone \n\n\r" );
GregCr 0:fc538717c96e 171 switch( info->RxPort ) // Check Rx port number
GregCr 0:fc538717c96e 172 {
GregCr 0:fc538717c96e 173 case 10:
Alliance 4:0c164d628006 174 display.write( 0, info->RxBuffer[0] );
Alliance 1:1ef4f6cd800c 175 display.write( 1, info->RxBuffer[1] );
Alliance 1:1ef4f6cd800c 176 display.write( 2, info->RxBuffer[2] );
Alliance 4:0c164d628006 177 display.write( 3, info->RxBuffer[3] );
GregCr 0:fc538717c96e 178 break;
GregCr 0:fc538717c96e 179
Alliance 1:1ef4f6cd800c 180 case 20:
Alliance 5:2499c195ccfe 181 color_led.setColorRGB(0, info->RxBuffer[0], info->RxBuffer[1], info->RxBuffer[2] );
Alliance 1:1ef4f6cd800c 182 break;
GregCr 0:fc538717c96e 183
Alliance 1:1ef4f6cd800c 184 case 30:
Alliance 1:1ef4f6cd800c 185 BuzTimer.attach_us( &OnBuzTimerEvent, 500000 );
Alliance 1:1ef4f6cd800c 186 buzzer = 1;
GregCr 0:fc538717c96e 187 break;
GregCr 0:fc538717c96e 188
GregCr 0:fc538717c96e 189 default:
GregCr 0:fc538717c96e 190 break;
GregCr 0:fc538717c96e 191 }
GregCr 0:fc538717c96e 192 }
GregCr 0:fc538717c96e 193
GregCr 0:fc538717c96e 194 static bool SendFrame( void )
GregCr 0:fc538717c96e 195 {
GregCr 0:fc538717c96e 196 uint8_t sendFrameStatus = 0;
GregCr 0:fc538717c96e 197
GregCr 0:fc538717c96e 198 sendFrameStatus = LoRaMacSendFrame( AppPort, AppData, AppDataSize );
GregCr 0:fc538717c96e 199 // sendFrameStatus = LoRaMacSendConfirmedFrame( AppPort, AppData, AppDataSize, 8 );
GregCr 0:fc538717c96e 200 switch( sendFrameStatus )
GregCr 0:fc538717c96e 201 {
GregCr 0:fc538717c96e 202 case 5: // NO_FREE_CHANNEL
GregCr 0:fc538717c96e 203 // Try again later
GregCr 0:fc538717c96e 204 return true;
GregCr 0:fc538717c96e 205 default:
GregCr 0:fc538717c96e 206 return false;
GregCr 0:fc538717c96e 207 }
GregCr 0:fc538717c96e 208 }
GregCr 0:fc538717c96e 209
GregCr 0:fc538717c96e 210
GregCr 0:fc538717c96e 211 #if( OVER_THE_AIR_ACTIVATION != 0 )
GregCr 0:fc538717c96e 212 /*!
GregCr 0:fc538717c96e 213 * \brief Function executed on JoinReq Timeout event
GregCr 0:fc538717c96e 214 */
GregCr 0:fc538717c96e 215 static void OnJoinReqTimerEvent( void )
GregCr 0:fc538717c96e 216 {
GregCr 0:fc538717c96e 217 TxNextPacket = true;
Alliance 1:1ef4f6cd800c 218 JoinReqTimer.detach( );
GregCr 0:fc538717c96e 219 }
GregCr 0:fc538717c96e 220 #endif
GregCr 0:fc538717c96e 221
GregCr 0:fc538717c96e 222
GregCr 0:fc538717c96e 223 /*!
GregCr 0:fc538717c96e 224 * \brief Function executed on TxNextPacket Timeout event
GregCr 0:fc538717c96e 225 */
GregCr 0:fc538717c96e 226 static void OnTxNextPacketTimerEvent( void )
Alliance 1:1ef4f6cd800c 227 {
GregCr 0:fc538717c96e 228 TxNextPacket = true;
Alliance 1:1ef4f6cd800c 229 TxNextPacketTimer.detach( );
GregCr 0:fc538717c96e 230 }
GregCr 0:fc538717c96e 231
GregCr 0:fc538717c96e 232
GregCr 0:fc538717c96e 233 /*!
GregCr 0:fc538717c96e 234 * \brief Function to be executed on MAC layer event
GregCr 0:fc538717c96e 235 */
GregCr 0:fc538717c96e 236 static void OnMacEvent( LoRaMacEventFlags_t *flags, LoRaMacEventInfo_t *info )
GregCr 0:fc538717c96e 237 {
GregCr 0:fc538717c96e 238 if( flags->Bits.JoinAccept == 1 )
GregCr 0:fc538717c96e 239 {
GregCr 0:fc538717c96e 240 #if( OVER_THE_AIR_ACTIVATION != 0 )
GregCr 0:fc538717c96e 241 JoinReqTimer.detach( );
GregCr 0:fc538717c96e 242 #endif
GregCr 0:fc538717c96e 243 IsNetworkJoined = true;
GregCr 0:fc538717c96e 244 }
GregCr 0:fc538717c96e 245
GregCr 0:fc538717c96e 246 if( flags->Bits.Tx == 1 )
GregCr 0:fc538717c96e 247 {
GregCr 0:fc538717c96e 248 }
GregCr 0:fc538717c96e 249
GregCr 0:fc538717c96e 250 if( flags->Bits.Rx == 1 )
GregCr 0:fc538717c96e 251 {
GregCr 0:fc538717c96e 252 if( flags->Bits.RxData == true )
GregCr 0:fc538717c96e 253 {
GregCr 0:fc538717c96e 254 ProcessRxFrame( flags, info );
GregCr 0:fc538717c96e 255 }
GregCr 0:fc538717c96e 256 }
GregCr 0:fc538717c96e 257
GregCr 0:fc538717c96e 258 // Schedule a new transmission
GregCr 0:fc538717c96e 259 TxDone = true;
GregCr 0:fc538717c96e 260 }
GregCr 0:fc538717c96e 261
GregCr 0:fc538717c96e 262 /**
GregCr 0:fc538717c96e 263 * Main application entry point.
GregCr 0:fc538717c96e 264 */
GregCr 0:fc538717c96e 265 int main( void )
GregCr 0:fc538717c96e 266 {
GregCr 0:fc538717c96e 267 #if( OVER_THE_AIR_ACTIVATION != 0 )
GregCr 0:fc538717c96e 268 uint8_t sendFrameStatus = 0;
GregCr 0:fc538717c96e 269 #endif
GregCr 0:fc538717c96e 270 bool trySendingFrameAgain = false;
GregCr 0:fc538717c96e 271
Alliance 1:1ef4f6cd800c 272 buzzer = 0;
Alliance 1:1ef4f6cd800c 273
Alliance 1:1ef4f6cd800c 274 debug( "\n\n\r LoRaWAN Class A Demo code \n\n\r" );
Alliance 1:1ef4f6cd800c 275
GregCr 0:fc538717c96e 276 BoardInitMcu( );
GregCr 0:fc538717c96e 277 BoardInitPeriph( );
GregCr 0:fc538717c96e 278
GregCr 0:fc538717c96e 279 // Initialize LoRaMac device unique ID
Alliance 3:db6ad4aa790d 280 // BoardGetUniqueId( DevEui );
Alliance 3:db6ad4aa790d 281
GregCr 0:fc538717c96e 282 LoRaMacEvents.MacEvent = OnMacEvent;
GregCr 0:fc538717c96e 283 LoRaMacInit( &LoRaMacEvents );
GregCr 0:fc538717c96e 284
GregCr 0:fc538717c96e 285 IsNetworkJoined = false;
GregCr 0:fc538717c96e 286
GregCr 0:fc538717c96e 287 #if( OVER_THE_AIR_ACTIVATION == 0 )
GregCr 0:fc538717c96e 288 // Random seed initialization
GregCr 0:fc538717c96e 289 srand( RAND_SEED );
GregCr 0:fc538717c96e 290 // Choose a random device address
GregCr 0:fc538717c96e 291 // NwkID = 0
GregCr 0:fc538717c96e 292 // NwkAddr rand [0, 33554431]
GregCr 0:fc538717c96e 293 DevAddr = randr( 0, 0x01FFFFFF );
Alliance 3:db6ad4aa790d 294
GregCr 0:fc538717c96e 295 LoRaMacInitNwkIds( 0x000000, DevAddr, NwkSKey, AppSKey );
GregCr 0:fc538717c96e 296 IsNetworkJoined = true;
GregCr 0:fc538717c96e 297 #endif
GregCr 0:fc538717c96e 298
GregCr 0:fc538717c96e 299 TxNextPacket = true;
GregCr 0:fc538717c96e 300
Alliance 1:1ef4f6cd800c 301 LoRaMacSetAdrOn( false );
Alliance 1:1ef4f6cd800c 302
Alliance 1:1ef4f6cd800c 303 LoRaMacSetDutyCycleOn( false );
GregCr 0:fc538717c96e 304
GregCr 0:fc538717c96e 305 while( 1 )
GregCr 0:fc538717c96e 306 {
GregCr 0:fc538717c96e 307 while( IsNetworkJoined == false )
GregCr 0:fc538717c96e 308 {
GregCr 0:fc538717c96e 309 #if( OVER_THE_AIR_ACTIVATION != 0 )
GregCr 0:fc538717c96e 310 if( TxNextPacket == true )
GregCr 0:fc538717c96e 311 {
GregCr 0:fc538717c96e 312 TxNextPacket = false;
GregCr 0:fc538717c96e 313
GregCr 0:fc538717c96e 314 sendFrameStatus = LoRaMacJoinReq( DevEui, AppEui, AppKey );
Alliance 3:db6ad4aa790d 315 debug("Req Sent\n\r");
GregCr 0:fc538717c96e 316 switch( sendFrameStatus )
GregCr 0:fc538717c96e 317 {
GregCr 0:fc538717c96e 318 case 1: // BUSY
GregCr 0:fc538717c96e 319 break;
GregCr 0:fc538717c96e 320 case 0: // OK
GregCr 0:fc538717c96e 321 case 2: // NO_NETWORK_JOINED
GregCr 0:fc538717c96e 322 case 3: // LENGTH_PORT_ERROR
GregCr 0:fc538717c96e 323 case 4: // MAC_CMD_ERROR
GregCr 0:fc538717c96e 324 case 6: // DEVICE_OFF
GregCr 0:fc538717c96e 325 default:
GregCr 0:fc538717c96e 326 // Relaunch timer for next trial
GregCr 0:fc538717c96e 327 JoinReqTimer.attach_us( &OnJoinReqTimerEvent, OVER_THE_AIR_ACTIVATION_DUTYCYCLE );
GregCr 0:fc538717c96e 328 break;
GregCr 0:fc538717c96e 329 }
GregCr 0:fc538717c96e 330 }
GregCr 0:fc538717c96e 331 // TimerLowPowerHandler( );
GregCr 0:fc538717c96e 332 #endif
GregCr 0:fc538717c96e 333 }
GregCr 0:fc538717c96e 334
GregCr 0:fc538717c96e 335 if( TxDone == true )
GregCr 0:fc538717c96e 336 {
GregCr 0:fc538717c96e 337
GregCr 0:fc538717c96e 338 TxDone = false;
GregCr 0:fc538717c96e 339
GregCr 0:fc538717c96e 340 debug( "TxDone \n\n\r" );
GregCr 0:fc538717c96e 341 // Schedule next packet transmission
GregCr 0:fc538717c96e 342 TxDutyCycleTime = APP_TX_DUTYCYCLE + randr( -APP_TX_DUTYCYCLE_RND, APP_TX_DUTYCYCLE_RND );
GregCr 0:fc538717c96e 343 TxNextPacketTimer.attach_us( &OnTxNextPacketTimerEvent, TxDutyCycleTime );
GregCr 0:fc538717c96e 344 }
GregCr 0:fc538717c96e 345
GregCr 0:fc538717c96e 346 if( trySendingFrameAgain == true )
GregCr 0:fc538717c96e 347 {
GregCr 0:fc538717c96e 348 trySendingFrameAgain = SendFrame( );
GregCr 0:fc538717c96e 349 }
GregCr 0:fc538717c96e 350
GregCr 0:fc538717c96e 351 if( TxNextPacket == true )
GregCr 0:fc538717c96e 352 {
GregCr 0:fc538717c96e 353 TxNextPacketTimer.detach( );
GregCr 0:fc538717c96e 354
GregCr 0:fc538717c96e 355 TxNextPacket = false;
GregCr 0:fc538717c96e 356
GregCr 0:fc538717c96e 357 PrepareTxFrame( AppPort );
GregCr 0:fc538717c96e 358
GregCr 0:fc538717c96e 359 trySendingFrameAgain = SendFrame( );
GregCr 0:fc538717c96e 360 }
GregCr 0:fc538717c96e 361
GregCr 0:fc538717c96e 362 // TimerLowPowerHandler( );
GregCr 0:fc538717c96e 363 }
GregCr 0:fc538717c96e 364 }
GregCr 0:fc538717c96e 365