LR Initial Publish

Dependencies:   X_NUCLEO_IKS01A2 driver_mbed_TH02 mbed LoRaWAN-lib-v1_0_1 SX1272Lib

Fork of Training-Aug2018-SX1272-X-NUCLEO-IKS01A2 by Uttam Bhat

Committer:
ubhat
Date:
Thu Apr 06 21:59:50 2017 +0000
Revision:
0:6cc76d70e2a1
LoRaWAN SX1272 Application

Who changed what in which revision?

UserRevisionLine numberNew contents of line
ubhat 0:6cc76d70e2a1 1 /*
ubhat 0:6cc76d70e2a1 2 / _____) _ | |
ubhat 0:6cc76d70e2a1 3 ( (____ _____ ____ _| |_ _____ ____| |__
ubhat 0:6cc76d70e2a1 4 \____ \| ___ | (_ _) ___ |/ ___) _ \
ubhat 0:6cc76d70e2a1 5 _____) ) ____| | | || |_| ____( (___| | | |
ubhat 0:6cc76d70e2a1 6 (______/|_____)_|_|_| \__)_____)\____)_| |_|
ubhat 0:6cc76d70e2a1 7 (C)2015 Semtech
ubhat 0:6cc76d70e2a1 8
ubhat 0:6cc76d70e2a1 9 Description: MAC Layer Services: MLME & MCPS
ubhat 0:6cc76d70e2a1 10
ubhat 0:6cc76d70e2a1 11 License: Revised BSD License, see LICENSE.TXT file include in the project
ubhat 0:6cc76d70e2a1 12
ubhat 0:6cc76d70e2a1 13 Maintainer: Uttam Bhat
ubhat 0:6cc76d70e2a1 14 */
ubhat 0:6cc76d70e2a1 15
ubhat 0:6cc76d70e2a1 16 #include "LoRaMacLayerService.h"
ubhat 0:6cc76d70e2a1 17
ubhat 0:6cc76d70e2a1 18 /*!
ubhat 0:6cc76d70e2a1 19 * \brief MCPS-Confirm event function
ubhat 0:6cc76d70e2a1 20 *
ubhat 0:6cc76d70e2a1 21 * \param [IN] McpsConfirm - Pointer to the confirm structure,
ubhat 0:6cc76d70e2a1 22 * containing confirm attributes.
ubhat 0:6cc76d70e2a1 23 */
ubhat 0:6cc76d70e2a1 24 void McpsConfirm( McpsConfirm_t *McpsConfirm )
ubhat 0:6cc76d70e2a1 25 {
ubhat 0:6cc76d70e2a1 26 if( McpsConfirm->Status == LORAMAC_EVENT_INFO_STATUS_OK )
ubhat 0:6cc76d70e2a1 27 {
ubhat 0:6cc76d70e2a1 28 switch( McpsConfirm->McpsRequest )
ubhat 0:6cc76d70e2a1 29 {
ubhat 0:6cc76d70e2a1 30 case MCPS_UNCONFIRMED:
ubhat 0:6cc76d70e2a1 31 {
ubhat 0:6cc76d70e2a1 32 // Check Datarate
ubhat 0:6cc76d70e2a1 33 // Check TxPower
ubhat 0:6cc76d70e2a1 34 break;
ubhat 0:6cc76d70e2a1 35 }
ubhat 0:6cc76d70e2a1 36 case MCPS_CONFIRMED:
ubhat 0:6cc76d70e2a1 37 {
ubhat 0:6cc76d70e2a1 38 // Check Datarate
ubhat 0:6cc76d70e2a1 39 // Check TxPower
ubhat 0:6cc76d70e2a1 40 // Check AckReceived
ubhat 0:6cc76d70e2a1 41 // Check NbRetries
ubhat 0:6cc76d70e2a1 42 LoRaMacUplinkStatus.Acked = McpsConfirm->AckReceived;
ubhat 0:6cc76d70e2a1 43 break;
ubhat 0:6cc76d70e2a1 44 }
ubhat 0:6cc76d70e2a1 45 case MCPS_PROPRIETARY:
ubhat 0:6cc76d70e2a1 46 {
ubhat 0:6cc76d70e2a1 47 break;
ubhat 0:6cc76d70e2a1 48 }
ubhat 0:6cc76d70e2a1 49 default:
ubhat 0:6cc76d70e2a1 50 break;
ubhat 0:6cc76d70e2a1 51 }
ubhat 0:6cc76d70e2a1 52 }
ubhat 0:6cc76d70e2a1 53
ubhat 0:6cc76d70e2a1 54 LoRaMacUplinkStatus.Datarate = McpsConfirm->Datarate;
ubhat 0:6cc76d70e2a1 55 LoRaMacUplinkStatus.UplinkCounter = McpsConfirm->UpLinkCounter;
ubhat 0:6cc76d70e2a1 56 LoRaMacUplinkStatus.TxPower = McpsConfirm->TxPower;
ubhat 0:6cc76d70e2a1 57
ubhat 0:6cc76d70e2a1 58 IsTxIntUpdate = true;
ubhat 0:6cc76d70e2a1 59 }
ubhat 0:6cc76d70e2a1 60
ubhat 0:6cc76d70e2a1 61 /*!
ubhat 0:6cc76d70e2a1 62 * \brief MCPS-Indication event function
ubhat 0:6cc76d70e2a1 63 *
ubhat 0:6cc76d70e2a1 64 * \param [IN] McpsIndication - Pointer to the indication structure,
ubhat 0:6cc76d70e2a1 65 * containing indication attributes.
ubhat 0:6cc76d70e2a1 66 */
ubhat 0:6cc76d70e2a1 67 void McpsIndication( McpsIndication_t *McpsIndication )
ubhat 0:6cc76d70e2a1 68 {
ubhat 0:6cc76d70e2a1 69 uint8_t port;
ubhat 0:6cc76d70e2a1 70
ubhat 0:6cc76d70e2a1 71 if( McpsIndication->Status != LORAMAC_EVENT_INFO_STATUS_OK )
ubhat 0:6cc76d70e2a1 72 {
ubhat 0:6cc76d70e2a1 73 return;
ubhat 0:6cc76d70e2a1 74 }
ubhat 0:6cc76d70e2a1 75
ubhat 0:6cc76d70e2a1 76 switch( McpsIndication->McpsIndication )
ubhat 0:6cc76d70e2a1 77 {
ubhat 0:6cc76d70e2a1 78 case MCPS_UNCONFIRMED:
ubhat 0:6cc76d70e2a1 79 {
ubhat 0:6cc76d70e2a1 80 break;
ubhat 0:6cc76d70e2a1 81 }
ubhat 0:6cc76d70e2a1 82 case MCPS_CONFIRMED:
ubhat 0:6cc76d70e2a1 83 {
ubhat 0:6cc76d70e2a1 84 break;
ubhat 0:6cc76d70e2a1 85 }
ubhat 0:6cc76d70e2a1 86 case MCPS_PROPRIETARY:
ubhat 0:6cc76d70e2a1 87 {
ubhat 0:6cc76d70e2a1 88 break;
ubhat 0:6cc76d70e2a1 89 }
ubhat 0:6cc76d70e2a1 90 case MCPS_MULTICAST:
ubhat 0:6cc76d70e2a1 91 {
ubhat 0:6cc76d70e2a1 92 break;
ubhat 0:6cc76d70e2a1 93 }
ubhat 0:6cc76d70e2a1 94 default:
ubhat 0:6cc76d70e2a1 95 break;
ubhat 0:6cc76d70e2a1 96 }
ubhat 0:6cc76d70e2a1 97
ubhat 0:6cc76d70e2a1 98 // Check Multicast
ubhat 0:6cc76d70e2a1 99 // Check Port
ubhat 0:6cc76d70e2a1 100 // Check Datarate
ubhat 0:6cc76d70e2a1 101 // Check FramePending
ubhat 0:6cc76d70e2a1 102 // Check Buffer
ubhat 0:6cc76d70e2a1 103 // Check BufferSize
ubhat 0:6cc76d70e2a1 104 // Check Rssi
ubhat 0:6cc76d70e2a1 105 // Check Snr
ubhat 0:6cc76d70e2a1 106 // Check RxSlot
ubhat 0:6cc76d70e2a1 107 LoRaMacDownlinkStatus.Rssi = McpsIndication->Rssi;
ubhat 0:6cc76d70e2a1 108 if( McpsIndication->Snr & 0x80 ) // The SNR sign bit is 1
ubhat 0:6cc76d70e2a1 109 {
ubhat 0:6cc76d70e2a1 110 // Invert and divide by 4
ubhat 0:6cc76d70e2a1 111 LoRaMacDownlinkStatus.Snr = ( ( ~McpsIndication->Snr + 1 ) & 0xFF ) >> 2;
ubhat 0:6cc76d70e2a1 112 LoRaMacDownlinkStatus.Snr = -LoRaMacDownlinkStatus.Snr;
ubhat 0:6cc76d70e2a1 113 }
ubhat 0:6cc76d70e2a1 114 else
ubhat 0:6cc76d70e2a1 115 {
ubhat 0:6cc76d70e2a1 116 // Divide by 4
ubhat 0:6cc76d70e2a1 117 LoRaMacDownlinkStatus.Snr = ( McpsIndication->Snr & 0xFF ) >> 2;
ubhat 0:6cc76d70e2a1 118 }
ubhat 0:6cc76d70e2a1 119 LoRaMacDownlinkStatus.DownlinkCounter++;
ubhat 0:6cc76d70e2a1 120 LoRaMacDownlinkStatus.RxData = McpsIndication->RxData;
ubhat 0:6cc76d70e2a1 121 LoRaMacDownlinkStatus.Port = McpsIndication->Port;
ubhat 0:6cc76d70e2a1 122 LoRaMacDownlinkStatus.Buffer = McpsIndication->Buffer;
ubhat 0:6cc76d70e2a1 123 LoRaMacDownlinkStatus.BufferSize = McpsIndication->BufferSize;
ubhat 0:6cc76d70e2a1 124 LoRaMacDownlinkStatus.RxSlot = McpsIndication->RxSlot;
ubhat 0:6cc76d70e2a1 125
ubhat 0:6cc76d70e2a1 126 if( ComplianceTest.Running == 1 )
ubhat 0:6cc76d70e2a1 127 {
ubhat 0:6cc76d70e2a1 128 port = 224;
ubhat 0:6cc76d70e2a1 129 ComplianceTest.DownLinkCounter++;
ubhat 0:6cc76d70e2a1 130 }
ubhat 0:6cc76d70e2a1 131 else
ubhat 0:6cc76d70e2a1 132 {
ubhat 0:6cc76d70e2a1 133 port = McpsIndication->Port;
ubhat 0:6cc76d70e2a1 134 }
ubhat 0:6cc76d70e2a1 135
ubhat 0:6cc76d70e2a1 136 if( McpsIndication->RxData == true )
ubhat 0:6cc76d70e2a1 137 {
ubhat 0:6cc76d70e2a1 138 switch( port )
ubhat 0:6cc76d70e2a1 139 {
ubhat 0:6cc76d70e2a1 140 case 1: // The application LED can be controlled on port 1 or 2
ubhat 0:6cc76d70e2a1 141 case 2:
ubhat 0:6cc76d70e2a1 142 break;
ubhat 0:6cc76d70e2a1 143 case 224:
ubhat 0:6cc76d70e2a1 144 PrepareComplianceTestFrame( McpsIndication );
ubhat 0:6cc76d70e2a1 145 break;
ubhat 0:6cc76d70e2a1 146 default:
ubhat 0:6cc76d70e2a1 147 break;
ubhat 0:6cc76d70e2a1 148 }
ubhat 0:6cc76d70e2a1 149 }
ubhat 0:6cc76d70e2a1 150
ubhat 0:6cc76d70e2a1 151 IsRxUpdate = true;
ubhat 0:6cc76d70e2a1 152
ubhat 0:6cc76d70e2a1 153 }
ubhat 0:6cc76d70e2a1 154
ubhat 0:6cc76d70e2a1 155 /*!
ubhat 0:6cc76d70e2a1 156 * \brief MLME-Confirm event function
ubhat 0:6cc76d70e2a1 157 *
ubhat 0:6cc76d70e2a1 158 * \param [IN] MlmeConfirm - Pointer to the confirm structure,
ubhat 0:6cc76d70e2a1 159 * containing confirm attributes.
ubhat 0:6cc76d70e2a1 160 */
ubhat 0:6cc76d70e2a1 161 void MlmeConfirm( MlmeConfirm_t *MlmeConfirm )
ubhat 0:6cc76d70e2a1 162 {
ubhat 0:6cc76d70e2a1 163 if( MlmeConfirm->Status == LORAMAC_EVENT_INFO_STATUS_OK )
ubhat 0:6cc76d70e2a1 164 {
ubhat 0:6cc76d70e2a1 165 switch( MlmeConfirm->MlmeRequest )
ubhat 0:6cc76d70e2a1 166 {
ubhat 0:6cc76d70e2a1 167 case MLME_JOIN:
ubhat 0:6cc76d70e2a1 168 {
ubhat 0:6cc76d70e2a1 169 // Status is OK, node has joined the network
ubhat 0:6cc76d70e2a1 170 IsNetworkJoinedStatusUpdate = true;
ubhat 0:6cc76d70e2a1 171 break;
ubhat 0:6cc76d70e2a1 172 }
ubhat 0:6cc76d70e2a1 173 case MLME_LINK_CHECK:
ubhat 0:6cc76d70e2a1 174 {
ubhat 0:6cc76d70e2a1 175 // Check DemodMargin
ubhat 0:6cc76d70e2a1 176 // Check NbGateways
ubhat 0:6cc76d70e2a1 177 if( ComplianceTest.Running == true )
ubhat 0:6cc76d70e2a1 178 {
ubhat 0:6cc76d70e2a1 179 ComplianceTest.LinkCheck = true;
ubhat 0:6cc76d70e2a1 180 ComplianceTest.DemodMargin = MlmeConfirm->DemodMargin;
ubhat 0:6cc76d70e2a1 181 ComplianceTest.NbGateways = MlmeConfirm->NbGateways;
ubhat 0:6cc76d70e2a1 182 }
ubhat 0:6cc76d70e2a1 183 break;
ubhat 0:6cc76d70e2a1 184 }
ubhat 0:6cc76d70e2a1 185 default:
ubhat 0:6cc76d70e2a1 186 break;
ubhat 0:6cc76d70e2a1 187 }
ubhat 0:6cc76d70e2a1 188 }
ubhat 0:6cc76d70e2a1 189
ubhat 0:6cc76d70e2a1 190 // Schedule next packet transmission
ubhat 0:6cc76d70e2a1 191 TimerSetValue( &TxNextPacketTimer, OVER_THE_AIR_ACTIVATION_DUTYCYCLE );
ubhat 0:6cc76d70e2a1 192 TimerStart( &TxNextPacketTimer );
ubhat 0:6cc76d70e2a1 193
ubhat 0:6cc76d70e2a1 194 DeviceState = DEVICE_STATE_SLEEP;
ubhat 0:6cc76d70e2a1 195 }